189 lines
4.4 KiB
C
189 lines
4.4 KiB
C
|
/* Portability cruft. Include after config.h and sys/types.h.
|
||
|
Copyright (C) 1996, 1998 Free Software Foundation, Inc.
|
||
|
|
||
|
This program 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, or (at your option)
|
||
|
any later version.
|
||
|
|
||
|
This program 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 this program; if not, write to the Free Software
|
||
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
||
|
02111-1307, USA. */
|
||
|
|
||
|
#undef PARAMS
|
||
|
#if defined (__STDC__) && __STDC__
|
||
|
# ifndef _PTR_T
|
||
|
# define _PTR_T
|
||
|
typedef void * ptr_t;
|
||
|
# endif
|
||
|
# define PARAMS(x) x
|
||
|
#else
|
||
|
# ifndef _PTR_T
|
||
|
# define _PTR_T
|
||
|
typedef char * ptr_t;
|
||
|
# endif
|
||
|
# define PARAMS(x) ()
|
||
|
#endif
|
||
|
|
||
|
#ifdef HAVE_UNISTD_H
|
||
|
# include <fcntl.h>
|
||
|
# include <unistd.h>
|
||
|
#else
|
||
|
# define O_RDONLY 0
|
||
|
int open(), read(), close();
|
||
|
#endif
|
||
|
|
||
|
#include <errno.h>
|
||
|
#ifndef errno
|
||
|
extern int errno;
|
||
|
#endif
|
||
|
|
||
|
#ifndef HAVE_STRERROR
|
||
|
extern int sys_nerr;
|
||
|
extern char *sys_errlist[];
|
||
|
# define strerror(E) (0 <= (E) && (E) < sys_nerr ? _(sys_errlist[E]) : _("Unknown system error"))
|
||
|
#endif
|
||
|
|
||
|
/* Some operating systems treat text and binary files differently. */
|
||
|
#if O_BINARY
|
||
|
# include <io.h>
|
||
|
# ifdef HAVE_SETMODE
|
||
|
# define SET_BINARY(fd) setmode (fd, O_BINARY)
|
||
|
# else
|
||
|
# define SET_BINARY(fd) _setmode (fd, O_BINARY)
|
||
|
# endif
|
||
|
#else
|
||
|
# ifndef O_BINARY
|
||
|
# define O_BINARY 0
|
||
|
# define SET_BINARY(fd) (void)0
|
||
|
# endif
|
||
|
#endif
|
||
|
|
||
|
#ifdef HAVE_DOS_FILE_NAMES
|
||
|
# define IS_SLASH(c) ((c) == '/' || (c) == '\\')
|
||
|
# define FILESYSTEM_PREFIX_LEN(f) ((f)[0] && (f)[1] == ':' ? 2 : 0)
|
||
|
#endif
|
||
|
|
||
|
#ifndef IS_SLASH
|
||
|
# define IS_SLASH(c) ((c) == '/')
|
||
|
#endif
|
||
|
|
||
|
#ifndef FILESYSTEM_PREFIX_LEN
|
||
|
# define FILESYSTEM_PREFIX_LEN(f) 0
|
||
|
#endif
|
||
|
|
||
|
/* This assumes _WIN32, like DJGPP, has D_OK. Does it? In what header? */
|
||
|
#ifdef D_OK
|
||
|
# ifdef EISDIR
|
||
|
# define is_EISDIR(e, f) \
|
||
|
((e) == EISDIR \
|
||
|
|| ((e) == EACCES && access (f, D_OK) == 0 && ((e) = EISDIR, 1)))
|
||
|
# else
|
||
|
# define is_EISDIR(e, f) ((e) == EACCES && access (f, D_OK) == 0)
|
||
|
# endif
|
||
|
#endif
|
||
|
|
||
|
#ifndef is_EISDIR
|
||
|
# ifdef EISDIR
|
||
|
# define is_EISDIR(e, f) ((e) == EISDIR)
|
||
|
# else
|
||
|
# define is_EISDIR(e, f) 0
|
||
|
# endif
|
||
|
#endif
|
||
|
|
||
|
#if STAT_MACROS_BROKEN
|
||
|
# undef S_ISDIR
|
||
|
#endif
|
||
|
#if !defined(S_ISDIR) && defined(S_IFDIR)
|
||
|
# define S_ISDIR(Mode) (((Mode) & S_IFMT) == S_IFDIR)
|
||
|
#endif
|
||
|
|
||
|
#ifdef STDC_HEADERS
|
||
|
# include <stdlib.h>
|
||
|
#else
|
||
|
ptr_t malloc(), realloc(), calloc();
|
||
|
void free();
|
||
|
#endif
|
||
|
|
||
|
#if __STDC__
|
||
|
# include <stddef.h>
|
||
|
#endif
|
||
|
#ifdef STDC_HEADERS
|
||
|
# include <limits.h>
|
||
|
#endif
|
||
|
#ifndef CHAR_BIT
|
||
|
# define CHAR_BIT 8
|
||
|
#endif
|
||
|
#ifndef INT_MAX
|
||
|
# define INT_MAX 2147483647
|
||
|
#endif
|
||
|
#ifndef UCHAR_MAX
|
||
|
# define UCHAR_MAX 255
|
||
|
#endif
|
||
|
|
||
|
#if !defined(STDC_HEADERS) && defined(HAVE_STRING_H) && defined(HAVE_MEMORY_H)
|
||
|
# include <memory.h>
|
||
|
#endif
|
||
|
#if defined(STDC_HEADERS) || defined(HAVE_STRING_H)
|
||
|
# include <string.h>
|
||
|
#else
|
||
|
# include <strings.h>
|
||
|
# undef strchr
|
||
|
# define strchr index
|
||
|
# undef strrchr
|
||
|
# define strrchr rindex
|
||
|
# undef memcpy
|
||
|
# define memcpy(d, s, n) bcopy((s), (d), (n))
|
||
|
#endif
|
||
|
#ifndef HAVE_MEMCHR
|
||
|
ptr_t memchr();
|
||
|
#endif
|
||
|
|
||
|
#include <ctype.h>
|
||
|
|
||
|
#ifndef isgraph
|
||
|
# define isgraph(C) (isprint(C) && !isspace(C))
|
||
|
#endif
|
||
|
|
||
|
#if defined (STDC_HEADERS) || (!defined (isascii) && !defined (HAVE_ISASCII))
|
||
|
# define IN_CTYPE_DOMAIN(c) 1
|
||
|
#else
|
||
|
# define IN_CTYPE_DOMAIN(c) isascii(c)
|
||
|
#endif
|
||
|
|
||
|
#define ISALPHA(C) (IN_CTYPE_DOMAIN (C) && isalpha (C))
|
||
|
#define ISUPPER(C) (IN_CTYPE_DOMAIN (C) && isupper (C))
|
||
|
#define ISLOWER(C) (IN_CTYPE_DOMAIN (C) && islower (C))
|
||
|
#define ISDIGIT(C) (IN_CTYPE_DOMAIN (C) && isdigit (C))
|
||
|
#define ISXDIGIT(C) (IN_CTYPE_DOMAIN (C) && isxdigit (C))
|
||
|
#define ISSPACE(C) (IN_CTYPE_DOMAIN (C) && isspace (C))
|
||
|
#define ISPUNCT(C) (IN_CTYPE_DOMAIN (C) && ispunct (C))
|
||
|
#define ISALNUM(C) (IN_CTYPE_DOMAIN (C) && isalnum (C))
|
||
|
#define ISPRINT(C) (IN_CTYPE_DOMAIN (C) && isprint (C))
|
||
|
#define ISGRAPH(C) (IN_CTYPE_DOMAIN (C) && isgraph (C))
|
||
|
#define ISCNTRL(C) (IN_CTYPE_DOMAIN (C) && iscntrl (C))
|
||
|
|
||
|
#define TOLOWER(C) (ISUPPER(C) ? tolower(C) : (C))
|
||
|
|
||
|
#if ENABLE_NLS
|
||
|
# include <libintl.h>
|
||
|
# define _(String) gettext (String)
|
||
|
#else
|
||
|
# define _(String) String
|
||
|
#endif
|
||
|
#define N_(String) String
|
||
|
|
||
|
#if HAVE_SETLOCALE
|
||
|
# include <locale.h>
|
||
|
#endif
|
||
|
|
||
|
#ifndef initialize_main
|
||
|
#define initialize_main(argcp, argvp)
|
||
|
#endif
|