1 1.24 kleink /* $NetBSD: perror.c,v 1.24 2006/01/26 11:13:42 kleink Exp $ */ 2 1.8 jtc 3 1.1 cgd /* 4 1.8 jtc * Copyright (c) 1988, 1993 5 1.8 jtc * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Redistribution and use in source and binary forms, with or without 8 1.1 cgd * modification, are permitted provided that the following conditions 9 1.1 cgd * are met: 10 1.1 cgd * 1. Redistributions of source code must retain the above copyright 11 1.1 cgd * notice, this list of conditions and the following disclaimer. 12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 cgd * notice, this list of conditions and the following disclaimer in the 14 1.1 cgd * documentation and/or other materials provided with the distribution. 15 1.22 agc * 3. Neither the name of the University nor the names of its contributors 16 1.1 cgd * may be used to endorse or promote products derived from this software 17 1.1 cgd * without specific prior written permission. 18 1.1 cgd * 19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1 cgd * SUCH DAMAGE. 30 1.1 cgd */ 31 1.1 cgd 32 1.10 christos #include <sys/cdefs.h> 33 1.1 cgd #if defined(LIBC_SCCS) && !defined(lint) 34 1.8 jtc #if 0 35 1.8 jtc static char sccsid[] = "@(#)perror.c 8.1 (Berkeley) 6/4/93"; 36 1.10 christos #else 37 1.24 kleink __RCSID("$NetBSD: perror.c,v 1.24 2006/01/26 11:13:42 kleink Exp $"); 38 1.8 jtc #endif 39 1.1 cgd #endif /* LIBC_SCCS and not lint */ 40 1.1 cgd 41 1.24 kleink #include "namespace.h" 42 1.1 cgd #include <errno.h> 43 1.15 mycroft #include <limits.h> 44 1.1 cgd #include <stdio.h> 45 1.23 christos #include <string.h> 46 1.10 christos #include "extern.h" 47 1.10 christos 48 1.4 jtc /* 49 1.4 jtc * Since perror() is not allowed to change the contents of strerror()'s 50 1.23 christos * static buffer, both functions supply their own buffers to strerror_r(). 51 1.4 jtc */ 52 1.4 jtc 53 1.1 cgd void 54 1.23 christos perror(const char *s) 55 1.1 cgd { 56 1.19 kleink const char *separator; 57 1.16 kleink char buf[NL_TEXTMAX]; 58 1.1 cgd 59 1.19 kleink if (s == NULL) 60 1.19 kleink s = ""; 61 1.19 kleink if (*s == '\0') 62 1.19 kleink separator = ""; 63 1.19 kleink else 64 1.19 kleink separator = ": "; 65 1.19 kleink 66 1.23 christos (void)strerror_r(errno, buf, sizeof(buf)); 67 1.23 christos (void)fprintf(stderr, "%s%s%s\n", s, separator, buf); 68 1.1 cgd } 69