1 /* Copyright (c) 2011-2012, The Linux Foundation. All rights reserved. 2 * 3 * This program is free software; you can redistribute it and/or modify 4 * it under the terms of the GNU General Public License version 2 and 5 * only version 2 as published by the Free Software Foundation. 6 * 7 * This program is distributed in the hope that it will be useful, 8 * but WITHOUT ANY WARRANTY; without even the implied warranty of 9 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 10 * GNU General Public License for more details. 11 */ 12 13 #include <linux/kernel.h> 14 #include <linux/module.h> 15 #include <linux/init.h> 16 #include <linux/types.h> 17 #include <linux/device.h> 18 #include <linux/io.h> 19 #include <linux/err.h> 20 #include <linux/fs.h> 21 #include <linux/miscdevice.h> 22 #include <linux/uaccess.h> 23 #include <linux/slab.h> 24 #include <linux/spinlock.h> 25 #include <linux/clk.h> 26 #include <linux/seq_file.h> 27 #include <linux/coresight.h> 28 #include <linux/amba/bus.h> 29 30 #include "coresight-priv.h" 31 32 #define ETB_RAM_DEPTH_REG 0x004 33 #define ETB_STATUS_REG 0x00c 34 #define ETB_RAM_READ_DATA_REG 0x010 35 #define ETB_RAM_READ_POINTER 0x014 36 #define ETB_RAM_WRITE_POINTER 0x018 37 #define ETB_TRG 0x01c 38 #define ETB_CTL_REG 0x020 39 #define ETB_RWD_REG 0x024 40 #define ETB_FFSR 0x300 41 #define ETB_FFCR 0x304 42 #define ETB_ITMISCOP0 0xee0 43 #define ETB_ITTRFLINACK 0xee4 44 #define ETB_ITTRFLIN 0xee8 45 #define ETB_ITATBDATA0 0xeeC 46 #define ETB_ITATBCTR2 0xef0 47 #define ETB_ITATBCTR1 0xef4 48 #define ETB_ITATBCTR0 0xef8 49 50 /* register description */ 51 /* STS - 0x00C */ 52 #define ETB_STATUS_RAM_FULL BIT(0) 53 /* CTL - 0x020 */ 54 #define ETB_CTL_CAPT_EN BIT(0) 55 /* FFCR - 0x304 */ 56 #define ETB_FFCR_EN_FTC BIT(0) 57 #define ETB_FFCR_FON_MAN BIT(6) 58 #define ETB_FFCR_STOP_FI BIT(12) 59 #define ETB_FFCR_STOP_TRIGGER BIT(13) 60 61 #define ETB_FFCR_BIT 6 62 #define ETB_FFSR_BIT 1 63 #define ETB_FRAME_SIZE_WORDS 4 64 65 /** 66 * struct etb_drvdata - specifics associated to an ETB component 67 * @base: memory mapped base address for this component. 68 * @dev: the device entity associated to this component. 69 * @csdev: component vitals needed by the framework. 70 * @miscdev: specifics to handle "/dev/xyz.etb" entry. 71 * @clk: the clock this component is associated to. 72 * @spinlock: only one at a time pls. 73 * @in_use: synchronise user space access to etb buffer. 74 * @buf: area of memory where ETB buffer content gets sent. 75 * @buffer_depth: size of @buf. 76 * @enable: this ETB is being used. 77 * @trigger_cntr: amount of words to store after a trigger. 78 */ 79 struct etb_drvdata { 80 void __iomem *base; 81 struct device *dev; 82 struct coresight_device *csdev; 83 struct miscdevice miscdev; 84 struct clk *clk; 85 spinlock_t spinlock; 86 atomic_t in_use; 87 u8 *buf; 88 u32 buffer_depth; 89 bool enable; 90 u32 trigger_cntr; 91 }; 92 93 static unsigned int etb_get_buffer_depth(struct etb_drvdata *drvdata) 94 { 95 int ret; 96 u32 depth = 0; 97 98 ret = clk_prepare_enable(drvdata->clk); 99 if (ret) 100 return ret; 101 102 /* RO registers don't need locking */ 103 depth = readl_relaxed(drvdata->base + ETB_RAM_DEPTH_REG); 104 105 clk_disable_unprepare(drvdata->clk); 106 return depth; 107 } 108 109 static void etb_enable_hw(struct etb_drvdata *drvdata) 110 { 111 int i; 112 u32 depth; 113 114 CS_UNLOCK(drvdata->base); 115 116 depth = drvdata->buffer_depth; 117 /* reset write RAM pointer address */ 118 writel_relaxed(0x0, drvdata->base + ETB_RAM_WRITE_POINTER); 119 /* clear entire RAM buffer */ 120 for (i = 0; i < depth; i++) 121 writel_relaxed(0x0, drvdata->base + ETB_RWD_REG); 122 123 /* reset write RAM pointer address */ 124 writel_relaxed(0x0, drvdata->base + ETB_RAM_WRITE_POINTER); 125 /* reset read RAM pointer address */ 126 writel_relaxed(0x0, drvdata->base + ETB_RAM_READ_POINTER); 127 128 writel_relaxed(drvdata->trigger_cntr, drvdata->base + ETB_TRG); 129 writel_relaxed(ETB_FFCR_EN_FTC | ETB_FFCR_STOP_TRIGGER, 130 drvdata->base + ETB_FFCR); 131 /* ETB trace capture enable */ 132 writel_relaxed(ETB_CTL_CAPT_EN, drvdata->base + ETB_CTL_REG); 133 134 CS_LOCK(drvdata->base); 135 } 136 137 static int etb_enable(struct coresight_device *csdev) 138 { 139 struct etb_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent); 140 int ret; 141 unsigned long flags; 142 143 ret = clk_prepare_enable(drvdata->clk); 144 if (ret) 145 return ret; 146 147 spin_lock_irqsave(&drvdata->spinlock, flags); 148 etb_enable_hw(drvdata); 149 drvdata->enable = true; 150 spin_unlock_irqrestore(&drvdata->spinlock, flags); 151 152 dev_info(drvdata->dev, "ETB enabled\n"); 153 return 0; 154 } 155 156 static void etb_disable_hw(struct etb_drvdata *drvdata) 157 { 158 u32 ffcr; 159 160 CS_UNLOCK(drvdata->base); 161 162 ffcr = readl_relaxed(drvdata->base + ETB_FFCR); 163 /* stop formatter when a stop has completed */ 164 ffcr |= ETB_FFCR_STOP_FI; 165 writel_relaxed(ffcr, drvdata->base + ETB_FFCR); 166 /* manually generate a flush of the system */ 167 ffcr |= ETB_FFCR_FON_MAN; 168 writel_relaxed(ffcr, drvdata->base + ETB_FFCR); 169 170 if (coresight_timeout(drvdata->base, ETB_FFCR, ETB_FFCR_BIT, 0)) { 171 dev_err(drvdata->dev, 172 "timeout observed when probing at offset %#x\n", 173 ETB_FFCR); 174 } 175 176 /* disable trace capture */ 177 writel_relaxed(0x0, drvdata->base + ETB_CTL_REG); 178 179 if (coresight_timeout(drvdata->base, ETB_FFSR, ETB_FFSR_BIT, 1)) { 180 dev_err(drvdata->dev, 181 "timeout observed when probing at offset %#x\n", 182 ETB_FFCR); 183 } 184 185 CS_LOCK(drvdata->base); 186 } 187 188 static void etb_dump_hw(struct etb_drvdata *drvdata) 189 { 190 int i; 191 u8 *buf_ptr; 192 u32 read_data, depth; 193 u32 read_ptr, write_ptr; 194 u32 frame_off, frame_endoff; 195 196 CS_UNLOCK(drvdata->base); 197 198 read_ptr = readl_relaxed(drvdata->base + ETB_RAM_READ_POINTER); 199 write_ptr = readl_relaxed(drvdata->base + ETB_RAM_WRITE_POINTER); 200 201 frame_off = write_ptr % ETB_FRAME_SIZE_WORDS; 202 frame_endoff = ETB_FRAME_SIZE_WORDS - frame_off; 203 if (frame_off) { 204 dev_err(drvdata->dev, 205 "write_ptr: %lu not aligned to formatter frame size\n", 206 (unsigned long)write_ptr); 207 dev_err(drvdata->dev, "frameoff: %lu, frame_endoff: %lu\n", 208 (unsigned long)frame_off, (unsigned long)frame_endoff); 209 write_ptr += frame_endoff; 210 } 211 212 if ((readl_relaxed(drvdata->base + ETB_STATUS_REG) 213 & ETB_STATUS_RAM_FULL) == 0) 214 writel_relaxed(0x0, drvdata->base + ETB_RAM_READ_POINTER); 215 else 216 writel_relaxed(write_ptr, drvdata->base + ETB_RAM_READ_POINTER); 217 218 depth = drvdata->buffer_depth; 219 buf_ptr = drvdata->buf; 220 for (i = 0; i < depth; i++) { 221 read_data = readl_relaxed(drvdata->base + 222 ETB_RAM_READ_DATA_REG); 223 *buf_ptr++ = read_data >> 0; 224 *buf_ptr++ = read_data >> 8; 225 *buf_ptr++ = read_data >> 16; 226 *buf_ptr++ = read_data >> 24; 227 } 228 229 if (frame_off) { 230 buf_ptr -= (frame_endoff * 4); 231 for (i = 0; i < frame_endoff; i++) { 232 *buf_ptr++ = 0x0; 233 *buf_ptr++ = 0x0; 234 *buf_ptr++ = 0x0; 235 *buf_ptr++ = 0x0; 236 } 237 } 238 239 writel_relaxed(read_ptr, drvdata->base + ETB_RAM_READ_POINTER); 240 241 CS_LOCK(drvdata->base); 242 } 243 244 static void etb_disable(struct coresight_device *csdev) 245 { 246 struct etb_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent); 247 unsigned long flags; 248 249 spin_lock_irqsave(&drvdata->spinlock, flags); 250 etb_disable_hw(drvdata); 251 etb_dump_hw(drvdata); 252 drvdata->enable = false; 253 spin_unlock_irqrestore(&drvdata->spinlock, flags); 254 255 clk_disable_unprepare(drvdata->clk); 256 257 dev_info(drvdata->dev, "ETB disabled\n"); 258 } 259 260 static const struct coresight_ops_sink etb_sink_ops = { 261 .enable = etb_enable, 262 .disable = etb_disable, 263 }; 264 265 static const struct coresight_ops etb_cs_ops = { 266 .sink_ops = &etb_sink_ops, 267 }; 268 269 static void etb_dump(struct etb_drvdata *drvdata) 270 { 271 unsigned long flags; 272 273 spin_lock_irqsave(&drvdata->spinlock, flags); 274 if (drvdata->enable) { 275 etb_disable_hw(drvdata); 276 etb_dump_hw(drvdata); 277 etb_enable_hw(drvdata); 278 } 279 spin_unlock_irqrestore(&drvdata->spinlock, flags); 280 281 dev_info(drvdata->dev, "ETB dumped\n"); 282 } 283 284 static int etb_open(struct inode *inode, struct file *file) 285 { 286 struct etb_drvdata *drvdata = container_of(file->private_data, 287 struct etb_drvdata, miscdev); 288 289 if (atomic_cmpxchg(&drvdata->in_use, 0, 1)) 290 return -EBUSY; 291 292 dev_dbg(drvdata->dev, "%s: successfully opened\n", __func__); 293 return 0; 294 } 295 296 static ssize_t etb_read(struct file *file, char __user *data, 297 size_t len, loff_t *ppos) 298 { 299 u32 depth; 300 struct etb_drvdata *drvdata = container_of(file->private_data, 301 struct etb_drvdata, miscdev); 302 303 etb_dump(drvdata); 304 305 depth = drvdata->buffer_depth; 306 if (*ppos + len > depth * 4) 307 len = depth * 4 - *ppos; 308 309 if (copy_to_user(data, drvdata->buf + *ppos, len)) { 310 dev_dbg(drvdata->dev, "%s: copy_to_user failed\n", __func__); 311 return -EFAULT; 312 } 313 314 *ppos += len; 315 316 dev_dbg(drvdata->dev, "%s: %zu bytes copied, %d bytes left\n", 317 __func__, len, (int)(depth * 4 - *ppos)); 318 return len; 319 } 320 321 static int etb_release(struct inode *inode, struct file *file) 322 { 323 struct etb_drvdata *drvdata = container_of(file->private_data, 324 struct etb_drvdata, miscdev); 325 atomic_set(&drvdata->in_use, 0); 326 327 dev_dbg(drvdata->dev, "%s: released\n", __func__); 328 return 0; 329 } 330 331 static const struct file_operations etb_fops = { 332 .owner = THIS_MODULE, 333 .open = etb_open, 334 .read = etb_read, 335 .release = etb_release, 336 .llseek = no_llseek, 337 }; 338 339 static ssize_t status_show(struct device *dev, 340 struct device_attribute *attr, char *buf) 341 { 342 int ret; 343 unsigned long flags; 344 u32 etb_rdr, etb_sr, etb_rrp, etb_rwp; 345 u32 etb_trg, etb_cr, etb_ffsr, etb_ffcr; 346 struct etb_drvdata *drvdata = dev_get_drvdata(dev->parent); 347 348 ret = clk_prepare_enable(drvdata->clk); 349 if (ret) 350 goto out; 351 352 spin_lock_irqsave(&drvdata->spinlock, flags); 353 CS_UNLOCK(drvdata->base); 354 355 etb_rdr = readl_relaxed(drvdata->base + ETB_RAM_DEPTH_REG); 356 etb_sr = readl_relaxed(drvdata->base + ETB_STATUS_REG); 357 etb_rrp = readl_relaxed(drvdata->base + ETB_RAM_READ_POINTER); 358 etb_rwp = readl_relaxed(drvdata->base + ETB_RAM_WRITE_POINTER); 359 etb_trg = readl_relaxed(drvdata->base + ETB_TRG); 360 etb_cr = readl_relaxed(drvdata->base + ETB_CTL_REG); 361 etb_ffsr = readl_relaxed(drvdata->base + ETB_FFSR); 362 etb_ffcr = readl_relaxed(drvdata->base + ETB_FFCR); 363 364 CS_LOCK(drvdata->base); 365 spin_unlock_irqrestore(&drvdata->spinlock, flags); 366 367 clk_disable_unprepare(drvdata->clk); 368 369 return sprintf(buf, 370 "Depth:\t\t0x%x\n" 371 "Status:\t\t0x%x\n" 372 "RAM read ptr:\t0x%x\n" 373 "RAM wrt ptr:\t0x%x\n" 374 "Trigger cnt:\t0x%x\n" 375 "Control:\t0x%x\n" 376 "Flush status:\t0x%x\n" 377 "Flush ctrl:\t0x%x\n", 378 etb_rdr, etb_sr, etb_rrp, etb_rwp, 379 etb_trg, etb_cr, etb_ffsr, etb_ffcr); 380 out: 381 return -EINVAL; 382 } 383 static DEVICE_ATTR_RO(status); 384 385 static ssize_t trigger_cntr_show(struct device *dev, 386 struct device_attribute *attr, char *buf) 387 { 388 struct etb_drvdata *drvdata = dev_get_drvdata(dev->parent); 389 unsigned long val = drvdata->trigger_cntr; 390 391 return sprintf(buf, "%#lx\n", val); 392 } 393 394 static ssize_t trigger_cntr_store(struct device *dev, 395 struct device_attribute *attr, 396 const char *buf, size_t size) 397 { 398 int ret; 399 unsigned long val; 400 struct etb_drvdata *drvdata = dev_get_drvdata(dev->parent); 401 402 ret = kstrtoul(buf, 16, &val); 403 if (ret) 404 return ret; 405 406 drvdata->trigger_cntr = val; 407 return size; 408 } 409 static DEVICE_ATTR_RW(trigger_cntr); 410 411 static struct attribute *coresight_etb_attrs[] = { 412 &dev_attr_trigger_cntr.attr, 413 &dev_attr_status.attr, 414 NULL, 415 }; 416 ATTRIBUTE_GROUPS(coresight_etb); 417 418 static int etb_probe(struct amba_device *adev, const struct amba_id *id) 419 { 420 int ret; 421 void __iomem *base; 422 struct device *dev = &adev->dev; 423 struct coresight_platform_data *pdata = NULL; 424 struct etb_drvdata *drvdata; 425 struct resource *res = &adev->res; 426 struct coresight_desc *desc; 427 struct device_node *np = adev->dev.of_node; 428 429 if (np) { 430 pdata = of_get_coresight_platform_data(dev, np); 431 if (IS_ERR(pdata)) 432 return PTR_ERR(pdata); 433 adev->dev.platform_data = pdata; 434 } 435 436 drvdata = devm_kzalloc(dev, sizeof(*drvdata), GFP_KERNEL); 437 if (!drvdata) 438 return -ENOMEM; 439 440 drvdata->dev = &adev->dev; 441 dev_set_drvdata(dev, drvdata); 442 443 /* validity for the resource is already checked by the AMBA core */ 444 base = devm_ioremap_resource(dev, res); 445 if (IS_ERR(base)) 446 return PTR_ERR(base); 447 448 drvdata->base = base; 449 450 spin_lock_init(&drvdata->spinlock); 451 452 drvdata->clk = adev->pclk; 453 ret = clk_prepare_enable(drvdata->clk); 454 if (ret) 455 return ret; 456 457 drvdata->buffer_depth = etb_get_buffer_depth(drvdata); 458 clk_disable_unprepare(drvdata->clk); 459 460 if (drvdata->buffer_depth < 0) 461 return -EINVAL; 462 463 drvdata->buf = devm_kzalloc(dev, 464 drvdata->buffer_depth * 4, GFP_KERNEL); 465 if (!drvdata->buf) 466 return -ENOMEM; 467 468 desc = devm_kzalloc(dev, sizeof(*desc), GFP_KERNEL); 469 if (!desc) 470 return -ENOMEM; 471 472 desc->type = CORESIGHT_DEV_TYPE_SINK; 473 desc->subtype.sink_subtype = CORESIGHT_DEV_SUBTYPE_SINK_BUFFER; 474 desc->ops = &etb_cs_ops; 475 desc->pdata = pdata; 476 desc->dev = dev; 477 desc->groups = coresight_etb_groups; 478 drvdata->csdev = coresight_register(desc); 479 if (IS_ERR(drvdata->csdev)) 480 return PTR_ERR(drvdata->csdev); 481 482 drvdata->miscdev.name = pdata->name; 483 drvdata->miscdev.minor = MISC_DYNAMIC_MINOR; 484 drvdata->miscdev.fops = &etb_fops; 485 ret = misc_register(&drvdata->miscdev); 486 if (ret) 487 goto err_misc_register; 488 489 dev_info(dev, "ETB initialized\n"); 490 return 0; 491 492 err_misc_register: 493 coresight_unregister(drvdata->csdev); 494 return ret; 495 } 496 497 static int etb_remove(struct amba_device *adev) 498 { 499 struct etb_drvdata *drvdata = amba_get_drvdata(adev); 500 501 misc_deregister(&drvdata->miscdev); 502 coresight_unregister(drvdata->csdev); 503 return 0; 504 } 505 506 static struct amba_id etb_ids[] = { 507 { 508 .id = 0x0003b907, 509 .mask = 0x0003ffff, 510 }, 511 { 0, 0}, 512 }; 513 514 static struct amba_driver etb_driver = { 515 .drv = { 516 .name = "coresight-etb10", 517 .owner = THIS_MODULE, 518 }, 519 .probe = etb_probe, 520 .remove = etb_remove, 521 .id_table = etb_ids, 522 }; 523 524 module_amba_driver(etb_driver); 525 526 MODULE_LICENSE("GPL v2"); 527 MODULE_DESCRIPTION("CoreSight Embedded Trace Buffer driver"); 528