File: testutils.inc

package info (click to toggle)
gdb 17.1-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 239,232 kB
  • sloc: ansic: 2,137,474; asm: 375,889; exp: 216,335; cpp: 73,755; makefile: 70,606; sh: 26,507; python: 14,162; yacc: 11,371; ada: 7,501; xml: 6,296; perl: 5,077; tcl: 3,566; pascal: 3,389; f90: 2,764; lisp: 1,984; cs: 879; lex: 738; sed: 228; awk: 181; objc: 137; fortran: 57
file content (70 lines) | stat: -rw-r--r-- 977 bytes parent folder | download | duplicates (17)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
# MACRO: exit
# Terminates execution.
	.macro exit nr

	stp	x29, x30, [sp,#-32]!
	mov	x4, #0x26
	mov	x7, #\nr
	mov	x29, sp
	movk	x4, #0x2, lsl #16
	add	x1, x29, #0x10
	str	x4, [x29,#16]
	str	x7, [x29,#24]
	mov	w0, #0x18
	hlt	#0xf000

	.endm

# MACRO: swiwrite
# Writes the string in X1 to stdout
	.macro swiwrite len
	
	stp	x29, x30, [sp,#-48]!
	mov	x0, #1
	mov	x2, #\len
	mov	x29, sp
	str	x0, [x29,#24]
	str	x1, [x29,#32]
	str	x2, [x29,#40]
	mov	w0, #0x5
	add	x1, x29, #0x18
	hlt	#0xf000
	ldp	x29, x30, [sp],#48
	ret

	.endm

# MACRO: pass
# Write 'pass' to stdout and quit
	.macro pass

	adrp	x1, .Lpass
	add	x1, x1, :lo12:.Lpass
	
	swiwrite 5
	exit 0
	.endm

# MACRO: fail
# Write 'fail' to stdout and quit
	.macro fail

	adrp	x1, .Lfail
	add	x1, x1, :lo12:.Lfail
	swiwrite 5
	exit 1
	.endm

# MACRO: start
# All assembler tests should start with a call to "start"
	.macro start
	.data
.Lpass:
	.asciz "pass\n"
.Lfail:
	.asciz "fail\n"

	.text
.global _start
_start:
	.endm