?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Fix for the problem that SDL applications exited
[AROS-Contrib.git] / Games / Quake / host_cmd.c
blob79c20a3ee94a97fcbbcb6c2107d1d558b4ad94df
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
21 #include "quakedef.h"
22
23 extern cvar_t pausable;
24
25 int current_skill;
26
27 void Mod_Print (void);
28
29 /*
30 ==================
31 Host_Quit_f
32 ==================
33 */
34
35 extern void M_Menu_Quit_f (void);
36
37 void Host_Quit_f (void)
38 {
39 if (key_dest != key_console && cls.state != ca_dedicated)
40 {
41 M_Menu_Quit_f ();
42 return;
43 }
44 CL_Disconnect ();
45 Host_ShutdownServer(false);
46
47 Sys_Quit ();
48 }
49
50
51 /*
52 ==================
53 Host_Status_f
54 ==================
55 */
56 void Host_Status_f (void)
57 {
58 client_t *client;
59 int seconds;
60 int minutes;
61 int hours = 0;
62 int j;
63 void (*print) (char *fmt, ...);
64
65 if (cmd_source == src_command)
66 {
67 if (!sv.active)
68 {
69 Cmd_ForwardToServer ();
70 return;
71 }
72 print = Con_Printf;
73 }
74 else
75 print = SV_ClientPrintf;
76
77 print ("host: %s\n", Cvar_VariableString ("hostname"));
78 print ("version: %4.2f\n", VERSION);
79 if (tcpipAvailable)
80 print ("tcp/ip: %s\n", my_tcpip_address);
81 if (ipxAvailable)
82 print ("ipx: %s\n", my_ipx_address);
83 print ("map: %s\n", sv.name);
84 print ("players: %i active (%i max)\n\n", net_activeconnections, svs.maxclients);
85 for (j=0, client = svs.clients ; j<svs.maxclients ; j++, client++)
86 {
87 if (!client->active)
88 continue;
89 seconds = (int)(net_time - client->netconnection->connecttime);
90 minutes = seconds / 60;
91 if (minutes)
92 {
93 seconds -= (minutes * 60);
94 hours = minutes / 60;
95 if (hours)
96 minutes -= (hours * 60);
97 }
98 else
99 hours = 0;
100 print ("#%-2u %-16.16s %3i %2i:%02i:%02i\n", j+1, client->name, (int)client->edict->v.frags, hours, minutes, seconds);
101 print (" %s\n", client->netconnection->address);
102 }
103 }
104
105
106 /*
107 ==================
108 Host_God_f
109
110 Sets client to godmode
111 ==================
112 */
113 void Host_God_f (void)
114 {
115 if (cmd_source == src_command)
116 {
117 Cmd_ForwardToServer ();
118 return;
119 }
120
121 if (pr_global_struct->deathmatch && !host_client->privileged)
122 return;
123
124 sv_player->v.flags = (int)sv_player->v.flags ^ FL_GODMODE;
125 if (!((int)sv_player->v.flags & FL_GODMODE) )
126 SV_ClientPrintf ("godmode OFF\n");
127 else
128 SV_ClientPrintf ("godmode ON\n");
129 }
130
131 void Host_Notarget_f (void)
132 {
133 if (cmd_source == src_command)
134 {
135 Cmd_ForwardToServer ();
136 return;
137 }
138
139 if (pr_global_struct->deathmatch && !host_client->privileged)
140 return;
141
142 sv_player->v.flags = (int)sv_player->v.flags ^ FL_NOTARGET;
143 if (!((int)sv_player->v.flags & FL_NOTARGET) )
144 SV_ClientPrintf ("notarget OFF\n");
145 else
146 SV_ClientPrintf ("notarget ON\n");
147 }
148
149 qboolean noclip_anglehack;
150
151 void Host_Noclip_f (void)
152 {
153 if (cmd_source == src_command)
154 {
155 Cmd_ForwardToServer ();
156 return;
157 }
158
159 if (pr_global_struct->deathmatch && !host_client->privileged)
160 return;
161
162 if (sv_player->v.movetype != MOVETYPE_NOCLIP)
163 {
164 noclip_anglehack = true;
165 sv_player->v.movetype = MOVETYPE_NOCLIP;
166 SV_ClientPrintf ("noclip ON\n");
167 }
168 else
169 {
170 noclip_anglehack = false;
171 sv_player->v.movetype = MOVETYPE_WALK;
172 SV_ClientPrintf ("noclip OFF\n");
173 }
174 }
175
176 /*
177 ==================
178 Host_Fly_f
179
180 Sets client to flymode
181 ==================
182 */
183 void Host_Fly_f (void)
184 {
185 if (cmd_source == src_command)
186 {
187 Cmd_ForwardToServer ();
188 return;
189 }
190
191 if (pr_global_struct->deathmatch && !host_client->privileged)
192 return;
193
194 if (sv_player->v.movetype != MOVETYPE_FLY)
195 {
196 sv_player->v.movetype = MOVETYPE_FLY;
197 SV_ClientPrintf ("flymode ON\n");
198 }
199 else
200 {
201 sv_player->v.movetype = MOVETYPE_WALK;
202 SV_ClientPrintf ("flymode OFF\n");
203 }
204 }
205
206
207 /*
208 ==================
209 Host_Ping_f
210
211 ==================
212 */
213 void Host_Ping_f (void)
214 {
215 int i, j;
216 float total;
217 client_t *client;
218
219 if (cmd_source == src_command)
220 {
221 Cmd_ForwardToServer ();
222 return;
223 }
224
225 SV_ClientPrintf ("Client ping times:\n");
226 for (i=0, client = svs.clients ; i<svs.maxclients ; i++, client++)
227 {
228 if (!client->active)
229 continue;
230 total = 0;
231 for (j=0 ; j<NUM_PING_TIMES ; j++)
232 total+=client->ping_times[j];
233 total /= NUM_PING_TIMES;
234 SV_ClientPrintf ("%4i %s\n", (int)(total*1000), client->name);
235 }
236 }
237
238 /*
239 ===============================================================================
240
241 SERVER TRANSITIONS
242
243 ===============================================================================
244 */
245
246
247 /*
248 ======================
249 Host_Map_f
250
251 handle a
252 map <servername>
253 command from the console. Active clients are kicked off.
254 ======================
255 */
256 void Host_Map_f (void)
257 {
258 int i;
259 char name[MAX_QPATH];
260
261 if (cmd_source != src_command)
262 return;
263
264 cls.demonum = -1; // stop demo loop in case this fails
265
266 CL_Disconnect ();
267 Host_ShutdownServer(false);
268
269 key_dest = key_game; // remove console or menu
270 SCR_BeginLoadingPlaque ();
271
272 cls.mapstring[0] = 0;
273 for (i=0 ; i<Cmd_Argc() ; i++)
274 {
275 strcat (cls.mapstring, Cmd_Argv(i));
276 strcat (cls.mapstring, " ");
277 }
278 strcat (cls.mapstring, "\n");
279
280 svs.serverflags = 0; // haven't completed an episode yet
281 strcpy (name, Cmd_Argv(1));
282 #ifdef QUAKE2
283 SV_SpawnServer (name, NULL);
284 #else
285 SV_SpawnServer (name);
286 #endif
287 if (!sv.active)
288 return;
289
290 if (cls.state != ca_dedicated)
291 {
292 strcpy (cls.spawnparms, "");
293
294 for (i=2 ; i<Cmd_Argc() ; i++)
295 {
296 strcat (cls.spawnparms, Cmd_Argv(i));
297 strcat (cls.spawnparms, " ");
298 }
299
300 Cmd_ExecuteString ("connect local", src_command);
301 }
302 }
303
304 /*
305 ==================
306 Host_Changelevel_f
307
308 Goes to a new map, taking all clients along
309 ==================
310 */
311 void Host_Changelevel_f (void)
312 {
313 #ifdef QUAKE2
314 char level[MAX_QPATH];
315 char _startspot[MAX_QPATH];
316 char *startspot;
317
318 if (Cmd_Argc() < 2)
319 {
320 Con_Printf ("changelevel <levelname> : continue game on a new level\n");
321 return;
322 }
323 if (!sv.active || cls.demoplayback)
324 {
325 Con_Printf ("Only the server may changelevel\n");
326 return;
327 }
328
329 strcpy (level, Cmd_Argv(1));
330 if (Cmd_Argc() == 2)
331 startspot = NULL;
332 else
333 {
334 strcpy (_startspot, Cmd_Argv(2));
335 startspot = _startspot;
336 }
337
338 SV_SaveSpawnparms ();
339 SV_SpawnServer (level, startspot);
340 #else
341 char level[MAX_QPATH];
342
343 if (Cmd_Argc() != 2)
344 {
345 Con_Printf ("changelevel <levelname> : continue game on a new level\n");
346 return;
347 }
348 if (!sv.active || cls.demoplayback)
349 {
350 Con_Printf ("Only the server may changelevel\n");
351 return;
352 }
353 SV_SaveSpawnparms ();
354 strcpy (level, Cmd_Argv(1));
355 SV_SpawnServer (level);
356 #endif
357 }
358
359 /*
360 ==================
361 Host_Restart_f
362
363 Restarts the current server for a dead player
364 ==================
365 */
366 void Host_Restart_f (void)
367 {
368 char mapname[MAX_QPATH];
369 #ifdef QUAKE2
370 char startspot[MAX_QPATH];
371 #endif
372
373 if (cls.demoplayback || !sv.active)
374 return;
375
376 if (cmd_source != src_command)
377 return;
378 strcpy (mapname, sv.name); // must copy out, because it gets cleared
379 // in sv_spawnserver
380 #ifdef QUAKE2
381 strcpy(startspot, sv.startspot);
382 SV_SpawnServer (mapname, startspot);
383 #else
384 SV_SpawnServer (mapname);
385 #endif
386 }
387
388 /*
389 ==================
390 Host_Reconnect_f
391
392 This command causes the client to wait for the signon messages again.
393 This is sent just before a server changes levels
394 ==================
395 */
396 void Host_Reconnect_f (void)
397 {
398 SCR_BeginLoadingPlaque ();
399 cls.signon = 0; // need new connection messages
400 }
401
402 /*
403 =====================
404 Host_Connect_f
405
406 User command to connect to server
407 =====================
408 */
409 void Host_Connect_f (void)
410 {
411 char name[MAX_QPATH];
412
413 cls.demonum = -1; // stop demo loop in case this fails
414 if (cls.demoplayback)
415 {
416 CL_StopPlayback ();
417 CL_Disconnect ();
418 }
419 strcpy (name, Cmd_Argv(1));
420 CL_EstablishConnection (name);
421 Host_Reconnect_f ();
422 }
423
424
425 /*
426 ===============================================================================
427
428 LOAD / SAVE GAME
429
430 ===============================================================================
431 */
432
433 #define SAVEGAME_VERSION 5
434
435 /*
436 ===============
437 Host_SavegameComment
438
439 Writes a SAVEGAME_COMMENT_LENGTH character comment describing the current
440 ===============
441 */
442 void Host_SavegameComment (char *text)
443 {
444 int i;
445 char kills[20];
446
447 for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
448 text[i] = ' ';
449 memcpy (text, cl.levelname, strlen(cl.levelname));
450 sprintf (kills,"kills:%3i/%3i", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]);
451 memcpy (text+22, kills, strlen(kills));
452 // convert space to _ to make stdio happy
453 for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
454 if (text[i] == ' ')
455 text[i] = '_';
456 text[SAVEGAME_COMMENT_LENGTH] = '\0';
457 }
458
459
460 /*
461 ===============
462 Host_Savegame_f
463 ===============
464 */
465 void Host_Savegame_f (void)
466 {
467 char name[256];
468 FILE *f;
469 int i;
470 char comment[SAVEGAME_COMMENT_LENGTH+1];
471
472 if (cmd_source != src_command)
473 return;
474
475 if (!sv.active)
476 {
477 Con_Printf ("Not playing a local game.\n");
478 return;
479 }
480
481 if (cl.intermission)
482 {
483 Con_Printf ("Can't save in intermission.\n");
484 return;
485 }
486
487 if (svs.maxclients != 1)
488 {
489 Con_Printf ("Can't save multiplayer games.\n");
490 return;
491 }
492
493 if (Cmd_Argc() != 2)
494 {
495 Con_Printf ("save <savename> : save a game\n");
496 return;
497 }
498
499 if (strstr(Cmd_Argv(1), ".."))
500 {
501 Con_Printf ("Relative pathnames are not allowed.\n");
502 return;
503 }
504
505 for (i=0 ; i<svs.maxclients ; i++)
506 {
507 if (svs.clients[i].active && (svs.clients[i].edict->v.health <= 0) )
508 {
509 Con_Printf ("Can't savegame with a dead player\n");
510 return;
511 }
512 }
513
514 sprintf (name, "%s/%s", com_gamedir, Cmd_Argv(1));
515 COM_DefaultExtension (name, ".sav");
516
517 Con_Printf ("Saving game to %s...\n", name);
518 f = fopen (name, "w");
519 if (!f)
520 {
521 Con_Printf ("ERROR: couldn't open.\n");
522 return;
523 }
524
525 fprintf (f, "%i\n", SAVEGAME_VERSION);
526 Host_SavegameComment (comment);
527 fprintf (f, "%s\n", comment);
528 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
529 fprintf (f, "%f\n", svs.clients->spawn_parms[i]);
530 fprintf (f, "%d\n", current_skill);
531 fprintf (f, "%s\n", sv.name);
532 fprintf (f, "%f\n",sv.time);
533
534 // write the light styles
535
536 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
537 {
538 if (sv.lightstyles[i])
539 fprintf (f, "%s\n", sv.lightstyles[i]);
540 else
541 fprintf (f,"m\n");
542 }
543
544
545 ED_WriteGlobals (f);
546 for (i=0 ; i<sv.num_edicts ; i++)
547 {
548 ED_Write (f, EDICT_NUM(i));
549 fflush (f);
550 }
551 fclose (f);
552 Con_Printf ("done.\n");
553 }
554
555
556 /*
557 ===============
558 Host_Loadgame_f
559 ===============
560 */
561 void Host_Loadgame_f (void)
562 {
563 char name[MAX_OSPATH];
564 FILE *f;
565 char mapname[MAX_QPATH];
566 float time, tfloat;
567 char str[32768], *start;
568 int i, r;
569 edict_t *ent;
570 int entnum;
571 int version;
572 float spawn_parms[NUM_SPAWN_PARMS];
573
574 if (cmd_source != src_command)
575 return;
576
577 if (Cmd_Argc() != 2)
578 {
579 Con_Printf ("load <savename> : load a game\n");
580 return;
581 }
582
583 cls.demonum = -1; // stop demo loop in case this fails
584
585 sprintf (name, "%s/%s", com_gamedir, Cmd_Argv(1));
586 COM_DefaultExtension (name, ".sav");
587
588 // we can't call SCR_BeginLoadingPlaque, because too much stack space has
589 // been used. The menu calls it before stuffing loadgame command
590 // SCR_BeginLoadingPlaque ();
591
592 Con_Printf ("Loading game from %s...\n", name);
593 f = fopen (name, "r");
594 if (!f)
595 {
596 Con_Printf ("ERROR: couldn't open.\n");
597 return;
598 }
599
600 fscanf (f, "%i\n", &version);
601 if (version != SAVEGAME_VERSION)
602 {
603 fclose (f);
604 Con_Printf ("Savegame is version %i, not %i\n", version, SAVEGAME_VERSION);
605 return;
606 }
607 fscanf (f, "%s\n", str);
608 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
609 fscanf (f, "%f\n", &spawn_parms[i]);
610 // this silliness is so we can load 1.06 save files, which have float skill values
611 fscanf (f, "%f\n", &tfloat);
612 current_skill = (int)(tfloat + 0.1);
613 Cvar_SetValue ("skill", (float)current_skill);
614
615 #ifdef QUAKE2
616 Cvar_SetValue ("deathmatch", 0);
617 Cvar_SetValue ("coop", 0);
618 Cvar_SetValue ("teamplay", 0);
619 #endif
620
621 fscanf (f, "%s\n",mapname);
622 fscanf (f, "%f\n",&time);
623
624 CL_Disconnect_f ();
625
626 #ifdef QUAKE2
627 SV_SpawnServer (mapname, NULL);
628 #else
629 SV_SpawnServer (mapname);
630 #endif
631 if (!sv.active)
632 {
633 Con_Printf ("Couldn't load map\n");
634 return;
635 }
636 sv.paused = true; // pause until all clients connect
637 sv.loadgame = true;
638
639 // load the light styles
640
641 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
642 {
643 fscanf (f, "%s\n", str);
644 sv.lightstyles[i] = Hunk_Alloc (strlen(str)+1);
645 strcpy (sv.lightstyles[i], str);
646 }
647
648 // load the edicts out of the savegame file
649 entnum = -1; // -1 is the globals
650 while (!feof(f))
651 {
652 for (i=0 ; i<sizeof(str)-1 ; i++)
653 {
654 r = fgetc (f);
655 if (r == EOF || !r)
656 break;
657 str[i] = r;
658 if (r == '}')
659 {
660 i++;
661 break;
662 }
663 }
664 if (i == sizeof(str)-1)
665 Sys_Error ("Loadgame buffer overflow");
666 str[i] = 0;
667 start = str;
668 start = COM_Parse(str);
669 if (!com_token[0])
670 break; // end of file
671 if (strcmp(com_token,"{"))
672 Sys_Error ("First token isn't a brace");
673
674 if (entnum == -1)
675 { // parse the global vars
676 ED_ParseGlobals (start);
677 }
678 else
679 { // parse an edict
680
681 ent = EDICT_NUM(entnum);
682 memset (&ent->v, 0, progs->entityfields * 4);
683 ent->free = false;
684 ED_ParseEdict (start, ent);
685
686 // link it into the bsp tree
687 if (!ent->free)
688 SV_LinkEdict (ent, false);
689 }
690
691 entnum++;
692 }
693
694 sv.num_edicts = entnum;
695 sv.time = time;
696
697 fclose (f);
698
699 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
700 svs.clients->spawn_parms[i] = spawn_parms[i];
701
702 if (cls.state != ca_dedicated)
703 {
704 CL_EstablishConnection ("local");
705 Host_Reconnect_f ();
706 }
707 }
708
709 #ifdef QUAKE2
710 void SaveGamestate()
711 {
712 char name[256];
713 FILE *f;
714 int i;
715 char comment[SAVEGAME_COMMENT_LENGTH+1];
716 edict_t *ent;
717
718 sprintf (name, "%s/%s.gip", com_gamedir, sv.name);
719
720 Con_Printf ("Saving game to %s...\n", name);
721 f = fopen (name, "w");
722 if (!f)
723 {
724 Con_Printf ("ERROR: couldn't open.\n");
725 return;
726 }
727
728 fprintf (f, "%i\n", SAVEGAME_VERSION);
729 Host_SavegameComment (comment);
730 fprintf (f, "%s\n", comment);
731 // for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
732 // fprintf (f, "%f\n", svs.clients->spawn_parms[i]);
733 fprintf (f, "%f\n", skill.value);
734 fprintf (f, "%s\n", sv.name);
735 fprintf (f, "%f\n", sv.time);
736
737 // write the light styles
738
739 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
740 {
741 if (sv.lightstyles[i])
742 fprintf (f, "%s\n", sv.lightstyles[i]);
743 else
744 fprintf (f,"m\n");
745 }
746
747
748 for (i=svs.maxclients+1 ; i<sv.num_edicts ; i++)
749 {
750 ent = EDICT_NUM(i);
751 if ((int)ent->v.flags & FL_ARCHIVE_OVERRIDE)
752 continue;
753 fprintf (f, "%i\n",i);
754 ED_Write (f, ent);
755 fflush (f);
756 }
757 fclose (f);
758 Con_Printf ("done.\n");
759 }
760
761 int LoadGamestate(char *level, char *startspot)
762 {
763 char name[MAX_OSPATH];
764 FILE *f;
765 char mapname[MAX_QPATH];
766 float time, sk;
767 char str[32768], *start;
768 int i, r;
769 edict_t *ent;
770 int entnum;
771 int version;
772 // float spawn_parms[NUM_SPAWN_PARMS];
773
774 sprintf (name, "%s/%s.gip", com_gamedir, level);
775
776 Con_Printf ("Loading game from %s...\n", name);
777 f = fopen (name, "r");
778 if (!f)
779 {
780 Con_Printf ("ERROR: couldn't open.\n");
781 return -1;
782 }
783
784 fscanf (f, "%i\n", &version);
785 if (version != SAVEGAME_VERSION)
786 {
787 fclose (f);
788 Con_Printf ("Savegame is version %i, not %i\n", version, SAVEGAME_VERSION);
789 return -1;
790 }
791 fscanf (f, "%s\n", str);
792 // for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
793 // fscanf (f, "%f\n", &spawn_parms[i]);
794 fscanf (f, "%f\n", &sk);
795 Cvar_SetValue ("skill", sk);
796
797 fscanf (f, "%s\n",mapname);
798 fscanf (f, "%f\n",&time);
799
800 SV_SpawnServer (mapname, startspot);
801
802 if (!sv.active)
803 {
804 Con_Printf ("Couldn't load map\n");
805 return -1;
806 }
807
808 // load the light styles
809 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
810 {
811 fscanf (f, "%s\n", str);
812 sv.lightstyles[i] = Hunk_Alloc (strlen(str)+1);
813 strcpy (sv.lightstyles[i], str);
814 }
815
816 // load the edicts out of the savegame file
817 while (!feof(f))
818 {
819 fscanf (f, "%i\n",&entnum);
820 for (i=0 ; i<sizeof(str)-1 ; i++)
821 {
822 r = fgetc (f);
823 if (r == EOF || !r)
824 break;
825 str[i] = r;
826 if (r == '}')
827 {
828 i++;
829 break;
830 }
831 }
832 if (i == sizeof(str)-1)
833 Sys_Error ("Loadgame buffer overflow");
834 str[i] = 0;
835 start = str;
836 start = COM_Parse(str);
837 if (!com_token[0])
838 break; // end of file
839 if (strcmp(com_token,"{"))
840 Sys_Error ("First token isn't a brace");
841
842 // parse an edict
843
844 ent = EDICT_NUM(entnum);
845 memset (&ent->v, 0, progs->entityfields * 4);
846 ent->free = false;
847 ED_ParseEdict (start, ent);
848
849 // link it into the bsp tree
850 if (!ent->free)
851 SV_LinkEdict (ent, false);
852 }
853
854 // sv.num_edicts = entnum;
855 sv.time = time;
856 fclose (f);
857
858 // for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
859 // svs.clients->spawn_parms[i] = spawn_parms[i];
860
861 return 0;
862 }
863
864 // changing levels within a unit
865 void Host_Changelevel2_f (void)
866 {
867 char level[MAX_QPATH];
868 char _startspot[MAX_QPATH];
869 char *startspot;
870
871 if (Cmd_Argc() < 2)
872 {
873 Con_Printf ("changelevel2 <levelname> : continue game on a new level in the unit\n");
874 return;
875 }
876 if (!sv.active || cls.demoplayback)
877 {
878 Con_Printf ("Only the server may changelevel\n");
879 return;
880 }
881
882 strcpy (level, Cmd_Argv(1));
883 if (Cmd_Argc() == 2)
884 startspot = NULL;
885 else
886 {
887 strcpy (_startspot, Cmd_Argv(2));
888 startspot = _startspot;
889 }
890
891 SV_SaveSpawnparms ();
892
893 // save the current level's state
894 SaveGamestate ();
895
896 // try to restore the new level
897 if (LoadGamestate (level, startspot))
898 SV_SpawnServer (level, startspot);
899 }
900 #endif
901
902
903 //============================================================================
904
905 /*
906 ======================
907 Host_Name_f
908 ======================
909 */
910 void Host_Name_f (void)
911 {
912 char *newName;
913
914 if (Cmd_Argc () == 1)
915 {
916 Con_Printf ("\"name\" is \"%s\"\n", cl_name.string);
917 return;
918 }
919 if (Cmd_Argc () == 2)
920 newName = Cmd_Argv(1);
921 else
922 newName = Cmd_Args();
923 newName[15] = 0;
924
925 if (cmd_source == src_command)
926 {
927 if (Q_strcmp(cl_name.string, newName) == 0)
928 return;
929 Cvar_Set ("_cl_name", newName);
930 if (cls.state == ca_connected)
931 Cmd_ForwardToServer ();
932 return;
933 }
934
935 if (host_client->name[0] && strcmp(host_client->name, "unconnected") )
936 if (Q_strcmp(host_client->name, newName) != 0)
937 Con_Printf ("%s renamed to %s\n", host_client->name, newName);
938 Q_strcpy (host_client->name, newName);
939 host_client->edict->v.netname = host_client->name - pr_strings;
940
941 // send notification to all clients
942
943 MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
944 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
945 MSG_WriteString (&sv.reliable_datagram, host_client->name);
946 }
947
948
949 void Host_Version_f (void)
950 {
951 Con_Printf ("Version %4.2f\n", VERSION);
952 Con_Printf ("Exe: "__TIME__" "__DATE__"\n");
953 }
954
955 #ifdef IDGODS
956 void Host_Please_f (void)
957 {
958 client_t *cl;
959 int j;
960
961 if (cmd_source != src_command)
962 return;
963
964 if ((Cmd_Argc () == 3) && Q_strcmp(Cmd_Argv(1), "#") == 0)
965 {
966 j = Q_atof(Cmd_Argv(2)) - 1;
967 if (j < 0 || j >= svs.maxclients)
968 return;
969 if (!svs.clients[j].active)
970 return;
971 cl = &svs.clients[j];
972 if (cl->privileged)
973 {
974 cl->privileged = false;
975 cl->edict->v.flags = (int)cl->edict->v.flags & ~(FL_GODMODE|FL_NOTARGET);
976 cl->edict->v.movetype = MOVETYPE_WALK;
977 noclip_anglehack = false;
978 }
979 else
980 cl->privileged = true;
981 }
982
983 if (Cmd_Argc () != 2)
984 return;
985
986 for (j=0, cl = svs.clients ; j<svs.maxclients ; j++, cl++)
987 {
988 if (!cl->active)
989 continue;
990 if (Q_strcasecmp(cl->name, Cmd_Argv(1)) == 0)
991 {
992 if (cl->privileged)
993 {
994 cl->privileged = false;
995 cl->edict->v.flags = (int)cl->edict->v.flags & ~(FL_GODMODE|FL_NOTARGET);
996 cl->edict->v.movetype = MOVETYPE_WALK;
997 noclip_anglehack = false;
998 }
999 else
1000 cl->privileged = true;
1001 break;
1002 }
1003 }
1004 }
1005 #endif
1006
1007
1008 void Host_Say(qboolean teamonly)
1009 {
1010 client_t *client;
1011 client_t *save;
1012 int j;
1013 char *p;
1014 unsigned char text[64];
1015 qboolean fromServer = false;
1016
1017 if (cmd_source == src_command)
1018 {
1019 if (cls.state == ca_dedicated)
1020 {
1021 fromServer = true;
1022 teamonly = false;
1023 }
1024 else
1025 {
1026 Cmd_ForwardToServer ();
1027 return;
1028 }
1029 }
1030
1031 if (Cmd_Argc () < 2)
1032 return;
1033
1034 save = host_client;
1035
1036 p = Cmd_Args();
1037 // remove quotes if present
1038 if (*p == '"')
1039 {
1040 p++;
1041 p[Q_strlen(p)-1] = 0;
1042 }
1043
1044 // turn on color set 1
1045 if (!fromServer)
1046 sprintf (text, "%c%s: ", 1, save->name);
1047 else
1048 sprintf (text, "%c<%s> ", 1, hostname.string);
1049
1050 j = sizeof(text) - 2 - Q_strlen(text); // -2 for /n and null terminator
1051 if (Q_strlen(p) > j)
1052 p[j] = 0;
1053
1054 strcat (text, p);
1055 strcat (text, "\n");
1056
1057 for (j = 0, client = svs.clients; j < svs.maxclients; j++, client++)
1058 {
1059 if (!client || !client->active || !client->spawned)
1060 continue;
1061 if (teamplay.value && teamonly && client->edict->v.team != save->edict->v.team)
1062 continue;
1063 host_client = client;
1064 SV_ClientPrintf("%s", text);
1065 }
1066 host_client = save;
1067
1068 Sys_Printf("%s", &text[1]);
1069 }
1070
1071
1072 void Host_Say_f(void)
1073 {
1074 Host_Say(false);
1075 }
1076
1077
1078 void Host_Say_Team_f(void)
1079 {
1080 Host_Say(true);
1081 }
1082
1083
1084 void Host_Tell_f(void)
1085 {
1086 client_t *client;
1087 client_t *save;
1088 int j;
1089 char *p;
1090 char text[64];
1091
1092 if (cmd_source == src_command)
1093 {
1094 Cmd_ForwardToServer ();
1095 return;
1096 }
1097
1098 if (Cmd_Argc () < 3)
1099 return;
1100
1101 Q_strcpy(text, host_client->name);
1102 Q_strcat(text, ": ");
1103
1104 p = Cmd_Args();
1105
1106 // remove quotes if present
1107 if (*p == '"')
1108 {
1109 p++;
1110 p[Q_strlen(p)-1] = 0;
1111 }
1112
1113 // check length & truncate if necessary
1114 j = sizeof(text) - 2 - Q_strlen(text); // -2 for /n and null terminator
1115 if (Q_strlen(p) > j)
1116 p[j] = 0;
1117
1118 strcat (text, p);
1119 strcat (text, "\n");
1120
1121 save = host_client;
1122 for (j = 0, client = svs.clients; j < svs.maxclients; j++, client++)
1123 {
1124 if (!client->active || !client->spawned)
1125 continue;
1126 if (Q_strcasecmp(client->name, Cmd_Argv(1)))
1127 continue;
1128 host_client = client;
1129 SV_ClientPrintf("%s", text);
1130 break;
1131 }
1132 host_client = save;
1133 }
1134
1135
1136 /*
1137 ==================
1138 Host_Color_f
1139 ==================
1140 */
1141 void Host_Color_f(void)
1142 {
1143 int top, bottom;
1144 int playercolor;
1145
1146 if (Cmd_Argc() == 1)
1147 {
1148 Con_Printf ("\"color\" is \"%i %i\"\n", ((int)cl_color.value) >> 4, ((int)cl_color.value) & 0x0f);
1149 Con_Printf ("color <0-13> [0-13]\n");
1150 return;
1151 }
1152
1153 if (Cmd_Argc() == 2)
1154 top = bottom = atoi(Cmd_Argv(1));
1155 else
1156 {
1157 top = atoi(Cmd_Argv(1));
1158 bottom = atoi(Cmd_Argv(2));
1159 }
1160
1161 top &= 15;
1162 if (top > 13)
1163 top = 13;
1164 bottom &= 15;
1165 if (bottom > 13)
1166 bottom = 13;
1167
1168 playercolor = top*16 + bottom;
1169
1170 if (cmd_source == src_command)
1171 {
1172 Cvar_SetValue ("_cl_color", playercolor);
1173 if (cls.state == ca_connected)
1174 Cmd_ForwardToServer ();
1175 return;
1176 }
1177
1178 host_client->colors = playercolor;
1179 host_client->edict->v.team = bottom + 1;
1180
1181 // send notification to all clients
1182 MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
1183 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
1184 MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
1185 }
1186
1187 /*
1188 ==================
1189 Host_Kill_f
1190 ==================
1191 */
1192 void Host_Kill_f (void)
1193 {
1194 if (cmd_source == src_command)
1195 {
1196 Cmd_ForwardToServer ();
1197 return;
1198 }
1199
1200 if (sv_player->v.health <= 0)
1201 {
1202 SV_ClientPrintf ("Can't suicide -- allready dead!\n");
1203 return;
1204 }
1205
1206 pr_global_struct->time = sv.time;
1207 pr_global_struct->self = EDICT_TO_PROG(sv_player);
1208 PR_ExecuteProgram (pr_global_struct->ClientKill);
1209 }
1210
1211
1212 /*
1213 ==================
1214 Host_Pause_f
1215 ==================
1216 */
1217 void Host_Pause_f (void)
1218 {
1219
1220 if (cmd_source == src_command)
1221 {
1222 Cmd_ForwardToServer ();
1223 return;
1224 }
1225 if (!pausable.value)
1226 SV_ClientPrintf ("Pause not allowed.\n");
1227 else
1228 {
1229 sv.paused ^= 1;
1230
1231 if (sv.paused)
1232 {
1233 SV_BroadcastPrintf ("%s paused the game\n", pr_strings + sv_player->v.netname);
1234 }
1235 else
1236 {
1237 SV_BroadcastPrintf ("%s unpaused the game\n",pr_strings + sv_player->v.netname);
1238 }
1239
1240 // send notification to all clients
1241 MSG_WriteByte (&sv.reliable_datagram, svc_setpause);
1242 MSG_WriteByte (&sv.reliable_datagram, sv.paused);
1243 }
1244 }
1245
1246 //===========================================================================
1247
1248
1249 /*
1250 ==================
1251 Host_PreSpawn_f
1252 ==================
1253 */
1254 void Host_PreSpawn_f (void)
1255 {
1256 if (cmd_source == src_command)
1257 {
1258 Con_Printf ("prespawn is not valid from the console\n");
1259 return;
1260 }
1261
1262 if (host_client->spawned)
1263 {
1264 Con_Printf ("prespawn not valid -- allready spawned\n");
1265 return;
1266 }
1267
1268 SZ_Write (&host_client->message, sv.signon.data, sv.signon.cursize);
1269 MSG_WriteByte (&host_client->message, svc_signonnum);
1270 MSG_WriteByte (&host_client->message, 2);
1271 host_client->sendsignon = true;
1272 }
1273
1274 /*
1275 ==================
1276 Host_Spawn_f
1277 ==================
1278 */
1279 void Host_Spawn_f (void)
1280 {
1281 int i;
1282 client_t *client;
1283 edict_t *ent;
1284
1285 if (cmd_source == src_command)
1286 {
1287 Con_Printf ("spawn is not valid from the console\n");
1288 return;
1289 }
1290
1291 if (host_client->spawned)
1292 {
1293 Con_Printf ("Spawn not valid -- allready spawned\n");
1294 return;
1295 }
1296
1297 // run the entrance script
1298 if (sv.loadgame)
1299 { // loaded games are fully inited allready
1300 // if this is the last client to be connected, unpause
1301 sv.paused = false;
1302 }
1303 else
1304 {
1305 // set up the edict
1306 ent = host_client->edict;
1307
1308 memset (&ent->v, 0, progs->entityfields * 4);
1309 ent->v.colormap = NUM_FOR_EDICT(ent);
1310 ent->v.team = (host_client->colors & 15) + 1;
1311 ent->v.netname = host_client->name - pr_strings;
1312
1313 // copy spawn parms out of the client_t
1314
1315 for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
1316 (&pr_global_struct->parm1)[i] = host_client->spawn_parms[i];
1317
1318 // call the spawn function
1319
1320 pr_global_struct->time = sv.time;
1321 pr_global_struct->self = EDICT_TO_PROG(sv_player);
1322 PR_ExecuteProgram (pr_global_struct->ClientConnect);
1323
1324 if ((Sys_FloatTime() - host_client->netconnection->connecttime) <= sv.time)
1325 Sys_Printf ("%s entered the game\n", host_client->name);
1326
1327 PR_ExecuteProgram (pr_global_struct->PutClientInServer);
1328 }
1329
1330
1331 // send all current names, colors, and frag counts
1332 SZ_Clear (&host_client->message);
1333
1334 // send time of update
1335 MSG_WriteByte (&host_client->message, svc_time);
1336 MSG_WriteFloat (&host_client->message, sv.time);
1337
1338 for (i=0, client = svs.clients ; i<svs.maxclients ; i++, client++)
1339 {
1340 MSG_WriteByte (&host_client->message, svc_updatename);
1341 MSG_WriteByte (&host_client->message, i);
1342 MSG_WriteString (&host_client->message, client->name);
1343 MSG_WriteByte (&host_client->message, svc_updatefrags);
1344 MSG_WriteByte (&host_client->message, i);
1345 MSG_WriteShort (&host_client->message, client->old_frags);
1346 MSG_WriteByte (&host_client->message, svc_updatecolors);
1347 MSG_WriteByte (&host_client->message, i);
1348 MSG_WriteByte (&host_client->message, client->colors);
1349 }
1350
1351 // send all current light styles
1352 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
1353 {
1354 MSG_WriteByte (&host_client->message, svc_lightstyle);
1355 MSG_WriteByte (&host_client->message, (char)i);
1356 MSG_WriteString (&host_client->message, sv.lightstyles[i]);
1357 }
1358
1359 //
1360 // send some stats
1361 //
1362 MSG_WriteByte (&host_client->message, svc_updatestat);
1363 MSG_WriteByte (&host_client->message, STAT_TOTALSECRETS);
1364 MSG_WriteLong (&host_client->message, pr_global_struct->total_secrets);
1365
1366 MSG_WriteByte (&host_client->message, svc_updatestat);
1367 MSG_WriteByte (&host_client->message, STAT_TOTALMONSTERS);
1368 MSG_WriteLong (&host_client->message, pr_global_struct->total_monsters);
1369
1370 MSG_WriteByte (&host_client->message, svc_updatestat);
1371 MSG_WriteByte (&host_client->message, STAT_SECRETS);
1372 MSG_WriteLong (&host_client->message, pr_global_struct->found_secrets);
1373
1374 MSG_WriteByte (&host_client->message, svc_updatestat);
1375 MSG_WriteByte (&host_client->message, STAT_MONSTERS);
1376 MSG_WriteLong (&host_client->message, pr_global_struct->killed_monsters);
1377
1378
1379 //
1380 // send a fixangle
1381 // Never send a roll angle, because savegames can catch the server
1382 // in a state where it is expecting the client to correct the angle
1383 // and it won't happen if the game was just loaded, so you wind up
1384 // with a permanent head tilt
1385 ent = EDICT_NUM( 1 + (host_client - svs.clients) );
1386 MSG_WriteByte (&host_client->message, svc_setangle);
1387 for (i=0 ; i < 2 ; i++)
1388 MSG_WriteAngle (&host_client->message, ent->v.angles[i] );
1389 MSG_WriteAngle (&host_client->message, 0 );
1390
1391 SV_WriteClientdataToMessage (sv_player, &host_client->message);
1392
1393 MSG_WriteByte (&host_client->message, svc_signonnum);
1394 MSG_WriteByte (&host_client->message, 3);
1395 host_client->sendsignon = true;
1396 }
1397
1398 /*
1399 ==================
1400 Host_Begin_f
1401 ==================
1402 */
1403 void Host_Begin_f (void)
1404 {
1405 if (cmd_source == src_command)
1406 {
1407 Con_Printf ("begin is not valid from the console\n");
1408 return;
1409 }
1410
1411 host_client->spawned = true;
1412 }
1413
1414 //===========================================================================
1415
1416
1417 /*
1418 ==================
1419 Host_Kick_f
1420
1421 Kicks a user off of the server
1422 ==================
1423 */
1424 void Host_Kick_f (void)
1425 {
1426 char *who;
1427 char *message = NULL;
1428 client_t *save;
1429 int i;
1430 qboolean byNumber = false;
1431
1432 if (cmd_source == src_command)
1433 {
1434 if (!sv.active)
1435 {
1436 Cmd_ForwardToServer ();
1437 return;
1438 }
1439 }
1440 else if (pr_global_struct->deathmatch && !host_client->privileged)
1441 return;
1442
1443 save = host_client;
1444
1445 if (Cmd_Argc() > 2 && Q_strcmp(Cmd_Argv(1), "#") == 0)
1446 {
1447 i = Q_atof(Cmd_Argv(2)) - 1;
1448 if (i < 0 || i >= svs.maxclients)
1449 return;
1450 if (!svs.clients[i].active)
1451 return;
1452 host_client = &svs.clients[i];
1453 byNumber = true;
1454 }
1455 else
1456 {
1457 for (i = 0, host_client = svs.clients; i < svs.maxclients; i++, host_client++)
1458 {
1459 if (!host_client->active)
1460 continue;
1461 if (Q_strcasecmp(host_client->name, Cmd_Argv(1)) == 0)
1462 break;
1463 }
1464 }
1465
1466 if (i < svs.maxclients)
1467 {
1468 if (cmd_source == src_command)
1469 if (cls.state == ca_dedicated)
1470 who = "Console";
1471 else
1472 who = cl_name.string;
1473 else
1474 who = save->name;
1475
1476 // can't kick yourself!
1477 if (host_client == save)
1478 return;
1479
1480 if (Cmd_Argc() > 2)
1481 {
1482 message = COM_Parse(Cmd_Args());
1483 if (byNumber)
1484 {
1485 message++; // skip the #
1486 while (*message == ' ') // skip white space
1487 message++;
1488 message += Q_strlen(Cmd_Argv(2)); // skip the number
1489 }
1490 while (*message && *message == ' ')
1491 message++;
1492 }
1493 if (message)
1494 SV_ClientPrintf ("Kicked by %s: %s\n", who, message);
1495 else
1496 SV_ClientPrintf ("Kicked by %s\n", who);
1497 SV_DropClient (false);
1498 }
1499
1500 host_client = save;
1501 }
1502
1503 /*
1504 ===============================================================================
1505
1506 DEBUGGING TOOLS
1507
1508 ===============================================================================
1509 */
1510
1511 /*
1512 ==================
1513 Host_Give_f
1514 ==================
1515 */
1516 void Host_Give_f (void)
1517 {
1518 char *t;
1519 int v;
1520 eval_t *val;
1521
1522 if (cmd_source == src_command)
1523 {
1524 Cmd_ForwardToServer ();
1525 return;
1526 }
1527
1528 if (pr_global_struct->deathmatch && !host_client->privileged)
1529 return;
1530
1531 t = Cmd_Argv(1);
1532 v = atoi (Cmd_Argv(2));
1533
1534 switch (t[0])
1535 {
1536 case '0':
1537 case '1':
1538 case '2':
1539 case '3':
1540 case '4':
1541 case '5':
1542 case '6':
1543 case '7':
1544 case '8':
1545 case '9':
1546 // MED 01/04/97 added hipnotic give stuff
1547 if (hipnotic)
1548 {
1549 if (t[0] == '6')
1550 {
1551 if (t[1] == 'a')
1552 sv_player->v.items = (int)sv_player->v.items | HIT_PROXIMITY_GUN;
1553 else
1554 sv_player->v.items = (int)sv_player->v.items | IT_GRENADE_LAUNCHER;
1555 }
1556 else if (t[0] == '9')
1557 sv_player->v.items = (int)sv_player->v.items | HIT_LASER_CANNON;
1558 else if (t[0] == '0')
1559 sv_player->v.items = (int)sv_player->v.items | HIT_MJOLNIR;
1560 else if (t[0] >= '2')
1561 sv_player->v.items = (int)sv_player->v.items | (IT_SHOTGUN << (t[0] - '2'));
1562 }
1563 else
1564 {
1565 if (t[0] >= '2')
1566 sv_player->v.items = (int)sv_player->v.items | (IT_SHOTGUN << (t[0] - '2'));
1567 }
1568 break;
1569
1570 case 's':
1571 if (rogue)
1572 {
1573 val = GetEdictFieldValue(sv_player, "ammo_shells1");
1574 if (val)
1575 val->_float = v;
1576 }
1577
1578 sv_player->v.ammo_shells = v;
1579 break;
1580 case 'n':
1581 if (rogue)
1582 {
1583 val = GetEdictFieldValue(sv_player, "ammo_nails1");
1584 if (val)
1585 {
1586 val->_float = v;
1587 if (sv_player->v.weapon <= IT_LIGHTNING)
1588 sv_player->v.ammo_nails = v;
1589 }
1590 }
1591 else
1592 {
1593 sv_player->v.ammo_nails = v;
1594 }
1595 break;
1596 case 'l':
1597 if (rogue)
1598 {
1599 val = GetEdictFieldValue(sv_player, "ammo_lava_nails");
1600 if (val)
1601 {
1602 val->_float = v;
1603 if (sv_player->v.weapon > IT_LIGHTNING)
1604 sv_player->v.ammo_nails = v;
1605 }
1606 }
1607 break;
1608 case 'r':
1609 if (rogue)
1610 {
1611 val = GetEdictFieldValue(sv_player, "ammo_rockets1");
1612 if (val)
1613 {
1614 val->_float = v;
1615 if (sv_player->v.weapon <= IT_LIGHTNING)
1616 sv_player->v.ammo_rockets = v;
1617 }
1618 }
1619 else
1620 {
1621 sv_player->v.ammo_rockets = v;
1622 }
1623 break;
1624 case 'm':
1625 if (rogue)
1626 {
1627 val = GetEdictFieldValue(sv_player, "ammo_multi_rockets");
1628 if (val)
1629 {
1630 val->_float = v;
1631 if (sv_player->v.weapon > IT_LIGHTNING)
1632 sv_player->v.ammo_rockets = v;
1633 }
1634 }
1635 break;
1636 case 'h':
1637 sv_player->v.health = v;
1638 break;
1639 case 'c':
1640 if (rogue)
1641 {
1642 val = GetEdictFieldValue(sv_player, "ammo_cells1");
1643 if (val)
1644 {
1645 val->_float = v;
1646 if (sv_player->v.weapon <= IT_LIGHTNING)
1647 sv_player->v.ammo_cells = v;
1648 }
1649 }
1650 else
1651 {
1652 sv_player->v.ammo_cells = v;
1653 }
1654 break;
1655 case 'p':
1656 if (rogue)
1657 {
1658 val = GetEdictFieldValue(sv_player, "ammo_plasma");
1659 if (val)
1660 {
1661 val->_float = v;
1662 if (sv_player->v.weapon > IT_LIGHTNING)
1663 sv_player->v.ammo_cells = v;
1664 }
1665 }
1666 break;
1667 }
1668 }
1669
1670 edict_t *FindViewthing (void)
1671 {
1672 int i;
1673 edict_t *e;
1674
1675 for (i=0 ; i<sv.num_edicts ; i++)
1676 {
1677 e = EDICT_NUM(i);
1678 if ( !strcmp (pr_strings + e->v.classname, "viewthing") )
1679 return e;
1680 }
1681 Con_Printf ("No viewthing on map\n");
1682 return NULL;
1683 }
1684
1685 /*
1686 ==================
1687 Host_Viewmodel_f
1688 ==================
1689 */
1690 void Host_Viewmodel_f (void)
1691 {
1692 edict_t *e;
1693 model_t *m;
1694
1695 e = FindViewthing ();
1696 if (!e)
1697 return;
1698
1699 m = Mod_ForName (Cmd_Argv(1), false);
1700 if (!m)
1701 {
1702 Con_Printf ("Can't load %s\n", Cmd_Argv(1));
1703 return;
1704 }
1705
1706 e->v.frame = 0;
1707 cl.model_precache[(int)e->v.modelindex] = m;
1708 }
1709
1710 /*
1711 ==================
1712 Host_Viewframe_f
1713 ==================
1714 */
1715 void Host_Viewframe_f (void)
1716 {
1717 edict_t *e;
1718 int f;
1719 model_t *m;
1720
1721 e = FindViewthing ();
1722 if (!e)
1723 return;
1724 m = cl.model_precache[(int)e->v.modelindex];
1725
1726 f = atoi(Cmd_Argv(1));
1727 if (f >= m->numframes)
1728 f = m->numframes-1;
1729
1730 e->v.frame = f;
1731 }
1732
1733
1734 void PrintFrameName (model_t *m, int frame)
1735 {
1736 aliashdr_t *hdr;
1737 maliasframedesc_t *pframedesc;
1738
1739 hdr = (aliashdr_t *)Mod_Extradata (m);
1740 if (!hdr)
1741 return;
1742 pframedesc = &hdr->frames[frame];
1743
1744 Con_Printf ("frame %i: %s\n", frame, pframedesc->name);
1745 }
1746
1747 /*
1748 ==================
1749 Host_Viewnext_f
1750 ==================
1751 */
1752 void Host_Viewnext_f (void)
1753 {
1754 edict_t *e;
1755 model_t *m;
1756
1757 e = FindViewthing ();
1758 if (!e)
1759 return;
1760 m = cl.model_precache[(int)e->v.modelindex];
1761
1762 e->v.frame = e->v.frame + 1;
1763 if (e->v.frame >= m->numframes)
1764 e->v.frame = m->numframes - 1;
1765
1766 PrintFrameName (m, e->v.frame);
1767 }
1768
1769 /*
1770 ==================
1771 Host_Viewprev_f
1772 ==================
1773 */
1774 void Host_Viewprev_f (void)
1775 {
1776 edict_t *e;
1777 model_t *m;
1778
1779 e = FindViewthing ();
1780 if (!e)
1781 return;
1782
1783 m = cl.model_precache[(int)e->v.modelindex];
1784
1785 e->v.frame = e->v.frame - 1;
1786 if (e->v.frame < 0)
1787 e->v.frame = 0;
1788
1789 PrintFrameName (m, e->v.frame);
1790 }
1791
1792 /*
1793 ===============================================================================
1794
1795 DEMO LOOP CONTROL
1796
1797 ===============================================================================
1798 */
1799
1800
1801 /*
1802 ==================
1803 Host_Startdemos_f
1804 ==================
1805 */
1806 void Host_Startdemos_f (void)
1807 {
1808 int i, c;
1809
1810 if (cls.state == ca_dedicated)
1811 {
1812 if (!sv.active)
1813 Cbuf_AddText ("map start\n");
1814 return;
1815 }
1816
1817 c = Cmd_Argc() - 1;
1818 if (c > MAX_DEMOS)
1819 {
1820 Con_Printf ("Max %i demos in demoloop\n", MAX_DEMOS);
1821 c = MAX_DEMOS;
1822 }
1823 Con_Printf ("%i demo(s) in loop\n", c);
1824
1825 for (i=1 ; i<c+1 ; i++)
1826 strncpy (cls.demos[i-1], Cmd_Argv(i), sizeof(cls.demos[0])-1);
1827
1828 if (!sv.active && cls.demonum != -1 && !cls.demoplayback)
1829 {
1830 cls.demonum = 0;
1831 CL_NextDemo ();
1832 }
1833 else
1834 cls.demonum = -1;
1835 }
1836
1837
1838 /*
1839 ==================
1840 Host_Demos_f
1841
1842 Return to looping demos
1843 ==================
1844 */
1845 void Host_Demos_f (void)
1846 {
1847 if (cls.state == ca_dedicated)
1848 return;
1849 if (cls.demonum == -1)
1850 cls.demonum = 1;
1851 CL_Disconnect_f ();
1852 CL_NextDemo ();
1853 }
1854
1855 /*
1856 ==================
1857 Host_Stopdemo_f
1858
1859 Return to looping demos
1860 ==================
1861 */
1862 void Host_Stopdemo_f (void)
1863 {
1864 if (cls.state == ca_dedicated)
1865 return;
1866 if (!cls.demoplayback)
1867 return;
1868 CL_StopPlayback ();
1869 CL_Disconnect ();
1870 }
1871
1872 //=============================================================================
1873
1874 /*
1875 ==================
1876 Host_InitCommands
1877 ==================
1878 */
1879 void Host_InitCommands (void)
1880 {
1881 Cmd_AddCommand ("status", Host_Status_f);
1882 Cmd_AddCommand ("quit", Host_Quit_f);
1883 Cmd_AddCommand ("god", Host_God_f);
1884 Cmd_AddCommand ("notarget", Host_Notarget_f);
1885 Cmd_AddCommand ("fly", Host_Fly_f);
1886 Cmd_AddCommand ("map", Host_Map_f);
1887 Cmd_AddCommand ("restart", Host_Restart_f);
1888 Cmd_AddCommand ("changelevel", Host_Changelevel_f);
1889 #ifdef QUAKE2
1890 Cmd_AddCommand ("changelevel2", Host_Changelevel2_f);
1891 #endif
1892 Cmd_AddCommand ("connect", Host_Connect_f);
1893 Cmd_AddCommand ("reconnect", Host_Reconnect_f);
1894 Cmd_AddCommand ("name", Host_Name_f);
1895 Cmd_AddCommand ("noclip", Host_Noclip_f);
1896 Cmd_AddCommand ("version", Host_Version_f);
1897 #ifdef IDGODS
1898 Cmd_AddCommand ("please", Host_Please_f);
1899 #endif
1900 Cmd_AddCommand ("say", Host_Say_f);
1901 Cmd_AddCommand ("say_team", Host_Say_Team_f);
1902 Cmd_AddCommand ("tell", Host_Tell_f);
1903 Cmd_AddCommand ("color", Host_Color_f);
1904 Cmd_AddCommand ("kill", Host_Kill_f);
1905 Cmd_AddCommand ("pause", Host_Pause_f);
1906 Cmd_AddCommand ("spawn", Host_Spawn_f);
1907 Cmd_AddCommand ("begin", Host_Begin_f);
1908 Cmd_AddCommand ("prespawn", Host_PreSpawn_f);
1909 Cmd_AddCommand ("kick", Host_Kick_f);
1910 Cmd_AddCommand ("ping", Host_Ping_f);
1911 Cmd_AddCommand ("load", Host_Loadgame_f);
1912 Cmd_AddCommand ("save", Host_Savegame_f);
1913 Cmd_AddCommand ("give", Host_Give_f);
1914
1915 Cmd_AddCommand ("startdemos", Host_Startdemos_f);
1916 Cmd_AddCommand ("demos", Host_Demos_f);
1917 Cmd_AddCommand ("stopdemo", Host_Stopdemo_f);
1918
1919 Cmd_AddCommand ("viewmodel", Host_Viewmodel_f);
1920 Cmd_AddCommand ("viewframe", Host_Viewframe_f);
1921 Cmd_AddCommand ("viewnext", Host_Viewnext_f);
1922 Cmd_AddCommand ("viewprev", Host_Viewprev_f);
1923
1924 Cmd_AddCommand ("mcache", Mod_Print);
1925 }
Mirror of AROS' Contrib svn.