fix a nasty crash with multiplayer servers (thanks to Willis for finding this bug)
[divverent/darkplaces.git] / sv_main.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20 // sv_main.c -- server main program
21
22 #include "quakedef.h"
23
24 static cvar_t sv_cullentities_pvs = {0, "sv_cullentities_pvs", "0"}; // fast but loose
25 static cvar_t sv_cullentities_trace = {0, "sv_cullentities_trace", "1"}; // tends to get false negatives, uses a timeout to keep entities visible a short time after becoming hidden
26 static cvar_t sv_cullentities_stats = {0, "sv_cullentities_stats", "0"};
27 static cvar_t sv_entpatch = {0, "sv_entpatch", "1"};
28
29 server_t sv;
30 server_static_t svs;
31
32 static char localmodels[MAX_MODELS][5];                 // inline model names for precache
33
34 mempool_t *sv_edicts_mempool = NULL;
35
36 //============================================================================
37
38 extern void SV_Phys_Init (void);
39 extern void SV_World_Init (void);
40
41 /*
42 ===============
43 SV_Init
44 ===============
45 */
46 void SV_Init (void)
47 {
48         int i;
49
50         Cvar_RegisterVariable (&sv_maxvelocity);
51         Cvar_RegisterVariable (&sv_gravity);
52         Cvar_RegisterVariable (&sv_friction);
53         Cvar_RegisterVariable (&sv_edgefriction);
54         Cvar_RegisterVariable (&sv_stopspeed);
55         Cvar_RegisterVariable (&sv_maxspeed);
56         Cvar_RegisterVariable (&sv_accelerate);
57         Cvar_RegisterVariable (&sv_idealpitchscale);
58         Cvar_RegisterVariable (&sv_aim);
59         Cvar_RegisterVariable (&sv_nostep);
60         Cvar_RegisterVariable (&sv_deltacompress);
61         Cvar_RegisterVariable (&sv_cullentities_pvs);
62         Cvar_RegisterVariable (&sv_cullentities_trace);
63         Cvar_RegisterVariable (&sv_cullentities_stats);
64         Cvar_RegisterVariable (&sv_entpatch);
65
66         SV_Phys_Init();
67         SV_World_Init();
68
69         for (i = 0;i < MAX_MODELS;i++)
70                 sprintf (localmodels[i], "*%i", i);
71
72         sv_edicts_mempool = Mem_AllocPool("server edicts");
73 }
74
75 /*
76 =============================================================================
77
78 EVENT MESSAGES
79
80 =============================================================================
81 */
82
83 /*
84 ==================
85 SV_StartParticle
86
87 Make sure the event gets sent to all clients
88 ==================
89 */
90 void SV_StartParticle (vec3_t org, vec3_t dir, int color, int count)
91 {
92         int             i, v;
93
94         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-18)
95                 return;
96         MSG_WriteByte (&sv.datagram, svc_particle);
97         MSG_WriteDPCoord (&sv.datagram, org[0]);
98         MSG_WriteDPCoord (&sv.datagram, org[1]);
99         MSG_WriteDPCoord (&sv.datagram, org[2]);
100         for (i=0 ; i<3 ; i++)
101         {
102                 v = dir[i]*16;
103                 if (v > 127)
104                         v = 127;
105                 else if (v < -128)
106                         v = -128;
107                 MSG_WriteChar (&sv.datagram, v);
108         }
109         MSG_WriteByte (&sv.datagram, count);
110         MSG_WriteByte (&sv.datagram, color);
111 }
112
113 /*
114 ==================
115 SV_StartEffect
116
117 Make sure the event gets sent to all clients
118 ==================
119 */
120 void SV_StartEffect (vec3_t org, int modelindex, int startframe, int framecount, int framerate)
121 {
122         if (modelindex >= 256 || startframe >= 256)
123         {
124                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-19)
125                         return;
126                 MSG_WriteByte (&sv.datagram, svc_effect2);
127                 MSG_WriteDPCoord (&sv.datagram, org[0]);
128                 MSG_WriteDPCoord (&sv.datagram, org[1]);
129                 MSG_WriteDPCoord (&sv.datagram, org[2]);
130                 MSG_WriteShort (&sv.datagram, modelindex);
131                 MSG_WriteShort (&sv.datagram, startframe);
132                 MSG_WriteByte (&sv.datagram, framecount);
133                 MSG_WriteByte (&sv.datagram, framerate);
134         }
135         else
136         {
137                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-17)
138                         return;
139                 MSG_WriteByte (&sv.datagram, svc_effect);
140                 MSG_WriteDPCoord (&sv.datagram, org[0]);
141                 MSG_WriteDPCoord (&sv.datagram, org[1]);
142                 MSG_WriteDPCoord (&sv.datagram, org[2]);
143                 MSG_WriteByte (&sv.datagram, modelindex);
144                 MSG_WriteByte (&sv.datagram, startframe);
145                 MSG_WriteByte (&sv.datagram, framecount);
146                 MSG_WriteByte (&sv.datagram, framerate);
147         }
148 }
149
150 /*
151 ==================
152 SV_StartSound
153
154 Each entity can have eight independant sound sources, like voice,
155 weapon, feet, etc.
156
157 Channel 0 is an auto-allocate channel, the others override anything
158 already running on that entity/channel pair.
159
160 An attenuation of 0 will play full volume everywhere in the level.
161 Larger attenuations will drop off.  (max 4 attenuation)
162
163 ==================
164 */
165 void SV_StartSound (edict_t *entity, int channel, char *sample, int volume, float attenuation)
166 {
167         int sound_num, field_mask, i, ent;
168
169         if (volume < 0 || volume > 255)
170                 Host_Error ("SV_StartSound: volume = %i", volume);
171
172         if (attenuation < 0 || attenuation > 4)
173                 Host_Error ("SV_StartSound: attenuation = %f", attenuation);
174
175         if (channel < 0 || channel > 7)
176                 Host_Error ("SV_StartSound: channel = %i", channel);
177
178         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-21)
179                 return;
180
181 // find precache number for sound
182         for (sound_num=1 ; sound_num<MAX_SOUNDS && sv.sound_precache[sound_num] ; sound_num++)
183                 if (!strcmp(sample, sv.sound_precache[sound_num]))
184                         break;
185
186         if ( sound_num == MAX_SOUNDS || !sv.sound_precache[sound_num] )
187         {
188                 Con_Printf ("SV_StartSound: %s not precached\n", sample);
189                 return;
190         }
191
192         ent = NUM_FOR_EDICT(entity);
193
194         field_mask = 0;
195         if (volume != DEFAULT_SOUND_PACKET_VOLUME)
196                 field_mask |= SND_VOLUME;
197         if (attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
198                 field_mask |= SND_ATTENUATION;
199         if (ent >= 8192)
200                 field_mask |= SND_LARGEENTITY;
201         if (sound_num >= 256 || channel >= 8)
202                 field_mask |= SND_LARGESOUND;
203
204 // directed messages go only to the entity they are targeted on
205         MSG_WriteByte (&sv.datagram, svc_sound);
206         MSG_WriteByte (&sv.datagram, field_mask);
207         if (field_mask & SND_VOLUME)
208                 MSG_WriteByte (&sv.datagram, volume);
209         if (field_mask & SND_ATTENUATION)
210                 MSG_WriteByte (&sv.datagram, attenuation*64);
211         if (field_mask & SND_LARGEENTITY)
212         {
213                 MSG_WriteShort (&sv.datagram, ent);
214                 MSG_WriteByte (&sv.datagram, channel);
215         }
216         else
217                 MSG_WriteShort (&sv.datagram, (ent<<3) | channel);
218         if (field_mask & SND_LARGESOUND)
219                 MSG_WriteShort (&sv.datagram, sound_num);
220         else
221                 MSG_WriteByte (&sv.datagram, sound_num);
222         for (i = 0;i < 3;i++)
223                 MSG_WriteDPCoord (&sv.datagram, entity->v->origin[i]+0.5*(entity->v->mins[i]+entity->v->maxs[i]));
224 }
225
226 /*
227 ==============================================================================
228
229 CLIENT SPAWNING
230
231 ==============================================================================
232 */
233
234 /*
235 ================
236 SV_SendServerinfo
237
238 Sends the first message from the server to a connected client.
239 This will be sent on the initial connection and upon each server load.
240 ================
241 */
242 void SV_SendServerinfo (client_t *client)
243 {
244         char                    **s;
245         char                    message[128];
246
247         // edicts get reallocated on level changes, so we need to update it here
248         client->edict = EDICT_NUM(client->number + 1);
249
250         // LordHavoc: clear entityframe tracking
251         client->entityframenumber = 0;
252         if (client->entitydatabase4)
253                 EntityFrame4_FreeDatabase(client->entitydatabase4);
254         client->entitydatabase4 = EntityFrame4_AllocDatabase(sv_clients_mempool);
255
256         MSG_WriteByte (&client->message, svc_print);
257         sprintf (message, "\002\nServer: %s build %s (progs %i crc)", gamename, buildstring, pr_crc);
258         MSG_WriteString (&client->message,message);
259
260         MSG_WriteByte (&client->message, svc_serverinfo);
261         MSG_WriteLong (&client->message, DPPROTOCOL_VERSION4);
262         MSG_WriteByte (&client->message, svs.maxclients);
263
264         if (!coop.integer && deathmatch.integer)
265                 MSG_WriteByte (&client->message, GAME_DEATHMATCH);
266         else
267                 MSG_WriteByte (&client->message, GAME_COOP);
268
269         MSG_WriteString (&client->message,PR_GetString(sv.edicts->v->message));
270
271         for (s = sv.model_precache+1 ; *s ; s++)
272                 MSG_WriteString (&client->message, *s);
273         MSG_WriteByte (&client->message, 0);
274
275         for (s = sv.sound_precache+1 ; *s ; s++)
276                 MSG_WriteString (&client->message, *s);
277         MSG_WriteByte (&client->message, 0);
278
279 // send music
280         MSG_WriteByte (&client->message, svc_cdtrack);
281         MSG_WriteByte (&client->message, sv.edicts->v->sounds);
282         MSG_WriteByte (&client->message, sv.edicts->v->sounds);
283
284 // set view
285         MSG_WriteByte (&client->message, svc_setview);
286         MSG_WriteShort (&client->message, NUM_FOR_EDICT(client->edict));
287
288         MSG_WriteByte (&client->message, svc_signonnum);
289         MSG_WriteByte (&client->message, 1);
290
291         client->sendsignon = true;
292         client->spawned = false;                // need prespawn, spawn, etc
293 }
294
295 /*
296 ================
297 SV_ConnectClient
298
299 Initializes a client_t for a new net connection.  This will only be called
300 once for a player each game, not once for each level change.
301 ================
302 */
303 void SV_ConnectClient (int clientnum, netconn_t *netconnection)
304 {
305         client_t                *client;
306         int                             i;
307         float                   spawn_parms[NUM_SPAWN_PARMS];
308
309         client = svs.clients + clientnum;
310
311 // set up the client_t
312         if (sv.loadgame)
313                 memcpy (spawn_parms, client->spawn_parms, sizeof(spawn_parms));
314         memset (client, 0, sizeof(*client));
315         client->active = true;
316         client->netconnection = netconnection;
317
318         Con_DPrintf("Client %s connected\n", client->netconnection->address);
319
320         strcpy(client->name, "unconnected");
321         strcpy(client->old_name, "unconnected");
322         client->number = clientnum;
323         client->spawned = false;
324         client->edict = EDICT_NUM(clientnum+1);
325         client->message.data = client->msgbuf;
326         client->message.maxsize = sizeof(client->msgbuf);
327         client->message.allowoverflow = true;           // we can catch it
328
329         if (sv.loadgame)
330                 memcpy (client->spawn_parms, spawn_parms, sizeof(spawn_parms));
331         else
332         {
333                 // call the progs to get default spawn parms for the new client
334                 PR_ExecuteProgram (pr_global_struct->SetNewParms, "QC function SetNewParms is missing");
335                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
336                         client->spawn_parms[i] = (&pr_global_struct->parm1)[i];
337         }
338
339         SV_SendServerinfo (client);
340 }
341
342
343 /*
344 ===============================================================================
345
346 FRAME UPDATES
347
348 ===============================================================================
349 */
350
351 /*
352 ==================
353 SV_ClearDatagram
354
355 ==================
356 */
357 void SV_ClearDatagram (void)
358 {
359         SZ_Clear (&sv.datagram);
360 }
361
362 /*
363 =============================================================================
364
365 The PVS must include a small area around the client to allow head bobbing
366 or other small motion on the client side.  Otherwise, a bob might cause an
367 entity that should be visible to not show up, especially when the bob
368 crosses a waterline.
369
370 =============================================================================
371 */
372
373 int sv_writeentitiestoclient_pvsbytes;
374 qbyte sv_writeentitiestoclient_pvs[MAX_MAP_LEAFS/8];
375
376 /*
377 =============
378 SV_WriteEntitiesToClient
379
380 =============
381 */
382 #ifdef QUAKEENTITIES
383 void SV_WriteEntitiesToClient (client_t *client, edict_t *clent, sizebuf_t *msg)
384 {
385         int e, clentnum, bits, alpha, glowcolor, glowsize, scale, effects, lightsize;
386         int culled_pvs, culled_trace, visibleentities, totalentities;
387         qbyte *pvs;
388         vec3_t origin, angles, entmins, entmaxs, testorigin, testeye;
389         float nextfullupdate, alphaf;
390         edict_t *ent;
391         eval_t *val;
392         entity_state_t *baseline; // LordHavoc: delta or startup baseline
393         model_t *model;
394
395         Mod_CheckLoaded(sv.worldmodel);
396
397 // find the client's PVS
398         VectorAdd (clent->v->origin, clent->v->view_ofs, testeye);
399         fatbytes = 0;
400         if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
401                 fatbytes = sv.worldmodel->brush.FatPVS(sv.worldmodel, testeye, 8, sv_writeentitiestoclient_pvs, sizeof(sv_writeentitiestoclient_pvs));
402
403         culled_pvs = 0;
404         culled_trace = 0;
405         visibleentities = 0;
406         totalentities = 0;
407
408         clentnum = EDICT_TO_PROG(clent); // LordHavoc: for comparison purposes
409         // send all entities that touch the pvs
410         ent = NEXT_EDICT(sv.edicts);
411         for (e = 1;e < sv.num_edicts;e++, ent = NEXT_EDICT(ent))
412         {
413                 bits = 0;
414
415                 // prevent delta compression against this frame (unless actually sent, which will restore this later)
416                 nextfullupdate = client->nextfullupdate[e];
417                 client->nextfullupdate[e] = -1;
418
419                 if (ent != clent) // LordHavoc: always send player
420                 {
421                         if ((val = GETEDICTFIELDVALUE(ent, eval_viewmodelforclient)) && val->edict)
422                         {
423                                 if (val->edict != clentnum)
424                                 {
425                                         // don't show to anyone else
426                                         continue;
427                                 }
428                                 else
429                                         bits |= U_VIEWMODEL; // show relative to the view
430                         }
431                         else
432                         {
433                                 // LordHavoc: never draw something told not to display to this client
434                                 if ((val = GETEDICTFIELDVALUE(ent, eval_nodrawtoclient)) && val->edict == clentnum)
435                                         continue;
436                                 if ((val = GETEDICTFIELDVALUE(ent, eval_drawonlytoclient)) && val->edict && val->edict != clentnum)
437                                         continue;
438                         }
439                 }
440
441                 glowsize = 0;
442
443                 if ((val = GETEDICTFIELDVALUE(ent, eval_glow_size)))
444                         glowsize = (int) val->_float >> 2;
445                 if (glowsize > 255) glowsize = 255;
446                 if (glowsize < 0) glowsize = 0;
447
448                 if ((val = GETEDICTFIELDVALUE(ent, eval_glow_trail)))
449                 if (val->_float != 0)
450                         bits |= U_GLOWTRAIL;
451
452                 if (ent->v->modelindex >= 0 && ent->v->modelindex < MAX_MODELS && *PR_GetString(ent->v->model))
453                 {
454                         model = sv.models[(int)ent->v->modelindex];
455                         Mod_CheckLoaded(model);
456                 }
457                 else
458                 {
459                         model = NULL;
460                         if (ent != clent) // LordHavoc: always send player
461                                 if (glowsize == 0 && (bits & U_GLOWTRAIL) == 0) // no effects
462                                         continue;
463                 }
464
465                 VectorCopy(ent->v->angles, angles);
466                 VectorCopy(ent->v->origin, origin);
467
468                 // ent has survived every check so far, check if it is visible
469                 if (ent != clent && ((bits & U_VIEWMODEL) == 0))
470                 {
471                         // use the predicted origin
472                         entmins[0] = origin[0] - 1.0f;
473                         entmins[1] = origin[1] - 1.0f;
474                         entmins[2] = origin[2] - 1.0f;
475                         entmaxs[0] = origin[0] + 1.0f;
476                         entmaxs[1] = origin[1] + 1.0f;
477                         entmaxs[2] = origin[2] + 1.0f;
478                         // using the model's bounding box to ensure things are visible regardless of their physics box
479                         if (model)
480                         {
481                                 if (ent->v->angles[0] || ent->v->angles[2]) // pitch and roll
482                                 {
483                                         VectorAdd(entmins, model->rotatedmins, entmins);
484                                         VectorAdd(entmaxs, model->rotatedmaxs, entmaxs);
485                                 }
486                                 else if (ent->v->angles[1])
487                                 {
488                                         VectorAdd(entmins, model->yawmins, entmins);
489                                         VectorAdd(entmaxs, model->yawmaxs, entmaxs);
490                                 }
491                                 else
492                                 {
493                                         VectorAdd(entmins, model->normalmins, entmins);
494                                         VectorAdd(entmaxs, model->normalmaxs, entmaxs);
495                                 }
496                         }
497
498                         totalentities++;
499
500                         // if not touching a visible leaf
501                         if (sv_cullentities_pvs.integer && fatbytes && sv.worldmodel && sv.worldmodel->brush.BoxTouchingPVS && !sv.worldmodel->brush.BoxTouchingPVS(sv.worldmodel, sv_writeentitiestoclient_pvs, entmins, entmaxs))
502                         {
503                                 culled_pvs++;
504                                 continue;
505                         }
506
507                         // don't try to cull embedded brush models with this, they're sometimes huge (spanning several rooms)
508                         if (sv_cullentities_trace.integer && (model == NULL || model->brush.TraceBox == NULL || model->name[0] != '*'))
509                         {
510                                 // LordHavoc: test random offsets, to maximize chance of detection
511                                 testorigin[0] = lhrandom(entmins[0], entmaxs[0]);
512                                 testorigin[1] = lhrandom(entmins[1], entmaxs[1]);
513                                 testorigin[2] = lhrandom(entmins[2], entmaxs[2]);
514
515                                 sv.worldmodel->brush.TraceBox(sv.worldmodel, &trace, testeye, testeye, testorigin, testorigin, SUPERCONTENTS_SOLID);
516                                 if (trace.fraction == 1)
517                                         client->visibletime[e] = realtime + 1;
518                                 else
519                                 {
520                                         //test nearest point on bbox
521                                         testorigin[0] = bound(entmins[0], testeye[0], entmaxs[0]);
522                                         testorigin[1] = bound(entmins[1], testeye[1], entmaxs[1]);
523                                         testorigin[2] = bound(entmins[2], testeye[2], entmaxs[2]);
524
525                                         sv.worldmodel->brush.TraceBox(sv.worldmodel, &trace, testeye, testeye, testorigin, testorigin, SUPERCONTENTS_SOLID);
526                                         if (trace.fraction == 1)
527                                                 client->visibletime[e] = realtime + 1;
528                                         else if (realtime > client->visibletime[e])
529                                         {
530                                                 culled_trace++;
531                                                 continue;
532                                         }
533                                 }
534                         }
535                         visibleentities++;
536                 }
537
538                 alphaf = 255.0f;
539                 scale = 16;
540                 glowcolor = 254;
541                 effects = ent->v->effects;
542
543                 if ((val = GETEDICTFIELDVALUE(ent, eval_alpha)))
544                 if (val->_float != 0)
545                         alphaf = val->_float * 255.0f;
546
547                 // HalfLife support
548                 if ((val = GETEDICTFIELDVALUE(ent, eval_renderamt)))
549                 if (val->_float != 0)
550                         alphaf = val->_float;
551
552                 if (alphaf == 0.0f)
553                         alphaf = 255.0f;
554                 alpha = bound(0, alphaf, 255);
555
556                 if ((val = GETEDICTFIELDVALUE(ent, eval_scale)))
557                 if ((scale = (int) (val->_float * 16.0)) == 0) scale = 16;
558                 if (scale < 0) scale = 0;
559                 if (scale > 255) scale = 255;
560
561                 if ((val = GETEDICTFIELDVALUE(ent, eval_glow_color)))
562                 if (val->_float != 0)
563                         glowcolor = (int) val->_float;
564
565                 if ((val = GETEDICTFIELDVALUE(ent, eval_fullbright)))
566                 if (val->_float != 0)
567                         effects |= EF_FULLBRIGHT;
568
569                 if (ent != clent)
570                 {
571                         if (glowsize == 0 && (bits & U_GLOWTRAIL) == 0) // no effects
572                         {
573                                 if (model) // model
574                                 {
575                                         // don't send if flagged for NODRAW and there are no effects
576                                         if (model->flags == 0 && ((effects & EF_NODRAW) || scale <= 0 || alpha <= 0))
577                                                 continue;
578                                 }
579                                 else // no model and no effects
580                                         continue;
581                         }
582                 }
583
584                 if (msg->maxsize - msg->cursize < 32) // LordHavoc: increased check from 16 to 32
585                 {
586                         Con_Printf ("packet overflow\n");
587                         // mark the rest of the entities so they can't be delta compressed against this frame
588                         for (;e < sv.num_edicts;e++)
589                         {
590                                 client->nextfullupdate[e] = -1;
591                                 client->visibletime[e] = -1;
592                         }
593                         return;
594                 }
595
596                 if ((val = GETEDICTFIELDVALUE(ent, eval_exteriormodeltoclient)) && val->edict == clentnum)
597                         bits = bits | U_EXTERIORMODEL;
598
599 // send an update
600                 baseline = &ent->e->baseline;
601
602                 if (((int)ent->v->effects & EF_DELTA) && sv_deltacompress.integer)
603                 {
604                         // every half second a full update is forced
605                         if (realtime < client->nextfullupdate[e])
606                         {
607                                 bits |= U_DELTA;
608                                 baseline = &ent->e->deltabaseline;
609                         }
610                         else
611                                 nextfullupdate = realtime + 0.5f;
612                 }
613                 else
614                         nextfullupdate = realtime + 0.5f;
615
616                 // restore nextfullupdate since this is being sent for real
617                 client->nextfullupdate[e] = nextfullupdate;
618
619                 if (e >= 256)
620                         bits |= U_LONGENTITY;
621
622                 if (ent->v->movetype == MOVETYPE_STEP)
623                         bits |= U_STEP;
624
625                 // LordHavoc: old stuff, but rewritten to have more exact tolerances
626                 if (origin[0] != baseline->origin[0])                                                                                   bits |= U_ORIGIN1;
627                 if (origin[1] != baseline->origin[1])                                                                                   bits |= U_ORIGIN2;
628                 if (origin[2] != baseline->origin[2])                                                                                   bits |= U_ORIGIN3;
629                 if (((int)(angles[0]*(256.0/360.0)) & 255) != ((int)(baseline->angles[0]*(256.0/360.0)) & 255)) bits |= U_ANGLE1;
630                 if (((int)(angles[1]*(256.0/360.0)) & 255) != ((int)(baseline->angles[1]*(256.0/360.0)) & 255)) bits |= U_ANGLE2;
631                 if (((int)(angles[2]*(256.0/360.0)) & 255) != ((int)(baseline->angles[2]*(256.0/360.0)) & 255)) bits |= U_ANGLE3;
632                 if (baseline->colormap != (qbyte) ent->v->colormap)                                                             bits |= U_COLORMAP;
633                 if (baseline->skin != (qbyte) ent->v->skin)                                                                             bits |= U_SKIN;
634                 if ((baseline->frame & 0x00FF) != ((int) ent->v->frame & 0x00FF))                               bits |= U_FRAME;
635                 if ((baseline->effects & 0x00FF) != ((int) ent->v->effects & 0x00FF))                   bits |= U_EFFECTS;
636                 if ((baseline->modelindex & 0x00FF) != ((int) ent->v->modelindex & 0x00FF))             bits |= U_MODEL;
637
638                 // LordHavoc: new stuff
639                 if (baseline->alpha != alpha)                                                                                                   bits |= U_ALPHA;
640                 if (baseline->scale != scale)                                                                                                   bits |= U_SCALE;
641                 if (((int) baseline->effects & 0xFF00) != ((int) ent->v->effects & 0xFF00))             bits |= U_EFFECTS2;
642                 if (baseline->glowsize != glowsize)                                                                                             bits |= U_GLOWSIZE;
643                 if (baseline->glowcolor != glowcolor)                                                                                   bits |= U_GLOWCOLOR;
644                 if (((int) baseline->frame & 0xFF00) != ((int) ent->v->frame & 0xFF00))                 bits |= U_FRAME2;
645                 if (((int) baseline->frame & 0xFF00) != ((int) ent->v->modelindex & 0xFF00))            bits |= U_MODEL2;
646
647                 // update delta baseline
648                 VectorCopy(ent->v->origin, ent->e->deltabaseline.origin);
649                 VectorCopy(ent->v->angles, ent->e->deltabaseline.angles);
650                 ent->e->deltabaseline.colormap = ent->v->colormap;
651                 ent->e->deltabaseline.skin = ent->v->skin;
652                 ent->e->deltabaseline.frame = ent->v->frame;
653                 ent->e->deltabaseline.effects = ent->v->effects;
654                 ent->e->deltabaseline.modelindex = ent->v->modelindex;
655                 ent->e->deltabaseline.alpha = alpha;
656                 ent->e->deltabaseline.scale = scale;
657                 ent->e->deltabaseline.glowsize = glowsize;
658                 ent->e->deltabaseline.glowcolor = glowcolor;
659
660                 // write the message
661                 if (bits >= 16777216)
662                         bits |= U_EXTEND2;
663                 if (bits >= 65536)
664                         bits |= U_EXTEND1;
665                 if (bits >= 256)
666                         bits |= U_MOREBITS;
667                 bits |= U_SIGNAL;
668
669                 MSG_WriteByte (msg, bits);
670                 if (bits & U_MOREBITS)
671                         MSG_WriteByte (msg, bits>>8);
672                 // LordHavoc: extend bytes have to be written here due to delta compression
673                 if (bits & U_EXTEND1)
674                         MSG_WriteByte (msg, bits>>16);
675                 if (bits & U_EXTEND2)
676                         MSG_WriteByte (msg, bits>>24);
677
678                 // LordHavoc: old stuff
679                 if (bits & U_LONGENTITY)
680                         MSG_WriteShort (msg,e);
681                 else
682                         MSG_WriteByte (msg,e);
683                 if (bits & U_MODEL)             MSG_WriteByte(msg,      ent->v->modelindex);
684                 if (bits & U_FRAME)             MSG_WriteByte(msg, ent->v->frame);
685                 if (bits & U_COLORMAP)  MSG_WriteByte(msg, ent->v->colormap);
686                 if (bits & U_SKIN)              MSG_WriteByte(msg, ent->v->skin);
687                 if (bits & U_EFFECTS)   MSG_WriteByte(msg, ent->v->effects);
688                 if (bits & U_ORIGIN1)   MSG_WriteDPCoord(msg, origin[0]);
689                 if (bits & U_ANGLE1)    MSG_WriteAngle(msg, angles[0]);
690                 if (bits & U_ORIGIN2)   MSG_WriteDPCoord(msg, origin[1]);
691                 if (bits & U_ANGLE2)    MSG_WriteAngle(msg, angles[1]);
692                 if (bits & U_ORIGIN3)   MSG_WriteDPCoord(msg, origin[2]);
693                 if (bits & U_ANGLE3)    MSG_WriteAngle(msg, angles[2]);
694
695                 // LordHavoc: new stuff
696                 if (bits & U_ALPHA)             MSG_WriteByte(msg, alpha);
697                 if (bits & U_SCALE)             MSG_WriteByte(msg, scale);
698                 if (bits & U_EFFECTS2)  MSG_WriteByte(msg, (int)ent->v->effects >> 8);
699                 if (bits & U_GLOWSIZE)  MSG_WriteByte(msg, glowsize);
700                 if (bits & U_GLOWCOLOR) MSG_WriteByte(msg, glowcolor);
701                 if (bits & U_FRAME2)    MSG_WriteByte(msg, (int)ent->v->frame >> 8);
702                 if (bits & U_MODEL2)    MSG_WriteByte(msg, (int)ent->v->modelindex >> 8);
703         }
704
705         if (sv_cullentities_stats.integer)
706                 Con_Printf("client \"%s\" entities: %d total, %d visible, %d culled by: %d pvs %d trace\n", client->name, totalentities, visibleentities, culled_pvs + culled_trace, culled_pvs, culled_trace);
707 }
708 #else
709 static int numsendentities;
710 static entity_state_t sendentities[MAX_EDICTS];
711 static entity_state_t *sendentitiesindex[MAX_EDICTS];
712
713 void SV_PrepareEntitiesForSending(void)
714 {
715         int e, i;
716         float f;
717         edict_t *ent;
718         entity_state_t cs;
719         // send all entities that touch the pvs
720         numsendentities = 0;
721         sendentitiesindex[0] = NULL;
722         for (e = 1, ent = NEXT_EDICT(sv.edicts);e < sv.num_edicts;e++, ent = NEXT_EDICT(ent))
723         {
724                 sendentitiesindex[e] = NULL;
725                 if (ent->e->free)
726                         continue;
727
728                 ClearStateToDefault(&cs);
729                 cs.active = true;
730                 cs.number = e;
731                 VectorCopy(ent->v->origin, cs.origin);
732                 VectorCopy(ent->v->angles, cs.angles);
733                 cs.flags = 0;
734                 cs.effects = (int)ent->v->effects;
735                 cs.colormap = (qbyte)ent->v->colormap;
736                 cs.skin = (qbyte)ent->v->skin;
737                 cs.frame = (qbyte)ent->v->frame;
738                 cs.viewmodelforclient = GETEDICTFIELDVALUE(ent, eval_viewmodelforclient)->edict;
739                 cs.exteriormodelforclient = GETEDICTFIELDVALUE(ent, eval_exteriormodeltoclient)->edict;
740                 cs.nodrawtoclient = GETEDICTFIELDVALUE(ent, eval_nodrawtoclient)->edict;
741                 cs.drawonlytoclient = GETEDICTFIELDVALUE(ent, eval_drawonlytoclient)->edict;
742                 cs.tagentity = GETEDICTFIELDVALUE(ent, eval_tag_entity)->edict;
743                 cs.tagindex = (qbyte)GETEDICTFIELDVALUE(ent, eval_tag_index)->_float;
744                 i = (int)(GETEDICTFIELDVALUE(ent, eval_glow_size)->_float * 0.25f);
745                 cs.glowsize = (qbyte)bound(0, i, 255);
746                 if (GETEDICTFIELDVALUE(ent, eval_glow_trail)->_float)
747                         cs.flags |= RENDER_GLOWTRAIL;
748
749                 cs.modelindex = 0;
750                 i = (int)ent->v->modelindex;
751                 if (i >= 1 && i < MAX_MODELS && *PR_GetString(ent->v->model))
752                         cs.modelindex = i;
753
754                 cs.alpha = 255;
755                 f = (GETEDICTFIELDVALUE(ent, eval_alpha)->_float * 255.0f);
756                 if (f)
757                 {
758                         i = (int)f;
759                         cs.alpha = (qbyte)bound(0, i, 255);
760                 }
761                 // halflife
762                 f = (GETEDICTFIELDVALUE(ent, eval_renderamt)->_float);
763                 if (f)
764                 {
765                         i = (int)f;
766                         cs.alpha = (qbyte)bound(0, i, 255);
767                 }
768
769                 cs.scale = 16;
770                 f = (GETEDICTFIELDVALUE(ent, eval_scale)->_float * 16.0f);
771                 if (f)
772                 {
773                         i = (int)f;
774                         cs.scale = (qbyte)bound(0, i, 255);
775                 }
776
777                 cs.glowcolor = 254;
778                 f = (GETEDICTFIELDVALUE(ent, eval_glow_color)->_float);
779                 if (f)
780                         cs.glowcolor = (int)f;
781
782                 if (GETEDICTFIELDVALUE(ent, eval_fullbright)->_float)
783                         cs.effects |= EF_FULLBRIGHT;
784
785                 if (ent->v->movetype == MOVETYPE_STEP)
786                         cs.flags |= RENDER_STEP;
787                 if ((cs.effects & EF_LOWPRECISION) && cs.origin[0] >= -32768 && cs.origin[1] >= -32768 && cs.origin[2] >= -32768 && cs.origin[0] <= 32767 && cs.origin[1] <= 32767 && cs.origin[2] <= 32767)
788                         cs.flags |= RENDER_LOWPRECISION;
789                 if (ent->v->colormap >= 1024)
790                         cs.flags |= RENDER_COLORMAPPED;
791                 if (cs.viewmodelforclient)
792                         cs.flags |= RENDER_VIEWMODEL; // show relative to the view
793
794                 cs.specialvisibilityradius = 0;
795                 if (cs.glowsize)
796                         cs.specialvisibilityradius = max(cs.specialvisibilityradius, cs.glowsize * 4);
797                 if (cs.flags & RENDER_GLOWTRAIL)
798                         cs.specialvisibilityradius = max(cs.specialvisibilityradius, 100);
799                 if (cs.effects & (EF_BRIGHTFIELD | EF_MUZZLEFLASH | EF_BRIGHTLIGHT | EF_DIMLIGHT | EF_RED | EF_BLUE | EF_FLAME | EF_STARDUST))
800                 {
801                         if (cs.effects & EF_BRIGHTFIELD)
802                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 80);
803                         if (cs.effects & EF_MUZZLEFLASH)
804                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 100);
805                         if (cs.effects & EF_BRIGHTLIGHT)
806                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 400);
807                         if (cs.effects & EF_DIMLIGHT)
808                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 200);
809                         if (cs.effects & EF_RED)
810                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 200);
811                         if (cs.effects & EF_BLUE)
812                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 200);
813                         if (cs.effects & EF_FLAME)
814                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 250);
815                         if (cs.effects & EF_STARDUST)
816                                 cs.specialvisibilityradius = max(cs.specialvisibilityradius, 100);
817                 }
818
819                 if (numsendentities >= MAX_EDICTS)
820                         continue;
821                 // we can omit invisible entities with no effects that are not clients
822                 // LordHavoc: this could kill tags attached to an invisible entity, I
823                 // just hope we never have to support that case
824                 if (cs.number > svs.maxclients && ((cs.effects & EF_NODRAW) || (!cs.modelindex && !cs.specialvisibilityradius)))
825                         continue;
826                 sendentitiesindex[e] = sendentities + numsendentities;
827                 sendentities[numsendentities++] = cs;
828         }
829 }
830
831 static int sententitiesmark = 0;
832 static int sententities[MAX_EDICTS];
833 static int sententitiesconsideration[MAX_EDICTS];
834 static int sv_writeentitiestoclient_culled_pvs;
835 static int sv_writeentitiestoclient_culled_trace;
836 static int sv_writeentitiestoclient_visibleentities;
837 static int sv_writeentitiestoclient_totalentities;
838 //static entity_frame_t sv_writeentitiestoclient_entityframe;
839 static int sv_writeentitiestoclient_clentnum;
840 static vec3_t sv_writeentitiestoclient_testeye;
841 static client_t *sv_writeentitiestoclient_client;
842
843 void SV_MarkWriteEntityStateToClient(entity_state_t *s)
844 {
845         vec3_t entmins, entmaxs, lightmins, lightmaxs, testorigin;
846         model_t *model;
847         trace_t trace;
848         if (sententitiesconsideration[s->number] == sententitiesmark)
849                 return;
850         sententitiesconsideration[s->number] = sententitiesmark;
851         // viewmodels don't have visibility checking
852         if (s->viewmodelforclient)
853         {
854                 if (s->viewmodelforclient != sv_writeentitiestoclient_clentnum)
855                         return;
856         }
857         // never reject player
858         else if (s->number != sv_writeentitiestoclient_clentnum)
859         {
860                 // check various rejection conditions
861                 if (s->nodrawtoclient == sv_writeentitiestoclient_clentnum)
862                         return;
863                 if (s->drawonlytoclient && s->drawonlytoclient != sv_writeentitiestoclient_clentnum)
864                         return;
865                 if (s->effects & EF_NODRAW)
866                         return;
867                 // LordHavoc: only send entities with a model or important effects
868                 if (!s->modelindex && s->specialvisibilityradius == 0)
869                         return;
870                 if (s->tagentity)
871                 {
872                         // tag attached entities simply check their parent
873                         if (!sendentitiesindex[s->tagentity])
874                                 return;
875                         SV_MarkWriteEntityStateToClient(sendentitiesindex[s->tagentity]);
876                         if (sententities[s->tagentity] != sententitiesmark)
877                                 return;
878                 }
879                 // always send world submodels, they don't generate much traffic
880                 else if ((model = sv.models[s->modelindex]) == NULL || model->name[0] != '*')
881                 {
882                         Mod_CheckLoaded(model);
883                         // entity has survived every check so far, check if visible
884                         // enlarged box to account for prediction (not that there is
885                         // any currently, but still helps the 'run into a room and
886                         // watch items pop up' problem)
887                         entmins[0] = s->origin[0] - 32.0f;
888                         entmins[1] = s->origin[1] - 32.0f;
889                         entmins[2] = s->origin[2] - 32.0f;
890                         entmaxs[0] = s->origin[0] + 32.0f;
891                         entmaxs[1] = s->origin[1] + 32.0f;
892                         entmaxs[2] = s->origin[2] + 32.0f;
893                         // using the model's bounding box to ensure things are visible regardless of their physics box
894                         if (model)
895                         {
896                                 if (s->angles[0] || s->angles[2]) // pitch and roll
897                                 {
898                                         VectorAdd(entmins, model->rotatedmins, entmins);
899                                         VectorAdd(entmaxs, model->rotatedmaxs, entmaxs);
900                                 }
901                                 else if (s->angles[1])
902                                 {
903                                         VectorAdd(entmins, model->yawmins, entmins);
904                                         VectorAdd(entmaxs, model->yawmaxs, entmaxs);
905                                 }
906                                 else
907                                 {
908                                         VectorAdd(entmins, model->normalmins, entmins);
909                                         VectorAdd(entmaxs, model->normalmaxs, entmaxs);
910                                 }
911                         }
912                         lightmins[0] = min(entmins[0], s->origin[0] - s->specialvisibilityradius);
913                         lightmins[1] = min(entmins[1], s->origin[1] - s->specialvisibilityradius);
914                         lightmins[2] = min(entmins[2], s->origin[2] - s->specialvisibilityradius);
915                         lightmaxs[0] = min(entmaxs[0], s->origin[0] + s->specialvisibilityradius);
916                         lightmaxs[1] = min(entmaxs[1], s->origin[1] + s->specialvisibilityradius);
917                         lightmaxs[2] = min(entmaxs[2], s->origin[2] + s->specialvisibilityradius);
918                         sv_writeentitiestoclient_totalentities++;
919                         // if not touching a visible leaf
920                         if (sv_cullentities_pvs.integer && sv_writeentitiestoclient_pvsbytes && sv.worldmodel && sv.worldmodel->brush.BoxTouchingPVS && !sv.worldmodel->brush.BoxTouchingPVS(sv.worldmodel, sv_writeentitiestoclient_pvs, lightmins, lightmaxs))
921                         {
922                                 sv_writeentitiestoclient_culled_pvs++;
923                                 return;
924                         }
925                         // or not seen by random tracelines
926                         if (sv_cullentities_trace.integer)
927                         {
928                                 // LordHavoc: test center first
929                                 testorigin[0] = (entmins[0] + entmaxs[0]) * 0.5f;
930                                 testorigin[1] = (entmins[1] + entmaxs[1]) * 0.5f;
931                                 testorigin[2] = (entmins[2] + entmaxs[2]) * 0.5f;
932                                 sv.worldmodel->brush.TraceBox(sv.worldmodel, &trace, sv_writeentitiestoclient_testeye, sv_writeentitiestoclient_testeye, testorigin, testorigin, SUPERCONTENTS_SOLID);
933                                 if (trace.fraction == 1 || BoxesOverlap(trace.endpos, trace.endpos, entmins, entmaxs))
934                                         sv_writeentitiestoclient_client->visibletime[s->number] = realtime + 1;
935                                 else
936                                 {
937                                         // LordHavoc: test random offsets, to maximize chance of detection
938                                         testorigin[0] = lhrandom(entmins[0], entmaxs[0]);
939                                         testorigin[1] = lhrandom(entmins[1], entmaxs[1]);
940                                         testorigin[2] = lhrandom(entmins[2], entmaxs[2]);
941                                         sv.worldmodel->brush.TraceBox(sv.worldmodel, &trace, sv_writeentitiestoclient_testeye, sv_writeentitiestoclient_testeye, testorigin, testorigin, SUPERCONTENTS_SOLID);
942                                         if (trace.fraction == 1 || BoxesOverlap(trace.endpos, trace.endpos, entmins, entmaxs))
943                                                 sv_writeentitiestoclient_client->visibletime[s->number] = realtime + 1;
944                                         else
945                                         {
946                                                 if (s->specialvisibilityradius)
947                                                 {
948                                                         // LordHavoc: test random offsets, to maximize chance of detection
949                                                         testorigin[0] = lhrandom(lightmins[0], lightmaxs[0]);
950                                                         testorigin[1] = lhrandom(lightmins[1], lightmaxs[1]);
951                                                         testorigin[2] = lhrandom(lightmins[2], lightmaxs[2]);
952                                                         sv.worldmodel->brush.TraceBox(sv.worldmodel, &trace, sv_writeentitiestoclient_testeye, sv_writeentitiestoclient_testeye, testorigin, testorigin, SUPERCONTENTS_SOLID);
953                                                         if (trace.fraction == 1 || BoxesOverlap(trace.endpos, trace.endpos, entmins, entmaxs))
954                                                                 sv_writeentitiestoclient_client->visibletime[s->number] = realtime + 1;
955                                                 }
956                                         }
957                                 }
958                                 if (realtime > sv_writeentitiestoclient_client->visibletime[s->number])
959                                 {
960                                         sv_writeentitiestoclient_culled_trace++;
961                                         return;
962                                 }
963                         }
964                         sv_writeentitiestoclient_visibleentities++;
965                 }
966         }
967         // this just marks it for sending
968         // FIXME: it would be more efficient to send here, but the entity
969         // compressor isn't that flexible
970         sententities[s->number] = sententitiesmark;
971 }
972
973 void SV_WriteEntitiesToClient(client_t *client, edict_t *clent, sizebuf_t *msg)
974 {
975         int i;
976         vec3_t testorigin;
977         entity_state_t *s;
978         entity_database4_t *d;
979         int maxbytes, n, startnumber;
980         entity_state_t *e, inactiveentitystate;
981         sizebuf_t buf;
982         qbyte data[128];
983         // prepare the buffer
984         memset(&buf, 0, sizeof(buf));
985         buf.data = data;
986         buf.maxsize = sizeof(data);
987
988         // this state's number gets played around with later
989         ClearStateToDefault(&inactiveentitystate);
990         //inactiveentitystate = defaultstate;
991
992         sv_writeentitiestoclient_client = client;
993
994         sv_writeentitiestoclient_culled_pvs = 0;
995         sv_writeentitiestoclient_culled_trace = 0;
996         sv_writeentitiestoclient_visibleentities = 0;
997         sv_writeentitiestoclient_totalentities = 0;
998
999         Mod_CheckLoaded(sv.worldmodel);
1000
1001 // find the client's PVS
1002         // the real place being tested from
1003         VectorAdd(clent->v->origin, clent->v->view_ofs, sv_writeentitiestoclient_testeye);
1004         sv_writeentitiestoclient_pvsbytes = 0;
1005         if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
1006                 sv_writeentitiestoclient_pvsbytes = sv.worldmodel->brush.FatPVS(sv.worldmodel, sv_writeentitiestoclient_testeye, 8, sv_writeentitiestoclient_pvs, sizeof(sv_writeentitiestoclient_pvs));
1007
1008         sv_writeentitiestoclient_clentnum = EDICT_TO_PROG(clent); // LordHavoc: for comparison purposes
1009
1010         sententitiesmark++;
1011
1012         // the place being reported (to consider the fact the client still
1013         // applies the view_ofs[2], so we have to only send the fractional part
1014         // of view_ofs[2], undoing what the client will redo)
1015         VectorCopy(sv_writeentitiestoclient_testeye, testorigin);
1016         i = (int) clent->v->view_ofs[2] & 255;
1017         if (i >= 128)
1018                 i -= 256;
1019         testorigin[2] -= (float) i;
1020
1021         for (i = 0;i < numsendentities;i++)
1022                 SV_MarkWriteEntityStateToClient(sendentities + i);
1023
1024         d = client->entitydatabase4;
1025         // calculate maximum bytes to allow in this packet
1026         // deduct 4 to account for the end data
1027         maxbytes = min(msg->maxsize, MAX_PACKETFRAGMENT) - 4;
1028
1029         d->currentcommit = d->commit + EntityFrame4_SV_ChooseCommitToReplace(d);
1030         d->currentcommit->numentities = 0;
1031         d->currentcommit->framenum = ++client->entityframenumber;
1032         MSG_WriteByte(msg, svc_entities);
1033         MSG_WriteLong(msg, d->referenceframenum);
1034         MSG_WriteLong(msg, d->currentcommit->framenum);
1035         if (d->currententitynumber >= sv.max_edicts)
1036                 startnumber = 1;
1037         else
1038                 startnumber = bound(1, d->currententitynumber, sv.max_edicts - 1);
1039         MSG_WriteShort(msg, startnumber);
1040         // reset currententitynumber so if the loop does not break it we will
1041         // start at beginning next frame (if it does break, it will set it)
1042         d->currententitynumber = 1;
1043         for (i = 0, n = startnumber;n < sv.max_edicts;n++)
1044         {
1045                 // find the old state to delta from
1046                 e = EntityFrame4_GetReferenceEntity(d, n);
1047                 // prepare the buffer
1048                 SZ_Clear(&buf);
1049                 // make the message
1050                 if (sententities[n] == sententitiesmark)
1051                 {
1052                         // entity exists, build an update (if empty there is no change)
1053                         // find the state in the list
1054                         for (;i < numsendentities && sendentities[i].number < n;i++);
1055                         s = sendentities + i;
1056                         if (s->number != n)
1057                                 Sys_Error("SV_WriteEntitiesToClient: s->number != n\n");
1058                         // build the update
1059                         if (s->exteriormodelforclient && s->exteriormodelforclient == sv_writeentitiestoclient_clentnum)
1060                         {
1061                                 s->flags |= RENDER_EXTERIORMODEL;
1062                                 EntityState_Write(s, &buf, e);
1063                                 s->flags &= ~RENDER_EXTERIORMODEL;
1064                         }
1065                         else
1066                                 EntityState_Write(s, &buf, e);
1067                 }
1068                 else
1069                 {
1070                         s = &inactiveentitystate;
1071                         s->number = n;
1072                         if (e->active)
1073                         {
1074                                 // entity used to exist but doesn't anymore, send remove
1075                                 MSG_WriteShort(&buf, n | 0x8000);
1076                         }
1077                 }
1078                 // if the commit is full, we're done this frame
1079                 if (msg->cursize + buf.cursize > maxbytes)
1080                 {
1081                         // next frame we will continue where we left off
1082                         break;
1083                 }
1084                 // add the entity to the commit
1085                 EntityFrame4_AddCommitEntity(d, s);
1086                 // if the message is empty, skip out now
1087                 if (buf.cursize)
1088                 {
1089                         // write the message to the packet
1090                         SZ_Write(msg, buf.data, buf.cursize);
1091                 }
1092         }
1093         d->currententitynumber = n;
1094
1095         // remove world message (invalid, and thus a good terminator)
1096         MSG_WriteShort(msg, 0x8000);
1097         // write the number of the end entity
1098         MSG_WriteShort(msg, d->currententitynumber);
1099         // just to be sure
1100         d->currentcommit = NULL;
1101
1102         if (sv_cullentities_stats.integer)
1103                 Con_Printf("client \"%s\" entities: %d total, %d visible, %d culled by: %d pvs %d trace\n", client->name, sv_writeentitiestoclient_totalentities, sv_writeentitiestoclient_visibleentities, sv_writeentitiestoclient_culled_pvs + sv_writeentitiestoclient_culled_trace, sv_writeentitiestoclient_culled_pvs, sv_writeentitiestoclient_culled_trace);
1104 }
1105 #endif
1106
1107 /*
1108 =============
1109 SV_CleanupEnts
1110
1111 =============
1112 */
1113 void SV_CleanupEnts (void)
1114 {
1115         int             e;
1116         edict_t *ent;
1117
1118         ent = NEXT_EDICT(sv.edicts);
1119         for (e=1 ; e<sv.num_edicts ; e++, ent = NEXT_EDICT(ent))
1120                 ent->v->effects = (int)ent->v->effects & ~EF_MUZZLEFLASH;
1121 }
1122
1123 /*
1124 ==================
1125 SV_WriteClientdataToMessage
1126
1127 ==================
1128 */
1129 void SV_WriteClientdataToMessage (edict_t *ent, sizebuf_t *msg)
1130 {
1131         int             bits;
1132         int             i;
1133         edict_t *other;
1134         int             items;
1135         eval_t  *val;
1136         vec3_t  punchvector;
1137         qbyte   viewzoom;
1138
1139 //
1140 // send a damage message
1141 //
1142         if (ent->v->dmg_take || ent->v->dmg_save)
1143         {
1144                 other = PROG_TO_EDICT(ent->v->dmg_inflictor);
1145                 MSG_WriteByte (msg, svc_damage);
1146                 MSG_WriteByte (msg, ent->v->dmg_save);
1147                 MSG_WriteByte (msg, ent->v->dmg_take);
1148                 for (i=0 ; i<3 ; i++)
1149                         MSG_WriteDPCoord (msg, other->v->origin[i] + 0.5*(other->v->mins[i] + other->v->maxs[i]));
1150
1151                 ent->v->dmg_take = 0;
1152                 ent->v->dmg_save = 0;
1153         }
1154
1155 //
1156 // send the current viewpos offset from the view entity
1157 //
1158         SV_SetIdealPitch ();            // how much to look up / down ideally
1159
1160 // a fixangle might get lost in a dropped packet.  Oh well.
1161         if ( ent->v->fixangle )
1162         {
1163                 MSG_WriteByte (msg, svc_setangle);
1164                 for (i=0 ; i < 3 ; i++)
1165                         MSG_WriteAngle (msg, ent->v->angles[i] );
1166                 ent->v->fixangle = 0;
1167         }
1168
1169         bits = 0;
1170
1171         if (ent->v->view_ofs[2] != DEFAULT_VIEWHEIGHT)
1172                 bits |= SU_VIEWHEIGHT;
1173
1174         if (ent->v->idealpitch)
1175                 bits |= SU_IDEALPITCH;
1176
1177 // stuff the sigil bits into the high bits of items for sbar, or else
1178 // mix in items2
1179         val = GETEDICTFIELDVALUE(ent, eval_items2);
1180
1181         if (val)
1182                 items = (int)ent->v->items | ((int)val->_float << 23);
1183         else
1184                 items = (int)ent->v->items | ((int)pr_global_struct->serverflags << 28);
1185
1186         bits |= SU_ITEMS;
1187
1188         if ( (int)ent->v->flags & FL_ONGROUND)
1189                 bits |= SU_ONGROUND;
1190
1191         if ( ent->v->waterlevel >= 2)
1192                 bits |= SU_INWATER;
1193
1194         // dpprotocol
1195         VectorClear(punchvector);
1196         if ((val = GETEDICTFIELDVALUE(ent, eval_punchvector)))
1197                 VectorCopy(val->vector, punchvector);
1198
1199         i = 255;
1200         if ((val = GETEDICTFIELDVALUE(ent, eval_viewzoom)))
1201         {
1202                 i = val->_float * 255.0f;
1203                 if (i == 0)
1204                         i = 255;
1205                 else
1206                         i = bound(0, i, 255);
1207         }
1208         viewzoom = i;
1209
1210         if (viewzoom != 255)
1211                 bits |= SU_VIEWZOOM;
1212
1213         for (i=0 ; i<3 ; i++)
1214         {
1215                 if (ent->v->punchangle[i])
1216                         bits |= (SU_PUNCH1<<i);
1217                 if (punchvector[i]) // dpprotocol
1218                         bits |= (SU_PUNCHVEC1<<i); // dpprotocol
1219                 if (ent->v->velocity[i])
1220                         bits |= (SU_VELOCITY1<<i);
1221         }
1222
1223         if (ent->v->weaponframe)
1224                 bits |= SU_WEAPONFRAME;
1225
1226         if (ent->v->armorvalue)
1227                 bits |= SU_ARMOR;
1228
1229         bits |= SU_WEAPON;
1230
1231         if (bits >= 65536)
1232                 bits |= SU_EXTEND1;
1233         if (bits >= 16777216)
1234                 bits |= SU_EXTEND2;
1235
1236 // send the data
1237
1238         MSG_WriteByte (msg, svc_clientdata);
1239         MSG_WriteShort (msg, bits);
1240         if (bits & SU_EXTEND1)
1241                 MSG_WriteByte(msg, bits >> 16);
1242         if (bits & SU_EXTEND2)
1243                 MSG_WriteByte(msg, bits >> 24);
1244
1245         if (bits & SU_VIEWHEIGHT)
1246                 MSG_WriteChar (msg, ent->v->view_ofs[2]);
1247
1248         if (bits & SU_IDEALPITCH)
1249                 MSG_WriteChar (msg, ent->v->idealpitch);
1250
1251         for (i=0 ; i<3 ; i++)
1252         {
1253                 if (bits & (SU_PUNCH1<<i))
1254                         MSG_WritePreciseAngle(msg, ent->v->punchangle[i]); // dpprotocol
1255                 if (bits & (SU_PUNCHVEC1<<i)) // dpprotocol
1256                         MSG_WriteDPCoord(msg, punchvector[i]); // dpprotocol
1257                 if (bits & (SU_VELOCITY1<<i))
1258                         MSG_WriteChar (msg, ent->v->velocity[i]/16);
1259         }
1260
1261 // [always sent]        if (bits & SU_ITEMS)
1262         MSG_WriteLong (msg, items);
1263
1264         if (bits & SU_WEAPONFRAME)
1265                 MSG_WriteByte (msg, ent->v->weaponframe);
1266         if (bits & SU_ARMOR)
1267                 MSG_WriteByte (msg, ent->v->armorvalue);
1268         if (bits & SU_WEAPON)
1269                 MSG_WriteByte (msg, SV_ModelIndex(PR_GetString(ent->v->weaponmodel)));
1270
1271         MSG_WriteShort (msg, ent->v->health);
1272         MSG_WriteByte (msg, ent->v->currentammo);
1273         MSG_WriteByte (msg, ent->v->ammo_shells);
1274         MSG_WriteByte (msg, ent->v->ammo_nails);
1275         MSG_WriteByte (msg, ent->v->ammo_rockets);
1276         MSG_WriteByte (msg, ent->v->ammo_cells);
1277
1278         if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE)
1279         {
1280                 for(i=0;i<32;i++)
1281                 {
1282                         if ( ((int)ent->v->weapon) & (1<<i) )
1283                         {
1284                                 MSG_WriteByte (msg, i);
1285                                 break;
1286                         }
1287                 }
1288         }
1289         else
1290         {
1291                 MSG_WriteByte (msg, ent->v->weapon);
1292         }
1293
1294         if (bits & SU_VIEWZOOM)
1295                 MSG_WriteByte (msg, viewzoom);
1296 }
1297
1298 /*
1299 =======================
1300 SV_SendClientDatagram
1301 =======================
1302 */
1303 static qbyte sv_sendclientdatagram_buf[MAX_DATAGRAM]; // FIXME?
1304 qboolean SV_SendClientDatagram (client_t *client)
1305 {
1306         sizebuf_t       msg;
1307
1308         msg.data = sv_sendclientdatagram_buf;
1309         msg.maxsize = sizeof(sv_sendclientdatagram_buf);
1310         msg.cursize = 0;
1311
1312         MSG_WriteByte (&msg, svc_time);
1313         MSG_WriteFloat (&msg, sv.time);
1314
1315         // add the client specific data to the datagram
1316         SV_WriteClientdataToMessage (client->edict, &msg);
1317
1318         SV_WriteEntitiesToClient (client, client->edict, &msg);
1319
1320         // copy the server datagram if there is space
1321         if (msg.cursize + sv.datagram.cursize < msg.maxsize)
1322                 SZ_Write (&msg, sv.datagram.data, sv.datagram.cursize);
1323
1324 // send the datagram
1325         if (NetConn_SendUnreliableMessage (client->netconnection, &msg) == -1)
1326         {
1327                 SV_DropClient (true);// if the message couldn't send, kick off
1328                 return false;
1329         }
1330
1331         return true;
1332 }
1333
1334 /*
1335 =======================
1336 SV_UpdateToReliableMessages
1337 =======================
1338 */
1339 void SV_UpdateToReliableMessages (void)
1340 {
1341         int i, j;
1342         client_t *client;
1343         eval_t *val;
1344         char *s;
1345
1346 // check for changes to be sent over the reliable streams
1347         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1348         {
1349                 // update the host_client fields we care about according to the entity fields
1350                 sv_player = EDICT_NUM(i+1);
1351                 s = PR_GetString(sv_player->v->netname);
1352                 if (s != host_client->name)
1353                 {
1354                         if (s == NULL)
1355                                 s = "";
1356                         // point the string back at host_client->name to keep it safe
1357                         strncpy(host_client->name, s, sizeof(host_client->name) - 1);
1358                         sv_player->v->netname = PR_SetString(host_client->name);
1359                 }
1360                 if ((val = GETEDICTFIELDVALUE(sv_player, eval_clientcolors)) && host_client->colors != val->_float)
1361                         host_client->colors = val->_float;
1362                 host_client->frags = sv_player->v->frags;
1363                 if (gamemode == GAME_NEHAHRA)
1364                         if ((val = GETEDICTFIELDVALUE(sv_player, eval_pmodel)) && host_client->pmodel != val->_float)
1365                                 host_client->pmodel = val->_float;
1366
1367                 // if the fields changed, send messages about the changes
1368                 if (strcmp(host_client->old_name, host_client->name))
1369                 {
1370                         strcpy(host_client->old_name, host_client->name);
1371                         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
1372                         {
1373                                 if (!client->spawned || !client->netconnection)
1374                                         continue;
1375                                 MSG_WriteByte (&client->message, svc_updatename);
1376                                 MSG_WriteByte (&client->message, i);
1377                                 MSG_WriteString (&client->message, host_client->name);
1378                         }
1379                 }
1380                 if (host_client->old_colors != host_client->colors)
1381                 {
1382                         host_client->old_colors = host_client->colors;
1383                         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
1384                         {
1385                                 if (!client->spawned || !client->netconnection)
1386                                         continue;
1387                                 MSG_WriteByte (&client->message, svc_updatecolors);
1388                                 MSG_WriteByte (&client->message, i);
1389                                 MSG_WriteByte (&client->message, host_client->colors);
1390                         }
1391                 }
1392                 if (host_client->old_frags != host_client->frags)
1393                 {
1394                         host_client->old_frags = host_client->frags;
1395                         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
1396                         {
1397                                 if (!client->spawned || !client->netconnection)
1398                                         continue;
1399                                 MSG_WriteByte (&client->message, svc_updatefrags);
1400                                 MSG_WriteByte (&client->message, i);
1401                                 MSG_WriteShort (&client->message, host_client->frags);
1402                         }
1403                 }
1404         }
1405
1406         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
1407                 if (client->netconnection)
1408                         SZ_Write (&client->message, sv.reliable_datagram.data, sv.reliable_datagram.cursize);
1409
1410         SZ_Clear (&sv.reliable_datagram);
1411 }
1412
1413
1414 /*
1415 =======================
1416 SV_SendNop
1417
1418 Send a nop message without trashing or sending the accumulated client
1419 message buffer
1420 =======================
1421 */
1422 void SV_SendNop (client_t *client)
1423 {
1424         sizebuf_t       msg;
1425         qbyte           buf[4];
1426
1427         msg.data = buf;
1428         msg.maxsize = sizeof(buf);
1429         msg.cursize = 0;
1430
1431         MSG_WriteChar (&msg, svc_nop);
1432
1433         if (NetConn_SendUnreliableMessage (client->netconnection, &msg) == -1)
1434                 SV_DropClient (true);   // if the message couldn't send, kick off
1435         client->last_message = realtime;
1436 }
1437
1438 /*
1439 =======================
1440 SV_SendClientMessages
1441 =======================
1442 */
1443 void SV_SendClientMessages (void)
1444 {
1445         int i, prepared = false;
1446
1447 // update frags, names, etc
1448         SV_UpdateToReliableMessages();
1449
1450 // build individual updates
1451         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1452         {
1453                 if (!host_client->active)
1454                         continue;
1455                 if (!host_client->netconnection)
1456                 {
1457                         SZ_Clear(&host_client->message);
1458                         continue;
1459                 }
1460
1461                 if (host_client->deadsocket || host_client->message.overflowed)
1462                 {
1463                         SV_DropClient (true);   // if the message couldn't send, kick off
1464                         continue;
1465                 }
1466
1467                 if (host_client->spawned)
1468                 {
1469                         if (!prepared)
1470                         {
1471                                 prepared = true;
1472                                 // only prepare entities once per frame
1473                                 SV_PrepareEntitiesForSending();
1474                         }
1475                         if (!SV_SendClientDatagram (host_client))
1476                                 continue;
1477                 }
1478                 else
1479                 {
1480                 // the player isn't totally in the game yet
1481                 // send small keepalive messages if too much time has passed
1482                 // send a full message when the next signon stage has been requested
1483                 // some other message data (name changes, etc) may accumulate
1484                 // between signon stages
1485                         if (!host_client->sendsignon)
1486                         {
1487                                 if (realtime - host_client->last_message > 5)
1488                                         SV_SendNop (host_client);
1489                                 continue;       // don't send out non-signon messages
1490                         }
1491                 }
1492
1493                 if (host_client->message.cursize || host_client->dropasap)
1494                 {
1495                         if (!NetConn_CanSendMessage (host_client->netconnection))
1496                                 continue;
1497
1498                         if (host_client->dropasap)
1499                                 SV_DropClient (false);  // went to another level
1500                         else
1501                         {
1502                                 if (NetConn_SendReliableMessage (host_client->netconnection, &host_client->message) == -1)
1503                                         SV_DropClient (true);   // if the message couldn't send, kick off
1504                                 SZ_Clear (&host_client->message);
1505                                 host_client->last_message = realtime;
1506                                 host_client->sendsignon = false;
1507                         }
1508                 }
1509         }
1510
1511 // clear muzzle flashes
1512         SV_CleanupEnts();
1513 }
1514
1515
1516 /*
1517 ==============================================================================
1518
1519 SERVER SPAWNING
1520
1521 ==============================================================================
1522 */
1523
1524 /*
1525 ================
1526 SV_ModelIndex
1527
1528 ================
1529 */
1530 int SV_ModelIndex (const char *name)
1531 {
1532         int i;
1533
1534         if (!name || !name[0])
1535                 return 0;
1536
1537         for (i=0 ; i<MAX_MODELS && sv.model_precache[i] ; i++)
1538                 if (!strcmp(sv.model_precache[i], name))
1539                         return i;
1540         if (i==MAX_MODELS || !sv.model_precache[i])
1541                 Host_Error ("SV_ModelIndex: model %s not precached", name);
1542         return i;
1543 }
1544
1545 #ifdef SV_QUAKEENTITIES
1546 /*
1547 ================
1548 SV_CreateBaseline
1549
1550 ================
1551 */
1552 void SV_CreateBaseline (void)
1553 {
1554         int i, entnum, large;
1555         edict_t *svent;
1556
1557         // LordHavoc: clear *all* states (note just active ones)
1558         for (entnum = 0;entnum < sv.max_edicts;entnum++)
1559         {
1560                 // get the current server version
1561                 svent = EDICT_NUM(entnum);
1562
1563                 // LordHavoc: always clear state values, whether the entity is in use or not
1564                 ClearStateToDefault(&svent->e->baseline);
1565
1566                 if (svent->e->free)
1567                         continue;
1568                 if (entnum > svs.maxclients && !svent->v->modelindex)
1569                         continue;
1570
1571                 // create entity baseline
1572                 VectorCopy (svent->v->origin, svent->e->baseline.origin);
1573                 VectorCopy (svent->v->angles, svent->e->baseline.angles);
1574                 svent->e->baseline.frame = svent->v->frame;
1575                 svent->e->baseline.skin = svent->v->skin;
1576                 if (entnum > 0 && entnum <= svs.maxclients)
1577                 {
1578                         svent->e->baseline.colormap = entnum;
1579                         svent->e->baseline.modelindex = SV_ModelIndex("progs/player.mdl");
1580                 }
1581                 else
1582                 {
1583                         svent->e->baseline.colormap = 0;
1584                         svent->e->baseline.modelindex = svent->v->modelindex;
1585                 }
1586
1587                 large = false;
1588                 if (svent->e->baseline.modelindex & 0xFF00 || svent->e->baseline.frame & 0xFF00)
1589                         large = true;
1590
1591                 // add to the message
1592                 if (large)
1593                         MSG_WriteByte (&sv.signon, svc_spawnbaseline2);
1594                 else
1595                         MSG_WriteByte (&sv.signon, svc_spawnbaseline);
1596                 MSG_WriteShort (&sv.signon, entnum);
1597
1598                 if (large)
1599                 {
1600                         MSG_WriteShort (&sv.signon, svent->e->baseline.modelindex);
1601                         MSG_WriteShort (&sv.signon, svent->e->baseline.frame);
1602                 }
1603                 else
1604                 {
1605                         MSG_WriteByte (&sv.signon, svent->e->baseline.modelindex);
1606                         MSG_WriteByte (&sv.signon, svent->e->baseline.frame);
1607                 }
1608                 MSG_WriteByte (&sv.signon, svent->e->baseline.colormap);
1609                 MSG_WriteByte (&sv.signon, svent->e->baseline.skin);
1610                 for (i=0 ; i<3 ; i++)
1611                 {
1612                         MSG_WriteDPCoord(&sv.signon, svent->e->baseline.origin[i]);
1613                         MSG_WriteAngle(&sv.signon, svent->e->baseline.angles[i]);
1614                 }
1615         }
1616 }
1617 #endif
1618
1619
1620 /*
1621 ================
1622 SV_SendReconnect
1623
1624 Tell all the clients that the server is changing levels
1625 ================
1626 */
1627 void SV_SendReconnect (void)
1628 {
1629         char    data[128];
1630         sizebuf_t       msg;
1631
1632         msg.data = data;
1633         msg.cursize = 0;
1634         msg.maxsize = sizeof(data);
1635
1636         MSG_WriteChar (&msg, svc_stufftext);
1637         MSG_WriteString (&msg, "reconnect\n");
1638         NetConn_SendToAll (&msg, 5);
1639
1640         if (cls.state != ca_dedicated)
1641                 Cmd_ExecuteString ("reconnect\n", src_command);
1642 }
1643
1644
1645 /*
1646 ================
1647 SV_SaveSpawnparms
1648
1649 Grabs the current state of each client for saving across the
1650 transition to another level
1651 ================
1652 */
1653 void SV_SaveSpawnparms (void)
1654 {
1655         int             i, j;
1656
1657         svs.serverflags = pr_global_struct->serverflags;
1658
1659         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1660         {
1661                 if (!host_client->active)
1662                         continue;
1663
1664         // call the progs to get default spawn parms for the new client
1665                 pr_global_struct->self = EDICT_TO_PROG(host_client->edict);
1666                 PR_ExecuteProgram (pr_global_struct->SetChangeParms, "QC function SetChangeParms is missing");
1667                 for (j=0 ; j<NUM_SPAWN_PARMS ; j++)
1668                         host_client->spawn_parms[j] = (&pr_global_struct->parm1)[j];
1669         }
1670 }
1671
1672 void SV_IncreaseEdicts(void)
1673 {
1674         int i;
1675         edict_t *ent;
1676         int oldmax_edicts = sv.max_edicts;
1677         void *oldedictsengineprivate = sv.edictsengineprivate;
1678         void *oldedictsfields = sv.edictsfields;
1679         void *oldmoved_edicts = sv.moved_edicts;
1680
1681         if (sv.max_edicts >= MAX_EDICTS)
1682                 return;
1683
1684         // links don't survive the transition, so unlink everything
1685         for (i = 0, ent = sv.edicts;i < sv.max_edicts;i++, ent++)
1686         {
1687                 if (!ent->e->free)
1688                         SV_UnlinkEdict(sv.edicts + i);
1689                 memset(&ent->e->areagrid, 0, sizeof(ent->e->areagrid));
1690         }
1691         SV_ClearWorld();
1692
1693         sv.max_edicts   = min(sv.max_edicts + 256, MAX_EDICTS);
1694         sv.edictsengineprivate = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * sizeof(edict_engineprivate_t));
1695         sv.edictsfields = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * pr_edict_size);
1696         sv.moved_edicts = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * sizeof(edict_t *));
1697
1698         memcpy(sv.edictsengineprivate, oldedictsengineprivate, oldmax_edicts * sizeof(edict_engineprivate_t));
1699         memcpy(sv.edictsfields, oldedictsfields, oldmax_edicts * pr_edict_size);
1700
1701         for (i = 0, ent = sv.edicts;i < sv.max_edicts;i++, ent++)
1702         {
1703                 ent->e = sv.edictsengineprivate + i;
1704                 ent->v = (void *)((qbyte *)sv.edictsfields + i * pr_edict_size);
1705                 // link every entity except world
1706                 if (!ent->e->free)
1707                         SV_LinkEdict(ent, false);
1708         }
1709
1710         Mem_Free(oldedictsengineprivate);
1711         Mem_Free(oldedictsfields);
1712         Mem_Free(oldmoved_edicts);
1713 }
1714
1715 /*
1716 ================
1717 SV_SpawnServer
1718
1719 This is called at the start of each level
1720 ================
1721 */
1722 extern float            scr_centertime_off;
1723
1724 void SV_SpawnServer (const char *server)
1725 {
1726         edict_t *ent;
1727         int i;
1728         qbyte *entities;
1729
1730         // let's not have any servers with no name
1731         if (hostname.string[0] == 0)
1732                 Cvar_Set ("hostname", "UNNAMED");
1733         scr_centertime_off = 0;
1734
1735         Con_DPrintf ("SpawnServer: %s\n",server);
1736         svs.changelevel_issued = false;         // now safe to issue another
1737
1738 //
1739 // tell all connected clients that we are going to a new level
1740 //
1741         if (sv.active)
1742                 SV_SendReconnect();
1743         else
1744                 NetConn_OpenServerPorts(true);
1745
1746 //
1747 // make cvars consistant
1748 //
1749         if (coop.integer)
1750                 Cvar_SetValue ("deathmatch", 0);
1751         current_skill = bound(0, (int)(skill.value + 0.5), 3);
1752
1753         Cvar_SetValue ("skill", (float)current_skill);
1754
1755 //
1756 // set up the new server
1757 //
1758         Host_ClearMemory ();
1759
1760         memset (&sv, 0, sizeof(sv));
1761
1762         strcpy (sv.name, server);
1763
1764 // load progs to get entity field count
1765         PR_LoadProgs ();
1766
1767 // allocate server memory
1768         // start out with just enough room for clients and a reasonable estimate of entities
1769         sv.max_edicts = max(svs.maxclients + 1, 512);
1770         sv.max_edicts = min(sv.max_edicts, MAX_EDICTS);
1771
1772         // clear the edict memory pool
1773         Mem_EmptyPool(sv_edicts_mempool);
1774         // edict_t structures (hidden from progs)
1775         sv.edicts = Mem_Alloc(sv_edicts_mempool, MAX_EDICTS * sizeof(edict_t));
1776         // engine private structures (hidden from progs)
1777         sv.edictsengineprivate = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * sizeof(edict_engineprivate_t));
1778         // progs fields, often accessed by server
1779         sv.edictsfields = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * pr_edict_size);
1780         // used by PushMove to move back pushed entities
1781         sv.moved_edicts = Mem_Alloc(sv_edicts_mempool, sv.max_edicts * sizeof(edict_t *));
1782         for (i = 0;i < sv.max_edicts;i++)
1783         {
1784                 ent = sv.edicts + i;
1785                 ent->e = sv.edictsengineprivate + i;
1786                 ent->v = (void *)((qbyte *)sv.edictsfields + i * pr_edict_size);
1787         }
1788
1789         sv.datagram.maxsize = sizeof(sv.datagram_buf);
1790         sv.datagram.cursize = 0;
1791         sv.datagram.data = sv.datagram_buf;
1792
1793         sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
1794         sv.reliable_datagram.cursize = 0;
1795         sv.reliable_datagram.data = sv.reliable_datagram_buf;
1796
1797         sv.signon.maxsize = sizeof(sv.signon_buf);
1798         sv.signon.cursize = 0;
1799         sv.signon.data = sv.signon_buf;
1800
1801 // leave slots at start for clients only
1802         sv.num_edicts = svs.maxclients+1;
1803
1804         sv.state = ss_loading;
1805         sv.paused = false;
1806
1807         sv.time = 1.0;
1808
1809         Mod_ClearUsed();
1810
1811         strcpy (sv.name, server);
1812         sprintf (sv.modelname,"maps/%s.bsp", server);
1813         sv.worldmodel = Mod_ForName(sv.modelname, false, true, true);
1814         if (!sv.worldmodel)
1815         {
1816                 Con_Printf ("Couldn't spawn server %s\n", sv.modelname);
1817                 sv.active = false;
1818                 return;
1819         }
1820         sv.models[1] = sv.worldmodel;
1821
1822 //
1823 // clear world interaction links
1824 //
1825         SV_ClearWorld ();
1826
1827         sv.sound_precache[0] = "";
1828
1829         sv.model_precache[0] = "";
1830         sv.model_precache[1] = sv.modelname;
1831         for (i = 1;i < sv.worldmodel->brush.numsubmodels;i++)
1832         {
1833                 sv.model_precache[i+1] = localmodels[i];
1834                 sv.models[i+1] = Mod_ForName (localmodels[i], false, false, false);
1835         }
1836
1837 //
1838 // load the rest of the entities
1839 //
1840         ent = EDICT_NUM(0);
1841         memset (ent->v, 0, progs->entityfields * 4);
1842         ent->e->free = false;
1843         ent->v->model = PR_SetString(sv.modelname);
1844         ent->v->modelindex = 1;         // world model
1845         ent->v->solid = SOLID_BSP;
1846         ent->v->movetype = MOVETYPE_PUSH;
1847
1848         if (coop.value)
1849                 pr_global_struct->coop = coop.integer;
1850         else
1851                 pr_global_struct->deathmatch = deathmatch.integer;
1852
1853         pr_global_struct->mapname = PR_SetString(sv.name);
1854
1855 // serverflags are for cross level information (sigils)
1856         pr_global_struct->serverflags = svs.serverflags;
1857
1858         // load replacement entity file if found
1859         entities = NULL;
1860         if (sv_entpatch.integer)
1861                 entities = FS_LoadFile(va("maps/%s.ent", sv.name), true);
1862         if (entities)
1863         {
1864                 Con_Printf("Loaded maps/%s.ent\n", sv.name);
1865                 ED_LoadFromFile (entities);
1866                 Mem_Free(entities);
1867         }
1868         else
1869                 ED_LoadFromFile (sv.worldmodel->brush.entities);
1870
1871
1872         // LordHavoc: clear world angles (to fix e3m3.bsp)
1873         VectorClear(sv.edicts->v->angles);
1874
1875         sv.active = true;
1876
1877 // all setup is completed, any further precache statements are errors
1878         sv.state = ss_active;
1879
1880 // run two frames to allow everything to settle
1881         for (i = 0;i < 2;i++)
1882         {
1883                 sv.frametime = pr_global_struct->frametime = host_frametime = 0.1;
1884                 SV_Physics ();
1885         }
1886
1887         Mod_PurgeUnused();
1888
1889 #ifdef QUAKEENTITIES
1890 // create a baseline for more efficient communications
1891         SV_CreateBaseline ();
1892 #endif
1893
1894 // send serverinfo to all connected clients
1895         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1896                 if (host_client->netconnection)
1897                         SV_SendServerinfo(host_client);
1898
1899         Con_DPrintf ("Server spawned.\n");
1900         NetConn_Heartbeat (2);
1901 }
1902