65d69665f1fc5b87251c1af795e9cefb4b507eaf
[linux-2.6.git] / drivers / media / dvb / dvb-core / dvbdev.c
1 /*
2  * dvbdev.c
3  *
4  * Copyright (C) 2000 Ralph  Metzler <ralph@convergence.de>
5  *                  & Marcus Metzler <marcus@convergence.de>
6  *                    for convergence integrated media GmbH
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public License
10  * as published by the Free Software Foundation; either version 2.1
11  * of the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
21  *
22  */
23
24 #include <linux/types.h>
25 #include <linux/errno.h>
26 #include <linux/string.h>
27 #include <linux/module.h>
28 #include <linux/kernel.h>
29 #include <linux/init.h>
30 #include <linux/slab.h>
31 #include <linux/device.h>
32 #include <linux/fs.h>
33 #include <linux/cdev.h>
34 #include <linux/mutex.h>
35 #include <linux/smp_lock.h>
36 #include "dvbdev.h"
37
38 static int dvbdev_debug;
39
40 module_param(dvbdev_debug, int, 0644);
41 MODULE_PARM_DESC(dvbdev_debug, "Turn on/off device debugging (default:off).");
42
43 #define dprintk if (dvbdev_debug) printk
44
45 static LIST_HEAD(dvb_adapter_list);
46 static DEFINE_MUTEX(dvbdev_register_lock);
47
48 static const char * const dnames[] = {
49         "video", "audio", "sec", "frontend", "demux", "dvr", "ca",
50         "net", "osd"
51 };
52
53 #ifdef CONFIG_DVB_DYNAMIC_MINORS
54 #define MAX_DVB_MINORS          256
55 #define DVB_MAX_IDS             MAX_DVB_MINORS
56 #else
57 #define DVB_MAX_IDS             4
58 #define nums2minor(num,type,id) ((num << 6) | (id << 4) | type)
59 #define MAX_DVB_MINORS          (DVB_MAX_ADAPTERS*64)
60 #endif
61
62 static struct class *dvb_class;
63
64 static struct dvb_device *dvb_minors[MAX_DVB_MINORS];
65 static DECLARE_RWSEM(minor_rwsem);
66
67 static int dvb_device_open(struct inode *inode, struct file *file)
68 {
69         struct dvb_device *dvbdev;
70
71         lock_kernel();
72         down_read(&minor_rwsem);
73         dvbdev = dvb_minors[iminor(inode)];
74
75         if (dvbdev && dvbdev->fops) {
76                 int err = 0;
77                 const struct file_operations *old_fops;
78
79                 file->private_data = dvbdev;
80                 old_fops = file->f_op;
81                 file->f_op = fops_get(dvbdev->fops);
82                 if(file->f_op->open)
83                         err = file->f_op->open(inode,file);
84                 if (err) {
85                         fops_put(file->f_op);
86                         file->f_op = fops_get(old_fops);
87                 }
88                 fops_put(old_fops);
89                 up_read(&minor_rwsem);
90                 unlock_kernel();
91                 return err;
92         }
93         up_read(&minor_rwsem);
94         unlock_kernel();
95         return -ENODEV;
96 }
97
98
99 static const struct file_operations dvb_device_fops =
100 {
101         .owner =        THIS_MODULE,
102         .open =         dvb_device_open,
103 };
104
105 static struct cdev dvb_device_cdev;
106
107 int dvb_generic_open(struct inode *inode, struct file *file)
108 {
109         struct dvb_device *dvbdev = file->private_data;
110
111         if (!dvbdev)
112                 return -ENODEV;
113
114         if (!dvbdev->users)
115                 return -EBUSY;
116
117         if ((file->f_flags & O_ACCMODE) == O_RDONLY) {
118                 if (!dvbdev->readers)
119                         return -EBUSY;
120                 dvbdev->readers--;
121         } else {
122                 if (!dvbdev->writers)
123                         return -EBUSY;
124                 dvbdev->writers--;
125         }
126
127         dvbdev->users--;
128         return 0;
129 }
130 EXPORT_SYMBOL(dvb_generic_open);
131
132
133 int dvb_generic_release(struct inode *inode, struct file *file)
134 {
135         struct dvb_device *dvbdev = file->private_data;
136
137         if (!dvbdev)
138                 return -ENODEV;
139
140         if ((file->f_flags & O_ACCMODE) == O_RDONLY) {
141                 dvbdev->readers++;
142         } else {
143                 dvbdev->writers++;
144         }
145
146         dvbdev->users++;
147         return 0;
148 }
149 EXPORT_SYMBOL(dvb_generic_release);
150
151
152 int dvb_generic_ioctl(struct inode *inode, struct file *file,
153                       unsigned int cmd, unsigned long arg)
154 {
155         struct dvb_device *dvbdev = file->private_data;
156
157         if (!dvbdev)
158                 return -ENODEV;
159
160         if (!dvbdev->kernel_ioctl)
161                 return -EINVAL;
162
163         return dvb_usercopy (inode, file, cmd, arg, dvbdev->kernel_ioctl);
164 }
165 EXPORT_SYMBOL(dvb_generic_ioctl);
166
167
168 static int dvbdev_get_free_id (struct dvb_adapter *adap, int type)
169 {
170         u32 id = 0;
171
172         while (id < DVB_MAX_IDS) {
173                 struct dvb_device *dev;
174                 list_for_each_entry(dev, &adap->device_list, list_head)
175                         if (dev->type == type && dev->id == id)
176                                 goto skip;
177                 return id;
178 skip:
179                 id++;
180         }
181         return -ENFILE;
182 }
183
184
185 int dvb_register_device(struct dvb_adapter *adap, struct dvb_device **pdvbdev,
186                         const struct dvb_device *template, void *priv, int type)
187 {
188         struct dvb_device *dvbdev;
189         struct file_operations *dvbdevfops;
190         struct device *clsdev;
191         int minor;
192         int id;
193
194         mutex_lock(&dvbdev_register_lock);
195
196         if ((id = dvbdev_get_free_id (adap, type)) < 0){
197                 mutex_unlock(&dvbdev_register_lock);
198                 *pdvbdev = NULL;
199                 printk(KERN_ERR "%s: couldn't find free device id\n", __func__);
200                 return -ENFILE;
201         }
202
203         *pdvbdev = dvbdev = kmalloc(sizeof(struct dvb_device), GFP_KERNEL);
204
205         if (!dvbdev){
206                 mutex_unlock(&dvbdev_register_lock);
207                 return -ENOMEM;
208         }
209
210         dvbdevfops = kzalloc(sizeof(struct file_operations), GFP_KERNEL);
211
212         if (!dvbdevfops){
213                 kfree (dvbdev);
214                 mutex_unlock(&dvbdev_register_lock);
215                 return -ENOMEM;
216         }
217
218         memcpy(dvbdev, template, sizeof(struct dvb_device));
219         dvbdev->type = type;
220         dvbdev->id = id;
221         dvbdev->adapter = adap;
222         dvbdev->priv = priv;
223         dvbdev->fops = dvbdevfops;
224         init_waitqueue_head (&dvbdev->wait_queue);
225
226         memcpy(dvbdev->fops, template->fops, sizeof(struct file_operations));
227         dvbdev->fops->owner = adap->module;
228
229         list_add_tail (&dvbdev->list_head, &adap->device_list);
230
231         down_write(&minor_rwsem);
232 #ifdef CONFIG_DVB_DYNAMIC_MINORS
233         for (minor = 0; minor < MAX_DVB_MINORS; minor++)
234                 if (dvb_minors[minor] == NULL)
235                         break;
236
237         if (minor == MAX_DVB_MINORS) {
238                 kfree(dvbdevfops);
239                 kfree(dvbdev);
240                 mutex_unlock(&dvbdev_register_lock);
241                 return -EINVAL;
242         }
243 #else
244         minor = nums2minor(adap->num, type, id);
245 #endif
246
247         dvbdev->minor = minor;
248         dvb_minors[minor] = dvbdev;
249         up_write(&minor_rwsem);
250
251         mutex_unlock(&dvbdev_register_lock);
252
253         clsdev = device_create(dvb_class, adap->device,
254                                MKDEV(DVB_MAJOR, minor),
255                                dvbdev, "dvb%d.%s%d", adap->num, dnames[type], id);
256         if (IS_ERR(clsdev)) {
257                 printk(KERN_ERR "%s: failed to create device dvb%d.%s%d (%ld)\n",
258                        __func__, adap->num, dnames[type], id, PTR_ERR(clsdev));
259                 return PTR_ERR(clsdev);
260         }
261
262         dprintk(KERN_DEBUG "DVB: register adapter%d/%s%d @ minor: %i (0x%02x)\n",
263                 adap->num, dnames[type], id, minor, minor);
264
265         return 0;
266 }
267 EXPORT_SYMBOL(dvb_register_device);
268
269
270 void dvb_unregister_device(struct dvb_device *dvbdev)
271 {
272         if (!dvbdev)
273                 return;
274
275         down_write(&minor_rwsem);
276         dvb_minors[dvbdev->minor] = NULL;
277         up_write(&minor_rwsem);
278
279         device_destroy(dvb_class, MKDEV(DVB_MAJOR, dvbdev->minor));
280
281         list_del (&dvbdev->list_head);
282         kfree (dvbdev->fops);
283         kfree (dvbdev);
284 }
285 EXPORT_SYMBOL(dvb_unregister_device);
286
287 static int dvbdev_check_free_adapter_num(int num)
288 {
289         struct list_head *entry;
290         list_for_each(entry, &dvb_adapter_list) {
291                 struct dvb_adapter *adap;
292                 adap = list_entry(entry, struct dvb_adapter, list_head);
293                 if (adap->num == num)
294                         return 0;
295         }
296         return 1;
297 }
298
299 static int dvbdev_get_free_adapter_num (void)
300 {
301         int num = 0;
302
303         while (num < DVB_MAX_ADAPTERS) {
304                 if (dvbdev_check_free_adapter_num(num))
305                         return num;
306                 num++;
307         }
308
309         return -ENFILE;
310 }
311
312
313 int dvb_register_adapter(struct dvb_adapter *adap, const char *name,
314                          struct module *module, struct device *device,
315                          short *adapter_nums)
316 {
317         int i, num;
318
319         mutex_lock(&dvbdev_register_lock);
320
321         for (i = 0; i < DVB_MAX_ADAPTERS; ++i) {
322                 num = adapter_nums[i];
323                 if (num >= 0  &&  num < DVB_MAX_ADAPTERS) {
324                 /* use the one the driver asked for */
325                         if (dvbdev_check_free_adapter_num(num))
326                                 break;
327                 } else {
328                         num = dvbdev_get_free_adapter_num();
329                         break;
330                 }
331                 num = -1;
332         }
333
334         if (num < 0) {
335                 mutex_unlock(&dvbdev_register_lock);
336                 return -ENFILE;
337         }
338
339         memset (adap, 0, sizeof(struct dvb_adapter));
340         INIT_LIST_HEAD (&adap->device_list);
341
342         printk(KERN_INFO "DVB: registering new adapter (%s)\n", name);
343
344         adap->num = num;
345         adap->name = name;
346         adap->module = module;
347         adap->device = device;
348         adap->mfe_shared = 0;
349         adap->mfe_dvbdev = NULL;
350         mutex_init (&adap->mfe_lock);
351
352         list_add_tail (&adap->list_head, &dvb_adapter_list);
353
354         mutex_unlock(&dvbdev_register_lock);
355
356         return num;
357 }
358 EXPORT_SYMBOL(dvb_register_adapter);
359
360
361 int dvb_unregister_adapter(struct dvb_adapter *adap)
362 {
363         mutex_lock(&dvbdev_register_lock);
364         list_del (&adap->list_head);
365         mutex_unlock(&dvbdev_register_lock);
366         return 0;
367 }
368 EXPORT_SYMBOL(dvb_unregister_adapter);
369
370 /* if the miracle happens and "generic_usercopy()" is included into
371    the kernel, then this can vanish. please don't make the mistake and
372    define this as video_usercopy(). this will introduce a dependecy
373    to the v4l "videodev.o" module, which is unnecessary for some
374    cards (ie. the budget dvb-cards don't need the v4l module...) */
375 int dvb_usercopy(struct inode *inode, struct file *file,
376                      unsigned int cmd, unsigned long arg,
377                      int (*func)(struct inode *inode, struct file *file,
378                      unsigned int cmd, void *arg))
379 {
380         char    sbuf[128];
381         void    *mbuf = NULL;
382         void    *parg = NULL;
383         int     err  = -EINVAL;
384
385         /*  Copy arguments into temp kernel buffer  */
386         switch (_IOC_DIR(cmd)) {
387         case _IOC_NONE:
388                 /*
389                  * For this command, the pointer is actually an integer
390                  * argument.
391                  */
392                 parg = (void *) arg;
393                 break;
394         case _IOC_READ: /* some v4l ioctls are marked wrong ... */
395         case _IOC_WRITE:
396         case (_IOC_WRITE | _IOC_READ):
397                 if (_IOC_SIZE(cmd) <= sizeof(sbuf)) {
398                         parg = sbuf;
399                 } else {
400                         /* too big to allocate from stack */
401                         mbuf = kmalloc(_IOC_SIZE(cmd),GFP_KERNEL);
402                         if (NULL == mbuf)
403                                 return -ENOMEM;
404                         parg = mbuf;
405                 }
406
407                 err = -EFAULT;
408                 if (copy_from_user(parg, (void __user *)arg, _IOC_SIZE(cmd)))
409                         goto out;
410                 break;
411         }
412
413         /* call driver */
414         if ((err = func(inode, file, cmd, parg)) == -ENOIOCTLCMD)
415                 err = -EINVAL;
416
417         if (err < 0)
418                 goto out;
419
420         /*  Copy results into user buffer  */
421         switch (_IOC_DIR(cmd))
422         {
423         case _IOC_READ:
424         case (_IOC_WRITE | _IOC_READ):
425                 if (copy_to_user((void __user *)arg, parg, _IOC_SIZE(cmd)))
426                         err = -EFAULT;
427                 break;
428         }
429
430 out:
431         kfree(mbuf);
432         return err;
433 }
434
435 static int dvb_uevent(struct device *dev, struct kobj_uevent_env *env)
436 {
437         struct dvb_device *dvbdev = dev_get_drvdata(dev);
438
439         add_uevent_var(env, "DVB_ADAPTER_NUM=%d", dvbdev->adapter->num);
440         add_uevent_var(env, "DVB_DEVICE_TYPE=%s", dnames[dvbdev->type]);
441         add_uevent_var(env, "DVB_DEVICE_NUM=%d", dvbdev->id);
442         return 0;
443 }
444
445 static int __init init_dvbdev(void)
446 {
447         int retval;
448         dev_t dev = MKDEV(DVB_MAJOR, 0);
449
450         if ((retval = register_chrdev_region(dev, MAX_DVB_MINORS, "DVB")) != 0) {
451                 printk(KERN_ERR "dvb-core: unable to get major %d\n", DVB_MAJOR);
452                 return retval;
453         }
454
455         cdev_init(&dvb_device_cdev, &dvb_device_fops);
456         if ((retval = cdev_add(&dvb_device_cdev, dev, MAX_DVB_MINORS)) != 0) {
457                 printk(KERN_ERR "dvb-core: unable register character device\n");
458                 goto error;
459         }
460
461         dvb_class = class_create(THIS_MODULE, "dvb");
462         if (IS_ERR(dvb_class)) {
463                 retval = PTR_ERR(dvb_class);
464                 goto error;
465         }
466         dvb_class->dev_uevent = dvb_uevent;
467         return 0;
468
469 error:
470         cdev_del(&dvb_device_cdev);
471         unregister_chrdev_region(dev, MAX_DVB_MINORS);
472         return retval;
473 }
474
475
476 static void __exit exit_dvbdev(void)
477 {
478         class_destroy(dvb_class);
479         cdev_del(&dvb_device_cdev);
480         unregister_chrdev_region(MKDEV(DVB_MAJOR, 0), MAX_DVB_MINORS);
481 }
482
483 subsys_initcall(init_dvbdev);
484 module_exit(exit_dvbdev);
485
486 MODULE_DESCRIPTION("DVB Core Driver");
487 MODULE_AUTHOR("Marcus Metzler, Ralph Metzler, Holger Waechtler");
488 MODULE_LICENSE("GPL");