1 // SPDX-License-Identifier: GPL-2.0-only
2 
3 /*
4  *  HID-BPF support for Linux
5  *
6  *  Copyright (c) 2022 Benjamin Tissoires
7  */
8 
9 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
10 #include <linux/bitops.h>
11 #include <linux/btf.h>
12 #include <linux/btf_ids.h>
13 #include <linux/filter.h>
14 #include <linux/hid.h>
15 #include <linux/hid_bpf.h>
16 #include <linux/init.h>
17 #include <linux/kfifo.h>
18 #include <linux/minmax.h>
19 #include <linux/module.h>
20 #include <linux/workqueue.h>
21 #include "hid_bpf_dispatch.h"
22 #include "entrypoints/entrypoints.lskel.h"
23 
24 struct hid_bpf_ops *hid_bpf_ops;
25 EXPORT_SYMBOL(hid_bpf_ops);
26 
27 /**
28  * hid_bpf_device_event - Called whenever an event is coming in from the device
29  *
30  * @ctx: The HID-BPF context
31  *
32  * @return %0 on success and keep processing; a positive value to change the
33  * incoming size buffer; a negative error code to interrupt the processing
34  * of this event
35  *
36  * Declare an %fmod_ret tracing bpf program to this function and attach this
37  * program through hid_bpf_attach_prog() to have this helper called for
38  * any incoming event from the device itself.
39  *
40  * The function is called while on IRQ context, so we can not sleep.
41  */
42 /* never used by the kernel but declared so we can load and attach a tracepoint */
43 __weak noinline int hid_bpf_device_event(struct hid_bpf_ctx *ctx)
44 {
45 	return 0;
46 }
47 
48 u8 *
49 dispatch_hid_bpf_device_event(struct hid_device *hdev, enum hid_report_type type, u8 *data,
50 			      u32 *size, int interrupt)
51 {
52 	struct hid_bpf_ctx_kern ctx_kern = {
53 		.ctx = {
54 			.hid = hdev,
55 			.report_type = type,
56 			.allocated_size = hdev->bpf.allocated_data,
57 			.size = *size,
58 		},
59 		.data = hdev->bpf.device_data,
60 	};
61 	int ret;
62 
63 	if (type >= HID_REPORT_TYPES)
64 		return ERR_PTR(-EINVAL);
65 
66 	/* no program has been attached yet */
67 	if (!hdev->bpf.device_data)
68 		return data;
69 
70 	memset(ctx_kern.data, 0, hdev->bpf.allocated_data);
71 	memcpy(ctx_kern.data, data, *size);
72 
73 	ret = hid_bpf_prog_run(hdev, HID_BPF_PROG_TYPE_DEVICE_EVENT, &ctx_kern);
74 	if (ret < 0)
75 		return ERR_PTR(ret);
76 
77 	if (ret) {
78 		if (ret > ctx_kern.ctx.allocated_size)
79 			return ERR_PTR(-EINVAL);
80 
81 		*size = ret;
82 	}
83 
84 	return ctx_kern.data;
85 }
86 EXPORT_SYMBOL_GPL(dispatch_hid_bpf_device_event);
87 
88 /**
89  * hid_bpf_rdesc_fixup - Called when the probe function parses the report
90  * descriptor of the HID device
91  *
92  * @ctx: The HID-BPF context
93  *
94  * @return 0 on success and keep processing; a positive value to change the
95  * incoming size buffer; a negative error code to interrupt the processing
96  * of this event
97  *
98  * Declare an %fmod_ret tracing bpf program to this function and attach this
99  * program through hid_bpf_attach_prog() to have this helper called before any
100  * parsing of the report descriptor by HID.
101  */
102 /* never used by the kernel but declared so we can load and attach a tracepoint */
103 __weak noinline int hid_bpf_rdesc_fixup(struct hid_bpf_ctx *ctx)
104 {
105 	return 0;
106 }
107 
108 u8 *call_hid_bpf_rdesc_fixup(struct hid_device *hdev, u8 *rdesc, unsigned int *size)
109 {
110 	int ret;
111 	struct hid_bpf_ctx_kern ctx_kern = {
112 		.ctx = {
113 			.hid = hdev,
114 			.size = *size,
115 			.allocated_size = HID_MAX_DESCRIPTOR_SIZE,
116 		},
117 	};
118 
119 	ctx_kern.data = kzalloc(ctx_kern.ctx.allocated_size, GFP_KERNEL);
120 	if (!ctx_kern.data)
121 		goto ignore_bpf;
122 
123 	memcpy(ctx_kern.data, rdesc, min_t(unsigned int, *size, HID_MAX_DESCRIPTOR_SIZE));
124 
125 	ret = hid_bpf_prog_run(hdev, HID_BPF_PROG_TYPE_RDESC_FIXUP, &ctx_kern);
126 	if (ret < 0)
127 		goto ignore_bpf;
128 
129 	if (ret) {
130 		if (ret > ctx_kern.ctx.allocated_size)
131 			goto ignore_bpf;
132 
133 		*size = ret;
134 	}
135 
136 	rdesc = krealloc(ctx_kern.data, *size, GFP_KERNEL);
137 
138 	return rdesc;
139 
140  ignore_bpf:
141 	kfree(ctx_kern.data);
142 	return kmemdup(rdesc, *size, GFP_KERNEL);
143 }
144 EXPORT_SYMBOL_GPL(call_hid_bpf_rdesc_fixup);
145 
146 /**
147  * hid_bpf_get_data - Get the kernel memory pointer associated with the context @ctx
148  *
149  * @ctx: The HID-BPF context
150  * @offset: The offset within the memory
151  * @rdwr_buf_size: the const size of the buffer
152  *
153  * @returns %NULL on error, an %__u8 memory pointer on success
154  */
155 noinline __u8 *
156 hid_bpf_get_data(struct hid_bpf_ctx *ctx, unsigned int offset, const size_t rdwr_buf_size)
157 {
158 	struct hid_bpf_ctx_kern *ctx_kern;
159 
160 	if (!ctx)
161 		return NULL;
162 
163 	ctx_kern = container_of(ctx, struct hid_bpf_ctx_kern, ctx);
164 
165 	if (rdwr_buf_size + offset > ctx->allocated_size)
166 		return NULL;
167 
168 	return ctx_kern->data + offset;
169 }
170 
171 /*
172  * The following set contains all functions we agree BPF programs
173  * can use.
174  */
175 BTF_SET8_START(hid_bpf_kfunc_ids)
176 BTF_ID_FLAGS(func, call_hid_bpf_prog_put_deferred)
177 BTF_ID_FLAGS(func, hid_bpf_get_data, KF_RET_NULL)
178 BTF_SET8_END(hid_bpf_kfunc_ids)
179 
180 static const struct btf_kfunc_id_set hid_bpf_kfunc_set = {
181 	.owner = THIS_MODULE,
182 	.set   = &hid_bpf_kfunc_ids,
183 };
184 
185 static int device_match_id(struct device *dev, const void *id)
186 {
187 	struct hid_device *hdev = to_hid_device(dev);
188 
189 	return hdev->id == *(int *)id;
190 }
191 
192 static int __hid_bpf_allocate_data(struct hid_device *hdev, u8 **data, u32 *size)
193 {
194 	u8 *alloc_data;
195 	unsigned int i, j, max_report_len = 0;
196 	size_t alloc_size = 0;
197 
198 	/* compute the maximum report length for this device */
199 	for (i = 0; i < HID_REPORT_TYPES; i++) {
200 		struct hid_report_enum *report_enum = hdev->report_enum + i;
201 
202 		for (j = 0; j < HID_MAX_IDS; j++) {
203 			struct hid_report *report = report_enum->report_id_hash[j];
204 
205 			if (report)
206 				max_report_len = max(max_report_len, hid_report_len(report));
207 		}
208 	}
209 
210 	/*
211 	 * Give us a little bit of extra space and some predictability in the
212 	 * buffer length we create. This way, we can tell users that they can
213 	 * work on chunks of 64 bytes of memory without having the bpf verifier
214 	 * scream at them.
215 	 */
216 	alloc_size = DIV_ROUND_UP(max_report_len, 64) * 64;
217 
218 	alloc_data = kzalloc(alloc_size, GFP_KERNEL);
219 	if (!alloc_data)
220 		return -ENOMEM;
221 
222 	*data = alloc_data;
223 	*size = alloc_size;
224 
225 	return 0;
226 }
227 
228 static int hid_bpf_allocate_event_data(struct hid_device *hdev)
229 {
230 	/* hdev->bpf.device_data is already allocated, abort */
231 	if (hdev->bpf.device_data)
232 		return 0;
233 
234 	return __hid_bpf_allocate_data(hdev, &hdev->bpf.device_data, &hdev->bpf.allocated_data);
235 }
236 
237 int hid_bpf_reconnect(struct hid_device *hdev)
238 {
239 	if (!test_and_set_bit(ffs(HID_STAT_REPROBED), &hdev->status))
240 		return device_reprobe(&hdev->dev);
241 
242 	return 0;
243 }
244 
245 /**
246  * hid_bpf_attach_prog - Attach the given @prog_fd to the given HID device
247  *
248  * @hid_id: the system unique identifier of the HID device
249  * @prog_fd: an fd in the user process representing the program to attach
250  * @flags: any logical OR combination of &enum hid_bpf_attach_flags
251  *
252  * @returns %0 on success, an error code otherwise.
253  */
254 /* called from syscall */
255 noinline int
256 hid_bpf_attach_prog(unsigned int hid_id, int prog_fd, __u32 flags)
257 {
258 	struct hid_device *hdev;
259 	struct device *dev;
260 	int err, prog_type = hid_bpf_get_prog_attach_type(prog_fd);
261 
262 	if (!hid_bpf_ops)
263 		return -EINVAL;
264 
265 	if (prog_type < 0)
266 		return prog_type;
267 
268 	if (prog_type >= HID_BPF_PROG_TYPE_MAX)
269 		return -EINVAL;
270 
271 	if ((flags & ~HID_BPF_FLAG_MASK))
272 		return -EINVAL;
273 
274 	dev = bus_find_device(hid_bpf_ops->bus_type, NULL, &hid_id, device_match_id);
275 	if (!dev)
276 		return -EINVAL;
277 
278 	hdev = to_hid_device(dev);
279 
280 	if (prog_type == HID_BPF_PROG_TYPE_DEVICE_EVENT) {
281 		err = hid_bpf_allocate_event_data(hdev);
282 		if (err)
283 			return err;
284 	}
285 
286 	err = __hid_bpf_attach_prog(hdev, prog_type, prog_fd, flags);
287 	if (err)
288 		return err;
289 
290 	if (prog_type == HID_BPF_PROG_TYPE_RDESC_FIXUP) {
291 		err = hid_bpf_reconnect(hdev);
292 		if (err)
293 			return err;
294 	}
295 
296 	return 0;
297 }
298 
299 /**
300  * hid_bpf_allocate_context - Allocate a context to the given HID device
301  *
302  * @hid_id: the system unique identifier of the HID device
303  *
304  * @returns A pointer to &struct hid_bpf_ctx on success, %NULL on error.
305  */
306 noinline struct hid_bpf_ctx *
307 hid_bpf_allocate_context(unsigned int hid_id)
308 {
309 	struct hid_device *hdev;
310 	struct hid_bpf_ctx_kern *ctx_kern = NULL;
311 	struct device *dev;
312 
313 	if (!hid_bpf_ops)
314 		return NULL;
315 
316 	dev = bus_find_device(hid_bpf_ops->bus_type, NULL, &hid_id, device_match_id);
317 	if (!dev)
318 		return NULL;
319 
320 	hdev = to_hid_device(dev);
321 
322 	ctx_kern = kzalloc(sizeof(*ctx_kern), GFP_KERNEL);
323 	if (!ctx_kern)
324 		return NULL;
325 
326 	ctx_kern->ctx.hid = hdev;
327 
328 	return &ctx_kern->ctx;
329 }
330 
331 /**
332  * hid_bpf_release_context - Release the previously allocated context @ctx
333  *
334  * @ctx: the HID-BPF context to release
335  *
336  */
337 noinline void
338 hid_bpf_release_context(struct hid_bpf_ctx *ctx)
339 {
340 	struct hid_bpf_ctx_kern *ctx_kern;
341 
342 	if (!ctx)
343 		return;
344 
345 	ctx_kern = container_of(ctx, struct hid_bpf_ctx_kern, ctx);
346 
347 	kfree(ctx_kern);
348 }
349 
350 /**
351  * hid_bpf_hw_request - Communicate with a HID device
352  *
353  * @ctx: the HID-BPF context previously allocated in hid_bpf_allocate_context()
354  * @buf: a %PTR_TO_MEM buffer
355  * @buf__sz: the size of the data to transfer
356  * @rtype: the type of the report (%HID_INPUT_REPORT, %HID_FEATURE_REPORT, %HID_OUTPUT_REPORT)
357  * @reqtype: the type of the request (%HID_REQ_GET_REPORT, %HID_REQ_SET_REPORT, ...)
358  *
359  * @returns %0 on success, a negative error code otherwise.
360  */
361 noinline int
362 hid_bpf_hw_request(struct hid_bpf_ctx *ctx, __u8 *buf, size_t buf__sz,
363 		   enum hid_report_type rtype, enum hid_class_request reqtype)
364 {
365 	struct hid_device *hdev;
366 	struct hid_report *report;
367 	struct hid_report_enum *report_enum;
368 	u8 *dma_data;
369 	u32 report_len;
370 	int ret;
371 
372 	/* check arguments */
373 	if (!ctx || !hid_bpf_ops || !buf)
374 		return -EINVAL;
375 
376 	switch (rtype) {
377 	case HID_INPUT_REPORT:
378 	case HID_OUTPUT_REPORT:
379 	case HID_FEATURE_REPORT:
380 		break;
381 	default:
382 		return -EINVAL;
383 	}
384 
385 	switch (reqtype) {
386 	case HID_REQ_GET_REPORT:
387 	case HID_REQ_GET_IDLE:
388 	case HID_REQ_GET_PROTOCOL:
389 	case HID_REQ_SET_REPORT:
390 	case HID_REQ_SET_IDLE:
391 	case HID_REQ_SET_PROTOCOL:
392 		break;
393 	default:
394 		return -EINVAL;
395 	}
396 
397 	if (buf__sz < 1)
398 		return -EINVAL;
399 
400 	hdev = (struct hid_device *)ctx->hid; /* discard const */
401 
402 	report_enum = hdev->report_enum + rtype;
403 	report = hid_bpf_ops->hid_get_report(report_enum, buf);
404 	if (!report)
405 		return -EINVAL;
406 
407 	report_len = hid_report_len(report);
408 
409 	if (buf__sz > report_len)
410 		buf__sz = report_len;
411 
412 	dma_data = kmemdup(buf, buf__sz, GFP_KERNEL);
413 	if (!dma_data)
414 		return -ENOMEM;
415 
416 	ret = hid_bpf_ops->hid_hw_raw_request(hdev,
417 					      dma_data[0],
418 					      dma_data,
419 					      buf__sz,
420 					      rtype,
421 					      reqtype);
422 
423 	if (ret > 0)
424 		memcpy(buf, dma_data, ret);
425 
426 	kfree(dma_data);
427 	return ret;
428 }
429 
430 /* our HID-BPF entrypoints */
431 BTF_SET8_START(hid_bpf_fmodret_ids)
432 BTF_ID_FLAGS(func, hid_bpf_device_event)
433 BTF_ID_FLAGS(func, hid_bpf_rdesc_fixup)
434 BTF_ID_FLAGS(func, __hid_bpf_tail_call)
435 BTF_SET8_END(hid_bpf_fmodret_ids)
436 
437 static const struct btf_kfunc_id_set hid_bpf_fmodret_set = {
438 	.owner = THIS_MODULE,
439 	.set   = &hid_bpf_fmodret_ids,
440 };
441 
442 /* for syscall HID-BPF */
443 BTF_SET8_START(hid_bpf_syscall_kfunc_ids)
444 BTF_ID_FLAGS(func, hid_bpf_attach_prog)
445 BTF_ID_FLAGS(func, hid_bpf_allocate_context, KF_ACQUIRE | KF_RET_NULL)
446 BTF_ID_FLAGS(func, hid_bpf_release_context, KF_RELEASE)
447 BTF_ID_FLAGS(func, hid_bpf_hw_request)
448 BTF_SET8_END(hid_bpf_syscall_kfunc_ids)
449 
450 static const struct btf_kfunc_id_set hid_bpf_syscall_kfunc_set = {
451 	.owner = THIS_MODULE,
452 	.set   = &hid_bpf_syscall_kfunc_ids,
453 };
454 
455 int hid_bpf_connect_device(struct hid_device *hdev)
456 {
457 	struct hid_bpf_prog_list *prog_list;
458 
459 	rcu_read_lock();
460 	prog_list = rcu_dereference(hdev->bpf.progs[HID_BPF_PROG_TYPE_DEVICE_EVENT]);
461 	rcu_read_unlock();
462 
463 	/* only allocate BPF data if there are programs attached */
464 	if (!prog_list)
465 		return 0;
466 
467 	return hid_bpf_allocate_event_data(hdev);
468 }
469 EXPORT_SYMBOL_GPL(hid_bpf_connect_device);
470 
471 void hid_bpf_disconnect_device(struct hid_device *hdev)
472 {
473 	kfree(hdev->bpf.device_data);
474 	hdev->bpf.device_data = NULL;
475 	hdev->bpf.allocated_data = 0;
476 }
477 EXPORT_SYMBOL_GPL(hid_bpf_disconnect_device);
478 
479 void hid_bpf_destroy_device(struct hid_device *hdev)
480 {
481 	if (!hdev)
482 		return;
483 
484 	/* mark the device as destroyed in bpf so we don't reattach it */
485 	hdev->bpf.destroyed = true;
486 
487 	__hid_bpf_destroy_device(hdev);
488 }
489 EXPORT_SYMBOL_GPL(hid_bpf_destroy_device);
490 
491 void hid_bpf_device_init(struct hid_device *hdev)
492 {
493 	spin_lock_init(&hdev->bpf.progs_lock);
494 }
495 EXPORT_SYMBOL_GPL(hid_bpf_device_init);
496 
497 static int __init hid_bpf_init(void)
498 {
499 	int err;
500 
501 	/* Note: if we exit with an error any time here, we would entirely break HID, which
502 	 * is probably not something we want. So we log an error and return success.
503 	 *
504 	 * This is not a big deal: the syscall allowing to attach a BPF program to a HID device
505 	 * will not be available, so nobody will be able to use the functionality.
506 	 */
507 
508 	err = register_btf_fmodret_id_set(&hid_bpf_fmodret_set);
509 	if (err) {
510 		pr_warn("error while registering fmodret entrypoints: %d", err);
511 		return 0;
512 	}
513 
514 	err = register_btf_kfunc_id_set(BPF_PROG_TYPE_TRACING, &hid_bpf_kfunc_set);
515 	if (err) {
516 		pr_warn("error while setting HID BPF tracing kfuncs: %d", err);
517 		return 0;
518 	}
519 
520 	err = hid_bpf_preload_skel();
521 	if (err) {
522 		pr_warn("error while preloading HID BPF dispatcher: %d", err);
523 		return 0;
524 	}
525 
526 	/* register syscalls after we are sure we can load our preloaded bpf program */
527 	err = register_btf_kfunc_id_set(BPF_PROG_TYPE_SYSCALL, &hid_bpf_syscall_kfunc_set);
528 	if (err) {
529 		pr_warn("error while setting HID BPF syscall kfuncs: %d", err);
530 		return 0;
531 	}
532 
533 	return 0;
534 }
535 
536 static void __exit hid_bpf_exit(void)
537 {
538 	/* HID depends on us, so if we hit that code, we are guaranteed that hid
539 	 * has been removed and thus we do not need to clear the HID devices
540 	 */
541 	hid_bpf_free_links_and_skel();
542 }
543 
544 late_initcall(hid_bpf_init);
545 module_exit(hid_bpf_exit);
546 MODULE_AUTHOR("Benjamin Tissoires");
547 MODULE_LICENSE("GPL");
548