Added SILC Thread Queue API
[runtime.git] / apps / irssi / src / fe-common / core / keyboard.c
1 /*
2  keyboard.c : irssi
3
4     Copyright (C) 1999-2001 Timo Sirainen
5
6     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software
18     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19 */
20
21 #include "module.h"
22 #include "module-formats.h"
23 #include "signals.h"
24 #include "commands.h"
25 #include "levels.h"
26 #include "misc.h"
27 #include "lib-config/iconfig.h"
28 #include "settings.h"
29
30 #include "keyboard.h"
31 #include "fe-windows.h"
32 #include "printtext.h"
33
34 GSList *keyinfos;
35 static GHashTable *keys, *default_keys;
36
37 /* A cache of some sort for key presses that generate a single char only.
38    If the key isn't used, used_keys[key] is zero. */
39 static char used_keys[256];
40
41 /* Contains a list of all possible executable key bindings (not "key" keys).
42    Format is _always_ in key1-key2-key3 format and fully extracted, like
43    ^[-[-A, not meta-A */
44 static GTree *key_states;
45 static int key_config_frozen;
46
47 struct _KEYBOARD_REC {
48         char *key_state; /* the ongoing key combo */
49         void *gui_data; /* GUI specific data sent in "key pressed" signal */
50 };
51
52 /* Creates a new "keyboard" - this is used only for keeping track of
53    key combo states and sending the gui_data parameter in "key pressed"
54    signal */
55 KEYBOARD_REC *keyboard_create(void *data)
56 {
57         KEYBOARD_REC *rec;
58
59         rec = g_new0(KEYBOARD_REC, 1);
60         rec->gui_data = data;
61
62         signal_emit("keyboard created", 1, rec);
63         return rec;
64 }
65
66 /* Destroys a keyboard */
67 void keyboard_destroy(KEYBOARD_REC *keyboard)
68 {
69         signal_emit("keyboard destroyed", 1, keyboard);
70
71         g_free_not_null(keyboard->key_state);
72         g_free(keyboard);
73 }
74
75 static void key_destroy(KEY_REC *rec, GHashTable *hash)
76 {
77         g_hash_table_remove(hash, rec->key);
78
79         g_free_not_null(rec->data);
80         g_free(rec->key);
81         g_free(rec);
82 }
83
84 static void key_default_add(const char *id, const char *key, const char *data)
85 {
86         KEYINFO_REC *info;
87         KEY_REC *rec;
88
89         info = key_info_find(id);
90         if (info == NULL)
91                 return;
92
93         rec = g_hash_table_lookup(default_keys, key);
94         if (rec != NULL) {
95                 /* key already exists, replace */
96                 rec->info->default_keys =
97                         g_slist_remove(rec->info->default_keys, rec);
98                 key_destroy(rec, default_keys);
99         }
100
101         rec = g_new0(KEY_REC, 1);
102         rec->key = g_strdup(key);
103         rec->info = info;
104         rec->data = g_strdup(data);
105         info->default_keys = g_slist_append(info->default_keys, rec);
106         g_hash_table_insert(default_keys, rec->key, rec);
107 }
108
109 static CONFIG_NODE *key_config_find(const char *key)
110 {
111         CONFIG_NODE *node;
112         GSList *tmp;
113
114         /* remove old keyboard settings */
115         node = iconfig_node_traverse("(keyboard", TRUE);
116
117         tmp = config_node_first(node->value);
118         for (; tmp != NULL; tmp = config_node_next(tmp)) {
119                 node = tmp->data;
120
121                 if (strcmp(config_node_get_str(node, "key", ""), key) == 0)
122                         return node;
123         }
124
125         return NULL;
126 }
127
128 static void keyconfig_save(const char *id, const char *key, const char *data)
129 {
130         CONFIG_NODE *node;
131
132         g_return_if_fail(id != NULL);
133         g_return_if_fail(key != NULL);
134
135         node = key_config_find(key);
136         if (node == NULL) {
137                 node = iconfig_node_traverse("(keyboard", TRUE);
138                 node = config_node_section(node, NULL, NODE_TYPE_BLOCK);
139         }
140
141         iconfig_node_set_str(node, "key", key);
142         iconfig_node_set_str(node, "id", id);
143         iconfig_node_set_str(node, "data", data);
144 }
145
146 static void keyconfig_clear(const char *key)
147 {
148         CONFIG_NODE *node;
149
150         g_return_if_fail(key != NULL);
151
152         /* remove old keyboard settings */
153         node = key_config_find(key);
154         if (node != NULL) {
155                 iconfig_node_remove(iconfig_node_traverse("(keyboard", FALSE),
156                                     node);
157         }
158 }
159
160 KEYINFO_REC *key_info_find(const char *id)
161 {
162         GSList *tmp;
163
164         for (tmp = keyinfos; tmp != NULL; tmp = tmp->next) {
165                 KEYINFO_REC *rec = tmp->data;
166
167                 if (g_strcasecmp(rec->id, id) == 0)
168                         return rec;
169         }
170
171         return NULL;
172 }
173
174 static int expand_key(const char *key, GSList **out);
175
176 #define expand_out_char(out, c) \
177         { \
178           GSList *tmp; \
179           for (tmp = out; tmp != NULL; tmp = tmp->next) \
180             g_string_append_c(tmp->data, c); \
181         }
182
183 #define expand_out_free(out) \
184         { \
185           GSList *tmp; \
186           for (tmp = out; tmp != NULL; tmp = tmp->next) \
187             g_string_free(tmp->data, TRUE); \
188           g_slist_free(out); out = NULL; \
189         }
190
191 static int expand_combo(const char *start, const char *end, GSList **out)
192 {
193         KEY_REC *rec;
194         KEYINFO_REC *info;
195         GSList *tmp, *tmp2, *list, *copy, *newout;
196         char *str, *p;
197
198         if (start == end) {
199                 /* single key */
200                 expand_out_char(*out, *start);
201                 return TRUE;
202         }
203
204         info = key_info_find("key");
205         if (info == NULL)
206                 return FALSE;
207
208         /* get list of all key combos that generate the named combo.. */
209         list = NULL;
210         str = g_strndup(start, (int) (end-start)+1);
211         for (tmp = info->keys; tmp != NULL; tmp = tmp->next) {
212                 KEY_REC *rec = tmp->data;
213
214                 if (strcmp(rec->data, str) == 0)
215                         list = g_slist_append(list, rec);
216         }
217
218         if (list == NULL) {
219                 /* unknown keycombo - add it as-is, maybe the GUI will
220                    feed it to us as such */
221                 for (p = str; *p != '\0'; p++)
222                         expand_out_char(*out, *p);
223                 g_free(str);
224                 return TRUE;
225         }
226         g_free(str);
227
228         if (list->next == NULL) {
229                 /* only one way to generate the combo, good */
230                 rec = list->data;
231                 return expand_key(rec->key, out);
232         }
233
234         /* multiple ways to generate the combo -
235            we'll need to include all of them in output */
236         newout = NULL;
237         for (tmp = list->next; tmp != NULL; tmp = tmp->next) {
238                 KEY_REC *rec = tmp->data;
239
240                 copy = NULL;
241                 for (tmp2 = *out; tmp2 != NULL; tmp2 = tmp2->next) {
242                         GString *str = tmp2->data;
243                         copy = g_slist_append(copy, g_string_new(str->str));
244                 }
245
246                 if (!expand_key(rec->key, &copy)) {
247                         /* illegal key combo, remove from list */
248                         expand_out_free(copy);
249                 } else {
250                         newout = g_slist_concat(newout, copy);
251                 }
252         }
253
254         rec = list->data;
255         if (!expand_key(rec->key, out)) {
256                 /* illegal key combo, remove from list */
257                 expand_out_free(*out);
258         }
259
260         *out = g_slist_concat(*out, newout);
261         return *out != NULL;
262 }
263
264 /* Expand key code - returns TRUE if successful. */
265 static int expand_key(const char *key, GSList **out)
266 {
267         GSList *tmp;
268         const char *start;
269         int last_hyphen;
270
271         /* meta-^W^Gf -> ^[-^W-^G-f */
272         start = NULL; last_hyphen = TRUE;
273         for (; *key != '\0'; key++) {
274                 if (start != NULL) {
275                         if (i_isalnum(*key) || *key == '_') {
276                                 /* key combo continues */
277                                 continue;
278                         }
279
280                         if (!expand_combo(start, key-1, out))
281                                 return FALSE;
282                         expand_out_char(*out, '-');
283                         start = NULL;
284                 }
285
286                 if (*key == '-') {
287                         if (last_hyphen) {
288                                 expand_out_char(*out, '-');
289                                 expand_out_char(*out, '-');
290                         }
291                         last_hyphen = !last_hyphen;
292                 } else if (*key == '^') {
293                         /* ctrl-code */
294                         if (key[1] != '\0')
295                                 key++;
296
297                         expand_out_char(*out, '^');
298                         expand_out_char(*out, *key);
299                         expand_out_char(*out, '-');
300                         last_hyphen = FALSE; /* optional */
301                 } else if (last_hyphen && i_isalnum(*key) && !i_isdigit(*key)) {
302                         /* possibly beginning of keycombo */
303                         start = key;
304                         last_hyphen = FALSE;
305                 } else {
306                         expand_out_char(*out, *key);
307                         expand_out_char(*out, '-');
308                         last_hyphen = FALSE; /* optional */
309                 }
310         }
311
312         if (start != NULL)
313                 return expand_combo(start, key-1, out);
314
315         for (tmp = *out; tmp != NULL; tmp = tmp->next) {
316                 GString *str = tmp->data;
317
318                 g_string_truncate(str, str->len-1);
319         }
320
321         return TRUE;
322 }
323
324 static void key_states_scan_key(const char *key, KEY_REC *rec)
325 {
326         GSList *tmp, *out;
327
328         if (strcmp(rec->info->id, "key") == 0)
329                 return;
330
331         out = g_slist_append(NULL, g_string_new(NULL));
332         if (expand_key(key, &out)) {
333                 for (tmp = out; tmp != NULL; tmp = tmp->next) {
334                         GString *str = tmp->data;
335
336                         if (str->str[1] == '-' || str->str[1] == '\0')
337                                 used_keys[(int)(unsigned char)str->str[0]] = 1;
338
339                         g_tree_insert(key_states, g_strdup(str->str), rec);
340                 }
341         }
342
343         expand_out_free(out);
344 }
345
346 static int key_state_destroy(char *key)
347 {
348         g_free(key);
349         return FALSE;
350 }
351
352 /* Rescan all the key combos and figure out which characters are supposed
353    to be treated as characters and which as key combos.
354    Yes, this is pretty slow function... */
355 static void key_states_rescan(void)
356 {
357         GString *temp;
358
359         memset(used_keys, 0, sizeof(used_keys));
360
361         g_tree_traverse(key_states, (GTraverseFunc) key_state_destroy,
362                         G_IN_ORDER, NULL);
363         g_tree_destroy(key_states);
364         key_states = g_tree_new((GCompareFunc) strcmp);
365
366         temp = g_string_new(NULL);
367         g_hash_table_foreach(keys, (GHFunc) key_states_scan_key, temp);
368         g_string_free(temp, TRUE);
369 }
370
371 void key_configure_freeze(void)
372 {
373         key_config_frozen++;
374 }
375
376 void key_configure_thaw(void)
377 {
378         g_return_if_fail(key_config_frozen > 0);
379
380         if (--key_config_frozen == 0)
381                 key_states_rescan();
382 }
383
384 static void key_configure_destroy(KEY_REC *rec)
385 {
386         g_return_if_fail(rec != NULL);
387
388         rec->info->keys = g_slist_remove(rec->info->keys, rec);
389         g_hash_table_remove(keys, rec->key);
390
391         signal_emit("key destroyed", 1, rec);
392
393         if (!key_config_frozen)
394                 key_states_rescan();
395
396         g_free_not_null(rec->data);
397         g_free(rec->key);
398         g_free(rec);
399 }
400
401 /* Configure new key */
402 static void key_configure_create(const char *id, const char *key,
403                                  const char *data)
404 {
405         KEYINFO_REC *info;
406         KEY_REC *rec;
407
408         g_return_if_fail(id != NULL);
409         g_return_if_fail(key != NULL && *key != '\0');
410
411         info = key_info_find(id);
412         if (info == NULL)
413                 return;
414
415         rec = g_hash_table_lookup(keys, key);
416         if (rec != NULL)
417                 key_configure_destroy(rec);
418
419         rec = g_new0(KEY_REC, 1);
420         rec->key = g_strdup(key);
421         rec->info = info;
422         rec->data = g_strdup(data);
423         info->keys = g_slist_append(info->keys, rec);
424         g_hash_table_insert(keys, rec->key, rec);
425
426         signal_emit("key created", 1, rec);
427
428         if (!key_config_frozen)
429                 key_states_rescan();
430 }
431
432 /* Bind a key for function */
433 void key_bind(const char *id, const char *description,
434               const char *key_default, const char *data, SIGNAL_FUNC func)
435 {
436         KEYINFO_REC *info;
437         char *key;
438
439         g_return_if_fail(id != NULL);
440
441         /* create key info record */
442         info = key_info_find(id);
443         if (info == NULL) {
444                 g_return_if_fail(func != NULL);
445
446                 if (description == NULL)
447                         g_warning("key_bind(%s) should have description!", id);
448                 info = g_new0(KEYINFO_REC, 1);
449                 info->id = g_strdup(id);
450                 info->description = g_strdup(description);
451                 keyinfos = g_slist_append(keyinfos, info);
452
453                 /* add the signal */
454                 key = g_strconcat("key ", id, NULL);
455                 signal_add(key, func);
456                 g_free(key);
457
458                 signal_emit("keyinfo created", 1, info);
459         }
460
461         if (key_default != NULL && *key_default != '\0') {
462                 key_default_add(id, key_default, data);
463                 key_configure_create(id, key_default, data);
464         }
465 }
466
467 static void keyinfo_remove(KEYINFO_REC *info)
468 {
469         g_return_if_fail(info != NULL);
470
471         keyinfos = g_slist_remove(keyinfos, info);
472         signal_emit("keyinfo destroyed", 1, info);
473
474         /* destroy all keys */
475         g_slist_foreach(info->keys, (GFunc) key_destroy, keys);
476         g_slist_foreach(info->default_keys, (GFunc) key_destroy, default_keys);
477
478         /* destroy key info */
479         g_slist_free(info->keys);
480         g_slist_free(info->default_keys);
481         g_free_not_null(info->description);
482         g_free(info->id);
483         g_free(info);
484 }
485
486 /* Unbind key */
487 void key_unbind(const char *id, SIGNAL_FUNC func)
488 {
489         KEYINFO_REC *info;
490         char *key;
491
492         g_return_if_fail(id != NULL);
493         g_return_if_fail(func != NULL);
494
495         /* remove keys */
496         info = key_info_find(id);
497         if (info != NULL)
498                 keyinfo_remove(info);
499
500         /* remove signal */
501         key = g_strconcat("key ", id, NULL);
502         signal_remove(key, func);
503         g_free(key);
504 }
505
506 /* Configure new key */
507 void key_configure_add(const char *id, const char *key, const char *data)
508 {
509         g_return_if_fail(id != NULL);
510         g_return_if_fail(key != NULL && *key != '\0');
511
512         key_configure_create(id, key, data);
513         keyconfig_save(id, key, data);
514 }
515
516 /* Remove key */
517 void key_configure_remove(const char *key)
518 {
519         KEY_REC *rec;
520
521         g_return_if_fail(key != NULL);
522
523         rec = g_hash_table_lookup(keys, key);
524         if (rec == NULL) return;
525
526         keyconfig_clear(key);
527         key_configure_destroy(rec);
528 }
529
530 static int key_emit_signal(KEYBOARD_REC *keyboard, KEY_REC *key)
531 {
532         int consumed;
533         char *str;
534
535         str = g_strconcat("key ", key->info->id, NULL);
536         consumed = signal_emit(str, 3, key->data, keyboard->gui_data, key->info);
537         g_free(str);
538
539         return consumed;
540 }
541
542 static int key_states_search(const unsigned char *combo,
543                              const unsigned char *search)
544 {
545         while (*search != '\0') {
546                 if (*combo != *search)
547                         return *search - *combo;
548                 search++; combo++;
549         }
550
551         return 0;
552 }
553
554 int key_pressed(KEYBOARD_REC *keyboard, const char *key)
555 {
556         KEY_REC *rec;
557         char *combo;
558         int first_key, consumed;
559
560         g_return_val_if_fail(keyboard != NULL, FALSE);
561         g_return_val_if_fail(key != NULL && *key != '\0', FALSE);
562
563         if (keyboard->key_state == NULL && key[1] == '\0' &&
564             !used_keys[(int) (unsigned char) key[0]]) {
565                 /* fast check - key not used */
566                 return -1;
567         }
568
569         first_key = keyboard->key_state == NULL;
570         combo = keyboard->key_state == NULL ? g_strdup(key) :
571                 g_strconcat(keyboard->key_state, "-", key, NULL);
572         g_free_and_null(keyboard->key_state);
573
574 #if GLIB_MAJOR_VERSION == 2
575 #  define GSearchFunc GCompareFunc
576 #endif
577         rec = g_tree_search(key_states,
578                             (GSearchFunc) key_states_search,
579                             combo);
580         if (rec == NULL) {
581                 /* unknown key combo, eat the invalid key
582                    unless it was the first key pressed */
583                 g_free(combo);
584                 return first_key ? -1 : 1;
585         }
586
587         if (g_tree_lookup(key_states, combo) != rec) {
588                 /* key combo continues.. */
589                 keyboard->key_state = combo;
590                 return 0;
591         }
592
593         /* finished key combo, execute */
594         g_free(combo);
595         consumed = key_emit_signal(keyboard, rec);
596
597         /* never consume non-control characters */
598         return consumed ? 1 : -1;
599 }
600
601 void keyboard_entry_redirect(SIGNAL_FUNC func, const char *entry,
602                              int flags, void *data)
603 {
604         signal_emit("gui entry redirect", 4, func, entry,
605                     GINT_TO_POINTER(flags), data);
606 }
607
608 static void sig_command(const char *data)
609 {
610         const char *cmdchars;
611         char *str;
612
613         cmdchars = settings_get_str("cmdchars");
614         str = strchr(cmdchars, *data) != NULL ? g_strdup(data) :
615                 g_strdup_printf("%c%s", *cmdchars, data);
616
617         signal_emit("send command", 3, str, active_win->active_server, active_win->active);
618
619         g_free(str);
620 }
621
622 static void sig_key(const char *data)
623 {
624         /* we should never get here */
625 }
626
627 static void sig_multi(const char *data, void *gui_data)
628 {
629         KEYINFO_REC *info;
630         char **list, **tmp, *p, *str;
631
632         list = g_strsplit(data, ";", -1);
633         for (tmp = list; *tmp != NULL; tmp++) {
634                 p = strchr(*tmp, ' ');
635                 if (p != NULL) *p++ = '\0'; else p = "";
636
637                 info = key_info_find(*tmp);
638                 if (info != NULL) {
639                         str = g_strconcat("key ", info->id, NULL);
640                         signal_emit(str, 3, p, gui_data, info);
641                         g_free(str);
642                 }
643         }
644         g_strfreev(list);
645 }
646
647 static void sig_nothing(const char *data)
648 {
649 }
650
651 static void cmd_show_keys(const char *searchkey, int full)
652 {
653         GSList *info, *key;
654         int len;
655
656         printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, TXT_BIND_HEADER);
657
658         len = searchkey == NULL ? 0 : strlen(searchkey);
659         for (info = keyinfos; info != NULL; info = info->next) {
660                 KEYINFO_REC *rec = info->data;
661
662                 for (key = rec->keys; key != NULL; key = key->next) {
663                         KEY_REC *rec = key->data;
664
665                         if ((len == 0 || g_strncasecmp(rec->key, searchkey, len) == 0) &&
666                             (!full || rec->key[len] == '\0')) {
667                                 printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, TXT_BIND_LIST,
668                                             rec->key, rec->info->id, rec->data == NULL ? "" : rec->data);
669                         }
670                 }
671         }
672
673         printformat(NULL, NULL, MSGLEVEL_CLIENTCRAP, TXT_BIND_FOOTER);
674 }
675
676 /* SYNTAX: BIND [-delete] [<key> [<command> [<data>]]] */
677 static void cmd_bind(const char *data)
678 {
679         GHashTable *optlist;
680         char *key, *id, *keydata;
681         void *free_arg;
682         int command_id;
683
684         if (!cmd_get_params(data, &free_arg, 3 | PARAM_FLAG_GETREST | PARAM_FLAG_OPTIONS,
685                             "bind", &optlist, &key, &id, &keydata))
686                 return;
687
688         if (*key != '\0' && g_hash_table_lookup(optlist, "delete")) {
689                 /* delete key */
690                 key_configure_remove(key);
691                 cmd_params_free(free_arg);
692                 return;
693         }
694
695         if (*id == '\0') {
696                 /* show some/all keys */
697                 cmd_show_keys(key, FALSE);
698                 cmd_params_free(free_arg);
699                 return;
700         }
701
702         command_id = strchr(settings_get_str("cmdchars"), *id) != NULL;
703         if (command_id) {
704                 /* using shortcut to command id */
705                 keydata = g_strconcat(id+1, " ", keydata, NULL);
706                 id = "command";
707         }
708
709         if (key_info_find(id) == NULL)
710                 printformat(NULL, NULL, MSGLEVEL_CLIENTERROR, TXT_BIND_UNKNOWN_ID, id);
711         else {
712                 key_configure_add(id, key, keydata);
713                 cmd_show_keys(key, TRUE);
714         }
715
716         if (command_id) g_free(keydata);
717         cmd_params_free(free_arg);
718 }
719
720 static GList *completion_get_keyinfos(const char *info)
721 {
722         GList *list;
723         GSList *tmp;
724         int len;
725
726         list = NULL; len = strlen(info);
727         for (tmp = keyinfos; tmp != NULL; tmp = tmp->next) {
728                 KEYINFO_REC *rec = tmp->data;
729
730                 if (g_strncasecmp(rec->id, info, len) == 0)
731                         list = g_list_append(list, g_strdup(rec->id));
732         }
733
734         return list;
735 }
736
737 static void sig_complete_bind(GList **list, WINDOW_REC *window,
738                               const char *word, const char *line,
739                               int *want_space)
740 {
741         g_return_if_fail(list != NULL);
742         g_return_if_fail(word != NULL);
743         g_return_if_fail(line != NULL);
744
745         if (*line == '\0' || strchr(line, ' ') != NULL)
746                 return;
747
748         *list = completion_get_keyinfos(word);
749         if (*list != NULL) signal_stop();
750 }
751
752 static int key_destroy_hash(const char *key, KEY_REC *rec)
753 {
754         rec->info->keys = g_slist_remove(rec->info->keys, rec);
755
756         g_free_not_null(rec->data);
757         g_free(rec->key);
758         g_free(rec);
759         return TRUE;
760 }
761
762 static void key_copy_default(const char *key, KEY_REC *orig)
763 {
764         KEY_REC *rec;
765
766         rec = g_new0(KEY_REC, 1);
767         rec->key = g_strdup(orig->key);
768         rec->info = orig->info;
769         rec->data = g_strdup(orig->data);
770
771         rec->info->keys = g_slist_append(rec->info->keys, rec);
772         g_hash_table_insert(keys, rec->key, rec);
773 }
774
775 static void keyboard_reset_defaults(void)
776 {
777         g_hash_table_foreach_remove(keys, (GHRFunc) key_destroy_hash, NULL);
778         g_hash_table_foreach(default_keys, (GHFunc) key_copy_default, NULL);
779 }
780
781 static void key_config_read(CONFIG_NODE *node)
782 {
783         char *key, *id, *data;
784
785         g_return_if_fail(node != NULL);
786
787         key = config_node_get_str(node, "key", NULL);
788         id = config_node_get_str(node, "id", NULL);
789         data = config_node_get_str(node, "data", NULL);
790
791         if (key != NULL && id != NULL)
792                 key_configure_create(id, key, data);
793 }
794
795 static void read_keyboard_config(void)
796 {
797         CONFIG_NODE *node;
798         GSList *tmp;
799
800         key_configure_freeze();
801
802         keyboard_reset_defaults();
803
804         node = iconfig_node_traverse("keyboard", FALSE);
805         if (node == NULL) {
806                 key_configure_thaw();
807                 return;
808         }
809
810         /* FIXME: backward "compatibility" - remove after irssi .99 */
811         if (node->type != NODE_TYPE_LIST) {
812                 iconfig_node_remove(NULL, node);
813                 key_configure_thaw();
814                 return;
815         }
816
817         tmp = config_node_first(node->value);
818         for (; tmp != NULL; tmp = config_node_next(tmp))
819                 key_config_read(tmp->data);
820
821         key_configure_thaw();
822 }
823
824 void keyboard_init(void)
825 {
826         keys = g_hash_table_new((GHashFunc) g_str_hash,
827                                 (GCompareFunc) g_str_equal);
828         default_keys = g_hash_table_new((GHashFunc) g_str_hash,
829                                         (GCompareFunc) g_str_equal);
830         keyinfos = NULL;
831         key_states = g_tree_new((GCompareFunc) strcmp);
832         key_config_frozen = 0;
833         memset(used_keys, 0, sizeof(used_keys));
834
835         key_bind("command", "Run any IRC command", NULL, NULL, (SIGNAL_FUNC) sig_command);
836         key_bind("key", "Specify name for key binding", NULL, NULL, (SIGNAL_FUNC) sig_key);
837         key_bind("multi", "Run multiple commands", NULL, NULL, (SIGNAL_FUNC) sig_multi);
838         key_bind("nothing", "Do nothing", NULL, NULL, (SIGNAL_FUNC) sig_nothing);
839
840         /* read the keyboard config when all key binds are known */
841         signal_add("irssi init read settings", (SIGNAL_FUNC) read_keyboard_config);
842         signal_add("setup reread", (SIGNAL_FUNC) read_keyboard_config);
843         signal_add("complete command bind", (SIGNAL_FUNC) sig_complete_bind);
844
845         command_bind("bind", NULL, (SIGNAL_FUNC) cmd_bind);
846         command_set_options("bind", "delete");
847 }
848
849 void keyboard_deinit(void)
850 {
851         key_unbind("command", (SIGNAL_FUNC) sig_command);
852         key_unbind("key", (SIGNAL_FUNC) sig_key);
853         key_unbind("multi", (SIGNAL_FUNC) sig_multi);
854         key_unbind("nothing", (SIGNAL_FUNC) sig_nothing);
855
856         while (keyinfos != NULL)
857                 keyinfo_remove(keyinfos->data);
858         g_hash_table_destroy(keys);
859         g_hash_table_destroy(default_keys);
860
861         g_tree_traverse(key_states, (GTraverseFunc) key_state_destroy,
862                         G_IN_ORDER, NULL);
863         g_tree_destroy(key_states);
864
865         signal_remove("irssi init read settings", (SIGNAL_FUNC) read_keyboard_config);
866         signal_remove("setup reread", (SIGNAL_FUNC) read_keyboard_config);
867         signal_remove("complete command bind", (SIGNAL_FUNC) sig_complete_bind);
868         command_unbind("bind", (SIGNAL_FUNC) cmd_bind);
869 }