]> git.saurik.com Git - apple/libc.git/blob - string/FreeBSD/strsignal.c
Libc-1082.50.1.tar.gz
[apple/libc.git] / string / FreeBSD / strsignal.c
1 /*
2 * Copyright (c) 1988, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
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.
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)
31 static char sccsid[] = "@(#)strerror.c 8.1 (Berkeley) 6/4/93";
32 #endif /* LIBC_SCCS and not lint */
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD: src/lib/libc/string/strsignal.c,v 1.9 2010/01/24 10:35:26 ume Exp $");
35
36 #include "namespace.h"
37 #if defined(NLS)
38 #include <nl_types.h>
39 #endif
40 #include <limits.h>
41 #include <errno.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <signal.h>
45 #include "reentrant.h"
46 #include "un-namespace.h"
47
48 #define UPREFIX "Unknown signal"
49
50 static once_t sig_init_once = ONCE_INITIALIZER;
51 static thread_key_t sig_key;
52 static int sig_keycreated = 0;
53
54 static void
55 sig_keycreate(void)
56 {
57 sig_keycreated = (thr_keycreate(&sig_key, free) == 0);
58 }
59
60 static char *
61 sig_tlsalloc(void)
62 {
63 char *ebuf = NULL;
64
65 if (thr_once(&sig_init_once, sig_keycreate) != 0 ||
66 !sig_keycreated)
67 goto thr_err;
68 if ((ebuf = thr_getspecific(sig_key)) == NULL) {
69 if ((ebuf = malloc(NL_TEXTMAX * sizeof(char))) == NULL)
70 goto thr_err;
71 if (thr_setspecific(sig_key, ebuf) != 0) {
72 free(ebuf);
73 ebuf = NULL;
74 goto thr_err;
75 }
76 }
77 thr_err:
78 return (ebuf);
79 }
80
81 /* XXX: negative 'num' ? (REGR) */
82 char *
83 strsignal(int num)
84 {
85 char *ebuf;
86 char tmp[20];
87 size_t n;
88 int signum;
89 char *t, *p;
90
91 #if defined(NLS)
92 int saved_errno = errno;
93 nl_catd catd;
94 catd = catopen("libc", NL_CAT_LOCALE);
95 #endif
96
97 ebuf = sig_tlsalloc();
98 if(ebuf == NULL) {
99 errno = ENOMEM;
100 return NULL;
101 }
102
103 if (num > 0 && num < NSIG) {
104 n = strlcpy(ebuf,
105 #if defined(NLS)
106 catgets(catd, 2, num, sys_siglist[num]),
107 #else
108 sys_siglist[num],
109 #endif
110 NL_TEXTMAX * sizeof(char));
111 } else {
112 n = strlcpy(ebuf,
113 #if defined(NLS)
114 catgets(catd, 2, 0xffff, UPREFIX),
115 #else
116 UPREFIX,
117 #endif
118 NL_TEXTMAX * sizeof(char));
119 }
120
121 signum = num;
122 if (num < 0)
123 signum = -signum;
124
125 t = tmp;
126 do {
127 *t++ = "0123456789"[signum % 10];
128 } while (signum /= 10);
129 if (num < 0)
130 *t++ = '-';
131
132 p = (ebuf + n);
133 *p++ = ':';
134 *p++ = ' ';
135
136 for (;;) {
137 *p++ = *--t;
138 if (t <= tmp)
139 break;
140 }
141 *p = '\0';
142
143 #if defined(NLS)
144 catclose(catd);
145 errno = saved_errno;
146 #endif
147 return (ebuf);
148 }