Return to errfunction.in CVS log

Up to [Net/2] / Net2 / arch / i386 / floppy / cat

Net/2

/*-
 * Copyright (c) 1991 The Regents of the University of California.
 * All rights reserved.
 *
 * %sccs.include.redist.c%
 *
 *	%W% (Berkeley) %G%
 */

err(s, syserr)
	register char *s;
	int syserr;
{
	extern int errno, sys_nerr;
        extern char *sys_errlist[];
	register char *e;

	(void)write(2, PROGNAME, sizeof(PROGNAME) - 1);
	if (s) {
		for (e = s; *e; ++e);
		(void)write(2, s, e - s);
	}
#define	BADERR	"unknown error"
	if (syserr) {
		if (s)
			(void)write(2, ": ", 2);
		if (errno > sys_nerr)
			(void)write(2, BADERR, sizeof(BADERR) - 1);
		else {
			for (e = s = sys_errlist[errno]; *e; ++e);
			(void)write(2, s, e - s);
		}
	}
	(void)write(2, "\n", 1);
	eval = 1;
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.