]> de.git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blob - qcsrc/menu/xonotic/serverlist.qc
Registry API: add REGISTRY_GET
[xonotic/xonotic-data.pk3dir.git] / qcsrc / menu / xonotic / serverlist.qc
1 #include "serverlist.qh"
2
3 #include "checkbox.qh"
4 #include "inputbox.qh"
5 #include "mainwindow.qh"
6 #include "dialog_multiplayer_join_serverinfo.qh"
7 #include <common/mapinfo.qh>
8
9 void SL_ProcessCategoryOverrides(.string override_field_string, .float override_field)
10 {
11         for (int i = 0; i < category_ent_count; ++i)
12         {
13                 string s = categories[i].override_field_string;
14                 if (s != "" && s != categories[i].cat_name)
15                 {
16                         int catnum = 0;
17                         for (int x = 0; x < category_ent_count; ++x)
18                         {
19                                 if(categories[x].cat_name == s)
20                                 {
21                                         catnum = x + 1;
22                                         break;
23                                 }
24                         }
25                         if (catnum)
26                         {
27                                 strfree(categories[i].override_field_string);
28                                 categories[i].override_field = catnum;
29                                 continue;
30                         }
31                         LOG_INFOF("RegisterSLCategories(): Improper override '%s' for category '%s'!", s, categories[i].cat_name);
32                 }
33                 strfree(categories[i].override_field_string);
34                 categories[i].override_field = 0;
35         }
36 }
37
38 void RegisterSLCategories()
39 {
40         entity cat;
41         #define SLIST_CATEGORY(name,enoverride,dioverride,str) \
42                 SET_FIELD_COUNT(name, CATEGORY_FIRST, category_ent_count) \
43                 CHECK_MAX_COUNT(name, MAX_CATEGORIES, category_ent_count, "SLIST_CATEGORY") \
44                 cat = categories[name - 1] = new(slist_category); \
45                 cat.cat_name = #name; \
46                 cat.cat_enoverride_string = strzone(SLIST_CATEGORY_AUTOCVAR(name)); \
47                 cat.cat_dioverride_string = strzone(dioverride); \
48                 cat.cat_string = strzone(str);
49         SLIST_CATEGORIES
50         #undef SLIST_CATEGORY
51
52         SL_ProcessCategoryOverrides(cat_enoverride_string, cat_enoverride);
53         SL_ProcessCategoryOverrides(cat_dioverride_string, cat_dioverride);
54 }
55
56 // Supporting Functions
57 entity RetrieveCategoryEnt(int catnum)
58 {
59         if((catnum > 0) && (catnum <= category_ent_count))
60         {
61                 return categories[catnum - 1];
62         }
63         else
64         {
65                 error(sprintf("RetrieveCategoryEnt(%d): Improper category number!\n", catnum));
66                 return NULL;
67         }
68 }
69
70 bool IsServerInList(string list, string srv)
71 {
72         if(srv == "")
73                 return false;
74         srv = netaddress_resolve(srv, 26000);
75         if(srv == "")
76                 return false;
77         string p = crypto_getidfp(srv);
78         int n = tokenize_console(list);
79         for(int i = 0; i < n; ++i)
80         {
81                 if(substring(argv(i), 0, 1) != "[" && strlen(argv(i)) == 44 && strstrofs(argv(i), ".", 0) < 0)
82                 {
83                         if(p && argv(i) == p)
84                                 return true;
85                 }
86                 else
87                 {
88                         if(srv == netaddress_resolve(argv(i), 26000))
89                                 return true;
90                 }
91         }
92         return false;
93 }
94
95 int CategoryOverride(int cat)
96 {
97         entity catent = RetrieveCategoryEnt(cat);
98         if(catent)
99         {
100                 int override = (autocvar_menu_slist_categories ? catent.cat_enoverride : catent.cat_dioverride);
101                 if(override) { return override; }
102                 else { return cat; }
103         }
104         else
105         {
106                 error(sprintf("CategoryOverride(%d): Improper category number!\n", cat));
107                 return cat;
108         }
109 }
110
111 int CategoryForEntry(int entry)
112 {
113         string s, k, v, modtype = "";
114         int j, m, impure = 0, freeslots = 0, sflags = 0;
115         s = gethostcachestring(SLIST_FIELD_QCSTATUS, entry);
116         m = tokenizebyseparator(s, ":");
117
118         for(j = 2; j < m; ++j)
119         {
120                 if(argv(j) == "") { break; }
121                 k = substring(argv(j), 0, 1);
122                 v = substring(argv(j), 1, -1);
123                 switch(k)
124                 {
125                         case "P": { impure = stof(v); break; }
126                         case "S": { freeslots = stof(v); break; }
127                         case "F": { sflags = stof(v); break; }
128                         case "M": { modtype = strtolower(v); break; }
129                 }
130         }
131
132         if(modtype != "xonotic") { impure += autocvar_menu_slist_modimpurity; }
133
134         // check if this server is favorited
135         if(gethostcachenumber(SLIST_FIELD_ISFAVORITE, entry)) { return CAT_FAVORITED; }
136
137         // now check if it's recommended
138         if(autocvar_menu_slist_recommendations)
139         {
140                 string cname = gethostcachestring(SLIST_FIELD_CNAME, entry);
141
142                 if(IsPromoted(cname)) { return CAT_RECOMMENDED; }
143                 else
144                 {
145                         float recommended = 0;
146                         if(autocvar_menu_slist_recommendations & 1)
147                         {
148                                 if(IsRecommended(cname)) { ++recommended; }
149                                 else { --recommended; }
150                         }
151                         if(autocvar_menu_slist_recommendations & 2)
152                         {
153                                 if(
154                                         ///// check for minimum free slots
155                                         (freeslots >= autocvar_menu_slist_recommendations_minfreeslots)
156
157                                         && // check for purity requirement
158                                         (
159                                                 (autocvar_menu_slist_recommendations_purethreshold < 0)
160                                                 ||
161                                                 (impure <= autocvar_menu_slist_recommendations_purethreshold)
162                                         )
163
164                                         && // check for minimum amount of humans
165                                         (
166                                                 gethostcachenumber(SLIST_FIELD_NUMHUMANS, entry)
167                                                 >=
168                                                 autocvar_menu_slist_recommendations_minhumans
169                                         )
170
171                                         && // check for maximum latency
172                                         (
173                                                 gethostcachenumber(SLIST_FIELD_PING, entry)
174                                                 <=
175                                                 autocvar_menu_slist_recommendations_maxping
176                                         )
177                                 )
178                                         { ++recommended; }
179                                 else
180                                         { --recommended; }
181                         }
182                         if(recommended > 0) { return CAT_RECOMMENDED; }
183                 }
184         }
185
186         // if not favorited or recommended, check modname
187         if(modtype != "xonotic")
188         {
189                 switch(modtype)
190                 {
191                         // old servers which don't report their mod name are considered modified now
192                         case "": { return CAT_MODIFIED; }
193
194                         case "xpm": { return CAT_XPM; }
195                         case "minstagib":
196                         case "instagib": { return CAT_INSTAGIB; }
197                         case "overkill": { return CAT_OVERKILL; }
198
199                         // "cts" is allowed as compat, xdf is replacement
200                         case "cts":
201                         case "xdf": { return CAT_DEFRAG; }
202
203                         default: { LOG_TRACEF("Found strange mod type: %s", modtype); return CAT_MODIFIED; }
204                 }
205         }
206
207         // must be normal or impure server
208         return ((impure > autocvar_menu_slist_purethreshold) ? CAT_MODIFIED : CAT_NORMAL);
209 }
210
211 METHOD(XonoticServerList, toggleFavorite, void(XonoticServerList this, string srv))
212 {
213         bool adding = true;
214         string srv_resolved = netaddress_resolve(srv, 26000);
215         string p = crypto_getidfp(srv_resolved);
216         string s = cvar_string("net_slist_favorites");
217         string ret = s;
218         for (int i = 0, n = tokenize_console(s); i < n; ++i)
219         {
220                 bool match;
221                 if (substring(argv(i), 0, 1) != "[" && strlen(argv(i)) == 44 && strstrofs(argv(i), ".", 0) < 0)
222                 {
223                         // it's a pubkey hash
224                         match = (p && p == argv(i));
225                 }
226                 else
227                 {
228                         // it's an ip
229                         match = (srv_resolved == netaddress_resolve(argv(i), 26000));
230                 }
231                 if (!match) continue;
232                 // on match: remove
233                 adding = false;
234                 string before = (i > 0) ? substring(s, 0, argv_end_index(i - 1)) : "";
235                 string after = (i < n - 1) ? substring(s, argv_start_index(i + 1), -1) : "";
236                 s = strcat(before, (before != "" && after != "" ? " " : ""), after);
237                 ret = s;
238                 // keep searching
239                 // TODO: why not break here?
240                 n = tokenize_console(s);
241                 --i; // offset the increment that is about to happen
242         }
243         if (adding)
244         {
245                 ret = strcat(s, (s != "" ? " " : ""), p ? p : srv);
246         }
247         cvar_set("net_slist_favorites", ret);
248         this.refreshServerList(this, REFRESHSERVERLIST_RESORT);
249 }
250
251 void ServerList_Update_favoriteButton(entity btn, entity me)
252 {
253         entity e = me.favoriteButton;
254         if(IsFavorite(me.ipAddressBox.text))
255         {
256                 e.setText(e, _("Remove favorite"));
257                 setZonedTooltip(e, _("Remove the currently highlighted server from bookmarks"), string_null);
258         }
259         else
260         {
261                 e.setText(e, _("Favorite"));
262                 setZonedTooltip(e, _("Bookmark the currently highlighted server so that it's faster to find in the future"), string_null);
263         }
264 }
265
266 entity makeXonoticServerList()
267 {
268         entity me;
269         me = NEW(XonoticServerList);
270         me.configureXonoticServerList(me);
271         return me;
272 }
273 void XonoticServerList_configureXonoticServerList(entity me)
274 {
275         me.configureXonoticListBox(me);
276
277         // update field ID's
278         #define SLIST_FIELD(suffix,name) SLIST_FIELD_##suffix = gethostcacheindexforkey(name);
279         SLIST_FIELDS
280         #undef SLIST_FIELD
281
282         // clear list
283         me.nItems = 0;
284 }
285 void XonoticServerList_setSelected(entity me, int i)
286 {
287         me.lockedSelectedItem = false;
288         //int save = me.selectedItem;
289         SUPER(XonoticServerList).setSelected(me, i);
290         /*
291         if(me.selectedItem == save)
292                 return;
293         */
294         if(me.nItems == 0)
295                 return;
296         if(gethostcachevalue(SLIST_HOSTCACHEVIEWCOUNT) != me.nItems)
297                 return; // sorry, it would be wrong
298
299         strcpy(me.selectedServer, gethostcachestring(SLIST_FIELD_CNAME, me.selectedItem));
300
301         me.ipAddressBox.setText(me.ipAddressBox, me.selectedServer);
302         me.ipAddressBox.cursorPos = strlen(me.selectedServer);
303         me.ipAddressBoxFocused = -1;
304 }
305 void XonoticServerList_refreshServerList(entity me, int mode)
306 {
307         //print("refresh of type ", ftos(mode), "\n");
308
309         if(mode >= REFRESHSERVERLIST_REFILTER)
310         {
311                 string s = me.filterString;
312
313                 string typestr;
314                 int m = strstrofs(s, ":", 0);
315                 if(m >= 0)
316                 {
317                         typestr = substring(s, 0, m);
318                         s = substring(s, m + 1, strlen(s) - m - 1);
319                         while(substring(s, 0, 1) == " ")
320                                 s = substring(s, 1, strlen(s) - 1);
321                 }
322                 else
323                         typestr = "";
324
325                 string modstr = cvar_string("menu_slist_modfilter");
326
327                 m = SLIST_MASK_AND - 1;
328                 resethostcachemasks();
329
330                 // ping: reject negative ping (no idea why this happens in the first place, engine bug)
331                 sethostcachemasknumber(++m, SLIST_FIELD_PING, 0, SLIST_TEST_GREATEREQUAL);
332
333                 // show full button
334                 if(!me.filterShowFull)
335                 {
336                         sethostcachemasknumber(++m, SLIST_FIELD_FREESLOTS, 1, SLIST_TEST_GREATEREQUAL); // legacy
337                         sethostcachemaskstring(++m, SLIST_FIELD_QCSTATUS, ":S0:", SLIST_TEST_NOTCONTAIN); // g_maxplayers support
338                 }
339
340                 // show empty button
341                 if(!me.filterShowEmpty)
342                         sethostcachemasknumber(++m, SLIST_FIELD_NUMHUMANS, 1, SLIST_TEST_GREATEREQUAL);
343
344                 // gametype filtering
345                 if(typestr != "")
346                         sethostcachemaskstring(++m, SLIST_FIELD_QCSTATUS, strcat(typestr, ":"), SLIST_TEST_STARTSWITH);
347
348                 // mod filtering
349                 if(modstr != "")
350                 {
351                         if(substring(modstr, 0, 1) == "!")
352                                 sethostcachemaskstring(++m, SLIST_FIELD_MOD, resolvemod(substring(modstr, 1, strlen(modstr) - 1)), SLIST_TEST_NOTEQUAL);
353                         else
354                                 sethostcachemaskstring(++m, SLIST_FIELD_MOD, resolvemod(modstr), SLIST_TEST_EQUAL);
355                 }
356
357                 // server banning
358                 int n = tokenizebyseparator(_Nex_ExtResponseSystem_BannedServers, " ");
359                 for(int i = 0; i < n; ++i)
360                         if(argv(i) != "")
361                                 sethostcachemaskstring(++m, SLIST_FIELD_CNAME, argv(i), SLIST_TEST_NOTSTARTSWITH);
362
363                 m = SLIST_MASK_OR - 1;
364                 if(s != "")
365                 {
366                         sethostcachemaskstring(++m, SLIST_FIELD_NAME, s, SLIST_TEST_CONTAINS);
367                         sethostcachemaskstring(++m, SLIST_FIELD_MAP, s, SLIST_TEST_CONTAINS);
368                         sethostcachemaskstring(++m, SLIST_FIELD_PLAYERS, s, SLIST_TEST_CONTAINS);
369                         sethostcachemaskstring(++m, SLIST_FIELD_QCSTATUS, strcat(s, ":"), SLIST_TEST_STARTSWITH);
370                 }
371
372                 int sorting_flags = 0;
373                 //sorting_flags |= SLSF_FAVORITES;
374                 sorting_flags |= SLSF_CATEGORIES;
375                 if(me.currentSortOrder < 0) { sorting_flags |= SLSF_DESCENDING; }
376                 sethostcachesort(me.currentSortField, sorting_flags);
377         }
378
379         resorthostcache();
380         if(mode >= REFRESHSERVERLIST_ASK)
381                 refreshhostcache(mode >= REFRESHSERVERLIST_RESET);
382 }
383 void XonoticServerList_focusEnter(entity me)
384 {
385         SUPER(XonoticServerList).focusEnter(me);
386         if(time < me.nextRefreshTime)
387         {
388                 //print("sorry, no refresh yet\n");
389                 return;
390         }
391         me.nextRefreshTime = time + 10;
392         me.refreshServerList(me, REFRESHSERVERLIST_ASK);
393 }
394
395 void XonoticServerList_draw(entity me)
396 {
397         if(_Nex_ExtResponseSystem_BannedServersNeedsRefresh)
398         {
399                 if(!me.needsRefresh)
400                         me.needsRefresh = 2;
401                 _Nex_ExtResponseSystem_BannedServersNeedsRefresh = 0;
402         }
403
404         if(_Nex_ExtResponseSystem_PromotedServersNeedsRefresh)
405         {
406                 if(!me.needsRefresh)
407                         me.needsRefresh = 3;
408                 _Nex_ExtResponseSystem_PromotedServersNeedsRefresh = 0;
409         }
410
411         if(_Nex_ExtResponseSystem_RecommendedServersNeedsRefresh)
412         {
413                 if(!me.needsRefresh)
414                         me.needsRefresh = 3;
415                 _Nex_ExtResponseSystem_RecommendedServersNeedsRefresh = 0;
416         }
417
418         if(me.currentSortField == -1)
419         {
420                 me.setSortOrder(me, SLIST_FIELD_PING, +1);
421                 me.refreshServerList(me, REFRESHSERVERLIST_RESET);
422         }
423         else if(me.needsRefresh == 1)
424         {
425                 me.needsRefresh = 2; // delay by one frame to make sure "slist" has been executed
426         }
427         else if(me.needsRefresh == 2)
428         {
429                 me.needsRefresh = 0;
430                 me.refreshServerList(me, REFRESHSERVERLIST_REFILTER);
431         }
432         else if(me.needsRefresh == 3)
433         {
434                 me.needsRefresh = 0;
435                 me.refreshServerList(me, REFRESHSERVERLIST_RESORT);
436         }
437
438         bool owned = ((me.selectedServer == me.ipAddressBox.text) && (me.ipAddressBox.text != ""));
439
440         for(int i = 0; i < category_draw_count; ++i) { category_name[i] = -1; category_item[i] = -1; }
441         category_draw_count = 0;
442
443         if(autocvar_menu_slist_categories >= 0) // if less than 0, don't even draw a category heading for favorites
444         {
445                 float itemcount = gethostcachevalue(SLIST_HOSTCACHEVIEWCOUNT);
446                 me.nItems = itemcount;
447
448                 //float visible = floor(me.scrollPos / me.itemHeight);
449                 // ^ unfortunately no such optimization can be made-- we must process through the
450                 // entire list, otherwise there is no way to know which item is first in its category.
451
452                 // binary search method suggested by div
453                 float begin = 0;
454                 for(int j = 1; j <= category_ent_count; ++j) {
455                         float first = begin;
456                         float last = (itemcount - 1);
457                         if (first > last) {
458                                 // List is empty.
459                                 break;
460                         }
461                         float catf = gethostcachenumber(SLIST_FIELD_CATEGORY, first);
462                         float catl = gethostcachenumber(SLIST_FIELD_CATEGORY, last);
463                         if (catf > j) {
464                                 // The first one is already > j.
465                                 // Therefore, category j does not exist.
466                                 // Higher numbered categories do exist though.
467                         } else if (catl < j) {
468                                 // The last one is < j.
469                                 // Thus this category - and any following -
470                                 // don't exist.
471                                 break;
472                         } else if (catf == j) {
473                                 // Starts at first. This breaks the loop
474                                 // invariant in the binary search and thus has
475                                 // to be handled separately.
476                                 if(gethostcachenumber(SLIST_FIELD_CATEGORY, first) != j)
477                                         error("Category mismatch I");
478                                 if(first > 0)
479                                         if(gethostcachenumber(SLIST_FIELD_CATEGORY, first - 1) == j)
480                                                 error("Category mismatch II");
481                                 category_name[category_draw_count] = j;
482                                 category_item[category_draw_count] = first;
483                                 ++category_draw_count;
484                                 begin = first + 1;
485                         } else {
486                                 // At this point, catf <= j < catl, thus
487                                 // catf < catl, thus first < last.
488                                 // INVARIANTS:
489                                 // last - first >= 1
490                                 // catf == gethostcachenumber(SLIST_FIELD_CATEGORY(first)
491                                 // catl == gethostcachenumber(SLIST_FIELD_CATEGORY(last)
492                                 // catf < j
493                                 // catl >= j
494                                 while (last - first > 1) {
495                                         float middle = floor((first + last) / 2);
496                                         // By loop condition, middle != first && middle != last.
497                                         float cat = gethostcachenumber(SLIST_FIELD_CATEGORY, middle);
498                                         if (cat >= j) {
499                                                 last = middle;
500                                                 catl = cat;
501                                         } else {
502                                                 first = middle;
503                                                 catf = cat;
504                                         }
505                                 }
506                                 if (catl == j) {
507                                         if(gethostcachenumber(SLIST_FIELD_CATEGORY, last) != j)
508                                                 error("Category mismatch III");
509                                         if(last > 0)
510                                                 if(gethostcachenumber(SLIST_FIELD_CATEGORY, last - 1) == j)
511                                                         error("Category mismatch IV");
512                                         category_name[category_draw_count] = j;
513                                         category_item[category_draw_count] = last;
514                                         ++category_draw_count;
515                                         begin = last + 1; // already scanned through these, skip 'em
516                                 }
517                                 else
518                                         begin = last; // already scanned through these, skip 'em
519                         }
520                 }
521                 if(autocvar_menu_slist_categories_onlyifmultiple && (category_draw_count == 1))
522                 {
523                         category_name[0] = -1;
524                         category_item[0] = -1;
525                         category_draw_count = 0;
526                         me.nItems = itemcount;
527                 }
528         }
529         else { me.nItems = gethostcachevalue(SLIST_HOSTCACHEVIEWCOUNT); }
530
531         me.connectButton.disabled = (me.ipAddressBox.text == "");
532         //me.disconnectButton.disabled = (!(gamestatus & (GAME_ISSERVER | GAME_CONNECTED)));
533         me.infoButton.disabled = !owned;
534         me.favoriteButton.disabled = (me.ipAddressBox.text == "");
535
536         bool found = false;
537         if(me.lockedSelectedItem)
538         {
539                 if(me.nItems > 0)
540                 {
541                         if(gethostcachestring(SLIST_FIELD_CNAME, me.selectedItem) != me.selectedServer)
542                         {
543                                 strcpy(me.selectedServer, gethostcachestring(SLIST_FIELD_CNAME, me.selectedItem));
544                         }
545                         found = true;
546                 }
547         }
548         else if(me.selectedServer)
549         {
550                 for(int i = 0; i < me.nItems; ++i)
551                 {
552                         if(gethostcachestring(SLIST_FIELD_CNAME, i) == me.selectedServer)
553                         {
554                                 // don't follow the selected item with SUPER(XonoticServerList).setSelected(me, i);
555                                 me.selectedItem = i;
556                                 found = true;
557                                 break;
558                         }
559                 }
560         }
561         if(!found)
562         {
563                 if(me.nItems > 0)
564                 {
565                         // selected server disappeared, select the last server (scrolling to it)
566                         if(me.selectedItem >= me.nItems)
567                                 SUPER(XonoticServerList).setSelected(me, me.nItems - 1);
568                         strcpy(me.selectedServer, gethostcachestring(SLIST_FIELD_CNAME, me.selectedItem));
569                 }
570         }
571
572         if(owned)
573         {
574                 if(me.selectedServer != me.ipAddressBox.text)
575                 {
576                         me.ipAddressBox.setText(me.ipAddressBox, me.selectedServer);
577                         me.ipAddressBox.cursorPos = strlen(me.selectedServer);
578                         me.ipAddressBoxFocused = -1;
579                 }
580         }
581
582         if(me.ipAddressBoxFocused != me.ipAddressBox.focused)
583         {
584                 if(me.ipAddressBox.focused || me.ipAddressBoxFocused < 0)
585                         ServerList_Update_favoriteButton(NULL, me);
586                 me.ipAddressBoxFocused = me.ipAddressBox.focused;
587         }
588
589         SUPER(XonoticServerList).draw(me);
590 }
591 void ServerList_PingSort_Click(entity btn, entity me)
592 {
593         me.setSortOrder(me, SLIST_FIELD_PING, +1);
594 }
595 void ServerList_NameSort_Click(entity btn, entity me)
596 {
597         me.setSortOrder(me, SLIST_FIELD_NAME, -1); // why?
598 }
599 void ServerList_MapSort_Click(entity btn, entity me)
600 {
601         me.setSortOrder(me, SLIST_FIELD_MAP, -1); // why?
602 }
603 void ServerList_PlayerSort_Click(entity btn, entity me)
604 {
605         me.setSortOrder(me, SLIST_FIELD_NUMHUMANS, -1);
606 }
607 void ServerList_TypeSort_Click(entity btn, entity me)
608 {
609         string s = me.filterString;
610         int m = strstrofs(s, ":", 0);
611         if(m >= 0)
612         {
613                 s = substring(s, 0, m);
614                 while(substring(s, m+1, 1) == " ") // skip spaces
615                         ++m;
616         }
617         else
618                 s = "";
619
620         Gametype first = NULL; FOREACH(Gametypes, !first, first = it; break);
621         bool flag = false;
622         FOREACH(Gametypes, s == MapInfo_Type_ToString(it), {
623                 // the type was found
624                 // choose the next one
625                 flag = true;
626                 s = MapInfo_Type_ToString(REGISTRY_GET(Gametypes, it.m_id + 1));
627                 if (s == "") s = MapInfo_Type_ToString(first);
628                 break;
629         });
630         if (!flag) {
631                 // no type was found
632                 // choose the first one
633                 s = MapInfo_Type_ToString(first);
634         }
635
636         if(s != "") s = strcat(s, ":");
637         s = strcat(s, substring(me.filterString, m+1, strlen(me.filterString) - m - 1));
638
639         me.controlledTextbox.setText(me.controlledTextbox, s);
640         me.controlledTextbox.keyDown(me.controlledTextbox, K_END, 0, 0);
641         me.controlledTextbox.keyUp(me.controlledTextbox, K_END, 0, 0);
642         //ServerList_Filter_Change(me.controlledTextbox, me);
643 }
644 void ServerList_Filter_Change(entity box, entity me)
645 {
646         strfree(me.filterString);
647         if(box.text != "")
648                 me.filterString = strzone(box.text);
649         me.refreshServerList(me, REFRESHSERVERLIST_REFILTER);
650
651         me.ipAddressBox.setText(me.ipAddressBox, "");
652         me.ipAddressBox.cursorPos = 0;
653         me.ipAddressBoxFocused = -1;
654 }
655 void ServerList_Categories_Click(entity box, entity me)
656 {
657         box.setChecked(box, autocvar_menu_slist_categories = !autocvar_menu_slist_categories);
658         me.refreshServerList(me, REFRESHSERVERLIST_RESORT);
659
660         me.ipAddressBox.setText(me.ipAddressBox, "");
661         me.ipAddressBox.cursorPos = 0;
662         me.ipAddressBoxFocused = -1;
663 }
664 void ServerList_ShowEmpty_Click(entity box, entity me)
665 {
666         box.setChecked(box, me.filterShowEmpty = !me.filterShowEmpty);
667         me.refreshServerList(me, REFRESHSERVERLIST_REFILTER);
668
669         me.ipAddressBox.setText(me.ipAddressBox, "");
670         me.ipAddressBox.cursorPos = 0;
671         me.ipAddressBoxFocused = -1;
672 }
673 void ServerList_ShowFull_Click(entity box, entity me)
674 {
675         box.setChecked(box, me.filterShowFull = !me.filterShowFull);
676         me.refreshServerList(me, REFRESHSERVERLIST_REFILTER);
677
678         me.ipAddressBox.setText(me.ipAddressBox, "");
679         me.ipAddressBox.cursorPos = 0;
680         me.ipAddressBoxFocused = -1;
681 }
682 void XonoticServerList_setSortOrder(entity me, int fld, int direction)
683 {
684         if(me.currentSortField == fld)
685                 direction = -me.currentSortOrder;
686         me.currentSortOrder = direction;
687         me.currentSortField = fld;
688         me.sortButton1.forcePressed = (fld == SLIST_FIELD_PING);
689         me.sortButton2.forcePressed = (fld == SLIST_FIELD_NAME);
690         me.sortButton3.forcePressed = (fld == SLIST_FIELD_MAP);
691         me.sortButton4.forcePressed = 0;
692         me.sortButton5.forcePressed = (fld == SLIST_FIELD_NUMHUMANS);
693         me.selectedItem = 0;
694         strfree(me.selectedServer);
695         me.refreshServerList(me, REFRESHSERVERLIST_REFILTER);
696 }
697 void XonoticServerList_positionSortButton(entity me, entity btn, float theOrigin, float theSize, string theTitle, void(entity, entity) theFunc)
698 {
699         vector originInLBSpace = eY * (-me.itemHeight);
700         vector sizeInLBSpace = eY * me.itemHeight + eX * (1 - me.controlWidth);
701
702         vector originInDialogSpace = boxToGlobal(originInLBSpace, me.Container_origin, me.Container_size);
703         vector sizeInDialogSpace = boxToGlobalSize(sizeInLBSpace, me.Container_size);
704
705         btn.Container_origin_x = originInDialogSpace.x + sizeInDialogSpace.x * theOrigin;
706         btn.Container_size_x   =                         sizeInDialogSpace.x * theSize;
707         btn.setText(btn, theTitle);
708         btn.onClick = theFunc;
709         btn.onClickEntity = me;
710         btn.resized = 1;
711 }
712 void XonoticServerList_resizeNotify(entity me, vector relOrigin, vector relSize, vector absOrigin, vector absSize)
713 {
714         SUPER(XonoticServerList).resizeNotify(me, relOrigin, relSize, absOrigin, absSize);
715
716         me.realFontSize_y = me.fontSize / (absSize.y * me.itemHeight);
717         me.realFontSize_x = me.fontSize / (absSize.x * (1 - me.controlWidth));
718         me.realUpperMargin = 0.5 * (1 - me.realFontSize.y);
719
720         me.columnIconsOrigin = 0;
721         me.columnIconsSize = me.realFontSize.x * 4 * me.iconsSizeFactor;
722         me.columnPingSize = me.realFontSize.x * 3;
723         me.columnMapSize = me.realFontSize.x * 10;
724         me.columnTypeSize = me.realFontSize.x * 4;
725         me.columnPlayersSize = me.realFontSize.x * 5;
726         me.columnNameSize = 1 - me.columnPlayersSize - me.columnMapSize - me.columnPingSize - me.columnIconsSize - me.columnTypeSize - 5 * me.realFontSize.x;
727         me.columnPingOrigin = me.columnIconsOrigin + me.columnIconsSize + me.realFontSize.x;
728         me.columnNameOrigin = me.columnPingOrigin + me.columnPingSize + me.realFontSize.x;
729         me.columnMapOrigin = me.columnNameOrigin + me.columnNameSize + me.realFontSize.x;
730         me.columnTypeOrigin = me.columnMapOrigin + me.columnMapSize + me.realFontSize.x;
731         me.columnPlayersOrigin = me.columnTypeOrigin + me.columnTypeSize + me.realFontSize.x;
732
733         me.positionSortButton(me, me.sortButton1, me.columnPingOrigin, me.columnPingSize, _("Ping"), ServerList_PingSort_Click);
734         me.positionSortButton(me, me.sortButton2, me.columnNameOrigin, me.columnNameSize, _("Hostname"), ServerList_NameSort_Click);
735         me.positionSortButton(me, me.sortButton3, me.columnMapOrigin, me.columnMapSize, _("Map"), ServerList_MapSort_Click);
736         me.positionSortButton(me, me.sortButton4, me.columnTypeOrigin, me.columnTypeSize, _("Type"), ServerList_TypeSort_Click);
737         me.positionSortButton(me, me.sortButton5, me.columnPlayersOrigin, me.columnPlayersSize, _("Players"), ServerList_PlayerSort_Click);
738
739         int f = me.currentSortField;
740         if(f >= 0)
741         {
742                 me.currentSortField = -1;
743                 me.setSortOrder(me, f, me.currentSortOrder); // force resetting the sort order
744         }
745 }
746 void ServerList_Connect_Click(entity btn, entity me)
747 {
748         if (me.ipAddressBox.text != "")
749                 localcmd(sprintf("connect %s\n", me.ipAddressBox.text));
750 }
751 void ServerList_Favorite_Click(entity btn, entity this)
752 {
753         string addr = this.ipAddressBox.text;
754         string ipstr = netaddress_resolve(addr, 26000);
755         if (ipstr == "") return;
756         m_play_click_sound(MENU_SOUND_SELECT);
757         this.toggleFavorite(this, addr);
758         this.ipAddressBoxFocused = -1;
759 }
760 void ServerList_Info_Click(entity btn, entity me)
761 {
762         if (me.nItems != 0)
763                 main.serverInfoDialog.loadServerInfo(main.serverInfoDialog, me.selectedItem);
764
765         vector org = boxToGlobal(eY * (me.selectedItem * me.itemHeight - me.scrollPos), me.origin, me.size);
766         vector sz = boxToGlobalSize(eY * me.itemHeight + eX * (1 - me.controlWidth), me.size);
767         DialogOpenButton_Click_withCoords(me, main.serverInfoDialog, org, sz);
768 }
769 void XonoticServerList_doubleClickListBoxItem(entity me, int i, vector where)
770 {
771         ServerList_Connect_Click(NULL, me);
772 }
773 void XonoticServerList_drawListBoxItem(entity me, int i, vector absSize, bool isSelected, bool isFocused)
774 {
775         vector oldscale = draw_scale;
776         vector oldshift = draw_shift;
777 #define SET_YRANGE(start,end) \
778         draw_scale = boxToGlobalSize(eX + eY * (end - start), oldscale); \
779         draw_shift = boxToGlobal(eY * start, oldshift, oldscale);
780
781         int c;
782         for (c = 0; c < category_draw_count; ++c) {
783                 // Matches exactly the headings with increased height.
784                 if (i == category_item[c])
785                         break;
786         }
787
788         if (c < category_draw_count)
789         {
790                 entity catent = RetrieveCategoryEnt(category_name[c]);
791                 if(catent)
792                 {
793                         SET_YRANGE(
794                                 (me.categoriesHeight - 1) / (me.categoriesHeight + 1),
795                                 me.categoriesHeight / (me.categoriesHeight + 1)
796                         );
797                         draw_Text(
798                                 eY * me.realUpperMargin
799                                 +
800 #if 0
801                                 eX * (me.columnNameOrigin + (me.columnNameSize - draw_TextWidth(catent.cat_string, 0, me.realFontSize)) * 0.5),
802                                 catent.cat_string,
803 #else
804                                 eX * (me.columnNameOrigin),
805                                 strcat(catent.cat_string, ":"),
806 #endif
807                                 me.realFontSize,
808                                 SKINCOLOR_SERVERLIST_CATEGORY,
809                                 SKINALPHA_SERVERLIST_CATEGORY,
810                                 0
811                         );
812                         SET_YRANGE(me.categoriesHeight / (me.categoriesHeight + 1), 1);
813                 }
814         }
815
816         if(isSelected && !me.lockedSelectedItem)
817                 draw_Fill('0 0 0', '1 1 0', SKINCOLOR_LISTBOX_SELECTED, SKINALPHA_LISTBOX_SELECTED);
818         else if(isFocused)
819         {
820                 me.focusedItemAlpha = getFadedAlpha(me.focusedItemAlpha, SKINALPHA_LISTBOX_FOCUSED, SKINFADEALPHA_LISTBOX_FOCUSED);
821                 draw_Fill('0 0 0', '1 1 0', SKINCOLOR_LISTBOX_FOCUSED, me.focusedItemAlpha);
822         }
823
824         string s = gethostcachestring(SLIST_FIELD_QCSTATUS, i);
825         int m = tokenizebyseparator(s, ":");
826         string typestr = "", versionstr = "";
827         if(m >= 2)
828         {
829                 typestr = argv(0);
830                 versionstr = argv(1);
831         }
832         bool pure = false, pure_available = false;
833         int freeslots = -1, sflags = -1;
834         string modname = "";
835         for(int j = 2; j < m; ++j)
836         {
837                 if(argv(j) == "")
838                         break;
839                 string key = substring(argv(j), 0, 1);
840                 string value = substring(argv(j), 1, -1);
841                 if(key == "P")
842                 {
843                         pure = (stof(value) == 0);
844                         pure_available = true;
845                 }
846                 else if(key == "S")
847                         freeslots = stof(value);
848                 else if(key == "F")
849                         sflags = stoi(value);
850                 else if(key == "M")
851                         modname = value;
852         }
853
854 #ifdef COMPAT_NO_MOD_IS_XONOTIC
855         if(modname == "")
856                 modname = "Xonotic";
857 #endif
858
859         string original_modname = modname;
860         modname = strtolower(modname);
861
862         /*
863         SLIST_FIELD_MOD = gethostcacheindexforkey("mod");
864         s = gethostcachestring(SLIST_FIELD_MOD, i);
865         if(s != "data")
866                 if(modname == "xonotic")
867                         modname = s;
868         */
869
870         // list the mods here on which the pure server check actually works
871         if(modname != "xonotic")
872         if(modname != "instagib" || modname != "minstagib")
873         if(modname != "cts")
874         if(modname != "nix")
875         if(modname != "newtoys")
876                 pure_available = false;
877
878         float theAlpha;
879         if(gethostcachenumber(SLIST_FIELD_FREESLOTS, i) <= 0)
880                 theAlpha = SKINALPHA_SERVERLIST_FULL;
881         else if(freeslots == 0)
882                 theAlpha = SKINALPHA_SERVERLIST_FULL; // g_maxplayers support
883         else if (!gethostcachenumber(SLIST_FIELD_NUMHUMANS, i))
884                 theAlpha = SKINALPHA_SERVERLIST_EMPTY;
885         else
886                 theAlpha = 1;
887
888         float ping = gethostcachenumber(SLIST_FIELD_PING, i);
889         const int PING_LOW = 75;
890         const int PING_MED = 200;
891         const int PING_HIGH = 500;
892         vector theColor;
893         if(ping < PING_LOW)
894                 theColor = SKINCOLOR_SERVERLIST_LOWPING + (SKINCOLOR_SERVERLIST_MEDPING - SKINCOLOR_SERVERLIST_LOWPING) * (ping / PING_LOW);
895         else if(ping < PING_MED)
896                 theColor = SKINCOLOR_SERVERLIST_MEDPING + (SKINCOLOR_SERVERLIST_HIGHPING - SKINCOLOR_SERVERLIST_MEDPING) * ((ping - PING_LOW) / (PING_MED - PING_LOW));
897         else if(ping < PING_HIGH)
898         {
899                 theColor = SKINCOLOR_SERVERLIST_HIGHPING;
900                 theAlpha *= 1 + (SKINALPHA_SERVERLIST_HIGHPING - 1) * ((ping - PING_MED) / (PING_HIGH - PING_MED));
901         }
902         else
903         {
904                 theColor = eX;
905                 theAlpha *= SKINALPHA_SERVERLIST_HIGHPING;
906         }
907
908         if(gethostcachenumber(SLIST_FIELD_ISFAVORITE, i))
909         {
910                 theColor = theColor * (1 - SKINALPHA_SERVERLIST_FAVORITE) + SKINCOLOR_SERVERLIST_FAVORITE * SKINALPHA_SERVERLIST_FAVORITE;
911                 theAlpha = theAlpha * (1 - SKINALPHA_SERVERLIST_FAVORITE) + SKINALPHA_SERVERLIST_FAVORITE;
912         }
913
914         s = gethostcachestring(SLIST_FIELD_CNAME, i);
915
916         bool isv4 = false, isv6 = false;
917         if(substring(s, 0, 1) == "[")
918         {
919                 isv6 = true;
920                 me.seenIPv6 += 1;
921         }
922         else if(IS_DIGIT(substring(s, 0, 1)))
923         {
924                 isv4 = true;
925                 me.seenIPv4 += 1;
926         }
927
928         int crypto = stof(substring(crypto_getencryptlevel(s), 0, 1));
929         if((crypto <= 0 && cvar("crypto_aeslevel") >= 3) || (crypto >= 3 && cvar("crypto_aeslevel") <= 0))
930         {
931                 theColor = SKINCOLOR_SERVERLIST_IMPOSSIBLE;
932                 theAlpha = SKINALPHA_SERVERLIST_IMPOSSIBLE;
933         }
934
935         if(crypto == 1)
936         {
937                 if(cvar("crypto_aeslevel") >= 2)
938                         crypto |= 4;
939         }
940         if(crypto == 2)
941         {
942                 if(cvar("crypto_aeslevel") >= 1)
943                         crypto |= 4;
944         }
945         if(crypto == 3)
946                 crypto = 5;
947         else if(crypto >= 3)
948                 crypto -= 2;
949         // possible status:
950         // 0: crypto off
951         // 1: AES possible
952         // 2: AES recommended but not available
953         // 3: AES possible and will be used
954         // 4: AES recommended and will be used
955         // 5: AES required
956
957         // --------------
958         //  RENDER ICONS
959         // --------------
960         vector iconSize = '0 0 0';
961         iconSize_y = me.realFontSize.y * me.iconsSizeFactor;
962         iconSize_x = me.realFontSize.x * me.iconsSizeFactor;
963
964         vector iconPos = '0 0 0';
965         iconPos_x = (me.columnIconsSize - 3 * iconSize.x) * 0.5;
966         iconPos_y = (1 - iconSize.y) * 0.5;
967
968         // IP
969         if(me.seenIPv4 && me.seenIPv6)
970         {
971                 if(isv6)
972                         draw_Picture(iconPos, "icon_ipv6", iconSize, '1 1 1', 1);
973                 else if(isv4)
974                         draw_Picture(iconPos, "icon_ipv4", iconSize, '1 1 1', 1);
975         }
976
977         iconPos.x += iconSize.x;
978
979         // AES
980         if(crypto > 0)
981                 draw_Picture(iconPos, strcat("icon_aeslevel", ftos(crypto)), iconSize, '1 1 1', 1);
982
983         iconPos.x += iconSize.x;
984
985         // Mod
986         if(modname == "xonotic")
987         {
988                 // Here, pure_available should always be set. If not, consider
989                 // it an impurity.
990                 if(pure_available && pure)
991                         draw_Picture(iconPos, "icon_pure1", iconSize, '1 1 1', 1);
992         }
993         else
994         {
995                 string icon = strcat("icon_mod_", modname);
996                 if(draw_PictureSize(icon) == '0 0 0')
997                         icon = "icon_mod_";
998
999                 // In mods, pure_available not being present indicates
1000                 // non-support of the feature. Just show the mod icon as is
1001                 // then.
1002                 if(pure_available && !pure)
1003                         draw_Picture(iconPos, icon, iconSize, '1 1 1', SKINALPHA_SERVERLIST_ICON_NONPURE);
1004                 else
1005                         draw_Picture(iconPos, icon, iconSize, '1 1 1', 1);
1006         }
1007
1008         iconPos.x += iconSize.x;
1009
1010         // Stats
1011         if(sflags >= 0 && (sflags & SERVERFLAG_PLAYERSTATS))
1012                 draw_Picture(iconPos, "icon_stats1", iconSize, '1 1 1', 1);
1013
1014         if(isFocused && me.mouseOverIcons && !me.tooltip)
1015         {
1016                 string t = "";
1017                 if(me.seenIPv4 && me.seenIPv6)
1018                         t = strcat(t, (isv6) ? "IPv6, " : "IPv4, ");
1019                 t = strcat(t, _("encryption:"), " ", (crypto ? sprintf(_("AES level %d"), crypto) : ZCTX(_("ENC^none"))), ", ");
1020                 t = strcat(t, sprintf(_("mod: %s"), ((modname == "xonotic") ? ZCTX(_("MOD^Default")) : original_modname)));
1021                 if(pure_available)
1022                         t = strcat(t, sprintf(" (%s)", (pure) ? _("official settings") : _("modified settings")));
1023                 t = strcat(t, ", ");
1024                 t = strcat(t, ((sflags >= 0 && (sflags & SERVERFLAG_PLAYERSTATS)) ? _("stats enabled") : _("stats disabled")));
1025                 setZonedTooltip(me, t, string_null);
1026         }
1027         // --------------
1028         //  RENDER TEXT
1029         // --------------
1030
1031         // ping
1032         s = ftos(ping);
1033         draw_Text(me.realUpperMargin * eY + (me.columnPingOrigin + me.columnPingSize - draw_TextWidth(s, 0, me.realFontSize)) * eX, s, me.realFontSize, theColor, theAlpha, 0);
1034
1035         // server name
1036         s = draw_TextShortenToWidth(gethostcachestring(SLIST_FIELD_NAME, i), me.columnNameSize, 0, me.realFontSize);
1037         draw_Text(me.realUpperMargin * eY + me.columnNameOrigin * eX, s, me.realFontSize, theColor, theAlpha, 0);
1038
1039         // server map
1040         s = draw_TextShortenToWidth(gethostcachestring(SLIST_FIELD_MAP, i), me.columnMapSize, 0, me.realFontSize);
1041         draw_Text(me.realUpperMargin * eY + (me.columnMapOrigin + (me.columnMapSize - draw_TextWidth(s, 0, me.realFontSize)) * 0.5) * eX, s, me.realFontSize, theColor, theAlpha, 0);
1042
1043         // server gametype
1044         s = draw_TextShortenToWidth(typestr, me.columnTypeSize, 0, me.realFontSize);
1045         draw_Text(me.realUpperMargin * eY + (me.columnTypeOrigin + (me.columnTypeSize - draw_TextWidth(s, 0, me.realFontSize)) * 0.5) * eX, s, me.realFontSize, theColor, theAlpha, 0);
1046
1047         // server playercount
1048         s = strcat(ftos(gethostcachenumber(SLIST_FIELD_NUMHUMANS, i)), "/", ftos(gethostcachenumber(SLIST_FIELD_MAXPLAYERS, i)));
1049         draw_Text(me.realUpperMargin * eY + (me.columnPlayersOrigin + (me.columnPlayersSize - draw_TextWidth(s, 0, me.realFontSize)) * 0.5) * eX, s, me.realFontSize, theColor, theAlpha, 0);
1050 }
1051
1052 void XonoticServerList_focusedItemChangeNotify(entity me)
1053 {
1054         clearTooltip(me);
1055 }
1056
1057 float XonoticServerList_mouseMove(entity me, vector pos)
1058 {
1059         if(!SUPER(XonoticServerList).mouseMove(me, pos))
1060         {
1061                 me.mouseOverIcons = false;
1062                 clearTooltip(me);
1063                 return 1;
1064         }
1065
1066         me.mouseOverIcons = (pos_x <= me.columnIconsSize);
1067         if(!me.mouseOverIcons)
1068                 clearTooltip(me);
1069         return 1;
1070 }
1071
1072 bool XonoticServerList_keyDown(entity me, int scan, bool ascii, bool shift)
1073 {
1074         if(scan == K_ENTER || scan == K_KP_ENTER)
1075         {
1076                 ServerList_Connect_Click(NULL, me);
1077                 return true;
1078         }
1079         else if(scan == K_MOUSE2 || scan == K_SPACE)
1080         {
1081                 if(me.nItems != 0)
1082                 {
1083                         vector org = boxToGlobal(eY * (me.selectedItem * me.itemHeight - me.scrollPos), me.origin, me.size);
1084                         vector sz = boxToGlobalSize(eY * me.itemHeight + eX * (1 - me.controlWidth), me.size);
1085                         m_play_click_sound(MENU_SOUND_OPEN);
1086                         main.serverInfoDialog.loadServerInfo(main.serverInfoDialog, me.selectedItem);
1087                         DialogOpenButton_Click_withCoords(me, main.serverInfoDialog, org, sz);
1088                         return true;
1089                 }
1090                 return false;
1091         }
1092         else if(scan == K_INS || scan == K_MOUSE3 || scan == K_KP_INS)
1093         {
1094                 if(me.nItems != 0)
1095                 {
1096                         me.toggleFavorite(me, me.selectedServer);
1097                         me.ipAddressBoxFocused = -1;
1098                         return true;
1099                 }
1100                 return false;
1101         }
1102         else if(SUPER(XonoticServerList).keyDown(me, scan, ascii, shift))
1103                 return true;
1104         else if(!me.controlledTextbox)
1105                 return false;
1106         else
1107                 return me.controlledTextbox.keyDown(me.controlledTextbox, scan, ascii, shift);
1108 }
1109
1110 float XonoticServerList_getTotalHeight(entity me)
1111 {
1112         float num_normal_rows = me.nItems;
1113         int num_headers = category_draw_count;
1114         return me.itemHeight * (num_normal_rows + me.categoriesHeight * num_headers);
1115 }
1116 int XonoticServerList_getItemAtPos(entity me, float pos)
1117 {
1118         pos = pos / me.itemHeight;
1119         for (int i = category_draw_count - 1; i >= 0; --i) {
1120                 int itemidx = category_item[i];
1121                 float itempos = i * me.categoriesHeight + category_item[i];
1122                 if (pos >= itempos + me.categoriesHeight + 1)
1123                         return itemidx + 1 + floor(pos - (itempos + me.categoriesHeight + 1));
1124                 if (pos >= itempos)
1125                         return itemidx;
1126         }
1127         // No category matches? Note that category 0 is... 0. Therefore no headings exist at all.
1128         return floor(pos);
1129 }
1130 float XonoticServerList_getItemStart(entity me, int item)
1131 {
1132         for (int i = category_draw_count - 1; i >= 0; --i) {
1133                 int itemidx = category_item[i];
1134                 float itempos = i * me.categoriesHeight + category_item[i];
1135                 if (item >= itemidx + 1)
1136                         return (itempos + me.categoriesHeight + 1 + item - (itemidx + 1)) * me.itemHeight;
1137                 if (item >= itemidx)
1138                         return itempos * me.itemHeight;
1139         }
1140         // No category matches? Note that category 0 is... 0. Therefore no headings exist at all.
1141         return item * me.itemHeight;
1142 }
1143 float XonoticServerList_getItemHeight(entity me, int item)
1144 {
1145         for (int i = 0; i < category_draw_count; ++i) {
1146                 // Matches exactly the headings with increased height.
1147                 if (item == category_item[i])
1148                         return me.itemHeight * (me.categoriesHeight + 1);
1149         }
1150         return me.itemHeight;
1151 }