mirror of
git://git.sv.gnu.org/coreutils
synced 2026-05-11 01:19:38 -04:00
340 lines
8.3 KiB
C
340 lines
8.3 KiB
C
/* system-dependent definitions for fileutils programs.
|
|
Copyright (C) 89, 91, 92, 93, 94, 1996 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. */
|
|
|
|
/* Include sys/types.h before this file. */
|
|
|
|
#include <sys/stat.h>
|
|
|
|
#ifdef STAT_MACROS_BROKEN
|
|
#undef S_ISBLK
|
|
#undef S_ISCHR
|
|
#undef S_ISDIR
|
|
#undef S_ISFIFO
|
|
#undef S_ISLNK
|
|
#undef S_ISMPB
|
|
#undef S_ISMPC
|
|
#undef S_ISNWK
|
|
#undef S_ISREG
|
|
#undef S_ISSOCK
|
|
#endif /* STAT_MACROS_BROKEN. */
|
|
|
|
#ifndef S_IFMT
|
|
#define S_IFMT 0170000
|
|
#endif
|
|
#if !defined(S_ISBLK) && defined(S_IFBLK)
|
|
#define S_ISBLK(m) (((m) & S_IFMT) == S_IFBLK)
|
|
#endif
|
|
#if !defined(S_ISCHR) && defined(S_IFCHR)
|
|
#define S_ISCHR(m) (((m) & S_IFMT) == S_IFCHR)
|
|
#endif
|
|
#if !defined(S_ISDIR) && defined(S_IFDIR)
|
|
#define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
|
|
#endif
|
|
#if !defined(S_ISREG) && defined(S_IFREG)
|
|
#define S_ISREG(m) (((m) & S_IFMT) == S_IFREG)
|
|
#endif
|
|
#if !defined(S_ISFIFO) && defined(S_IFIFO)
|
|
#define S_ISFIFO(m) (((m) & S_IFMT) == S_IFIFO)
|
|
#endif
|
|
#if !defined(S_ISLNK) && defined(S_IFLNK)
|
|
#define S_ISLNK(m) (((m) & S_IFMT) == S_IFLNK)
|
|
#endif
|
|
#if !defined(S_ISSOCK) && defined(S_IFSOCK)
|
|
#define S_ISSOCK(m) (((m) & S_IFMT) == S_IFSOCK)
|
|
#endif
|
|
#if !defined(S_ISMPB) && defined(S_IFMPB) /* V7 */
|
|
#define S_ISMPB(m) (((m) & S_IFMT) == S_IFMPB)
|
|
#define S_ISMPC(m) (((m) & S_IFMT) == S_IFMPC)
|
|
#endif
|
|
#if !defined(S_ISNWK) && defined(S_IFNWK) /* HP/UX */
|
|
#define S_ISNWK(m) (((m) & S_IFMT) == S_IFNWK)
|
|
#endif
|
|
|
|
#ifndef S_IEXEC
|
|
#define S_IEXEC S_IXUSR
|
|
#endif
|
|
|
|
#ifdef S_IEXEC
|
|
#ifndef S_IXUSR
|
|
#define S_IXUSR S_IEXEC
|
|
#endif
|
|
#ifndef S_IXGRP
|
|
#define S_IXGRP (S_IEXEC >> 3)
|
|
#endif
|
|
#ifndef S_IXOTH
|
|
#define S_IXOTH (S_IEXEC >> 6)
|
|
#endif
|
|
#endif /* S_IEXEC */
|
|
|
|
#if !defined(HAVE_MKFIFO)
|
|
#define mkfifo(path, mode) (mknod ((path), (mode) | S_IFIFO, 0))
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_PARAM_H
|
|
#include <sys/param.h>
|
|
#endif
|
|
|
|
/* <unistd.h> should be included before any preprocessor test
|
|
of _POSIX_VERSION. */
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#ifndef STDIN_FILENO
|
|
#define STDIN_FILENO 0
|
|
#endif
|
|
|
|
#ifndef STDOUT_FILENO
|
|
#define STDOUT_FILENO 1
|
|
#endif
|
|
|
|
#ifndef STDERR_FILENO
|
|
#define STDERR_FILENO 2
|
|
#endif
|
|
|
|
#include "pathmax.h"
|
|
|
|
/* FIXME: Don't use _POSIX_VERSION. */
|
|
#ifndef _POSIX_VERSION
|
|
off_t lseek ();
|
|
#endif
|
|
|
|
#ifdef TM_IN_SYS_TIME
|
|
#include <sys/time.h>
|
|
#else
|
|
#include <time.h>
|
|
#endif
|
|
|
|
/* Since major is a function on SVR4, we can't use `ifndef major'. */
|
|
#ifdef MAJOR_IN_MKDEV
|
|
#include <sys/mkdev.h>
|
|
#define HAVE_MAJOR
|
|
#endif
|
|
#ifdef MAJOR_IN_SYSMACROS
|
|
#include <sys/sysmacros.h>
|
|
#define HAVE_MAJOR
|
|
#endif
|
|
#ifdef major /* Might be defined in sys/types.h. */
|
|
#define HAVE_MAJOR
|
|
#endif
|
|
|
|
#ifndef HAVE_MAJOR
|
|
#define major(dev) (((dev) >> 8) & 0xff)
|
|
#define minor(dev) ((dev) & 0xff)
|
|
#define makedev(maj, min) (((maj) << 8) | (min))
|
|
#endif
|
|
#undef HAVE_MAJOR
|
|
|
|
#ifdef HAVE_UTIME_H
|
|
#include <utime.h>
|
|
#endif
|
|
|
|
/* Some systems (even some that do have <utime.h>) don't declare this
|
|
structure anywhere. */
|
|
#ifndef HAVE_STRUCT_UTIMBUF
|
|
struct utimbuf
|
|
{
|
|
long actime;
|
|
long modtime;
|
|
};
|
|
#endif
|
|
|
|
/* Don't use bcopy! Use memmove if source and destination may overlap,
|
|
memcpy otherwise. */
|
|
|
|
#ifdef HAVE_STRING_H
|
|
# if !STDC_HEADERS && HAVE_MEMORY_H
|
|
# include <memory.h>
|
|
# endif
|
|
# include <string.h>
|
|
#else
|
|
# include <strings.h>
|
|
char *memchr ();
|
|
#endif
|
|
|
|
#include <errno.h>
|
|
#ifndef errno
|
|
extern int errno;
|
|
#endif
|
|
|
|
#ifdef STDC_HEADERS
|
|
#define getopt system_getopt
|
|
#include <stdlib.h>
|
|
#undef getopt
|
|
#else /* not STDC_HEADERS */
|
|
char *getenv ();
|
|
#endif /* STDC_HEADERS */
|
|
|
|
#ifdef HAVE_FCNTL_H
|
|
#include <fcntl.h>
|
|
#else
|
|
#include <sys/file.h>
|
|
#endif
|
|
|
|
#ifndef SEEK_SET
|
|
#define SEEK_SET 0
|
|
#define SEEK_CUR 1
|
|
#define SEEK_END 2
|
|
#endif
|
|
#ifndef F_OK
|
|
#define F_OK 0
|
|
#define X_OK 1
|
|
#define W_OK 2
|
|
#define R_OK 4
|
|
#endif
|
|
|
|
#ifdef HAVE_DIRENT_H
|
|
# include <dirent.h>
|
|
# define NLENGTH(direct) (strlen((direct)->d_name))
|
|
#else /* not HAVE_DIRENT_H */
|
|
# define dirent direct
|
|
# define NLENGTH(direct) ((direct)->d_namlen)
|
|
# ifdef HAVE_SYS_NDIR_H
|
|
# include <sys/ndir.h>
|
|
# endif /* HAVE_SYS_NDIR_H */
|
|
# ifdef HAVE_SYS_DIR_H
|
|
# include <sys/dir.h>
|
|
# endif /* HAVE_SYS_DIR_H */
|
|
# ifdef HAVE_NDIR_H
|
|
# include <ndir.h>
|
|
# endif /* HAVE_NDIR_H */
|
|
#endif /* HAVE_DIRENT_H */
|
|
|
|
#ifdef CLOSEDIR_VOID
|
|
/* Fake a return value. */
|
|
#define CLOSEDIR(d) (closedir (d), 0)
|
|
#else
|
|
#define CLOSEDIR(d) closedir (d)
|
|
#endif
|
|
|
|
/* Get or fake the disk device blocksize.
|
|
Usually defined by sys/param.h (if at all). */
|
|
#ifndef DEV_BSIZE
|
|
#ifdef BSIZE
|
|
#define DEV_BSIZE BSIZE
|
|
#else /* !BSIZE */
|
|
#define DEV_BSIZE 4096
|
|
#endif /* !BSIZE */
|
|
#endif /* !DEV_BSIZE */
|
|
|
|
/* Extract or fake data from a `struct stat'.
|
|
ST_BLKSIZE: Optimal I/O blocksize for the file, in bytes.
|
|
ST_NBLOCKS: Number of 512-byte blocks in the file
|
|
(including indirect blocks). */
|
|
#ifndef HAVE_ST_BLOCKS
|
|
# define ST_BLKSIZE(statbuf) DEV_BSIZE
|
|
# if defined(_POSIX_SOURCE) || !defined(BSIZE) /* fileblocks.c uses BSIZE. */
|
|
# define ST_NBLOCKS(statbuf) (((statbuf).st_size + 512 - 1) / 512)
|
|
# else /* !_POSIX_SOURCE && BSIZE */
|
|
# define ST_NBLOCKS(statbuf) (st_blocks ((statbuf).st_size))
|
|
# endif /* !_POSIX_SOURCE && BSIZE */
|
|
#else /* HAVE_ST_BLOCKS */
|
|
/* Some systems, like Sequents, return st_blksize of 0 on pipes. */
|
|
# define ST_BLKSIZE(statbuf) ((statbuf).st_blksize > 0 \
|
|
? (statbuf).st_blksize : DEV_BSIZE)
|
|
# if defined(hpux) || defined(__hpux__) || defined(__hpux)
|
|
/* HP-UX counts st_blocks in 1024-byte units.
|
|
This loses when mixing HP-UX and BSD filesystems with NFS. */
|
|
# define ST_NBLOCKS(statbuf) ((statbuf).st_blocks * 2)
|
|
# else /* !hpux */
|
|
# if defined(_AIX) && defined(_I386)
|
|
/* AIX PS/2 counts st_blocks in 4K units. */
|
|
# define ST_NBLOCKS(statbuf) ((statbuf).st_blocks * 8)
|
|
# else /* not AIX PS/2 */
|
|
# define ST_NBLOCKS(statbuf) ((statbuf).st_blocks)
|
|
# endif /* not AIX PS/2 */
|
|
# endif /* !hpux */
|
|
#endif /* HAVE_ST_BLOCKS */
|
|
|
|
/* Convert B 512-byte blocks to kilobytes if K is nonzero,
|
|
otherwise return it unchanged. */
|
|
#define convert_blocks(b, k) ((k) ? ((b) + 1) / 2 : (b))
|
|
|
|
#ifndef RETSIGTYPE
|
|
#define RETSIGTYPE void
|
|
#endif
|
|
|
|
#ifdef __GNUC__
|
|
# undef alloca
|
|
# define alloca __builtin_alloca
|
|
#else
|
|
# ifdef HAVE_ALLOCA_H
|
|
# include <alloca.h>
|
|
# else
|
|
# ifndef _AIX
|
|
/* AIX alloca decl has to be the first thing in the file, bletch! */
|
|
char *alloca ();
|
|
# endif
|
|
# endif
|
|
#endif
|
|
|
|
#include <ctype.h>
|
|
|
|
#if defined (STDC_HEADERS) || (!defined (isascii) && !defined (HAVE_ISASCII))
|
|
#define IN_CTYPE_DOMAIN(c) 1
|
|
#else
|
|
#define IN_CTYPE_DOMAIN(c) isascii(c)
|
|
#endif
|
|
|
|
#ifdef isblank
|
|
#define ISBLANK(c) (IN_CTYPE_DOMAIN (c) && isblank (c))
|
|
#else
|
|
#define ISBLANK(c) ((c) == ' ' || (c) == '\t')
|
|
#endif
|
|
#ifdef isgraph
|
|
#define ISGRAPH(c) (IN_CTYPE_DOMAIN (c) && isgraph (c))
|
|
#else
|
|
#define ISGRAPH(c) (IN_CTYPE_DOMAIN (c) && isprint (c) && !isspace (c))
|
|
#endif
|
|
|
|
#define ISPRINT(c) (IN_CTYPE_DOMAIN (c) && isprint (c))
|
|
#define ISDIGIT(c) (IN_CTYPE_DOMAIN (c) && isdigit (c))
|
|
#define ISALNUM(c) (IN_CTYPE_DOMAIN (c) && isalnum (c))
|
|
#define ISALPHA(c) (IN_CTYPE_DOMAIN (c) && isalpha (c))
|
|
#define ISCNTRL(c) (IN_CTYPE_DOMAIN (c) && iscntrl (c))
|
|
#define ISLOWER(c) (IN_CTYPE_DOMAIN (c) && islower (c))
|
|
#define ISPUNCT(c) (IN_CTYPE_DOMAIN (c) && ispunct (c))
|
|
#define ISSPACE(c) (IN_CTYPE_DOMAIN (c) && isspace (c))
|
|
#define ISUPPER(c) (IN_CTYPE_DOMAIN (c) && isupper (c))
|
|
#define ISXDIGIT(c) (IN_CTYPE_DOMAIN (c) && isxdigit (c))
|
|
|
|
#ifndef __P
|
|
#if defined (__GNUC__) || (defined (__STDC__) && __STDC__)
|
|
#define __P(args) args
|
|
#else
|
|
#define __P(args) ()
|
|
#endif /* GCC. */
|
|
#endif /* Not __P. */
|
|
|
|
/* Take care of NLS matters. */
|
|
|
|
#if HAVE_LOCALE_H
|
|
# include <locale.h>
|
|
#endif
|
|
#if !HAVE_SETLOCALE
|
|
# define setlocale(Category, Locale) /* empty */
|
|
#endif
|
|
|
|
#if ENABLE_NLS
|
|
# include <libintl.h>
|
|
# define _(Text) gettext (Text)
|
|
#else
|
|
# define bindtextdomain(Domain, Directory) /* empty */
|
|
# define textdomain(Domain) /* empty */
|
|
# define _(Text) Text
|
|
#endif
|