make ASCII 10 and ASCII 13 terminate messagemode too (fixes Ctrl-J, Ctrl-M, Num-Enter)
[xonotic/darkplaces.git] / keys.c
1 /*
2         Copyright (C) 1996-1997  Id Software, Inc.
3
4         This program is free software; you can redistribute it and/or
5         modify it under the terms of the GNU General Public License
6         as published by the Free Software Foundation; either version 2
7         of the License, or (at your option) any later version.
8
9         This program is distributed in the hope that it will be useful,
10         but WITHOUT ANY WARRANTY; without even the implied warranty of
11         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13         See the GNU General Public License for more details.
14
15         You should have received a copy of the GNU General Public License
16         along with this program; if not, write to:
17
18                 Free Software Foundation, Inc.
19                 59 Temple Place - Suite 330
20                 Boston, MA  02111-1307, USA
21 */
22
23 #include "quakedef.h"
24 #include "cl_video.h"
25
26 cvar_t con_closeontoggleconsole = {CVAR_SAVE, "con_closeontoggleconsole","1", "allows toggleconsole binds to close the console as well"};
27
28 /*
29 key up events are sent even if in console mode
30 */
31
32 int                     edit_line = MAX_INPUTLINES-1;
33 int                     history_line = MAX_INPUTLINES-1;
34 char            key_lines[MAX_INPUTLINES][MAX_INPUTLINE];
35 int                     key_linepos;
36 qboolean        key_insert = true;      // insert key toggle (for editing)
37 keydest_t       key_dest;
38 int                     key_consoleactive;
39 char            *keybindings[MAX_BINDMAPS][MAX_KEYS];
40
41 static int      key_bmap, key_bmap2;
42 static unsigned char keydown[MAX_KEYS]; // 0 = up, 1 = down, 2 = repeating
43
44 typedef struct keyname_s
45 {
46         const char      *name;
47         int                     keynum;
48 }
49 keyname_t;
50
51 static const keyname_t   keynames[] = {
52         {"TAB", K_TAB},
53         {"ENTER", K_ENTER},
54         {"ESCAPE", K_ESCAPE},
55         {"SPACE", K_SPACE},
56         {"BACKSPACE", K_BACKSPACE},
57         {"UPARROW", K_UPARROW},
58         {"DOWNARROW", K_DOWNARROW},
59         {"LEFTARROW", K_LEFTARROW},
60         {"RIGHTARROW", K_RIGHTARROW},
61
62         {"ALT", K_ALT},
63         {"CTRL", K_CTRL},
64         {"SHIFT", K_SHIFT},
65
66         {"F1", K_F1},
67         {"F2", K_F2},
68         {"F3", K_F3},
69         {"F4", K_F4},
70         {"F5", K_F5},
71         {"F6", K_F6},
72         {"F7", K_F7},
73         {"F8", K_F8},
74         {"F9", K_F9},
75         {"F10", K_F10},
76         {"F11", K_F11},
77         {"F12", K_F12},
78
79         {"INS", K_INS},
80         {"DEL", K_DEL},
81         {"PGDN", K_PGDN},
82         {"PGUP", K_PGUP},
83         {"HOME", K_HOME},
84         {"END", K_END},
85
86         {"PAUSE", K_PAUSE},
87
88         {"MWHEELUP", K_MWHEELUP},
89         {"MWHEELDOWN", K_MWHEELDOWN},
90
91         {"MOUSE1", K_MOUSE1},
92         {"MOUSE2", K_MOUSE2},
93         {"MOUSE3", K_MOUSE3},
94         {"MOUSE4", K_MOUSE4},
95         {"MOUSE5", K_MOUSE5},
96         {"MOUSE6", K_MOUSE6},
97         {"MOUSE7", K_MOUSE7},
98         {"MOUSE8", K_MOUSE8},
99         {"MOUSE9", K_MOUSE9},
100         {"MOUSE10", K_MOUSE10},
101         {"MOUSE11", K_MOUSE11},
102         {"MOUSE12", K_MOUSE12},
103         {"MOUSE13", K_MOUSE13},
104         {"MOUSE14", K_MOUSE14},
105         {"MOUSE15", K_MOUSE15},
106         {"MOUSE16", K_MOUSE16},
107
108         {"NUMLOCK", K_NUMLOCK},
109         {"CAPSLOCK", K_CAPSLOCK},
110         {"SCROLLOCK", K_SCROLLOCK},
111
112         {"KP_HOME",                     K_KP_HOME },
113         {"KP_UPARROW",          K_KP_UPARROW },
114         {"KP_PGUP",                     K_KP_PGUP },
115         {"KP_LEFTARROW",        K_KP_LEFTARROW },
116         {"KP_RIGHTARROW",       K_KP_RIGHTARROW },
117         {"KP_END",                      K_KP_END },
118         {"KP_DOWNARROW",        K_KP_DOWNARROW },
119         {"KP_PGDN",                     K_KP_PGDN },
120         {"KP_INS",                      K_KP_INS },
121         {"KP_DEL",                      K_KP_DEL },
122         {"KP_SLASH",            K_KP_SLASH },
123
124         {"KP_0", K_KP_0},
125         {"KP_1", K_KP_1},
126         {"KP_2", K_KP_2},
127         {"KP_3", K_KP_3},
128         {"KP_4", K_KP_4},
129         {"KP_5", K_KP_5},
130         {"KP_6", K_KP_6},
131         {"KP_7", K_KP_7},
132         {"KP_8", K_KP_8},
133         {"KP_9", K_KP_9},
134         {"KP_PERIOD", K_KP_PERIOD},
135         {"KP_DIVIDE", K_KP_DIVIDE},
136         {"KP_MULTIPLY", K_KP_MULTIPLY},
137         {"KP_MINUS", K_KP_MINUS},
138         {"KP_PLUS", K_KP_PLUS},
139         {"KP_ENTER", K_KP_ENTER},
140         {"KP_EQUALS", K_KP_EQUALS},
141
142         {"JOY1",  K_JOY1},
143         {"JOY2",  K_JOY2},
144         {"JOY3",  K_JOY3},
145         {"JOY4",  K_JOY4},
146         {"JOY5",  K_JOY5},
147         {"JOY6",  K_JOY6},
148         {"JOY7",  K_JOY7},
149         {"JOY8",  K_JOY8},
150         {"JOY9",  K_JOY9},
151         {"JOY10", K_JOY10},
152         {"JOY11", K_JOY11},
153         {"JOY12", K_JOY12},
154         {"JOY13", K_JOY13},
155         {"JOY14", K_JOY14},
156         {"JOY15", K_JOY15},
157         {"JOY16", K_JOY16},
158
159         {"AUX1", K_AUX1},
160         {"AUX2", K_AUX2},
161         {"AUX3", K_AUX3},
162         {"AUX4", K_AUX4},
163         {"AUX5", K_AUX5},
164         {"AUX6", K_AUX6},
165         {"AUX7", K_AUX7},
166         {"AUX8", K_AUX8},
167         {"AUX9", K_AUX9},
168         {"AUX10", K_AUX10},
169         {"AUX11", K_AUX11},
170         {"AUX12", K_AUX12},
171         {"AUX13", K_AUX13},
172         {"AUX14", K_AUX14},
173         {"AUX15", K_AUX15},
174         {"AUX16", K_AUX16},
175         {"AUX17", K_AUX17},
176         {"AUX18", K_AUX18},
177         {"AUX19", K_AUX19},
178         {"AUX20", K_AUX20},
179         {"AUX21", K_AUX21},
180         {"AUX22", K_AUX22},
181         {"AUX23", K_AUX23},
182         {"AUX24", K_AUX24},
183         {"AUX25", K_AUX25},
184         {"AUX26", K_AUX26},
185         {"AUX27", K_AUX27},
186         {"AUX28", K_AUX28},
187         {"AUX29", K_AUX29},
188         {"AUX30", K_AUX30},
189         {"AUX31", K_AUX31},
190         {"AUX32", K_AUX32},
191
192         {"SEMICOLON", ';'},                     // because a raw semicolon separates commands
193         {"TILDE", '~'},
194         {"BACKQUOTE", '`'},
195         {"QUOTE", '"'},
196         {"APOSTROPHE", '\''},
197         {"BACKSLASH", '\\'},            // because a raw backslash is used for special characters
198
199         {NULL, 0}
200 };
201
202 /*
203 ==============================================================================
204
205                         LINE TYPING INTO THE CONSOLE
206
207 ==============================================================================
208 */
209
210 void
211 Key_ClearEditLine (int edit_line)
212 {
213         memset (key_lines[edit_line], '\0', sizeof(key_lines[edit_line]));
214         key_lines[edit_line][0] = ']';
215         key_linepos = 1;
216 }
217
218 /*
219 ====================
220 Interactive line editing and console scrollback
221 ====================
222 */
223 static void
224 Key_Console (int key, char ascii)
225 {
226         // LordHavoc: copied most of this from Q2 to improve keyboard handling
227         switch (key)
228         {
229         case K_KP_SLASH:
230                 key = '/';
231                 break;
232         case K_KP_MINUS:
233                 key = '-';
234                 break;
235         case K_KP_PLUS:
236                 key = '+';
237                 break;
238         case K_KP_HOME:
239                 key = '7';
240                 break;
241         case K_KP_UPARROW:
242                 key = '8';
243                 break;
244         case K_KP_PGUP:
245                 key = '9';
246                 break;
247         case K_KP_LEFTARROW:
248                 key = '4';
249                 break;
250         case K_KP_5:
251                 key = '5';
252                 break;
253         case K_KP_RIGHTARROW:
254                 key = '6';
255                 break;
256         case K_KP_END:
257                 key = '1';
258                 break;
259         case K_KP_DOWNARROW:
260                 key = '2';
261                 break;
262         case K_KP_PGDN:
263                 key = '3';
264                 break;
265         case K_KP_INS:
266                 key = '0';
267                 break;
268         case K_KP_DEL:
269                 key = '.';
270                 break;
271         }
272
273         if ((toupper(key) == 'V' && keydown[K_CTRL]) || ((key == K_INS || key == K_KP_INS) && keydown[K_SHIFT]))
274         {
275                 char *cbd;
276                 if ((cbd = Sys_GetClipboardData()) != 0)
277                 {
278                         int i;
279                         strtok(cbd, "\n\r\b");
280                         i = (int)strlen(cbd);
281                         if (i + key_linepos >= MAX_INPUTLINE)
282                                 i= MAX_INPUTLINE - key_linepos;
283                         if (i > 0)
284                         {
285                                 cbd[i]=0;
286                                 strlcat(key_lines[edit_line], cbd, sizeof(key_lines[edit_line]));
287                                 key_linepos += i;
288                         }
289                         Z_Free(cbd);
290                 }
291                 return;
292         }
293
294         if (key == 'l')
295         {
296                 if (keydown[K_CTRL])
297                 {
298                         Cbuf_AddText ("clear\n");
299                         return;
300                 }
301         }
302
303         if (key == K_ENTER || key == K_KP_ENTER)
304         {
305                 Cbuf_AddText (key_lines[edit_line]+1);  // skip the ]
306                 Cbuf_AddText ("\n");
307                 Con_Printf("%s\n",key_lines[edit_line]);
308                 if(key_lines[edit_line][1] == 0) // empty line (just a ])?
309                         return; // no, no, you can't submit empty lines to the history...
310                 // LordHavoc: redesigned edit_line/history_line
311                 edit_line = 31;
312                 history_line = edit_line;
313                 memmove(key_lines[0], key_lines[1], sizeof(key_lines[0]) * edit_line);
314                 key_lines[edit_line][0] = ']';
315                 key_lines[edit_line][1] = 0;    // EvilTypeGuy: null terminate
316                 key_linepos = 1;
317                 // force an update, because the command may take some time
318                 if (cls.state == ca_disconnected)
319                         CL_UpdateScreen ();
320                 return;
321         }
322
323         if (key == K_TAB)
324         {
325                 // Enhanced command completion
326                 // by EvilTypeGuy eviltypeguy@qeradiant.com
327                 // Thanks to Fett, Taniwha
328                 Con_CompleteCommandLine();
329                 return;
330         }
331
332         // Advanced Console Editing by Radix radix@planetquake.com
333         // Added/Modified by EvilTypeGuy eviltypeguy@qeradiant.com
334         // Enhanced by [515]
335
336         // left arrow will just move left one without erasing, backspace will
337         // actually erase character
338         if (key == K_LEFTARROW || key == K_KP_LEFTARROW)
339         {
340                 if (key_linepos < 2)
341                         return;
342                 if(keydown[K_CTRL])
343                 {
344                         int             pos;
345                         char    k;
346                         pos = key_linepos-1;
347                         if(pos)
348                                 while(--pos)
349                                 {
350                                         k = key_lines[edit_line][pos];
351                                         if(k == '\"' || k == ';' || k == ' ' || k == '\'')
352                                                 break;
353                                 }
354                         key_linepos = pos + 1;
355                 }
356                 else
357                         key_linepos--;
358                 return;
359         }
360
361         // delete char before cursor
362         if (key == K_BACKSPACE || (key == 'h' && keydown[K_CTRL]))
363         {
364                 if (key_linepos > 1)
365                 {
366                         strlcpy(key_lines[edit_line] + key_linepos - 1, key_lines[edit_line] + key_linepos, sizeof(key_lines[edit_line]) + 1 - key_linepos);
367                         key_linepos--;
368                 }
369                 return;
370         }
371
372         // delete char on cursor
373         if (key == K_DEL || key == K_KP_DEL)
374         {
375                 size_t linelen;
376                 linelen = strlen(key_lines[edit_line]);
377                 if (key_linepos < (int)linelen)
378                         memmove(key_lines[edit_line] + key_linepos, key_lines[edit_line] + key_linepos + 1, linelen - key_linepos);
379                 return;
380         }
381
382
383         // if we're at the end, get one character from previous line,
384         // otherwise just go right one
385         if (key == K_RIGHTARROW || key == K_KP_RIGHTARROW)
386         {
387                 if (key_linepos >= (int)strlen(key_lines[edit_line]))
388                         return;
389                 if(keydown[K_CTRL])
390                 {
391                         int             pos, len;
392                         char    k;
393                         len = (int)strlen(key_lines[edit_line]);
394                         pos = key_linepos;
395                         while(++pos < len)
396                         {
397                                 k = key_lines[edit_line][pos];
398                                 if(k == '\"' || k == ';' || k == ' ' || k == '\'')
399                                         break;
400                         }
401                         key_linepos = pos;
402                 }
403                 else
404                         key_linepos++;
405                 return;
406         }
407
408         if (key == K_INS || key == K_KP_INS) // toggle insert mode
409         {
410                 key_insert ^= 1;
411                 return;
412         }
413
414         // End Advanced Console Editing
415
416         if (key == K_UPARROW || key == K_KP_UPARROW || (key == 'p' && keydown[K_CTRL]))
417         {
418                 if (history_line > 0 && key_lines[history_line-1][1])
419                 {
420                         size_t linelen;
421                         history_line--;
422                         linelen = strlen(key_lines[history_line]);
423                         memcpy(key_lines[edit_line], key_lines[history_line], linelen + 1);
424                         key_linepos = (int)linelen;
425                 }
426                 return;
427         }
428
429         if (key == K_DOWNARROW || key == K_KP_DOWNARROW || (key == 'n' && keydown[K_CTRL]))
430         {
431                 history_line++;
432                 if (history_line >= edit_line)
433                 {
434                         history_line = edit_line;
435                         key_lines[edit_line][0] = ']';
436                         key_lines[edit_line][1] = 0;
437                         key_linepos = 1;
438                 }
439                 else
440                 {
441                         size_t linelen;
442                         linelen = strlen(key_lines[history_line]);
443                         memcpy(key_lines[edit_line], key_lines[history_line], linelen + 1);
444                         key_linepos = (int)linelen;
445                 }
446                 return;
447         }
448
449         if (key == K_PGUP || key == K_KP_PGUP || key == K_MWHEELUP)
450         {
451                 con_backscroll += ((int) vid_conheight.integer >> 5);
452                 if (con_backscroll > con_totallines - (vid_conheight.integer>>3) - 1)
453                         con_backscroll = con_totallines - (vid_conheight.integer>>3) - 1;
454                 return;
455         }
456
457         if (key == K_PGDN || key == K_KP_PGDN || key == K_MWHEELDOWN)
458         {
459                 con_backscroll -= ((int) vid_conheight.integer >> 5);
460                 if (con_backscroll < 0)
461                         con_backscroll = 0;
462                 return;
463         }
464
465         if (key == K_HOME || key == K_KP_HOME)
466         {
467                 if (keydown[K_CTRL])
468                         con_backscroll = con_totallines - (vid_conheight.integer>>3) - 1;
469                 else
470                         key_linepos = 1;
471                 return;
472         }
473
474         if (key == K_END || key == K_KP_END)
475         {
476                 if (keydown[K_CTRL])
477                         con_backscroll = 0;
478                 else
479                         key_linepos = (int)strlen(key_lines[edit_line]);
480                 return;
481         }
482
483         // non printable
484         if (ascii < 32)
485                 return;
486
487         if (key_linepos < MAX_INPUTLINE-1)
488         {
489                 int len;
490                 len = (int)strlen(&key_lines[edit_line][key_linepos]);
491                 // check insert mode, or always insert if at end of line
492                 if (key_insert || len == 0)
493                 {
494                         // can't use strcpy to move string to right
495                         len++;
496                         memmove(&key_lines[edit_line][key_linepos + 1], &key_lines[edit_line][key_linepos], len);
497                 }
498                 key_lines[edit_line][key_linepos] = ascii;
499                 key_linepos++;
500         }
501 }
502
503 //============================================================================
504
505 qboolean        chat_team;
506 char            chat_buffer[MAX_INPUTLINE];
507 unsigned int    chat_bufferlen = 0;
508
509 static void
510 Key_Message (int key, char ascii)
511 {
512
513         if (key == K_ENTER || ascii == 10 || ascii == 13)
514         {
515                 Cmd_ForwardStringToServer(va("%s %s", chat_team ? "say_team" : "say ", chat_buffer));
516
517                 key_dest = key_game;
518                 chat_bufferlen = 0;
519                 chat_buffer[0] = 0;
520                 return;
521         }
522
523         if (key == K_ESCAPE) {
524                 key_dest = key_game;
525                 chat_bufferlen = 0;
526                 chat_buffer[0] = 0;
527                 return;
528         }
529
530         if (key == K_BACKSPACE) {
531                 if (chat_bufferlen) {
532                         chat_bufferlen--;
533                         chat_buffer[chat_bufferlen] = 0;
534                 }
535                 return;
536         }
537
538         if (chat_bufferlen == sizeof (chat_buffer) - 1)
539                 return;                                                 // all full
540
541         if (!ascii)
542                 return;                                                 // non printable
543
544         chat_buffer[chat_bufferlen++] = ascii;
545         chat_buffer[chat_bufferlen] = 0;
546 }
547
548 //============================================================================
549
550
551 /*
552 ===================
553 Returns a key number to be used to index keybindings[] by looking at
554 the given string.  Single ascii characters return themselves, while
555 the K_* names are matched up.
556 ===================
557 */
558 int
559 Key_StringToKeynum (const char *str)
560 {
561         const keyname_t  *kn;
562
563         if (!str || !str[0])
564                 return -1;
565         if (!str[1])
566                 return tolower(str[0]);
567
568         for (kn = keynames; kn->name; kn++) {
569                 if (!strcasecmp (str, kn->name))
570                         return kn->keynum;
571         }
572         return -1;
573 }
574
575 /*
576 ===================
577 Returns a string (either a single ascii char, or a K_* name) for the
578 given keynum.
579 FIXME: handle quote special (general escape sequence?)
580 ===================
581 */
582 const char *
583 Key_KeynumToString (int keynum)
584 {
585         const keyname_t  *kn;
586         static char tinystr[2];
587
588         // -1 is an invalid code
589         if (keynum < 0)
590                 return "<KEY NOT FOUND>";
591
592         // search overrides first, because some characters are special
593         for (kn = keynames; kn->name; kn++)
594                 if (keynum == kn->keynum)
595                         return kn->name;
596
597         // if it is printable, output it as a single character
598         if (keynum > 32 && keynum < 256)
599         {
600                 tinystr[0] = keynum;
601                 tinystr[1] = 0;
602                 return tinystr;
603         }
604
605         // if it is not overridden and not printable, we don't know what to do with it
606         return "<UNKNOWN KEYNUM>";
607 }
608
609
610 void
611 Key_SetBinding (int keynum, int bindmap, const char *binding)
612 {
613         char *newbinding;
614         size_t l;
615
616         if (keynum == -1 || keynum >= MAX_KEYS)
617                 return;
618
619 // free old bindings
620         if (keybindings[bindmap][keynum]) {
621                 Z_Free (keybindings[bindmap][keynum]);
622                 keybindings[bindmap][keynum] = NULL;
623         }
624 // allocate memory for new binding
625         l = strlen (binding);
626         newbinding = (char *)Z_Malloc (l + 1);
627         memcpy (newbinding, binding, l + 1);
628         newbinding[l] = 0;
629         keybindings[bindmap][keynum] = newbinding;
630 }
631
632 static void
633 Key_In_Unbind_f (void)
634 {
635         int         b, m;
636
637         if (Cmd_Argc () != 3) {
638                 Con_Print("in_unbind <bindmap> <key> : remove commands from a key\n");
639                 return;
640         }
641
642         m = strtol(Cmd_Argv (1), NULL, 0);
643         if ((m < 0) || (m >= 8)) {
644                 Con_Printf("%d isn't a valid bindmap\n", m);
645                 return;
646         }
647
648         b = Key_StringToKeynum (Cmd_Argv (2));
649         if (b == -1) {
650                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (2));
651                 return;
652         }
653
654         Key_SetBinding (b, m, "");
655 }
656
657 static void
658 Key_In_Bind_f (void)
659 {
660         int         i, c, b, m;
661         char        cmd[MAX_INPUTLINE];
662
663         c = Cmd_Argc ();
664
665         if (c != 3 && c != 4) {
666                 Con_Print("in_bind <bindmap> <key> [command] : attach a command to a key\n");
667                 return;
668         }
669
670         m = strtol(Cmd_Argv (1), NULL, 0);
671         if ((m < 0) || (m >= 8)) {
672                 Con_Printf("%d isn't a valid bindmap\n", m);
673                 return;
674         }
675
676         b = Key_StringToKeynum (Cmd_Argv (2));
677         if (b == -1 || b >= MAX_KEYS) {
678                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (2));
679                 return;
680         }
681
682         if (c == 3) {
683                 if (keybindings[m][b])
684                         Con_Printf("\"%s\" = \"%s\"\n", Cmd_Argv (2), keybindings[m][b]);
685                 else
686                         Con_Printf("\"%s\" is not bound\n", Cmd_Argv (2));
687                 return;
688         }
689 // copy the rest of the command line
690         cmd[0] = 0;                                                     // start out with a null string
691         for (i = 3; i < c; i++) {
692                 strlcat (cmd, Cmd_Argv (i), sizeof (cmd));
693                 if (i != (c - 1))
694                         strlcat (cmd, " ", sizeof (cmd));
695         }
696
697         Key_SetBinding (b, m, cmd);
698 }
699
700 static void
701 Key_In_Bindmap_f (void)
702 {
703         int         m1, m2, c;
704
705         c = Cmd_Argc ();
706
707         if (c != 3) {
708                 Con_Print("in_bindmap <bindmap> <fallback>: set current bindmap and fallback\n");
709                 return;
710         }
711
712         m1 = strtol(Cmd_Argv (1), NULL, 0);
713         if ((m1 < 0) || (m1 >= 8)) {
714                 Con_Printf("%d isn't a valid bindmap\n", m1);
715                 return;
716         }
717
718         m2 = strtol(Cmd_Argv (2), NULL, 0);
719         if ((m2 < 0) || (m2 >= 8)) {
720                 Con_Printf("%d isn't a valid bindmap\n", m2);
721                 return;
722         }
723
724         key_bmap = m1;
725         key_bmap2 = m2;
726 }
727
728 static void
729 Key_Unbind_f (void)
730 {
731         int         b;
732
733         if (Cmd_Argc () != 2) {
734                 Con_Print("unbind <key> : remove commands from a key\n");
735                 return;
736         }
737
738         b = Key_StringToKeynum (Cmd_Argv (1));
739         if (b == -1) {
740                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (1));
741                 return;
742         }
743
744         Key_SetBinding (b, 0, "");
745 }
746
747 static void
748 Key_Unbindall_f (void)
749 {
750         int         i, j;
751
752         for (j = 0; j < 8; j++)
753                 for (i = 0; i < (int)(sizeof(keybindings[0])/sizeof(keybindings[0][0])); i++)
754                         if (keybindings[j][i])
755                                 Key_SetBinding (i, j, "");
756 }
757
758
759 static void
760 Key_Bind_f (void)
761 {
762         int         i, c, b;
763         char        cmd[MAX_INPUTLINE];
764
765         c = Cmd_Argc ();
766
767         if (c != 2 && c != 3) {
768                 Con_Print("bind <key> [command] : attach a command to a key\n");
769                 return;
770         }
771         b = Key_StringToKeynum (Cmd_Argv (1));
772         if (b == -1 || b >= MAX_KEYS) {
773                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (1));
774                 return;
775         }
776
777         if (c == 2) {
778                 if (keybindings[0][b])
779                         Con_Printf("\"%s\" = \"%s\"\n", Cmd_Argv (1), keybindings[0][b]);
780                 else
781                         Con_Printf("\"%s\" is not bound\n", Cmd_Argv (1));
782                 return;
783         }
784 // copy the rest of the command line
785         cmd[0] = 0;                                                     // start out with a null string
786         for (i = 2; i < c; i++) {
787                 strlcat (cmd, Cmd_Argv (i), sizeof (cmd));
788                 if (i != (c - 1))
789                         strlcat (cmd, " ", sizeof (cmd));
790         }
791
792         Key_SetBinding (b, 0, cmd);
793 }
794
795 /*
796 ============
797 Writes lines containing "bind key value"
798 ============
799 */
800 void
801 Key_WriteBindings (qfile_t *f)
802 {
803         int         i, j;
804
805         for (j = 0; j < MAX_BINDMAPS; j++)
806         {
807                 for (i = 0; i < (int)(sizeof(keybindings[0])/sizeof(keybindings[0][0])); i++)
808                 {
809                         if (keybindings[j][i])
810                         {
811                                 if (j == 0)
812                                         FS_Printf(f, "bind %s \"%s\"\n", Key_KeynumToString (i), keybindings[j][i]);
813                                 else
814                                         FS_Printf(f, "in_bind %d %s \"%s\"\n", j, Key_KeynumToString (i), keybindings[j][i]);
815                         }
816                 }
817         }
818 }
819
820
821 void
822 Key_Init (void)
823 {
824         int         i;
825
826         for (i = 0; i < 32; i++) {
827                 key_lines[i][0] = ']';
828                 key_lines[i][1] = 0;
829         }
830         key_linepos = 1;
831
832 //
833 // register our functions
834 //
835         Cmd_AddCommand ("in_bind", Key_In_Bind_f, "binds a command to the specified key in the selected bindmap");
836         Cmd_AddCommand ("in_unbind", Key_In_Unbind_f, "removes command on the specified key in the selected bindmap");
837         Cmd_AddCommand ("in_bindmap", Key_In_Bindmap_f, "selects active foreground and background (used only if a key is not bound in the foreground) bindmaps for typing");
838
839         Cmd_AddCommand ("bind", Key_Bind_f, "binds a command to the specified key in bindmap 0");
840         Cmd_AddCommand ("unbind", Key_Unbind_f, "removes a command on the specified key in bindmap 0");
841         Cmd_AddCommand ("unbindall", Key_Unbindall_f, "removes all commands from all keys in all bindmaps (leaving only shift-escape and escape)");
842
843         Cvar_RegisterVariable (&con_closeontoggleconsole);
844 }
845
846 const char *Key_GetBind (int key)
847 {
848         const char *bind;
849         if (key < 0 || key >= MAX_KEYS)
850                 return NULL;
851         bind = keybindings[key_bmap][key];
852         if (!bind)
853                 bind = keybindings[key_bmap2][key];
854         return bind;
855 }
856
857 qboolean CL_VM_InputEvent (qboolean pressed, int key);
858
859 /*
860 ===================
861 Called by the system between frames for both key up and key down events
862 Should NOT be called during an interrupt!
863 ===================
864 */
865 void
866 Key_Event (int key, char ascii, qboolean down)
867 {
868         const char *bind;
869         qboolean q;
870
871         if (key < 0 || key >= MAX_KEYS)
872                 return;
873
874         // get key binding
875         bind = keybindings[key_bmap][key];
876         if (!bind)
877                 bind = keybindings[key_bmap2][key];
878
879         if(key_dest == key_game)
880         {
881                 q = CL_VM_InputEvent(!down, key);
882                 if(q)
883                 {
884                         if (down)
885                                 keydown[key] = min(keydown[key] + 1, 2);
886                         else
887                                 keydown[key] = 0;
888                         return;
889                 }
890         }
891
892         if (down)
893         {
894                 // increment key repeat count each time a down is received so that things
895                 // which want to ignore key repeat can ignore it
896                 keydown[key] = min(keydown[key] + 1, 2);
897         }
898         else
899         {
900                 // clear repeat count now that the key is released
901                 keydown[key] = 0;
902                 // key up events only generate commands if the game key binding is a button
903                 // command (leading + sign).  These will occur even in console mode, to
904                 // keep the character from continuing an action started before a console
905                 // switch.  Button commands include the kenum as a parameter, so multiple
906                 // downs can be matched with ups
907                 if (bind && bind[0] == '+')
908                         Cbuf_AddText(va("-%s %i\n", bind + 1, key));
909         }
910
911         // key_consoleactive is a flag not a key_dest because the console is a
912         // high priority overlay ontop of the normal screen (designed as a safety
913         // feature so that developers and users can rescue themselves from a bad
914         // situation).
915         //
916         // this also means that toggling the console on/off does not lose the old
917         // key_dest state
918
919         // specially handle escape (togglemenu) and shift-escape (toggleconsole)
920         // engine bindings, these are not handled as normal binds so that the user
921         // can recover from a completely empty bindmap
922         if (key == K_ESCAPE)
923         {
924                 // ignore key repeats on escape
925                 if (keydown[key] > 1)
926                         return;
927                 // escape does these things:
928                 // key_consoleactive - close console
929                 // key_message - abort messagemode
930                 // key_menu - go to parent menu (or key_game)
931                 // key_game - open menu
932                 // in all modes shift-escape toggles console
933                 if (((key_consoleactive & KEY_CONSOLEACTIVE_USER) || keydown[K_SHIFT]) && down)
934                 {
935                         Con_ToggleConsole_f ();
936                         return;
937                 }
938                 switch (key_dest)
939                 {
940                         case key_message:
941                                 if (down)
942                                         Key_Message (key, ascii);
943                                 break;
944                         case key_menu:
945                                 MR_KeyEvent (key, ascii, down);
946                                 break;
947                         case key_game:
948                                 if (down)
949                                         MR_ToggleMenu_f ();
950                                 break;
951                         default:
952                                 Con_Printf ("Key_Event: Bad key_dest\n");
953                 }
954                 return;
955         }
956
957         // send function keydowns to interpreter no matter what mode is
958         if (key >= K_F1 && key <= K_F12 && down)
959         {
960                 // ignore key repeats on F1-F12 binds
961                 if (keydown[key] > 1)
962                         return;
963                 if (bind)
964                 {
965                         // button commands add keynum as a parm
966                         if (bind[0] == '+')
967                                 Cbuf_AddText (va("%s %i\n", bind, key));
968                         else
969                         {
970                                 Cbuf_AddText (bind);
971                                 Cbuf_AddText ("\n");
972                         }
973                 }
974                 return;
975         }
976
977 #if 0
978         // ignore binds (other than the above escape/F1-F12 keys) while in console
979         if (key_consoleactive && down)
980 #else
981         // respond to toggleconsole binds while in console unless the pressed key
982         // happens to be the color prefix character (such as on German keyboards)
983         if (key_consoleactive && down && (!con_closeontoggleconsole.integer || !bind || strncmp(bind, "toggleconsole", strlen("toggleconsole")) || ascii == STRING_COLOR_TAG))
984 #endif
985         {
986                 Key_Console (key, ascii);
987                 return;
988         }
989
990         // ignore binds while a video is played, let the video system handle the key event
991         if (cl_videoplaying)
992         {
993                 CL_Video_KeyEvent (key, ascii, keydown[key] != 0);
994                 return;
995         }
996
997         // anything else is a key press into the game, chat line, or menu
998         switch (key_dest)
999         {
1000                 case key_message:
1001                         if (down)
1002                                 Key_Message (key, ascii);
1003                         break;
1004                 case key_menu:
1005                         MR_KeyEvent (key, ascii, down);
1006                         break;
1007                 case key_game:
1008                         // ignore key repeats on binds
1009                         if (bind && keydown[key] == 1 && down)
1010                         {
1011                                 // button commands add keynum as a parm
1012                                 if (bind[0] == '+')
1013                                         Cbuf_AddText (va("%s %i\n", bind, key));
1014                                 else
1015                                 {
1016                                         Cbuf_AddText (bind);
1017                                         Cbuf_AddText ("\n");
1018                                 }
1019                         }
1020                         break;
1021                 default:
1022                         Con_Printf ("Key_Event: Bad key_dest\n");
1023         }
1024 }
1025
1026 /*
1027 ===================
1028 Key_ClearStates
1029 ===================
1030 */
1031 void
1032 Key_ClearStates (void)
1033 {
1034         memset(keydown, 0, sizeof(keydown));
1035 }