/* Copyright 1988,1990,1993,1994 by Paul Vixie * All rights reserved * * Distribute freely, except: don't remove my name from the source or * documentation (don't take credit for my work), mark your changes (don't * get me blamed for your possible bugs), don't alter or remove this * notice. May be sold if buildable source is provided to buyer. No * warrantee of any kind, express or implied, is included with this * software; use at your own risk, responsibility for damages (if any) to * anyone resulting from the use of this software rests entirely with the * user. * * Send bug reports, bug fixes, enhancements, requests, flames, etc., and * I'll try to keep a version up to date. I can be reached as follows: * Paul Vixie uunet!decwrl!vixie!paul */ #if !defined(lint) && !defined(LINT) static char rcsid[] = "$Id: compat.c,v 1.1.1.3 1994/01/20 02:47:03 jtc Exp $"; #endif /* vix 30dec93 [broke this out of misc.c - see RCS log for history] * vix 15jan87 [added TIOCNOTTY, thanks csg@pyramid] */ #include "cron.h" #ifdef NEED_GETDTABLESIZE # include #endif #if defined(NEED_SETSID) && defined(BSD) # include #endif #include /* the code does not depend on any of vfork's * side-effects; it just uses it as a quick * fork-and-exec. */ #ifdef NEED_VFORK PID_T vfork() { return (fork()); } #endif #ifdef NEED_STRDUP char * strdup(str) char *str; { char *temp; temp = malloc(strlen(str) + 1); (void) strcpy(temp, str); return temp; } #endif #ifdef NEED_STRERROR char * strerror(error) int error; { extern char *sys_errlist[]; extern int sys_nerr; static char buf[32]; if ((error <= sys_nerr) && (error > 0)) { return sys_errlist[error]; } sprintf(buf, "Unknown error: %d", error); return buf; } #endif #ifdef NEED_STRCASECMP int strcasecmp(left, right) char *left; char *right; { while (*left && (MkLower(*left) == MkLower(*right))) { left++; right++; } return MkLower(*left) - MkLower(*right); } #endif #ifdef NEED_SETSID int setsid() { int newpgrp; # if defined(BSD) int fd; # if defined(POSIX) newpgrp = setpgid((pid_t)0, getpid()); # else newpgrp = setpgrp(0, getpid()); # endif if ((fd = open("/dev/tty", 2)) >= 0) { (void) ioctl(fd, TIOCNOTTY, (char*)0); (void) close(fd); } # else /*BSD*/ newpgrp = setpgrp(); (void) close(STDIN); (void) open("/dev/null", 0); (void) close(STDOUT); (void) open("/dev/null", 1); (void) close(STDERR); (void) open("/dev/null", 2); # endif /*BSD*/ return newpgrp; } #endif /*NEED_SETSID*/ #ifdef NEED_GETDTABLESIZE int getdtablesize() { #ifdef _SC_OPEN_MAX return sysconf(_SC_OPEN_MAX); #else return _POSIX_OPEN_MAX; #endif } #endif #ifdef NEED_FLOCK /* The following flock() emulation snarfed intact *) from the HP-UX * "BSD to HP-UX porting tricks" maintained by * system@alchemy.chem.utoronto.ca (System Admin (Mike Peterson)) * from the version "last updated: 11-Jan-1993" * Snarfage done by Jarkko Hietaniemi * *) well, almost, had to K&R the function entry, HPUX "cc" * does not grok ANSI function prototypes */ /* * flock (fd, operation) * * This routine performs some file locking like the BSD 'flock' * on the object described by the int file descriptor 'fd', * which must already be open. * * The operations that are available are: * * LOCK_SH - get a shared lock. * LOCK_EX - get an exclusive lock. * LOCK_NB - don't block (must be ORed with LOCK_SH or LOCK_EX). * LOCK_UN - release a lock. * * Return value: 0 if lock successful, -1 if failed. * * Note that whether the locks are enforced or advisory is * controlled by the presence or absence of the SETGID bit on * the executable. * * Note that there is no difference between shared and exclusive * locks, since the 'lockf' system call in SYSV doesn't make any * distinction. * * The file "" should be modified to contain the definitions * of the available operations, which must be added manually (see below * for the values). */ /* this code has been reformatted by vixie */ int flock(fd, operation) int fd; int operation; { int i; switch (operation) { case LOCK_SH: /* get a shared lock */ case LOCK_EX: /* get an exclusive lock */ i = lockf (fd, F_LOCK, 0); break; case LOCK_SH|LOCK_NB: /* get a non-blocking shared lock */ case LOCK_EX|LOCK_NB: /* get a non-blocking exclusive lock */ i = lockf (fd, F_TLOCK, 0); if (i == -1) if ((errno == EAGAIN) || (errno == EACCES)) errno = EWOULDBLOCK; break; case LOCK_UN: /* unlock */ i = lockf (fd, F_ULOCK, 0); break; default: /* can't decipher operation */ i = -1; errno = EINVAL; break; } return (i); } #endif /*NEED_FLOCK*/ #ifdef NEED_SETENV int setenv(name, value, overwrite) char *name, *value; int overwrite; { char *tmp; if (overwrite && getenv(name)) return -1; if (!(tmp = malloc(strlen(name) + strlen(value) + 2))) { errno = ENOMEM; return -1; } sprintf("%s=%s", name, value); return putenv(tmp); /* intentionally orphan 'tmp' storage */ } #endif