aboutsummaryrefslogtreecommitdiffstats
path: root/roms/skiboot/external/mambo/qtrace_utils.tcl
diff options
context:
space:
mode:
authorAngelos Mouzakitis <a.mouzakitis@virtualopensystems.com>2023-10-10 14:33:42 +0000
committerAngelos Mouzakitis <a.mouzakitis@virtualopensystems.com>2023-10-10 14:33:42 +0000
commitaf1a266670d040d2f4083ff309d732d648afba2a (patch)
tree2fc46203448ddcc6f81546d379abfaeb323575e9 /roms/skiboot/external/mambo/qtrace_utils.tcl
parente02cda008591317b1625707ff8e115a4841aa889 (diff)
Add submodule dependency filesHEADmaster
Change-Id: Iaf8d18082d3991dec7c0ebbea540f092188eb4ec
Diffstat (limited to 'roms/skiboot/external/mambo/qtrace_utils.tcl')
-rw-r--r--roms/skiboot/external/mambo/qtrace_utils.tcl16
1 files changed, 16 insertions, 0 deletions
diff --git a/roms/skiboot/external/mambo/qtrace_utils.tcl b/roms/skiboot/external/mambo/qtrace_utils.tcl
new file mode 100644
index 000000000..bb20b31d3
--- /dev/null
+++ b/roms/skiboot/external/mambo/qtrace_utils.tcl
@@ -0,0 +1,16 @@
+# SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later
+
+if { [file exists $env(LIB_DIR)/perf/qtrace.tcl] == 1} {
+ if { [catch {source $env(LIB_DIR)/perf/qtrace.tcl} issue ] } {
+ puts "QTrace not available: $issue"
+ }
+
+ proc start_qtrace { { qtfile qtrace.qt } } {
+ QTrace::Initialize p9 mysim
+ QTrace::Start $qtfile mysim
+ }
+
+ proc stop_qtrace { } {
+ QTrace::Stop mysim
+ }
+}