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