2 Copyright (C) 1996-1997 Id Software, Inc.
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.
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.
13 See the GNU General Public License for more details.
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.
20 // cmd.c -- Quake script command processing module
24 #define MAX_ALIAS_NAME 32
26 typedef struct cmdalias_s
28 struct cmdalias_s *next;
29 char name[MAX_ALIAS_NAME];
33 static cmdalias_t *cmd_alias;
35 static qboolean cmd_wait;
37 static mempool_t *cmd_mempool;
39 #define CMD_TOKENIZELENGTH 4096
40 static char cmd_tokenizebuffer[CMD_TOKENIZELENGTH];
41 static int cmd_tokenizebufferpos = 0;
43 //=============================================================================
49 Causes execution of the remainder of the command buffer to be delayed until
50 next frame. This allows commands like:
51 bind g "impulse 5 ; +attack ; wait ; -attack ; impulse 2"
54 static void Cmd_Wait_f (void)
60 =============================================================================
64 =============================================================================
67 static sizebuf_t cmd_text;
76 // LordHavoc: inreased this from 8192 to 32768
77 SZ_Alloc (&cmd_text, 32768, "command buffer"); // space for commands and script files
85 Adds command text at the end of the buffer
88 void Cbuf_AddText (const char *text)
94 if (cmd_text.cursize + l >= cmd_text.maxsize)
96 Con_Print("Cbuf_AddText: overflow\n");
100 SZ_Write (&cmd_text, text, strlen (text));
108 Adds command text immediately after the current command
109 Adds a \n to the text
110 FIXME: actually change the command buffer to do less copying
113 void Cbuf_InsertText (const char *text)
118 // copy off any commands still remaining in the exec buffer
119 templen = cmd_text.cursize;
122 temp = Z_Malloc (templen);
123 memcpy (temp, cmd_text.data, templen);
124 SZ_Clear (&cmd_text);
127 temp = NULL; // shut up compiler
129 // add the entire text of the file
132 // add the copied off data
135 SZ_Write (&cmd_text, temp, templen);
145 void Cbuf_Execute (void)
152 // LordHavoc: making sure the tokenizebuffer doesn't get filled up by repeated crashes
153 cmd_tokenizebufferpos = 0;
155 while (cmd_text.cursize)
157 // find a \n or ; line break
158 text = (char *)cmd_text.data;
161 for (i=0 ; i< cmd_text.cursize ; i++)
165 if ( !(quotes&1) && text[i] == ';')
166 break; // don't break if inside a quoted string
167 if (text[i] == '\r' || text[i] == '\n')
171 memcpy (line, text, i);
174 // delete the text from the command buffer and move remaining commands down
175 // this is necessary because commands (exec, alias) can insert data at the
176 // beginning of the text buffer
178 if (i == cmd_text.cursize)
179 cmd_text.cursize = 0;
183 cmd_text.cursize -= i;
184 memcpy (cmd_text.data, text+i, cmd_text.cursize);
187 // execute the command line
188 Cmd_ExecuteString (line, src_command);
191 { // skip out while text still remains in buffer, leaving it
200 ==============================================================================
204 ==============================================================================
211 Adds command line parameters as script statements
212 Commands lead with a +, and continue until a - or another +
213 quake +prog jctest.qp +cmd amlev1
214 quake -nosound +cmd amlev1
217 void Cmd_StuffCmds_f (void)
221 char *text, *build, c;
223 if (Cmd_Argc () != 1)
225 Con_Print("stuffcmds : execute command line parameters\n");
229 // build the combined string to parse from
231 for (i=1 ; i<com_argc ; i++)
234 continue; // NEXTSTEP nulls out -NXHost
235 s += strlen (com_argv[i]) + 1;
240 text = Z_Malloc (s+1);
242 for (i=1 ; i<com_argc ; i++)
245 continue; // NEXTSTEP nulls out -NXHost
246 strcat (text,com_argv[i]);
251 // pull out the commands
252 build = Z_Malloc (s+1);
255 for (i=0 ; i<s-1 ; i++)
261 for (j=i ; (text[j] != '+') && (text[j] != '-') && (text[j] != 0) ; j++)
267 strcat (build, text+i);
268 strcat (build, "\n");
275 Cbuf_InsertText (build);
287 static void Cmd_Exec_f (void)
291 if (Cmd_Argc () != 2)
293 Con_Print("exec <filename> : execute a script file\n");
297 f = (char *)FS_LoadFile (Cmd_Argv(1), false);
300 Con_Printf("couldn't exec %s\n",Cmd_Argv(1));
303 Con_DPrintf("execing %s\n",Cmd_Argv(1));
314 Just prints the rest of the line to the console
317 static void Cmd_Echo_f (void)
321 for (i=1 ; i<Cmd_Argc() ; i++)
322 Con_Printf("%s ",Cmd_Argv(i));
330 Creates a new command that executes a command string (possibly ; seperated)
333 static char *CopyString (char *in)
337 out = Z_Malloc (strlen(in)+1);
342 static void Cmd_Alias_f (void)
351 Con_Print("Current alias commands:\n");
352 for (a = cmd_alias ; a ; a=a->next)
353 Con_Printf("%s : %s\n", a->name, a->value);
358 if (strlen(s) >= MAX_ALIAS_NAME)
360 Con_Print("Alias name is too long\n");
364 // if the alias already exists, reuse it
365 for (a = cmd_alias ; a ; a=a->next)
367 if (!strcmp(s, a->name))
376 a = Z_Malloc (sizeof(cmdalias_t));
380 strlcpy (a->name, s, sizeof (a->name));
382 // copy the rest of the command line
383 cmd[0] = 0; // start out with a null string
385 for (i=2 ; i< c ; i++)
387 strlcat (cmd, Cmd_Argv(i), sizeof (cmd));
389 strlcat (cmd, " ", sizeof (cmd));
391 strlcat (cmd, "\n", sizeof (cmd));
393 a->value = CopyString (cmd);
397 =============================================================================
401 =============================================================================
404 typedef struct cmd_function_s
406 struct cmd_function_s *next;
415 static const char *cmd_argv[MAX_ARGS];
416 static const char *cmd_null_string = "";
417 static const char *cmd_args = NULL;
419 cmd_source_t cmd_source;
422 static cmd_function_t *cmd_functions; // possible commands to execute
428 CmdList Added by EvilTypeGuy eviltypeguy@qeradiant.com
429 Thanks to Matthias "Maddes" Buecher, http://www.inside3d.com/qip/
433 static void Cmd_List_f (void)
441 partial = Cmd_Argv (1);
442 len = strlen(partial);
451 for (cmd = cmd_functions; cmd; cmd = cmd->next)
453 if (partial && strncmp(partial, cmd->name, len))
455 Con_Printf("%s\n", cmd->name);
459 Con_Printf("%i Command%s", count, (count > 1) ? "s" : "");
461 Con_Printf(" beginning with \"%s\"", partial);
473 cmd_mempool = Mem_AllocPool("commands");
476 // register our commands
478 Cmd_AddCommand ("stuffcmds",Cmd_StuffCmds_f);
479 Cmd_AddCommand ("exec",Cmd_Exec_f);
480 Cmd_AddCommand ("echo",Cmd_Echo_f);
481 Cmd_AddCommand ("alias",Cmd_Alias_f);
482 Cmd_AddCommand ("cmd", Cmd_ForwardToServer);
483 Cmd_AddCommand ("wait", Cmd_Wait_f);
484 Cmd_AddCommand ("cmdlist", Cmd_List_f); // Added/Modified by EvilTypeGuy eviltypeguy@qeradiant.com
485 Cmd_AddCommand ("cvarlist", Cvar_List_f); // 2000-01-09 CmdList, CvarList commands
486 // By Matthias "Maddes" Buecher
504 const char *Cmd_Argv (int arg)
506 if (arg >= cmd_argc )
507 return cmd_null_string;
508 return cmd_argv[arg];
516 const char *Cmd_Args (void)
526 Parses the given string into command line tokens.
529 static void Cmd_TokenizeString (const char *text)
538 // skip whitespace up to a /n
539 while (*text && *text <= ' ' && *text != '\n')
544 // a newline seperates commands in the buffer
555 if (!COM_ParseTokenConsole(&text))
558 if (cmd_argc < MAX_ARGS)
560 l = strlen(com_token) + 1;
561 if (cmd_tokenizebufferpos + l > CMD_TOKENIZELENGTH)
562 Sys_Error("Cmd_TokenizeString: ran out of %i character buffer space for command arguements\n", CMD_TOKENIZELENGTH);
563 strcpy (cmd_tokenizebuffer + cmd_tokenizebufferpos, com_token);
564 cmd_argv[cmd_argc] = cmd_tokenizebuffer + cmd_tokenizebufferpos;
565 cmd_tokenizebufferpos += l;
578 void Cmd_AddCommand (const char *cmd_name, xcommand_t function)
582 // fail if the command is a variable name
583 if (Cvar_VariableString(cmd_name)[0])
585 Con_Printf("Cmd_AddCommand: %s already defined as a var\n", cmd_name);
589 // fail if the command already exists
590 for (cmd=cmd_functions ; cmd ; cmd=cmd->next)
592 if (!strcmp (cmd_name, cmd->name))
594 Con_Printf("Cmd_AddCommand: %s already defined\n", cmd_name);
599 cmd = Mem_Alloc(cmd_mempool, sizeof(cmd_function_t));
600 cmd->name = cmd_name;
601 cmd->function = function;
602 cmd->next = cmd_functions;
611 qboolean Cmd_Exists (const char *cmd_name)
615 for (cmd=cmd_functions ; cmd ; cmd=cmd->next)
616 if (!strcmp (cmd_name,cmd->name))
628 const char *Cmd_CompleteCommand (const char *partial)
633 len = strlen(partial);
639 for (cmd = cmd_functions; cmd; cmd = cmd->next)
640 if (!strncmp(partial, cmd->name, len))
647 Cmd_CompleteCountPossible
649 New function for tab-completion system
651 Thanks to Fett erich@heintz.com
655 int Cmd_CompleteCountPossible (const char *partial)
661 len = strlen(partial);
666 // Loop through the command list and count all partial matches
667 for (cmd = cmd_functions; cmd; cmd = cmd->next)
668 if (!strncasecmp(partial, cmd->name, len))
675 Cmd_CompleteBuildList
677 New function for tab-completion system
679 Thanks to Fett erich@heintz.com
683 const char **Cmd_CompleteBuildList (const char *partial)
688 int sizeofbuf = (Cmd_CompleteCountPossible (partial) + 1) * sizeof (const char *);
691 len = strlen(partial);
692 buf = Mem_Alloc(tempmempool, sizeofbuf + sizeof (const char *));
693 // Loop through the alias list and print all matches
694 for (cmd = cmd_functions; cmd; cmd = cmd->next)
695 if (!strncasecmp(partial, cmd->name, len))
696 buf[bpos++] = cmd->name;
705 New function for tab-completion system
707 Thanks to Fett erich@heintz.com
711 const char *Cmd_CompleteAlias (const char *partial)
716 len = strlen(partial);
722 for (alias = cmd_alias; alias; alias = alias->next)
723 if (!strncasecmp(partial, alias->name, len))
730 Cmd_CompleteAliasCountPossible
732 New function for tab-completion system
734 Thanks to Fett erich@heintz.com
738 int Cmd_CompleteAliasCountPossible (const char *partial)
746 len = strlen(partial);
751 // Loop through the command list and count all partial matches
752 for (alias = cmd_alias; alias; alias = alias->next)
753 if (!strncasecmp(partial, alias->name, len))
760 Cmd_CompleteAliasBuildList
762 New function for tab-completion system
764 Thanks to Fett erich@heintz.com
768 const char **Cmd_CompleteAliasBuildList (const char *partial)
773 int sizeofbuf = (Cmd_CompleteAliasCountPossible (partial) + 1) * sizeof (const char *);
776 len = strlen(partial);
777 buf = Mem_Alloc(tempmempool, sizeofbuf + sizeof (const char *));
778 // Loop through the alias list and print all matches
779 for (alias = cmd_alias; alias; alias = alias->next)
780 if (!strncasecmp(partial, alias->name, len))
781 buf[bpos++] = alias->name;
791 A complete command line has been parsed, so try to execute it
792 FIXME: lookupnoadd the token to speed search?
795 void Cmd_ExecuteString (const char *text, cmd_source_t src)
801 oldpos = cmd_tokenizebufferpos;
803 Cmd_TokenizeString (text);
805 // execute the command line
808 cmd_tokenizebufferpos = oldpos;
812 // check functions (only after host_initialized)
813 if (host_initialized || !strcasecmp(cmd_argv[0], "exec"))
815 for (cmd=cmd_functions ; cmd ; cmd=cmd->next)
817 if (!strcasecmp (cmd_argv[0],cmd->name))
820 cmd_tokenizebufferpos = oldpos;
826 // check alias (only after host_initialized)
827 if (host_initialized)
829 for (a=cmd_alias ; a ; a=a->next)
831 if (!strcasecmp (cmd_argv[0], a->name))
833 Cbuf_InsertText (a->value);
834 cmd_tokenizebufferpos = oldpos;
840 // check cvars (always)
841 if (!Cvar_Command () && host_initialized)
842 Con_Printf("Unknown command \"%s\"\n", Cmd_Argv(0));
844 cmd_tokenizebufferpos = oldpos;
852 Sends the entire command line over to the server
855 void Cmd_ForwardToServer (void)
858 if (cls.state != ca_connected)
860 Con_Printf("Can't \"%s\", not connected\n", Cmd_Argv(0));
864 if (cls.demoplayback)
865 return; // not really connected
867 // LordHavoc: thanks to Fuh for bringing the pure evil of SZ_Print to my
868 // attention, it has been eradicated from here, its only (former) use in
869 // all of darkplaces.
870 if (strcasecmp(Cmd_Argv(0), "cmd") != 0)
871 s = va("%s %s", Cmd_Argv(0), Cmd_Argc() > 1 ? Cmd_Args() : "\n");
873 s = Cmd_Argc() > 1 ? Cmd_Args() : "\n";
874 MSG_WriteByte(&cls.message, clc_stringcmd);
875 SZ_Write(&cls.message, s, strlen(s) + 1);
883 Returns the position (1 to argc-1) in the command's argument list
884 where the given parameter apears, or 0 if not present
888 int Cmd_CheckParm (const char *parm)
893 Sys_Error ("Cmd_CheckParm: NULL");
895 for (i = 1; i < Cmd_Argc (); i++)
896 if (!strcasecmp (parm, Cmd_Argv (i)))