1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Restartable sequences system call
4  *
5  * Copyright (C) 2015, Google, Inc.,
6  * Paul Turner <pjt@google.com> and Andrew Hunter <ahh@google.com>
7  * Copyright (C) 2015-2018, EfficiOS Inc.,
8  * Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
9  */
10 
11 #include <linux/sched.h>
12 #include <linux/uaccess.h>
13 #include <linux/syscalls.h>
14 #include <linux/rseq.h>
15 #include <linux/types.h>
16 #include <asm/ptrace.h>
17 
18 #define CREATE_TRACE_POINTS
19 #include <trace/events/rseq.h>
20 
21 /* The original rseq structure size (including padding) is 32 bytes. */
22 #define ORIG_RSEQ_SIZE		32
23 
24 #define RSEQ_CS_NO_RESTART_FLAGS (RSEQ_CS_FLAG_NO_RESTART_ON_PREEMPT | \
25 				  RSEQ_CS_FLAG_NO_RESTART_ON_SIGNAL | \
26 				  RSEQ_CS_FLAG_NO_RESTART_ON_MIGRATE)
27 
28 /*
29  *
30  * Restartable sequences are a lightweight interface that allows
31  * user-level code to be executed atomically relative to scheduler
32  * preemption and signal delivery. Typically used for implementing
33  * per-cpu operations.
34  *
35  * It allows user-space to perform update operations on per-cpu data
36  * without requiring heavy-weight atomic operations.
37  *
38  * Detailed algorithm of rseq user-space assembly sequences:
39  *
40  *                     init(rseq_cs)
41  *                     cpu = TLS->rseq::cpu_id_start
42  *   [1]               TLS->rseq::rseq_cs = rseq_cs
43  *   [start_ip]        ----------------------------
44  *   [2]               if (cpu != TLS->rseq::cpu_id)
45  *                             goto abort_ip;
46  *   [3]               <last_instruction_in_cs>
47  *   [post_commit_ip]  ----------------------------
48  *
49  *   The address of jump target abort_ip must be outside the critical
50  *   region, i.e.:
51  *
52  *     [abort_ip] < [start_ip]  || [abort_ip] >= [post_commit_ip]
53  *
54  *   Steps [2]-[3] (inclusive) need to be a sequence of instructions in
55  *   userspace that can handle being interrupted between any of those
56  *   instructions, and then resumed to the abort_ip.
57  *
58  *   1.  Userspace stores the address of the struct rseq_cs assembly
59  *       block descriptor into the rseq_cs field of the registered
60  *       struct rseq TLS area. This update is performed through a single
61  *       store within the inline assembly instruction sequence.
62  *       [start_ip]
63  *
64  *   2.  Userspace tests to check whether the current cpu_id field match
65  *       the cpu number loaded before start_ip, branching to abort_ip
66  *       in case of a mismatch.
67  *
68  *       If the sequence is preempted or interrupted by a signal
69  *       at or after start_ip and before post_commit_ip, then the kernel
70  *       clears TLS->__rseq_abi::rseq_cs, and sets the user-space return
71  *       ip to abort_ip before returning to user-space, so the preempted
72  *       execution resumes at abort_ip.
73  *
74  *   3.  Userspace critical section final instruction before
75  *       post_commit_ip is the commit. The critical section is
76  *       self-terminating.
77  *       [post_commit_ip]
78  *
79  *   4.  <success>
80  *
81  *   On failure at [2], or if interrupted by preempt or signal delivery
82  *   between [1] and [3]:
83  *
84  *       [abort_ip]
85  *   F1. <failure>
86  */
87 
rseq_update_cpu_node_id(struct task_struct * t)88 static int rseq_update_cpu_node_id(struct task_struct *t)
89 {
90 	struct rseq __user *rseq = t->rseq;
91 	u32 cpu_id = raw_smp_processor_id();
92 	u32 node_id = cpu_to_node(cpu_id);
93 	u32 mm_cid = task_mm_cid(t);
94 
95 	WARN_ON_ONCE((int) mm_cid < 0);
96 	if (!user_write_access_begin(rseq, t->rseq_len))
97 		goto efault;
98 	unsafe_put_user(cpu_id, &rseq->cpu_id_start, efault_end);
99 	unsafe_put_user(cpu_id, &rseq->cpu_id, efault_end);
100 	unsafe_put_user(node_id, &rseq->node_id, efault_end);
101 	unsafe_put_user(mm_cid, &rseq->mm_cid, efault_end);
102 	/*
103 	 * Additional feature fields added after ORIG_RSEQ_SIZE
104 	 * need to be conditionally updated only if
105 	 * t->rseq_len != ORIG_RSEQ_SIZE.
106 	 */
107 	user_write_access_end();
108 	trace_rseq_update(t);
109 	return 0;
110 
111 efault_end:
112 	user_write_access_end();
113 efault:
114 	return -EFAULT;
115 }
116 
rseq_reset_rseq_cpu_node_id(struct task_struct * t)117 static int rseq_reset_rseq_cpu_node_id(struct task_struct *t)
118 {
119 	u32 cpu_id_start = 0, cpu_id = RSEQ_CPU_ID_UNINITIALIZED, node_id = 0,
120 	    mm_cid = 0;
121 
122 	/*
123 	 * Reset cpu_id_start to its initial state (0).
124 	 */
125 	if (put_user(cpu_id_start, &t->rseq->cpu_id_start))
126 		return -EFAULT;
127 	/*
128 	 * Reset cpu_id to RSEQ_CPU_ID_UNINITIALIZED, so any user coming
129 	 * in after unregistration can figure out that rseq needs to be
130 	 * registered again.
131 	 */
132 	if (put_user(cpu_id, &t->rseq->cpu_id))
133 		return -EFAULT;
134 	/*
135 	 * Reset node_id to its initial state (0).
136 	 */
137 	if (put_user(node_id, &t->rseq->node_id))
138 		return -EFAULT;
139 	/*
140 	 * Reset mm_cid to its initial state (0).
141 	 */
142 	if (put_user(mm_cid, &t->rseq->mm_cid))
143 		return -EFAULT;
144 	/*
145 	 * Additional feature fields added after ORIG_RSEQ_SIZE
146 	 * need to be conditionally reset only if
147 	 * t->rseq_len != ORIG_RSEQ_SIZE.
148 	 */
149 	return 0;
150 }
151 
rseq_get_rseq_cs(struct task_struct * t,struct rseq_cs * rseq_cs)152 static int rseq_get_rseq_cs(struct task_struct *t, struct rseq_cs *rseq_cs)
153 {
154 	struct rseq_cs __user *urseq_cs;
155 	u64 ptr;
156 	u32 __user *usig;
157 	u32 sig;
158 	int ret;
159 
160 #ifdef CONFIG_64BIT
161 	if (get_user(ptr, &t->rseq->rseq_cs))
162 		return -EFAULT;
163 #else
164 	if (copy_from_user(&ptr, &t->rseq->rseq_cs, sizeof(ptr)))
165 		return -EFAULT;
166 #endif
167 	if (!ptr) {
168 		memset(rseq_cs, 0, sizeof(*rseq_cs));
169 		return 0;
170 	}
171 	if (ptr >= TASK_SIZE)
172 		return -EINVAL;
173 	urseq_cs = (struct rseq_cs __user *)(unsigned long)ptr;
174 	if (copy_from_user(rseq_cs, urseq_cs, sizeof(*rseq_cs)))
175 		return -EFAULT;
176 
177 	if (rseq_cs->start_ip >= TASK_SIZE ||
178 	    rseq_cs->start_ip + rseq_cs->post_commit_offset >= TASK_SIZE ||
179 	    rseq_cs->abort_ip >= TASK_SIZE ||
180 	    rseq_cs->version > 0)
181 		return -EINVAL;
182 	/* Check for overflow. */
183 	if (rseq_cs->start_ip + rseq_cs->post_commit_offset < rseq_cs->start_ip)
184 		return -EINVAL;
185 	/* Ensure that abort_ip is not in the critical section. */
186 	if (rseq_cs->abort_ip - rseq_cs->start_ip < rseq_cs->post_commit_offset)
187 		return -EINVAL;
188 
189 	usig = (u32 __user *)(unsigned long)(rseq_cs->abort_ip - sizeof(u32));
190 	ret = get_user(sig, usig);
191 	if (ret)
192 		return ret;
193 
194 	if (current->rseq_sig != sig) {
195 		printk_ratelimited(KERN_WARNING
196 			"Possible attack attempt. Unexpected rseq signature 0x%x, expecting 0x%x (pid=%d, addr=%p).\n",
197 			sig, current->rseq_sig, current->pid, usig);
198 		return -EINVAL;
199 	}
200 	return 0;
201 }
202 
rseq_warn_flags(const char * str,u32 flags)203 static bool rseq_warn_flags(const char *str, u32 flags)
204 {
205 	u32 test_flags;
206 
207 	if (!flags)
208 		return false;
209 	test_flags = flags & RSEQ_CS_NO_RESTART_FLAGS;
210 	if (test_flags)
211 		pr_warn_once("Deprecated flags (%u) in %s ABI structure", test_flags, str);
212 	test_flags = flags & ~RSEQ_CS_NO_RESTART_FLAGS;
213 	if (test_flags)
214 		pr_warn_once("Unknown flags (%u) in %s ABI structure", test_flags, str);
215 	return true;
216 }
217 
rseq_need_restart(struct task_struct * t,u32 cs_flags)218 static int rseq_need_restart(struct task_struct *t, u32 cs_flags)
219 {
220 	u32 flags, event_mask;
221 	int ret;
222 
223 	if (rseq_warn_flags("rseq_cs", cs_flags))
224 		return -EINVAL;
225 
226 	/* Get thread flags. */
227 	ret = get_user(flags, &t->rseq->flags);
228 	if (ret)
229 		return ret;
230 
231 	if (rseq_warn_flags("rseq", flags))
232 		return -EINVAL;
233 
234 	/*
235 	 * Load and clear event mask atomically with respect to
236 	 * scheduler preemption.
237 	 */
238 	preempt_disable();
239 	event_mask = t->rseq_event_mask;
240 	t->rseq_event_mask = 0;
241 	preempt_enable();
242 
243 	return !!event_mask;
244 }
245 
clear_rseq_cs(struct task_struct * t)246 static int clear_rseq_cs(struct task_struct *t)
247 {
248 	/*
249 	 * The rseq_cs field is set to NULL on preemption or signal
250 	 * delivery on top of rseq assembly block, as well as on top
251 	 * of code outside of the rseq assembly block. This performs
252 	 * a lazy clear of the rseq_cs field.
253 	 *
254 	 * Set rseq_cs to NULL.
255 	 */
256 #ifdef CONFIG_64BIT
257 	return put_user(0UL, &t->rseq->rseq_cs);
258 #else
259 	if (clear_user(&t->rseq->rseq_cs, sizeof(t->rseq->rseq_cs)))
260 		return -EFAULT;
261 	return 0;
262 #endif
263 }
264 
265 /*
266  * Unsigned comparison will be true when ip >= start_ip, and when
267  * ip < start_ip + post_commit_offset.
268  */
in_rseq_cs(unsigned long ip,struct rseq_cs * rseq_cs)269 static bool in_rseq_cs(unsigned long ip, struct rseq_cs *rseq_cs)
270 {
271 	return ip - rseq_cs->start_ip < rseq_cs->post_commit_offset;
272 }
273 
rseq_ip_fixup(struct pt_regs * regs)274 static int rseq_ip_fixup(struct pt_regs *regs)
275 {
276 	unsigned long ip = instruction_pointer(regs);
277 	struct task_struct *t = current;
278 	struct rseq_cs rseq_cs;
279 	int ret;
280 
281 	ret = rseq_get_rseq_cs(t, &rseq_cs);
282 	if (ret)
283 		return ret;
284 
285 	/*
286 	 * Handle potentially not being within a critical section.
287 	 * If not nested over a rseq critical section, restart is useless.
288 	 * Clear the rseq_cs pointer and return.
289 	 */
290 	if (!in_rseq_cs(ip, &rseq_cs))
291 		return clear_rseq_cs(t);
292 	ret = rseq_need_restart(t, rseq_cs.flags);
293 	if (ret <= 0)
294 		return ret;
295 	ret = clear_rseq_cs(t);
296 	if (ret)
297 		return ret;
298 	trace_rseq_ip_fixup(ip, rseq_cs.start_ip, rseq_cs.post_commit_offset,
299 			    rseq_cs.abort_ip);
300 	instruction_pointer_set(regs, (unsigned long)rseq_cs.abort_ip);
301 	return 0;
302 }
303 
304 /*
305  * This resume handler must always be executed between any of:
306  * - preemption,
307  * - signal delivery,
308  * and return to user-space.
309  *
310  * This is how we can ensure that the entire rseq critical section
311  * will issue the commit instruction only if executed atomically with
312  * respect to other threads scheduled on the same CPU, and with respect
313  * to signal handlers.
314  */
__rseq_handle_notify_resume(struct ksignal * ksig,struct pt_regs * regs)315 void __rseq_handle_notify_resume(struct ksignal *ksig, struct pt_regs *regs)
316 {
317 	struct task_struct *t = current;
318 	int ret, sig;
319 
320 	if (unlikely(t->flags & PF_EXITING))
321 		return;
322 
323 	/*
324 	 * regs is NULL if and only if the caller is in a syscall path.  Skip
325 	 * fixup and leave rseq_cs as is so that rseq_sycall() will detect and
326 	 * kill a misbehaving userspace on debug kernels.
327 	 */
328 	if (regs) {
329 		ret = rseq_ip_fixup(regs);
330 		if (unlikely(ret < 0))
331 			goto error;
332 	}
333 	if (unlikely(rseq_update_cpu_node_id(t)))
334 		goto error;
335 	return;
336 
337 error:
338 	sig = ksig ? ksig->sig : 0;
339 	force_sigsegv(sig);
340 }
341 
342 #ifdef CONFIG_DEBUG_RSEQ
343 
344 /*
345  * Terminate the process if a syscall is issued within a restartable
346  * sequence.
347  */
rseq_syscall(struct pt_regs * regs)348 void rseq_syscall(struct pt_regs *regs)
349 {
350 	unsigned long ip = instruction_pointer(regs);
351 	struct task_struct *t = current;
352 	struct rseq_cs rseq_cs;
353 
354 	if (!t->rseq)
355 		return;
356 	if (rseq_get_rseq_cs(t, &rseq_cs) || in_rseq_cs(ip, &rseq_cs))
357 		force_sig(SIGSEGV);
358 }
359 
360 #endif
361 
362 /*
363  * sys_rseq - setup restartable sequences for caller thread.
364  */
SYSCALL_DEFINE4(rseq,struct rseq __user *,rseq,u32,rseq_len,int,flags,u32,sig)365 SYSCALL_DEFINE4(rseq, struct rseq __user *, rseq, u32, rseq_len,
366 		int, flags, u32, sig)
367 {
368 	int ret;
369 
370 	if (flags & RSEQ_FLAG_UNREGISTER) {
371 		if (flags & ~RSEQ_FLAG_UNREGISTER)
372 			return -EINVAL;
373 		/* Unregister rseq for current thread. */
374 		if (current->rseq != rseq || !current->rseq)
375 			return -EINVAL;
376 		if (rseq_len != current->rseq_len)
377 			return -EINVAL;
378 		if (current->rseq_sig != sig)
379 			return -EPERM;
380 		ret = rseq_reset_rseq_cpu_node_id(current);
381 		if (ret)
382 			return ret;
383 		current->rseq = NULL;
384 		current->rseq_sig = 0;
385 		current->rseq_len = 0;
386 		return 0;
387 	}
388 
389 	if (unlikely(flags))
390 		return -EINVAL;
391 
392 	if (current->rseq) {
393 		/*
394 		 * If rseq is already registered, check whether
395 		 * the provided address differs from the prior
396 		 * one.
397 		 */
398 		if (current->rseq != rseq || rseq_len != current->rseq_len)
399 			return -EINVAL;
400 		if (current->rseq_sig != sig)
401 			return -EPERM;
402 		/* Already registered. */
403 		return -EBUSY;
404 	}
405 
406 	/*
407 	 * If there was no rseq previously registered, ensure the provided rseq
408 	 * is properly aligned, as communcated to user-space through the ELF
409 	 * auxiliary vector AT_RSEQ_ALIGN. If rseq_len is the original rseq
410 	 * size, the required alignment is the original struct rseq alignment.
411 	 *
412 	 * In order to be valid, rseq_len is either the original rseq size, or
413 	 * large enough to contain all supported fields, as communicated to
414 	 * user-space through the ELF auxiliary vector AT_RSEQ_FEATURE_SIZE.
415 	 */
416 	if (rseq_len < ORIG_RSEQ_SIZE ||
417 	    (rseq_len == ORIG_RSEQ_SIZE && !IS_ALIGNED((unsigned long)rseq, ORIG_RSEQ_SIZE)) ||
418 	    (rseq_len != ORIG_RSEQ_SIZE && (!IS_ALIGNED((unsigned long)rseq, __alignof__(*rseq)) ||
419 					    rseq_len < offsetof(struct rseq, end))))
420 		return -EINVAL;
421 	if (!access_ok(rseq, rseq_len))
422 		return -EFAULT;
423 	current->rseq = rseq;
424 	current->rseq_len = rseq_len;
425 	current->rseq_sig = sig;
426 	/*
427 	 * If rseq was previously inactive, and has just been
428 	 * registered, ensure the cpu_id_start and cpu_id fields
429 	 * are updated before returning to user-space.
430 	 */
431 	rseq_set_notify_resume(current);
432 
433 	return 0;
434 }
435