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(const BindingTree *first, std::string str)
  21 {
  22   const 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) {
  41     printf("Mouse Tree:\n");
  42     BindingTree *p = _mousetree;
  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,
  99                            bool askey) const
 100 {
 101   // parse out the base key name
 102   std::string::size_type keybegin = str.find_last_of('-');
 103   keybegin = (keybegin == std::string::npos) ? 0 : keybegin + 1;
 104   std::string key(str, keybegin);
 105
 106   // parse out the requested modifier keys
 107   unsigned int modval = 0;
 108   std::string::size_type begin = 0, end;
 109   while (begin != keybegin) {
 110     end = str.find_first_of('-', begin);
 111
 112     std::string mod(str, begin, end-begin);
 113     if (!modvalue(mod, &modval)) {
 114 //      printf(_("Invalid modifier element in key binding: %s\n"), mod.c_str());
 115       return false;
 116     }
 117
 118     begin = end + 1;
 119   }
 120
 121   // set the binding
 122   b.modifiers = modval;
 123   if (askey) {
 124     KeySym sym = XStringToKeysym(const_cast<char *>(key.c_str()));
 125     if (sym == NoSymbol) return false;
 126     b.key = XKeysymToKeycode(otk::OBDisplay::display, sym);
 127     return b.key != 0;
 128   } else {
 129     return buttonvalue(key, &b.key);
 130   }
 131 }
 132
 133 static void destroytree(BindingTree *tree)
 134 {
 135   while (tree) {
 136     BindingTree *c = tree->first_child;
 137     delete tree;
 138     tree = c;
 139   }
 140 }
 141
 142 BindingTree *OBBindings::buildtree(const StringVect &keylist, int id) const
 143 {
 144   if (keylist.empty()) return 0; // nothing in the list.. return 0
 145
 146   BindingTree *ret = 0, *p;
 147
 148   StringVect::const_reverse_iterator it, end = keylist.rend();
 149   for (it = keylist.rbegin(); it != end; ++it) {
 150     p = ret;
 151     ret = new BindingTree(id);
 152     if (!p) ret->chain = false;
 153     ret->first_child = p;
 154     if (!translate(*it, ret->binding, true)) {
 155       destroytree(ret);
 156       ret = 0;
 157       break;
 158     }
 159     ret->text = *it; // XXX: rm me
 160   }
 161   return ret;
 162 }
 163
 164
 165 OBBindings::OBBindings()
 166   : _curpos(&_keytree), _mousetree(0)
 167 {
 168 }
 169
 170
 171 OBBindings::~OBBindings()
 172 {
 173   remove_all();
 174 }
 175
 176
 177 bool OBBindings::add_mouse(const std::string &button, int id)
 178 {
 179   BindingTree n;
 180
 181   if (!translate(button, n.binding, false))
 182     return false;
 183
 184   BindingTree *p = _mousetree, **newp = &_mousetree;
 185   while (p) {
 186     if (p->binding == n.binding)
 187       return false; // conflict
 188     p = p->next_sibling;
 189     newp = &p->next_sibling;
 190   }
 191   display();
 192   *newp = new BindingTree(id);
 193   display();
 194   (*newp)->text = button;
 195   (*newp)->chain = false;
 196   (*newp)->binding.key = n.binding.key;
 197   (*newp)->binding.modifiers = n.binding.modifiers;
 198
 199   return true;
 200 }
 201
 202
 203 int OBBindings::remove_mouse(const std::string &button)
 204 {
 205   (void)button;
 206   assert(false); // XXX: function not implemented yet
 207 }
 208
 209
 210 void OBBindings::assimilate(BindingTree *node)
 211 {
 212   BindingTree *a, *b, *tmp, *last;
 213
 214   printf("node=%lx\n", (long)node);
 215   if (!_keytree.first_child) {
 216     // there are no nodes at this level yet
 217     _keytree.first_child = node;
 218   } else {
 219     a = _keytree.first_child;
 220     last = a;
 221     b = node;
 222     while (a) {
 223   printf("in while.. b=%lx\n", (long)b);
 224       last = a;
 225       if (a->binding != b->binding) {
 226         a = a->next_sibling;
 227       } else {
 228         tmp = b;
 229         b = b->first_child;
 230         delete tmp;
 231         a = a->first_child;
 232       }
 233     }
 234   printf("after while.. b=%lx\n", (long)b);
 235     if (last->binding != b->binding)
 236       last->next_sibling = b;
 237     else
 238       last->first_child = b->first_child;
 239     delete b;
 240   }
 241 }
 242
 243
 244 int OBBindings::find_key(BindingTree *search) const {
 245   BindingTree *a, *b;
 246   print_branch(&_keytree, " Searching:");
 247   print_branch(search, " for...");
 248   a = _keytree.first_child;
 249   b = search;
 250   while (a && b) {
 251     if (a->binding != b->binding) {
 252       a = a->next_sibling;
 253     } else {
 254       if (a->chain == b->chain) {
 255         if (!a->chain) {
 256           printf("Match found with %s\n", a->text.c_str());
 257           return a->id; // found it! (return the actual id, not the search's)
 258         }
 259       } else {
 260         printf("Conflict found with %s\n", a->text.c_str());
 261         return -2; // the chain status' don't match (conflict!)
 262       }
 263       b = b->first_child;
 264       a = a->first_child;
 265     }
 266   }
 267   return -1; // it just isn't in here
 268 }
 269
 270 bool OBBindings::add_key(const StringVect &keylist, int id)
 271 {
 272   BindingTree *tree;
 273
 274   if (!(tree = buildtree(keylist, id)))
 275     return false; // invalid binding requested
 276
 277   print_branch(tree, " Adding: ");
 278
 279   if (find_key(tree) != -1) {
 280     // conflicts with another binding
 281     printf("Conflict\n");
 282     destroytree(tree);
 283     return false;
 284   }
 285
 286   // assimilate this built tree into the main tree
 287   assimilate(tree); // assimilation destroys/uses the tree
 288
 289   printf("Added!\n");
 290   print_branch(&_keytree, "");
 291   printf("\n");
 292
 293   return true;
 294 }
 295
 296
 297 int OBBindings::find_key(const StringVect &keylist)
 298 {
 299   BindingTree *tree;
 300   bool ret;
 301
 302   if (!(tree = buildtree(keylist, 0)))
 303     return false; // invalid binding requested
 304
 305   ret = find_key(tree) >= 0;
 306
 307   destroytree(tree);
 308
 309   return ret;
 310 }
 311
 312
 313 int OBBindings::remove_key(const StringVect &keylist)
 314 {
 315   (void)keylist;
 316   assert(false); // XXX: function not implemented yet
 317 }
 318
 319
 320 static void remove_branch(BindingTree *first)
 321 {
 322   BindingTree *p = first;
 323
 324   while (p) {
 325     if (p->first_child)
 326       remove_branch(p->first_child);
 327     BindingTree *s = p->next_sibling;
 328     delete p;
 329     p = s;
 330   }
 331 }
 332
 333
 334 void OBBindings::remove_all()
 335 {
 336   if (_keytree.first_child) {
 337     remove_branch(_keytree.first_child);
 338     _keytree.first_child = 0;
 339   }
 340   BindingTree *p = _mousetree;
 341   while (p) {
 342     BindingTree *n = p->next_sibling;
 343     delete p;
 344     p = n;
 345   }
 346   _mousetree = 0;
 347 }
 348
 349
 350 void OBBindings::process(unsigned int modifiers, unsigned int key)
 351 {
 352   BindingTree *c = _curpos->first_child;
 353
 354   while (c) {
 355     if (c->binding.key == key && c->binding.modifiers == modifiers) {
 356       _curpos = c;
 357       break;
 358     }
 359   }
 360   if (c) {
 361     if (!_curpos->chain) {
 362       // XXX execute command for _curpos->id
 363       _curpos = &_keytree; // back to the start
 364     }
 365   }
 366 }
 367
 368 }