1 files changed, 82 insertions, 0 deletions
diff --git a/qa/914 b/qa/914
new file mode 100755
index 0000000..ac6e599
--- /dev/null
+++ b/qa/914
@@ -0,0 +1,82 @@
+#!/bin/sh
+# PCP QA Test No. 914
+# Exercise Performance API (PAPI) pmda
+#
+# Copyright (c) 2014 Red Hat. All Rights Reserved.
+#
+
+seq=`basename $0`
+echo "QA output created by $seq"
+
+# get standard environment, filters and checks
+. ./common.product
+. ./common.filter
+. ./common.check
+
+[ -d $PCP_PMDAS_DIR/papi ] || _notrun "PAPI PMDA is not installed"
+
+status=1	# failure is the default!
+$sudo rm -rf $tmp.* $seq.full
+trap "cd $here; rm -rf $tmp.*; exit \$status" 0 1 2 3 15
+
+_filter_papi_errors()
+{
+    sed \
+	-e '/pfm_find_full_event(.*): event not found./d' \
+	-e '/events in papi_events.csv were not valid./d' \
+    # end
+}
+
+_filter()
+{
+    sed \
+	-e 's/value [0-9][0-9]*/value NUMBER/' \
+	-e 's/value \".*\"/value STRING/' \
+    | _filter_papi_errors
+}
+
+# real QA test starts here
+pmns=$PCP_PMDAS_DIR/papi/root
+pmda=$PCP_PMDAS_DIR/papi/pmda_papi.$DSO_SUFFIX,papi_init
+
+echo
+echo "== PAPI library behaviour, total instructions/cycles, non-root"
+pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.TOT_INS papi.TOT_CYC 2>&1 | _filter
+
+echo
+echo "== PAPI library behaviour, available hardware metrics, non-root"
+pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.available 2>&1 | _filter
+
+echo
+echo "== PAPI library behaviour, control metric fetches, non-root"
+pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.control 2>&1 | _filter
+
+echo
+echo "== PAPI library behaviour, control metric stores, non-root"
+pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.enable TOT_INS 2>&1 | _filter_papi_errors
+pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.disable TOT_INS 2>&1 | _filter_papi_errors
+pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.reset TOT_INS 2>&1 | _filter_papi_errors
+
+echo
+echo "== PAPI library behaviour, total instructions/cycles, as root"
+$sudo pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.TOT_INS papi.TOT_CYC 2>&1 | _filter
+
+echo
+echo "== PAPI library behaviour, available hardware metrics, as root"
+$sudo pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.available 2>&1 | _filter
+
+echo
+echo "== PAPI library behaviour, control metric fetches, as root"
+$sudo pminfo -L -K clear -K add,126,$pmda -f -n $pmns papi.control 2>&1 | _filter_papi_errors
+
+echo
+echo "== Testing local PAPI library behaviour, control metric stores as root"
+$sudo pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.enable TOT_INS 2>&1 | _filter_papi_errors
+$sudo pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.disable TOT_INS 2>&1 | _filter_papi_errors
+
+# This will see an (expected) error... NYI.
+$sudo pmstore -L -K clear -K add,126,$pmda -f -n $pmns papi.control.reset TOT_INS 2>&1 | _filter_papi_errors
+
+# success, all done
+status=0
+exit