Loading...
1/* Copyright (c) 2011-2012, The Linux Foundation. All rights reserved.
2 *
3 * Description: CoreSight Program Flow Trace driver
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 and
7 * only version 2 as published by the Free Software Foundation.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 */
14
15#include <linux/kernel.h>
16#include <linux/moduleparam.h>
17#include <linux/init.h>
18#include <linux/types.h>
19#include <linux/device.h>
20#include <linux/io.h>
21#include <linux/err.h>
22#include <linux/fs.h>
23#include <linux/slab.h>
24#include <linux/delay.h>
25#include <linux/smp.h>
26#include <linux/sysfs.h>
27#include <linux/stat.h>
28#include <linux/pm_runtime.h>
29#include <linux/cpu.h>
30#include <linux/of.h>
31#include <linux/coresight.h>
32#include <linux/coresight-pmu.h>
33#include <linux/amba/bus.h>
34#include <linux/seq_file.h>
35#include <linux/uaccess.h>
36#include <linux/clk.h>
37#include <linux/perf_event.h>
38#include <asm/sections.h>
39
40#include "coresight-etm.h"
41#include "coresight-etm-perf.h"
42
43/*
44 * Not really modular but using module_param is the easiest way to
45 * remain consistent with existing use cases for now.
46 */
47static int boot_enable;
48module_param_named(boot_enable, boot_enable, int, S_IRUGO);
49
50/* The number of ETM/PTM currently registered */
51static int etm_count;
52static struct etm_drvdata *etmdrvdata[NR_CPUS];
53
54/*
55 * Memory mapped writes to clear os lock are not supported on some processors
56 * and OS lock must be unlocked before any memory mapped access on such
57 * processors, otherwise memory mapped reads/writes will be invalid.
58 */
59static void etm_os_unlock(struct etm_drvdata *drvdata)
60{
61 /* Writing any value to ETMOSLAR unlocks the trace registers */
62 etm_writel(drvdata, 0x0, ETMOSLAR);
63 drvdata->os_unlock = true;
64 isb();
65}
66
67static void etm_set_pwrdwn(struct etm_drvdata *drvdata)
68{
69 u32 etmcr;
70
71 /* Ensure pending cp14 accesses complete before setting pwrdwn */
72 mb();
73 isb();
74 etmcr = etm_readl(drvdata, ETMCR);
75 etmcr |= ETMCR_PWD_DWN;
76 etm_writel(drvdata, etmcr, ETMCR);
77}
78
79static void etm_clr_pwrdwn(struct etm_drvdata *drvdata)
80{
81 u32 etmcr;
82
83 etmcr = etm_readl(drvdata, ETMCR);
84 etmcr &= ~ETMCR_PWD_DWN;
85 etm_writel(drvdata, etmcr, ETMCR);
86 /* Ensure pwrup completes before subsequent cp14 accesses */
87 mb();
88 isb();
89}
90
91static void etm_set_pwrup(struct etm_drvdata *drvdata)
92{
93 u32 etmpdcr;
94
95 etmpdcr = readl_relaxed(drvdata->base + ETMPDCR);
96 etmpdcr |= ETMPDCR_PWD_UP;
97 writel_relaxed(etmpdcr, drvdata->base + ETMPDCR);
98 /* Ensure pwrup completes before subsequent cp14 accesses */
99 mb();
100 isb();
101}
102
103static void etm_clr_pwrup(struct etm_drvdata *drvdata)
104{
105 u32 etmpdcr;
106
107 /* Ensure pending cp14 accesses complete before clearing pwrup */
108 mb();
109 isb();
110 etmpdcr = readl_relaxed(drvdata->base + ETMPDCR);
111 etmpdcr &= ~ETMPDCR_PWD_UP;
112 writel_relaxed(etmpdcr, drvdata->base + ETMPDCR);
113}
114
115/**
116 * coresight_timeout_etm - loop until a bit has changed to a specific state.
117 * @drvdata: etm's private data structure.
118 * @offset: address of a register, starting from @addr.
119 * @position: the position of the bit of interest.
120 * @value: the value the bit should have.
121 *
122 * Basically the same as @coresight_timeout except for the register access
123 * method where we have to account for CP14 configurations.
124
125 * Return: 0 as soon as the bit has taken the desired state or -EAGAIN if
126 * TIMEOUT_US has elapsed, which ever happens first.
127 */
128
129static int coresight_timeout_etm(struct etm_drvdata *drvdata, u32 offset,
130 int position, int value)
131{
132 int i;
133 u32 val;
134
135 for (i = TIMEOUT_US; i > 0; i--) {
136 val = etm_readl(drvdata, offset);
137 /* Waiting on the bit to go from 0 to 1 */
138 if (value) {
139 if (val & BIT(position))
140 return 0;
141 /* Waiting on the bit to go from 1 to 0 */
142 } else {
143 if (!(val & BIT(position)))
144 return 0;
145 }
146
147 /*
148 * Delay is arbitrary - the specification doesn't say how long
149 * we are expected to wait. Extra check required to make sure
150 * we don't wait needlessly on the last iteration.
151 */
152 if (i - 1)
153 udelay(1);
154 }
155
156 return -EAGAIN;
157}
158
159
160static void etm_set_prog(struct etm_drvdata *drvdata)
161{
162 u32 etmcr;
163
164 etmcr = etm_readl(drvdata, ETMCR);
165 etmcr |= ETMCR_ETM_PRG;
166 etm_writel(drvdata, etmcr, ETMCR);
167 /*
168 * Recommended by spec for cp14 accesses to ensure etmcr write is
169 * complete before polling etmsr
170 */
171 isb();
172 if (coresight_timeout_etm(drvdata, ETMSR, ETMSR_PROG_BIT, 1)) {
173 dev_err(drvdata->dev,
174 "%s: timeout observed when probing at offset %#x\n",
175 __func__, ETMSR);
176 }
177}
178
179static void etm_clr_prog(struct etm_drvdata *drvdata)
180{
181 u32 etmcr;
182
183 etmcr = etm_readl(drvdata, ETMCR);
184 etmcr &= ~ETMCR_ETM_PRG;
185 etm_writel(drvdata, etmcr, ETMCR);
186 /*
187 * Recommended by spec for cp14 accesses to ensure etmcr write is
188 * complete before polling etmsr
189 */
190 isb();
191 if (coresight_timeout_etm(drvdata, ETMSR, ETMSR_PROG_BIT, 0)) {
192 dev_err(drvdata->dev,
193 "%s: timeout observed when probing at offset %#x\n",
194 __func__, ETMSR);
195 }
196}
197
198void etm_set_default(struct etm_config *config)
199{
200 int i;
201
202 if (WARN_ON_ONCE(!config))
203 return;
204
205 /*
206 * Taken verbatim from the TRM:
207 *
208 * To trace all memory:
209 * set bit [24] in register 0x009, the ETMTECR1, to 1
210 * set all other bits in register 0x009, the ETMTECR1, to 0
211 * set all bits in register 0x007, the ETMTECR2, to 0
212 * set register 0x008, the ETMTEEVR, to 0x6F (TRUE).
213 */
214 config->enable_ctrl1 = BIT(24);
215 config->enable_ctrl2 = 0x0;
216 config->enable_event = ETM_HARD_WIRE_RES_A;
217
218 config->trigger_event = ETM_DEFAULT_EVENT_VAL;
219 config->enable_event = ETM_HARD_WIRE_RES_A;
220
221 config->seq_12_event = ETM_DEFAULT_EVENT_VAL;
222 config->seq_21_event = ETM_DEFAULT_EVENT_VAL;
223 config->seq_23_event = ETM_DEFAULT_EVENT_VAL;
224 config->seq_31_event = ETM_DEFAULT_EVENT_VAL;
225 config->seq_32_event = ETM_DEFAULT_EVENT_VAL;
226 config->seq_13_event = ETM_DEFAULT_EVENT_VAL;
227 config->timestamp_event = ETM_DEFAULT_EVENT_VAL;
228
229 for (i = 0; i < ETM_MAX_CNTR; i++) {
230 config->cntr_rld_val[i] = 0x0;
231 config->cntr_event[i] = ETM_DEFAULT_EVENT_VAL;
232 config->cntr_rld_event[i] = ETM_DEFAULT_EVENT_VAL;
233 config->cntr_val[i] = 0x0;
234 }
235
236 config->seq_curr_state = 0x0;
237 config->ctxid_idx = 0x0;
238 for (i = 0; i < ETM_MAX_CTXID_CMP; i++) {
239 config->ctxid_pid[i] = 0x0;
240 config->ctxid_vpid[i] = 0x0;
241 }
242
243 config->ctxid_mask = 0x0;
244}
245
246void etm_config_trace_mode(struct etm_config *config)
247{
248 u32 flags, mode;
249
250 mode = config->mode;
251
252 mode &= (ETM_MODE_EXCL_KERN | ETM_MODE_EXCL_USER);
253
254 /* excluding kernel AND user space doesn't make sense */
255 if (mode == (ETM_MODE_EXCL_KERN | ETM_MODE_EXCL_USER))
256 return;
257
258 /* nothing to do if neither flags are set */
259 if (!(mode & ETM_MODE_EXCL_KERN) && !(mode & ETM_MODE_EXCL_USER))
260 return;
261
262 flags = (1 << 0 | /* instruction execute */
263 3 << 3 | /* ARM instruction */
264 0 << 5 | /* No data value comparison */
265 0 << 7 | /* No exact mach */
266 0 << 8); /* Ignore context ID */
267
268 /* No need to worry about single address comparators. */
269 config->enable_ctrl2 = 0x0;
270
271 /* Bit 0 is address range comparator 1 */
272 config->enable_ctrl1 = ETMTECR1_ADDR_COMP_1;
273
274 /*
275 * On ETMv3.5:
276 * ETMACTRn[13,11] == Non-secure state comparison control
277 * ETMACTRn[12,10] == Secure state comparison control
278 *
279 * b00 == Match in all modes in this state
280 * b01 == Do not match in any more in this state
281 * b10 == Match in all modes excepts user mode in this state
282 * b11 == Match only in user mode in this state
283 */
284
285 /* Tracing in secure mode is not supported at this time */
286 flags |= (0 << 12 | 1 << 10);
287
288 if (mode & ETM_MODE_EXCL_USER) {
289 /* exclude user, match all modes except user mode */
290 flags |= (1 << 13 | 0 << 11);
291 } else {
292 /* exclude kernel, match only in user mode */
293 flags |= (1 << 13 | 1 << 11);
294 }
295
296 /*
297 * The ETMEEVR register is already set to "hard wire A". As such
298 * all there is to do is setup an address comparator that spans
299 * the entire address range and configure the state and mode bits.
300 */
301 config->addr_val[0] = (u32) 0x0;
302 config->addr_val[1] = (u32) ~0x0;
303 config->addr_acctype[0] = flags;
304 config->addr_acctype[1] = flags;
305 config->addr_type[0] = ETM_ADDR_TYPE_RANGE;
306 config->addr_type[1] = ETM_ADDR_TYPE_RANGE;
307}
308
309#define ETM3X_SUPPORTED_OPTIONS (ETMCR_CYC_ACC | ETMCR_TIMESTAMP_EN)
310
311static int etm_parse_event_config(struct etm_drvdata *drvdata,
312 struct perf_event_attr *attr)
313{
314 struct etm_config *config = &drvdata->config;
315
316 if (!attr)
317 return -EINVAL;
318
319 /* Clear configuration from previous run */
320 memset(config, 0, sizeof(struct etm_config));
321
322 if (attr->exclude_kernel)
323 config->mode = ETM_MODE_EXCL_KERN;
324
325 if (attr->exclude_user)
326 config->mode = ETM_MODE_EXCL_USER;
327
328 /* Always start from the default config */
329 etm_set_default(config);
330
331 /*
332 * By default the tracers are configured to trace the whole address
333 * range. Narrow the field only if requested by user space.
334 */
335 if (config->mode)
336 etm_config_trace_mode(config);
337
338 /*
339 * At this time only cycle accurate and timestamp options are
340 * available.
341 */
342 if (attr->config & ~ETM3X_SUPPORTED_OPTIONS)
343 return -EINVAL;
344
345 config->ctrl = attr->config;
346
347 return 0;
348}
349
350static void etm_enable_hw(void *info)
351{
352 int i;
353 u32 etmcr;
354 struct etm_drvdata *drvdata = info;
355 struct etm_config *config = &drvdata->config;
356
357 CS_UNLOCK(drvdata->base);
358
359 /* Turn engine on */
360 etm_clr_pwrdwn(drvdata);
361 /* Apply power to trace registers */
362 etm_set_pwrup(drvdata);
363 /* Make sure all registers are accessible */
364 etm_os_unlock(drvdata);
365
366 etm_set_prog(drvdata);
367
368 etmcr = etm_readl(drvdata, ETMCR);
369 /* Clear setting from a previous run if need be */
370 etmcr &= ~ETM3X_SUPPORTED_OPTIONS;
371 etmcr |= drvdata->port_size;
372 etmcr |= ETMCR_ETM_EN;
373 etm_writel(drvdata, config->ctrl | etmcr, ETMCR);
374 etm_writel(drvdata, config->trigger_event, ETMTRIGGER);
375 etm_writel(drvdata, config->startstop_ctrl, ETMTSSCR);
376 etm_writel(drvdata, config->enable_event, ETMTEEVR);
377 etm_writel(drvdata, config->enable_ctrl1, ETMTECR1);
378 etm_writel(drvdata, config->fifofull_level, ETMFFLR);
379 for (i = 0; i < drvdata->nr_addr_cmp; i++) {
380 etm_writel(drvdata, config->addr_val[i], ETMACVRn(i));
381 etm_writel(drvdata, config->addr_acctype[i], ETMACTRn(i));
382 }
383 for (i = 0; i < drvdata->nr_cntr; i++) {
384 etm_writel(drvdata, config->cntr_rld_val[i], ETMCNTRLDVRn(i));
385 etm_writel(drvdata, config->cntr_event[i], ETMCNTENRn(i));
386 etm_writel(drvdata, config->cntr_rld_event[i],
387 ETMCNTRLDEVRn(i));
388 etm_writel(drvdata, config->cntr_val[i], ETMCNTVRn(i));
389 }
390 etm_writel(drvdata, config->seq_12_event, ETMSQ12EVR);
391 etm_writel(drvdata, config->seq_21_event, ETMSQ21EVR);
392 etm_writel(drvdata, config->seq_23_event, ETMSQ23EVR);
393 etm_writel(drvdata, config->seq_31_event, ETMSQ31EVR);
394 etm_writel(drvdata, config->seq_32_event, ETMSQ32EVR);
395 etm_writel(drvdata, config->seq_13_event, ETMSQ13EVR);
396 etm_writel(drvdata, config->seq_curr_state, ETMSQR);
397 for (i = 0; i < drvdata->nr_ext_out; i++)
398 etm_writel(drvdata, ETM_DEFAULT_EVENT_VAL, ETMEXTOUTEVRn(i));
399 for (i = 0; i < drvdata->nr_ctxid_cmp; i++)
400 etm_writel(drvdata, config->ctxid_pid[i], ETMCIDCVRn(i));
401 etm_writel(drvdata, config->ctxid_mask, ETMCIDCMR);
402 etm_writel(drvdata, config->sync_freq, ETMSYNCFR);
403 /* No external input selected */
404 etm_writel(drvdata, 0x0, ETMEXTINSELR);
405 etm_writel(drvdata, config->timestamp_event, ETMTSEVR);
406 /* No auxiliary control selected */
407 etm_writel(drvdata, 0x0, ETMAUXCR);
408 etm_writel(drvdata, drvdata->traceid, ETMTRACEIDR);
409 /* No VMID comparator value selected */
410 etm_writel(drvdata, 0x0, ETMVMIDCVR);
411
412 etm_clr_prog(drvdata);
413 CS_LOCK(drvdata->base);
414
415 dev_dbg(drvdata->dev, "cpu: %d enable smp call done\n", drvdata->cpu);
416}
417
418static int etm_cpu_id(struct coresight_device *csdev)
419{
420 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
421
422 return drvdata->cpu;
423}
424
425int etm_get_trace_id(struct etm_drvdata *drvdata)
426{
427 unsigned long flags;
428 int trace_id = -1;
429
430 if (!drvdata)
431 goto out;
432
433 if (!local_read(&drvdata->mode))
434 return drvdata->traceid;
435
436 pm_runtime_get_sync(drvdata->dev);
437
438 spin_lock_irqsave(&drvdata->spinlock, flags);
439
440 CS_UNLOCK(drvdata->base);
441 trace_id = (etm_readl(drvdata, ETMTRACEIDR) & ETM_TRACEID_MASK);
442 CS_LOCK(drvdata->base);
443
444 spin_unlock_irqrestore(&drvdata->spinlock, flags);
445 pm_runtime_put(drvdata->dev);
446
447out:
448 return trace_id;
449
450}
451
452static int etm_trace_id(struct coresight_device *csdev)
453{
454 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
455
456 return etm_get_trace_id(drvdata);
457}
458
459static int etm_enable_perf(struct coresight_device *csdev,
460 struct perf_event_attr *attr)
461{
462 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
463
464 if (WARN_ON_ONCE(drvdata->cpu != smp_processor_id()))
465 return -EINVAL;
466
467 /* Configure the tracer based on the session's specifics */
468 etm_parse_event_config(drvdata, attr);
469 /* And enable it */
470 etm_enable_hw(drvdata);
471
472 return 0;
473}
474
475static int etm_enable_sysfs(struct coresight_device *csdev)
476{
477 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
478 int ret;
479
480 spin_lock(&drvdata->spinlock);
481
482 /*
483 * Configure the ETM only if the CPU is online. If it isn't online
484 * hw configuration will take place when 'CPU_STARTING' is received
485 * in @etm_cpu_callback.
486 */
487 if (cpu_online(drvdata->cpu)) {
488 ret = smp_call_function_single(drvdata->cpu,
489 etm_enable_hw, drvdata, 1);
490 if (ret)
491 goto err;
492 }
493
494 drvdata->sticky_enable = true;
495 spin_unlock(&drvdata->spinlock);
496
497 dev_info(drvdata->dev, "ETM tracing enabled\n");
498 return 0;
499
500err:
501 spin_unlock(&drvdata->spinlock);
502 return ret;
503}
504
505static int etm_enable(struct coresight_device *csdev,
506 struct perf_event_attr *attr, u32 mode)
507{
508 int ret;
509 u32 val;
510 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
511
512 val = local_cmpxchg(&drvdata->mode, CS_MODE_DISABLED, mode);
513
514 /* Someone is already using the tracer */
515 if (val)
516 return -EBUSY;
517
518 switch (mode) {
519 case CS_MODE_SYSFS:
520 ret = etm_enable_sysfs(csdev);
521 break;
522 case CS_MODE_PERF:
523 ret = etm_enable_perf(csdev, attr);
524 break;
525 default:
526 ret = -EINVAL;
527 }
528
529 /* The tracer didn't start */
530 if (ret)
531 local_set(&drvdata->mode, CS_MODE_DISABLED);
532
533 return ret;
534}
535
536static void etm_disable_hw(void *info)
537{
538 int i;
539 struct etm_drvdata *drvdata = info;
540 struct etm_config *config = &drvdata->config;
541
542 CS_UNLOCK(drvdata->base);
543 etm_set_prog(drvdata);
544
545 /* Read back sequencer and counters for post trace analysis */
546 config->seq_curr_state = (etm_readl(drvdata, ETMSQR) & ETM_SQR_MASK);
547
548 for (i = 0; i < drvdata->nr_cntr; i++)
549 config->cntr_val[i] = etm_readl(drvdata, ETMCNTVRn(i));
550
551 etm_set_pwrdwn(drvdata);
552 CS_LOCK(drvdata->base);
553
554 dev_dbg(drvdata->dev, "cpu: %d disable smp call done\n", drvdata->cpu);
555}
556
557static void etm_disable_perf(struct coresight_device *csdev)
558{
559 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
560
561 if (WARN_ON_ONCE(drvdata->cpu != smp_processor_id()))
562 return;
563
564 CS_UNLOCK(drvdata->base);
565
566 /* Setting the prog bit disables tracing immediately */
567 etm_set_prog(drvdata);
568
569 /*
570 * There is no way to know when the tracer will be used again so
571 * power down the tracer.
572 */
573 etm_set_pwrdwn(drvdata);
574
575 CS_LOCK(drvdata->base);
576}
577
578static void etm_disable_sysfs(struct coresight_device *csdev)
579{
580 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
581
582 /*
583 * Taking hotplug lock here protects from clocks getting disabled
584 * with tracing being left on (crash scenario) if user disable occurs
585 * after cpu online mask indicates the cpu is offline but before the
586 * DYING hotplug callback is serviced by the ETM driver.
587 */
588 get_online_cpus();
589 spin_lock(&drvdata->spinlock);
590
591 /*
592 * Executing etm_disable_hw on the cpu whose ETM is being disabled
593 * ensures that register writes occur when cpu is powered.
594 */
595 smp_call_function_single(drvdata->cpu, etm_disable_hw, drvdata, 1);
596
597 spin_unlock(&drvdata->spinlock);
598 put_online_cpus();
599
600 dev_info(drvdata->dev, "ETM tracing disabled\n");
601}
602
603static void etm_disable(struct coresight_device *csdev)
604{
605 u32 mode;
606 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
607
608 /*
609 * For as long as the tracer isn't disabled another entity can't
610 * change its status. As such we can read the status here without
611 * fearing it will change under us.
612 */
613 mode = local_read(&drvdata->mode);
614
615 switch (mode) {
616 case CS_MODE_DISABLED:
617 break;
618 case CS_MODE_SYSFS:
619 etm_disable_sysfs(csdev);
620 break;
621 case CS_MODE_PERF:
622 etm_disable_perf(csdev);
623 break;
624 default:
625 WARN_ON_ONCE(mode);
626 return;
627 }
628
629 if (mode)
630 local_set(&drvdata->mode, CS_MODE_DISABLED);
631}
632
633static const struct coresight_ops_source etm_source_ops = {
634 .cpu_id = etm_cpu_id,
635 .trace_id = etm_trace_id,
636 .enable = etm_enable,
637 .disable = etm_disable,
638};
639
640static const struct coresight_ops etm_cs_ops = {
641 .source_ops = &etm_source_ops,
642};
643
644static int etm_cpu_callback(struct notifier_block *nfb, unsigned long action,
645 void *hcpu)
646{
647 unsigned int cpu = (unsigned long)hcpu;
648
649 if (!etmdrvdata[cpu])
650 goto out;
651
652 switch (action & (~CPU_TASKS_FROZEN)) {
653 case CPU_STARTING:
654 spin_lock(&etmdrvdata[cpu]->spinlock);
655 if (!etmdrvdata[cpu]->os_unlock) {
656 etm_os_unlock(etmdrvdata[cpu]);
657 etmdrvdata[cpu]->os_unlock = true;
658 }
659
660 if (local_read(&etmdrvdata[cpu]->mode))
661 etm_enable_hw(etmdrvdata[cpu]);
662 spin_unlock(&etmdrvdata[cpu]->spinlock);
663 break;
664
665 case CPU_ONLINE:
666 if (etmdrvdata[cpu]->boot_enable &&
667 !etmdrvdata[cpu]->sticky_enable)
668 coresight_enable(etmdrvdata[cpu]->csdev);
669 break;
670
671 case CPU_DYING:
672 spin_lock(&etmdrvdata[cpu]->spinlock);
673 if (local_read(&etmdrvdata[cpu]->mode))
674 etm_disable_hw(etmdrvdata[cpu]);
675 spin_unlock(&etmdrvdata[cpu]->spinlock);
676 break;
677 }
678out:
679 return NOTIFY_OK;
680}
681
682static struct notifier_block etm_cpu_notifier = {
683 .notifier_call = etm_cpu_callback,
684};
685
686static bool etm_arch_supported(u8 arch)
687{
688 switch (arch) {
689 case ETM_ARCH_V3_3:
690 break;
691 case ETM_ARCH_V3_5:
692 break;
693 case PFT_ARCH_V1_0:
694 break;
695 case PFT_ARCH_V1_1:
696 break;
697 default:
698 return false;
699 }
700 return true;
701}
702
703static void etm_init_arch_data(void *info)
704{
705 u32 etmidr;
706 u32 etmccr;
707 struct etm_drvdata *drvdata = info;
708
709 /* Make sure all registers are accessible */
710 etm_os_unlock(drvdata);
711
712 CS_UNLOCK(drvdata->base);
713
714 /* First dummy read */
715 (void)etm_readl(drvdata, ETMPDSR);
716 /* Provide power to ETM: ETMPDCR[3] == 1 */
717 etm_set_pwrup(drvdata);
718 /*
719 * Clear power down bit since when this bit is set writes to
720 * certain registers might be ignored.
721 */
722 etm_clr_pwrdwn(drvdata);
723 /*
724 * Set prog bit. It will be set from reset but this is included to
725 * ensure it is set
726 */
727 etm_set_prog(drvdata);
728
729 /* Find all capabilities */
730 etmidr = etm_readl(drvdata, ETMIDR);
731 drvdata->arch = BMVAL(etmidr, 4, 11);
732 drvdata->port_size = etm_readl(drvdata, ETMCR) & PORT_SIZE_MASK;
733
734 drvdata->etmccer = etm_readl(drvdata, ETMCCER);
735 etmccr = etm_readl(drvdata, ETMCCR);
736 drvdata->etmccr = etmccr;
737 drvdata->nr_addr_cmp = BMVAL(etmccr, 0, 3) * 2;
738 drvdata->nr_cntr = BMVAL(etmccr, 13, 15);
739 drvdata->nr_ext_inp = BMVAL(etmccr, 17, 19);
740 drvdata->nr_ext_out = BMVAL(etmccr, 20, 22);
741 drvdata->nr_ctxid_cmp = BMVAL(etmccr, 24, 25);
742
743 etm_set_pwrdwn(drvdata);
744 etm_clr_pwrup(drvdata);
745 CS_LOCK(drvdata->base);
746}
747
748static void etm_init_trace_id(struct etm_drvdata *drvdata)
749{
750 drvdata->traceid = coresight_get_trace_id(drvdata->cpu);
751}
752
753static int etm_probe(struct amba_device *adev, const struct amba_id *id)
754{
755 int ret;
756 void __iomem *base;
757 struct device *dev = &adev->dev;
758 struct coresight_platform_data *pdata = NULL;
759 struct etm_drvdata *drvdata;
760 struct resource *res = &adev->res;
761 struct coresight_desc *desc;
762 struct device_node *np = adev->dev.of_node;
763
764 desc = devm_kzalloc(dev, sizeof(*desc), GFP_KERNEL);
765 if (!desc)
766 return -ENOMEM;
767
768 drvdata = devm_kzalloc(dev, sizeof(*drvdata), GFP_KERNEL);
769 if (!drvdata)
770 return -ENOMEM;
771
772 if (np) {
773 pdata = of_get_coresight_platform_data(dev, np);
774 if (IS_ERR(pdata))
775 return PTR_ERR(pdata);
776
777 adev->dev.platform_data = pdata;
778 drvdata->use_cp14 = of_property_read_bool(np, "arm,cp14");
779 }
780
781 drvdata->dev = &adev->dev;
782 dev_set_drvdata(dev, drvdata);
783
784 /* Validity for the resource is already checked by the AMBA core */
785 base = devm_ioremap_resource(dev, res);
786 if (IS_ERR(base))
787 return PTR_ERR(base);
788
789 drvdata->base = base;
790
791 spin_lock_init(&drvdata->spinlock);
792
793 drvdata->atclk = devm_clk_get(&adev->dev, "atclk"); /* optional */
794 if (!IS_ERR(drvdata->atclk)) {
795 ret = clk_prepare_enable(drvdata->atclk);
796 if (ret)
797 return ret;
798 }
799
800 drvdata->cpu = pdata ? pdata->cpu : 0;
801
802 get_online_cpus();
803 etmdrvdata[drvdata->cpu] = drvdata;
804
805 if (smp_call_function_single(drvdata->cpu,
806 etm_init_arch_data, drvdata, 1))
807 dev_err(dev, "ETM arch init failed\n");
808
809 if (!etm_count++)
810 register_hotcpu_notifier(&etm_cpu_notifier);
811
812 put_online_cpus();
813
814 if (etm_arch_supported(drvdata->arch) == false) {
815 ret = -EINVAL;
816 goto err_arch_supported;
817 }
818
819 etm_init_trace_id(drvdata);
820 etm_set_default(&drvdata->config);
821
822 desc->type = CORESIGHT_DEV_TYPE_SOURCE;
823 desc->subtype.source_subtype = CORESIGHT_DEV_SUBTYPE_SOURCE_PROC;
824 desc->ops = &etm_cs_ops;
825 desc->pdata = pdata;
826 desc->dev = dev;
827 desc->groups = coresight_etm_groups;
828 drvdata->csdev = coresight_register(desc);
829 if (IS_ERR(drvdata->csdev)) {
830 ret = PTR_ERR(drvdata->csdev);
831 goto err_arch_supported;
832 }
833
834 ret = etm_perf_symlink(drvdata->csdev, true);
835 if (ret) {
836 coresight_unregister(drvdata->csdev);
837 goto err_arch_supported;
838 }
839
840 pm_runtime_put(&adev->dev);
841 dev_info(dev, "%s initialized\n", (char *)id->data);
842
843 if (boot_enable) {
844 coresight_enable(drvdata->csdev);
845 drvdata->boot_enable = true;
846 }
847
848 return 0;
849
850err_arch_supported:
851 if (--etm_count == 0)
852 unregister_hotcpu_notifier(&etm_cpu_notifier);
853 return ret;
854}
855
856#ifdef CONFIG_PM
857static int etm_runtime_suspend(struct device *dev)
858{
859 struct etm_drvdata *drvdata = dev_get_drvdata(dev);
860
861 if (drvdata && !IS_ERR(drvdata->atclk))
862 clk_disable_unprepare(drvdata->atclk);
863
864 return 0;
865}
866
867static int etm_runtime_resume(struct device *dev)
868{
869 struct etm_drvdata *drvdata = dev_get_drvdata(dev);
870
871 if (drvdata && !IS_ERR(drvdata->atclk))
872 clk_prepare_enable(drvdata->atclk);
873
874 return 0;
875}
876#endif
877
878static const struct dev_pm_ops etm_dev_pm_ops = {
879 SET_RUNTIME_PM_OPS(etm_runtime_suspend, etm_runtime_resume, NULL)
880};
881
882static struct amba_id etm_ids[] = {
883 { /* ETM 3.3 */
884 .id = 0x0003b921,
885 .mask = 0x0003ffff,
886 .data = "ETM 3.3",
887 },
888 { /* ETM 3.5 */
889 .id = 0x0003b956,
890 .mask = 0x0003ffff,
891 .data = "ETM 3.5",
892 },
893 { /* PTM 1.0 */
894 .id = 0x0003b950,
895 .mask = 0x0003ffff,
896 .data = "PTM 1.0",
897 },
898 { /* PTM 1.1 */
899 .id = 0x0003b95f,
900 .mask = 0x0003ffff,
901 .data = "PTM 1.1",
902 },
903 { /* PTM 1.1 Qualcomm */
904 .id = 0x0003006f,
905 .mask = 0x0003ffff,
906 .data = "PTM 1.1",
907 },
908 { 0, 0},
909};
910
911static struct amba_driver etm_driver = {
912 .drv = {
913 .name = "coresight-etm3x",
914 .owner = THIS_MODULE,
915 .pm = &etm_dev_pm_ops,
916 .suppress_bind_attrs = true,
917 },
918 .probe = etm_probe,
919 .id_table = etm_ids,
920};
921builtin_amba_driver(etm_driver);
1/* Copyright (c) 2011-2012, The Linux Foundation. All rights reserved.
2 *
3 * Description: CoreSight Program Flow Trace driver
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 and
7 * only version 2 as published by the Free Software Foundation.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 */
14
15#include <linux/kernel.h>
16#include <linux/moduleparam.h>
17#include <linux/init.h>
18#include <linux/types.h>
19#include <linux/device.h>
20#include <linux/io.h>
21#include <linux/err.h>
22#include <linux/fs.h>
23#include <linux/slab.h>
24#include <linux/delay.h>
25#include <linux/smp.h>
26#include <linux/sysfs.h>
27#include <linux/stat.h>
28#include <linux/pm_runtime.h>
29#include <linux/cpu.h>
30#include <linux/of.h>
31#include <linux/coresight.h>
32#include <linux/coresight-pmu.h>
33#include <linux/amba/bus.h>
34#include <linux/seq_file.h>
35#include <linux/uaccess.h>
36#include <linux/clk.h>
37#include <linux/perf_event.h>
38#include <asm/sections.h>
39
40#include "coresight-etm.h"
41#include "coresight-etm-perf.h"
42
43/*
44 * Not really modular but using module_param is the easiest way to
45 * remain consistent with existing use cases for now.
46 */
47static int boot_enable;
48module_param_named(boot_enable, boot_enable, int, S_IRUGO);
49
50/* The number of ETM/PTM currently registered */
51static int etm_count;
52static struct etm_drvdata *etmdrvdata[NR_CPUS];
53
54static enum cpuhp_state hp_online;
55
56/*
57 * Memory mapped writes to clear os lock are not supported on some processors
58 * and OS lock must be unlocked before any memory mapped access on such
59 * processors, otherwise memory mapped reads/writes will be invalid.
60 */
61static void etm_os_unlock(struct etm_drvdata *drvdata)
62{
63 /* Writing any value to ETMOSLAR unlocks the trace registers */
64 etm_writel(drvdata, 0x0, ETMOSLAR);
65 drvdata->os_unlock = true;
66 isb();
67}
68
69static void etm_set_pwrdwn(struct etm_drvdata *drvdata)
70{
71 u32 etmcr;
72
73 /* Ensure pending cp14 accesses complete before setting pwrdwn */
74 mb();
75 isb();
76 etmcr = etm_readl(drvdata, ETMCR);
77 etmcr |= ETMCR_PWD_DWN;
78 etm_writel(drvdata, etmcr, ETMCR);
79}
80
81static void etm_clr_pwrdwn(struct etm_drvdata *drvdata)
82{
83 u32 etmcr;
84
85 etmcr = etm_readl(drvdata, ETMCR);
86 etmcr &= ~ETMCR_PWD_DWN;
87 etm_writel(drvdata, etmcr, ETMCR);
88 /* Ensure pwrup completes before subsequent cp14 accesses */
89 mb();
90 isb();
91}
92
93static void etm_set_pwrup(struct etm_drvdata *drvdata)
94{
95 u32 etmpdcr;
96
97 etmpdcr = readl_relaxed(drvdata->base + ETMPDCR);
98 etmpdcr |= ETMPDCR_PWD_UP;
99 writel_relaxed(etmpdcr, drvdata->base + ETMPDCR);
100 /* Ensure pwrup completes before subsequent cp14 accesses */
101 mb();
102 isb();
103}
104
105static void etm_clr_pwrup(struct etm_drvdata *drvdata)
106{
107 u32 etmpdcr;
108
109 /* Ensure pending cp14 accesses complete before clearing pwrup */
110 mb();
111 isb();
112 etmpdcr = readl_relaxed(drvdata->base + ETMPDCR);
113 etmpdcr &= ~ETMPDCR_PWD_UP;
114 writel_relaxed(etmpdcr, drvdata->base + ETMPDCR);
115}
116
117/**
118 * coresight_timeout_etm - loop until a bit has changed to a specific state.
119 * @drvdata: etm's private data structure.
120 * @offset: address of a register, starting from @addr.
121 * @position: the position of the bit of interest.
122 * @value: the value the bit should have.
123 *
124 * Basically the same as @coresight_timeout except for the register access
125 * method where we have to account for CP14 configurations.
126
127 * Return: 0 as soon as the bit has taken the desired state or -EAGAIN if
128 * TIMEOUT_US has elapsed, which ever happens first.
129 */
130
131static int coresight_timeout_etm(struct etm_drvdata *drvdata, u32 offset,
132 int position, int value)
133{
134 int i;
135 u32 val;
136
137 for (i = TIMEOUT_US; i > 0; i--) {
138 val = etm_readl(drvdata, offset);
139 /* Waiting on the bit to go from 0 to 1 */
140 if (value) {
141 if (val & BIT(position))
142 return 0;
143 /* Waiting on the bit to go from 1 to 0 */
144 } else {
145 if (!(val & BIT(position)))
146 return 0;
147 }
148
149 /*
150 * Delay is arbitrary - the specification doesn't say how long
151 * we are expected to wait. Extra check required to make sure
152 * we don't wait needlessly on the last iteration.
153 */
154 if (i - 1)
155 udelay(1);
156 }
157
158 return -EAGAIN;
159}
160
161
162static void etm_set_prog(struct etm_drvdata *drvdata)
163{
164 u32 etmcr;
165
166 etmcr = etm_readl(drvdata, ETMCR);
167 etmcr |= ETMCR_ETM_PRG;
168 etm_writel(drvdata, etmcr, ETMCR);
169 /*
170 * Recommended by spec for cp14 accesses to ensure etmcr write is
171 * complete before polling etmsr
172 */
173 isb();
174 if (coresight_timeout_etm(drvdata, ETMSR, ETMSR_PROG_BIT, 1)) {
175 dev_err(drvdata->dev,
176 "%s: timeout observed when probing at offset %#x\n",
177 __func__, ETMSR);
178 }
179}
180
181static void etm_clr_prog(struct etm_drvdata *drvdata)
182{
183 u32 etmcr;
184
185 etmcr = etm_readl(drvdata, ETMCR);
186 etmcr &= ~ETMCR_ETM_PRG;
187 etm_writel(drvdata, etmcr, ETMCR);
188 /*
189 * Recommended by spec for cp14 accesses to ensure etmcr write is
190 * complete before polling etmsr
191 */
192 isb();
193 if (coresight_timeout_etm(drvdata, ETMSR, ETMSR_PROG_BIT, 0)) {
194 dev_err(drvdata->dev,
195 "%s: timeout observed when probing at offset %#x\n",
196 __func__, ETMSR);
197 }
198}
199
200void etm_set_default(struct etm_config *config)
201{
202 int i;
203
204 if (WARN_ON_ONCE(!config))
205 return;
206
207 /*
208 * Taken verbatim from the TRM:
209 *
210 * To trace all memory:
211 * set bit [24] in register 0x009, the ETMTECR1, to 1
212 * set all other bits in register 0x009, the ETMTECR1, to 0
213 * set all bits in register 0x007, the ETMTECR2, to 0
214 * set register 0x008, the ETMTEEVR, to 0x6F (TRUE).
215 */
216 config->enable_ctrl1 = BIT(24);
217 config->enable_ctrl2 = 0x0;
218 config->enable_event = ETM_HARD_WIRE_RES_A;
219
220 config->trigger_event = ETM_DEFAULT_EVENT_VAL;
221 config->enable_event = ETM_HARD_WIRE_RES_A;
222
223 config->seq_12_event = ETM_DEFAULT_EVENT_VAL;
224 config->seq_21_event = ETM_DEFAULT_EVENT_VAL;
225 config->seq_23_event = ETM_DEFAULT_EVENT_VAL;
226 config->seq_31_event = ETM_DEFAULT_EVENT_VAL;
227 config->seq_32_event = ETM_DEFAULT_EVENT_VAL;
228 config->seq_13_event = ETM_DEFAULT_EVENT_VAL;
229 config->timestamp_event = ETM_DEFAULT_EVENT_VAL;
230
231 for (i = 0; i < ETM_MAX_CNTR; i++) {
232 config->cntr_rld_val[i] = 0x0;
233 config->cntr_event[i] = ETM_DEFAULT_EVENT_VAL;
234 config->cntr_rld_event[i] = ETM_DEFAULT_EVENT_VAL;
235 config->cntr_val[i] = 0x0;
236 }
237
238 config->seq_curr_state = 0x0;
239 config->ctxid_idx = 0x0;
240 for (i = 0; i < ETM_MAX_CTXID_CMP; i++) {
241 config->ctxid_pid[i] = 0x0;
242 config->ctxid_vpid[i] = 0x0;
243 }
244
245 config->ctxid_mask = 0x0;
246}
247
248void etm_config_trace_mode(struct etm_config *config)
249{
250 u32 flags, mode;
251
252 mode = config->mode;
253
254 mode &= (ETM_MODE_EXCL_KERN | ETM_MODE_EXCL_USER);
255
256 /* excluding kernel AND user space doesn't make sense */
257 if (mode == (ETM_MODE_EXCL_KERN | ETM_MODE_EXCL_USER))
258 return;
259
260 /* nothing to do if neither flags are set */
261 if (!(mode & ETM_MODE_EXCL_KERN) && !(mode & ETM_MODE_EXCL_USER))
262 return;
263
264 flags = (1 << 0 | /* instruction execute */
265 3 << 3 | /* ARM instruction */
266 0 << 5 | /* No data value comparison */
267 0 << 7 | /* No exact mach */
268 0 << 8); /* Ignore context ID */
269
270 /* No need to worry about single address comparators. */
271 config->enable_ctrl2 = 0x0;
272
273 /* Bit 0 is address range comparator 1 */
274 config->enable_ctrl1 = ETMTECR1_ADDR_COMP_1;
275
276 /*
277 * On ETMv3.5:
278 * ETMACTRn[13,11] == Non-secure state comparison control
279 * ETMACTRn[12,10] == Secure state comparison control
280 *
281 * b00 == Match in all modes in this state
282 * b01 == Do not match in any more in this state
283 * b10 == Match in all modes excepts user mode in this state
284 * b11 == Match only in user mode in this state
285 */
286
287 /* Tracing in secure mode is not supported at this time */
288 flags |= (0 << 12 | 1 << 10);
289
290 if (mode & ETM_MODE_EXCL_USER) {
291 /* exclude user, match all modes except user mode */
292 flags |= (1 << 13 | 0 << 11);
293 } else {
294 /* exclude kernel, match only in user mode */
295 flags |= (1 << 13 | 1 << 11);
296 }
297
298 /*
299 * The ETMEEVR register is already set to "hard wire A". As such
300 * all there is to do is setup an address comparator that spans
301 * the entire address range and configure the state and mode bits.
302 */
303 config->addr_val[0] = (u32) 0x0;
304 config->addr_val[1] = (u32) ~0x0;
305 config->addr_acctype[0] = flags;
306 config->addr_acctype[1] = flags;
307 config->addr_type[0] = ETM_ADDR_TYPE_RANGE;
308 config->addr_type[1] = ETM_ADDR_TYPE_RANGE;
309}
310
311#define ETM3X_SUPPORTED_OPTIONS (ETMCR_CYC_ACC | ETMCR_TIMESTAMP_EN)
312
313static int etm_parse_event_config(struct etm_drvdata *drvdata,
314 struct perf_event *event)
315{
316 struct etm_config *config = &drvdata->config;
317 struct perf_event_attr *attr = &event->attr;
318
319 if (!attr)
320 return -EINVAL;
321
322 /* Clear configuration from previous run */
323 memset(config, 0, sizeof(struct etm_config));
324
325 if (attr->exclude_kernel)
326 config->mode = ETM_MODE_EXCL_KERN;
327
328 if (attr->exclude_user)
329 config->mode = ETM_MODE_EXCL_USER;
330
331 /* Always start from the default config */
332 etm_set_default(config);
333
334 /*
335 * By default the tracers are configured to trace the whole address
336 * range. Narrow the field only if requested by user space.
337 */
338 if (config->mode)
339 etm_config_trace_mode(config);
340
341 /*
342 * At this time only cycle accurate and timestamp options are
343 * available.
344 */
345 if (attr->config & ~ETM3X_SUPPORTED_OPTIONS)
346 return -EINVAL;
347
348 config->ctrl = attr->config;
349
350 return 0;
351}
352
353static void etm_enable_hw(void *info)
354{
355 int i;
356 u32 etmcr;
357 struct etm_drvdata *drvdata = info;
358 struct etm_config *config = &drvdata->config;
359
360 CS_UNLOCK(drvdata->base);
361
362 /* Turn engine on */
363 etm_clr_pwrdwn(drvdata);
364 /* Apply power to trace registers */
365 etm_set_pwrup(drvdata);
366 /* Make sure all registers are accessible */
367 etm_os_unlock(drvdata);
368
369 etm_set_prog(drvdata);
370
371 etmcr = etm_readl(drvdata, ETMCR);
372 /* Clear setting from a previous run if need be */
373 etmcr &= ~ETM3X_SUPPORTED_OPTIONS;
374 etmcr |= drvdata->port_size;
375 etmcr |= ETMCR_ETM_EN;
376 etm_writel(drvdata, config->ctrl | etmcr, ETMCR);
377 etm_writel(drvdata, config->trigger_event, ETMTRIGGER);
378 etm_writel(drvdata, config->startstop_ctrl, ETMTSSCR);
379 etm_writel(drvdata, config->enable_event, ETMTEEVR);
380 etm_writel(drvdata, config->enable_ctrl1, ETMTECR1);
381 etm_writel(drvdata, config->fifofull_level, ETMFFLR);
382 for (i = 0; i < drvdata->nr_addr_cmp; i++) {
383 etm_writel(drvdata, config->addr_val[i], ETMACVRn(i));
384 etm_writel(drvdata, config->addr_acctype[i], ETMACTRn(i));
385 }
386 for (i = 0; i < drvdata->nr_cntr; i++) {
387 etm_writel(drvdata, config->cntr_rld_val[i], ETMCNTRLDVRn(i));
388 etm_writel(drvdata, config->cntr_event[i], ETMCNTENRn(i));
389 etm_writel(drvdata, config->cntr_rld_event[i],
390 ETMCNTRLDEVRn(i));
391 etm_writel(drvdata, config->cntr_val[i], ETMCNTVRn(i));
392 }
393 etm_writel(drvdata, config->seq_12_event, ETMSQ12EVR);
394 etm_writel(drvdata, config->seq_21_event, ETMSQ21EVR);
395 etm_writel(drvdata, config->seq_23_event, ETMSQ23EVR);
396 etm_writel(drvdata, config->seq_31_event, ETMSQ31EVR);
397 etm_writel(drvdata, config->seq_32_event, ETMSQ32EVR);
398 etm_writel(drvdata, config->seq_13_event, ETMSQ13EVR);
399 etm_writel(drvdata, config->seq_curr_state, ETMSQR);
400 for (i = 0; i < drvdata->nr_ext_out; i++)
401 etm_writel(drvdata, ETM_DEFAULT_EVENT_VAL, ETMEXTOUTEVRn(i));
402 for (i = 0; i < drvdata->nr_ctxid_cmp; i++)
403 etm_writel(drvdata, config->ctxid_pid[i], ETMCIDCVRn(i));
404 etm_writel(drvdata, config->ctxid_mask, ETMCIDCMR);
405 etm_writel(drvdata, config->sync_freq, ETMSYNCFR);
406 /* No external input selected */
407 etm_writel(drvdata, 0x0, ETMEXTINSELR);
408 etm_writel(drvdata, config->timestamp_event, ETMTSEVR);
409 /* No auxiliary control selected */
410 etm_writel(drvdata, 0x0, ETMAUXCR);
411 etm_writel(drvdata, drvdata->traceid, ETMTRACEIDR);
412 /* No VMID comparator value selected */
413 etm_writel(drvdata, 0x0, ETMVMIDCVR);
414
415 etm_clr_prog(drvdata);
416 CS_LOCK(drvdata->base);
417
418 dev_dbg(drvdata->dev, "cpu: %d enable smp call done\n", drvdata->cpu);
419}
420
421static int etm_cpu_id(struct coresight_device *csdev)
422{
423 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
424
425 return drvdata->cpu;
426}
427
428int etm_get_trace_id(struct etm_drvdata *drvdata)
429{
430 unsigned long flags;
431 int trace_id = -1;
432
433 if (!drvdata)
434 goto out;
435
436 if (!local_read(&drvdata->mode))
437 return drvdata->traceid;
438
439 pm_runtime_get_sync(drvdata->dev);
440
441 spin_lock_irqsave(&drvdata->spinlock, flags);
442
443 CS_UNLOCK(drvdata->base);
444 trace_id = (etm_readl(drvdata, ETMTRACEIDR) & ETM_TRACEID_MASK);
445 CS_LOCK(drvdata->base);
446
447 spin_unlock_irqrestore(&drvdata->spinlock, flags);
448 pm_runtime_put(drvdata->dev);
449
450out:
451 return trace_id;
452
453}
454
455static int etm_trace_id(struct coresight_device *csdev)
456{
457 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
458
459 return etm_get_trace_id(drvdata);
460}
461
462static int etm_enable_perf(struct coresight_device *csdev,
463 struct perf_event *event)
464{
465 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
466
467 if (WARN_ON_ONCE(drvdata->cpu != smp_processor_id()))
468 return -EINVAL;
469
470 /* Configure the tracer based on the session's specifics */
471 etm_parse_event_config(drvdata, event);
472 /* And enable it */
473 etm_enable_hw(drvdata);
474
475 return 0;
476}
477
478static int etm_enable_sysfs(struct coresight_device *csdev)
479{
480 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
481 int ret;
482
483 spin_lock(&drvdata->spinlock);
484
485 /*
486 * Configure the ETM only if the CPU is online. If it isn't online
487 * hw configuration will take place on the local CPU during bring up.
488 */
489 if (cpu_online(drvdata->cpu)) {
490 ret = smp_call_function_single(drvdata->cpu,
491 etm_enable_hw, drvdata, 1);
492 if (ret)
493 goto err;
494 }
495
496 drvdata->sticky_enable = true;
497 spin_unlock(&drvdata->spinlock);
498
499 dev_info(drvdata->dev, "ETM tracing enabled\n");
500 return 0;
501
502err:
503 spin_unlock(&drvdata->spinlock);
504 return ret;
505}
506
507static int etm_enable(struct coresight_device *csdev,
508 struct perf_event *event, u32 mode)
509{
510 int ret;
511 u32 val;
512 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
513
514 val = local_cmpxchg(&drvdata->mode, CS_MODE_DISABLED, mode);
515
516 /* Someone is already using the tracer */
517 if (val)
518 return -EBUSY;
519
520 switch (mode) {
521 case CS_MODE_SYSFS:
522 ret = etm_enable_sysfs(csdev);
523 break;
524 case CS_MODE_PERF:
525 ret = etm_enable_perf(csdev, event);
526 break;
527 default:
528 ret = -EINVAL;
529 }
530
531 /* The tracer didn't start */
532 if (ret)
533 local_set(&drvdata->mode, CS_MODE_DISABLED);
534
535 return ret;
536}
537
538static void etm_disable_hw(void *info)
539{
540 int i;
541 struct etm_drvdata *drvdata = info;
542 struct etm_config *config = &drvdata->config;
543
544 CS_UNLOCK(drvdata->base);
545 etm_set_prog(drvdata);
546
547 /* Read back sequencer and counters for post trace analysis */
548 config->seq_curr_state = (etm_readl(drvdata, ETMSQR) & ETM_SQR_MASK);
549
550 for (i = 0; i < drvdata->nr_cntr; i++)
551 config->cntr_val[i] = etm_readl(drvdata, ETMCNTVRn(i));
552
553 etm_set_pwrdwn(drvdata);
554 CS_LOCK(drvdata->base);
555
556 dev_dbg(drvdata->dev, "cpu: %d disable smp call done\n", drvdata->cpu);
557}
558
559static void etm_disable_perf(struct coresight_device *csdev)
560{
561 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
562
563 if (WARN_ON_ONCE(drvdata->cpu != smp_processor_id()))
564 return;
565
566 CS_UNLOCK(drvdata->base);
567
568 /* Setting the prog bit disables tracing immediately */
569 etm_set_prog(drvdata);
570
571 /*
572 * There is no way to know when the tracer will be used again so
573 * power down the tracer.
574 */
575 etm_set_pwrdwn(drvdata);
576
577 CS_LOCK(drvdata->base);
578}
579
580static void etm_disable_sysfs(struct coresight_device *csdev)
581{
582 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
583
584 /*
585 * Taking hotplug lock here protects from clocks getting disabled
586 * with tracing being left on (crash scenario) if user disable occurs
587 * after cpu online mask indicates the cpu is offline but before the
588 * DYING hotplug callback is serviced by the ETM driver.
589 */
590 get_online_cpus();
591 spin_lock(&drvdata->spinlock);
592
593 /*
594 * Executing etm_disable_hw on the cpu whose ETM is being disabled
595 * ensures that register writes occur when cpu is powered.
596 */
597 smp_call_function_single(drvdata->cpu, etm_disable_hw, drvdata, 1);
598
599 spin_unlock(&drvdata->spinlock);
600 put_online_cpus();
601
602 dev_info(drvdata->dev, "ETM tracing disabled\n");
603}
604
605static void etm_disable(struct coresight_device *csdev,
606 struct perf_event *event)
607{
608 u32 mode;
609 struct etm_drvdata *drvdata = dev_get_drvdata(csdev->dev.parent);
610
611 /*
612 * For as long as the tracer isn't disabled another entity can't
613 * change its status. As such we can read the status here without
614 * fearing it will change under us.
615 */
616 mode = local_read(&drvdata->mode);
617
618 switch (mode) {
619 case CS_MODE_DISABLED:
620 break;
621 case CS_MODE_SYSFS:
622 etm_disable_sysfs(csdev);
623 break;
624 case CS_MODE_PERF:
625 etm_disable_perf(csdev);
626 break;
627 default:
628 WARN_ON_ONCE(mode);
629 return;
630 }
631
632 if (mode)
633 local_set(&drvdata->mode, CS_MODE_DISABLED);
634}
635
636static const struct coresight_ops_source etm_source_ops = {
637 .cpu_id = etm_cpu_id,
638 .trace_id = etm_trace_id,
639 .enable = etm_enable,
640 .disable = etm_disable,
641};
642
643static const struct coresight_ops etm_cs_ops = {
644 .source_ops = &etm_source_ops,
645};
646
647static int etm_online_cpu(unsigned int cpu)
648{
649 if (!etmdrvdata[cpu])
650 return 0;
651
652 if (etmdrvdata[cpu]->boot_enable && !etmdrvdata[cpu]->sticky_enable)
653 coresight_enable(etmdrvdata[cpu]->csdev);
654 return 0;
655}
656
657static int etm_starting_cpu(unsigned int cpu)
658{
659 if (!etmdrvdata[cpu])
660 return 0;
661
662 spin_lock(&etmdrvdata[cpu]->spinlock);
663 if (!etmdrvdata[cpu]->os_unlock) {
664 etm_os_unlock(etmdrvdata[cpu]);
665 etmdrvdata[cpu]->os_unlock = true;
666 }
667
668 if (local_read(&etmdrvdata[cpu]->mode))
669 etm_enable_hw(etmdrvdata[cpu]);
670 spin_unlock(&etmdrvdata[cpu]->spinlock);
671 return 0;
672}
673
674static int etm_dying_cpu(unsigned int cpu)
675{
676 if (!etmdrvdata[cpu])
677 return 0;
678
679 spin_lock(&etmdrvdata[cpu]->spinlock);
680 if (local_read(&etmdrvdata[cpu]->mode))
681 etm_disable_hw(etmdrvdata[cpu]);
682 spin_unlock(&etmdrvdata[cpu]->spinlock);
683 return 0;
684}
685
686static bool etm_arch_supported(u8 arch)
687{
688 switch (arch) {
689 case ETM_ARCH_V3_3:
690 break;
691 case ETM_ARCH_V3_5:
692 break;
693 case PFT_ARCH_V1_0:
694 break;
695 case PFT_ARCH_V1_1:
696 break;
697 default:
698 return false;
699 }
700 return true;
701}
702
703static void etm_init_arch_data(void *info)
704{
705 u32 etmidr;
706 u32 etmccr;
707 struct etm_drvdata *drvdata = info;
708
709 /* Make sure all registers are accessible */
710 etm_os_unlock(drvdata);
711
712 CS_UNLOCK(drvdata->base);
713
714 /* First dummy read */
715 (void)etm_readl(drvdata, ETMPDSR);
716 /* Provide power to ETM: ETMPDCR[3] == 1 */
717 etm_set_pwrup(drvdata);
718 /*
719 * Clear power down bit since when this bit is set writes to
720 * certain registers might be ignored.
721 */
722 etm_clr_pwrdwn(drvdata);
723 /*
724 * Set prog bit. It will be set from reset but this is included to
725 * ensure it is set
726 */
727 etm_set_prog(drvdata);
728
729 /* Find all capabilities */
730 etmidr = etm_readl(drvdata, ETMIDR);
731 drvdata->arch = BMVAL(etmidr, 4, 11);
732 drvdata->port_size = etm_readl(drvdata, ETMCR) & PORT_SIZE_MASK;
733
734 drvdata->etmccer = etm_readl(drvdata, ETMCCER);
735 etmccr = etm_readl(drvdata, ETMCCR);
736 drvdata->etmccr = etmccr;
737 drvdata->nr_addr_cmp = BMVAL(etmccr, 0, 3) * 2;
738 drvdata->nr_cntr = BMVAL(etmccr, 13, 15);
739 drvdata->nr_ext_inp = BMVAL(etmccr, 17, 19);
740 drvdata->nr_ext_out = BMVAL(etmccr, 20, 22);
741 drvdata->nr_ctxid_cmp = BMVAL(etmccr, 24, 25);
742
743 etm_set_pwrdwn(drvdata);
744 etm_clr_pwrup(drvdata);
745 CS_LOCK(drvdata->base);
746}
747
748static void etm_init_trace_id(struct etm_drvdata *drvdata)
749{
750 drvdata->traceid = coresight_get_trace_id(drvdata->cpu);
751}
752
753static int etm_probe(struct amba_device *adev, const struct amba_id *id)
754{
755 int ret;
756 void __iomem *base;
757 struct device *dev = &adev->dev;
758 struct coresight_platform_data *pdata = NULL;
759 struct etm_drvdata *drvdata;
760 struct resource *res = &adev->res;
761 struct coresight_desc desc = { 0 };
762 struct device_node *np = adev->dev.of_node;
763
764 drvdata = devm_kzalloc(dev, sizeof(*drvdata), GFP_KERNEL);
765 if (!drvdata)
766 return -ENOMEM;
767
768 if (np) {
769 pdata = of_get_coresight_platform_data(dev, np);
770 if (IS_ERR(pdata))
771 return PTR_ERR(pdata);
772
773 adev->dev.platform_data = pdata;
774 drvdata->use_cp14 = of_property_read_bool(np, "arm,cp14");
775 }
776
777 drvdata->dev = &adev->dev;
778 dev_set_drvdata(dev, drvdata);
779
780 /* Validity for the resource is already checked by the AMBA core */
781 base = devm_ioremap_resource(dev, res);
782 if (IS_ERR(base))
783 return PTR_ERR(base);
784
785 drvdata->base = base;
786
787 spin_lock_init(&drvdata->spinlock);
788
789 drvdata->atclk = devm_clk_get(&adev->dev, "atclk"); /* optional */
790 if (!IS_ERR(drvdata->atclk)) {
791 ret = clk_prepare_enable(drvdata->atclk);
792 if (ret)
793 return ret;
794 }
795
796 drvdata->cpu = pdata ? pdata->cpu : 0;
797
798 get_online_cpus();
799 etmdrvdata[drvdata->cpu] = drvdata;
800
801 if (smp_call_function_single(drvdata->cpu,
802 etm_init_arch_data, drvdata, 1))
803 dev_err(dev, "ETM arch init failed\n");
804
805 if (!etm_count++) {
806 cpuhp_setup_state_nocalls(CPUHP_AP_ARM_CORESIGHT_STARTING,
807 "arm/coresight:starting",
808 etm_starting_cpu, etm_dying_cpu);
809 ret = cpuhp_setup_state_nocalls(CPUHP_AP_ONLINE_DYN,
810 "arm/coresight:online",
811 etm_online_cpu, NULL);
812 if (ret < 0)
813 goto err_arch_supported;
814 hp_online = ret;
815 }
816 put_online_cpus();
817
818 if (etm_arch_supported(drvdata->arch) == false) {
819 ret = -EINVAL;
820 goto err_arch_supported;
821 }
822
823 etm_init_trace_id(drvdata);
824 etm_set_default(&drvdata->config);
825
826 desc.type = CORESIGHT_DEV_TYPE_SOURCE;
827 desc.subtype.source_subtype = CORESIGHT_DEV_SUBTYPE_SOURCE_PROC;
828 desc.ops = &etm_cs_ops;
829 desc.pdata = pdata;
830 desc.dev = dev;
831 desc.groups = coresight_etm_groups;
832 drvdata->csdev = coresight_register(&desc);
833 if (IS_ERR(drvdata->csdev)) {
834 ret = PTR_ERR(drvdata->csdev);
835 goto err_arch_supported;
836 }
837
838 ret = etm_perf_symlink(drvdata->csdev, true);
839 if (ret) {
840 coresight_unregister(drvdata->csdev);
841 goto err_arch_supported;
842 }
843
844 pm_runtime_put(&adev->dev);
845 dev_info(dev, "%s initialized\n", (char *)id->data);
846 if (boot_enable) {
847 coresight_enable(drvdata->csdev);
848 drvdata->boot_enable = true;
849 }
850
851 return 0;
852
853err_arch_supported:
854 if (--etm_count == 0) {
855 cpuhp_remove_state_nocalls(CPUHP_AP_ARM_CORESIGHT_STARTING);
856 if (hp_online)
857 cpuhp_remove_state_nocalls(hp_online);
858 }
859 return ret;
860}
861
862#ifdef CONFIG_PM
863static int etm_runtime_suspend(struct device *dev)
864{
865 struct etm_drvdata *drvdata = dev_get_drvdata(dev);
866
867 if (drvdata && !IS_ERR(drvdata->atclk))
868 clk_disable_unprepare(drvdata->atclk);
869
870 return 0;
871}
872
873static int etm_runtime_resume(struct device *dev)
874{
875 struct etm_drvdata *drvdata = dev_get_drvdata(dev);
876
877 if (drvdata && !IS_ERR(drvdata->atclk))
878 clk_prepare_enable(drvdata->atclk);
879
880 return 0;
881}
882#endif
883
884static const struct dev_pm_ops etm_dev_pm_ops = {
885 SET_RUNTIME_PM_OPS(etm_runtime_suspend, etm_runtime_resume, NULL)
886};
887
888static struct amba_id etm_ids[] = {
889 { /* ETM 3.3 */
890 .id = 0x0003b921,
891 .mask = 0x0003ffff,
892 .data = "ETM 3.3",
893 },
894 { /* ETM 3.5 - Cortex-A5 */
895 .id = 0x0003b955,
896 .mask = 0x0003ffff,
897 .data = "ETM 3.5",
898 },
899 { /* ETM 3.5 */
900 .id = 0x0003b956,
901 .mask = 0x0003ffff,
902 .data = "ETM 3.5",
903 },
904 { /* PTM 1.0 */
905 .id = 0x0003b950,
906 .mask = 0x0003ffff,
907 .data = "PTM 1.0",
908 },
909 { /* PTM 1.1 */
910 .id = 0x0003b95f,
911 .mask = 0x0003ffff,
912 .data = "PTM 1.1",
913 },
914 { /* PTM 1.1 Qualcomm */
915 .id = 0x0003006f,
916 .mask = 0x0003ffff,
917 .data = "PTM 1.1",
918 },
919 { 0, 0},
920};
921
922static struct amba_driver etm_driver = {
923 .drv = {
924 .name = "coresight-etm3x",
925 .owner = THIS_MODULE,
926 .pm = &etm_dev_pm_ops,
927 .suppress_bind_attrs = true,
928 },
929 .probe = etm_probe,
930 .id_table = etm_ids,
931};
932builtin_amba_driver(etm_driver);