xref: /openbmc/linux/drivers/usb/misc/chaoskey.c (revision 23c2b932)
1 /*
2  * chaoskey - driver for ChaosKey device from Altus Metrum.
3  *
4  * This device provides true random numbers using a noise source based
5  * on a reverse-biased p-n junction in avalanche breakdown. More
6  * details can be found at http://chaoskey.org
7  *
8  * The driver connects to the kernel hardware RNG interface to provide
9  * entropy for /dev/random and other kernel activities. It also offers
10  * a separate /dev/ entry to allow for direct access to the random
11  * bit stream.
12  *
13  * Copyright © 2015 Keith Packard <keithp@keithp.com>
14  *
15  * This program is free software; you can redistribute it and/or modify
16  * it under the terms of the GNU General Public License as published by
17  * the Free Software Foundation; version 2 of the License.
18  *
19  * This program is distributed in the hope that it will be useful, but
20  * WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the GNU
22  * General Public License for more details.
23  */
24 
25 #include <linux/module.h>
26 #include <linux/slab.h>
27 #include <linux/usb.h>
28 #include <linux/wait.h>
29 #include <linux/hw_random.h>
30 #include <linux/mutex.h>
31 #include <linux/uaccess.h>
32 
33 static struct usb_driver chaoskey_driver;
34 static struct usb_class_driver chaoskey_class;
35 static int chaoskey_rng_read(struct hwrng *rng, void *data,
36 			     size_t max, bool wait);
37 
38 #define usb_dbg(usb_if, format, arg...) \
39 	dev_dbg(&(usb_if)->dev, format, ## arg)
40 
41 #define usb_err(usb_if, format, arg...) \
42 	dev_err(&(usb_if)->dev, format, ## arg)
43 
44 /* Version Information */
45 #define DRIVER_VERSION	"v0.1"
46 #define DRIVER_AUTHOR	"Keith Packard, keithp@keithp.com"
47 #define DRIVER_DESC	"Altus Metrum ChaosKey driver"
48 #define DRIVER_SHORT	"chaoskey"
49 
50 MODULE_VERSION(DRIVER_VERSION);
51 MODULE_AUTHOR(DRIVER_AUTHOR);
52 MODULE_DESCRIPTION(DRIVER_DESC);
53 MODULE_LICENSE("GPL");
54 
55 #define CHAOSKEY_VENDOR_ID	0x1d50	/* OpenMoko */
56 #define CHAOSKEY_PRODUCT_ID	0x60c6	/* ChaosKey */
57 
58 #define CHAOSKEY_BUF_LEN	64	/* max size of USB full speed packet */
59 
60 #define NAK_TIMEOUT (HZ)		/* stall/wait timeout for device */
61 
62 #ifdef CONFIG_USB_DYNAMIC_MINORS
63 #define USB_CHAOSKEY_MINOR_BASE 0
64 #else
65 
66 /* IOWARRIOR_MINOR_BASE + 16, not official yet */
67 #define USB_CHAOSKEY_MINOR_BASE 224
68 #endif
69 
70 static const struct usb_device_id chaoskey_table[] = {
71 	{ USB_DEVICE(CHAOSKEY_VENDOR_ID, CHAOSKEY_PRODUCT_ID) },
72 	{ },
73 };
74 MODULE_DEVICE_TABLE(usb, chaoskey_table);
75 
76 static void chaos_read_callback(struct urb *urb);
77 
78 /* Driver-local specific stuff */
79 struct chaoskey {
80 	struct usb_interface *interface;
81 	char in_ep;
82 	struct mutex lock;
83 	struct mutex rng_lock;
84 	int open;			/* open count */
85 	bool present;			/* device not disconnected */
86 	bool reading;			/* ongoing IO */
87 	int size;			/* size of buf */
88 	int valid;			/* bytes of buf read */
89 	int used;			/* bytes of buf consumed */
90 	char *name;			/* product + serial */
91 	struct hwrng hwrng;		/* Embedded struct for hwrng */
92 	int hwrng_registered;		/* registered with hwrng API */
93 	wait_queue_head_t wait_q;	/* for timeouts */
94 	struct urb *urb;		/* for performing IO */
95 	char *buf;
96 };
97 
98 static void chaoskey_free(struct chaoskey *dev)
99 {
100 	if (dev) {
101 		usb_dbg(dev->interface, "free");
102 		usb_free_urb(dev->urb);
103 		kfree(dev->name);
104 		kfree(dev->buf);
105 		kfree(dev);
106 	}
107 }
108 
109 static int chaoskey_probe(struct usb_interface *interface,
110 			  const struct usb_device_id *id)
111 {
112 	struct usb_device *udev = interface_to_usbdev(interface);
113 	struct usb_host_interface *altsetting = interface->cur_altsetting;
114 	int i;
115 	int in_ep = -1;
116 	struct chaoskey *dev;
117 	int result = -ENOMEM;
118 	int size;
119 
120 	usb_dbg(interface, "probe %s-%s", udev->product, udev->serial);
121 
122 	/* Find the first bulk IN endpoint and its packet size */
123 	for (i = 0; i < altsetting->desc.bNumEndpoints; i++) {
124 		if (usb_endpoint_is_bulk_in(&altsetting->endpoint[i].desc)) {
125 			in_ep = usb_endpoint_num(&altsetting->endpoint[i].desc);
126 			size = usb_endpoint_maxp(&altsetting->endpoint[i].desc);
127 			break;
128 		}
129 	}
130 
131 	/* Validate endpoint and size */
132 	if (in_ep == -1) {
133 		usb_dbg(interface, "no IN endpoint found");
134 		return -ENODEV;
135 	}
136 	if (size <= 0) {
137 		usb_dbg(interface, "invalid size (%d)", size);
138 		return -ENODEV;
139 	}
140 
141 	if (size > CHAOSKEY_BUF_LEN) {
142 		usb_dbg(interface, "size reduced from %d to %d\n",
143 			size, CHAOSKEY_BUF_LEN);
144 		size = CHAOSKEY_BUF_LEN;
145 	}
146 
147 	/* Looks good, allocate and initialize */
148 
149 	dev = kzalloc(sizeof(struct chaoskey), GFP_KERNEL);
150 
151 	if (dev == NULL)
152 		goto out;
153 
154 	dev->buf = kmalloc(size, GFP_KERNEL);
155 
156 	if (dev->buf == NULL)
157 		goto out;
158 
159 	dev->urb = usb_alloc_urb(0, GFP_KERNEL);
160 
161 	if (!dev->urb)
162 		goto out;
163 
164 	usb_fill_bulk_urb(dev->urb,
165 		udev,
166 		usb_rcvbulkpipe(udev, in_ep),
167 		dev->buf,
168 		size,
169 		chaos_read_callback,
170 		dev);
171 
172 	/* Construct a name using the product and serial values. Each
173 	 * device needs a unique name for the hwrng code
174 	 */
175 
176 	if (udev->product && udev->serial) {
177 		dev->name = kmalloc(strlen(udev->product) + 1 +
178 				    strlen(udev->serial) + 1, GFP_KERNEL);
179 		if (dev->name == NULL)
180 			goto out;
181 
182 		strcpy(dev->name, udev->product);
183 		strcat(dev->name, "-");
184 		strcat(dev->name, udev->serial);
185 	}
186 
187 	dev->interface = interface;
188 
189 	dev->in_ep = in_ep;
190 
191 	dev->size = size;
192 	dev->present = 1;
193 
194 	init_waitqueue_head(&dev->wait_q);
195 
196 	mutex_init(&dev->lock);
197 	mutex_init(&dev->rng_lock);
198 
199 	usb_set_intfdata(interface, dev);
200 
201 	result = usb_register_dev(interface, &chaoskey_class);
202 	if (result) {
203 		usb_err(interface, "Unable to allocate minor number.");
204 		goto out;
205 	}
206 
207 	dev->hwrng.name = dev->name ? dev->name : chaoskey_driver.name;
208 	dev->hwrng.read = chaoskey_rng_read;
209 
210 	/* Set the 'quality' metric.  Quality is measured in units of
211 	 * 1/1024's of a bit ("mills"). This should be set to 1024,
212 	 * but there is a bug in the hwrng core which masks it with
213 	 * 1023.
214 	 *
215 	 * The patch that has been merged to the crypto development
216 	 * tree for that bug limits the value to 1024 at most, so by
217 	 * setting this to 1024 + 1023, we get 1023 before the fix is
218 	 * merged and 1024 afterwards. We'll patch this driver once
219 	 * both bits of code are in the same tree.
220 	 */
221 	dev->hwrng.quality = 1024 + 1023;
222 
223 	dev->hwrng_registered = (hwrng_register(&dev->hwrng) == 0);
224 	if (!dev->hwrng_registered)
225 		usb_err(interface, "Unable to register with hwrng");
226 
227 	usb_enable_autosuspend(udev);
228 
229 	usb_dbg(interface, "chaoskey probe success, size %d", dev->size);
230 	return 0;
231 
232 out:
233 	usb_set_intfdata(interface, NULL);
234 	chaoskey_free(dev);
235 	return result;
236 }
237 
238 static void chaoskey_disconnect(struct usb_interface *interface)
239 {
240 	struct chaoskey	*dev;
241 
242 	usb_dbg(interface, "disconnect");
243 	dev = usb_get_intfdata(interface);
244 	if (!dev) {
245 		usb_dbg(interface, "disconnect failed - no dev");
246 		return;
247 	}
248 
249 	if (dev->hwrng_registered)
250 		hwrng_unregister(&dev->hwrng);
251 
252 	usb_deregister_dev(interface, &chaoskey_class);
253 
254 	usb_set_intfdata(interface, NULL);
255 	mutex_lock(&dev->lock);
256 
257 	dev->present = 0;
258 	usb_poison_urb(dev->urb);
259 
260 	if (!dev->open) {
261 		mutex_unlock(&dev->lock);
262 		chaoskey_free(dev);
263 	} else
264 		mutex_unlock(&dev->lock);
265 
266 	usb_dbg(interface, "disconnect done");
267 }
268 
269 static int chaoskey_open(struct inode *inode, struct file *file)
270 {
271 	struct chaoskey *dev;
272 	struct usb_interface *interface;
273 
274 	/* get the interface from minor number and driver information */
275 	interface = usb_find_interface(&chaoskey_driver, iminor(inode));
276 	if (!interface)
277 		return -ENODEV;
278 
279 	usb_dbg(interface, "open");
280 
281 	dev = usb_get_intfdata(interface);
282 	if (!dev) {
283 		usb_dbg(interface, "open (dev)");
284 		return -ENODEV;
285 	}
286 
287 	file->private_data = dev;
288 	mutex_lock(&dev->lock);
289 	++dev->open;
290 	mutex_unlock(&dev->lock);
291 
292 	usb_dbg(interface, "open success");
293 	return 0;
294 }
295 
296 static int chaoskey_release(struct inode *inode, struct file *file)
297 {
298 	struct chaoskey *dev = file->private_data;
299 	struct usb_interface *interface;
300 
301 	if (dev == NULL)
302 		return -ENODEV;
303 
304 	interface = dev->interface;
305 
306 	usb_dbg(interface, "release");
307 
308 	mutex_lock(&dev->lock);
309 
310 	usb_dbg(interface, "open count at release is %d", dev->open);
311 
312 	if (dev->open <= 0) {
313 		usb_dbg(interface, "invalid open count (%d)", dev->open);
314 		mutex_unlock(&dev->lock);
315 		return -ENODEV;
316 	}
317 
318 	--dev->open;
319 
320 	if (!dev->present) {
321 		if (dev->open == 0) {
322 			mutex_unlock(&dev->lock);
323 			chaoskey_free(dev);
324 		} else
325 			mutex_unlock(&dev->lock);
326 	} else
327 		mutex_unlock(&dev->lock);
328 
329 	usb_dbg(interface, "release success");
330 	return 0;
331 }
332 
333 static void chaos_read_callback(struct urb *urb)
334 {
335 	struct chaoskey *dev = urb->context;
336 	int status = urb->status;
337 
338 	usb_dbg(dev->interface, "callback status (%d)", status);
339 
340 	if (status == 0)
341 		dev->valid = urb->actual_length;
342 	else
343 		dev->valid = 0;
344 
345 	dev->used = 0;
346 
347 	/* must be seen first before validity is announced */
348 	smp_wmb();
349 
350 	dev->reading = false;
351 	wake_up(&dev->wait_q);
352 }
353 
354 /* Fill the buffer. Called with dev->lock held
355  */
356 static int _chaoskey_fill(struct chaoskey *dev)
357 {
358 	DEFINE_WAIT(wait);
359 	int result;
360 
361 	usb_dbg(dev->interface, "fill");
362 
363 	/* Return immediately if someone called before the buffer was
364 	 * empty */
365 	if (dev->valid != dev->used) {
366 		usb_dbg(dev->interface, "not empty yet (valid %d used %d)",
367 			dev->valid, dev->used);
368 		return 0;
369 	}
370 
371 	/* Bail if the device has been removed */
372 	if (!dev->present) {
373 		usb_dbg(dev->interface, "device not present");
374 		return -ENODEV;
375 	}
376 
377 	/* Make sure the device is awake */
378 	result = usb_autopm_get_interface(dev->interface);
379 	if (result) {
380 		usb_dbg(dev->interface, "wakeup failed (result %d)", result);
381 		return result;
382 	}
383 
384 	dev->reading = true;
385 	result = usb_submit_urb(dev->urb, GFP_KERNEL);
386 	if (result < 0) {
387 		result = usb_translate_errors(result);
388 		dev->reading = false;
389 		goto out;
390 	}
391 
392 	result = wait_event_interruptible_timeout(
393 		dev->wait_q,
394 		!dev->reading,
395 		NAK_TIMEOUT);
396 
397 	if (result < 0)
398 		goto out;
399 
400 	if (result == 0)
401 		result = -ETIMEDOUT;
402 	else
403 		result = dev->valid;
404 out:
405 	/* Let the device go back to sleep eventually */
406 	usb_autopm_put_interface(dev->interface);
407 
408 	usb_dbg(dev->interface, "read %d bytes", dev->valid);
409 
410 	return result;
411 }
412 
413 static ssize_t chaoskey_read(struct file *file,
414 			     char __user *buffer,
415 			     size_t count,
416 			     loff_t *ppos)
417 {
418 	struct chaoskey *dev;
419 	ssize_t read_count = 0;
420 	int this_time;
421 	int result = 0;
422 	unsigned long remain;
423 
424 	dev = file->private_data;
425 
426 	if (dev == NULL || !dev->present)
427 		return -ENODEV;
428 
429 	usb_dbg(dev->interface, "read %zu", count);
430 
431 	while (count > 0) {
432 
433 		/* Grab the rng_lock briefly to ensure that the hwrng interface
434 		 * gets priority over other user access
435 		 */
436 		result = mutex_lock_interruptible(&dev->rng_lock);
437 		if (result)
438 			goto bail;
439 		mutex_unlock(&dev->rng_lock);
440 
441 		result = mutex_lock_interruptible(&dev->lock);
442 		if (result)
443 			goto bail;
444 		if (dev->valid == dev->used) {
445 			result = _chaoskey_fill(dev);
446 			if (result < 0) {
447 				mutex_unlock(&dev->lock);
448 				goto bail;
449 			}
450 		}
451 
452 		this_time = dev->valid - dev->used;
453 		if (this_time > count)
454 			this_time = count;
455 
456 		remain = copy_to_user(buffer, dev->buf + dev->used, this_time);
457 		if (remain) {
458 			result = -EFAULT;
459 
460 			/* Consume the bytes that were copied so we don't leak
461 			 * data to user space
462 			 */
463 			dev->used += this_time - remain;
464 			mutex_unlock(&dev->lock);
465 			goto bail;
466 		}
467 
468 		count -= this_time;
469 		read_count += this_time;
470 		buffer += this_time;
471 		dev->used += this_time;
472 		mutex_unlock(&dev->lock);
473 	}
474 bail:
475 	if (read_count) {
476 		usb_dbg(dev->interface, "read %zu bytes", read_count);
477 		return read_count;
478 	}
479 	usb_dbg(dev->interface, "empty read, result %d", result);
480 	if (result == -ETIMEDOUT)
481 		result = -EAGAIN;
482 	return result;
483 }
484 
485 static int chaoskey_rng_read(struct hwrng *rng, void *data,
486 			     size_t max, bool wait)
487 {
488 	struct chaoskey *dev = container_of(rng, struct chaoskey, hwrng);
489 	int this_time;
490 
491 	usb_dbg(dev->interface, "rng_read max %zu wait %d", max, wait);
492 
493 	if (!dev->present) {
494 		usb_dbg(dev->interface, "device not present");
495 		return 0;
496 	}
497 
498 	/* Hold the rng_lock until we acquire the device lock so that
499 	 * this operation gets priority over other user access to the
500 	 * device
501 	 */
502 	mutex_lock(&dev->rng_lock);
503 
504 	mutex_lock(&dev->lock);
505 
506 	mutex_unlock(&dev->rng_lock);
507 
508 	/* Try to fill the buffer if empty. It doesn't actually matter
509 	 * if _chaoskey_fill works; we'll just return zero bytes as
510 	 * the buffer will still be empty
511 	 */
512 	if (dev->valid == dev->used)
513 		(void) _chaoskey_fill(dev);
514 
515 	this_time = dev->valid - dev->used;
516 	if (this_time > max)
517 		this_time = max;
518 
519 	memcpy(data, dev->buf + dev->used, this_time);
520 
521 	dev->used += this_time;
522 
523 	mutex_unlock(&dev->lock);
524 
525 	usb_dbg(dev->interface, "rng_read this_time %d\n", this_time);
526 	return this_time;
527 }
528 
529 #ifdef CONFIG_PM
530 static int chaoskey_suspend(struct usb_interface *interface,
531 			    pm_message_t message)
532 {
533 	usb_dbg(interface, "suspend");
534 	return 0;
535 }
536 
537 static int chaoskey_resume(struct usb_interface *interface)
538 {
539 	usb_dbg(interface, "resume");
540 	return 0;
541 }
542 #else
543 #define chaoskey_suspend NULL
544 #define chaoskey_resume NULL
545 #endif
546 
547 /* file operation pointers */
548 static const struct file_operations chaoskey_fops = {
549 	.owner = THIS_MODULE,
550 	.read = chaoskey_read,
551 	.open = chaoskey_open,
552 	.release = chaoskey_release,
553 	.llseek = default_llseek,
554 };
555 
556 /* class driver information */
557 static struct usb_class_driver chaoskey_class = {
558 	.name = "chaoskey%d",
559 	.fops = &chaoskey_fops,
560 	.minor_base = USB_CHAOSKEY_MINOR_BASE,
561 };
562 
563 /* usb specific object needed to register this driver with the usb subsystem */
564 static struct usb_driver chaoskey_driver = {
565 	.name = DRIVER_SHORT,
566 	.probe = chaoskey_probe,
567 	.disconnect = chaoskey_disconnect,
568 	.suspend = chaoskey_suspend,
569 	.resume = chaoskey_resume,
570 	.reset_resume = chaoskey_resume,
571 	.id_table = chaoskey_table,
572 	.supports_autosuspend = 1,
573 };
574 
575 module_usb_driver(chaoskey_driver);
576 
577