arch/x86/kernel/ptrace.c

   1 /* By Ross Biro 1/23/92 */
   2 /*
   3  * Pentium III FXSR, SSE support
   4  *      Gareth Hughes <gareth@valinux.com>, May 2000
   5  */
   6
   7 #include <linux/kernel.h>
   8 #include <linux/sched.h>
   9 #include <linux/mm.h>
  10 #include <linux/smp.h>
  11 #include <linux/errno.h>
  12 #include <linux/slab.h>
  13 #include <linux/ptrace.h>
  14 #include <linux/regset.h>
  15 #include <linux/tracehook.h>
  16 #include <linux/user.h>
  17 #include <linux/elf.h>
  18 #include <linux/security.h>
  19 #include <linux/audit.h>
  20 #include <linux/seccomp.h>
  21 #include <linux/signal.h>
  22 #include <linux/perf_event.h>
  23 #include <linux/hw_breakpoint.h>
  24
  25 #include <asm/uaccess.h>
  26 #include <asm/pgtable.h>
  27 #include <asm/system.h>
  28 #include <asm/processor.h>
  29 #include <asm/i387.h>
  30 #include <asm/debugreg.h>
  31 #include <asm/ldt.h>
  32 #include <asm/desc.h>
  33 #include <asm/prctl.h>
  34 #include <asm/proto.h>
  35 #include <asm/hw_breakpoint.h>
  36
  37 #include "tls.h"
  38
  39 #define CREATE_TRACE_POINTS
  40 #include <trace/events/syscalls.h>
  41
  42 enum x86_regset {
  43         REGSET_GENERAL,
  44         REGSET_FP,
  45         REGSET_XFP,
  46         REGSET_IOPERM64 = REGSET_XFP,
  47         REGSET_XSTATE,
  48         REGSET_TLS,
  49         REGSET_IOPERM32,
  50 };
  51
  52 struct pt_regs_offset {
  53         const char *name;
  54         int offset;
  55 };
  56
  57 #define REG_OFFSET_NAME(r) {.name = #r, .offset = offsetof(struct pt_regs, r)}
  58 #define REG_OFFSET_END {.name = NULL, .offset = 0}
  59
  60 static const struct pt_regs_offset regoffset_table[] = {
  61 #ifdef CONFIG_X86_64
  62         REG_OFFSET_NAME(r15),
  63         REG_OFFSET_NAME(r14),
  64         REG_OFFSET_NAME(r13),
  65         REG_OFFSET_NAME(r12),
  66         REG_OFFSET_NAME(r11),
  67         REG_OFFSET_NAME(r10),
  68         REG_OFFSET_NAME(r9),
  69         REG_OFFSET_NAME(r8),
  70 #endif
  71         REG_OFFSET_NAME(bx),
  72         REG_OFFSET_NAME(cx),
  73         REG_OFFSET_NAME(dx),
  74         REG_OFFSET_NAME(si),
  75         REG_OFFSET_NAME(di),
  76         REG_OFFSET_NAME(bp),
  77         REG_OFFSET_NAME(ax),
  78 #ifdef CONFIG_X86_32
  79         REG_OFFSET_NAME(ds),
  80         REG_OFFSET_NAME(es),
  81         REG_OFFSET_NAME(fs),
  82         REG_OFFSET_NAME(gs),
  83 #endif
  84         REG_OFFSET_NAME(orig_ax),
  85         REG_OFFSET_NAME(ip),
  86         REG_OFFSET_NAME(cs),
  87         REG_OFFSET_NAME(flags),
  88         REG_OFFSET_NAME(sp),
  89         REG_OFFSET_NAME(ss),
  90         REG_OFFSET_END,
  91 };
  92
  93 /**
  94  * regs_query_register_offset() - query register offset from its name
  95  * @name:       the name of a register
  96  *
  97  * regs_query_register_offset() returns the offset of a register in struct
  98  * pt_regs from its name. If the name is invalid, this returns -EINVAL;
  99  */
 100 int regs_query_register_offset(const char *name)
 101 {
 102         const struct pt_regs_offset *roff;
 103         for (roff = regoffset_table; roff->name != NULL; roff++)
 104                 if (!strcmp(roff->name, name))
 105                         return roff->offset;
 106         return -EINVAL;
 107 }
 108
 109 /**
 110  * regs_query_register_name() - query register name from its offset
 111  * @offset:     the offset of a register in struct pt_regs.
 112  *
 113  * regs_query_register_name() returns the name of a register from its
 114  * offset in struct pt_regs. If the @offset is invalid, this returns NULL;
 115  */
 116 const char *regs_query_register_name(unsigned int offset)
 117 {
 118         const struct pt_regs_offset *roff;
 119         for (roff = regoffset_table; roff->name != NULL; roff++)
 120                 if (roff->offset == offset)
 121                         return roff->name;
 122         return NULL;
 123 }
 124
 125 static const int arg_offs_table[] = {
 126 #ifdef CONFIG_X86_32
 127         [0] = offsetof(struct pt_regs, ax),
 128         [1] = offsetof(struct pt_regs, dx),
 129         [2] = offsetof(struct pt_regs, cx)
 130 #else /* CONFIG_X86_64 */
 131         [0] = offsetof(struct pt_regs, di),
 132         [1] = offsetof(struct pt_regs, si),
 133         [2] = offsetof(struct pt_regs, dx),
 134         [3] = offsetof(struct pt_regs, cx),
 135         [4] = offsetof(struct pt_regs, r8),
 136         [5] = offsetof(struct pt_regs, r9)
 137 #endif
 138 };
 139
 140 /*
 141  * does not yet catch signals sent when the child dies.
 142  * in exit.c or in signal.c.
 143  */
 144
 145 /*
 146  * Determines which flags the user has access to [1 = access, 0 = no access].
 147  */
 148 #define FLAG_MASK_32            ((unsigned long)                        \
 149                                  (X86_EFLAGS_CF | X86_EFLAGS_PF |       \
 150                                   X86_EFLAGS_AF | X86_EFLAGS_ZF |       \
 151                                   X86_EFLAGS_SF | X86_EFLAGS_TF |       \
 152                                   X86_EFLAGS_DF | X86_EFLAGS_OF |       \
 153                                   X86_EFLAGS_RF | X86_EFLAGS_AC))
 154
 155 /*
 156  * Determines whether a value may be installed in a segment register.
 157  */
 158 static inline bool invalid_selector(u16 value)
 159 {
 160         return unlikely(value != 0 && (value & SEGMENT_RPL_MASK) != USER_RPL);
 161 }
 162
 163 #ifdef CONFIG_X86_32
 164
 165 #define FLAG_MASK               FLAG_MASK_32
 166
 167 static unsigned long *pt_regs_access(struct pt_regs *regs, unsigned long regno)
 168 {
 169         BUILD_BUG_ON(offsetof(struct pt_regs, bx) != 0);
 170         return &regs->bx + (regno >> 2);
 171 }
 172
 173 static u16 get_segment_reg(struct task_struct *task, unsigned long offset)
 174 {
 175         /*
 176          * Returning the value truncates it to 16 bits.
 177          */
 178         unsigned int retval;
 179         if (offset != offsetof(struct user_regs_struct, gs))
 180                 retval = *pt_regs_access(task_pt_regs(task), offset);
 181         else {
 182                 if (task == current)
 183                         retval = get_user_gs(task_pt_regs(task));
 184                 else
 185                         retval = task_user_gs(task);
 186         }
 187         return retval;
 188 }
 189
 190 static int set_segment_reg(struct task_struct *task,
 191                            unsigned long offset, u16 value)
 192 {
 193         /*
 194          * The value argument was already truncated to 16 bits.
 195          */
 196         if (invalid_selector(value))
 197                 return -EIO;
 198
 199         /*
 200          * For %cs and %ss we cannot permit a null selector.
 201          * We can permit a bogus selector as long as it has USER_RPL.
 202          * Null selectors are fine for other segment registers, but
 203          * we will never get back to user mode with invalid %cs or %ss
 204          * and will take the trap in iret instead.  Much code relies
 205          * on user_mode() to distinguish a user trap frame (which can
 206          * safely use invalid selectors) from a kernel trap frame.
 207          */
 208         switch (offset) {
 209         case offsetof(struct user_regs_struct, cs):
 210         case offsetof(struct user_regs_struct, ss):
 211                 if (unlikely(value == 0))
 212                         return -EIO;
 213
 214         default:
 215                 *pt_regs_access(task_pt_regs(task), offset) = value;
 216                 break;
 217
 218         case offsetof(struct user_regs_struct, gs):
 219                 if (task == current)
 220                         set_user_gs(task_pt_regs(task), value);
 221                 else
 222                         task_user_gs(task) = value;
 223         }
 224
 225         return 0;
 226 }
 227
 228 #else  /* CONFIG_X86_64 */
 229
 230 #define FLAG_MASK               (FLAG_MASK_32 | X86_EFLAGS_NT)
 231
 232 static unsigned long *pt_regs_access(struct pt_regs *regs, unsigned long offset)
 233 {
 234         BUILD_BUG_ON(offsetof(struct pt_regs, r15) != 0);
 235         return &regs->r15 + (offset / sizeof(regs->r15));
 236 }
 237
 238 static u16 get_segment_reg(struct task_struct *task, unsigned long offset)
 239 {
 240         /*
 241          * Returning the value truncates it to 16 bits.
 242          */
 243         unsigned int seg;
 244
 245         switch (offset) {
 246         case offsetof(struct user_regs_struct, fs):
 247                 if (task == current) {
 248                         /* Older gas can't assemble movq %?s,%r?? */
 249                         asm("movl %%fs,%0" : "=r" (seg));
 250                         return seg;
 251                 }
 252                 return task->thread.fsindex;
 253         case offsetof(struct user_regs_struct, gs):
 254                 if (task == current) {
 255                         asm("movl %%gs,%0" : "=r" (seg));
 256                         return seg;
 257                 }
 258                 return task->thread.gsindex;
 259         case offsetof(struct user_regs_struct, ds):
 260                 if (task == current) {
 261                         asm("movl %%ds,%0" : "=r" (seg));
 262                         return seg;
 263                 }
 264                 return task->thread.ds;
 265         case offsetof(struct user_regs_struct, es):
 266                 if (task == current) {
 267                         asm("movl %%es,%0" : "=r" (seg));
 268                         return seg;
 269                 }
 270                 return task->thread.es;
 271
 272         case offsetof(struct user_regs_struct, cs):
 273         case offsetof(struct user_regs_struct, ss):
 274                 break;
 275         }
 276         return *pt_regs_access(task_pt_regs(task), offset);
 277 }
 278
 279 static int set_segment_reg(struct task_struct *task,
 280                            unsigned long offset, u16 value)
 281 {
 282         /*
 283          * The value argument was already truncated to 16 bits.
 284          */
 285         if (invalid_selector(value))
 286                 return -EIO;
 287
 288         switch (offset) {
 289         case offsetof(struct user_regs_struct,fs):
 290                 /*
 291                  * If this is setting fs as for normal 64-bit use but
 292                  * setting fs_base has implicitly changed it, leave it.
 293                  */
 294                 if ((value == FS_TLS_SEL && task->thread.fsindex == 0 &&
 295                      task->thread.fs != 0) ||
 296                     (value == 0 && task->thread.fsindex == FS_TLS_SEL &&
 297                      task->thread.fs == 0))
 298                         break;
 299                 task->thread.fsindex = value;
 300                 if (task == current)
 301                         loadsegment(fs, task->thread.fsindex);
 302                 break;
 303         case offsetof(struct user_regs_struct,gs):
 304                 /*
 305                  * If this is setting gs as for normal 64-bit use but
 306                  * setting gs_base has implicitly changed it, leave it.
 307                  */
 308                 if ((value == GS_TLS_SEL && task->thread.gsindex == 0 &&
 309                      task->thread.gs != 0) ||
 310                     (value == 0 && task->thread.gsindex == GS_TLS_SEL &&
 311                      task->thread.gs == 0))
 312                         break;
 313                 task->thread.gsindex = value;
 314                 if (task == current)
 315                         load_gs_index(task->thread.gsindex);
 316                 break;
 317         case offsetof(struct user_regs_struct,ds):
 318                 task->thread.ds = value;
 319                 if (task == current)
 320                         loadsegment(ds, task->thread.ds);
 321                 break;
 322         case offsetof(struct user_regs_struct,es):
 323                 task->thread.es = value;
 324                 if (task == current)
 325                         loadsegment(es, task->thread.es);
 326                 break;
 327
 328                 /*
 329                  * Can't actually change these in 64-bit mode.
 330                  */
 331         case offsetof(struct user_regs_struct,cs):
 332                 if (unlikely(value == 0))
 333                         return -EIO;
 334 #ifdef CONFIG_IA32_EMULATION
 335                 if (test_tsk_thread_flag(task, TIF_IA32))
 336                         task_pt_regs(task)->cs = value;
 337 #endif
 338                 break;
 339         case offsetof(struct user_regs_struct,ss):
 340                 if (unlikely(value == 0))
 341                         return -EIO;
 342 #ifdef CONFIG_IA32_EMULATION
 343                 if (test_tsk_thread_flag(task, TIF_IA32))
 344                         task_pt_regs(task)->ss = value;
 345 #endif
 346                 break;
 347         }
 348
 349         return 0;
 350 }
 351
 352 #endif  /* CONFIG_X86_32 */
 353
 354 static unsigned long get_flags(struct task_struct *task)
 355 {
 356         unsigned long retval = task_pt_regs(task)->flags;
 357
 358         /*
 359          * If the debugger set TF, hide it from the readout.
 360          */
 361         if (test_tsk_thread_flag(task, TIF_FORCED_TF))
 362                 retval &= ~X86_EFLAGS_TF;
 363
 364         return retval;
 365 }
 366
 367 static int set_flags(struct task_struct *task, unsigned long value)
 368 {
 369         struct pt_regs *regs = task_pt_regs(task);
 370
 371         /*
 372          * If the user value contains TF, mark that
 373          * it was not "us" (the debugger) that set it.
 374          * If not, make sure it stays set if we had.
 375          */
 376         if (value & X86_EFLAGS_TF)
 377                 clear_tsk_thread_flag(task, TIF_FORCED_TF);
 378         else if (test_tsk_thread_flag(task, TIF_FORCED_TF))
 379                 value |= X86_EFLAGS_TF;
 380
 381         regs->flags = (regs->flags & ~FLAG_MASK) | (value & FLAG_MASK);
 382
 383         return 0;
 384 }
 385
 386 static int putreg(struct task_struct *child,
 387                   unsigned long offset, unsigned long value)
 388 {
 389         switch (offset) {
 390         case offsetof(struct user_regs_struct, cs):
 391         case offsetof(struct user_regs_struct, ds):
 392         case offsetof(struct user_regs_struct, es):
 393         case offsetof(struct user_regs_struct, fs):
 394         case offsetof(struct user_regs_struct, gs):
 395         case offsetof(struct user_regs_struct, ss):
 396                 return set_segment_reg(child, offset, value);
 397
 398         case offsetof(struct user_regs_struct, flags):
 399                 return set_flags(child, value);
 400
 401 #ifdef CONFIG_X86_64
 402         case offsetof(struct user_regs_struct,fs_base):
 403                 if (value >= TASK_SIZE_OF(child))
 404                         return -EIO;
 405                 /*
 406                  * When changing the segment base, use do_arch_prctl
 407                  * to set either thread.fs or thread.fsindex and the
 408                  * corresponding GDT slot.
 409                  */
 410                 if (child->thread.fs != value)
 411                         return do_arch_prctl(child, ARCH_SET_FS, value);
 412                 return 0;
 413         case offsetof(struct user_regs_struct,gs_base):
 414                 /*
 415                  * Exactly the same here as the %fs handling above.
 416                  */
 417                 if (value >= TASK_SIZE_OF(child))
 418                         return -EIO;
 419                 if (child->thread.gs != value)
 420                         return do_arch_prctl(child, ARCH_SET_GS, value);
 421                 return 0;
 422 #endif
 423         }
 424
 425         *pt_regs_access(task_pt_regs(child), offset) = value;
 426         return 0;
 427 }
 428
 429 static unsigned long getreg(struct task_struct *task, unsigned long offset)
 430 {
 431         switch (offset) {
 432         case offsetof(struct user_regs_struct, cs):
 433         case offsetof(struct user_regs_struct, ds):
 434         case offsetof(struct user_regs_struct, es):
 435         case offsetof(struct user_regs_struct, fs):
 436         case offsetof(struct user_regs_struct, gs):
 437         case offsetof(struct user_regs_struct, ss):
 438                 return get_segment_reg(task, offset);
 439
 440         case offsetof(struct user_regs_struct, flags):
 441                 return get_flags(task);
 442
 443 #ifdef CONFIG_X86_64
 444         case offsetof(struct user_regs_struct, fs_base): {
 445                 /*
 446                  * do_arch_prctl may have used a GDT slot instead of
 447                  * the MSR.  To userland, it appears the same either
 448                  * way, except the %fs segment selector might not be 0.
 449                  */
 450                 unsigned int seg = task->thread.fsindex;
 451                 if (task->thread.fs != 0)
 452                         return task->thread.fs;
 453                 if (task == current)
 454                         asm("movl %%fs,%0" : "=r" (seg));
 455                 if (seg != FS_TLS_SEL)
 456                         return 0;
 457                 return get_desc_base(&task->thread.tls_array[FS_TLS]);
 458         }
 459         case offsetof(struct user_regs_struct, gs_base): {
 460                 /*
 461                  * Exactly the same here as the %fs handling above.
 462                  */
 463                 unsigned int seg = task->thread.gsindex;
 464                 if (task->thread.gs != 0)
 465                         return task->thread.gs;
 466                 if (task == current)
 467                         asm("movl %%gs,%0" : "=r" (seg));
 468                 if (seg != GS_TLS_SEL)
 469                         return 0;
 470                 return get_desc_base(&task->thread.tls_array[GS_TLS]);
 471         }
 472 #endif
 473         }
 474
 475         return *pt_regs_access(task_pt_regs(task), offset);
 476 }
 477
 478 static int genregs_get(struct task_struct *target,
 479                        const struct user_regset *regset,
 480                        unsigned int pos, unsigned int count,
 481                        void *kbuf, void __user *ubuf)
 482 {
 483         if (kbuf) {
 484                 unsigned long *k = kbuf;
 485                 while (count >= sizeof(*k)) {
 486                         *k++ = getreg(target, pos);
 487                         count -= sizeof(*k);
 488                         pos += sizeof(*k);
 489                 }
 490         } else {
 491                 unsigned long __user *u = ubuf;
 492                 while (count >= sizeof(*u)) {
 493                         if (__put_user(getreg(target, pos), u++))
 494                                 return -EFAULT;
 495                         count -= sizeof(*u);
 496                         pos += sizeof(*u);
 497                 }
 498         }
 499
 500         return 0;
 501 }
 502
 503 static int genregs_set(struct task_struct *target,
 504                        const struct user_regset *regset,
 505                        unsigned int pos, unsigned int count,
 506                        const void *kbuf, const void __user *ubuf)
 507 {
 508         int ret = 0;
 509         if (kbuf) {
 510                 const unsigned long *k = kbuf;
 511                 while (count >= sizeof(*k) && !ret) {
 512                         ret = putreg(target, pos, *k++);
 513                         count -= sizeof(*k);
 514                         pos += sizeof(*k);
 515                 }
 516         } else {
 517                 const unsigned long  __user *u = ubuf;
 518                 while (count >= sizeof(*u) && !ret) {
 519                         unsigned long word;
 520                         ret = __get_user(word, u++);
 521                         if (ret)
 522                                 break;
 523                         ret = putreg(target, pos, word);
 524                         count -= sizeof(*u);
 525                         pos += sizeof(*u);
 526                 }
 527         }
 528         return ret;
 529 }
 530
 531 static void ptrace_triggered(struct perf_event *bp, int nmi,
 532                              struct perf_sample_data *data,
 533                              struct pt_regs *regs)
 534 {
 535         int i;
 536         struct thread_struct *thread = &(current->thread);
 537
 538         /*
 539          * Store in the virtual DR6 register the fact that the breakpoint
 540          * was hit so the thread's debugger will see it.
 541          */
 542         for (i = 0; i < HBP_NUM; i++) {
 543                 if (thread->ptrace_bps[i] == bp)
 544                         break;
 545         }
 546
 547         thread->debugreg6 |= (DR_TRAP0 << i);
 548 }
 549
 550 /*
 551  * Walk through every ptrace breakpoints for this thread and
 552  * build the dr7 value on top of their attributes.
 553  *
 554  */
 555 static unsigned long ptrace_get_dr7(struct perf_event *bp[])
 556 {
 557         int i;
 558         int dr7 = 0;
 559         struct arch_hw_breakpoint *info;
 560
 561         for (i = 0; i < HBP_NUM; i++) {
 562                 if (bp[i] && !bp[i]->attr.disabled) {
 563                         info = counter_arch_bp(bp[i]);
 564                         dr7 |= encode_dr7(i, info->len, info->type);
 565                 }
 566         }
 567
 568         return dr7;
 569 }
 570
 571 static int
 572 ptrace_modify_breakpoint(struct perf_event *bp, int len, int type,
 573                          struct task_struct *tsk, int disabled)
 574 {
 575         int err;
 576         int gen_len, gen_type;
 577         struct perf_event_attr attr;
 578
 579         /*
 580          * We should have at least an inactive breakpoint at this
 581          * slot. It means the user is writing dr7 without having
 582          * written the address register first
 583          */
 584         if (!bp)
 585                 return -EINVAL;
 586
 587         err = arch_bp_generic_fields(len, type, &gen_len, &gen_type);
 588         if (err)
 589                 return err;
 590
 591         attr = bp->attr;
 592         attr.bp_len = gen_len;
 593         attr.bp_type = gen_type;
 594         attr.disabled = disabled;
 595
 596         return modify_user_hw_breakpoint(bp, &attr);
 597 }
 598
 599 /*
 600  * Handle ptrace writes to debug register 7.
 601  */
 602 static int ptrace_write_dr7(struct task_struct *tsk, unsigned long data)
 603 {
 604         struct thread_struct *thread = &(tsk->thread);
 605         unsigned long old_dr7;
 606         int i, orig_ret = 0, rc = 0;
 607         int enabled, second_pass = 0;
 608         unsigned len, type;
 609         struct perf_event *bp;
 610
 611         data &= ~DR_CONTROL_RESERVED;
 612         old_dr7 = ptrace_get_dr7(thread->ptrace_bps);
 613 restore:
 614         /*
 615          * Loop through all the hardware breakpoints, making the
 616          * appropriate changes to each.
 617          */
 618         for (i = 0; i < HBP_NUM; i++) {
 619                 enabled = decode_dr7(data, i, &len, &type);
 620                 bp = thread->ptrace_bps[i];
 621
 622                 if (!enabled) {
 623                         if (bp) {
 624                                 /*
 625                                  * Don't unregister the breakpoints right-away,
 626                                  * unless all register_user_hw_breakpoint()
 627                                  * requests have succeeded. This prevents
 628                                  * any window of opportunity for debug
 629                                  * register grabbing by other users.
 630                                  */
 631                                 if (!second_pass)
 632                                         continue;
 633
 634                                 rc = ptrace_modify_breakpoint(bp, len, type,
 635                                                               tsk, 1);
 636                                 if (rc)
 637                                         break;
 638                         }
 639                         continue;
 640                 }
 641
 642                 rc = ptrace_modify_breakpoint(bp, len, type, tsk, 0);
 643                 if (rc)
 644                         break;
 645         }
 646         /*
 647          * Make a second pass to free the remaining unused breakpoints
 648          * or to restore the original breakpoints if an error occurred.
 649          */
 650         if (!second_pass) {
 651                 second_pass = 1;
 652                 if (rc < 0) {
 653                         orig_ret = rc;
 654                         data = old_dr7;
 655                 }
 656                 goto restore;
 657         }
 658         return ((orig_ret < 0) ? orig_ret : rc);
 659 }
 660
 661 /*
 662  * Handle PTRACE_PEEKUSR calls for the debug register area.
 663  */
 664 static unsigned long ptrace_get_debugreg(struct task_struct *tsk, int n)
 665 {
 666         struct thread_struct *thread = &(tsk->thread);
 667         unsigned long val = 0;
 668
 669         if (n < HBP_NUM) {
 670                 struct perf_event *bp;
 671                 bp = thread->ptrace_bps[n];
 672                 if (!bp)
 673                         return 0;
 674                 val = bp->hw.info.address;
 675         } else if (n == 6) {
 676                 val = thread->debugreg6;
 677          } else if (n == 7) {
 678                 val = thread->ptrace_dr7;
 679         }
 680         return val;
 681 }
 682
 683 static int ptrace_set_breakpoint_addr(struct task_struct *tsk, int nr,
 684                                       unsigned long addr)
 685 {
 686         struct perf_event *bp;
 687         struct thread_struct *t = &tsk->thread;
 688         struct perf_event_attr attr;
 689
 690         if (!t->ptrace_bps[nr]) {
 691                 ptrace_breakpoint_init(&attr);
 692                 /*
 693                  * Put stub len and type to register (reserve) an inactive but
 694                  * correct bp
 695                  */
 696                 attr.bp_addr = addr;
 697                 attr.bp_len = HW_BREAKPOINT_LEN_1;
 698                 attr.bp_type = HW_BREAKPOINT_W;
 699                 attr.disabled = 1;
 700
 701                 bp = register_user_hw_breakpoint(&attr, ptrace_triggered, tsk);
 702
 703                 /*
 704                  * CHECKME: the previous code returned -EIO if the addr wasn't
 705                  * a valid task virtual addr. The new one will return -EINVAL in
 706                  *  this case.
 707                  * -EINVAL may be what we want for in-kernel breakpoints users,
 708                  * but -EIO looks better for ptrace, since we refuse a register
 709                  * writing for the user. And anyway this is the previous
 710                  * behaviour.
 711                  */
 712                 if (IS_ERR(bp))
 713                         return PTR_ERR(bp);
 714
 715                 t->ptrace_bps[nr] = bp;
 716         } else {
 717                 int err;
 718
 719                 bp = t->ptrace_bps[nr];
 720
 721                 attr = bp->attr;
 722                 attr.bp_addr = addr;
 723                 err = modify_user_hw_breakpoint(bp, &attr);
 724                 if (err)
 725                         return err;
 726         }
 727
 728
 729         return 0;
 730 }
 731
 732 /*
 733  * Handle PTRACE_POKEUSR calls for the debug register area.
 734  */
 735 int ptrace_set_debugreg(struct task_struct *tsk, int n, unsigned long val)
 736 {
 737         struct thread_struct *thread = &(tsk->thread);
 738         int rc = 0;
 739
 740         /* There are no DR4 or DR5 registers */
 741         if (n == 4 || n == 5)
 742                 return -EIO;
 743
 744         if (n == 6) {
 745                 thread->debugreg6 = val;
 746                 goto ret_path;
 747         }
 748         if (n < HBP_NUM) {
 749                 rc = ptrace_set_breakpoint_addr(tsk, n, val);
 750                 if (rc)
 751                         return rc;
 752         }
 753         /* All that's left is DR7 */
 754         if (n == 7) {
 755                 rc = ptrace_write_dr7(tsk, val);
 756                 if (!rc)
 757                         thread->ptrace_dr7 = val;
 758         }
 759
 760 ret_path:
 761         return rc;
 762 }
 763
 764 /*
 765  * These access the current or another (stopped) task's io permission
 766  * bitmap for debugging or core dump.
 767  */
 768 static int ioperm_active(struct task_struct *target,
 769                          const struct user_regset *regset)
 770 {
 771         return target->thread.io_bitmap_max / regset->size;
 772 }
 773
 774 static int ioperm_get(struct task_struct *target,
 775                       const struct user_regset *regset,
 776                       unsigned int pos, unsigned int count,
 777                       void *kbuf, void __user *ubuf)
 778 {
 779         if (!target->thread.io_bitmap_ptr)
 780                 return -ENXIO;
 781
 782         return user_regset_copyout(&pos, &count, &kbuf, &ubuf,
 783                                    target->thread.io_bitmap_ptr,
 784                                    0, IO_BITMAP_BYTES);
 785 }
 786
 787 /*
 788  * Called by kernel/ptrace.c when detaching..
 789  *
 790  * Make sure the single step bit is not set.
 791  */
 792 void ptrace_disable(struct task_struct *child)
 793 {
 794         user_disable_single_step(child);
 795 #ifdef TIF_SYSCALL_EMU
 796         clear_tsk_thread_flag(child, TIF_SYSCALL_EMU);
 797 #endif
 798 }
 799
 800 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
 801 static const struct user_regset_view user_x86_32_view; /* Initialized below. */
 802 #endif
 803
 804 long arch_ptrace(struct task_struct *child, long request,
 805                  unsigned long addr, unsigned long data)
 806 {
 807         int ret;
 808         unsigned long __user *datap = (unsigned long __user *)data;
 809
 810         switch (request) {
 811         /* read the word at location addr in the USER area. */
 812         case PTRACE_PEEKUSR: {
 813                 unsigned long tmp;
 814
 815                 ret = -EIO;
 816                 if ((addr & (sizeof(data) - 1)) || addr < 0 ||
 817                     addr >= sizeof(struct user))
 818                         break;
 819
 820                 tmp = 0;  /* Default return condition */
 821                 if (addr < sizeof(struct user_regs_struct))
 822                         tmp = getreg(child, addr);
 823                 else if (addr >= offsetof(struct user, u_debugreg[0]) &&
 824                          addr <= offsetof(struct user, u_debugreg[7])) {
 825                         addr -= offsetof(struct user, u_debugreg[0]);
 826                         tmp = ptrace_get_debugreg(child, addr / sizeof(data));
 827                 }
 828                 ret = put_user(tmp, datap);
 829                 break;
 830         }
 831
 832         case PTRACE_POKEUSR: /* write the word at location addr in the USER area */
 833                 ret = -EIO;
 834                 if ((addr & (sizeof(data) - 1)) || addr < 0 ||
 835                     addr >= sizeof(struct user))
 836                         break;
 837
 838                 if (addr < sizeof(struct user_regs_struct))
 839                         ret = putreg(child, addr, data);
 840                 else if (addr >= offsetof(struct user, u_debugreg[0]) &&
 841                          addr <= offsetof(struct user, u_debugreg[7])) {
 842                         addr -= offsetof(struct user, u_debugreg[0]);
 843                         ret = ptrace_set_debugreg(child,
 844                                                   addr / sizeof(data), data);
 845                 }
 846                 break;
 847
 848         case PTRACE_GETREGS:    /* Get all gp regs from the child. */
 849                 return copy_regset_to_user(child,
 850                                            task_user_regset_view(current),
 851                                            REGSET_GENERAL,
 852                                            0, sizeof(struct user_regs_struct),
 853                                            datap);
 854
 855         case PTRACE_SETREGS:    /* Set all gp regs in the child. */
 856                 return copy_regset_from_user(child,
 857                                              task_user_regset_view(current),
 858                                              REGSET_GENERAL,
 859                                              0, sizeof(struct user_regs_struct),
 860                                              datap);
 861
 862         case PTRACE_GETFPREGS:  /* Get the child FPU state. */
 863                 return copy_regset_to_user(child,
 864                                            task_user_regset_view(current),
 865                                            REGSET_FP,
 866                                            0, sizeof(struct user_i387_struct),
 867                                            datap);
 868
 869         case PTRACE_SETFPREGS:  /* Set the child FPU state. */
 870                 return copy_regset_from_user(child,
 871                                              task_user_regset_view(current),
 872                                              REGSET_FP,
 873                                              0, sizeof(struct user_i387_struct),
 874                                              datap);
 875
 876 #ifdef CONFIG_X86_32
 877         case PTRACE_GETFPXREGS: /* Get the child extended FPU state. */
 878                 return copy_regset_to_user(child, &user_x86_32_view,
 879                                            REGSET_XFP,
 880                                            0, sizeof(struct user_fxsr_struct),
 881                                            datap) ? -EIO : 0;
 882
 883         case PTRACE_SETFPXREGS: /* Set the child extended FPU state. */
 884                 return copy_regset_from_user(child, &user_x86_32_view,
 885                                              REGSET_XFP,
 886                                              0, sizeof(struct user_fxsr_struct),
 887                                              datap) ? -EIO : 0;
 888 #endif
 889
 890 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
 891         case PTRACE_GET_THREAD_AREA:
 892                 if ((int) addr < 0)
 893                         return -EIO;
 894                 ret = do_get_thread_area(child, addr,
 895                                          (struct user_desc __user *) data);
 896                 break;
 897
 898         case PTRACE_SET_THREAD_AREA:
 899                 if ((int) addr < 0)
 900                         return -EIO;
 901                 ret = do_set_thread_area(child, addr,
 902                                          (struct user_desc __user *) data, 0);
 903                 break;
 904 #endif
 905
 906 #ifdef CONFIG_X86_64
 907                 /* normal 64bit interface to access TLS data.
 908                    Works just like arch_prctl, except that the arguments
 909                    are reversed. */
 910         case PTRACE_ARCH_PRCTL:
 911                 ret = do_arch_prctl(child, data, addr);
 912                 break;
 913 #endif
 914
 915         default:
 916                 ret = ptrace_request(child, request, addr, data);
 917                 break;
 918         }
 919
 920         return ret;
 921 }
 922
 923 #ifdef CONFIG_IA32_EMULATION
 924
 925 #include <linux/compat.h>
 926 #include <linux/syscalls.h>
 927 #include <asm/ia32.h>
 928 #include <asm/user32.h>
 929
 930 #define R32(l,q)                                                        \
 931         case offsetof(struct user32, regs.l):                           \
 932                 regs->q = value; break
 933
 934 #define SEG32(rs)                                                       \
 935         case offsetof(struct user32, regs.rs):                          \
 936                 return set_segment_reg(child,                           \
 937                                        offsetof(struct user_regs_struct, rs), \
 938                                        value);                          \
 939                 break
 940
 941 static int putreg32(struct task_struct *child, unsigned regno, u32 value)
 942 {
 943         struct pt_regs *regs = task_pt_regs(child);
 944
 945         switch (regno) {
 946
 947         SEG32(cs);
 948         SEG32(ds);
 949         SEG32(es);
 950         SEG32(fs);
 951         SEG32(gs);
 952         SEG32(ss);
 953
 954         R32(ebx, bx);
 955         R32(ecx, cx);
 956         R32(edx, dx);
 957         R32(edi, di);
 958         R32(esi, si);
 959         R32(ebp, bp);
 960         R32(eax, ax);
 961         R32(eip, ip);
 962         R32(esp, sp);
 963
 964         case offsetof(struct user32, regs.orig_eax):
 965                 /*
 966                  * A 32-bit debugger setting orig_eax means to restore
 967                  * the state of the task restarting a 32-bit syscall.
 968                  * Make sure we interpret the -ERESTART* codes correctly
 969                  * in case the task is not actually still sitting at the
 970                  * exit from a 32-bit syscall with TS_COMPAT still set.
 971                  */
 972                 regs->orig_ax = value;
 973                 if (syscall_get_nr(child, regs) >= 0)
 974                         task_thread_info(child)->status |= TS_COMPAT;
 975                 break;
 976
 977         case offsetof(struct user32, regs.eflags):
 978                 return set_flags(child, value);
 979
 980         case offsetof(struct user32, u_debugreg[0]) ...
 981                 offsetof(struct user32, u_debugreg[7]):
 982                 regno -= offsetof(struct user32, u_debugreg[0]);
 983                 return ptrace_set_debugreg(child, regno / 4, value);
 984
 985         default:
 986                 if (regno > sizeof(struct user32) || (regno & 3))
 987                         return -EIO;
 988
 989                 /*
 990                  * Other dummy fields in the virtual user structure
 991                  * are ignored
 992                  */
 993                 break;
 994         }
 995         return 0;
 996 }
 997
 998 #undef R32
 999 #undef SEG32
1000
1001 #define R32(l,q)                                                        \
1002         case offsetof(struct user32, regs.l):                           \
1003                 *val = regs->q; break
1004
1005 #define SEG32(rs)                                                       \
1006         case offsetof(struct user32, regs.rs):                          \
1007                 *val = get_segment_reg(child,                           \
1008                                        offsetof(struct user_regs_struct, rs)); \
1009                 break
1010
1011 static int getreg32(struct task_struct *child, unsigned regno, u32 *val)
1012 {
1013         struct pt_regs *regs = task_pt_regs(child);
1014
1015         switch (regno) {
1016
1017         SEG32(ds);
1018         SEG32(es);
1019         SEG32(fs);
1020         SEG32(gs);
1021
1022         R32(cs, cs);
1023         R32(ss, ss);
1024         R32(ebx, bx);
1025         R32(ecx, cx);
1026         R32(edx, dx);
1027         R32(edi, di);
1028         R32(esi, si);
1029         R32(ebp, bp);
1030         R32(eax, ax);
1031         R32(orig_eax, orig_ax);
1032         R32(eip, ip);
1033         R32(esp, sp);
1034
1035         case offsetof(struct user32, regs.eflags):
1036                 *val = get_flags(child);
1037                 break;
1038
1039         case offsetof(struct user32, u_debugreg[0]) ...
1040                 offsetof(struct user32, u_debugreg[7]):
1041                 regno -= offsetof(struct user32, u_debugreg[0]);
1042                 *val = ptrace_get_debugreg(child, regno / 4);
1043                 break;
1044
1045         default:
1046                 if (regno > sizeof(struct user32) || (regno & 3))
1047                         return -EIO;
1048
1049                 /*
1050                  * Other dummy fields in the virtual user structure
1051                  * are ignored
1052                  */
1053                 *val = 0;
1054                 break;
1055         }
1056         return 0;
1057 }
1058
1059 #undef R32
1060 #undef SEG32
1061
1062 static int genregs32_get(struct task_struct *target,
1063                          const struct user_regset *regset,
1064                          unsigned int pos, unsigned int count,
1065                          void *kbuf, void __user *ubuf)
1066 {
1067         if (kbuf) {
1068                 compat_ulong_t *k = kbuf;
1069                 while (count >= sizeof(*k)) {
1070                         getreg32(target, pos, k++);
1071                         count -= sizeof(*k);
1072                         pos += sizeof(*k);
1073                 }
1074         } else {
1075                 compat_ulong_t __user *u = ubuf;
1076                 while (count >= sizeof(*u)) {
1077                         compat_ulong_t word;
1078                         getreg32(target, pos, &word);
1079                         if (__put_user(word, u++))
1080                                 return -EFAULT;
1081                         count -= sizeof(*u);
1082                         pos += sizeof(*u);
1083                 }
1084         }
1085
1086         return 0;
1087 }
1088
1089 static int genregs32_set(struct task_struct *target,
1090                          const struct user_regset *regset,
1091                          unsigned int pos, unsigned int count,
1092                          const void *kbuf, const void __user *ubuf)
1093 {
1094         int ret = 0;
1095         if (kbuf) {
1096                 const compat_ulong_t *k = kbuf;
1097                 while (count >= sizeof(*k) && !ret) {
1098                         ret = putreg32(target, pos, *k++);
1099                         count -= sizeof(*k);
1100                         pos += sizeof(*k);
1101                 }
1102         } else {
1103                 const compat_ulong_t __user *u = ubuf;
1104                 while (count >= sizeof(*u) && !ret) {
1105                         compat_ulong_t word;
1106                         ret = __get_user(word, u++);
1107                         if (ret)
1108                                 break;
1109                         ret = putreg32(target, pos, word);
1110                         count -= sizeof(*u);
1111                         pos += sizeof(*u);
1112                 }
1113         }
1114         return ret;
1115 }
1116
1117 long compat_arch_ptrace(struct task_struct *child, compat_long_t request,
1118                         compat_ulong_t caddr, compat_ulong_t cdata)
1119 {
1120         unsigned long addr = caddr;
1121         unsigned long data = cdata;
1122         void __user *datap = compat_ptr(data);
1123         int ret;
1124         __u32 val;
1125
1126         switch (request) {
1127         case PTRACE_PEEKUSR:
1128                 ret = getreg32(child, addr, &val);
1129                 if (ret == 0)
1130                         ret = put_user(val, (__u32 __user *)datap);
1131                 break;
1132
1133         case PTRACE_POKEUSR:
1134                 ret = putreg32(child, addr, data);
1135                 break;
1136
1137         case PTRACE_GETREGS:    /* Get all gp regs from the child. */
1138                 return copy_regset_to_user(child, &user_x86_32_view,
1139                                            REGSET_GENERAL,
1140                                            0, sizeof(struct user_regs_struct32),
1141                                            datap);
1142
1143         case PTRACE_SETREGS:    /* Set all gp regs in the child. */
1144                 return copy_regset_from_user(child, &user_x86_32_view,
1145                                              REGSET_GENERAL, 0,
1146                                              sizeof(struct user_regs_struct32),
1147                                              datap);
1148
1149         case PTRACE_GETFPREGS:  /* Get the child FPU state. */
1150                 return copy_regset_to_user(child, &user_x86_32_view,
1151                                            REGSET_FP, 0,
1152                                            sizeof(struct user_i387_ia32_struct),
1153                                            datap);
1154
1155         case PTRACE_SETFPREGS:  /* Set the child FPU state. */
1156                 return copy_regset_from_user(
1157                         child, &user_x86_32_view, REGSET_FP,
1158                         0, sizeof(struct user_i387_ia32_struct), datap);
1159
1160         case PTRACE_GETFPXREGS: /* Get the child extended FPU state. */
1161                 return copy_regset_to_user(child, &user_x86_32_view,
1162                                            REGSET_XFP, 0,
1163                                            sizeof(struct user32_fxsr_struct),
1164                                            datap);
1165
1166         case PTRACE_SETFPXREGS: /* Set the child extended FPU state. */
1167                 return copy_regset_from_user(child, &user_x86_32_view,
1168                                              REGSET_XFP, 0,
1169                                              sizeof(struct user32_fxsr_struct),
1170                                              datap);
1171
1172         case PTRACE_GET_THREAD_AREA:
1173         case PTRACE_SET_THREAD_AREA:
1174                 return arch_ptrace(child, request, addr, data);
1175
1176         default:
1177                 return compat_ptrace_request(child, request, addr, data);
1178         }
1179
1180         return ret;
1181 }
1182
1183 #endif  /* CONFIG_IA32_EMULATION */
1184
1185 #ifdef CONFIG_X86_64
1186
1187 static struct user_regset x86_64_regsets[] __read_mostly = {
1188         [REGSET_GENERAL] = {
1189                 .core_note_type = NT_PRSTATUS,
1190                 .n = sizeof(struct user_regs_struct) / sizeof(long),
1191                 .size = sizeof(long), .align = sizeof(long),
1192                 .get = genregs_get, .set = genregs_set
1193         },
1194         [REGSET_FP] = {
1195                 .core_note_type = NT_PRFPREG,
1196                 .n = sizeof(struct user_i387_struct) / sizeof(long),
1197                 .size = sizeof(long), .align = sizeof(long),
1198                 .active = xfpregs_active, .get = xfpregs_get, .set = xfpregs_set
1199         },
1200         [REGSET_XSTATE] = {
1201                 .core_note_type = NT_X86_XSTATE,
1202                 .size = sizeof(u64), .align = sizeof(u64),
1203                 .active = xstateregs_active, .get = xstateregs_get,
1204                 .set = xstateregs_set
1205         },
1206         [REGSET_IOPERM64] = {
1207                 .core_note_type = NT_386_IOPERM,
1208                 .n = IO_BITMAP_LONGS,
1209                 .size = sizeof(long), .align = sizeof(long),
1210                 .active = ioperm_active, .get = ioperm_get
1211         },
1212 };
1213
1214 static const struct user_regset_view user_x86_64_view = {
1215         .name = "x86_64", .e_machine = EM_X86_64,
1216         .regsets = x86_64_regsets, .n = ARRAY_SIZE(x86_64_regsets)
1217 };
1218
1219 #else  /* CONFIG_X86_32 */
1220
1221 #define user_regs_struct32      user_regs_struct
1222 #define genregs32_get           genregs_get
1223 #define genregs32_set           genregs_set
1224
1225 #define user_i387_ia32_struct   user_i387_struct
1226 #define user32_fxsr_struct      user_fxsr_struct
1227
1228 #endif  /* CONFIG_X86_64 */
1229
1230 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1231 static struct user_regset x86_32_regsets[] __read_mostly = {
1232         [REGSET_GENERAL] = {
1233                 .core_note_type = NT_PRSTATUS,
1234                 .n = sizeof(struct user_regs_struct32) / sizeof(u32),
1235                 .size = sizeof(u32), .align = sizeof(u32),
1236                 .get = genregs32_get, .set = genregs32_set
1237         },
1238         [REGSET_FP] = {
1239                 .core_note_type = NT_PRFPREG,
1240                 .n = sizeof(struct user_i387_ia32_struct) / sizeof(u32),
1241                 .size = sizeof(u32), .align = sizeof(u32),
1242                 .active = fpregs_active, .get = fpregs_get, .set = fpregs_set
1243         },
1244         [REGSET_XFP] = {
1245                 .core_note_type = NT_PRXFPREG,
1246                 .n = sizeof(struct user32_fxsr_struct) / sizeof(u32),
1247                 .size = sizeof(u32), .align = sizeof(u32),
1248                 .active = xfpregs_active, .get = xfpregs_get, .set = xfpregs_set
1249         },
1250         [REGSET_XSTATE] = {
1251                 .core_note_type = NT_X86_XSTATE,
1252                 .size = sizeof(u64), .align = sizeof(u64),
1253                 .active = xstateregs_active, .get = xstateregs_get,
1254                 .set = xstateregs_set
1255         },
1256         [REGSET_TLS] = {
1257                 .core_note_type = NT_386_TLS,
1258                 .n = GDT_ENTRY_TLS_ENTRIES, .bias = GDT_ENTRY_TLS_MIN,
1259                 .size = sizeof(struct user_desc),
1260                 .align = sizeof(struct user_desc),
1261                 .active = regset_tls_active,
1262                 .get = regset_tls_get, .set = regset_tls_set
1263         },
1264         [REGSET_IOPERM32] = {
1265                 .core_note_type = NT_386_IOPERM,
1266                 .n = IO_BITMAP_BYTES / sizeof(u32),
1267                 .size = sizeof(u32), .align = sizeof(u32),
1268                 .active = ioperm_active, .get = ioperm_get
1269         },
1270 };
1271
1272 static const struct user_regset_view user_x86_32_view = {
1273         .name = "i386", .e_machine = EM_386,
1274         .regsets = x86_32_regsets, .n = ARRAY_SIZE(x86_32_regsets)
1275 };
1276 #endif
1277
1278 /*
1279  * This represents bytes 464..511 in the memory layout exported through
1280  * the REGSET_XSTATE interface.
1281  */
1282 u64 xstate_fx_sw_bytes[USER_XSTATE_FX_SW_WORDS];
1283
1284 void update_regset_xstate_info(unsigned int size, u64 xstate_mask)
1285 {
1286 #ifdef CONFIG_X86_64
1287         x86_64_regsets[REGSET_XSTATE].n = size / sizeof(u64);
1288 #endif
1289 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1290         x86_32_regsets[REGSET_XSTATE].n = size / sizeof(u64);
1291 #endif
1292         xstate_fx_sw_bytes[USER_XSTATE_XCR0_WORD] = xstate_mask;
1293 }
1294
1295 const struct user_regset_view *task_user_regset_view(struct task_struct *task)
1296 {
1297 #ifdef CONFIG_IA32_EMULATION
1298         if (test_tsk_thread_flag(task, TIF_IA32))
1299 #endif
1300 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1301                 return &user_x86_32_view;
1302 #endif
1303 #ifdef CONFIG_X86_64
1304         return &user_x86_64_view;
1305 #endif
1306 }
1307
1308 static void fill_sigtrap_info(struct task_struct *tsk,
1309                                 struct pt_regs *regs,
1310                                 int error_code, int si_code,
1311                                 struct siginfo *info)
1312 {
1313         tsk->thread.trap_no = 1;
1314         tsk->thread.error_code = error_code;
1315
1316         memset(info, 0, sizeof(*info));
1317         info->si_signo = SIGTRAP;
1318         info->si_code = si_code;
1319         info->si_addr = user_mode_vm(regs) ? (void __user *)regs->ip : NULL;
1320 }
1321
1322 void user_single_step_siginfo(struct task_struct *tsk,
1323                                 struct pt_regs *regs,
1324                                 struct siginfo *info)
1325 {
1326         fill_sigtrap_info(tsk, regs, 0, TRAP_BRKPT, info);
1327 }
1328
1329 void send_sigtrap(struct task_struct *tsk, struct pt_regs *regs,
1330                                          int error_code, int si_code)
1331 {
1332         struct siginfo info;
1333
1334         fill_sigtrap_info(tsk, regs, error_code, si_code, &info);
1335         /* Send us the fake SIGTRAP */
1336         force_sig_info(SIGTRAP, &info, tsk);
1337 }
1338
1339
1340 #ifdef CONFIG_X86_32
1341 # define IS_IA32        1
1342 #elif defined CONFIG_IA32_EMULATION
1343 # define IS_IA32        is_compat_task()
1344 #else
1345 # define IS_IA32        0
1346 #endif
1347
1348 /*
1349  * We must return the syscall number to actually look up in the table.
1350  * This can be -1L to skip running any syscall at all.
1351  */
1352 asmregparm long syscall_trace_enter(struct pt_regs *regs)
1353 {
1354         long ret = 0;
1355
1356         /*
1357          * If we stepped into a sysenter/syscall insn, it trapped in
1358          * kernel mode; do_debug() cleared TF and set TIF_SINGLESTEP.
1359          * If user-mode had set TF itself, then it's still clear from
1360          * do_debug() and we need to set it again to restore the user
1361          * state.  If we entered on the slow path, TF was already set.
1362          */
1363         if (test_thread_flag(TIF_SINGLESTEP))
1364                 regs->flags |= X86_EFLAGS_TF;
1365
1366         /* do the secure computing check first */
1367         secure_computing(regs->orig_ax);
1368
1369         if (unlikely(test_thread_flag(TIF_SYSCALL_EMU)))
1370                 ret = -1L;
1371
1372         if ((ret || test_thread_flag(TIF_SYSCALL_TRACE)) &&
1373             tracehook_report_syscall_entry(regs))
1374                 ret = -1L;
1375
1376         if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1377                 trace_sys_enter(regs, regs->orig_ax);
1378
1379         if (unlikely(current->audit_context)) {
1380                 if (IS_IA32)
1381                         audit_syscall_entry(AUDIT_ARCH_I386,
1382                                             regs->orig_ax,
1383                                             regs->bx, regs->cx,
1384                                             regs->dx, regs->si);
1385 #ifdef CONFIG_X86_64
1386                 else
1387                         audit_syscall_entry(AUDIT_ARCH_X86_64,
1388                                             regs->orig_ax,
1389                                             regs->di, regs->si,
1390                                             regs->dx, regs->r10);
1391 #endif
1392         }
1393
1394         return ret ?: regs->orig_ax;
1395 }
1396
1397 asmregparm void syscall_trace_leave(struct pt_regs *regs)
1398 {
1399         bool step;
1400
1401         if (unlikely(current->audit_context))
1402                 audit_syscall_exit(AUDITSC_RESULT(regs->ax), regs->ax);
1403
1404         if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1405                 trace_sys_exit(regs, regs->ax);
1406
1407         /*
1408          * If TIF_SYSCALL_EMU is set, we only get here because of
1409          * TIF_SINGLESTEP (i.e. this is PTRACE_SYSEMU_SINGLESTEP).
1410          * We already reported this syscall instruction in
1411          * syscall_trace_enter().
1412          */
1413         step = unlikely(test_thread_flag(TIF_SINGLESTEP)) &&
1414                         !test_thread_flag(TIF_SYSCALL_EMU);
1415         if (step || test_thread_flag(TIF_SYSCALL_TRACE))
1416                 tracehook_report_syscall_exit(regs, step);
1417 }