Blub's nick completion
[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 extern unsigned int Nicks_CompleteChatLine(char *buffer, size_t size, int pos);
510
511 static void
512 Key_Message (int key, char ascii)
513 {
514
515         if (key == K_ENTER || ascii == 10 || ascii == 13)
516         {
517                 Cmd_ForwardStringToServer(va("%s %s", chat_team ? "say_team" : "say ", chat_buffer));
518
519                 key_dest = key_game;
520                 chat_bufferlen = 0;
521                 chat_buffer[0] = 0;
522                 return;
523         }
524
525         if (key == K_ESCAPE) {
526                 key_dest = key_game;
527                 chat_bufferlen = 0;
528                 chat_buffer[0] = 0;
529                 return;
530         }
531
532         if (key == K_BACKSPACE) {
533                 if (chat_bufferlen) {
534                         chat_bufferlen--;
535                         chat_buffer[chat_bufferlen] = 0;
536                 }
537                 return;
538         }
539
540         if(key == K_TAB) {
541                 chat_bufferlen = Nicks_CompleteChatLine(chat_buffer, sizeof(chat_buffer), chat_bufferlen);
542                 return;
543         }
544
545         if (chat_bufferlen == sizeof (chat_buffer) - 1)
546                 return;                                                 // all full
547
548         if (!ascii)
549                 return;                                                 // non printable
550
551         chat_buffer[chat_bufferlen++] = ascii;
552         chat_buffer[chat_bufferlen] = 0;
553 }
554
555 //============================================================================
556
557
558 /*
559 ===================
560 Returns a key number to be used to index keybindings[] by looking at
561 the given string.  Single ascii characters return themselves, while
562 the K_* names are matched up.
563 ===================
564 */
565 int
566 Key_StringToKeynum (const char *str)
567 {
568         const keyname_t  *kn;
569
570         if (!str || !str[0])
571                 return -1;
572         if (!str[1])
573                 return tolower(str[0]);
574
575         for (kn = keynames; kn->name; kn++) {
576                 if (!strcasecmp (str, kn->name))
577                         return kn->keynum;
578         }
579         return -1;
580 }
581
582 /*
583 ===================
584 Returns a string (either a single ascii char, or a K_* name) for the
585 given keynum.
586 FIXME: handle quote special (general escape sequence?)
587 ===================
588 */
589 const char *
590 Key_KeynumToString (int keynum)
591 {
592         const keyname_t  *kn;
593         static char tinystr[2];
594
595         // -1 is an invalid code
596         if (keynum < 0)
597                 return "<KEY NOT FOUND>";
598
599         // search overrides first, because some characters are special
600         for (kn = keynames; kn->name; kn++)
601                 if (keynum == kn->keynum)
602                         return kn->name;
603
604         // if it is printable, output it as a single character
605         if (keynum > 32 && keynum < 256)
606         {
607                 tinystr[0] = keynum;
608                 tinystr[1] = 0;
609                 return tinystr;
610         }
611
612         // if it is not overridden and not printable, we don't know what to do with it
613         return "<UNKNOWN KEYNUM>";
614 }
615
616
617 void
618 Key_SetBinding (int keynum, int bindmap, const char *binding)
619 {
620         char *newbinding;
621         size_t l;
622
623         if (keynum == -1 || keynum >= MAX_KEYS)
624                 return;
625
626 // free old bindings
627         if (keybindings[bindmap][keynum]) {
628                 Z_Free (keybindings[bindmap][keynum]);
629                 keybindings[bindmap][keynum] = NULL;
630         }
631         if(!binding[0]) // make "" binds be removed --blub
632                 return;
633 // allocate memory for new binding
634         l = strlen (binding);
635         newbinding = (char *)Z_Malloc (l + 1);
636         memcpy (newbinding, binding, l + 1);
637         newbinding[l] = 0;
638         keybindings[bindmap][keynum] = newbinding;
639 }
640
641 static void
642 Key_In_Unbind_f (void)
643 {
644         int         b, m;
645
646         if (Cmd_Argc () != 3) {
647                 Con_Print("in_unbind <bindmap> <key> : remove commands from a key\n");
648                 return;
649         }
650
651         m = strtol(Cmd_Argv (1), NULL, 0);
652         if ((m < 0) || (m >= 8)) {
653                 Con_Printf("%d isn't a valid bindmap\n", m);
654                 return;
655         }
656
657         b = Key_StringToKeynum (Cmd_Argv (2));
658         if (b == -1) {
659                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (2));
660                 return;
661         }
662
663         Key_SetBinding (b, m, "");
664 }
665
666 static void
667 Key_In_Bind_f (void)
668 {
669         int         i, c, b, m;
670         char        cmd[MAX_INPUTLINE];
671
672         c = Cmd_Argc ();
673
674         if (c != 3 && c != 4) {
675                 Con_Print("in_bind <bindmap> <key> [command] : attach a command to a key\n");
676                 return;
677         }
678
679         m = strtol(Cmd_Argv (1), NULL, 0);
680         if ((m < 0) || (m >= 8)) {
681                 Con_Printf("%d isn't a valid bindmap\n", m);
682                 return;
683         }
684
685         b = Key_StringToKeynum (Cmd_Argv (2));
686         if (b == -1 || b >= MAX_KEYS) {
687                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (2));
688                 return;
689         }
690
691         if (c == 3) {
692                 if (keybindings[m][b])
693                         Con_Printf("\"%s\" = \"%s\"\n", Cmd_Argv (2), keybindings[m][b]);
694                 else
695                         Con_Printf("\"%s\" is not bound\n", Cmd_Argv (2));
696                 return;
697         }
698 // copy the rest of the command line
699         cmd[0] = 0;                                                     // start out with a null string
700         for (i = 3; i < c; i++) {
701                 strlcat (cmd, Cmd_Argv (i), sizeof (cmd));
702                 if (i != (c - 1))
703                         strlcat (cmd, " ", sizeof (cmd));
704         }
705
706         Key_SetBinding (b, m, cmd);
707 }
708
709 static void
710 Key_In_Bindmap_f (void)
711 {
712         int         m1, m2, c;
713
714         c = Cmd_Argc ();
715
716         if (c != 3) {
717                 Con_Print("in_bindmap <bindmap> <fallback>: set current bindmap and fallback\n");
718                 return;
719         }
720
721         m1 = strtol(Cmd_Argv (1), NULL, 0);
722         if ((m1 < 0) || (m1 >= 8)) {
723                 Con_Printf("%d isn't a valid bindmap\n", m1);
724                 return;
725         }
726
727         m2 = strtol(Cmd_Argv (2), NULL, 0);
728         if ((m2 < 0) || (m2 >= 8)) {
729                 Con_Printf("%d isn't a valid bindmap\n", m2);
730                 return;
731         }
732
733         key_bmap = m1;
734         key_bmap2 = m2;
735 }
736
737 static void
738 Key_Unbind_f (void)
739 {
740         int         b;
741
742         if (Cmd_Argc () != 2) {
743                 Con_Print("unbind <key> : remove commands from a key\n");
744                 return;
745         }
746
747         b = Key_StringToKeynum (Cmd_Argv (1));
748         if (b == -1) {
749                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (1));
750                 return;
751         }
752
753         Key_SetBinding (b, 0, "");
754 }
755
756 static void
757 Key_Unbindall_f (void)
758 {
759         int         i, j;
760
761         for (j = 0; j < 8; j++)
762                 for (i = 0; i < (int)(sizeof(keybindings[0])/sizeof(keybindings[0][0])); i++)
763                         if (keybindings[j][i])
764                                 Key_SetBinding (i, j, "");
765 }
766
767
768 static void
769 Key_Bind_f (void)
770 {
771         int         i, c, b;
772         char        cmd[MAX_INPUTLINE];
773
774         c = Cmd_Argc ();
775
776         if (c != 2 && c != 3) {
777                 Con_Print("bind <key> [command] : attach a command to a key\n");
778                 return;
779         }
780         b = Key_StringToKeynum (Cmd_Argv (1));
781         if (b == -1 || b >= MAX_KEYS) {
782                 Con_Printf("\"%s\" isn't a valid key\n", Cmd_Argv (1));
783                 return;
784         }
785
786         if (c == 2) {
787                 if (keybindings[0][b])
788                         Con_Printf("\"%s\" = \"%s\"\n", Cmd_Argv (1), keybindings[0][b]);
789                 else
790                         Con_Printf("\"%s\" is not bound\n", Cmd_Argv (1));
791                 return;
792         }
793 // copy the rest of the command line
794         cmd[0] = 0;                                                     // start out with a null string
795         for (i = 2; i < c; i++) {
796                 strlcat (cmd, Cmd_Argv (i), sizeof (cmd));
797                 if (i != (c - 1))
798                         strlcat (cmd, " ", sizeof (cmd));
799         }
800
801         Key_SetBinding (b, 0, cmd);
802 }
803
804 /*
805 ============
806 Writes lines containing "bind key value"
807 ============
808 */
809 void
810 Key_WriteBindings (qfile_t *f)
811 {
812         int         i, j;
813         char bindbuf[MAX_INPUTLINE];
814         const char *p;
815
816         for (j = 0; j < MAX_BINDMAPS; j++)
817         {
818                 for (i = 0; i < (int)(sizeof(keybindings[0])/sizeof(keybindings[0][0])); i++)
819                 {
820                         p = keybindings[j][i];
821                         if (p)
822                         {
823                                 Cmd_QuoteString(bindbuf, sizeof(bindbuf), p, "\"\\");
824                                 if (j == 0)
825                                         FS_Printf(f, "bind %s \"%s\"\n", Key_KeynumToString (i), bindbuf);
826                                 else
827                                         FS_Printf(f, "in_bind %d %s \"%s\"\n", j, Key_KeynumToString (i), bindbuf);
828                         }
829                 }
830         }
831 }
832
833
834 void
835 Key_Init (void)
836 {
837         int         i;
838
839         for (i = 0; i < 32; i++) {
840                 key_lines[i][0] = ']';
841                 key_lines[i][1] = 0;
842         }
843         key_linepos = 1;
844
845 //
846 // register our functions
847 //
848         Cmd_AddCommand ("in_bind", Key_In_Bind_f, "binds a command to the specified key in the selected bindmap");
849         Cmd_AddCommand ("in_unbind", Key_In_Unbind_f, "removes command on the specified key in the selected bindmap");
850         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");
851
852         Cmd_AddCommand ("bind", Key_Bind_f, "binds a command to the specified key in bindmap 0");
853         Cmd_AddCommand ("unbind", Key_Unbind_f, "removes a command on the specified key in bindmap 0");
854         Cmd_AddCommand ("unbindall", Key_Unbindall_f, "removes all commands from all keys in all bindmaps (leaving only shift-escape and escape)");
855
856         Cvar_RegisterVariable (&con_closeontoggleconsole);
857 }
858
859 const char *Key_GetBind (int key)
860 {
861         const char *bind;
862         if (key < 0 || key >= MAX_KEYS)
863                 return NULL;
864         bind = keybindings[key_bmap][key];
865         if (!bind)
866                 bind = keybindings[key_bmap2][key];
867         return bind;
868 }
869
870 qboolean CL_VM_InputEvent (qboolean pressed, int key);
871
872 /*
873 ===================
874 Called by the system between frames for both key up and key down events
875 Should NOT be called during an interrupt!
876 ===================
877 */
878 void
879 Key_Event (int key, char ascii, qboolean down)
880 {
881         const char *bind;
882         qboolean q;
883
884         if (key < 0 || key >= MAX_KEYS)
885                 return;
886
887         // get key binding
888         bind = keybindings[key_bmap][key];
889         if (!bind)
890                 bind = keybindings[key_bmap2][key];
891
892         if (developer.integer >= 1000)
893                 Con_Printf("Key_Event(%i, '%c', %s) keydown %i bind \"%s\"\n", key, ascii, down ? "down" : "up", keydown[key], bind ? bind : "");
894
895         if(key_dest == key_game)
896         {
897                 q = CL_VM_InputEvent(!down, key);
898                 if(q)
899                 {
900                         if (down)
901                                 keydown[key] = min(keydown[key] + 1, 2);
902                         else
903                                 keydown[key] = 0;
904                         return;
905                 }
906         }
907
908         if (down)
909         {
910                 // increment key repeat count each time a down is received so that things
911                 // which want to ignore key repeat can ignore it
912                 keydown[key] = min(keydown[key] + 1, 2);
913         }
914         else
915         {
916                 // clear repeat count now that the key is released
917                 keydown[key] = 0;
918                 // key up events only generate commands if the game key binding is a button
919                 // command (leading + sign).  These will occur even in console mode, to
920                 // keep the character from continuing an action started before a console
921                 // switch.  Button commands include the kenum as a parameter, so multiple
922                 // downs can be matched with ups
923                 if (bind && bind[0] == '+')
924                         Cbuf_AddText(va("-%s %i\n", bind + 1, key));
925         }
926
927         // key_consoleactive is a flag not a key_dest because the console is a
928         // high priority overlay ontop of the normal screen (designed as a safety
929         // feature so that developers and users can rescue themselves from a bad
930         // situation).
931         //
932         // this also means that toggling the console on/off does not lose the old
933         // key_dest state
934
935         // specially handle escape (togglemenu) and shift-escape (toggleconsole)
936         // engine bindings, these are not handled as normal binds so that the user
937         // can recover from a completely empty bindmap
938         if (key == K_ESCAPE)
939         {
940                 // ignore key repeats on escape
941                 if (keydown[key] > 1)
942                         return;
943                 // escape does these things:
944                 // key_consoleactive - close console
945                 // key_message - abort messagemode
946                 // key_menu - go to parent menu (or key_game)
947                 // key_game - open menu
948                 // in all modes shift-escape toggles console
949                 if (((key_consoleactive & KEY_CONSOLEACTIVE_USER) || keydown[K_SHIFT]) && down)
950                 {
951                         Con_ToggleConsole_f ();
952                         return;
953                 }
954                 switch (key_dest)
955                 {
956                         case key_message:
957                                 if (down)
958                                         Key_Message (key, ascii);
959                                 break;
960                         case key_menu:
961                                 MR_KeyEvent (key, ascii, down);
962                                 break;
963                         case key_game:
964                                 if (down)
965                                         MR_ToggleMenu_f ();
966                                 break;
967                         default:
968                                 Con_Printf ("Key_Event: Bad key_dest\n");
969                 }
970                 return;
971         }
972
973         // send function keydowns to interpreter no matter what mode is
974         if (key >= K_F1 && key <= K_F12 && down)
975         {
976                 // ignore key repeats on F1-F12 binds
977                 if (keydown[key] > 1)
978                         return;
979                 if (bind)
980                 {
981                         // button commands add keynum as a parm
982                         if (bind[0] == '+')
983                                 Cbuf_AddText (va("%s %i\n", bind, key));
984                         else
985                         {
986                                 Cbuf_AddText (bind);
987                                 Cbuf_AddText ("\n");
988                         }
989                 }
990                 return;
991         }
992
993 #if 0
994         // ignore binds (other than the above escape/F1-F12 keys) while in console
995         if (key_consoleactive && down)
996 #else
997         // respond to toggleconsole binds while in console unless the pressed key
998         // happens to be the color prefix character (such as on German keyboards)
999         if (key_consoleactive && down && (!con_closeontoggleconsole.integer || !bind || strncmp(bind, "toggleconsole", strlen("toggleconsole")) || ascii == STRING_COLOR_TAG))
1000 #endif
1001         {
1002                 Key_Console (key, ascii);
1003                 return;
1004         }
1005
1006         // ignore binds while a video is played, let the video system handle the key event
1007         if (cl_videoplaying)
1008         {
1009                 CL_Video_KeyEvent (key, ascii, keydown[key] != 0);
1010                 return;
1011         }
1012
1013         // anything else is a key press into the game, chat line, or menu
1014         switch (key_dest)
1015         {
1016                 case key_message:
1017                         if (down)
1018                                 Key_Message (key, ascii);
1019                         break;
1020                 case key_menu:
1021                         MR_KeyEvent (key, ascii, down);
1022                         break;
1023                 case key_game:
1024                         // ignore key repeats on binds
1025                         if (bind && keydown[key] == 1 && down)
1026                         {
1027                                 // button commands add keynum as a parm
1028                                 if (bind[0] == '+')
1029                                         Cbuf_AddText (va("%s %i\n", bind, key));
1030                                 else
1031                                 {
1032                                         Cbuf_AddText (bind);
1033                                         Cbuf_AddText ("\n");
1034                                 }
1035                         }
1036                         break;
1037                 default:
1038                         Con_Printf ("Key_Event: Bad key_dest\n");
1039         }
1040 }
1041
1042 /*
1043 ===================
1044 Key_ClearStates
1045 ===================
1046 */
1047 void
1048 Key_ClearStates (void)
1049 {
1050         memset(keydown, 0, sizeof(keydown));
1051 }