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 /*
  51  * Define a buffer size big enough to describe a 64-bit signed integer
  52  * converted to ASCII decimal (19 bytes), with an optional leading sign
  53  * (1 byte); delimiter (": ", 2 bytes); and a trailing NUL (1 byte).
  54  */
  55 #define TMPSIZE (19 + 1 + 2 + 1)
  56 #define EBUFSIZE NL_TEXTMAX * sizeof(char)
  57
  58 static once_t           sig_init_once = ONCE_INITIALIZER;
  59 static thread_key_t     sig_key;
  60 static int              sig_keycreated = 0;
  61
  62 static void
  63 sig_keycreate(void)
  64 {
  65         sig_keycreated = (thr_keycreate(&sig_key, free) == 0);
  66 }
  67
  68 static char *
  69 sig_tlsalloc(void)
  70 {
  71         char *ebuf = NULL;
  72
  73         if (thr_once(&sig_init_once, sig_keycreate) != 0 ||
  74             !sig_keycreated)
  75                 goto thr_err;
  76         if ((ebuf = thr_getspecific(sig_key)) == NULL) {
  77                 if ((ebuf = malloc(EBUFSIZE)) == NULL)
  78                         goto thr_err;
  79                 if (thr_setspecific(sig_key, ebuf) != 0) {
  80                         free(ebuf);
  81                         ebuf = NULL;
  82                         goto thr_err;
  83                 }
  84         }
  85 thr_err:
  86         return (ebuf);
  87 }
  88
  89 int
  90 strsignal_r(int num, char *strsignalbuf, size_t buflen)
  91 {
  92         int retval = 0;
  93         char tmp[TMPSIZE] = { 0 };
  94         size_t n;
  95         int signum;
  96         char *t, *p;
  97
  98         signum = num;
  99         if (num < 0) {
 100                 signum = -signum;
 101         }
 102
 103         t = tmp;
 104         do {
 105                 *t++ = "0123456789"[signum % 10];
 106         } while (signum /= 10);
 107         if (num < 0) {
 108                 *t++ = '-';
 109         }
 110         int suffixlen = strlen(tmp) + 2;
 111
 112         if (num > 0 && num < NSIG) {
 113                 n = strlcpy(strsignalbuf,
 114                         sys_siglist[num],
 115                         buflen);
 116                 if (n >= (buflen - suffixlen)) {
 117                         retval = ERANGE;
 118                 }
 119         } else {
 120                 n = strlcpy(strsignalbuf,
 121                         UPREFIX,
 122                         buflen);
 123                 retval = EINVAL;
 124         }
 125
 126         if (n < (buflen - suffixlen)) {
 127                 p = (strsignalbuf + n);
 128                 *p++ = ':';
 129                 *p++ = ' ';
 130
 131                 for (;;) {
 132                         *p++ = *--t;
 133                         if (t <= tmp)
 134                                 break;
 135                 }
 136                 *p = '\0';
 137         }
 138
 139         return retval;
 140 }
 141
 142 /* XXX: negative 'num' ? (REGR) */
 143 char *
 144 strsignal(int num)
 145 {
 146         char *ebuf;
 147
 148         ebuf = sig_tlsalloc();
 149         if (ebuf == NULL) {
 150                 errno = ENOMEM;
 151                 return NULL;
 152         }
 153
 154         if (strsignal_r(num, ebuf, EBUFSIZE)) {
 155                 errno = EINVAL;
 156         }
 157
 158         return (ebuf);
 159 }