#!/bin/bash
#
# Copyright (c) 2019 Fuzhou Rockchip Electronics Co., Ltd
#
# SPDX-License-Identifier: GPL-2.0
#

set -e

INPUT_FILE=$1
TPL_SPL=$2

if [ "${TPL_SPL}" = "tpl" ]; then
	SYM_FILE=`find -name u-boot-tpl.sym`
	ELF_FILE="elf tpl"
elif [ "${TPL_SPL}" = "spl" ]; then
	SYM_FILE=`find -name u-boot-spl.sym`
	ELF_FILE="elf spl"
else
	SYM_FILE=`find -name u-boot.sym`
	ELF_FILE="elf"
fi

echo
if [ $# -eq 0 ]; then
	echo "Usage: "
	echo "	./scripts/stacktrace.sh <file> <type>"
	echo
	echo "Param:"
	echo "	<file>: stacktrace info file"
	echo "	<type>: none, spl, tpl"
	echo
	echo "Example:"
	echo "	./scripts/stacktrace.sh ./dump.txt"
	echo "	./scripts/stacktrace.sh ./dump.txt tpl"
	echo "	./scripts/stacktrace.sh ./dump.txt spl"
	echo
	exit 1
elif [ ! -f ${INPUT_FILE} ]; then
	echo "ERROR: No ${INPUT_FILE}"
	exit 1
elif [ "${SYM_FILE}" = '' ] || [ ! -f ${SYM_FILE} ]; then
	echo "ERROR: No ${SYM_FILE}"
	exit 1
fi

echo "SYMBOL File: ${SYM_FILE}"
echo
# Parse PC and LR
echo "Call trace:"
grep '\[< ' ${INPUT_FILE} | grep '>\]' | grep [PC,LR] | while read line
do
	echo -n " ${line}  "

	frame_pc_str=`echo ${line} | awk '{ print "0x"$3 }'`
	frame_pc_dec=`echo ${line} | awk '{ print strtonum("0x"$3); }'`
	frame_pc_hex=`echo "obase=16;${frame_pc_dec}"|bc |tr '[A-Z]' '[a-z]'`

	f_pc_dec=`cat ${SYM_FILE} | sort | awk '/\.text/ { if (strtonum("0x"$1) > '${frame_pc_str}') { print fpc; exit; } fpc=strtonum("0x"$1); }'`
	f_pc_hex=`echo "obase=16;${f_pc_dec}"|bc |tr '[A-Z]' '[a-z]'`
	f_offset_dec=$((frame_pc_dec-f_pc_dec))
	f_offset_hex=`echo "obase=16;${f_offset_dec}"|bc |tr '[A-Z]' '[a-z]'`

	cat ${SYM_FILE} | sort |
	awk -v foffset=${f_offset_hex} '/\.text/ {
		if (strtonum("0x"$1) > '${frame_pc_str}') {
			printf("%s+0x%s/0x%x      ", fname, foffset, fsize);
			exit
		}
		fname=$NF;
		fsize=strtonum("0x"$5);
		fpc=strtonum("0x"$1);
	}'

	func_path=`./make.sh ${frame_pc_str} | awk '{ print $1 }' | sed -n "/home/p"`
	func_path=`echo ${func_path##*boot/}`
	echo ${func_path}
done
echo

# Parse stack
echo "Stack:"
grep '\[< ' ${INPUT_FILE} | grep '>\]' | grep -v [PC,LR] | while read line
do
	echo -n "       ${line}  "

	frame_pc_str=`echo ${line} | awk '{ print "0x"$2 }'`
	frame_pc_dec=`echo ${line} | awk '{ print strtonum("0x"$2); }'`
	frame_pc_hex=`echo "obase=16;${frame_pc_dec}"|bc |tr '[A-Z]' '[a-z]'`

	f_pc_dec=`cat ${SYM_FILE} | sort | awk '/\.text/ { if (strtonum("0x"$1) > '${frame_pc_str}') { print fpc; exit; } fpc=strtonum("0x"$1); }'`
	f_pc_hex=`echo "obase=16;${f_pc_dec}"|bc |tr '[A-Z]' '[a-z]'`
	f_offset_dec=$((frame_pc_dec-f_pc_dec))
	f_offset_hex=`echo "obase=16;${f_offset_dec}"|bc |tr '[A-Z]' '[a-z]'`

	cat ${SYM_FILE} | sort |
	awk -v foffset=${f_offset_hex} '/\.text/ {
		if (strtonum("0x"$1) > '${frame_pc_str}') {
			printf("%s+0x%s/0x%x\n", fname, foffset, fsize);
			exit
		}
		fname=$NF;
		fsize=strtonum("0x"$5);
		fpc=strtonum("0x"$1);
	}'
done
echo

# PC instruction
echo "PC Surrounding Instructions:"
line=`grep '\[< ' ${INPUT_FILE} | grep '>\]' | grep [PC]`
frame_pc_str=`echo ${line} | awk '{ print "0x"$3 }'`
frame_pc_dec=`echo ${line} | awk '{ print strtonum("0x"$3); }'`
# Handle Thumb instr
if [ `expr ${frame_pc_dec} % 2` -ne 0 ];then
	frame_pc_dec=`expr ${frame_pc_dec} - 1`
fi
frame_pc_hex=`echo "obase=16;${frame_pc_dec}"|bc |tr '[A-Z]' '[a-z]'`
PC_INSTR=`./make.sh ${ELF_FILE} | grep -5 -m 1 "${frame_pc_hex}:"`
echo "${PC_INSTR}"
echo