]> de.git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blob - qcsrc/client/miscfunctions.qc
Merge branch 'master' into TimePath/debug_draw
[xonotic/xonotic-data.pk3dir.git] / qcsrc / client / miscfunctions.qc
1 #include "miscfunctions.qh"
2
3 #include "hud.qh"
4
5 #include "../common/command/generic.qh"
6
7 #include "../common/teams.qh"
8
9 #include "../lib/csqcmodel/cl_model.qh"
10
11
12 void AuditLists()
13 {
14         entity e;
15         entity prev;
16
17         prev = players;
18         for(e = prev.sort_next; e; prev = e, e = e.sort_next)
19         {
20                 if(prev != e.sort_prev)
21                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));
22         }
23
24         prev = teams;
25         for(e = prev.sort_next; e; prev = e, e = e.sort_next)
26         {
27                 if(prev != e.sort_prev)
28                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));
29         }
30 }
31
32
33 float RegisterPlayer(entity player)
34 {
35         entity pl;
36         AuditLists();
37         for(pl = players.sort_next; pl; pl = pl.sort_next)
38                 if(pl == player)
39                         error("Player already registered!");
40         player.sort_next = players.sort_next;
41         player.sort_prev = players;
42         if(players.sort_next)
43                 players.sort_next.sort_prev = player;
44         players.sort_next = player;
45         AuditLists();
46         return true;
47 }
48
49 void RemovePlayer(entity player)
50 {
51         entity pl, parent;
52         AuditLists();
53         parent = players;
54         for(pl = players.sort_next; pl && pl != player; pl = pl.sort_next)
55                 parent = pl;
56
57         if(!pl)
58         {
59                 error("Trying to remove a player which is not in the playerlist!");
60                 return;
61         }
62         parent.sort_next = player.sort_next;
63         if(player.sort_next)
64                 player.sort_next.sort_prev = parent;
65         AuditLists();
66 }
67
68 void MoveToLast(entity e)
69 {
70         AuditLists();
71         other = e.sort_next;
72         while(other)
73         {
74                 SORT_SWAP(other, e);
75                 other = e.sort_next;
76         }
77         AuditLists();
78 }
79
80 float RegisterTeam(entity Team)
81 {
82         entity tm;
83         AuditLists();
84         for(tm = teams.sort_next; tm; tm = tm.sort_next)
85                 if(tm == Team)
86                         error("Team already registered!");
87         Team.sort_next = teams.sort_next;
88         Team.sort_prev = teams;
89         if(teams.sort_next)
90                 teams.sort_next.sort_prev = Team;
91         teams.sort_next = Team;
92         if(Team.team && Team.team != NUM_SPECTATOR)
93                 ++team_count;
94         AuditLists();
95         return true;
96 }
97
98 void RemoveTeam(entity Team)
99 {
100         entity tm, parent;
101         AuditLists();
102         parent = teams;
103         for(tm = teams.sort_next; tm && tm != Team; tm = tm.sort_next)
104                 parent = tm;
105
106         if(!tm)
107         {
108                 LOG_INFO(_("Trying to remove a team which is not in the teamlist!"));
109                 return;
110         }
111         parent.sort_next = Team.sort_next;
112         if(Team.sort_next)
113                 Team.sort_next.sort_prev = parent;
114         if(Team.team && Team.team != NUM_SPECTATOR)
115                 --team_count;
116         AuditLists();
117 }
118
119 entity GetTeam(int Team, bool add)
120 {
121         int num = (Team == NUM_SPECTATOR) ? 16 : Team;
122         if(teamslots[num])
123                 return teamslots[num];
124         if (!add)
125                 return world;
126         entity tm = new(team);
127         make_pure(tm);
128         tm.team = Team;
129         teamslots[num] = tm;
130         RegisterTeam(tm);
131         return tm;
132 }
133
134 vector HUD_GetFontsize(string cvarname)
135 {
136         vector v;
137         v = stov(cvar_string(cvarname));
138         if(v.x == 0)
139                 v = '8 8 0';
140         if(v.y == 0)
141                 v.y = v.x;
142         v.z = 0;
143         return v;
144 }
145
146 float PreviewExists(string name)
147 {
148         if(autocvar_cl_readpicture_force)
149                 return false;
150
151         if (fexists(strcat(name, ".tga"))) return true;
152         if (fexists(strcat(name, ".png"))) return true;
153         if (fexists(strcat(name, ".jpg"))) return true;
154         if (fexists(strcat(name, ".pcx"))) return true;
155
156         return false;
157 }
158
159 vector rotate(vector v, float a)
160 {
161         vector w = '0 0 0';
162         // FTEQCC SUCKS AGAIN
163         w.x =      v.x * cos(a) + v.y * sin(a);
164         w.y = -1 * v.x * sin(a) + v.y * cos(a);
165         return w;
166 }
167
168 // decolorizes and team colors the player name when needed
169 string playername(string thename, float teamid)
170 {
171     string t;
172     if (teamplay)
173     {
174         t = Team_ColorCode(teamid);
175         return strcat(t, strdecolorize(thename));
176     }
177     else
178         return strdecolorize(thename);
179 }
180
181 float cvar_or(string cv, float v)
182 {
183         string s;
184         s = cvar_string(cv);
185         if(s == "")
186                 return v;
187         else
188                 return stof(s);
189 }
190
191 vector project_3d_to_2d(vector vec)
192 {
193         vec = cs_project(vec);
194         if(cs_project_is_b0rked > 0)
195         {
196                 vec.x *= vid_conwidth / vid_width;
197                 vec.y *= vid_conheight / vid_height;
198         }
199         return vec;
200 }
201
202 void dummyfunction(float a1, float a2, float a3, float a4, float a5, float a6, float a7, float a8)
203 {
204 }
205
206 float expandingbox_sizefactor_from_fadelerp(float fadelerp)
207 {
208         return 1.2 / (1.2 - fadelerp);
209 }
210
211 vector expandingbox_resize_centered_box_offset(float sz, vector boxsize, float boxxsizefactor)
212 {
213         boxsize.x *= boxxsizefactor; // easier interface for text
214         return boxsize * (0.5 * (1 - sz));
215 }
216
217 void drawborderlines(float thickness, vector pos, vector dim, vector color, float theAlpha, float drawflag)
218 {
219         vector line_dim = '0 0 0';
220
221         // left and right lines
222         pos.x -= thickness;
223         line_dim.x = thickness;
224         line_dim.y = dim.y;
225         drawfill(pos, line_dim, color, theAlpha, drawflag);
226         drawfill(pos + (dim.x + thickness) * '1 0 0', line_dim, color, theAlpha, drawflag);
227
228         // upper and lower lines
229         pos.y -= thickness;
230         line_dim.x = dim.x + thickness * 2; // make upper and lower lines longer
231         line_dim.y = thickness;
232         drawfill(pos, line_dim, color, theAlpha, drawflag);
233         drawfill(pos + (dim.y + thickness) * '0 1 0', line_dim, color, theAlpha, drawflag);
234 }
235
236 void drawpic_tiled(vector pos, string pic, vector sz, vector area, vector color, float theAlpha, float drawflag)
237 {
238         vector current_pos = '0 0 0', end_pos, new_size = '0 0 0', ratio = '0 0 0';
239         end_pos = pos + area;
240
241         current_pos.y = pos.y;
242         while (current_pos.y < end_pos.y)
243         {
244                 current_pos.x = pos.x;
245                 while (current_pos.x < end_pos.x)
246                 {
247                         new_size.x = min(sz.x, end_pos.x - current_pos.x);
248                         new_size.y = min(sz.y, end_pos.y - current_pos.y);
249                         ratio.x = new_size.x / sz.x;
250                         ratio.y = new_size.y / sz.y;
251                         drawsubpic(current_pos, new_size, pic, '0 0 0', ratio, color, theAlpha, drawflag);
252                         current_pos.x += sz.x;
253                 }
254                 current_pos.y += sz.y;
255         }
256 }
257
258 void drawpic_aspect_skin_expanding(vector position, string pic, vector theScale, vector rgb, float theAlpha, float flag, float fadelerp)
259 {
260         float sz;
261         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
262
263         drawpic_aspect_skin(position + expandingbox_resize_centered_box_offset(sz, theScale, 1), pic, theScale * sz, rgb, theAlpha * (1 - fadelerp), flag);
264 }
265
266 void drawpic_aspect_skin_expanding_two(vector position, string pic, vector theScale, vector rgb, float theAlpha, float flag, float fadelerp)
267 {
268         drawpic_aspect_skin_expanding(position, pic, theScale, rgb, theAlpha, flag, fadelerp);
269         drawpic_skin(position, pic, theScale, rgb, theAlpha * fadelerp, flag);
270 }
271
272 // drawstring wrapper to draw a string as large as possible with preserved aspect ratio into a box
273 void drawstring_aspect(vector pos, string text, vector sz, vector color, float theAlpha, float drawflag) {
274         SET_POS_AND_SZ_Y_ASPECT(false);
275         drawstring(pos, text, '1 1 0' * sz.y, color, theAlpha, drawflag);
276 }
277
278 // drawstring wrapper to draw a colorcodedstring as large as possible with preserved aspect ratio into a box
279 void drawcolorcodedstring_aspect(vector pos, string text, vector sz, float theAlpha, float drawflag) {
280         SET_POS_AND_SZ_Y_ASPECT(true);
281         drawcolorcodedstring(pos, text, '1 1 0' * sz.y, theAlpha, drawflag);
282 }
283
284 void drawstring_expanding(vector position, string text, vector theScale, vector rgb, float theAlpha, float flag, float fadelerp)
285 {
286         float sz;
287         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
288
289         drawfontscale = sz * '1 1 0';
290         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);
291         drawstring(position + expandingbox_resize_centered_box_offset(sz, theScale, stringwidth(text, false, theScale * (sz / drawfontscale.x)) / (theScale.x * sz)), text, theScale * (sz / drawfontscale.x), rgb, theAlpha * (1 - fadelerp), flag);
292         // width parameter:
293         //    (scale_x * sz / drawfontscale_x) * drawfontscale_x * SIZE1 / (scale_x * sz)
294         //    SIZE1
295         drawfontscale = '1 1 0';
296 }
297
298 // drawstring wrapper to draw a string as large as possible with preserved aspect ratio into a box
299 void drawstring_aspect_expanding(vector pos, string text, vector sz, vector color, float theAlpha, float drawflag, float fadelerp) {
300         SET_POS_AND_SZ_Y_ASPECT(false);
301         drawstring_expanding(pos, text, '1 1 0' * sz.y, color, theAlpha, drawflag, fadelerp);
302 }
303
304 void drawcolorcodedstring_expanding(vector position, string text, vector theScale, float theAlpha, float flag, float fadelerp)
305 {
306         float sz;
307         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
308
309         drawfontscale = sz * '1 1 0';
310         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);
311         drawcolorcodedstring(position + expandingbox_resize_centered_box_offset(sz, theScale, stringwidth(text, true, theScale * (sz / drawfontscale.x)) / (theScale.x * sz)), text, theScale * (sz / drawfontscale.x), theAlpha * (1 - fadelerp), flag);
312         drawfontscale = '1 1 0';
313 }
314
315 void drawcolorcodedstring_aspect_expanding(vector pos, string text, vector sz, float theAlpha, float drawflag, float fadelerp) {
316         SET_POS_AND_SZ_Y_ASPECT(true);
317         drawcolorcodedstring_expanding(pos, text, '1 1 0' * sz.y, theAlpha, drawflag, fadelerp);
318 }
319
320 // this draws the triangles of a model DIRECTLY. Don't expect high performance, really...
321 float PolyDrawModelSurface(entity e, float i_s)
322 {
323         float i_t;
324         float n_t;
325         vector tri;
326         string tex;
327         tex = getsurfacetexture(e, i_s);
328         if (!tex)
329                 return 0; // this is beyond the last one
330         n_t = getsurfacenumtriangles(e, i_s);
331         for(i_t = 0; i_t < n_t; ++i_t)
332         {
333                 tri = getsurfacetriangle(e, i_s, i_t);
334                 R_BeginPolygon(tex, 0);
335                 R_PolygonVertex(getsurfacepoint(e, i_s, tri.x), getsurfacepointattribute(e, i_s, tri.x, SPA_TEXCOORDS0), '1 1 1', 1);
336                 R_PolygonVertex(getsurfacepoint(e, i_s, tri.y), getsurfacepointattribute(e, i_s, tri.y, SPA_TEXCOORDS0), '1 1 1', 1);
337                 R_PolygonVertex(getsurfacepoint(e, i_s, tri.z), getsurfacepointattribute(e, i_s, tri.z, SPA_TEXCOORDS0), '1 1 1', 1);
338                 R_EndPolygon();
339         }
340         return 1;
341 }
342 void PolyDrawModel(entity e)
343 {
344         float i_s;
345         for(i_s = 0; ; ++i_s)
346                 if(!PolyDrawModelSurface(e, i_s))
347                         break;
348 }
349
350 void DrawCircleClippedPic(vector centre, float radi, string pic, float f, vector rgb, float a, float drawflag)
351 {
352         float x, y, q, d;
353         vector ringsize, v, t;
354         ringsize = radi * '1 1 0';
355
356         x = cos(f * 2 * M_PI);
357         y = sin(f * 2 * M_PI);
358         q = fabs(x) + fabs(y);
359         x /= q;
360         y /= q;
361
362         if(f >= 1)
363         {
364                 // draw full rectangle
365                 R_BeginPolygon(pic, drawflag);
366                         v = centre;                     t = '0.5 0.5 0';
367                         v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
368                         R_PolygonVertex(v, t, rgb, a);
369
370                         v = centre;                     t = '0.5 0.5 0';
371                         v.y += 0.5 * ringsize.y;        t += '0.5 -0.5 0';
372                         R_PolygonVertex(v, t, rgb, a);
373
374                         v = centre;                     t = '0.5 0.5 0';
375                         v.x -= 0.5 * ringsize.x;        t -= '0.5 0.5 0';
376                         R_PolygonVertex(v, t, rgb, a);
377
378                         v = centre;                     t = '0.5 0.5 0';
379                         v.y -= 0.5 * ringsize.y;        t -= '0.5 -0.5 0';
380                         R_PolygonVertex(v, t, rgb, a);
381                 R_EndPolygon();
382
383                 d = q - 1;
384                 if(d > 0)
385                 {
386                         R_BeginPolygon(pic, drawflag);
387                                 v = centre;                     t = '0.5 0.5 0';
388                                 R_PolygonVertex(v, t, rgb, a);
389
390                                 v = centre;                     t = '0.5 0.5 0';
391                                 v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
392                                 R_PolygonVertex(v, t, rgb, a);
393                 }
394         }
395         else if(f > 0.75)
396         {
397                 // draw upper and first triangle
398                 R_BeginPolygon(pic, drawflag);
399                         v = centre;                     t = '0.5 0.5 0';
400                         v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
401                         R_PolygonVertex(v, t, rgb, a);
402
403                         v = centre;                     t = '0.5 0.5 0';
404                         v.y += 0.5 * ringsize.y;        t += '0.5 -0.5 0';
405                         R_PolygonVertex(v, t, rgb, a);
406
407                         v = centre;                     t = '0.5 0.5 0';
408                         v.x -= 0.5 * ringsize.x;        t -= '0.5 0.5 0';
409                         R_PolygonVertex(v, t, rgb, a);
410                 R_EndPolygon();
411                 R_BeginPolygon(pic, drawflag);
412                         v = centre;                     t = '0.5 0.5 0';
413                         R_PolygonVertex(v, t, rgb, a);
414
415                         v = centre;                     t = '0.5 0.5 0';
416                         v.x -= 0.5 * ringsize.x;        t -= '0.5 0.5 0';
417                         R_PolygonVertex(v, t, rgb, a);
418
419                         v = centre;                     t = '0.5 0.5 0';
420                         v.y -= 0.5 * ringsize.y;        t -= '0.5 -0.5 0';
421                         R_PolygonVertex(v, t, rgb, a);
422
423                 d = q - 0.75;
424                 if(d <= 0)
425                         R_EndPolygon();
426         }
427         else if(f > 0.5)
428         {
429                 // draw upper triangle
430                 R_BeginPolygon(pic, drawflag);
431                         v = centre;                     t = '0.5 0.5 0';
432                         v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
433                         R_PolygonVertex(v, t, rgb, a);
434
435                         v = centre;                     t = '0.5 0.5 0';
436                         v.y += 0.5 * ringsize.y;        t += '0.5 -0.5 0';
437                         R_PolygonVertex(v, t, rgb, a);
438
439                         v = centre;                     t = '0.5 0.5 0';
440                         v.x -= 0.5 * ringsize.x;        t -= '0.5 0.5 0';
441                         R_PolygonVertex(v, t, rgb, a);
442                 R_EndPolygon();
443
444                 d = q - 0.5;
445                 if(d > 0)
446                 {
447                         R_BeginPolygon(pic, drawflag);
448                                 v = centre;                     t = '0.5 0.5 0';
449                                 R_PolygonVertex(v, t, rgb, a);
450
451                                 v = centre;                     t = '0.5 0.5 0';
452                                 v.x -= 0.5 * ringsize.x;        t -= '0.5 0.5 0';
453                                 R_PolygonVertex(v, t, rgb, a);
454                 }
455         }
456         else if(f > 0.25)
457         {
458                 // draw first triangle
459                 R_BeginPolygon(pic, drawflag);
460                         v = centre;                     t = '0.5 0.5 0';
461                         R_PolygonVertex(v, t, rgb, a);
462
463                         v = centre;                     t = '0.5 0.5 0';
464                         v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
465                         R_PolygonVertex(v, t, rgb, a);
466
467                         v = centre;                     t = '0.5 0.5 0';
468                         v.y += 0.5 * ringsize.y;        t += '0.5 -0.5 0';
469                         R_PolygonVertex(v, t, rgb, a);
470
471                 d = q - 0.25;
472                 if(d <= 0)
473                         R_EndPolygon();
474         }
475         else
476         {
477                 d = q;
478                 if(d > 0)
479                 {
480                         R_BeginPolygon(pic, drawflag);
481                                 v = centre;                     t = '0.5 0.5 0';
482                                 R_PolygonVertex(v, t, rgb, a);
483
484                                 v = centre;                     t = '0.5 0.5 0';
485                                 v.x += 0.5 * ringsize.x;        t += '0.5 0.5 0';
486                                 R_PolygonVertex(v, t, rgb, a);
487                 }
488         }
489
490         if(d > 0)
491         {
492                         v = centre;                     t = '0.5 0.5 0';
493                         v.x += x * 0.5 * ringsize.x;    t += x * '0.5 0.5 0';
494                         v.y += y * 0.5 * ringsize.y;    t += y * '0.5 -0.5 0';
495                         R_PolygonVertex(v, t, rgb, a);
496                 R_EndPolygon();
497         }
498 }
499
500 vector getplayerorigin(int pl)
501 {
502         entity e;
503
504         e = CSQCModel_server2csqc(pl + 1);
505         if(e)
506                 return e.origin;
507
508         e = entcs_receiver[pl];
509         if(e)
510                 return e.origin;
511
512         return GETPLAYERORIGIN_ERROR;
513 }
514
515 float getplayeralpha(float pl)
516 {
517         entity e;
518
519         e = CSQCModel_server2csqc(pl + 1);
520         if(e)
521                 return e.alpha;
522
523         return 1;
524 }
525
526 vector getcsqcplayercolor(float pl)
527 {
528         entity e;
529
530         e = CSQCModel_server2csqc(pl);
531         if(e)
532         {
533                 if(e.colormap > 0)
534                         return colormapPaletteColor(((e.colormap >= 1024) ? e.colormap : stof(getplayerkeyvalue(e.colormap - 1, "colors"))) & 0x0F, true);
535         }
536
537         return '1 1 1';
538 }
539
540 float getplayerisdead(float pl)
541 {
542         entity e;
543
544         e = CSQCModel_server2csqc(pl + 1);
545         if(e)
546                 return e.csqcmodel_isdead;
547
548         return false;
549 }
550
551 void URI_Get_Callback(int id, float status, string data)
552 {
553         if(url_URI_Get_Callback(id, status, data))
554         {
555                 // handled
556         }
557         else if (id == URI_GET_DISCARD)
558         {
559                 // discard
560         }
561         else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
562         {
563                 // sv_cmd curl
564                 Curl_URI_Get_Callback(id, status, data);
565         }
566         else
567         {
568                 LOG_INFOF("Received HTTP request data for an invalid id %d.\n", id);
569         }
570 }
571
572 void draw_beginBoldFont()
573 {
574         drawfont = FONT_USER+2;
575 }
576
577 void draw_endBoldFont()
578 {
579         drawfont = FONT_USER+1;
580 }
581
582 void Accuracy_LoadLevels()
583 {
584         if(autocvar_accuracy_color_levels != acc_color_levels)
585         {
586                 if(acc_color_levels)
587                         strunzone(acc_color_levels);
588                 acc_color_levels = strzone(autocvar_accuracy_color_levels);
589                 acc_levels = tokenize_console(acc_color_levels);
590                 if(acc_levels > MAX_ACCURACY_LEVELS)
591                         acc_levels = MAX_ACCURACY_LEVELS;
592                 if(acc_levels < 2)
593                         LOG_INFO("Warning: accuracy_color_levels must contain at least 2 values\n");
594
595                 int i;
596                 for(i = 0; i < acc_levels; ++i)
597                         acc_lev[i] = stof(argv(i)) / 100.0;
598         }
599 }
600
601 void Accuracy_LoadColors()
602 {
603         if(time > acc_col_loadtime)
604         if(acc_levels >= 2)
605         {
606                 int i;
607                 for(i = 0; i < acc_levels; ++i)
608                         acc_col[i] = stov(cvar_string(strcat("accuracy_color", ftos(i))));
609                 acc_col_loadtime = time + 2;
610         }
611 }
612
613 vector Accuracy_GetColor(float accuracy)
614 {
615         float factor;
616         vector color;
617         if(acc_levels < 2)
618                 return '0 0 0'; // return black, can't determine the right color
619
620         // find the max level lower than acc
621         int j = acc_levels-1;
622         while(j && accuracy < acc_lev[j])
623                 --j;
624
625         // inject color j+1 in color j, how much depending on how much accuracy is higher than level j
626         factor = (accuracy - acc_lev[j]) / (acc_lev[j+1] - acc_lev[j]);
627         color = acc_col[j];
628         color = color + factor * (acc_col[j+1] - color);
629         return color;
630 }
631