Merge branch 'release' of git://git.kernel.org/pub/scm/linux/kernel/git/lenb/linux...
[linux-2.6] / sound / core / seq / seq_device.c
1 /*
2  *  ALSA sequencer device management
3  *  Copyright (c) 1999 by Takashi Iwai <tiwai@suse.de>
4  *
5  *   This program is free software; you can redistribute it and/or modify
6  *   it under the terms of the GNU General Public License as published by
7  *   the Free Software Foundation; either version 2 of the License, or
8  *   (at your option) any later version.
9  *
10  *   This program is distributed in the hope that it will be useful,
11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *   GNU General Public License for more details.
14  *
15  *   You should have received a copy of the GNU General Public License
16  *   along with this program; if not, write to the Free Software
17  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
18  *
19  *
20  *----------------------------------------------------------------
21  *
22  * This device handler separates the card driver module from sequencer
23  * stuff (sequencer core, synth drivers, etc), so that user can avoid
24  * to spend unnecessary resources e.g. if he needs only listening to
25  * MP3s.
26  *
27  * The card (or lowlevel) driver creates a sequencer device entry
28  * via snd_seq_device_new().  This is an entry pointer to communicate
29  * with the sequencer device "driver", which is involved with the
30  * actual part to communicate with the sequencer core.
31  * Each sequencer device entry has an id string and the corresponding
32  * driver with the same id is loaded when required.  For example,
33  * lowlevel codes to access emu8000 chip on sbawe card are included in
34  * emu8000-synth module.  To activate this module, the hardware
35  * resources like i/o port are passed via snd_seq_device argument.
36  *
37  */
38
39 #include <sound/driver.h>
40 #include <linux/init.h>
41 #include <sound/core.h>
42 #include <sound/info.h>
43 #include <sound/seq_device.h>
44 #include <sound/seq_kernel.h>
45 #include <sound/initval.h>
46 #include <linux/kmod.h>
47 #include <linux/slab.h>
48 #include <linux/mutex.h>
49
50 MODULE_AUTHOR("Takashi Iwai <tiwai@suse.de>");
51 MODULE_DESCRIPTION("ALSA sequencer device management");
52 MODULE_LICENSE("GPL");
53
54 /* driver state */
55 #define DRIVER_EMPTY            0
56 #define DRIVER_LOADED           (1<<0)
57 #define DRIVER_REQUESTED        (1<<1)
58 #define DRIVER_LOCKED           (1<<2)
59
60 struct ops_list {
61         char id[ID_LEN];        /* driver id */
62         int driver;             /* driver state */
63         int used;               /* reference counter */
64         int argsize;            /* argument size */
65
66         /* operators */
67         struct snd_seq_dev_ops ops;
68
69         /* registred devices */
70         struct list_head dev_list;      /* list of devices */
71         int num_devices;        /* number of associated devices */
72         int num_init_devices;   /* number of initialized devices */
73         struct mutex reg_mutex;
74
75         struct list_head list;  /* next driver */
76 };
77
78
79 static LIST_HEAD(opslist);
80 static int num_ops;
81 static DEFINE_MUTEX(ops_mutex);
82 #ifdef CONFIG_PROC_FS
83 static struct snd_info_entry *info_entry;
84 #endif
85
86 /*
87  * prototypes
88  */
89 static int snd_seq_device_free(struct snd_seq_device *dev);
90 static int snd_seq_device_dev_free(struct snd_device *device);
91 static int snd_seq_device_dev_register(struct snd_device *device);
92 static int snd_seq_device_dev_disconnect(struct snd_device *device);
93 static int snd_seq_device_dev_unregister(struct snd_device *device);
94
95 static int init_device(struct snd_seq_device *dev, struct ops_list *ops);
96 static int free_device(struct snd_seq_device *dev, struct ops_list *ops);
97 static struct ops_list *find_driver(char *id, int create_if_empty);
98 static struct ops_list *create_driver(char *id);
99 static void unlock_driver(struct ops_list *ops);
100 static void remove_drivers(void);
101
102 /*
103  * show all drivers and their status
104  */
105
106 #ifdef CONFIG_PROC_FS
107 static void snd_seq_device_info(struct snd_info_entry *entry,
108                                 struct snd_info_buffer *buffer)
109 {
110         struct list_head *head;
111
112         mutex_lock(&ops_mutex);
113         list_for_each(head, &opslist) {
114                 struct ops_list *ops = list_entry(head, struct ops_list, list);
115                 snd_iprintf(buffer, "snd-%s%s%s%s,%d\n",
116                                 ops->id,
117                                 ops->driver & DRIVER_LOADED ? ",loaded" : (ops->driver == DRIVER_EMPTY ? ",empty" : ""),
118                                 ops->driver & DRIVER_REQUESTED ? ",requested" : "",
119                                 ops->driver & DRIVER_LOCKED ? ",locked" : "",
120                                 ops->num_devices);
121         }
122         mutex_unlock(&ops_mutex);
123 }
124 #endif
125  
126 /*
127  * load all registered drivers (called from seq_clientmgr.c)
128  */
129
130 #ifdef CONFIG_KMOD
131 /* avoid auto-loading during module_init() */
132 static int snd_seq_in_init;
133 void snd_seq_autoload_lock(void)
134 {
135         snd_seq_in_init++;
136 }
137
138 void snd_seq_autoload_unlock(void)
139 {
140         snd_seq_in_init--;
141 }
142 #endif
143
144 void snd_seq_device_load_drivers(void)
145 {
146 #ifdef CONFIG_KMOD
147         struct list_head *head;
148
149         /* Calling request_module during module_init()
150          * may cause blocking.
151          */
152         if (snd_seq_in_init)
153                 return;
154
155         if (! current->fs->root)
156                 return;
157
158         mutex_lock(&ops_mutex);
159         list_for_each(head, &opslist) {
160                 struct ops_list *ops = list_entry(head, struct ops_list, list);
161                 if (! (ops->driver & DRIVER_LOADED) &&
162                     ! (ops->driver & DRIVER_REQUESTED)) {
163                         ops->used++;
164                         mutex_unlock(&ops_mutex);
165                         ops->driver |= DRIVER_REQUESTED;
166                         request_module("snd-%s", ops->id);
167                         mutex_lock(&ops_mutex);
168                         ops->used--;
169                 }
170         }
171         mutex_unlock(&ops_mutex);
172 #endif
173 }
174
175 /*
176  * register a sequencer device
177  * card = card info (NULL allowed)
178  * device = device number (if any)
179  * id = id of driver
180  * result = return pointer (NULL allowed if unnecessary)
181  */
182 int snd_seq_device_new(struct snd_card *card, int device, char *id, int argsize,
183                        struct snd_seq_device **result)
184 {
185         struct snd_seq_device *dev;
186         struct ops_list *ops;
187         int err;
188         static struct snd_device_ops dops = {
189                 .dev_free = snd_seq_device_dev_free,
190                 .dev_register = snd_seq_device_dev_register,
191                 .dev_disconnect = snd_seq_device_dev_disconnect,
192                 .dev_unregister = snd_seq_device_dev_unregister
193         };
194
195         if (result)
196                 *result = NULL;
197
198         snd_assert(id != NULL, return -EINVAL);
199
200         ops = find_driver(id, 1);
201         if (ops == NULL)
202                 return -ENOMEM;
203
204         dev = kzalloc(sizeof(*dev)*2 + argsize, GFP_KERNEL);
205         if (dev == NULL) {
206                 unlock_driver(ops);
207                 return -ENOMEM;
208         }
209
210         /* set up device info */
211         dev->card = card;
212         dev->device = device;
213         strlcpy(dev->id, id, sizeof(dev->id));
214         dev->argsize = argsize;
215         dev->status = SNDRV_SEQ_DEVICE_FREE;
216
217         /* add this device to the list */
218         mutex_lock(&ops->reg_mutex);
219         list_add_tail(&dev->list, &ops->dev_list);
220         ops->num_devices++;
221         mutex_unlock(&ops->reg_mutex);
222
223         unlock_driver(ops);
224         
225         if ((err = snd_device_new(card, SNDRV_DEV_SEQUENCER, dev, &dops)) < 0) {
226                 snd_seq_device_free(dev);
227                 return err;
228         }
229         
230         if (result)
231                 *result = dev;
232
233         return 0;
234 }
235
236 /*
237  * free the existing device
238  */
239 static int snd_seq_device_free(struct snd_seq_device *dev)
240 {
241         struct ops_list *ops;
242
243         snd_assert(dev != NULL, return -EINVAL);
244
245         ops = find_driver(dev->id, 0);
246         if (ops == NULL)
247                 return -ENXIO;
248
249         /* remove the device from the list */
250         mutex_lock(&ops->reg_mutex);
251         list_del(&dev->list);
252         ops->num_devices--;
253         mutex_unlock(&ops->reg_mutex);
254
255         free_device(dev, ops);
256         if (dev->private_free)
257                 dev->private_free(dev);
258         kfree(dev);
259
260         unlock_driver(ops);
261
262         return 0;
263 }
264
265 static int snd_seq_device_dev_free(struct snd_device *device)
266 {
267         struct snd_seq_device *dev = device->device_data;
268         return snd_seq_device_free(dev);
269 }
270
271 /*
272  * register the device
273  */
274 static int snd_seq_device_dev_register(struct snd_device *device)
275 {
276         struct snd_seq_device *dev = device->device_data;
277         struct ops_list *ops;
278
279         ops = find_driver(dev->id, 0);
280         if (ops == NULL)
281                 return -ENOENT;
282
283         /* initialize this device if the corresponding driver was
284          * already loaded
285          */
286         if (ops->driver & DRIVER_LOADED)
287                 init_device(dev, ops);
288
289         unlock_driver(ops);
290         return 0;
291 }
292
293 /*
294  * disconnect the device
295  */
296 static int snd_seq_device_dev_disconnect(struct snd_device *device)
297 {
298         struct snd_seq_device *dev = device->device_data;
299         struct ops_list *ops;
300
301         ops = find_driver(dev->id, 0);
302         if (ops == NULL)
303                 return -ENOENT;
304
305         free_device(dev, ops);
306
307         unlock_driver(ops);
308         return 0;
309 }
310
311 /*
312  * unregister the existing device
313  */
314 static int snd_seq_device_dev_unregister(struct snd_device *device)
315 {
316         struct snd_seq_device *dev = device->device_data;
317         return snd_seq_device_free(dev);
318 }
319
320 /*
321  * register device driver
322  * id = driver id
323  * entry = driver operators - duplicated to each instance
324  */
325 int snd_seq_device_register_driver(char *id, struct snd_seq_dev_ops *entry,
326                                    int argsize)
327 {
328         struct list_head *head;
329         struct ops_list *ops;
330
331         if (id == NULL || entry == NULL ||
332             entry->init_device == NULL || entry->free_device == NULL)
333                 return -EINVAL;
334
335         snd_seq_autoload_lock();
336         ops = find_driver(id, 1);
337         if (ops == NULL) {
338                 snd_seq_autoload_unlock();
339                 return -ENOMEM;
340         }
341         if (ops->driver & DRIVER_LOADED) {
342                 snd_printk(KERN_WARNING "driver_register: driver '%s' already exists\n", id);
343                 unlock_driver(ops);
344                 snd_seq_autoload_unlock();
345                 return -EBUSY;
346         }
347
348         mutex_lock(&ops->reg_mutex);
349         /* copy driver operators */
350         ops->ops = *entry;
351         ops->driver |= DRIVER_LOADED;
352         ops->argsize = argsize;
353
354         /* initialize existing devices if necessary */
355         list_for_each(head, &ops->dev_list) {
356                 struct snd_seq_device *dev = list_entry(head, struct snd_seq_device, list);
357                 init_device(dev, ops);
358         }
359         mutex_unlock(&ops->reg_mutex);
360
361         unlock_driver(ops);
362         snd_seq_autoload_unlock();
363
364         return 0;
365 }
366
367
368 /*
369  * create driver record
370  */
371 static struct ops_list * create_driver(char *id)
372 {
373         struct ops_list *ops;
374
375         ops = kmalloc(sizeof(*ops), GFP_KERNEL);
376         if (ops == NULL)
377                 return ops;
378         memset(ops, 0, sizeof(*ops));
379
380         /* set up driver entry */
381         strlcpy(ops->id, id, sizeof(ops->id));
382         mutex_init(&ops->reg_mutex);
383         /*
384          * The ->reg_mutex locking rules are per-driver, so we create
385          * separate per-driver lock classes:
386          */
387         lockdep_set_class(&ops->reg_mutex, (struct lock_class_key *)id);
388
389         ops->driver = DRIVER_EMPTY;
390         INIT_LIST_HEAD(&ops->dev_list);
391         /* lock this instance */
392         ops->used = 1;
393
394         /* register driver entry */
395         mutex_lock(&ops_mutex);
396         list_add_tail(&ops->list, &opslist);
397         num_ops++;
398         mutex_unlock(&ops_mutex);
399
400         return ops;
401 }
402
403
404 /*
405  * unregister the specified driver
406  */
407 int snd_seq_device_unregister_driver(char *id)
408 {
409         struct list_head *head;
410         struct ops_list *ops;
411
412         ops = find_driver(id, 0);
413         if (ops == NULL)
414                 return -ENXIO;
415         if (! (ops->driver & DRIVER_LOADED) ||
416             (ops->driver & DRIVER_LOCKED)) {
417                 snd_printk(KERN_ERR "driver_unregister: cannot unload driver '%s': status=%x\n",
418                            id, ops->driver);
419                 unlock_driver(ops);
420                 return -EBUSY;
421         }
422
423         /* close and release all devices associated with this driver */
424         mutex_lock(&ops->reg_mutex);
425         ops->driver |= DRIVER_LOCKED; /* do not remove this driver recursively */
426         list_for_each(head, &ops->dev_list) {
427                 struct snd_seq_device *dev = list_entry(head, struct snd_seq_device, list);
428                 free_device(dev, ops);
429         }
430
431         ops->driver = 0;
432         if (ops->num_init_devices > 0)
433                 snd_printk(KERN_ERR "free_driver: init_devices > 0!! (%d)\n",
434                            ops->num_init_devices);
435         mutex_unlock(&ops->reg_mutex);
436
437         unlock_driver(ops);
438
439         /* remove empty driver entries */
440         remove_drivers();
441
442         return 0;
443 }
444
445
446 /*
447  * remove empty driver entries
448  */
449 static void remove_drivers(void)
450 {
451         struct list_head *head;
452
453         mutex_lock(&ops_mutex);
454         head = opslist.next;
455         while (head != &opslist) {
456                 struct ops_list *ops = list_entry(head, struct ops_list, list);
457                 if (! (ops->driver & DRIVER_LOADED) &&
458                     ops->used == 0 && ops->num_devices == 0) {
459                         head = head->next;
460                         list_del(&ops->list);
461                         kfree(ops);
462                         num_ops--;
463                 } else
464                         head = head->next;
465         }
466         mutex_unlock(&ops_mutex);
467 }
468
469 /*
470  * initialize the device - call init_device operator
471  */
472 static int init_device(struct snd_seq_device *dev, struct ops_list *ops)
473 {
474         if (! (ops->driver & DRIVER_LOADED))
475                 return 0; /* driver is not loaded yet */
476         if (dev->status != SNDRV_SEQ_DEVICE_FREE)
477                 return 0; /* already initialized */
478         if (ops->argsize != dev->argsize) {
479                 snd_printk(KERN_ERR "incompatible device '%s' for plug-in '%s' (%d %d)\n",
480                            dev->name, ops->id, ops->argsize, dev->argsize);
481                 return -EINVAL;
482         }
483         if (ops->ops.init_device(dev) >= 0) {
484                 dev->status = SNDRV_SEQ_DEVICE_REGISTERED;
485                 ops->num_init_devices++;
486         } else {
487                 snd_printk(KERN_ERR "init_device failed: %s: %s\n",
488                            dev->name, dev->id);
489         }
490
491         return 0;
492 }
493
494 /*
495  * release the device - call free_device operator
496  */
497 static int free_device(struct snd_seq_device *dev, struct ops_list *ops)
498 {
499         int result;
500
501         if (! (ops->driver & DRIVER_LOADED))
502                 return 0; /* driver is not loaded yet */
503         if (dev->status != SNDRV_SEQ_DEVICE_REGISTERED)
504                 return 0; /* not registered */
505         if (ops->argsize != dev->argsize) {
506                 snd_printk(KERN_ERR "incompatible device '%s' for plug-in '%s' (%d %d)\n",
507                            dev->name, ops->id, ops->argsize, dev->argsize);
508                 return -EINVAL;
509         }
510         if ((result = ops->ops.free_device(dev)) >= 0 || result == -ENXIO) {
511                 dev->status = SNDRV_SEQ_DEVICE_FREE;
512                 dev->driver_data = NULL;
513                 ops->num_init_devices--;
514         } else {
515                 snd_printk(KERN_ERR "free_device failed: %s: %s\n",
516                            dev->name, dev->id);
517         }
518
519         return 0;
520 }
521
522 /*
523  * find the matching driver with given id
524  */
525 static struct ops_list * find_driver(char *id, int create_if_empty)
526 {
527         struct list_head *head;
528
529         mutex_lock(&ops_mutex);
530         list_for_each(head, &opslist) {
531                 struct ops_list *ops = list_entry(head, struct ops_list, list);
532                 if (strcmp(ops->id, id) == 0) {
533                         ops->used++;
534                         mutex_unlock(&ops_mutex);
535                         return ops;
536                 }
537         }
538         mutex_unlock(&ops_mutex);
539         if (create_if_empty)
540                 return create_driver(id);
541         return NULL;
542 }
543
544 static void unlock_driver(struct ops_list *ops)
545 {
546         mutex_lock(&ops_mutex);
547         ops->used--;
548         mutex_unlock(&ops_mutex);
549 }
550
551
552 /*
553  * module part
554  */
555
556 static int __init alsa_seq_device_init(void)
557 {
558 #ifdef CONFIG_PROC_FS
559         info_entry = snd_info_create_module_entry(THIS_MODULE, "drivers",
560                                                   snd_seq_root);
561         if (info_entry == NULL)
562                 return -ENOMEM;
563         info_entry->content = SNDRV_INFO_CONTENT_TEXT;
564         info_entry->c.text.read = snd_seq_device_info;
565         if (snd_info_register(info_entry) < 0) {
566                 snd_info_free_entry(info_entry);
567                 return -ENOMEM;
568         }
569 #endif
570         return 0;
571 }
572
573 static void __exit alsa_seq_device_exit(void)
574 {
575         remove_drivers();
576 #ifdef CONFIG_PROC_FS
577         snd_info_unregister(info_entry);
578 #endif
579         if (num_ops)
580                 snd_printk(KERN_ERR "drivers not released (%d)\n", num_ops);
581 }
582
583 module_init(alsa_seq_device_init)
584 module_exit(alsa_seq_device_exit)
585
586 EXPORT_SYMBOL(snd_seq_device_load_drivers);
587 EXPORT_SYMBOL(snd_seq_device_new);
588 EXPORT_SYMBOL(snd_seq_device_register_driver);
589 EXPORT_SYMBOL(snd_seq_device_unregister_driver);
590 #ifdef CONFIG_KMOD
591 EXPORT_SYMBOL(snd_seq_autoload_lock);
592 EXPORT_SYMBOL(snd_seq_autoload_unlock);
593 #endif