aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/aarch64/tst-vpcs-mod.S
blob: eac0074ebc00bd831f5a03b08a4e171a7f37040c (plain)
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
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
/* Record the register state before and after a variant PCS call.
   Copyright (C) 2020-2022 Free Software Foundation, Inc.

   This file is part of the GNU C Library.

   The GNU C Library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Lesser General Public License as
   published by the Free Software Foundation; either version 2.1 of the
   License, or (at your option) any later version.

   The GNU C Library 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
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public
   License along with the GNU C Library.  If not, see
   <https://www.gnu.org/licenses/>.  */

	.variant_pcs	vpcs_call
	.global	vpcs_call
	.type	vpcs_call, %function
vpcs_call:
	.cfi_startproc
	hint	34 /* bti c.  */

	/* Save register state to *x0.  */
	stp	x0, x1, [x0]
	stp	x2, x3, [x0, 16]
	stp	x4, x5, [x0, 32]
	stp	x6, x7, [x0, 48]
	stp	x8, x9, [x0, 64]
	stp	x10, x11, [x0, 80]
	stp	x12, x13, [x0, 96]
	stp	x14, x15, [x0, 112]
	stp	x16, x17, [x0, 128]
	stp	x18, x19, [x0, 144]
	stp	x20, x21, [x0, 160]
	stp	x22, x23, [x0, 176]
	stp	x24, x25, [x0, 192]
	stp	x26, x27, [x0, 208]
	stp	x28, x29, [x0, 224]
	mov	x1, sp
	stp	x30, x1, [x0, 240]
	stp	q0, q1, [x0, 256]
	stp	q2, q3, [x0, 288]
	stp	q4, q5, [x0, 320]
	stp	q6, q7, [x0, 352]
	stp	q8, q9, [x0, 384]
	stp	q10, q11, [x0, 416]
	stp	q12, q13, [x0, 448]
	stp	q14, q15, [x0, 480]
	stp	q16, q17, [x0, 512]
	stp	q18, q19, [x0, 544]
	stp	q20, q21, [x0, 576]
	stp	q22, q23, [x0, 608]
	stp	q24, q25, [x0, 640]
	stp	q26, q27, [x0, 672]
	stp	q28, q29, [x0, 704]
	stp	q30, q31, [x0, 736]
	ret
	.cfi_endproc
	.size	vpcs_call, .-vpcs_call

	.global	vpcs_call_regs
	.type	vpcs_call_regs, %function
vpcs_call_regs:
	.cfi_startproc
	hint	34 /* bti c.  */

	stp     x29, x30, [sp, -160]!
	mov     x29, sp

	/* Save callee-saved registers.  */
	stp	x19, x20, [sp, 16]
	stp	x21, x22, [sp, 32]
	stp	x23, x24, [sp, 48]
	stp	x25, x26, [sp, 64]
	stp	x27, x28, [sp, 80]
	stp	d8, d9, [sp, 96]
	stp	d10, d11, [sp, 112]
	stp	d12, d13, [sp, 128]
	stp	d14, d15, [sp, 144]

	/* Initialize most registers from *x1, and save x0, x1, x29, x30,
	   and sp (== x29), so *x1 contains the register state.  */
	stp	x0, x1, [x1]
	str	x29, [x1, 232]
	ldp	x2, x3, [x1, 16]
	ldp	x4, x5, [x1, 32]
	ldp	x6, x7, [x1, 48]
	ldp	x8, x9, [x1, 64]
	ldp	x10, x11, [x1, 80]
	ldp	x12, x13, [x1, 96]
	ldp	x14, x15, [x1, 112]
	ldp	x16, x17, [x1, 128]
	ldp	x18, x19, [x1, 144]
	ldp	x20, x21, [x1, 160]
	ldp	x22, x23, [x1, 176]
	ldp	x24, x25, [x1, 192]
	ldp	x26, x27, [x1, 208]
	ldr	x28, [x1, 224]
	/* Skip x29, x30, sp.  */
	ldp	q0, q1, [x1, 256]
	ldp	q2, q3, [x1, 288]
	ldp	q4, q5, [x1, 320]
	ldp	q6, q7, [x1, 352]
	ldp	q8, q9, [x1, 384]
	ldp	q10, q11, [x1, 416]
	ldp	q12, q13, [x1, 448]
	ldp	q14, q15, [x1, 480]
	ldp	q16, q17, [x1, 512]
	ldp	q18, q19, [x1, 544]
	ldp	q20, q21, [x1, 576]
	ldp	q22, q23, [x1, 608]
	ldp	q24, q25, [x1, 640]
	ldp	q26, q27, [x1, 672]
	ldp	q28, q29, [x1, 704]
	ldp	q30, q31, [x1, 736]

	/* Emulate a BL using B, but save x30 before the branch.  */
	adr	x30, .L_return_addr
	stp	x30, x29, [x1, 240]
	b	vpcs_call
.L_return_addr:

	/* Restore callee-saved registers.  */
	ldp	x19, x20, [sp, 16]
	ldp	x21, x22, [sp, 32]
	ldp	x23, x24, [sp, 48]
	ldp	x25, x26, [sp, 64]
	ldp	x27, x28, [sp, 80]
	ldp	d8, d9, [sp, 96]
	ldp	d10, d11, [sp, 112]
	ldp	d12, d13, [sp, 128]
	ldp	d14, d15, [sp, 144]

	ldp     x29, x30, [sp], 160
	ret
	.cfi_endproc
	.size	vpcs_call_regs, .-vpcs_call_regs