mirror of
https://git.ffmpeg.org/ffmpeg.git
synced 2025-02-12 09:39:46 +00:00
This preserves T1 whilst calling the instrumented function. In a Sci-Fi setting where type-based Control Flow Integrity (CFI) is supported, the calling code (i.e., the `checkasm` test case) will set T1 to the expected value of the landing pad label (LPL) of the instrumented function. The call wrapper will always use LPL zero which is a wild card. We should preserve the value of T1 at least until the indirect call to the instrumented function. Of course this is Sci-Fi, because: 1) there is no hardware (or even QEMU) support yet, 2) all our assembler functions currently use LPL zero anyway. This uses T3 rather than T2 because indirect branches with T2 is reserved for notionally direct calls made with an indirect call instruction (e.g. due to GOT indirection), and are exempted from forward-edge CFI checks.
186 lines
5.1 KiB
ArmAsm
186 lines
5.1 KiB
ArmAsm
/****************************************************************************
|
|
* Copyright © 2022 Rémi Denis-Courmont.
|
|
*
|
|
* This file is part of FFmpeg.
|
|
*
|
|
* FFmpeg is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* FFmpeg is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111, USA.
|
|
*****************************************************************************/
|
|
|
|
#include "libavutil/riscv/asm.S"
|
|
|
|
#if (__riscv_xlen == 64)
|
|
|
|
const fail_s_reg
|
|
.asciz "callee-saved integer register clobbered"
|
|
endconst
|
|
|
|
const fail_fs_reg
|
|
.asciz "callee-saved floating-point register clobbered"
|
|
endconst
|
|
|
|
const fail_rsvd_reg
|
|
.asciz "unallocatable register clobbered"
|
|
endconst
|
|
|
|
.section .tbss, "waT"
|
|
.align 3
|
|
.hidden checked_func
|
|
.hidden saved_regs
|
|
|
|
checked_func:
|
|
.quad 0
|
|
|
|
saved_regs:
|
|
/* Space to spill RA, SP, GP, TP, S0-S11 and FS0-FS11 */
|
|
.rept 4 + 12 + 12
|
|
.quad 0
|
|
.endr
|
|
|
|
func checkasm_set_function
|
|
lpad 0
|
|
la.tls.ie t0, checked_func
|
|
add t0, tp, t0
|
|
sd a0, (t0)
|
|
ret
|
|
endfunc
|
|
|
|
func checkasm_get_wrapper, v
|
|
lpad 0
|
|
addi sp, sp, -16
|
|
sd fp, (sp)
|
|
sd ra, 8(sp)
|
|
addi fp, sp, 16
|
|
|
|
call av_get_cpu_flags
|
|
andi t0, a0, 8 /* AV_CPU_FLAG_RVV_I32 */
|
|
|
|
lla a0, 3f
|
|
beqz t0, 1f
|
|
lla a0, 2f
|
|
1:
|
|
ld ra, 8(sp)
|
|
ld fp, (sp)
|
|
addi sp, sp, 16
|
|
ret
|
|
|
|
.option norvc
|
|
.align 2
|
|
2: /* <-- Entry point with the Vector extension --> */
|
|
lpad 0
|
|
/* Clobber the vectors */
|
|
vsetvli t0, zero, e32, m8, ta, ma
|
|
li t0, 0xdeadbeef
|
|
vmv.v.x v0, t0
|
|
vmv.v.x v8, t0
|
|
vmv.v.x v16, t0
|
|
vmv.v.x v24, t0
|
|
|
|
/* Clobber the vector configuration */
|
|
li t0, 0 /* Vector length: zero */
|
|
li t2, -4 /* Vector type: illegal */
|
|
vsetvl zero, t0, t2
|
|
csrwi vxrm, 3 /* Rounding mode: round-to-odd */
|
|
csrwi vxsat, 1 /* Saturation: encountered */
|
|
|
|
.align 2
|
|
3: /* <-- Entry point without the Vector extension --> */
|
|
lpad 0
|
|
/* Save RA, unallocatable and callee-saved registers */
|
|
la.tls.ie t0, saved_regs
|
|
add t0, tp, t0
|
|
sd ra, (t0)
|
|
sd sp, 8(t0)
|
|
sd gp, 16(t0)
|
|
sd tp, 24(t0)
|
|
.irp n, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11
|
|
sd s\n, (32 + (16 * \n))(t0)
|
|
fsd fs\n, (40 + (16 * \n))(t0)
|
|
.endr
|
|
|
|
/* Clobber the stack space right below SP */
|
|
li t0, 0xdeadbeef1badf00d
|
|
.rept 16
|
|
addi sp, sp, -16
|
|
sd t0, (sp)
|
|
sd t0, 8(sp)
|
|
.endr
|
|
addi sp, sp, 256
|
|
|
|
/* Clobber the saved and temporary registers */
|
|
.irp n, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11
|
|
.if (\n > 1 && \n < 7)
|
|
mv t\n, t0
|
|
.endif
|
|
fmv.d.x ft\n, t0
|
|
mv s\n, t0
|
|
fmv.d.x fs\n, t0
|
|
.endr
|
|
|
|
/* Call the tested function */
|
|
la.tls.ie t0, checked_func
|
|
add t0, tp, t0
|
|
ld t3, (t0)
|
|
sd zero, (t0)
|
|
jalr t3
|
|
|
|
/* Check special register values */
|
|
la.tls.ie t0, saved_regs
|
|
add t0, tp, t0
|
|
ld t1, 8(t0)
|
|
bne t1, sp, 5f
|
|
ld t1, 16(t0)
|
|
bne t1, gp, 5f
|
|
ld t1, 24(t0) // If TP was corrupted, we probably will have...
|
|
bne t1, tp, 5f // ...already crashed before we even get here.
|
|
|
|
/* Check value of saved registers */
|
|
li t0, 0xdeadbeef1badf00d
|
|
.irp n, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11
|
|
bne t0, s\n, 6f
|
|
#ifdef __riscv_float_abi_double
|
|
/* TODO: check float ABI single too */
|
|
fmv.x.d t1, fs\n
|
|
bne t0, t1, 7f
|
|
#endif
|
|
.endr
|
|
|
|
4:
|
|
/* Restore RA and saved registers */
|
|
la.tls.ie t0, saved_regs
|
|
add t0, tp, t0
|
|
ld ra, (t0)
|
|
.irp n, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11
|
|
ld s\n, (32 + (16 * \n))(t0)
|
|
fld fs\n, (40 + (16 * \n))(t0)
|
|
.endr
|
|
ret
|
|
|
|
5:
|
|
lla a0, fail_rsvd_reg
|
|
call checkasm_fail_func
|
|
tail abort /* The test harness would probably crash anyway */
|
|
|
|
6:
|
|
lla a0, fail_s_reg
|
|
call checkasm_fail_func
|
|
j 4b
|
|
|
|
7:
|
|
lla a0, fail_fs_reg
|
|
call checkasm_fail_func
|
|
j 4b
|
|
endfunc
|
|
#endif
|