/* cmd.c script command processing module Copyright (C) 1996-1997 Id Software, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to: Free Software Foundation, Inc. 59 Temple Place - Suite 330 Boston, MA 02111-1307, USA */ static const char rcsid[] = "$Id$"; #ifdef HAVE_CONFIG_H # include "config.h" #endif #ifdef HAVE_STRING_H # include #endif #ifdef HAVE_STRINGS_H # include #endif #include #include "QF/cmd.h" #include "QF/cvar.h" #include "QF/hash.h" #include "QF/qargs.h" #include "QF/qendian.h" #include "QF/sizebuf.h" #include "QF/sys.h" #include "QF/vfs.h" #include "QF/zone.h" #include "compat.h" #include "QF/dstring.h" typedef struct cmdalias_s { struct cmdalias_s *next; const char *name; const char *value; } cmdalias_t; cmdalias_t *cmd_alias; cmd_source_t cmd_source; dstring_t *cmd_buffer; qboolean cmd_wait = false; int cmd_argc; int cmd_maxargc = 0; dstring_t **cmd_argv = 0; const char **cmd_args = 0; cvar_t *cmd_warncmd; cvar_t *cmd_highchars; hashtab_t *cmd_alias_hash; hashtab_t *cmd_hash; //============================================================================= /* Cmd_Wait_f Causes execution of the remainder of the command buffer to be delayed until next frame. This allows commands like: bind g "impulse 5 ; +attack ; wait ; -attack ; impulse 2" */ void Cmd_Wait_f (void) { cmd_wait = true; } /* COMMAND BUFFER */ byte cmd_text_buf[8192]; void Cbuf_Init (void) { cmd_buffer = dstring_newstr (); } void Cbuf_AddText (const char *text) { dstring_appendstr (cmd_buffer, text); } void Cbuf_InsertText (const char *text) { dstring_insertstr (cmd_buffer, "\n", 0); dstring_insertstr (cmd_buffer, text, 0); } void extract_line (dstring_t *buffer) { int i, squotes = 0, dquotes = 0; char *text = cmd_buffer->str; for (i = 0; text[i]; i++) { if (text[i] == '\'' && !dquotes) squotes^=1; if (text[i] == '"' && !squotes) dquotes^=1; if (text[i] == ';' && !squotes && !dquotes) break; if (text[i] == '\n' || text[i] == '\r') break; } if (i) dstring_insert (buffer, cmd_buffer->str, i, 0); if (text[i]) dstring_snip (cmd_buffer, 0, i + 1); else // We've hit the end of the buffer, just clear it dstring_clearstr (cmd_buffer); } void Cbuf_Execute (void) { dstring_t *buf = dstring_newstr (); while (strlen(cmd_buffer->str)) { extract_line (buf); Cmd_ExecuteString(buf->str, cmd_source); if (cmd_wait) { cmd_wait = false; break; } dstring_clearstr(buf); } dstring_delete (buf); } void Cbuf_Execute_Sets (void) { dstring_t *buf = dstring_newstr (); while (strlen(cmd_buffer->str)) { extract_line (buf); if (!strncmp (buf->str, "set", 3) && isspace ((int) buf->str[3])) { Cmd_ExecuteString (buf->str, cmd_source); } else if (!strncmp (buf->str, "setrom", 6) && isspace ((int) buf->str[6])) { Cmd_ExecuteString (buf->str, cmd_source); } dstring_clearstr(buf); } dstring_delete (buf); } /* SCRIPT COMMANDS */ /* Cmd_StuffCmds_f Adds command line parameters as script statements Commands lead with a +, and continue until a - or another + quake +prog jctest.qp +cmd amlev1 quake -nosound +cmd amlev1 */ void Cmd_StuffCmds_f (void) { int i, j; int s; char *build, c; s = strlen (com_cmdline); if (!s) return; // pull out the commands build = malloc (s + 1); if (!build) Sys_Error ("Cmd_StuffCmds_f: Memory Allocation Failure\n"); build[0] = 0; for (i = 0; i < s - 1; i++) { if (com_cmdline[i] == '+') { i++; for (j = i; !((com_cmdline[j] == '+') || (com_cmdline[j] == '-' && (j==0 || com_cmdline[j - 1] == ' ')) || (com_cmdline[j] == 0)); j++); c = com_cmdline[j]; com_cmdline[j] = 0; strncat (build, com_cmdline + i, s - strlen (build)); strncat (build, "\n", s - strlen (build)); com_cmdline[j] = c; i = j - 1; } } // Sys_Printf("[\n%s]\n",build); if (build[0]) Cbuf_InsertText (build); free (build); } void Cmd_Exec_File (const char *path) { char *f; int len; VFile *file; if (!path || !*path) return; if ((file = Qopen (path, "r")) != NULL) { len = COM_filelength (file); f = (char *) malloc (len + 1); if (f) { f[len] = 0; Qread (file, f, len); Qclose (file); Cbuf_InsertText (f); free (f); } } } void Cmd_Exec_f (void) { char *f; int mark; if (Cmd_Argc () != 2) { Sys_Printf ("exec : execute a script file\n"); return; } mark = Hunk_LowMark (); f = (char *) COM_LoadHunkFile (Cmd_Argv (1)); if (!f) { Sys_Printf ("couldn't exec %s\n", Cmd_Argv (1)); return; } Cbuf_InsertText (f); Hunk_FreeToLowMark (mark); if (!Cvar_Command () && (cmd_warncmd->int_val || (developer && developer->int_val))) Sys_Printf ("execing %s\n", Cmd_Argv (1)); } /* Cmd_Echo_f Just prints the rest of the line to the console */ void Cmd_Echo_f (void) { int i; for (i = 1; i < Cmd_Argc (); i++) Sys_Printf ("%s ", Cmd_Argv (i)); Sys_Printf ("\n"); } /* Cmd_Alias_f Creates a new command that executes a command string (possibly ; seperated) */ void Cmd_Alias_f (void) { cmdalias_t *alias; char *cmd; int i, c; const char *s; if (Cmd_Argc () == 1) { Sys_Printf ("Current alias commands:\n"); for (alias = cmd_alias; alias; alias = alias->next) Sys_Printf ("alias %s \"%s\"\n", alias->name, alias->value); return; } s = Cmd_Argv (1); // if the alias already exists, reuse it alias = (cmdalias_t*)Hash_Find (cmd_alias_hash, s); if (alias) { free ((char*)alias->value); } else { cmdalias_t **a; alias = calloc (1, sizeof (cmdalias_t)); alias->name = strdup (s); Hash_Add (cmd_alias_hash, alias); for (a = &cmd_alias; *a; a = &(*a)->next) if (strcmp ((*a)->name, alias->name) >=0) break; alias->next = *a; *a = alias; } // copy the rest of the command line cmd = malloc (strlen (Cmd_Args (1)) + 2);// can never be longer if (!cmd) Sys_Error ("Cmd_Alias_f: Memory Allocation Failure\n"); cmd[0] = 0; // start out with a null string c = Cmd_Argc (); for (i = 2; i < c; i++) { strcat (cmd, Cmd_Argv (i)); if (i != c - 1) strcat (cmd, " "); } alias->value = cmd; } void Cmd_UnAlias_f (void) { cmdalias_t *alias; const char *s; if (Cmd_Argc () != 2) { Sys_Printf ("unalias : erase an existing alias\n"); return; } s = Cmd_Argv (1); alias = Hash_Del (cmd_alias_hash, s); if (alias) { cmdalias_t **a; for (a = &cmd_alias; *a != alias; a = &(*a)->next) ; *a = alias->next; free ((char*)alias->name); free ((char*)alias->value); free (alias); } else { Sys_Printf ("Unknown alias \"%s\"\n", s); } } /* COMMAND EXECUTION */ typedef struct cmd_function_s { struct cmd_function_s *next; const char *name; xcommand_t function; const char *description; } cmd_function_t; static cmd_function_t *cmd_functions; // possible commands to execute int Cmd_Argc (void) { return cmd_argc; } const char * Cmd_Argv (int arg) { if (arg >= cmd_argc) return ""; return cmd_argv[arg]->str; } /* Cmd_Args Returns a single string containing argv(1) to argv(argc()-1) */ const char * Cmd_Args (int start) { if (start >= cmd_argc || !cmd_args[start]) return ""; return cmd_args[start]; } int Cmd_GetToken (const char *str) { int i, squote, dquote; for (i = 0, squote = 0, dquote = 0; i <= strlen(str); i++) { if (str[i] == 0) { if (dquote) { // We never found another quote, backtrack for (; str[i] != '"'; i--); dquote = 0; continue; } else if (squote) { for (; str[i] != '\''; i--); squote = 0; continue; } else // End of string, this token is done break; } else if (str[i] == '\'' && !dquote) { if (i) // If not at start of string, we must be at the end of a token break; squote = 1; } else if (str[i] == '"' && !squote) { if (i) // Start new token break; dquote = 1; } else if (isspace(str[i]) && !dquote && !squote) { break; } } return i; } int tag_gold = 0; int tag_shift = 0; int tag_special = 0; struct stable_s {char a, b;} stable1[] = { // {'\\',0x0D}, // Fake message {'[', 0x90}, // Gold braces {']', 0x91}, {'(', 0x80}, // Scroll bar characters {'=', 0x81}, {')', 0x82}, {'|', 0x83}, {'<', 0x9D}, // Vertical line characters {'-', 0x9E}, {'>', 0x9F}, {'.', 0x8E}, // Gold dot {',', 0x0E}, // White dot {'G', 0x86}, // Ocrana leds from ocrana.wad {'R', 0x87}, {'Y', 0x88}, {'B', 0x89}, {'a', 0x7F}, // White arrow {'A', 0x8D}, // Brown arrow // {'0', 0x92}, // Gold numbers // {'1', 0x93}, // {'2', 0x94}, // {'3', 0x95}, // {'4', 0x96}, // {'5', 0x97}, // {'6', 0x98}, // {'7', 0x99}, // {'8', 0x9A}, // {'9', 0x9B}, // {'n', '\n'}, // Newline! {0, 0} }; void Cmd_ProcessTags (dstring_t *dstr) { int close = 0, i, n, c; char *str = dstr->str; for (i = 0; i < strlen(str); i++) { if (str[i] == '<') { close = 0; for (n = 0; str[i+n] != '>'; n++) if (str[n] == 0) return; if (str[i+1] == '/') close = 1; if (!strncmp(str+i+close+1, "g", 1)) tag_gold = tag_gold > 0 && close ? tag_gold - 1 : tag_gold + 1; if (!strncmp(str+i+close+1, "b", 1)) tag_shift = tag_shift > 0 && close ? tag_shift - 1 : tag_shift + 1; if (!strncmp(str+i+close+1, "s", 1)) tag_special = tag_special > 0 && close ? tag_special - 1 : tag_special + 1; dstring_snip(dstr, i, n+1); i--; continue; } c = str[i]; if (tag_gold && c >='0' && c <= '9') c = (str[i] += (146 - '0')); if (tag_special) for (n = 0; stable1[n].a; n++) if (c == stable1[n].a) c = str[i] = stable1[n].b; if (tag_shift && c < 128) c = (str[i] += 128); } } void Cmd_TokenizeString (const char *text) { int i = 0, len = 0, quotes = 0; const char *str = text; cmd_argc = 0; tag_shift = 0; tag_gold = 0; tag_special = 0; while (strlen(str + i)) { while (isspace(str[i])) i++; len = Cmd_GetToken (str + i); if (!len) return; cmd_argc++; if (cmd_argc > cmd_maxargc) { cmd_argv = realloc(cmd_argv, sizeof(dstring_t *)*cmd_argc); if (!cmd_argv) Sys_Error ("Cmd_TokenizeString: Failed to reallocate memory.\n"); cmd_args = realloc(cmd_args, sizeof(char *)*cmd_argc); if (!cmd_args) Sys_Error ("Cmd_TokenizeString: Failed to reallocate memory.\n"); cmd_argv[cmd_argc-1] = dstring_newstr (); cmd_maxargc++; } dstring_clearstr(cmd_argv[cmd_argc-1]); /* Remove surrounding quotes or double quotes */ cmd_args[cmd_argc-1] = str+i; quotes = 0; if ((str[i] == '\'' && str[i+len] == '\'') || (str[i] == '"' && str[i+len] == '"')) { i++; len-=1; quotes = 1; } dstring_insert(cmd_argv[cmd_argc-1], str + i, len, 0); Cmd_ProcessTags(cmd_argv[cmd_argc-1]); i += len + quotes; /* If we ended on a quote, skip it */ } } void Cmd_AddCommand (const char *cmd_name, xcommand_t function, const char *description) { cmd_function_t *cmd; cmd_function_t **c; // fail if the command is a variable name if (Cvar_FindVar (cmd_name)) { Sys_Printf ("Cmd_AddCommand: %s already defined as a var\n", cmd_name); return; } // fail if the command already exists cmd = (cmd_function_t*)Hash_Find (cmd_hash, cmd_name); if (cmd) { Sys_Printf ("Cmd_AddCommand: %s already defined\n", cmd_name); return; } cmd = malloc (sizeof (cmd_function_t)); if (!cmd) Sys_Error ("Cmd_AddCommand: Memory_Allocation_Failure\n"); cmd->name = cmd_name; cmd->function = function; cmd->description = description; Hash_Add (cmd_hash, cmd); for (c = &cmd_functions; *c; c = &(*c)->next) if (strcmp ((*c)->name, cmd->name) >=0) break; cmd->next = *c; *c = cmd; } qboolean Cmd_Exists (const char *cmd_name) { cmd_function_t *cmd; cmd = (cmd_function_t*)Hash_Find (cmd_hash, cmd_name); if (cmd) { return true; } return false; } const char * Cmd_CompleteCommand (const char *partial) { cmd_function_t *cmd; int len; cmdalias_t *a; len = strlen (partial); if (!len) return NULL; // check for exact match for (cmd = cmd_functions; cmd; cmd = cmd->next) if (!strcasecmp (partial, cmd->name)) return cmd->name; for (a = cmd_alias; a; a = a->next) if (!strcasecmp (partial, a->name)) return a->name; // check for partial match for (cmd = cmd_functions; cmd; cmd = cmd->next) if (!strncasecmp (partial, cmd->name, len)) return cmd->name; for (a = cmd_alias; a; a = a->next) if (!strncasecmp (partial, a->name, len)) return a->name; return NULL; } /* Cmd_CompleteCountPossible New function for tab-completion system Added by EvilTypeGuy Thanks to Fett erich@heintz.com Thanks to taniwha */ int Cmd_CompleteCountPossible (const char *partial) { cmd_function_t *cmd; int len; int h; h = 0; len = strlen(partial); if (!len) return 0; // Loop through the command list and count all partial matches for (cmd = cmd_functions; cmd; cmd = cmd->next) if (!strncasecmp(partial, cmd->name, len)) h++; return h; } /* Cmd_CompleteBuildList New function for tab-completion system Added by EvilTypeGuy Thanks to Fett erich@heintz.com Thanks to taniwha */ const char ** Cmd_CompleteBuildList (const char *partial) { cmd_function_t *cmd; int len = 0; int bpos = 0; int sizeofbuf = (Cmd_CompleteCountPossible (partial) + 1) * sizeof (char *); const char **buf; len = strlen(partial); buf = malloc(sizeofbuf + sizeof (char *)); if (!buf) Sys_Error ("Cmd_CompleteBuildList: Memory Allocation Failure\n"); // Loop through the alias list and print all matches for (cmd = cmd_functions; cmd; cmd = cmd->next) if (!strncasecmp(partial, cmd->name, len)) buf[bpos++] = cmd->name; buf[bpos] = NULL; return buf; } /* Cmd_CompleteAlias New function for tab-completion system Added by EvilTypeGuy Thanks to Fett erich@heintz.com Thanks to taniwha */ const char * Cmd_CompleteAlias (const char * partial) { cmdalias_t *alias; int len; len = strlen(partial); if (!len) return NULL; // Check functions for (alias = cmd_alias; alias; alias = alias->next) if (!strncasecmp(partial, alias->name, len)) return alias->name; return NULL; } /* Cmd_CompleteAliasCountPossible New function for tab-completion system Added by EvilTypeGuy Thanks to Fett erich@heintz.com Thanks to taniwha */ int Cmd_CompleteAliasCountPossible (const char *partial) { cmdalias_t *alias; int len; int h; h = 0; len = strlen(partial); if (!len) return 0; // Loop through the command list and count all partial matches for (alias = cmd_alias; alias; alias = alias->next) if (!strncasecmp(partial, alias->name, len)) h++; return h; } /* Cmd_CompleteAliasBuildList New function for tab-completion system Added by EvilTypeGuy Thanks to Fett erich@heintz.com Thanks to taniwha */ const char ** Cmd_CompleteAliasBuildList (const char *partial) { cmdalias_t *alias; int len = 0; int bpos = 0; int sizeofbuf = (Cmd_CompleteAliasCountPossible (partial) + 1) * sizeof (char *); const char **buf; len = strlen(partial); buf = malloc(sizeofbuf + sizeof (char *)); if (!buf) Sys_Error ("Cmd_CompleteAliasBuildList: Memory Allocation Failure\n"); // Loop through the alias list and print all matches for (alias = cmd_alias; alias; alias = alias->next) if (!strncasecmp(partial, alias->name, len)) buf[bpos++] = alias->name; buf[bpos] = NULL; return buf; } /* Cmd_ExpandVariables Expand $fov-like expressions FIXME: better handling of buffer overflows? */ // dest must point to a 1024-byte buffer void Cmd_ExpandVariables (const char *data, char *dest) { unsigned int c; char buf[1024]; int i, len; cvar_t *bestvar; int quotes = 0; len = 0; // parse a regular word while ((c = *data) != 0) { if (c == '"') quotes++; if (c == '$' && *(data+1) == '{' && !(quotes & 1)) { data+=2; // Copy the text between the braces to a temp buffer i = 0; buf[0] = 0; bestvar = NULL; while ((c = *data) != 0 && c != '}') { data++; buf[i++] = c; buf[i] = 0; if (i >= sizeof (buf) - 1) break; } data++; bestvar = Cvar_FindVar(buf); if (bestvar) { // check buffer size if (len + strlen (bestvar->string) >= 1024 - 1) break; strcpy (&dest[len], bestvar->string); len += strlen (bestvar->string); i = strlen (bestvar->name); while (buf[i]) dest[len++] = buf[i++]; } else { // no matching cvar name was found dest[len++] = '$'; dest[len++] = '{'; if (len + strlen (buf) >= 1024) break; strcpy (&dest[len], buf); len += strlen (buf); dest[len++] = '}'; } } else { dest[len] = c; data++; len++; if (len >= 1024 - 1) break; } }; dest[len] = 0; } /* Cmd_ExecuteString A complete command line has been parsed, so try to execute it */ void Cmd_ExecuteString (const char *text, cmd_source_t src) { cmd_function_t *cmd; cmdalias_t *a; cmd_source = src; Cmd_TokenizeString (text); // execute the command line if (!Cmd_Argc ()) return; // no tokens // check functions cmd = (cmd_function_t*)Hash_Find (cmd_hash, cmd_argv[0]->str); if (cmd) { if (cmd->function) cmd->function (); return; } // Tonik: check cvars if (Cvar_Command ()) return; // check alias a = (cmdalias_t*)Hash_Find (cmd_alias_hash, cmd_argv[0]->str); if (a) { Cbuf_InsertText ("\n"); Cbuf_InsertText (a->value); return; } if (cmd_warncmd->int_val || developer->int_val) Sys_Printf ("Unknown command \"%s\"\n", Cmd_Argv (0)); } /* Cmd_CheckParm Returns the position (1 to argc-1) in the command's argument list where the given parameter apears, or 0 if not present */ int Cmd_CheckParm (const char *parm) { int i; if (!parm) Sys_Error ("Cmd_CheckParm: NULL"); for (i = 1; i < Cmd_Argc (); i++) if (!strcasecmp (parm, Cmd_Argv (i))) return i; return 0; } void Cmd_CmdList_f (void) { cmd_function_t *cmd; int i; int show_description = 0; if (Cmd_Argc() > 1) show_description = 1; for (cmd = cmd_functions, i = 0; cmd; cmd = cmd->next, i++) { if (show_description) { Sys_Printf ("%-20s :\n%s\n", cmd->name, cmd->description); } else { Sys_Printf ("%s\n", cmd->name); } } Sys_Printf ("------------\n%d commands\n", i); } void Cmd_Help_f (void) { const char *name; cvar_t *var; cmd_function_t *cmd; if (Cmd_Argc () != 2) { Sys_Printf ("usage: help \n"); return; } name = Cmd_Argv (1); for (cmd = cmd_functions; cmd && strcasecmp (name, cmd->name); cmd = cmd->next) ; if (cmd) { Sys_Printf ("%s\n", cmd->description); return; } var = Cvar_FindVar (name); if (!var) var = Cvar_FindAlias (name); if (var) { Sys_Printf ("%s\n", var->description); return; } Sys_Printf ("variable/command not found\n"); } void Cmd_Hash_Stats_f (void) { Sys_Printf ("alias hash table:\n"); Hash_Stats (cmd_alias_hash); Sys_Printf ("command hash table:\n"); Hash_Stats (cmd_hash); } static void cmd_alias_free (void *_a, void *unused) { cmdalias_t *a = (cmdalias_t*)_a; free ((char*)a->name); free ((char*)a->value); free (a); } static const char * cmd_alias_get_key (void *_a, void *unused) { cmdalias_t *a = (cmdalias_t*)_a; return a->name; } static const char * cmd_get_key (void *c, void *unused) { cmd_function_t *cmd = (cmd_function_t*)c; return cmd->name; } /* Cmd_Init_Hash initialise the command and alias hash tables */ void Cmd_Init_Hash (void) { cmd_hash = Hash_NewTable (1021, cmd_get_key, 0, 0); cmd_alias_hash = Hash_NewTable (1021, cmd_alias_get_key, cmd_alias_free, 0); } void Cmd_Init (void) { // register our commands Cmd_AddCommand ("stuffcmds", Cmd_StuffCmds_f, "Execute the commands given " "at startup again"); Cmd_AddCommand ("exec", Cmd_Exec_f, "Execute a script file"); Cmd_AddCommand ("echo", Cmd_Echo_f, "Print text to console"); Cmd_AddCommand ("alias", Cmd_Alias_f, "Used to create a reference to a " "command or list of commands.\n" "When used without parameters, displays all current " "aliases.\n" "Note: Enclose multiple commands within quotes and " "seperate each command with a semi-colon."); Cmd_AddCommand ("unalias", Cmd_UnAlias_f, "Remove the selected alias"); Cmd_AddCommand ("wait", Cmd_Wait_f, "Wait a game tic"); Cmd_AddCommand ("cmdlist", Cmd_CmdList_f, "List all commands"); Cmd_AddCommand ("help", Cmd_Help_f, "Display help for a command or " "variable"); //Cmd_AddCommand ("cmd_hash_stats", Cmd_Hash_Stats_f, "Display statistics " // "alias and command hash tables"); cmd_warncmd = Cvar_Get ("cmd_warncmd", "0", CVAR_NONE, NULL, "Toggles the " "display of error messages for unknown commands"); cmd_highchars = Cvar_Get ("cmd_highchars", "0", CVAR_NONE, NULL, "Toggles availability of special " "characters by proceeding letters by $ or #. See " "the documentation for details."); } char *com_token; static size_t com_token_size; static inline void write_com_token (size_t pos, char c) { if (pos + 1 <= com_token_size) { write: com_token[pos] = c; return; } com_token_size = (pos + 1024) & ~1023; com_token = realloc (com_token, com_token_size); if (!com_token) Sys_Error ("COM_Parse: could not allocate %ld bytes", (long)com_token_size); goto write; } /* COM_Parse Parse a token out of a string */ const char * COM_Parse (const char *_data) { const byte *data = (const byte *)_data; unsigned int c; size_t len = 0; write_com_token (len, 0); if (!data) return NULL; // skip whitespace skipwhite: while ((c = *data) <= ' ') { if (c == 0) return NULL; // end of file; data++; } // skip // comments if (c == '/' && data[1] == '/') { while (*data && *data != '\n') data++; goto skipwhite; } // handle quoted strings specially if (c == '\"') { data++; while (1) { c = *data++; if (c == '\"' || !c) { write_com_token (len, 0); return c ? data : data - 1; } write_com_token (len, c); len++; } } // parse a regular word do { write_com_token (len, c); data++; len++; c = *data; } while (c > 32); write_com_token (len, 0); return data; } void Cmd_ParseSpecial (char *s) { char *d; int i, i2; char c = 0; i = 0; d = s; while (*s) { if ((*s == '\\') && ((s[1] == '#') || (s[1] == '$') || (s[1] == '\\'))) { d[i++] = s[1]; s+=2; continue; } if ((*s == '$') && (s[1] != '\0')) { for (i2 = 0; stable1[i2].a; i2++) { if (s[1] == stable1[i2].a) { c = stable1[i2].b; break; } } if (c) { d[i++] = c; s += 2; continue; } } if ((*s == '#') && (s[1] != '\0')) { d[i++] = s[1] ^ 128; s += 2; continue; } d[i++] = *s++; } d[i] = 0; return; }