From: Tsukasa OI <research_trasio@irq.a4lg.com>
To: Tsukasa OI <research_trasio@irq.a4lg.com>
Cc: binutils@sourceware.org
Subject: [REVIEW ONLY 2/2] TEST: Add instantiation script on CSR allocation
Date: Tue, 29 Nov 2022 01:20:58 +0000 [thread overview]
Message-ID: <ee7c7490f10af1e9cc9c9475814e4d8a9b1a9304.1669684854.git.research_trasio@irq.a4lg.com> (raw)
In-Reply-To: <cover.1669684854.git.research_trasio@irq.a4lg.com>
From: Tsukasa OI <research_trasio@irq.a4lg.com>
---
instantiate-sspmp.sh | 130 +++++++++++++++++++++++++++++++++++++++++++
1 file changed, 130 insertions(+)
create mode 100755 instantiate-sspmp.sh
diff --git a/instantiate-sspmp.sh b/instantiate-sspmp.sh
new file mode 100755
index 000000000000..23b6a2f554e6
--- /dev/null
+++ b/instantiate-sspmp.sh
@@ -0,0 +1,130 @@
+#! /bin/bash
+# SPDX-License-Identifier: CC0-1.0
+# Author: Tsukasa OI <research_trasio@irq.a4lg.com>
+# Year: 2022
+
+check_csr_addr ()
+{
+ ADDR="$1"
+ case "$ADDR" in
+ 0x* | 0X*)
+ ADDR="${ADDR#??}"
+ ;;
+ esac
+ case "$ADDR" in
+ [0-9a-fA-F])
+ ADDR=00$ADDR
+ ;;
+ [0-9a-fA-F][0-9a-fA-F])
+ ADDR=0$ADDR
+ ;;
+ [0-9a-fA-F][0-9a-fA-F][0-9a-fA-F])
+ ;;
+ *)
+ echo "ERROR: \`$1' is not a valid CSR address for \`$2'." 1>&2
+ exit 1
+ ;;
+ esac
+ ADDR=$(echo $ADDR | tr A-F a-f)
+ printf %s $ADDR
+ return 0
+}
+
+canonicalize_hex ()
+{
+ ADDR=$1
+ while :
+ do
+ case $ADDR in
+ 0)
+ break
+ ;;
+ 0?*)
+ ADDR=${ADDR#0}
+ ;;
+ *)
+ break
+ ;;
+ esac
+ done
+ printf 0x%s $ADDR
+}
+
+dwarf_regnum ()
+{
+ echo -n $(($1 + 4096))
+}
+
+dwarf_offset ()
+{
+ echo -n $(($1 * 4))
+}
+
+test_path ()
+{
+ if test '!' -f "$1"
+ then
+ echo "ERROR: file \`$1' is not found." 1>&2
+ exit 1
+ fi
+}
+
+if test $# -ne 4
+then
+ ERRMSG="usage: $0 ADDR_SPMPCFG0 ADDR_SPMPADDR0 ADDR_SPMPSWITCH0 ADDR_SPMPSWITCH1"
+ echo "$ERRMSG" 1>&2
+ exit 1
+fi
+
+PRIV_VERSIONS="1p9p1 1p10 1p11 1p12"
+
+test_path include/opcode/riscv-opc.h
+for V in $PRIV_VERSIONS
+do
+ test_path gas/testsuite/gas/riscv/csr-version-$V.d
+done
+test_path gas/testsuite/gas/riscv/csr-dw-regnums.s
+test_path gas/testsuite/gas/riscv/csr-dw-regnums.d
+
+do_csr_instantiation ()
+{
+ CSR="$1"
+ CSR_UPPER=$(echo $CSR | tr a-z A-Z)
+ ADDR=$(check_csr_addr "$2" $CSR)
+ HEXC=$(canonicalize_hex $ADDR)
+ DWREG=$(dwarf_regnum $HEXC)
+ DWOFF=$(dwarf_offset $HEXC)
+ ORIG_ADDR=$(grep "a0,${CSR}\$" gas/testsuite/gas/riscv/csr-version-1p12.d | head -n 1 | sed 's/.*+\([0-9a-f]\{3\}\)02573.*/\1/')
+ sed -i "s/^#define CSR_${CSR_UPPER} .*/#define CSR_${CSR_UPPER} $HEXC/" include/opcode/riscv-opc.h
+ for V in $PRIV_VERSIONS
+ do
+ sed -i "s/+${ORIG_ADDR}\\(02573\\|59073\\)/+${ADDR}\\1/" gas/testsuite/gas/riscv/csr-version-$V.d
+ done
+ sed -i "s/\\.cfi_offset ${CSR}, .*/.cfi_offset ${CSR}, ${DWOFF}/" gas/testsuite/gas/riscv/csr-dw-regnums.s
+ sed -i "s/DW_CFA_offset_extended_sf: r[0-9]\\+ \\\\(${CSR}\\\\) at cfa\\\\+[0-9]\\+/DW_CFA_offset_extended_sf: r${DWREG} \\\\(${CSR}\\\\) at cfa\\\\+${DWOFF}/" gas/testsuite/gas/riscv/csr-dw-regnums.d
+}
+
+ADDR=$(check_csr_addr "$1" spmpcfg0)
+NADDR=$((0x$ADDR))
+for N in $(seq 0 15)
+do
+ ADDR_N=$(printf %03x $(($NADDR + $N)))
+ do_csr_instantiation spmpcfg$N $ADDR_N
+done
+
+ADDR=$(check_csr_addr "$2" spmpaddr0)
+NADDR=$((0x$ADDR))
+for N in $(seq 0 63)
+do
+ ADDR_N=$(printf %03x $(($NADDR + $N)))
+ do_csr_instantiation spmpaddr$N $ADDR_N
+done
+
+do_csr_instantiation spmpswitch0 "$3"
+do_csr_instantiation spmpswitch1 "$4"
+
+if test -f "$0"
+then
+ rm -f "$0"
+fi
+exit 0
--
2.38.1
next prev parent reply other threads:[~2022-11-29 1:21 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-11-29 1:20 [REVIEW ONLY 0/2] UNRATIFIED RISC-V: Add 'Sspmp' extension and its TENTATIVE CSRs Tsukasa OI
2022-11-29 1:20 ` [REVIEW ONLY 1/2] " Tsukasa OI
2022-11-29 2:22 ` Palmer Dabbelt
2022-11-29 1:20 ` Tsukasa OI [this message]
2022-11-29 2:22 ` [REVIEW ONLY 2/2] TEST: Add instantiation script on CSR allocation Palmer Dabbelt
2022-11-29 2:32 ` Tsukasa OI
2022-11-29 2:39 ` Palmer Dabbelt
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=ee7c7490f10af1e9cc9c9475814e4d8a9b1a9304.1669684854.git.research_trasio@irq.a4lg.com \
--to=research_trasio@irq.a4lg.com \
--cc=binutils@sourceware.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).