drivers/edac/altera_edac.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *  Copyright (C) 2017-2018, Intel Corporation. All rights reserved
   4  *  Copyright Altera Corporation (C) 2014-2016. All rights reserved.
   5  *  Copyright 2011-2012 Calxeda, Inc.
   6  */
   7
   8 #include <asm/cacheflush.h>
   9 #include <linux/ctype.h>
  10 #include <linux/delay.h>
  11 #include <linux/edac.h>
  12 #include <linux/firmware/intel/stratix10-smc.h>
  13 #include <linux/genalloc.h>
  14 #include <linux/interrupt.h>
  15 #include <linux/irqchip/chained_irq.h>
  16 #include <linux/kernel.h>
  17 #include <linux/mfd/syscon.h>
  18 #include <linux/notifier.h>
  19 #include <linux/of_address.h>
  20 #include <linux/of_irq.h>
  21 #include <linux/of_platform.h>
  22 #include <linux/platform_device.h>
  23 #include <linux/regmap.h>
  24 #include <linux/types.h>
  25 #include <linux/uaccess.h>
  26
  27 #include "altera_edac.h"
  28 #include "edac_module.h"
  29
  30 #define EDAC_MOD_STR            "altera_edac"
  31 #define EDAC_DEVICE             "Altera"
  32
  33 #ifdef CONFIG_EDAC_ALTERA_SDRAM
  34 static const struct altr_sdram_prv_data c5_data = {
  35         .ecc_ctrl_offset    = CV_CTLCFG_OFST,
  36         .ecc_ctl_en_mask    = CV_CTLCFG_ECC_AUTO_EN,
  37         .ecc_stat_offset    = CV_DRAMSTS_OFST,
  38         .ecc_stat_ce_mask   = CV_DRAMSTS_SBEERR,
  39         .ecc_stat_ue_mask   = CV_DRAMSTS_DBEERR,
  40         .ecc_saddr_offset   = CV_ERRADDR_OFST,
  41         .ecc_daddr_offset   = CV_ERRADDR_OFST,
  42         .ecc_cecnt_offset   = CV_SBECOUNT_OFST,
  43         .ecc_uecnt_offset   = CV_DBECOUNT_OFST,
  44         .ecc_irq_en_offset  = CV_DRAMINTR_OFST,
  45         .ecc_irq_en_mask    = CV_DRAMINTR_INTREN,
  46         .ecc_irq_clr_offset = CV_DRAMINTR_OFST,
  47         .ecc_irq_clr_mask   = (CV_DRAMINTR_INTRCLR | CV_DRAMINTR_INTREN),
  48         .ecc_cnt_rst_offset = CV_DRAMINTR_OFST,
  49         .ecc_cnt_rst_mask   = CV_DRAMINTR_INTRCLR,
  50         .ce_ue_trgr_offset  = CV_CTLCFG_OFST,
  51         .ce_set_mask        = CV_CTLCFG_GEN_SB_ERR,
  52         .ue_set_mask        = CV_CTLCFG_GEN_DB_ERR,
  53 };
  54
  55 static const struct altr_sdram_prv_data a10_data = {
  56         .ecc_ctrl_offset    = A10_ECCCTRL1_OFST,
  57         .ecc_ctl_en_mask    = A10_ECCCTRL1_ECC_EN,
  58         .ecc_stat_offset    = A10_INTSTAT_OFST,
  59         .ecc_stat_ce_mask   = A10_INTSTAT_SBEERR,
  60         .ecc_stat_ue_mask   = A10_INTSTAT_DBEERR,
  61         .ecc_saddr_offset   = A10_SERRADDR_OFST,
  62         .ecc_daddr_offset   = A10_DERRADDR_OFST,
  63         .ecc_irq_en_offset  = A10_ERRINTEN_OFST,
  64         .ecc_irq_en_mask    = A10_ECC_IRQ_EN_MASK,
  65         .ecc_irq_clr_offset = A10_INTSTAT_OFST,
  66         .ecc_irq_clr_mask   = (A10_INTSTAT_SBEERR | A10_INTSTAT_DBEERR),
  67         .ecc_cnt_rst_offset = A10_ECCCTRL1_OFST,
  68         .ecc_cnt_rst_mask   = A10_ECC_CNT_RESET_MASK,
  69         .ce_ue_trgr_offset  = A10_DIAGINTTEST_OFST,
  70         .ce_set_mask        = A10_DIAGINT_TSERRA_MASK,
  71         .ue_set_mask        = A10_DIAGINT_TDERRA_MASK,
  72 };
  73
  74 /*********************** EDAC Memory Controller Functions ****************/
  75
  76 /* The SDRAM controller uses the EDAC Memory Controller framework.       */
  77
  78 static irqreturn_t altr_sdram_mc_err_handler(int irq, void *dev_id)
  79 {
  80         struct mem_ctl_info *mci = dev_id;
  81         struct altr_sdram_mc_data *drvdata = mci->pvt_info;
  82         const struct altr_sdram_prv_data *priv = drvdata->data;
  83         u32 status, err_count = 1, err_addr;
  84
  85         regmap_read(drvdata->mc_vbase, priv->ecc_stat_offset, &status);
  86
  87         if (status & priv->ecc_stat_ue_mask) {
  88                 regmap_read(drvdata->mc_vbase, priv->ecc_daddr_offset,
  89                             &err_addr);
  90                 if (priv->ecc_uecnt_offset)
  91                         regmap_read(drvdata->mc_vbase, priv->ecc_uecnt_offset,
  92                                     &err_count);
  93                 panic("\nEDAC: [%d Uncorrectable errors @ 0x%08X]\n",
  94                       err_count, err_addr);
  95         }
  96         if (status & priv->ecc_stat_ce_mask) {
  97                 regmap_read(drvdata->mc_vbase, priv->ecc_saddr_offset,
  98                             &err_addr);
  99                 if (priv->ecc_uecnt_offset)
 100                         regmap_read(drvdata->mc_vbase,  priv->ecc_cecnt_offset,
 101                                     &err_count);
 102                 edac_mc_handle_error(HW_EVENT_ERR_CORRECTED, mci, err_count,
 103                                      err_addr >> PAGE_SHIFT,
 104                                      err_addr & ~PAGE_MASK, 0,
 105                                      0, 0, -1, mci->ctl_name, "");
 106                 /* Clear IRQ to resume */
 107                 regmap_write(drvdata->mc_vbase, priv->ecc_irq_clr_offset,
 108                              priv->ecc_irq_clr_mask);
 109
 110                 return IRQ_HANDLED;
 111         }
 112         return IRQ_NONE;
 113 }
 114
 115 static ssize_t altr_sdr_mc_err_inject_write(struct file *file,
 116                                             const char __user *data,
 117                                             size_t count, loff_t *ppos)
 118 {
 119         struct mem_ctl_info *mci = file->private_data;
 120         struct altr_sdram_mc_data *drvdata = mci->pvt_info;
 121         const struct altr_sdram_prv_data *priv = drvdata->data;
 122         u32 *ptemp;
 123         dma_addr_t dma_handle;
 124         u32 reg, read_reg;
 125
 126         ptemp = dma_alloc_coherent(mci->pdev, 16, &dma_handle, GFP_KERNEL);
 127         if (!ptemp) {
 128                 dma_free_coherent(mci->pdev, 16, ptemp, dma_handle);
 129                 edac_printk(KERN_ERR, EDAC_MC,
 130                             "Inject: Buffer Allocation error\n");
 131                 return -ENOMEM;
 132         }
 133
 134         regmap_read(drvdata->mc_vbase, priv->ce_ue_trgr_offset,
 135                     &read_reg);
 136         read_reg &= ~(priv->ce_set_mask | priv->ue_set_mask);
 137
 138         /* Error are injected by writing a word while the SBE or DBE
 139          * bit in the CTLCFG register is set. Reading the word will
 140          * trigger the SBE or DBE error and the corresponding IRQ.
 141          */
 142         if (count == 3) {
 143                 edac_printk(KERN_ALERT, EDAC_MC,
 144                             "Inject Double bit error\n");
 145                 local_irq_disable();
 146                 regmap_write(drvdata->mc_vbase, priv->ce_ue_trgr_offset,
 147                              (read_reg | priv->ue_set_mask));
 148                 local_irq_enable();
 149         } else {
 150                 edac_printk(KERN_ALERT, EDAC_MC,
 151                             "Inject Single bit error\n");
 152                 local_irq_disable();
 153                 regmap_write(drvdata->mc_vbase, priv->ce_ue_trgr_offset,
 154                              (read_reg | priv->ce_set_mask));
 155                 local_irq_enable();
 156         }
 157
 158         ptemp[0] = 0x5A5A5A5A;
 159         ptemp[1] = 0xA5A5A5A5;
 160
 161         /* Clear the error injection bits */
 162         regmap_write(drvdata->mc_vbase, priv->ce_ue_trgr_offset, read_reg);
 163         /* Ensure it has been written out */
 164         wmb();
 165
 166         /*
 167          * To trigger the error, we need to read the data back
 168          * (the data was written with errors above).
 169          * The READ_ONCE macros and printk are used to prevent the
 170          * the compiler optimizing these reads out.
 171          */
 172         reg = READ_ONCE(ptemp[0]);
 173         read_reg = READ_ONCE(ptemp[1]);
 174         /* Force Read */
 175         rmb();
 176
 177         edac_printk(KERN_ALERT, EDAC_MC, "Read Data [0x%X, 0x%X]\n",
 178                     reg, read_reg);
 179
 180         dma_free_coherent(mci->pdev, 16, ptemp, dma_handle);
 181
 182         return count;
 183 }
 184
 185 static const struct file_operations altr_sdr_mc_debug_inject_fops = {
 186         .open = simple_open,
 187         .write = altr_sdr_mc_err_inject_write,
 188         .llseek = generic_file_llseek,
 189 };
 190
 191 static void altr_sdr_mc_create_debugfs_nodes(struct mem_ctl_info *mci)
 192 {
 193         if (!IS_ENABLED(CONFIG_EDAC_DEBUG))
 194                 return;
 195
 196         if (!mci->debugfs)
 197                 return;
 198
 199         edac_debugfs_create_file("altr_trigger", S_IWUSR, mci->debugfs, mci,
 200                                  &altr_sdr_mc_debug_inject_fops);
 201 }
 202
 203 /* Get total memory size from Open Firmware DTB */
 204 static unsigned long get_total_mem(void)
 205 {
 206         struct device_node *np = NULL;
 207         struct resource res;
 208         int ret;
 209         unsigned long total_mem = 0;
 210
 211         for_each_node_by_type(np, "memory") {
 212                 ret = of_address_to_resource(np, 0, &res);
 213                 if (ret)
 214                         continue;
 215
 216                 total_mem += resource_size(&res);
 217         }
 218         edac_dbg(0, "total_mem 0x%lx\n", total_mem);
 219         return total_mem;
 220 }
 221
 222 static const struct of_device_id altr_sdram_ctrl_of_match[] = {
 223         { .compatible = "altr,sdram-edac", .data = &c5_data},
 224         { .compatible = "altr,sdram-edac-a10", .data = &a10_data},
 225         { .compatible = "altr,sdram-edac-s10", .data = &a10_data},
 226         {},
 227 };
 228 MODULE_DEVICE_TABLE(of, altr_sdram_ctrl_of_match);
 229
 230 static int a10_init(struct regmap *mc_vbase)
 231 {
 232         if (regmap_update_bits(mc_vbase, A10_INTMODE_OFST,
 233                                A10_INTMODE_SB_INT, A10_INTMODE_SB_INT)) {
 234                 edac_printk(KERN_ERR, EDAC_MC,
 235                             "Error setting SB IRQ mode\n");
 236                 return -ENODEV;
 237         }
 238
 239         if (regmap_write(mc_vbase, A10_SERRCNTREG_OFST, 1)) {
 240                 edac_printk(KERN_ERR, EDAC_MC,
 241                             "Error setting trigger count\n");
 242                 return -ENODEV;
 243         }
 244
 245         return 0;
 246 }
 247
 248 static int a10_unmask_irq(struct platform_device *pdev, u32 mask)
 249 {
 250         void __iomem  *sm_base;
 251         int  ret = 0;
 252
 253         if (!request_mem_region(A10_SYMAN_INTMASK_CLR, sizeof(u32),
 254                                 dev_name(&pdev->dev))) {
 255                 edac_printk(KERN_ERR, EDAC_MC,
 256                             "Unable to request mem region\n");
 257                 return -EBUSY;
 258         }
 259
 260         sm_base = ioremap(A10_SYMAN_INTMASK_CLR, sizeof(u32));
 261         if (!sm_base) {
 262                 edac_printk(KERN_ERR, EDAC_MC,
 263                             "Unable to ioremap device\n");
 264
 265                 ret = -ENOMEM;
 266                 goto release;
 267         }
 268
 269         iowrite32(mask, sm_base);
 270
 271         iounmap(sm_base);
 272
 273 release:
 274         release_mem_region(A10_SYMAN_INTMASK_CLR, sizeof(u32));
 275
 276         return ret;
 277 }
 278
 279 static int socfpga_is_a10(void);
 280 static int altr_sdram_probe(struct platform_device *pdev)
 281 {
 282         const struct of_device_id *id;
 283         struct edac_mc_layer layers[2];
 284         struct mem_ctl_info *mci;
 285         struct altr_sdram_mc_data *drvdata;
 286         const struct altr_sdram_prv_data *priv;
 287         struct regmap *mc_vbase;
 288         struct dimm_info *dimm;
 289         u32 read_reg;
 290         int irq, irq2, res = 0;
 291         unsigned long mem_size, irqflags = 0;
 292
 293         id = of_match_device(altr_sdram_ctrl_of_match, &pdev->dev);
 294         if (!id)
 295                 return -ENODEV;
 296
 297         /* Grab the register range from the sdr controller in device tree */
 298         mc_vbase = syscon_regmap_lookup_by_phandle(pdev->dev.of_node,
 299                                                    "altr,sdr-syscon");
 300         if (IS_ERR(mc_vbase)) {
 301                 edac_printk(KERN_ERR, EDAC_MC,
 302                             "regmap for altr,sdr-syscon lookup failed.\n");
 303                 return -ENODEV;
 304         }
 305
 306         /* Check specific dependencies for the module */
 307         priv = of_match_node(altr_sdram_ctrl_of_match,
 308                              pdev->dev.of_node)->data;
 309
 310         /* Validate the SDRAM controller has ECC enabled */
 311         if (regmap_read(mc_vbase, priv->ecc_ctrl_offset, &read_reg) ||
 312             ((read_reg & priv->ecc_ctl_en_mask) != priv->ecc_ctl_en_mask)) {
 313                 edac_printk(KERN_ERR, EDAC_MC,
 314                             "No ECC/ECC disabled [0x%08X]\n", read_reg);
 315                 return -ENODEV;
 316         }
 317
 318         /* Grab memory size from device tree. */
 319         mem_size = get_total_mem();
 320         if (!mem_size) {
 321                 edac_printk(KERN_ERR, EDAC_MC, "Unable to calculate memory size\n");
 322                 return -ENODEV;
 323         }
 324
 325         /* Ensure the SDRAM Interrupt is disabled */
 326         if (regmap_update_bits(mc_vbase, priv->ecc_irq_en_offset,
 327                                priv->ecc_irq_en_mask, 0)) {
 328                 edac_printk(KERN_ERR, EDAC_MC,
 329                             "Error disabling SDRAM ECC IRQ\n");
 330                 return -ENODEV;
 331         }
 332
 333         /* Toggle to clear the SDRAM Error count */
 334         if (regmap_update_bits(mc_vbase, priv->ecc_cnt_rst_offset,
 335                                priv->ecc_cnt_rst_mask,
 336                                priv->ecc_cnt_rst_mask)) {
 337                 edac_printk(KERN_ERR, EDAC_MC,
 338                             "Error clearing SDRAM ECC count\n");
 339                 return -ENODEV;
 340         }
 341
 342         if (regmap_update_bits(mc_vbase, priv->ecc_cnt_rst_offset,
 343                                priv->ecc_cnt_rst_mask, 0)) {
 344                 edac_printk(KERN_ERR, EDAC_MC,
 345                             "Error clearing SDRAM ECC count\n");
 346                 return -ENODEV;
 347         }
 348
 349         irq = platform_get_irq(pdev, 0);
 350         if (irq < 0) {
 351                 edac_printk(KERN_ERR, EDAC_MC,
 352                             "No irq %d in DT\n", irq);
 353                 return -ENODEV;
 354         }
 355
 356         /* Arria10 has a 2nd IRQ */
 357         irq2 = platform_get_irq(pdev, 1);
 358
 359         layers[0].type = EDAC_MC_LAYER_CHIP_SELECT;
 360         layers[0].size = 1;
 361         layers[0].is_virt_csrow = true;
 362         layers[1].type = EDAC_MC_LAYER_CHANNEL;
 363         layers[1].size = 1;
 364         layers[1].is_virt_csrow = false;
 365         mci = edac_mc_alloc(0, ARRAY_SIZE(layers), layers,
 366                             sizeof(struct altr_sdram_mc_data));
 367         if (!mci)
 368                 return -ENOMEM;
 369
 370         mci->pdev = &pdev->dev;
 371         drvdata = mci->pvt_info;
 372         drvdata->mc_vbase = mc_vbase;
 373         drvdata->data = priv;
 374         platform_set_drvdata(pdev, mci);
 375
 376         if (!devres_open_group(&pdev->dev, NULL, GFP_KERNEL)) {
 377                 edac_printk(KERN_ERR, EDAC_MC,
 378                             "Unable to get managed device resource\n");
 379                 res = -ENOMEM;
 380                 goto free;
 381         }
 382
 383         mci->mtype_cap = MEM_FLAG_DDR3;
 384         mci->edac_ctl_cap = EDAC_FLAG_NONE | EDAC_FLAG_SECDED;
 385         mci->edac_cap = EDAC_FLAG_SECDED;
 386         mci->mod_name = EDAC_MOD_STR;
 387         mci->ctl_name = dev_name(&pdev->dev);
 388         mci->scrub_mode = SCRUB_SW_SRC;
 389         mci->dev_name = dev_name(&pdev->dev);
 390
 391         dimm = *mci->dimms;
 392         dimm->nr_pages = ((mem_size - 1) >> PAGE_SHIFT) + 1;
 393         dimm->grain = 8;
 394         dimm->dtype = DEV_X8;
 395         dimm->mtype = MEM_DDR3;
 396         dimm->edac_mode = EDAC_SECDED;
 397
 398         res = edac_mc_add_mc(mci);
 399         if (res < 0)
 400                 goto err;
 401
 402         /* Only the Arria10 has separate IRQs */
 403         if (socfpga_is_a10()) {
 404                 /* Arria10 specific initialization */
 405                 res = a10_init(mc_vbase);
 406                 if (res < 0)
 407                         goto err2;
 408
 409                 res = devm_request_irq(&pdev->dev, irq2,
 410                                        altr_sdram_mc_err_handler,
 411                                        IRQF_SHARED, dev_name(&pdev->dev), mci);
 412                 if (res < 0) {
 413                         edac_mc_printk(mci, KERN_ERR,
 414                                        "Unable to request irq %d\n", irq2);
 415                         res = -ENODEV;
 416                         goto err2;
 417                 }
 418
 419                 res = a10_unmask_irq(pdev, A10_DDR0_IRQ_MASK);
 420                 if (res < 0)
 421                         goto err2;
 422
 423                 irqflags = IRQF_SHARED;
 424         }
 425
 426         res = devm_request_irq(&pdev->dev, irq, altr_sdram_mc_err_handler,
 427                                irqflags, dev_name(&pdev->dev), mci);
 428         if (res < 0) {
 429                 edac_mc_printk(mci, KERN_ERR,
 430                                "Unable to request irq %d\n", irq);
 431                 res = -ENODEV;
 432                 goto err2;
 433         }
 434
 435         /* Infrastructure ready - enable the IRQ */
 436         if (regmap_update_bits(drvdata->mc_vbase, priv->ecc_irq_en_offset,
 437                                priv->ecc_irq_en_mask, priv->ecc_irq_en_mask)) {
 438                 edac_mc_printk(mci, KERN_ERR,
 439                                "Error enabling SDRAM ECC IRQ\n");
 440                 res = -ENODEV;
 441                 goto err2;
 442         }
 443
 444         altr_sdr_mc_create_debugfs_nodes(mci);
 445
 446         devres_close_group(&pdev->dev, NULL);
 447
 448         return 0;
 449
 450 err2:
 451         edac_mc_del_mc(&pdev->dev);
 452 err:
 453         devres_release_group(&pdev->dev, NULL);
 454 free:
 455         edac_mc_free(mci);
 456         edac_printk(KERN_ERR, EDAC_MC,
 457                     "EDAC Probe Failed; Error %d\n", res);
 458
 459         return res;
 460 }
 461
 462 static int altr_sdram_remove(struct platform_device *pdev)
 463 {
 464         struct mem_ctl_info *mci = platform_get_drvdata(pdev);
 465
 466         edac_mc_del_mc(&pdev->dev);
 467         edac_mc_free(mci);
 468         platform_set_drvdata(pdev, NULL);
 469
 470         return 0;
 471 }
 472
 473 /*
 474  * If you want to suspend, need to disable EDAC by removing it
 475  * from the device tree or defconfig.
 476  */
 477 #ifdef CONFIG_PM
 478 static int altr_sdram_prepare(struct device *dev)
 479 {
 480         pr_err("Suspend not allowed when EDAC is enabled.\n");
 481
 482         return -EPERM;
 483 }
 484
 485 static const struct dev_pm_ops altr_sdram_pm_ops = {
 486         .prepare = altr_sdram_prepare,
 487 };
 488 #endif
 489
 490 static struct platform_driver altr_sdram_edac_driver = {
 491         .probe = altr_sdram_probe,
 492         .remove = altr_sdram_remove,
 493         .driver = {
 494                 .name = "altr_sdram_edac",
 495 #ifdef CONFIG_PM
 496                 .pm = &altr_sdram_pm_ops,
 497 #endif
 498                 .of_match_table = altr_sdram_ctrl_of_match,
 499         },
 500 };
 501
 502 module_platform_driver(altr_sdram_edac_driver);
 503
 504 #endif  /* CONFIG_EDAC_ALTERA_SDRAM */
 505
 506 /**************** Stratix 10 EDAC Memory Controller Functions ************/
 507
 508 /**
 509  * s10_protected_reg_write
 510  * Write to a protected SMC register.
 511  * @context: Not used.
 512  * @reg: Address of register
 513  * @value: Value to write
 514  * Return: INTEL_SIP_SMC_STATUS_OK (0) on success
 515  *         INTEL_SIP_SMC_REG_ERROR on error
 516  *         INTEL_SIP_SMC_RETURN_UNKNOWN_FUNCTION if not supported
 517  */
 518 static int s10_protected_reg_write(void *context, unsigned int reg,
 519                                    unsigned int val)
 520 {
 521         struct arm_smccc_res result;
 522         unsigned long offset = (unsigned long)context;
 523
 524         arm_smccc_smc(INTEL_SIP_SMC_REG_WRITE, offset + reg, val, 0, 0,
 525                       0, 0, 0, &result);
 526
 527         return (int)result.a0;
 528 }
 529
 530 /**
 531  * s10_protected_reg_read
 532  * Read the status of a protected SMC register
 533  * @context: Not used.
 534  * @reg: Address of register
 535  * @value: Value read.
 536  * Return: INTEL_SIP_SMC_STATUS_OK (0) on success
 537  *         INTEL_SIP_SMC_REG_ERROR on error
 538  *         INTEL_SIP_SMC_RETURN_UNKNOWN_FUNCTION if not supported
 539  */
 540 static int s10_protected_reg_read(void *context, unsigned int reg,
 541                                   unsigned int *val)
 542 {
 543         struct arm_smccc_res result;
 544         unsigned long offset = (unsigned long)context;
 545
 546         arm_smccc_smc(INTEL_SIP_SMC_REG_READ, offset + reg, 0, 0, 0,
 547                       0, 0, 0, &result);
 548
 549         *val = (unsigned int)result.a1;
 550
 551         return (int)result.a0;
 552 }
 553
 554 static const struct regmap_config s10_sdram_regmap_cfg = {
 555         .name = "s10_ddr",
 556         .reg_bits = 32,
 557         .reg_stride = 4,
 558         .val_bits = 32,
 559         .max_register = 0xffd12228,
 560         .reg_read = s10_protected_reg_read,
 561         .reg_write = s10_protected_reg_write,
 562         .use_single_read = true,
 563         .use_single_write = true,
 564 };
 565
 566 /************** </Stratix10 EDAC Memory Controller Functions> ***********/
 567
 568 /************************* EDAC Parent Probe *************************/
 569
 570 static const struct of_device_id altr_edac_device_of_match[];
 571
 572 static const struct of_device_id altr_edac_of_match[] = {
 573         { .compatible = "altr,socfpga-ecc-manager" },
 574         {},
 575 };
 576 MODULE_DEVICE_TABLE(of, altr_edac_of_match);
 577
 578 static int altr_edac_probe(struct platform_device *pdev)
 579 {
 580         of_platform_populate(pdev->dev.of_node, altr_edac_device_of_match,
 581                              NULL, &pdev->dev);
 582         return 0;
 583 }
 584
 585 static struct platform_driver altr_edac_driver = {
 586         .probe =  altr_edac_probe,
 587         .driver = {
 588                 .name = "socfpga_ecc_manager",
 589                 .of_match_table = altr_edac_of_match,
 590         },
 591 };
 592 module_platform_driver(altr_edac_driver);
 593
 594 /************************* EDAC Device Functions *************************/
 595
 596 /*
 597  * EDAC Device Functions (shared between various IPs).
 598  * The discrete memories use the EDAC Device framework. The probe
 599  * and error handling functions are very similar between memories
 600  * so they are shared. The memory allocation and freeing for EDAC
 601  * trigger testing are different for each memory.
 602  */
 603
 604 static const struct edac_device_prv_data ocramecc_data;
 605 static const struct edac_device_prv_data l2ecc_data;
 606 static const struct edac_device_prv_data a10_ocramecc_data;
 607 static const struct edac_device_prv_data a10_l2ecc_data;
 608
 609 static irqreturn_t altr_edac_device_handler(int irq, void *dev_id)
 610 {
 611         irqreturn_t ret_value = IRQ_NONE;
 612         struct edac_device_ctl_info *dci = dev_id;
 613         struct altr_edac_device_dev *drvdata = dci->pvt_info;
 614         const struct edac_device_prv_data *priv = drvdata->data;
 615
 616         if (irq == drvdata->sb_irq) {
 617                 if (priv->ce_clear_mask)
 618                         writel(priv->ce_clear_mask, drvdata->base);
 619                 edac_device_handle_ce(dci, 0, 0, drvdata->edac_dev_name);
 620                 ret_value = IRQ_HANDLED;
 621         } else if (irq == drvdata->db_irq) {
 622                 if (priv->ue_clear_mask)
 623                         writel(priv->ue_clear_mask, drvdata->base);
 624                 edac_device_handle_ue(dci, 0, 0, drvdata->edac_dev_name);
 625                 panic("\nEDAC:ECC_DEVICE[Uncorrectable errors]\n");
 626                 ret_value = IRQ_HANDLED;
 627         } else {
 628                 WARN_ON(1);
 629         }
 630
 631         return ret_value;
 632 }
 633
 634 static ssize_t altr_edac_device_trig(struct file *file,
 635                                      const char __user *user_buf,
 636                                      size_t count, loff_t *ppos)
 637
 638 {
 639         u32 *ptemp, i, error_mask;
 640         int result = 0;
 641         u8 trig_type;
 642         unsigned long flags;
 643         struct edac_device_ctl_info *edac_dci = file->private_data;
 644         struct altr_edac_device_dev *drvdata = edac_dci->pvt_info;
 645         const struct edac_device_prv_data *priv = drvdata->data;
 646         void *generic_ptr = edac_dci->dev;
 647
 648         if (!user_buf || get_user(trig_type, user_buf))
 649                 return -EFAULT;
 650
 651         if (!priv->alloc_mem)
 652                 return -ENOMEM;
 653
 654         /*
 655          * Note that generic_ptr is initialized to the device * but in
 656          * some alloc_functions, this is overridden and returns data.
 657          */
 658         ptemp = priv->alloc_mem(priv->trig_alloc_sz, &generic_ptr);
 659         if (!ptemp) {
 660                 edac_printk(KERN_ERR, EDAC_DEVICE,
 661                             "Inject: Buffer Allocation error\n");
 662                 return -ENOMEM;
 663         }
 664
 665         if (trig_type == ALTR_UE_TRIGGER_CHAR)
 666                 error_mask = priv->ue_set_mask;
 667         else
 668                 error_mask = priv->ce_set_mask;
 669
 670         edac_printk(KERN_ALERT, EDAC_DEVICE,
 671                     "Trigger Error Mask (0x%X)\n", error_mask);
 672
 673         local_irq_save(flags);
 674         /* write ECC corrupted data out. */
 675         for (i = 0; i < (priv->trig_alloc_sz / sizeof(*ptemp)); i++) {
 676                 /* Read data so we're in the correct state */
 677                 rmb();
 678                 if (READ_ONCE(ptemp[i]))
 679                         result = -1;
 680                 /* Toggle Error bit (it is latched), leave ECC enabled */
 681                 writel(error_mask, (drvdata->base + priv->set_err_ofst));
 682                 writel(priv->ecc_enable_mask, (drvdata->base +
 683                                                priv->set_err_ofst));
 684                 ptemp[i] = i;
 685         }
 686         /* Ensure it has been written out */
 687         wmb();
 688         local_irq_restore(flags);
 689
 690         if (result)
 691                 edac_printk(KERN_ERR, EDAC_DEVICE, "Mem Not Cleared\n");
 692
 693         /* Read out written data. ECC error caused here */
 694         for (i = 0; i < ALTR_TRIGGER_READ_WRD_CNT; i++)
 695                 if (READ_ONCE(ptemp[i]) != i)
 696                         edac_printk(KERN_ERR, EDAC_DEVICE,
 697                                     "Read doesn't match written data\n");
 698
 699         if (priv->free_mem)
 700                 priv->free_mem(ptemp, priv->trig_alloc_sz, generic_ptr);
 701
 702         return count;
 703 }
 704
 705 static const struct file_operations altr_edac_device_inject_fops = {
 706         .open = simple_open,
 707         .write = altr_edac_device_trig,
 708         .llseek = generic_file_llseek,
 709 };
 710
 711 static ssize_t altr_edac_a10_device_trig(struct file *file,
 712                                          const char __user *user_buf,
 713                                          size_t count, loff_t *ppos);
 714
 715 static const struct file_operations altr_edac_a10_device_inject_fops = {
 716         .open = simple_open,
 717         .write = altr_edac_a10_device_trig,
 718         .llseek = generic_file_llseek,
 719 };
 720
 721 static ssize_t altr_edac_a10_device_trig2(struct file *file,
 722                                           const char __user *user_buf,
 723                                           size_t count, loff_t *ppos);
 724
 725 static const struct file_operations altr_edac_a10_device_inject2_fops = {
 726         .open = simple_open,
 727         .write = altr_edac_a10_device_trig2,
 728         .llseek = generic_file_llseek,
 729 };
 730
 731 static void altr_create_edacdev_dbgfs(struct edac_device_ctl_info *edac_dci,
 732                                       const struct edac_device_prv_data *priv)
 733 {
 734         struct altr_edac_device_dev *drvdata = edac_dci->pvt_info;
 735
 736         if (!IS_ENABLED(CONFIG_EDAC_DEBUG))
 737                 return;
 738
 739         drvdata->debugfs_dir = edac_debugfs_create_dir(drvdata->edac_dev_name);
 740         if (!drvdata->debugfs_dir)
 741                 return;
 742
 743         if (!edac_debugfs_create_file("altr_trigger", S_IWUSR,
 744                                       drvdata->debugfs_dir, edac_dci,
 745                                       priv->inject_fops))
 746                 debugfs_remove_recursive(drvdata->debugfs_dir);
 747 }
 748
 749 static const struct of_device_id altr_edac_device_of_match[] = {
 750 #ifdef CONFIG_EDAC_ALTERA_L2C
 751         { .compatible = "altr,socfpga-l2-ecc", .data = &l2ecc_data },
 752 #endif
 753 #ifdef CONFIG_EDAC_ALTERA_OCRAM
 754         { .compatible = "altr,socfpga-ocram-ecc", .data = &ocramecc_data },
 755 #endif
 756         {},
 757 };
 758 MODULE_DEVICE_TABLE(of, altr_edac_device_of_match);
 759
 760 /*
 761  * altr_edac_device_probe()
 762  *      This is a generic EDAC device driver that will support
 763  *      various Altera memory devices such as the L2 cache ECC and
 764  *      OCRAM ECC as well as the memories for other peripherals.
 765  *      Module specific initialization is done by passing the
 766  *      function index in the device tree.
 767  */
 768 static int altr_edac_device_probe(struct platform_device *pdev)
 769 {
 770         struct edac_device_ctl_info *dci;
 771         struct altr_edac_device_dev *drvdata;
 772         struct resource *r;
 773         int res = 0;
 774         struct device_node *np = pdev->dev.of_node;
 775         char *ecc_name = (char *)np->name;
 776         static int dev_instance;
 777
 778         if (!devres_open_group(&pdev->dev, NULL, GFP_KERNEL)) {
 779                 edac_printk(KERN_ERR, EDAC_DEVICE,
 780                             "Unable to open devm\n");
 781                 return -ENOMEM;
 782         }
 783
 784         r = platform_get_resource(pdev, IORESOURCE_MEM, 0);
 785         if (!r) {
 786                 edac_printk(KERN_ERR, EDAC_DEVICE,
 787                             "Unable to get mem resource\n");
 788                 res = -ENODEV;
 789                 goto fail;
 790         }
 791
 792         if (!devm_request_mem_region(&pdev->dev, r->start, resource_size(r),
 793                                      dev_name(&pdev->dev))) {
 794                 edac_printk(KERN_ERR, EDAC_DEVICE,
 795                             "%s:Error requesting mem region\n", ecc_name);
 796                 res = -EBUSY;
 797                 goto fail;
 798         }
 799
 800         dci = edac_device_alloc_ctl_info(sizeof(*drvdata), ecc_name,
 801                                          1, ecc_name, 1, 0, NULL, 0,
 802                                          dev_instance++);
 803
 804         if (!dci) {
 805                 edac_printk(KERN_ERR, EDAC_DEVICE,
 806                             "%s: Unable to allocate EDAC device\n", ecc_name);
 807                 res = -ENOMEM;
 808                 goto fail;
 809         }
 810
 811         drvdata = dci->pvt_info;
 812         dci->dev = &pdev->dev;
 813         platform_set_drvdata(pdev, dci);
 814         drvdata->edac_dev_name = ecc_name;
 815
 816         drvdata->base = devm_ioremap(&pdev->dev, r->start, resource_size(r));
 817         if (!drvdata->base) {
 818                 res = -ENOMEM;
 819                 goto fail1;
 820         }
 821
 822         /* Get driver specific data for this EDAC device */
 823         drvdata->data = of_match_node(altr_edac_device_of_match, np)->data;
 824
 825         /* Check specific dependencies for the module */
 826         if (drvdata->data->setup) {
 827                 res = drvdata->data->setup(drvdata);
 828                 if (res)
 829                         goto fail1;
 830         }
 831
 832         drvdata->sb_irq = platform_get_irq(pdev, 0);
 833         res = devm_request_irq(&pdev->dev, drvdata->sb_irq,
 834                                altr_edac_device_handler,
 835                                0, dev_name(&pdev->dev), dci);
 836         if (res)
 837                 goto fail1;
 838
 839         drvdata->db_irq = platform_get_irq(pdev, 1);
 840         res = devm_request_irq(&pdev->dev, drvdata->db_irq,
 841                                altr_edac_device_handler,
 842                                0, dev_name(&pdev->dev), dci);
 843         if (res)
 844                 goto fail1;
 845
 846         dci->mod_name = "Altera ECC Manager";
 847         dci->dev_name = drvdata->edac_dev_name;
 848
 849         res = edac_device_add_device(dci);
 850         if (res)
 851                 goto fail1;
 852
 853         altr_create_edacdev_dbgfs(dci, drvdata->data);
 854
 855         devres_close_group(&pdev->dev, NULL);
 856
 857         return 0;
 858
 859 fail1:
 860         edac_device_free_ctl_info(dci);
 861 fail:
 862         devres_release_group(&pdev->dev, NULL);
 863         edac_printk(KERN_ERR, EDAC_DEVICE,
 864                     "%s:Error setting up EDAC device: %d\n", ecc_name, res);
 865
 866         return res;
 867 }
 868
 869 static int altr_edac_device_remove(struct platform_device *pdev)
 870 {
 871         struct edac_device_ctl_info *dci = platform_get_drvdata(pdev);
 872         struct altr_edac_device_dev *drvdata = dci->pvt_info;
 873
 874         debugfs_remove_recursive(drvdata->debugfs_dir);
 875         edac_device_del_device(&pdev->dev);
 876         edac_device_free_ctl_info(dci);
 877
 878         return 0;
 879 }
 880
 881 static struct platform_driver altr_edac_device_driver = {
 882         .probe =  altr_edac_device_probe,
 883         .remove = altr_edac_device_remove,
 884         .driver = {
 885                 .name = "altr_edac_device",
 886                 .of_match_table = altr_edac_device_of_match,
 887         },
 888 };
 889 module_platform_driver(altr_edac_device_driver);
 890
 891 /******************* Arria10 Device ECC Shared Functions *****************/
 892
 893 /*
 894  *  Test for memory's ECC dependencies upon entry because platform specific
 895  *  startup should have initialized the memory and enabled the ECC.
 896  *  Can't turn on ECC here because accessing un-initialized memory will
 897  *  cause CE/UE errors possibly causing an ABORT.
 898  */
 899 static int __maybe_unused
 900 altr_check_ecc_deps(struct altr_edac_device_dev *device)
 901 {
 902         void __iomem  *base = device->base;
 903         const struct edac_device_prv_data *prv = device->data;
 904
 905         if (readl(base + prv->ecc_en_ofst) & prv->ecc_enable_mask)
 906                 return 0;
 907
 908         edac_printk(KERN_ERR, EDAC_DEVICE,
 909                     "%s: No ECC present or ECC disabled.\n",
 910                     device->edac_dev_name);
 911         return -ENODEV;
 912 }
 913
 914 static irqreturn_t __maybe_unused altr_edac_a10_ecc_irq(int irq, void *dev_id)
 915 {
 916         struct altr_edac_device_dev *dci = dev_id;
 917         void __iomem  *base = dci->base;
 918
 919         if (irq == dci->sb_irq) {
 920                 writel(ALTR_A10_ECC_SERRPENA,
 921                        base + ALTR_A10_ECC_INTSTAT_OFST);
 922                 edac_device_handle_ce(dci->edac_dev, 0, 0, dci->edac_dev_name);
 923
 924                 return IRQ_HANDLED;
 925         } else if (irq == dci->db_irq) {
 926                 writel(ALTR_A10_ECC_DERRPENA,
 927                        base + ALTR_A10_ECC_INTSTAT_OFST);
 928                 edac_device_handle_ue(dci->edac_dev, 0, 0, dci->edac_dev_name);
 929                 if (dci->data->panic)
 930                         panic("\nEDAC:ECC_DEVICE[Uncorrectable errors]\n");
 931
 932                 return IRQ_HANDLED;
 933         }
 934
 935         WARN_ON(1);
 936
 937         return IRQ_NONE;
 938 }
 939
 940 /******************* Arria10 Memory Buffer Functions *********************/
 941
 942 static inline int a10_get_irq_mask(struct device_node *np)
 943 {
 944         int irq;
 945         const u32 *handle = of_get_property(np, "interrupts", NULL);
 946
 947         if (!handle)
 948                 return -ENODEV;
 949         irq = be32_to_cpup(handle);
 950         return irq;
 951 }
 952
 953 static inline void ecc_set_bits(u32 bit_mask, void __iomem *ioaddr)
 954 {
 955         u32 value = readl(ioaddr);
 956
 957         value |= bit_mask;
 958         writel(value, ioaddr);
 959 }
 960
 961 static inline void ecc_clear_bits(u32 bit_mask, void __iomem *ioaddr)
 962 {
 963         u32 value = readl(ioaddr);
 964
 965         value &= ~bit_mask;
 966         writel(value, ioaddr);
 967 }
 968
 969 static inline int ecc_test_bits(u32 bit_mask, void __iomem *ioaddr)
 970 {
 971         u32 value = readl(ioaddr);
 972
 973         return (value & bit_mask) ? 1 : 0;
 974 }
 975
 976 /*
 977  * This function uses the memory initialization block in the Arria10 ECC
 978  * controller to initialize/clear the entire memory data and ECC data.
 979  */
 980 static int __maybe_unused altr_init_memory_port(void __iomem *ioaddr, int port)
 981 {
 982         int limit = ALTR_A10_ECC_INIT_WATCHDOG_10US;
 983         u32 init_mask, stat_mask, clear_mask;
 984         int ret = 0;
 985
 986         if (port) {
 987                 init_mask = ALTR_A10_ECC_INITB;
 988                 stat_mask = ALTR_A10_ECC_INITCOMPLETEB;
 989                 clear_mask = ALTR_A10_ECC_ERRPENB_MASK;
 990         } else {
 991                 init_mask = ALTR_A10_ECC_INITA;
 992                 stat_mask = ALTR_A10_ECC_INITCOMPLETEA;
 993                 clear_mask = ALTR_A10_ECC_ERRPENA_MASK;
 994         }
 995
 996         ecc_set_bits(init_mask, (ioaddr + ALTR_A10_ECC_CTRL_OFST));
 997         while (limit--) {
 998                 if (ecc_test_bits(stat_mask,
 999                                   (ioaddr + ALTR_A10_ECC_INITSTAT_OFST)))
1000                         break;
1001                 udelay(1);
1002         }
1003         if (limit < 0)
1004                 ret = -EBUSY;
1005
1006         /* Clear any pending ECC interrupts */
1007         writel(clear_mask, (ioaddr + ALTR_A10_ECC_INTSTAT_OFST));
1008
1009         return ret;
1010 }
1011
1012 static int socfpga_is_a10(void)
1013 {
1014         return of_machine_is_compatible("altr,socfpga-arria10");
1015 }
1016
1017 static int socfpga_is_s10(void)
1018 {
1019         return of_machine_is_compatible("altr,socfpga-stratix10");
1020 }
1021
1022 static __init int __maybe_unused
1023 altr_init_a10_ecc_block(struct device_node *np, u32 irq_mask,
1024                         u32 ecc_ctrl_en_mask, bool dual_port)
1025 {
1026         int ret = 0;
1027         void __iomem *ecc_block_base;
1028         struct regmap *ecc_mgr_map;
1029         char *ecc_name;
1030         struct device_node *np_eccmgr;
1031
1032         ecc_name = (char *)np->name;
1033
1034         /* Get the ECC Manager - parent of the device EDACs */
1035         np_eccmgr = of_get_parent(np);
1036
1037         if (socfpga_is_a10()) {
1038                 ecc_mgr_map = syscon_regmap_lookup_by_phandle(np_eccmgr,
1039                                                               "altr,sysmgr-syscon");
1040         } else {
1041                 struct device_node *sysmgr_np;
1042                 struct resource res;
1043                 uintptr_t base;
1044
1045                 sysmgr_np = of_parse_phandle(np_eccmgr,
1046                                              "altr,sysmgr-syscon", 0);
1047                 if (!sysmgr_np) {
1048                         edac_printk(KERN_ERR, EDAC_DEVICE,
1049                                     "Unable to find altr,sysmgr-syscon\n");
1050                         return -ENODEV;
1051                 }
1052
1053                 if (of_address_to_resource(sysmgr_np, 0, &res)) {
1054                         of_node_put(sysmgr_np);
1055                         return -ENOMEM;
1056                 }
1057
1058                 /* Need physical address for SMCC call */
1059                 base = res.start;
1060
1061                 ecc_mgr_map = regmap_init(NULL, NULL, (void *)base,
1062                                           &s10_sdram_regmap_cfg);
1063                 of_node_put(sysmgr_np);
1064         }
1065         of_node_put(np_eccmgr);
1066         if (IS_ERR(ecc_mgr_map)) {
1067                 edac_printk(KERN_ERR, EDAC_DEVICE,
1068                             "Unable to get syscon altr,sysmgr-syscon\n");
1069                 return -ENODEV;
1070         }
1071
1072         /* Map the ECC Block */
1073         ecc_block_base = of_iomap(np, 0);
1074         if (!ecc_block_base) {
1075                 edac_printk(KERN_ERR, EDAC_DEVICE,
1076                             "Unable to map %s ECC block\n", ecc_name);
1077                 return -ENODEV;
1078         }
1079
1080         /* Disable ECC */
1081         regmap_write(ecc_mgr_map, A10_SYSMGR_ECC_INTMASK_SET_OFST, irq_mask);
1082         writel(ALTR_A10_ECC_SERRINTEN,
1083                (ecc_block_base + ALTR_A10_ECC_ERRINTENR_OFST));
1084         ecc_clear_bits(ecc_ctrl_en_mask,
1085                        (ecc_block_base + ALTR_A10_ECC_CTRL_OFST));
1086         /* Ensure all writes complete */
1087         wmb();
1088         /* Use HW initialization block to initialize memory for ECC */
1089         ret = altr_init_memory_port(ecc_block_base, 0);
1090         if (ret) {
1091                 edac_printk(KERN_ERR, EDAC_DEVICE,
1092                             "ECC: cannot init %s PORTA memory\n", ecc_name);
1093                 goto out;
1094         }
1095
1096         if (dual_port) {
1097                 ret = altr_init_memory_port(ecc_block_base, 1);
1098                 if (ret) {
1099                         edac_printk(KERN_ERR, EDAC_DEVICE,
1100                                     "ECC: cannot init %s PORTB memory\n",
1101                                     ecc_name);
1102                         goto out;
1103                 }
1104         }
1105
1106         /* Interrupt mode set to every SBERR */
1107         regmap_write(ecc_mgr_map, ALTR_A10_ECC_INTMODE_OFST,
1108                      ALTR_A10_ECC_INTMODE);
1109         /* Enable ECC */
1110         ecc_set_bits(ecc_ctrl_en_mask, (ecc_block_base +
1111                                         ALTR_A10_ECC_CTRL_OFST));
1112         writel(ALTR_A10_ECC_SERRINTEN,
1113                (ecc_block_base + ALTR_A10_ECC_ERRINTENS_OFST));
1114         regmap_write(ecc_mgr_map, A10_SYSMGR_ECC_INTMASK_CLR_OFST, irq_mask);
1115         /* Ensure all writes complete */
1116         wmb();
1117 out:
1118         iounmap(ecc_block_base);
1119         return ret;
1120 }
1121
1122 static int validate_parent_available(struct device_node *np);
1123 static const struct of_device_id altr_edac_a10_device_of_match[];
1124 static int __init __maybe_unused altr_init_a10_ecc_device_type(char *compat)
1125 {
1126         int irq;
1127         struct device_node *child, *np;
1128
1129         if (!socfpga_is_a10() && !socfpga_is_s10())
1130                 return -ENODEV;
1131
1132         np = of_find_compatible_node(NULL, NULL,
1133                                      "altr,socfpga-a10-ecc-manager");
1134         if (!np) {
1135                 edac_printk(KERN_ERR, EDAC_DEVICE, "ECC Manager not found\n");
1136                 return -ENODEV;
1137         }
1138
1139         for_each_child_of_node(np, child) {
1140                 const struct of_device_id *pdev_id;
1141                 const struct edac_device_prv_data *prv;
1142
1143                 if (!of_device_is_available(child))
1144                         continue;
1145                 if (!of_device_is_compatible(child, compat))
1146                         continue;
1147
1148                 if (validate_parent_available(child))
1149                         continue;
1150
1151                 irq = a10_get_irq_mask(child);
1152                 if (irq < 0)
1153                         continue;
1154
1155                 /* Get matching node and check for valid result */
1156                 pdev_id = of_match_node(altr_edac_a10_device_of_match, child);
1157                 if (IS_ERR_OR_NULL(pdev_id))
1158                         continue;
1159
1160                 /* Validate private data pointer before dereferencing */
1161                 prv = pdev_id->data;
1162                 if (!prv)
1163                         continue;
1164
1165                 altr_init_a10_ecc_block(child, BIT(irq),
1166                                         prv->ecc_enable_mask, 0);
1167         }
1168
1169         of_node_put(np);
1170         return 0;
1171 }
1172
1173 /*********************** OCRAM EDAC Device Functions *********************/
1174
1175 #ifdef CONFIG_EDAC_ALTERA_OCRAM
1176
1177 static void *ocram_alloc_mem(size_t size, void **other)
1178 {
1179         struct device_node *np;
1180         struct gen_pool *gp;
1181         void *sram_addr;
1182
1183         np = of_find_compatible_node(NULL, NULL, "altr,socfpga-ocram-ecc");
1184         if (!np)
1185                 return NULL;
1186
1187         gp = of_gen_pool_get(np, "iram", 0);
1188         of_node_put(np);
1189         if (!gp)
1190                 return NULL;
1191
1192         sram_addr = (void *)gen_pool_alloc(gp, size);
1193         if (!sram_addr)
1194                 return NULL;
1195
1196         memset(sram_addr, 0, size);
1197         /* Ensure data is written out */
1198         wmb();
1199
1200         /* Remember this handle for freeing  later */
1201         *other = gp;
1202
1203         return sram_addr;
1204 }
1205
1206 static void ocram_free_mem(void *p, size_t size, void *other)
1207 {
1208         gen_pool_free((struct gen_pool *)other, (unsigned long)p, size);
1209 }
1210
1211 static const struct edac_device_prv_data ocramecc_data = {
1212         .setup = altr_check_ecc_deps,
1213         .ce_clear_mask = (ALTR_OCR_ECC_EN | ALTR_OCR_ECC_SERR),
1214         .ue_clear_mask = (ALTR_OCR_ECC_EN | ALTR_OCR_ECC_DERR),
1215         .alloc_mem = ocram_alloc_mem,
1216         .free_mem = ocram_free_mem,
1217         .ecc_enable_mask = ALTR_OCR_ECC_EN,
1218         .ecc_en_ofst = ALTR_OCR_ECC_REG_OFFSET,
1219         .ce_set_mask = (ALTR_OCR_ECC_EN | ALTR_OCR_ECC_INJS),
1220         .ue_set_mask = (ALTR_OCR_ECC_EN | ALTR_OCR_ECC_INJD),
1221         .set_err_ofst = ALTR_OCR_ECC_REG_OFFSET,
1222         .trig_alloc_sz = ALTR_TRIG_OCRAM_BYTE_SIZE,
1223         .inject_fops = &altr_edac_device_inject_fops,
1224 };
1225
1226 static const struct edac_device_prv_data a10_ocramecc_data = {
1227         .setup = altr_check_ecc_deps,
1228         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1229         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1230         .irq_status_mask = A10_SYSMGR_ECC_INTSTAT_OCRAM,
1231         .ecc_enable_mask = ALTR_A10_OCRAM_ECC_EN_CTL,
1232         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1233         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1234         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1235         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1236         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1237         .inject_fops = &altr_edac_a10_device_inject_fops,
1238         /*
1239          * OCRAM panic on uncorrectable error because sleep/resume
1240          * functions and FPGA contents are stored in OCRAM. Prefer
1241          * a kernel panic over executing/loading corrupted data.
1242          */
1243         .panic = true,
1244 };
1245
1246 #endif  /* CONFIG_EDAC_ALTERA_OCRAM */
1247
1248 /********************* L2 Cache EDAC Device Functions ********************/
1249
1250 #ifdef CONFIG_EDAC_ALTERA_L2C
1251
1252 static void *l2_alloc_mem(size_t size, void **other)
1253 {
1254         struct device *dev = *other;
1255         void *ptemp = devm_kzalloc(dev, size, GFP_KERNEL);
1256
1257         if (!ptemp)
1258                 return NULL;
1259
1260         /* Make sure everything is written out */
1261         wmb();
1262
1263         /*
1264          * Clean all cache levels up to LoC (includes L2)
1265          * This ensures the corrupted data is written into
1266          * L2 cache for readback test (which causes ECC error).
1267          */
1268         flush_cache_all();
1269
1270         return ptemp;
1271 }
1272
1273 static void l2_free_mem(void *p, size_t size, void *other)
1274 {
1275         struct device *dev = other;
1276
1277         if (dev && p)
1278                 devm_kfree(dev, p);
1279 }
1280
1281 /*
1282  * altr_l2_check_deps()
1283  *      Test for L2 cache ECC dependencies upon entry because
1284  *      platform specific startup should have initialized the L2
1285  *      memory and enabled the ECC.
1286  *      Bail if ECC is not enabled.
1287  *      Note that L2 Cache Enable is forced at build time.
1288  */
1289 static int altr_l2_check_deps(struct altr_edac_device_dev *device)
1290 {
1291         void __iomem *base = device->base;
1292         const struct edac_device_prv_data *prv = device->data;
1293
1294         if ((readl(base) & prv->ecc_enable_mask) ==
1295              prv->ecc_enable_mask)
1296                 return 0;
1297
1298         edac_printk(KERN_ERR, EDAC_DEVICE,
1299                     "L2: No ECC present, or ECC disabled\n");
1300         return -ENODEV;
1301 }
1302
1303 static irqreturn_t altr_edac_a10_l2_irq(int irq, void *dev_id)
1304 {
1305         struct altr_edac_device_dev *dci = dev_id;
1306
1307         if (irq == dci->sb_irq) {
1308                 regmap_write(dci->edac->ecc_mgr_map,
1309                              A10_SYSGMR_MPU_CLEAR_L2_ECC_OFST,
1310                              A10_SYSGMR_MPU_CLEAR_L2_ECC_SB);
1311                 edac_device_handle_ce(dci->edac_dev, 0, 0, dci->edac_dev_name);
1312
1313                 return IRQ_HANDLED;
1314         } else if (irq == dci->db_irq) {
1315                 regmap_write(dci->edac->ecc_mgr_map,
1316                              A10_SYSGMR_MPU_CLEAR_L2_ECC_OFST,
1317                              A10_SYSGMR_MPU_CLEAR_L2_ECC_MB);
1318                 edac_device_handle_ue(dci->edac_dev, 0, 0, dci->edac_dev_name);
1319                 panic("\nEDAC:ECC_DEVICE[Uncorrectable errors]\n");
1320
1321                 return IRQ_HANDLED;
1322         }
1323
1324         WARN_ON(1);
1325
1326         return IRQ_NONE;
1327 }
1328
1329 static const struct edac_device_prv_data l2ecc_data = {
1330         .setup = altr_l2_check_deps,
1331         .ce_clear_mask = 0,
1332         .ue_clear_mask = 0,
1333         .alloc_mem = l2_alloc_mem,
1334         .free_mem = l2_free_mem,
1335         .ecc_enable_mask = ALTR_L2_ECC_EN,
1336         .ce_set_mask = (ALTR_L2_ECC_EN | ALTR_L2_ECC_INJS),
1337         .ue_set_mask = (ALTR_L2_ECC_EN | ALTR_L2_ECC_INJD),
1338         .set_err_ofst = ALTR_L2_ECC_REG_OFFSET,
1339         .trig_alloc_sz = ALTR_TRIG_L2C_BYTE_SIZE,
1340         .inject_fops = &altr_edac_device_inject_fops,
1341 };
1342
1343 static const struct edac_device_prv_data a10_l2ecc_data = {
1344         .setup = altr_l2_check_deps,
1345         .ce_clear_mask = ALTR_A10_L2_ECC_SERR_CLR,
1346         .ue_clear_mask = ALTR_A10_L2_ECC_MERR_CLR,
1347         .irq_status_mask = A10_SYSMGR_ECC_INTSTAT_L2,
1348         .alloc_mem = l2_alloc_mem,
1349         .free_mem = l2_free_mem,
1350         .ecc_enable_mask = ALTR_A10_L2_ECC_EN_CTL,
1351         .ce_set_mask = ALTR_A10_L2_ECC_CE_INJ_MASK,
1352         .ue_set_mask = ALTR_A10_L2_ECC_UE_INJ_MASK,
1353         .set_err_ofst = ALTR_A10_L2_ECC_INJ_OFST,
1354         .ecc_irq_handler = altr_edac_a10_l2_irq,
1355         .trig_alloc_sz = ALTR_TRIG_L2C_BYTE_SIZE,
1356         .inject_fops = &altr_edac_device_inject_fops,
1357 };
1358
1359 #endif  /* CONFIG_EDAC_ALTERA_L2C */
1360
1361 /********************* Ethernet Device Functions ********************/
1362
1363 #ifdef CONFIG_EDAC_ALTERA_ETHERNET
1364
1365 static int __init socfpga_init_ethernet_ecc(struct altr_edac_device_dev *dev)
1366 {
1367         int ret;
1368
1369         ret = altr_init_a10_ecc_device_type("altr,socfpga-eth-mac-ecc");
1370         if (ret)
1371                 return ret;
1372
1373         return altr_check_ecc_deps(dev);
1374 }
1375
1376 static const struct edac_device_prv_data a10_enetecc_data = {
1377         .setup = socfpga_init_ethernet_ecc,
1378         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1379         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1380         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1381         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1382         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1383         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1384         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1385         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1386         .inject_fops = &altr_edac_a10_device_inject2_fops,
1387 };
1388
1389 #endif  /* CONFIG_EDAC_ALTERA_ETHERNET */
1390
1391 /********************** NAND Device Functions **********************/
1392
1393 #ifdef CONFIG_EDAC_ALTERA_NAND
1394
1395 static int __init socfpga_init_nand_ecc(struct altr_edac_device_dev *device)
1396 {
1397         int ret;
1398
1399         ret = altr_init_a10_ecc_device_type("altr,socfpga-nand-ecc");
1400         if (ret)
1401                 return ret;
1402
1403         return altr_check_ecc_deps(device);
1404 }
1405
1406 static const struct edac_device_prv_data a10_nandecc_data = {
1407         .setup = socfpga_init_nand_ecc,
1408         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1409         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1410         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1411         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1412         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1413         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1414         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1415         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1416         .inject_fops = &altr_edac_a10_device_inject_fops,
1417 };
1418
1419 #endif  /* CONFIG_EDAC_ALTERA_NAND */
1420
1421 /********************** DMA Device Functions **********************/
1422
1423 #ifdef CONFIG_EDAC_ALTERA_DMA
1424
1425 static int __init socfpga_init_dma_ecc(struct altr_edac_device_dev *device)
1426 {
1427         int ret;
1428
1429         ret = altr_init_a10_ecc_device_type("altr,socfpga-dma-ecc");
1430         if (ret)
1431                 return ret;
1432
1433         return altr_check_ecc_deps(device);
1434 }
1435
1436 static const struct edac_device_prv_data a10_dmaecc_data = {
1437         .setup = socfpga_init_dma_ecc,
1438         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1439         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1440         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1441         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1442         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1443         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1444         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1445         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1446         .inject_fops = &altr_edac_a10_device_inject_fops,
1447 };
1448
1449 #endif  /* CONFIG_EDAC_ALTERA_DMA */
1450
1451 /********************** USB Device Functions **********************/
1452
1453 #ifdef CONFIG_EDAC_ALTERA_USB
1454
1455 static int __init socfpga_init_usb_ecc(struct altr_edac_device_dev *device)
1456 {
1457         int ret;
1458
1459         ret = altr_init_a10_ecc_device_type("altr,socfpga-usb-ecc");
1460         if (ret)
1461                 return ret;
1462
1463         return altr_check_ecc_deps(device);
1464 }
1465
1466 static const struct edac_device_prv_data a10_usbecc_data = {
1467         .setup = socfpga_init_usb_ecc,
1468         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1469         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1470         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1471         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1472         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1473         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1474         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1475         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1476         .inject_fops = &altr_edac_a10_device_inject2_fops,
1477 };
1478
1479 #endif  /* CONFIG_EDAC_ALTERA_USB */
1480
1481 /********************** QSPI Device Functions **********************/
1482
1483 #ifdef CONFIG_EDAC_ALTERA_QSPI
1484
1485 static int __init socfpga_init_qspi_ecc(struct altr_edac_device_dev *device)
1486 {
1487         int ret;
1488
1489         ret = altr_init_a10_ecc_device_type("altr,socfpga-qspi-ecc");
1490         if (ret)
1491                 return ret;
1492
1493         return altr_check_ecc_deps(device);
1494 }
1495
1496 static const struct edac_device_prv_data a10_qspiecc_data = {
1497         .setup = socfpga_init_qspi_ecc,
1498         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1499         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1500         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1501         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1502         .ce_set_mask = ALTR_A10_ECC_TSERRA,
1503         .ue_set_mask = ALTR_A10_ECC_TDERRA,
1504         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1505         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1506         .inject_fops = &altr_edac_a10_device_inject_fops,
1507 };
1508
1509 #endif  /* CONFIG_EDAC_ALTERA_QSPI */
1510
1511 /********************* SDMMC Device Functions **********************/
1512
1513 #ifdef CONFIG_EDAC_ALTERA_SDMMC
1514
1515 static const struct edac_device_prv_data a10_sdmmceccb_data;
1516 static int altr_portb_setup(struct altr_edac_device_dev *device)
1517 {
1518         struct edac_device_ctl_info *dci;
1519         struct altr_edac_device_dev *altdev;
1520         char *ecc_name = "sdmmcb-ecc";
1521         int edac_idx, rc;
1522         struct device_node *np;
1523         const struct edac_device_prv_data *prv = &a10_sdmmceccb_data;
1524
1525         rc = altr_check_ecc_deps(device);
1526         if (rc)
1527                 return rc;
1528
1529         np = of_find_compatible_node(NULL, NULL, "altr,socfpga-sdmmc-ecc");
1530         if (!np) {
1531                 edac_printk(KERN_WARNING, EDAC_DEVICE, "SDMMC node not found\n");
1532                 return -ENODEV;
1533         }
1534
1535         /* Create the PortB EDAC device */
1536         edac_idx = edac_device_alloc_index();
1537         dci = edac_device_alloc_ctl_info(sizeof(*altdev), ecc_name, 1,
1538                                          ecc_name, 1, 0, NULL, 0, edac_idx);
1539         if (!dci) {
1540                 edac_printk(KERN_ERR, EDAC_DEVICE,
1541                             "%s: Unable to allocate PortB EDAC device\n",
1542                             ecc_name);
1543                 return -ENOMEM;
1544         }
1545
1546         /* Initialize the PortB EDAC device structure from PortA structure */
1547         altdev = dci->pvt_info;
1548         *altdev = *device;
1549
1550         if (!devres_open_group(&altdev->ddev, altr_portb_setup, GFP_KERNEL))
1551                 return -ENOMEM;
1552
1553         /* Update PortB specific values */
1554         altdev->edac_dev_name = ecc_name;
1555         altdev->edac_idx = edac_idx;
1556         altdev->edac_dev = dci;
1557         altdev->data = prv;
1558         dci->dev = &altdev->ddev;
1559         dci->ctl_name = "Altera ECC Manager";
1560         dci->mod_name = ecc_name;
1561         dci->dev_name = ecc_name;
1562
1563         /* Update the IRQs for PortB */
1564         altdev->sb_irq = irq_of_parse_and_map(np, 2);
1565         if (!altdev->sb_irq) {
1566                 edac_printk(KERN_ERR, EDAC_DEVICE, "Error PortB SBIRQ alloc\n");
1567                 rc = -ENODEV;
1568                 goto err_release_group_1;
1569         }
1570         rc = devm_request_irq(&altdev->ddev, altdev->sb_irq,
1571                               prv->ecc_irq_handler,
1572                               IRQF_ONESHOT | IRQF_TRIGGER_HIGH,
1573                               ecc_name, altdev);
1574         if (rc) {
1575                 edac_printk(KERN_ERR, EDAC_DEVICE, "PortB SBERR IRQ error\n");
1576                 goto err_release_group_1;
1577         }
1578
1579         altdev->db_irq = irq_of_parse_and_map(np, 3);
1580         if (!altdev->db_irq) {
1581                 edac_printk(KERN_ERR, EDAC_DEVICE, "Error PortB DBIRQ alloc\n");
1582                 rc = -ENODEV;
1583                 goto err_release_group_1;
1584         }
1585         rc = devm_request_irq(&altdev->ddev, altdev->db_irq,
1586                               prv->ecc_irq_handler,
1587                               IRQF_ONESHOT | IRQF_TRIGGER_HIGH,
1588                               ecc_name, altdev);
1589         if (rc) {
1590                 edac_printk(KERN_ERR, EDAC_DEVICE, "PortB DBERR IRQ error\n");
1591                 goto err_release_group_1;
1592         }
1593
1594         rc = edac_device_add_device(dci);
1595         if (rc) {
1596                 edac_printk(KERN_ERR, EDAC_DEVICE,
1597                             "edac_device_add_device portB failed\n");
1598                 rc = -ENOMEM;
1599                 goto err_release_group_1;
1600         }
1601         altr_create_edacdev_dbgfs(dci, prv);
1602
1603         list_add(&altdev->next, &altdev->edac->a10_ecc_devices);
1604
1605         devres_remove_group(&altdev->ddev, altr_portb_setup);
1606
1607         return 0;
1608
1609 err_release_group_1:
1610         edac_device_free_ctl_info(dci);
1611         devres_release_group(&altdev->ddev, altr_portb_setup);
1612         edac_printk(KERN_ERR, EDAC_DEVICE,
1613                     "%s:Error setting up EDAC device: %d\n", ecc_name, rc);
1614         return rc;
1615 }
1616
1617 static int __init socfpga_init_sdmmc_ecc(struct altr_edac_device_dev *device)
1618 {
1619         int rc = -ENODEV;
1620         struct device_node *child;
1621
1622         child = of_find_compatible_node(NULL, NULL, "altr,socfpga-sdmmc-ecc");
1623         if (!child)
1624                 return -ENODEV;
1625
1626         if (!of_device_is_available(child))
1627                 goto exit;
1628
1629         if (validate_parent_available(child))
1630                 goto exit;
1631
1632         /* Init portB */
1633         rc = altr_init_a10_ecc_block(child, ALTR_A10_SDMMC_IRQ_MASK,
1634                                      a10_sdmmceccb_data.ecc_enable_mask, 1);
1635         if (rc)
1636                 goto exit;
1637
1638         /* Setup portB */
1639         return altr_portb_setup(device);
1640
1641 exit:
1642         of_node_put(child);
1643         return rc;
1644 }
1645
1646 static irqreturn_t altr_edac_a10_ecc_irq_portb(int irq, void *dev_id)
1647 {
1648         struct altr_edac_device_dev *ad = dev_id;
1649         void __iomem  *base = ad->base;
1650         const struct edac_device_prv_data *priv = ad->data;
1651
1652         if (irq == ad->sb_irq) {
1653                 writel(priv->ce_clear_mask,
1654                        base + ALTR_A10_ECC_INTSTAT_OFST);
1655                 edac_device_handle_ce(ad->edac_dev, 0, 0, ad->edac_dev_name);
1656                 return IRQ_HANDLED;
1657         } else if (irq == ad->db_irq) {
1658                 writel(priv->ue_clear_mask,
1659                        base + ALTR_A10_ECC_INTSTAT_OFST);
1660                 edac_device_handle_ue(ad->edac_dev, 0, 0, ad->edac_dev_name);
1661                 return IRQ_HANDLED;
1662         }
1663
1664         WARN_ONCE(1, "Unhandled IRQ%d on Port B.", irq);
1665
1666         return IRQ_NONE;
1667 }
1668
1669 static const struct edac_device_prv_data a10_sdmmcecca_data = {
1670         .setup = socfpga_init_sdmmc_ecc,
1671         .ce_clear_mask = ALTR_A10_ECC_SERRPENA,
1672         .ue_clear_mask = ALTR_A10_ECC_DERRPENA,
1673         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1674         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1675         .ce_set_mask = ALTR_A10_ECC_SERRPENA,
1676         .ue_set_mask = ALTR_A10_ECC_DERRPENA,
1677         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1678         .ecc_irq_handler = altr_edac_a10_ecc_irq,
1679         .inject_fops = &altr_edac_a10_device_inject_fops,
1680 };
1681
1682 static const struct edac_device_prv_data a10_sdmmceccb_data = {
1683         .setup = socfpga_init_sdmmc_ecc,
1684         .ce_clear_mask = ALTR_A10_ECC_SERRPENB,
1685         .ue_clear_mask = ALTR_A10_ECC_DERRPENB,
1686         .ecc_enable_mask = ALTR_A10_COMMON_ECC_EN_CTL,
1687         .ecc_en_ofst = ALTR_A10_ECC_CTRL_OFST,
1688         .ce_set_mask = ALTR_A10_ECC_TSERRB,
1689         .ue_set_mask = ALTR_A10_ECC_TDERRB,
1690         .set_err_ofst = ALTR_A10_ECC_INTTEST_OFST,
1691         .ecc_irq_handler = altr_edac_a10_ecc_irq_portb,
1692         .inject_fops = &altr_edac_a10_device_inject_fops,
1693 };
1694
1695 #endif  /* CONFIG_EDAC_ALTERA_SDMMC */
1696
1697 /********************* Arria10 EDAC Device Functions *************************/
1698 static const struct of_device_id altr_edac_a10_device_of_match[] = {
1699 #ifdef CONFIG_EDAC_ALTERA_L2C
1700         { .compatible = "altr,socfpga-a10-l2-ecc", .data = &a10_l2ecc_data },
1701 #endif
1702 #ifdef CONFIG_EDAC_ALTERA_OCRAM
1703         { .compatible = "altr,socfpga-a10-ocram-ecc",
1704           .data = &a10_ocramecc_data },
1705 #endif
1706 #ifdef CONFIG_EDAC_ALTERA_ETHERNET
1707         { .compatible = "altr,socfpga-eth-mac-ecc",
1708           .data = &a10_enetecc_data },
1709 #endif
1710 #ifdef CONFIG_EDAC_ALTERA_NAND
1711         { .compatible = "altr,socfpga-nand-ecc", .data = &a10_nandecc_data },
1712 #endif
1713 #ifdef CONFIG_EDAC_ALTERA_DMA
1714         { .compatible = "altr,socfpga-dma-ecc", .data = &a10_dmaecc_data },
1715 #endif
1716 #ifdef CONFIG_EDAC_ALTERA_USB
1717         { .compatible = "altr,socfpga-usb-ecc", .data = &a10_usbecc_data },
1718 #endif
1719 #ifdef CONFIG_EDAC_ALTERA_QSPI
1720         { .compatible = "altr,socfpga-qspi-ecc", .data = &a10_qspiecc_data },
1721 #endif
1722 #ifdef CONFIG_EDAC_ALTERA_SDMMC
1723         { .compatible = "altr,socfpga-sdmmc-ecc", .data = &a10_sdmmcecca_data },
1724 #endif
1725         {},
1726 };
1727 MODULE_DEVICE_TABLE(of, altr_edac_a10_device_of_match);
1728
1729 /*
1730  * The Arria10 EDAC Device Functions differ from the Cyclone5/Arria5
1731  * because 2 IRQs are shared among the all ECC peripherals. The ECC
1732  * manager manages the IRQs and the children.
1733  * Based on xgene_edac.c peripheral code.
1734  */
1735
1736 static ssize_t altr_edac_a10_device_trig(struct file *file,
1737                                          const char __user *user_buf,
1738                                          size_t count, loff_t *ppos)
1739 {
1740         struct edac_device_ctl_info *edac_dci = file->private_data;
1741         struct altr_edac_device_dev *drvdata = edac_dci->pvt_info;
1742         const struct edac_device_prv_data *priv = drvdata->data;
1743         void __iomem *set_addr = (drvdata->base + priv->set_err_ofst);
1744         unsigned long flags;
1745         u8 trig_type;
1746
1747         if (!user_buf || get_user(trig_type, user_buf))
1748                 return -EFAULT;
1749
1750         local_irq_save(flags);
1751         if (trig_type == ALTR_UE_TRIGGER_CHAR)
1752                 writel(priv->ue_set_mask, set_addr);
1753         else
1754                 writel(priv->ce_set_mask, set_addr);
1755
1756         /* Ensure the interrupt test bits are set */
1757         wmb();
1758         local_irq_restore(flags);
1759
1760         return count;
1761 }
1762
1763 /*
1764  * The Stratix10 EDAC Error Injection Functions differ from Arria10
1765  * slightly. A few Arria10 peripherals can use this injection function.
1766  * Inject the error into the memory and then readback to trigger the IRQ.
1767  */
1768 static ssize_t altr_edac_a10_device_trig2(struct file *file,
1769                                           const char __user *user_buf,
1770                                           size_t count, loff_t *ppos)
1771 {
1772         struct edac_device_ctl_info *edac_dci = file->private_data;
1773         struct altr_edac_device_dev *drvdata = edac_dci->pvt_info;
1774         const struct edac_device_prv_data *priv = drvdata->data;
1775         void __iomem *set_addr = (drvdata->base + priv->set_err_ofst);
1776         unsigned long flags;
1777         u8 trig_type;
1778
1779         if (!user_buf || get_user(trig_type, user_buf))
1780                 return -EFAULT;
1781
1782         local_irq_save(flags);
1783         if (trig_type == ALTR_UE_TRIGGER_CHAR) {
1784                 writel(priv->ue_set_mask, set_addr);
1785         } else {
1786                 /* Setup read/write of 4 bytes */
1787                 writel(ECC_WORD_WRITE, drvdata->base + ECC_BLK_DBYTECTRL_OFST);
1788                 /* Setup Address to 0 */
1789                 writel(0, drvdata->base + ECC_BLK_ADDRESS_OFST);
1790                 /* Setup accctrl to read & ecc & data override */
1791                 writel(ECC_READ_EDOVR, drvdata->base + ECC_BLK_ACCCTRL_OFST);
1792                 /* Kick it. */
1793                 writel(ECC_XACT_KICK, drvdata->base + ECC_BLK_STARTACC_OFST);
1794                 /* Setup write for single bit change */
1795                 writel(readl(drvdata->base + ECC_BLK_RDATA0_OFST) ^ 0x1,
1796                        drvdata->base + ECC_BLK_WDATA0_OFST);
1797                 writel(readl(drvdata->base + ECC_BLK_RDATA1_OFST),
1798                        drvdata->base + ECC_BLK_WDATA1_OFST);
1799                 writel(readl(drvdata->base + ECC_BLK_RDATA2_OFST),
1800                        drvdata->base + ECC_BLK_WDATA2_OFST);
1801                 writel(readl(drvdata->base + ECC_BLK_RDATA3_OFST),
1802                        drvdata->base + ECC_BLK_WDATA3_OFST);
1803
1804                 /* Copy Read ECC to Write ECC */
1805                 writel(readl(drvdata->base + ECC_BLK_RECC0_OFST),
1806                        drvdata->base + ECC_BLK_WECC0_OFST);
1807                 writel(readl(drvdata->base + ECC_BLK_RECC1_OFST),
1808                        drvdata->base + ECC_BLK_WECC1_OFST);
1809                 /* Setup accctrl to write & ecc override & data override */
1810                 writel(ECC_WRITE_EDOVR, drvdata->base + ECC_BLK_ACCCTRL_OFST);
1811                 /* Kick it. */
1812                 writel(ECC_XACT_KICK, drvdata->base + ECC_BLK_STARTACC_OFST);
1813                 /* Setup accctrl to read & ecc overwrite & data overwrite */
1814                 writel(ECC_READ_EDOVR, drvdata->base + ECC_BLK_ACCCTRL_OFST);
1815                 /* Kick it. */
1816                 writel(ECC_XACT_KICK, drvdata->base + ECC_BLK_STARTACC_OFST);
1817         }
1818
1819         /* Ensure the interrupt test bits are set */
1820         wmb();
1821         local_irq_restore(flags);
1822
1823         return count;
1824 }
1825
1826 static void altr_edac_a10_irq_handler(struct irq_desc *desc)
1827 {
1828         int dberr, bit, sm_offset, irq_status;
1829         struct altr_arria10_edac *edac = irq_desc_get_handler_data(desc);
1830         struct irq_chip *chip = irq_desc_get_chip(desc);
1831         int irq = irq_desc_get_irq(desc);
1832
1833         dberr = (irq == edac->db_irq) ? 1 : 0;
1834         sm_offset = dberr ? A10_SYSMGR_ECC_INTSTAT_DERR_OFST :
1835                             A10_SYSMGR_ECC_INTSTAT_SERR_OFST;
1836
1837         chained_irq_enter(chip, desc);
1838
1839         regmap_read(edac->ecc_mgr_map, sm_offset, &irq_status);
1840
1841         for_each_set_bit(bit, (unsigned long *)&irq_status, 32) {
1842                 irq = irq_linear_revmap(edac->domain, dberr * 32 + bit);
1843                 if (irq)
1844                         generic_handle_irq(irq);
1845         }
1846
1847         chained_irq_exit(chip, desc);
1848 }
1849
1850 static int validate_parent_available(struct device_node *np)
1851 {
1852         struct device_node *parent;
1853         int ret = 0;
1854
1855         /* Ensure parent device is enabled if parent node exists */
1856         parent = of_parse_phandle(np, "altr,ecc-parent", 0);
1857         if (parent && !of_device_is_available(parent))
1858                 ret = -ENODEV;
1859
1860         of_node_put(parent);
1861         return ret;
1862 }
1863
1864 static int altr_edac_a10_device_add(struct altr_arria10_edac *edac,
1865                                     struct device_node *np)
1866 {
1867         struct edac_device_ctl_info *dci;
1868         struct altr_edac_device_dev *altdev;
1869         char *ecc_name = (char *)np->name;
1870         struct resource res;
1871         int edac_idx;
1872         int rc = 0;
1873         const struct edac_device_prv_data *prv;
1874         /* Get matching node and check for valid result */
1875         const struct of_device_id *pdev_id =
1876                 of_match_node(altr_edac_a10_device_of_match, np);
1877         if (IS_ERR_OR_NULL(pdev_id))
1878                 return -ENODEV;
1879
1880         /* Get driver specific data for this EDAC device */
1881         prv = pdev_id->data;
1882         if (IS_ERR_OR_NULL(prv))
1883                 return -ENODEV;
1884
1885         if (validate_parent_available(np))
1886                 return -ENODEV;
1887
1888         if (!devres_open_group(edac->dev, altr_edac_a10_device_add, GFP_KERNEL))
1889                 return -ENOMEM;
1890
1891         rc = of_address_to_resource(np, 0, &res);
1892         if (rc < 0) {
1893                 edac_printk(KERN_ERR, EDAC_DEVICE,
1894                             "%s: no resource address\n", ecc_name);
1895                 goto err_release_group;
1896         }
1897
1898         edac_idx = edac_device_alloc_index();
1899         dci = edac_device_alloc_ctl_info(sizeof(*altdev), ecc_name,
1900                                          1, ecc_name, 1, 0, NULL, 0,
1901                                          edac_idx);
1902
1903         if (!dci) {
1904                 edac_printk(KERN_ERR, EDAC_DEVICE,
1905                             "%s: Unable to allocate EDAC device\n", ecc_name);
1906                 rc = -ENOMEM;
1907                 goto err_release_group;
1908         }
1909
1910         altdev = dci->pvt_info;
1911         dci->dev = edac->dev;
1912         altdev->edac_dev_name = ecc_name;
1913         altdev->edac_idx = edac_idx;
1914         altdev->edac = edac;
1915         altdev->edac_dev = dci;
1916         altdev->data = prv;
1917         altdev->ddev = *edac->dev;
1918         dci->dev = &altdev->ddev;
1919         dci->ctl_name = "Altera ECC Manager";
1920         dci->mod_name = ecc_name;
1921         dci->dev_name = ecc_name;
1922
1923         altdev->base = devm_ioremap_resource(edac->dev, &res);
1924         if (IS_ERR(altdev->base)) {
1925                 rc = PTR_ERR(altdev->base);
1926                 goto err_release_group1;
1927         }
1928
1929         /* Check specific dependencies for the module */
1930         if (altdev->data->setup) {
1931                 rc = altdev->data->setup(altdev);
1932                 if (rc)
1933                         goto err_release_group1;
1934         }
1935
1936         altdev->sb_irq = irq_of_parse_and_map(np, 0);
1937         if (!altdev->sb_irq) {
1938                 edac_printk(KERN_ERR, EDAC_DEVICE, "Error allocating SBIRQ\n");
1939                 rc = -ENODEV;
1940                 goto err_release_group1;
1941         }
1942         rc = devm_request_irq(edac->dev, altdev->sb_irq, prv->ecc_irq_handler,
1943                               IRQF_ONESHOT | IRQF_TRIGGER_HIGH,
1944                               ecc_name, altdev);
1945         if (rc) {
1946                 edac_printk(KERN_ERR, EDAC_DEVICE, "No SBERR IRQ resource\n");
1947                 goto err_release_group1;
1948         }
1949
1950 #ifdef CONFIG_ARCH_STRATIX10
1951         /* Use IRQ to determine SError origin instead of assigning IRQ */
1952         rc = of_property_read_u32_index(np, "interrupts", 0, &altdev->db_irq);
1953         if (rc) {
1954                 edac_printk(KERN_ERR, EDAC_DEVICE,
1955                             "Unable to parse DB IRQ index\n");
1956                 goto err_release_group1;
1957         }
1958 #else
1959         altdev->db_irq = irq_of_parse_and_map(np, 1);
1960         if (!altdev->db_irq) {
1961                 edac_printk(KERN_ERR, EDAC_DEVICE, "Error allocating DBIRQ\n");
1962                 rc = -ENODEV;
1963                 goto err_release_group1;
1964         }
1965         rc = devm_request_irq(edac->dev, altdev->db_irq, prv->ecc_irq_handler,
1966                               IRQF_ONESHOT | IRQF_TRIGGER_HIGH,
1967                               ecc_name, altdev);
1968         if (rc) {
1969                 edac_printk(KERN_ERR, EDAC_DEVICE, "No DBERR IRQ resource\n");
1970                 goto err_release_group1;
1971         }
1972 #endif
1973
1974         rc = edac_device_add_device(dci);
1975         if (rc) {
1976                 dev_err(edac->dev, "edac_device_add_device failed\n");
1977                 rc = -ENOMEM;
1978                 goto err_release_group1;
1979         }
1980
1981         altr_create_edacdev_dbgfs(dci, prv);
1982
1983         list_add(&altdev->next, &edac->a10_ecc_devices);
1984
1985         devres_remove_group(edac->dev, altr_edac_a10_device_add);
1986
1987         return 0;
1988
1989 err_release_group1:
1990         edac_device_free_ctl_info(dci);
1991 err_release_group:
1992         devres_release_group(edac->dev, NULL);
1993         edac_printk(KERN_ERR, EDAC_DEVICE,
1994                     "%s:Error setting up EDAC device: %d\n", ecc_name, rc);
1995
1996         return rc;
1997 }
1998
1999 static void a10_eccmgr_irq_mask(struct irq_data *d)
2000 {
2001         struct altr_arria10_edac *edac = irq_data_get_irq_chip_data(d);
2002
2003         regmap_write(edac->ecc_mgr_map, A10_SYSMGR_ECC_INTMASK_SET_OFST,
2004                      BIT(d->hwirq));
2005 }
2006
2007 static void a10_eccmgr_irq_unmask(struct irq_data *d)
2008 {
2009         struct altr_arria10_edac *edac = irq_data_get_irq_chip_data(d);
2010
2011         regmap_write(edac->ecc_mgr_map, A10_SYSMGR_ECC_INTMASK_CLR_OFST,
2012                      BIT(d->hwirq));
2013 }
2014
2015 static int a10_eccmgr_irqdomain_map(struct irq_domain *d, unsigned int irq,
2016                                     irq_hw_number_t hwirq)
2017 {
2018         struct altr_arria10_edac *edac = d->host_data;
2019
2020         irq_set_chip_and_handler(irq, &edac->irq_chip, handle_simple_irq);
2021         irq_set_chip_data(irq, edac);
2022         irq_set_noprobe(irq);
2023
2024         return 0;
2025 }
2026
2027 static const struct irq_domain_ops a10_eccmgr_ic_ops = {
2028         .map = a10_eccmgr_irqdomain_map,
2029         .xlate = irq_domain_xlate_twocell,
2030 };
2031
2032 /************** Stratix 10 EDAC Double Bit Error Handler ************/
2033 #define to_a10edac(p, m) container_of(p, struct altr_arria10_edac, m)
2034
2035 #ifdef CONFIG_ARCH_STRATIX10
2036 /* panic routine issues reboot on non-zero panic_timeout */
2037 extern int panic_timeout;
2038
2039 /*
2040  * The double bit error is handled through SError which is fatal. This is
2041  * called as a panic notifier to printout ECC error info as part of the panic.
2042  */
2043 static int s10_edac_dberr_handler(struct notifier_block *this,
2044                                   unsigned long event, void *ptr)
2045 {
2046         struct altr_arria10_edac *edac = to_a10edac(this, panic_notifier);
2047         int err_addr, dberror;
2048
2049         regmap_read(edac->ecc_mgr_map, S10_SYSMGR_ECC_INTSTAT_DERR_OFST,
2050                     &dberror);
2051         regmap_write(edac->ecc_mgr_map, S10_SYSMGR_UE_VAL_OFST, dberror);
2052         if (dberror & S10_DBE_IRQ_MASK) {
2053                 struct list_head *position;
2054                 struct altr_edac_device_dev *ed;
2055                 struct arm_smccc_res result;
2056
2057                 /* Find the matching DBE in the list of devices */
2058                 list_for_each(position, &edac->a10_ecc_devices) {
2059                         ed = list_entry(position, struct altr_edac_device_dev,
2060                                         next);
2061                         if (!(BIT(ed->db_irq) & dberror))
2062                                 continue;
2063
2064                         writel(ALTR_A10_ECC_DERRPENA,
2065                                ed->base + ALTR_A10_ECC_INTSTAT_OFST);
2066                         err_addr = readl(ed->base + ALTR_S10_DERR_ADDRA_OFST);
2067                         regmap_write(edac->ecc_mgr_map,
2068                                      S10_SYSMGR_UE_ADDR_OFST, err_addr);
2069                         edac_printk(KERN_ERR, EDAC_DEVICE,
2070                                     "EDAC: [Fatal DBE on %s @ 0x%08X]\n",
2071                                     ed->edac_dev_name, err_addr);
2072                         break;
2073                 }
2074                 /* Notify the System through SMC. Reboot delay = 1 second */
2075                 panic_timeout = 1;
2076                 arm_smccc_smc(INTEL_SIP_SMC_ECC_DBE, dberror, 0, 0, 0, 0,
2077                               0, 0, &result);
2078         }
2079
2080         return NOTIFY_DONE;
2081 }
2082 #endif
2083
2084 /****************** Arria 10 EDAC Probe Function *********************/
2085 static int altr_edac_a10_probe(struct platform_device *pdev)
2086 {
2087         struct altr_arria10_edac *edac;
2088         struct device_node *child;
2089
2090         edac = devm_kzalloc(&pdev->dev, sizeof(*edac), GFP_KERNEL);
2091         if (!edac)
2092                 return -ENOMEM;
2093
2094         edac->dev = &pdev->dev;
2095         platform_set_drvdata(pdev, edac);
2096         INIT_LIST_HEAD(&edac->a10_ecc_devices);
2097
2098         if (socfpga_is_a10()) {
2099                 edac->ecc_mgr_map =
2100                         syscon_regmap_lookup_by_phandle(pdev->dev.of_node,
2101                                                         "altr,sysmgr-syscon");
2102         } else {
2103                 struct device_node *sysmgr_np;
2104                 struct resource res;
2105                 uintptr_t base;
2106
2107                 sysmgr_np = of_parse_phandle(pdev->dev.of_node,
2108                                              "altr,sysmgr-syscon", 0);
2109                 if (!sysmgr_np) {
2110                         edac_printk(KERN_ERR, EDAC_DEVICE,
2111                                     "Unable to find altr,sysmgr-syscon\n");
2112                         return -ENODEV;
2113                 }
2114
2115                 if (of_address_to_resource(sysmgr_np, 0, &res))
2116                         return -ENOMEM;
2117
2118                 /* Need physical address for SMCC call */
2119                 base = res.start;
2120
2121                 edac->ecc_mgr_map = devm_regmap_init(&pdev->dev, NULL,
2122                                                      (void *)base,
2123                                                      &s10_sdram_regmap_cfg);
2124         }
2125
2126         if (IS_ERR(edac->ecc_mgr_map)) {
2127                 edac_printk(KERN_ERR, EDAC_DEVICE,
2128                             "Unable to get syscon altr,sysmgr-syscon\n");
2129                 return PTR_ERR(edac->ecc_mgr_map);
2130         }
2131
2132         edac->irq_chip.name = pdev->dev.of_node->name;
2133         edac->irq_chip.irq_mask = a10_eccmgr_irq_mask;
2134         edac->irq_chip.irq_unmask = a10_eccmgr_irq_unmask;
2135         edac->domain = irq_domain_add_linear(pdev->dev.of_node, 64,
2136                                              &a10_eccmgr_ic_ops, edac);
2137         if (!edac->domain) {
2138                 dev_err(&pdev->dev, "Error adding IRQ domain\n");
2139                 return -ENOMEM;
2140         }
2141
2142         edac->sb_irq = platform_get_irq(pdev, 0);
2143         if (edac->sb_irq < 0) {
2144                 dev_err(&pdev->dev, "No SBERR IRQ resource\n");
2145                 return edac->sb_irq;
2146         }
2147
2148         irq_set_chained_handler_and_data(edac->sb_irq,
2149                                          altr_edac_a10_irq_handler,
2150                                          edac);
2151
2152 #ifdef CONFIG_ARCH_STRATIX10
2153         {
2154                 int dberror, err_addr;
2155
2156                 edac->panic_notifier.notifier_call = s10_edac_dberr_handler;
2157                 atomic_notifier_chain_register(&panic_notifier_list,
2158                                                &edac->panic_notifier);
2159
2160                 /* Printout a message if uncorrectable error previously. */
2161                 regmap_read(edac->ecc_mgr_map, S10_SYSMGR_UE_VAL_OFST,
2162                             &dberror);
2163                 if (dberror) {
2164                         regmap_read(edac->ecc_mgr_map, S10_SYSMGR_UE_ADDR_OFST,
2165                                     &err_addr);
2166                         edac_printk(KERN_ERR, EDAC_DEVICE,
2167                                     "Previous Boot UE detected[0x%X] @ 0x%X\n",
2168                                     dberror, err_addr);
2169                         /* Reset the sticky registers */
2170                         regmap_write(edac->ecc_mgr_map,
2171                                      S10_SYSMGR_UE_VAL_OFST, 0);
2172                         regmap_write(edac->ecc_mgr_map,
2173                                      S10_SYSMGR_UE_ADDR_OFST, 0);
2174                 }
2175         }
2176 #else
2177         edac->db_irq = platform_get_irq(pdev, 1);
2178         if (edac->db_irq < 0) {
2179                 dev_err(&pdev->dev, "No DBERR IRQ resource\n");
2180                 return edac->db_irq;
2181         }
2182         irq_set_chained_handler_and_data(edac->db_irq,
2183                                          altr_edac_a10_irq_handler, edac);
2184 #endif
2185
2186         for_each_child_of_node(pdev->dev.of_node, child) {
2187                 if (!of_device_is_available(child))
2188                         continue;
2189
2190                 if (of_device_is_compatible(child, "altr,socfpga-a10-l2-ecc") ||
2191                     of_device_is_compatible(child, "altr,socfpga-a10-ocram-ecc") ||
2192                     of_device_is_compatible(child, "altr,socfpga-eth-mac-ecc") ||
2193                     of_device_is_compatible(child, "altr,socfpga-nand-ecc") ||
2194                     of_device_is_compatible(child, "altr,socfpga-dma-ecc") ||
2195                     of_device_is_compatible(child, "altr,socfpga-usb-ecc") ||
2196                     of_device_is_compatible(child, "altr,socfpga-qspi-ecc") ||
2197                     of_device_is_compatible(child, "altr,socfpga-sdmmc-ecc"))
2198
2199                         altr_edac_a10_device_add(edac, child);
2200
2201 #ifdef CONFIG_EDAC_ALTERA_SDRAM
2202                 else if ((of_device_is_compatible(child, "altr,sdram-edac-a10")) ||
2203                          (of_device_is_compatible(child, "altr,sdram-edac-s10")))
2204                         of_platform_populate(pdev->dev.of_node,
2205                                              altr_sdram_ctrl_of_match,
2206                                              NULL, &pdev->dev);
2207 #endif
2208         }
2209
2210         return 0;
2211 }
2212
2213 static const struct of_device_id altr_edac_a10_of_match[] = {
2214         { .compatible = "altr,socfpga-a10-ecc-manager" },
2215         { .compatible = "altr,socfpga-s10-ecc-manager" },
2216         {},
2217 };
2218 MODULE_DEVICE_TABLE(of, altr_edac_a10_of_match);
2219
2220 static struct platform_driver altr_edac_a10_driver = {
2221         .probe =  altr_edac_a10_probe,
2222         .driver = {
2223                 .name = "socfpga_a10_ecc_manager",
2224                 .of_match_table = altr_edac_a10_of_match,
2225         },
2226 };
2227 module_platform_driver(altr_edac_a10_driver);
2228
2229 MODULE_LICENSE("GPL v2");
2230 MODULE_AUTHOR("Thor Thayer");
2231 MODULE_DESCRIPTION("EDAC Driver for Altera Memories");