jory/upx
1
0
Fork 0
Code Issues Pull Requests 1 Actions Packages Projects Releases Wiki Activity

New ACC version.

Browse Source 
committer: mfx <mfx> 1051152474 +0000
This commit is contained in:
Markus F.X.J. Oberhumer
2003-04-24 02:47:54 +00:00
parent 5c7bca5b3e
commit c448d15a8f
12 changed files with 352 additions and 83 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/acc/acc_lib.ch
+135 -27
View File
@@ -15,14 +15,109 @@
#if !defined(ACC_VERSION)
#include "acc.h"
# if defined ACC_CONFIG_INCLUDE
# include ACC_CONFIG_INCLUDE("acc.h")
# else
# include "acc.h"
# endif
#endif
#ifndef __ACC_INCE_H_INCLUDED
#include ACC_CONFIG_INCLUDE("acc_ince.h")
# include ACC_CONFIG_INCLUDE("acc_ince.h")
#endif
#ifndef __ACC_INCI_H_INCLUDED
#include ACC_CONFIG_INCLUDE("acc_inci.h")
# include ACC_CONFIG_INCLUDE("acc_inci.h")
#endif
#ifndef __ACC_LIB_H_INCLUDED
# include ACC_CONFIG_INCLUDE("acc_lib.h")
#endif
/***********************************************************************
// huge pointer layer
************************************************************************/
ACC_LIBFUNC(acc_hvoid_p, acc_halloc) (acc_alloc_p ap, acc_hsize_t items, size_t size)
{
acc_hvoid_p p = 0;
#if (SIZEOF_SIZE_T > SIZEOF_LONG)
size_t s = (size_t) items * size;
#else
unsigned long s = (unsigned long) items * size;
#endif
if (!ap)
return p;
ap->ptr = p;
#if 0
ap->items = items;
ap->size = size;
ap->flags = 0;
#endif
if (items <= 0 || size <= 0 || s < items || s < size)
return p;
#if defined(__palmos__)
p = MemPtrNew(s);
#elif !defined(ACC_HAVE_MM_HUGE_PTR)
if (s < (size_t) -1)
p = malloc((size_t) s);
#else
#if (ACC_CC_MSC && _MSC_VER >= 700)
if (size < (size_t) -1)
p = _halloc(items, (size_t) size);
#elif (ACC_CC_MSC || ACC_CC_WATCOMC)
if (size < (size_t) -1)
p = halloc(items, (size_t) size);
#elif (ACC_CC_DMC || ACC_CC_SYMANTECC || ACC_CC_ZORTECHC)
if (size < (size_t) -1)
p = _halloc(items, (size_t) size);
#elif (ACC_CC_BORLANDC || ACC_CC_TURBOC)
p = farmalloc(s);
#elif defined(ACC_CC_AZTECC)
p = lmalloc(s);
#else
if (s < (size_t) -1)
p = malloc((size_t) s);
#endif
#endif
ap->ptr = p;
return p;
}
ACC_LIBFUNC(int, acc_hfree) (acc_alloc_p ap)
{
acc_hvoid_p p;
int r = 0;
if (!ap || !ap->ptr)
return r;
p = ap->ptr;
ap->ptr = 0;
#if defined(__palmos__)
r = MemPtrFree(p);
#elif !defined(ACC_HAVE_MM_HUGE_PTR)
free(p);
#else
#if (ACC_CC_MSC && _MSC_VER >= 700)
_hfree(p);
#elif (ACC_CC_MSC || ACC_CC_WATCOMC)
hfree(p);
#elif (ACC_CC_DMC || ACC_CC_SYMANTECC || ACC_CC_ZORTECHC)
_hfree(p);
#elif (ACC_CC_BORLANDC || ACC_CC_TURBOC)
farfree((void __far *) p);
#elif defined(ACC_CC_AZTECC)
lfree(p);
#else
free(p);
#endif
#endif
return r;
}
/*************************************************************************
@@ -31,20 +126,27 @@
#if (HAVE_DIRENT_H)
int acc_opendir(ACC_DIR* dirp, const char* name)
ACC_LIBFUNC(int, acc_opendir) (ACC_DIR* dirp, const char* name)
{
dirp->dirp = (ACC_DIR*) opendir(name);
dirp->dirp = opendir(name);
return dirp->dirp ? 0 : -1;
}
int acc_closedir(ACC_DIR* dirp)
ACC_LIBFUNC(int, acc_closedir) (ACC_DIR* dirp)
{
return closedir((DIR*) dirp->dirp);
int r = -1;
if (!dirp->dirp)
return r;
r = closedir((DIR*) dirp->dirp);
dirp->dirp = 0;
return r;
}
int acc_readdir(ACC_DIR* dirp, struct acc_dirent* d)
ACC_LIBFUNC(int, acc_readdir) (ACC_DIR* dirp, struct acc_dirent* d)
{
const struct dirent *dp;
const struct dirent* dp;
if (!dirp->dirp)
return -1;
dp = readdir((DIR*) dirp->dirp);
if (!dp || !dp->d_name[0])
return -1;
@@ -56,21 +158,26 @@ int acc_readdir(ACC_DIR* dirp, struct acc_dirent* d)
#else
int acc_opendir(ACC_DIR* dirp, const char* name)
ACC_LIBFUNC(int, acc_opendir) (ACC_DIR* dirp, const char* name)
{
ACC_UNUSED(dirp); ACC_UNUSED(name);
dirp->dirp = 0;
ACC_UNUSED(name);
return -1;
}
int acc_closedir(ACC_DIR* dirp)
ACC_LIBFUNC(int, acc_closedir) (ACC_DIR* dirp)
{
ACC_UNUSED(dirp);
if (!dirp->dirp)
return -1;
dirp->dirp = 0;
return -1;
}
int acc_readdir(ACC_DIR* dirp, struct acc_dirent* d)
ACC_LIBFUNC(int, acc_readdir) (ACC_DIR* dirp, struct acc_dirent* d)
{
ACC_UNUSED(dirp); ACC_UNUSED(d);
if (!dirp->dirp)
return -1;
d->d_name[0] = 0;
return -1;
}
@@ -91,7 +198,7 @@ int acc_readdir(ACC_DIR* dirp, struct acc_dirent* d)
// wrap misc
**************************************************************************/
long acc_get_osfhandle(int fd)
ACC_LIBFUNC(long, acc_get_osfhandle) (int fd)
{
if (fd < 0)
return -1;
@@ -108,7 +215,7 @@ long acc_get_osfhandle(int fd)
}
int acc_set_binmode(int fd, int binary)
ACC_LIBFUNC(int, acc_set_binmode) (int fd, int binary)
{
#if (ACC_OS_TOS && defined(__MINT__))
int old_binary;
@@ -123,7 +230,7 @@ int acc_set_binmode(int fd, int binary)
#elif (ACC_OS_TOS)
ACC_UNUSED(fd); ACC_UNUSED(binary);
return -1;
#elif (ACC_OS_DOS16 && (ACC_CC_AZTEC_C || ACC_CC_PACIFIC))
#elif (ACC_OS_DOS16 && (ACC_CC_AZTECC || ACC_CC_PACIFICC))
ACC_UNUSED(fd); ACC_UNUSED(binary);
return -1;
#elif defined(__DJGPP__)
@@ -138,17 +245,19 @@ int acc_set_binmode(int fd, int binary)
__djgpp_set_ctrl_c(!(old_flags & 1));
if (r == -1)
return -1;
return r & O_BINARY ? 1 : 0;
return (r & O_TEXT) ? 0 : 1;
#elif (ACC_OS_DOS16 || ACC_OS_DOS32 || ACC_OS_OS2 || ACC_OS_OS216 || ACC_OS_WIN16 || ACC_OS_WIN32 || ACC_OS_WIN64 || ACC_OS_CYGWIN || ACC_OS_EMX)
int r;
#if !defined(ACC_CC_ZORTECHC)
ACC_COMPILE_TIME_ASSERT(O_BINARY > 0)
#endif
ACC_COMPILE_TIME_ASSERT(O_TEXT > 0)
if (fd < 0)
return -1;
r = setmode(fd, binary ? O_BINARY : O_TEXT);
if (r == -1)
return -1;
return r & O_BINARY ? 1 : 0;
return (r & O_TEXT) ? 0 : 1;
#else
if (fd < 0)
return -1;
@@ -158,7 +267,7 @@ int acc_set_binmode(int fd, int binary)
}
int acc_isatty(int fd)
ACC_LIBFUNC(int, acc_isatty) (int fd)
{
if (fd < 0)
return 0;
@@ -177,29 +286,28 @@ int acc_isatty(int fd)
}
}
#endif
return isatty(fd);
return (isatty(fd)) ? 1 : 0;
}
int acc_mkdir(const char* name, unsigned mode)
ACC_LIBFUNC(int, acc_mkdir) (const char* name, unsigned mode)
{
ACC_UNUSED(mode);
#if (ACC_OS_POSIX || ACC_OS_CYGWIN || ACC_OS_EMX)
return mkdir(name, mode);
#elif defined(__DJGPP__) || defined(__MINT__)
return mkdir(name, mode);
#elif (ACC_OS_TOS && (ACC_CC_PUREC || ACC_CC_TURBOC))
ACC_UNUSED(mode);
return Dcreate(name);
#elif (ACC_OS_DOS16 && ACC_CC_PACIFIC)
return mkdir((char*)name);
#else
ACC_UNUSED(mode);
return mkdir(name);
#endif
}
#if 0
int acc_response(int* argc, char*** argv)
ACC_LIBFUNC(int, acc_response) (int* argc, char*** argv)
{
}
#endif