[linux-block.git] / scripts / stackusage

#!/bin/sh
# SPDX-License-Identifier: GPL-2.0

outfile=""
now=`date +%s`

while [ $# -gt 0 ]
do
    case "$1" in
        -o)
	    outfile="$2"
	    shift 2;;
	-h)
	    echo "usage: $0 [-o outfile] <make options/args>"
	    exit 0;;
	*)  break;;
    esac
done

if [ -z "$outfile" ]
then
    outfile=`mktemp --tmpdir stackusage.$$.XXXX`
fi

KCFLAGS="${KCFLAGS} -fstack-usage" make "$@"

# Prepend directory name to file names, remove column information,
# make file:line/function/size/type properly tab-separated.
find . -name '*.su' -newermt "@${now}" -print |                     \
    xargs perl -MFile::Basename -pe                                 \
        '$d = dirname($ARGV); s#([^:]+:[0-9]+):[0-9]+:#$d/$1\t#;' | \
    sort -k3,3nr > "${outfile}"

echo "$0: output written to ${outfile}"
Commit	Line	Data
56d4a381	1	#!/bin/sh
b2441318	2	# SPDX-License-Identifier: GPL-2.0
56d4a381 RV	3
	4	outfile=""
	5	now=`date +%s`
	6
	7	while [ $# -gt 0 ]
	8	do
	9	case "$1" in
	10	-o)
	11	outfile="$2"
	12	shift 2;;
	13	-h)
	14	echo "usage: $0 [-o outfile] <make options/args>"
	15	exit 0;;
	16	*) break;;
	17	esac
	18	done
	19
	20	if [ -z "$outfile" ]
	21	then
	22	outfile=`mktemp --tmpdir stackusage.$$.XXXX`
	23	fi
	24
	25	KCFLAGS="${KCFLAGS} -fstack-usage" make "$@"
	26
	27	# Prepend directory name to file names, remove column information,
	28	# make file:line/function/size/type properly tab-separated.
	29	find . -name '*.su' -newermt "@${now}" -print \| \
	30	xargs perl -MFile::Basename -pe \
	31	'$d = dirname($ARGV); s#([^:]+:[0-9]+):[0-9]+:#$d/$1\t#;' \| \
	32	sort -k3,3nr > "${outfile}"
	33
	34	echo "$0: output written to ${outfile}"