arch/mips/kernel/mips-cm.c

   1 /*
   2  * Copyright (C) 2013 Imagination Technologies
   3  * Author: Paul Burton <paul.burton@imgtec.com>
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation;  either version 2 of the  License, or (at your
   8  * option) any later version.
   9  */
  10
  11 #include <linux/errno.h>
  12 #include <linux/percpu.h>
  13 #include <linux/spinlock.h>
  14
  15 #include <asm/mips-cm.h>
  16 #include <asm/mipsregs.h>
  17
  18 void __iomem *mips_cm_base;
  19 void __iomem *mips_cm_l2sync_base;
  20 int mips_cm_is64;
  21
  22 static char *cm2_tr[8] = {
  23         "mem",  "gcr",  "gic",  "mmio",
  24         "0x04", "cpc", "0x06", "0x07"
  25 };
  26
  27 /* CM3 Tag ECC transaction type */
  28 static char *cm3_tr[16] = {
  29         [0x0] = "ReqNoData",
  30         [0x1] = "0x1",
  31         [0x2] = "ReqWData",
  32         [0x3] = "0x3",
  33         [0x4] = "IReqNoResp",
  34         [0x5] = "IReqWResp",
  35         [0x6] = "IReqNoRespDat",
  36         [0x7] = "IReqWRespDat",
  37         [0x8] = "RespNoData",
  38         [0x9] = "RespDataFol",
  39         [0xa] = "RespWData",
  40         [0xb] = "RespDataOnly",
  41         [0xc] = "IRespNoData",
  42         [0xd] = "IRespDataFol",
  43         [0xe] = "IRespWData",
  44         [0xf] = "IRespDataOnly"
  45 };
  46
  47 static char *cm2_cmd[32] = {
  48         [0x00] = "0x00",
  49         [0x01] = "Legacy Write",
  50         [0x02] = "Legacy Read",
  51         [0x03] = "0x03",
  52         [0x04] = "0x04",
  53         [0x05] = "0x05",
  54         [0x06] = "0x06",
  55         [0x07] = "0x07",
  56         [0x08] = "Coherent Read Own",
  57         [0x09] = "Coherent Read Share",
  58         [0x0a] = "Coherent Read Discard",
  59         [0x0b] = "Coherent Ready Share Always",
  60         [0x0c] = "Coherent Upgrade",
  61         [0x0d] = "Coherent Writeback",
  62         [0x0e] = "0x0e",
  63         [0x0f] = "0x0f",
  64         [0x10] = "Coherent Copyback",
  65         [0x11] = "Coherent Copyback Invalidate",
  66         [0x12] = "Coherent Invalidate",
  67         [0x13] = "Coherent Write Invalidate",
  68         [0x14] = "Coherent Completion Sync",
  69         [0x15] = "0x15",
  70         [0x16] = "0x16",
  71         [0x17] = "0x17",
  72         [0x18] = "0x18",
  73         [0x19] = "0x19",
  74         [0x1a] = "0x1a",
  75         [0x1b] = "0x1b",
  76         [0x1c] = "0x1c",
  77         [0x1d] = "0x1d",
  78         [0x1e] = "0x1e",
  79         [0x1f] = "0x1f"
  80 };
  81
  82 /* CM3 Tag ECC command type */
  83 static char *cm3_cmd[16] = {
  84         [0x0] = "Legacy Read",
  85         [0x1] = "Legacy Write",
  86         [0x2] = "Coherent Read Own",
  87         [0x3] = "Coherent Read Share",
  88         [0x4] = "Coherent Read Discard",
  89         [0x5] = "Coherent Evicted",
  90         [0x6] = "Coherent Upgrade",
  91         [0x7] = "Coherent Upgrade for Store Conditional",
  92         [0x8] = "Coherent Writeback",
  93         [0x9] = "Coherent Write Invalidate",
  94         [0xa] = "0xa",
  95         [0xb] = "0xb",
  96         [0xc] = "0xc",
  97         [0xd] = "0xd",
  98         [0xe] = "0xe",
  99         [0xf] = "0xf"
 100 };
 101
 102 /* CM3 Tag ECC command group */
 103 static char *cm3_cmd_group[8] = {
 104         [0x0] = "Normal",
 105         [0x1] = "Registers",
 106         [0x2] = "TLB",
 107         [0x3] = "0x3",
 108         [0x4] = "L1I",
 109         [0x5] = "L1D",
 110         [0x6] = "L3",
 111         [0x7] = "L2"
 112 };
 113
 114 static char *cm2_core[8] = {
 115         "Invalid/OK",   "Invalid/Data",
 116         "Shared/OK",    "Shared/Data",
 117         "Modified/OK",  "Modified/Data",
 118         "Exclusive/OK", "Exclusive/Data"
 119 };
 120
 121 static char *cm2_causes[32] = {
 122         "None", "GC_WR_ERR", "GC_RD_ERR", "COH_WR_ERR",
 123         "COH_RD_ERR", "MMIO_WR_ERR", "MMIO_RD_ERR", "0x07",
 124         "0x08", "0x09", "0x0a", "0x0b",
 125         "0x0c", "0x0d", "0x0e", "0x0f",
 126         "0x10", "0x11", "0x12", "0x13",
 127         "0x14", "0x15", "0x16", "INTVN_WR_ERR",
 128         "INTVN_RD_ERR", "0x19", "0x1a", "0x1b",
 129         "0x1c", "0x1d", "0x1e", "0x1f"
 130 };
 131
 132 static char *cm3_causes[32] = {
 133         "0x0", "MP_CORRECTABLE_ECC_ERR", "MP_REQUEST_DECODE_ERR",
 134         "MP_UNCORRECTABLE_ECC_ERR", "MP_PARITY_ERR", "MP_COHERENCE_ERR",
 135         "CMBIU_REQUEST_DECODE_ERR", "CMBIU_PARITY_ERR", "CMBIU_AXI_RESP_ERR",
 136         "0x9", "RBI_BUS_ERR", "0xb", "0xc", "0xd", "0xe", "0xf", "0x10",
 137         "0x11", "0x12", "0x13", "0x14", "0x15", "0x16", "0x17", "0x18",
 138         "0x19", "0x1a", "0x1b", "0x1c", "0x1d", "0x1e", "0x1f"
 139 };
 140
 141 static DEFINE_PER_CPU_ALIGNED(spinlock_t, cm_core_lock);
 142 static DEFINE_PER_CPU_ALIGNED(unsigned long, cm_core_lock_flags);
 143
 144 phys_addr_t __mips_cm_phys_base(void)
 145 {
 146         u32 config3 = read_c0_config3();
 147         unsigned long cmgcr;
 148
 149         /* Check the CMGCRBase register is implemented */
 150         if (!(config3 & MIPS_CONF3_CMGCR))
 151                 return 0;
 152
 153         /* Read the address from CMGCRBase */
 154         cmgcr = read_c0_cmgcrbase();
 155         return (cmgcr & MIPS_CMGCRF_BASE) << (36 - 32);
 156 }
 157
 158 phys_addr_t mips_cm_phys_base(void)
 159         __attribute__((weak, alias("__mips_cm_phys_base")));
 160
 161 phys_addr_t __mips_cm_l2sync_phys_base(void)
 162 {
 163         u32 base_reg;
 164
 165         /*
 166          * If the L2-only sync region is already enabled then leave it at it's
 167          * current location.
 168          */
 169         base_reg = read_gcr_l2_only_sync_base();
 170         if (base_reg & CM_GCR_L2_ONLY_SYNC_BASE_SYNCEN_MSK)
 171                 return base_reg & CM_GCR_L2_ONLY_SYNC_BASE_SYNCBASE_MSK;
 172
 173         /* Default to following the CM */
 174         return mips_cm_phys_base() + MIPS_CM_GCR_SIZE;
 175 }
 176
 177 phys_addr_t mips_cm_l2sync_phys_base(void)
 178         __attribute__((weak, alias("__mips_cm_l2sync_phys_base")));
 179
 180 static void mips_cm_probe_l2sync(void)
 181 {
 182         unsigned major_rev;
 183         phys_addr_t addr;
 184
 185         /* L2-only sync was introduced with CM major revision 6 */
 186         major_rev = (read_gcr_rev() & CM_GCR_REV_MAJOR_MSK) >>
 187                 CM_GCR_REV_MAJOR_SHF;
 188         if (major_rev < 6)
 189                 return;
 190
 191         /* Find a location for the L2 sync region */
 192         addr = mips_cm_l2sync_phys_base();
 193         BUG_ON((addr & CM_GCR_L2_ONLY_SYNC_BASE_SYNCBASE_MSK) != addr);
 194         if (!addr)
 195                 return;
 196
 197         /* Set the region base address & enable it */
 198         write_gcr_l2_only_sync_base(addr | CM_GCR_L2_ONLY_SYNC_BASE_SYNCEN_MSK);
 199
 200         /* Map the region */
 201         mips_cm_l2sync_base = ioremap_nocache(addr, MIPS_CM_L2SYNC_SIZE);
 202 }
 203
 204 int mips_cm_probe(void)
 205 {
 206         phys_addr_t addr;
 207         u32 base_reg;
 208         unsigned cpu;
 209
 210         /*
 211          * No need to probe again if we have already been
 212          * here before.
 213          */
 214         if (mips_cm_base)
 215                 return 0;
 216
 217         addr = mips_cm_phys_base();
 218         BUG_ON((addr & CM_GCR_BASE_GCRBASE_MSK) != addr);
 219         if (!addr)
 220                 return -ENODEV;
 221
 222         mips_cm_base = ioremap_nocache(addr, MIPS_CM_GCR_SIZE);
 223         if (!mips_cm_base)
 224                 return -ENXIO;
 225
 226         /* sanity check that we're looking at a CM */
 227         base_reg = read_gcr_base();
 228         if ((base_reg & CM_GCR_BASE_GCRBASE_MSK) != addr) {
 229                 pr_err("GCRs appear to have been moved (expected them at 0x%08lx)!\n",
 230                        (unsigned long)addr);
 231                 mips_cm_base = NULL;
 232                 return -ENODEV;
 233         }
 234
 235         /* set default target to memory */
 236         base_reg &= ~CM_GCR_BASE_CMDEFTGT_MSK;
 237         base_reg |= CM_GCR_BASE_CMDEFTGT_MEM;
 238         write_gcr_base(base_reg);
 239
 240         /* disable CM regions */
 241         write_gcr_reg0_base(CM_GCR_REGn_BASE_BASEADDR_MSK);
 242         write_gcr_reg0_mask(CM_GCR_REGn_MASK_ADDRMASK_MSK);
 243         write_gcr_reg1_base(CM_GCR_REGn_BASE_BASEADDR_MSK);
 244         write_gcr_reg1_mask(CM_GCR_REGn_MASK_ADDRMASK_MSK);
 245         write_gcr_reg2_base(CM_GCR_REGn_BASE_BASEADDR_MSK);
 246         write_gcr_reg2_mask(CM_GCR_REGn_MASK_ADDRMASK_MSK);
 247         write_gcr_reg3_base(CM_GCR_REGn_BASE_BASEADDR_MSK);
 248         write_gcr_reg3_mask(CM_GCR_REGn_MASK_ADDRMASK_MSK);
 249
 250         /* probe for an L2-only sync region */
 251         mips_cm_probe_l2sync();
 252
 253         /* determine register width for this CM */
 254         mips_cm_is64 = IS_ENABLED(CONFIG_64BIT) && (mips_cm_revision() >= CM_REV_CM3);
 255
 256         for_each_possible_cpu(cpu)
 257                 spin_lock_init(&per_cpu(cm_core_lock, cpu));
 258
 259         return 0;
 260 }
 261
 262 void mips_cm_lock_other(unsigned int core, unsigned int vp)
 263 {
 264         unsigned curr_core;
 265         u32 val;
 266
 267         preempt_disable();
 268
 269         if (mips_cm_revision() >= CM_REV_CM3) {
 270                 val = core << CM3_GCR_Cx_OTHER_CORE_SHF;
 271                 val |= vp << CM3_GCR_Cx_OTHER_VP_SHF;
 272
 273                 /*
 274                  * We need to disable interrupts in SMP systems in order to
 275                  * ensure that we don't interrupt the caller with code which
 276                  * may modify the redirect register. We do so here in a
 277                  * slightly obscure way by using a spin lock, since this has
 278                  * the neat property of also catching any nested uses of
 279                  * mips_cm_lock_other() leading to a deadlock or a nice warning
 280                  * with lockdep enabled.
 281                  */
 282                 spin_lock_irqsave(this_cpu_ptr(&cm_core_lock),
 283                                   *this_cpu_ptr(&cm_core_lock_flags));
 284         } else {
 285                 WARN_ON(vp != 0);
 286
 287                 /*
 288                  * We only have a GCR_CL_OTHER per core in systems with
 289                  * CM 2.5 & older, so have to ensure other VP(E)s don't
 290                  * race with us.
 291                  */
 292                 curr_core = current_cpu_data.core;
 293                 spin_lock_irqsave(&per_cpu(cm_core_lock, curr_core),
 294                                   per_cpu(cm_core_lock_flags, curr_core));
 295
 296                 val = core << CM_GCR_Cx_OTHER_CORENUM_SHF;
 297         }
 298
 299         write_gcr_cl_other(val);
 300
 301         /*
 302          * Ensure the core-other region reflects the appropriate core &
 303          * VP before any accesses to it occur.
 304          */
 305         mb();
 306 }
 307
 308 void mips_cm_unlock_other(void)
 309 {
 310         unsigned int curr_core;
 311
 312         if (mips_cm_revision() < CM_REV_CM3) {
 313                 curr_core = current_cpu_data.core;
 314                 spin_unlock_irqrestore(&per_cpu(cm_core_lock, curr_core),
 315                                        per_cpu(cm_core_lock_flags, curr_core));
 316         } else {
 317                 spin_unlock_irqrestore(this_cpu_ptr(&cm_core_lock),
 318                                        *this_cpu_ptr(&cm_core_lock_flags));
 319         }
 320
 321         preempt_enable();
 322 }
 323
 324 void mips_cm_error_report(void)
 325 {
 326         u64 cm_error, cm_addr, cm_other;
 327         unsigned long revision;
 328         int ocause, cause;
 329         char buf[256];
 330
 331         if (!mips_cm_present())
 332                 return;
 333
 334         revision = mips_cm_revision();
 335
 336         if (revision < CM_REV_CM3) { /* CM2 */
 337                 cm_error = read_gcr_error_cause();
 338                 cm_addr = read_gcr_error_addr();
 339                 cm_other = read_gcr_error_mult();
 340                 cause = cm_error >> CM_GCR_ERROR_CAUSE_ERRTYPE_SHF;
 341                 ocause = cm_other >> CM_GCR_ERROR_MULT_ERR2ND_SHF;
 342
 343                 if (!cause)
 344                         return;
 345
 346                 if (cause < 16) {
 347                         unsigned long cca_bits = (cm_error >> 15) & 7;
 348                         unsigned long tr_bits = (cm_error >> 12) & 7;
 349                         unsigned long cmd_bits = (cm_error >> 7) & 0x1f;
 350                         unsigned long stag_bits = (cm_error >> 3) & 15;
 351                         unsigned long sport_bits = (cm_error >> 0) & 7;
 352
 353                         snprintf(buf, sizeof(buf),
 354                                  "CCA=%lu TR=%s MCmd=%s STag=%lu "
 355                                  "SPort=%lu\n", cca_bits, cm2_tr[tr_bits],
 356                                  cm2_cmd[cmd_bits], stag_bits, sport_bits);
 357                 } else {
 358                         /* glob state & sresp together */
 359                         unsigned long c3_bits = (cm_error >> 18) & 7;
 360                         unsigned long c2_bits = (cm_error >> 15) & 7;
 361                         unsigned long c1_bits = (cm_error >> 12) & 7;
 362                         unsigned long c0_bits = (cm_error >> 9) & 7;
 363                         unsigned long sc_bit = (cm_error >> 8) & 1;
 364                         unsigned long cmd_bits = (cm_error >> 3) & 0x1f;
 365                         unsigned long sport_bits = (cm_error >> 0) & 7;
 366
 367                         snprintf(buf, sizeof(buf),
 368                                  "C3=%s C2=%s C1=%s C0=%s SC=%s "
 369                                  "MCmd=%s SPort=%lu\n",
 370                                  cm2_core[c3_bits], cm2_core[c2_bits],
 371                                  cm2_core[c1_bits], cm2_core[c0_bits],
 372                                  sc_bit ? "True" : "False",
 373                                  cm2_cmd[cmd_bits], sport_bits);
 374                 }
 375                         pr_err("CM_ERROR=%08llx %s <%s>\n", cm_error,
 376                                cm2_causes[cause], buf);
 377                 pr_err("CM_ADDR =%08llx\n", cm_addr);
 378                 pr_err("CM_OTHER=%08llx %s\n", cm_other, cm2_causes[ocause]);
 379         } else { /* CM3 */
 380                 ulong core_id_bits, vp_id_bits, cmd_bits, cmd_group_bits;
 381                 ulong cm3_cca_bits, mcp_bits, cm3_tr_bits, sched_bit;
 382
 383                 cm_error = read64_gcr_error_cause();
 384                 cm_addr = read64_gcr_error_addr();
 385                 cm_other = read64_gcr_error_mult();
 386                 cause = cm_error >> CM3_GCR_ERROR_CAUSE_ERRTYPE_SHF;
 387                 ocause = cm_other >> CM_GCR_ERROR_MULT_ERR2ND_SHF;
 388
 389                 if (!cause)
 390                         return;
 391
 392                 /* Used by cause == {1,2,3} */
 393                 core_id_bits = (cm_error >> 22) & 0xf;
 394                 vp_id_bits = (cm_error >> 18) & 0xf;
 395                 cmd_bits = (cm_error >> 14) & 0xf;
 396                 cmd_group_bits = (cm_error >> 11) & 0xf;
 397                 cm3_cca_bits = (cm_error >> 8) & 7;
 398                 mcp_bits = (cm_error >> 5) & 0xf;
 399                 cm3_tr_bits = (cm_error >> 1) & 0xf;
 400                 sched_bit = cm_error & 0x1;
 401
 402                 if (cause == 1 || cause == 3) { /* Tag ECC */
 403                         unsigned long tag_ecc = (cm_error >> 57) & 0x1;
 404                         unsigned long tag_way_bits = (cm_error >> 29) & 0xffff;
 405                         unsigned long dword_bits = (cm_error >> 49) & 0xff;
 406                         unsigned long data_way_bits = (cm_error >> 45) & 0xf;
 407                         unsigned long data_sets_bits = (cm_error >> 29) & 0xfff;
 408                         unsigned long bank_bit = (cm_error >> 28) & 0x1;
 409                         snprintf(buf, sizeof(buf),
 410                                  "%s ECC Error: Way=%lu (DWORD=%lu, Sets=%lu)"
 411                                  "Bank=%lu CoreID=%lu VPID=%lu Command=%s"
 412                                  "Command Group=%s CCA=%lu MCP=%d"
 413                                  "Transaction type=%s Scheduler=%lu\n",
 414                                  tag_ecc ? "TAG" : "DATA",
 415                                  tag_ecc ? (unsigned long)ffs(tag_way_bits) - 1 :
 416                                  data_way_bits, bank_bit, dword_bits,
 417                                  data_sets_bits,
 418                                  core_id_bits, vp_id_bits,
 419                                  cm3_cmd[cmd_bits],
 420                                  cm3_cmd_group[cmd_group_bits],
 421                                  cm3_cca_bits, 1 << mcp_bits,
 422                                  cm3_tr[cm3_tr_bits], sched_bit);
 423                 } else if (cause == 2) {
 424                         unsigned long data_error_type = (cm_error >> 41) & 0xfff;
 425                         unsigned long data_decode_cmd = (cm_error >> 37) & 0xf;
 426                         unsigned long data_decode_group = (cm_error >> 34) & 0x7;
 427                         unsigned long data_decode_destination_id = (cm_error >> 28) & 0x3f;
 428
 429                         snprintf(buf, sizeof(buf),
 430                                  "Decode Request Error: Type=%lu, Command=%lu"
 431                                  "Command Group=%lu Destination ID=%lu"
 432                                  "CoreID=%lu VPID=%lu Command=%s"
 433                                  "Command Group=%s CCA=%lu MCP=%d"
 434                                  "Transaction type=%s Scheduler=%lu\n",
 435                                  data_error_type, data_decode_cmd,
 436                                  data_decode_group, data_decode_destination_id,
 437                                  core_id_bits, vp_id_bits,
 438                                  cm3_cmd[cmd_bits],
 439                                  cm3_cmd_group[cmd_group_bits],
 440                                  cm3_cca_bits, 1 << mcp_bits,
 441                                  cm3_tr[cm3_tr_bits], sched_bit);
 442                 } else {
 443                         buf[0] = 0;
 444                 }
 445
 446                 pr_err("CM_ERROR=%llx %s <%s>\n", cm_error,
 447                        cm3_causes[cause], buf);
 448                 pr_err("CM_ADDR =%llx\n", cm_addr);
 449                 pr_err("CM_OTHER=%llx %s\n", cm_other, cm3_causes[ocause]);
 450         }
 451
 452         /* reprime cause register */
 453         write_gcr_error_cause(0);
 454 }