granicus.if.org Git - strace/blob - signal.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, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
   5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
   6  * Copyright (c) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation
   7  *                     Linux for s390 port by D.J. Barrow
   8  *                    <barrow_dj@mail.yahoo.com,djbarrow@de.ibm.com>
   9  * All rights reserved.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  * 3. The name of the author may not be used to endorse or promote products
  20  *    derived from this software without specific prior written permission.
  21  *
  22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include "defs.h"
  35 #include <signal.h>
  36
  37 #ifndef NSIG
  38 # warning NSIG is not defined, using 32
  39 # define NSIG 32
  40 #elif NSIG < 32
  41 # error NSIG < 32
  42 #endif
  43
  44 /* The libc headers do not define this constant since it should only be
  45    used by the implementation.  So we define it here.  */
  46 #ifndef SA_RESTORER
  47 # ifdef ASM_SA_RESTORER
  48 #  define SA_RESTORER ASM_SA_RESTORER
  49 # endif
  50 #endif
  51
  52 /*
  53  * Some architectures define SA_RESTORER in their headers,
  54  * but do not actually have sa_restorer.
  55  *
  56  * Some architectures, otherwise, do not define SA_RESTORER in their headers,
  57  * but actually have sa_restorer.
  58  */
  59 #ifdef SA_RESTORER
  60 # if defined HPPA || defined IA64
  61 #  define HAVE_SA_RESTORER 0
  62 # else
  63 #  define HAVE_SA_RESTORER 1
  64 # endif
  65 #else /* !SA_RESTORER */
  66 # if defined SPARC || defined SPARC64 || defined M68K
  67 #  define HAVE_SA_RESTORER 1
  68 # else
  69 #  define HAVE_SA_RESTORER 0
  70 # endif
  71 #endif
  72
  73 #include "xlat/sa_handler_values.h"
  74 #include "xlat/sigact_flags.h"
  75 #include "xlat/sigprocmaskcmds.h"
  76
  77 /* Anonymous realtime signals. */
  78 #ifndef ASM_SIGRTMIN
  79 /* Linux kernel >= 3.18 defines SIGRTMIN to 32 on all architectures. */
  80 # define ASM_SIGRTMIN 32
  81 #endif
  82 #ifndef ASM_SIGRTMAX
  83 /* Under glibc 2.1, SIGRTMAX et al are functions, but __SIGRTMAX is a
  84    constant.  This is what we want.  Otherwise, just use SIGRTMAX. */
  85 # ifdef SIGRTMAX
  86 #  ifndef __SIGRTMAX
  87 #   define __SIGRTMAX SIGRTMAX
  88 #  endif
  89 # endif
  90 # ifdef __SIGRTMAX
  91 #  define ASM_SIGRTMAX __SIGRTMAX
  92 # endif
  93 #endif
  94
  95 /* Note on the size of sigset_t:
  96  *
  97  * In glibc, sigset_t is an array with space for 1024 bits (!),
  98  * even though all arches supported by Linux have only 64 signals
  99  * except MIPS, which has 128. IOW, it is 128 bytes long.
 100  *
 101  * In-kernel sigset_t is sized correctly (it is either 64 or 128 bit long).
 102  * However, some old syscall return only 32 lower bits (one word).
 103  * Example: sys_sigpending vs sys_rt_sigpending.
 104  *
 105  * Be aware of this fact when you try to
 106  *     memcpy(&tcp->u_arg[1], &something, sizeof(sigset_t))
 107  * - sizeof(sigset_t) is much bigger than you think,
 108  * it may overflow tcp->u_arg[] array, and it may try to copy more data
 109  * than is really available in <something>.
 110  * Similarly,
 111  *     umoven(tcp, addr, sizeof(sigset_t), &sigset)
 112  * may be a bad idea: it'll try to read much more data than needed
 113  * to fetch a sigset_t.
 114  * Use (NSIG / 8) as a size instead.
 115  */
 116
 117 static const char *
 118 get_sa_handler_str(kernel_ureg_t handler)
 119 {
 120         return xlookup(sa_handler_values, handler);
 121 }
 122
 123 static void
 124 print_sa_handler(kernel_ureg_t handler)
 125 {
 126         const char *sa_handler_str = get_sa_handler_str(handler);
 127
 128         if (sa_handler_str)
 129                 tprints(sa_handler_str);
 130         else
 131                 printaddr(handler);
 132 }
 133
 134 const char *
 135 signame(const int sig)
 136 {
 137         static char buf[sizeof("SIGRT_%u") + sizeof(int)*3];
 138
 139         if (sig >= 0) {
 140                 const unsigned int s = sig;
 141
 142                 if (s < nsignals)
 143                         return signalent[s];
 144 #ifdef ASM_SIGRTMAX
 145                 if (s >= ASM_SIGRTMIN && s <= (unsigned int) ASM_SIGRTMAX) {
 146                         sprintf(buf, "SIGRT_%u", s - ASM_SIGRTMIN);
 147                         return buf;
 148                 }
 149 #endif
 150         }
 151         sprintf(buf, "%d", sig);
 152         return buf;
 153 }
 154
 155 static unsigned int
 156 popcount32(const uint32_t *a, unsigned int size)
 157 {
 158         unsigned int count = 0;
 159
 160         for (; size; ++a, --size) {
 161                 uint32_t x = *a;
 162
 163 #ifdef HAVE___BUILTIN_POPCOUNT
 164                 count += __builtin_popcount(x);
 165 #else
 166                 for (; x; ++count)
 167                         x &= x - 1;
 168 #endif
 169         }
 170
 171         return count;
 172 }
 173
 174 const char *
 175 sprintsigmask_n(const char *prefix, const void *sig_mask, unsigned int bytes)
 176 {
 177         /*
 178          * The maximum number of signal names to be printed is NSIG * 2 / 3.
 179          * Most of signal names have length 7,
 180          * average length of signal names is less than 7.
 181          * The length of prefix string does not exceed 16.
 182          */
 183         static char outstr[128 + 8 * (NSIG * 2 / 3)];
 184
 185         char *s;
 186         const uint32_t *mask;
 187         uint32_t inverted_mask[NSIG / 32];
 188         unsigned int size;
 189         int i;
 190         char sep;
 191
 192         s = stpcpy(outstr, prefix);
 193
 194         mask = sig_mask;
 195         /* length of signal mask in 4-byte words */
 196         size = (bytes >= NSIG / 8) ? NSIG / 32 : (bytes + 3) / 4;
 197
 198         /* check whether 2/3 or more bits are set */
 199         if (popcount32(mask, size) >= size * 32 * 2 / 3) {
 200                 /* show those signals that are NOT in the mask */
 201                 unsigned int j;
 202                 for (j = 0; j < size; ++j)
 203                         inverted_mask[j] = ~mask[j];
 204                 mask = inverted_mask;
 205                 *s++ = '~';
 206         }
 207
 208         sep = '[';
 209         for (i = 0; (i = next_set_bit(mask, i, size * 32)) >= 0; ) {
 210                 ++i;
 211                 *s++ = sep;
 212                 if ((unsigned) i < nsignals) {
 213                         s = stpcpy(s, signalent[i] + 3);
 214                 }
 215 #ifdef ASM_SIGRTMAX
 216                 else if (i >= ASM_SIGRTMIN && i <= ASM_SIGRTMAX) {
 217                         s += sprintf(s, "RT_%u", i - ASM_SIGRTMIN);
 218                 }
 219 #endif
 220                 else {
 221                         s += sprintf(s, "%u", i);
 222                 }
 223                 sep = ' ';
 224         }
 225         if (sep == '[')
 226                 *s++ = sep;
 227         *s++ = ']';
 228         *s = '\0';
 229         return outstr;
 230 }
 231
 232 #define sprintsigmask_val(prefix, mask) \
 233         sprintsigmask_n((prefix), &(mask), sizeof(mask))
 234
 235 #define tprintsigmask_val(prefix, mask) \
 236         tprints(sprintsigmask_n((prefix), &(mask), sizeof(mask)))
 237
 238 void
 239 printsignal(int nr)
 240 {
 241         tprints(signame(nr));
 242 }
 243
 244 static void
 245 print_sigset_addr_len_limit(struct tcb *const tcp, const kernel_ureg_t addr,
 246                             const kernel_ureg_t len, const unsigned int min_len)
 247 {
 248         /*
 249          * Here len is usually equal to NSIG / 8 or current_wordsize.
 250          * But we code this defensively:
 251          */
 252         if (len < min_len || len > NSIG / 8) {
 253                 printaddr(addr);
 254                 return;
 255         }
 256         int mask[NSIG / 8 / sizeof(int)] = {};
 257         if (umoven_or_printaddr(tcp, addr, len, mask))
 258                 return;
 259         tprints(sprintsigmask_n("", mask, len));
 260 }
 261
 262 void
 263 print_sigset_addr_len(struct tcb *const tcp, const kernel_ureg_t addr,
 264                       const kernel_ureg_t len)
 265 {
 266         print_sigset_addr_len_limit(tcp, addr, len, current_wordsize);
 267 }
 268
 269 SYS_FUNC(sigsetmask)
 270 {
 271         if (entering(tcp)) {
 272                 tprintsigmask_val("", tcp->u_arg[0]);
 273         }
 274         else if (!syserror(tcp)) {
 275                 tcp->auxstr = sprintsigmask_val("old mask ", tcp->u_rval);
 276                 return RVAL_HEX | RVAL_STR;
 277         }
 278         return 0;
 279 }
 280
 281 struct old_sigaction {
 282         /* sa_handler may be a libc #define, need to use other name: */
 283 #ifdef MIPS
 284         unsigned int sa_flags;
 285         void (*__sa_handler)(int);
 286         /* Kernel treats sa_mask as an array of longs. */
 287         unsigned long sa_mask[NSIG / sizeof(long) ? NSIG / sizeof(long) : 1];
 288 #else
 289         void (*__sa_handler)(int);
 290         unsigned long sa_mask;
 291         unsigned long sa_flags;
 292 #endif /* !MIPS */
 293 #if HAVE_SA_RESTORER
 294         void (*sa_restorer)(void);
 295 #endif
 296 };
 297
 298 struct old_sigaction32 {
 299         /* sa_handler may be a libc #define, need to use other name: */
 300         uint32_t __sa_handler;
 301         uint32_t sa_mask;
 302         uint32_t sa_flags;
 303 #if HAVE_SA_RESTORER
 304         uint32_t sa_restorer;
 305 #endif
 306 };
 307
 308 static void
 309 decode_old_sigaction(struct tcb *const tcp, const kernel_ureg_t addr)
 310 {
 311         struct old_sigaction sa;
 312
 313 #if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
 314         if (current_wordsize != sizeof(sa.__sa_handler) && current_wordsize == 4) {
 315                 struct old_sigaction32 sa32;
 316
 317                 if (umove_or_printaddr(tcp, addr, &sa32))
 318                         return;
 319
 320                 memset(&sa, 0, sizeof(sa));
 321                 sa.__sa_handler = (void*)(uintptr_t)sa32.__sa_handler;
 322                 sa.sa_flags = sa32.sa_flags;
 323 #if HAVE_SA_RESTORER && defined SA_RESTORER
 324                 sa.sa_restorer = (void*)(uintptr_t)sa32.sa_restorer;
 325 #endif
 326                 sa.sa_mask = sa32.sa_mask;
 327         } else
 328 #endif
 329         if (umove_or_printaddr(tcp, addr, &sa))
 330                 return;
 331
 332         /* Architectures using function pointers, like
 333          * hppa, may need to manipulate the function pointer
 334          * to compute the result of a comparison. However,
 335          * the __sa_handler function pointer exists only in
 336          * the address space of the traced process, and can't
 337          * be manipulated by strace. In order to prevent the
 338          * compiler from generating code to manipulate
 339          * __sa_handler we cast the function pointers to long. */
 340         tprints("{sa_handler=");
 341         print_sa_handler((unsigned long) sa.__sa_handler);
 342         tprints(", sa_mask=");
 343 #ifdef MIPS
 344         tprintsigmask_addr("", sa.sa_mask);
 345 #else
 346         tprintsigmask_val("", sa.sa_mask);
 347 #endif
 348         tprints(", sa_flags=");
 349         printflags(sigact_flags, sa.sa_flags, "SA_???");
 350 #if HAVE_SA_RESTORER && defined SA_RESTORER
 351         if (sa.sa_flags & SA_RESTORER)
 352                 tprintf(", sa_restorer=%p", sa.sa_restorer);
 353 #endif
 354         tprints("}");
 355 }
 356
 357 SYS_FUNC(sigaction)
 358 {
 359         if (entering(tcp)) {
 360                 printsignal(tcp->u_arg[0]);
 361                 tprints(", ");
 362                 decode_old_sigaction(tcp, tcp->u_arg[1]);
 363                 tprints(", ");
 364         } else
 365                 decode_old_sigaction(tcp, tcp->u_arg[2]);
 366         return 0;
 367 }
 368
 369 SYS_FUNC(signal)
 370 {
 371         if (entering(tcp)) {
 372                 printsignal(tcp->u_arg[0]);
 373                 tprints(", ");
 374                 print_sa_handler(tcp->u_arg[1]);
 375                 return 0;
 376         } else if (!syserror(tcp)) {
 377                 tcp->auxstr = get_sa_handler_str(tcp->u_rval);
 378                 return RVAL_HEX | RVAL_STR;
 379         }
 380         return 0;
 381 }
 382
 383 SYS_FUNC(siggetmask)
 384 {
 385         if (exiting(tcp)) {
 386                 tcp->auxstr = sprintsigmask_val("mask ", tcp->u_rval);
 387         }
 388         return RVAL_HEX | RVAL_STR;
 389 }
 390
 391 SYS_FUNC(sigsuspend)
 392 {
 393         tprintsigmask_val("", tcp->u_arg[2]);
 394
 395         return RVAL_DECODED;
 396 }
 397
 398 /* "Old" sigprocmask, which operates with word-sized signal masks */
 399 SYS_FUNC(sigprocmask)
 400 {
 401 # ifdef ALPHA
 402         if (entering(tcp)) {
 403                 /*
 404                  * Alpha/OSF is different: it doesn't pass in two pointers,
 405                  * but rather passes in the new bitmask as an argument and
 406                  * then returns the old bitmask.  This "works" because we
 407                  * only have 64 signals to worry about.  If you want more,
 408                  * use of the rt_sigprocmask syscall is required.
 409                  * Alpha:
 410                  *      old = osf_sigprocmask(how, new);
 411                  * Everyone else:
 412                  *      ret = sigprocmask(how, &new, &old, ...);
 413                  */
 414                 printxval(sigprocmaskcmds, tcp->u_arg[0], "SIG_???");
 415                 tprintsigmask_val(", ", tcp->u_arg[1]);
 416         }
 417         else if (!syserror(tcp)) {
 418                 tcp->auxstr = sprintsigmask_val("old mask ", tcp->u_rval);
 419                 return RVAL_HEX | RVAL_STR;
 420         }
 421 # else /* !ALPHA */
 422         if (entering(tcp)) {
 423                 printxval(sigprocmaskcmds, tcp->u_arg[0], "SIG_???");
 424                 tprints(", ");
 425                 print_sigset_addr_len(tcp, tcp->u_arg[1], current_wordsize);
 426                 tprints(", ");
 427         }
 428         else {
 429                 print_sigset_addr_len(tcp, tcp->u_arg[2], current_wordsize);
 430         }
 431 # endif /* !ALPHA */
 432         return 0;
 433 }
 434
 435 SYS_FUNC(kill)
 436 {
 437         tprintf("%d, %s",
 438                 (int) tcp->u_arg[0],
 439                 signame(tcp->u_arg[1]));
 440
 441         return RVAL_DECODED;
 442 }
 443
 444 SYS_FUNC(tgkill)
 445 {
 446         tprintf("%d, %d, %s",
 447                 (int) tcp->u_arg[0],
 448                 (int) tcp->u_arg[1],
 449                 signame(tcp->u_arg[2]));
 450
 451         return RVAL_DECODED;
 452 }
 453
 454 SYS_FUNC(sigpending)
 455 {
 456         if (exiting(tcp))
 457                 print_sigset_addr_len(tcp, tcp->u_arg[0], current_wordsize);
 458         return 0;
 459 }
 460
 461 SYS_FUNC(rt_sigprocmask)
 462 {
 463         /* Note: arg[3] is the length of the sigset. Kernel requires NSIG / 8 */
 464         if (entering(tcp)) {
 465                 printxval(sigprocmaskcmds, tcp->u_arg[0], "SIG_???");
 466                 tprints(", ");
 467                 print_sigset_addr_len(tcp, tcp->u_arg[1], tcp->u_arg[3]);
 468                 tprints(", ");
 469         }
 470         else {
 471                 print_sigset_addr_len(tcp, tcp->u_arg[2], tcp->u_arg[3]);
 472                 tprintf(", %lu", tcp->u_arg[3]);
 473         }
 474         return 0;
 475 }
 476
 477 /* Structure describing the action to be taken when a signal arrives.  */
 478 struct new_sigaction
 479 {
 480         /* sa_handler may be a libc #define, need to use other name: */
 481 #ifdef MIPS
 482         unsigned int sa_flags;
 483         void (*__sa_handler)(int);
 484 #else
 485         void (*__sa_handler)(int);
 486         unsigned long sa_flags;
 487 #endif /* !MIPS */
 488 #if HAVE_SA_RESTORER
 489         void (*sa_restorer)(void);
 490 #endif
 491         /* Kernel treats sa_mask as an array of longs. */
 492         unsigned long sa_mask[NSIG / sizeof(long) ? NSIG / sizeof(long) : 1];
 493 };
 494 /* Same for i386-on-x86_64 and similar cases */
 495 struct new_sigaction32
 496 {
 497         uint32_t __sa_handler;
 498         uint32_t sa_flags;
 499 #if HAVE_SA_RESTORER
 500         uint32_t sa_restorer;
 501 #endif
 502         uint32_t sa_mask[2 * (NSIG / sizeof(long) ? NSIG / sizeof(long) : 1)];
 503 };
 504
 505 static void
 506 decode_new_sigaction(struct tcb *const tcp, const kernel_ureg_t addr)
 507 {
 508         struct new_sigaction sa;
 509
 510 #if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
 511         if (current_wordsize != sizeof(sa.sa_flags) && current_wordsize == 4) {
 512                 struct new_sigaction32 sa32;
 513
 514                 if (umove_or_printaddr(tcp, addr, &sa32))
 515                         return;
 516
 517                 memset(&sa, 0, sizeof(sa));
 518                 sa.__sa_handler = (void*)(unsigned long)sa32.__sa_handler;
 519                 sa.sa_flags     = sa32.sa_flags;
 520 #if HAVE_SA_RESTORER && defined SA_RESTORER
 521                 sa.sa_restorer  = (void*)(unsigned long)sa32.sa_restorer;
 522 #endif
 523                 /* Kernel treats sa_mask as an array of longs.
 524                  * For 32-bit process, "long" is uint32_t, thus, for example,
 525                  * 32th bit in sa_mask will end up as bit 0 in sa_mask[1].
 526                  * But for (64-bit) kernel, 32th bit in sa_mask is
 527                  * 32th bit in 0th (64-bit) long!
 528                  * For little-endian, it's the same.
 529                  * For big-endian, we swap 32-bit words.
 530                  */
 531                 sa.sa_mask[0] = ULONG_LONG(sa32.sa_mask[0], sa32.sa_mask[1]);
 532         } else
 533 #endif
 534         if (umove_or_printaddr(tcp, addr, &sa))
 535                 return;
 536
 537         /* Architectures using function pointers, like
 538          * hppa, may need to manipulate the function pointer
 539          * to compute the result of a comparison. However,
 540          * the __sa_handler function pointer exists only in
 541          * the address space of the traced process, and can't
 542          * be manipulated by strace. In order to prevent the
 543          * compiler from generating code to manipulate
 544          * __sa_handler we cast the function pointers to long. */
 545         tprints("{sa_handler=");
 546         print_sa_handler((unsigned long) sa.__sa_handler);
 547         tprints(", sa_mask=");
 548         /*
 549          * Sigset size is in tcp->u_arg[4] (SPARC)
 550          * or in tcp->u_arg[3] (all other),
 551          * but kernel won't handle sys_rt_sigaction
 552          * with wrong sigset size (just returns EINVAL instead).
 553          * We just fetch the right size, which is NSIG / 8.
 554          */
 555         tprintsigmask_val("", sa.sa_mask);
 556         tprints(", sa_flags=");
 557
 558         printflags(sigact_flags, sa.sa_flags, "SA_???");
 559 #if HAVE_SA_RESTORER && defined SA_RESTORER
 560         if (sa.sa_flags & SA_RESTORER)
 561                 tprintf(", sa_restorer=%p", sa.sa_restorer);
 562 #endif
 563         tprints("}");
 564 }
 565
 566 SYS_FUNC(rt_sigaction)
 567 {
 568         if (entering(tcp)) {
 569                 printsignal(tcp->u_arg[0]);
 570                 tprints(", ");
 571                 decode_new_sigaction(tcp, tcp->u_arg[1]);
 572                 tprints(", ");
 573         } else {
 574                 decode_new_sigaction(tcp, tcp->u_arg[2]);
 575 #if defined(SPARC) || defined(SPARC64)
 576                 tprintf(", %#lx, %lu", tcp->u_arg[3], tcp->u_arg[4]);
 577 #elif defined(ALPHA)
 578                 tprintf(", %lu, %#lx", tcp->u_arg[3], tcp->u_arg[4]);
 579 #else
 580                 tprintf(", %lu", tcp->u_arg[3]);
 581 #endif
 582         }
 583         return 0;
 584 }
 585
 586 SYS_FUNC(rt_sigpending)
 587 {
 588         if (exiting(tcp)) {
 589                 /*
 590                  * One of the few syscalls where sigset size (arg[1])
 591                  * is allowed to be <= NSIG / 8, not strictly ==.
 592                  * This allows non-rt sigpending() syscall
 593                  * to reuse rt_sigpending() code in kernel.
 594                  */
 595                 print_sigset_addr_len_limit(tcp, tcp->u_arg[0],
 596                                             tcp->u_arg[1], 1);
 597                 tprintf(", %lu", tcp->u_arg[1]);
 598         }
 599         return 0;
 600 }
 601
 602 SYS_FUNC(rt_sigsuspend)
 603 {
 604         /* NB: kernel requires arg[1] == NSIG / 8 */
 605         print_sigset_addr_len(tcp, tcp->u_arg[0], tcp->u_arg[1]);
 606         tprintf(", %lu", tcp->u_arg[1]);
 607
 608         return RVAL_DECODED;
 609 }
 610
 611 static void
 612 print_sigqueueinfo(struct tcb *const tcp, const int sig,
 613                    const kernel_ureg_t addr)
 614 {
 615         printsignal(sig);
 616         tprints(", ");
 617         printsiginfo_at(tcp, addr);
 618 }
 619
 620 SYS_FUNC(rt_sigqueueinfo)
 621 {
 622         tprintf("%d, ", (int) tcp->u_arg[0]);
 623         print_sigqueueinfo(tcp, tcp->u_arg[1], tcp->u_arg[2]);
 624
 625         return RVAL_DECODED;
 626 }
 627
 628 SYS_FUNC(rt_tgsigqueueinfo)
 629 {
 630         tprintf("%d, %d, ", (int) tcp->u_arg[0], (int) tcp->u_arg[1]);
 631         print_sigqueueinfo(tcp, tcp->u_arg[2], tcp->u_arg[3]);
 632
 633         return RVAL_DECODED;
 634 }
 635
 636 SYS_FUNC(rt_sigtimedwait)
 637 {
 638         /* NB: kernel requires arg[3] == NSIG / 8 */
 639         if (entering(tcp)) {
 640                 print_sigset_addr_len(tcp, tcp->u_arg[0], tcp->u_arg[3]);
 641                 tprints(", ");
 642                 if (!(tcp->u_arg[1] && verbose(tcp))) {
 643                         /*
 644                          * This is the only "return" parameter,
 645                          * if we are not going to fetch it on exit,
 646                          * decode all parameters on entry.
 647                          */
 648                         printaddr(tcp->u_arg[1]);
 649                         tprints(", ");
 650                         print_timespec(tcp, tcp->u_arg[2]);
 651                         tprintf(", %lu", tcp->u_arg[3]);
 652                 } else {
 653                         char *sts = xstrdup(sprint_timespec(tcp, tcp->u_arg[2]));
 654                         set_tcb_priv_data(tcp, sts, free);
 655                 }
 656         } else {
 657                 if (tcp->u_arg[1] && verbose(tcp)) {
 658                         printsiginfo_at(tcp, tcp->u_arg[1]);
 659                         tprints(", ");
 660                         tprints(get_tcb_priv_data(tcp));
 661                         tprintf(", %lu", tcp->u_arg[3]);
 662                 }
 663
 664                 if (!syserror(tcp) && tcp->u_rval) {
 665                         tcp->auxstr = signame(tcp->u_rval);
 666                         return RVAL_STR;
 667                 }
 668         }
 669         return 0;
 670 };
 671
 672 SYS_FUNC(restart_syscall)
 673 {
 674         tprintf("<... resuming interrupted %s ...>",
 675                 tcp->s_prev_ent ? tcp->s_prev_ent->sys_name : "system call");
 676
 677         return RVAL_DECODED;
 678 }