Merge commit 'v2.6.27-rc8' into genirq
[linux-2.6] / drivers / uio / uio.c
1 /*
2  * drivers/uio/uio.c
3  *
4  * Copyright(C) 2005, Benedikt Spranger <b.spranger@linutronix.de>
5  * Copyright(C) 2005, Thomas Gleixner <tglx@linutronix.de>
6  * Copyright(C) 2006, Hans J. Koch <hjk@linutronix.de>
7  * Copyright(C) 2006, Greg Kroah-Hartman <greg@kroah.com>
8  *
9  * Userspace IO
10  *
11  * Base Functions
12  *
13  * Licensed under the GPLv2 only.
14  */
15
16 #include <linux/module.h>
17 #include <linux/init.h>
18 #include <linux/poll.h>
19 #include <linux/device.h>
20 #include <linux/mm.h>
21 #include <linux/idr.h>
22 #include <linux/string.h>
23 #include <linux/kobject.h>
24 #include <linux/uio_driver.h>
25
26 #define UIO_MAX_DEVICES 255
27
28 struct uio_device {
29         struct module           *owner;
30         struct device           *dev;
31         int                     minor;
32         atomic_t                event;
33         struct fasync_struct    *async_queue;
34         wait_queue_head_t       wait;
35         int                     vma_count;
36         struct uio_info         *info;
37         struct kobject          *map_dir;
38 };
39
40 static int uio_major;
41 static DEFINE_IDR(uio_idr);
42 static const struct file_operations uio_fops;
43
44 /* UIO class infrastructure */
45 static struct uio_class {
46         struct kref kref;
47         struct class *class;
48 } *uio_class;
49
50 /*
51  * attributes
52  */
53
54 struct uio_map {
55         struct kobject kobj;
56         struct uio_mem *mem;
57 };
58 #define to_map(map) container_of(map, struct uio_map, kobj)
59
60 static ssize_t map_addr_show(struct uio_mem *mem, char *buf)
61 {
62         return sprintf(buf, "0x%lx\n", mem->addr);
63 }
64
65 static ssize_t map_size_show(struct uio_mem *mem, char *buf)
66 {
67         return sprintf(buf, "0x%lx\n", mem->size);
68 }
69
70 struct uio_sysfs_entry {
71         struct attribute attr;
72         ssize_t (*show)(struct uio_mem *, char *);
73         ssize_t (*store)(struct uio_mem *, const char *, size_t);
74 };
75
76 static struct uio_sysfs_entry addr_attribute =
77         __ATTR(addr, S_IRUGO, map_addr_show, NULL);
78 static struct uio_sysfs_entry size_attribute =
79         __ATTR(size, S_IRUGO, map_size_show, NULL);
80
81 static struct attribute *attrs[] = {
82         &addr_attribute.attr,
83         &size_attribute.attr,
84         NULL,   /* need to NULL terminate the list of attributes */
85 };
86
87 static void map_release(struct kobject *kobj)
88 {
89         struct uio_map *map = to_map(kobj);
90         kfree(map);
91 }
92
93 static ssize_t map_type_show(struct kobject *kobj, struct attribute *attr,
94                              char *buf)
95 {
96         struct uio_map *map = to_map(kobj);
97         struct uio_mem *mem = map->mem;
98         struct uio_sysfs_entry *entry;
99
100         entry = container_of(attr, struct uio_sysfs_entry, attr);
101
102         if (!entry->show)
103                 return -EIO;
104
105         return entry->show(mem, buf);
106 }
107
108 static struct sysfs_ops uio_sysfs_ops = {
109         .show = map_type_show,
110 };
111
112 static struct kobj_type map_attr_type = {
113         .release        = map_release,
114         .sysfs_ops      = &uio_sysfs_ops,
115         .default_attrs  = attrs,
116 };
117
118 static ssize_t show_name(struct device *dev,
119                          struct device_attribute *attr, char *buf)
120 {
121         struct uio_device *idev = dev_get_drvdata(dev);
122         if (idev)
123                 return sprintf(buf, "%s\n", idev->info->name);
124         else
125                 return -ENODEV;
126 }
127 static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);
128
129 static ssize_t show_version(struct device *dev,
130                             struct device_attribute *attr, char *buf)
131 {
132         struct uio_device *idev = dev_get_drvdata(dev);
133         if (idev)
134                 return sprintf(buf, "%s\n", idev->info->version);
135         else
136                 return -ENODEV;
137 }
138 static DEVICE_ATTR(version, S_IRUGO, show_version, NULL);
139
140 static ssize_t show_event(struct device *dev,
141                           struct device_attribute *attr, char *buf)
142 {
143         struct uio_device *idev = dev_get_drvdata(dev);
144         if (idev)
145                 return sprintf(buf, "%u\n",
146                                 (unsigned int)atomic_read(&idev->event));
147         else
148                 return -ENODEV;
149 }
150 static DEVICE_ATTR(event, S_IRUGO, show_event, NULL);
151
152 static struct attribute *uio_attrs[] = {
153         &dev_attr_name.attr,
154         &dev_attr_version.attr,
155         &dev_attr_event.attr,
156         NULL,
157 };
158
159 static struct attribute_group uio_attr_grp = {
160         .attrs = uio_attrs,
161 };
162
163 /*
164  * device functions
165  */
166 static int uio_dev_add_attributes(struct uio_device *idev)
167 {
168         int ret;
169         int mi;
170         int map_found = 0;
171         struct uio_mem *mem;
172         struct uio_map *map;
173
174         ret = sysfs_create_group(&idev->dev->kobj, &uio_attr_grp);
175         if (ret)
176                 goto err_group;
177
178         for (mi = 0; mi < MAX_UIO_MAPS; mi++) {
179                 mem = &idev->info->mem[mi];
180                 if (mem->size == 0)
181                         break;
182                 if (!map_found) {
183                         map_found = 1;
184                         idev->map_dir = kobject_create_and_add("maps",
185                                                         &idev->dev->kobj);
186                         if (!idev->map_dir)
187                                 goto err;
188                 }
189                 map = kzalloc(sizeof(*map), GFP_KERNEL);
190                 if (!map)
191                         goto err;
192                 kobject_init(&map->kobj, &map_attr_type);
193                 map->mem = mem;
194                 mem->map = map;
195                 ret = kobject_add(&map->kobj, idev->map_dir, "map%d", mi);
196                 if (ret)
197                         goto err;
198                 ret = kobject_uevent(&map->kobj, KOBJ_ADD);
199                 if (ret)
200                         goto err;
201         }
202
203         return 0;
204
205 err:
206         for (mi--; mi>=0; mi--) {
207                 mem = &idev->info->mem[mi];
208                 map = mem->map;
209                 kobject_put(&map->kobj);
210         }
211         kobject_put(idev->map_dir);
212         sysfs_remove_group(&idev->dev->kobj, &uio_attr_grp);
213 err_group:
214         dev_err(idev->dev, "error creating sysfs files (%d)\n", ret);
215         return ret;
216 }
217
218 static void uio_dev_del_attributes(struct uio_device *idev)
219 {
220         int mi;
221         struct uio_mem *mem;
222         for (mi = 0; mi < MAX_UIO_MAPS; mi++) {
223                 mem = &idev->info->mem[mi];
224                 if (mem->size == 0)
225                         break;
226                 kobject_put(&mem->map->kobj);
227         }
228         kobject_put(idev->map_dir);
229         sysfs_remove_group(&idev->dev->kobj, &uio_attr_grp);
230 }
231
232 static int uio_get_minor(struct uio_device *idev)
233 {
234         static DEFINE_MUTEX(minor_lock);
235         int retval = -ENOMEM;
236         int id;
237
238         mutex_lock(&minor_lock);
239         if (idr_pre_get(&uio_idr, GFP_KERNEL) == 0)
240                 goto exit;
241
242         retval = idr_get_new(&uio_idr, idev, &id);
243         if (retval < 0) {
244                 if (retval == -EAGAIN)
245                         retval = -ENOMEM;
246                 goto exit;
247         }
248         idev->minor = id & MAX_ID_MASK;
249 exit:
250         mutex_unlock(&minor_lock);
251         return retval;
252 }
253
254 static void uio_free_minor(struct uio_device *idev)
255 {
256         idr_remove(&uio_idr, idev->minor);
257 }
258
259 /**
260  * uio_event_notify - trigger an interrupt event
261  * @info: UIO device capabilities
262  */
263 void uio_event_notify(struct uio_info *info)
264 {
265         struct uio_device *idev = info->uio_dev;
266
267         atomic_inc(&idev->event);
268         wake_up_interruptible(&idev->wait);
269         kill_fasync(&idev->async_queue, SIGIO, POLL_IN);
270 }
271 EXPORT_SYMBOL_GPL(uio_event_notify);
272
273 /**
274  * uio_interrupt - hardware interrupt handler
275  * @irq: IRQ number, can be UIO_IRQ_CYCLIC for cyclic timer
276  * @dev_id: Pointer to the devices uio_device structure
277  */
278 static irqreturn_t uio_interrupt(int irq, void *dev_id)
279 {
280         struct uio_device *idev = (struct uio_device *)dev_id;
281         irqreturn_t ret = idev->info->handler(irq, idev->info);
282
283         if (ret == IRQ_HANDLED)
284                 uio_event_notify(idev->info);
285
286         return ret;
287 }
288
289 struct uio_listener {
290         struct uio_device *dev;
291         s32 event_count;
292 };
293
294 static int uio_open(struct inode *inode, struct file *filep)
295 {
296         struct uio_device *idev;
297         struct uio_listener *listener;
298         int ret = 0;
299
300         lock_kernel();
301         idev = idr_find(&uio_idr, iminor(inode));
302         if (!idev) {
303                 ret = -ENODEV;
304                 goto out;
305         }
306
307         if (!try_module_get(idev->owner)) {
308                 ret = -ENODEV;
309                 goto out;
310         }
311
312         listener = kmalloc(sizeof(*listener), GFP_KERNEL);
313         if (!listener) {
314                 ret = -ENOMEM;
315                 goto err_alloc_listener;
316         }
317
318         listener->dev = idev;
319         listener->event_count = atomic_read(&idev->event);
320         filep->private_data = listener;
321
322         if (idev->info->open) {
323                 ret = idev->info->open(idev->info, inode);
324                 if (ret)
325                         goto err_infoopen;
326         }
327         unlock_kernel();
328         return 0;
329
330 err_infoopen:
331
332         kfree(listener);
333 err_alloc_listener:
334
335         module_put(idev->owner);
336
337 out:
338         unlock_kernel();
339         return ret;
340 }
341
342 static int uio_fasync(int fd, struct file *filep, int on)
343 {
344         struct uio_listener *listener = filep->private_data;
345         struct uio_device *idev = listener->dev;
346
347         return fasync_helper(fd, filep, on, &idev->async_queue);
348 }
349
350 static int uio_release(struct inode *inode, struct file *filep)
351 {
352         int ret = 0;
353         struct uio_listener *listener = filep->private_data;
354         struct uio_device *idev = listener->dev;
355
356         if (idev->info->release)
357                 ret = idev->info->release(idev->info, inode);
358
359         module_put(idev->owner);
360
361         if (filep->f_flags & FASYNC)
362                 ret = uio_fasync(-1, filep, 0);
363         kfree(listener);
364         return ret;
365 }
366
367 static unsigned int uio_poll(struct file *filep, poll_table *wait)
368 {
369         struct uio_listener *listener = filep->private_data;
370         struct uio_device *idev = listener->dev;
371
372         if (idev->info->irq == UIO_IRQ_NONE)
373                 return -EIO;
374
375         poll_wait(filep, &idev->wait, wait);
376         if (listener->event_count != atomic_read(&idev->event))
377                 return POLLIN | POLLRDNORM;
378         return 0;
379 }
380
381 static ssize_t uio_read(struct file *filep, char __user *buf,
382                         size_t count, loff_t *ppos)
383 {
384         struct uio_listener *listener = filep->private_data;
385         struct uio_device *idev = listener->dev;
386         DECLARE_WAITQUEUE(wait, current);
387         ssize_t retval;
388         s32 event_count;
389
390         if (idev->info->irq == UIO_IRQ_NONE)
391                 return -EIO;
392
393         if (count != sizeof(s32))
394                 return -EINVAL;
395
396         add_wait_queue(&idev->wait, &wait);
397
398         do {
399                 set_current_state(TASK_INTERRUPTIBLE);
400
401                 event_count = atomic_read(&idev->event);
402                 if (event_count != listener->event_count) {
403                         if (copy_to_user(buf, &event_count, count))
404                                 retval = -EFAULT;
405                         else {
406                                 listener->event_count = event_count;
407                                 retval = count;
408                         }
409                         break;
410                 }
411
412                 if (filep->f_flags & O_NONBLOCK) {
413                         retval = -EAGAIN;
414                         break;
415                 }
416
417                 if (signal_pending(current)) {
418                         retval = -ERESTARTSYS;
419                         break;
420                 }
421                 schedule();
422         } while (1);
423
424         __set_current_state(TASK_RUNNING);
425         remove_wait_queue(&idev->wait, &wait);
426
427         return retval;
428 }
429
430 static ssize_t uio_write(struct file *filep, const char __user *buf,
431                         size_t count, loff_t *ppos)
432 {
433         struct uio_listener *listener = filep->private_data;
434         struct uio_device *idev = listener->dev;
435         ssize_t retval;
436         s32 irq_on;
437
438         if (idev->info->irq == UIO_IRQ_NONE)
439                 return -EIO;
440
441         if (count != sizeof(s32))
442                 return -EINVAL;
443
444         if (!idev->info->irqcontrol)
445                 return -ENOSYS;
446
447         if (copy_from_user(&irq_on, buf, count))
448                 return -EFAULT;
449
450         retval = idev->info->irqcontrol(idev->info, irq_on);
451
452         return retval ? retval : sizeof(s32);
453 }
454
455 static int uio_find_mem_index(struct vm_area_struct *vma)
456 {
457         int mi;
458         struct uio_device *idev = vma->vm_private_data;
459
460         for (mi = 0; mi < MAX_UIO_MAPS; mi++) {
461                 if (idev->info->mem[mi].size == 0)
462                         return -1;
463                 if (vma->vm_pgoff == mi)
464                         return mi;
465         }
466         return -1;
467 }
468
469 static void uio_vma_open(struct vm_area_struct *vma)
470 {
471         struct uio_device *idev = vma->vm_private_data;
472         idev->vma_count++;
473 }
474
475 static void uio_vma_close(struct vm_area_struct *vma)
476 {
477         struct uio_device *idev = vma->vm_private_data;
478         idev->vma_count--;
479 }
480
481 static int uio_vma_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
482 {
483         struct uio_device *idev = vma->vm_private_data;
484         struct page *page;
485
486         int mi = uio_find_mem_index(vma);
487         if (mi < 0)
488                 return VM_FAULT_SIGBUS;
489
490         if (idev->info->mem[mi].memtype == UIO_MEM_LOGICAL)
491                 page = virt_to_page(idev->info->mem[mi].addr);
492         else
493                 page = vmalloc_to_page((void*)idev->info->mem[mi].addr);
494         get_page(page);
495         vmf->page = page;
496         return 0;
497 }
498
499 static struct vm_operations_struct uio_vm_ops = {
500         .open = uio_vma_open,
501         .close = uio_vma_close,
502         .fault = uio_vma_fault,
503 };
504
505 static int uio_mmap_physical(struct vm_area_struct *vma)
506 {
507         struct uio_device *idev = vma->vm_private_data;
508         int mi = uio_find_mem_index(vma);
509         if (mi < 0)
510                 return -EINVAL;
511
512         vma->vm_flags |= VM_IO | VM_RESERVED;
513
514         vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
515
516         return remap_pfn_range(vma,
517                                vma->vm_start,
518                                idev->info->mem[mi].addr >> PAGE_SHIFT,
519                                vma->vm_end - vma->vm_start,
520                                vma->vm_page_prot);
521 }
522
523 static int uio_mmap_logical(struct vm_area_struct *vma)
524 {
525         vma->vm_flags |= VM_RESERVED;
526         vma->vm_ops = &uio_vm_ops;
527         uio_vma_open(vma);
528         return 0;
529 }
530
531 static int uio_mmap(struct file *filep, struct vm_area_struct *vma)
532 {
533         struct uio_listener *listener = filep->private_data;
534         struct uio_device *idev = listener->dev;
535         int mi;
536         unsigned long requested_pages, actual_pages;
537         int ret = 0;
538
539         if (vma->vm_end < vma->vm_start)
540                 return -EINVAL;
541
542         vma->vm_private_data = idev;
543
544         mi = uio_find_mem_index(vma);
545         if (mi < 0)
546                 return -EINVAL;
547
548         requested_pages = (vma->vm_end - vma->vm_start) >> PAGE_SHIFT;
549         actual_pages = (idev->info->mem[mi].size + PAGE_SIZE -1) >> PAGE_SHIFT;
550         if (requested_pages > actual_pages)
551                 return -EINVAL;
552
553         if (idev->info->mmap) {
554                 ret = idev->info->mmap(idev->info, vma);
555                 return ret;
556         }
557
558         switch (idev->info->mem[mi].memtype) {
559                 case UIO_MEM_PHYS:
560                         return uio_mmap_physical(vma);
561                 case UIO_MEM_LOGICAL:
562                 case UIO_MEM_VIRTUAL:
563                         return uio_mmap_logical(vma);
564                 default:
565                         return -EINVAL;
566         }
567 }
568
569 static const struct file_operations uio_fops = {
570         .owner          = THIS_MODULE,
571         .open           = uio_open,
572         .release        = uio_release,
573         .read           = uio_read,
574         .write          = uio_write,
575         .mmap           = uio_mmap,
576         .poll           = uio_poll,
577         .fasync         = uio_fasync,
578 };
579
580 static int uio_major_init(void)
581 {
582         uio_major = register_chrdev(0, "uio", &uio_fops);
583         if (uio_major < 0)
584                 return uio_major;
585         return 0;
586 }
587
588 static void uio_major_cleanup(void)
589 {
590         unregister_chrdev(uio_major, "uio");
591 }
592
593 static int init_uio_class(void)
594 {
595         int ret = 0;
596
597         if (uio_class != NULL) {
598                 kref_get(&uio_class->kref);
599                 goto exit;
600         }
601
602         /* This is the first time in here, set everything up properly */
603         ret = uio_major_init();
604         if (ret)
605                 goto exit;
606
607         uio_class = kzalloc(sizeof(*uio_class), GFP_KERNEL);
608         if (!uio_class) {
609                 ret = -ENOMEM;
610                 goto err_kzalloc;
611         }
612
613         kref_init(&uio_class->kref);
614         uio_class->class = class_create(THIS_MODULE, "uio");
615         if (IS_ERR(uio_class->class)) {
616                 ret = IS_ERR(uio_class->class);
617                 printk(KERN_ERR "class_create failed for uio\n");
618                 goto err_class_create;
619         }
620         return 0;
621
622 err_class_create:
623         kfree(uio_class);
624         uio_class = NULL;
625 err_kzalloc:
626         uio_major_cleanup();
627 exit:
628         return ret;
629 }
630
631 static void release_uio_class(struct kref *kref)
632 {
633         /* Ok, we cheat as we know we only have one uio_class */
634         class_destroy(uio_class->class);
635         kfree(uio_class);
636         uio_major_cleanup();
637         uio_class = NULL;
638 }
639
640 static void uio_class_destroy(void)
641 {
642         if (uio_class)
643                 kref_put(&uio_class->kref, release_uio_class);
644 }
645
646 /**
647  * uio_register_device - register a new userspace IO device
648  * @owner:      module that creates the new device
649  * @parent:     parent device
650  * @info:       UIO device capabilities
651  *
652  * returns zero on success or a negative error code.
653  */
654 int __uio_register_device(struct module *owner,
655                           struct device *parent,
656                           struct uio_info *info)
657 {
658         struct uio_device *idev;
659         int ret = 0;
660
661         if (!parent || !info || !info->name || !info->version)
662                 return -EINVAL;
663
664         info->uio_dev = NULL;
665
666         ret = init_uio_class();
667         if (ret)
668                 return ret;
669
670         idev = kzalloc(sizeof(*idev), GFP_KERNEL);
671         if (!idev) {
672                 ret = -ENOMEM;
673                 goto err_kzalloc;
674         }
675
676         idev->owner = owner;
677         idev->info = info;
678         init_waitqueue_head(&idev->wait);
679         atomic_set(&idev->event, 0);
680
681         ret = uio_get_minor(idev);
682         if (ret)
683                 goto err_get_minor;
684
685         idev->dev = device_create_drvdata(uio_class->class, parent,
686                                           MKDEV(uio_major, idev->minor), idev,
687                                           "uio%d", idev->minor);
688         if (IS_ERR(idev->dev)) {
689                 printk(KERN_ERR "UIO: device register failed\n");
690                 ret = PTR_ERR(idev->dev);
691                 goto err_device_create;
692         }
693
694         ret = uio_dev_add_attributes(idev);
695         if (ret)
696                 goto err_uio_dev_add_attributes;
697
698         info->uio_dev = idev;
699
700         if (idev->info->irq >= 0) {
701                 ret = request_irq(idev->info->irq, uio_interrupt,
702                                   idev->info->irq_flags, idev->info->name, idev);
703                 if (ret)
704                         goto err_request_irq;
705         }
706
707         return 0;
708
709 err_request_irq:
710         uio_dev_del_attributes(idev);
711 err_uio_dev_add_attributes:
712         device_destroy(uio_class->class, MKDEV(uio_major, idev->minor));
713 err_device_create:
714         uio_free_minor(idev);
715 err_get_minor:
716         kfree(idev);
717 err_kzalloc:
718         uio_class_destroy();
719         return ret;
720 }
721 EXPORT_SYMBOL_GPL(__uio_register_device);
722
723 /**
724  * uio_unregister_device - unregister a industrial IO device
725  * @info:       UIO device capabilities
726  *
727  */
728 void uio_unregister_device(struct uio_info *info)
729 {
730         struct uio_device *idev;
731
732         if (!info || !info->uio_dev)
733                 return;
734
735         idev = info->uio_dev;
736
737         uio_free_minor(idev);
738
739         if (info->irq >= 0)
740                 free_irq(info->irq, idev);
741
742         uio_dev_del_attributes(idev);
743
744         dev_set_drvdata(idev->dev, NULL);
745         device_destroy(uio_class->class, MKDEV(uio_major, idev->minor));
746         kfree(idev);
747         uio_class_destroy();
748
749         return;
750 }
751 EXPORT_SYMBOL_GPL(uio_unregister_device);
752
753 static int __init uio_init(void)
754 {
755         return 0;
756 }
757
758 static void __exit uio_exit(void)
759 {
760 }
761
762 module_init(uio_init)
763 module_exit(uio_exit)
764 MODULE_LICENSE("GPL v2");