On Jan 24 20:15, Alex Bennée wrote:
> Signed-off-by: Alex Bennée <alex.ben...@linaro.org>
> Cc: Aaron Lindsay <aa...@os.amperecomputing.com>
> Message-ID: <YXCA62xdRDeueQR6@strawberry.localdomain>
>
> ---
> [AJB] this was for testing, I think you can show the same stuff with
> the much more complete execlog now.
Is it true that execlog can also reproduce the duplicate loads which are
still an outstanding issue?
-Aaron
> ---
> contrib/plugins/stxp-plugin.c | 50 +++++++++++++++++++++++++++++++
> tests/tcg/aarch64/stxp.c | 28 +++++++++++++++++
> contrib/plugins/Makefile | 1 +
> tests/tcg/aarch64/Makefile.target | 3 ++
> 4 files changed, 82 insertions(+)
> create mode 100644 contrib/plugins/stxp-plugin.c
> create mode 100644 tests/tcg/aarch64/stxp.c
>
> diff --git a/contrib/plugins/stxp-plugin.c b/contrib/plugins/stxp-plugin.c
> new file mode 100644
> index 0000000000..432cf8c1ed
> --- /dev/null
> +++ b/contrib/plugins/stxp-plugin.c
> @@ -0,0 +1,50 @@
> +#include <stdio.h>
> +#include <stdarg.h>
> +#include <qemu-plugin.h>
> +
> +QEMU_PLUGIN_EXPORT int qemu_plugin_version = QEMU_PLUGIN_VERSION;
> +
> +void qemu_logf(const char *str, ...)
> +{
> + char message[1024];
> + va_list args;
> + va_start(args, str);
> + vsnprintf(message, 1023, str, args);
> +
> + qemu_plugin_outs(message);
> +
> + va_end(args);
> +}
> +
> +void before_insn_cb(unsigned int cpu_index, void *udata)
> +{
> + uint64_t pc = (uint64_t)udata;
> + qemu_logf("Executing PC: 0x%" PRIx64 "\n", pc);
> +}
> +
> +static void mem_cb(unsigned int cpu_index, qemu_plugin_meminfo_t meminfo,
> uint64_t va, void *udata)
> +{
> + uint64_t pc = (uint64_t)udata;
> + qemu_logf("PC 0x%" PRIx64 " accessed memory at 0x%" PRIx64 "\n", pc, va);
> +}
> +
> +static void vcpu_tb_trans(qemu_plugin_id_t id, struct qemu_plugin_tb *tb)
> +{
> + size_t n = qemu_plugin_tb_n_insns(tb);
> +
> + for (size_t i = 0; i < n; i++) {
> + struct qemu_plugin_insn *insn = qemu_plugin_tb_get_insn(tb, i);
> + uint64_t pc = qemu_plugin_insn_vaddr(insn);
> +
> + qemu_plugin_register_vcpu_insn_exec_cb(insn, before_insn_cb,
> QEMU_PLUGIN_CB_R_REGS, (void *)pc);
> + qemu_plugin_register_vcpu_mem_cb(insn, mem_cb,
> QEMU_PLUGIN_CB_NO_REGS, QEMU_PLUGIN_MEM_RW, (void*)pc);
> + }
> +}
> +
> +QEMU_PLUGIN_EXPORT
> +int qemu_plugin_install(qemu_plugin_id_t id, const qemu_info_t *info,
> + int argc, char **argv)
> +{
> + qemu_plugin_register_vcpu_tb_trans_cb(id, vcpu_tb_trans);
> + return 0;
> +}
> diff --git a/tests/tcg/aarch64/stxp.c b/tests/tcg/aarch64/stxp.c
> new file mode 100644
> index 0000000000..fb8ef6a46d
> --- /dev/null
> +++ b/tests/tcg/aarch64/stxp.c
> @@ -0,0 +1,28 @@
> +
> +
> +void stxp_issue_demo(void *arr)
> +{
> + asm(".align 8\n\t"
> + " mov x0, %[in]\n\t"
> + " mov x18, 0x1000\n\t"
> + " mov x2, 0x0\n\t"
> + " mov x3, 0x0\n\t"
> + "loop:\n\t"
> + " prfm pstl1strm, [x0]\n\t"
> + " ldxp x16, x17, [x0]\n\t"
> + " stxp w16, x2, x3, [x0]\n\t"
> + "\n\t"
> + " subs x18, x18, 1\n\t"
> + " beq done\n\t"
> + " b loop\n\t"
> + "done:\n\t"
> + : /* none out */
> + : [in] "r" (arr) /* in */
> + : "x0", "x2", "x3", "x16", "x17", "x18"); /* clobbers */
> +}
> +
> +int main()
> +{
> + char arr[16];
> + stxp_issue_demo(&arr);
> +}
> diff --git a/contrib/plugins/Makefile b/contrib/plugins/Makefile
> index 54ac5ccd9f..576ed5875a 100644
> --- a/contrib/plugins/Makefile
> +++ b/contrib/plugins/Makefile
> @@ -20,6 +20,7 @@ NAMES += howvec
> NAMES += lockstep
> NAMES += hwprofile
> NAMES += cache
> +NAMES += stxp-plugin
>
> SONAMES := $(addsuffix .so,$(addprefix lib,$(NAMES)))
>
> diff --git a/tests/tcg/aarch64/Makefile.target
> b/tests/tcg/aarch64/Makefile.target
> index 1d967901bd..54b2e90d00 100644
> --- a/tests/tcg/aarch64/Makefile.target
> +++ b/tests/tcg/aarch64/Makefile.target
> @@ -72,4 +72,7 @@ endif
>
> endif
>
> +# Load/Store exclusive test
> +AARCH64_TESTS += stxp
> +
> TESTS += $(AARCH64_TESTS)
> --
> 2.30.2
>
