all broken now. working on adding mouse binding support
[mikachu/openbox.git] / src / bindings.cc
1 // -*- mode: C++; indent-tabs-mode: nil; c-basic-offset: 2; -*-
2
3 #ifdef HAVE_CONFIG_H
4 # include "../config.h"
5 #endif
6
7 #include "bindings.hh"
8 #include "otk/display.hh"
9
10 extern "C" {
11 #include <X11/Xlib.h>
12
13 #include "gettext.h"
14 #define _(str) gettext(str)
15 }
16
17 namespace ob {
18
19 #include <stdio.h>
20 static void print_branch(BindingTree *first, std::string str)
21 {
22   BindingTree *p = first;
23   
24   while (p) {
25     if (p->first_child)
26       print_branch(p->first_child, str + " " + p->text);
27     if (!p->chain)
28       printf("%d%s\n", p->id, (str + " " + p->text).c_str());
29     p = p->next_sibling;
30   }
31 }
32
33
34 void OBBindings::display()
35 {
36   if (_keytree.first_child) {
37     printf("Key Tree:\n");
38     print_branch(_keytree.first_child, "");
39   }
40   if (_mousetree.next_sibling) {
41     printf("Mouse Tree:\n");
42     BindingTree *p = _mousetree.next_sibling;
43     while (p) {
44       printf("%d %s\n", p->id, p->text.c_str());
45       p = p->next_sibling;
46     }
47   }
48 }
49
50
51 static bool buttonvalue(const std::string &button, unsigned int *val)
52 {
53   if (button == "1" || button == "Button1") {
54     *val |= Button1;
55   } else if (button == "2" || button == "Button2") {
56     *val |= Button2;
57   } else if (button == "3" || button == "Button3") {
58     *val |= Button3;
59   } else if (button == "4" || button == "Button4") {
60     *val |= Button4;
61   } else if (button == "5" || button == "Button5") {
62     *val |= Button5;
63   } else
64     return false;
65   return true;
66 }
67
68 static bool modvalue(const std::string &mod, unsigned int *val)
69 {
70   if (mod == "C") {           // control
71     *val |= ControlMask;
72   } else if (mod == "S") {    // shift
73     *val |= ShiftMask;
74   } else if (mod == "A" ||    // alt/mod1
75              mod == "M" ||
76              mod == "Mod1" ||
77              mod == "M1") {
78     *val |= Mod1Mask;
79   } else if (mod == "Mod2" ||   // mod2
80              mod == "M2") {
81     *val |= Mod2Mask;
82   } else if (mod == "Mod3" ||   // mod3
83              mod == "M3") {
84     *val |= Mod3Mask;
85   } else if (mod == "W" ||    // windows/mod4
86              mod == "Mod4" ||
87              mod == "M4") {
88     *val |= Mod4Mask;
89   } else if (mod == "Mod5" ||   // mod5
90              mod == "M5") {
91     *val |= Mod5Mask;
92   } else {                    // invalid
93     return false;
94   }
95   return true;
96 }
97
98 bool OBBindings::translate(const std::string &str, Binding &b, bool askey)
99 {
100   // parse out the base key name
101   std::string::size_type keybegin = str.find_last_of('-');
102   keybegin = (keybegin == std::string::npos) ? 0 : keybegin + 1;
103   std::string key(str, keybegin);
104
105   // parse out the requested modifier keys
106   unsigned int modval = 0;
107   std::string::size_type begin = 0, end;
108   while (begin != keybegin) {
109     end = str.find_first_of('-', begin);
110
111     std::string mod(str, begin, end-begin);
112     if (!modvalue(mod, &modval)) {
113 //      printf(_("Invalid modifier element in key binding: %s\n"), mod.c_str());
114       return false;
115     }
116     
117     begin = end + 1;
118   }
119
120   // set the binding
121   b.modifiers = modval;
122   if (askey) {
123     KeySym sym = XStringToKeysym(const_cast<char *>(key.c_str()));
124     if (sym == NoSymbol) return false;
125     b.key = XKeysymToKeycode(otk::OBDisplay::display, sym);
126     return b.key != 0;
127   } else {
128     return buttonvalue(key, &b.key);
129   }
130 }
131
132 static void destroytree(BindingTree *tree)
133 {
134   while (tree) {
135     BindingTree *c = tree->first_child;
136     delete tree;
137     tree = c;
138   }
139 }
140
141 BindingTree *OBBindings::buildtree(const StringVect &keylist, int id)
142 {
143   if (keylist.empty()) return 0; // nothing in the list.. return 0
144
145   BindingTree *ret = 0, *p;
146
147   StringVect::const_reverse_iterator it, end = keylist.rend();
148   for (it = keylist.rbegin(); it != end; ++it) {
149     p = ret;
150     ret = new BindingTree(id);
151     if (!p) ret->chain = false;
152     ret->first_child = p;
153     if (!translate(*it, ret->binding, true)) {
154       destroytree(ret);
155       ret = 0;
156       break;
157     }
158     ret->text = *it; // XXX: rm me
159   }
160   return ret;
161 }
162
163
164 OBBindings::OBBindings()
165   : _curpos(&_keytree)
166 {
167 }
168
169
170 OBBindings::~OBBindings()
171 {
172   remove_all();
173 }
174
175
176 bool OBBindings::add_mouse(const std::string &button, int id)
177 {
178   BindingTree n;
179
180   if (!translate(button, n.binding, false))
181     return false;
182
183   BindingTree *p = _mousetree.next_sibling, *last = &_mousetree;
184   while (p) {
185     if (p->binding == n.binding)
186       return false; // conflict
187     last = p;
188     p = p->next_sibling;
189   }
190   display();
191   last->next_sibling = new BindingTree(id);
192   display();
193   last->next_sibling->chain = false;
194   last->next_sibling->binding.key = n.binding.key;
195   last->next_sibling->binding.modifiers = n.binding.modifiers;
196  
197   return true;
198 }
199
200
201 int OBBindings::remove_mouse(const std::string &button)
202 {
203   (void)button;
204   assert(false); // XXX: function not implemented yet
205 }
206
207
208 void OBBindings::assimilate(BindingTree *node)
209 {
210   BindingTree *a, *b, *tmp, *last;
211
212   if (!_keytree.first_child) {
213     // there are no nodes at this level yet
214     _keytree.first_child = node;
215     return;
216   } else {
217     a = _keytree.first_child;
218     last = a;
219     b = node;
220     while (a) {
221       last = a;
222       if (a->binding != b->binding) {
223         a = a->next_sibling;
224       } else {
225         tmp = b;
226         b = b->first_child;
227         delete tmp;
228         a = a->first_child;
229       }
230     }
231     if (last->binding != b->binding)
232       last->next_sibling = b;
233     else
234       last->first_child = b->first_child;
235     delete b;
236   }
237 }
238
239
240 int OBBindings::find_key(BindingTree *search) {
241   BindingTree *a, *b;
242   a = _keytree.first_child;
243   b = search;
244   while (a && b) {
245     if (a->binding != b->binding) {
246       a = a->next_sibling;
247     } else {
248       if (a->chain == b->chain) {
249         if (!a->chain)
250           return a->id; // found it! (return the actual id, not the search's)
251       } else
252           return -2; // the chain status' don't match (conflict!)
253       b = b->first_child;
254       a = a->first_child;
255     }
256   }
257   return -1; // it just isn't in here
258 }
259
260 bool OBBindings::add_key(const StringVect &keylist, int id)
261 {
262   BindingTree *tree;
263
264   if (!(tree = buildtree(keylist, id)))
265     return false; // invalid binding requested
266
267   if (find_key(tree) < -1) {
268     // conflicts with another binding
269     destroytree(tree);
270     return false;
271   }
272
273   // assimilate this built tree into the main tree
274   assimilate(tree); // assimilation destroys/uses the tree
275   return true;
276 }
277
278
279 int OBBindings::find_key(const StringVect &keylist)
280 {
281   BindingTree *tree;
282   bool ret;
283
284   if (!(tree = buildtree(keylist, 0)))
285     return false; // invalid binding requested
286
287   ret = find_key(tree) >= 0;
288
289   destroytree(tree);
290
291   return ret;
292 }
293
294
295 int OBBindings::remove_key(const StringVect &keylist)
296 {
297   (void)keylist;
298   assert(false); // XXX: function not implemented yet
299 }
300
301
302 static void remove_branch(BindingTree *first)
303 {
304   BindingTree *p = first;
305
306   while (p) {
307     if (p->first_child)
308       remove_branch(p->first_child);
309     BindingTree *s = p->next_sibling;
310     delete p;
311     p = s;
312   }
313 }
314
315
316 void OBBindings::remove_all()
317 {
318   if (_keytree.first_child) {
319     remove_branch(_keytree.first_child);
320     _keytree.first_child = 0;
321   }
322   BindingTree *p = _mousetree.next_sibling;
323   while (p) {
324     BindingTree *n = p->next_sibling;
325     delete p;
326     p = n;
327   }
328   _mousetree.next_sibling = 0;
329 }
330
331
332 void OBBindings::process(unsigned int modifiers, unsigned int key)
333 {
334   BindingTree *c = _curpos->first_child;
335
336   while (c) {
337     if (c->binding.key == key && c->binding.modifiers == modifiers) {
338       _curpos = c;
339       break;
340     }
341   }
342   if (c) {
343     if (!_curpos->chain) {
344       // XXX execute command for _curpos->id
345       _curpos = &_keytree; // back to the start
346     }
347   }
348 }
349
350 }