6 REGISTER_NET_TEMP(net_debug)
8 NET_HANDLE(net_debug, bool isNew)
10 Net_Accept(net_debug);
11 this.sv_entnum = ReadShort();
12 if (ReadByte()) make_pure(this);
13 this.origin_x = ReadCoord();
14 this.origin_y = ReadCoord();
15 this.origin_z = ReadCoord();
16 setorigin(this, this.origin);
17 this.debug = true; // identify server entities by this
18 this.classname = strzone(ReadString());
19 this.sourceLocFile = strzone(ReadString());
20 this.sourceLocLine = ReadInt24_t();
26 bool debug_send(entity this, entity to, int sf)
28 int channel = MSG_ONE;
30 WriteHeader(channel, net_debug);
31 WriteShort(channel, num_for_edict(this));
32 WriteByte(channel, is_pure(this));
33 WriteCoord(channel, this.origin.x);
34 WriteCoord(channel, this.origin.y);
35 WriteCoord(channel, this.origin.z);
36 WriteString(channel, this.classname);
37 WriteString(channel, this.sourceLocFile);
38 WriteInt24_t(channel, this.sourceLocLine);
43 bool autocvar_debugdraw;
46 string autocvar_debugdraw_filter;
48 vector project_3d_to_2d(vector vec);
51 if (!autocvar_debugdraw) return;
52 static int debugdraw_frame;
55 FOREACH_ENTITY(true, LAMBDA(
56 if (it.debugdraw_last == debugdraw_frame) continue;
58 for (entity e = findradius(it.origin, 100); e; e = e.chain)
60 if (e.debugdraw_last == debugdraw_frame) continue;
61 e.debugdraw_last = debugdraw_frame;
62 vector rgb = (e.debug) ? '0 0 1' : '1 0 0';
63 if (autocvar_debugdraw_filter != "" && !strhasword(autocvar_debugdraw_filter, e.classname)) continue;
66 if (autocvar_debugdraw < 2) continue;
69 vector pos = project_3d_to_2d(e.origin);
70 if (pos.z < 0) continue;
73 drawcolorcodedstring2(pos,
74 sprintf("%d: '%s'@%s:%d", (e.debug ? e.sv_entnum : num_for_edict(e)),
75 e.classname, e.sourceLocFile, e.sourceLocLine),
76 size * '1 1 0', rgb, 0.5, DRAWFLAG_NORMAL);
84 GENERIC_COMMAND(debugdraw_sv, "Dump all server entities")
88 case CMD_REQUEST_COMMAND:
90 if (!autocvar_debugdraw) return;
93 for (entity e = NULL; (e = findfloat(e, debug, 0)) && rem > 0; )
95 if (autocvar_debugdraw < 2 && is_pure(e)) continue;
96 debug_send(e, nextent(NULL), 0);
100 LOG_INFOF("%d server entities sent\n", n - rem);
105 case CMD_REQUEST_USAGE:
107 LOG_INFO(strcat("\nUsage:^3 ", GetProgramCommandPrefix(), " debugdraw_sv"));
114 GENERIC_COMMAND(bufstr_get, "Examine a string buffer object")
118 case CMD_REQUEST_COMMAND:
120 int bufhandle = stof(argv(1));
121 int string_index = stof(argv(2));
122 string s = bufstr_get(bufhandle, string_index);
123 LOG_INFOF("%s\n", s);
128 case CMD_REQUEST_USAGE:
130 LOG_INFO(strcat("\nUsage:^3 ", GetProgramCommandPrefix(), " bufstr_get bufhandle string_index"));