Merge branch 'master' into TimePath/issue-1170
[xonotic/xonotic-data.pk3dir.git] / qcsrc / menu / xonotic / keybinder.c
1 #ifdef INTERFACE
2 CLASS(XonoticKeyBinder) EXTENDS(XonoticListBox)
3         METHOD(XonoticKeyBinder, configureXonoticKeyBinder, void(entity))
4         ATTRIB(XonoticKeyBinder, rowsPerItem, float, 1)
5         METHOD(XonoticKeyBinder, drawListBoxItem, void(entity, float, vector, float))
6         METHOD(XonoticKeyBinder, clickListBoxItem, void(entity, float, vector))
7         METHOD(XonoticKeyBinder, resizeNotify, void(entity, vector, vector, vector, vector))
8         METHOD(XonoticKeyBinder, setSelected, void(entity, float))
9         METHOD(XonoticKeyBinder, keyDown, float(entity, float, float, float))
10         METHOD(XonoticKeyBinder, keyGrabbed, void(entity, float, float))
11
12         ATTRIB(XonoticKeyBinder, realFontSize, vector, '0 0 0')
13         ATTRIB(XonoticKeyBinder, realUpperMargin, float, 0)
14         ATTRIB(XonoticKeyBinder, columnFunctionOrigin, float, 0)
15         ATTRIB(XonoticKeyBinder, columnFunctionSize, float, 0)
16         ATTRIB(XonoticKeyBinder, columnKeysOrigin, float, 0)
17         ATTRIB(XonoticKeyBinder, columnKeysSize, float, 0)
18
19         ATTRIB(XonoticKeyBinder, lastClickedKey, float, -1)
20         ATTRIB(XonoticKeyBinder, lastClickedTime, float, 0)
21         ATTRIB(XonoticKeyBinder, previouslySelected, float, -1)
22         ATTRIB(XonoticKeyBinder, inMouseHandler, float, 0)
23         ATTRIB(XonoticKeyBinder, userbindEditButton, entity, NULL)
24         ATTRIB(XonoticKeyBinder, keyGrabButton, entity, NULL)
25         ATTRIB(XonoticKeyBinder, clearButton, entity, NULL)
26         ATTRIB(XonoticKeyBinder, userbindEditDialog, entity, NULL)
27         METHOD(XonoticKeyBinder, editUserbind, void(entity, string, string, string))
28 ENDCLASS(XonoticKeyBinder)
29 entity makeXonoticKeyBinder();
30 void KeyBinder_Bind_Change(entity btn, entity me);
31 void KeyBinder_Bind_Clear(entity btn, entity me);
32 void KeyBinder_Bind_Edit(entity btn, entity me);
33 #endif
34
35 #ifdef IMPLEMENTATION
36
37 const string KEY_NOT_BOUND_CMD = "// not bound";
38
39 #define MAX_KEYS_PER_FUNCTION 2
40 #define MAX_KEYBINDS 256
41 string Xonotic_KeyBinds_Functions[MAX_KEYBINDS];
42 string Xonotic_KeyBinds_Descriptions[MAX_KEYBINDS];
43 var float Xonotic_KeyBinds_Count = -1;
44
45 void Xonotic_KeyBinds_Read()
46 {
47         float fh;
48         string s;
49
50         Xonotic_KeyBinds_Count = 0;
51         fh = fopen(language_filename("keybinds.txt"), FILE_READ);
52         if(fh < 0)
53                 return;
54         while((s = fgets(fh)))
55         {
56                 if(tokenize_console(s) != 2)
57                         continue;
58                 Xonotic_KeyBinds_Functions[Xonotic_KeyBinds_Count] = strzone(argv(0));
59                 Xonotic_KeyBinds_Descriptions[Xonotic_KeyBinds_Count] = strzone(argv(1));
60                 ++Xonotic_KeyBinds_Count;
61                 if(Xonotic_KeyBinds_Count >= MAX_KEYBINDS)
62                         break;
63         }
64         fclose(fh);
65 }
66
67 entity makeXonoticKeyBinder()
68 {
69         entity me;
70         me = spawnXonoticKeyBinder();
71         me.configureXonoticKeyBinder(me);
72         return me;
73 }
74 void replace_bind(string from, string to)
75 {
76         float n, j, k;
77         n = tokenize(findkeysforcommand(from, 0)); // uses '...' strings
78         for(j = 0; j < n; ++j)
79         {
80                 k = stof(argv(j));
81                 if(k != -1)
82                         localcmd("\nbind \"", keynumtostring(k), "\" \"", to, "\"\n");
83         }
84         if(n)
85                 cvar_set("_hud_showbinds_reload", "1");
86 }
87 void XonoticKeyBinder_configureXonoticKeyBinder(entity me)
88 {
89         me.configureXonoticListBox(me);
90         if(Xonotic_KeyBinds_Count < 0)
91                 Xonotic_KeyBinds_Read();
92         me.nItems = Xonotic_KeyBinds_Count;
93         me.setSelected(me, 0);
94
95         // TEMP: Xonotic 0.1 to later
96         replace_bind("impulse 1", "weapon_group_1");
97         replace_bind("impulse 2", "weapon_group_2");
98         replace_bind("impulse 3", "weapon_group_3");
99         replace_bind("impulse 4", "weapon_group_4");
100         replace_bind("impulse 5", "weapon_group_5");
101         replace_bind("impulse 6", "weapon_group_6");
102         replace_bind("impulse 7", "weapon_group_7");
103         replace_bind("impulse 8", "weapon_group_8");
104         replace_bind("impulse 9", "weapon_group_9");
105         replace_bind("impulse 14", "weapon_group_0");
106 }
107 void XonoticKeyBinder_resizeNotify(entity me, vector relOrigin, vector relSize, vector absOrigin, vector absSize)
108 {
109         SUPER(XonoticKeyBinder).resizeNotify(me, relOrigin, relSize, absOrigin, absSize);
110
111         me.realFontSize_y = me.fontSize / (absSize_y * me.itemHeight);
112         me.realFontSize_x = me.fontSize / (absSize_x * (1 - me.controlWidth));
113         me.realUpperMargin = 0.5 * (1 - me.realFontSize_y);
114
115         me.columnFunctionOrigin = 0;
116         me.columnKeysSize = me.realFontSize_x * 12;
117         me.columnFunctionSize = 1 - me.columnKeysSize - 2 * me.realFontSize_x;
118         me.columnKeysOrigin = me.columnFunctionOrigin + me.columnFunctionSize + me.realFontSize_x;
119
120         if(me.userbindEditButton)
121                 me.userbindEditButton.disabled = (substring(Xonotic_KeyBinds_Descriptions[me.selectedItem], 0, 1) != "$");
122 }
123 void KeyBinder_Bind_Change(entity btn, entity me)
124 {
125         string func;
126
127         func = Xonotic_KeyBinds_Functions[me.selectedItem];
128         if(func == "")
129                 return;
130
131         me.keyGrabButton.forcePressed = 1;
132         me.clearButton.disabled = 1;
133         keyGrabber = me;
134 }
135 void XonoticKeyBinder_keyGrabbed(entity me, float key, float ascii)
136 {
137         float n, j, k, nvalid;
138         string func;
139
140         me.keyGrabButton.forcePressed = 0;
141         me.clearButton.disabled = 0;
142
143         if(key == K_ESCAPE)
144                 return;
145
146         // forbid these keys from being bound in the menu
147         if(key == K_CAPSLOCK || key == K_NUMLOCK)
148         {
149                 KeyBinder_Bind_Change(me, me);
150                 return;
151         }
152
153         func = Xonotic_KeyBinds_Functions[me.selectedItem];
154         if(func == "")
155                 return;
156
157         n = tokenize(findkeysforcommand(func, 0)); // uses '...' strings
158         nvalid = 0;
159         for(j = 0; j < n; ++j)
160         {
161                 k = stof(argv(j));
162                 if(k != -1)
163                         ++nvalid;
164         }
165         if(nvalid >= MAX_KEYS_PER_FUNCTION)
166         {
167                 for(j = 0; j < n; ++j)
168                 {
169                         k = stof(argv(j));
170                         if(k != -1)
171                                 //localcmd("\nunbind \"", keynumtostring(k), "\"\n");
172                                 localcmd("\nbind \"", keynumtostring(k), "\" \"", KEY_NOT_BOUND_CMD, "\"\n");
173                 }
174         }
175         localcmd("\nbind \"", keynumtostring(key), "\" \"", func, "\"\n");
176         localcmd("-zoom\n"); // to make sure we aren't in togglezoom'd state
177         cvar_set("_hud_showbinds_reload", "1");
178 }
179 void XonoticKeyBinder_editUserbind(entity me, string theName, string theCommandPress, string theCommandRelease)
180 {
181         string func, descr;
182
183         if(!me.userbindEditDialog)
184                 return;
185
186         func = Xonotic_KeyBinds_Functions[me.selectedItem];
187         if(func == "")
188                 return;
189
190         descr = Xonotic_KeyBinds_Descriptions[me.selectedItem];
191         if(substring(descr, 0, 1) != "$")
192                 return;
193         descr = substring(descr, 1, strlen(descr) - 1);
194
195         // Hooray! It IS a user bind!
196         cvar_set(strcat(descr, "_description"), theName);
197         cvar_set(strcat(descr, "_press"), theCommandPress);
198         cvar_set(strcat(descr, "_release"), theCommandRelease);
199 }
200 void KeyBinder_Bind_Edit(entity btn, entity me)
201 {
202         string func, descr;
203
204         if(!me.userbindEditDialog)
205                 return;
206
207         func = Xonotic_KeyBinds_Functions[me.selectedItem];
208         if(func == "")
209                 return;
210
211         descr = Xonotic_KeyBinds_Descriptions[me.selectedItem];
212         if(substring(descr, 0, 1) != "$")
213                 return;
214         descr = substring(descr, 1, strlen(descr) - 1);
215
216         // Hooray! It IS a user bind!
217         me.userbindEditDialog.loadUserBind(me.userbindEditDialog, cvar_string(strcat(descr, "_description")), cvar_string(strcat(descr, "_press")), cvar_string(strcat(descr, "_release")));
218
219         DialogOpenButton_Click(btn, me.userbindEditDialog);
220 }
221 void KeyBinder_Bind_Clear(entity btn, entity me)
222 {
223         float n, j, k;
224         string func;
225
226         func = Xonotic_KeyBinds_Functions[me.selectedItem];
227         if(func == "")
228                 return;
229
230         n = tokenize(findkeysforcommand(func, 0)); // uses '...' strings
231         for(j = 0; j < n; ++j)
232         {
233                 k = stof(argv(j));
234                 if(k != -1)
235                         //localcmd("\nunbind \"", keynumtostring(k), "\"\n");
236                         localcmd("\nbind \"", keynumtostring(k), "\" \"", KEY_NOT_BOUND_CMD, "\"\n");
237         }
238         localcmd("-zoom\n"); // to make sure we aren't in togglezoom'd state
239         cvar_set("_hud_showbinds_reload", "1");
240 }
241 void KeyBinder_Bind_Reset_All(entity btn, entity me)
242 {
243         localcmd("exec binds-default.cfg\n");
244         localcmd("-zoom\n"); // to make sure we aren't in togglezoom'd state
245         cvar_set("_hud_showbinds_reload", "1");
246 }
247 void XonoticKeyBinder_clickListBoxItem(entity me, float i, vector where)
248 {
249         if(i == me.lastClickedServer)
250                 if(time < me.lastClickedTime + 0.3)
251                 {
252                         // DOUBLE CLICK!
253                         KeyBinder_Bind_Change(NULL, me);
254                 }
255         me.lastClickedServer = i;
256         me.lastClickedTime = time;
257 }
258 void XonoticKeyBinder_setSelected(entity me, float i)
259 {
260         // handling of "unselectable" items
261         i = floor(0.5 + bound(0, i, me.nItems - 1));
262         if(me.pressed == 0 || me.pressed == 1) // keyboard or scrolling - skip unselectable items
263         {
264                 if(i > me.previouslySelected)
265                 {
266                         while((i < me.nItems - 1) && (Xonotic_KeyBinds_Functions[i] == ""))
267                                 ++i;
268                 }
269                 while((i > 0) && (Xonotic_KeyBinds_Functions[i] == ""))
270                         --i;
271                 while((i < me.nItems - 1) && (Xonotic_KeyBinds_Functions[i] == ""))
272                         ++i;
273         }
274         if(me.pressed == 3) // released the mouse - fall back to last valid item
275         {
276                 if(Xonotic_KeyBinds_Functions[i] == "")
277                         i = me.previouslySelected;
278         }
279         if(Xonotic_KeyBinds_Functions[i] != "")
280                 me.previouslySelected = i;
281         if(me.userbindEditButton)
282                 me.userbindEditButton.disabled = (substring(Xonotic_KeyBinds_Descriptions[i], 0, 1) != "$");
283         SUPER(XonoticKeyBinder).setSelected(me, i);
284 }
285 float XonoticKeyBinder_keyDown(entity me, float key, float ascii, float shift)
286 {
287         float r;
288         r = 1;
289         switch(key)
290         {
291                 case K_ENTER:
292                 case K_KP_ENTER:
293                 case K_SPACE:
294                         KeyBinder_Bind_Change(me, me);
295                         break;
296                 case K_DEL:
297                 case K_KP_DEL:
298                 case K_BACKSPACE:
299                         KeyBinder_Bind_Clear(me, me);
300                         break;
301                 default:
302                         r = SUPER(XonoticKeyBinder).keyDown(me, key, ascii, shift);
303                         break;
304         }
305         return r;
306 }
307 void XonoticKeyBinder_drawListBoxItem(entity me, float i, vector absSize, float isSelected)
308 {
309         string s;
310         float j, k, n;
311         vector theColor;
312         float theAlpha;
313         string func, descr;
314         float extraMargin;
315
316         descr = Xonotic_KeyBinds_Descriptions[i];
317         func = Xonotic_KeyBinds_Functions[i];
318
319         if(func == "")
320         {
321                 theAlpha = 1;
322                 theColor = SKINCOLOR_KEYGRABBER_TITLES;
323                 theAlpha = SKINALPHA_KEYGRABBER_TITLES;
324                 extraMargin = 0;
325         }
326         else
327         {
328                 if(isSelected)
329                 {
330                         if(keyGrabber == me)
331                                 draw_Fill('0 0 0', '1 1 0', SKINCOLOR_LISTBOX_WAITING, SKINALPHA_LISTBOX_WAITING);
332                         else
333                                 draw_Fill('0 0 0', '1 1 0', SKINCOLOR_LISTBOX_SELECTED, SKINALPHA_LISTBOX_SELECTED);
334                 }
335                 theAlpha = SKINALPHA_KEYGRABBER_KEYS;
336                 theColor = SKINCOLOR_KEYGRABBER_KEYS;
337                 extraMargin = me.realFontSize_x * 0.5;
338         }
339
340         if(substring(descr, 0, 1) == "$")
341         {
342                 s = substring(descr, 1, strlen(descr) - 1);
343                 descr = cvar_string(strcat(s, "_description"));
344                 if(descr == "")
345                         descr = s;
346                 if(cvar_string(strcat(s, "_press")) == "")
347                         if(cvar_string(strcat(s, "_release")) == "")
348                                 theAlpha *= SKINALPHA_DISABLED;
349         }
350
351         s = draw_TextShortenToWidth(descr, me.columnFunctionSize, 0, me.realFontSize);
352         draw_Text(me.realUpperMargin * eY + extraMargin * eX, s, me.realFontSize, theColor, theAlpha, 0);
353         if(func != "")
354         {
355                 n = tokenize(findkeysforcommand(func, 0)); // uses '...' strings
356                 s = "";
357                 for(j = 0; j < n; ++j)
358                 {
359                         k = stof(argv(j));
360                         if(k != -1)
361                         {
362                                 if(s != "")
363                                         s = strcat(s, ", ");
364                                 s = strcat(s, keynumtostring(k));
365                         }
366                 }
367                 s = draw_TextShortenToWidth(s, me.columnKeysSize, 0, me.realFontSize);
368                 draw_CenterText(me.realUpperMargin * eY + (me.columnKeysOrigin + 0.5 * me.columnKeysSize) * eX, s, me.realFontSize, theColor, theAlpha, 0);
369         }
370 }
371 #endif