]> de.git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blob - qcsrc/server/bot/default/waypoints.qc
Bot waypoints: "wpeditor spawn crosshair" can now detect existing waypoints making...
[xonotic/xonotic-data.pk3dir.git] / qcsrc / server / bot / default / waypoints.qc
1 #include "waypoints.qh"
2
3 #include <server/defs.qh>
4 #include <server/miscfunctions.qh>
5 #include "cvars.qh"
6
7 #include "bot.qh"
8 #include "navigation.qh"
9
10 #include <common/state.qh>
11
12 #include "../../antilag.qh"
13
14 #include <common/constants.qh>
15 #include <common/debug.qh>
16 #include <common/mapobjects/trigger/jumppads.qh>
17 #include <common/net_linked.qh>
18 #include <common/physics/player.qh>
19
20 #include <lib/warpzone/common.qh>
21 #include <lib/warpzone/util_server.qh>
22
23 .entity spawnpointmodel;
24 void waypoint_unreachable(entity pl)
25 {
26         IL_EACH(g_waypoints, true,
27         {
28                 it.colormod = '0.5 0.5 0.5';
29                 it.effects &= ~(EF_NODEPTHTEST | EF_RED | EF_BLUE);
30         });
31
32         entity e2 = navigation_findnearestwaypoint(pl, false);
33         if(!e2)
34         {
35                 LOG_INFO("Can't find any waypoint nearby\n");
36                 return;
37         }
38
39         navigation_markroutes(pl, e2);
40
41         int j = 0;
42         int m = 0;
43         IL_EACH(g_waypoints, it.wpcost >= 10000000,
44         {
45                 LOG_INFO("unreachable: ", etos(it), " ", vtos(it.origin), "\n");
46                 it.colormod_z = 8;
47                 it.effects |= EF_NODEPTHTEST | EF_BLUE;
48                 j++;
49                 m++;
50         });
51         if (j) LOG_INFOF("%d waypoints cannot be reached from here in any way (marked with blue light)\n", j);
52         navigation_markroutes_inverted(e2);
53
54         j = 0;
55         IL_EACH(g_waypoints, it.wpcost >= 10000000,
56         {
57                 LOG_INFO("cannot reach me: ", etos(it), " ", vtos(it.origin), "\n");
58                 it.colormod_x = 8;
59                 if (!(it.effects & EF_NODEPTHTEST))  // not already reported before
60                         m++;
61                 it.effects |= EF_NODEPTHTEST | EF_RED;
62                 j++;
63         });
64         if (j) LOG_INFOF("%d waypoints cannot walk to here in any way (marked with red light)\n", j);
65         if (m) LOG_INFOF("%d waypoints have been marked total\n", m);
66
67         j = 0;
68         IL_EACH(g_spawnpoints, true,
69         {
70                 if (navigation_findnearestwaypoint(it, false))
71                 {
72                         if(it.spawnpointmodel)
73                         {
74                                 delete(it.spawnpointmodel);
75                                 it.spawnpointmodel = NULL;
76                         }
77                 }
78                 else
79                 {
80                         if(!it.spawnpointmodel)
81                         {
82                                 tracebox(it.origin, PL_MIN_CONST, PL_MAX_CONST, it.origin - '0 0 512', MOVE_NOMONSTERS, NULL);
83                                 entity e = new(spawnpointmodel);
84                                 vector org = trace_endpos + eZ;
85                                 setorigin(e, org);
86                                 e.solid = SOLID_TRIGGER;
87                                 it.spawnpointmodel = e;
88                         }
89                         LOG_INFO("spawn without waypoint: ", etos(it), " ", vtos(it.origin), "\n");
90                         it.spawnpointmodel.effects |= EF_NODEPTHTEST;
91                         _setmodel(it.spawnpointmodel, pl.model);
92                         it.spawnpointmodel.frame = pl.frame;
93                         it.spawnpointmodel.skin = pl.skin;
94                         it.spawnpointmodel.colormap = pl.colormap;
95                         it.spawnpointmodel.colormod = pl.colormod;
96                         it.spawnpointmodel.glowmod = pl.glowmod;
97                         setsize(it.spawnpointmodel, PL_MIN_CONST, PL_MAX_CONST);
98                         j++;
99                 }
100         });
101         if (j) LOG_INFOF("%d spawnpoints have no nearest waypoint (marked by player model)\n", j);
102
103         j = 0;
104         IL_EACH(g_items, true,
105         {
106                 it.effects &= ~(EF_NODEPTHTEST | EF_RED | EF_BLUE);
107                 it.colormod = '0.5 0.5 0.5';
108         });
109         IL_EACH(g_items, true,
110         {
111                 if (navigation_findnearestwaypoint(it, false))
112                         continue;
113                 LOG_INFO("item without waypoint: ", etos(it), " ", vtos(it.origin), "\n");
114                 it.effects |= EF_NODEPTHTEST | EF_RED;
115                 it.colormod_x = 8;
116                 j++;
117         });
118         if (j) LOG_INFOF("%d items have no nearest waypoint and cannot be walked away from (marked with red light)\n", j);
119
120         j = 0;
121         IL_EACH(g_items, true,
122         {
123                 if (navigation_findnearestwaypoint(it, true))
124                         continue;
125                 LOG_INFO("item without waypoint: ", etos(it), " ", vtos(it.origin), "\n");
126                 it.effects |= EF_NODEPTHTEST | EF_BLUE;
127                 it.colormod_z = 8;
128                 j++;
129         });
130         if (j) LOG_INFOF("%d items have no nearest waypoint and cannot be walked to (marked with blue light)\n", j);
131 }
132
133 void waypoint_getSymmetricalAxis_cmd(entity caller, bool save, int arg_idx)
134 {
135         vector v1 = stov(argv(arg_idx++));
136         vector v2 = stov(argv(arg_idx++));
137         vector mid = (v1 + v2) / 2;
138
139         float diffy = (v2.y - v1.y);
140         float diffx = (v2.x - v1.x);
141         if (v1.y == v2.y)
142                 diffy = 0.000001;
143         if (v1.x == v2.x)
144                 diffx = 0.000001;
145         float m = - diffx / diffy;
146         float q = - m * mid.x + mid.y;
147         if (fabs(m) <= 0.000001) m = 0;
148         if (fabs(q) <= 0.000001) q = 0;
149
150         string axis_str =  strcat(ftos(m), " ", ftos(q));
151         if (save)
152                 cvar_set("g_waypointeditor_symmetrical_axis", axis_str);
153         axis_str = strcat("\"", axis_str, "\"");
154         sprint(caller, strcat("Axis of symmetry based on input points: ", axis_str, "\n"));
155         if (save)
156                 sprint(caller, sprintf(" ^3saved to %s\n", "g_waypointeditor_symmetrical_axis"));
157         if (save)
158         {
159                 cvar_set("g_waypointeditor_symmetrical", "-2");
160                 sprint(caller, strcat("g_waypointeditor_symmetrical", " has been set to ",
161                         cvar_string("g_waypointeditor_symmetrical"), "\n"));
162         }
163 }
164
165 void waypoint_getSymmetricalOrigin_cmd(entity caller, bool save, int arg_idx)
166 {
167         vector org = '0 0 0';
168         int ctf_flags = 0;
169         for (int i = 0; i < 6; i++)
170         {
171                 if (argv(arg_idx + i) != "")
172                         ctf_flags++;
173         }
174         if (ctf_flags < 2)
175         {
176                 ctf_flags = 0;
177                 org = vec2(havocbot_middlepoint);
178                 if (argv(arg_idx) != "")
179                         sprint(caller, "WARNING: Ignoring single input point\n");
180                 if (havocbot_middlepoint_radius == 0)
181                 {
182                         sprint(caller, "Origin of symmetry can't be automatically determined\n");
183                         return;
184                 }
185         }
186         else
187         {
188                 vector v1, v2, v3, v4, v5, v6;
189                 for (int i = 1; i <= ctf_flags; i++)
190                 {
191                         if (i == 1) { v1 = stov(argv(arg_idx++)); org = v1 / ctf_flags; }
192                         else if (i == 2) { v2 = stov(argv(arg_idx++)); org += v2 / ctf_flags; }
193                         else if (i == 3) { v3 = stov(argv(arg_idx++)); org += v3 / ctf_flags; }
194                         else if (i == 4) { v4 = stov(argv(arg_idx++)); org += v4 / ctf_flags; }
195                         else if (i == 5) { v5 = stov(argv(arg_idx++)); org += v5 / ctf_flags; }
196                         else if (i == 6) { v6 = stov(argv(arg_idx++)); org += v6 / ctf_flags; }
197                 }
198         }
199
200         if (fabs(org.x) <= 0.000001) org.x = 0;
201         if (fabs(org.y) <= 0.000001) org.y = 0;
202         string org_str = strcat(ftos(org.x), " ", ftos(org.y));
203         if (save)
204         {
205                 cvar_set("g_waypointeditor_symmetrical_origin", org_str);
206                 cvar_set("g_waypointeditor_symmetrical_order", ftos(ctf_flags));
207         }
208         org_str = strcat("\"", org_str, "\"");
209
210         if (ctf_flags < 2)
211                 sprint(caller, strcat("Origin of symmetry based on flag positions: ", org_str, "\n"));
212         else
213                 sprint(caller, strcat("Origin of symmetry based on input points: ", org_str, "\n"));
214         if (save)
215                 sprint(caller, sprintf(" ^3saved to %s\n", "g_waypointeditor_symmetrical_origin"));
216
217         if (ctf_flags < 2)
218                 sprint(caller, "Order of symmetry: 0 (autodetected)\n");
219         else
220                 sprint(caller, strcat("Order of symmetry: ", ftos(ctf_flags), "\n"));
221         if (save)
222                 sprint(caller, sprintf(" ^3saved to %s\n", "g_waypointeditor_symmetrical_order"));
223
224         if (save)
225         {
226                 if (ctf_flags < 2)
227                         cvar_set("g_waypointeditor_symmetrical", "0");
228                 else
229                         cvar_set("g_waypointeditor_symmetrical", "-1");
230                 sprint(caller, strcat("g_waypointeditor_symmetrical", " has been set to ",
231                         cvar_string("g_waypointeditor_symmetrical"), "\n"));
232         }
233 }
234
235 vector waypoint_getSymmetricalPoint(vector org, int ctf_flags)
236 {
237         vector new_org = org;
238         if (fabs(autocvar_g_waypointeditor_symmetrical) == 1)
239         {
240                 vector map_center = havocbot_middlepoint;
241                 if (autocvar_g_waypointeditor_symmetrical == -1)
242                         map_center = autocvar_g_waypointeditor_symmetrical_origin;
243
244                 new_org = Rotate(org - map_center, 360 * DEG2RAD / ctf_flags) + map_center;
245         }
246         else if (fabs(autocvar_g_waypointeditor_symmetrical) == 2)
247         {
248                 float m = havocbot_symmetry_axis_m;
249                 float q = havocbot_symmetry_axis_q;
250                 if (autocvar_g_waypointeditor_symmetrical == -2)
251                 {
252                         m = autocvar_g_waypointeditor_symmetrical_axis.x;
253                         q = autocvar_g_waypointeditor_symmetrical_axis.y;
254                 }
255
256                 new_org.x = (1 / (1 + m*m)) * ((1 - m*m) * org.x + 2 * m * org.y - 2 * m * q);
257                 new_org.y = (1 / (1 + m*m)) * (2 * m * org.x + (m*m - 1) * org.y + 2 * q);
258         }
259         new_org.z = org.z;
260         return new_org;
261 }
262
263 bool waypoint_has_hardwiredlinks(entity wp)
264 {
265         if (!wp)
266                 return false;
267         return (wp.wphw00 != NULL);
268 }
269
270 bool waypoint_is_hardwiredlink(entity wp_from, entity wp_to)
271 {
272         if (!(wp_from && wp_to))
273                 return false;
274
275         if (!wp_from.wphw00) return false; else if (wp_from.wphw00 == wp_to) return true;
276         if (!wp_from.wphw01) return false; else if (wp_from.wphw01 == wp_to) return true;
277         if (!wp_from.wphw02) return false; else if (wp_from.wphw02 == wp_to) return true;
278         if (!wp_from.wphw03) return false; else if (wp_from.wphw03 == wp_to) return true;
279         if (!wp_from.wphw04) return false; else if (wp_from.wphw04 == wp_to) return true;
280         if (!wp_from.wphw05) return false; else if (wp_from.wphw05 == wp_to) return true;
281         if (!wp_from.wphw06) return false; else if (wp_from.wphw06 == wp_to) return true;
282         if (!wp_from.wphw07) return false; else if (wp_from.wphw07 == wp_to) return true;
283
284         return false;
285 }
286
287 void waypoint_setupmodel(entity wp);
288 void waypoint_mark_hardwiredlink(entity wp_from, entity wp_to)
289 {
290         if (!(wp_from && wp_to))
291                 return;
292
293         if (!wp_from.wphw00 || wp_from.wphw00 == wp_to) { wp_from.wphw00 = wp_to; waypoint_setupmodel(wp_from); return; }
294         if (!wp_from.wphw01 || wp_from.wphw01 == wp_to) { wp_from.wphw01 = wp_to; return; }
295         if (!wp_from.wphw02 || wp_from.wphw02 == wp_to) { wp_from.wphw02 = wp_to; return; }
296         if (!wp_from.wphw03 || wp_from.wphw03 == wp_to) { wp_from.wphw03 = wp_to; return; }
297         if (!wp_from.wphw04 || wp_from.wphw04 == wp_to) { wp_from.wphw04 = wp_to; return; }
298         if (!wp_from.wphw05 || wp_from.wphw05 == wp_to) { wp_from.wphw05 = wp_to; return; }
299         if (!wp_from.wphw06 || wp_from.wphw06 == wp_to) { wp_from.wphw06 = wp_to; return; }
300         if (!wp_from.wphw07 || wp_from.wphw07 == wp_to) { wp_from.wphw07 = wp_to; return; }
301
302         return;
303 }
304
305 void waypoint_unmark_hardwiredlink(entity wp_from, entity wp_to)
306 {
307         if (!(wp_from && wp_to))
308                 return;
309
310         int removed = -1;
311         if (removed < 0 && wp_from.wphw00 == wp_to) removed = 0;
312         if (removed < 0 && wp_from.wphw01 == wp_to) removed = 1;
313         if (removed < 0 && wp_from.wphw02 == wp_to) removed = 2;
314         if (removed < 0 && wp_from.wphw03 == wp_to) removed = 3;
315         if (removed < 0 && wp_from.wphw04 == wp_to) removed = 4;
316         if (removed < 0 && wp_from.wphw05 == wp_to) removed = 5;
317         if (removed < 0 && wp_from.wphw06 == wp_to) removed = 6;
318         if (removed < 0 && wp_from.wphw07 == wp_to) removed = 7;
319
320         if (removed >= 0)
321         {
322                 if (removed <= 0) wp_from.wphw00 = wp_from.wphw01;
323                 if (removed <= 1) wp_from.wphw01 = wp_from.wphw02;
324                 if (removed <= 2) wp_from.wphw02 = wp_from.wphw03;
325                 if (removed <= 3) wp_from.wphw03 = wp_from.wphw04;
326                 if (removed <= 4) wp_from.wphw04 = wp_from.wphw05;
327                 if (removed <= 5) wp_from.wphw05 = wp_from.wphw06;
328                 if (removed <= 6) wp_from.wphw06 = wp_from.wphw07;
329                 if (removed <= 7) wp_from.wphw07 = NULL;
330                 if (!wp_from.wphw00)
331                         waypoint_setupmodel(wp_from);
332         }
333
334         return;
335 }
336
337 void waypoint_setupmodel(entity wp)
338 {
339         if (autocvar_g_waypointeditor)
340         {
341                 // TODO: add some sort of visible box in edit mode for box waypoints
342                 vector m1 = wp.mins;
343                 vector m2 = wp.maxs;
344                 setmodel(wp, MDL_WAYPOINT);
345                 setsize(wp, m1, m2);
346                 wp.effects = EF_LOWPRECISION;
347                 if (wp.wpflags & WAYPOINTFLAG_ITEM)
348                         wp.colormod = '1 0 0'; // red
349                 else if (wp.wpflags & WAYPOINTFLAG_GENERATED)
350                         wp.colormod = '1 1 0'; // yellow
351                 else if (wp.wpflags & WAYPOINTFLAG_SUPPORT)
352                         wp.colormod = '0 1 0'; // green
353                 else if (wp.wpflags & WAYPOINTFLAG_CUSTOM_JP)
354                         wp.colormod = '1 0.5 0'; // orange
355                 else if (wp.wpflags & WAYPOINTFLAG_TELEPORT)
356                         wp.colormod = '1 0.5 0'; // orange
357                 else if (wp.wpflags & WAYPOINTFLAG_LADDER)
358                         wp.colormod = '1 0.5 0'; // orange
359                 else if (wp.wpflags & WAYPOINTFLAG_JUMP)
360                         wp.colormod = '1 0.5 0'; // orange
361                 else if (wp.wpflags & WAYPOINTFLAG_CROUCH)
362                         wp.colormod = '0 1 1'; // cyan
363                 else if (waypoint_has_hardwiredlinks(wp))
364                         wp.colormod = '0.5 0 1'; // purple
365                 else
366                         wp.colormod = '1 1 1';
367         }
368         else
369                 wp.model = "";
370 }
371
372 string waypoint_get_type_name(entity wp)
373 {
374         if (wp.wpflags & WAYPOINTFLAG_ITEM) return "^1Item waypoint";
375         else if (wp.wpflags & WAYPOINTFLAG_CROUCH) return "^5Crouch waypoint";
376         else if (wp.wpflags & WAYPOINTFLAG_JUMP) return "^xf80Jump waypoint";
377         else if (wp.wpflags & WAYPOINTFLAG_SUPPORT) return "^2Support waypoint";
378         else if (waypoint_has_hardwiredlinks(wp)) return "^x80fHardwired waypoint";
379         else if (wp.wpflags & WAYPOINTFLAG_LADDER) return "^3Ladder waypoint";
380         else if (wp.wpflags & WAYPOINTFLAG_TELEPORT)
381         {
382                 if (!wp.wpisbox) return "^3Warpzone waypoint";
383                 else if (wp.wpflags & WAYPOINTFLAG_CUSTOM_JP) return "^3Custom jumppad waypoint";
384                 else
385                 {
386                         IL_EACH(g_jumppads, boxesoverlap(wp.absmin, wp.absmax, it.absmin, it.absmax),
387                                 { return "^3Jumppad waypoint"; });
388                         return "^3Teleport waypoint";
389                 }
390         }
391
392         return "^7Waypoint";
393 }
394
395 entity waypoint_get(vector m1, vector m2)
396 {
397         if (m1 == m2)
398         {
399                 m1 -= '8 8 8';
400                 m2 += '8 8 8';
401         }
402         IL_EACH(g_waypoints, boxesoverlap(m1, m2, it.absmin, it.absmax), { return it; });
403
404         return NULL;
405 }
406
407 .float createdtime;
408 entity waypoint_spawn(vector m1, vector m2, float f)
409 {
410         if(!(f & (WAYPOINTFLAG_PERSONAL | WAYPOINTFLAG_GENERATED)) && m1 == m2)
411         {
412                 entity wp_found = waypoint_get(m1, m2);
413                 if (wp_found)
414                         return wp_found;
415         }
416         // spawn only one destination waypoint for teleports teleporting player to the exact same spot
417         // otherwise links loaded from file would be applied only to the first destination
418         // waypoint since link format doesn't specify waypoint entities but just positions
419         if((f & WAYPOINTFLAG_GENERATED) && !(f & (WPFLAGMASK_NORELINK | WAYPOINTFLAG_PERSONAL)) && m1 == m2)
420         {
421                 IL_EACH(g_waypoints, boxesoverlap(m1, m2, it.absmin, it.absmax),
422                 {
423                         return it;
424                 });
425         }
426
427         entity w = new(waypoint);
428         IL_PUSH(g_waypoints, w);
429         w.dphitcontentsmask = DPCONTENTS_SOLID | DPCONTENTS_BODY | DPCONTENTS_PLAYERCLIP | DPCONTENTS_BOTCLIP;
430         w.wpflags = f;
431         w.solid = SOLID_TRIGGER;
432         w.createdtime = time;
433         setorigin(w, (m1 + m2) * 0.5);
434         setsize(w, m1 - w.origin, m2 - w.origin);
435         if (w.size)
436                 w.wpisbox = true;
437
438         if(!w.wpisbox)
439         {
440                 if (f & WAYPOINTFLAG_CROUCH)
441                         setsize(w, PL_CROUCH_MIN_CONST - '1 1 0', PL_CROUCH_MAX_CONST + '1 1 0');
442                 else
443                         setsize(w, PL_MIN_CONST - '1 1 0', PL_MAX_CONST + '1 1 0');
444                 if(!move_out_of_solid(w))
445                 {
446                         if(!(f & WAYPOINTFLAG_GENERATED))
447                         {
448                                 LOG_TRACE("Killed a waypoint that was stuck in solid at ", vtos(w.origin));
449                                 delete(w);
450                                 return NULL;
451                         }
452                         else
453                         {
454                                 if(autocvar_developer)
455                                 {
456                                         LOG_INFO("A generated waypoint is stuck in solid at ", vtos(w.origin));
457                                         backtrace("Waypoint stuck");
458                                 }
459                         }
460                 }
461                 setsize(w, '0 0 0', '0 0 0');
462         }
463
464         waypoint_clearlinks(w);
465         //waypoint_schedulerelink(w);
466
467         waypoint_setupmodel(w);
468
469         return w;
470 }
471
472 float trigger_push_get_push_time(entity this, vector endpos);
473 void waypoint_addlink_for_custom_jumppad(entity wp_from, entity wp_to)
474 {
475         entity jp = NULL;
476         IL_EACH(g_jumppads, boxesoverlap(wp_from.absmin, wp_from.absmax, it.absmin, it.absmax),
477         {
478                 jp = it;
479                 break;
480         });
481         if (!jp)
482                 return;
483
484         float cost = trigger_push_get_push_time(jp, wp_to.origin);
485         wp_from.wp00 = wp_to;
486         wp_from.wp00mincost = cost;
487         jp.nearestwaypoint = wp_from;
488         jp.nearestwaypointtimeout = -1;
489 }
490
491 bool start_wp_is_spawned;
492 vector start_wp_origin;
493 bool start_wp_is_hardwired;
494 bool start_wp_is_support;
495
496 void waypoint_clear_start_wp_globals(entity pl, bool warn)
497 {
498         start_wp_is_spawned = false;
499         start_wp_origin = '0 0 0';
500         pl.wp_locked = NULL;
501         start_wp_is_hardwired = false;
502         start_wp_is_support = false;
503         if (warn)
504                 LOG_INFO("^xf80Start waypoint has been cleared.\n");
505 }
506
507 void crosshair_trace_waypoints(entity pl);
508 void waypoint_start_hardwiredlink(entity pl)
509 {
510         entity wp = pl.nearestwaypoint;
511         if ((!start_wp_is_spawned || start_wp_is_hardwired) && wp && !(wp.wpflags & WPFLAGMASK_NORELINK))
512         {
513                 start_wp_is_hardwired = true;
514                 start_wp_is_spawned = true;
515                 start_wp_origin = wp.origin;
516                 pl.wp_locked = wp;
517                 LOG_INFOF("^x80fNearest waypoint %s marked as hardwired link origin.\n", vtos(wp.origin));
518         }
519         else
520                 start_wp_is_hardwired = false;
521 }
522
523 void waypoint_spawn_fromeditor(entity pl, bool at_crosshair, bool is_jump_wp, bool is_crouch_wp, bool is_support_wp)
524 {
525         if (WAYPOINT_VERSION < waypoint_version_loaded)
526         {
527                 LOG_INFOF("^1Editing waypoints with a higher version number (%f) is not allowed.\n"
528                         "Update Xonotic to make them editable.", waypoint_version_loaded);
529                 return;
530         }
531
532         entity e = NULL, jp = NULL;
533         vector org = pl.origin;
534         if (at_crosshair)
535         {
536                 crosshair_trace_waypoints(pl);
537                 org = trace_endpos;
538                 if (!trace_ent)
539                         org.z -= PL_MIN_CONST.z;
540                 if (!(start_wp_is_hardwired || start_wp_is_support))
541                         IL_EACH(g_jumppads, boxesoverlap(org + PL_MIN_CONST, org + PL_MAX_CONST, it.absmin, it.absmax),
542                         {
543                                 jp = it;
544                                 break;
545                         });
546                 if (!jp && !start_wp_is_spawned && trace_ent)
547                 {
548                         if (trace_ent.wpflags & (WAYPOINTFLAG_JUMP))
549                                 is_jump_wp = true;
550                         else if (trace_ent.wpflags & (WAYPOINTFLAG_SUPPORT))
551                                 is_support_wp = true;
552                 }
553         }
554         if (jp || is_jump_wp || is_support_wp)
555         {
556                 if (start_wp_is_spawned)
557                         start_wp_is_spawned = false;
558                 LOG_INFO("^xf80Spawning start waypoint...\n");
559         }
560         int ctf_flags = havocbot_symmetry_origin_order;
561         bool sym = ((autocvar_g_waypointeditor_symmetrical > 0 && ctf_flags >= 2)
562                    || (autocvar_g_waypointeditor_symmetrical < 0));
563         if(autocvar_g_waypointeditor_symmetrical_order >= 2)
564                 ctf_flags = autocvar_g_waypointeditor_symmetrical_order;
565         if (sym && ctf_flags < 2)
566                 ctf_flags = 2;
567         int wp_num = ctf_flags;
568
569         if(!PHYS_INPUT_BUTTON_CROUCH(pl) && !at_crosshair && !is_jump_wp && !is_support_wp)
570         {
571                 // snap waypoint to item's origin if close enough
572                 IL_EACH(g_items, true,
573                 {
574                         vector item_org = (it.absmin + it.absmax) * 0.5;
575                         item_org.z = it.absmin.z - PL_MIN_CONST.z;
576                         if (vlen(item_org - org) < 20)
577                         {
578                                 org = item_org;
579                                 break;
580                         }
581                 });
582         }
583
584         vector start_org = '0 0 0';
585         if (start_wp_is_spawned)
586         {
587                 if (!start_wp_is_hardwired)
588                         LOG_INFO("^xf80Spawning destination waypoint...\n");
589                 start_org = start_wp_origin;
590         }
591
592         // save org as it can be modified spawning symmetrycal waypoints
593         vector initial_origin = '0 0 0';
594         bool initial_origin_is_set = false;
595
596         LABEL(add_wp);
597
598         if (jp)
599         {
600                 e = NULL;
601                 IL_EACH(g_waypoints, it.wpflags & WPFLAGMASK_NORELINK
602                         && boxesoverlap(org + PL_MIN_CONST, org + PL_MAX_CONST, it.absmin, it.absmax),
603                 {
604                         e = it; break;
605                 });
606                 if (!e)
607                         e = waypoint_spawn(jp.absmin - PL_MAX_CONST + '1 1 1', jp.absmax - PL_MIN_CONST + '-1 -1 -1', WAYPOINTFLAG_TELEPORT);
608                 if (!pl.wp_locked)
609                         pl.wp_locked = e;
610         }
611         else if (is_jump_wp || is_support_wp)
612         {
613                 int type_flag = (is_jump_wp) ? WAYPOINTFLAG_JUMP : WAYPOINTFLAG_SUPPORT;
614
615                 entity wp_found = waypoint_get(org, org);
616                 if (wp_found && !(wp_found.wpflags & type_flag))
617                 {
618                         LOG_INFOF("Error: can't spawn a %s waypoint over an existent waypoint of a different type\n", (is_jump_wp) ? "Jump" : "Support");
619                         return;
620                 }
621                 e = waypoint_spawn(org, org, type_flag);
622                 if (!pl.wp_locked)
623                         pl.wp_locked = e;
624         }
625         else
626                 e = waypoint_spawn(org, org, (is_crouch_wp) ? WAYPOINTFLAG_CROUCH : 0);
627         if(!e)
628         {
629                 LOG_INFOF("Couldn't spawn waypoint at %v\n", org);
630                 if (start_wp_is_spawned)
631                         waypoint_clear_start_wp_globals(pl, true);
632                 return;
633         }
634
635         if (!initial_origin_is_set)
636         {
637                 initial_origin = e.origin;
638                 initial_origin_is_set = true;
639         }
640
641         entity start_wp = NULL;
642         if (start_wp_is_spawned)
643         {
644                 IL_EACH(g_waypoints, (start_wp_is_hardwired || it.wpflags & WPFLAGMASK_NORELINK)
645                         && boxesoverlap(start_org, start_org, it.absmin, it.absmax),
646                 {
647                         start_wp = it; break;
648                 });
649                 if(!start_wp)
650                 {
651                         // should not happen
652                         LOG_INFOF("Couldn't find start waypoint at %v\n", start_org);
653                         waypoint_clear_start_wp_globals(pl, true);
654                         return;
655                 }
656                 if (start_wp_is_hardwired)
657                 {
658                         if (waypoint_is_hardwiredlink(start_wp, e))
659                         {
660                                 waypoint_unmark_hardwiredlink(start_wp, e);
661                                 waypoint_removelink(start_wp, e);
662                                 string s = strcat(vtos(start_wp.origin), "*", vtos(e.origin));
663                                 LOG_INFOF("^x80fRemoved hardwired link %s.\n", s);
664                         }
665                         else
666                         {
667                                 if (e.createdtime == time)
668                                 {
669                                         LOG_INFO("Error: hardwired links can be created only between 2 existing (and unconnected) waypoints.\n");
670                                         waypoint_remove(e);
671                                         waypoint_clear_start_wp_globals(pl, true);
672                                         waypoint_spawn_fromeditor(pl, at_crosshair, is_jump_wp, is_crouch_wp, is_support_wp);
673                                         return;
674                                 }
675                                 if (start_wp == e)
676                                 {
677                                         LOG_INFO("Error: start and destination waypoints coincide.\n");
678                                         waypoint_clear_start_wp_globals(pl, true);
679                                         return;
680                                 }
681                                 if (waypoint_islinked(start_wp, e))
682                                 {
683                                         LOG_INFO("Error: waypoints are already linked.\n");
684                                         waypoint_clear_start_wp_globals(pl, true);
685                                         return;
686                                 }
687                                 waypoint_addlink(start_wp, e);
688                                 waypoint_mark_hardwiredlink(start_wp, e);
689                                 string s = strcat(vtos(start_wp.origin), "*", vtos(e.origin));
690                                 LOG_INFOF("^x80fAdded hardwired link %s.\n", s);
691                         }
692                 }
693                 else
694                 {
695                         if (start_wp_is_support)
696                         {
697                                 if (e.SUPPORT_WP)
698                                 {
699                                         LOG_INFOF("Waypoint %v has already a support waypoint, delete it first.\n", e.origin);
700                                         waypoint_clear_start_wp_globals(pl, true);
701                                         return;
702                                 }
703                                 // clear all links to e
704                                 IL_EACH(g_waypoints, it != e,
705                                 {
706                                         if (waypoint_islinked(it, e) && !waypoint_is_hardwiredlink(it, e))
707                                                 waypoint_removelink(it, e);
708                                 });
709                         }
710                         waypoint_addlink(start_wp, e);
711                 }
712         }
713
714         if (!(jp || is_jump_wp || is_support_wp || start_wp_is_hardwired))
715                 waypoint_schedulerelink(e);
716
717         string wp_type_str = waypoint_get_type_name(e);
718
719         bprint(strcat(wp_type_str, "^7 spawned at ", vtos(e.origin), "\n"));
720
721         if (start_wp_is_spawned)
722         {
723                 pl.wp_locked = NULL;
724                 if (!start_wp_is_hardwired)
725                         waypoint_schedulerelink(start_wp);
726                 if (start_wp.wpflags & WAYPOINTFLAG_TELEPORT)
727                 {
728                         if (start_wp.wp00_original == start_wp.wp00)
729                                 start_wp.wpflags &= ~WAYPOINTFLAG_CUSTOM_JP;
730                         else
731                                 start_wp.wpflags |= WAYPOINTFLAG_CUSTOM_JP;
732                 }
733         }
734
735         if (sym)
736         {
737                 org = waypoint_getSymmetricalPoint(org, ctf_flags);
738                 if (jp)
739                 {
740                         IL_EACH(g_jumppads, boxesoverlap(org + PL_MIN_CONST, org + PL_MAX_CONST, it.absmin, it.absmax),
741                         {
742                                 jp = it; break;
743                         });
744                 }
745                 if (start_wp_is_spawned)
746                         start_org = waypoint_getSymmetricalPoint(start_org, ctf_flags);
747                 if (vdist(org - pl.origin, >, 32))
748                 {
749                         if(wp_num > 2)
750                                 wp_num--;
751                         else
752                                 sym = false;
753                         goto add_wp;
754                 }
755         }
756         if (jp || is_jump_wp || is_support_wp)
757         {
758                 if (!start_wp_is_spawned)
759                 {
760                         // we've just created a custom jumppad waypoint
761                         // the next one created by the user will be the destination waypoint
762                         start_wp_is_spawned = true;
763                         start_wp_origin = initial_origin;
764                         if (is_support_wp)
765                                 start_wp_is_support = true;
766                 }
767         }
768         else if (start_wp_is_spawned)
769         {
770                 waypoint_clear_start_wp_globals(pl, false);
771         }
772 }
773
774 void waypoint_remove(entity wp)
775 {
776         IL_EACH(g_waypoints, it != wp,
777         {
778                 if (it.SUPPORT_WP == wp)
779                 {
780                         it.SUPPORT_WP = NULL;
781                         waypoint_schedulerelink(it); // restore incoming links
782                 }
783                 if (waypoint_islinked(it, wp))
784                 {
785                         if (waypoint_is_hardwiredlink(it, wp))
786                                 waypoint_unmark_hardwiredlink(it, wp);
787                         waypoint_removelink(it, wp);
788                 }
789         });
790         delete(wp);
791 }
792
793 void waypoint_remove_fromeditor(entity pl)
794 {
795         if (WAYPOINT_VERSION < waypoint_version_loaded)
796         {
797                 LOG_INFOF("^1Editing waypoints with a higher version number (%f) is not allowed.\n"
798                         "Update Xonotic to make them editable.", waypoint_version_loaded);
799                 return;
800         }
801
802         entity e = navigation_findnearestwaypoint(pl, false);
803
804         int ctf_flags = havocbot_symmetry_origin_order;
805         bool sym = ((autocvar_g_waypointeditor_symmetrical > 0 && ctf_flags >= 2)
806                    || (autocvar_g_waypointeditor_symmetrical < 0));
807         if(autocvar_g_waypointeditor_symmetrical_order >= 2)
808                 ctf_flags = autocvar_g_waypointeditor_symmetrical_order;
809         if (sym && ctf_flags < 2)
810                 ctf_flags = 2;
811         int wp_num = ctf_flags;
812
813         LABEL(remove_wp);
814         if (!e) return;
815
816         if (e.wpflags & WAYPOINTFLAG_GENERATED)
817         {
818                 if (start_wp_is_spawned)
819                         waypoint_clear_start_wp_globals(pl, true);
820                 return;
821         }
822
823         if (waypoint_has_hardwiredlinks(e))
824         {
825                 LOG_INFO("Can't remove a waypoint with hardwired links, remove links with \"wpeditor hardwire\" first\n");
826                 return;
827         }
828
829         entity wp_sym = NULL;
830         if (sym)
831         {
832                 vector org = waypoint_getSymmetricalPoint(e.origin, ctf_flags);
833                 FOREACH_ENTITY_CLASS("waypoint", !(it.wpflags & WAYPOINTFLAG_GENERATED), {
834                         if(vdist(org - it.origin, <, 3))
835                         {
836                                 wp_sym = it;
837                                 break;
838                         }
839                 });
840         }
841
842         bprint(strcat("Waypoint removed at ", vtos(e.origin), "\n"));
843         te_explosion(e.origin);
844         waypoint_remove(e);
845
846         if (sym && wp_sym)
847         {
848                 e = wp_sym;
849                 if(wp_num > 2)
850                         wp_num--;
851                 else
852                         sym = false;
853                 goto remove_wp;
854         }
855
856         if (start_wp_is_spawned)
857                 waypoint_clear_start_wp_globals(pl, true);
858 }
859
860 void waypoint_removelink(entity from, entity to)
861 {
862         if (from == to || (from.wpflags & WPFLAGMASK_NORELINK && !(from.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT))))
863                 return;
864
865         entity fromwp31_prev = from.wp31;
866
867         switch (waypoint_getlinknum(from, to))
868         {
869                 // fallthrough all the way
870                 case  0: from.wp00 = from.wp01; from.wp00mincost = from.wp01mincost;
871                 case  1: from.wp01 = from.wp02; from.wp01mincost = from.wp02mincost;
872                 case  2: from.wp02 = from.wp03; from.wp02mincost = from.wp03mincost;
873                 case  3: from.wp03 = from.wp04; from.wp03mincost = from.wp04mincost;
874                 case  4: from.wp04 = from.wp05; from.wp04mincost = from.wp05mincost;
875                 case  5: from.wp05 = from.wp06; from.wp05mincost = from.wp06mincost;
876                 case  6: from.wp06 = from.wp07; from.wp06mincost = from.wp07mincost;
877                 case  7: from.wp07 = from.wp08; from.wp07mincost = from.wp08mincost;
878                 case  8: from.wp08 = from.wp09; from.wp08mincost = from.wp09mincost;
879                 case  9: from.wp09 = from.wp10; from.wp09mincost = from.wp10mincost;
880                 case 10: from.wp10 = from.wp11; from.wp10mincost = from.wp11mincost;
881                 case 11: from.wp11 = from.wp12; from.wp11mincost = from.wp12mincost;
882                 case 12: from.wp12 = from.wp13; from.wp12mincost = from.wp13mincost;
883                 case 13: from.wp13 = from.wp14; from.wp13mincost = from.wp14mincost;
884                 case 14: from.wp14 = from.wp15; from.wp14mincost = from.wp15mincost;
885                 case 15: from.wp15 = from.wp16; from.wp15mincost = from.wp16mincost;
886                 case 16: from.wp16 = from.wp17; from.wp16mincost = from.wp17mincost;
887                 case 17: from.wp17 = from.wp18; from.wp17mincost = from.wp18mincost;
888                 case 18: from.wp18 = from.wp19; from.wp18mincost = from.wp19mincost;
889                 case 19: from.wp19 = from.wp20; from.wp19mincost = from.wp20mincost;
890                 case 20: from.wp20 = from.wp21; from.wp20mincost = from.wp21mincost;
891                 case 21: from.wp21 = from.wp22; from.wp21mincost = from.wp22mincost;
892                 case 22: from.wp22 = from.wp23; from.wp22mincost = from.wp23mincost;
893                 case 23: from.wp23 = from.wp24; from.wp23mincost = from.wp24mincost;
894                 case 24: from.wp24 = from.wp25; from.wp24mincost = from.wp25mincost;
895                 case 25: from.wp25 = from.wp26; from.wp25mincost = from.wp26mincost;
896                 case 26: from.wp26 = from.wp27; from.wp26mincost = from.wp27mincost;
897                 case 27: from.wp27 = from.wp28; from.wp27mincost = from.wp28mincost;
898                 case 28: from.wp28 = from.wp29; from.wp28mincost = from.wp29mincost;
899                 case 29: from.wp29 = from.wp30; from.wp29mincost = from.wp30mincost;
900                 case 30: from.wp30 = from.wp31; from.wp30mincost = from.wp31mincost;
901                 case 31: from.wp31 = NULL; from.wp31mincost = 10000000;
902         }
903
904         if (fromwp31_prev && !from.wp31)
905                 waypoint_schedulerelink(from);
906 }
907
908 int waypoint_getlinknum(entity from, entity to)
909 {
910         if (from.wp00 == to) return  0; if (from.wp01 == to) return  1; if (from.wp02 == to) return  2; if (from.wp03 == to) return  3;
911         if (from.wp04 == to) return  4; if (from.wp05 == to) return  5; if (from.wp06 == to) return  6; if (from.wp07 == to) return  7;
912         if (from.wp08 == to) return  8; if (from.wp09 == to) return  9; if (from.wp10 == to) return 10; if (from.wp11 == to) return 11;
913         if (from.wp12 == to) return 12; if (from.wp13 == to) return 13; if (from.wp14 == to) return 14; if (from.wp15 == to) return 15;
914         if (from.wp16 == to) return 16; if (from.wp17 == to) return 17; if (from.wp18 == to) return 18; if (from.wp19 == to) return 19;
915         if (from.wp20 == to) return 20; if (from.wp21 == to) return 21; if (from.wp22 == to) return 22; if (from.wp23 == to) return 23;
916         if (from.wp24 == to) return 24; if (from.wp25 == to) return 25; if (from.wp26 == to) return 26; if (from.wp27 == to) return 27;
917         if (from.wp28 == to) return 28; if (from.wp29 == to) return 29; if (from.wp30 == to) return 30; if (from.wp31 == to) return 31;
918         return -1;
919 }
920
921 bool waypoint_islinked(entity from, entity to)
922 {
923         return (waypoint_getlinknum(from, to) >= 0);
924 }
925
926 void waypoint_updatecost_foralllinks()
927 {
928         IL_EACH(g_waypoints, !(it.wpflags & WAYPOINTFLAG_TELEPORT),
929         {
930                 if(it.wp00) it.wp00mincost = waypoint_getlinkcost(it, it.wp00);
931                 if(it.wp01) it.wp01mincost = waypoint_getlinkcost(it, it.wp01);
932                 if(it.wp02) it.wp02mincost = waypoint_getlinkcost(it, it.wp02);
933                 if(it.wp03) it.wp03mincost = waypoint_getlinkcost(it, it.wp03);
934                 if(it.wp04) it.wp04mincost = waypoint_getlinkcost(it, it.wp04);
935                 if(it.wp05) it.wp05mincost = waypoint_getlinkcost(it, it.wp05);
936                 if(it.wp06) it.wp06mincost = waypoint_getlinkcost(it, it.wp06);
937                 if(it.wp07) it.wp07mincost = waypoint_getlinkcost(it, it.wp07);
938                 if(it.wp08) it.wp08mincost = waypoint_getlinkcost(it, it.wp08);
939                 if(it.wp09) it.wp09mincost = waypoint_getlinkcost(it, it.wp09);
940                 if(it.wp10) it.wp10mincost = waypoint_getlinkcost(it, it.wp10);
941                 if(it.wp11) it.wp11mincost = waypoint_getlinkcost(it, it.wp11);
942                 if(it.wp12) it.wp12mincost = waypoint_getlinkcost(it, it.wp12);
943                 if(it.wp13) it.wp13mincost = waypoint_getlinkcost(it, it.wp13);
944                 if(it.wp14) it.wp14mincost = waypoint_getlinkcost(it, it.wp14);
945                 if(it.wp15) it.wp15mincost = waypoint_getlinkcost(it, it.wp15);
946                 if(it.wp16) it.wp16mincost = waypoint_getlinkcost(it, it.wp16);
947                 if(it.wp17) it.wp17mincost = waypoint_getlinkcost(it, it.wp17);
948                 if(it.wp18) it.wp18mincost = waypoint_getlinkcost(it, it.wp18);
949                 if(it.wp19) it.wp19mincost = waypoint_getlinkcost(it, it.wp19);
950                 if(it.wp20) it.wp20mincost = waypoint_getlinkcost(it, it.wp20);
951                 if(it.wp21) it.wp21mincost = waypoint_getlinkcost(it, it.wp21);
952                 if(it.wp22) it.wp22mincost = waypoint_getlinkcost(it, it.wp22);
953                 if(it.wp23) it.wp23mincost = waypoint_getlinkcost(it, it.wp23);
954                 if(it.wp24) it.wp24mincost = waypoint_getlinkcost(it, it.wp24);
955                 if(it.wp25) it.wp25mincost = waypoint_getlinkcost(it, it.wp25);
956                 if(it.wp26) it.wp26mincost = waypoint_getlinkcost(it, it.wp26);
957                 if(it.wp27) it.wp27mincost = waypoint_getlinkcost(it, it.wp27);
958                 if(it.wp28) it.wp28mincost = waypoint_getlinkcost(it, it.wp28);
959                 if(it.wp29) it.wp29mincost = waypoint_getlinkcost(it, it.wp29);
960                 if(it.wp30) it.wp30mincost = waypoint_getlinkcost(it, it.wp30);
961                 if(it.wp31) it.wp31mincost = waypoint_getlinkcost(it, it.wp31);
962         });
963 }
964
965 float waypoint_getlinearcost(float dist)
966 {
967         if(skill >= autocvar_bot_ai_bunnyhop_skilloffset)
968                 return dist / (autocvar_sv_maxspeed * 1.25);
969         return dist / autocvar_sv_maxspeed;
970 }
971
972 float waypoint_getlinearcost_underwater(float dist)
973 {
974         // NOTE: underwater speed factor is hardcoded in the engine too, see SV_WaterMove
975         return dist / (autocvar_sv_maxspeed * 0.7);
976 }
977
978 float waypoint_getlinearcost_crouched(float dist)
979 {
980         return dist / (autocvar_sv_maxspeed * 0.5);
981 }
982
983 float waypoint_gettravelcost(vector from, vector to, entity from_ent, entity to_ent)
984 {
985         bool submerged_from = navigation_check_submerged_state(from_ent, from);
986         bool submerged_to = navigation_check_submerged_state(to_ent, to);
987
988         if (submerged_from && submerged_to)
989                 return waypoint_getlinearcost_underwater(vlen(to - from));
990
991         if (from_ent.wpflags & WAYPOINTFLAG_CROUCH && to_ent.wpflags & WAYPOINTFLAG_CROUCH)
992                 return waypoint_getlinearcost_crouched(vlen(to - from));
993
994         float c = waypoint_getlinearcost(vlen(to - from));
995
996         float height = from.z - to.z;
997         if(height > jumpheight_vec.z && autocvar_sv_gravity > 0)
998         {
999                 float height_cost; // fall cost
1000                 if (boolean(from_ent.wpflags & WAYPOINTFLAG_JUMP))
1001                         height_cost = jumpheight_time + sqrt((height + jumpheight_vec.z) / (autocvar_sv_gravity / 2));
1002                 else
1003                         height_cost = sqrt(height / (autocvar_sv_gravity / 2));
1004                 c = waypoint_getlinearcost(vlen(vec2(to - from))); // xy distance cost
1005                 if(height_cost > c)
1006                         c = height_cost;
1007         }
1008
1009         // consider half path underwater
1010         if (submerged_from || submerged_to)
1011                 return (c + waypoint_getlinearcost_underwater(vlen(to - from))) / 2;
1012
1013         // consider half path crouched
1014         if (from_ent.wpflags & WAYPOINTFLAG_CROUCH || to_ent.wpflags & WAYPOINTFLAG_CROUCH)
1015                 return (c + waypoint_getlinearcost_crouched(vlen(to - from))) / 2;
1016
1017         return c;
1018 }
1019
1020 float waypoint_getlinkcost(entity from, entity to)
1021 {
1022         vector v1 = from.origin;
1023         vector v2 = to.origin;
1024         if (from.wpisbox)
1025         {
1026                 vector m1 = from.absmin, m2 = from.absmax;
1027                 v1.x = bound(m1.x, v2.x, m2.x);
1028                 v1.y = bound(m1.y, v2.y, m2.y);
1029                 v1.z = bound(m1.z, v2.z, m2.z);
1030         }
1031         if (to.wpisbox)
1032         {
1033                 vector m1 = to.absmin, m2 = to.absmax;
1034                 v2.x = bound(m1.x, v1.x, m2.x);
1035                 v2.y = bound(m1.y, v1.y, m2.y);
1036                 v2.z = bound(m1.z, v1.z, m2.z);
1037         }
1038         return waypoint_gettravelcost(v1, v2, from, to);
1039 }
1040
1041 // add a new link to the spawnfunc_waypoint, replacing the furthest link it already has
1042 // if c == -1 automatically determine cost of the link
1043 void waypoint_addlink_customcost(entity from, entity to, float c)
1044 {
1045         if (from == to || waypoint_islinked(from, to))
1046                 return;
1047         if (c == -1 && (from.wpflags & WPFLAGMASK_NORELINK) && !(from.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT)))
1048                 return;
1049
1050         if(c == -1)
1051                 c = waypoint_getlinkcost(from, to);
1052
1053         if (from.wp31mincost < c) return;
1054         if (from.wp30mincost < c) {from.wp31 = to;from.wp31mincost = c;return;} from.wp31 = from.wp30;from.wp31mincost = from.wp30mincost;
1055         if (from.wp29mincost < c) {from.wp30 = to;from.wp30mincost = c;return;} from.wp30 = from.wp29;from.wp30mincost = from.wp29mincost;
1056         if (from.wp28mincost < c) {from.wp29 = to;from.wp29mincost = c;return;} from.wp29 = from.wp28;from.wp29mincost = from.wp28mincost;
1057         if (from.wp27mincost < c) {from.wp28 = to;from.wp28mincost = c;return;} from.wp28 = from.wp27;from.wp28mincost = from.wp27mincost;
1058         if (from.wp26mincost < c) {from.wp27 = to;from.wp27mincost = c;return;} from.wp27 = from.wp26;from.wp27mincost = from.wp26mincost;
1059         if (from.wp25mincost < c) {from.wp26 = to;from.wp26mincost = c;return;} from.wp26 = from.wp25;from.wp26mincost = from.wp25mincost;
1060         if (from.wp24mincost < c) {from.wp25 = to;from.wp25mincost = c;return;} from.wp25 = from.wp24;from.wp25mincost = from.wp24mincost;
1061         if (from.wp23mincost < c) {from.wp24 = to;from.wp24mincost = c;return;} from.wp24 = from.wp23;from.wp24mincost = from.wp23mincost;
1062         if (from.wp22mincost < c) {from.wp23 = to;from.wp23mincost = c;return;} from.wp23 = from.wp22;from.wp23mincost = from.wp22mincost;
1063         if (from.wp21mincost < c) {from.wp22 = to;from.wp22mincost = c;return;} from.wp22 = from.wp21;from.wp22mincost = from.wp21mincost;
1064         if (from.wp20mincost < c) {from.wp21 = to;from.wp21mincost = c;return;} from.wp21 = from.wp20;from.wp21mincost = from.wp20mincost;
1065         if (from.wp19mincost < c) {from.wp20 = to;from.wp20mincost = c;return;} from.wp20 = from.wp19;from.wp20mincost = from.wp19mincost;
1066         if (from.wp18mincost < c) {from.wp19 = to;from.wp19mincost = c;return;} from.wp19 = from.wp18;from.wp19mincost = from.wp18mincost;
1067         if (from.wp17mincost < c) {from.wp18 = to;from.wp18mincost = c;return;} from.wp18 = from.wp17;from.wp18mincost = from.wp17mincost;
1068         if (from.wp16mincost < c) {from.wp17 = to;from.wp17mincost = c;return;} from.wp17 = from.wp16;from.wp17mincost = from.wp16mincost;
1069         if (from.wp15mincost < c) {from.wp16 = to;from.wp16mincost = c;return;} from.wp16 = from.wp15;from.wp16mincost = from.wp15mincost;
1070         if (from.wp14mincost < c) {from.wp15 = to;from.wp15mincost = c;return;} from.wp15 = from.wp14;from.wp15mincost = from.wp14mincost;
1071         if (from.wp13mincost < c) {from.wp14 = to;from.wp14mincost = c;return;} from.wp14 = from.wp13;from.wp14mincost = from.wp13mincost;
1072         if (from.wp12mincost < c) {from.wp13 = to;from.wp13mincost = c;return;} from.wp13 = from.wp12;from.wp13mincost = from.wp12mincost;
1073         if (from.wp11mincost < c) {from.wp12 = to;from.wp12mincost = c;return;} from.wp12 = from.wp11;from.wp12mincost = from.wp11mincost;
1074         if (from.wp10mincost < c) {from.wp11 = to;from.wp11mincost = c;return;} from.wp11 = from.wp10;from.wp11mincost = from.wp10mincost;
1075         if (from.wp09mincost < c) {from.wp10 = to;from.wp10mincost = c;return;} from.wp10 = from.wp09;from.wp10mincost = from.wp09mincost;
1076         if (from.wp08mincost < c) {from.wp09 = to;from.wp09mincost = c;return;} from.wp09 = from.wp08;from.wp09mincost = from.wp08mincost;
1077         if (from.wp07mincost < c) {from.wp08 = to;from.wp08mincost = c;return;} from.wp08 = from.wp07;from.wp08mincost = from.wp07mincost;
1078         if (from.wp06mincost < c) {from.wp07 = to;from.wp07mincost = c;return;} from.wp07 = from.wp06;from.wp07mincost = from.wp06mincost;
1079         if (from.wp05mincost < c) {from.wp06 = to;from.wp06mincost = c;return;} from.wp06 = from.wp05;from.wp06mincost = from.wp05mincost;
1080         if (from.wp04mincost < c) {from.wp05 = to;from.wp05mincost = c;return;} from.wp05 = from.wp04;from.wp05mincost = from.wp04mincost;
1081         if (from.wp03mincost < c) {from.wp04 = to;from.wp04mincost = c;return;} from.wp04 = from.wp03;from.wp04mincost = from.wp03mincost;
1082         if (from.wp02mincost < c) {from.wp03 = to;from.wp03mincost = c;return;} from.wp03 = from.wp02;from.wp03mincost = from.wp02mincost;
1083         if (from.wp01mincost < c) {from.wp02 = to;from.wp02mincost = c;return;} from.wp02 = from.wp01;from.wp02mincost = from.wp01mincost;
1084         if (from.wp00mincost < c) {from.wp01 = to;from.wp01mincost = c;return;} from.wp01 = from.wp00;from.wp01mincost = from.wp00mincost;
1085         from.wp00 = to;from.wp00mincost = c;return;
1086 }
1087
1088 void waypoint_addlink(entity from, entity to)
1089 {
1090         if ((from.wpflags & WPFLAGMASK_NORELINK) && !(from.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT)))
1091                 waypoint_addlink_for_custom_jumppad(from, to);
1092         else
1093                 waypoint_addlink_customcost(from, to, -1);
1094
1095         if (from.wpflags & WAYPOINTFLAG_SUPPORT)
1096                 to.SUPPORT_WP = from;
1097 }
1098
1099 // relink this spawnfunc_waypoint
1100 // (precompile a list of all reachable waypoints from this spawnfunc_waypoint)
1101 // (SLOW!)
1102 void waypoint_think(entity this)
1103 {
1104         vector sv = '0 0 0', sv2 = '0 0 0', ev = '0 0 0', ev2 = '0 0 0', dv;
1105         float sv2_height = 0, ev2_height = 0;
1106
1107         bot_calculate_stepheightvec();
1108
1109         int dphitcontentsmask_save = this.dphitcontentsmask;
1110         this.dphitcontentsmask = DPCONTENTS_SOLID | DPCONTENTS_BODY | DPCONTENTS_PLAYERCLIP | DPCONTENTS_BOTCLIP;
1111
1112         bot_navigation_movemode = ((autocvar_bot_navigation_ignoreplayers) ? MOVE_NOMONSTERS : MOVE_NORMAL);
1113
1114         //dprint("waypoint_think wpisbox = ", ftos(this.wpisbox), "\n");
1115         IL_EACH(g_waypoints, this != it,
1116         {
1117                 if (boxesoverlap(this.absmin, this.absmax, it.absmin, it.absmax))
1118                 {
1119                         if (!(this.wpflags & WPFLAGMASK_NORELINK))
1120                                 waypoint_addlink(this, it);
1121                         if (!(it.wpflags & WPFLAGMASK_NORELINK))
1122                                 waypoint_addlink(it, this);
1123                 }
1124                 else
1125                 {
1126                         ++relink_total;
1127                         if(!checkpvs(this.origin, it))
1128                         {
1129                                 ++relink_pvsculled;
1130                                 continue;
1131                         }
1132
1133                         sv = set_tracewalk_dest_2(this, it.origin);
1134                         sv2 = tracewalk_dest;
1135                         sv2_height = tracewalk_dest_height;
1136                         ev = set_tracewalk_dest_2(it, this.origin);
1137                         ev2 = tracewalk_dest;
1138                         ev2_height = tracewalk_dest_height;
1139
1140                         dv = ev - sv;
1141                         dv.z = 0;
1142                         int maxdist = 1050;
1143                         vector m1 = PL_MIN_CONST;
1144                         vector m2 = PL_MAX_CONST;
1145
1146                         if (this.wpflags & WAYPOINTFLAG_CROUCH || it.wpflags & WAYPOINTFLAG_CROUCH)
1147                         {
1148                                 m1 = PL_CROUCH_MIN_CONST;
1149                                 m2 = PL_CROUCH_MAX_CONST;
1150                                 // links from crouch wp to normal wp (and viceversa) are very short to avoid creating many links
1151                                 // that would be wasted due to rough travel cost calculation (the longer link is, the higher cost is)
1152                                 // links from crouch wp to crouch wp can be as long as normal links
1153                                 if (!(this.wpflags & WAYPOINTFLAG_CROUCH && it.wpflags & WAYPOINTFLAG_CROUCH))
1154                                         maxdist = 100;
1155                         }
1156
1157                         if (vdist(dv, >=, maxdist)) // max search distance in XY
1158                         {
1159                                 ++relink_lengthculled;
1160                                 continue;
1161                         }
1162
1163                         navigation_testtracewalk = 0;
1164
1165                         //traceline(this.origin, it.origin, false, NULL);
1166                         //if (trace_fraction == 1)
1167                         if (this.wpisbox || this.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT) // forbid outgoing links
1168                                 || it.SUPPORT_WP) // forbid incoming links
1169                         {
1170                                 relink_walkculled += 0.5;
1171                         }
1172                         else
1173                         {
1174                                 if (tracewalk(this, sv, m1, m2, ev2, ev2_height, MOVE_NOMONSTERS))
1175                                         waypoint_addlink(this, it);
1176                                 else
1177                                         relink_walkculled += 0.5;
1178                         }
1179
1180                         // reverse direction
1181                         if (it.wpisbox || it.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT) // forbid incoming links
1182                                 || this.SUPPORT_WP) // forbid outgoing links
1183                         {
1184                                 relink_walkculled += 0.5;
1185                         }
1186                         else
1187                         {
1188                                 if (tracewalk(this, ev, m1, m2, sv2, sv2_height, MOVE_NOMONSTERS))
1189                                         waypoint_addlink(it, this);
1190                                 else
1191                                         relink_walkculled += 0.5;
1192                         }
1193                 }
1194         });
1195         navigation_testtracewalk = 0;
1196         this.wplinked = true;
1197         this.dphitcontentsmask = dphitcontentsmask_save;
1198
1199         setthink(this, func_null);
1200         this.nextthink = 0;
1201 }
1202
1203 void waypoint_clearlinks(entity wp)
1204 {
1205         // clear links to other waypoints
1206         float f = 10000000;
1207         wp.wp00 = wp.wp01 = wp.wp02 = wp.wp03 = wp.wp04 = wp.wp05 = wp.wp06 = wp.wp07 = NULL;
1208         wp.wp08 = wp.wp09 = wp.wp10 = wp.wp11 = wp.wp12 = wp.wp13 = wp.wp14 = wp.wp15 = NULL;
1209         wp.wp16 = wp.wp17 = wp.wp18 = wp.wp19 = wp.wp20 = wp.wp21 = wp.wp22 = wp.wp23 = NULL;
1210         wp.wp24 = wp.wp25 = wp.wp26 = wp.wp27 = wp.wp28 = wp.wp29 = wp.wp30 = wp.wp31 = NULL;
1211
1212         wp.wp00mincost = wp.wp01mincost = wp.wp02mincost = wp.wp03mincost = wp.wp04mincost = wp.wp05mincost = wp.wp06mincost = wp.wp07mincost = f;
1213         wp.wp08mincost = wp.wp09mincost = wp.wp10mincost = wp.wp11mincost = wp.wp12mincost = wp.wp13mincost = wp.wp14mincost = wp.wp15mincost = f;
1214         wp.wp16mincost = wp.wp17mincost = wp.wp18mincost = wp.wp19mincost = wp.wp20mincost = wp.wp21mincost = wp.wp22mincost = wp.wp23mincost = f;
1215         wp.wp24mincost = wp.wp25mincost = wp.wp26mincost = wp.wp27mincost = wp.wp28mincost = wp.wp29mincost = wp.wp30mincost = wp.wp31mincost = f;
1216
1217         wp.wplinked = false;
1218 }
1219
1220 // tell a spawnfunc_waypoint to relink
1221 void waypoint_schedulerelink(entity wp)
1222 {
1223         if (wp == NULL)
1224                 return;
1225
1226         waypoint_setupmodel(wp);
1227         wp.wpisbox = vdist(wp.size, >, 0);
1228         wp.enemy = NULL;
1229         if (!(wp.wpflags & WAYPOINTFLAG_PERSONAL))
1230                 wp.owner = NULL;
1231         if (!(wp.wpflags & WPFLAGMASK_NORELINK))
1232                 waypoint_clearlinks(wp);
1233         // schedule an actual relink on next frame
1234         setthink(wp, waypoint_think);
1235         wp.nextthink = time;
1236         wp.effects = EF_LOWPRECISION;
1237 }
1238
1239 // spawnfunc_waypoint map entity
1240 spawnfunc(waypoint)
1241 {
1242         IL_PUSH(g_waypoints, this);
1243
1244         setorigin(this, this.origin);
1245         // schedule a relink after other waypoints have had a chance to spawn
1246         waypoint_clearlinks(this);
1247         //waypoint_schedulerelink(this);
1248 }
1249
1250 // tell all waypoints to relink
1251 // actually this is useful only to update relink_* stats
1252 void waypoint_schedulerelinkall()
1253 {
1254         relink_total = relink_walkculled = relink_pvsculled = relink_lengthculled = 0;
1255         IL_EACH(g_waypoints, true,
1256         {
1257                 waypoint_schedulerelink(it);
1258         });
1259         waypoint_load_hardwiredlinks();
1260 }
1261
1262 #define GET_GAMETYPE_EXTENSION() ((g_race) ? ".race" : "")
1263
1264 // Load waypoint links from file
1265 bool waypoint_load_links()
1266 {
1267         string s;
1268         float file, tokens, c = 0, found;
1269         entity wp_from = NULL, wp_to;
1270         vector wp_to_pos, wp_from_pos;
1271
1272         string gt_ext = GET_GAMETYPE_EXTENSION();
1273
1274         string filename = sprintf("maps/%s.waypoints.cache", strcat(mapname, gt_ext));
1275         file = fopen(filename, FILE_READ);
1276
1277         if (gt_ext != "" && file < 0)
1278         {
1279                 // if race waypoint file doesn't exist load the default one
1280                 filename = sprintf("maps/%s.waypoints.cache", mapname);
1281                 file = fopen(filename, FILE_READ);
1282         }
1283
1284         if (file < 0)
1285         {
1286                 LOG_TRACE("waypoint links load from ", filename, " failed");
1287                 waypoint_schedulerelinkall();
1288                 return false;
1289         }
1290
1291         bool parse_comments = true;
1292         float ver = 0;
1293         string links_time = string_null;
1294
1295         while ((s = fgets(file)))
1296         {
1297                 if(parse_comments)
1298                 {
1299                         if(substring(s, 0, 2) == "//")
1300                         {
1301                                 if(substring(s, 2, 17) == "WAYPOINT_VERSION ")
1302                                         ver = stof(substring(s, 19, -1));
1303                                 else if(substring(s, 2, 14) == "WAYPOINT_TIME ")
1304                                         links_time = substring(s, 16, -1);
1305                                 continue;
1306                         }
1307                         else
1308                         {
1309                                 if(ver < WAYPOINT_VERSION || links_time != waypoint_time)
1310                                 {
1311                                         if (links_time != waypoint_time)
1312                                                 LOG_TRACE("waypoint links for this map are not made for these waypoints.");
1313                                         else
1314                                                 LOG_TRACE("waypoint links for this map are outdated.");
1315                                         if (g_assault)
1316                                         {
1317                                                 LOG_TRACE("Assault waypoint links need to be manually updated in the editor");
1318                                         }
1319                                         else
1320                                         {
1321                                                 LOG_TRACE("automatically updating...");
1322                                                 waypoint_schedulerelinkall();
1323                                                 fclose(file);
1324                                                 return false;
1325                                         }
1326                                 }
1327                                 parse_comments = false;
1328                         }
1329                 }
1330
1331                 tokens = tokenizebyseparator(s, "*");
1332
1333                 if (tokens!=2)
1334                 {
1335                         // bad file format
1336                         fclose(file);
1337                         waypoint_schedulerelinkall(); // link all the autogenerated waypoints (teleporters)
1338                         return false;
1339                 }
1340
1341                 wp_from_pos     = stov(argv(0));
1342                 wp_to_pos       = stov(argv(1));
1343
1344                 // Search "from" waypoint
1345                 if(!wp_from || wp_from.origin!=wp_from_pos)
1346                 {
1347                         wp_from = findradius(wp_from_pos, 1);
1348                         found = false;
1349                         while(wp_from)
1350                         {
1351                                 if(vdist(wp_from.origin - wp_from_pos, <, 1))
1352                                 if(wp_from.classname == "waypoint")
1353                                 {
1354                                         found = true;
1355                                         break;
1356                                 }
1357                                 wp_from = wp_from.chain;
1358                         }
1359
1360                         if(!found)
1361                         {
1362                                 LOG_TRACE("waypoint_load_links: couldn't find 'from' waypoint at ", vtos(wp_from_pos));
1363                                 continue;
1364                         }
1365                 }
1366
1367                 // Search "to" waypoint
1368                 wp_to = findradius(wp_to_pos, 1);
1369                 found = false;
1370                 while(wp_to)
1371                 {
1372                         if(vdist(wp_to.origin - wp_to_pos, <, 1))
1373                         if(wp_to.classname == "waypoint")
1374                         {
1375                                 found = true;
1376                                 break;
1377                         }
1378                         wp_to = wp_to.chain;
1379                 }
1380
1381                 if(!found)
1382                 {
1383                         LOG_TRACE("waypoint_load_links: couldn't find 'to' waypoint at ", vtos(wp_to_pos));
1384                         continue;
1385                 }
1386
1387                 ++c;
1388                 waypoint_addlink(wp_from, wp_to);
1389                 if (wp_from.wp00_original && wp_from.wp00_original != wp_from.wp00)
1390                         wp_from.wpflags |= WAYPOINTFLAG_CUSTOM_JP;
1391         }
1392
1393         fclose(file);
1394
1395         LOG_TRACE("loaded ", ftos(c), " waypoint links from ", filename);
1396
1397         bool scheduled = false;
1398         IL_EACH(g_waypoints, it.wpflags & WAYPOINTFLAG_ITEM,
1399         {
1400                 if (!it.wp00)
1401                 {
1402                         waypoint_schedulerelink(it);
1403                         scheduled = true;
1404                 }
1405         });
1406         if (scheduled)
1407                 return false;
1408
1409         botframe_cachedwaypointlinks = true;
1410         return true;
1411 }
1412
1413 void waypoint_load_hardwiredlinks()
1414 {
1415         string s;
1416         float file, tokens, c = 0, found;
1417         entity wp_from = NULL, wp_to;
1418         vector wp_to_pos, wp_from_pos;
1419
1420         string gt_ext = GET_GAMETYPE_EXTENSION();
1421
1422         string filename = sprintf("maps/%s.waypoints.hardwired", strcat(mapname, gt_ext));
1423         file = fopen(filename, FILE_READ);
1424
1425         if (gt_ext != "" && file < 0)
1426         {
1427                 // if race waypoint file doesn't exist load the default one
1428                 filename = sprintf("maps/%s.waypoints.hardwired", mapname);
1429                 file = fopen(filename, FILE_READ);
1430         }
1431
1432         botframe_loadedforcedlinks = true;
1433
1434         if (file < 0)
1435         {
1436                 LOG_TRACE("waypoint links load from ", filename, " failed");
1437                 return;
1438         }
1439
1440         bool is_special = false;
1441         while ((s = fgets(file)))
1442         {
1443                 if(substring(s, 0, 2)=="//")
1444                         continue;
1445
1446                 if(substring(s, 0, 1)=="#")
1447                         continue;
1448
1449                 // special links start with *, so old xonotic versions don't load them
1450                 is_special = false;
1451                 if (substring(s, 0, 1) == "*")
1452                 {
1453                         is_special = true;
1454                         s = substring(s, 1, -1);
1455                 }
1456
1457                 tokens = tokenizebyseparator(s, "*");
1458
1459                 if (tokens!=2)
1460                         continue;
1461
1462                 wp_from_pos     = stov(argv(0));
1463                 wp_to_pos       = stov(argv(1));
1464
1465                 // Search "from" waypoint
1466                 if(!wp_from || wp_from.origin!=wp_from_pos)
1467                 {
1468                         wp_from = findradius(wp_from_pos, 5);
1469                         found = false;
1470                         while(wp_from)
1471                         {
1472                                 if(vdist(wp_from.origin - wp_from_pos, <, 5))
1473                                 if(wp_from.classname == "waypoint")
1474                                 {
1475                                         found = true;
1476                                         break;
1477                                 }
1478                                 wp_from = wp_from.chain;
1479                         }
1480
1481                         if(!found)
1482                         {
1483                                 s = strcat(((is_special) ? "special link " : "hardwired link "), s);
1484                                 LOG_INFO("NOTICE: Can not find origin waypoint of the ", s, ". Path skipped");
1485                                 continue;
1486                         }
1487                 }
1488
1489                 // Search "to" waypoint
1490                 wp_to = findradius(wp_to_pos, 5);
1491                 found = false;
1492                 while(wp_to)
1493                 {
1494                         if(vdist(wp_to.origin - wp_to_pos, <, 5))
1495                         if(wp_to.classname == "waypoint")
1496                         {
1497                                 found = true;
1498                                 break;
1499                         }
1500                         wp_to = wp_to.chain;
1501                 }
1502
1503                 if(!found)
1504                 {
1505                         s = strcat(((is_special) ? "special link " : "hardwired link "), s);
1506                         LOG_INFO("NOTICE: Can not find destination waypoint of the ", s, ". Path skipped");
1507                         continue;
1508                 }
1509
1510                 ++c;
1511
1512                 if (!is_special)
1513                 {
1514                         waypoint_addlink(wp_from, wp_to);
1515                         waypoint_mark_hardwiredlink(wp_from, wp_to);
1516                 } else if (wp_from.wpflags & WPFLAGMASK_NORELINK
1517                         && (wp_from.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT)
1518                                 || (wp_from.wpisbox && wp_from.wpflags & WAYPOINTFLAG_TELEPORT)))
1519                 {
1520                         waypoint_addlink(wp_from, wp_to);
1521                 }
1522         }
1523
1524         fclose(file);
1525
1526         LOG_TRACE("loaded ", ftos(c), " waypoint links from maps/", mapname, ".waypoints.hardwired");
1527 }
1528
1529 entity waypoint_get_link(entity w, float i)
1530 {
1531         switch(i)
1532         {
1533                 case  0:return w.wp00;
1534                 case  1:return w.wp01;
1535                 case  2:return w.wp02;
1536                 case  3:return w.wp03;
1537                 case  4:return w.wp04;
1538                 case  5:return w.wp05;
1539                 case  6:return w.wp06;
1540                 case  7:return w.wp07;
1541                 case  8:return w.wp08;
1542                 case  9:return w.wp09;
1543                 case 10:return w.wp10;
1544                 case 11:return w.wp11;
1545                 case 12:return w.wp12;
1546                 case 13:return w.wp13;
1547                 case 14:return w.wp14;
1548                 case 15:return w.wp15;
1549                 case 16:return w.wp16;
1550                 case 17:return w.wp17;
1551                 case 18:return w.wp18;
1552                 case 19:return w.wp19;
1553                 case 20:return w.wp20;
1554                 case 21:return w.wp21;
1555                 case 22:return w.wp22;
1556                 case 23:return w.wp23;
1557                 case 24:return w.wp24;
1558                 case 25:return w.wp25;
1559                 case 26:return w.wp26;
1560                 case 27:return w.wp27;
1561                 case 28:return w.wp28;
1562                 case 29:return w.wp29;
1563                 case 30:return w.wp30;
1564                 case 31:return w.wp31;
1565                 default:return NULL;
1566         }
1567 }
1568
1569 // Save all hardwired waypoint links to a file
1570 void waypoint_save_hardwiredlinks()
1571 {
1572         string gt_ext = GET_GAMETYPE_EXTENSION();
1573
1574         string filename = sprintf("maps/%s.waypoints.hardwired", strcat(mapname, gt_ext));
1575         int file = fopen(filename, FILE_WRITE);
1576         if (file < 0)
1577         {
1578                 LOG_TRACE("waypoint hardwired links ", filename, " creation failed");
1579                 return;
1580         }
1581
1582         // write hardwired links to file
1583         int count = 0;
1584         fputs(file, "// HARDWIRED LINKS\n");
1585         IL_EACH(g_waypoints, waypoint_has_hardwiredlinks(it),
1586         {
1587                 for (int j = 0; j < 32; ++j)
1588                 {
1589                         entity link = waypoint_get_link(it, j);
1590                         if (waypoint_is_hardwiredlink(it, link))
1591                         {
1592                                 // NOTE: vtos rounds vector components to 1 decimal place
1593                                 string s = strcat(vtos(it.origin), "*", vtos(link.origin), "\n");
1594                                 fputs(file, s);
1595                                 ++count;
1596                         }
1597                 }
1598         });
1599
1600         // write special links to file
1601         int count2 = 0;
1602         fputs(file, "\n// SPECIAL LINKS\n");
1603         IL_EACH(g_waypoints, it.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT | WAYPOINTFLAG_CUSTOM_JP),
1604         {
1605                 for (int j = 0; j < 32; ++j)
1606                 {
1607                         entity link = waypoint_get_link(it, j);
1608                         if (link)
1609                         {
1610                                 // NOTE: vtos rounds vector components to 1 decimal place
1611                                 string s = strcat("*", vtos(it.origin), "*", vtos(link.origin), "\n");
1612                                 fputs(file, s);
1613                                 ++count2;
1614                         }
1615                 }
1616         });
1617
1618         fclose(file);
1619
1620         LOG_INFOF("saved %d hardwired links and %d special links to %s", count, count2, filename);
1621 }
1622
1623 // Save all waypoint links to a file
1624 void waypoint_save_links()
1625 {
1626         string gt_ext = GET_GAMETYPE_EXTENSION();
1627
1628         string filename = sprintf("maps/%s.waypoints.cache", strcat(mapname, gt_ext));
1629         int file = fopen(filename, FILE_WRITE);
1630         if (file < 0)
1631         {
1632                 LOG_INFOF("waypoint link save to %s failed", filename);
1633                 return;
1634         }
1635
1636         fputs(file, strcat("//", "WAYPOINT_VERSION ", ftos_decimals(WAYPOINT_VERSION, 2), "\n"));
1637         if (waypoint_time != "")
1638                 fputs(file, strcat("//", "WAYPOINT_TIME ", waypoint_time, "\n"));
1639
1640         int c = 0;
1641         IL_EACH(g_waypoints, !(it.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT | WAYPOINTFLAG_CUSTOM_JP)),
1642         {
1643                 for(int j = 0; j < 32; ++j)
1644                 {
1645                         entity link = waypoint_get_link(it, j);
1646                         if (link && !waypoint_is_hardwiredlink(it, link))
1647                         {
1648                                 // NOTE: vtos rounds vector components to 1 decimal place
1649                                 string s = strcat(vtos(it.origin), "*", vtos(link.origin), "\n");
1650                                 fputs(file, s);
1651                                 ++c;
1652                         }
1653                 }
1654         });
1655         fclose(file);
1656
1657         botframe_cachedwaypointlinks = true;
1658
1659         LOG_INFOF("saved %d waypoint links to %s", c, filename);
1660 }
1661
1662 // save waypoints to gamedir/data/maps/mapname.waypoints
1663 void waypoint_saveall()
1664 {
1665         if (WAYPOINT_VERSION < waypoint_version_loaded)
1666         {
1667                 LOG_INFOF("^1Overwriting waypoints with a higher version number (%f) is not allowed.\n"
1668                         "Update Xonotic to make them editable.", waypoint_version_loaded);
1669                 return;
1670         }
1671         string gt_ext = GET_GAMETYPE_EXTENSION();
1672
1673         string filename = sprintf("maps/%s.waypoints", strcat(mapname, gt_ext));
1674         int file = fopen(filename, FILE_WRITE);
1675         if (file < 0)
1676         {
1677                 waypoint_save_links(); // save anyway?
1678                 botframe_loadedforcedlinks = false;
1679
1680                 LOG_INFOF("waypoint links: save to %s failed", filename);
1681                 return;
1682         }
1683
1684         float sym = autocvar_g_waypointeditor_symmetrical;
1685         string sym_str = ftos(sym);
1686         if (sym == -1 || (sym == 1 && autocvar_g_waypointeditor_symmetrical_order >= 2))
1687         {
1688                 if (sym == 1)
1689                 {
1690                         sym_str = cons(sym_str, "-");
1691                         sym_str = cons(sym_str, "-");
1692                 }
1693                 else
1694                 {
1695                         sym_str = cons(sym_str, ftos(autocvar_g_waypointeditor_symmetrical_origin.x));
1696                         sym_str = cons(sym_str, ftos(autocvar_g_waypointeditor_symmetrical_origin.y));
1697                 }
1698                 if (autocvar_g_waypointeditor_symmetrical_order >= 2)
1699                         sym_str = cons(sym_str, ftos(autocvar_g_waypointeditor_symmetrical_order));
1700         }
1701         else if (autocvar_g_waypointeditor_symmetrical == -2)
1702         {
1703                 sym_str = cons(sym_str, ftos(autocvar_g_waypointeditor_symmetrical_axis.x));
1704                 sym_str = cons(sym_str, ftos(autocvar_g_waypointeditor_symmetrical_axis.y));
1705         }
1706
1707         // a group of 3 comments doesn't break compatibility with older Xonotic versions
1708         // (they are read as a waypoint with origin '0 0 0' and flag 0 though)
1709         fputs(file, strcat("//", "WAYPOINT_VERSION ", ftos_decimals(WAYPOINT_VERSION, 2), "\n"));
1710         fputs(file, strcat("//", "WAYPOINT_SYMMETRY ", sym_str, "\n"));
1711
1712         strcpy(waypoint_time, strftime(true, "%Y-%m-%d %H:%M:%S"));
1713         fputs(file, strcat("//", "WAYPOINT_TIME ", waypoint_time, "\n"));
1714         //fputs(file, strcat("//", "\n"));
1715         //fputs(file, strcat("//", "\n"));
1716         //fputs(file, strcat("//", "\n"));
1717
1718         int c = 0;
1719         IL_EACH(g_waypoints, true,
1720         {
1721                 if(it.wpflags & WAYPOINTFLAG_GENERATED)
1722                         continue;
1723
1724                 string s;
1725                 // NOTE: vtos rounds vector components to 1 decimal place
1726                 s = strcat(vtos(it.origin + it.mins), "\n");
1727                 s = strcat(s, vtos(it.origin + it.maxs));
1728                 s = strcat(s, "\n");
1729                 s = strcat(s, ftos(it.wpflags));
1730                 s = strcat(s, "\n");
1731                 fputs(file, s);
1732                 c++;
1733         });
1734         fclose(file);
1735         waypoint_save_links();
1736         waypoint_save_hardwiredlinks();
1737
1738         botframe_loadedforcedlinks = false;
1739
1740         waypoint_version_loaded = WAYPOINT_VERSION;
1741         LOG_INFOF("saved %d waypoints to %s", c, filename);
1742 }
1743
1744 // load waypoints from file
1745 float waypoint_loadall()
1746 {
1747         string s;
1748         int file, cwp, cwb, fl;
1749         vector m1, m2;
1750         cwp = 0;
1751         cwb = 0;
1752
1753         string gt_ext = GET_GAMETYPE_EXTENSION();
1754
1755         string filename = sprintf("maps/%s.waypoints", strcat(mapname, gt_ext));
1756         file = fopen(filename, FILE_READ);
1757
1758         if (gt_ext != "" && file < 0)
1759         {
1760                 // if race waypoint file doesn't exist load the default one
1761                 filename = sprintf("maps/%s.waypoints", mapname);
1762                 file = fopen(filename, FILE_READ);
1763         }
1764
1765         if (file < 0)
1766         {
1767                 LOG_TRACE("waypoint load from ", filename, " failed");
1768                 return 0;
1769         }
1770
1771         bool parse_comments = true;
1772         float ver = 0;
1773         float sym = 0;
1774         float sym_param1 = 0, sym_param2 = 0, sym_param3 = 0;
1775
1776         while ((s = fgets(file)))
1777         {
1778                 if(parse_comments)
1779                 {
1780                         if(substring(s, 0, 2) == "//")
1781                         {
1782                                 if(substring(s, 2, 17) == "WAYPOINT_VERSION ")
1783                                         ver = stof(substring(s, 19, -1));
1784                                 else if(substring(s, 2, 18) == "WAYPOINT_SYMMETRY ")
1785                                 {
1786                                         int tokens = tokenizebyseparator(substring(s, 20, -1), " ");
1787                                         if (tokens) { sym = stof(argv(0)); }
1788                                         if (tokens > 1) { sym_param1 = stof(argv(1)); }
1789                                         if (tokens > 2) { sym_param2 = stof(argv(2)); }
1790                                         if (tokens > 3) { sym_param3 = stof(argv(3)); }
1791                                 }
1792                                 else if(substring(s, 2, 14) == "WAYPOINT_TIME ")
1793                                         strcpy(waypoint_time, substring(s, 16, -1));
1794                                 continue;
1795                         }
1796                         else
1797                         {
1798                                 if(floor(ver) < floor(WAYPOINT_VERSION))
1799                                 {
1800                                         LOG_TRACE("waypoints for this map are outdated");
1801                                         LOG_TRACE("please update them in the editor");
1802                                 }
1803                                 parse_comments = false;
1804                         }
1805                 }
1806                 m1 = stov(s);
1807                 s = fgets(file);
1808                 if (!s)
1809                         break;
1810                 m2 = stov(s);
1811                 s = fgets(file);
1812                 if (!s)
1813                         break;
1814                 fl = stof(s);
1815                 if (fl & WAYPOINTFLAG_NORELINK__DEPRECATED)
1816                         fl &= ~WAYPOINTFLAG_NORELINK__DEPRECATED;
1817                 waypoint_spawn(m1, m2, fl);
1818                 if (m1 == m2)
1819                         cwp = cwp + 1;
1820                 else
1821                         cwb = cwb + 1;
1822         }
1823         fclose(file);
1824         waypoint_version_loaded = ver;
1825         LOG_TRACE("loaded ", ftos(cwp), " waypoints and ", ftos(cwb), " wayboxes from maps/", mapname, ".waypoints");
1826
1827         if (autocvar_g_waypointeditor && autocvar_g_waypointeditor_symmetrical_allowload)
1828         {
1829                 cvar_set("g_waypointeditor_symmetrical", ftos(sym));
1830                 if (sym == 1 && sym_param3 < 2)
1831                         cvar_set("g_waypointeditor_symmetrical_order", "0"); // make sure this is reset if not loaded
1832                 if (sym == -1 || (sym == 1 && sym_param3 >= 2))
1833                 {
1834                         string params;
1835                         if (sym == 1)
1836                                 params = cons("-", "-");
1837                         else
1838                         {
1839                                 params = cons(ftos(sym_param1), ftos(sym_param2));
1840                                 cvar_set("g_waypointeditor_symmetrical_origin", params);
1841                         }
1842                         cvar_set("g_waypointeditor_symmetrical_order", ftos(sym_param3));
1843                         LOG_INFO("Waypoint editor: loaded symmetry ", ftos(sym), " with origin ", params, " and order ", ftos(sym_param3));
1844                 }
1845                 else if (sym == -2)
1846                 {
1847                         string params = strcat(ftos(sym_param1), " ", ftos(sym_param2));
1848                         cvar_set("g_waypointeditor_symmetrical_axis", params);
1849                         LOG_INFO("Waypoint editor: loaded symmetry ", ftos(sym), " with axis ", params);
1850                 }
1851                 else
1852                         LOG_INFO("Waypoint editor: loaded symmetry ", ftos(sym));
1853                 LOG_INFO(strcat("g_waypointeditor_symmetrical", " has been set to ", cvar_string("g_waypointeditor_symmetrical")));
1854         }
1855
1856         if (WAYPOINT_VERSION < waypoint_version_loaded)
1857                 LOG_INFOF("^1Editing waypoints with a higher version number (%f) is not allowed.\n"
1858                         "Update Xonotic to make them editable.", waypoint_version_loaded);
1859
1860         return cwp + cwb;
1861 }
1862
1863 #define waypoint_fixorigin(position, tracetest_ent) \
1864         waypoint_fixorigin_down_dir(position, tracetest_ent, '0 0 -1')
1865
1866 vector waypoint_fixorigin_down_dir(vector position, entity tracetest_ent, vector down_dir)
1867 {
1868         vector endpos = position + down_dir * 3000;
1869         tracebox(position + '0 0 1', PL_MIN_CONST, PL_MAX_CONST, endpos, MOVE_NOMONSTERS, tracetest_ent);
1870         if(trace_startsolid)
1871                 tracebox(position + '0 0 1' * (1 - PL_MIN_CONST.z / 2), PL_MIN_CONST, PL_MAX_CONST, endpos, MOVE_NOMONSTERS, tracetest_ent);
1872         if(trace_startsolid)
1873                 tracebox(position + '0 0 1' * (1 - PL_MIN_CONST.z), PL_MIN_CONST, PL_MAX_CONST, endpos, MOVE_NOMONSTERS, tracetest_ent);
1874         if(trace_fraction < 1)
1875                 position = trace_endpos;
1876         return position;
1877 }
1878
1879 void waypoint_spawnforitem_force(entity e, vector org)
1880 {
1881         // Fix the waypoint altitude if necessary
1882         org = waypoint_fixorigin(org, NULL);
1883
1884         // don't spawn an item spawnfunc_waypoint if it already exists
1885         IL_EACH(g_waypoints, true,
1886         {
1887                 if(it.wpisbox)
1888                 {
1889                         if(boxesoverlap(org, org, it.absmin, it.absmax))
1890                         {
1891                                 e.nearestwaypoint = it;
1892                                 return;
1893                         }
1894                 }
1895                 else
1896                 {
1897                         if(vdist(it.origin - org, <, 16))
1898                         {
1899                                 e.nearestwaypoint = it;
1900                                 return;
1901                         }
1902                 }
1903         });
1904
1905         e.nearestwaypoint = waypoint_spawn(org, org, WAYPOINTFLAG_GENERATED | WAYPOINTFLAG_ITEM);
1906 }
1907
1908 void waypoint_spawnforitem(entity e)
1909 {
1910         if(!bot_waypoints_for_items)
1911                 return;
1912
1913         waypoint_spawnforitem_force(e, e.origin);
1914 }
1915
1916 void waypoint_spawnforteleporter_boxes(entity e, int teleport_flag, vector org1, vector org2, vector destination1, vector destination2, float timetaken)
1917 {
1918         entity w;
1919         entity dw;
1920         w = waypoint_spawn(org1, org2, WAYPOINTFLAG_GENERATED | teleport_flag);
1921         dw = waypoint_spawn(destination1, destination2, WAYPOINTFLAG_GENERATED);
1922         // one way link to the destination
1923         w.wp00_original = dw;
1924         w.wp00 = dw;
1925         w.wp00mincost = timetaken; // this is just for jump pads
1926         // the teleporter's nearest spawnfunc_waypoint is this one
1927         // (teleporters are not goals, so this is probably useless)
1928         e.nearestwaypoint = w;
1929         e.nearestwaypointtimeout = -1;
1930 }
1931
1932 void waypoint_spawnforteleporter_wz(entity e, entity tracetest_ent)
1933 {
1934         float src_angle = e.warpzone_angles.x;
1935         while (src_angle < -180) src_angle += 360;
1936         while (src_angle > 180) src_angle -= 360;
1937
1938         float dest_angle = e.enemy.warpzone_angles.x;
1939         while (dest_angle < -180) dest_angle += 360;
1940         while (dest_angle > 180) dest_angle -= 360;
1941
1942         // no waypoints for warpzones pointing upwards, they can't be used by the bots
1943         if (src_angle == -90 || dest_angle == -90)
1944                 return;
1945
1946         makevectors(e.warpzone_angles);
1947         vector src = (e.absmin + e.absmax) * 0.5;
1948         src += ((e.warpzone_origin - src) * v_forward) * v_forward + 16 * v_right;
1949         vector down_dir_src = -v_up;
1950
1951         makevectors(e.enemy.warpzone_angles);
1952         vector dest = (e.enemy.absmin + e.enemy.absmax) * 0.5;
1953         dest += ((e.enemy.warpzone_origin - dest) * v_forward) * v_forward - 16 * v_right;
1954         vector down_dir_dest = -v_up;
1955
1956         int extra_flag = 0;
1957         // don't snap to the ground waypoints for source warpzones pointing downwards
1958         if (src_angle != 90)
1959         {
1960                 src = waypoint_fixorigin_down_dir(src, tracetest_ent, down_dir_src);
1961                 dest = waypoint_fixorigin_down_dir(dest, tracetest_ent, down_dir_dest);
1962                 // oblique warpzones need a jump otherwise bots gets stuck
1963                 if (src_angle != 0)
1964                         extra_flag = WAYPOINTFLAG_JUMP;
1965         }
1966
1967         waypoint_spawnforteleporter_boxes(e, WAYPOINTFLAG_TELEPORT | extra_flag, src, src, dest, dest, 0);
1968 }
1969
1970 void waypoint_spawnforteleporter(entity e, vector destination, float timetaken, entity tracetest_ent)
1971 {
1972         destination = waypoint_fixorigin(destination, tracetest_ent);
1973         waypoint_spawnforteleporter_boxes(e, WAYPOINTFLAG_TELEPORT, e.absmin - PL_MAX_CONST + '1 1 1', e.absmax - PL_MIN_CONST + '-1 -1 -1', destination, destination, timetaken);
1974 }
1975
1976 entity waypoint_spawnpersonal(entity this, vector position)
1977 {
1978         entity w;
1979
1980         // drop the waypoint to a proper location:
1981         //   first move it up by a player height
1982         //   then move it down to hit the floor with player bbox size
1983         position = waypoint_fixorigin(position, this);
1984
1985         w = waypoint_spawn(position, position, WAYPOINTFLAG_GENERATED | WAYPOINTFLAG_PERSONAL);
1986         w.nearestwaypoint = NULL;
1987         w.nearestwaypointtimeout = 0;
1988         w.owner = this;
1989
1990         waypoint_schedulerelink(w);
1991
1992         return w;
1993 }
1994
1995 void waypoint_showlink(entity wp1, entity wp2, int display_type)
1996 {
1997         if (!(wp1 && wp2))
1998                 return;
1999
2000         if (waypoint_is_hardwiredlink(wp1, wp2) || wp1.wpflags & (WAYPOINTFLAG_JUMP | WAYPOINTFLAG_SUPPORT | WAYPOINTFLAG_CUSTOM_JP))
2001                 te_beam(NULL, wp1.origin, wp2.origin);
2002         else if (display_type == 1)
2003                 te_lightning2(NULL, wp1.origin, wp2.origin);
2004 }
2005
2006 void waypoint_showlinks_to(entity wp, int display_type)
2007 {
2008         IL_EACH(g_waypoints, it != wp,
2009         {
2010                 if (waypoint_islinked(it, wp))
2011                         waypoint_showlink(it, wp, display_type);
2012         });
2013 }
2014
2015 void waypoint_showlinks_from(entity wp, int display_type)
2016 {
2017         waypoint_showlink(wp, wp.wp00, display_type); waypoint_showlink(wp, wp.wp16, display_type);
2018         waypoint_showlink(wp, wp.wp01, display_type); waypoint_showlink(wp, wp.wp17, display_type);
2019         waypoint_showlink(wp, wp.wp02, display_type); waypoint_showlink(wp, wp.wp18, display_type);
2020         waypoint_showlink(wp, wp.wp03, display_type); waypoint_showlink(wp, wp.wp19, display_type);
2021         waypoint_showlink(wp, wp.wp04, display_type); waypoint_showlink(wp, wp.wp20, display_type);
2022         waypoint_showlink(wp, wp.wp05, display_type); waypoint_showlink(wp, wp.wp21, display_type);
2023         waypoint_showlink(wp, wp.wp06, display_type); waypoint_showlink(wp, wp.wp22, display_type);
2024         waypoint_showlink(wp, wp.wp07, display_type); waypoint_showlink(wp, wp.wp23, display_type);
2025         waypoint_showlink(wp, wp.wp08, display_type); waypoint_showlink(wp, wp.wp24, display_type);
2026         waypoint_showlink(wp, wp.wp09, display_type); waypoint_showlink(wp, wp.wp25, display_type);
2027         waypoint_showlink(wp, wp.wp10, display_type); waypoint_showlink(wp, wp.wp26, display_type);
2028         waypoint_showlink(wp, wp.wp11, display_type); waypoint_showlink(wp, wp.wp27, display_type);
2029         waypoint_showlink(wp, wp.wp12, display_type); waypoint_showlink(wp, wp.wp28, display_type);
2030         waypoint_showlink(wp, wp.wp13, display_type); waypoint_showlink(wp, wp.wp29, display_type);
2031         waypoint_showlink(wp, wp.wp14, display_type); waypoint_showlink(wp, wp.wp30, display_type);
2032         waypoint_showlink(wp, wp.wp15, display_type); waypoint_showlink(wp, wp.wp31, display_type);
2033 }
2034
2035 void crosshair_trace_waypoints(entity pl)
2036 {
2037         IL_EACH(g_waypoints, true, {
2038                 it.solid = SOLID_BSP;
2039                 if (!it.wpisbox)
2040                         setsize(it, '-16 -16 -16', '16 16 16');
2041         });
2042
2043         WarpZone_crosshair_trace(pl);
2044
2045         IL_EACH(g_waypoints, true, {
2046                 it.solid = SOLID_TRIGGER;
2047                 if (!it.wpisbox)
2048                         setsize(it, '0 0 0', '0 0 0');
2049         });
2050
2051         if (trace_ent.classname != "waypoint")
2052                 trace_ent = NULL;
2053         else if (!trace_ent.wpisbox)
2054                 trace_endpos = trace_ent.origin;
2055 }
2056
2057 void botframe_showwaypointlinks()
2058 {
2059         if (time < botframe_waypointeditorlightningtime)
2060                 return;
2061         botframe_waypointeditorlightningtime = time + 0.5;
2062         FOREACH_CLIENT(IS_PLAYER(it) && !it.isbot,
2063         {
2064                 int display_type = 0;
2065                 if (wasfreed(it.wp_aimed))
2066                         it.wp_aimed = NULL;
2067                 if (wasfreed(it.wp_locked))
2068                         it.wp_locked = NULL;
2069                 if (PHYS_INPUT_BUTTON_USE(it))
2070                         it.wp_locked = it.wp_aimed;
2071                 entity head = it.wp_locked;
2072                 if (!head)
2073                         head = navigation_findnearestwaypoint(it, false);
2074                 it.nearestwaypoint = head; // mainly useful for debug
2075                 it.nearestwaypointtimeout = time + 2; // while I'm at it...
2076                 if (IS_ONGROUND(it) || it.waterlevel > WATERLEVEL_NONE || it.wp_locked)
2077                         display_type = 1; // default
2078                 else if(waypoint_has_hardwiredlinks(head))
2079                         display_type = 2; // only hardwired
2080
2081                 if (display_type)
2082                 {
2083                         //navigation_testtracewalk = true;
2084                         //print("currently selected WP is ", etos(head), "\n");
2085                         //navigation_testtracewalk = false;
2086                         if (head)
2087                         {
2088                                 te_lightning2(NULL, head.origin, it.origin);
2089                                 if(PHYS_INPUT_BUTTON_CROUCH(it))
2090                                         waypoint_showlinks_to(head, display_type);
2091                                 else
2092                                         waypoint_showlinks_from(head, display_type);
2093                         }
2094                 }
2095                 string str;
2096                 entity wp = NULL;
2097                 if (vdist(vec2(it.velocity), <, autocvar_sv_maxspeed * 1.1))
2098                 {
2099                         crosshair_trace_waypoints(it);
2100                         if (trace_ent)
2101                         {
2102                                 wp = trace_ent;
2103                                 if (wp != it.wp_aimed)
2104                                 {
2105                                         string wp_type_str = waypoint_get_type_name(wp);
2106                                         str = sprintf("\necho Entity %d: %s^7, flags: %d, origin: %s\n", etof(wp), wp_type_str, wp.wpflags, vtos(wp.origin));
2107                                         if (wp.wpisbox)
2108                                                 str = strcat(str, sprintf("echo \" absmin: %s, absmax: %s\"\n", vtos(wp.absmin), vtos(wp.absmax)));
2109                                         stuffcmd(it, str);
2110                                         str = sprintf("Entity %d: %s^7\nflags: %d\norigin: %s", etof(wp), wp_type_str, wp.wpflags, vtos(wp.origin));
2111                                         if (wp.wpisbox)
2112                                                 str = strcat(str, sprintf(" \nabsmin: %s\nabsmax: %s", vtos(wp.absmin), vtos(wp.absmax)));
2113                                         debug_text_3d(wp.origin, str, 0, 7, '0 0 0');
2114                                 }
2115                         }
2116                 }
2117                 if (it.wp_aimed != wp)
2118                         it.wp_aimed = wp;
2119         });
2120 }
2121
2122 float botframe_autowaypoints_fixdown(vector v)
2123 {
2124         tracebox(v, PL_MIN_CONST, PL_MAX_CONST, v + '0 0 -64', MOVE_NOMONSTERS, NULL);
2125         if(trace_fraction >= 1)
2126                 return 0;
2127         return 1;
2128 }
2129
2130 float botframe_autowaypoints_createwp(vector v, entity p, .entity fld, float f)
2131 {
2132         IL_EACH(g_waypoints, boxesoverlap(v - '32 32 32', v + '32 32 32', it.absmin, it.absmax),
2133         {
2134                 // if a matching spawnfunc_waypoint already exists, don't add a duplicate
2135                 return 0;
2136         });
2137
2138         waypoint_schedulerelink(p.(fld) = waypoint_spawn(v, v, f));
2139         return 1;
2140 }
2141
2142 // return value:
2143 //    1 = WP created
2144 //    0 = no action needed
2145 //   -1 = temp fail, try from world too
2146 //   -2 = permanent fail, do not retry
2147 float botframe_autowaypoints_fix_from(entity p, float walkfromwp, entity wp, .entity fld)
2148 {
2149         // make it possible to go from p to wp, if we can
2150         // if wp is NULL, nearest is chosen
2151
2152         entity w;
2153         vector porg;
2154         float t, tmin, tmax;
2155         vector o;
2156         vector save;
2157
2158         if(!botframe_autowaypoints_fixdown(p.origin))
2159                 return -2;
2160         porg = trace_endpos;
2161
2162         if(wp)
2163         {
2164                 // if any WP w fulfills wp -> w -> porg and w is closer than wp, then switch from wp to w
2165
2166                 // if wp -> porg, then OK
2167                 float maxdist;
2168                 if(navigation_waypoint_will_link(wp.origin, porg, p, porg, 0, wp.origin, 0, walkfromwp, 1050))
2169                 {
2170                         // we may find a better one
2171                         maxdist = vlen(wp.origin - porg);
2172                 }
2173                 else
2174                 {
2175                         // accept any "good"
2176                         maxdist = 2100;
2177                 }
2178
2179                 float bestdist = maxdist;
2180                 IL_EACH(g_waypoints, it != wp && !(it.wpflags & WPFLAGMASK_NORELINK),
2181                 {
2182                         float d = vlen(wp.origin - it.origin) + vlen(it.origin - porg);
2183                         if(d < bestdist)
2184                         if(navigation_waypoint_will_link(wp.origin, it.origin, p, it.origin, 0, wp.origin, 0, walkfromwp, 1050))
2185                         if(navigation_waypoint_will_link(it.origin, porg, p, porg, 0, it.origin, 0, walkfromwp, 1050))
2186                         {
2187                                 bestdist = d;
2188                                 p.(fld) = it;
2189                         }
2190                 });
2191                 if(bestdist < maxdist)
2192                 {
2193                         LOG_INFO("update chain to new nearest WP ", etos(p.(fld)));
2194                         return 0;
2195                 }
2196
2197                 if(bestdist < 2100)
2198                 {
2199                         // we know maxdist < 2100
2200                         // so wp -> porg is still valid
2201                         // all is good
2202                         p.(fld) = wp;
2203                         return 0;
2204                 }
2205
2206                 // otherwise, no existing WP can fix our issues
2207         }
2208         else
2209         {
2210                 save = p.origin;
2211                 setorigin(p, porg);
2212                 w = navigation_findnearestwaypoint(p, walkfromwp);
2213                 setorigin(p, save);
2214                 if(w)
2215                 {
2216                         p.(fld) = w;
2217                         return 0;
2218                 }
2219         }
2220
2221         tmin = 0;
2222         tmax = 1;
2223         for (;;)
2224         {
2225                 if(tmax - tmin < 0.001)
2226                 {
2227                         // did not get a good candidate
2228                         return -1;
2229                 }
2230
2231                 t = (tmin + tmax) * 0.5;
2232                 o = antilag_takebackorigin(p, CS(p), time - t);
2233                 if(!botframe_autowaypoints_fixdown(o))
2234                         return -2;
2235                 o = trace_endpos;
2236
2237                 if(wp)
2238                 {
2239                         if(!navigation_waypoint_will_link(wp.origin, o, p, o, 0, wp.origin, 0, walkfromwp, 1050))
2240                         {
2241                                 // we cannot walk from wp.origin to o
2242                                 // get closer to tmax
2243                                 tmin = t;
2244                                 continue;
2245                         }
2246                 }
2247                 else
2248                 {
2249                         save = p.origin;
2250                         setorigin(p, o);
2251                         w = navigation_findnearestwaypoint(p, walkfromwp);
2252                         setorigin(p, save);
2253                         if(!w)
2254                         {
2255                                 // we cannot walk from any WP to o
2256                                 // get closer to tmax
2257                                 tmin = t;
2258                                 continue;
2259                         }
2260                 }
2261
2262                 // if we get here, o is valid regarding waypoints
2263                 // check if o is connected right to the player
2264                 // we break if it succeeds, as that means o is a good waypoint location
2265                 if(navigation_waypoint_will_link(o, porg, p, porg, 0, o, 0, walkfromwp, 1050))
2266                         break;
2267
2268                 // o is no good, we need to get closer to the player
2269                 tmax = t;
2270         }
2271
2272         LOG_INFO("spawning a waypoint for connecting to ", etos(wp));
2273         botframe_autowaypoints_createwp(o, p, fld, 0);
2274         return 1;
2275 }
2276
2277 // automatically create missing waypoints
2278 void botframe_autowaypoints_fix(entity p, float walkfromwp, .entity fld)
2279 {
2280         float r = botframe_autowaypoints_fix_from(p, walkfromwp, p.(fld), fld);
2281         if(r != -1)
2282                 return;
2283         r = botframe_autowaypoints_fix_from(p, walkfromwp, NULL, fld);
2284         if(r != -1)
2285                 return;
2286
2287         LOG_INFO("emergency: got no good nearby WP to build a link from, starting a new chain");
2288         if(!botframe_autowaypoints_fixdown(p.origin))
2289                 return; // shouldn't happen, caught above
2290         botframe_autowaypoints_createwp(trace_endpos, p, fld, WAYPOINTFLAG_PROTECTED);
2291 }
2292
2293 void botframe_deleteuselesswaypoints()
2294 {
2295         IL_EACH(g_items, it.bot_pickup,
2296         {
2297                 // NOTE: this protects waypoints if they're the ONLY nearest
2298                 // waypoint. That's the intention.
2299                 navigation_findnearestwaypoint(it, false);  // Walk TO item.
2300                 navigation_findnearestwaypoint(it, true);  // Walk FROM item.
2301         });
2302         IL_EACH(g_waypoints, true,
2303         {
2304                 it.wpflags |= WAYPOINTFLAG_DEAD_END;
2305                 it.wpflags &= ~WAYPOINTFLAG_USEFUL;
2306                 // WP is useful if:
2307                 if (it.wpflags & WAYPOINTFLAG_ITEM)
2308                         it.wpflags |= WAYPOINTFLAG_USEFUL;
2309                 if (it.wpflags & WAYPOINTFLAG_TELEPORT)
2310                         it.wpflags |= WAYPOINTFLAG_USEFUL;
2311                 if (it.wpflags & WAYPOINTFLAG_LADDER)
2312                         it.wpflags |= WAYPOINTFLAG_USEFUL;
2313                 if (it.wpflags & WAYPOINTFLAG_PROTECTED)
2314                         it.wpflags |= WAYPOINTFLAG_USEFUL;
2315                 // b) WP is closest WP for an item/spawnpoint/other entity
2316                 //    This has been done above by protecting these WPs.
2317         });
2318         // c) There are w1, w, w2 so that w1 -> w, w -> w2 and not w1 -> w2.
2319         IL_EACH(g_waypoints, !(it.wpflags & WAYPOINTFLAG_PERSONAL),
2320         {
2321                 for (int m = 0; m < 32; ++m)
2322                 {
2323                         entity w = waypoint_get_link(it, m);
2324                         if (!w)
2325                                 break;
2326                         if (w.wpflags & WAYPOINTFLAG_PERSONAL)
2327                                 continue;
2328                         if (w.wpflags & WAYPOINTFLAG_USEFUL)
2329                                 continue;
2330                         for (int j = 0; j < 32; ++j)
2331                         {
2332                                 entity w2 = waypoint_get_link(w, j);
2333                                 if (!w2)
2334                                         break;
2335                                 if (it == w2)
2336                                         continue;
2337                                 if (w2.wpflags & WAYPOINTFLAG_PERSONAL)
2338                                         continue;
2339                                 // If we got here, it != w2 exist with it -> w
2340                                 // and w -> w2. That means the waypoint is not
2341                                 // a dead end.
2342                                 w.wpflags &= ~WAYPOINTFLAG_DEAD_END;
2343                                 for (int k = 0; k < 32; ++k)
2344                                 {
2345                                         if (waypoint_get_link(it, k) == w2)
2346                                                 continue;
2347                                         // IF WE GET HERE, w is proven useful
2348                                         // to get from it to w2!
2349                                         w.wpflags |= WAYPOINTFLAG_USEFUL;
2350                                         goto next;
2351                                 }
2352                         }
2353 LABEL(next)
2354                 }
2355         });
2356         // d) The waypoint is a dead end. Dead end waypoints must be kept as
2357         //     they are needed to complete routes while autowaypointing.
2358
2359         IL_EACH(g_waypoints, !(it.wpflags & (WAYPOINTFLAG_USEFUL | WAYPOINTFLAG_DEAD_END)),
2360         {
2361                 LOG_INFOF("Removed a waypoint at %v. Try again for more!", it.origin);
2362                 te_explosion(it.origin);
2363                 waypoint_remove(it);
2364                 break;
2365         });
2366
2367         IL_EACH(g_waypoints, true,
2368         {
2369                 it.wpflags &= ~(WAYPOINTFLAG_USEFUL | WAYPOINTFLAG_DEAD_END); // temp flag
2370         });
2371 }
2372
2373 //.entity botframe_autowaypoints_lastwp0;
2374 .entity botframe_autowaypoints_lastwp1;
2375 void botframe_autowaypoints()
2376 {
2377         FOREACH_CLIENT(IS_PLAYER(it) && IS_REAL_CLIENT(it) && !IS_DEAD(it), {
2378                 // going back is broken, so only fix waypoints to walk TO the player
2379                 //botframe_autowaypoints_fix(p, false, botframe_autowaypoints_lastwp0);
2380                 botframe_autowaypoints_fix(it, true, botframe_autowaypoints_lastwp1);
2381                 //te_explosion(p.botframe_autowaypoints_lastwp0.origin);
2382         });
2383
2384         if (autocvar_g_waypointeditor_auto >= 2) {
2385                 botframe_deleteuselesswaypoints();
2386         }
2387 }
2388