6cfdf3a92b
The heritage of this version is not clear. It appears to be NetBSD derived from some time ago.
64 lines
1.8 KiB
C
64 lines
1.8 KiB
C
/*
|
|
* Copyright (c) 1991 Carnegie Mellon University
|
|
* All Rights Reserved.
|
|
*
|
|
* Permission to use, copy, modify and distribute this software and its
|
|
* documentation is hereby granted, provided that both the copyright
|
|
* notice and this permission notice appear in all copies of the
|
|
* software, derivative works or modified versions, and any portions
|
|
* thereof, and that both notices appear in supporting documentation.
|
|
*
|
|
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
|
|
* CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
|
|
* ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
|
|
*
|
|
* Carnegie Mellon requests users of this software to return to
|
|
*
|
|
* Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
|
|
* School of Computer Science
|
|
* Carnegie Mellon University
|
|
* Pittsburgh PA 15213-3890
|
|
*
|
|
* any improvements or extensions that they make and grant Carnegie the rights
|
|
* to redistribute these changes.
|
|
*/
|
|
/*****************************************************************
|
|
* HISTORY
|
|
* 04-Mar-85 Rudy Nedved (ern) at Carnegie-Mellon University
|
|
* Create a CMU version of the BBN errmsg routine from scratch. It
|
|
* differs from the BBN errmsg routine in the fact that it uses a
|
|
* negative value to indicate using the current errno value...the
|
|
* BBN uses a negative OR zero value.
|
|
*/
|
|
|
|
extern int errno;
|
|
extern int sys_nerr;
|
|
extern char *sys_errlist[];
|
|
|
|
static char *itoa(p,n)
|
|
char *p;
|
|
unsigned n;
|
|
{
|
|
if (n >= 10)
|
|
p =itoa(p,n/10);
|
|
*p++ = (n%10)+'0';
|
|
return(p);
|
|
}
|
|
|
|
char *errmsg(cod)
|
|
int cod;
|
|
{
|
|
static char unkmsg[] = "Unknown error ";
|
|
static char unk[sizeof(unkmsg)+11]; /* trust us */
|
|
|
|
if (cod < 0) cod = errno;
|
|
|
|
if((cod >= 0) && (cod < sys_nerr))
|
|
return(sys_errlist[cod]);
|
|
|
|
strcpy(unk,unkmsg);
|
|
*itoa(&unk[sizeof(unkmsg)-1],cod) = '\0';
|
|
|
|
return(unk);
|
|
}
|