xref: /freebsd/sys/arm/arm/sys_machdep.c (revision 4f52dfbb8d6c4d446500c5b097e3806ec219fbd4)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1990 The Regents of the University of California.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  *
31  *	from: @(#)sys_machdep.c	5.5 (Berkeley) 1/19/91
32  */
33 
34 #include <sys/cdefs.h>
35 __FBSDID("$FreeBSD$");
36 
37 #include "opt_capsicum.h"
38 
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/capsicum.h>
42 #include <sys/proc.h>
43 #include <sys/sysproto.h>
44 #include <sys/syscall.h>
45 #include <sys/sysent.h>
46 #include <vm/vm.h>
47 #include <vm/vm_extern.h>
48 
49 #include <machine/cpu.h>
50 #include <machine/sysarch.h>
51 #include <machine/machdep.h>
52 #include <machine/vmparam.h>
53 
54 #ifndef _SYS_SYSPROTO_H_
55 struct sysarch_args {
56 	int op;
57 	char *parms;
58 };
59 #endif
60 
61 /* Prototypes */
62 static int arm32_sync_icache (struct thread *, void *);
63 static int arm32_drain_writebuf(struct thread *, void *);
64 
65 #if __ARM_ARCH >= 6
66 static int
67 sync_icache(uintptr_t addr, size_t len)
68 {
69 	size_t size;
70 	vm_offset_t rv;
71 
72 	/*
73 	 * Align starting address to even number because value of "1"
74 	 * is used as return value for success.
75 	 */
76 	len += addr & 1;
77 	addr &= ~1;
78 
79 	/* Break whole range to pages. */
80 	do {
81 		size = PAGE_SIZE - (addr & PAGE_MASK);
82 		size = min(size, len);
83 		rv = dcache_wb_pou_checked(addr, size);
84 		if (rv == 1) /* see dcache_wb_pou_checked() */
85 			rv = icache_inv_pou_checked(addr, size);
86 		if (rv != 1) {
87 			if (!useracc((void *)addr, size, VM_PROT_READ)) {
88 				/* Invalid access */
89 				return (rv);
90 			}
91 			/* Valid but unmapped page - skip it. */
92 		}
93 		len -= size;
94 		addr += size;
95 	} while (len > 0);
96 
97 	/* Invalidate branch predictor buffer. */
98 	bpb_inv_all();
99 	return (1);
100 }
101 #endif
102 
103 static int
104 arm32_sync_icache(struct thread *td, void *args)
105 {
106 	struct arm_sync_icache_args ua;
107 	int error;
108 	ksiginfo_t ksi;
109 #if __ARM_ARCH >= 6
110 	vm_offset_t rv;
111 #endif
112 
113 	if ((error = copyin(args, &ua, sizeof(ua))) != 0)
114 		return (error);
115 
116 	if  (ua.len == 0) {
117 		td->td_retval[0] = 0;
118 		return (0);
119 	}
120 
121 	/*
122 	 * Validate arguments. Address and length are unsigned,
123 	 * so we can use wrapped overflow check.
124 	 */
125 	if (((ua.addr + ua.len) < ua.addr) ||
126 	    ((ua.addr + ua.len) > VM_MAXUSER_ADDRESS)) {
127 		ksiginfo_init_trap(&ksi);
128 		ksi.ksi_signo = SIGSEGV;
129 		ksi.ksi_code = SEGV_ACCERR;
130 		ksi.ksi_addr = (void *)max(ua.addr, VM_MAXUSER_ADDRESS);
131 		trapsignal(td, &ksi);
132 		return (EINVAL);
133 	}
134 
135 #if __ARM_ARCH >= 6
136 	rv = sync_icache(ua.addr, ua.len);
137 	if (rv != 1) {
138 		ksiginfo_init_trap(&ksi);
139 		ksi.ksi_signo = SIGSEGV;
140 		ksi.ksi_code = SEGV_MAPERR;
141 		ksi.ksi_addr = (void *)rv;
142 		trapsignal(td, &ksi);
143 		return (EINVAL);
144 	}
145 #else
146 	cpu_icache_sync_range(ua.addr, ua.len);
147 #endif
148 
149 	td->td_retval[0] = 0;
150 	return (0);
151 }
152 
153 static int
154 arm32_drain_writebuf(struct thread *td, void *args)
155 {
156 	/* No args. */
157 
158 #if __ARM_ARCH < 6
159 	cpu_drain_writebuf();
160 #else
161 	dsb();
162 	cpu_l2cache_drain_writebuf();
163 #endif
164 	td->td_retval[0] = 0;
165 	return (0);
166 }
167 
168 static int
169 arm32_set_tp(struct thread *td, void *args)
170 {
171 
172 #if __ARM_ARCH >= 6
173 	set_tls(args);
174 #else
175 	td->td_md.md_tp = (register_t)args;
176 	*(register_t *)ARM_TP_ADDRESS = (register_t)args;
177 #endif
178 	return (0);
179 }
180 
181 static int
182 arm32_get_tp(struct thread *td, void *args)
183 {
184 
185 #if __ARM_ARCH >= 6
186 	td->td_retval[0] = (register_t)get_tls();
187 #else
188 	td->td_retval[0] = *(register_t *)ARM_TP_ADDRESS;
189 #endif
190 	return (0);
191 }
192 
193 int
194 sysarch(struct thread *td, struct sysarch_args *uap)
195 {
196 	int error;
197 
198 #ifdef CAPABILITY_MODE
199 	/*
200 	 * When adding new operations, add a new case statement here to
201 	 * explicitly indicate whether or not the operation is safe to
202 	 * perform in capability mode.
203 	 */
204 	if (IN_CAPABILITY_MODE(td)) {
205 		switch (uap->op) {
206 		case ARM_SYNC_ICACHE:
207 		case ARM_DRAIN_WRITEBUF:
208 		case ARM_SET_TP:
209 		case ARM_GET_TP:
210 		case ARM_GET_VFPSTATE:
211 			break;
212 
213 		default:
214 #ifdef KTRACE
215 			if (KTRPOINT(td, KTR_CAPFAIL))
216 				ktrcapfail(CAPFAIL_SYSCALL, NULL, NULL);
217 #endif
218 			return (ECAPMODE);
219 		}
220 	}
221 #endif
222 
223 	switch (uap->op) {
224 	case ARM_SYNC_ICACHE:
225 		error = arm32_sync_icache(td, uap->parms);
226 		break;
227 	case ARM_DRAIN_WRITEBUF:
228 		error = arm32_drain_writebuf(td, uap->parms);
229 		break;
230 	case ARM_SET_TP:
231 		error = arm32_set_tp(td, uap->parms);
232 		break;
233 	case ARM_GET_TP:
234 		error = arm32_get_tp(td, uap->parms);
235 		break;
236 	case ARM_GET_VFPSTATE:
237 		error = arm_get_vfpstate(td, uap->parms);
238 		break;
239 	default:
240 		error = EINVAL;
241 		break;
242 	}
243 	return (error);
244 }
245