enough with umpteen "i18n.h" files. Consolidate on pbd/i18n.h
[ardour.git] / libs / gtkmm2ext / bindings.cc
index af709b49b6c737d026be25c1aa3f6aaef9d83ae0..ff44da4b32c5487d6cf8be2e4f4d7681e4370a33 100644 (file)
+/*
+  Copyright (C) 2012 Paul Davis
+
+  This program is free software; you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program; if not, write to the Free Software
+  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+*/
+
 #include <iostream>
+
+#include "pbd/gstdio_compat.h"
+#include <gtkmm/accelmap.h>
+#include <gtkmm/uimanager.h>
+
+#include "pbd/convert.h"
+#include "pbd/debug.h"
+#include "pbd/error.h"
+#include "pbd/replace_all.h"
 #include "pbd/xml++.h"
+
+#include "gtkmm2ext/actions.h"
 #include "gtkmm2ext/bindings.h"
+#include "gtkmm2ext/debug.h"
 #include "gtkmm2ext/keyboard.h"
+#include "gtkmm2ext/utils.h"
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 using namespace std;
 using namespace Glib;
 using namespace Gtk;
 using namespace Gtkmm2ext;
+using namespace PBD;
+
+list<Bindings*> Bindings::bindings; /* global. Gulp */
+list<ActionMap*> ActionMap::action_maps; /* global. Gulp */
+PBD::Signal1<void,Bindings*> Bindings::BindingsChanged;
+
+template <typename IteratorValueType>
+struct ActionNameRegistered
+{
+       ActionNameRegistered(std::string const& name)
+               : action_name(name)
+       {}
+
+       bool operator()(IteratorValueType elem) const {
+               return elem.second.action_name == action_name;
+       }
+       std::string const& action_name;
+};
+
+MouseButton::MouseButton (uint32_t state, uint32_t keycode)
+{
+       uint32_t ignore = ~Keyboard::RelevantModifierKeyMask;
+
+       /* this is a slightly wierd test that relies on
+        * gdk_keyval_is_{upper,lower}() returning true for keys that have no
+        * case-sensitivity. This covers mostly non-alphanumeric keys.
+        */
+
+       if (gdk_keyval_is_upper (keycode) && gdk_keyval_is_lower (keycode)) {
+               /* key is not subject to case, so ignore SHIFT
+                */
+               ignore |= GDK_SHIFT_MASK;
+       }
+
+       _val = (state & ~ignore);
+       _val <<= 32;
+       _val |= keycode;
+};
+
+bool
+MouseButton::make_button (const string& str, MouseButton& b)
+{
+       int s = 0;
+
+       if (str.find ("Primary") != string::npos) {
+               s |= Keyboard::PrimaryModifier;
+       }
+
+       if (str.find ("Secondary") != string::npos) {
+               s |= Keyboard::SecondaryModifier;
+       }
+
+       if (str.find ("Tertiary") != string::npos) {
+               s |= Keyboard::TertiaryModifier;
+       }
+
+       if (str.find ("Level4") != string::npos) {
+               s |= Keyboard::Level4Modifier;
+       }
+
+       string::size_type lastmod = str.find_last_of ('-');
+       uint32_t button_number;
+
+       if (lastmod == string::npos) {
+               button_number = PBD::atoi (str);
+       } else {
+               button_number = PBD::atoi (str.substr (lastmod+1));
+       }
+
+       b = MouseButton (s, button_number);
+       return true;
+}
+
+string
+MouseButton::name () const
+{
+       int s = state();
+
+       string str;
+
+       if (s & Keyboard::PrimaryModifier) {
+               str += "Primary";
+       }
+       if (s & Keyboard::SecondaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Secondary";
+       }
+       if (s & Keyboard::TertiaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Tertiary";
+       }
+       if (s & Keyboard::Level4Modifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Level4";
+       }
+
+       if (!str.empty()) {
+               str += '-';
+       }
+
+       char buf[16];
+       snprintf (buf, sizeof (buf), "%u", button());
+       str += buf;
+
+       return str;
+}
+
+/*================================ KeyboardKey ================================*/
+KeyboardKey::KeyboardKey (uint32_t state, uint32_t keycode)
+{
+       uint32_t ignore = ~Keyboard::RelevantModifierKeyMask;
+
+       _val = (state & ~ignore);
+       _val <<= 32;
+       _val |= keycode;
+}
+
+string
+KeyboardKey::display_label () const
+{
+       if (key() == 0) {
+               return string();
+       }
+
+       /* This magically returns a string that will display the right thing
+        *  on all platforms, notably the command key on OS X.
+        */
+
+       uint32_t mod = state();
+
+#ifdef __APPLE__
+       /* We use both bits (MOD2|META) for Primary on OS X,
+        * but we don't want MOD2 showing up in listings.
+        */
+
+       if (mod & GDK_MOD2_MASK) {
+               mod &= ~GDK_MOD2_MASK;
+       }
+#endif
+
+       return gtk_accelerator_get_label (key(), (GdkModifierType) mod);
+}
 
 string
 KeyboardKey::name () const
 {
-        int s = state();
-        
-        string str;
-
-        if (s & Keyboard::PrimaryModifier) {
-                str += "Primary";
-        } 
-        if (s & Keyboard::SecondaryModifier) {
-                if (!str.empty()) {
-                        str += '-';
-                }
-                str += "Secondary";
-        }
-        if (s & Keyboard::TertiaryModifier) {
-                if (!str.empty()) {
-                        str += '-';
-                }
-                str += "Tertiary";
-        } 
-        if (s & Keyboard::Level4Modifier) {
-                if (!str.empty()) {
-                        str += '-';
-                }
-                str += "Level4";
-        }
-        
-        if (!str.empty()) {
-                str += '-';
-        }
-
-        str += gdk_keyval_name (key());
-
-        return str;
+       int s = state();
+
+       string str;
+
+       if (s & Keyboard::PrimaryModifier) {
+               str += "Primary";
+       }
+       if (s & Keyboard::SecondaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Secondary";
+       }
+       if (s & Keyboard::TertiaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Tertiary";
+       }
+       if (s & Keyboard::Level4Modifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += "Level4";
+       }
+
+       if (!str.empty()) {
+               str += '-';
+       }
+
+       char const *gdk_name = gdk_keyval_name (key());
+
+       if (gdk_name) {
+               str += gdk_name;
+       } else {
+               /* fail! */
+               return string();
+       }
+
+       return str;
+}
+
+string
+KeyboardKey::native_name () const
+{
+       int s = state();
+
+       string str;
+
+       if (s & Keyboard::PrimaryModifier) {
+               str += Keyboard::primary_modifier_name ();
+       }
+       if (s & Keyboard::SecondaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::secondary_modifier_name ();
+       }
+       if (s & Keyboard::TertiaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::tertiary_modifier_name ();
+       }
+       if (s & Keyboard::Level4Modifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::level4_modifier_name ();
+       }
+
+       if (!str.empty()) {
+               str += '-';
+       }
+
+       char const *gdk_name = gdk_keyval_name (key());
+
+       if (gdk_name) {
+               str += gdk_name;
+       } else {
+               /* fail! */
+               return string();
+       }
+
+       return str;
+}
+
+string
+KeyboardKey::native_short_name () const
+{
+       int s = state();
+
+       string str;
+
+       if (s & Keyboard::PrimaryModifier) {
+               str += Keyboard::primary_modifier_short_name ();
+       }
+       if (s & Keyboard::SecondaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::secondary_modifier_short_name ();
+       }
+       if (s & Keyboard::TertiaryModifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::tertiary_modifier_short_name ();
+       }
+       if (s & Keyboard::Level4Modifier) {
+               if (!str.empty()) {
+                       str += '-';
+               }
+               str += Keyboard::level4_modifier_short_name ();
+       }
+
+       if (!str.empty()) {
+               str += '-';
+       }
+
+       char const *gdk_name = gdk_keyval_name (key());
+
+       if (gdk_name) {
+               str += gdk_name;
+       } else {
+               /* fail! */
+               return string();
+       }
+
+       return str;
 }
 
 bool
 KeyboardKey::make_key (const string& str, KeyboardKey& k)
 {
-        int s = 0;
+       int s = 0;
+
+       if (str.find ("Primary") != string::npos) {
+               s |= Keyboard::PrimaryModifier;
+       }
+
+       if (str.find ("Secondary") != string::npos) {
+               s |= Keyboard::SecondaryModifier;
+       }
+
+       if (str.find ("Tertiary") != string::npos) {
+               s |= Keyboard::TertiaryModifier;
+       }
 
-        if (str.find ("Primary") != string::npos) {
-                s |= Keyboard::PrimaryModifier;
-        }
+       if (str.find ("Level4") != string::npos) {
+               s |= Keyboard::Level4Modifier;
+       }
 
-        if (str.find ("Secondary") != string::npos) {
-                s |= Keyboard::SecondaryModifier;
-        }
+       /* since all SINGLE key events keycodes are changed to lower case
+        * before looking them up, make sure we only store lower case here. The
+        * Shift part will be stored in the modifier part of the KeyboardKey.
+        *
+        * And yes Mildred, this doesn't cover CapsLock cases. Oh well.
+        */
 
-        if (str.find ("Tertiary") != string::npos) {
-                s |= Keyboard::TertiaryModifier;
-        }
+       string actual;
 
-        if (str.find ("Level4") != string::npos) {
-                s |= Keyboard::Level4Modifier;
-        }
+       string::size_type lastmod = str.find_last_of ('-');
 
-        string::size_type lastmod = str.find_last_of ('-');
-        guint keyval;
+       if (lastmod != string::npos) {
+               actual = str.substr (lastmod+1);
+       }
+       else {
+               actual = str;
+       }
 
-        if (lastmod == string::npos) {
-                keyval = gdk_keyval_from_name (str.c_str());
-        } else {
-                keyval = gdk_keyval_from_name (str.substr (lastmod+1).c_str());
-        }
+       if (actual.size() == 1) {
+               actual = PBD::downcase (actual);
+       }
 
-        if (keyval == GDK_VoidSymbol) {
-                return false;
-        }
+       guint keyval;
+       keyval = gdk_keyval_from_name (actual.c_str());
 
-        k = KeyboardKey (s, keyval);
-        return true;
+       if (keyval == GDK_VoidSymbol || keyval == 0) {
+               return false;
+       }
+
+       k = KeyboardKey (s, keyval);
+
+       return true;
 }
 
-Bindings::Bindings ()
-        : action_map (0)
+/*================================= Bindings =================================*/
+Bindings::Bindings (std::string const& name)
+       : _name (name)
+       , _action_map (0)
 {
+       bindings.push_back (this);
 }
 
 Bindings::~Bindings()
 {
+       bindings.remove (this);
+}
+
+string
+Bindings::ardour_action_name (RefPtr<Action> action)
+{
+       /* Skip "<Actions>/" */
+       return action->get_accel_path ().substr (10);
+}
+
+KeyboardKey
+Bindings::get_binding_for_action (RefPtr<Action> action, Operation& op)
+{
+       const string action_name = ardour_action_name (action);
+
+       for (KeybindingMap::iterator k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+
+               /* option one: action has already been associated with the
+                * binding
+                */
+
+               if (k->second.action == action) {
+                       return k->first;
+               }
+
+               /* option two: action name matches, so lookup the action,
+                * setup the association while we're here, and return the binding.
+                */
+
+               if (_action_map && k->second.action_name == action_name) {
+                       k->second.action = _action_map->find_action (action_name);
+                       return k->first;
+               }
+
+       }
+
+       for (KeybindingMap::iterator k = release_bindings.begin(); k != release_bindings.end(); ++k) {
+
+               /* option one: action has already been associated with the
+                * binding
+                */
+
+               if (k->second.action == action) {
+                       return k->first;
+               }
+
+               /* option two: action name matches, so lookup the action,
+                * setup the association while we're here, and return the binding.
+                */
+
+               if (_action_map && k->second.action_name == action_name) {
+                       k->second.action = _action_map->find_action (action_name);
+                       return k->first;
+               }
+
+       }
+
+       return KeyboardKey::null_key();
 }
 
 void
-Bindings::set_action_map (ActionMap& am)
+Bindings::set_action_map (ActionMap& actions)
+{
+       if (_action_map) {
+               _action_map->set_bindings (0);
+       }
+
+       _action_map = &actions;
+       _action_map->set_bindings (this);
+
+       dissociate ();
+       associate ();
+}
+
+bool
+Bindings::empty_keys() const
+{
+       return press_bindings.empty() && release_bindings.empty();
+}
+
+bool
+Bindings::empty_mouse () const
 {
-        action_map = &am;
-        press_bindings.clear ();
-        release_bindings.clear ();
+       return button_press_bindings.empty() && button_release_bindings.empty();
 }
 
 bool
-Bindings::activate (KeyboardKey kb, KeyboardKey::Operation op)
+Bindings::empty() const
 {
-        KeybindingMap* kbm;
+       return empty_keys() && empty_mouse ();
+}
+
+bool
+Bindings::activate (KeyboardKey kb, Operation op)
+{
+       KeybindingMap& kbm = get_keymap (op);
+
+       /* if shift was pressed, GDK will send us (e.g) 'E' rather than 'e'.
+          Our bindings all use the lower case character/keyname, so switch
+          to the lower case before doing the lookup.
+       */
+
+       KeyboardKey unshifted (kb.state(), gdk_keyval_to_lower (kb.key()));
+
+       KeybindingMap::iterator k = kbm.find (unshifted);
+
+       if (k == kbm.end()) {
+               /* no entry for this key in the state map */
+               DEBUG_TRACE (DEBUG::Bindings, string_compose ("no binding for %1\n", unshifted));
+               return false;
+       }
 
-        switch (op) {
-        case KeyboardKey::Press:
-                kbm = &press_bindings;
-                break;
-        case KeyboardKey::Release:
-                kbm = &release_bindings;
-                break;
-        }
+       RefPtr<Action> action;
 
-        KeybindingMap::iterator k = kbm->find (kb);
+       if (k->second.action) {
+               action = k->second.action;
+       } else {
+               if (_action_map) {
+                       action = _action_map->find_action (k->second.action_name);
+               }
+       }
 
-        if (k == kbm->end()) {
-                /* no entry for this key in the state map */
-                return false;
-        }
+       if (action) {
+               /* lets do it ... */
+               DEBUG_TRACE (DEBUG::Bindings, string_compose ("binding for %1: %2\n", unshifted, k->second.action_name));
+               action->activate ();
+       }
 
-        /* lets do it ... */
+       /* return true even if the action could not be found */
 
-        cerr << "Firing up " << k->second->get_name() << endl;
-        k->second->activate ();
-        return true;
+       return true;
 }
 
 void
-Bindings::add (KeyboardKey kb, KeyboardKey::Operation op, RefPtr<Action> what)
+Bindings::associate ()
 {
-        KeybindingMap* kbm;
+       KeybindingMap::iterator k;
+
+       if (!_action_map) {
+               return;
+       }
+
+       for (k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+               k->second.action = _action_map->find_action (k->second.action_name);
+               if (k->second.action) {
+                       push_to_gtk (k->first, k->second.action);
+               } else {
+                       cerr << _name << " didn't find " << k->second.action_name << " in " << _action_map->name() << endl;
+               }
+       }
+
+       for (k = release_bindings.begin(); k != release_bindings.end(); ++k) {
+               k->second.action = _action_map->find_action (k->second.action_name);
+               /* no working support in GTK for release bindings */
+       }
+
+       MouseButtonBindingMap::iterator b;
+
+       for (b = button_press_bindings.begin(); b != button_press_bindings.end(); ++b) {
+               b->second.action = _action_map->find_action (b->second.action_name);
+       }
+
+       for (b = button_release_bindings.begin(); b != button_release_bindings.end(); ++b) {
+               b->second.action = _action_map->find_action (b->second.action_name);
+       }
+}
 
-        switch (op) {
-        case KeyboardKey::Press:
-                kbm = &press_bindings;
-                break;
-        case KeyboardKey::Release:
-                kbm = &release_bindings;
-                break;
-        }
+void
+Bindings::dissociate ()
+{
+       KeybindingMap::iterator k;
+
+       for (k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+               k->second.action.clear ();
+       }
+       for (k = release_bindings.begin(); k != release_bindings.end(); ++k) {
+               k->second.action.clear ();
+       }
+}
 
-        KeybindingMap::iterator k = kbm->find (kb);
+void
+Bindings::push_to_gtk (KeyboardKey kb, RefPtr<Action> what)
+{
+       /* GTK has the useful feature of showing key bindings for actions in
+        * menus. As of August 2015, we have no interest in trying to
+        * reimplement this functionality, so we will use it even though we no
+        * longer use GTK accelerators for handling key events. To do this, we
+        * need to make sure that there is a fully populated GTK AccelMap set
+        * up with all bindings/actions.
+        */
+
+       Gtk::AccelKey gtk_key;
+       bool entry_exists = Gtk::AccelMap::lookup_entry (what->get_accel_path(), gtk_key);
+
+       if (!entry_exists) {
+
+               /* there is a trick happening here. It turns out that
+                * gtk_accel_map_add_entry() performs no validation checks on
+                * the accelerator keyval. This means we can use it to define
+                * ANY accelerator, even if they violate GTK's rules
+                * (e.g. about not using navigation keys). This works ONLY when
+                * the entry in the GTK accelerator map has not already been
+                * added. The entries will be added by the GTK UIManager when
+                * building menus, so this code must be called before that
+                * happens.
+                */
+
+               Gtk::AccelMap::add_entry (what->get_accel_path(), kb.key(), (Gdk::ModifierType) kb.state());
+       }
+}
 
-        if (k == kbm->end()) {
-                pair<KeyboardKey,RefPtr<Action> > newpair (kb, what);
-                kbm->insert (newpair);
-        } else {
-                k->second = what;
-        }
+bool
+Bindings::replace (KeyboardKey kb, Operation op, string const & action_name, bool can_save)
+{
+       if (!_action_map) {
+               return false;
+       }
+
+       if (is_registered(op, action_name)) {
+               remove (op, action_name, can_save);
+       }
+
+       /* XXX need a way to get the old group name */
+       add (kb, op, action_name, 0, can_save);
+
+       return true;
+}
+
+bool
+Bindings::add (KeyboardKey kb, Operation op, string const& action_name, XMLProperty const* group, bool can_save)
+{
+       if (is_registered (op, action_name)) {
+               return false;
+       }
+
+       KeybindingMap& kbm = get_keymap (op);
+       if (group) {
+               KeybindingMap::value_type new_pair = make_pair (kb, ActionInfo (action_name, group->value()));
+               kbm.insert (new_pair).first;
+       } else {
+               KeybindingMap::value_type new_pair = make_pair (kb, ActionInfo (action_name));
+               kbm.insert (new_pair).first;
+       }
+
+       if (can_save) {
+               Keyboard::keybindings_changed ();
+       }
+
+       BindingsChanged (this); /* EMIT SIGNAL */
+       return true;
+}
+
+bool
+Bindings::remove (Operation op, std::string const& action_name, bool can_save)
+{
+       bool erased_action = false;
+       KeybindingMap& kbm = get_keymap (op);
+       for (KeybindingMap::iterator k = kbm.begin(); k != kbm.end(); ++k) {
+               if (k->second.action_name == action_name) {
+                       kbm.erase (k);
+                       erased_action = true;
+                       break;
+               }
+       }
+
+       if (!erased_action) {
+               return erased_action;
+       }
+
+       if (can_save) {
+               Keyboard::keybindings_changed ();
+       }
+
+       BindingsChanged (this); /* EMIT SIGNAL */
+       return erased_action;
+}
+
+
+bool
+Bindings::activate (MouseButton bb, Operation op)
+{
+       MouseButtonBindingMap& bbm = get_mousemap(op);
+
+       MouseButtonBindingMap::iterator b = bbm.find (bb);
+
+       if (b == bbm.end()) {
+               /* no entry for this key in the state map */
+               return false;
+       }
+
+       RefPtr<Action> action;
+
+       if (b->second.action) {
+               action = b->second.action;
+       } else {
+               if (_action_map) {
+                       action = _action_map->find_action (b->second.action_name);
+               }
+       }
+
+       if (action) {
+               /* lets do it ... */
+               DEBUG_TRACE (DEBUG::Bindings, string_compose ("activating action %1\n", ardour_action_name (action)));
+               action->activate ();
+       }
+
+       /* return true even if the action could not be found */
+
+       return true;
 }
 
 void
-Bindings::remove (KeyboardKey kb, KeyboardKey::Operation op)
+Bindings::add (MouseButton bb, Operation op, string const& action_name, XMLProperty const* /*group*/)
 {
-        KeybindingMap* kbm;
+       MouseButtonBindingMap& bbm = get_mousemap(op);
 
-        switch (op) {
-        case KeyboardKey::Press:
-                kbm = &press_bindings;
-                break;
-        case KeyboardKey::Release:
-                kbm = &release_bindings;
-                break;
-        }
+       MouseButtonBindingMap::value_type newpair (bb, ActionInfo (action_name));
+       bbm.insert (newpair);
+}
 
-        KeybindingMap::iterator k = kbm->find (kb);
+void
+Bindings::remove (MouseButton bb, Operation op)
+{
+       MouseButtonBindingMap& bbm = get_mousemap(op);
+       MouseButtonBindingMap::iterator b = bbm.find (bb);
 
-        if (k != kbm->end()) {
-                kbm->erase (k);
-        }
+       if (b != bbm.end()) {
+               bbm.erase (b);
+       }
 }
 
-bool
-Bindings::save (const string& path)
+void
+Bindings::save (XMLNode& root)
 {
-        XMLTree tree;
-        XMLNode* root = new XMLNode (X_("Bindings"));
-        tree.set_root (root);
+       XMLNode* presses = new XMLNode (X_("Press"));
+
+       for (KeybindingMap::iterator k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+               XMLNode* child;
+
+               if (k->first.name().empty()) {
+                       continue;
+               }
+
+               child = new XMLNode (X_("Binding"));
+               child->add_property (X_("key"), k->first.name());
+               child->add_property (X_("action"), k->second.action_name);
+               presses->add_child_nocopy (*child);
+       }
+
+       for (MouseButtonBindingMap::iterator k = button_press_bindings.begin(); k != button_press_bindings.end(); ++k) {
+               XMLNode* child;
+               child = new XMLNode (X_("Binding"));
+               child->add_property (X_("button"), k->first.name());
+               child->add_property (X_("action"), k->second.action_name);
+               presses->add_child_nocopy (*child);
+       }
+
+       XMLNode* releases = new XMLNode (X_("Release"));
+
+       for (KeybindingMap::iterator k = release_bindings.begin(); k != release_bindings.end(); ++k) {
+               XMLNode* child;
+
+               if (k->first.name().empty()) {
+                       continue;
+               }
+
+               child = new XMLNode (X_("Binding"));
+               child->add_property (X_("key"), k->first.name());
+               child->add_property (X_("action"), k->second.action_name);
+               releases->add_child_nocopy (*child);
+       }
+
+       for (MouseButtonBindingMap::iterator k = button_release_bindings.begin(); k != button_release_bindings.end(); ++k) {
+               XMLNode* child;
+               child = new XMLNode (X_("Binding"));
+               child->add_property (X_("button"), k->first.name());
+               child->add_property (X_("action"), k->second.action_name);
+               releases->add_child_nocopy (*child);
+       }
+
+       root.add_child_nocopy (*presses);
+       root.add_child_nocopy (*releases);
+}
+
+void
+Bindings::save_all_bindings_as_html (ostream& ostr)
+{
+       if (bindings.empty()) {
+               return;
+       }
+
+
+       ostr << "<html>\n<head>\n<title>";
+       ostr << PROGRAM_NAME;
+       ostr << "</title>\n";
 
-        XMLNode* presses = new XMLNode (X_("Press"));
-        root->add_child_nocopy (*presses);
 
-        for (KeybindingMap::iterator k = press_bindings.begin(); k != press_bindings.end(); ++k) {
-                XMLNode* child;
-                child = new XMLNode (X_("Binding"));
-                child->add_property (X_("key"), k->first.name());
-                child->add_property (X_("action"), k->second->get_name());
-                presses->add_child_nocopy (*child);
-        }
+       ostr << "<style>\n";
+       ostr << "\n\
+.key-name-even, .key-name-odd\n\
+{\n\
+    font-weight: bold;\n\
+}\n\
+\n\
+.key-action-odd, .key-action-even\n\
+{\n\
+    font-weight: normal;\n\
+    font-style: italic;\n\
+}";
+       ostr << "</style>\n";
 
-        if (!tree.write (path)) {
-                ::unlink (path.c_str());
-                return false;
-        }
+       ostr << "</head>\n<body>\n";
+
+       ostr << "<div class=\"container\">\n";
+
+       for (list<Bindings*>::const_iterator b = bindings.begin(); b != bindings.end(); ++b) {
+               (*b)->save_as_html (ostr);
+       }
+
+       ostr << "</div>\n";
+       ostr << "</body>\n";
+       ostr << "</html>\n";
+}
+
+void
+Bindings::save_as_html (ostream& ostr) const
+{
 
-        return true;
+       if (!press_bindings.empty()) {
+
+               ostr << "<div class=\"binding-set\">\n";
+               ostr << "<h1>";
+               ostr << name();
+               ostr << "</h1>\n\n";
+
+               /* first pass: separate by group */
+
+               typedef std::map<std::string, std::vector<KeybindingMap::const_iterator> > GroupMap;
+               GroupMap group_map;
+
+               for (KeybindingMap::const_iterator k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+                       if (k->first.name().empty()) {
+                               continue;
+                       }
+
+                       string group_name;
+                       if (!k->second.group_name.empty()) {
+                               group_name = k->second.group_name;
+                       } else {
+                               group_name = X_("nogroup");
+                       }
+
+                       GroupMap::iterator gm = group_map.find (group_name);
+                       if (gm == group_map.end()) {
+                               std::vector<KeybindingMap::const_iterator> li;
+                               li.push_back (k);
+                               group_map.insert (make_pair (group_name,li));
+                       } else {
+                               gm->second.push_back (k);
+                       }
+               }
+
+               for (GroupMap::const_iterator gm = group_map.begin(); gm != group_map.end(); ++gm) {
+
+                       ostr << "<div class=\"group\">\n";
+                       ostr << "<div class=\"group-name\">" << gm->first << "</div>\n";
+
+                       for (vector<KeybindingMap::const_iterator>::const_iterator k = gm->second.begin(); k != gm->second.end(); ++k) {
+
+                               if ((*k)->first.name().empty()) {
+                                       continue;
+                               }
+
+                               RefPtr<Action> action;
+
+                               if ((*k)->second.action) {
+                                       action = (*k)->second.action;
+                               } else {
+                                       if (_action_map) {
+                                               action = _action_map->find_action ((*k)->second.action_name);
+                                       }
+                               }
+
+                               if (!action) {
+                                       continue;
+                               }
+
+                               string key_name = (*k)->first.native_short_name ();
+                               replace_all (key_name, X_("KP_"), X_("Numpad "));
+
+                               string::size_type pos;
+
+                               char const *targets[] = { X_("Separator"), X_("Add"), X_("Subtract"), X_("Decimal"), X_("Divide"),
+                                                         X_("grave"), X_("comma"), X_("period"), X_("asterisk"), X_("backslash"),
+                                                         X_("apostrophe"), X_("minus"), X_("plus"), X_("slash"), X_("semicolon"),
+                                                         X_("colon"), X_("equal"), X_("bracketleft"), X_("bracketright"),
+                                                         X_("ampersand"), X_("numbersign"), X_("parenleft"), X_("parenright"),
+                                                         X_("quoteright"), X_("quoteleft"), X_("exclam"), X_("quotedbl"),
+                                                         0
+                               };
+
+                               char const *replacements[] = { X_("-"), X_("+"), X_("-"), X_("."), X_("/"),
+                                                              X_("`"), X_(","), X_("."), X_("*"), X_("\\"),
+                                                              X_("'"), X_("-"), X_("+"), X_("/"), X_(";"),
+                                                              X_(":"), X_("="), X_("{"), X_("{"),
+                                                              X_("&"), X_("#"), X_("("), X_(")"),
+                                                              X_("`"), X_("'"), X_("!"), X_("\""),
+                               };
+
+                               for (size_t n = 0; targets[n]; ++n) {
+                                       if ((pos = key_name.find (targets[n])) != string::npos) {
+                                               key_name.replace (pos, strlen (targets[n]), replacements[n]);
+                                       }
+                               }
+
+                               ostr << "<div class=\"key\">" << key_name << "</div>";
+                               ostr << "<div class=\"action\">" << action->get_label() << "</div>\n";
+                       }
+                       ostr << "</div>\n\n";
+               }
+
+               ostr << "</div>\n";
+       }
 }
 
 bool
-Bindings::load (const string& path)
+Bindings::load (XMLNode const& node)
 {
-        XMLTree tree;
+       const XMLNodeList& children (node.children());
 
-        if (!action_map) {
-                return false;
-        }
+       press_bindings.clear ();
+       release_bindings.clear ();
 
-        if (!tree.read (path)) {
-                return false;
-        }
-        
-        press_bindings.clear ();
-        release_bindings.clear ();
+       for (XMLNodeList::const_iterator i = children.begin(); i != children.end(); ++i) {
+               /* each node could be Press or Release */
+               load_operation (**i);
+       }
 
-        XMLNode& root (*tree.root());
-        const XMLNodeList& children (root.children());
+       return true;
+}
+
+void
+Bindings::load_operation (XMLNode const& node)
+{
+       if (node.name() == X_("Press") || node.name() == X_("Release")) {
+
+               Operation op;
+
+               if (node.name() == X_("Press")) {
+                       op = Press;
+               } else {
+                       op = Release;
+               }
+
+               const XMLNodeList& children (node.children());
+
+               for (XMLNodeList::const_iterator p = children.begin(); p != children.end(); ++p) {
+
+                       XMLProperty const * ap;
+                       XMLProperty const * kp;
+                       XMLProperty const * bp;
+                       XMLProperty const * gp;
+                       XMLNode const * child = *p;
+
+                       ap = child->property ("action");
+                       kp = child->property ("key");
+                       bp = child->property ("button");
+                       gp = child->property ("group");
+
+                       if (!ap || (!kp && !bp)) {
+                               continue;
+                       }
+
+                       if (kp) {
+                               KeyboardKey k;
+                               if (!KeyboardKey::make_key (kp->value(), k)) {
+                                       continue;
+                               }
+                               add (k, op, ap->value(), gp);
+                       } else {
+                               MouseButton b;
+                               if (!MouseButton::make_button (bp->value(), b)) {
+                                       continue;
+                               }
+                               add (b, op, ap->value(), gp);
+                       }
+               }
+       }
+}
+
+void
+Bindings::get_all_actions (std::vector<std::string>& paths,
+                           std::vector<std::string>& labels,
+                           std::vector<std::string>& tooltips,
+                           std::vector<std::string>& keys,
+                           std::vector<RefPtr<Action> >& actions)
+{
+       if (!_action_map) {
+               return;
+       }
 
-        for (XMLNodeList::const_iterator i = children.begin(); i != children.end(); ++i) {
+       /* build a reverse map from actions to bindings */
 
-                if ((*i)->name() == X_("Press") || (*i)->name() == X_("Release")) {
+       typedef map<Glib::RefPtr<Gtk::Action>,KeyboardKey> ReverseMap;
+       ReverseMap rmap;
 
-                        KeyboardKey::Operation op;
+       for (KeybindingMap::const_iterator k = press_bindings.begin(); k != press_bindings.end(); ++k) {
+               rmap.insert (make_pair (k->second.action, k->first));
+       }
 
-                        if ((*i)->name() == X_("Press")) {
-                                op = KeyboardKey::Press;
-                        } else {
-                                op = KeyboardKey::Release;
-                        }
-                        
-                        const XMLNodeList& gchildren ((*i)->children());
+       /* get a list of all actions */
+
+       ActionMap::Actions all_actions;
+       _action_map->get_actions (all_actions);
+
+       for (ActionMap::Actions::const_iterator act = all_actions.begin(); act != all_actions.end(); ++act) {
+
+               paths.push_back ((*act)->get_accel_path());
+               labels.push_back ((*act)->get_label());
+               tooltips.push_back ((*act)->get_tooltip());
+
+               ReverseMap::iterator r = rmap.find (*act);
+
+               if (r != rmap.end()) {
+                       keys.push_back (r->second.display_label());
+               } else {
+                       keys.push_back (string());
+               }
+
+               actions.push_back (*act);
+       }
+}
+
+Bindings*
+Bindings::get_bindings (string const& name, ActionMap& map)
+{
+       for (list<Bindings*>::iterator b = bindings.begin(); b != bindings.end(); b++) {
+               if ((*b)->name() == name) {
+                       (*b)->set_action_map (map);
+                       return *b;
+               }
+       }
+
+       return 0;
+}
+
+void
+Bindings::associate_all ()
+{
+       for (list<Bindings*>::iterator b = bindings.begin(); b != bindings.end(); b++) {
+               (*b)->associate ();
+       }
+}
+
+bool
+Bindings::is_bound (KeyboardKey const& kb, Operation op) const
+{
+       const KeybindingMap& km = get_keymap(op);
+       return km.find(kb) != km.end();
+}
+
+bool
+Bindings::is_registered (Operation op, std::string const& action_name) const
+{
+       const KeybindingMap& km = get_keymap(op);
+       return std::find_if(km.begin(),  km.end(),  ActionNameRegistered<KeybindingMap::const_iterator::value_type>(action_name)) != km.end();
+}
 
-                        for (XMLNodeList::const_iterator p = gchildren.begin(); p != gchildren.end(); ++p) {
+Bindings::KeybindingMap&
+Bindings::get_keymap (Operation op)
+{
+       switch (op) {
+       case Press:
+               return press_bindings;
+       case Release:
+       default:
+               return release_bindings;
+       }
+}
 
-                                XMLProperty* ap;
-                                XMLProperty* kp;
+const Bindings::KeybindingMap&
+Bindings::get_keymap (Operation op) const
+{
+       switch (op) {
+       case Press:
+               return press_bindings;
+       case Release:
+       default:
+               return release_bindings;
+       }
+}
 
-                                ap = (*p)->property ("action");
-                                kp = (*p)->property ("key");
+Bindings::MouseButtonBindingMap&
+Bindings::get_mousemap (Operation op)
+{
+       switch (op) {
+       case Press:
+               return button_press_bindings;
+       case Release:
+       default:
+               return button_release_bindings;
+       }
+}
 
-                                if (!ap || !kp) {
-                                        continue;
-                                }
+/*==========================================ACTION MAP =========================================*/
 
-                                RefPtr<Action> act = action_map->find_action (ap->value());
-                                
-                                if (!act) {
-                                        continue;
-                                }
+ActionMap::ActionMap (string const & name)
+       : _name (name)
+       , _bindings (0)
+{
+       action_maps.push_back (this);
+}
 
-                                KeyboardKey k;
-                                
-                                if (!KeyboardKey::make_key (kp->value(), k)) {
-                                        continue;
-                                }
+ActionMap::~ActionMap ()
+{
+       action_maps.remove (this);
+}
 
-                                add (k, op, act);
-                        }
-                }
-        }
+void
+ActionMap::set_bindings (Bindings* b)
+{
+       _bindings = b;
+}
 
-        return true;
+void
+ActionMap::get_actions (ActionMap::Actions& acts)
+{
+       for (_ActionMap::iterator a = _actions.begin(); a != _actions.end(); ++a) {
+               acts.push_back (a->second);
+       }
 }
 
 RefPtr<Action>
 ActionMap::find_action (const string& name)
 {
-        _ActionMap::iterator a = actions.find (name);
+       _ActionMap::iterator a = _actions.find (name);
+
+       if (a != _actions.end()) {
+               return a->second;
+       }
+
+       return RefPtr<Action>();
+}
+
+RefPtr<ActionGroup>
+ActionMap::create_action_group (const string& name)
+{
+       RefPtr<ActionGroup> g = ActionGroup::create (name);
+
+       /* this is one of the places where our own Action management code
+          has to touch the GTK one, because we want the GtkUIManager to
+          be able to create widgets (particularly Menus) from our actions.
+
+          This is a a necessary step for that to happen.
+       */
+
+       if (g) {
+               ActionManager::ui_manager->insert_action_group (g);
+       }
+
+       return g;
+}
+
+RefPtr<Action>
+ActionMap::register_action (RefPtr<ActionGroup> group, const char* name, const char* label)
+{
+       string fullpath;
 
-        if (a != actions.end()) {
-                return a->second;
-        }
+       RefPtr<Action> act = Action::create (name, label);
 
-        return RefPtr<Action>();
+       fullpath = group->get_name();
+       fullpath += '/';
+       fullpath += name;
+
+       if (_actions.insert (_ActionMap::value_type (fullpath, act)).second) {
+               group->add (act);
+               return act;
+       }
+
+       /* already registered */
+       return RefPtr<Action> ();
 }
 
-RefPtr<Action> 
-ActionMap::register_action (const char* path,
+RefPtr<Action>
+ActionMap::register_action (RefPtr<ActionGroup> group,
                             const char* name, const char* label, sigc::slot<void> sl)
 {
-        string fullpath;
+       string fullpath;
 
-        RefPtr<Action> act = Action::create (name, label);
+       RefPtr<Action> act = Action::create (name, label);
 
-        act->signal_activate().connect (sl);
+       fullpath = group->get_name();
+       fullpath += '/';
+       fullpath += name;
 
-        fullpath = path;
-        fullpath += '/';
-        fullpath += name;
+       if (_actions.insert (_ActionMap::value_type (fullpath, act)).second) {
+               group->add (act, sl);
+               return act;
+       }
 
-        actions.insert (_ActionMap::value_type (fullpath, act));
-        return act;
+       /* already registered */
+       return RefPtr<Action>();
 }
 
-RefPtr<Action> 
-ActionMap::register_radio_action (const char* path, Gtk::RadioAction::Group& rgroup,
-                                  const char* name, const char* label, 
+RefPtr<Action>
+ActionMap::register_radio_action (RefPtr<ActionGroup> group,
+                                  Gtk::RadioAction::Group& rgroup,
+                                  const char* name, const char* label,
+                                  sigc::slot<void> sl)
+{
+       string fullpath;
+
+       RefPtr<Action> act = RadioAction::create (rgroup, name, label);
+       RefPtr<RadioAction> ract = RefPtr<RadioAction>::cast_dynamic(act);
+
+       fullpath = group->get_name();
+       fullpath += '/';
+       fullpath += name;
+
+       if (_actions.insert (_ActionMap::value_type (fullpath, act)).second) {
+               group->add (act, sl);
+               return act;
+       }
+
+       /* already registered */
+       return RefPtr<Action>();
+}
+
+RefPtr<Action>
+ActionMap::register_radio_action (RefPtr<ActionGroup> group,
+                                  Gtk::RadioAction::Group& rgroup,
+                                  const char* name, const char* label,
                                   sigc::slot<void,GtkAction*> sl,
                                   int value)
 {
-        string fullpath;
+       string fullpath;
 
-        RefPtr<Action> act = RadioAction::create (rgroup, name, label);
-        RefPtr<RadioAction> ract = RefPtr<RadioAction>::cast_dynamic(act);
-        ract->property_value() = value;
+       RefPtr<Action> act = RadioAction::create (rgroup, name, label);
+       RefPtr<RadioAction> ract = RefPtr<RadioAction>::cast_dynamic(act);
+       ract->property_value() = value;
 
-        act->signal_activate().connect (sigc::bind (sl, act->gobj()));
+       fullpath = group->get_name();
+       fullpath += '/';
+       fullpath += name;
 
-        fullpath = path;
-        fullpath += '/';
-        fullpath += name;
+       if (_actions.insert (_ActionMap::value_type (fullpath, act)).second) {
+               group->add (act, sigc::bind (sl, act->gobj()));
+               return act;
+       }
 
-        actions.insert (_ActionMap::value_type (fullpath, act));
-        return act;
+       /* already registered */
+
+       return RefPtr<Action>();
 }
 
-RefPtr<Action> 
-ActionMap::register_toggle_action (const char* path,
+RefPtr<Action>
+ActionMap::register_toggle_action (RefPtr<ActionGroup> group,
                                    const char* name, const char* label, sigc::slot<void> sl)
 {
-        string fullpath;
+       string fullpath;
+
+       fullpath = group->get_name();
+       fullpath += '/';
+       fullpath += name;
 
-        RefPtr<Action> act = ToggleAction::create (name, label);
+       RefPtr<Action> act = ToggleAction::create (name, label);
 
-        act->signal_activate().connect (sl);
+       if (_actions.insert (_ActionMap::value_type (fullpath, act)).second) {
+               group->add (act, sl);
+               return act;
+       }
 
-        fullpath = path;
-        fullpath += '/';
-        fullpath += name;
+       /* already registered */
+       return RefPtr<Action>();
+}
+
+void
+ActionMap::get_all_actions (std::vector<std::string>& paths,
+                            std::vector<std::string>& labels,
+                            std::vector<std::string>& tooltips,
+                            std::vector<std::string>& keys,
+                            std::vector<RefPtr<Action> >& actions)
+{
+       for (list<ActionMap*>::const_iterator map = action_maps.begin(); map != action_maps.end(); ++map) {
+
+               ActionMap::Actions these_actions;
+               (*map)->get_actions (these_actions);
+
+               for (ActionMap::Actions::const_iterator act = these_actions.begin(); act != these_actions.end(); ++act) {
+
+                       paths.push_back ((*act)->get_accel_path());
+                       labels.push_back ((*act)->get_label());
+                       tooltips.push_back ((*act)->get_tooltip());
+                       actions.push_back (*act);
+
+                       Bindings* bindings = (*map)->bindings();
+
+                       if (bindings) {
+
+                               KeyboardKey key;
+                               Bindings::Operation op;
+
+                               key = bindings->get_binding_for_action (*act, op);
+
+                               if (key == KeyboardKey::null_key()) {
+                                       keys.push_back (string());
+                               } else {
+                                       keys.push_back (key.display_label());
+                               }
+                       } else {
+                               keys.push_back (string());
+                       }
+               }
+
+               these_actions.clear ();
+       }
+}
 
-        actions.insert (_ActionMap::value_type (fullpath, act));
-        return act;
+std::ostream& operator<<(std::ostream& out, Gtkmm2ext::KeyboardKey const & k) {
+       char const *gdk_name = gdk_keyval_name (k.key());
+       return out << "Key " << k.key() << " (" << (gdk_name ? gdk_name : "no-key") << ") state " << hex << k.state() << dec;
 }