103 lines
2.7 KiB
C
Executable File
103 lines
2.7 KiB
C
Executable File
/*
|
|
* Unix compatibility code. Takes care of some legacy code issues.
|
|
*
|
|
* Written by Ryan C. Gordon (icculus@clutteredmind.org)
|
|
*
|
|
* Please do NOT harrass Ken Silverman about any code modifications
|
|
* (including this file) to BUILD.
|
|
*/
|
|
|
|
/*
|
|
* "Build Engine & Tools" Copyright (c) 1993-1997 Ken Silverman
|
|
* Ken Silverman's official web site: "http://www.advsys.net/ken"
|
|
* See the included license file "BUILDLIC.TXT" for license info.
|
|
* This file IS NOT A PART OF Ken Silverman's original release
|
|
*/
|
|
|
|
#ifndef PLATFORM_UNIX
|
|
#error Please define PLATFORM_UNIX to use this code.
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <sys/stat.h>
|
|
#include <unistd.h>
|
|
#include <ctype.h>
|
|
#include "unix_compat.h"
|
|
|
|
/*
|
|
256 byte table to assist in performing an
|
|
algebraic shift right. These values represent
|
|
all possible contributions of the sign bit
|
|
when shifted by different values.
|
|
*/
|
|
const int hbits[64] =
|
|
{
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x00000000,0x00000000,0x00000000,0x00000000,
|
|
0x80000000,0xC0000000,0xE0000000,0xF0000000,
|
|
0xF8000000,0xFC000000,0xFE000000,0xFF000000,
|
|
0xFF800000,0xFFC00000,0xFFE00000,0xFFF00000,
|
|
0xFFF80000,0xFFFC0000,0xFFFE0000,0xFFFF0000,
|
|
0xFFFF8000,0xFFFFC000,0xFFFFE000,0xFFFFF000,
|
|
0xFFFFF800,0xFFFFFC00,0xFFFFFE00,0xFFFFFF00,
|
|
0xFFFFFF80,0xFFFFFFC0,0xFFFFFFE0,0xFFFFFFF0,
|
|
0xFFFFFFF8,0xFFFFFFFC,0xFFFFFFFE,0xFFFFFFFF
|
|
};
|
|
|
|
|
|
#ifndef DC
|
|
int stricmp(const char *x, const char *y)
|
|
{
|
|
int ux, uy;
|
|
|
|
do
|
|
{
|
|
ux = toupper((int) *x);
|
|
uy = toupper((int) *y);
|
|
if (ux > uy)
|
|
return(1);
|
|
else if (ux < uy)
|
|
return(-1);
|
|
x++;
|
|
y++;
|
|
} while ((ux) && (uy));
|
|
|
|
return(0);
|
|
} /* stricmp */
|
|
#endif /* DC */
|
|
|
|
long filelength(int fhandle)
|
|
{
|
|
long retval = -1;
|
|
struct stat stat_buf;
|
|
if (fstat(fhandle, &stat_buf) == 0)
|
|
retval = (long) stat_buf.st_size;
|
|
return(retval);
|
|
} /* filelength */
|
|
|
|
|
|
/* !!! remove me later! */
|
|
int _inp_handler(int port, char *source_file, int source_line)
|
|
{
|
|
fprintf(stderr, "inp(0x%X) call in %s, line %d.\n", port, source_file, source_line);
|
|
return(0);
|
|
} /* _inp_handler */
|
|
|
|
|
|
/* !!! remove me later! */
|
|
int _kinp_handler(int port, char *source_file, int source_line)
|
|
{
|
|
fprintf(stderr, "kinp(0x%X) call in %s, line %d.\n", port, source_file, source_line);
|
|
return(0);
|
|
} /* _kinp_handler */
|
|
|
|
/* end of unix_compat.c ... */
|
|
|