llib-lc

<B>Digital的Unix操作系统VAX 4.2源码</B>

/* 
 *
 * The lint library has been reorganized and updated.
 *
 * The first section contains all the Berkeley code as close to exact as
 * possible.  Functions that don't return or return void are declared as
 * such, which is not the way it was done previously.  In some places,
 * variables were declared as pointers to characters when they were
 * actually integers, and these have been corrected.  The ifndef's are
 * because of conflicts with System V additions.
 *
 * The second section contains the Berkeley definitions that are not in
 * System V, and are not included in the System V lint library.
 *
 * The third section has all the System V additions to Ultrix that
 * don't conflict and have been included in the normal Ultrix lint
 * library.
 *
 * The fourth section, seperated by an ifdef block, is all the
 * conflicting definitions between System V and Berkeley.
 *
 */

/* This is the basic Ultrix (Berkeley) lint library with the conflicting
 * definitions with System V 'ifndef'ed.
 */

/*LINTLIBRARY*/
#include <sys/types.h>
#include <dbm.h>
#undef NULL /* dbm's NULL is brain-dead */
#include <disktab.h>
#include <fstab.h>
#include <grp.h>
#include <sys/dir.h>
#include <netdb.h>
#include <nlist.h>
#include <pwd.h>
#include <setjmp.h>
#include <stdio.h>
#include <sgtty.h>
#include <signal.h>
#include <limits.h>
#include <sys/param.h>
#include <sys/mount.h>
#include <sys/time.h>
#include <sys/times.h>
#include <sys/vtimes.h>
#include <sys/timeb.h>
#include <sys/resource.h>
#include <sys/wait.h>
#include <sys/socket.h>
#include <sys/stat.h>
#include <sys/uio.h>
#include <netinet/in.h>
#include <arpa/inet.h>


	/***	SECTION 2	***/
/* ACCEPT(2) */
int	accept(s,a,l) int s; struct sockaddr *a; int *l; { return s; }
/* ACCESS(2) */
int	access(p,m) char *p; int m; { return 0; }
/* ACCT(2) */
int	acct(f) char *f; { return 0;}
/* ADJTIME(2) */
int	adjtime(d, o) struct timeval *d, *o; { return 0; }
/* BRK(2) */
#ifndef SYSTEM_FIVE
caddr_t	brk(a) caddr_t a; { return(0); }
#endif
caddr_t	sbrk(i) int i; { return(0); }

#ifdef mips
/* CACHECTL(2) */
int	cachectl(a, n, o) char *a; int n, o; { return 0; }
/* CACHEFLUSH(2) */
int	cacheflush(a, n, c) char *a; int n, c; { return 0; }
#endif

/* CHDIR(2) */
int	chdir(s) char *s; { return(0); }
/* CHMOD(2) */
int	chmod(s,m) char *s; int m;  { return(0); }
int	fchmod(f, m) int f,m; { return(0); }
/* CHOWN(2) */
int	chown(s,u,g) char *s; int u; int g; { return(0); }
int	fchown(f, u, g) int f,u,g; { return(0); }
/* CHROOT(2) */
int	chroot(d) char *d; { return 0; }
/* CLOSE(2) */
int	close(f) int f; { return(0); }
/* CREAT(2) */
int	creat(s,m) char *s; int m; { return(0); }
/* DUP(2) */
int	dup(f) int f; { return(f); }
int	dup2(o,n) int o; int n; { return o; }
/* EXECVE(2) */
int	execve(s,v,e) char *s, *v[], *e[]; {return(0);}
/* EXIT(2) */
#ifndef SYSTEM_FIVE
int	_exit(s) int s; {return(0);}
#endif
/* EXPORTFS(2) */
int	exportfs(n, r, e) char *n; int r,e; { return 0; }
/* FCNTL(2) */
int	fcntl(f,c,a) int f; int c; int a;{ return (0); }
/* FORK(2) */
int	fork() { return(0); }
/* GETDIRENTRIES(2) */
int	getdirentries(f, b, n, bp) int f, n; char *b; long *bp; { return 0; }
/* GETDOMAINNAME(2) */
int	getdomainname(n, nl) char *n; int nl; { return 0; }
int	setdomainname(n, nl) char *n; int nl; { return 0; }
/* GETGID(2) */
#ifndef SYSTEM_FIVE
int	getgid() { return(1); }
int	getegid() { return(1); }
#endif
/* GETMNT(2) */
int	getmnt(s,b,n,m,p) int *s,n,m; struct fs_data *b; char *p; { return 0; }
/* GETPGRP(2) */
#ifndef SYSTEM_FIVE
int	getpgrp(p) int p; { return 1; }
#endif
/* GETPID(2) */
int	getpid() { return(1); }
int	getppid() { return(1); }
/* GETUID(2) */
#ifndef SYSTEM_FIVE
int	getuid() { return(1); }
int	geteuid() { return(1); }
#endif
/* IOCTL(2) */
#ifndef SYSTEM_FIVE
int	ioctl(d,r,p) int d; int r; char *p; { return 0;}
#endif
/* KILL(2) */
int	kill(p,s) int p; int s; { return(0); }
/* LINK(2) */
int	link(a,b) char *a, *b; { return(0); }
/* LSEEK */
long	lseek(f,o,d) int f; long o; int d; { return 1L; }

#ifdef SYSTEM_FIVE
int	madvise(a,l,b) char * a; int l, b; { return 0;}
int	mmap(a,l,p,s,f,o) char * a; int l,p,s,f; off_t o; { return 0;}
int	mincore(a,l,v) char * a; int l; char *v; { return 0; }
#endif

/* MKDIR(2) */
int	mkdir(p,m) char *p; int m; { return 0; }
/* MKNOD(2) */
int	mknod(n,m,a) char *n; int m,a; { return(0); }
/* MOUNT(2) */
int	mount(s,n,f) char *s, *n; int f; { return(0); }
int	umount(s) char *s; { return(0); }

#ifdef SYSTEM_FIVE
int	mprotect(a,l,p) char * a; int l,p; { return 0;}
int	mremap(a,l,p,s,f) char * a, f; int l,p,s; { return 0;}
int	munmap(a,l) char * a; int l; { return 0;}
#endif

/* NFS_SVC(2) -- return types are guesses */
int	nfs_svc(s) int s; { return 0; }
void	nfs_biod() { }
/* OPEN(2) */
	/*VARARGS2*/
int	open(f,m,stuff) char *f; int m,stuff; { return(0); }
/* PIPE(2) */
int	pipe(f) int f[2]; { return(0); }
/* PROFIL(2) */
#ifndef SYSTEM_FIVE
int	profil(b,s,o,i) char *b; int s,o,i; { return(0);}
#endif
/* PTRACE(2) */
int	ptrace(r,p,a,d) int r,p,*a,d; { return(0); }
/* READ(2) */
#ifndef SYSTEM_FIVE
int	read(f,b,l) int f,l; char *b; { return(l); }
int	readv(d,v,l) int d,l; struct iovec *v; { return l; }
#endif
/* SETPGRP(2) */
#ifndef SYSTEM_FIVE
int	setpgrp(g,pg) int g, pg; { return 0; }
#endif

#ifdef mips
/* SIGRETURN(2) */
int	sigreturn(s) struct sigcontext *s; { return 0; }
#endif

/* STAT(2) */
int	stat(s,b) char *s; struct stat *b; { return(0); }
int	fstat(f,b) int f; struct stat *b; { return(0); }
int	lstat(s,b) char *s; struct stat *b; { return(0); }

#ifdef SYSTEM_FIVE
char *	stk(a) char * a; { return a; }
char *	sstk(a) int a; { return (char *)0; }
#endif

/* SYNC(2) */
void	sync(){}
/* UMASK */
int	umask(n) int n; { return n; }
/* UNLINK */
int	unlink(s) char *s; { return(0); }
/* WAIT(2) */
#ifndef SYSTEM_FIVE
int	wait(s) union wait *s; { return(1); }
int	wait3(s,o,r) union wait *s; int o; struct rusage *r; { return 1;}
#endif
/* WAITPID(2) */
pid_t	waitpid(p,s,o) pid_t p; int *s; int o; { return (p); }
/* WRITE(2) */
#ifndef SYSTEM_FIVE
int	write(f,b,l) int f, l; char *b; { return(l); }
int	writev(f,v,l) int f, l; struct iovec *v; { return l; }
#endif


	/***	SECTION	3	***/

/* ABORT(3) */
void	abort() {}
/* ABS(3) */
int	abs(i) int i; { return(i); }
/* ALARM(3C) */
#ifndef SYSTEM_FIVE
int	alarm(s) unsigned s; { return(s); }
#endif
/* CRYPT(3) */
char *	crypt(k,s) char *k, *s; { return(""); }
#ifndef SYSTEM_FIVE
void	encrypt(s) char *s; {}
#endif
/* CTIME(3) */
char *	ctime(c) long *c;{ return(""); }
char *	asctime(t) struct tm *t; { return(""); }
struct	tm *localtime(c) long *c; { return localtime(c); }
struct	tm *gmtime(c) long *c; { return gmtime(c); }
#ifndef SYSTEM_FIVE
char *	timezone(z,d) int z, d; {return("");}
#endif
/* DBM(3) */
int	dbminit(f) char *f; { return 0; }
datum	fetch(k) datum k; { return k; }
int	store(k, c) datum k, c; { return 0; }
int	delete(k) datum k; { return 0; }
datum	firstkey() { static datum k; return k; }
datum	nextkey(k) datum k; { return k; }
/* ECVT(3) */
char *	ecvt(v,n,d,s) double v; int n, *d, *s; { return(""); }
char *	fcvt(v,n,d,s) double v; int n, *d, *s; { return(""); }
char *	gcvt(v,n,b) double v; int n; char *b; { return(""); }
/* END(3) */
int	end;
int	etext;
int 	edata;
/* EXECL(3) */
	/*VARARGS*/
int	execl(f,a) char *f, *a; {return (1);}
	/*VARARGS*/
int	execle(f,a) char *f, *a; {return (1);}
int	execv(s,v) char *s, *v[]; {return (1);}
int	exect(s, v, e) char *s, *v[], *e[]; {;}
/* EXIT(3) */
void	exit(s) int s; {}
/* FCLOSE(3S) */
int	fclose(f) FILE *f; {return(0);}
int	fflush(f) FILE *f; {return(0);}
/* FOPEN(3S) */
FILE *	fopen(s,m) char *s, *m; { return(stdin); }
FILE *	fdopen(fd,m) int fd; char *m; { return(stdin);}
FILE *	freopen(s,m,f) char *s, *m; FILE *f; { return(stdin); }
/* FREAD(3S) */
int	fread(p,s,n,f) char *p; int s, n; FILE *f; {return(1);}
int	fwrite(p,s,n,f) char *p; int s, n; FILE *f; {return(0);}
/* FREXP(3) */
double	frexp(v,e) double v; int *e; { return v; }
double	ldexp(v,e) double v; int e; { return v; }
double	modf(v,p) double v, *p; { return v; }
/* FSEEK(3S) */
int	fseek(f,o,p) FILE *f; long o; int p; { return(0); }
long	ftell(f) FILE *f; { return(0L); }
void	rewind(f) FILE *f; {}
/* GETC(3S) */
int	fgetc(f)  FILE *f; {return 0; }
int	getw(f) FILE *f; { return 0;}
/* GETDISKBYNAME(3) */
struct disktab * getdiskbyname(n) char *n; { return (struct disktab *) 0; }
/* GETENV(3) */
char *	getenv(n) char *n; { return n; }
/* GETFSENT(3X) */
struct fstab *	getfsent() { return (struct fstab *)NULL; }
struct fstab *	getfsspec(n) char *n; { return (struct fstab *)NULL; }
struct fstab *	getfsfile(n) char *n; { return (struct fstab *)NULL; }
struct fstab *	getfstype(t) char *t; { return (struct fstab *)NULL; }
int	endfsent() { return 0; }
int	setfsent() { return 0; }
/* GETGRENT(3) */
#ifndef SYSTEM_FIVE
struct group *	getgrent() { return (struct group *)NULL; }
struct group *	getgrgid(n) int n; { return (struct group *)NULL; }
struct group *	getgrnam(n) char *n; { return (struct group *)NULL; }
int	endgrent() { return 0; }
int	setgrent() { return 0; }
#endif
/* GETLOGIN(3) */
char *	getlogin(){ return " "; }
/* GETHOSTENT(3) */
struct hostent * gethostent() { return (struct hostent *) 0; }
struct hostent * gethostbyname(n) char *n; { return (struct hostent *) 0; }
struct hostent * gethostbyaddr(a, l, t) char *a; int l,t; { return (struct hostent *) 0; }
void	sethostent(s) int s; { ; }
void	endhostent() { ; }
/* GETNETENT(3) */
struct netent *	getnetent() { return (struct netent *) 0; }
struct netent *	getnetbyname(n) char *n; { return (struct netent *) 0; }
struct netent *	getnetbyaddr(n, t) int n,t; { return (struct netent *) 0; }
void	setnetent(s) int s; { ; }
void	endnetent() { ; }
/* GETPASS(3) */
char *	getpass(n) char *n ; { return n; }
/* GETPROTOENT(3) */
struct protoent * getprotoent() { return (struct protoent *) 0; }
struct protoent * getprotobyname(n) char *n; { return (struct protoent *) 0; }
struct protoent * getprotobynumber(p) int p; { return (struct protoent *) 0; }
void	setprotoent(s) int s; { ; }
void	endprotoent() { ; }
/* GETPW(3C) */
int	getpw(u,b) int u; char *b;  { return 0; }
/* GETPWENT(3) */
#ifndef SYSTEM_FIVE
struct passwd *	getpwent() { return (struct passwd *)NULL; }
struct passwd *	getpwuid(n) int n; { return (struct passwd *)NULL; }
struct passwd *	getpwnam(n) char *n; { return (struct passwd *)NULL; }
int	endpwent() { return 0; }
int	setpwent() { return 0; }
#endif
/* GETS(3S) */
char *	gets(s) char *s; { return(s); }
char *	fgets(s,l,f) char *s; int l; FILE *f; { return(s); }
/* GETSERVENT(3) */
struct servent * getservent() { return (struct servent *) 0; }
struct servent * getservbyname(n,p) char *n,*p; { return (struct servent *) 0; }
struct servent * getservbyport(p, pr) int p; char *pr; { return (struct servent *) 0; }
void	setservent(s) int s; { ; }
void	endservent() { ; }
/* GETTTYENT(3) */
struct ttyent *	getttyent() { return (struct ttyent *) 0; }
struct ttyent *	getttynam(n) char *n; { return (struct ttyent *) 0; }
void	setttyent() { ; }
void	endttyent() { ; }
/* INET(3) */
/* inet_addr and inet_network don't match the man page; they match
   the header file arpa/inet.h. */
unsigned long	inet_addr(cp) char *cp; { return 0L; }
unsigned long	inet_network(cp) char *cp; { return 0L; }
char *	inet_ntoa(in) struct in_addr in; { return (char *) 0; }
struct in_addr	inet_makeaddr(n, h) int n,h; { static struct in_addr in; return in; }
int	inet_lnaof(in) struct in_addr in; { return 0; }
int	inet_netof(in) struct in_addr in; { return 0; }
/* INITGROUPS(3) */
int	initgroups(uname, agroup) char *uname; int agroup; { return 0; }
/* MALLOC(3) */
char *	malloc(n) unsigned n; {static char c; return(&c);}
char *	calloc(n,s) unsigned n, s; { static char c[1]; return(c); }
char *	realloc(p,n) char *p; unsigned n; { static char c[1]; return(c);}
void	free(p) char *p; {}
char *	alloca(s) int s; {static char c; return (&c); }
/* MKFIFO(3) */
int	mkfifo(p,m) char *p; mode_t m; {return (0); }
/* MKTEMP(3) */
char *	mktemp(p) char *p; { return(p);}
/* MONITOR(3) */
#ifndef SYSTEM_FIVE
void	monitor(l,h,b,s,n) int (*l)(), (*h)(); short *b; int s, n; {}
#endif
void	monstartup(l,h) int (*l)(), (*h)(); {}
void	moncontrol(mode) int mode; {}
/* NICE(3C) */
#ifndef SYSTEM_FIVE
void	nice(i) int i; {}
#endif
/* NLIST(3) */
#ifndef SYSTEM_FIVE
void	nlist(f,n) char *f; struct nlist n[]; {}
#endif
/* PATHCONF(3) */
long	pathconf(p,n) char *p; int n; { return(0L); }
long	fpathconf(f,n) int f,n; { return(0L); }
/* PAUSE(3C) */
int	pause() {return(1);}
/* PERROR(3) */
void	perror(s) char *s; {}
int 	errno;
int	sys_nerr;
char *	sys_errlist[];
/* POPEN(3) */
FILE *	popen(c,t) char *c, *t; { return(stdin); }
int	pclose(f) FILE *f; { return 0; }
/* PRINTF(3S) */
	/*VARARGS*/
int	printf(s) char *s; {return(1);}
	/*VARARGS*/
int	fprintf(f,s) FILE *f; char *s; {return(1);}
#ifndef SYSTEM_FIVE
	/*VARARGS*/
char *	sprintf(s,f) char *s, *f; { return(s);}
#endif
/* PUTC(3S) */
int	fputc(c,f) char c; FILE *f; {return 0; }
int	putw(w,f) int w; FILE *f; { return 0;}
/* PUTS(3S) */
int	puts(s) char *s;{return(0);}
int	fputs(s,f) char *s; FILE *f; {return(0);}
/* QSORT(3) */
#ifndef SYSTEM_FIVE
int	qsort(b,n,w,c) char *b; int n, w; int (*c)(); {}
#endif
/* RAND(3C) */
int	rand(){ return 1; }
void	srand(s) int s; {}
/* RCMD(3) */
int	rcmd(a, rp, lu, ru, c, f) char **a, *lu, *ru, *c; u_short rp; int *f; { return 0; }
int	rresvport(p) int *p; { return 0; }
int	ruserok(rh, su, ru, lu) char *rh, *ru, *lu; int su; { return 0; }
/* REXEC(3) */
int	rexec(a, rp, n, p, c, f) char **a, *n, *p, *c; u_short rp; int *f; { return 0; }
/* SCANF(3S) */
	/*VARARGS*/
int	scanf(f) char *f; {return(1); }
	/*VARARGS*/
int	fscanf(f,s) FILE *f; char *s; {return(1);}
	/*VARARGS*/
int	sscanf(s,f) char *s, *f; { return(1); }
/* SETBUF(3S) */
void	setbuf(f,b) FILE *f; char *b; {}
void	setbuffer(f,b,s) FILE *f; char *b; int s; {}
void	setlinebuf(f) FILE *f; {}
/* SETJMP(3) */
int	setjmp(e) jmp_buf e; { return(0); }
void	longjmp(e,v) jmp_buf e; int v; {}
int	_setjmp(e) jmp_buf e; { return(0); }
void	_longjmp(e,v) jmp_buf e; int v; {}
/* SETPGID(3) */
int	setpgid(p,o) pid_t p,o; { return(0); }
/* SETUID(3) */
int	setuid(u) int u; { return(0); }
int	seteuid(u) int u; { return(0); }
int	setruid(u) int u; { return(0); }
int	setgid(g) int g; { return(0); }
int	setegid(g) int g; { return(0); }
int	setrgid(g) int g; { return(0); }
/* SIGSETOPS(3) */
#ifndef	SYSTEM_FIVE
int	sigemptyset(s) sigset_t *s; {return(0); }
int	sigfillset(s) sigset_t *s; {return(0); }
int	sigaddset(s,f) sigset_t *s; int f; {return(0); }
int	sigdelset(s,f) sigset_t *s; int f; {return(0); }
int	sigismember(s,f) sigset_t *s; int f; {return(0); }
/* SIGPROCMASK(3) */
int	sigprocmask(h,s,o) int h; sigset_t *s, *o; {return(0); }
/* SIGSUSPEND(3) */
int	sigsuspend(s) sigset_t *s; {return(0); }
#endif
/* SIGINTERRUPT(3) */
int	siginterrupt(s,f) int s, f; {return(0); }
/* SIGNAL(3C) */
void	(*signal(c,f))() void (*f)(); { return(f); }
/* SLEEP(3) */
unsigned	sleep(n) unsigned n; { return (n); }
/* STRING(3) */
char *	strcat(a,b) char *a, *b; { return a; }
int	strcmp(a,b) char *a, *b; { return(1); }
char *	strcpy(a,b) char *a, *b; { return a; }
int	strlen(s) char *s; { return(1); }
char *	strncat(a,b,n) char *a, *b; int n; { return a;}
int	strncmp(a,b,n) char *a, *b; int n; { return(1); }