arch/arm64/kernel/hw_breakpoint.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  * HW_breakpoint: a unified kernel/user-space hardware breakpoint facility,
   4  * using the CPU's debug registers.
   5  *
   6  * Copyright (C) 2012 ARM Limited
   7  * Author: Will Deacon <will.deacon@arm.com>
   8  */
   9
  10 #define pr_fmt(fmt) "hw-breakpoint: " fmt
  11
  12 #include <linux/compat.h>
  13 #include <linux/cpu_pm.h>
  14 #include <linux/errno.h>
  15 #include <linux/hw_breakpoint.h>
  16 #include <linux/kprobes.h>
  17 #include <linux/perf_event.h>
  18 #include <linux/ptrace.h>
  19 #include <linux/smp.h>
  20 #include <linux/uaccess.h>
  21
  22 #include <asm/current.h>
  23 #include <asm/debug-monitors.h>
  24 #include <asm/hw_breakpoint.h>
  25 #include <asm/traps.h>
  26 #include <asm/cputype.h>
  27 #include <asm/system_misc.h>
  28
  29 /* Breakpoint currently in use for each BRP. */
  30 static DEFINE_PER_CPU(struct perf_event *, bp_on_reg[ARM_MAX_BRP]);
  31
  32 /* Watchpoint currently in use for each WRP. */
  33 static DEFINE_PER_CPU(struct perf_event *, wp_on_reg[ARM_MAX_WRP]);
  34
  35 /* Currently stepping a per-CPU kernel breakpoint. */
  36 static DEFINE_PER_CPU(int, stepping_kernel_bp);
  37
  38 /* Number of BRP/WRP registers on this CPU. */
  39 static int core_num_brps;
  40 static int core_num_wrps;
  41
  42 int hw_breakpoint_slots(int type)
  43 {
  44         /*
  45          * We can be called early, so don't rely on
  46          * our static variables being initialised.
  47          */
  48         switch (type) {
  49         case TYPE_INST:
  50                 return get_num_brps();
  51         case TYPE_DATA:
  52                 return get_num_wrps();
  53         default:
  54                 pr_warn("unknown slot type: %d\n", type);
  55                 return 0;
  56         }
  57 }
  58
  59 #define READ_WB_REG_CASE(OFF, N, REG, VAL)      \
  60         case (OFF + N):                         \
  61                 AARCH64_DBG_READ(N, REG, VAL);  \
  62                 break
  63
  64 #define WRITE_WB_REG_CASE(OFF, N, REG, VAL)     \
  65         case (OFF + N):                         \
  66                 AARCH64_DBG_WRITE(N, REG, VAL); \
  67                 break
  68
  69 #define GEN_READ_WB_REG_CASES(OFF, REG, VAL)    \
  70         READ_WB_REG_CASE(OFF,  0, REG, VAL);    \
  71         READ_WB_REG_CASE(OFF,  1, REG, VAL);    \
  72         READ_WB_REG_CASE(OFF,  2, REG, VAL);    \
  73         READ_WB_REG_CASE(OFF,  3, REG, VAL);    \
  74         READ_WB_REG_CASE(OFF,  4, REG, VAL);    \
  75         READ_WB_REG_CASE(OFF,  5, REG, VAL);    \
  76         READ_WB_REG_CASE(OFF,  6, REG, VAL);    \
  77         READ_WB_REG_CASE(OFF,  7, REG, VAL);    \
  78         READ_WB_REG_CASE(OFF,  8, REG, VAL);    \
  79         READ_WB_REG_CASE(OFF,  9, REG, VAL);    \
  80         READ_WB_REG_CASE(OFF, 10, REG, VAL);    \
  81         READ_WB_REG_CASE(OFF, 11, REG, VAL);    \
  82         READ_WB_REG_CASE(OFF, 12, REG, VAL);    \
  83         READ_WB_REG_CASE(OFF, 13, REG, VAL);    \
  84         READ_WB_REG_CASE(OFF, 14, REG, VAL);    \
  85         READ_WB_REG_CASE(OFF, 15, REG, VAL)
  86
  87 #define GEN_WRITE_WB_REG_CASES(OFF, REG, VAL)   \
  88         WRITE_WB_REG_CASE(OFF,  0, REG, VAL);   \
  89         WRITE_WB_REG_CASE(OFF,  1, REG, VAL);   \
  90         WRITE_WB_REG_CASE(OFF,  2, REG, VAL);   \
  91         WRITE_WB_REG_CASE(OFF,  3, REG, VAL);   \
  92         WRITE_WB_REG_CASE(OFF,  4, REG, VAL);   \
  93         WRITE_WB_REG_CASE(OFF,  5, REG, VAL);   \
  94         WRITE_WB_REG_CASE(OFF,  6, REG, VAL);   \
  95         WRITE_WB_REG_CASE(OFF,  7, REG, VAL);   \
  96         WRITE_WB_REG_CASE(OFF,  8, REG, VAL);   \
  97         WRITE_WB_REG_CASE(OFF,  9, REG, VAL);   \
  98         WRITE_WB_REG_CASE(OFF, 10, REG, VAL);   \
  99         WRITE_WB_REG_CASE(OFF, 11, REG, VAL);   \
 100         WRITE_WB_REG_CASE(OFF, 12, REG, VAL);   \
 101         WRITE_WB_REG_CASE(OFF, 13, REG, VAL);   \
 102         WRITE_WB_REG_CASE(OFF, 14, REG, VAL);   \
 103         WRITE_WB_REG_CASE(OFF, 15, REG, VAL)
 104
 105 static u64 read_wb_reg(int reg, int n)
 106 {
 107         u64 val = 0;
 108
 109         switch (reg + n) {
 110         GEN_READ_WB_REG_CASES(AARCH64_DBG_REG_BVR, AARCH64_DBG_REG_NAME_BVR, val);
 111         GEN_READ_WB_REG_CASES(AARCH64_DBG_REG_BCR, AARCH64_DBG_REG_NAME_BCR, val);
 112         GEN_READ_WB_REG_CASES(AARCH64_DBG_REG_WVR, AARCH64_DBG_REG_NAME_WVR, val);
 113         GEN_READ_WB_REG_CASES(AARCH64_DBG_REG_WCR, AARCH64_DBG_REG_NAME_WCR, val);
 114         default:
 115                 pr_warn("attempt to read from unknown breakpoint register %d\n", n);
 116         }
 117
 118         return val;
 119 }
 120 NOKPROBE_SYMBOL(read_wb_reg);
 121
 122 static void write_wb_reg(int reg, int n, u64 val)
 123 {
 124         switch (reg + n) {
 125         GEN_WRITE_WB_REG_CASES(AARCH64_DBG_REG_BVR, AARCH64_DBG_REG_NAME_BVR, val);
 126         GEN_WRITE_WB_REG_CASES(AARCH64_DBG_REG_BCR, AARCH64_DBG_REG_NAME_BCR, val);
 127         GEN_WRITE_WB_REG_CASES(AARCH64_DBG_REG_WVR, AARCH64_DBG_REG_NAME_WVR, val);
 128         GEN_WRITE_WB_REG_CASES(AARCH64_DBG_REG_WCR, AARCH64_DBG_REG_NAME_WCR, val);
 129         default:
 130                 pr_warn("attempt to write to unknown breakpoint register %d\n", n);
 131         }
 132         isb();
 133 }
 134 NOKPROBE_SYMBOL(write_wb_reg);
 135
 136 /*
 137  * Convert a breakpoint privilege level to the corresponding exception
 138  * level.
 139  */
 140 static enum dbg_active_el debug_exception_level(int privilege)
 141 {
 142         switch (privilege) {
 143         case AARCH64_BREAKPOINT_EL0:
 144                 return DBG_ACTIVE_EL0;
 145         case AARCH64_BREAKPOINT_EL1:
 146                 return DBG_ACTIVE_EL1;
 147         default:
 148                 pr_warn("invalid breakpoint privilege level %d\n", privilege);
 149                 return -EINVAL;
 150         }
 151 }
 152 NOKPROBE_SYMBOL(debug_exception_level);
 153
 154 enum hw_breakpoint_ops {
 155         HW_BREAKPOINT_INSTALL,
 156         HW_BREAKPOINT_UNINSTALL,
 157         HW_BREAKPOINT_RESTORE
 158 };
 159
 160 static int is_compat_bp(struct perf_event *bp)
 161 {
 162         struct task_struct *tsk = bp->hw.target;
 163
 164         /*
 165          * tsk can be NULL for per-cpu (non-ptrace) breakpoints.
 166          * In this case, use the native interface, since we don't have
 167          * the notion of a "compat CPU" and could end up relying on
 168          * deprecated behaviour if we use unaligned watchpoints in
 169          * AArch64 state.
 170          */
 171         return tsk && is_compat_thread(task_thread_info(tsk));
 172 }
 173
 174 /**
 175  * hw_breakpoint_slot_setup - Find and setup a perf slot according to
 176  *                            operations
 177  *
 178  * @slots: pointer to array of slots
 179  * @max_slots: max number of slots
 180  * @bp: perf_event to setup
 181  * @ops: operation to be carried out on the slot
 182  *
 183  * Return:
 184  *      slot index on success
 185  *      -ENOSPC if no slot is available/matches
 186  *      -EINVAL on wrong operations parameter
 187  */
 188 static int hw_breakpoint_slot_setup(struct perf_event **slots, int max_slots,
 189                                     struct perf_event *bp,
 190                                     enum hw_breakpoint_ops ops)
 191 {
 192         int i;
 193         struct perf_event **slot;
 194
 195         for (i = 0; i < max_slots; ++i) {
 196                 slot = &slots[i];
 197                 switch (ops) {
 198                 case HW_BREAKPOINT_INSTALL:
 199                         if (!*slot) {
 200                                 *slot = bp;
 201                                 return i;
 202                         }
 203                         break;
 204                 case HW_BREAKPOINT_UNINSTALL:
 205                         if (*slot == bp) {
 206                                 *slot = NULL;
 207                                 return i;
 208                         }
 209                         break;
 210                 case HW_BREAKPOINT_RESTORE:
 211                         if (*slot == bp)
 212                                 return i;
 213                         break;
 214                 default:
 215                         pr_warn_once("Unhandled hw breakpoint ops %d\n", ops);
 216                         return -EINVAL;
 217                 }
 218         }
 219         return -ENOSPC;
 220 }
 221
 222 static int hw_breakpoint_control(struct perf_event *bp,
 223                                  enum hw_breakpoint_ops ops)
 224 {
 225         struct arch_hw_breakpoint *info = counter_arch_bp(bp);
 226         struct perf_event **slots;
 227         struct debug_info *debug_info = &current->thread.debug;
 228         int i, max_slots, ctrl_reg, val_reg, reg_enable;
 229         enum dbg_active_el dbg_el = debug_exception_level(info->ctrl.privilege);
 230         u32 ctrl;
 231
 232         if (info->ctrl.type == ARM_BREAKPOINT_EXECUTE) {
 233                 /* Breakpoint */
 234                 ctrl_reg = AARCH64_DBG_REG_BCR;
 235                 val_reg = AARCH64_DBG_REG_BVR;
 236                 slots = this_cpu_ptr(bp_on_reg);
 237                 max_slots = core_num_brps;
 238                 reg_enable = !debug_info->bps_disabled;
 239         } else {
 240                 /* Watchpoint */
 241                 ctrl_reg = AARCH64_DBG_REG_WCR;
 242                 val_reg = AARCH64_DBG_REG_WVR;
 243                 slots = this_cpu_ptr(wp_on_reg);
 244                 max_slots = core_num_wrps;
 245                 reg_enable = !debug_info->wps_disabled;
 246         }
 247
 248         i = hw_breakpoint_slot_setup(slots, max_slots, bp, ops);
 249
 250         if (WARN_ONCE(i < 0, "Can't find any breakpoint slot"))
 251                 return i;
 252
 253         switch (ops) {
 254         case HW_BREAKPOINT_INSTALL:
 255                 /*
 256                  * Ensure debug monitors are enabled at the correct exception
 257                  * level.
 258                  */
 259                 enable_debug_monitors(dbg_el);
 260                 /* Fall through */
 261         case HW_BREAKPOINT_RESTORE:
 262                 /* Setup the address register. */
 263                 write_wb_reg(val_reg, i, info->address);
 264
 265                 /* Setup the control register. */
 266                 ctrl = encode_ctrl_reg(info->ctrl);
 267                 write_wb_reg(ctrl_reg, i,
 268                              reg_enable ? ctrl | 0x1 : ctrl & ~0x1);
 269                 break;
 270         case HW_BREAKPOINT_UNINSTALL:
 271                 /* Reset the control register. */
 272                 write_wb_reg(ctrl_reg, i, 0);
 273
 274                 /*
 275                  * Release the debug monitors for the correct exception
 276                  * level.
 277                  */
 278                 disable_debug_monitors(dbg_el);
 279                 break;
 280         }
 281
 282         return 0;
 283 }
 284
 285 /*
 286  * Install a perf counter breakpoint.
 287  */
 288 int arch_install_hw_breakpoint(struct perf_event *bp)
 289 {
 290         return hw_breakpoint_control(bp, HW_BREAKPOINT_INSTALL);
 291 }
 292
 293 void arch_uninstall_hw_breakpoint(struct perf_event *bp)
 294 {
 295         hw_breakpoint_control(bp, HW_BREAKPOINT_UNINSTALL);
 296 }
 297
 298 static int get_hbp_len(u8 hbp_len)
 299 {
 300         unsigned int len_in_bytes = 0;
 301
 302         switch (hbp_len) {
 303         case ARM_BREAKPOINT_LEN_1:
 304                 len_in_bytes = 1;
 305                 break;
 306         case ARM_BREAKPOINT_LEN_2:
 307                 len_in_bytes = 2;
 308                 break;
 309         case ARM_BREAKPOINT_LEN_3:
 310                 len_in_bytes = 3;
 311                 break;
 312         case ARM_BREAKPOINT_LEN_4:
 313                 len_in_bytes = 4;
 314                 break;
 315         case ARM_BREAKPOINT_LEN_5:
 316                 len_in_bytes = 5;
 317                 break;
 318         case ARM_BREAKPOINT_LEN_6:
 319                 len_in_bytes = 6;
 320                 break;
 321         case ARM_BREAKPOINT_LEN_7:
 322                 len_in_bytes = 7;
 323                 break;
 324         case ARM_BREAKPOINT_LEN_8:
 325                 len_in_bytes = 8;
 326                 break;
 327         }
 328
 329         return len_in_bytes;
 330 }
 331
 332 /*
 333  * Check whether bp virtual address is in kernel space.
 334  */
 335 int arch_check_bp_in_kernelspace(struct arch_hw_breakpoint *hw)
 336 {
 337         unsigned int len;
 338         unsigned long va;
 339
 340         va = hw->address;
 341         len = get_hbp_len(hw->ctrl.len);
 342
 343         return (va >= TASK_SIZE) && ((va + len - 1) >= TASK_SIZE);
 344 }
 345
 346 /*
 347  * Extract generic type and length encodings from an arch_hw_breakpoint_ctrl.
 348  * Hopefully this will disappear when ptrace can bypass the conversion
 349  * to generic breakpoint descriptions.
 350  */
 351 int arch_bp_generic_fields(struct arch_hw_breakpoint_ctrl ctrl,
 352                            int *gen_len, int *gen_type, int *offset)
 353 {
 354         /* Type */
 355         switch (ctrl.type) {
 356         case ARM_BREAKPOINT_EXECUTE:
 357                 *gen_type = HW_BREAKPOINT_X;
 358                 break;
 359         case ARM_BREAKPOINT_LOAD:
 360                 *gen_type = HW_BREAKPOINT_R;
 361                 break;
 362         case ARM_BREAKPOINT_STORE:
 363                 *gen_type = HW_BREAKPOINT_W;
 364                 break;
 365         case ARM_BREAKPOINT_LOAD | ARM_BREAKPOINT_STORE:
 366                 *gen_type = HW_BREAKPOINT_RW;
 367                 break;
 368         default:
 369                 return -EINVAL;
 370         }
 371
 372         if (!ctrl.len)
 373                 return -EINVAL;
 374         *offset = __ffs(ctrl.len);
 375
 376         /* Len */
 377         switch (ctrl.len >> *offset) {
 378         case ARM_BREAKPOINT_LEN_1:
 379                 *gen_len = HW_BREAKPOINT_LEN_1;
 380                 break;
 381         case ARM_BREAKPOINT_LEN_2:
 382                 *gen_len = HW_BREAKPOINT_LEN_2;
 383                 break;
 384         case ARM_BREAKPOINT_LEN_3:
 385                 *gen_len = HW_BREAKPOINT_LEN_3;
 386                 break;
 387         case ARM_BREAKPOINT_LEN_4:
 388                 *gen_len = HW_BREAKPOINT_LEN_4;
 389                 break;
 390         case ARM_BREAKPOINT_LEN_5:
 391                 *gen_len = HW_BREAKPOINT_LEN_5;
 392                 break;
 393         case ARM_BREAKPOINT_LEN_6:
 394                 *gen_len = HW_BREAKPOINT_LEN_6;
 395                 break;
 396         case ARM_BREAKPOINT_LEN_7:
 397                 *gen_len = HW_BREAKPOINT_LEN_7;
 398                 break;
 399         case ARM_BREAKPOINT_LEN_8:
 400                 *gen_len = HW_BREAKPOINT_LEN_8;
 401                 break;
 402         default:
 403                 return -EINVAL;
 404         }
 405
 406         return 0;
 407 }
 408
 409 /*
 410  * Construct an arch_hw_breakpoint from a perf_event.
 411  */
 412 static int arch_build_bp_info(struct perf_event *bp,
 413                               const struct perf_event_attr *attr,
 414                               struct arch_hw_breakpoint *hw)
 415 {
 416         /* Type */
 417         switch (attr->bp_type) {
 418         case HW_BREAKPOINT_X:
 419                 hw->ctrl.type = ARM_BREAKPOINT_EXECUTE;
 420                 break;
 421         case HW_BREAKPOINT_R:
 422                 hw->ctrl.type = ARM_BREAKPOINT_LOAD;
 423                 break;
 424         case HW_BREAKPOINT_W:
 425                 hw->ctrl.type = ARM_BREAKPOINT_STORE;
 426                 break;
 427         case HW_BREAKPOINT_RW:
 428                 hw->ctrl.type = ARM_BREAKPOINT_LOAD | ARM_BREAKPOINT_STORE;
 429                 break;
 430         default:
 431                 return -EINVAL;
 432         }
 433
 434         /* Len */
 435         switch (attr->bp_len) {
 436         case HW_BREAKPOINT_LEN_1:
 437                 hw->ctrl.len = ARM_BREAKPOINT_LEN_1;
 438                 break;
 439         case HW_BREAKPOINT_LEN_2:
 440                 hw->ctrl.len = ARM_BREAKPOINT_LEN_2;
 441                 break;
 442         case HW_BREAKPOINT_LEN_3:
 443                 hw->ctrl.len = ARM_BREAKPOINT_LEN_3;
 444                 break;
 445         case HW_BREAKPOINT_LEN_4:
 446                 hw->ctrl.len = ARM_BREAKPOINT_LEN_4;
 447                 break;
 448         case HW_BREAKPOINT_LEN_5:
 449                 hw->ctrl.len = ARM_BREAKPOINT_LEN_5;
 450                 break;
 451         case HW_BREAKPOINT_LEN_6:
 452                 hw->ctrl.len = ARM_BREAKPOINT_LEN_6;
 453                 break;
 454         case HW_BREAKPOINT_LEN_7:
 455                 hw->ctrl.len = ARM_BREAKPOINT_LEN_7;
 456                 break;
 457         case HW_BREAKPOINT_LEN_8:
 458                 hw->ctrl.len = ARM_BREAKPOINT_LEN_8;
 459                 break;
 460         default:
 461                 return -EINVAL;
 462         }
 463
 464         /*
 465          * On AArch64, we only permit breakpoints of length 4, whereas
 466          * AArch32 also requires breakpoints of length 2 for Thumb.
 467          * Watchpoints can be of length 1, 2, 4 or 8 bytes.
 468          */
 469         if (hw->ctrl.type == ARM_BREAKPOINT_EXECUTE) {
 470                 if (is_compat_bp(bp)) {
 471                         if (hw->ctrl.len != ARM_BREAKPOINT_LEN_2 &&
 472                             hw->ctrl.len != ARM_BREAKPOINT_LEN_4)
 473                                 return -EINVAL;
 474                 } else if (hw->ctrl.len != ARM_BREAKPOINT_LEN_4) {
 475                         /*
 476                          * FIXME: Some tools (I'm looking at you perf) assume
 477                          *        that breakpoints should be sizeof(long). This
 478                          *        is nonsense. For now, we fix up the parameter
 479                          *        but we should probably return -EINVAL instead.
 480                          */
 481                         hw->ctrl.len = ARM_BREAKPOINT_LEN_4;
 482                 }
 483         }
 484
 485         /* Address */
 486         hw->address = attr->bp_addr;
 487
 488         /*
 489          * Privilege
 490          * Note that we disallow combined EL0/EL1 breakpoints because
 491          * that would complicate the stepping code.
 492          */
 493         if (arch_check_bp_in_kernelspace(hw))
 494                 hw->ctrl.privilege = AARCH64_BREAKPOINT_EL1;
 495         else
 496                 hw->ctrl.privilege = AARCH64_BREAKPOINT_EL0;
 497
 498         /* Enabled? */
 499         hw->ctrl.enabled = !attr->disabled;
 500
 501         return 0;
 502 }
 503
 504 /*
 505  * Validate the arch-specific HW Breakpoint register settings.
 506  */
 507 int hw_breakpoint_arch_parse(struct perf_event *bp,
 508                              const struct perf_event_attr *attr,
 509                              struct arch_hw_breakpoint *hw)
 510 {
 511         int ret;
 512         u64 alignment_mask, offset;
 513
 514         /* Build the arch_hw_breakpoint. */
 515         ret = arch_build_bp_info(bp, attr, hw);
 516         if (ret)
 517                 return ret;
 518
 519         /*
 520          * Check address alignment.
 521          * We don't do any clever alignment correction for watchpoints
 522          * because using 64-bit unaligned addresses is deprecated for
 523          * AArch64.
 524          *
 525          * AArch32 tasks expect some simple alignment fixups, so emulate
 526          * that here.
 527          */
 528         if (is_compat_bp(bp)) {
 529                 if (hw->ctrl.len == ARM_BREAKPOINT_LEN_8)
 530                         alignment_mask = 0x7;
 531                 else
 532                         alignment_mask = 0x3;
 533                 offset = hw->address & alignment_mask;
 534                 switch (offset) {
 535                 case 0:
 536                         /* Aligned */
 537                         break;
 538                 case 1:
 539                 case 2:
 540                         /* Allow halfword watchpoints and breakpoints. */
 541                         if (hw->ctrl.len == ARM_BREAKPOINT_LEN_2)
 542                                 break;
 543
 544                         /* Fallthrough */
 545                 case 3:
 546                         /* Allow single byte watchpoint. */
 547                         if (hw->ctrl.len == ARM_BREAKPOINT_LEN_1)
 548                                 break;
 549
 550                         /* Fallthrough */
 551                 default:
 552                         return -EINVAL;
 553                 }
 554         } else {
 555                 if (hw->ctrl.type == ARM_BREAKPOINT_EXECUTE)
 556                         alignment_mask = 0x3;
 557                 else
 558                         alignment_mask = 0x7;
 559                 offset = hw->address & alignment_mask;
 560         }
 561
 562         hw->address &= ~alignment_mask;
 563         hw->ctrl.len <<= offset;
 564
 565         /*
 566          * Disallow per-task kernel breakpoints since these would
 567          * complicate the stepping code.
 568          */
 569         if (hw->ctrl.privilege == AARCH64_BREAKPOINT_EL1 && bp->hw.target)
 570                 return -EINVAL;
 571
 572         return 0;
 573 }
 574
 575 /*
 576  * Enable/disable all of the breakpoints active at the specified
 577  * exception level at the register level.
 578  * This is used when single-stepping after a breakpoint exception.
 579  */
 580 static void toggle_bp_registers(int reg, enum dbg_active_el el, int enable)
 581 {
 582         int i, max_slots, privilege;
 583         u32 ctrl;
 584         struct perf_event **slots;
 585
 586         switch (reg) {
 587         case AARCH64_DBG_REG_BCR:
 588                 slots = this_cpu_ptr(bp_on_reg);
 589                 max_slots = core_num_brps;
 590                 break;
 591         case AARCH64_DBG_REG_WCR:
 592                 slots = this_cpu_ptr(wp_on_reg);
 593                 max_slots = core_num_wrps;
 594                 break;
 595         default:
 596                 return;
 597         }
 598
 599         for (i = 0; i < max_slots; ++i) {
 600                 if (!slots[i])
 601                         continue;
 602
 603                 privilege = counter_arch_bp(slots[i])->ctrl.privilege;
 604                 if (debug_exception_level(privilege) != el)
 605                         continue;
 606
 607                 ctrl = read_wb_reg(reg, i);
 608                 if (enable)
 609                         ctrl |= 0x1;
 610                 else
 611                         ctrl &= ~0x1;
 612                 write_wb_reg(reg, i, ctrl);
 613         }
 614 }
 615 NOKPROBE_SYMBOL(toggle_bp_registers);
 616
 617 /*
 618  * Debug exception handlers.
 619  */
 620 static int breakpoint_handler(unsigned long unused, unsigned int esr,
 621                               struct pt_regs *regs)
 622 {
 623         int i, step = 0, *kernel_step;
 624         u32 ctrl_reg;
 625         u64 addr, val;
 626         struct perf_event *bp, **slots;
 627         struct debug_info *debug_info;
 628         struct arch_hw_breakpoint_ctrl ctrl;
 629
 630         slots = this_cpu_ptr(bp_on_reg);
 631         addr = instruction_pointer(regs);
 632         debug_info = &current->thread.debug;
 633
 634         for (i = 0; i < core_num_brps; ++i) {
 635                 rcu_read_lock();
 636
 637                 bp = slots[i];
 638
 639                 if (bp == NULL)
 640                         goto unlock;
 641
 642                 /* Check if the breakpoint value matches. */
 643                 val = read_wb_reg(AARCH64_DBG_REG_BVR, i);
 644                 if (val != (addr & ~0x3))
 645                         goto unlock;
 646
 647                 /* Possible match, check the byte address select to confirm. */
 648                 ctrl_reg = read_wb_reg(AARCH64_DBG_REG_BCR, i);
 649                 decode_ctrl_reg(ctrl_reg, &ctrl);
 650                 if (!((1 << (addr & 0x3)) & ctrl.len))
 651                         goto unlock;
 652
 653                 counter_arch_bp(bp)->trigger = addr;
 654                 perf_bp_event(bp, regs);
 655
 656                 /* Do we need to handle the stepping? */
 657                 if (is_default_overflow_handler(bp))
 658                         step = 1;
 659 unlock:
 660                 rcu_read_unlock();
 661         }
 662
 663         if (!step)
 664                 return 0;
 665
 666         if (user_mode(regs)) {
 667                 debug_info->bps_disabled = 1;
 668                 toggle_bp_registers(AARCH64_DBG_REG_BCR, DBG_ACTIVE_EL0, 0);
 669
 670                 /* If we're already stepping a watchpoint, just return. */
 671                 if (debug_info->wps_disabled)
 672                         return 0;
 673
 674                 if (test_thread_flag(TIF_SINGLESTEP))
 675                         debug_info->suspended_step = 1;
 676                 else
 677                         user_enable_single_step(current);
 678         } else {
 679                 toggle_bp_registers(AARCH64_DBG_REG_BCR, DBG_ACTIVE_EL1, 0);
 680                 kernel_step = this_cpu_ptr(&stepping_kernel_bp);
 681
 682                 if (*kernel_step != ARM_KERNEL_STEP_NONE)
 683                         return 0;
 684
 685                 if (kernel_active_single_step()) {
 686                         *kernel_step = ARM_KERNEL_STEP_SUSPEND;
 687                 } else {
 688                         *kernel_step = ARM_KERNEL_STEP_ACTIVE;
 689                         kernel_enable_single_step(regs);
 690                 }
 691         }
 692
 693         return 0;
 694 }
 695 NOKPROBE_SYMBOL(breakpoint_handler);
 696
 697 /*
 698  * Arm64 hardware does not always report a watchpoint hit address that matches
 699  * one of the watchpoints set. It can also report an address "near" the
 700  * watchpoint if a single instruction access both watched and unwatched
 701  * addresses. There is no straight-forward way, short of disassembling the
 702  * offending instruction, to map that address back to the watchpoint. This
 703  * function computes the distance of the memory access from the watchpoint as a
 704  * heuristic for the likelyhood that a given access triggered the watchpoint.
 705  *
 706  * See Section D2.10.5 "Determining the memory location that caused a Watchpoint
 707  * exception" of ARMv8 Architecture Reference Manual for details.
 708  *
 709  * The function returns the distance of the address from the bytes watched by
 710  * the watchpoint. In case of an exact match, it returns 0.
 711  */
 712 static u64 get_distance_from_watchpoint(unsigned long addr, u64 val,
 713                                         struct arch_hw_breakpoint_ctrl *ctrl)
 714 {
 715         u64 wp_low, wp_high;
 716         u32 lens, lene;
 717
 718         addr = untagged_addr(addr);
 719
 720         lens = __ffs(ctrl->len);
 721         lene = __fls(ctrl->len);
 722
 723         wp_low = val + lens;
 724         wp_high = val + lene;
 725         if (addr < wp_low)
 726                 return wp_low - addr;
 727         else if (addr > wp_high)
 728                 return addr - wp_high;
 729         else
 730                 return 0;
 731 }
 732
 733 static int watchpoint_report(struct perf_event *wp, unsigned long addr,
 734                              struct pt_regs *regs)
 735 {
 736         int step = is_default_overflow_handler(wp);
 737         struct arch_hw_breakpoint *info = counter_arch_bp(wp);
 738
 739         info->trigger = addr;
 740
 741         /*
 742          * If we triggered a user watchpoint from a uaccess routine, then
 743          * handle the stepping ourselves since userspace really can't help
 744          * us with this.
 745          */
 746         if (!user_mode(regs) && info->ctrl.privilege == AARCH64_BREAKPOINT_EL0)
 747                 step = 1;
 748         else
 749                 perf_bp_event(wp, regs);
 750
 751         return step;
 752 }
 753
 754 static int watchpoint_handler(unsigned long addr, unsigned int esr,
 755                               struct pt_regs *regs)
 756 {
 757         int i, step = 0, *kernel_step, access, closest_match = 0;
 758         u64 min_dist = -1, dist;
 759         u32 ctrl_reg;
 760         u64 val;
 761         struct perf_event *wp, **slots;
 762         struct debug_info *debug_info;
 763         struct arch_hw_breakpoint_ctrl ctrl;
 764
 765         slots = this_cpu_ptr(wp_on_reg);
 766         debug_info = &current->thread.debug;
 767
 768         /*
 769          * Find all watchpoints that match the reported address. If no exact
 770          * match is found. Attribute the hit to the closest watchpoint.
 771          */
 772         rcu_read_lock();
 773         for (i = 0; i < core_num_wrps; ++i) {
 774                 wp = slots[i];
 775                 if (wp == NULL)
 776                         continue;
 777
 778                 /*
 779                  * Check that the access type matches.
 780                  * 0 => load, otherwise => store
 781                  */
 782                 access = (esr & AARCH64_ESR_ACCESS_MASK) ? HW_BREAKPOINT_W :
 783                          HW_BREAKPOINT_R;
 784                 if (!(access & hw_breakpoint_type(wp)))
 785                         continue;
 786
 787                 /* Check if the watchpoint value and byte select match. */
 788                 val = read_wb_reg(AARCH64_DBG_REG_WVR, i);
 789                 ctrl_reg = read_wb_reg(AARCH64_DBG_REG_WCR, i);
 790                 decode_ctrl_reg(ctrl_reg, &ctrl);
 791                 dist = get_distance_from_watchpoint(addr, val, &ctrl);
 792                 if (dist < min_dist) {
 793                         min_dist = dist;
 794                         closest_match = i;
 795                 }
 796                 /* Is this an exact match? */
 797                 if (dist != 0)
 798                         continue;
 799
 800                 step = watchpoint_report(wp, addr, regs);
 801         }
 802
 803         /* No exact match found? */
 804         if (min_dist > 0 && min_dist != -1)
 805                 step = watchpoint_report(slots[closest_match], addr, regs);
 806
 807         rcu_read_unlock();
 808
 809         if (!step)
 810                 return 0;
 811
 812         /*
 813          * We always disable EL0 watchpoints because the kernel can
 814          * cause these to fire via an unprivileged access.
 815          */
 816         toggle_bp_registers(AARCH64_DBG_REG_WCR, DBG_ACTIVE_EL0, 0);
 817
 818         if (user_mode(regs)) {
 819                 debug_info->wps_disabled = 1;
 820
 821                 /* If we're already stepping a breakpoint, just return. */
 822                 if (debug_info->bps_disabled)
 823                         return 0;
 824
 825                 if (test_thread_flag(TIF_SINGLESTEP))
 826                         debug_info->suspended_step = 1;
 827                 else
 828                         user_enable_single_step(current);
 829         } else {
 830                 toggle_bp_registers(AARCH64_DBG_REG_WCR, DBG_ACTIVE_EL1, 0);
 831                 kernel_step = this_cpu_ptr(&stepping_kernel_bp);
 832
 833                 if (*kernel_step != ARM_KERNEL_STEP_NONE)
 834                         return 0;
 835
 836                 if (kernel_active_single_step()) {
 837                         *kernel_step = ARM_KERNEL_STEP_SUSPEND;
 838                 } else {
 839                         *kernel_step = ARM_KERNEL_STEP_ACTIVE;
 840                         kernel_enable_single_step(regs);
 841                 }
 842         }
 843
 844         return 0;
 845 }
 846 NOKPROBE_SYMBOL(watchpoint_handler);
 847
 848 /*
 849  * Handle single-step exception.
 850  */
 851 int reinstall_suspended_bps(struct pt_regs *regs)
 852 {
 853         struct debug_info *debug_info = &current->thread.debug;
 854         int handled_exception = 0, *kernel_step;
 855
 856         kernel_step = this_cpu_ptr(&stepping_kernel_bp);
 857
 858         /*
 859          * Called from single-step exception handler.
 860          * Return 0 if execution can resume, 1 if a SIGTRAP should be
 861          * reported.
 862          */
 863         if (user_mode(regs)) {
 864                 if (debug_info->bps_disabled) {
 865                         debug_info->bps_disabled = 0;
 866                         toggle_bp_registers(AARCH64_DBG_REG_BCR, DBG_ACTIVE_EL0, 1);
 867                         handled_exception = 1;
 868                 }
 869
 870                 if (debug_info->wps_disabled) {
 871                         debug_info->wps_disabled = 0;
 872                         toggle_bp_registers(AARCH64_DBG_REG_WCR, DBG_ACTIVE_EL0, 1);
 873                         handled_exception = 1;
 874                 }
 875
 876                 if (handled_exception) {
 877                         if (debug_info->suspended_step) {
 878                                 debug_info->suspended_step = 0;
 879                                 /* Allow exception handling to fall-through. */
 880                                 handled_exception = 0;
 881                         } else {
 882                                 user_disable_single_step(current);
 883                         }
 884                 }
 885         } else if (*kernel_step != ARM_KERNEL_STEP_NONE) {
 886                 toggle_bp_registers(AARCH64_DBG_REG_BCR, DBG_ACTIVE_EL1, 1);
 887                 toggle_bp_registers(AARCH64_DBG_REG_WCR, DBG_ACTIVE_EL1, 1);
 888
 889                 if (!debug_info->wps_disabled)
 890                         toggle_bp_registers(AARCH64_DBG_REG_WCR, DBG_ACTIVE_EL0, 1);
 891
 892                 if (*kernel_step != ARM_KERNEL_STEP_SUSPEND) {
 893                         kernel_disable_single_step();
 894                         handled_exception = 1;
 895                 } else {
 896                         handled_exception = 0;
 897                 }
 898
 899                 *kernel_step = ARM_KERNEL_STEP_NONE;
 900         }
 901
 902         return !handled_exception;
 903 }
 904 NOKPROBE_SYMBOL(reinstall_suspended_bps);
 905
 906 /*
 907  * Context-switcher for restoring suspended breakpoints.
 908  */
 909 void hw_breakpoint_thread_switch(struct task_struct *next)
 910 {
 911         /*
 912          *           current        next
 913          * disabled: 0              0     => The usual case, NOTIFY_DONE
 914          *           0              1     => Disable the registers
 915          *           1              0     => Enable the registers
 916          *           1              1     => NOTIFY_DONE. per-task bps will
 917          *                                   get taken care of by perf.
 918          */
 919
 920         struct debug_info *current_debug_info, *next_debug_info;
 921
 922         current_debug_info = &current->thread.debug;
 923         next_debug_info = &next->thread.debug;
 924
 925         /* Update breakpoints. */
 926         if (current_debug_info->bps_disabled != next_debug_info->bps_disabled)
 927                 toggle_bp_registers(AARCH64_DBG_REG_BCR,
 928                                     DBG_ACTIVE_EL0,
 929                                     !next_debug_info->bps_disabled);
 930
 931         /* Update watchpoints. */
 932         if (current_debug_info->wps_disabled != next_debug_info->wps_disabled)
 933                 toggle_bp_registers(AARCH64_DBG_REG_WCR,
 934                                     DBG_ACTIVE_EL0,
 935                                     !next_debug_info->wps_disabled);
 936 }
 937
 938 /*
 939  * CPU initialisation.
 940  */
 941 static int hw_breakpoint_reset(unsigned int cpu)
 942 {
 943         int i;
 944         struct perf_event **slots;
 945         /*
 946          * When a CPU goes through cold-boot, it does not have any installed
 947          * slot, so it is safe to share the same function for restoring and
 948          * resetting breakpoints; when a CPU is hotplugged in, it goes
 949          * through the slots, which are all empty, hence it just resets control
 950          * and value for debug registers.
 951          * When this function is triggered on warm-boot through a CPU PM
 952          * notifier some slots might be initialized; if so they are
 953          * reprogrammed according to the debug slots content.
 954          */
 955         for (slots = this_cpu_ptr(bp_on_reg), i = 0; i < core_num_brps; ++i) {
 956                 if (slots[i]) {
 957                         hw_breakpoint_control(slots[i], HW_BREAKPOINT_RESTORE);
 958                 } else {
 959                         write_wb_reg(AARCH64_DBG_REG_BCR, i, 0UL);
 960                         write_wb_reg(AARCH64_DBG_REG_BVR, i, 0UL);
 961                 }
 962         }
 963
 964         for (slots = this_cpu_ptr(wp_on_reg), i = 0; i < core_num_wrps; ++i) {
 965                 if (slots[i]) {
 966                         hw_breakpoint_control(slots[i], HW_BREAKPOINT_RESTORE);
 967                 } else {
 968                         write_wb_reg(AARCH64_DBG_REG_WCR, i, 0UL);
 969                         write_wb_reg(AARCH64_DBG_REG_WVR, i, 0UL);
 970                 }
 971         }
 972
 973         return 0;
 974 }
 975
 976 #ifdef CONFIG_CPU_PM
 977 extern void cpu_suspend_set_dbg_restorer(int (*hw_bp_restore)(unsigned int));
 978 #else
 979 static inline void cpu_suspend_set_dbg_restorer(int (*hw_bp_restore)(unsigned int))
 980 {
 981 }
 982 #endif
 983
 984 /*
 985  * One-time initialisation.
 986  */
 987 static int __init arch_hw_breakpoint_init(void)
 988 {
 989         int ret;
 990
 991         core_num_brps = get_num_brps();
 992         core_num_wrps = get_num_wrps();
 993
 994         pr_info("found %d breakpoint and %d watchpoint registers.\n",
 995                 core_num_brps, core_num_wrps);
 996
 997         /* Register debug fault handlers. */
 998         hook_debug_fault_code(DBG_ESR_EVT_HWBP, breakpoint_handler, SIGTRAP,
 999                               TRAP_HWBKPT, "hw-breakpoint handler");
1000         hook_debug_fault_code(DBG_ESR_EVT_HWWP, watchpoint_handler, SIGTRAP,
1001                               TRAP_HWBKPT, "hw-watchpoint handler");
1002
1003         /*
1004          * Reset the breakpoint resources. We assume that a halting
1005          * debugger will leave the world in a nice state for us.
1006          */
1007         ret = cpuhp_setup_state(CPUHP_AP_PERF_ARM_HW_BREAKPOINT_STARTING,
1008                           "perf/arm64/hw_breakpoint:starting",
1009                           hw_breakpoint_reset, NULL);
1010         if (ret)
1011                 pr_err("failed to register CPU hotplug notifier: %d\n", ret);
1012
1013         /* Register cpu_suspend hw breakpoint restore hook */
1014         cpu_suspend_set_dbg_restorer(hw_breakpoint_reset);
1015
1016         return ret;
1017 }
1018 arch_initcall(arch_hw_breakpoint_init);
1019
1020 void hw_breakpoint_pmu_read(struct perf_event *bp)
1021 {
1022 }
1023
1024 /*
1025  * Dummy function to register with die_notifier.
1026  */
1027 int hw_breakpoint_exceptions_notify(struct notifier_block *unused,
1028                                     unsigned long val, void *data)
1029 {
1030         return NOTIFY_DONE;
1031 }