xref: /openbmc/linux/kernel/kcov.c (revision e5c86679)
1 #define pr_fmt(fmt) "kcov: " fmt
2 
3 #define DISABLE_BRANCH_PROFILING
4 #include <linux/atomic.h>
5 #include <linux/compiler.h>
6 #include <linux/errno.h>
7 #include <linux/export.h>
8 #include <linux/types.h>
9 #include <linux/file.h>
10 #include <linux/fs.h>
11 #include <linux/init.h>
12 #include <linux/mm.h>
13 #include <linux/preempt.h>
14 #include <linux/printk.h>
15 #include <linux/sched.h>
16 #include <linux/slab.h>
17 #include <linux/spinlock.h>
18 #include <linux/vmalloc.h>
19 #include <linux/debugfs.h>
20 #include <linux/uaccess.h>
21 #include <linux/kcov.h>
22 #include <asm/setup.h>
23 
24 /*
25  * kcov descriptor (one per opened debugfs file).
26  * State transitions of the descriptor:
27  *  - initial state after open()
28  *  - then there must be a single ioctl(KCOV_INIT_TRACE) call
29  *  - then, mmap() call (several calls are allowed but not useful)
30  *  - then, repeated enable/disable for a task (only one task a time allowed)
31  */
32 struct kcov {
33 	/*
34 	 * Reference counter. We keep one for:
35 	 *  - opened file descriptor
36 	 *  - task with enabled coverage (we can't unwire it from another task)
37 	 */
38 	atomic_t		refcount;
39 	/* The lock protects mode, size, area and t. */
40 	spinlock_t		lock;
41 	enum kcov_mode		mode;
42 	/* Size of arena (in long's for KCOV_MODE_TRACE). */
43 	unsigned		size;
44 	/* Coverage buffer shared with user space. */
45 	void			*area;
46 	/* Task for which we collect coverage, or NULL. */
47 	struct task_struct	*t;
48 };
49 
50 /*
51  * Entry point from instrumented code.
52  * This is called once per basic-block/edge.
53  */
54 void notrace __sanitizer_cov_trace_pc(void)
55 {
56 	struct task_struct *t;
57 	enum kcov_mode mode;
58 
59 	t = current;
60 	/*
61 	 * We are interested in code coverage as a function of a syscall inputs,
62 	 * so we ignore code executed in interrupts.
63 	 * The checks for whether we are in an interrupt are open-coded, because
64 	 * 1. We can't use in_interrupt() here, since it also returns true
65 	 *    when we are inside local_bh_disable() section.
66 	 * 2. We don't want to use (in_irq() | in_serving_softirq() | in_nmi()),
67 	 *    since that leads to slower generated code (three separate tests,
68 	 *    one for each of the flags).
69 	 */
70 	if (!t || (preempt_count() & (HARDIRQ_MASK | SOFTIRQ_OFFSET
71 							| NMI_MASK)))
72 		return;
73 	mode = READ_ONCE(t->kcov_mode);
74 	if (mode == KCOV_MODE_TRACE) {
75 		unsigned long *area;
76 		unsigned long pos;
77 		unsigned long ip = _RET_IP_;
78 
79 #ifdef CONFIG_RANDOMIZE_BASE
80 		ip -= kaslr_offset();
81 #endif
82 
83 		/*
84 		 * There is some code that runs in interrupts but for which
85 		 * in_interrupt() returns false (e.g. preempt_schedule_irq()).
86 		 * READ_ONCE()/barrier() effectively provides load-acquire wrt
87 		 * interrupts, there are paired barrier()/WRITE_ONCE() in
88 		 * kcov_ioctl_locked().
89 		 */
90 		barrier();
91 		area = t->kcov_area;
92 		/* The first word is number of subsequent PCs. */
93 		pos = READ_ONCE(area[0]) + 1;
94 		if (likely(pos < t->kcov_size)) {
95 			area[pos] = ip;
96 			WRITE_ONCE(area[0], pos);
97 		}
98 	}
99 }
100 EXPORT_SYMBOL(__sanitizer_cov_trace_pc);
101 
102 static void kcov_get(struct kcov *kcov)
103 {
104 	atomic_inc(&kcov->refcount);
105 }
106 
107 static void kcov_put(struct kcov *kcov)
108 {
109 	if (atomic_dec_and_test(&kcov->refcount)) {
110 		vfree(kcov->area);
111 		kfree(kcov);
112 	}
113 }
114 
115 void kcov_task_init(struct task_struct *t)
116 {
117 	t->kcov_mode = KCOV_MODE_DISABLED;
118 	t->kcov_size = 0;
119 	t->kcov_area = NULL;
120 	t->kcov = NULL;
121 }
122 
123 void kcov_task_exit(struct task_struct *t)
124 {
125 	struct kcov *kcov;
126 
127 	kcov = t->kcov;
128 	if (kcov == NULL)
129 		return;
130 	spin_lock(&kcov->lock);
131 	if (WARN_ON(kcov->t != t)) {
132 		spin_unlock(&kcov->lock);
133 		return;
134 	}
135 	/* Just to not leave dangling references behind. */
136 	kcov_task_init(t);
137 	kcov->t = NULL;
138 	spin_unlock(&kcov->lock);
139 	kcov_put(kcov);
140 }
141 
142 static int kcov_mmap(struct file *filep, struct vm_area_struct *vma)
143 {
144 	int res = 0;
145 	void *area;
146 	struct kcov *kcov = vma->vm_file->private_data;
147 	unsigned long size, off;
148 	struct page *page;
149 
150 	area = vmalloc_user(vma->vm_end - vma->vm_start);
151 	if (!area)
152 		return -ENOMEM;
153 
154 	spin_lock(&kcov->lock);
155 	size = kcov->size * sizeof(unsigned long);
156 	if (kcov->mode == KCOV_MODE_DISABLED || vma->vm_pgoff != 0 ||
157 	    vma->vm_end - vma->vm_start != size) {
158 		res = -EINVAL;
159 		goto exit;
160 	}
161 	if (!kcov->area) {
162 		kcov->area = area;
163 		vma->vm_flags |= VM_DONTEXPAND;
164 		spin_unlock(&kcov->lock);
165 		for (off = 0; off < size; off += PAGE_SIZE) {
166 			page = vmalloc_to_page(kcov->area + off);
167 			if (vm_insert_page(vma, vma->vm_start + off, page))
168 				WARN_ONCE(1, "vm_insert_page() failed");
169 		}
170 		return 0;
171 	}
172 exit:
173 	spin_unlock(&kcov->lock);
174 	vfree(area);
175 	return res;
176 }
177 
178 static int kcov_open(struct inode *inode, struct file *filep)
179 {
180 	struct kcov *kcov;
181 
182 	kcov = kzalloc(sizeof(*kcov), GFP_KERNEL);
183 	if (!kcov)
184 		return -ENOMEM;
185 	atomic_set(&kcov->refcount, 1);
186 	spin_lock_init(&kcov->lock);
187 	filep->private_data = kcov;
188 	return nonseekable_open(inode, filep);
189 }
190 
191 static int kcov_close(struct inode *inode, struct file *filep)
192 {
193 	kcov_put(filep->private_data);
194 	return 0;
195 }
196 
197 static int kcov_ioctl_locked(struct kcov *kcov, unsigned int cmd,
198 			     unsigned long arg)
199 {
200 	struct task_struct *t;
201 	unsigned long size, unused;
202 
203 	switch (cmd) {
204 	case KCOV_INIT_TRACE:
205 		/*
206 		 * Enable kcov in trace mode and setup buffer size.
207 		 * Must happen before anything else.
208 		 */
209 		if (kcov->mode != KCOV_MODE_DISABLED)
210 			return -EBUSY;
211 		/*
212 		 * Size must be at least 2 to hold current position and one PC.
213 		 * Later we allocate size * sizeof(unsigned long) memory,
214 		 * that must not overflow.
215 		 */
216 		size = arg;
217 		if (size < 2 || size > INT_MAX / sizeof(unsigned long))
218 			return -EINVAL;
219 		kcov->size = size;
220 		kcov->mode = KCOV_MODE_TRACE;
221 		return 0;
222 	case KCOV_ENABLE:
223 		/*
224 		 * Enable coverage for the current task.
225 		 * At this point user must have been enabled trace mode,
226 		 * and mmapped the file. Coverage collection is disabled only
227 		 * at task exit or voluntary by KCOV_DISABLE. After that it can
228 		 * be enabled for another task.
229 		 */
230 		unused = arg;
231 		if (unused != 0 || kcov->mode == KCOV_MODE_DISABLED ||
232 		    kcov->area == NULL)
233 			return -EINVAL;
234 		if (kcov->t != NULL)
235 			return -EBUSY;
236 		t = current;
237 		/* Cache in task struct for performance. */
238 		t->kcov_size = kcov->size;
239 		t->kcov_area = kcov->area;
240 		/* See comment in __sanitizer_cov_trace_pc(). */
241 		barrier();
242 		WRITE_ONCE(t->kcov_mode, kcov->mode);
243 		t->kcov = kcov;
244 		kcov->t = t;
245 		/* This is put either in kcov_task_exit() or in KCOV_DISABLE. */
246 		kcov_get(kcov);
247 		return 0;
248 	case KCOV_DISABLE:
249 		/* Disable coverage for the current task. */
250 		unused = arg;
251 		if (unused != 0 || current->kcov != kcov)
252 			return -EINVAL;
253 		t = current;
254 		if (WARN_ON(kcov->t != t))
255 			return -EINVAL;
256 		kcov_task_init(t);
257 		kcov->t = NULL;
258 		kcov_put(kcov);
259 		return 0;
260 	default:
261 		return -ENOTTY;
262 	}
263 }
264 
265 static long kcov_ioctl(struct file *filep, unsigned int cmd, unsigned long arg)
266 {
267 	struct kcov *kcov;
268 	int res;
269 
270 	kcov = filep->private_data;
271 	spin_lock(&kcov->lock);
272 	res = kcov_ioctl_locked(kcov, cmd, arg);
273 	spin_unlock(&kcov->lock);
274 	return res;
275 }
276 
277 static const struct file_operations kcov_fops = {
278 	.open		= kcov_open,
279 	.unlocked_ioctl	= kcov_ioctl,
280 	.mmap		= kcov_mmap,
281 	.release        = kcov_close,
282 };
283 
284 static int __init kcov_init(void)
285 {
286 	/*
287 	 * The kcov debugfs file won't ever get removed and thus,
288 	 * there is no need to protect it against removal races. The
289 	 * use of debugfs_create_file_unsafe() is actually safe here.
290 	 */
291 	if (!debugfs_create_file_unsafe("kcov", 0600, NULL, NULL, &kcov_fops)) {
292 		pr_err("failed to create kcov in debugfs\n");
293 		return -ENOMEM;
294 	}
295 	return 0;
296 }
297 
298 device_initcall(kcov_init);
299