]> git.saurik.com Git - apple/libc.git/blame - stdio/FreeBSD/perror.c
Libc-1081.1.3.tar.gz
[apple/libc.git] / stdio / FreeBSD / perror.c
CommitLineData
9385eb3d
A
1/*
2 * Copyright (c) 1988, 1993
e9ce8d39
A
3 * The Regents of the University of California. All rights reserved.
4 *
e9ce8d39
A
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
e9ce8d39
A
13 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30#if defined(LIBC_SCCS) && !defined(lint)
9385eb3d 31static char sccsid[] = "@(#)perror.c 8.1 (Berkeley) 6/4/93";
e9ce8d39 32#endif /* LIBC_SCCS and not lint */
9385eb3d 33#include <sys/cdefs.h>
1f2f436a 34__FBSDID("$FreeBSD: src/lib/libc/stdio/perror.c,v 1.9 2007/01/09 00:28:07 imp Exp $");
e9ce8d39 35
9385eb3d 36#include "namespace.h"
5b2abdfb 37#include <sys/types.h>
9385eb3d 38#include <sys/uio.h>
e9ce8d39 39#include <unistd.h>
9385eb3d
A
40#include <errno.h>
41#include <limits.h>
e9ce8d39 42#include <stdio.h>
9385eb3d
A
43#include <string.h>
44#include "un-namespace.h"
45#include "libc_private.h"
46#include "local.h"
e9ce8d39 47
9385eb3d
A
48void
49perror(s)
50 const char *s;
e9ce8d39 51{
9385eb3d
A
52 char msgbuf[NL_TEXTMAX];
53 struct iovec *v;
54 struct iovec iov[4];
5b2abdfb 55
9385eb3d
A
56 v = iov;
57 if (s != NULL && *s != '\0') {
58 v->iov_base = (char *)s;
59 v->iov_len = strlen(s);
60 v++;
61 v->iov_base = ": ";
62 v->iov_len = 2;
63 v++;
64 }
65 strerror_r(errno, msgbuf, sizeof(msgbuf));
66 v->iov_base = msgbuf;
67 v->iov_len = strlen(v->iov_base);
68 v++;
69 v->iov_base = "\n";
70 v->iov_len = 1;
71 FLOCKFILE(stderr);
72 __sflush(stderr);
73 (void)_writev(stderr->_file, iov, (v - iov) + 1);
74 stderr->_flags &= ~__SOFF;
75 FUNLOCKFILE(stderr);
e9ce8d39 76}