home *** CD-ROM | disk | FTP | other *** search
- //
- // start of shared cmdlib stuff
- //
-
-
- #include "cmdlib.h"
- #include "windows.h"
-
- #define PATHSEPERATOR '/'
-
- // rad additions
- // 11.29.99
- PFN_ERR *g_pfnError = NULL;
- PFN_PRINTF *g_pfnPrintf = NULL;
- PFN_ERR_NUM *g_pfnErrorNum = NULL;
- PFN_PRINTF_NUM *g_pfnPrintfNum = NULL;
-
-
- void Error(const char *pFormat, ...)
- {
- if (g_pfnError)
- {
- va_list arg_ptr;
- va_start(arg_ptr, pFormat);
- g_pfnError(pFormat, arg_ptr);
- va_end(arg_ptr);
- }
- }
-
- void Printf(const char *pFormat, ...)
- {
- if (g_pfnPrintf)
- {
- va_list arg_ptr;
- va_start(arg_ptr, pFormat);
- g_pfnPrintf(pFormat, arg_ptr);
- va_end(arg_ptr);
- }
- }
-
- void ErrorNum(int nErr, const char *pFormat, ...)
- {
- if (g_pfnErrorNum)
- {
- va_list arg_ptr;
- va_start(arg_ptr, pFormat);
- g_pfnErrorNum(nErr, pFormat, arg_ptr);
- va_end(arg_ptr);
- }
- }
-
- void PrintfNum(int nErr, const char *pFormat, ...)
- {
- if (g_pfnPrintfNum)
- {
- va_list arg_ptr;
- va_start(arg_ptr, pFormat);
- g_pfnPrintfNum(nErr, pFormat, arg_ptr);
- va_end(arg_ptr);
- }
- }
-
-
-
- void SetErrorHandler(PFN_ERR pe)
- {
- g_pfnError = pe;
- }
-
- void SetPrintfHandler(PFN_PRINTF pe)
- {
- g_pfnPrintf = pe;
- }
-
- void SetErrorHandlerNum(PFN_ERR_NUM pe)
- {
- g_pfnErrorNum = pe;
- }
-
- void SetPrintfHandler(PFN_PRINTF_NUM pe)
- {
- g_pfnPrintfNum = pe;
- }
-
-
-
- // rad end
-
- #define MEM_BLOCKSIZE 4096
- void* qblockmalloc(size_t nSize)
- {
- void *b;
- // round up to threshold
- int nAllocSize = nSize % MEM_BLOCKSIZE;
- if ( nAllocSize > 0)
- {
- nSize += MEM_BLOCKSIZE - nAllocSize;
- }
- b = malloc(nSize + 1);
- memset (b, 0, nSize);
- return b;
- }
-
- void* qmalloc (size_t nSize)
- {
- void *b;
- b = malloc(nSize + 1);
- memset (b, 0, nSize);
- return b;
- }
-
- /*
- ================
- 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;
- }
-
-
- // FIXME: need error handler
- 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 ( (int)fread (buffer, 1, count, f) != count)
- Error ("File read failure");
- }
-
-
- void SafeWrite (FILE *f, void *buffer, int count)
- {
- if ( (int)fwrite (buffer, 1, count, f) != count)
- Error ("File read failure");
- }
-
-
-
- /*
- ==============
- LoadFile
- ==============
- */
- int LoadFile (const char *filename, void **bufferptr)
- {
- FILE *f;
- int length;
- void *buffer;
-
- *bufferptr = NULL;
-
- if (filename == NULL || strlen(filename) == 0)
- {
- return -1;
- }
-
- f = fopen (filename, "rb");
- if (!f)
- {
- return -1;
- }
- length = Q_filelength (f);
- buffer = qblockmalloc (length+1);
- ((char *)buffer)[length] = 0;
- SafeRead (f, buffer, length);
- fclose (f);
-
- *bufferptr = buffer;
- return length;
- }
-
-
- /*
- ==============
- LoadFileNoCrash
-
- returns -1 length if not present
- ==============
- */
- int LoadFileNoCrash (const char *filename, void **bufferptr)
- {
- FILE *f;
- int length;
- void *buffer;
-
- f = fopen (filename, "rb");
- if (!f)
- return -1;
- length = Q_filelength (f);
- buffer = qmalloc (length+1);
- ((char *)buffer)[length] = 0;
- SafeRead (f, buffer, length);
- fclose (f);
-
- *bufferptr = buffer;
- return length;
- }
-
-
- /*
- ==============
- SaveFile
- ==============
- */
- void SaveFile (const char *filename, void *buffer, int count)
- {
- FILE *f;
-
- f = SafeOpenWrite (filename);
- SafeWrite (f, buffer, count);
- fclose (f);
- }
-
-
-
- void DefaultExtension (char *path, char *extension)
- {
- char *src;
- //
- // if path doesn't have a .EXT, append extension
- // (extension should include the .)
- //
- src = path + strlen(path) - 1;
-
- while (*src != PATHSEPERATOR && src != path)
- {
- if (*src == '.')
- return; // it has an extension
- src--;
- }
-
- strcat (path, extension);
- }
-
-
- void DefaultPath (char *path, char *basepath)
- {
- char temp[128];
-
- if (path[0] == PATHSEPERATOR)
- 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] != PATHSEPERATOR)
- length--;
- path[length] = 0;
- }
-
- void StripExtension (char *path)
- {
- int length;
-
- length = strlen(path)-1;
- while (length > 0 && path[length] != '.')
- {
- length--;
- if (path[length] == '/')
- return; // no extension
- }
- if (length)
- path[length] = 0;
- }
-
-
- /*
- ====================
- Extract file parts
- ====================
- */
- 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) != PATHSEPERATOR)
- src--;
-
- memcpy (dest, path, src-path);
- dest[src-path] = 0;
- }
-
- void ExtractFileName (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)
- {
- *dest++ = *src++;
- }
- *dest = 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);
- }
-
-
- void ConvertDOSToUnixName( char *dst, const char *src )
- {
- while ( *src )
- {
- if ( *src == '\\' )
- *dst = '/';
- else
- *dst = *src;
- dst++; src++;
- }
- *dst = 0;
- }
-
-
- char* StrDup(char* pStr)
- {
- if (pStr)
- {
- return strcpy(new char[strlen(pStr)+1], pStr);
- }
- return NULL;
- }
-
- char* StrDup(const char* pStr)
- {
- if (pStr)
- {
- return strcpy(new char[strlen(pStr)+1], pStr);
- }
- return NULL;
- }
-
-
- /*
- ============================================================================
-
- BYTE ORDER FUNCTIONS
-
- ============================================================================
- */
-
- #ifdef _SGI_SOURCE
- #define __BIG_ENDIAN__
- #endif
-
- #ifdef __BIG_ENDIAN__
-
- 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
-
-
- 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
-
-