11da177e4SLinus Torvalds /* 21da177e4SLinus Torvalds * linux/kernel/ptrace.c 31da177e4SLinus Torvalds * 41da177e4SLinus Torvalds * (C) Copyright 1999 Linus Torvalds 51da177e4SLinus Torvalds * 61da177e4SLinus Torvalds * Common interfaces for "ptrace()" which we do not want 71da177e4SLinus Torvalds * to continually duplicate across every architecture. 81da177e4SLinus Torvalds */ 91da177e4SLinus Torvalds 10c59ede7bSRandy.Dunlap #include <linux/capability.h> 111da177e4SLinus Torvalds #include <linux/module.h> 121da177e4SLinus Torvalds #include <linux/sched.h> 131da177e4SLinus Torvalds #include <linux/errno.h> 141da177e4SLinus Torvalds #include <linux/mm.h> 151da177e4SLinus Torvalds #include <linux/highmem.h> 161da177e4SLinus Torvalds #include <linux/pagemap.h> 171da177e4SLinus Torvalds #include <linux/smp_lock.h> 181da177e4SLinus Torvalds #include <linux/ptrace.h> 191da177e4SLinus Torvalds #include <linux/security.h> 207ed20e1aSJesper Juhl #include <linux/signal.h> 211da177e4SLinus Torvalds 221da177e4SLinus Torvalds #include <asm/pgtable.h> 231da177e4SLinus Torvalds #include <asm/uaccess.h> 241da177e4SLinus Torvalds 251da177e4SLinus Torvalds /* 261da177e4SLinus Torvalds * ptrace a task: make the debugger its new parent and 271da177e4SLinus Torvalds * move it to the ptrace list. 281da177e4SLinus Torvalds * 291da177e4SLinus Torvalds * Must be called with the tasklist lock write-held. 301da177e4SLinus Torvalds */ 311da177e4SLinus Torvalds void __ptrace_link(task_t *child, task_t *new_parent) 321da177e4SLinus Torvalds { 331da177e4SLinus Torvalds if (!list_empty(&child->ptrace_list)) 341da177e4SLinus Torvalds BUG(); 351da177e4SLinus Torvalds if (child->parent == new_parent) 361da177e4SLinus Torvalds return; 371da177e4SLinus Torvalds list_add(&child->ptrace_list, &child->parent->ptrace_children); 381da177e4SLinus Torvalds REMOVE_LINKS(child); 391da177e4SLinus Torvalds child->parent = new_parent; 401da177e4SLinus Torvalds SET_LINKS(child); 411da177e4SLinus Torvalds } 421da177e4SLinus Torvalds 431da177e4SLinus Torvalds /* 441da177e4SLinus Torvalds * Turn a tracing stop into a normal stop now, since with no tracer there 451da177e4SLinus Torvalds * would be no way to wake it up with SIGCONT or SIGKILL. If there was a 461da177e4SLinus Torvalds * signal sent that would resume the child, but didn't because it was in 471da177e4SLinus Torvalds * TASK_TRACED, resume it now. 481da177e4SLinus Torvalds * Requires that irqs be disabled. 491da177e4SLinus Torvalds */ 501da177e4SLinus Torvalds void ptrace_untrace(task_t *child) 511da177e4SLinus Torvalds { 521da177e4SLinus Torvalds spin_lock(&child->sighand->siglock); 531da177e4SLinus Torvalds if (child->state == TASK_TRACED) { 541da177e4SLinus Torvalds if (child->signal->flags & SIGNAL_STOP_STOPPED) { 551da177e4SLinus Torvalds child->state = TASK_STOPPED; 561da177e4SLinus Torvalds } else { 571da177e4SLinus Torvalds signal_wake_up(child, 1); 581da177e4SLinus Torvalds } 591da177e4SLinus Torvalds } 6030e0fca6SAndrea Arcangeli if (child->signal->flags & SIGNAL_GROUP_EXIT) { 6130e0fca6SAndrea Arcangeli sigaddset(&child->pending.signal, SIGKILL); 6230e0fca6SAndrea Arcangeli signal_wake_up(child, 1); 6330e0fca6SAndrea Arcangeli } 641da177e4SLinus Torvalds spin_unlock(&child->sighand->siglock); 651da177e4SLinus Torvalds } 661da177e4SLinus Torvalds 671da177e4SLinus Torvalds /* 681da177e4SLinus Torvalds * unptrace a task: move it back to its original parent and 691da177e4SLinus Torvalds * remove it from the ptrace list. 701da177e4SLinus Torvalds * 711da177e4SLinus Torvalds * Must be called with the tasklist lock write-held. 721da177e4SLinus Torvalds */ 731da177e4SLinus Torvalds void __ptrace_unlink(task_t *child) 741da177e4SLinus Torvalds { 755ecfbae0SOleg Nesterov BUG_ON(!child->ptrace); 765ecfbae0SOleg Nesterov 771da177e4SLinus Torvalds child->ptrace = 0; 781da177e4SLinus Torvalds if (!list_empty(&child->ptrace_list)) { 791da177e4SLinus Torvalds list_del_init(&child->ptrace_list); 801da177e4SLinus Torvalds REMOVE_LINKS(child); 811da177e4SLinus Torvalds child->parent = child->real_parent; 821da177e4SLinus Torvalds SET_LINKS(child); 831da177e4SLinus Torvalds } 841da177e4SLinus Torvalds 851da177e4SLinus Torvalds ptrace_untrace(child); 861da177e4SLinus Torvalds } 871da177e4SLinus Torvalds 881da177e4SLinus Torvalds /* 891da177e4SLinus Torvalds * Check that we have indeed attached to the thing.. 901da177e4SLinus Torvalds */ 911da177e4SLinus Torvalds int ptrace_check_attach(struct task_struct *child, int kill) 921da177e4SLinus Torvalds { 931da177e4SLinus Torvalds int ret = -ESRCH; 941da177e4SLinus Torvalds 951da177e4SLinus Torvalds /* 961da177e4SLinus Torvalds * We take the read lock around doing both checks to close a 971da177e4SLinus Torvalds * possible race where someone else was tracing our child and 981da177e4SLinus Torvalds * detached between these two checks. After this locked check, 991da177e4SLinus Torvalds * we are sure that this is our traced child and that can only 1001da177e4SLinus Torvalds * be changed by us so it's not changing right after this. 1011da177e4SLinus Torvalds */ 1021da177e4SLinus Torvalds read_lock(&tasklist_lock); 1031da177e4SLinus Torvalds if ((child->ptrace & PT_PTRACED) && child->parent == current && 1041da177e4SLinus Torvalds (!(child->ptrace & PT_ATTACHED) || child->real_parent != current) 1051da177e4SLinus Torvalds && child->signal != NULL) { 1061da177e4SLinus Torvalds ret = 0; 1071da177e4SLinus Torvalds spin_lock_irq(&child->sighand->siglock); 1081da177e4SLinus Torvalds if (child->state == TASK_STOPPED) { 1091da177e4SLinus Torvalds child->state = TASK_TRACED; 1101da177e4SLinus Torvalds } else if (child->state != TASK_TRACED && !kill) { 1111da177e4SLinus Torvalds ret = -ESRCH; 1121da177e4SLinus Torvalds } 1131da177e4SLinus Torvalds spin_unlock_irq(&child->sighand->siglock); 1141da177e4SLinus Torvalds } 1151da177e4SLinus Torvalds read_unlock(&tasklist_lock); 1161da177e4SLinus Torvalds 1171da177e4SLinus Torvalds if (!ret && !kill) { 1181da177e4SLinus Torvalds wait_task_inactive(child); 1191da177e4SLinus Torvalds } 1201da177e4SLinus Torvalds 1211da177e4SLinus Torvalds /* All systems go.. */ 1221da177e4SLinus Torvalds return ret; 1231da177e4SLinus Torvalds } 1241da177e4SLinus Torvalds 125ab8d11beSMiklos Szeredi static int may_attach(struct task_struct *task) 126ab8d11beSMiklos Szeredi { 127ab8d11beSMiklos Szeredi if (!task->mm) 128ab8d11beSMiklos Szeredi return -EPERM; 129ab8d11beSMiklos Szeredi if (((current->uid != task->euid) || 130ab8d11beSMiklos Szeredi (current->uid != task->suid) || 131ab8d11beSMiklos Szeredi (current->uid != task->uid) || 132ab8d11beSMiklos Szeredi (current->gid != task->egid) || 133ab8d11beSMiklos Szeredi (current->gid != task->sgid) || 134ab8d11beSMiklos Szeredi (current->gid != task->gid)) && !capable(CAP_SYS_PTRACE)) 135ab8d11beSMiklos Szeredi return -EPERM; 136ab8d11beSMiklos Szeredi smp_rmb(); 137ab8d11beSMiklos Szeredi if (!task->mm->dumpable && !capable(CAP_SYS_PTRACE)) 138ab8d11beSMiklos Szeredi return -EPERM; 139ab8d11beSMiklos Szeredi 140ab8d11beSMiklos Szeredi return security_ptrace(current, task); 141ab8d11beSMiklos Szeredi } 142ab8d11beSMiklos Szeredi 143ab8d11beSMiklos Szeredi int ptrace_may_attach(struct task_struct *task) 144ab8d11beSMiklos Szeredi { 145ab8d11beSMiklos Szeredi int err; 146ab8d11beSMiklos Szeredi task_lock(task); 147ab8d11beSMiklos Szeredi err = may_attach(task); 148ab8d11beSMiklos Szeredi task_unlock(task); 149ab8d11beSMiklos Szeredi return !err; 150ab8d11beSMiklos Szeredi } 151ab8d11beSMiklos Szeredi 1521da177e4SLinus Torvalds int ptrace_attach(struct task_struct *task) 1531da177e4SLinus Torvalds { 1541da177e4SLinus Torvalds int retval; 1551da177e4SLinus Torvalds task_lock(task); 1561da177e4SLinus Torvalds retval = -EPERM; 1571da177e4SLinus Torvalds if (task->pid <= 1) 1581da177e4SLinus Torvalds goto bad; 15928d838ccSLinus Torvalds if (task->tgid == current->tgid) 1601da177e4SLinus Torvalds goto bad; 1611da177e4SLinus Torvalds /* the same process cannot be attached many times */ 1621da177e4SLinus Torvalds if (task->ptrace & PT_PTRACED) 1631da177e4SLinus Torvalds goto bad; 164ab8d11beSMiklos Szeredi retval = may_attach(task); 1651da177e4SLinus Torvalds if (retval) 1661da177e4SLinus Torvalds goto bad; 1671da177e4SLinus Torvalds 1681da177e4SLinus Torvalds /* Go */ 1691da177e4SLinus Torvalds task->ptrace |= PT_PTRACED | ((task->real_parent != current) 1701da177e4SLinus Torvalds ? PT_ATTACHED : 0); 1711da177e4SLinus Torvalds if (capable(CAP_SYS_PTRACE)) 1721da177e4SLinus Torvalds task->ptrace |= PT_PTRACE_CAP; 1731da177e4SLinus Torvalds task_unlock(task); 1741da177e4SLinus Torvalds 1751da177e4SLinus Torvalds write_lock_irq(&tasklist_lock); 1761da177e4SLinus Torvalds __ptrace_link(task, current); 1771da177e4SLinus Torvalds write_unlock_irq(&tasklist_lock); 1781da177e4SLinus Torvalds 1791da177e4SLinus Torvalds force_sig_specific(SIGSTOP, task); 1801da177e4SLinus Torvalds return 0; 1811da177e4SLinus Torvalds 1821da177e4SLinus Torvalds bad: 1831da177e4SLinus Torvalds task_unlock(task); 1841da177e4SLinus Torvalds return retval; 1851da177e4SLinus Torvalds } 1861da177e4SLinus Torvalds 1875ecfbae0SOleg Nesterov void __ptrace_detach(struct task_struct *child, unsigned int data) 1885ecfbae0SOleg Nesterov { 1895ecfbae0SOleg Nesterov child->exit_code = data; 1905ecfbae0SOleg Nesterov /* .. re-parent .. */ 1915ecfbae0SOleg Nesterov __ptrace_unlink(child); 1925ecfbae0SOleg Nesterov /* .. and wake it up. */ 1935ecfbae0SOleg Nesterov if (child->exit_state != EXIT_ZOMBIE) 1945ecfbae0SOleg Nesterov wake_up_process(child); 1955ecfbae0SOleg Nesterov } 1965ecfbae0SOleg Nesterov 1971da177e4SLinus Torvalds int ptrace_detach(struct task_struct *child, unsigned int data) 1981da177e4SLinus Torvalds { 1997ed20e1aSJesper Juhl if (!valid_signal(data)) 2001da177e4SLinus Torvalds return -EIO; 2011da177e4SLinus Torvalds 2021da177e4SLinus Torvalds /* Architecture-specific hardware disable .. */ 2031da177e4SLinus Torvalds ptrace_disable(child); 2041da177e4SLinus Torvalds 2051da177e4SLinus Torvalds write_lock_irq(&tasklist_lock); 2065ecfbae0SOleg Nesterov if (child->ptrace) 2075ecfbae0SOleg Nesterov __ptrace_detach(child, data); 2081da177e4SLinus Torvalds write_unlock_irq(&tasklist_lock); 2091da177e4SLinus Torvalds 2101da177e4SLinus Torvalds return 0; 2111da177e4SLinus Torvalds } 2121da177e4SLinus Torvalds 2131da177e4SLinus Torvalds /* 2141da177e4SLinus Torvalds * Access another process' address space. 2151da177e4SLinus Torvalds * Source/target buffer must be kernel space, 2161da177e4SLinus Torvalds * Do not walk the page table directly, use get_user_pages 2171da177e4SLinus Torvalds */ 2181da177e4SLinus Torvalds 2191da177e4SLinus Torvalds int access_process_vm(struct task_struct *tsk, unsigned long addr, void *buf, int len, int write) 2201da177e4SLinus Torvalds { 2211da177e4SLinus Torvalds struct mm_struct *mm; 2221da177e4SLinus Torvalds struct vm_area_struct *vma; 2231da177e4SLinus Torvalds struct page *page; 2241da177e4SLinus Torvalds void *old_buf = buf; 2251da177e4SLinus Torvalds 2261da177e4SLinus Torvalds mm = get_task_mm(tsk); 2271da177e4SLinus Torvalds if (!mm) 2281da177e4SLinus Torvalds return 0; 2291da177e4SLinus Torvalds 2301da177e4SLinus Torvalds down_read(&mm->mmap_sem); 2311da177e4SLinus Torvalds /* ignore errors, just check how much was sucessfully transfered */ 2321da177e4SLinus Torvalds while (len) { 2331da177e4SLinus Torvalds int bytes, ret, offset; 2341da177e4SLinus Torvalds void *maddr; 2351da177e4SLinus Torvalds 2361da177e4SLinus Torvalds ret = get_user_pages(tsk, mm, addr, 1, 2371da177e4SLinus Torvalds write, 1, &page, &vma); 2381da177e4SLinus Torvalds if (ret <= 0) 2391da177e4SLinus Torvalds break; 2401da177e4SLinus Torvalds 2411da177e4SLinus Torvalds bytes = len; 2421da177e4SLinus Torvalds offset = addr & (PAGE_SIZE-1); 2431da177e4SLinus Torvalds if (bytes > PAGE_SIZE-offset) 2441da177e4SLinus Torvalds bytes = PAGE_SIZE-offset; 2451da177e4SLinus Torvalds 2461da177e4SLinus Torvalds maddr = kmap(page); 2471da177e4SLinus Torvalds if (write) { 2481da177e4SLinus Torvalds copy_to_user_page(vma, page, addr, 2491da177e4SLinus Torvalds maddr + offset, buf, bytes); 2501da177e4SLinus Torvalds set_page_dirty_lock(page); 2511da177e4SLinus Torvalds } else { 2521da177e4SLinus Torvalds copy_from_user_page(vma, page, addr, 2531da177e4SLinus Torvalds buf, maddr + offset, bytes); 2541da177e4SLinus Torvalds } 2551da177e4SLinus Torvalds kunmap(page); 2561da177e4SLinus Torvalds page_cache_release(page); 2571da177e4SLinus Torvalds len -= bytes; 2581da177e4SLinus Torvalds buf += bytes; 2591da177e4SLinus Torvalds addr += bytes; 2601da177e4SLinus Torvalds } 2611da177e4SLinus Torvalds up_read(&mm->mmap_sem); 2621da177e4SLinus Torvalds mmput(mm); 2631da177e4SLinus Torvalds 2641da177e4SLinus Torvalds return buf - old_buf; 2651da177e4SLinus Torvalds } 2661da177e4SLinus Torvalds 2671da177e4SLinus Torvalds int ptrace_readdata(struct task_struct *tsk, unsigned long src, char __user *dst, int len) 2681da177e4SLinus Torvalds { 2691da177e4SLinus Torvalds int copied = 0; 2701da177e4SLinus Torvalds 2711da177e4SLinus Torvalds while (len > 0) { 2721da177e4SLinus Torvalds char buf[128]; 2731da177e4SLinus Torvalds int this_len, retval; 2741da177e4SLinus Torvalds 2751da177e4SLinus Torvalds this_len = (len > sizeof(buf)) ? sizeof(buf) : len; 2761da177e4SLinus Torvalds retval = access_process_vm(tsk, src, buf, this_len, 0); 2771da177e4SLinus Torvalds if (!retval) { 2781da177e4SLinus Torvalds if (copied) 2791da177e4SLinus Torvalds break; 2801da177e4SLinus Torvalds return -EIO; 2811da177e4SLinus Torvalds } 2821da177e4SLinus Torvalds if (copy_to_user(dst, buf, retval)) 2831da177e4SLinus Torvalds return -EFAULT; 2841da177e4SLinus Torvalds copied += retval; 2851da177e4SLinus Torvalds src += retval; 2861da177e4SLinus Torvalds dst += retval; 2871da177e4SLinus Torvalds len -= retval; 2881da177e4SLinus Torvalds } 2891da177e4SLinus Torvalds return copied; 2901da177e4SLinus Torvalds } 2911da177e4SLinus Torvalds 2921da177e4SLinus Torvalds int ptrace_writedata(struct task_struct *tsk, char __user *src, unsigned long dst, int len) 2931da177e4SLinus Torvalds { 2941da177e4SLinus Torvalds int copied = 0; 2951da177e4SLinus Torvalds 2961da177e4SLinus Torvalds while (len > 0) { 2971da177e4SLinus Torvalds char buf[128]; 2981da177e4SLinus Torvalds int this_len, retval; 2991da177e4SLinus Torvalds 3001da177e4SLinus Torvalds this_len = (len > sizeof(buf)) ? sizeof(buf) : len; 3011da177e4SLinus Torvalds if (copy_from_user(buf, src, this_len)) 3021da177e4SLinus Torvalds return -EFAULT; 3031da177e4SLinus Torvalds retval = access_process_vm(tsk, dst, buf, this_len, 1); 3041da177e4SLinus Torvalds if (!retval) { 3051da177e4SLinus Torvalds if (copied) 3061da177e4SLinus Torvalds break; 3071da177e4SLinus Torvalds return -EIO; 3081da177e4SLinus Torvalds } 3091da177e4SLinus Torvalds copied += retval; 3101da177e4SLinus Torvalds src += retval; 3111da177e4SLinus Torvalds dst += retval; 3121da177e4SLinus Torvalds len -= retval; 3131da177e4SLinus Torvalds } 3141da177e4SLinus Torvalds return copied; 3151da177e4SLinus Torvalds } 3161da177e4SLinus Torvalds 3171da177e4SLinus Torvalds static int ptrace_setoptions(struct task_struct *child, long data) 3181da177e4SLinus Torvalds { 3191da177e4SLinus Torvalds child->ptrace &= ~PT_TRACE_MASK; 3201da177e4SLinus Torvalds 3211da177e4SLinus Torvalds if (data & PTRACE_O_TRACESYSGOOD) 3221da177e4SLinus Torvalds child->ptrace |= PT_TRACESYSGOOD; 3231da177e4SLinus Torvalds 3241da177e4SLinus Torvalds if (data & PTRACE_O_TRACEFORK) 3251da177e4SLinus Torvalds child->ptrace |= PT_TRACE_FORK; 3261da177e4SLinus Torvalds 3271da177e4SLinus Torvalds if (data & PTRACE_O_TRACEVFORK) 3281da177e4SLinus Torvalds child->ptrace |= PT_TRACE_VFORK; 3291da177e4SLinus Torvalds 3301da177e4SLinus Torvalds if (data & PTRACE_O_TRACECLONE) 3311da177e4SLinus Torvalds child->ptrace |= PT_TRACE_CLONE; 3321da177e4SLinus Torvalds 3331da177e4SLinus Torvalds if (data & PTRACE_O_TRACEEXEC) 3341da177e4SLinus Torvalds child->ptrace |= PT_TRACE_EXEC; 3351da177e4SLinus Torvalds 3361da177e4SLinus Torvalds if (data & PTRACE_O_TRACEVFORKDONE) 3371da177e4SLinus Torvalds child->ptrace |= PT_TRACE_VFORK_DONE; 3381da177e4SLinus Torvalds 3391da177e4SLinus Torvalds if (data & PTRACE_O_TRACEEXIT) 3401da177e4SLinus Torvalds child->ptrace |= PT_TRACE_EXIT; 3411da177e4SLinus Torvalds 3421da177e4SLinus Torvalds return (data & ~PTRACE_O_MASK) ? -EINVAL : 0; 3431da177e4SLinus Torvalds } 3441da177e4SLinus Torvalds 3451da177e4SLinus Torvalds static int ptrace_getsiginfo(struct task_struct *child, siginfo_t __user * data) 3461da177e4SLinus Torvalds { 3471da177e4SLinus Torvalds siginfo_t lastinfo; 3481da177e4SLinus Torvalds int error = -ESRCH; 3491da177e4SLinus Torvalds 3501da177e4SLinus Torvalds read_lock(&tasklist_lock); 3511da177e4SLinus Torvalds if (likely(child->sighand != NULL)) { 3521da177e4SLinus Torvalds error = -EINVAL; 3531da177e4SLinus Torvalds spin_lock_irq(&child->sighand->siglock); 3541da177e4SLinus Torvalds if (likely(child->last_siginfo != NULL)) { 3551da177e4SLinus Torvalds lastinfo = *child->last_siginfo; 3561da177e4SLinus Torvalds error = 0; 3571da177e4SLinus Torvalds } 3581da177e4SLinus Torvalds spin_unlock_irq(&child->sighand->siglock); 3591da177e4SLinus Torvalds } 3601da177e4SLinus Torvalds read_unlock(&tasklist_lock); 3611da177e4SLinus Torvalds if (!error) 3621da177e4SLinus Torvalds return copy_siginfo_to_user(data, &lastinfo); 3631da177e4SLinus Torvalds return error; 3641da177e4SLinus Torvalds } 3651da177e4SLinus Torvalds 3661da177e4SLinus Torvalds static int ptrace_setsiginfo(struct task_struct *child, siginfo_t __user * data) 3671da177e4SLinus Torvalds { 3681da177e4SLinus Torvalds siginfo_t newinfo; 3691da177e4SLinus Torvalds int error = -ESRCH; 3701da177e4SLinus Torvalds 3711da177e4SLinus Torvalds if (copy_from_user(&newinfo, data, sizeof (siginfo_t))) 3721da177e4SLinus Torvalds return -EFAULT; 3731da177e4SLinus Torvalds 3741da177e4SLinus Torvalds read_lock(&tasklist_lock); 3751da177e4SLinus Torvalds if (likely(child->sighand != NULL)) { 3761da177e4SLinus Torvalds error = -EINVAL; 3771da177e4SLinus Torvalds spin_lock_irq(&child->sighand->siglock); 3781da177e4SLinus Torvalds if (likely(child->last_siginfo != NULL)) { 3791da177e4SLinus Torvalds *child->last_siginfo = newinfo; 3801da177e4SLinus Torvalds error = 0; 3811da177e4SLinus Torvalds } 3821da177e4SLinus Torvalds spin_unlock_irq(&child->sighand->siglock); 3831da177e4SLinus Torvalds } 3841da177e4SLinus Torvalds read_unlock(&tasklist_lock); 3851da177e4SLinus Torvalds return error; 3861da177e4SLinus Torvalds } 3871da177e4SLinus Torvalds 3881da177e4SLinus Torvalds int ptrace_request(struct task_struct *child, long request, 3891da177e4SLinus Torvalds long addr, long data) 3901da177e4SLinus Torvalds { 3911da177e4SLinus Torvalds int ret = -EIO; 3921da177e4SLinus Torvalds 3931da177e4SLinus Torvalds switch (request) { 3941da177e4SLinus Torvalds #ifdef PTRACE_OLDSETOPTIONS 3951da177e4SLinus Torvalds case PTRACE_OLDSETOPTIONS: 3961da177e4SLinus Torvalds #endif 3971da177e4SLinus Torvalds case PTRACE_SETOPTIONS: 3981da177e4SLinus Torvalds ret = ptrace_setoptions(child, data); 3991da177e4SLinus Torvalds break; 4001da177e4SLinus Torvalds case PTRACE_GETEVENTMSG: 4011da177e4SLinus Torvalds ret = put_user(child->ptrace_message, (unsigned long __user *) data); 4021da177e4SLinus Torvalds break; 4031da177e4SLinus Torvalds case PTRACE_GETSIGINFO: 4041da177e4SLinus Torvalds ret = ptrace_getsiginfo(child, (siginfo_t __user *) data); 4051da177e4SLinus Torvalds break; 4061da177e4SLinus Torvalds case PTRACE_SETSIGINFO: 4071da177e4SLinus Torvalds ret = ptrace_setsiginfo(child, (siginfo_t __user *) data); 4081da177e4SLinus Torvalds break; 4091da177e4SLinus Torvalds default: 4101da177e4SLinus Torvalds break; 4111da177e4SLinus Torvalds } 4121da177e4SLinus Torvalds 4131da177e4SLinus Torvalds return ret; 4141da177e4SLinus Torvalds } 415481bed45SChristoph Hellwig 4166b9c7ed8SChristoph Hellwig /** 4176b9c7ed8SChristoph Hellwig * ptrace_traceme -- helper for PTRACE_TRACEME 4186b9c7ed8SChristoph Hellwig * 4196b9c7ed8SChristoph Hellwig * Performs checks and sets PT_PTRACED. 4206b9c7ed8SChristoph Hellwig * Should be used by all ptrace implementations for PTRACE_TRACEME. 4216b9c7ed8SChristoph Hellwig */ 4226b9c7ed8SChristoph Hellwig int ptrace_traceme(void) 423481bed45SChristoph Hellwig { 424481bed45SChristoph Hellwig int ret; 425481bed45SChristoph Hellwig 426481bed45SChristoph Hellwig /* 427481bed45SChristoph Hellwig * Are we already being traced? 428481bed45SChristoph Hellwig */ 429481bed45SChristoph Hellwig if (current->ptrace & PT_PTRACED) 430481bed45SChristoph Hellwig return -EPERM; 431481bed45SChristoph Hellwig ret = security_ptrace(current->parent, current); 432481bed45SChristoph Hellwig if (ret) 433481bed45SChristoph Hellwig return -EPERM; 434481bed45SChristoph Hellwig /* 435481bed45SChristoph Hellwig * Set the ptrace bit in the process ptrace flags. 436481bed45SChristoph Hellwig */ 437481bed45SChristoph Hellwig current->ptrace |= PT_PTRACED; 438481bed45SChristoph Hellwig return 0; 439481bed45SChristoph Hellwig } 440481bed45SChristoph Hellwig 4416b9c7ed8SChristoph Hellwig /** 4426b9c7ed8SChristoph Hellwig * ptrace_get_task_struct -- grab a task struct reference for ptrace 4436b9c7ed8SChristoph Hellwig * @pid: process id to grab a task_struct reference of 4446b9c7ed8SChristoph Hellwig * 4456b9c7ed8SChristoph Hellwig * This function is a helper for ptrace implementations. It checks 4466b9c7ed8SChristoph Hellwig * permissions and then grabs a task struct for use of the actual 4476b9c7ed8SChristoph Hellwig * ptrace implementation. 4486b9c7ed8SChristoph Hellwig * 4496b9c7ed8SChristoph Hellwig * Returns the task_struct for @pid or an ERR_PTR() on failure. 4506b9c7ed8SChristoph Hellwig */ 4516b9c7ed8SChristoph Hellwig struct task_struct *ptrace_get_task_struct(pid_t pid) 4526b9c7ed8SChristoph Hellwig { 4536b9c7ed8SChristoph Hellwig struct task_struct *child; 4546b9c7ed8SChristoph Hellwig 455481bed45SChristoph Hellwig /* 4566b9c7ed8SChristoph Hellwig * Tracing init is not allowed. 457481bed45SChristoph Hellwig */ 458481bed45SChristoph Hellwig if (pid == 1) 4596b9c7ed8SChristoph Hellwig return ERR_PTR(-EPERM); 460481bed45SChristoph Hellwig 461481bed45SChristoph Hellwig read_lock(&tasklist_lock); 462481bed45SChristoph Hellwig child = find_task_by_pid(pid); 463481bed45SChristoph Hellwig if (child) 464481bed45SChristoph Hellwig get_task_struct(child); 465481bed45SChristoph Hellwig read_unlock(&tasklist_lock); 466481bed45SChristoph Hellwig if (!child) 4676b9c7ed8SChristoph Hellwig return ERR_PTR(-ESRCH); 4686b9c7ed8SChristoph Hellwig return child; 469481bed45SChristoph Hellwig } 470481bed45SChristoph Hellwig 4716b9c7ed8SChristoph Hellwig #ifndef __ARCH_SYS_PTRACE 472481bed45SChristoph Hellwig asmlinkage long sys_ptrace(long request, long pid, long addr, long data) 473481bed45SChristoph Hellwig { 474481bed45SChristoph Hellwig struct task_struct *child; 475481bed45SChristoph Hellwig long ret; 476481bed45SChristoph Hellwig 477481bed45SChristoph Hellwig /* 478481bed45SChristoph Hellwig * This lock_kernel fixes a subtle race with suid exec 479481bed45SChristoph Hellwig */ 480481bed45SChristoph Hellwig lock_kernel(); 4816b9c7ed8SChristoph Hellwig if (request == PTRACE_TRACEME) { 4826b9c7ed8SChristoph Hellwig ret = ptrace_traceme(); 483481bed45SChristoph Hellwig goto out; 4846b9c7ed8SChristoph Hellwig } 4856b9c7ed8SChristoph Hellwig 4866b9c7ed8SChristoph Hellwig child = ptrace_get_task_struct(pid); 4876b9c7ed8SChristoph Hellwig if (IS_ERR(child)) { 4886b9c7ed8SChristoph Hellwig ret = PTR_ERR(child); 4896b9c7ed8SChristoph Hellwig goto out; 4906b9c7ed8SChristoph Hellwig } 491481bed45SChristoph Hellwig 492481bed45SChristoph Hellwig if (request == PTRACE_ATTACH) { 493481bed45SChristoph Hellwig ret = ptrace_attach(child); 494005f18dfSChristoph Hellwig goto out_put_task_struct; 495481bed45SChristoph Hellwig } 496481bed45SChristoph Hellwig 497481bed45SChristoph Hellwig ret = ptrace_check_attach(child, request == PTRACE_KILL); 498481bed45SChristoph Hellwig if (ret < 0) 499481bed45SChristoph Hellwig goto out_put_task_struct; 500481bed45SChristoph Hellwig 501481bed45SChristoph Hellwig ret = arch_ptrace(child, request, addr, data); 502481bed45SChristoph Hellwig if (ret < 0) 503481bed45SChristoph Hellwig goto out_put_task_struct; 504481bed45SChristoph Hellwig 505481bed45SChristoph Hellwig out_put_task_struct: 506481bed45SChristoph Hellwig put_task_struct(child); 507481bed45SChristoph Hellwig out: 508481bed45SChristoph Hellwig unlock_kernel(); 509481bed45SChristoph Hellwig return ret; 510481bed45SChristoph Hellwig } 511481bed45SChristoph Hellwig #endif /* __ARCH_SYS_PTRACE */ 512