| /* Copyright (c) 2012, The Linux Foundation. All rights reserved. |
| * |
| * Description: CoreSight Trace Memory Controller driver |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License version 2 and |
| * only version 2 as published by the Free Software Foundation. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| */ |
| |
| #include <linux/kernel.h> |
| #include <linux/init.h> |
| #include <linux/types.h> |
| #include <linux/device.h> |
| #include <linux/io.h> |
| #include <linux/err.h> |
| #include <linux/fs.h> |
| #include <linux/miscdevice.h> |
| #include <linux/uaccess.h> |
| #include <linux/slab.h> |
| #include <linux/dma-mapping.h> |
| #include <linux/spinlock.h> |
| #include <linux/pm_runtime.h> |
| #include <linux/of.h> |
| #include <linux/coresight.h> |
| #include <linux/amba/bus.h> |
| |
| #include "coresight-priv.h" |
| #include "coresight-tmc.h" |
| |
| void tmc_wait_for_tmcready(struct tmc_drvdata *drvdata) |
| { |
| /* Ensure formatter, unformatter and hardware fifo are empty */ |
| if (coresight_timeout(drvdata->base, |
| TMC_STS, TMC_STS_TMCREADY_BIT, 1)) { |
| dev_err(drvdata->dev, |
| "timeout observed when probing at offset %#x\n", |
| TMC_STS); |
| } |
| } |
| |
| void tmc_flush_and_stop(struct tmc_drvdata *drvdata) |
| { |
| u32 ffcr; |
| |
| ffcr = readl_relaxed(drvdata->base + TMC_FFCR); |
| ffcr |= TMC_FFCR_STOP_ON_FLUSH; |
| writel_relaxed(ffcr, drvdata->base + TMC_FFCR); |
| ffcr |= BIT(TMC_FFCR_FLUSHMAN_BIT); |
| writel_relaxed(ffcr, drvdata->base + TMC_FFCR); |
| /* Ensure flush completes */ |
| if (coresight_timeout(drvdata->base, |
| TMC_FFCR, TMC_FFCR_FLUSHMAN_BIT, 0)) { |
| dev_err(drvdata->dev, |
| "timeout observed when probing at offset %#x\n", |
| TMC_FFCR); |
| } |
| |
| tmc_wait_for_tmcready(drvdata); |
| } |
| |
| void tmc_enable_hw(struct tmc_drvdata *drvdata) |
| { |
| writel_relaxed(TMC_CTL_CAPT_EN, drvdata->base + TMC_CTL); |
| } |
| |
| void tmc_disable_hw(struct tmc_drvdata *drvdata) |
| { |
| writel_relaxed(0x0, drvdata->base + TMC_CTL); |
| } |
| |
| static int tmc_read_prepare(struct tmc_drvdata *drvdata) |
| { |
| int ret = 0; |
| |
| switch (drvdata->config_type) { |
| case TMC_CONFIG_TYPE_ETB: |
| case TMC_CONFIG_TYPE_ETF: |
| ret = tmc_read_prepare_etb(drvdata); |
| break; |
| case TMC_CONFIG_TYPE_ETR: |
| ret = tmc_read_prepare_etr(drvdata); |
| break; |
| default: |
| ret = -EINVAL; |
| } |
| |
| if (!ret) |
| dev_info(drvdata->dev, "TMC read start\n"); |
| |
| return ret; |
| } |
| |
| static int tmc_read_unprepare(struct tmc_drvdata *drvdata) |
| { |
| int ret = 0; |
| |
| switch (drvdata->config_type) { |
| case TMC_CONFIG_TYPE_ETB: |
| case TMC_CONFIG_TYPE_ETF: |
| ret = tmc_read_unprepare_etb(drvdata); |
| break; |
| case TMC_CONFIG_TYPE_ETR: |
| ret = tmc_read_unprepare_etr(drvdata); |
| break; |
| default: |
| ret = -EINVAL; |
| } |
| |
| if (!ret) |
| dev_info(drvdata->dev, "TMC read end\n"); |
| |
| return ret; |
| } |
| |
| static int tmc_open(struct inode *inode, struct file *file) |
| { |
| int ret; |
| struct tmc_drvdata *drvdata = container_of(file->private_data, |
| struct tmc_drvdata, miscdev); |
| |
| ret = tmc_read_prepare(drvdata); |
| if (ret) |
| return ret; |
| |
| nonseekable_open(inode, file); |
| |
| dev_dbg(drvdata->dev, "%s: successfully opened\n", __func__); |
| return 0; |
| } |
| |
| static ssize_t tmc_read(struct file *file, char __user *data, size_t len, |
| loff_t *ppos) |
| { |
| struct tmc_drvdata *drvdata = container_of(file->private_data, |
| struct tmc_drvdata, miscdev); |
| char *bufp = drvdata->buf + *ppos; |
| |
| if (*ppos + len > drvdata->size) |
| len = drvdata->size - *ppos; |
| |
| if (drvdata->config_type == TMC_CONFIG_TYPE_ETR) { |
| if (bufp == (char *)(drvdata->vaddr + drvdata->size)) |
| bufp = drvdata->vaddr; |
| else if (bufp > (char *)(drvdata->vaddr + drvdata->size)) |
| bufp -= drvdata->size; |
| if ((bufp + len) > (char *)(drvdata->vaddr + drvdata->size)) |
| len = (char *)(drvdata->vaddr + drvdata->size) - bufp; |
| } |
| |
| if (copy_to_user(data, bufp, len)) { |
| dev_dbg(drvdata->dev, "%s: copy_to_user failed\n", __func__); |
| return -EFAULT; |
| } |
| |
| *ppos += len; |
| |
| dev_dbg(drvdata->dev, "%s: %zu bytes copied, %d bytes left\n", |
| __func__, len, (int)(drvdata->size - *ppos)); |
| return len; |
| } |
| |
| static int tmc_release(struct inode *inode, struct file *file) |
| { |
| int ret; |
| struct tmc_drvdata *drvdata = container_of(file->private_data, |
| struct tmc_drvdata, miscdev); |
| |
| ret = tmc_read_unprepare(drvdata); |
| if (ret) |
| return ret; |
| |
| dev_dbg(drvdata->dev, "%s: released\n", __func__); |
| return 0; |
| } |
| |
| static const struct file_operations tmc_fops = { |
| .owner = THIS_MODULE, |
| .open = tmc_open, |
| .read = tmc_read, |
| .release = tmc_release, |
| .llseek = no_llseek, |
| }; |
| |
| static enum tmc_mem_intf_width tmc_get_memwidth(u32 devid) |
| { |
| enum tmc_mem_intf_width memwidth; |
| |
| /* |
| * Excerpt from the TRM: |
| * |
| * DEVID::MEMWIDTH[10:8] |
| * 0x2 Memory interface databus is 32 bits wide. |
| * 0x3 Memory interface databus is 64 bits wide. |
| * 0x4 Memory interface databus is 128 bits wide. |
| * 0x5 Memory interface databus is 256 bits wide. |
| */ |
| switch (BMVAL(devid, 8, 10)) { |
| case 0x2: |
| memwidth = TMC_MEM_INTF_WIDTH_32BITS; |
| break; |
| case 0x3: |
| memwidth = TMC_MEM_INTF_WIDTH_64BITS; |
| break; |
| case 0x4: |
| memwidth = TMC_MEM_INTF_WIDTH_128BITS; |
| break; |
| case 0x5: |
| memwidth = TMC_MEM_INTF_WIDTH_256BITS; |
| break; |
| default: |
| memwidth = 0; |
| } |
| |
| return memwidth; |
| } |
| |
| #define coresight_tmc_simple_func(name, offset) \ |
| coresight_simple_func(struct tmc_drvdata, name, offset) |
| |
| coresight_tmc_simple_func(rsz, TMC_RSZ); |
| coresight_tmc_simple_func(sts, TMC_STS); |
| coresight_tmc_simple_func(rrp, TMC_RRP); |
| coresight_tmc_simple_func(rwp, TMC_RWP); |
| coresight_tmc_simple_func(trg, TMC_TRG); |
| coresight_tmc_simple_func(ctl, TMC_CTL); |
| coresight_tmc_simple_func(ffsr, TMC_FFSR); |
| coresight_tmc_simple_func(ffcr, TMC_FFCR); |
| coresight_tmc_simple_func(mode, TMC_MODE); |
| coresight_tmc_simple_func(pscr, TMC_PSCR); |
| coresight_tmc_simple_func(devid, CORESIGHT_DEVID); |
| |
| static struct attribute *coresight_tmc_mgmt_attrs[] = { |
| &dev_attr_rsz.attr, |
| &dev_attr_sts.attr, |
| &dev_attr_rrp.attr, |
| &dev_attr_rwp.attr, |
| &dev_attr_trg.attr, |
| &dev_attr_ctl.attr, |
| &dev_attr_ffsr.attr, |
| &dev_attr_ffcr.attr, |
| &dev_attr_mode.attr, |
| &dev_attr_pscr.attr, |
| &dev_attr_devid.attr, |
| NULL, |
| }; |
| |
| ssize_t trigger_cntr_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct tmc_drvdata *drvdata = dev_get_drvdata(dev->parent); |
| unsigned long val = drvdata->trigger_cntr; |
| |
| return sprintf(buf, "%#lx\n", val); |
| } |
| |
| static ssize_t trigger_cntr_store(struct device *dev, |
| struct device_attribute *attr, |
| const char *buf, size_t size) |
| { |
| int ret; |
| unsigned long val; |
| struct tmc_drvdata *drvdata = dev_get_drvdata(dev->parent); |
| |
| ret = kstrtoul(buf, 16, &val); |
| if (ret) |
| return ret; |
| |
| drvdata->trigger_cntr = val; |
| return size; |
| } |
| static DEVICE_ATTR_RW(trigger_cntr); |
| |
| static struct attribute *coresight_tmc_attrs[] = { |
| &dev_attr_trigger_cntr.attr, |
| NULL, |
| }; |
| |
| static const struct attribute_group coresight_tmc_group = { |
| .attrs = coresight_tmc_attrs, |
| }; |
| |
| static const struct attribute_group coresight_tmc_mgmt_group = { |
| .attrs = coresight_tmc_mgmt_attrs, |
| .name = "mgmt", |
| }; |
| |
| const struct attribute_group *coresight_tmc_groups[] = { |
| &coresight_tmc_group, |
| &coresight_tmc_mgmt_group, |
| NULL, |
| }; |
| |
| static int tmc_probe(struct amba_device *adev, const struct amba_id *id) |
| { |
| int ret = 0; |
| u32 devid; |
| void __iomem *base; |
| struct device *dev = &adev->dev; |
| struct coresight_platform_data *pdata = NULL; |
| struct tmc_drvdata *drvdata; |
| struct resource *res = &adev->res; |
| struct coresight_desc *desc; |
| struct device_node *np = adev->dev.of_node; |
| |
| if (np) { |
| pdata = of_get_coresight_platform_data(dev, np); |
| if (IS_ERR(pdata)) |
| return PTR_ERR(pdata); |
| adev->dev.platform_data = pdata; |
| } |
| |
| drvdata = devm_kzalloc(dev, sizeof(*drvdata), GFP_KERNEL); |
| if (!drvdata) |
| return -ENOMEM; |
| |
| drvdata->dev = &adev->dev; |
| dev_set_drvdata(dev, drvdata); |
| |
| /* Validity for the resource is already checked by the AMBA core */ |
| base = devm_ioremap_resource(dev, res); |
| if (IS_ERR(base)) |
| return PTR_ERR(base); |
| |
| drvdata->base = base; |
| |
| spin_lock_init(&drvdata->spinlock); |
| |
| devid = readl_relaxed(drvdata->base + CORESIGHT_DEVID); |
| drvdata->config_type = BMVAL(devid, 6, 7); |
| drvdata->memwidth = tmc_get_memwidth(devid); |
| |
| if (drvdata->config_type == TMC_CONFIG_TYPE_ETR) { |
| if (np) |
| ret = of_property_read_u32(np, |
| "arm,buffer-size", |
| &drvdata->size); |
| if (ret) |
| drvdata->size = SZ_1M; |
| } else { |
| drvdata->size = readl_relaxed(drvdata->base + TMC_RSZ) * 4; |
| } |
| |
| pm_runtime_put(&adev->dev); |
| |
| desc = devm_kzalloc(dev, sizeof(*desc), GFP_KERNEL); |
| if (!desc) { |
| ret = -ENOMEM; |
| goto err_devm_kzalloc; |
| } |
| |
| desc->pdata = pdata; |
| desc->dev = dev; |
| desc->subtype.sink_subtype = CORESIGHT_DEV_SUBTYPE_SINK_BUFFER; |
| desc->groups = coresight_tmc_groups; |
| |
| if (drvdata->config_type == TMC_CONFIG_TYPE_ETB) { |
| desc->type = CORESIGHT_DEV_TYPE_SINK; |
| desc->ops = &tmc_etb_cs_ops; |
| } else if (drvdata->config_type == TMC_CONFIG_TYPE_ETR) { |
| desc->type = CORESIGHT_DEV_TYPE_SINK; |
| desc->ops = &tmc_etr_cs_ops; |
| } else { |
| desc->type = CORESIGHT_DEV_TYPE_LINKSINK; |
| desc->subtype.link_subtype = CORESIGHT_DEV_SUBTYPE_LINK_FIFO; |
| desc->ops = &tmc_etf_cs_ops; |
| } |
| |
| drvdata->csdev = coresight_register(desc); |
| if (IS_ERR(drvdata->csdev)) { |
| ret = PTR_ERR(drvdata->csdev); |
| goto err_devm_kzalloc; |
| } |
| |
| drvdata->miscdev.name = pdata->name; |
| drvdata->miscdev.minor = MISC_DYNAMIC_MINOR; |
| drvdata->miscdev.fops = &tmc_fops; |
| ret = misc_register(&drvdata->miscdev); |
| if (ret) |
| goto err_misc_register; |
| |
| return 0; |
| |
| err_misc_register: |
| coresight_unregister(drvdata->csdev); |
| err_devm_kzalloc: |
| if (drvdata->config_type == TMC_CONFIG_TYPE_ETR) |
| dma_free_coherent(dev, drvdata->size, |
| drvdata->vaddr, drvdata->paddr); |
| return ret; |
| } |
| |
| static struct amba_id tmc_ids[] = { |
| { |
| .id = 0x0003b961, |
| .mask = 0x0003ffff, |
| }, |
| { 0, 0}, |
| }; |
| |
| static struct amba_driver tmc_driver = { |
| .drv = { |
| .name = "coresight-tmc", |
| .owner = THIS_MODULE, |
| .suppress_bind_attrs = true, |
| }, |
| .probe = tmc_probe, |
| .id_table = tmc_ids, |
| }; |
| builtin_amba_driver(tmc_driver); |