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  * Copyright (c) 2015-2018 The strace developers.
  11  * All rights reserved.
  12  *
  13  * Redistribution and use in source and binary forms, with or without
  14  * modification, are permitted provided that the following conditions
  15  * are met:
  16  * 1. Redistributions of source code must retain the above copyright
  17  *    notice, this list of conditions and the following disclaimer.
  18  * 2. Redistributions in binary form must reproduce the above copyright
  19  *    notice, this list of conditions and the following disclaimer in the
  20  *    documentation and/or other materials provided with the distribution.
  21  * 3. The name of the author may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  28  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  29  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  30  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  32  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  33  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  */
  35
  36 #include "defs.h"
  37
  38 #include DEF_MPERS_TYPE(siginfo_t)
  39
  40 #include <signal.h>
  41 #include <linux/audit.h>
  42
  43 #include MPERS_DEFS
  44
  45 #include "nr_prefix.c"
  46
  47 #ifndef IN_MPERS
  48 #include "printsiginfo.h"
  49 #endif
  50
  51 #include "xlat/audit_arch.h"
  52 #include "xlat/sigbus_codes.h"
  53 #include "xlat/sigchld_codes.h"
  54 #include "xlat/sigfpe_codes.h"
  55 #include "xlat/sigill_codes.h"
  56 #include "xlat/siginfo_codes.h"
  57 #include "xlat/sigpoll_codes.h"
  58 #include "xlat/sigprof_codes.h"
  59 #include "xlat/sigsegv_codes.h"
  60 #include "xlat/sigsys_codes.h"
  61 #include "xlat/sigtrap_codes.h"
  62
  63 #ifdef SIGEMT
  64 # include "xlat/sigemt_codes.h"
  65 #endif
  66
  67 #ifndef SI_FROMUSER
  68 # define SI_FROMUSER(sip)       ((sip)->si_code <= 0)
  69 #endif
  70
  71 static void
  72 printsigsource(const siginfo_t *sip)
  73 {
  74         tprintf(", si_pid=%u, si_uid=%u",
  75                 (unsigned int) sip->si_pid,
  76                 (unsigned int) sip->si_uid);
  77 }
  78
  79 static void
  80 printsigval(const siginfo_t *sip)
  81 {
  82         tprintf(", si_value={int=%d, ptr=", sip->si_int);
  83         printaddr(ptr_to_kulong(sip->si_ptr));
  84         tprints("}");
  85 }
  86
  87 static void
  88 print_si_code(int si_signo, unsigned int si_code)
  89 {
  90         const char *code = xlookup(siginfo_codes, si_code);
  91
  92         if (!code) {
  93                 switch (si_signo) {
  94                 case SIGTRAP:
  95                         code = xlookup(sigtrap_codes, si_code);
  96                         break;
  97                 case SIGCHLD:
  98                         code = xlookup(sigchld_codes, si_code);
  99                         break;
 100                 case SIGPOLL:
 101                         code = xlookup(sigpoll_codes, si_code);
 102                         break;
 103                 case SIGPROF:
 104                         code = xlookup(sigprof_codes, si_code);
 105                         break;
 106                 case SIGILL:
 107                         code = xlookup(sigill_codes, si_code);
 108                         break;
 109 #ifdef SIGEMT
 110                 case SIGEMT:
 111                         code = xlookup(sigemt_codes, si_code);
 112                         break;
 113 #endif
 114                 case SIGFPE:
 115                         code = xlookup(sigfpe_codes, si_code);
 116                         break;
 117                 case SIGSEGV:
 118                         code = xlookup(sigsegv_codes, si_code);
 119                         break;
 120                 case SIGBUS:
 121                         code = xlookup(sigbus_codes, si_code);
 122                         break;
 123                 case SIGSYS:
 124                         code = xlookup(sigsys_codes, si_code);
 125                         break;
 126                 }
 127         }
 128
 129         print_xlat_ex(si_code, code, XLAT_STYLE_DEFAULT);
 130 }
 131
 132 static void
 133 print_si_info(const siginfo_t *sip)
 134 {
 135         if (sip->si_errno) {
 136                 tprints(", si_errno=");
 137                 if ((unsigned) sip->si_errno < nerrnos
 138                     && errnoent[sip->si_errno])
 139                         tprints(errnoent[sip->si_errno]);
 140                 else
 141                         tprintf("%d", sip->si_errno);
 142         }
 143
 144         if (SI_FROMUSER(sip)) {
 145                 switch (sip->si_code) {
 146                 case SI_USER:
 147                         printsigsource(sip);
 148                         break;
 149                 case SI_TKILL:
 150                         printsigsource(sip);
 151                         break;
 152 #if defined HAVE_SIGINFO_T_SI_TIMERID && defined HAVE_SIGINFO_T_SI_OVERRUN
 153                 case SI_TIMER:
 154                         tprintf(", si_timerid=%#x, si_overrun=%d",
 155                                 sip->si_timerid, sip->si_overrun);
 156                         printsigval(sip);
 157                         break;
 158 #endif
 159                 default:
 160                         printsigsource(sip);
 161                         if (sip->si_ptr)
 162                                 printsigval(sip);
 163                         break;
 164                 }
 165         } else {
 166                 switch (sip->si_signo) {
 167                 case SIGCHLD:
 168                         printsigsource(sip);
 169                         tprints(", si_status=");
 170                         if (sip->si_code == CLD_EXITED)
 171                                 tprintf("%d", sip->si_status);
 172                         else
 173                                 printsignal(sip->si_status);
 174                         tprintf(", si_utime=%llu, si_stime=%llu",
 175                                 zero_extend_signed_to_ull(sip->si_utime),
 176                                 zero_extend_signed_to_ull(sip->si_stime));
 177                         break;
 178                 case SIGILL: case SIGFPE:
 179                 case SIGSEGV: case SIGBUS:
 180                         tprints(", si_addr=");
 181                         printaddr(ptr_to_kulong(sip->si_addr));
 182                         break;
 183                 case SIGPOLL:
 184                         switch (sip->si_code) {
 185                         case POLL_IN: case POLL_OUT: case POLL_MSG:
 186                                 tprintf(", si_band=%ld",
 187                                         (long) sip->si_band);
 188                                 break;
 189                         }
 190                         break;
 191 #ifdef HAVE_SIGINFO_T_SI_SYSCALL
 192                 case SIGSYS: {
 193                         /*
 194                          * Note that we can safely use the personlity set in
 195                          * current_personality  here (and don't have to guess it
 196                          * based on X32_SYSCALL_BIT and si_arch, for example):
 197                          *  - The signal is delivered as a result of seccomp
 198                          *    filtering to the process executing forbidden
 199                          *    syscall.
 200                          *  - We have set the personality for the tracee during
 201                          *    the syscall entering.
 202                          *  - The current_personality is reliably switched in
 203                          *    the next_event routine, it is set to the
 204                          *    personality of the last call made (the one that
 205                          *    triggered the signal delivery).
 206                          *  - Looks like there are no other cases where SIGSYS
 207                          *    is delivered from the kernel so far.
 208                          */
 209                         const char *scname = syscall_name(shuffle_scno(
 210                                 (unsigned) sip->si_syscall));
 211
 212                         tprints(", si_call_addr=");
 213                         printaddr(ptr_to_kulong(sip->si_call_addr));
 214                         tprints(", si_syscall=");
 215                         if (scname)
 216                                 tprintf("%s%s",
 217                                         nr_prefix(sip->si_syscall), scname);
 218                         else
 219                                 tprintf("%u", (unsigned) sip->si_syscall);
 220                         tprints(", si_arch=");
 221                         printxval(audit_arch, sip->si_arch, "AUDIT_ARCH_???");
 222                         break;
 223                 }
 224 #endif
 225                 default:
 226                         if (sip->si_pid || sip->si_uid)
 227                                 printsigsource(sip);
 228                         if (sip->si_ptr)
 229                                 printsigval(sip);
 230                 }
 231         }
 232 }
 233
 234 #ifdef IN_MPERS
 235 static
 236 #endif
 237 void
 238 printsiginfo(const siginfo_t *sip)
 239 {
 240         if (sip->si_signo == 0) {
 241                 tprints("{}");
 242                 return;
 243         }
 244         tprints("{si_signo=");
 245         printsignal(sip->si_signo);
 246
 247         tprints(", si_code=");
 248         print_si_code(sip->si_signo, sip->si_code);
 249
 250 #ifdef SI_NOINFO
 251         if (sip->si_code != SI_NOINFO)
 252 #endif
 253                 print_si_info(sip);
 254
 255         tprints("}");
 256 }
 257
 258 MPERS_PRINTER_DECL(void, printsiginfo_at,
 259                    struct tcb *const tcp, const kernel_ulong_t addr)
 260 {
 261         siginfo_t si;
 262
 263         if (!umove_or_printaddr(tcp, addr, &si))
 264                 printsiginfo(&si);
 265 }
 266
 267 static bool
 268 print_siginfo_t(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
 269 {
 270         printsiginfo((const siginfo_t *) elem_buf);
 271         return true;
 272 }
 273
 274 MPERS_PRINTER_DECL(void, print_siginfo_array, struct tcb *const tcp,
 275                    const kernel_ulong_t addr, const kernel_ulong_t len)
 276 {
 277         siginfo_t si;
 278
 279         print_array(tcp, addr, len, &si, sizeof(si),
 280                     umoven_or_printaddr, print_siginfo_t, 0);
 281 }