common.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 // common.c -- misc functions used in client and server
  21
  22 #include <stdlib.h>
  23 #include <fcntl.h>
  24 #ifndef WIN32
  25 #include <unistd.h>
  26 #endif
  27
  28 #include "quakedef.h"
  29 #include "utf8lib.h"
  30
  31 cvar_t registered = {0, "registered","0", "indicates if this is running registered quake (whether gfx/pop.lmp was found)"};
  32 cvar_t cmdline = {0, "cmdline","0", "contains commandline the engine was launched with"};
  33
  34 char com_token[MAX_INPUTLINE];
  35 int com_argc;
  36 const char **com_argv;
  37 int com_selffd = -1;
  38
  39 gamemode_t gamemode;
  40 const char *gamename;
  41 const char *gamedirname1;
  42 const char *gamedirname2;
  43 const char *gamescreenshotname;
  44 const char *gameuserdirname;
  45 char com_modname[MAX_OSPATH] = "";
  46
  47
  48 /*
  49 ============================================================================
  50
  51                                         BYTE ORDER FUNCTIONS
  52
  53 ============================================================================
  54 */
  55
  56
  57 float BuffBigFloat (const unsigned char *buffer)
  58 {
  59         union
  60         {
  61                 float f;
  62                 unsigned int i;
  63         }
  64         u;
  65         u.i = (buffer[0] << 24) | (buffer[1] << 16) | (buffer[2] << 8) | buffer[3];
  66         return u.f;
  67 }
  68
  69 int BuffBigLong (const unsigned char *buffer)
  70 {
  71         return (buffer[0] << 24) | (buffer[1] << 16) | (buffer[2] << 8) | buffer[3];
  72 }
  73
  74 short BuffBigShort (const unsigned char *buffer)
  75 {
  76         return (buffer[0] << 8) | buffer[1];
  77 }
  78
  79 float BuffLittleFloat (const unsigned char *buffer)
  80 {
  81         union
  82         {
  83                 float f;
  84                 unsigned int i;
  85         }
  86         u;
  87         u.i = (buffer[3] << 24) | (buffer[2] << 16) | (buffer[1] << 8) | buffer[0];
  88         return u.f;
  89 }
  90
  91 int BuffLittleLong (const unsigned char *buffer)
  92 {
  93         return (buffer[3] << 24) | (buffer[2] << 16) | (buffer[1] << 8) | buffer[0];
  94 }
  95
  96 short BuffLittleShort (const unsigned char *buffer)
  97 {
  98         return (buffer[1] << 8) | buffer[0];
  99 }
 100
 101 void StoreBigLong (unsigned char *buffer, unsigned int i)
 102 {
 103         buffer[0] = (i >> 24) & 0xFF;
 104         buffer[1] = (i >> 16) & 0xFF;
 105         buffer[2] = (i >>  8) & 0xFF;
 106         buffer[3] = i         & 0xFF;
 107 }
 108
 109 void StoreBigShort (unsigned char *buffer, unsigned short i)
 110 {
 111         buffer[0] = (i >>  8) & 0xFF;
 112         buffer[1] = i         & 0xFF;
 113 }
 114
 115 void StoreLittleLong (unsigned char *buffer, unsigned int i)
 116 {
 117         buffer[0] = i         & 0xFF;
 118         buffer[1] = (i >>  8) & 0xFF;
 119         buffer[2] = (i >> 16) & 0xFF;
 120         buffer[3] = (i >> 24) & 0xFF;
 121 }
 122
 123 void StoreLittleShort (unsigned char *buffer, unsigned short i)
 124 {
 125         buffer[0] = i         & 0xFF;
 126         buffer[1] = (i >>  8) & 0xFF;
 127 }
 128
 129 /*
 130 ============================================================================
 131
 132                                         CRC FUNCTIONS
 133
 134 ============================================================================
 135 */
 136
 137 // this is a 16 bit, non-reflected CRC using the polynomial 0x1021
 138 // and the initial and final xor values shown below...  in other words, the
 139 // CCITT standard CRC used by XMODEM
 140
 141 #define CRC_INIT_VALUE  0xffff
 142 #define CRC_XOR_VALUE   0x0000
 143
 144 static unsigned short crctable[256] =
 145 {
 146         0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7,
 147         0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef,
 148         0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6,
 149         0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de,
 150         0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485,
 151         0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d,
 152         0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4,
 153         0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc,
 154         0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823,
 155         0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b,
 156         0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12,
 157         0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a,
 158         0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41,
 159         0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49,
 160         0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70,
 161         0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78,
 162         0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f,
 163         0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067,
 164         0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e,
 165         0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256,
 166         0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d,
 167         0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405,
 168         0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c,
 169         0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634,
 170         0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab,
 171         0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3,
 172         0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a,
 173         0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92,
 174         0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9,
 175         0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1,
 176         0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8,
 177         0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0
 178 };
 179
 180 unsigned short CRC_Block(const unsigned char *data, size_t size)
 181 {
 182         unsigned short crc = CRC_INIT_VALUE;
 183         while (size--)
 184                 crc = (crc << 8) ^ crctable[(crc >> 8) ^ (*data++)];
 185         return crc ^ CRC_XOR_VALUE;
 186 }
 187
 188 unsigned short CRC_Block_CaseInsensitive(const unsigned char *data, size_t size)
 189 {
 190         unsigned short crc = CRC_INIT_VALUE;
 191         while (size--)
 192                 crc = (crc << 8) ^ crctable[(crc >> 8) ^ (tolower(*data++))];
 193         return crc ^ CRC_XOR_VALUE;
 194 }
 195
 196 // QuakeWorld
 197 static unsigned char chktbl[1024 + 4] =
 198 {
 199         0x78,0xd2,0x94,0xe3,0x41,0xec,0xd6,0xd5,0xcb,0xfc,0xdb,0x8a,0x4b,0xcc,0x85,0x01,
 200         0x23,0xd2,0xe5,0xf2,0x29,0xa7,0x45,0x94,0x4a,0x62,0xe3,0xa5,0x6f,0x3f,0xe1,0x7a,
 201         0x64,0xed,0x5c,0x99,0x29,0x87,0xa8,0x78,0x59,0x0d,0xaa,0x0f,0x25,0x0a,0x5c,0x58,
 202         0xfb,0x00,0xa7,0xa8,0x8a,0x1d,0x86,0x80,0xc5,0x1f,0xd2,0x28,0x69,0x71,0x58,0xc3,
 203         0x51,0x90,0xe1,0xf8,0x6a,0xf3,0x8f,0xb0,0x68,0xdf,0x95,0x40,0x5c,0xe4,0x24,0x6b,
 204         0x29,0x19,0x71,0x3f,0x42,0x63,0x6c,0x48,0xe7,0xad,0xa8,0x4b,0x91,0x8f,0x42,0x36,
 205         0x34,0xe7,0x32,0x55,0x59,0x2d,0x36,0x38,0x38,0x59,0x9b,0x08,0x16,0x4d,0x8d,0xf8,
 206         0x0a,0xa4,0x52,0x01,0xbb,0x52,0xa9,0xfd,0x40,0x18,0x97,0x37,0xff,0xc9,0x82,0x27,
 207         0xb2,0x64,0x60,0xce,0x00,0xd9,0x04,0xf0,0x9e,0x99,0xbd,0xce,0x8f,0x90,0x4a,0xdd,
 208         0xe1,0xec,0x19,0x14,0xb1,0xfb,0xca,0x1e,0x98,0x0f,0xd4,0xcb,0x80,0xd6,0x05,0x63,
 209         0xfd,0xa0,0x74,0xa6,0x86,0xf6,0x19,0x98,0x76,0x27,0x68,0xf7,0xe9,0x09,0x9a,0xf2,
 210         0x2e,0x42,0xe1,0xbe,0x64,0x48,0x2a,0x74,0x30,0xbb,0x07,0xcc,0x1f,0xd4,0x91,0x9d,
 211         0xac,0x55,0x53,0x25,0xb9,0x64,0xf7,0x58,0x4c,0x34,0x16,0xbc,0xf6,0x12,0x2b,0x65,
 212         0x68,0x25,0x2e,0x29,0x1f,0xbb,0xb9,0xee,0x6d,0x0c,0x8e,0xbb,0xd2,0x5f,0x1d,0x8f,
 213         0xc1,0x39,0xf9,0x8d,0xc0,0x39,0x75,0xcf,0x25,0x17,0xbe,0x96,0xaf,0x98,0x9f,0x5f,
 214         0x65,0x15,0xc4,0x62,0xf8,0x55,0xfc,0xab,0x54,0xcf,0xdc,0x14,0x06,0xc8,0xfc,0x42,
 215         0xd3,0xf0,0xad,0x10,0x08,0xcd,0xd4,0x11,0xbb,0xca,0x67,0xc6,0x48,0x5f,0x9d,0x59,
 216         0xe3,0xe8,0x53,0x67,0x27,0x2d,0x34,0x9e,0x9e,0x24,0x29,0xdb,0x69,0x99,0x86,0xf9,
 217         0x20,0xb5,0xbb,0x5b,0xb0,0xf9,0xc3,0x67,0xad,0x1c,0x9c,0xf7,0xcc,0xef,0xce,0x69,
 218         0xe0,0x26,0x8f,0x79,0xbd,0xca,0x10,0x17,0xda,0xa9,0x88,0x57,0x9b,0x15,0x24,0xba,
 219         0x84,0xd0,0xeb,0x4d,0x14,0xf5,0xfc,0xe6,0x51,0x6c,0x6f,0x64,0x6b,0x73,0xec,0x85,
 220         0xf1,0x6f,0xe1,0x67,0x25,0x10,0x77,0x32,0x9e,0x85,0x6e,0x69,0xb1,0x83,0x00,0xe4,
 221         0x13,0xa4,0x45,0x34,0x3b,0x40,0xff,0x41,0x82,0x89,0x79,0x57,0xfd,0xd2,0x8e,0xe8,
 222         0xfc,0x1d,0x19,0x21,0x12,0x00,0xd7,0x66,0xe5,0xc7,0x10,0x1d,0xcb,0x75,0xe8,0xfa,
 223         0xb6,0xee,0x7b,0x2f,0x1a,0x25,0x24,0xb9,0x9f,0x1d,0x78,0xfb,0x84,0xd0,0x17,0x05,
 224         0x71,0xb3,0xc8,0x18,0xff,0x62,0xee,0xed,0x53,0xab,0x78,0xd3,0x65,0x2d,0xbb,0xc7,
 225         0xc1,0xe7,0x70,0xa2,0x43,0x2c,0x7c,0xc7,0x16,0x04,0xd2,0x45,0xd5,0x6b,0x6c,0x7a,
 226         0x5e,0xa1,0x50,0x2e,0x31,0x5b,0xcc,0xe8,0x65,0x8b,0x16,0x85,0xbf,0x82,0x83,0xfb,
 227         0xde,0x9f,0x36,0x48,0x32,0x79,0xd6,0x9b,0xfb,0x52,0x45,0xbf,0x43,0xf7,0x0b,0x0b,
 228         0x19,0x19,0x31,0xc3,0x85,0xec,0x1d,0x8c,0x20,0xf0,0x3a,0xfa,0x80,0x4d,0x2c,0x7d,
 229         0xac,0x60,0x09,0xc0,0x40,0xee,0xb9,0xeb,0x13,0x5b,0xe8,0x2b,0xb1,0x20,0xf0,0xce,
 230         0x4c,0xbd,0xc6,0x04,0x86,0x70,0xc6,0x33,0xc3,0x15,0x0f,0x65,0x19,0xfd,0xc2,0xd3,
 231
 232         // map checksum goes here
 233         0x00,0x00,0x00,0x00
 234 };
 235
 236 // QuakeWorld
 237 unsigned char COM_BlockSequenceCRCByteQW(unsigned char *base, int length, int sequence)
 238 {
 239         unsigned char *p;
 240         unsigned char chkb[60 + 4];
 241
 242         p = chktbl + (sequence % (sizeof(chktbl) - 8));
 243
 244         if (length > 60)
 245                 length = 60;
 246         memcpy(chkb, base, length);
 247
 248         chkb[length] = (sequence & 0xff) ^ p[0];
 249         chkb[length+1] = p[1];
 250         chkb[length+2] = ((sequence>>8) & 0xff) ^ p[2];
 251         chkb[length+3] = p[3];
 252
 253         return CRC_Block(chkb, length + 4) & 0xff;
 254 }
 255
 256 /*
 257 ==============================================================================
 258
 259                         MESSAGE IO FUNCTIONS
 260
 261 Handles byte ordering and avoids alignment errors
 262 ==============================================================================
 263 */
 264
 265 //
 266 // writing functions
 267 //
 268
 269 void MSG_WriteChar (sizebuf_t *sb, int c)
 270 {
 271         unsigned char    *buf;
 272
 273         buf = SZ_GetSpace (sb, 1);
 274         buf[0] = c;
 275 }
 276
 277 void MSG_WriteByte (sizebuf_t *sb, int c)
 278 {
 279         unsigned char    *buf;
 280
 281         buf = SZ_GetSpace (sb, 1);
 282         buf[0] = c;
 283 }
 284
 285 void MSG_WriteShort (sizebuf_t *sb, int c)
 286 {
 287         unsigned char    *buf;
 288
 289         buf = SZ_GetSpace (sb, 2);
 290         buf[0] = c&0xff;
 291         buf[1] = c>>8;
 292 }
 293
 294 void MSG_WriteLong (sizebuf_t *sb, int c)
 295 {
 296         unsigned char    *buf;
 297
 298         buf = SZ_GetSpace (sb, 4);
 299         buf[0] = c&0xff;
 300         buf[1] = (c>>8)&0xff;
 301         buf[2] = (c>>16)&0xff;
 302         buf[3] = c>>24;
 303 }
 304
 305 void MSG_WriteFloat (sizebuf_t *sb, float f)
 306 {
 307         union
 308         {
 309                 float   f;
 310                 int     l;
 311         } dat;
 312
 313
 314         dat.f = f;
 315         dat.l = LittleLong (dat.l);
 316
 317         SZ_Write (sb, (unsigned char *)&dat.l, 4);
 318 }
 319
 320 void MSG_WriteString (sizebuf_t *sb, const char *s)
 321 {
 322         if (!s || !*s)
 323                 MSG_WriteChar (sb, 0);
 324         else
 325                 SZ_Write (sb, (unsigned char *)s, (int)strlen(s)+1);
 326 }
 327
 328 void MSG_WriteUnterminatedString (sizebuf_t *sb, const char *s)
 329 {
 330         if (s && *s)
 331                 SZ_Write (sb, (unsigned char *)s, (int)strlen(s));
 332 }
 333
 334 void MSG_WriteCoord13i (sizebuf_t *sb, float f)
 335 {
 336         if (f >= 0)
 337                 MSG_WriteShort (sb, (int)(f * 8.0 + 0.5));
 338         else
 339                 MSG_WriteShort (sb, (int)(f * 8.0 - 0.5));
 340 }
 341
 342 void MSG_WriteCoord16i (sizebuf_t *sb, float f)
 343 {
 344         if (f >= 0)
 345                 MSG_WriteShort (sb, (int)(f + 0.5));
 346         else
 347                 MSG_WriteShort (sb, (int)(f - 0.5));
 348 }
 349
 350 void MSG_WriteCoord32f (sizebuf_t *sb, float f)
 351 {
 352         MSG_WriteFloat (sb, f);
 353 }
 354
 355 void MSG_WriteCoord (sizebuf_t *sb, float f, protocolversion_t protocol)
 356 {
 357         if (protocol == PROTOCOL_QUAKE || protocol == PROTOCOL_QUAKEDP || protocol == PROTOCOL_NEHAHRAMOVIE || protocol == PROTOCOL_NEHAHRABJP || protocol == PROTOCOL_NEHAHRABJP2 || protocol == PROTOCOL_NEHAHRABJP3 || protocol == PROTOCOL_QUAKEWORLD)
 358                 MSG_WriteCoord13i (sb, f);
 359         else if (protocol == PROTOCOL_DARKPLACES1)
 360                 MSG_WriteCoord32f (sb, f);
 361         else if (protocol == PROTOCOL_DARKPLACES2 || protocol == PROTOCOL_DARKPLACES3 || protocol == PROTOCOL_DARKPLACES4)
 362                 MSG_WriteCoord16i (sb, f);
 363         else
 364                 MSG_WriteCoord32f (sb, f);
 365 }
 366
 367 void MSG_WriteVector (sizebuf_t *sb, const vec3_t v, protocolversion_t protocol)
 368 {
 369         MSG_WriteCoord (sb, v[0], protocol);
 370         MSG_WriteCoord (sb, v[1], protocol);
 371         MSG_WriteCoord (sb, v[2], protocol);
 372 }
 373
 374 // LordHavoc: round to nearest value, rather than rounding toward zero, fixes crosshair problem
 375 void MSG_WriteAngle8i (sizebuf_t *sb, float f)
 376 {
 377         if (f >= 0)
 378                 MSG_WriteByte (sb, (int)(f*(256.0/360.0) + 0.5) & 255);
 379         else
 380                 MSG_WriteByte (sb, (int)(f*(256.0/360.0) - 0.5) & 255);
 381 }
 382
 383 void MSG_WriteAngle16i (sizebuf_t *sb, float f)
 384 {
 385         if (f >= 0)
 386                 MSG_WriteShort (sb, (int)(f*(65536.0/360.0) + 0.5) & 65535);
 387         else
 388                 MSG_WriteShort (sb, (int)(f*(65536.0/360.0) - 0.5) & 65535);
 389 }
 390
 391 void MSG_WriteAngle32f (sizebuf_t *sb, float f)
 392 {
 393         MSG_WriteFloat (sb, f);
 394 }
 395
 396 void MSG_WriteAngle (sizebuf_t *sb, float f, protocolversion_t protocol)
 397 {
 398         if (protocol == PROTOCOL_QUAKE || protocol == PROTOCOL_QUAKEDP || protocol == PROTOCOL_NEHAHRAMOVIE || protocol == PROTOCOL_NEHAHRABJP || protocol == PROTOCOL_NEHAHRABJP2 || protocol == PROTOCOL_NEHAHRABJP3 || protocol == PROTOCOL_DARKPLACES1 || protocol == PROTOCOL_DARKPLACES2 || protocol == PROTOCOL_DARKPLACES3 || protocol == PROTOCOL_DARKPLACES4 || protocol == PROTOCOL_QUAKEWORLD)
 399                 MSG_WriteAngle8i (sb, f);
 400         else
 401                 MSG_WriteAngle16i (sb, f);
 402 }
 403
 404 //
 405 // reading functions
 406 //
 407
 408 void MSG_InitReadBuffer (sizebuf_t *buf, unsigned char *data, int size)
 409 {
 410         memset(buf, 0, sizeof(*buf));
 411         buf->data = data;
 412         buf->maxsize = buf->cursize = size;
 413         MSG_BeginReading(buf);
 414 }
 415
 416 void MSG_BeginReading(sizebuf_t *sb)
 417 {
 418         sb->readcount = 0;
 419         sb->badread = false;
 420 }
 421
 422 int MSG_ReadLittleShort(sizebuf_t *sb)
 423 {
 424         if (sb->readcount+2 > sb->cursize)
 425         {
 426                 sb->badread = true;
 427                 return -1;
 428         }
 429         sb->readcount += 2;
 430         return (short)(sb->data[sb->readcount-2] | (sb->data[sb->readcount-1]<<8));
 431 }
 432
 433 int MSG_ReadBigShort (sizebuf_t *sb)
 434 {
 435         if (sb->readcount+2 > sb->cursize)
 436         {
 437                 sb->badread = true;
 438                 return -1;
 439         }
 440         sb->readcount += 2;
 441         return (short)((sb->data[sb->readcount-2]<<8) + sb->data[sb->readcount-1]);
 442 }
 443
 444 int MSG_ReadLittleLong (sizebuf_t *sb)
 445 {
 446         if (sb->readcount+4 > sb->cursize)
 447         {
 448                 sb->badread = true;
 449                 return -1;
 450         }
 451         sb->readcount += 4;
 452         return sb->data[sb->readcount-4] | (sb->data[sb->readcount-3]<<8) | (sb->data[sb->readcount-2]<<16) | (sb->data[sb->readcount-1]<<24);
 453 }
 454
 455 int MSG_ReadBigLong (sizebuf_t *sb)
 456 {
 457         if (sb->readcount+4 > sb->cursize)
 458         {
 459                 sb->badread = true;
 460                 return -1;
 461         }
 462         sb->readcount += 4;
 463         return (sb->data[sb->readcount-4]<<24) + (sb->data[sb->readcount-3]<<16) + (sb->data[sb->readcount-2]<<8) + sb->data[sb->readcount-1];
 464 }
 465
 466 float MSG_ReadLittleFloat (sizebuf_t *sb)
 467 {
 468         union
 469         {
 470                 float f;
 471                 int l;
 472         } dat;
 473         if (sb->readcount+4 > sb->cursize)
 474         {
 475                 sb->badread = true;
 476                 return -1;
 477         }
 478         sb->readcount += 4;
 479         dat.l = sb->data[sb->readcount-4] | (sb->data[sb->readcount-3]<<8) | (sb->data[sb->readcount-2]<<16) | (sb->data[sb->readcount-1]<<24);
 480         return dat.f;
 481 }
 482
 483 float MSG_ReadBigFloat (sizebuf_t *sb)
 484 {
 485         union
 486         {
 487                 float f;
 488                 int l;
 489         } dat;
 490         if (sb->readcount+4 > sb->cursize)
 491         {
 492                 sb->badread = true;
 493                 return -1;
 494         }
 495         sb->readcount += 4;
 496         dat.l = (sb->data[sb->readcount-4]<<24) | (sb->data[sb->readcount-3]<<16) | (sb->data[sb->readcount-2]<<8) | sb->data[sb->readcount-1];
 497         return dat.f;
 498 }
 499
 500 char *MSG_ReadString (sizebuf_t *sb, char *string, size_t maxstring)
 501 {
 502         int c;
 503         size_t l = 0;
 504         // read string into sbfer, but only store as many characters as will fit
 505         while ((c = MSG_ReadByte(sb)) > 0)
 506                 if (l < maxstring - 1)
 507                         string[l++] = c;
 508         string[l] = 0;
 509         return string;
 510 }
 511
 512 int MSG_ReadBytes (sizebuf_t *sb, int numbytes, unsigned char *out)
 513 {
 514         int l, c;
 515         for (l = 0;l < numbytes && (c = MSG_ReadByte(sb)) != -1;l++)
 516                 out[l] = c;
 517         return l;
 518 }
 519
 520 float MSG_ReadCoord13i (sizebuf_t *sb)
 521 {
 522         return MSG_ReadLittleShort(sb) * (1.0/8.0);
 523 }
 524
 525 float MSG_ReadCoord16i (sizebuf_t *sb)
 526 {
 527         return (signed short) MSG_ReadLittleShort(sb);
 528 }
 529
 530 float MSG_ReadCoord32f (sizebuf_t *sb)
 531 {
 532         return MSG_ReadLittleFloat(sb);
 533 }
 534
 535 float MSG_ReadCoord (sizebuf_t *sb, protocolversion_t protocol)
 536 {
 537         if (protocol == PROTOCOL_QUAKE || protocol == PROTOCOL_QUAKEDP || protocol == PROTOCOL_NEHAHRAMOVIE || protocol == PROTOCOL_NEHAHRABJP || protocol == PROTOCOL_NEHAHRABJP2 || protocol == PROTOCOL_NEHAHRABJP3 || protocol == PROTOCOL_QUAKEWORLD)
 538                 return MSG_ReadCoord13i(sb);
 539         else if (protocol == PROTOCOL_DARKPLACES1)
 540                 return MSG_ReadCoord32f(sb);
 541         else if (protocol == PROTOCOL_DARKPLACES2 || protocol == PROTOCOL_DARKPLACES3 || protocol == PROTOCOL_DARKPLACES4)
 542                 return MSG_ReadCoord16i(sb);
 543         else
 544                 return MSG_ReadCoord32f(sb);
 545 }
 546
 547 void MSG_ReadVector (sizebuf_t *sb, vec3_t v, protocolversion_t protocol)
 548 {
 549         v[0] = MSG_ReadCoord(sb, protocol);
 550         v[1] = MSG_ReadCoord(sb, protocol);
 551         v[2] = MSG_ReadCoord(sb, protocol);
 552 }
 553
 554 // LordHavoc: round to nearest value, rather than rounding toward zero, fixes crosshair problem
 555 float MSG_ReadAngle8i (sizebuf_t *sb)
 556 {
 557         return (signed char) MSG_ReadByte (sb) * (360.0/256.0);
 558 }
 559
 560 float MSG_ReadAngle16i (sizebuf_t *sb)
 561 {
 562         return (signed short)MSG_ReadShort (sb) * (360.0/65536.0);
 563 }
 564
 565 float MSG_ReadAngle32f (sizebuf_t *sb)
 566 {
 567         return MSG_ReadFloat (sb);
 568 }
 569
 570 float MSG_ReadAngle (sizebuf_t *sb, protocolversion_t protocol)
 571 {
 572         if (protocol == PROTOCOL_QUAKE || protocol == PROTOCOL_QUAKEDP || protocol == PROTOCOL_NEHAHRAMOVIE || protocol == PROTOCOL_NEHAHRABJP || protocol == PROTOCOL_NEHAHRABJP2 || protocol == PROTOCOL_NEHAHRABJP3 || protocol == PROTOCOL_DARKPLACES1 || protocol == PROTOCOL_DARKPLACES2 || protocol == PROTOCOL_DARKPLACES3 || protocol == PROTOCOL_DARKPLACES4 || protocol == PROTOCOL_QUAKEWORLD)
 573                 return MSG_ReadAngle8i (sb);
 574         else
 575                 return MSG_ReadAngle16i (sb);
 576 }
 577
 578
 579 //===========================================================================
 580
 581 void SZ_Clear (sizebuf_t *buf)
 582 {
 583         buf->cursize = 0;
 584 }
 585
 586 unsigned char *SZ_GetSpace (sizebuf_t *buf, int length)
 587 {
 588         unsigned char *data;
 589
 590         if (buf->cursize + length > buf->maxsize)
 591         {
 592                 if (!buf->allowoverflow)
 593                         Host_Error ("SZ_GetSpace: overflow without allowoverflow set");
 594
 595                 if (length > buf->maxsize)
 596                         Host_Error ("SZ_GetSpace: %i is > full buffer size", length);
 597
 598                 buf->overflowed = true;
 599                 Con_Print("SZ_GetSpace: overflow\n");
 600                 SZ_Clear (buf);
 601         }
 602
 603         data = buf->data + buf->cursize;
 604         buf->cursize += length;
 605
 606         return data;
 607 }
 608
 609 void SZ_Write (sizebuf_t *buf, const unsigned char *data, int length)
 610 {
 611         memcpy (SZ_GetSpace(buf,length),data,length);
 612 }
 613
 614 // LordHavoc: thanks to Fuh for bringing the pure evil of SZ_Print to my
 615 // attention, it has been eradicated from here, its only (former) use in
 616 // all of darkplaces.
 617
 618 static const char *hexchar = "0123456789ABCDEF";
 619 void Com_HexDumpToConsole(const unsigned char *data, int size)
 620 {
 621         int i, j, n;
 622         char text[1024];
 623         char *cur, *flushpointer;
 624         const unsigned char *d;
 625         cur = text;
 626         flushpointer = text + 512;
 627         for (i = 0;i < size;)
 628         {
 629                 n = 16;
 630                 if (n > size - i)
 631                         n = size - i;
 632                 d = data + i;
 633                 // print offset
 634                 *cur++ = hexchar[(i >> 12) & 15];
 635                 *cur++ = hexchar[(i >>  8) & 15];
 636                 *cur++ = hexchar[(i >>  4) & 15];
 637                 *cur++ = hexchar[(i >>  0) & 15];
 638                 *cur++ = ':';
 639                 // print hex
 640                 for (j = 0;j < 16;j++)
 641                 {
 642                         if (j < n)
 643                         {
 644                                 *cur++ = hexchar[(d[j] >> 4) & 15];
 645                                 *cur++ = hexchar[(d[j] >> 0) & 15];
 646                         }
 647                         else
 648                         {
 649                                 *cur++ = ' ';
 650                                 *cur++ = ' ';
 651                         }
 652                         if ((j & 3) == 3)
 653                                 *cur++ = ' ';
 654                 }
 655                 // print text
 656                 for (j = 0;j < 16;j++)
 657                 {
 658                         if (j < n)
 659                         {
 660                                 // color change prefix character has to be treated specially
 661                                 if (d[j] == STRING_COLOR_TAG)
 662                                 {
 663                                         *cur++ = STRING_COLOR_TAG;
 664                                         *cur++ = STRING_COLOR_TAG;
 665                                 }
 666                                 else if (d[j] >= (unsigned char) ' ')
 667                                         *cur++ = d[j];
 668                                 else
 669                                         *cur++ = '.';
 670                         }
 671                         else
 672                                 *cur++ = ' ';
 673                 }
 674                 *cur++ = '\n';
 675                 i += n;
 676                 if (cur >= flushpointer || i >= size)
 677                 {
 678                         *cur++ = 0;
 679                         Con_Print(text);
 680                         cur = text;
 681                 }
 682         }
 683 }
 684
 685 void SZ_HexDumpToConsole(const sizebuf_t *buf)
 686 {
 687         Com_HexDumpToConsole(buf->data, buf->cursize);
 688 }
 689
 690
 691 //============================================================================
 692
 693 /*
 694 ==============
 695 COM_Wordwrap
 696
 697 Word wraps a string. The wordWidth function is guaranteed to be called exactly
 698 once for each word in the string, so it may be stateful, no idea what that
 699 would be good for any more. At the beginning of the string, it will be called
 700 for the char 0 to initialize a clean state, and then once with the string " "
 701 (a space) so the routine knows how long a space is.
 702
 703 In case no single character fits into the given width, the wordWidth function
 704 must return the width of exactly one character.
 705
 706 Wrapped lines get the isContinuation flag set and are continuationWidth less wide.
 707
 708 The sum of the return values of the processLine function will be returned.
 709 ==============
 710 */
 711 int COM_Wordwrap(const char *string, size_t length, float continuationWidth, float maxWidth, COM_WordWidthFunc_t wordWidth, void *passthroughCW, COM_LineProcessorFunc processLine, void *passthroughPL)
 712 {
 713         // Logic is as follows:
 714         //
 715         // For each word or whitespace:
 716         //   Newline found? Output current line, advance to next line. This is not a continuation. Continue.
 717         //   Space found? Always add it to the current line, no matter if it fits.
 718         //   Word found? Check if current line + current word fits.
 719         //     If it fits, append it. Continue.
 720         //     If it doesn't fit, output current line, advance to next line. Append the word. This is a continuation. Continue.
 721
 722         qboolean isContinuation = false;
 723         float spaceWidth;
 724         const char *startOfLine = string;
 725         const char *cursor = string;
 726         const char *end = string + length;
 727         float spaceUsedInLine = 0;
 728         float spaceUsedForWord;
 729         int result = 0;
 730         size_t wordLen;
 731         size_t dummy;
 732
 733         dummy = 0;
 734         wordWidth(passthroughCW, NULL, &dummy, -1);
 735         dummy = 1;
 736         spaceWidth = wordWidth(passthroughCW, " ", &dummy, -1);
 737
 738         for(;;)
 739         {
 740                 char ch = (cursor < end) ? *cursor : 0;
 741                 switch(ch)
 742                 {
 743                         case 0: // end of string
 744                                 result += processLine(passthroughPL, startOfLine, cursor - startOfLine, spaceUsedInLine, isContinuation);
 745                                 goto out;
 746                         case '\n': // end of line
 747                                 result += processLine(passthroughPL, startOfLine, cursor - startOfLine, spaceUsedInLine, isContinuation);
 748                                 isContinuation = false;
 749                                 ++cursor;
 750                                 startOfLine = cursor;
 751                                 break;
 752                         case ' ': // space
 753                                 ++cursor;
 754                                 spaceUsedInLine += spaceWidth;
 755                                 break;
 756                         default: // word
 757                                 wordLen = 1;
 758                                 while(cursor + wordLen < end)
 759                                 {
 760                                         switch(cursor[wordLen])
 761                                         {
 762                                                 case 0:
 763                                                 case '\n':
 764                                                 case ' ':
 765                                                         goto out_inner;
 766                                                 default:
 767                                                         ++wordLen;
 768                                                         break;
 769                                         }
 770                                 }
 771                                 out_inner:
 772                                 spaceUsedForWord = wordWidth(passthroughCW, cursor, &wordLen, maxWidth - continuationWidth); // this may have reduced wordLen when it won't fit - but this is GOOD. TODO fix words that do fit in a non-continuation line
 773                                 if(wordLen < 1) // cannot happen according to current spec of wordWidth
 774                                 {
 775                                         wordLen = 1;
 776                                         spaceUsedForWord = maxWidth + 1; // too high, forces it in a line of itself
 777                                 }
 778                                 if(spaceUsedInLine + spaceUsedForWord <= maxWidth || cursor == startOfLine)
 779                                 {
 780                                         // we can simply append it
 781                                         cursor += wordLen;
 782                                         spaceUsedInLine += spaceUsedForWord;
 783                                 }
 784                                 else
 785                                 {
 786                                         // output current line
 787                                         result += processLine(passthroughPL, startOfLine, cursor - startOfLine, spaceUsedInLine, isContinuation);
 788                                         isContinuation = true;
 789                                         startOfLine = cursor;
 790                                         cursor += wordLen;
 791                                         spaceUsedInLine = continuationWidth + spaceUsedForWord;
 792                                 }
 793                 }
 794         }
 795         out:
 796
 797         return result;
 798
 799 /*
 800         qboolean isContinuation = false;
 801         float currentWordSpace = 0;
 802         const char *currentWord = 0;
 803         float minReserve = 0;
 804
 805         float spaceUsedInLine = 0;
 806         const char *currentLine = 0;
 807         const char *currentLineEnd = 0;
 808         float currentLineFinalWhitespace = 0;
 809         const char *p;
 810
 811         int result = 0;
 812         minReserve = charWidth(passthroughCW, 0);
 813         minReserve += charWidth(passthroughCW, ' ');
 814
 815         if(maxWidth < continuationWidth + minReserve)
 816                 maxWidth = continuationWidth + minReserve;
 817
 818         charWidth(passthroughCW, 0);
 819
 820         for(p = string; p < string + length; ++p)
 821         {
 822                 char c = *p;
 823                 float w = charWidth(passthroughCW, c);
 824
 825                 if(!currentWord)
 826                 {
 827                         currentWord = p;
 828                         currentWordSpace = 0;
 829                 }
 830
 831                 if(!currentLine)
 832                 {
 833                         currentLine = p;
 834                         spaceUsedInLine = isContinuation ? continuationWidth : 0;
 835                         currentLineEnd = 0;
 836                 }
 837
 838                 if(c == ' ')
 839                 {
 840                         // 1. I can add the word AND a space - then just append it.
 841                         if(spaceUsedInLine + currentWordSpace + w <= maxWidth)
 842                         {
 843                                 currentLineEnd = p; // note: space not included here
 844                                 currentLineFinalWhitespace = w;
 845                                 spaceUsedInLine += currentWordSpace + w;
 846                         }
 847                         // 2. I can just add the word - then append it, output current line and go to next one.
 848                         else if(spaceUsedInLine + currentWordSpace <= maxWidth)
 849                         {
 850                                 result += processLine(passthroughPL, currentLine, p - currentLine, spaceUsedInLine + currentWordSpace, isContinuation);
 851                                 currentLine = 0;
 852                                 isContinuation = true;
 853                         }
 854                         // 3. Otherwise, output current line and go to next one, where I can add the word.
 855                         else if(continuationWidth + currentWordSpace + w <= maxWidth)
 856                         {
 857                                 if(currentLineEnd)
 858                                         result += processLine(passthroughPL, currentLine, currentLineEnd - currentLine, spaceUsedInLine - currentLineFinalWhitespace, isContinuation);
 859                                 currentLine = currentWord;
 860                                 spaceUsedInLine = continuationWidth + currentWordSpace + w;
 861                                 currentLineEnd = p;
 862                                 currentLineFinalWhitespace = w;
 863                                 isContinuation = true;
 864                         }
 865                         // 4. We can't even do that? Then output both current and next word as new lines.
 866                         else
 867                         {
 868                                 if(currentLineEnd)
 869                                 {
 870                                         result += processLine(passthroughPL, currentLine, currentLineEnd - currentLine, spaceUsedInLine - currentLineFinalWhitespace, isContinuation);
 871                                         isContinuation = true;
 872                                 }
 873                                 result += processLine(passthroughPL, currentWord, p - currentWord, currentWordSpace, isContinuation);
 874                                 currentLine = 0;
 875                                 isContinuation = true;
 876                         }
 877                         currentWord = 0;
 878                 }
 879                 else if(c == '\n')
 880                 {
 881                         // 1. I can add the word - then do it.
 882                         if(spaceUsedInLine + currentWordSpace <= maxWidth)
 883                         {
 884                                 result += processLine(passthroughPL, currentLine, p - currentLine, spaceUsedInLine + currentWordSpace, isContinuation);
 885                         }
 886                         // 2. Otherwise, output current line, next one and make tabula rasa.
 887                         else
 888                         {
 889                                 if(currentLineEnd)
 890                                 {
 891                                         processLine(passthroughPL, currentLine, currentLineEnd - currentLine, spaceUsedInLine - currentLineFinalWhitespace, isContinuation);
 892                                         isContinuation = true;
 893                                 }
 894                                 result += processLine(passthroughPL, currentWord, p - currentWord, currentWordSpace, isContinuation);
 895                         }
 896                         currentWord = 0;
 897                         currentLine = 0;
 898                         isContinuation = false;
 899                 }
 900                 else
 901                 {
 902                         currentWordSpace += w;
 903                         if(
 904                                 spaceUsedInLine + currentWordSpace > maxWidth // can't join this line...
 905                                 &&
 906                                 continuationWidth + currentWordSpace > maxWidth // can't join any other line...
 907                         )
 908                         {
 909                                 // this word cannot join ANY line...
 910                                 // so output the current line...
 911                                 if(currentLineEnd)
 912                                 {
 913                                         result += processLine(passthroughPL, currentLine, currentLineEnd - currentLine, spaceUsedInLine - currentLineFinalWhitespace, isContinuation);
 914                                         isContinuation = true;
 915                                 }
 916
 917                                 // then this word's beginning...
 918                                 if(isContinuation)
 919                                 {
 920                                         // it may not fit, but we know we have to split it into maxWidth - continuationWidth pieces
 921                                         float pieceWidth = maxWidth - continuationWidth;
 922                                         const char *pos = currentWord;
 923                                         currentWordSpace = 0;
 924
 925                                         // reset the char width function to a state where no kerning occurs (start of word)
 926                                         charWidth(passthroughCW, ' ');
 927                                         while(pos <= p)
 928                                         {
 929                                                 float w = charWidth(passthroughCW, *pos);
 930                                                 if(currentWordSpace + w > pieceWidth) // this piece won't fit any more
 931                                                 {
 932                                                         // print everything until it
 933                                                         result += processLine(passthroughPL, currentWord, pos - currentWord, currentWordSpace, true);
 934                                                         // go to here
 935                                                         currentWord = pos;
 936                                                         currentWordSpace = 0;
 937                                                 }
 938                                                 currentWordSpace += w;
 939                                                 ++pos;
 940                                         }
 941                                         // now we have a currentWord that fits... set up its next line
 942                                         // currentWordSpace has been set
 943                                         // currentWord has been set
 944                                         spaceUsedInLine = continuationWidth;
 945                                         currentLine = currentWord;
 946                                         currentLineEnd = 0;
 947                                         isContinuation = true;
 948                                 }
 949                                 else
 950                                 {
 951                                         // we have a guarantee that it will fix (see if clause)
 952                                         result += processLine(passthroughPL, currentWord, p - currentWord, currentWordSpace - w, isContinuation);
 953
 954                                         // and use the rest of this word as new start of a line
 955                                         currentWordSpace = w;
 956                                         currentWord = p;
 957                                         spaceUsedInLine = continuationWidth;
 958                                         currentLine = p;
 959                                         currentLineEnd = 0;
 960                                         isContinuation = true;
 961                                 }
 962                         }
 963                 }
 964         }
 965
 966         if(!currentWord)
 967         {
 968                 currentWord = p;
 969                 currentWordSpace = 0;
 970         }
 971
 972         if(currentLine) // Same procedure as \n
 973         {
 974                 // Can I append the current word?
 975                 if(spaceUsedInLine + currentWordSpace <= maxWidth)
 976                         result += processLine(passthroughPL, currentLine, p - currentLine, spaceUsedInLine + currentWordSpace, isContinuation);
 977                 else
 978                 {
 979                         if(currentLineEnd)
 980                         {
 981                                 result += processLine(passthroughPL, currentLine, currentLineEnd - currentLine, spaceUsedInLine - currentLineFinalWhitespace, isContinuation);
 982                                 isContinuation = true;
 983                         }
 984                         result += processLine(passthroughPL, currentWord, p - currentWord, currentWordSpace, isContinuation);
 985                 }
 986         }
 987
 988         return result;
 989 */
 990 }
 991
 992 /*
 993 ==============
 994 COM_ParseToken_Simple
 995
 996 Parse a token out of a string
 997 ==============
 998 */
 999 int COM_ParseToken_Simple(const char **datapointer, qboolean returnnewline, qboolean parsebackslash, qboolean parsecomments)
1000 {
1001         int len;
1002         int c;
1003         const char *data = *datapointer;
1004
1005         len = 0;
1006         com_token[0] = 0;
1007
1008         if (!data)
1009         {
1010                 *datapointer = NULL;
1011                 return false;
1012         }
1013
1014 // skip whitespace
1015 skipwhite:
1016         // line endings:
1017         // UNIX: \n
1018         // Mac: \r
1019         // Windows: \r\n
1020         for (;ISWHITESPACE(*data) && ((*data != '\n' && *data != '\r') || !returnnewline);data++)
1021         {
1022                 if (*data == 0)
1023                 {
1024                         // end of file
1025                         *datapointer = NULL;
1026                         return false;
1027                 }
1028         }
1029
1030         // handle Windows line ending
1031         if (data[0] == '\r' && data[1] == '\n')
1032                 data++;
1033
1034         if (parsecomments && data[0] == '/' && data[1] == '/')
1035         {
1036                 // comment
1037                 while (*data && *data != '\n' && *data != '\r')
1038                         data++;
1039                 goto skipwhite;
1040         }
1041         else if (parsecomments && data[0] == '/' && data[1] == '*')
1042         {
1043                 // comment
1044                 data++;
1045                 while (*data && (data[0] != '*' || data[1] != '/'))
1046                         data++;
1047                 if (*data)
1048                         data++;
1049                 if (*data)
1050                         data++;
1051                 goto skipwhite;
1052         }
1053         else if (*data == '\"')
1054         {
1055                 // quoted string
1056                 for (data++;*data && *data != '\"';data++)
1057                 {
1058                         c = *data;
1059                         if (*data == '\\' && parsebackslash)
1060                         {
1061                                 data++;
1062                                 c = *data;
1063                                 if (c == 'n')
1064                                         c = '\n';
1065                                 else if (c == 't')
1066                                         c = '\t';
1067                         }
1068                         if (len < (int)sizeof(com_token) - 1)
1069                                 com_token[len++] = c;
1070                 }
1071                 com_token[len] = 0;
1072                 if (*data == '\"')
1073                         data++;
1074                 *datapointer = data;
1075                 return true;
1076         }
1077         else if (*data == '\r')
1078         {
1079                 // translate Mac line ending to UNIX
1080                 com_token[len++] = '\n';data++;
1081                 com_token[len] = 0;
1082                 *datapointer = data;
1083                 return true;
1084         }
1085         else if (*data == '\n')
1086         {
1087                 // single character
1088                 com_token[len++] = *data++;
1089                 com_token[len] = 0;
1090                 *datapointer = data;
1091                 return true;
1092         }
1093         else
1094         {
1095                 // regular word
1096                 for (;!ISWHITESPACE(*data);data++)
1097                         if (len < (int)sizeof(com_token) - 1)
1098                                 com_token[len++] = *data;
1099                 com_token[len] = 0;
1100                 *datapointer = data;
1101                 return true;
1102         }
1103 }
1104
1105 /*
1106 ==============
1107 COM_ParseToken_QuakeC
1108
1109 Parse a token out of a string
1110 ==============
1111 */
1112 int COM_ParseToken_QuakeC(const char **datapointer, qboolean returnnewline)
1113 {
1114         int len;
1115         int c;
1116         const char *data = *datapointer;
1117
1118         len = 0;
1119         com_token[0] = 0;
1120
1121         if (!data)
1122         {
1123                 *datapointer = NULL;
1124                 return false;
1125         }
1126
1127 // skip whitespace
1128 skipwhite:
1129         // line endings:
1130         // UNIX: \n
1131         // Mac: \r
1132         // Windows: \r\n
1133         for (;ISWHITESPACE(*data) && ((*data != '\n' && *data != '\r') || !returnnewline);data++)
1134         {
1135                 if (*data == 0)
1136                 {
1137                         // end of file
1138                         *datapointer = NULL;
1139                         return false;
1140                 }
1141         }
1142
1143         // handle Windows line ending
1144         if (data[0] == '\r' && data[1] == '\n')
1145                 data++;
1146
1147         if (data[0] == '/' && data[1] == '/')
1148         {
1149                 // comment
1150                 while (*data && *data != '\n' && *data != '\r')
1151                         data++;
1152                 goto skipwhite;
1153         }
1154         else if (data[0] == '/' && data[1] == '*')
1155         {
1156                 // comment
1157                 data++;
1158                 while (*data && (data[0] != '*' || data[1] != '/'))
1159                         data++;
1160                 if (*data)
1161                         data++;
1162                 if (*data)
1163                         data++;
1164                 goto skipwhite;
1165         }
1166         else if (*data == '\"' || *data == '\'')
1167         {
1168                 // quoted string
1169                 char quote = *data;
1170                 for (data++;*data && *data != quote;data++)
1171                 {
1172                         c = *data;
1173                         if (*data == '\\')
1174                         {
1175                                 data++;
1176                                 c = *data;
1177                                 if (c == 'n')
1178                                         c = '\n';
1179                                 else if (c == 't')
1180                                         c = '\t';
1181                         }
1182                         if (len < (int)sizeof(com_token) - 1)
1183                                 com_token[len++] = c;
1184                 }
1185                 com_token[len] = 0;
1186                 if (*data == quote)
1187                         data++;
1188                 *datapointer = data;
1189                 return true;
1190         }
1191         else if (*data == '\r')
1192         {
1193                 // translate Mac line ending to UNIX
1194                 com_token[len++] = '\n';data++;
1195                 com_token[len] = 0;
1196                 *datapointer = data;
1197                 return true;
1198         }
1199         else if (*data == '\n' || *data == '{' || *data == '}' || *data == ')' || *data == '(' || *data == ']' || *data == '[' || *data == ':' || *data == ',' || *data == ';')
1200         {
1201                 // single character
1202                 com_token[len++] = *data++;
1203                 com_token[len] = 0;
1204                 *datapointer = data;
1205                 return true;
1206         }
1207         else
1208         {
1209                 // regular word
1210                 for (;!ISWHITESPACE(*data) && *data != '{' && *data != '}' && *data != ')' && *data != '(' && *data != ']' && *data != '[' && *data != ':' && *data != ',' && *data != ';';data++)
1211                         if (len < (int)sizeof(com_token) - 1)
1212                                 com_token[len++] = *data;
1213                 com_token[len] = 0;
1214                 *datapointer = data;
1215                 return true;
1216         }
1217 }
1218
1219 /*
1220 ==============
1221 COM_ParseToken_VM_Tokenize
1222
1223 Parse a token out of a string
1224 ==============
1225 */
1226 int COM_ParseToken_VM_Tokenize(const char **datapointer, qboolean returnnewline)
1227 {
1228         int len;
1229         int c;
1230         const char *data = *datapointer;
1231
1232         len = 0;
1233         com_token[0] = 0;
1234
1235         if (!data)
1236         {
1237                 *datapointer = NULL;
1238                 return false;
1239         }
1240
1241 // skip whitespace
1242 skipwhite:
1243         // line endings:
1244         // UNIX: \n
1245         // Mac: \r
1246         // Windows: \r\n
1247         for (;ISWHITESPACE(*data) && ((*data != '\n' && *data != '\r') || !returnnewline);data++)
1248         {
1249                 if (*data == 0)
1250                 {
1251                         // end of file
1252                         *datapointer = NULL;
1253                         return false;
1254                 }
1255         }
1256
1257         // handle Windows line ending
1258         if (data[0] == '\r' && data[1] == '\n')
1259                 data++;
1260
1261         if (data[0] == '/' && data[1] == '/')
1262         {
1263                 // comment
1264                 while (*data && *data != '\n' && *data != '\r')
1265                         data++;
1266                 goto skipwhite;
1267         }
1268         else if (data[0] == '/' && data[1] == '*')
1269         {
1270                 // comment
1271                 data++;
1272                 while (*data && (data[0] != '*' || data[1] != '/'))
1273                         data++;
1274                 if (*data)
1275                         data++;
1276                 if (*data)
1277                         data++;
1278                 goto skipwhite;
1279         }
1280         else if (*data == '\"' || *data == '\'')
1281         {
1282                 char quote = *data;
1283                 // quoted string
1284                 for (data++;*data && *data != quote;data++)
1285                 {
1286                         c = *data;
1287                         if (*data == '\\')
1288                         {
1289                                 data++;
1290                                 c = *data;
1291                                 if (c == 'n')
1292                                         c = '\n';
1293                                 else if (c == 't')
1294                                         c = '\t';
1295                         }
1296                         if (len < (int)sizeof(com_token) - 1)
1297                                 com_token[len++] = c;
1298                 }
1299                 com_token[len] = 0;
1300                 if (*data == quote)
1301                         data++;
1302                 *datapointer = data;
1303                 return true;
1304         }
1305         else if (*data == '\r')
1306         {
1307                 // translate Mac line ending to UNIX
1308                 com_token[len++] = '\n';data++;
1309                 com_token[len] = 0;
1310                 *datapointer = data;
1311                 return true;
1312         }
1313         else if (*data == '\n' || *data == '{' || *data == '}' || *data == ')' || *data == '(' || *data == ']' || *data == '[' || *data == ':' || *data == ',' || *data == ';')
1314         {
1315                 // single character
1316                 com_token[len++] = *data++;
1317                 com_token[len] = 0;
1318                 *datapointer = data;
1319                 return true;
1320         }
1321         else
1322         {
1323                 // regular word
1324                 for (;!ISWHITESPACE(*data) && *data != '{' && *data != '}' && *data != ')' && *data != '(' && *data != ']' && *data != '[' && *data != ':' && *data != ',' && *data != ';';data++)
1325                         if (len < (int)sizeof(com_token) - 1)
1326                                 com_token[len++] = *data;
1327                 com_token[len] = 0;
1328                 *datapointer = data;
1329                 return true;
1330         }
1331 }
1332
1333 /*
1334 ==============
1335 COM_ParseToken_Console
1336
1337 Parse a token out of a string, behaving like the qwcl console
1338 ==============
1339 */
1340 int COM_ParseToken_Console(const char **datapointer)
1341 {
1342         int len;
1343         const char *data = *datapointer;
1344
1345         len = 0;
1346         com_token[0] = 0;
1347
1348         if (!data)
1349         {
1350                 *datapointer = NULL;
1351                 return false;
1352         }
1353
1354 // skip whitespace
1355 skipwhite:
1356         for (;ISWHITESPACE(*data);data++)
1357         {
1358                 if (*data == 0)
1359                 {
1360                         // end of file
1361                         *datapointer = NULL;
1362                         return false;
1363                 }
1364         }
1365
1366         if (*data == '/' && data[1] == '/')
1367         {
1368                 // comment
1369                 while (*data && *data != '\n' && *data != '\r')
1370                         data++;
1371                 goto skipwhite;
1372         }
1373         else if (*data == '\"')
1374         {
1375                 // quoted string
1376                 for (data++;*data && *data != '\"';data++)
1377                 {
1378                         // allow escaped " and \ case
1379                         if (*data == '\\' && (data[1] == '\"' || data[1] == '\\'))
1380                                 data++;
1381                         if (len < (int)sizeof(com_token) - 1)
1382                                 com_token[len++] = *data;
1383                 }
1384                 com_token[len] = 0;
1385                 if (*data == '\"')
1386                         data++;
1387                 *datapointer = data;
1388         }
1389         else
1390         {
1391                 // regular word
1392                 for (;!ISWHITESPACE(*data);data++)
1393                         if (len < (int)sizeof(com_token) - 1)
1394                                 com_token[len++] = *data;
1395                 com_token[len] = 0;
1396                 *datapointer = data;
1397         }
1398
1399         return true;
1400 }
1401
1402
1403 /*
1404 ================
1405 COM_CheckParm
1406
1407 Returns the position (1 to argc-1) in the program's argument list
1408 where the given parameter apears, or 0 if not present
1409 ================
1410 */
1411 int COM_CheckParm (const char *parm)
1412 {
1413         int i;
1414
1415         for (i=1 ; i<com_argc ; i++)
1416         {
1417                 if (!com_argv[i])
1418                         continue;               // NEXTSTEP sometimes clears appkit vars.
1419                 if (!strcmp (parm,com_argv[i]))
1420                         return i;
1421         }
1422
1423         return 0;
1424 }
1425
1426 //===========================================================================
1427
1428 // Game mods
1429
1430 gamemode_t com_startupgamemode;
1431 gamemode_t com_startupgamegroup;
1432
1433 typedef struct gamemode_info_s
1434 {
1435         gamemode_t mode; // this gamemode
1436         gamemode_t group; // different games with same group can switch automatically when gamedirs change
1437         const char* prog_name; // not null
1438         const char* cmdline; // not null
1439         const char* gamename; // not null
1440         const char* gamedirname1; // not null
1441         const char* gamedirname2; // null
1442         const char* gamescreenshotname; // not nul
1443         const char* gameuserdirname; // not null
1444 } gamemode_info_t;
1445
1446 static const gamemode_info_t gamemode_info [GAME_COUNT] =
1447 {// game                                basegame                                prog_name                       cmdline                         gamename                                basegame        modgame                 screenshot              userdir                            // commandline option
1448 { GAME_NORMAL,                  GAME_NORMAL,                    "",                                     "-quake",                       "DarkPlaces-Quake",             "id1",          NULL,                   "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -quake runs the game Quake (default)
1449 { GAME_HIPNOTIC,                GAME_NORMAL,                    "hipnotic",                     "-hipnotic",            "Darkplaces-Hipnotic",  "id1",          "hipnotic",             "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -hipnotic runs Quake mission pack 1: The Scourge of Armagon
1450 { GAME_ROGUE,                   GAME_NORMAL,                    "rogue",                        "-rogue",                       "Darkplaces-Rogue",             "id1",          "rogue",                "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -rogue runs Quake mission pack 2: The Dissolution of Eternity
1451 { GAME_NEHAHRA,                 GAME_NORMAL,                    "nehahra",                      "-nehahra",                     "DarkPlaces-Nehahra",   "id1",          "nehahra",              "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -nehahra runs The Seal of Nehahra movie and game
1452 { GAME_QUOTH,                   GAME_NORMAL,                    "quoth",                        "-quoth",                       "Darkplaces-Quoth",             "id1",          "quoth",                "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -quoth runs the Quoth mod for playing community maps made for it
1453 { GAME_NEXUIZ,                  GAME_NEXUIZ,                    "nexuiz",                       "-nexuiz",                      "Nexuiz",                               "data",         NULL,                   "nexuiz",               "nexuiz"                        }, // COMMANDLINEOPTION: Game: -nexuiz runs the multiplayer game Nexuiz
1454 { GAME_XONOTIC,                 GAME_XONOTIC,                   "xonotic",                      "-xonotic",                     "Xonotic",                              "data",         NULL,                   "xonotic",              "xonotic"                       }, // COMMANDLINEOPTION: Game: -xonotic runs the multiplayer game Xonotic
1455 { GAME_TRANSFUSION,             GAME_TRANSFUSION,               "transfusion",          "-transfusion",         "Transfusion",                  "basetf",       NULL,                   "transfusion",  "transfusion"           }, // COMMANDLINEOPTION: Game: -transfusion runs Transfusion (the recreation of Blood in Quake)
1456 { GAME_GOODVSBAD2,              GAME_GOODVSBAD2,                "gvb2",                         "-goodvsbad2",          "GoodVs.Bad2",                  "rts",          NULL,                   "gvb2",                 "gvb2"                          }, // COMMANDLINEOPTION: Game: -goodvsbad2 runs the psychadelic RTS FPS game Good Vs Bad 2
1457 { GAME_TEU,                             GAME_TEU,                               "teu",                          "-teu",                         "TheEvilUnleashed",             "baseteu",      NULL,                   "teu",                  "teu"                           }, // COMMANDLINEOPTION: Game: -teu runs The Evil Unleashed (this option is obsolete as they are not using darkplaces)
1458 { GAME_BATTLEMECH,              GAME_BATTLEMECH,                "battlemech",           "-battlemech",          "Battlemech",                   "base",         NULL,                   "battlemech",   "battlemech"            }, // COMMANDLINEOPTION: Game: -battlemech runs the multiplayer topdown deathmatch game BattleMech
1459 { GAME_ZYMOTIC,                 GAME_ZYMOTIC,                   "zymotic",                      "-zymotic",                     "Zymotic",                              "basezym",      NULL,                   "zymotic",              "zymotic"                       }, // COMMANDLINEOPTION: Game: -zymotic runs the singleplayer game Zymotic
1460 { GAME_SETHERAL,                GAME_SETHERAL,                  "setheral",                     "-setheral",            "Setheral",                             "data",         NULL,                   "setheral",             "setheral"                      }, // COMMANDLINEOPTION: Game: -setheral runs the multiplayer game Setheral
1461 { GAME_TENEBRAE,                GAME_NORMAL,                    "tenebrae",                     "-tenebrae",            "DarkPlaces-Tenebrae",  "id1",          "tenebrae",             "dp",                   "darkplaces"            }, // COMMANDLINEOPTION: Game: -tenebrae runs the graphics test mod known as Tenebrae (some features not implemented)
1462 { GAME_NEOTERIC,                GAME_NORMAL,                    "neoteric",                     "-neoteric",            "Neoteric",                             "id1",          "neobase",              "neo",                  "darkplaces"            }, // COMMANDLINEOPTION: Game: -neoteric runs the game Neoteric
1463 { GAME_OPENQUARTZ,              GAME_NORMAL,                    "openquartz",           "-openquartz",          "OpenQuartz",                   "id1",          NULL,                   "openquartz",   "darkplaces"            }, // COMMANDLINEOPTION: Game: -openquartz runs the game OpenQuartz, a standalone GPL replacement of the quake content
1464 { GAME_PRYDON,                  GAME_NORMAL,                    "prydon",                       "-prydon",                      "PrydonGate",                   "id1",          "prydon",               "prydon",               "darkplaces"            }, // COMMANDLINEOPTION: Game: -prydon runs the topdown point and click action-RPG Prydon Gate
1465 { GAME_DELUXEQUAKE,             GAME_DELUXEQUAKE,               "dq",                           "-dq",                          "Deluxe Quake",                 "basedq",       "extradq",              "basedq",               "dq"                            }, // COMMANDLINEOPTION: Game: -dq runs the game Deluxe Quake
1466 { GAME_THEHUNTED,               GAME_THEHUNTED,                 "thehunted",            "-thehunted",           "The Hunted",                   "thdata",       NULL,                   "th",                   "thehunted"                     }, // COMMANDLINEOPTION: Game: -thehunted runs the game The Hunted
1467 { GAME_DEFEATINDETAIL2, GAME_DEFEATINDETAIL2,   "did2",                         "-did2",                        "Defeat In Detail 2",   "data",         NULL,                   "did2_",                "did2"                          }, // COMMANDLINEOPTION: Game: -did2 runs the game Defeat In Detail 2
1468 { GAME_DARSANA,                 GAME_DARSANA,                   "darsana",                      "-darsana",                     "Darsana",                              "ddata",        NULL,                   "darsana",              "darsana"                       }, // COMMANDLINEOPTION: Game: -darsana runs the game Darsana
1469 { GAME_CONTAGIONTHEORY, GAME_CONTAGIONTHEORY,   "contagiontheory",      "-contagiontheory",     "Contagion Theory",             "ctdata",       NULL,                   "ct",                   "contagiontheory"       }, // COMMANDLINEOPTION: Game: -contagiontheory runs the game Contagion Theory
1470 { GAME_EDU2P,                   GAME_EDU2P,                             "edu2p",                        "-edu2p",                       "EDU2 Prototype",               "id1",          "edu2",                 "edu2_p",               "edu2prototype"         }, // COMMANDLINEOPTION: Game: -edu2p runs the game Edu2 prototype
1471 { GAME_PROPHECY,                GAME_PROPHECY,                  "prophecy",             "-prophecy",            "Prophecy",                     "gamedata",             NULL,                   "phcy",         "prophecy"                      }, // COMMANDLINEOPTION: Game: -prophecy runs the game Prophecy
1472 { GAME_BLOODOMNICIDE,   GAME_BLOODOMNICIDE,             "omnicide",                     "-omnicide",            "Blood Omnicide",               "kain",         NULL,                   "omnicide",             "omnicide"                      }, // COMMANDLINEOPTION: Game: -omnicide runs the game Blood Omnicide
1473 { GAME_STEELSTORM,              GAME_STEELSTORM,                "steelstorm",           "-steelstorm",          "Steel-Storm",                  "gamedata",     NULL,                   "ss",                   "steelstorm"            }, // COMMANDLINEOPTION: Game: -steelstorm runs the game Steel Storm
1474 { GAME_STEELSTORM2,             GAME_STEELSTORM2,               "steelstorm2",          "-steelstorm2",         "Steel Storm 2",                        "gamedata",     NULL,                   "ss2",                  "steelstorm2"           }, // COMMANDLINEOPTION: Game: -steelstorm2 runs the game Steel Storm 2
1475 { GAME_TOMESOFMEPHISTOPHELES,           GAME_TOMESOFMEPHISTOPHELES,             "tomesofmephistopheles",                "-tomesofmephistopheles",               "Tomes of Mephistopheles",                      "gamedata",     NULL,                   "tom",                  "tomesofmephistopheles"         }, // COMMANDLINEOPTION: Game: -steelstorm runs the game Steel Storm
1476 { GAME_STRAPBOMB,               GAME_STRAPBOMB,                 "strapbomb",            "-strapbomb",           "Strap-on-bomb Car",    "id1",          NULL,                   "strap",                "strapbomb"                     }, // COMMANDLINEOPTION: Game: -strapbomb runs the game Strap-on-bomb Car
1477 { GAME_MOONHELM,                GAME_MOONHELM,                  "moonhelm",                     "-moonhelm",            "MoonHelm",                             "data",         NULL,                   "mh",                   "moonhelm"                      }, // COMMANDLINEOPTION: Game: -moonhelm runs the game MoonHelm
1478 };
1479
1480 static void COM_SetGameType(int index);
1481 void COM_InitGameType (void)
1482 {
1483         char name [MAX_OSPATH];
1484         int i;
1485         int index = 0;
1486
1487 #ifdef FORCEGAME
1488         COM_ToLowerString(FORCEGAME, name, sizeof (name));
1489 #else
1490         // check executable filename for keywords, but do it SMARTLY - only check the last path element
1491         FS_StripExtension(FS_FileWithoutPath(com_argv[0]), name, sizeof (name));
1492         COM_ToLowerString(name, name, sizeof (name));
1493 #endif
1494         for (i = 1;i < (int)(sizeof (gamemode_info) / sizeof (gamemode_info[0]));i++)
1495                 if (gamemode_info[i].prog_name && gamemode_info[i].prog_name[0] && strstr (name, gamemode_info[i].prog_name))
1496                         index = i;
1497
1498         // check commandline options for keywords
1499         for (i = 0;i < (int)(sizeof (gamemode_info) / sizeof (gamemode_info[0]));i++)
1500                 if (COM_CheckParm (gamemode_info[i].cmdline))
1501                         index = i;
1502
1503         com_startupgamemode = gamemode_info[index].mode;
1504         com_startupgamegroup = gamemode_info[index].group;
1505         COM_SetGameType(index);
1506 }
1507
1508 void COM_ChangeGameTypeForGameDirs(void)
1509 {
1510         int i;
1511         int index = -1;
1512         // this will not not change the gamegroup
1513         // first check if a base game (single gamedir) matches
1514         for (i = 0;i < (int)(sizeof (gamemode_info) / sizeof (gamemode_info[0]));i++)
1515         {
1516                 if (gamemode_info[i].group == com_startupgamegroup && !(gamemode_info[i].gamedirname2 && gamemode_info[i].gamedirname2[0]))
1517                 {
1518                         index = i;
1519                         break;
1520                 }
1521         }
1522         // now that we have a base game, see if there is a matching derivative game (two gamedirs)
1523         if (fs_numgamedirs)
1524         {
1525                 for (i = 0;i < (int)(sizeof (gamemode_info) / sizeof (gamemode_info[0]));i++)
1526                 {
1527                         if (gamemode_info[i].group == com_startupgamegroup && (gamemode_info[i].gamedirname2 && gamemode_info[i].gamedirname2[0]) && !strcasecmp(fs_gamedirs[0], gamemode_info[i].gamedirname2))
1528                         {
1529                                 index = i;
1530                                 break;
1531                         }
1532                 }
1533         }
1534         // we now have a good guess at which game this is meant to be...
1535         if (index >= 0 && gamemode != gamemode_info[index].mode)
1536                 COM_SetGameType(index);
1537 }
1538
1539 static void COM_SetGameType(int index)
1540 {
1541         int i, t;
1542         if (index < 0 || index >= (int)(sizeof (gamemode_info) / sizeof (gamemode_info[0])))
1543                 index = 0;
1544         gamemode = gamemode_info[index].mode;
1545         gamename = gamemode_info[index].gamename;
1546         gamedirname1 = gamemode_info[index].gamedirname1;
1547         gamedirname2 = gamemode_info[index].gamedirname2;
1548         gamescreenshotname = gamemode_info[index].gamescreenshotname;
1549         gameuserdirname = gamemode_info[index].gameuserdirname;
1550
1551         if (gamemode == com_startupgamemode)
1552         {
1553                 if((t = COM_CheckParm("-customgamename")) && t + 1 < com_argc)
1554                         gamename = com_argv[t+1];
1555                 if((t = COM_CheckParm("-customgamedirname1")) && t + 1 < com_argc)
1556                         gamedirname1 = com_argv[t+1];
1557                 if((t = COM_CheckParm("-customgamedirname2")) && t + 1 < com_argc)
1558                         gamedirname2 = *com_argv[t+1] ? com_argv[t+1] : NULL;
1559                 if((t = COM_CheckParm("-customgamescreenshotname")) && t + 1 < com_argc)
1560                         gamescreenshotname = com_argv[t+1];
1561                 if((t = COM_CheckParm("-customgameuserdirname")) && t + 1 < com_argc)
1562                         gameuserdirname = com_argv[t+1];
1563         }
1564
1565         if (gamedirname2 && gamedirname2[0])
1566                 Con_Printf("Game is %s using base gamedirs %s %s", gamename, gamedirname1, gamedirname2);
1567         else
1568                 Con_Printf("Game is %s using base gamedir %s", gamename, gamedirname1);
1569         for (i = 0;i < fs_numgamedirs;i++)
1570         {
1571                 if (i == 0)
1572                         Con_Printf(", with mod gamedirs");
1573                 Con_Printf(" %s", fs_gamedirs[i]);
1574         }
1575         Con_Printf("\n");
1576 }
1577
1578
1579 /*
1580 ================
1581 COM_Init
1582 ================
1583 */
1584 void COM_Init_Commands (void)
1585 {
1586         int i, j, n;
1587         char com_cmdline[MAX_INPUTLINE];
1588
1589         Cvar_RegisterVariable (&registered);
1590         Cvar_RegisterVariable (&cmdline);
1591
1592         // reconstitute the command line for the cmdline externally visible cvar
1593         n = 0;
1594         for (j = 0;(j < MAX_NUM_ARGVS) && (j < com_argc);j++)
1595         {
1596                 i = 0;
1597                 if (strstr(com_argv[j], " "))
1598                 {
1599                         // arg contains whitespace, store quotes around it
1600                         com_cmdline[n++] = '\"';
1601                         while ((n < ((int)sizeof(com_cmdline) - 1)) && com_argv[j][i])
1602                                 com_cmdline[n++] = com_argv[j][i++];
1603                         com_cmdline[n++] = '\"';
1604                 }
1605                 else
1606                 {
1607                         while ((n < ((int)sizeof(com_cmdline) - 1)) && com_argv[j][i])
1608                                 com_cmdline[n++] = com_argv[j][i++];
1609                 }
1610                 if (n < ((int)sizeof(com_cmdline) - 1))
1611                         com_cmdline[n++] = ' ';
1612                 else
1613                         break;
1614         }
1615         com_cmdline[n] = 0;
1616         Cvar_Set ("cmdline", com_cmdline);
1617 }
1618
1619 /*
1620 ============
1621 va
1622
1623 varargs print into provided buffer, returns buffer (so that it can be called in-line, unlike dpsnprintf)
1624 ============
1625 */
1626 char *va(char *buf, size_t buflen, const char *format, ...)
1627 {
1628         va_list argptr;
1629
1630         va_start (argptr, format);
1631         dpvsnprintf (buf, buflen, format,argptr);
1632         va_end (argptr);
1633
1634         return buf;
1635 }
1636
1637
1638 //======================================
1639
1640 // snprintf and vsnprintf are NOT portable. Use their DP counterparts instead
1641
1642 #undef snprintf
1643 #undef vsnprintf
1644
1645 #ifdef WIN32
1646 # define snprintf _snprintf
1647 # define vsnprintf _vsnprintf
1648 #endif
1649
1650
1651 int dpsnprintf (char *buffer, size_t buffersize, const char *format, ...)
1652 {
1653         va_list args;
1654         int result;
1655
1656         va_start (args, format);
1657         result = dpvsnprintf (buffer, buffersize, format, args);
1658         va_end (args);
1659
1660         return result;
1661 }
1662
1663
1664 int dpvsnprintf (char *buffer, size_t buffersize, const char *format, va_list args)
1665 {
1666         int result;
1667
1668 #if _MSC_VER >= 1400
1669         result = _vsnprintf_s (buffer, buffersize, _TRUNCATE, format, args);
1670 #else
1671         result = vsnprintf (buffer, buffersize, format, args);
1672 #endif
1673         if (result < 0 || (size_t)result >= buffersize)
1674         {
1675                 buffer[buffersize - 1] = '\0';
1676                 return -1;
1677         }
1678
1679         return result;
1680 }
1681
1682
1683 //======================================
1684
1685 void COM_ToLowerString (const char *in, char *out, size_t size_out)
1686 {
1687         if (size_out == 0)
1688                 return;
1689
1690         if(utf8_enable.integer)
1691         {
1692                 *out = 0;
1693                 while(*in && size_out > 1)
1694                 {
1695                         int n;
1696                         Uchar ch = u8_getchar_utf8_enabled(in, &in);
1697                         ch = u8_tolower(ch);
1698                         n = u8_fromchar(ch, out, size_out);
1699                         if(n <= 0)
1700                                 break;
1701                         out += n;
1702                         size_out -= n;
1703                 }
1704                 return;
1705         }
1706
1707         while (*in && size_out > 1)
1708         {
1709                 if (*in >= 'A' && *in <= 'Z')
1710                         *out++ = *in++ + 'a' - 'A';
1711                 else
1712                         *out++ = *in++;
1713                 size_out--;
1714         }
1715         *out = '\0';
1716 }
1717
1718 void COM_ToUpperString (const char *in, char *out, size_t size_out)
1719 {
1720         if (size_out == 0)
1721                 return;
1722
1723         if(utf8_enable.integer)
1724         {
1725                 *out = 0;
1726                 while(*in && size_out > 1)
1727                 {
1728                         int n;
1729                         Uchar ch = u8_getchar_utf8_enabled(in, &in);
1730                         ch = u8_toupper(ch);
1731                         n = u8_fromchar(ch, out, size_out);
1732                         if(n <= 0)
1733                                 break;
1734                         out += n;
1735                         size_out -= n;
1736                 }
1737                 return;
1738         }
1739
1740         while (*in && size_out > 1)
1741         {
1742                 if (*in >= 'a' && *in <= 'z')
1743                         *out++ = *in++ + 'A' - 'a';
1744                 else
1745                         *out++ = *in++;
1746                 size_out--;
1747         }
1748         *out = '\0';
1749 }
1750
1751 int COM_StringBeginsWith(const char *s, const char *match)
1752 {
1753         for (;*s && *match;s++, match++)
1754                 if (*s != *match)
1755                         return false;
1756         return true;
1757 }
1758
1759 int COM_ReadAndTokenizeLine(const char **text, char **argv, int maxargc, char *tokenbuf, int tokenbufsize, const char *commentprefix)
1760 {
1761         int argc, commentprefixlength;
1762         char *tokenbufend;
1763         const char *l;
1764         argc = 0;
1765         tokenbufend = tokenbuf + tokenbufsize;
1766         l = *text;
1767         commentprefixlength = 0;
1768         if (commentprefix)
1769                 commentprefixlength = (int)strlen(commentprefix);
1770         while (*l && *l != '\n' && *l != '\r')
1771         {
1772                 if (!ISWHITESPACE(*l))
1773                 {
1774                         if (commentprefixlength && !strncmp(l, commentprefix, commentprefixlength))
1775                         {
1776                                 while (*l && *l != '\n' && *l != '\r')
1777                                         l++;
1778                                 break;
1779                         }
1780                         if (argc >= maxargc)
1781                                 return -1;
1782                         argv[argc++] = tokenbuf;
1783                         if (*l == '"')
1784                         {
1785                                 l++;
1786                                 while (*l && *l != '"')
1787                                 {
1788                                         if (tokenbuf >= tokenbufend)
1789                                                 return -1;
1790                                         *tokenbuf++ = *l++;
1791                                 }
1792                                 if (*l == '"')
1793                                         l++;
1794                         }
1795                         else
1796                         {
1797                                 while (!ISWHITESPACE(*l))
1798                                 {
1799                                         if (tokenbuf >= tokenbufend)
1800                                                 return -1;
1801                                         *tokenbuf++ = *l++;
1802                                 }
1803                         }
1804                         if (tokenbuf >= tokenbufend)
1805                                 return -1;
1806                         *tokenbuf++ = 0;
1807                 }
1808                 else
1809                         l++;
1810         }
1811         // line endings:
1812         // UNIX: \n
1813         // Mac: \r
1814         // Windows: \r\n
1815         if (*l == '\r')
1816                 l++;
1817         if (*l == '\n')
1818                 l++;
1819         *text = l;
1820         return argc;
1821 }
1822
1823 /*
1824 ============
1825 COM_StringLengthNoColors
1826
1827 calculates the visible width of a color coded string.
1828
1829 *valid is filled with TRUE if the string is a valid colored string (that is, if
1830 it does not end with an unfinished color code). If it gets filled with FALSE, a
1831 fix would be adding a STRING_COLOR_TAG at the end of the string.
1832
1833 valid can be set to NULL if the caller doesn't care.
1834
1835 For size_s, specify the maximum number of characters from s to use, or 0 to use
1836 all characters until the zero terminator.
1837 ============
1838 */
1839 size_t
1840 COM_StringLengthNoColors(const char *s, size_t size_s, qboolean *valid)
1841 {
1842         const char *end = size_s ? (s + size_s) : NULL;
1843         size_t len = 0;
1844         for(;;)
1845         {
1846                 switch((s == end) ? 0 : *s)
1847                 {
1848                         case 0:
1849                                 if(valid)
1850                                         *valid = TRUE;
1851                                 return len;
1852                         case STRING_COLOR_TAG:
1853                                 ++s;
1854                                 switch((s == end) ? 0 : *s)
1855                                 {
1856                                         case STRING_COLOR_RGB_TAG_CHAR:
1857                                                 if (s+1 != end && isxdigit(s[1]) &&
1858                                                         s+2 != end && isxdigit(s[2]) &&
1859                                                         s+3 != end && isxdigit(s[3]) )
1860                                                 {
1861                                                         s+=3;
1862                                                         break;
1863                                                 }
1864                                                 ++len; // STRING_COLOR_TAG
1865                                                 ++len; // STRING_COLOR_RGB_TAG_CHAR
1866                                                 break;
1867                                         case 0: // ends with unfinished color code!
1868                                                 ++len;
1869                                                 if(valid)
1870                                                         *valid = FALSE;
1871                                                 return len;
1872                                         case STRING_COLOR_TAG: // escaped ^
1873                                                 ++len;
1874                                                 break;
1875                                         case '0': case '1': case '2': case '3': case '4':
1876                                         case '5': case '6': case '7': case '8': case '9': // color code
1877                                                 break;
1878                                         default: // not a color code
1879                                                 ++len; // STRING_COLOR_TAG
1880                                                 ++len; // the character
1881                                                 break;
1882                                 }
1883                                 break;
1884                         default:
1885                                 ++len;
1886                                 break;
1887                 }
1888                 ++s;
1889         }
1890         // never get here
1891 }
1892
1893 /*
1894 ============
1895 COM_StringDecolorize
1896
1897 removes color codes from a string.
1898
1899 If escape_carets is true, the resulting string will be safe for printing. If
1900 escape_carets is false, the function will just strip color codes (for logging
1901 for example).
1902
1903 If the output buffer size did not suffice for converting, the function returns
1904 FALSE. Generally, if escape_carets is false, the output buffer needs
1905 strlen(str)+1 bytes, and if escape_carets is true, it can need strlen(str)*1.5+2
1906 bytes. In any case, the function makes sure that the resulting string is
1907 zero terminated.
1908
1909 For size_in, specify the maximum number of characters from in to use, or 0 to use
1910 all characters until the zero terminator.
1911 ============
1912 */
1913 qboolean
1914 COM_StringDecolorize(const char *in, size_t size_in, char *out, size_t size_out, qboolean escape_carets)
1915 {
1916 #define APPEND(ch) do { if(--size_out) { *out++ = (ch); } else { *out++ = 0; return FALSE; } } while(0)
1917         const char *end = size_in ? (in + size_in) : NULL;
1918         if(size_out < 1)
1919                 return FALSE;
1920         for(;;)
1921         {
1922                 switch((in == end) ? 0 : *in)
1923                 {
1924                         case 0:
1925                                 *out++ = 0;
1926                                 return TRUE;
1927                         case STRING_COLOR_TAG:
1928                                 ++in;
1929                                 switch((in == end) ? 0 : *in)
1930                                 {
1931                                         case STRING_COLOR_RGB_TAG_CHAR:
1932                                                 if (in+1 != end && isxdigit(in[1]) &&
1933                                                         in+2 != end && isxdigit(in[2]) &&
1934                                                         in+3 != end && isxdigit(in[3]) )
1935                                                 {
1936                                                         in+=3;
1937                                                         break;
1938                                                 }
1939                                                 APPEND(STRING_COLOR_TAG);
1940                                                 if(escape_carets)
1941                                                         APPEND(STRING_COLOR_TAG);
1942                                                 APPEND(STRING_COLOR_RGB_TAG_CHAR);
1943                                                 break;
1944                                         case 0: // ends with unfinished color code!
1945                                                 APPEND(STRING_COLOR_TAG);
1946                                                 // finish the code by appending another caret when escaping
1947                                                 if(escape_carets)
1948                                                         APPEND(STRING_COLOR_TAG);
1949                                                 *out++ = 0;
1950                                                 return TRUE;
1951                                         case STRING_COLOR_TAG: // escaped ^
1952                                                 APPEND(STRING_COLOR_TAG);
1953                                                 // append a ^ twice when escaping
1954                                                 if(escape_carets)
1955                                                         APPEND(STRING_COLOR_TAG);
1956                                                 break;
1957                                         case '0': case '1': case '2': case '3': case '4':
1958                                         case '5': case '6': case '7': case '8': case '9': // color code
1959                                                 break;
1960                                         default: // not a color code
1961                                                 APPEND(STRING_COLOR_TAG);
1962                                                 APPEND(*in);
1963                                                 break;
1964                                 }
1965                                 break;
1966                         default:
1967                                 APPEND(*in);
1968                                 break;
1969                 }
1970                 ++in;
1971         }
1972         // never get here
1973 #undef APPEND
1974 }
1975
1976 char *InfoString_GetValue(const char *buffer, const char *key, char *value, size_t valuelength)
1977 {
1978         int pos = 0, j;
1979         size_t keylength;
1980         if (!key)
1981                 key = "";
1982         keylength = strlen(key);
1983         if (valuelength < 1 || !value)
1984         {
1985                 Con_Printf("InfoString_GetValue: no room in value\n");
1986                 return NULL;
1987         }
1988         value[0] = 0;
1989         if (strchr(key, '\\'))
1990         {
1991                 Con_Printf("InfoString_GetValue: key name \"%s\" contains \\ which is not possible in an infostring\n", key);
1992                 return NULL;
1993         }
1994         if (strchr(key, '\"'))
1995         {
1996                 Con_Printf("InfoString_SetValue: key name \"%s\" contains \" which is not allowed in an infostring\n", key);
1997                 return NULL;
1998         }
1999         if (!key[0])
2000         {
2001                 Con_Printf("InfoString_GetValue: can not look up a key with no name\n");
2002                 return NULL;
2003         }
2004         while (buffer[pos] == '\\')
2005         {
2006                 if (!memcmp(buffer + pos+1, key, keylength))
2007                 {
2008                         for (pos++;buffer[pos] && buffer[pos] != '\\';pos++);
2009                         pos++;
2010                         for (j = 0;buffer[pos+j] && buffer[pos+j] != '\\' && j < (int)valuelength - 1;j++)
2011                                 value[j] = buffer[pos+j];
2012                         value[j] = 0;
2013                         return value;
2014                 }
2015                 for (pos++;buffer[pos] && buffer[pos] != '\\';pos++);
2016                 for (pos++;buffer[pos] && buffer[pos] != '\\';pos++);
2017         }
2018         // if we reach this point the key was not found
2019         return NULL;
2020 }
2021
2022 void InfoString_SetValue(char *buffer, size_t bufferlength, const char *key, const char *value)
2023 {
2024         int pos = 0, pos2;
2025         size_t keylength;
2026         if (!key)
2027                 key = "";
2028         if (!value)
2029                 value = "";
2030         keylength = strlen(key);
2031         if (strchr(key, '\\') || strchr(value, '\\'))
2032         {
2033                 Con_Printf("InfoString_SetValue: \"%s\" \"%s\" contains \\ which is not possible to store in an infostring\n", key, value);
2034                 return;
2035         }
2036         if (strchr(key, '\"') || strchr(value, '\"'))
2037         {
2038                 Con_Printf("InfoString_SetValue: \"%s\" \"%s\" contains \" which is not allowed in an infostring\n", key, value);
2039                 return;
2040         }
2041         if (!key[0])
2042         {
2043                 Con_Printf("InfoString_SetValue: can not set a key with no name\n");
2044                 return;
2045         }
2046         while (buffer[pos] == '\\')
2047         {
2048                 if (!memcmp(buffer + pos+1, key, keylength))
2049                         break;
2050                 for (pos++;buffer[pos] && buffer[pos] != '\\';pos++);
2051                 for (pos++;buffer[pos] && buffer[pos] != '\\';pos++);
2052         }
2053         // if we found the key, find the end of it because we will be replacing it
2054         pos2 = pos;
2055         if (buffer[pos] == '\\')
2056         {
2057                 for (pos2++;buffer[pos2] && buffer[pos2] != '\\';pos2++);
2058                 for (pos2++;buffer[pos2] && buffer[pos2] != '\\';pos2++);
2059         }
2060         if (bufferlength <= pos + 1 + strlen(key) + 1 + strlen(value) + strlen(buffer + pos2))
2061         {
2062                 Con_Printf("InfoString_SetValue: no room for \"%s\" \"%s\" in infostring\n", key, value);
2063                 return;
2064         }
2065         if (value && value[0])
2066         {
2067                 // set the key/value and append the remaining text
2068                 char tempbuffer[MAX_INPUTLINE];
2069                 strlcpy(tempbuffer, buffer + pos2, sizeof(tempbuffer));
2070                 dpsnprintf(buffer + pos, bufferlength - pos, "\\%s\\%s%s", key, value, tempbuffer);
2071         }
2072         else
2073         {
2074                 // just remove the key from the text
2075                 strlcpy(buffer + pos, buffer + pos2, bufferlength - pos);
2076         }
2077 }
2078
2079 void InfoString_Print(char *buffer)
2080 {
2081         int i;
2082         char key[MAX_INPUTLINE];
2083         char value[MAX_INPUTLINE];
2084         while (*buffer)
2085         {
2086                 if (*buffer != '\\')
2087                 {
2088                         Con_Printf("InfoString_Print: corrupt string\n");
2089                         return;
2090                 }
2091                 for (buffer++, i = 0;*buffer && *buffer != '\\';buffer++)
2092                         if (i < (int)sizeof(key)-1)
2093                                 key[i++] = *buffer;
2094                 key[i] = 0;
2095                 if (*buffer != '\\')
2096                 {
2097                         Con_Printf("InfoString_Print: corrupt string\n");
2098                         return;
2099                 }
2100                 for (buffer++, i = 0;*buffer && *buffer != '\\';buffer++)
2101                         if (i < (int)sizeof(value)-1)
2102                                 value[i++] = *buffer;
2103                 value[i] = 0;
2104                 // empty value is an error case
2105                 Con_Printf("%20s %s\n", key, value[0] ? value : "NO VALUE");
2106         }
2107 }
2108
2109 //========================================================
2110 // strlcat and strlcpy, from OpenBSD
2111
2112 /*
2113  * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
2114  *
2115  * Permission to use, copy, modify, and distribute this software for any
2116  * purpose with or without fee is hereby granted, provided that the above
2117  * copyright notice and this permission notice appear in all copies.
2118  *
2119  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
2120  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
2121  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
2122  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
2123  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
2124  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
2125  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
2126  */
2127
2128 /*      $OpenBSD: strlcat.c,v 1.11 2003/06/17 21:56:24 millert Exp $    */
2129 /*      $OpenBSD: strlcpy.c,v 1.8 2003/06/17 21:56:24 millert Exp $     */
2130
2131
2132 #ifndef HAVE_STRLCAT
2133 size_t
2134 strlcat(char *dst, const char *src, size_t siz)
2135 {
2136         register char *d = dst;
2137         register const char *s = src;
2138         register size_t n = siz;
2139         size_t dlen;
2140
2141         /* Find the end of dst and adjust bytes left but don't go past end */
2142         while (n-- != 0 && *d != '\0')
2143                 d++;
2144         dlen = d - dst;
2145         n = siz - dlen;
2146
2147         if (n == 0)
2148                 return(dlen + strlen(s));
2149         while (*s != '\0') {
2150                 if (n != 1) {
2151                         *d++ = *s;
2152                         n--;
2153                 }
2154                 s++;
2155         }
2156         *d = '\0';
2157
2158         return(dlen + (s - src));       /* count does not include NUL */
2159 }
2160 #endif  // #ifndef HAVE_STRLCAT
2161
2162
2163 #ifndef HAVE_STRLCPY
2164 size_t
2165 strlcpy(char *dst, const char *src, size_t siz)
2166 {
2167         register char *d = dst;
2168         register const char *s = src;
2169         register size_t n = siz;
2170
2171         /* Copy as many bytes as will fit */
2172         if (n != 0 && --n != 0) {
2173                 do {
2174                         if ((*d++ = *s++) == 0)
2175                                 break;
2176                 } while (--n != 0);
2177         }
2178
2179         /* Not enough room in dst, add NUL and traverse rest of src */
2180         if (n == 0) {
2181                 if (siz != 0)
2182                         *d = '\0';              /* NUL-terminate dst */
2183                 while (*s++)
2184                         ;
2185         }
2186
2187         return(s - src - 1);    /* count does not include NUL */
2188 }
2189
2190 #endif  // #ifndef HAVE_STRLCPY
2191
2192 void FindFraction(double val, int *num, int *denom, int denomMax)
2193 {
2194         int i;
2195         double bestdiff;
2196         // initialize
2197         bestdiff = fabs(val);
2198         *num = 0;
2199         *denom = 1;
2200
2201         for(i = 1; i <= denomMax; ++i)
2202         {
2203                 int inum = (int) floor(0.5 + val * i);
2204                 double diff = fabs(val - inum / (double)i);
2205                 if(diff < bestdiff)
2206                 {
2207                         bestdiff = diff;
2208                         *num = inum;
2209                         *denom = i;
2210                 }
2211         }
2212 }
2213
2214 // decodes an XPM from C syntax
2215 char **XPM_DecodeString(const char *in)
2216 {
2217         static char *tokens[257];
2218         static char lines[257][512];
2219         size_t line = 0;
2220
2221         // skip until "{" token
2222         while(COM_ParseToken_QuakeC(&in, false) && strcmp(com_token, "{"));
2223
2224         // now, read in succession: string, comma-or-}
2225         while(COM_ParseToken_QuakeC(&in, false))
2226         {
2227                 tokens[line] = lines[line];
2228                 strlcpy(lines[line++], com_token, sizeof(lines[0]));
2229                 if(!COM_ParseToken_QuakeC(&in, false))
2230                         return NULL;
2231                 if(!strcmp(com_token, "}"))
2232                         break;
2233                 if(strcmp(com_token, ","))
2234                         return NULL;
2235                 if(line >= sizeof(tokens) / sizeof(tokens[0]))
2236                         return NULL;
2237         }
2238
2239         return tokens;
2240 }
2241
2242 static const char base64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
2243 static void base64_3to4(const unsigned char *in, unsigned char *out, int bytes)
2244 {
2245         unsigned char i0 = (bytes > 0) ? in[0] : 0;
2246         unsigned char i1 = (bytes > 1) ? in[1] : 0;
2247         unsigned char i2 = (bytes > 2) ? in[2] : 0;
2248         unsigned char o0 = base64[i0 >> 2];
2249         unsigned char o1 = base64[((i0 << 4) | (i1 >> 4)) & 077];
2250         unsigned char o2 = base64[((i1 << 2) | (i2 >> 6)) & 077];
2251         unsigned char o3 = base64[i2 & 077];
2252         out[0] = (bytes > 0) ? o0 : '?';
2253         out[1] = (bytes > 0) ? o1 : '?';
2254         out[2] = (bytes > 1) ? o2 : '=';
2255         out[3] = (bytes > 2) ? o3 : '=';
2256 }
2257
2258 size_t base64_encode(unsigned char *buf, size_t buflen, size_t outbuflen)
2259 {
2260         size_t blocks, i;
2261         // expand the out-buffer
2262         blocks = (buflen + 2) / 3;
2263         if(blocks*4 > outbuflen)
2264                 return 0;
2265         for(i = blocks; i > 0; )
2266         {
2267                 --i;
2268                 base64_3to4(buf + 3*i, buf + 4*i, buflen - 3*i);
2269         }
2270         return blocks * 4;
2271 }