-/*\r
-Copyright (C) 1999-2007 id Software, Inc. and contributors.\r
-For a list of contributors, see the accompanying CONTRIBUTORS file.\r
-\r
-This file is part of GtkRadiant.\r
-\r
-GtkRadiant is free software; you can redistribute it and/or modify\r
-it under the terms of the GNU General Public License as published by\r
-the Free Software Foundation; either version 2 of the License, or\r
-(at your option) any later version.\r
-\r
-GtkRadiant is distributed in the hope that it will be useful,\r
-but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
-GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License\r
-along with GtkRadiant; if not, write to the Free Software\r
-Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA\r
-*/\r
-\r
-// cmdlib.c\r
-// TTimo 09/30/2000\r
-// from an intial copy of common/cmdlib.c\r
-// stripped out the Sys_Printf Sys_Printf stuff\r
-\r
-// SPoG 05/27/2001\r
-// merging alpha branch into trunk\r
-// replaced qprintf with Sys_Printf \r
-\r
-#include "cmdlib.h"\r
-#include "mathlib.h"\r
-#include "inout.h"\r
-#include <sys/types.h>\r
-#include <sys/stat.h>\r
-\r
-#ifdef _WIN32\r
-#include <direct.h>\r
-#include <windows.h>\r
-#endif\r
-\r
-#if defined (__linux__) || defined (__APPLE__)\r
-#include <unistd.h>\r
-#endif\r
-\r
-#ifdef NeXT\r
-#include <libc.h>\r
-#endif\r
-\r
-#define BASEDIRNAME "quake" // assumed to have a 2 or 3 following\r
-#define PATHSEPERATOR '/'\r
-\r
-#ifdef SAFE_MALLOC\r
-void *safe_malloc( size_t size )\r
-{\r
- void *p;\r
-\r
- p = malloc(size);\r
- if(!p)\r
- Error ("safe_malloc failed on allocation of %i bytes", size);\r
-\r
- return p;\r
-}\r
-\r
-void *safe_malloc_info( size_t size, char* info )\r
-{\r
- void *p;\r
-\r
- p = malloc(size);\r
- if(!p)\r
- Error ("%s: safe_malloc failed on allocation of %i bytes", info, size);\r
-\r
- return p;\r
-}\r
-#endif\r
-\r
-// set these before calling CheckParm\r
-int myargc;\r
-char **myargv;\r
-\r
-char com_token[1024];\r
-qboolean com_eof;\r
-\r
-qboolean archive;\r
-char archivedir[1024];\r
-\r
-\r
-/*\r
-===================\r
-ExpandWildcards\r
-\r
-Mimic unix command line expansion\r
-===================\r
-*/\r
-#define MAX_EX_ARGC 1024\r
-int ex_argc;\r
-char *ex_argv[MAX_EX_ARGC];\r
-#ifdef _WIN32\r
-#include "io.h"\r
-void ExpandWildcards( int *argc, char ***argv )\r
-{\r
- struct _finddata_t fileinfo;\r
- int handle;\r
- int i;\r
- char filename[1024];\r
- char filebase[1024];\r
- char *path;\r
-\r
- ex_argc = 0;\r
- for (i=0 ; i<*argc ; i++)\r
- {\r
- path = (*argv)[i];\r
- if ( path[0] == '-'\r
- || ( !strstr(path, "*") && !strstr(path, "?") ) )\r
- {\r
- ex_argv[ex_argc++] = path;\r
- continue;\r
- }\r
-\r
- handle = _findfirst (path, &fileinfo);\r
- if (handle == -1)\r
- return;\r
-\r
- ExtractFilePath (path, filebase);\r
-\r
- do\r
- {\r
- sprintf (filename, "%s%s", filebase, fileinfo.name);\r
- ex_argv[ex_argc++] = copystring (filename);\r
- } while (_findnext( handle, &fileinfo ) != -1);\r
-\r
- _findclose (handle);\r
- }\r
-\r
- *argc = ex_argc;\r
- *argv = ex_argv;\r
-}\r
-#else\r
-void ExpandWildcards (int *argc, char ***argv)\r
-{\r
-}\r
-#endif\r
-\r
-/*\r
-\r
-qdir will hold the path up to the quake directory, including the slash\r
-\r
- f:\quake\\r
- /raid/quake/\r
-\r
-gamedir will hold qdir + the game directory (id1, id2, etc)\r
-\r
-*/\r
-\r
-char qdir[1024];\r
-char gamedir[1024];\r
-char writedir[1024];\r
-\r
-void SetQdirFromPath( const char *path )\r
-{\r
- char temp[1024];\r
- const char *c;\r
- const char *sep;\r
- int len, count;\r
-\r
- if (!(path[0] == '/' || path[0] == '\\' || path[1] == ':'))\r
- { // path is partial\r
- Q_getwd (temp);\r
- strcat (temp, path);\r
- path = temp;\r
- }\r
-\r
- // search for "quake2" in path\r
-\r
- len = strlen(BASEDIRNAME);\r
- for (c=path+strlen(path)-1 ; c != path ; c--)\r
- {\r
- int i;\r
-\r
- if (!Q_strncasecmp (c, BASEDIRNAME, len))\r
- {\r
- //\r
- //strncpy (qdir, path, c+len+2-path);\r
- // the +2 assumes a 2 or 3 following quake which is not the\r
- // case with a retail install\r
- // so we need to add up how much to the next separator\r
- sep = c + len;\r
- count = 1;\r
- while (*sep && *sep != '/' && *sep != '\\')\r
- {\r
- sep++;\r
- count++;\r
- }\r
- strncpy (qdir, path, c+len+count-path);\r
- Sys_Printf ("qdir: %s\n", qdir);\r
- for ( i = 0; i < strlen( qdir ); i++ )\r
- {\r
- if ( qdir[i] == '\\' ) \r
- qdir[i] = '/';\r
- }\r
-\r
- c += len+count;\r
- while (*c)\r
- {\r
- if (*c == '/' || *c == '\\')\r
- {\r
- strncpy (gamedir, path, c+1-path);\r
-\r
- for ( i = 0; i < strlen( gamedir ); i++ )\r
- {\r
- if ( gamedir[i] == '\\' ) \r
- gamedir[i] = '/';\r
- }\r
-\r
- Sys_Printf ("gamedir: %s\n", gamedir);\r
-\r
- if ( !writedir[0] )\r
- strcpy( writedir, gamedir );\r
- else if ( writedir[strlen( writedir )-1] != '/' )\r
- {\r
- writedir[strlen( writedir )] = '/';\r
- writedir[strlen( writedir )+1] = 0;\r
- }\r
-\r
- return;\r
- }\r
- c++;\r
- }\r
- Error ("No gamedir in %s", path);\r
- return;\r
- }\r
- }\r
- Error ("SetQdirFromPath: no '%s' in %s", BASEDIRNAME, path);\r
-}\r
-\r
-char *ExpandArg (const char *path)\r
-{\r
- static char full[1024];\r
-\r
- if (path[0] != '/' && path[0] != '\\' && path[1] != ':')\r
- {\r
- Q_getwd (full);\r
- strcat (full, path);\r
- }\r
- else\r
- strcpy (full, path);\r
- return full;\r
-}\r
-\r
-char *ExpandPath (const char *path)\r
-{\r
- static char full[1024];\r
- if (!qdir)\r
- Error ("ExpandPath called without qdir set");\r
- if (path[0] == '/' || path[0] == '\\' || path[1] == ':') {\r
- strcpy( full, path );\r
- return full;\r
- }\r
- sprintf (full, "%s%s", qdir, path);\r
- return full;\r
-}\r
-\r
-char *ExpandGamePath (const char *path)\r
-{\r
- static char full[1024];\r
- if (!qdir)\r
- Error ("ExpandGamePath called without qdir set");\r
- if (path[0] == '/' || path[0] == '\\' || path[1] == ':') {\r
- strcpy( full, path );\r
- return full;\r
- }\r
- sprintf (full, "%s%s", gamedir, path);\r
- return full;\r
-}\r
-\r
-char *ExpandPathAndArchive (const char *path)\r
-{\r
- char *expanded;\r
- char archivename[1024];\r
-\r
- expanded = ExpandPath (path);\r
-\r
- if (archive)\r
- {\r
- sprintf (archivename, "%s/%s", archivedir, path);\r
- QCopyFile (expanded, archivename);\r
- }\r
- return expanded;\r
-}\r
-\r
-\r
-char *copystring(const char *s)\r
-{\r
- char *b;\r
- b = safe_malloc(strlen(s)+1);\r
- strcpy (b, s);\r
- return b;\r
-}\r
-\r
-\r
-\r
-/*\r
-================\r
-I_FloatTime\r
-================\r
-*/\r
-double I_FloatTime (void)\r
-{\r
- time_t t;\r
- \r
- time (&t);\r
- \r
- return t;\r
-#if 0\r
-// more precise, less portable\r
- struct timeval tp;\r
- struct timezone tzp;\r
- static int secbase;\r
-\r
- gettimeofday(&tp, &tzp);\r
- \r
- if (!secbase)\r
- {\r
- secbase = tp.tv_sec;\r
- return tp.tv_usec/1000000.0;\r
- }\r
- \r
- return (tp.tv_sec - secbase) + tp.tv_usec/1000000.0;\r
-#endif\r
-}\r
-\r
-void Q_getwd (char *out)\r
-{\r
- int i = 0;\r
-\r
-#ifdef _WIN32\r
- _getcwd (out, 256);\r
- strcat (out, "\\");\r
-#else\r
- // Gef: Changed from getwd() to getcwd() to avoid potential buffer overflow\r
- getcwd (out, 256);\r
- strcat (out, "/");\r
-#endif\r
- while ( out[i] != 0 )\r
- {\r
- if ( out[i] == '\\' )\r
- out[i] = '/';\r
- i++;\r
- }\r
-}\r
-\r
-\r
-void Q_mkdir (const char *path)\r
-{\r
-#ifdef _WIN32\r
- if (_mkdir (path) != -1)\r
- return;\r
-#else\r
- if (mkdir (path, 0777) != -1)\r
- return;\r
-#endif\r
- if (errno != EEXIST)\r
- Error ("mkdir %s: %s",path, strerror(errno));\r
-}\r
-\r
-/*\r
-============\r
-FileTime\r
-\r
-returns -1 if not present\r
-============\r
-*/\r
-int FileTime (const char *path)\r
-{\r
- struct stat buf;\r
- \r
- if (stat (path,&buf) == -1)\r
- return -1;\r
- \r
- return buf.st_mtime;\r
-}\r
-\r
-\r
-\r
-/*\r
-==============\r
-COM_Parse\r
-\r
-Parse a token out of a string\r
-==============\r
-*/\r
-char *COM_Parse (char *data)\r
-{\r
- int c;\r
- int len;\r
- \r
- len = 0;\r
- com_token[0] = 0;\r
- \r
- if (!data)\r
- return NULL;\r
- \r
-// skip whitespace\r
-skipwhite:\r
- while ( (c = *data) <= ' ')\r
- {\r
- if (c == 0)\r
- {\r
- com_eof = qtrue;\r
- return NULL; // end of file;\r
- }\r
- data++;\r
- }\r
- \r
-// skip // comments\r
- if (c=='/' && data[1] == '/')\r
- {\r
- while (*data && *data != '\n')\r
- data++;\r
- goto skipwhite;\r
- }\r
- \r
-\r
-// handle quoted strings specially\r
- if (c == '\"')\r
- {\r
- data++;\r
- do\r
- {\r
- c = *data++;\r
- if (c=='\"')\r
- {\r
- com_token[len] = 0;\r
- return data;\r
- }\r
- com_token[len] = c;\r
- len++;\r
- } while (1);\r
- }\r
-\r
-// parse single characters\r
- if (c=='{' || c=='}'|| c==')'|| c=='(' || c=='\'' || c==':')\r
- {\r
- com_token[len] = c;\r
- len++;\r
- com_token[len] = 0;\r
- return data+1;\r
- }\r
-\r
-// parse a regular word\r
- do\r
- {\r
- com_token[len] = c;\r
- data++;\r
- len++;\r
- c = *data;\r
- if (c=='{' || c=='}'|| c==')'|| c=='(' || c=='\'' || c==':')\r
- break;\r
- } while (c>32);\r
- \r
- com_token[len] = 0;\r
- return data;\r
-}\r
-\r
-int Q_strncasecmp (const char *s1, const char *s2, int n)\r
-{\r
- int c1, c2;\r
- \r
- do\r
- {\r
- c1 = *s1++;\r
- c2 = *s2++;\r
-\r
- if (!n--)\r
- return 0; // strings are equal until end point\r
- \r
- if (c1 != c2)\r
- {\r
- if (c1 >= 'a' && c1 <= 'z')\r
- c1 -= ('a' - 'A');\r
- if (c2 >= 'a' && c2 <= 'z')\r
- c2 -= ('a' - 'A');\r
- if (c1 != c2)\r
- return -1; // strings not equal\r
- }\r
- } while (c1);\r
- \r
- return 0; // strings are equal\r
-}\r
-\r
-int Q_stricmp (const char *s1, const char *s2)\r
-{\r
- return Q_strncasecmp (s1, s2, 99999);\r
-}\r
-\r
-// NOTE TTimo when switching to Multithread DLL (Release/Debug) in the config\r
-// started getting warnings about that function, prolly a duplicate with the runtime function\r
-// maybe we still need to have it in linux builds\r
-/*\r
-char *strupr (char *start)\r
-{\r
- char *in;\r
- in = start;\r
- while (*in)\r
- {\r
- *in = toupper(*in);\r
- in++;\r
- }\r
- return start;\r
-}\r
-*/\r
-\r
-char *strlower (char *start)\r
-{\r
- char *in;\r
- in = start;\r
- while (*in)\r
- {\r
- *in = tolower(*in); \r
- in++;\r
- }\r
- return start;\r
-}\r
-\r
-\r
-/*\r
-=============================================================================\r
-\r
- MISC FUNCTIONS\r
-\r
-=============================================================================\r
-*/\r
-\r
-\r
-/*\r
-=================\r
-CheckParm\r
-\r
-Checks for the given parameter in the program's command line arguments\r
-Returns the argument number (1 to argc-1) or 0 if not present\r
-=================\r
-*/\r
-int CheckParm (const char *check)\r
-{\r
- int i;\r
-\r
- for (i = 1;i<myargc;i++)\r
- {\r
- if ( !Q_stricmp(check, myargv[i]) )\r
- return i;\r
- }\r
-\r
- return 0;\r
-}\r
-\r
-\r
-\r
-/*\r
-================\r
-Q_filelength\r
-================\r
-*/\r
-int Q_filelength (FILE *f)\r
-{\r
- int pos;\r
- int end;\r
-\r
- pos = ftell (f);\r
- fseek (f, 0, SEEK_END);\r
- end = ftell (f);\r
- fseek (f, pos, SEEK_SET);\r
-\r
- return end;\r
-}\r
-\r
-\r
-FILE *SafeOpenWrite (const char *filename)\r
-{\r
- FILE *f;\r
-\r
- f = fopen(filename, "wb");\r
-\r
- if (!f)\r
- Error ("Error opening %s: %s",filename,strerror(errno));\r
-\r
- return f;\r
-}\r
-\r
-FILE *SafeOpenRead (const char *filename)\r
-{\r
- FILE *f;\r
-\r
- f = fopen(filename, "rb");\r
-\r
- if (!f)\r
- Error ("Error opening %s: %s",filename,strerror(errno));\r
-\r
- return f;\r
-}\r
-\r
-\r
-void SafeRead (FILE *f, void *buffer, int count)\r
-{\r
- if ( fread (buffer, 1, count, f) != (size_t)count)\r
- Error ("File read failure");\r
-}\r
-\r
-\r
-void SafeWrite (FILE *f, const void *buffer, int count)\r
-{\r
- if (fwrite (buffer, 1, count, f) != (size_t)count)\r
- Error ("File write failure");\r
-}\r
-\r
-\r
-/*\r
-==============\r
-FileExists\r
-==============\r
-*/\r
-qboolean FileExists (const char *filename)\r
-{\r
- FILE *f;\r
-\r
- f = fopen (filename, "r");\r
- if (!f)\r
- return qfalse;\r
- fclose (f);\r
- return qtrue;\r
-}\r
-\r
-/*\r
-==============\r
-LoadFile\r
-==============\r
-*/\r
-int LoadFile( const char *filename, void **bufferptr )\r
-{\r
- FILE *f;\r
- int length;\r
- void *buffer;\r
-\r
- f = SafeOpenRead (filename);\r
- length = Q_filelength (f);\r
- buffer = safe_malloc (length+1);\r
- ((char *)buffer)[length] = 0;\r
- SafeRead (f, buffer, length);\r
- fclose (f);\r
-\r
- *bufferptr = buffer;\r
- return length;\r
-}\r
-\r
-\r
-/*\r
-==============\r
-LoadFileBlock\r
--\r
-rounds up memory allocation to 4K boundry\r
--\r
-==============\r
-*/\r
-int LoadFileBlock( const char *filename, void **bufferptr )\r
-{\r
- FILE *f;\r
- int length, nBlock, nAllocSize;\r
- void *buffer;\r
-\r
- f = SafeOpenRead (filename);\r
- length = Q_filelength (f);\r
- nAllocSize = length;\r
- nBlock = nAllocSize % MEM_BLOCKSIZE;\r
- if ( nBlock > 0) {\r
- nAllocSize += MEM_BLOCKSIZE - nBlock;\r
- }\r
- buffer = safe_malloc (nAllocSize+1);\r
- memset(buffer, 0, nAllocSize+1);\r
- SafeRead (f, buffer, length);\r
- fclose (f);\r
-\r
- *bufferptr = buffer;\r
- return length;\r
-}\r
-\r
-\r
-/*\r
-==============\r
-TryLoadFile\r
-\r
-Allows failure\r
-==============\r
-*/\r
-int TryLoadFile (const char *filename, void **bufferptr)\r
-{\r
- FILE *f;\r
- int length;\r
- void *buffer;\r
-\r
- *bufferptr = NULL;\r
-\r
- f = fopen (filename, "rb");\r
- if (!f)\r
- return -1;\r
- length = Q_filelength (f);\r
- buffer = safe_malloc (length+1);\r
- ((char *)buffer)[length] = 0;\r
- SafeRead (f, buffer, length);\r
- fclose (f);\r
-\r
- *bufferptr = buffer;\r
- return length;\r
-}\r
-\r
-\r
-/*\r
-==============\r
-SaveFile\r
-==============\r
-*/\r
-void SaveFile (const char *filename, const void *buffer, int count)\r
-{\r
- FILE *f;\r
-\r
- f = SafeOpenWrite (filename);\r
- SafeWrite (f, buffer, count);\r
- fclose (f);\r
-}\r
-\r
-\r
-\r
-void DefaultExtension (char *path, const char *extension)\r
-{\r
- char *src;\r
-//\r
-// if path doesnt have a .EXT, append extension\r
-// (extension should include the .)\r
-//\r
- src = path + strlen(path) - 1;\r
-\r
- while (*src != '/' && *src != '\\' && src != path)\r
- {\r
- if (*src == '.')\r
- return; // it has an extension\r
- src--;\r
- }\r
-\r
- strcat (path, extension);\r
-}\r
-\r
-\r
-void DefaultPath (char *path, const char *basepath)\r
-{\r
- char temp[128];\r
-\r
- if( path[ 0 ] == '/' || path[ 0 ] == '\\' )\r
- return; // absolute path location\r
- strcpy (temp,path);\r
- strcpy (path,basepath);\r
- strcat (path,temp);\r
-}\r
-\r
-\r
-void StripFilename (char *path)\r
-{\r
- int length;\r
-\r
- length = strlen(path)-1;\r
- while (length > 0 && path[length] != '/' && path[ length ] != '\\' )\r
- length--;\r
- path[length] = 0;\r
-}\r
-\r
-void StripExtension (char *path)\r
-{\r
- int length;\r
-\r
- length = strlen(path)-1;\r
- while (length > 0 && path[length] != '.')\r
- {\r
- length--;\r
- if (path[length] == '/' || path[ length ] == '\\' )\r
- return; // no extension\r
- }\r
- if (length)\r
- path[length] = 0;\r
-}\r
-\r
-\r
-/*\r
-====================\r
-Extract file parts\r
-====================\r
-*/\r
-// FIXME: should include the slash, otherwise\r
-// backing to an empty path will be wrong when appending a slash\r
-void ExtractFilePath (const char *path, char *dest)\r
-{\r
- const char *src;\r
-\r
- src = path + strlen(path) - 1;\r
-\r
-//\r
-// back up until a \ or the start\r
-//\r
- while (src != path && *(src-1) != '\\' && *(src-1) != '/')\r
- src--;\r
-\r
- memcpy (dest, path, src-path);\r
- dest[src-path] = 0;\r
-}\r
-\r
-void ExtractFileBase (const char *path, char *dest)\r
-{\r
- const char *src;\r
-\r
- src = path + strlen(path) - 1;\r
-\r
-//\r
-// back up until a \ or the start\r
-//\r
- while (src != path && *(src-1) != '/' && *(src-1) != '\\' )\r
- src--;\r
-\r
- while (*src && *src != '.')\r
- {\r
- *dest++ = *src++;\r
- }\r
- *dest = 0;\r
-}\r
-\r
-void ExtractFileExtension (const char *path, char *dest)\r
-{\r
- const char *src;\r
-\r
- src = path + strlen(path) - 1;\r
-\r
-//\r
-// back up until a . or the start\r
-//\r
- while (src != path && *(src-1) != '.')\r
- src--;\r
- if (src == path)\r
- {\r
- *dest = 0; // no extension\r
- return;\r
- }\r
-\r
- strcpy (dest,src);\r
-}\r
-\r
-\r
-/*\r
-==============\r
-ParseNum / ParseHex\r
-==============\r
-*/\r
-int ParseHex (const char *hex)\r
-{\r
- const char *str;\r
- int num;\r
-\r
- num = 0;\r
- str = hex;\r
-\r
- while (*str)\r
- {\r
- num <<= 4;\r
- if (*str >= '0' && *str <= '9')\r
- num += *str-'0';\r
- else if (*str >= 'a' && *str <= 'f')\r
- num += 10 + *str-'a';\r
- else if (*str >= 'A' && *str <= 'F')\r
- num += 10 + *str-'A';\r
- else\r
- Error ("Bad hex number: %s",hex);\r
- str++;\r
- }\r
-\r
- return num;\r
-}\r
-\r
-\r
-int ParseNum (const char *str)\r
-{\r
- if (str[0] == '$')\r
- return ParseHex (str+1);\r
- if (str[0] == '0' && str[1] == 'x')\r
- return ParseHex (str+2);\r
- return atol (str);\r
-}\r
-\r
-\r
-\r
-/*\r
-============================================================================\r
-\r
- BYTE ORDER FUNCTIONS\r
-\r
-============================================================================\r
-*/\r
-\r
-#ifdef _SGI_SOURCE\r
-#define __BIG_ENDIAN__\r
-#endif\r
-\r
-#ifdef __BIG_ENDIAN__\r
-\r
-short LittleShort (short l)\r
-{\r
- byte b1,b2;\r
-\r
- b1 = l&255;\r
- b2 = (l>>8)&255;\r
-\r
- return (b1<<8) + b2;\r
-}\r
-\r
-short BigShort (short l)\r
-{\r
- return l;\r
-}\r
-\r
-\r
-int LittleLong (int l)\r
-{\r
- byte b1,b2,b3,b4;\r
-\r
- b1 = l&255;\r
- b2 = (l>>8)&255;\r
- b3 = (l>>16)&255;\r
- b4 = (l>>24)&255;\r
-\r
- return ((int)b1<<24) + ((int)b2<<16) + ((int)b3<<8) + b4;\r
-}\r
-\r
-int BigLong (int l)\r
-{\r
- return l;\r
-}\r
-\r
-\r
-float LittleFloat (float l)\r
-{\r
- union {byte b[4]; float f;} in, out;\r
- \r
- in.f = l;\r
- out.b[0] = in.b[3];\r
- out.b[1] = in.b[2];\r
- out.b[2] = in.b[1];\r
- out.b[3] = in.b[0];\r
- \r
- return out.f;\r
-}\r
-\r
-float BigFloat (float l)\r
-{\r
- return l;\r
-}\r
-\r
-\r
-#else\r
-\r
-\r
-short BigShort (short l)\r
-{\r
- byte b1,b2;\r
-\r
- b1 = l&255;\r
- b2 = (l>>8)&255;\r
-\r
- return (b1<<8) + b2;\r
-}\r
-\r
-short LittleShort (short l)\r
-{\r
- return l;\r
-}\r
-\r
-\r
-int BigLong (int l)\r
-{\r
- byte b1,b2,b3,b4;\r
-\r
- b1 = l&255;\r
- b2 = (l>>8)&255;\r
- b3 = (l>>16)&255;\r
- b4 = (l>>24)&255;\r
-\r
- return ((int)b1<<24) + ((int)b2<<16) + ((int)b3<<8) + b4;\r
-}\r
-\r
-int LittleLong (int l)\r
-{\r
- return l;\r
-}\r
-\r
-float BigFloat (float l)\r
-{\r
- union {byte b[4]; float f;} in, out;\r
- \r
- in.f = l;\r
- out.b[0] = in.b[3];\r
- out.b[1] = in.b[2];\r
- out.b[2] = in.b[1];\r
- out.b[3] = in.b[0];\r
- \r
- return out.f;\r
-}\r
-\r
-float LittleFloat (float l)\r
-{\r
- return l;\r
-}\r
-\r
-\r
-#endif\r
-\r
-\r
-//=======================================================\r
-\r
-\r
-// FIXME: byte swap?\r
-\r
-// this is a 16 bit, non-reflected CRC using the polynomial 0x1021\r
-// and the initial and final xor values shown below... in other words, the\r
-// CCITT standard CRC used by XMODEM\r
-\r
-#define CRC_INIT_VALUE 0xffff\r
-#define CRC_XOR_VALUE 0x0000\r
-\r
-static unsigned short crctable[256] =\r
-{\r
- 0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7,\r
- 0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef,\r
- 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6,\r
- 0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de,\r
- 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485,\r
- 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d,\r
- 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4,\r
- 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc,\r
- 0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823,\r
- 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b,\r
- 0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12,\r
- 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a,\r
- 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41,\r
- 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49,\r
- 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70,\r
- 0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78,\r
- 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f,\r
- 0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067,\r
- 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e,\r
- 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256,\r
- 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d,\r
- 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405,\r
- 0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c,\r
- 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634,\r
- 0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab,\r
- 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3,\r
- 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a,\r
- 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92,\r
- 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9,\r
- 0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1,\r
- 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8,\r
- 0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0\r
-};\r
-\r
-void CRC_Init(unsigned short *crcvalue)\r
-{\r
- *crcvalue = CRC_INIT_VALUE;\r
-}\r
-\r
-void CRC_ProcessByte(unsigned short *crcvalue, byte data)\r
-{\r
- *crcvalue = (*crcvalue << 8) ^ crctable[(*crcvalue >> 8) ^ data];\r
-}\r
-\r
-unsigned short CRC_Value(unsigned short crcvalue)\r
-{\r
- return crcvalue ^ CRC_XOR_VALUE;\r
-}\r
-//=============================================================================\r
-\r
-/*\r
-============\r
-CreatePath\r
-============\r
-*/\r
-void CreatePath (const char *path)\r
-{\r
- const char *ofs;\r
- char c;\r
- char dir[1024];\r
-\r
-#ifdef _WIN32\r
- int olddrive = -1;\r
-\r
- if ( path[1] == ':' )\r
- {\r
- olddrive = _getdrive();\r
- _chdrive( toupper( path[0] ) - 'A' + 1 );\r
- }\r
-#endif\r
-\r
- if (path[1] == ':')\r
- path += 2;\r
-\r
- for (ofs = path+1 ; *ofs ; ofs++)\r
- {\r
- c = *ofs;\r
- if (c == '/' || c == '\\')\r
- { // create the directory\r
- memcpy( dir, path, ofs - path );\r
- dir[ ofs - path ] = 0;\r
- Q_mkdir( dir );\r
- }\r
- }\r
-\r
-#ifdef _WIN32\r
- if ( olddrive != -1 )\r
- {\r
- _chdrive( olddrive );\r
- }\r
-#endif\r
-}\r
-\r
-\r
-/*\r
-============\r
-QCopyFile\r
-\r
- Used to archive source files\r
-============\r
-*/\r
-void QCopyFile (const char *from, const char *to)\r
-{\r
- void *buffer;\r
- int length;\r
-\r
- length = LoadFile (from, &buffer);\r
- CreatePath (to);\r
- SaveFile (to, buffer, length);\r
- free (buffer);\r
-}\r
-\r
-void Sys_Sleep(int n)\r
-{\r
-#ifdef _WIN32\r
- Sleep (n);\r
-#endif\r
-#if defined (__linux__) || defined (__APPLE__)\r
- usleep (n * 1000);\r
-#endif\r
-}\r
+/*
+ Copyright (C) 1999-2007 id Software, Inc. and contributors.
+ For a list of contributors, see the accompanying CONTRIBUTORS file.
+
+ This file is part of GtkRadiant.
+
+ GtkRadiant is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ GtkRadiant is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with GtkRadiant; if not, write to the Free Software
+ Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+// cmdlib.c
+// TTimo 09/30/2000
+// from an intial copy of common/cmdlib.c
+// stripped out the Sys_Printf Sys_Printf stuff
+
+// SPoG 05/27/2001
+// merging alpha branch into trunk
+// replaced qprintf with Sys_Printf
+
+#include "cmdlib.h"
+#include "globaldefs.h"
+#include "mathlib.h"
+#include "inout.h"
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#if GDEF_OS_WINDOWS
+#include <direct.h>
+#include <windows.h>
+#elif GDEF_OS_NEXT
+#include <libc.h>
+#else // OTHER OS
+#include <unistd.h>
+#endif // OTHER OS
+
+#define BASEDIRNAME "quake" // assumed to have a 2 or 3 following
+#define PATHSEPERATOR '/'
+
+void *safe_malloc( size_t size ){
+ void *p;
+
+ p = malloc( size );
+ if ( !p ) {
+ Error( "safe_malloc failed on allocation of %i bytes", size );
+ }
+
+ return p;
+}
+
+void *safe_malloc_info( size_t size, char* info ){
+ void *p;
+
+ p = malloc( size );
+ if ( !p ) {
+ Error( "%s: safe_malloc failed on allocation of %i bytes", info, size );
+ }
+
+ return p;
+}
+
+void *safe_malloc0( size_t size ){
+ void *p;
+
+ p = calloc( 1, size );
+ if ( !p ) {
+ Error( "safe_malloc0 failed on allocation of %i bytes", size );
+ }
+
+ return p;
+}
+
+void *safe_malloc0_info( size_t size, char* info ){
+ void *p;
+
+ p = calloc( 1, size );
+ if ( !p ) {
+ Error( "%s: safe_malloc0 failed on allocation of %i bytes", info, size );
+ }
+
+ return p;
+}
+
+// set these before calling CheckParm
+int myargc;
+char **myargv;
+
+char com_token[1024];
+qboolean com_eof;
+
+qboolean archive;
+char archivedir[1024];
+
+
+/*
+ ===================
+ ExpandWildcards
+
+ Mimic unix command line expansion
+ ===================
+ */
+#define MAX_EX_ARGC 1024
+int ex_argc;
+char *ex_argv[MAX_EX_ARGC];
+
+#if GDEF_OS_WINDOWS
+#include "io.h"
+void ExpandWildcards( int *argc, char ***argv ){
+ struct _finddata_t fileinfo;
+ int handle;
+ int i;
+ char filename[1024];
+ char filebase[1024];
+ char *path;
+
+ ex_argc = 0;
+ for ( i = 0 ; i < *argc ; i++ )
+ {
+ path = ( *argv )[i];
+ if ( path[0] == '-'
+ || ( !strstr( path, "*" ) && !strstr( path, "?" ) ) ) {
+ ex_argv[ex_argc++] = path;
+ continue;
+ }
+
+ handle = _findfirst( path, &fileinfo );
+ if ( handle == -1 ) {
+ return;
+ }
+
+ ExtractFilePath( path, filebase );
+
+ do
+ {
+ sprintf( filename, "%s%s", filebase, fileinfo.name );
+ ex_argv[ex_argc++] = copystring( filename );
+ } while ( _findnext( handle, &fileinfo ) != -1 );
+
+ _findclose( handle );
+ }
+
+ *argc = ex_argc;
+ *argv = ex_argv;
+}
+#else // !GDEF_OS_WINDOWS
+void ExpandWildcards( int *argc, char ***argv ){
+}
+#endif // !GDEF_OS_WINDOWS
+
+/*
+
+ qdir will hold the path up to the quake directory, including the slash
+
+ f:\quake\
+ /raid/quake/
+
+ gamedir will hold qdir + the game directory (id1, id2, etc)
+
+ */
+
+char qdir[1024];
+char gamedir[1024];
+char writedir[1024];
+
+void SetQdirFromPath( const char *path ){
+ char temp[1024];
+ const char *c;
+ const char *sep;
+ int len, count;
+
+ if ( !( path[0] == '/' || path[0] == '\\' || path[1] == ':' ) ) { // path is partial
+ Q_getwd( temp );
+ strcat( temp, path );
+ path = temp;
+ }
+
+ // search for "quake2" in path
+
+ len = strlen( BASEDIRNAME );
+ for ( c = path + strlen( path ) - 1 ; c != path ; c-- )
+ {
+ int i;
+
+ if ( !Q_strncasecmp( c, BASEDIRNAME, len ) ) {
+ //
+ //strncpy (qdir, path, c+len+2-path);
+ // the +2 assumes a 2 or 3 following quake which is not the
+ // case with a retail install
+ // so we need to add up how much to the next separator
+ sep = c + len;
+ count = 1;
+ while ( *sep && *sep != '/' && *sep != '\\' )
+ {
+ sep++;
+ count++;
+ }
+ strncpy( qdir, path, c + len + count - path );
+ Sys_Printf( "qdir: %s\n", qdir );
+ for ( i = 0; i < (int) strlen( qdir ); i++ )
+ {
+ if ( qdir[i] == '\\' ) {
+ qdir[i] = '/';
+ }
+ }
+
+ c += len + count;
+ while ( *c )
+ {
+ if ( *c == '/' || *c == '\\' ) {
+ strncpy( gamedir, path, c + 1 - path );
+
+ for ( i = 0; i < (int) strlen( gamedir ); i++ )
+ {
+ if ( gamedir[i] == '\\' ) {
+ gamedir[i] = '/';
+ }
+ }
+
+ Sys_Printf( "gamedir: %s\n", gamedir );
+
+ if ( !writedir[0] ) {
+ strcpy( writedir, gamedir );
+ }
+ else if ( writedir[strlen( writedir ) - 1] != '/' ) {
+ writedir[strlen( writedir )] = '/';
+ writedir[strlen( writedir ) + 1] = 0;
+ }
+
+ return;
+ }
+ c++;
+ }
+ Error( "No gamedir in %s", path );
+ return;
+ }
+ }
+ Error( "SetQdirFromPath: no '%s' in %s", BASEDIRNAME, path );
+}
+
+char *ExpandArg( const char *path ){
+ static char full[1024];
+
+ if ( path[0] != '/' && path[0] != '\\' && path[1] != ':' ) {
+ Q_getwd( full );
+ strcat( full, path );
+ }
+ else{
+ strcpy( full, path );
+ }
+ return full;
+}
+
+char *ExpandPath( const char *path ){
+ static char full[1024];
+ if ( path[0] == '/' || path[0] == '\\' || path[1] == ':' ) {
+ strcpy( full, path );
+ return full;
+ }
+ sprintf( full, "%s%s", qdir, path );
+ return full;
+}
+
+char *copystring( const char *s ){
+ char *b;
+ b = safe_malloc( strlen( s ) + 1 );
+ strcpy( b, s );
+ return b;
+}
+
+
+
+/*
+ ================
+ I_FloatTime
+ ================
+ */
+double I_FloatTime( void ){
+ time_t t;
+
+ time( &t );
+
+ return t;
+#if 0
+// more precise, less portable
+ struct timeval tp;
+ struct timezone tzp;
+ static int secbase;
+
+ gettimeofday( &tp, &tzp );
+
+ if ( !secbase ) {
+ secbase = tp.tv_sec;
+ return tp.tv_usec / 1000000.0;
+ }
+
+ return ( tp.tv_sec - secbase ) + tp.tv_usec / 1000000.0;
+#endif
+}
+
+void Q_getwd( char *out ){
+ int i = 0;
+
+#if GDEF_OS_WINDOWS
+ _getcwd( out, 256 );
+ strcat( out, "\\" );
+#else // !GDEF_OS_WINDOWS
+ // Gef: Changed from getwd() to getcwd() to avoid potential buffer overflow
+ if ( !getcwd( out, 256 ) ) {
+ *out = 0;
+ }
+ strcat( out, "/" );
+#endif // !GDEF_OS_WINDOWS
+ while ( out[i] != 0 )
+ {
+ if ( out[i] == '\\' ) {
+ out[i] = '/';
+ }
+ i++;
+ }
+}
+
+
+void Q_mkdir( const char *path ){
+ char parentbuf[256];
+ const char *p = NULL;
+ int retry = 2;
+ while ( retry-- )
+ {
+#if GDEF_OS_WINDOWS
+ const char *q = NULL;
+ if ( _mkdir( path ) != -1 ) {
+ return;
+ }
+ if ( errno == ENOENT ) {
+ p = strrchr( path, '/' );
+ q = strrchr( path, '\\' );
+ if ( q && ( !p || q < p ) ) {
+ p = q;
+ }
+ }
+#else // !GDEF_OS_WINDOWS
+ if ( mkdir( path, 0777 ) != -1 ) {
+ return;
+ }
+ if ( errno == ENOENT ) {
+ p = strrchr( path, '/' );
+ }
+#endif // !GDEF_OS_WINDOWS
+ if ( p ) {
+ strncpy( parentbuf, path, sizeof( parentbuf ) );
+ if ( (int) ( p - path ) < (int) sizeof( parentbuf ) ) {
+ parentbuf[p - path] = 0;
+ Sys_Printf( "mkdir: %s: creating parent %s first\n", path, parentbuf );
+ Q_mkdir( parentbuf );
+ continue;
+ }
+ }
+ break;
+ }
+ if ( errno != EEXIST ) {
+ Error( "mkdir %s: %s",path, strerror( errno ) );
+ }
+}
+
+/*
+ ============
+ FileTime
+
+ returns -1 if not present
+ ============
+ */
+int FileTime( const char *path ){
+ struct stat buf;
+
+ if ( stat( path,&buf ) == -1 ) {
+ return -1;
+ }
+
+ return buf.st_mtime;
+}
+
+
+
+/*
+ ==============
+ COM_Parse
+
+ Parse a token out of a string
+ ==============
+ */
+char *COM_Parse( char *data ){
+ int c;
+ int len;
+
+ len = 0;
+ com_token[0] = 0;
+
+ if ( !data ) {
+ return NULL;
+ }
+
+// skip whitespace
+skipwhite:
+ while ( ( c = *data ) <= ' ' )
+ {
+ if ( c == 0 ) {
+ com_eof = qtrue;
+ return NULL; // end of file;
+ }
+ data++;
+ }
+
+// skip // comments
+ if ( c == '/' && data[1] == '/' ) {
+ while ( *data && *data != '\n' )
+ data++;
+ goto skipwhite;
+ }
+
+
+// handle quoted strings specially
+ if ( c == '\"' ) {
+ data++;
+ do
+ {
+ c = *data++;
+ if ( c == '\"' ) {
+ com_token[len] = 0;
+ return data;
+ }
+ com_token[len] = c;
+ len++;
+ } while ( 1 );
+ }
+
+// parse single characters
+ if ( c == '{' || c == '}' || c == ')' || c == '(' || c == '\'' || c == ':' ) {
+ com_token[len] = c;
+ len++;
+ com_token[len] = 0;
+ return data + 1;
+ }
+
+// parse a regular word
+ do
+ {
+ com_token[len] = c;
+ data++;
+ len++;
+ c = *data;
+ if ( c == '{' || c == '}' || c == ')' || c == '(' || c == '\'' || c == ':' ) {
+ break;
+ }
+ } while ( c > 32 );
+
+ com_token[len] = 0;
+ return data;
+}
+
+int Q_strncasecmp( const char *s1, const char *s2, int n ){
+ int c1, c2;
+
+ do
+ {
+ c1 = *s1++;
+ c2 = *s2++;
+
+ if ( !n-- ) {
+ return 0; // strings are equal until end point
+
+ }
+ if ( c1 != c2 ) {
+ if ( c1 >= 'a' && c1 <= 'z' ) {
+ c1 -= ( 'a' - 'A' );
+ }
+ if ( c2 >= 'a' && c2 <= 'z' ) {
+ c2 -= ( 'a' - 'A' );
+ }
+ if ( c1 != c2 ) {
+ return -1; // strings not equal
+ }
+ }
+ } while ( c1 );
+
+ return 0; // strings are equal
+}
+
+int Q_stricmp( const char *s1, const char *s2 ){
+ return Q_strncasecmp( s1, s2, 99999 );
+}
+
+char *strlower( char *start ){
+ char *in;
+ in = start;
+ while ( *in )
+ {
+ *in = tolower( *in );
+ in++;
+ }
+ return start;
+}
+
+
+/*
+ =============================================================================
+
+ MISC FUNCTIONS
+
+ =============================================================================
+ */
+
+
+/*
+ =================
+ CheckParm
+
+ Checks for the given parameter in the program's command line arguments
+ Returns the argument number (1 to argc-1) or 0 if not present
+ =================
+ */
+int CheckParm( const char *check ){
+ int i;
+
+ for ( i = 1; i < myargc; i++ )
+ {
+ if ( !Q_stricmp( check, myargv[i] ) ) {
+ return i;
+ }
+ }
+
+ return 0;
+}
+
+
+
+/*
+ ================
+ Q_filelength
+ ================
+ */
+int Q_filelength( FILE *f ){
+ int pos;
+ int end;
+
+ pos = ftell( f );
+ fseek( f, 0, SEEK_END );
+ end = ftell( f );
+ fseek( f, pos, SEEK_SET );
+
+ return end;
+}
+
+
+FILE *SafeOpenWrite( const char *filename ){
+ FILE *f;
+
+ f = fopen( filename, "wb" );
+
+ if ( !f ) {
+ Error( "Error opening %s: %s",filename,strerror( errno ) );
+ }
+
+ return f;
+}
+
+FILE *SafeOpenRead( const char *filename ){
+ FILE *f;
+
+ f = fopen( filename, "rb" );
+
+ if ( !f ) {
+ Error( "Error opening %s: %s",filename,strerror( errno ) );
+ }
+
+ return f;
+}
+
+
+void SafeRead( FILE *f, void *buffer, int count ){
+ if ( fread( buffer, 1, count, f ) != (size_t)count ) {
+ Error( "File read failure" );
+ }
+}
+
+
+void SafeWrite( FILE *f, const void *buffer, int count ){
+ if ( fwrite( buffer, 1, count, f ) != (size_t)count ) {
+ Error( "File write failure" );
+ }
+}
+
+
+/*
+ ==============
+ FileExists
+ ==============
+ */
+qboolean FileExists( const char *filename ){
+ FILE *f;
+
+ f = fopen( filename, "r" );
+ if ( !f ) {
+ return qfalse;
+ }
+ fclose( f );
+ return qtrue;
+}
+
+/*
+ ==============
+ LoadFile
+ ==============
+ */
+int LoadFile( const char *filename, void **bufferptr ){
+ FILE *f;
+ int length;
+ void *buffer;
+
+ f = SafeOpenRead( filename );
+ length = Q_filelength( f );
+ buffer = safe_malloc( length + 1 );
+ ( (char *)buffer )[length] = 0;
+ SafeRead( f, buffer, length );
+ fclose( f );
+
+ *bufferptr = buffer;
+ return length;
+}
+
+
+/*
+ ==============
+ LoadFileBlock
+ -
+ rounds up memory allocation to 4K boundry
+ -
+ ==============
+ */
+int LoadFileBlock( const char *filename, void **bufferptr ){
+ FILE *f;
+ int length, nBlock, nAllocSize;
+ void *buffer;
+
+ f = SafeOpenRead( filename );
+ length = Q_filelength( f );
+ nAllocSize = length;
+ nBlock = nAllocSize % MEM_BLOCKSIZE;
+ if ( nBlock > 0 ) {
+ nAllocSize += MEM_BLOCKSIZE - nBlock;
+ }
+ buffer = safe_malloc0( nAllocSize + 1 );
+ SafeRead( f, buffer, length );
+ fclose( f );
+
+ *bufferptr = buffer;
+ return length;
+}
+
+
+/*
+ ==============
+ TryLoadFile
+
+ Allows failure
+ ==============
+ */
+int TryLoadFile( const char *filename, void **bufferptr ){
+ FILE *f;
+ int length;
+ void *buffer;
+
+ *bufferptr = NULL;
+
+ f = fopen( filename, "rb" );
+ if ( !f ) {
+ return -1;
+ }
+ length = Q_filelength( f );
+ buffer = safe_malloc( length + 1 );
+ ( (char *)buffer )[length] = 0;
+ SafeRead( f, buffer, length );
+ fclose( f );
+
+ *bufferptr = buffer;
+ return length;
+}
+
+
+/*
+ ==============
+ SaveFile
+ ==============
+ */
+void SaveFile( const char *filename, const void *buffer, int count ){
+ FILE *f;
+
+ f = SafeOpenWrite( filename );
+ SafeWrite( f, buffer, count );
+ fclose( f );
+}
+
+
+
+void DefaultExtension( char *path, const char *extension ){
+ char *src;
+//
+// if path doesnt have a .EXT, append extension
+// (extension should include the .)
+//
+ src = path + strlen( path ) - 1;
+
+ while ( *src != '/' && *src != '\\' && src != path )
+ {
+ if ( *src == '.' ) {
+ return; // it has an extension
+ }
+ src--;
+ }
+
+ strcat( path, extension );
+}
+
+
+void DefaultPath( char *path, const char *basepath ){
+ char temp[128];
+
+ if ( path[ 0 ] == '/' || path[ 0 ] == '\\' ) {
+ return; // absolute path location
+ }
+ strcpy( temp,path );
+ strcpy( path,basepath );
+ strcat( path,temp );
+}
+
+
+void StripFilename( char *path ){
+ int length;
+
+ length = strlen( path ) - 1;
+ while ( length > 0 && path[length] != '/' && path[ length ] != '\\' )
+ length--;
+ path[length] = 0;
+}
+
+void StripExtension( char *path ){
+ int length;
+
+ length = strlen( path ) - 1;
+ while ( length > 0 && path[length] != '.' )
+ {
+ length--;
+ if ( path[length] == '/' || path[ length ] == '\\' ) {
+ return; // no extension
+ }
+ }
+ if ( length ) {
+ path[length] = 0;
+ }
+}
+
+
+/*
+ ====================
+ Extract file parts
+ ====================
+ */
+// FIXME: should include the slash, otherwise
+// backing to an empty path will be wrong when appending a slash
+void ExtractFilePath( const char *path, char *dest ){
+ const char *src;
+
+ src = path + strlen( path ) - 1;
+
+//
+// back up until a \ or the start
+//
+ while ( src != path && *( src - 1 ) != '\\' && *( src - 1 ) != '/' )
+ src--;
+
+ memcpy( dest, path, src - path );
+ dest[src - path] = 0;
+}
+
+void ExtractFileBase( const char *path, char *dest ){
+ const char *src;
+
+ src = path + strlen( path ) - 1;
+
+//
+// back up until a \ or the start
+//
+ while ( src != path && *( src - 1 ) != '/' && *( src - 1 ) != '\\' )
+ src--;
+
+ while ( *src && *src != '.' )
+ {
+ *dest++ = *src++;
+ }
+ *dest = 0;
+}
+
+void ExtractFileExtension( const char *path, char *dest ){
+ const char *src;
+
+ src = path + strlen( path ) - 1;
+
+//
+// back up until a . or the start
+//
+ while ( src != path && *( src - 1 ) != '.' )
+ src--;
+ if ( src == path ) {
+ *dest = 0; // no extension
+ return;
+ }
+
+ strcpy( dest,src );
+}
+
+
+/*
+ ==============
+ ParseNum / ParseHex
+ ==============
+ */
+int ParseHex( const char *hex ){
+ const char *str;
+ int num;
+
+ num = 0;
+ str = hex;
+
+ while ( *str )
+ {
+ num <<= 4;
+ if ( *str >= '0' && *str <= '9' ) {
+ num += *str - '0';
+ }
+ else if ( *str >= 'a' && *str <= 'f' ) {
+ num += 10 + *str - 'a';
+ }
+ else if ( *str >= 'A' && *str <= 'F' ) {
+ num += 10 + *str - 'A';
+ }
+ else{
+ Error( "Bad hex number: %s",hex );
+ }
+ str++;
+ }
+
+ return num;
+}
+
+
+int ParseNum( const char *str ){
+ if ( str[0] == '$' ) {
+ return ParseHex( str + 1 );
+ }
+ if ( str[0] == '0' && str[1] == 'x' ) {
+ return ParseHex( str + 2 );
+ }
+ return atol( str );
+}
+
+
+
+/*
+ ============================================================================
+
+ BYTE ORDER FUNCTIONS
+
+ ============================================================================
+ */
+
+#if GDEF_ARCH_ENDIAN_BIG
+
+short LittleShort( short l ){
+ byte b1,b2;
+
+ b1 = l & 255;
+ b2 = ( l >> 8 ) & 255;
+
+ return ( b1 << 8 ) + b2;
+}
+
+short BigShort( short l ){
+ return l;
+}
+
+
+int LittleLong( int l ){
+ byte b1,b2,b3,b4;
+
+ b1 = l & 255;
+ b2 = ( l >> 8 ) & 255;
+ b3 = ( l >> 16 ) & 255;
+ b4 = ( l >> 24 ) & 255;
+
+ return ( (int)b1 << 24 ) + ( (int)b2 << 16 ) + ( (int)b3 << 8 ) + b4;
+}
+
+int BigLong( int l ){
+ return l;
+}
+
+
+float LittleFloat( float l ){
+ union {byte b[4]; float f; } in, out;
+
+ in.f = l;
+ out.b[0] = in.b[3];
+ out.b[1] = in.b[2];
+ out.b[2] = in.b[1];
+ out.b[3] = in.b[0];
+
+ return out.f;
+}
+
+float BigFloat( float l ){
+ return l;
+}
+
+#else // !GDEF_ARCH_ENDIAN_BIG
+
+short BigShort( short l ){
+ byte b1,b2;
+
+ b1 = l & 255;
+ b2 = ( l >> 8 ) & 255;
+
+ return ( b1 << 8 ) + b2;
+}
+
+short LittleShort( short l ){
+ return l;
+}
+
+
+int BigLong( int l ){
+ byte b1,b2,b3,b4;
+
+ b1 = l & 255;
+ b2 = ( l >> 8 ) & 255;
+ b3 = ( l >> 16 ) & 255;
+ b4 = ( l >> 24 ) & 255;
+
+ return ( (int)b1 << 24 ) + ( (int)b2 << 16 ) + ( (int)b3 << 8 ) + b4;
+}
+
+int LittleLong( int l ){
+ return l;
+}
+
+float BigFloat( float l ){
+ union {byte b[4]; float f; } in, out;
+
+ in.f = l;
+ out.b[0] = in.b[3];
+ out.b[1] = in.b[2];
+ out.b[2] = in.b[1];
+ out.b[3] = in.b[0];
+
+ return out.f;
+}
+
+float LittleFloat( float l ){
+ return l;
+}
+
+#endif // !GDEF_ARCH_ENDIAN_BIG
+
+
+//=======================================================
+
+
+// FIXME: byte swap?
+
+// this is a 16 bit, non-reflected CRC using the polynomial 0x1021
+// and the initial and final xor values shown below... in other words, the
+// CCITT standard CRC used by XMODEM
+
+#define CRC_INIT_VALUE 0xffff
+#define CRC_XOR_VALUE 0x0000
+
+static unsigned short crctable[256] =
+{
+ 0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7,
+ 0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef,
+ 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6,
+ 0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de,
+ 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485,
+ 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d,
+ 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4,
+ 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc,
+ 0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823,
+ 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b,
+ 0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12,
+ 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a,
+ 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41,
+ 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49,
+ 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70,
+ 0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78,
+ 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f,
+ 0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067,
+ 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e,
+ 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256,
+ 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d,
+ 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405,
+ 0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c,
+ 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634,
+ 0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab,
+ 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3,
+ 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a,
+ 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92,
+ 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9,
+ 0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1,
+ 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8,
+ 0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0
+};
+
+void CRC_Init( unsigned short *crcvalue ){
+ *crcvalue = CRC_INIT_VALUE;
+}
+
+void CRC_ProcessByte( unsigned short *crcvalue, byte data ){
+ *crcvalue = ( *crcvalue << 8 ) ^ crctable[( *crcvalue >> 8 ) ^ data];
+}
+
+unsigned short CRC_Value( unsigned short crcvalue ){
+ return crcvalue ^ CRC_XOR_VALUE;
+}
+//=============================================================================
+
+/*
+ ============
+ CreatePath
+ ============
+ */
+void CreatePath( const char *path ){
+ const char *ofs;
+ char c;
+ char dir[1024];
+
+#if GDEF_OS_WINDOWS
+ int olddrive = -1;
+
+ if ( path[1] == ':' ) {
+ olddrive = _getdrive();
+ _chdrive( toupper( path[0] ) - 'A' + 1 );
+ }
+#endif // !GDEF_OS_WINDOWS
+
+ if ( path[1] == ':' ) {
+ path += 2;
+ }
+
+ for ( ofs = path + 1 ; *ofs ; ofs++ )
+ {
+ c = *ofs;
+ if ( c == '/' || c == '\\' ) { // create the directory
+ memcpy( dir, path, ofs - path );
+ dir[ ofs - path ] = 0;
+ Q_mkdir( dir );
+ }
+ }
+
+#if GDEF_OS_WINDOWS
+ if ( olddrive != -1 ) {
+ _chdrive( olddrive );
+ }
+#endif // !>GDEF_OS_WINDOWS
+}
+
+
+/*
+ ============
+ QCopyFile
+
+ Used to archive source files
+ ============
+ */
+void QCopyFile( const char *from, const char *to ){
+ void *buffer;
+ int length;
+
+ length = LoadFile( from, &buffer );
+ CreatePath( to );
+ SaveFile( to, buffer, length );
+ free( buffer );
+}
+
+void Sys_Sleep( int n ){
+#if GDEF_OS_WINDOWS
+ Sleep( n );
+#else // !GDEF_OS_WINDOWS
+ usleep( n * 1000 );
+#endif // !GDEF_OS_WINDOWS
+}