llib-lsvid89

操作系统SunOS 4.1.3版本的源码

/*LINTLIBRARY*/

/*
 * base was SunOS 4.1beta /usr/5lib/llib-lc
 * modifications based on draft of June 1 1989 of SVID 89
 */

/*
 * All include files, no particular order.
 * Note: these are the SunOS include files, not the SVID89 ones.
 * Furthermore, there are probably a lot here that don't need to be.
 */
#include <stdio.h>
#include <errno.h>
#include <sys/param.h>
#include <sys/ipc.h>
#include <sys/msg.h>
#include <sys/sem.h>
#include <pwd.h>
#include <signal.h>
#include <sys/time.h>
#include <sys/uio.h>
#include <sys/stat.h>
#include <sys/stropts.h>
#include <sys/resource.h>
#include <sys/poll.h>
#include <sys/ptrace.h>
#include <sys/shm.h>
#include <sys/times.h>
#include <sys/utsname.h>
#include <ustat.h>
#include <utime.h>
#include <sys/wait.h>
#include <dirent.h>
#include <fstab.h>
#include <grp.h>
#include <search.h>
#include <malloc.h>
#include <mon.h>
#include <ndbm.h>
#include <a.out.h>
#include <setjmp.h>
#include <termios.h>
#include <varargs.h>
#include <sys/label.h>
#include <sys/audit.h>
#include <floatingpoint.h>
#include <sys/mman.h>
#include <locale.h>
#include <math.h>

/*
 * All undefs, alpha order
 */
#undef assert
#undef clearerr
#undef feof
#undef ferror
#undef fileno
#undef getc
#undef getchar
#undef isalnum
#undef isalpha
#undef isascii
#undef iscntrl
#undef isdigit
#undef isgraph
#undef islower
#undef isprint
#undef ispunct
#undef isspace
#undef isupper
#undef isxdigit
#undef putc
#undef putchar
#undef rewinddir
#undef toascii
#undef _tolower
#undef _toupper

/*
 * All externs (yuck).
 * !}sort +1 order
 */
FILE	_iob[];
int	_sys_nsig;
char*	_sys_siglist[1];
int	daylight;
char**	environ;
int	errno;
char*	optarg;
int	opterr;
int	optind;
char*	sys_errlist[1];
int	sys_nerr;
long	timezone;
char*	tzname[2];
int     eprol, etext, edata, end;
char    *loc1, *loc2, *locs;
int	t_errno;
char	*t_errlist[];
int	t_nerr;
int	getdate_err;
int	signgam;

/*
 * typedef's for things the SunOS 4.1 doesn't have
 * Not intended to match the originals exactly, just enough for lint.
 */
typedef struct { long filler[50]; } ucontext_t;
typedef enum idtype { A,B,C } idtype_t;
typedef long id_t;
typedef struct { long filler[10]; } procset_t;
typedef struct { char *s; int a, b; } stack_t;
typedef	long fpos_t;
struct statvfs { int filler[30]; };
typedef struct { int quot, rem; } div_t;
typedef struct { long quot, rem; } ldiv_t;
typedef struct { long filler[4]; } siginfo_t;

/*
 * All function names, alpha order by function name
 * Note: _foo and foo are considered alphabetically the same.
 */
void		abort() {}
int		abs(i) { return(i); }
int		access(f, m) char *f; int m; { return(m); }
int		acct(f) char *f; { return(0); }
double		acos(x) double x; { return (x); }
int		advance(s, e) char *s, *e; { return(0); }
int		adjtime(delta, odelta) struct timeval *delta, *odelta; { return 0; }
unsigned	alarm(s) unsigned s; { return(s); }
char		*asctime(t) struct tm *t; { static char *x; return(x); }
double		asin(x) double x; { return (x); }
void		assert(p) {}
double		atan2(x, y) double x, y; { return (x); }
double		atan(x) double x; { return (x); }
int		atext(f) void (*f)(); { return(0); }
double		atof(s) char *s; { return(0.0); }
int		atoi(s) char *s; { return(0); }
long		atol(s) char *s; { return(0L); }
void		*bsearch(k, b, n, w, c) void *k, *b; size_t n, w; int (*c)(); { return(k); }
void		*calloc(n, e) size_t n, e; { static void *x; return(x); }
double		cbrt(x) double x; { return(x); }
double		ceil(x) double x; { return (x); }
speed_t		cfgetispeed(t) struct termios *t; { static speed_t x; return(x); }
speed_t		cfgetospeed(t) struct termios *t; { static speed_t x; return(x); }
int		cfsetispeed(t, s) struct termios *t; speed_t s; { return(0); }
int		cfsetospeed(t, s) struct termios *t; speed_t s; { return(0); }
int		chdir(s) char *s; { return(0); }
int		chmod(s, m) char *s; mode_t m; { return(0); }
int		chown(s, o, g) char *s; uid_t o; gid_t g; { return(o); }
int		chroot(p) char *p; { return(0); }
void		clearerr(f) FILE *f; {}
clock_t		clock() { return(0L); }
int		closedir(d) DIR *d; { return(0); }
int		close(f) { return(0); }
char		*compile(is, ex, en, ef) char *is, *en, *ef; { return(is); }
double		cosh(x) double x; { return (x); }
double		cos(x) double x; { return (x); }
int		creat(s, m) char *s; mode_t m; { return(m); }
char		*crypt(k, s) char *k, *s; { return(k); }
char		*ctermid(s) char *s; { return(s); }
char		*ctime(t) time_t *t; { static char *x; return(x); }
double		difftime(a, b) time_t a, b; { return((double)0.0); }
div_t		div(n, d) { static div_t dd; return(dd); }
double		drand48() { return(0.0); }
int		dup2(f1, f2) { return(f2); }
int		dup(f) { return(f); }
void		encrypt(b, e) char *b; {}
double		erand48(x) unsigned short x[3]; { return(0.0); }
double		erfc(x) double x; { return(x); }
double		erf(x) double x; { return(x); }
/*VARARGS3*/
int		execle(f, a, e) char *f, *a, *e[]; { return(0); }
/*VARARGS2*/
int		execl(f, a) char *f, *a; { return(0); }
/*VARARGS2*/
int		execlp(f, a) char *f, *a; { return(0); }
int		execve(f, a, e) char *f, *a[], *e[]; { return(0); }
int		execvp(s, v) char *s, *v[]; { return(0); }
int		execv(s, v) char *s, *v[]; { return(0); }
void		_exit(s) {}
void		exit(s) {}
double		exp(x) double x; { return(x); }
double		fabs(x) double x; { return (x); }
int		fattach(fd, p) char *p; { return(0); }
int		fchdir(d) { return(d); }
int		fchmod(f, m) { return(m); }
int		fchown(f, o, g) uid_t o; gid_t g; { return(f); }
int		fclose(f) FILE *f; { return(0); }
/*VARARGS2*/
int		fcntl(f, c, a) { return(f); }
int		fdetach(p) char *p; { return(0); }
FILE		*fdopen(f, t) char *t; { return(stdin); }
int		feof(f) FILE *f; { return(0); }
int		ferror(f) FILE *f; { return(0); }
int		fflush(f) FILE *f; { return(0); }
int		fgetc(f) FILE *f; { return(0); }
int		fgetpos(f, p) FILE *f; fpos_t *p; { return(0); }
char		*fgets(s, n, f) char *s; FILE *f; { return(s); }
int		fileno(f) FILE *f; { static int fd; return(fd); }
double		floor(x) double x; { return (x); }
double		fmod(x, y) double x, y; { return (x); }
int		fmtmsg(c, l, s, t, a, g) long c; char *l, *t, *a, *g; { return(0); }
FILE		*fopen(f, t) char *f, *t; { return(stdin); }
pid_t		fork() { static pid_t x; return(x); }
long		fpathconf(f, n) { static long x; return(x); }
/*VARARGS2 PRINTFLIKE2*/
int		fprintf(f, s) FILE *f; char *s; { return(0); }
int		fputc(c, f) FILE *f; { return(c); }
int		fputs(s, f) char *s; FILE *f; { return(0); }
size_t		fread(b, s, n, f) void *b; size_t s, n; FILE *f; { return(n); }
void		free(s) void *s; {}
FILE		*freopen(f, t, s) char *f, *t; FILE *s; { return(s); }
double		frexp(x, e) double x; int *e; { return(x); }
/*VARARGS2 SCANFLIKE2*/
int		fscanf(f, s) FILE *f; char *s; { return(0); }
int		fseek(f, o, p) FILE *f; long o; { return(0); }
int		fsetpos(f, p) FILE *f; fpos_t *p; { return(0); }
int		fstat(f, b) struct stat *b; { return(0); }
int		fstatvfs(fd, p) struct statvf *p; { return(0); }
int		fsync(f) { return(0); }
long		ftell(f) FILE *f; { static long p; return(p); }
int		ftw(p, f, d) char *p; int (*f)(); { return(d); }
size_t		fwrite(b, s, n, f) char *b; size_t s, n; FILE *f; { return(n); }
double		gamma(x) double x; { return (x); }
char		*gcvt(v, n, b) double v; char *b; { return(b); }
int		getc(f) FILE *f; { return(0); }
int		getchar() { return(0); }
char		*getcwd(b, s) char *b; { return(b); }
struct	tm	*getdate(s) char *s; { return((struct tm*)0); }
gid_t		getegid() { static gid_t x; return(x); }
char		*getenv(n) char *n; { return(n); }
uid_t		geteuid() { static uid_t x; return(x); }
gid_t		getgid() { static gid_t x; return(x); }
int		getgroups(n, g) gid_t *g; { return(n); }
char		*getlogin() { static char *x; return(x); }
int		getmsg(fd, c, d, fl) struct strbuf *c, *d; int *fl; { return(0); }
int		getopt(c, v, o) char **v, *o; { return(c); }
int		getpagesize() { return(0); }
pid_t		getpgid(p) pid_t p; { return(0); }
pid_t		getpgrp() { return(0); }
pid_t		getpid() { return(0); }
pid_t		getppid() { return(0); }
int		getpw(u, b) uid_t u; char *b; { return(u); }
int		getrlimit(res, rip) struct rlimit *rip; { return(0); }
pid_t		getsid() { return((pid_t)0); }
char		*gets(s) char *s; { return(s); }
int		getsubopt(o, t, v) char **o, **t, **v; { return (0); }
char		*gettxt(m, d) char *m, *d; { return(m); }
uid_t		getuid() { static uid_t x; return(x); }
int		getvol(d, l, o, p) char *d, *l, *p; { return(0); }
int		getw(f) FILE *f; { return(0); }
struct	tm	*gmtime(c) time_t *c; { static struct tm x; return(&x); }
int		grantpt(fd) { return(0); }
int		hcreate(n) unsigned n; { return(0); }
void		hdestroy() {}
ENTRY		*hsearch(i, a) ENTRY i; ACTION a; { return(&i); }
double		hypot(x, y) double x, y; { return (x); }
int		initgroups(n, g) char *n; { return(0); }
/*VARARGS2*/
int		ioctl(f, r, a) { return(f); }
int		isalnum(c) { return(c); }
int		isalpha(c) { return(c); }
int		isascii(c) { return(c); }
int		isastream(f) { return(1); }
int		isatty(f) { return(1); }
int		iscntrl(c) { return(c); }
int		isdigit(c) { return(c); }
int		isgraph(c) { return(c); }
int		islower(c) { return(c); }