Loading...
1/* Copyright (c) 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/init.h>
15#include <linux/types.h>
16#include <linux/device.h>
17#include <linux/io.h>
18#include <linux/err.h>
19#include <linux/export.h>
20#include <linux/slab.h>
21#include <linux/mutex.h>
22#include <linux/clk.h>
23#include <linux/coresight.h>
24#include <linux/of_platform.h>
25#include <linux/delay.h>
26#include <linux/pm_runtime.h>
27
28#include "coresight-priv.h"
29
30static DEFINE_MUTEX(coresight_mutex);
31
32/**
33 * struct coresight_node - elements of a path, from source to sink
34 * @csdev: Address of an element.
35 * @link: hook to the list.
36 */
37struct coresight_node {
38 struct coresight_device *csdev;
39 struct list_head link;
40};
41
42/*
43 * When operating Coresight drivers from the sysFS interface, only a single
44 * path can exist from a tracer (associated to a CPU) to a sink.
45 */
46static DEFINE_PER_CPU(struct list_head *, sysfs_path);
47
48static int coresight_id_match(struct device *dev, void *data)
49{
50 int trace_id, i_trace_id;
51 struct coresight_device *csdev, *i_csdev;
52
53 csdev = data;
54 i_csdev = to_coresight_device(dev);
55
56 /*
57 * No need to care about oneself and components that are not
58 * sources or not enabled
59 */
60 if (i_csdev == csdev || !i_csdev->enable ||
61 i_csdev->type != CORESIGHT_DEV_TYPE_SOURCE)
62 return 0;
63
64 /* Get the source ID for both compoment */
65 trace_id = source_ops(csdev)->trace_id(csdev);
66 i_trace_id = source_ops(i_csdev)->trace_id(i_csdev);
67
68 /* All you need is one */
69 if (trace_id == i_trace_id)
70 return 1;
71
72 return 0;
73}
74
75static int coresight_source_is_unique(struct coresight_device *csdev)
76{
77 int trace_id = source_ops(csdev)->trace_id(csdev);
78
79 /* this shouldn't happen */
80 if (trace_id < 0)
81 return 0;
82
83 return !bus_for_each_dev(&coresight_bustype, NULL,
84 csdev, coresight_id_match);
85}
86
87static int coresight_find_link_inport(struct coresight_device *csdev,
88 struct coresight_device *parent)
89{
90 int i;
91 struct coresight_connection *conn;
92
93 for (i = 0; i < parent->nr_outport; i++) {
94 conn = &parent->conns[i];
95 if (conn->child_dev == csdev)
96 return conn->child_port;
97 }
98
99 dev_err(&csdev->dev, "couldn't find inport, parent: %s, child: %s\n",
100 dev_name(&parent->dev), dev_name(&csdev->dev));
101
102 return 0;
103}
104
105static int coresight_find_link_outport(struct coresight_device *csdev,
106 struct coresight_device *child)
107{
108 int i;
109 struct coresight_connection *conn;
110
111 for (i = 0; i < csdev->nr_outport; i++) {
112 conn = &csdev->conns[i];
113 if (conn->child_dev == child)
114 return conn->outport;
115 }
116
117 dev_err(&csdev->dev, "couldn't find outport, parent: %s, child: %s\n",
118 dev_name(&csdev->dev), dev_name(&child->dev));
119
120 return 0;
121}
122
123static int coresight_enable_sink(struct coresight_device *csdev, u32 mode)
124{
125 int ret;
126
127 if (!csdev->enable) {
128 if (sink_ops(csdev)->enable) {
129 ret = sink_ops(csdev)->enable(csdev, mode);
130 if (ret)
131 return ret;
132 }
133 csdev->enable = true;
134 }
135
136 atomic_inc(csdev->refcnt);
137
138 return 0;
139}
140
141static void coresight_disable_sink(struct coresight_device *csdev)
142{
143 if (atomic_dec_return(csdev->refcnt) == 0) {
144 if (sink_ops(csdev)->disable) {
145 sink_ops(csdev)->disable(csdev);
146 csdev->enable = false;
147 }
148 }
149}
150
151static int coresight_enable_link(struct coresight_device *csdev,
152 struct coresight_device *parent,
153 struct coresight_device *child)
154{
155 int ret;
156 int link_subtype;
157 int refport, inport, outport;
158
159 if (!parent || !child)
160 return -EINVAL;
161
162 inport = coresight_find_link_inport(csdev, parent);
163 outport = coresight_find_link_outport(csdev, child);
164 link_subtype = csdev->subtype.link_subtype;
165
166 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG)
167 refport = inport;
168 else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT)
169 refport = outport;
170 else
171 refport = 0;
172
173 if (atomic_inc_return(&csdev->refcnt[refport]) == 1) {
174 if (link_ops(csdev)->enable) {
175 ret = link_ops(csdev)->enable(csdev, inport, outport);
176 if (ret)
177 return ret;
178 }
179 }
180
181 csdev->enable = true;
182
183 return 0;
184}
185
186static void coresight_disable_link(struct coresight_device *csdev,
187 struct coresight_device *parent,
188 struct coresight_device *child)
189{
190 int i, nr_conns;
191 int link_subtype;
192 int refport, inport, outport;
193
194 if (!parent || !child)
195 return;
196
197 inport = coresight_find_link_inport(csdev, parent);
198 outport = coresight_find_link_outport(csdev, child);
199 link_subtype = csdev->subtype.link_subtype;
200
201 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG) {
202 refport = inport;
203 nr_conns = csdev->nr_inport;
204 } else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT) {
205 refport = outport;
206 nr_conns = csdev->nr_outport;
207 } else {
208 refport = 0;
209 nr_conns = 1;
210 }
211
212 if (atomic_dec_return(&csdev->refcnt[refport]) == 0) {
213 if (link_ops(csdev)->disable)
214 link_ops(csdev)->disable(csdev, inport, outport);
215 }
216
217 for (i = 0; i < nr_conns; i++)
218 if (atomic_read(&csdev->refcnt[i]) != 0)
219 return;
220
221 csdev->enable = false;
222}
223
224static int coresight_enable_source(struct coresight_device *csdev, u32 mode)
225{
226 int ret;
227
228 if (!coresight_source_is_unique(csdev)) {
229 dev_warn(&csdev->dev, "traceID %d not unique\n",
230 source_ops(csdev)->trace_id(csdev));
231 return -EINVAL;
232 }
233
234 if (!csdev->enable) {
235 if (source_ops(csdev)->enable) {
236 ret = source_ops(csdev)->enable(csdev, NULL, mode);
237 if (ret)
238 return ret;
239 }
240 csdev->enable = true;
241 }
242
243 atomic_inc(csdev->refcnt);
244
245 return 0;
246}
247
248static void coresight_disable_source(struct coresight_device *csdev)
249{
250 if (atomic_dec_return(csdev->refcnt) == 0) {
251 if (source_ops(csdev)->disable) {
252 source_ops(csdev)->disable(csdev);
253 csdev->enable = false;
254 }
255 }
256}
257
258void coresight_disable_path(struct list_head *path)
259{
260 struct coresight_node *nd;
261 struct coresight_device *csdev, *parent, *child;
262
263 list_for_each_entry(nd, path, link) {
264 csdev = nd->csdev;
265
266 switch (csdev->type) {
267 case CORESIGHT_DEV_TYPE_SINK:
268 case CORESIGHT_DEV_TYPE_LINKSINK:
269 coresight_disable_sink(csdev);
270 break;
271 case CORESIGHT_DEV_TYPE_SOURCE:
272 /* sources are disabled from either sysFS or Perf */
273 break;
274 case CORESIGHT_DEV_TYPE_LINK:
275 parent = list_prev_entry(nd, link)->csdev;
276 child = list_next_entry(nd, link)->csdev;
277 coresight_disable_link(csdev, parent, child);
278 break;
279 default:
280 break;
281 }
282 }
283}
284
285int coresight_enable_path(struct list_head *path, u32 mode)
286{
287
288 int ret = 0;
289 struct coresight_node *nd;
290 struct coresight_device *csdev, *parent, *child;
291
292 list_for_each_entry_reverse(nd, path, link) {
293 csdev = nd->csdev;
294
295 switch (csdev->type) {
296 case CORESIGHT_DEV_TYPE_SINK:
297 case CORESIGHT_DEV_TYPE_LINKSINK:
298 ret = coresight_enable_sink(csdev, mode);
299 if (ret)
300 goto err;
301 break;
302 case CORESIGHT_DEV_TYPE_SOURCE:
303 /* sources are enabled from either sysFS or Perf */
304 break;
305 case CORESIGHT_DEV_TYPE_LINK:
306 parent = list_prev_entry(nd, link)->csdev;
307 child = list_next_entry(nd, link)->csdev;
308 ret = coresight_enable_link(csdev, parent, child);
309 if (ret)
310 goto err;
311 break;
312 default:
313 goto err;
314 }
315 }
316
317out:
318 return ret;
319err:
320 coresight_disable_path(path);
321 goto out;
322}
323
324struct coresight_device *coresight_get_sink(struct list_head *path)
325{
326 struct coresight_device *csdev;
327
328 if (!path)
329 return NULL;
330
331 csdev = list_last_entry(path, struct coresight_node, link)->csdev;
332 if (csdev->type != CORESIGHT_DEV_TYPE_SINK &&
333 csdev->type != CORESIGHT_DEV_TYPE_LINKSINK)
334 return NULL;
335
336 return csdev;
337}
338
339/**
340 * _coresight_build_path - recursively build a path from a @csdev to a sink.
341 * @csdev: The device to start from.
342 * @path: The list to add devices to.
343 *
344 * The tree of Coresight device is traversed until an activated sink is
345 * found. From there the sink is added to the list along with all the
346 * devices that led to that point - the end result is a list from source
347 * to sink. In that list the source is the first device and the sink the
348 * last one.
349 */
350static int _coresight_build_path(struct coresight_device *csdev,
351 struct list_head *path)
352{
353 int i;
354 bool found = false;
355 struct coresight_node *node;
356 struct coresight_connection *conn;
357
358 /* An activated sink has been found. Enqueue the element */
359 if ((csdev->type == CORESIGHT_DEV_TYPE_SINK ||
360 csdev->type == CORESIGHT_DEV_TYPE_LINKSINK) && csdev->activated)
361 goto out;
362
363 /* Not a sink - recursively explore each port found on this element */
364 for (i = 0; i < csdev->nr_outport; i++) {
365 conn = &csdev->conns[i];
366 if (_coresight_build_path(conn->child_dev, path) == 0) {
367 found = true;
368 break;
369 }
370 }
371
372 if (!found)
373 return -ENODEV;
374
375out:
376 /*
377 * A path from this element to a sink has been found. The elements
378 * leading to the sink are already enqueued, all that is left to do
379 * is tell the PM runtime core we need this element and add a node
380 * for it.
381 */
382 node = kzalloc(sizeof(struct coresight_node), GFP_KERNEL);
383 if (!node)
384 return -ENOMEM;
385
386 node->csdev = csdev;
387 list_add(&node->link, path);
388 pm_runtime_get_sync(csdev->dev.parent);
389
390 return 0;
391}
392
393struct list_head *coresight_build_path(struct coresight_device *csdev)
394{
395 struct list_head *path;
396
397 path = kzalloc(sizeof(struct list_head), GFP_KERNEL);
398 if (!path)
399 return NULL;
400
401 INIT_LIST_HEAD(path);
402
403 if (_coresight_build_path(csdev, path)) {
404 kfree(path);
405 path = NULL;
406 }
407
408 return path;
409}
410
411/**
412 * coresight_release_path - release a previously built path.
413 * @path: the path to release.
414 *
415 * Go through all the elements of a path and 1) removed it from the list and
416 * 2) free the memory allocated for each node.
417 */
418void coresight_release_path(struct list_head *path)
419{
420 struct coresight_device *csdev;
421 struct coresight_node *nd, *next;
422
423 list_for_each_entry_safe(nd, next, path, link) {
424 csdev = nd->csdev;
425
426 pm_runtime_put_sync(csdev->dev.parent);
427 list_del(&nd->link);
428 kfree(nd);
429 }
430
431 kfree(path);
432 path = NULL;
433}
434
435int coresight_enable(struct coresight_device *csdev)
436{
437 int ret = 0;
438 int cpu;
439 struct list_head *path;
440
441 mutex_lock(&coresight_mutex);
442 if (csdev->type != CORESIGHT_DEV_TYPE_SOURCE) {
443 ret = -EINVAL;
444 dev_err(&csdev->dev, "wrong device type in %s\n", __func__);
445 goto out;
446 }
447 if (csdev->enable)
448 goto out;
449
450 path = coresight_build_path(csdev);
451 if (!path) {
452 pr_err("building path(s) failed\n");
453 goto out;
454 }
455
456 ret = coresight_enable_path(path, CS_MODE_SYSFS);
457 if (ret)
458 goto err_path;
459
460 ret = coresight_enable_source(csdev, CS_MODE_SYSFS);
461 if (ret)
462 goto err_source;
463
464 /*
465 * When working from sysFS it is important to keep track
466 * of the paths that were created so that they can be
467 * undone in 'coresight_disable()'. Since there can only
468 * be a single session per tracer (when working from sysFS)
469 * a per-cpu variable will do just fine.
470 */
471 cpu = source_ops(csdev)->cpu_id(csdev);
472 per_cpu(sysfs_path, cpu) = path;
473
474out:
475 mutex_unlock(&coresight_mutex);
476 return ret;
477
478err_source:
479 coresight_disable_path(path);
480
481err_path:
482 coresight_release_path(path);
483 goto out;
484}
485EXPORT_SYMBOL_GPL(coresight_enable);
486
487void coresight_disable(struct coresight_device *csdev)
488{
489 int cpu;
490 struct list_head *path;
491
492 mutex_lock(&coresight_mutex);
493 if (csdev->type != CORESIGHT_DEV_TYPE_SOURCE) {
494 dev_err(&csdev->dev, "wrong device type in %s\n", __func__);
495 goto out;
496 }
497 if (!csdev->enable)
498 goto out;
499
500 cpu = source_ops(csdev)->cpu_id(csdev);
501 path = per_cpu(sysfs_path, cpu);
502 coresight_disable_source(csdev);
503 coresight_disable_path(path);
504 coresight_release_path(path);
505 per_cpu(sysfs_path, cpu) = NULL;
506
507out:
508 mutex_unlock(&coresight_mutex);
509}
510EXPORT_SYMBOL_GPL(coresight_disable);
511
512static ssize_t enable_sink_show(struct device *dev,
513 struct device_attribute *attr, char *buf)
514{
515 struct coresight_device *csdev = to_coresight_device(dev);
516
517 return scnprintf(buf, PAGE_SIZE, "%u\n", (unsigned)csdev->activated);
518}
519
520static ssize_t enable_sink_store(struct device *dev,
521 struct device_attribute *attr,
522 const char *buf, size_t size)
523{
524 int ret;
525 unsigned long val;
526 struct coresight_device *csdev = to_coresight_device(dev);
527
528 ret = kstrtoul(buf, 10, &val);
529 if (ret)
530 return ret;
531
532 if (val)
533 csdev->activated = true;
534 else
535 csdev->activated = false;
536
537 return size;
538
539}
540static DEVICE_ATTR_RW(enable_sink);
541
542static ssize_t enable_source_show(struct device *dev,
543 struct device_attribute *attr, char *buf)
544{
545 struct coresight_device *csdev = to_coresight_device(dev);
546
547 return scnprintf(buf, PAGE_SIZE, "%u\n", (unsigned)csdev->enable);
548}
549
550static ssize_t enable_source_store(struct device *dev,
551 struct device_attribute *attr,
552 const char *buf, size_t size)
553{
554 int ret = 0;
555 unsigned long val;
556 struct coresight_device *csdev = to_coresight_device(dev);
557
558 ret = kstrtoul(buf, 10, &val);
559 if (ret)
560 return ret;
561
562 if (val) {
563 ret = coresight_enable(csdev);
564 if (ret)
565 return ret;
566 } else {
567 coresight_disable(csdev);
568 }
569
570 return size;
571}
572static DEVICE_ATTR_RW(enable_source);
573
574static struct attribute *coresight_sink_attrs[] = {
575 &dev_attr_enable_sink.attr,
576 NULL,
577};
578ATTRIBUTE_GROUPS(coresight_sink);
579
580static struct attribute *coresight_source_attrs[] = {
581 &dev_attr_enable_source.attr,
582 NULL,
583};
584ATTRIBUTE_GROUPS(coresight_source);
585
586static struct device_type coresight_dev_type[] = {
587 {
588 .name = "none",
589 },
590 {
591 .name = "sink",
592 .groups = coresight_sink_groups,
593 },
594 {
595 .name = "link",
596 },
597 {
598 .name = "linksink",
599 .groups = coresight_sink_groups,
600 },
601 {
602 .name = "source",
603 .groups = coresight_source_groups,
604 },
605};
606
607static void coresight_device_release(struct device *dev)
608{
609 struct coresight_device *csdev = to_coresight_device(dev);
610
611 kfree(csdev->conns);
612 kfree(csdev->refcnt);
613 kfree(csdev);
614}
615
616static int coresight_orphan_match(struct device *dev, void *data)
617{
618 int i;
619 bool still_orphan = false;
620 struct coresight_device *csdev, *i_csdev;
621 struct coresight_connection *conn;
622
623 csdev = data;
624 i_csdev = to_coresight_device(dev);
625
626 /* No need to check oneself */
627 if (csdev == i_csdev)
628 return 0;
629
630 /* Move on to another component if no connection is orphan */
631 if (!i_csdev->orphan)
632 return 0;
633 /*
634 * Circle throuch all the connection of that component. If we find
635 * an orphan connection whose name matches @csdev, link it.
636 */
637 for (i = 0; i < i_csdev->nr_outport; i++) {
638 conn = &i_csdev->conns[i];
639
640 /* We have found at least one orphan connection */
641 if (conn->child_dev == NULL) {
642 /* Does it match this newly added device? */
643 if (!strcmp(dev_name(&csdev->dev), conn->child_name)) {
644 conn->child_dev = csdev;
645 } else {
646 /* This component still has an orphan */
647 still_orphan = true;
648 }
649 }
650 }
651
652 i_csdev->orphan = still_orphan;
653
654 /*
655 * Returning '0' ensures that all known component on the
656 * bus will be checked.
657 */
658 return 0;
659}
660
661static void coresight_fixup_orphan_conns(struct coresight_device *csdev)
662{
663 /*
664 * No need to check for a return value as orphan connection(s)
665 * are hooked-up with each newly added component.
666 */
667 bus_for_each_dev(&coresight_bustype, NULL,
668 csdev, coresight_orphan_match);
669}
670
671
672static int coresight_name_match(struct device *dev, void *data)
673{
674 char *to_match;
675 struct coresight_device *i_csdev;
676
677 to_match = data;
678 i_csdev = to_coresight_device(dev);
679
680 if (to_match && !strcmp(to_match, dev_name(&i_csdev->dev)))
681 return 1;
682
683 return 0;
684}
685
686static void coresight_fixup_device_conns(struct coresight_device *csdev)
687{
688 int i;
689 struct device *dev = NULL;
690 struct coresight_connection *conn;
691
692 for (i = 0; i < csdev->nr_outport; i++) {
693 conn = &csdev->conns[i];
694 dev = bus_find_device(&coresight_bustype, NULL,
695 (void *)conn->child_name,
696 coresight_name_match);
697
698 if (dev) {
699 conn->child_dev = to_coresight_device(dev);
700 /* and put reference from 'bus_find_device()' */
701 put_device(dev);
702 } else {
703 csdev->orphan = true;
704 conn->child_dev = NULL;
705 }
706 }
707}
708
709static int coresight_remove_match(struct device *dev, void *data)
710{
711 int i;
712 struct coresight_device *csdev, *iterator;
713 struct coresight_connection *conn;
714
715 csdev = data;
716 iterator = to_coresight_device(dev);
717
718 /* No need to check oneself */
719 if (csdev == iterator)
720 return 0;
721
722 /*
723 * Circle throuch all the connection of that component. If we find
724 * a connection whose name matches @csdev, remove it.
725 */
726 for (i = 0; i < iterator->nr_outport; i++) {
727 conn = &iterator->conns[i];
728
729 if (conn->child_dev == NULL)
730 continue;
731
732 if (!strcmp(dev_name(&csdev->dev), conn->child_name)) {
733 iterator->orphan = true;
734 conn->child_dev = NULL;
735 /* No need to continue */
736 break;
737 }
738 }
739
740 /*
741 * Returning '0' ensures that all known component on the
742 * bus will be checked.
743 */
744 return 0;
745}
746
747static void coresight_remove_conns(struct coresight_device *csdev)
748{
749 bus_for_each_dev(&coresight_bustype, NULL,
750 csdev, coresight_remove_match);
751}
752
753/**
754 * coresight_timeout - loop until a bit has changed to a specific state.
755 * @addr: base address of the area of interest.
756 * @offset: address of a register, starting from @addr.
757 * @position: the position of the bit of interest.
758 * @value: the value the bit should have.
759 *
760 * Return: 0 as soon as the bit has taken the desired state or -EAGAIN if
761 * TIMEOUT_US has elapsed, which ever happens first.
762 */
763
764int coresight_timeout(void __iomem *addr, u32 offset, int position, int value)
765{
766 int i;
767 u32 val;
768
769 for (i = TIMEOUT_US; i > 0; i--) {
770 val = __raw_readl(addr + offset);
771 /* waiting on the bit to go from 0 to 1 */
772 if (value) {
773 if (val & BIT(position))
774 return 0;
775 /* waiting on the bit to go from 1 to 0 */
776 } else {
777 if (!(val & BIT(position)))
778 return 0;
779 }
780
781 /*
782 * Delay is arbitrary - the specification doesn't say how long
783 * we are expected to wait. Extra check required to make sure
784 * we don't wait needlessly on the last iteration.
785 */
786 if (i - 1)
787 udelay(1);
788 }
789
790 return -EAGAIN;
791}
792
793struct bus_type coresight_bustype = {
794 .name = "coresight",
795};
796
797static int __init coresight_init(void)
798{
799 return bus_register(&coresight_bustype);
800}
801postcore_initcall(coresight_init);
802
803struct coresight_device *coresight_register(struct coresight_desc *desc)
804{
805 int i;
806 int ret;
807 int link_subtype;
808 int nr_refcnts = 1;
809 atomic_t *refcnts = NULL;
810 struct coresight_device *csdev;
811 struct coresight_connection *conns;
812
813 csdev = kzalloc(sizeof(*csdev), GFP_KERNEL);
814 if (!csdev) {
815 ret = -ENOMEM;
816 goto err_kzalloc_csdev;
817 }
818
819 if (desc->type == CORESIGHT_DEV_TYPE_LINK ||
820 desc->type == CORESIGHT_DEV_TYPE_LINKSINK) {
821 link_subtype = desc->subtype.link_subtype;
822
823 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG)
824 nr_refcnts = desc->pdata->nr_inport;
825 else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT)
826 nr_refcnts = desc->pdata->nr_outport;
827 }
828
829 refcnts = kcalloc(nr_refcnts, sizeof(*refcnts), GFP_KERNEL);
830 if (!refcnts) {
831 ret = -ENOMEM;
832 goto err_kzalloc_refcnts;
833 }
834
835 csdev->refcnt = refcnts;
836
837 csdev->nr_inport = desc->pdata->nr_inport;
838 csdev->nr_outport = desc->pdata->nr_outport;
839 conns = kcalloc(csdev->nr_outport, sizeof(*conns), GFP_KERNEL);
840 if (!conns) {
841 ret = -ENOMEM;
842 goto err_kzalloc_conns;
843 }
844
845 for (i = 0; i < csdev->nr_outport; i++) {
846 conns[i].outport = desc->pdata->outports[i];
847 conns[i].child_name = desc->pdata->child_names[i];
848 conns[i].child_port = desc->pdata->child_ports[i];
849 }
850
851 csdev->conns = conns;
852
853 csdev->type = desc->type;
854 csdev->subtype = desc->subtype;
855 csdev->ops = desc->ops;
856 csdev->orphan = false;
857
858 csdev->dev.type = &coresight_dev_type[desc->type];
859 csdev->dev.groups = desc->groups;
860 csdev->dev.parent = desc->dev;
861 csdev->dev.release = coresight_device_release;
862 csdev->dev.bus = &coresight_bustype;
863 dev_set_name(&csdev->dev, "%s", desc->pdata->name);
864
865 ret = device_register(&csdev->dev);
866 if (ret)
867 goto err_device_register;
868
869 mutex_lock(&coresight_mutex);
870
871 coresight_fixup_device_conns(csdev);
872 coresight_fixup_orphan_conns(csdev);
873
874 mutex_unlock(&coresight_mutex);
875
876 return csdev;
877
878err_device_register:
879 kfree(conns);
880err_kzalloc_conns:
881 kfree(refcnts);
882err_kzalloc_refcnts:
883 kfree(csdev);
884err_kzalloc_csdev:
885 return ERR_PTR(ret);
886}
887EXPORT_SYMBOL_GPL(coresight_register);
888
889void coresight_unregister(struct coresight_device *csdev)
890{
891 /* Remove references of that device in the topology */
892 coresight_remove_conns(csdev);
893 device_unregister(&csdev->dev);
894}
895EXPORT_SYMBOL_GPL(coresight_unregister);
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Copyright (c) 2012, The Linux Foundation. All rights reserved.
4 */
5
6#include <linux/kernel.h>
7#include <linux/init.h>
8#include <linux/types.h>
9#include <linux/device.h>
10#include <linux/io.h>
11#include <linux/err.h>
12#include <linux/export.h>
13#include <linux/slab.h>
14#include <linux/stringhash.h>
15#include <linux/mutex.h>
16#include <linux/clk.h>
17#include <linux/coresight.h>
18#include <linux/of_platform.h>
19#include <linux/delay.h>
20#include <linux/pm_runtime.h>
21
22#include "coresight-etm-perf.h"
23#include "coresight-priv.h"
24
25static DEFINE_MUTEX(coresight_mutex);
26
27/**
28 * struct coresight_node - elements of a path, from source to sink
29 * @csdev: Address of an element.
30 * @link: hook to the list.
31 */
32struct coresight_node {
33 struct coresight_device *csdev;
34 struct list_head link;
35};
36
37/*
38 * When operating Coresight drivers from the sysFS interface, only a single
39 * path can exist from a tracer (associated to a CPU) to a sink.
40 */
41static DEFINE_PER_CPU(struct list_head *, tracer_path);
42
43/*
44 * As of this writing only a single STM can be found in CS topologies. Since
45 * there is no way to know if we'll ever see more and what kind of
46 * configuration they will enact, for the time being only define a single path
47 * for STM.
48 */
49static struct list_head *stm_path;
50
51/*
52 * When losing synchronisation a new barrier packet needs to be inserted at the
53 * beginning of the data collected in a buffer. That way the decoder knows that
54 * it needs to look for another sync sequence.
55 */
56const u32 barrier_pkt[4] = {0x7fffffff, 0x7fffffff, 0x7fffffff, 0x7fffffff};
57
58static int coresight_id_match(struct device *dev, void *data)
59{
60 int trace_id, i_trace_id;
61 struct coresight_device *csdev, *i_csdev;
62
63 csdev = data;
64 i_csdev = to_coresight_device(dev);
65
66 /*
67 * No need to care about oneself and components that are not
68 * sources or not enabled
69 */
70 if (i_csdev == csdev || !i_csdev->enable ||
71 i_csdev->type != CORESIGHT_DEV_TYPE_SOURCE)
72 return 0;
73
74 /* Get the source ID for both compoment */
75 trace_id = source_ops(csdev)->trace_id(csdev);
76 i_trace_id = source_ops(i_csdev)->trace_id(i_csdev);
77
78 /* All you need is one */
79 if (trace_id == i_trace_id)
80 return 1;
81
82 return 0;
83}
84
85static int coresight_source_is_unique(struct coresight_device *csdev)
86{
87 int trace_id = source_ops(csdev)->trace_id(csdev);
88
89 /* this shouldn't happen */
90 if (trace_id < 0)
91 return 0;
92
93 return !bus_for_each_dev(&coresight_bustype, NULL,
94 csdev, coresight_id_match);
95}
96
97static int coresight_find_link_inport(struct coresight_device *csdev,
98 struct coresight_device *parent)
99{
100 int i;
101 struct coresight_connection *conn;
102
103 for (i = 0; i < parent->pdata->nr_outport; i++) {
104 conn = &parent->pdata->conns[i];
105 if (conn->child_dev == csdev)
106 return conn->child_port;
107 }
108
109 dev_err(&csdev->dev, "couldn't find inport, parent: %s, child: %s\n",
110 dev_name(&parent->dev), dev_name(&csdev->dev));
111
112 return -ENODEV;
113}
114
115static int coresight_find_link_outport(struct coresight_device *csdev,
116 struct coresight_device *child)
117{
118 int i;
119 struct coresight_connection *conn;
120
121 for (i = 0; i < csdev->pdata->nr_outport; i++) {
122 conn = &csdev->pdata->conns[i];
123 if (conn->child_dev == child)
124 return conn->outport;
125 }
126
127 dev_err(&csdev->dev, "couldn't find outport, parent: %s, child: %s\n",
128 dev_name(&csdev->dev), dev_name(&child->dev));
129
130 return -ENODEV;
131}
132
133static inline u32 coresight_read_claim_tags(void __iomem *base)
134{
135 return readl_relaxed(base + CORESIGHT_CLAIMCLR);
136}
137
138static inline bool coresight_is_claimed_self_hosted(void __iomem *base)
139{
140 return coresight_read_claim_tags(base) == CORESIGHT_CLAIM_SELF_HOSTED;
141}
142
143static inline bool coresight_is_claimed_any(void __iomem *base)
144{
145 return coresight_read_claim_tags(base) != 0;
146}
147
148static inline void coresight_set_claim_tags(void __iomem *base)
149{
150 writel_relaxed(CORESIGHT_CLAIM_SELF_HOSTED, base + CORESIGHT_CLAIMSET);
151 isb();
152}
153
154static inline void coresight_clear_claim_tags(void __iomem *base)
155{
156 writel_relaxed(CORESIGHT_CLAIM_SELF_HOSTED, base + CORESIGHT_CLAIMCLR);
157 isb();
158}
159
160/*
161 * coresight_claim_device_unlocked : Claim the device for self-hosted usage
162 * to prevent an external tool from touching this device. As per PSCI
163 * standards, section "Preserving the execution context" => "Debug and Trace
164 * save and Restore", DBGCLAIM[1] is reserved for Self-hosted debug/trace and
165 * DBGCLAIM[0] is reserved for external tools.
166 *
167 * Called with CS_UNLOCKed for the component.
168 * Returns : 0 on success
169 */
170int coresight_claim_device_unlocked(void __iomem *base)
171{
172 if (coresight_is_claimed_any(base))
173 return -EBUSY;
174
175 coresight_set_claim_tags(base);
176 if (coresight_is_claimed_self_hosted(base))
177 return 0;
178 /* There was a race setting the tags, clean up and fail */
179 coresight_clear_claim_tags(base);
180 return -EBUSY;
181}
182
183int coresight_claim_device(void __iomem *base)
184{
185 int rc;
186
187 CS_UNLOCK(base);
188 rc = coresight_claim_device_unlocked(base);
189 CS_LOCK(base);
190
191 return rc;
192}
193
194/*
195 * coresight_disclaim_device_unlocked : Clear the claim tags for the device.
196 * Called with CS_UNLOCKed for the component.
197 */
198void coresight_disclaim_device_unlocked(void __iomem *base)
199{
200
201 if (coresight_is_claimed_self_hosted(base))
202 coresight_clear_claim_tags(base);
203 else
204 /*
205 * The external agent may have not honoured our claim
206 * and has manipulated it. Or something else has seriously
207 * gone wrong in our driver.
208 */
209 WARN_ON_ONCE(1);
210}
211
212void coresight_disclaim_device(void __iomem *base)
213{
214 CS_UNLOCK(base);
215 coresight_disclaim_device_unlocked(base);
216 CS_LOCK(base);
217}
218
219static int coresight_enable_sink(struct coresight_device *csdev,
220 u32 mode, void *data)
221{
222 int ret;
223
224 /*
225 * We need to make sure the "new" session is compatible with the
226 * existing "mode" of operation.
227 */
228 if (!sink_ops(csdev)->enable)
229 return -EINVAL;
230
231 ret = sink_ops(csdev)->enable(csdev, mode, data);
232 if (ret)
233 return ret;
234 csdev->enable = true;
235
236 return 0;
237}
238
239static void coresight_disable_sink(struct coresight_device *csdev)
240{
241 int ret;
242
243 if (!sink_ops(csdev)->disable)
244 return;
245
246 ret = sink_ops(csdev)->disable(csdev);
247 if (ret)
248 return;
249 csdev->enable = false;
250}
251
252static int coresight_enable_link(struct coresight_device *csdev,
253 struct coresight_device *parent,
254 struct coresight_device *child)
255{
256 int ret;
257 int link_subtype;
258 int refport, inport, outport;
259
260 if (!parent || !child)
261 return -EINVAL;
262
263 inport = coresight_find_link_inport(csdev, parent);
264 outport = coresight_find_link_outport(csdev, child);
265 link_subtype = csdev->subtype.link_subtype;
266
267 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG)
268 refport = inport;
269 else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT)
270 refport = outport;
271 else
272 refport = 0;
273
274 if (refport < 0)
275 return refport;
276
277 if (atomic_inc_return(&csdev->refcnt[refport]) == 1) {
278 if (link_ops(csdev)->enable) {
279 ret = link_ops(csdev)->enable(csdev, inport, outport);
280 if (ret) {
281 atomic_dec(&csdev->refcnt[refport]);
282 return ret;
283 }
284 }
285 }
286
287 csdev->enable = true;
288
289 return 0;
290}
291
292static void coresight_disable_link(struct coresight_device *csdev,
293 struct coresight_device *parent,
294 struct coresight_device *child)
295{
296 int i, nr_conns;
297 int link_subtype;
298 int refport, inport, outport;
299
300 if (!parent || !child)
301 return;
302
303 inport = coresight_find_link_inport(csdev, parent);
304 outport = coresight_find_link_outport(csdev, child);
305 link_subtype = csdev->subtype.link_subtype;
306
307 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG) {
308 refport = inport;
309 nr_conns = csdev->pdata->nr_inport;
310 } else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT) {
311 refport = outport;
312 nr_conns = csdev->pdata->nr_outport;
313 } else {
314 refport = 0;
315 nr_conns = 1;
316 }
317
318 if (atomic_dec_return(&csdev->refcnt[refport]) == 0) {
319 if (link_ops(csdev)->disable)
320 link_ops(csdev)->disable(csdev, inport, outport);
321 }
322
323 for (i = 0; i < nr_conns; i++)
324 if (atomic_read(&csdev->refcnt[i]) != 0)
325 return;
326
327 csdev->enable = false;
328}
329
330static int coresight_enable_source(struct coresight_device *csdev, u32 mode)
331{
332 int ret;
333
334 if (!coresight_source_is_unique(csdev)) {
335 dev_warn(&csdev->dev, "traceID %d not unique\n",
336 source_ops(csdev)->trace_id(csdev));
337 return -EINVAL;
338 }
339
340 if (!csdev->enable) {
341 if (source_ops(csdev)->enable) {
342 ret = source_ops(csdev)->enable(csdev, NULL, mode);
343 if (ret)
344 return ret;
345 }
346 csdev->enable = true;
347 }
348
349 atomic_inc(csdev->refcnt);
350
351 return 0;
352}
353
354/**
355 * coresight_disable_source - Drop the reference count by 1 and disable
356 * the device if there are no users left.
357 *
358 * @csdev - The coresight device to disable
359 *
360 * Returns true if the device has been disabled.
361 */
362static bool coresight_disable_source(struct coresight_device *csdev)
363{
364 if (atomic_dec_return(csdev->refcnt) == 0) {
365 if (source_ops(csdev)->disable)
366 source_ops(csdev)->disable(csdev, NULL);
367 csdev->enable = false;
368 }
369 return !csdev->enable;
370}
371
372/*
373 * coresight_disable_path_from : Disable components in the given path beyond
374 * @nd in the list. If @nd is NULL, all the components, except the SOURCE are
375 * disabled.
376 */
377static void coresight_disable_path_from(struct list_head *path,
378 struct coresight_node *nd)
379{
380 u32 type;
381 struct coresight_device *csdev, *parent, *child;
382
383 if (!nd)
384 nd = list_first_entry(path, struct coresight_node, link);
385
386 list_for_each_entry_continue(nd, path, link) {
387 csdev = nd->csdev;
388 type = csdev->type;
389
390 /*
391 * ETF devices are tricky... They can be a link or a sink,
392 * depending on how they are configured. If an ETF has been
393 * "activated" it will be configured as a sink, otherwise
394 * go ahead with the link configuration.
395 */
396 if (type == CORESIGHT_DEV_TYPE_LINKSINK)
397 type = (csdev == coresight_get_sink(path)) ?
398 CORESIGHT_DEV_TYPE_SINK :
399 CORESIGHT_DEV_TYPE_LINK;
400
401 switch (type) {
402 case CORESIGHT_DEV_TYPE_SINK:
403 coresight_disable_sink(csdev);
404 break;
405 case CORESIGHT_DEV_TYPE_SOURCE:
406 /*
407 * We skip the first node in the path assuming that it
408 * is the source. So we don't expect a source device in
409 * the middle of a path.
410 */
411 WARN_ON(1);
412 break;
413 case CORESIGHT_DEV_TYPE_LINK:
414 parent = list_prev_entry(nd, link)->csdev;
415 child = list_next_entry(nd, link)->csdev;
416 coresight_disable_link(csdev, parent, child);
417 break;
418 default:
419 break;
420 }
421 }
422}
423
424void coresight_disable_path(struct list_head *path)
425{
426 coresight_disable_path_from(path, NULL);
427}
428
429int coresight_enable_path(struct list_head *path, u32 mode, void *sink_data)
430{
431
432 int ret = 0;
433 u32 type;
434 struct coresight_node *nd;
435 struct coresight_device *csdev, *parent, *child;
436
437 list_for_each_entry_reverse(nd, path, link) {
438 csdev = nd->csdev;
439 type = csdev->type;
440
441 /*
442 * ETF devices are tricky... They can be a link or a sink,
443 * depending on how they are configured. If an ETF has been
444 * "activated" it will be configured as a sink, otherwise
445 * go ahead with the link configuration.
446 */
447 if (type == CORESIGHT_DEV_TYPE_LINKSINK)
448 type = (csdev == coresight_get_sink(path)) ?
449 CORESIGHT_DEV_TYPE_SINK :
450 CORESIGHT_DEV_TYPE_LINK;
451
452 switch (type) {
453 case CORESIGHT_DEV_TYPE_SINK:
454 ret = coresight_enable_sink(csdev, mode, sink_data);
455 /*
456 * Sink is the first component turned on. If we
457 * failed to enable the sink, there are no components
458 * that need disabling. Disabling the path here
459 * would mean we could disrupt an existing session.
460 */
461 if (ret)
462 goto out;
463 break;
464 case CORESIGHT_DEV_TYPE_SOURCE:
465 /* sources are enabled from either sysFS or Perf */
466 break;
467 case CORESIGHT_DEV_TYPE_LINK:
468 parent = list_prev_entry(nd, link)->csdev;
469 child = list_next_entry(nd, link)->csdev;
470 ret = coresight_enable_link(csdev, parent, child);
471 if (ret)
472 goto err;
473 break;
474 default:
475 goto err;
476 }
477 }
478
479out:
480 return ret;
481err:
482 coresight_disable_path_from(path, nd);
483 goto out;
484}
485
486struct coresight_device *coresight_get_sink(struct list_head *path)
487{
488 struct coresight_device *csdev;
489
490 if (!path)
491 return NULL;
492
493 csdev = list_last_entry(path, struct coresight_node, link)->csdev;
494 if (csdev->type != CORESIGHT_DEV_TYPE_SINK &&
495 csdev->type != CORESIGHT_DEV_TYPE_LINKSINK)
496 return NULL;
497
498 return csdev;
499}
500
501static int coresight_enabled_sink(struct device *dev, const void *data)
502{
503 const bool *reset = data;
504 struct coresight_device *csdev = to_coresight_device(dev);
505
506 if ((csdev->type == CORESIGHT_DEV_TYPE_SINK ||
507 csdev->type == CORESIGHT_DEV_TYPE_LINKSINK) &&
508 csdev->activated) {
509 /*
510 * Now that we have a handle on the sink for this session,
511 * disable the sysFS "enable_sink" flag so that possible
512 * concurrent perf session that wish to use another sink don't
513 * trip on it. Doing so has no ramification for the current
514 * session.
515 */
516 if (*reset)
517 csdev->activated = false;
518
519 return 1;
520 }
521
522 return 0;
523}
524
525/**
526 * coresight_get_enabled_sink - returns the first enabled sink found on the bus
527 * @deactivate: Whether the 'enable_sink' flag should be reset
528 *
529 * When operated from perf the deactivate parameter should be set to 'true'.
530 * That way the "enabled_sink" flag of the sink that was selected can be reset,
531 * allowing for other concurrent perf sessions to choose a different sink.
532 *
533 * When operated from sysFS users have full control and as such the deactivate
534 * parameter should be set to 'false', hence mandating users to explicitly
535 * clear the flag.
536 */
537struct coresight_device *coresight_get_enabled_sink(bool deactivate)
538{
539 struct device *dev = NULL;
540
541 dev = bus_find_device(&coresight_bustype, NULL, &deactivate,
542 coresight_enabled_sink);
543
544 return dev ? to_coresight_device(dev) : NULL;
545}
546
547static int coresight_sink_by_id(struct device *dev, const void *data)
548{
549 struct coresight_device *csdev = to_coresight_device(dev);
550 unsigned long hash;
551
552 if (csdev->type == CORESIGHT_DEV_TYPE_SINK ||
553 csdev->type == CORESIGHT_DEV_TYPE_LINKSINK) {
554
555 if (!csdev->ea)
556 return 0;
557 /*
558 * See function etm_perf_add_symlink_sink() to know where
559 * this comes from.
560 */
561 hash = (unsigned long)csdev->ea->var;
562
563 if ((u32)hash == *(u32 *)data)
564 return 1;
565 }
566
567 return 0;
568}
569
570/**
571 * coresight_get_sink_by_id - returns the sink that matches the id
572 * @id: Id of the sink to match
573 *
574 * The name of a sink is unique, whether it is found on the AMBA bus or
575 * otherwise. As such the hash of that name can easily be used to identify
576 * a sink.
577 */
578struct coresight_device *coresight_get_sink_by_id(u32 id)
579{
580 struct device *dev = NULL;
581
582 dev = bus_find_device(&coresight_bustype, NULL, &id,
583 coresight_sink_by_id);
584
585 return dev ? to_coresight_device(dev) : NULL;
586}
587
588/*
589 * coresight_grab_device - Power up this device and any of the helper
590 * devices connected to it for trace operation. Since the helper devices
591 * don't appear on the trace path, they should be handled along with the
592 * the master device.
593 */
594static void coresight_grab_device(struct coresight_device *csdev)
595{
596 int i;
597
598 for (i = 0; i < csdev->pdata->nr_outport; i++) {
599 struct coresight_device *child;
600
601 child = csdev->pdata->conns[i].child_dev;
602 if (child && child->type == CORESIGHT_DEV_TYPE_HELPER)
603 pm_runtime_get_sync(child->dev.parent);
604 }
605 pm_runtime_get_sync(csdev->dev.parent);
606}
607
608/*
609 * coresight_drop_device - Release this device and any of the helper
610 * devices connected to it.
611 */
612static void coresight_drop_device(struct coresight_device *csdev)
613{
614 int i;
615
616 pm_runtime_put(csdev->dev.parent);
617 for (i = 0; i < csdev->pdata->nr_outport; i++) {
618 struct coresight_device *child;
619
620 child = csdev->pdata->conns[i].child_dev;
621 if (child && child->type == CORESIGHT_DEV_TYPE_HELPER)
622 pm_runtime_put(child->dev.parent);
623 }
624}
625
626/**
627 * _coresight_build_path - recursively build a path from a @csdev to a sink.
628 * @csdev: The device to start from.
629 * @path: The list to add devices to.
630 *
631 * The tree of Coresight device is traversed until an activated sink is
632 * found. From there the sink is added to the list along with all the
633 * devices that led to that point - the end result is a list from source
634 * to sink. In that list the source is the first device and the sink the
635 * last one.
636 */
637static int _coresight_build_path(struct coresight_device *csdev,
638 struct coresight_device *sink,
639 struct list_head *path)
640{
641 int i;
642 bool found = false;
643 struct coresight_node *node;
644
645 /* An activated sink has been found. Enqueue the element */
646 if (csdev == sink)
647 goto out;
648
649 /* Not a sink - recursively explore each port found on this element */
650 for (i = 0; i < csdev->pdata->nr_outport; i++) {
651 struct coresight_device *child_dev;
652
653 child_dev = csdev->pdata->conns[i].child_dev;
654 if (child_dev &&
655 _coresight_build_path(child_dev, sink, path) == 0) {
656 found = true;
657 break;
658 }
659 }
660
661 if (!found)
662 return -ENODEV;
663
664out:
665 /*
666 * A path from this element to a sink has been found. The elements
667 * leading to the sink are already enqueued, all that is left to do
668 * is tell the PM runtime core we need this element and add a node
669 * for it.
670 */
671 node = kzalloc(sizeof(struct coresight_node), GFP_KERNEL);
672 if (!node)
673 return -ENOMEM;
674
675 coresight_grab_device(csdev);
676 node->csdev = csdev;
677 list_add(&node->link, path);
678
679 return 0;
680}
681
682struct list_head *coresight_build_path(struct coresight_device *source,
683 struct coresight_device *sink)
684{
685 struct list_head *path;
686 int rc;
687
688 if (!sink)
689 return ERR_PTR(-EINVAL);
690
691 path = kzalloc(sizeof(struct list_head), GFP_KERNEL);
692 if (!path)
693 return ERR_PTR(-ENOMEM);
694
695 INIT_LIST_HEAD(path);
696
697 rc = _coresight_build_path(source, sink, path);
698 if (rc) {
699 kfree(path);
700 return ERR_PTR(rc);
701 }
702
703 return path;
704}
705
706/**
707 * coresight_release_path - release a previously built path.
708 * @path: the path to release.
709 *
710 * Go through all the elements of a path and 1) removed it from the list and
711 * 2) free the memory allocated for each node.
712 */
713void coresight_release_path(struct list_head *path)
714{
715 struct coresight_device *csdev;
716 struct coresight_node *nd, *next;
717
718 list_for_each_entry_safe(nd, next, path, link) {
719 csdev = nd->csdev;
720
721 coresight_drop_device(csdev);
722 list_del(&nd->link);
723 kfree(nd);
724 }
725
726 kfree(path);
727 path = NULL;
728}
729
730/** coresight_validate_source - make sure a source has the right credentials
731 * @csdev: the device structure for a source.
732 * @function: the function this was called from.
733 *
734 * Assumes the coresight_mutex is held.
735 */
736static int coresight_validate_source(struct coresight_device *csdev,
737 const char *function)
738{
739 u32 type, subtype;
740
741 type = csdev->type;
742 subtype = csdev->subtype.source_subtype;
743
744 if (type != CORESIGHT_DEV_TYPE_SOURCE) {
745 dev_err(&csdev->dev, "wrong device type in %s\n", function);
746 return -EINVAL;
747 }
748
749 if (subtype != CORESIGHT_DEV_SUBTYPE_SOURCE_PROC &&
750 subtype != CORESIGHT_DEV_SUBTYPE_SOURCE_SOFTWARE) {
751 dev_err(&csdev->dev, "wrong device subtype in %s\n", function);
752 return -EINVAL;
753 }
754
755 return 0;
756}
757
758int coresight_enable(struct coresight_device *csdev)
759{
760 int cpu, ret = 0;
761 struct coresight_device *sink;
762 struct list_head *path;
763 enum coresight_dev_subtype_source subtype;
764
765 subtype = csdev->subtype.source_subtype;
766
767 mutex_lock(&coresight_mutex);
768
769 ret = coresight_validate_source(csdev, __func__);
770 if (ret)
771 goto out;
772
773 if (csdev->enable) {
774 /*
775 * There could be multiple applications driving the software
776 * source. So keep the refcount for each such user when the
777 * source is already enabled.
778 */
779 if (subtype == CORESIGHT_DEV_SUBTYPE_SOURCE_SOFTWARE)
780 atomic_inc(csdev->refcnt);
781 goto out;
782 }
783
784 /*
785 * Search for a valid sink for this session but don't reset the
786 * "enable_sink" flag in sysFS. Users get to do that explicitly.
787 */
788 sink = coresight_get_enabled_sink(false);
789 if (!sink) {
790 ret = -EINVAL;
791 goto out;
792 }
793
794 path = coresight_build_path(csdev, sink);
795 if (IS_ERR(path)) {
796 pr_err("building path(s) failed\n");
797 ret = PTR_ERR(path);
798 goto out;
799 }
800
801 ret = coresight_enable_path(path, CS_MODE_SYSFS, NULL);
802 if (ret)
803 goto err_path;
804
805 ret = coresight_enable_source(csdev, CS_MODE_SYSFS);
806 if (ret)
807 goto err_source;
808
809 switch (subtype) {
810 case CORESIGHT_DEV_SUBTYPE_SOURCE_PROC:
811 /*
812 * When working from sysFS it is important to keep track
813 * of the paths that were created so that they can be
814 * undone in 'coresight_disable()'. Since there can only
815 * be a single session per tracer (when working from sysFS)
816 * a per-cpu variable will do just fine.
817 */
818 cpu = source_ops(csdev)->cpu_id(csdev);
819 per_cpu(tracer_path, cpu) = path;
820 break;
821 case CORESIGHT_DEV_SUBTYPE_SOURCE_SOFTWARE:
822 stm_path = path;
823 break;
824 default:
825 /* We can't be here */
826 break;
827 }
828
829out:
830 mutex_unlock(&coresight_mutex);
831 return ret;
832
833err_source:
834 coresight_disable_path(path);
835
836err_path:
837 coresight_release_path(path);
838 goto out;
839}
840EXPORT_SYMBOL_GPL(coresight_enable);
841
842void coresight_disable(struct coresight_device *csdev)
843{
844 int cpu, ret;
845 struct list_head *path = NULL;
846
847 mutex_lock(&coresight_mutex);
848
849 ret = coresight_validate_source(csdev, __func__);
850 if (ret)
851 goto out;
852
853 if (!csdev->enable || !coresight_disable_source(csdev))
854 goto out;
855
856 switch (csdev->subtype.source_subtype) {
857 case CORESIGHT_DEV_SUBTYPE_SOURCE_PROC:
858 cpu = source_ops(csdev)->cpu_id(csdev);
859 path = per_cpu(tracer_path, cpu);
860 per_cpu(tracer_path, cpu) = NULL;
861 break;
862 case CORESIGHT_DEV_SUBTYPE_SOURCE_SOFTWARE:
863 path = stm_path;
864 stm_path = NULL;
865 break;
866 default:
867 /* We can't be here */
868 break;
869 }
870
871 coresight_disable_path(path);
872 coresight_release_path(path);
873
874out:
875 mutex_unlock(&coresight_mutex);
876}
877EXPORT_SYMBOL_GPL(coresight_disable);
878
879static ssize_t enable_sink_show(struct device *dev,
880 struct device_attribute *attr, char *buf)
881{
882 struct coresight_device *csdev = to_coresight_device(dev);
883
884 return scnprintf(buf, PAGE_SIZE, "%u\n", csdev->activated);
885}
886
887static ssize_t enable_sink_store(struct device *dev,
888 struct device_attribute *attr,
889 const char *buf, size_t size)
890{
891 int ret;
892 unsigned long val;
893 struct coresight_device *csdev = to_coresight_device(dev);
894
895 ret = kstrtoul(buf, 10, &val);
896 if (ret)
897 return ret;
898
899 if (val)
900 csdev->activated = true;
901 else
902 csdev->activated = false;
903
904 return size;
905
906}
907static DEVICE_ATTR_RW(enable_sink);
908
909static ssize_t enable_source_show(struct device *dev,
910 struct device_attribute *attr, char *buf)
911{
912 struct coresight_device *csdev = to_coresight_device(dev);
913
914 return scnprintf(buf, PAGE_SIZE, "%u\n", csdev->enable);
915}
916
917static ssize_t enable_source_store(struct device *dev,
918 struct device_attribute *attr,
919 const char *buf, size_t size)
920{
921 int ret = 0;
922 unsigned long val;
923 struct coresight_device *csdev = to_coresight_device(dev);
924
925 ret = kstrtoul(buf, 10, &val);
926 if (ret)
927 return ret;
928
929 if (val) {
930 ret = coresight_enable(csdev);
931 if (ret)
932 return ret;
933 } else {
934 coresight_disable(csdev);
935 }
936
937 return size;
938}
939static DEVICE_ATTR_RW(enable_source);
940
941static struct attribute *coresight_sink_attrs[] = {
942 &dev_attr_enable_sink.attr,
943 NULL,
944};
945ATTRIBUTE_GROUPS(coresight_sink);
946
947static struct attribute *coresight_source_attrs[] = {
948 &dev_attr_enable_source.attr,
949 NULL,
950};
951ATTRIBUTE_GROUPS(coresight_source);
952
953static struct device_type coresight_dev_type[] = {
954 {
955 .name = "none",
956 },
957 {
958 .name = "sink",
959 .groups = coresight_sink_groups,
960 },
961 {
962 .name = "link",
963 },
964 {
965 .name = "linksink",
966 .groups = coresight_sink_groups,
967 },
968 {
969 .name = "source",
970 .groups = coresight_source_groups,
971 },
972 {
973 .name = "helper",
974 },
975};
976
977static void coresight_device_release(struct device *dev)
978{
979 struct coresight_device *csdev = to_coresight_device(dev);
980
981 fwnode_handle_put(csdev->dev.fwnode);
982 kfree(csdev->refcnt);
983 kfree(csdev);
984}
985
986static int coresight_orphan_match(struct device *dev, void *data)
987{
988 int i;
989 bool still_orphan = false;
990 struct coresight_device *csdev, *i_csdev;
991 struct coresight_connection *conn;
992
993 csdev = data;
994 i_csdev = to_coresight_device(dev);
995
996 /* No need to check oneself */
997 if (csdev == i_csdev)
998 return 0;
999
1000 /* Move on to another component if no connection is orphan */
1001 if (!i_csdev->orphan)
1002 return 0;
1003 /*
1004 * Circle throuch all the connection of that component. If we find
1005 * an orphan connection whose name matches @csdev, link it.
1006 */
1007 for (i = 0; i < i_csdev->pdata->nr_outport; i++) {
1008 conn = &i_csdev->pdata->conns[i];
1009
1010 /* We have found at least one orphan connection */
1011 if (conn->child_dev == NULL) {
1012 /* Does it match this newly added device? */
1013 if (conn->child_fwnode == csdev->dev.fwnode)
1014 conn->child_dev = csdev;
1015 else
1016 /* This component still has an orphan */
1017 still_orphan = true;
1018 }
1019 }
1020
1021 i_csdev->orphan = still_orphan;
1022
1023 /*
1024 * Returning '0' ensures that all known component on the
1025 * bus will be checked.
1026 */
1027 return 0;
1028}
1029
1030static void coresight_fixup_orphan_conns(struct coresight_device *csdev)
1031{
1032 /*
1033 * No need to check for a return value as orphan connection(s)
1034 * are hooked-up with each newly added component.
1035 */
1036 bus_for_each_dev(&coresight_bustype, NULL,
1037 csdev, coresight_orphan_match);
1038}
1039
1040
1041static void coresight_fixup_device_conns(struct coresight_device *csdev)
1042{
1043 int i;
1044
1045 for (i = 0; i < csdev->pdata->nr_outport; i++) {
1046 struct coresight_connection *conn = &csdev->pdata->conns[i];
1047 struct device *dev = NULL;
1048
1049 dev = bus_find_device_by_fwnode(&coresight_bustype, conn->child_fwnode);
1050 if (dev) {
1051 conn->child_dev = to_coresight_device(dev);
1052 /* and put reference from 'bus_find_device()' */
1053 put_device(dev);
1054 } else {
1055 csdev->orphan = true;
1056 conn->child_dev = NULL;
1057 }
1058 }
1059}
1060
1061static int coresight_remove_match(struct device *dev, void *data)
1062{
1063 int i;
1064 struct coresight_device *csdev, *iterator;
1065 struct coresight_connection *conn;
1066
1067 csdev = data;
1068 iterator = to_coresight_device(dev);
1069
1070 /* No need to check oneself */
1071 if (csdev == iterator)
1072 return 0;
1073
1074 /*
1075 * Circle throuch all the connection of that component. If we find
1076 * a connection whose name matches @csdev, remove it.
1077 */
1078 for (i = 0; i < iterator->pdata->nr_outport; i++) {
1079 conn = &iterator->pdata->conns[i];
1080
1081 if (conn->child_dev == NULL)
1082 continue;
1083
1084 if (csdev->dev.fwnode == conn->child_fwnode) {
1085 iterator->orphan = true;
1086 conn->child_dev = NULL;
1087 /*
1088 * Drop the reference to the handle for the remote
1089 * device acquired in parsing the connections from
1090 * platform data.
1091 */
1092 fwnode_handle_put(conn->child_fwnode);
1093 /* No need to continue */
1094 break;
1095 }
1096 }
1097
1098 /*
1099 * Returning '0' ensures that all known component on the
1100 * bus will be checked.
1101 */
1102 return 0;
1103}
1104
1105/*
1106 * coresight_remove_conns - Remove references to this given devices
1107 * from the connections of other devices.
1108 */
1109static void coresight_remove_conns(struct coresight_device *csdev)
1110{
1111 /*
1112 * Another device will point to this device only if there is
1113 * an output port connected to this one. i.e, if the device
1114 * doesn't have at least one input port, there is no point
1115 * in searching all the devices.
1116 */
1117 if (csdev->pdata->nr_inport)
1118 bus_for_each_dev(&coresight_bustype, NULL,
1119 csdev, coresight_remove_match);
1120}
1121
1122/**
1123 * coresight_timeout - loop until a bit has changed to a specific state.
1124 * @addr: base address of the area of interest.
1125 * @offset: address of a register, starting from @addr.
1126 * @position: the position of the bit of interest.
1127 * @value: the value the bit should have.
1128 *
1129 * Return: 0 as soon as the bit has taken the desired state or -EAGAIN if
1130 * TIMEOUT_US has elapsed, which ever happens first.
1131 */
1132
1133int coresight_timeout(void __iomem *addr, u32 offset, int position, int value)
1134{
1135 int i;
1136 u32 val;
1137
1138 for (i = TIMEOUT_US; i > 0; i--) {
1139 val = __raw_readl(addr + offset);
1140 /* waiting on the bit to go from 0 to 1 */
1141 if (value) {
1142 if (val & BIT(position))
1143 return 0;
1144 /* waiting on the bit to go from 1 to 0 */
1145 } else {
1146 if (!(val & BIT(position)))
1147 return 0;
1148 }
1149
1150 /*
1151 * Delay is arbitrary - the specification doesn't say how long
1152 * we are expected to wait. Extra check required to make sure
1153 * we don't wait needlessly on the last iteration.
1154 */
1155 if (i - 1)
1156 udelay(1);
1157 }
1158
1159 return -EAGAIN;
1160}
1161
1162struct bus_type coresight_bustype = {
1163 .name = "coresight",
1164};
1165
1166static int __init coresight_init(void)
1167{
1168 return bus_register(&coresight_bustype);
1169}
1170postcore_initcall(coresight_init);
1171
1172/*
1173 * coresight_release_platform_data: Release references to the devices connected
1174 * to the output port of this device.
1175 */
1176void coresight_release_platform_data(struct coresight_platform_data *pdata)
1177{
1178 int i;
1179
1180 for (i = 0; i < pdata->nr_outport; i++) {
1181 if (pdata->conns[i].child_fwnode) {
1182 fwnode_handle_put(pdata->conns[i].child_fwnode);
1183 pdata->conns[i].child_fwnode = NULL;
1184 }
1185 }
1186}
1187
1188struct coresight_device *coresight_register(struct coresight_desc *desc)
1189{
1190 int ret;
1191 int link_subtype;
1192 int nr_refcnts = 1;
1193 atomic_t *refcnts = NULL;
1194 struct coresight_device *csdev;
1195
1196 csdev = kzalloc(sizeof(*csdev), GFP_KERNEL);
1197 if (!csdev) {
1198 ret = -ENOMEM;
1199 goto err_out;
1200 }
1201
1202 if (desc->type == CORESIGHT_DEV_TYPE_LINK ||
1203 desc->type == CORESIGHT_DEV_TYPE_LINKSINK) {
1204 link_subtype = desc->subtype.link_subtype;
1205
1206 if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_MERG)
1207 nr_refcnts = desc->pdata->nr_inport;
1208 else if (link_subtype == CORESIGHT_DEV_SUBTYPE_LINK_SPLIT)
1209 nr_refcnts = desc->pdata->nr_outport;
1210 }
1211
1212 refcnts = kcalloc(nr_refcnts, sizeof(*refcnts), GFP_KERNEL);
1213 if (!refcnts) {
1214 ret = -ENOMEM;
1215 goto err_free_csdev;
1216 }
1217
1218 csdev->refcnt = refcnts;
1219
1220 csdev->pdata = desc->pdata;
1221
1222 csdev->type = desc->type;
1223 csdev->subtype = desc->subtype;
1224 csdev->ops = desc->ops;
1225 csdev->orphan = false;
1226
1227 csdev->dev.type = &coresight_dev_type[desc->type];
1228 csdev->dev.groups = desc->groups;
1229 csdev->dev.parent = desc->dev;
1230 csdev->dev.release = coresight_device_release;
1231 csdev->dev.bus = &coresight_bustype;
1232 /*
1233 * Hold the reference to our parent device. This will be
1234 * dropped only in coresight_device_release().
1235 */
1236 csdev->dev.fwnode = fwnode_handle_get(dev_fwnode(desc->dev));
1237 dev_set_name(&csdev->dev, "%s", desc->name);
1238
1239 ret = device_register(&csdev->dev);
1240 if (ret) {
1241 put_device(&csdev->dev);
1242 /*
1243 * All resources are free'd explicitly via
1244 * coresight_device_release(), triggered from put_device().
1245 */
1246 goto err_out;
1247 }
1248
1249 if (csdev->type == CORESIGHT_DEV_TYPE_SINK ||
1250 csdev->type == CORESIGHT_DEV_TYPE_LINKSINK) {
1251 ret = etm_perf_add_symlink_sink(csdev);
1252
1253 if (ret) {
1254 device_unregister(&csdev->dev);
1255 /*
1256 * As with the above, all resources are free'd
1257 * explicitly via coresight_device_release() triggered
1258 * from put_device(), which is in turn called from
1259 * function device_unregister().
1260 */
1261 goto err_out;
1262 }
1263 }
1264
1265 mutex_lock(&coresight_mutex);
1266
1267 coresight_fixup_device_conns(csdev);
1268 coresight_fixup_orphan_conns(csdev);
1269
1270 mutex_unlock(&coresight_mutex);
1271
1272 return csdev;
1273
1274err_free_csdev:
1275 kfree(csdev);
1276err_out:
1277 /* Cleanup the connection information */
1278 coresight_release_platform_data(desc->pdata);
1279 return ERR_PTR(ret);
1280}
1281EXPORT_SYMBOL_GPL(coresight_register);
1282
1283void coresight_unregister(struct coresight_device *csdev)
1284{
1285 etm_perf_del_symlink_sink(csdev);
1286 /* Remove references of that device in the topology */
1287 coresight_remove_conns(csdev);
1288 coresight_release_platform_data(csdev->pdata);
1289 device_unregister(&csdev->dev);
1290}
1291EXPORT_SYMBOL_GPL(coresight_unregister);
1292
1293
1294/*
1295 * coresight_search_device_idx - Search the fwnode handle of a device
1296 * in the given dev_idx list. Must be called with the coresight_mutex held.
1297 *
1298 * Returns the index of the entry, when found. Otherwise, -ENOENT.
1299 */
1300static inline int coresight_search_device_idx(struct coresight_dev_list *dict,
1301 struct fwnode_handle *fwnode)
1302{
1303 int i;
1304
1305 for (i = 0; i < dict->nr_idx; i++)
1306 if (dict->fwnode_list[i] == fwnode)
1307 return i;
1308 return -ENOENT;
1309}
1310
1311/*
1312 * coresight_alloc_device_name - Get an index for a given device in the
1313 * device index list specific to a driver. An index is allocated for a
1314 * device and is tracked with the fwnode_handle to prevent allocating
1315 * duplicate indices for the same device (e.g, if we defer probing of
1316 * a device due to dependencies), in case the index is requested again.
1317 */
1318char *coresight_alloc_device_name(struct coresight_dev_list *dict,
1319 struct device *dev)
1320{
1321 int idx;
1322 char *name = NULL;
1323 struct fwnode_handle **list;
1324
1325 mutex_lock(&coresight_mutex);
1326
1327 idx = coresight_search_device_idx(dict, dev_fwnode(dev));
1328 if (idx < 0) {
1329 /* Make space for the new entry */
1330 idx = dict->nr_idx;
1331 list = krealloc(dict->fwnode_list,
1332 (idx + 1) * sizeof(*dict->fwnode_list),
1333 GFP_KERNEL);
1334 if (ZERO_OR_NULL_PTR(list)) {
1335 idx = -ENOMEM;
1336 goto done;
1337 }
1338
1339 list[idx] = dev_fwnode(dev);
1340 dict->fwnode_list = list;
1341 dict->nr_idx = idx + 1;
1342 }
1343
1344 name = devm_kasprintf(dev, GFP_KERNEL, "%s%d", dict->pfx, idx);
1345done:
1346 mutex_unlock(&coresight_mutex);
1347 return name;
1348}
1349EXPORT_SYMBOL_GPL(coresight_alloc_device_name);