[net-next-2.6.git] / tools / perf / scripts / perl / bin / failed-syscalls-report

#!/bin/bash
# description: system-wide failed syscalls
# args: [comm]
if [ $# -gt 0 ] ; then
    if ! expr match "$1" "-" > /dev/null ; then
	comm=$1
	shift
    fi
fi
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/failed-syscalls.pl $comm
Commit	Line	Data
4d161f03 TZ	1	#!/bin/bash
	2	# description: system-wide failed syscalls
	3	# args: [comm]
00b21a01	4	if [ $# -gt 0 ] ; then
c3f5fd28	5	if ! expr match "$1" "-" > /dev/null ; then
00b21a01 TZ	6	comm=$1
	7	shift
	8	fi
	9	fi
44e668c6	10	perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/failed-syscalls.pl $comm