granicus.if.org Git - strace/blob - printsiginfo.c

   1 /*
   2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
   3  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
   4  * Copyright (c) 1993-1996 Rick Sladkey <jrs@world.std.com>
   5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
   6  * Copyright (c) 2001 John Hughes <john@Calva.COM>
   7  * Copyright (c) 2013 Denys Vlasenko <vda.linux@googlemail.com>
   8  * Copyright (c) 2011-2015 Dmitry V. Levin <ldv@altlinux.org>
   9  * Copyright (c) 2015 Elvira Khabirova <lineprinter0@gmail.com>
  10  * All rights reserved.
  11  *
  12  * Redistribution and use in source and binary forms, with or without
  13  * modification, are permitted provided that the following conditions
  14  * are met:
  15  * 1. Redistributions of source code must retain the above copyright
  16  *    notice, this list of conditions and the following disclaimer.
  17  * 2. Redistributions in binary form must reproduce the above copyright
  18  *    notice, this list of conditions and the following disclaimer in the
  19  *    documentation and/or other materials provided with the distribution.
  20  * 3. The name of the author may not be used to endorse or promote products
  21  *    derived from this software without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33  */
  34
  35 #include "defs.h"
  36
  37 #include DEF_MPERS_TYPE(siginfo_t)
  38
  39 #include <signal.h>
  40 #include <linux/audit.h>
  41
  42 #include MPERS_DEFS
  43
  44 #ifndef IN_MPERS
  45 #include "printsiginfo.h"
  46 #endif
  47
  48 #include "xlat/audit_arch.h"
  49 #include "xlat/sigbus_codes.h"
  50 #include "xlat/sigchld_codes.h"
  51 #include "xlat/sigfpe_codes.h"
  52 #include "xlat/sigill_codes.h"
  53 #include "xlat/siginfo_codes.h"
  54 #include "xlat/sigpoll_codes.h"
  55 #include "xlat/sigprof_codes.h"
  56 #include "xlat/sigsegv_codes.h"
  57 #include "xlat/sigsys_codes.h"
  58 #include "xlat/sigtrap_codes.h"
  59
  60 #ifdef SIGEMT
  61 # include "xlat/sigemt_codes.h"
  62 #endif
  63
  64 #ifndef SI_FROMUSER
  65 # define SI_FROMUSER(sip)       ((sip)->si_code <= 0)
  66 #endif
  67
  68 static void
  69 printsigsource(const siginfo_t *sip)
  70 {
  71         tprintf(", si_pid=%u, si_uid=%u",
  72                 (unsigned int) sip->si_pid,
  73                 (unsigned int) sip->si_uid);
  74 }
  75
  76 static void
  77 printsigval(const siginfo_t *sip)
  78 {
  79         tprintf(", si_value={int=%d, ptr=%#lx}",
  80                 sip->si_int, (unsigned long) sip->si_ptr);
  81 }
  82
  83 static void
  84 print_si_code(int si_signo, unsigned int si_code)
  85 {
  86         const char *code = xlookup(siginfo_codes, si_code);
  87
  88         if (!code) {
  89                 switch (si_signo) {
  90                 case SIGTRAP:
  91                         code = xlookup(sigtrap_codes, si_code);
  92                         break;
  93                 case SIGCHLD:
  94                         code = xlookup(sigchld_codes, si_code);
  95                         break;
  96                 case SIGPOLL:
  97                         code = xlookup(sigpoll_codes, si_code);
  98                         break;
  99                 case SIGPROF:
 100                         code = xlookup(sigprof_codes, si_code);
 101                         break;
 102                 case SIGILL:
 103                         code = xlookup(sigill_codes, si_code);
 104                         break;
 105 #ifdef SIGEMT
 106                 case SIGEMT:
 107                         code = xlookup(sigemt_codes, si_code);
 108                         break;
 109 #endif
 110                 case SIGFPE:
 111                         code = xlookup(sigfpe_codes, si_code);
 112                         break;
 113                 case SIGSEGV:
 114                         code = xlookup(sigsegv_codes, si_code);
 115                         break;
 116                 case SIGBUS:
 117                         code = xlookup(sigbus_codes, si_code);
 118                         break;
 119                 case SIGSYS:
 120                         code = xlookup(sigsys_codes, si_code);
 121                         break;
 122                 }
 123         }
 124
 125         if (code)
 126                 tprints(code);
 127         else
 128                 tprintf("%#x", si_code);
 129 }
 130
 131 static void
 132 print_si_info(const siginfo_t *sip)
 133 {
 134         if (sip->si_errno) {
 135                 tprints(", si_errno=");
 136                 if ((unsigned) sip->si_errno < nerrnos
 137                     && errnoent[sip->si_errno])
 138                         tprints(errnoent[sip->si_errno]);
 139                 else
 140                         tprintf("%d", sip->si_errno);
 141         }
 142
 143         if (SI_FROMUSER(sip)) {
 144                 switch (sip->si_code) {
 145                 case SI_USER:
 146                         printsigsource(sip);
 147                         break;
 148                 case SI_TKILL:
 149                         printsigsource(sip);
 150                         break;
 151 #if defined HAVE_SIGINFO_T_SI_TIMERID && defined HAVE_SIGINFO_T_SI_OVERRUN
 152                 case SI_TIMER:
 153                         tprintf(", si_timerid=%#x, si_overrun=%d",
 154                                 sip->si_timerid, sip->si_overrun);
 155                         printsigval(sip);
 156                         break;
 157 #endif
 158                 default:
 159                         printsigsource(sip);
 160                         if (sip->si_ptr)
 161                                 printsigval(sip);
 162                         break;
 163                 }
 164         } else {
 165                 switch (sip->si_signo) {
 166                 case SIGCHLD:
 167                         printsigsource(sip);
 168                         tprints(", si_status=");
 169                         if (sip->si_code == CLD_EXITED)
 170                                 tprintf("%d", sip->si_status);
 171                         else
 172                                 printsignal(sip->si_status);
 173                         tprintf(", si_utime=%llu, si_stime=%llu",
 174                                 (unsigned long long) sip->si_utime,
 175                                 (unsigned long long) sip->si_stime);
 176                         break;
 177                 case SIGILL: case SIGFPE:
 178                 case SIGSEGV: case SIGBUS:
 179                         tprintf(", si_addr=%#lx",
 180                                 (unsigned long) sip->si_addr);
 181                         break;
 182                 case SIGPOLL:
 183                         switch (sip->si_code) {
 184                         case POLL_IN: case POLL_OUT: case POLL_MSG:
 185                                 tprintf(", si_band=%ld",
 186                                         (long) sip->si_band);
 187                                 break;
 188                         }
 189                         break;
 190 #ifdef HAVE_SIGINFO_T_SI_SYSCALL
 191                 case SIGSYS:
 192                         tprintf(", si_call_addr=%#lx, si_syscall=__NR_%s, si_arch=",
 193                                 (unsigned long) sip->si_call_addr,
 194                                 syscall_name((unsigned) sip->si_syscall));
 195                         printxval(audit_arch, sip->si_arch, "AUDIT_ARCH_???");
 196                         break;
 197 #endif
 198                 default:
 199                         if (sip->si_pid || sip->si_uid)
 200                                 printsigsource(sip);
 201                         if (sip->si_ptr)
 202                                 printsigval(sip);
 203                 }
 204         }
 205 }
 206
 207 #ifdef IN_MPERS
 208 static
 209 #endif
 210 void
 211 printsiginfo(const siginfo_t *sip)
 212 {
 213         if (sip->si_signo == 0) {
 214                 tprints("{}");
 215                 return;
 216         }
 217         tprints("{si_signo=");
 218         printsignal(sip->si_signo);
 219
 220         tprints(", si_code=");
 221         print_si_code(sip->si_signo, sip->si_code);
 222
 223 #ifdef SI_NOINFO
 224         if (sip->si_code != SI_NOINFO)
 225 #endif
 226                 print_si_info(sip);
 227
 228         tprints("}");
 229 }
 230
 231 MPERS_PRINTER_DECL(void, printsiginfo_at,
 232                    struct tcb *tcp, long addr)
 233 {
 234         siginfo_t si;
 235
 236         if (!umove_or_printaddr(tcp, addr, &si))
 237                 printsiginfo(&si);
 238 }
 239
 240 static bool
 241 print_siginfo_t(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
 242 {
 243         printsiginfo((const siginfo_t *) elem_buf);
 244         return true;
 245 }
 246
 247 MPERS_PRINTER_DECL(void, print_siginfo_array,
 248                    struct tcb *tcp, unsigned long addr, unsigned long len)
 249 {
 250         siginfo_t si;
 251
 252         print_array(tcp, addr, len, &si, sizeof(si),
 253                     umoven_or_printaddr, print_siginfo_t, 0);
 254 }