arch/sparc64/kernel/ptrace.c

   1 /* ptrace.c: Sparc process tracing support.
   2  *
   3  * Copyright (C) 1996 David S. Miller (davem@caipfs.rutgers.edu)
   4  * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   5  *
   6  * Based upon code written by Ross Biro, Linus Torvalds, Bob Manson,
   7  * and David Mosberger.
   8  *
   9  * Added Linux support -miguel (weird, eh?, the original code was meant
  10  * to emulate SunOS).
  11  */
  12
  13 #include <linux/kernel.h>
  14 #include <linux/sched.h>
  15 #include <linux/mm.h>
  16 #include <linux/errno.h>
  17 #include <linux/ptrace.h>
  18 #include <linux/user.h>
  19 #include <linux/smp.h>
  20 #include <linux/smp_lock.h>
  21 #include <linux/security.h>
  22 #include <linux/seccomp.h>
  23 #include <linux/audit.h>
  24 #include <linux/signal.h>
  25
  26 #include <asm/asi.h>
  27 #include <asm/pgtable.h>
  28 #include <asm/system.h>
  29 #include <asm/uaccess.h>
  30 #include <asm/psrcompat.h>
  31 #include <asm/visasm.h>
  32 #include <asm/spitfire.h>
  33 #include <asm/page.h>
  34 #include <asm/cpudata.h>
  35
  36 /* Returning from ptrace is a bit tricky because the syscall return
  37  * low level code assumes any value returned which is negative and
  38  * is a valid errno will mean setting the condition codes to indicate
  39  * an error return.  This doesn't work, so we have this hook.
  40  */
  41 static inline void pt_error_return(struct pt_regs *regs, unsigned long error)
  42 {
  43         regs->u_regs[UREG_I0] = error;
  44         regs->tstate |= (TSTATE_ICARRY | TSTATE_XCARRY);
  45         regs->tpc = regs->tnpc;
  46         regs->tnpc += 4;
  47 }
  48
  49 static inline void pt_succ_return(struct pt_regs *regs, unsigned long value)
  50 {
  51         regs->u_regs[UREG_I0] = value;
  52         regs->tstate &= ~(TSTATE_ICARRY | TSTATE_XCARRY);
  53         regs->tpc = regs->tnpc;
  54         regs->tnpc += 4;
  55 }
  56
  57 static inline void
  58 pt_succ_return_linux(struct pt_regs *regs, unsigned long value, void __user *addr)
  59 {
  60         if (test_thread_flag(TIF_32BIT)) {
  61                 if (put_user(value, (unsigned int __user *) addr)) {
  62                         pt_error_return(regs, EFAULT);
  63                         return;
  64                 }
  65         } else {
  66                 if (put_user(value, (long __user *) addr)) {
  67                         pt_error_return(regs, EFAULT);
  68                         return;
  69                 }
  70         }
  71         regs->u_regs[UREG_I0] = 0;
  72         regs->tstate &= ~(TSTATE_ICARRY | TSTATE_XCARRY);
  73         regs->tpc = regs->tnpc;
  74         regs->tnpc += 4;
  75 }
  76
  77 static void
  78 pt_os_succ_return (struct pt_regs *regs, unsigned long val, void __user *addr)
  79 {
  80         if (current->personality == PER_SUNOS)
  81                 pt_succ_return (regs, val);
  82         else
  83                 pt_succ_return_linux (regs, val, addr);
  84 }
  85
  86 /* #define ALLOW_INIT_TRACING */
  87 /* #define DEBUG_PTRACE */
  88
  89 #ifdef DEBUG_PTRACE
  90 char *pt_rq [] = {
  91         /* 0  */ "TRACEME", "PEEKTEXT", "PEEKDATA", "PEEKUSR",
  92         /* 4  */ "POKETEXT", "POKEDATA", "POKEUSR", "CONT",
  93         /* 8  */ "KILL", "SINGLESTEP", "SUNATTACH", "SUNDETACH",
  94         /* 12 */ "GETREGS", "SETREGS", "GETFPREGS", "SETFPREGS",
  95         /* 16 */ "READDATA", "WRITEDATA", "READTEXT", "WRITETEXT",
  96         /* 20 */ "GETFPAREGS", "SETFPAREGS", "unknown", "unknown",
  97         /* 24 */ "SYSCALL", ""
  98 };
  99 #endif
 100
 101 /*
 102  * Called by kernel/ptrace.c when detaching..
 103  *
 104  * Make sure single step bits etc are not set.
 105  */
 106 void ptrace_disable(struct task_struct *child)
 107 {
 108         /* nothing to do */
 109 }
 110
 111 /* To get the necessary page struct, access_process_vm() first calls
 112  * get_user_pages().  This has done a flush_dcache_page() on the
 113  * accessed page.  Then our caller (copy_{to,from}_user_page()) did
 114  * to memcpy to read/write the data from that page.
 115  *
 116  * Now, the only thing we have to do is:
 117  * 1) flush the D-cache if it's possible than an illegal alias
 118  *    has been created
 119  * 2) flush the I-cache if this is pre-cheetah and we did a write
 120  */
 121 void flush_ptrace_access(struct vm_area_struct *vma, struct page *page,
 122                          unsigned long uaddr, void *kaddr,
 123                          unsigned long len, int write)
 124 {
 125         BUG_ON(len > PAGE_SIZE);
 126
 127         if (tlb_type == hypervisor)
 128                 return;
 129
 130 #ifdef DCACHE_ALIASING_POSSIBLE
 131         /* If bit 13 of the kernel address we used to access the
 132          * user page is the same as the virtual address that page
 133          * is mapped to in the user's address space, we can skip the
 134          * D-cache flush.
 135          */
 136         if ((uaddr ^ (unsigned long) kaddr) & (1UL << 13)) {
 137                 unsigned long start = __pa(kaddr);
 138                 unsigned long end = start + len;
 139                 unsigned long dcache_line_size;
 140
 141                 dcache_line_size = local_cpu_data().dcache_line_size;
 142
 143                 if (tlb_type == spitfire) {
 144                         for (; start < end; start += dcache_line_size)
 145                                 spitfire_put_dcache_tag(start & 0x3fe0, 0x0);
 146                 } else {
 147                         start &= ~(dcache_line_size - 1);
 148                         for (; start < end; start += dcache_line_size)
 149                                 __asm__ __volatile__(
 150                                         "stxa %%g0, [%0] %1\n\t"
 151                                         "membar #Sync"
 152                                         : /* no outputs */
 153                                         : "r" (start),
 154                                         "i" (ASI_DCACHE_INVALIDATE));
 155                 }
 156         }
 157 #endif
 158         if (write && tlb_type == spitfire) {
 159                 unsigned long start = (unsigned long) kaddr;
 160                 unsigned long end = start + len;
 161                 unsigned long icache_line_size;
 162
 163                 icache_line_size = local_cpu_data().icache_line_size;
 164
 165                 for (; start < end; start += icache_line_size)
 166                         flushi(start);
 167         }
 168 }
 169
 170 asmlinkage void do_ptrace(struct pt_regs *regs)
 171 {
 172         int request = regs->u_regs[UREG_I0];
 173         pid_t pid = regs->u_regs[UREG_I1];
 174         unsigned long addr = regs->u_regs[UREG_I2];
 175         unsigned long data = regs->u_regs[UREG_I3];
 176         unsigned long addr2 = regs->u_regs[UREG_I4];
 177         struct task_struct *child;
 178         int ret;
 179
 180         if (test_thread_flag(TIF_32BIT)) {
 181                 addr &= 0xffffffffUL;
 182                 data &= 0xffffffffUL;
 183                 addr2 &= 0xffffffffUL;
 184         }
 185         lock_kernel();
 186 #ifdef DEBUG_PTRACE
 187         {
 188                 char *s;
 189
 190                 if ((request >= 0) && (request <= 24))
 191                         s = pt_rq [request];
 192                 else
 193                         s = "unknown";
 194
 195                 if (request == PTRACE_POKEDATA && data == 0x91d02001){
 196                         printk ("do_ptrace: breakpoint pid=%d, addr=%016lx addr2=%016lx\n",
 197                                 pid, addr, addr2);
 198                 } else
 199                         printk("do_ptrace: rq=%s(%d) pid=%d addr=%016lx data=%016lx addr2=%016lx\n",
 200                                s, request, pid, addr, data, addr2);
 201         }
 202 #endif
 203         if (request == PTRACE_TRACEME) {
 204                 ret = ptrace_traceme();
 205                 pt_succ_return(regs, 0);
 206                 goto out;
 207         }
 208
 209         child = ptrace_get_task_struct(pid);
 210         if (IS_ERR(child)) {
 211                 ret = PTR_ERR(child);
 212                 pt_error_return(regs, -ret);
 213                 goto out;
 214         }
 215         if (!vx_check(vx_task_xid(child), VX_WATCH|VX_IDENT)) {
 216                 pt_error_return(regs, ESRCH);
 217                 goto out_tsk;
 218         }
 219
 220         if ((current->personality == PER_SUNOS && request == PTRACE_SUNATTACH)
 221             || (current->personality != PER_SUNOS && request == PTRACE_ATTACH)) {
 222                 if (ptrace_attach(child)) {
 223                         pt_error_return(regs, EPERM);
 224                         goto out_tsk;
 225                 }
 226                 pt_succ_return(regs, 0);
 227                 goto out_tsk;
 228         }
 229
 230         ret = ptrace_check_attach(child, request == PTRACE_KILL);
 231         if (ret < 0) {
 232                 pt_error_return(regs, -ret);
 233                 goto out_tsk;
 234         }
 235
 236         if (!(test_thread_flag(TIF_32BIT))      &&
 237             ((request == PTRACE_READDATA64)             ||
 238              (request == PTRACE_WRITEDATA64)            ||
 239              (request == PTRACE_READTEXT64)             ||
 240              (request == PTRACE_WRITETEXT64)            ||
 241              (request == PTRACE_PEEKTEXT64)             ||
 242              (request == PTRACE_POKETEXT64)             ||
 243              (request == PTRACE_PEEKDATA64)             ||
 244              (request == PTRACE_POKEDATA64))) {
 245                 addr = regs->u_regs[UREG_G2];
 246                 addr2 = regs->u_regs[UREG_G3];
 247                 request -= 30; /* wheee... */
 248         }
 249
 250         switch(request) {
 251         case PTRACE_PEEKUSR:
 252                 if (addr != 0)
 253                         pt_error_return(regs, EIO);
 254                 else
 255                         pt_succ_return(regs, 0);
 256                 goto out_tsk;
 257
 258         case PTRACE_PEEKTEXT: /* read word at location addr. */
 259         case PTRACE_PEEKDATA: {
 260                 unsigned long tmp64;
 261                 unsigned int tmp32;
 262                 int res, copied;
 263
 264                 res = -EIO;
 265                 if (test_thread_flag(TIF_32BIT)) {
 266                         copied = access_process_vm(child, addr,
 267                                                    &tmp32, sizeof(tmp32), 0);
 268                         tmp64 = (unsigned long) tmp32;
 269                         if (copied == sizeof(tmp32))
 270                                 res = 0;
 271                 } else {
 272                         copied = access_process_vm(child, addr,
 273                                                    &tmp64, sizeof(tmp64), 0);
 274                         if (copied == sizeof(tmp64))
 275                                 res = 0;
 276                 }
 277                 if (res < 0)
 278                         pt_error_return(regs, -res);
 279                 else
 280                         pt_os_succ_return(regs, tmp64, (void __user *) data);
 281                 goto out_tsk;
 282         }
 283
 284         case PTRACE_POKETEXT: /* write the word at location addr. */
 285         case PTRACE_POKEDATA: {
 286                 unsigned long tmp64;
 287                 unsigned int tmp32;
 288                 int copied, res = -EIO;
 289
 290                 if (test_thread_flag(TIF_32BIT)) {
 291                         tmp32 = data;
 292                         copied = access_process_vm(child, addr,
 293                                                    &tmp32, sizeof(tmp32), 1);
 294                         if (copied == sizeof(tmp32))
 295                                 res = 0;
 296                 } else {
 297                         tmp64 = data;
 298                         copied = access_process_vm(child, addr,
 299                                                    &tmp64, sizeof(tmp64), 1);
 300                         if (copied == sizeof(tmp64))
 301                                 res = 0;
 302                 }
 303                 if (res < 0)
 304                         pt_error_return(regs, -res);
 305                 else
 306                         pt_succ_return(regs, res);
 307                 goto out_tsk;
 308         }
 309
 310         case PTRACE_GETREGS: {
 311                 struct pt_regs32 __user *pregs =
 312                         (struct pt_regs32 __user *) addr;
 313                 struct pt_regs *cregs = task_pt_regs(child);
 314                 int rval;
 315
 316                 if (__put_user(tstate_to_psr(cregs->tstate), (&pregs->psr)) ||
 317                     __put_user(cregs->tpc, (&pregs->pc)) ||
 318                     __put_user(cregs->tnpc, (&pregs->npc)) ||
 319                     __put_user(cregs->y, (&pregs->y))) {
 320                         pt_error_return(regs, EFAULT);
 321                         goto out_tsk;
 322                 }
 323                 for (rval = 1; rval < 16; rval++)
 324                         if (__put_user(cregs->u_regs[rval], (&pregs->u_regs[rval - 1]))) {
 325                                 pt_error_return(regs, EFAULT);
 326                                 goto out_tsk;
 327                         }
 328                 pt_succ_return(regs, 0);
 329 #ifdef DEBUG_PTRACE
 330                 printk ("PC=%lx nPC=%lx o7=%lx\n", cregs->tpc, cregs->tnpc, cregs->u_regs [15]);
 331 #endif
 332                 goto out_tsk;
 333         }
 334
 335         case PTRACE_GETREGS64: {
 336                 struct pt_regs __user *pregs = (struct pt_regs __user *) addr;
 337                 struct pt_regs *cregs = task_pt_regs(child);
 338                 unsigned long tpc = cregs->tpc;
 339                 int rval;
 340
 341                 if ((task_thread_info(child)->flags & _TIF_32BIT) != 0)
 342                         tpc &= 0xffffffff;
 343                 if (__put_user(cregs->tstate, (&pregs->tstate)) ||
 344                     __put_user(tpc, (&pregs->tpc)) ||
 345                     __put_user(cregs->tnpc, (&pregs->tnpc)) ||
 346                     __put_user(cregs->y, (&pregs->y))) {
 347                         pt_error_return(regs, EFAULT);
 348                         goto out_tsk;
 349                 }
 350                 for (rval = 1; rval < 16; rval++)
 351                         if (__put_user(cregs->u_regs[rval], (&pregs->u_regs[rval - 1]))) {
 352                                 pt_error_return(regs, EFAULT);
 353                                 goto out_tsk;
 354                         }
 355                 pt_succ_return(regs, 0);
 356 #ifdef DEBUG_PTRACE
 357                 printk ("PC=%lx nPC=%lx o7=%lx\n", cregs->tpc, cregs->tnpc, cregs->u_regs [15]);
 358 #endif
 359                 goto out_tsk;
 360         }
 361
 362         case PTRACE_SETREGS: {
 363                 struct pt_regs32 __user *pregs =
 364                         (struct pt_regs32 __user *) addr;
 365                 struct pt_regs *cregs = task_pt_regs(child);
 366                 unsigned int psr, pc, npc, y;
 367                 int i;
 368
 369                 /* Must be careful, tracing process can only set certain
 370                  * bits in the psr.
 371                  */
 372                 if (__get_user(psr, (&pregs->psr)) ||
 373                     __get_user(pc, (&pregs->pc)) ||
 374                     __get_user(npc, (&pregs->npc)) ||
 375                     __get_user(y, (&pregs->y))) {
 376                         pt_error_return(regs, EFAULT);
 377                         goto out_tsk;
 378                 }
 379                 cregs->tstate &= ~(TSTATE_ICC);
 380                 cregs->tstate |= psr_to_tstate_icc(psr);
 381                 if (!((pc | npc) & 3)) {
 382                         cregs->tpc = pc;
 383                         cregs->tnpc = npc;
 384                 }
 385                 cregs->y = y;
 386                 for (i = 1; i < 16; i++) {
 387                         if (__get_user(cregs->u_regs[i], (&pregs->u_regs[i-1]))) {
 388                                 pt_error_return(regs, EFAULT);
 389                                 goto out_tsk;
 390                         }
 391                 }
 392                 pt_succ_return(regs, 0);
 393                 goto out_tsk;
 394         }
 395
 396         case PTRACE_SETREGS64: {
 397                 struct pt_regs __user *pregs = (struct pt_regs __user *) addr;
 398                 struct pt_regs *cregs = task_pt_regs(child);
 399                 unsigned long tstate, tpc, tnpc, y;
 400                 int i;
 401
 402                 /* Must be careful, tracing process can only set certain
 403                  * bits in the psr.
 404                  */
 405                 if (__get_user(tstate, (&pregs->tstate)) ||
 406                     __get_user(tpc, (&pregs->tpc)) ||
 407                     __get_user(tnpc, (&pregs->tnpc)) ||
 408                     __get_user(y, (&pregs->y))) {
 409                         pt_error_return(regs, EFAULT);
 410                         goto out_tsk;
 411                 }
 412                 if ((task_thread_info(child)->flags & _TIF_32BIT) != 0) {
 413                         tpc &= 0xffffffff;
 414                         tnpc &= 0xffffffff;
 415                 }
 416                 tstate &= (TSTATE_ICC | TSTATE_XCC);
 417                 cregs->tstate &= ~(TSTATE_ICC | TSTATE_XCC);
 418                 cregs->tstate |= tstate;
 419                 if (!((tpc | tnpc) & 3)) {
 420                         cregs->tpc = tpc;
 421                         cregs->tnpc = tnpc;
 422                 }
 423                 cregs->y = y;
 424                 for (i = 1; i < 16; i++) {
 425                         if (__get_user(cregs->u_regs[i], (&pregs->u_regs[i-1]))) {
 426                                 pt_error_return(regs, EFAULT);
 427                                 goto out_tsk;
 428                         }
 429                 }
 430                 pt_succ_return(regs, 0);
 431                 goto out_tsk;
 432         }
 433
 434         case PTRACE_GETFPREGS: {
 435                 struct fps {
 436                         unsigned int regs[32];
 437                         unsigned int fsr;
 438                         unsigned int flags;
 439                         unsigned int extra;
 440                         unsigned int fpqd;
 441                         struct fq {
 442                                 unsigned int insnaddr;
 443                                 unsigned int insn;
 444                         } fpq[16];
 445                 };
 446                 struct fps __user *fps = (struct fps __user *) addr;
 447                 unsigned long *fpregs = task_thread_info(child)->fpregs;
 448
 449                 if (copy_to_user(&fps->regs[0], fpregs,
 450                                  (32 * sizeof(unsigned int))) ||
 451                     __put_user(task_thread_info(child)->xfsr[0], (&fps->fsr)) ||
 452                     __put_user(0, (&fps->fpqd)) ||
 453                     __put_user(0, (&fps->flags)) ||
 454                     __put_user(0, (&fps->extra)) ||
 455                     clear_user(&fps->fpq[0], 32 * sizeof(unsigned int))) {
 456                         pt_error_return(regs, EFAULT);
 457                         goto out_tsk;
 458                 }
 459                 pt_succ_return(regs, 0);
 460                 goto out_tsk;
 461         }
 462
 463         case PTRACE_GETFPREGS64: {
 464                 struct fps {
 465                         unsigned int regs[64];
 466                         unsigned long fsr;
 467                 };
 468                 struct fps __user *fps = (struct fps __user *) addr;
 469                 unsigned long *fpregs = task_thread_info(child)->fpregs;
 470
 471                 if (copy_to_user(&fps->regs[0], fpregs,
 472                                  (64 * sizeof(unsigned int))) ||
 473                     __put_user(task_thread_info(child)->xfsr[0], (&fps->fsr))) {
 474                         pt_error_return(regs, EFAULT);
 475                         goto out_tsk;
 476                 }
 477                 pt_succ_return(regs, 0);
 478                 goto out_tsk;
 479         }
 480
 481         case PTRACE_SETFPREGS: {
 482                 struct fps {
 483                         unsigned int regs[32];
 484                         unsigned int fsr;
 485                         unsigned int flags;
 486                         unsigned int extra;
 487                         unsigned int fpqd;
 488                         struct fq {
 489                                 unsigned int insnaddr;
 490                                 unsigned int insn;
 491                         } fpq[16];
 492                 };
 493                 struct fps __user *fps = (struct fps __user *) addr;
 494                 unsigned long *fpregs = task_thread_info(child)->fpregs;
 495                 unsigned fsr;
 496
 497                 if (copy_from_user(fpregs, &fps->regs[0],
 498                                    (32 * sizeof(unsigned int))) ||
 499                     __get_user(fsr, (&fps->fsr))) {
 500                         pt_error_return(regs, EFAULT);
 501                         goto out_tsk;
 502                 }
 503                 task_thread_info(child)->xfsr[0] &= 0xffffffff00000000UL;
 504                 task_thread_info(child)->xfsr[0] |= fsr;
 505                 if (!(task_thread_info(child)->fpsaved[0] & FPRS_FEF))
 506                         task_thread_info(child)->gsr[0] = 0;
 507                 task_thread_info(child)->fpsaved[0] |= (FPRS_FEF | FPRS_DL);
 508                 pt_succ_return(regs, 0);
 509                 goto out_tsk;
 510         }
 511
 512         case PTRACE_SETFPREGS64: {
 513                 struct fps {
 514                         unsigned int regs[64];
 515                         unsigned long fsr;
 516                 };
 517                 struct fps __user *fps = (struct fps __user *) addr;
 518                 unsigned long *fpregs = task_thread_info(child)->fpregs;
 519
 520                 if (copy_from_user(fpregs, &fps->regs[0],
 521                                    (64 * sizeof(unsigned int))) ||
 522                     __get_user(task_thread_info(child)->xfsr[0], (&fps->fsr))) {
 523                         pt_error_return(regs, EFAULT);
 524                         goto out_tsk;
 525                 }
 526                 if (!(task_thread_info(child)->fpsaved[0] & FPRS_FEF))
 527                         task_thread_info(child)->gsr[0] = 0;
 528                 task_thread_info(child)->fpsaved[0] |= (FPRS_FEF | FPRS_DL | FPRS_DU);
 529                 pt_succ_return(regs, 0);
 530                 goto out_tsk;
 531         }
 532
 533         case PTRACE_READTEXT:
 534         case PTRACE_READDATA: {
 535                 int res = ptrace_readdata(child, addr,
 536                                           (char __user *)addr2, data);
 537                 if (res == data) {
 538                         pt_succ_return(regs, 0);
 539                         goto out_tsk;
 540                 }
 541                 if (res >= 0)
 542                         res = -EIO;
 543                 pt_error_return(regs, -res);
 544                 goto out_tsk;
 545         }
 546
 547         case PTRACE_WRITETEXT:
 548         case PTRACE_WRITEDATA: {
 549                 int res = ptrace_writedata(child, (char __user *) addr2,
 550                                            addr, data);
 551                 if (res == data) {
 552                         pt_succ_return(regs, 0);
 553                         goto out_tsk;
 554                 }
 555                 if (res >= 0)
 556                         res = -EIO;
 557                 pt_error_return(regs, -res);
 558                 goto out_tsk;
 559         }
 560         case PTRACE_SYSCALL: /* continue and stop at (return from) syscall */
 561                 addr = 1;
 562
 563         case PTRACE_CONT: { /* restart after signal. */
 564                 if (!valid_signal(data)) {
 565                         pt_error_return(regs, EIO);
 566                         goto out_tsk;
 567                 }
 568
 569                 if (request == PTRACE_SYSCALL) {
 570                         set_tsk_thread_flag(child, TIF_SYSCALL_TRACE);
 571                 } else {
 572                         clear_tsk_thread_flag(child, TIF_SYSCALL_TRACE);
 573                 }
 574
 575                 child->exit_code = data;
 576 #ifdef DEBUG_PTRACE
 577                 printk("CONT: %s [%d]: set exit_code = %x %lx %lx\n", child->comm,
 578                         child->pid, child->exit_code,
 579                         task_pt_regs(child)->tpc,
 580                         task_pt_regs(child)->tnpc);
 581
 582 #endif
 583                 wake_up_process(child);
 584                 pt_succ_return(regs, 0);
 585                 goto out_tsk;
 586         }
 587
 588 /*
 589  * make the child exit.  Best I can do is send it a sigkill.
 590  * perhaps it should be put in the status that it wants to
 591  * exit.
 592  */
 593         case PTRACE_KILL: {
 594                 if (child->exit_state == EXIT_ZOMBIE) { /* already dead */
 595                         pt_succ_return(regs, 0);
 596                         goto out_tsk;
 597                 }
 598                 child->exit_code = SIGKILL;
 599                 wake_up_process(child);
 600                 pt_succ_return(regs, 0);
 601                 goto out_tsk;
 602         }
 603
 604         case PTRACE_SUNDETACH: { /* detach a process that was attached. */
 605                 int error = ptrace_detach(child, data);
 606                 if (error) {
 607                         pt_error_return(regs, EIO);
 608                         goto out_tsk;
 609                 }
 610                 pt_succ_return(regs, 0);
 611                 goto out_tsk;
 612         }
 613
 614         /* PTRACE_DUMPCORE unsupported... */
 615
 616         case PTRACE_GETEVENTMSG: {
 617                 int err;
 618
 619                 if (test_thread_flag(TIF_32BIT))
 620                         err = put_user(child->ptrace_message,
 621                                        (unsigned int __user *) data);
 622                 else
 623                         err = put_user(child->ptrace_message,
 624                                        (unsigned long __user *) data);
 625                 if (err)
 626                         pt_error_return(regs, -err);
 627                 else
 628                         pt_succ_return(regs, 0);
 629                 break;
 630         }
 631
 632         default: {
 633                 int err = ptrace_request(child, request, addr, data);
 634                 if (err)
 635                         pt_error_return(regs, -err);
 636                 else
 637                         pt_succ_return(regs, 0);
 638                 goto out_tsk;
 639         }
 640         }
 641 out_tsk:
 642         if (child)
 643                 put_task_struct(child);
 644 out:
 645         unlock_kernel();
 646 }
 647
 648 asmlinkage void syscall_trace(struct pt_regs *regs, int syscall_exit_p)
 649 {
 650         /* do the secure computing check first */
 651         secure_computing(regs->u_regs[UREG_G1]);
 652
 653         if (unlikely(current->audit_context) && syscall_exit_p) {
 654                 unsigned long tstate = regs->tstate;
 655                 int result = AUDITSC_SUCCESS;
 656
 657                 if (unlikely(tstate & (TSTATE_XCARRY | TSTATE_ICARRY)))
 658                         result = AUDITSC_FAILURE;
 659
 660                 audit_syscall_exit(result, regs->u_regs[UREG_I0]);
 661         }
 662
 663         if (!(current->ptrace & PT_PTRACED))
 664                 goto out;
 665
 666         if (!test_thread_flag(TIF_SYSCALL_TRACE))
 667                 goto out;
 668
 669         ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD)
 670                                  ? 0x80 : 0));
 671
 672         /*
 673          * this isn't the same as continuing with a signal, but it will do
 674          * for normal use.  strace only continues with a signal if the
 675          * stopping signal is not SIGTRAP.  -brl
 676          */
 677         if (current->exit_code) {
 678                 send_sig(current->exit_code, current, 1);
 679                 current->exit_code = 0;
 680         }
 681
 682 out:
 683         if (unlikely(current->audit_context) && !syscall_exit_p)
 684                 audit_syscall_entry((test_thread_flag(TIF_32BIT) ?
 685                                      AUDIT_ARCH_SPARC :
 686                                      AUDIT_ARCH_SPARC64),
 687                                     regs->u_regs[UREG_G1],
 688                                     regs->u_regs[UREG_I0],
 689                                     regs->u_regs[UREG_I1],
 690                                     regs->u_regs[UREG_I2],
 691                                     regs->u_regs[UREG_I3]);
 692 }