sound/core/control.c

   1 /*
   2  *  Routines for driver control interface
   3  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
   4  *
   5  *
   6  *   This program is free software; you can redistribute it and/or modify
   7  *   it under the terms of the GNU General Public License as published by
   8  *   the Free Software Foundation; either version 2 of the License, or
   9  *   (at your option) any later version.
  10  *
  11  *   This program is distributed in the hope that it will be useful,
  12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *   GNU General Public License for more details.
  15  *
  16  *   You should have received a copy of the GNU General Public License
  17  *   along with this program; if not, write to the Free Software
  18  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19  *
  20  */
  21
  22 #include <sound/driver.h>
  23 #include <linux/threads.h>
  24 #include <linux/interrupt.h>
  25 #include <linux/slab.h>
  26 #include <linux/vmalloc.h>
  27 #include <linux/time.h>
  28 #include <sound/core.h>
  29 #include <sound/minors.h>
  30 #include <sound/info.h>
  31 #include <sound/control.h>
  32
  33 /* max number of user-defined controls */
  34 #define MAX_USER_CONTROLS       32
  35
  36 struct snd_kctl_ioctl {
  37         struct list_head list;          /* list of all ioctls */
  38         snd_kctl_ioctl_func_t fioctl;
  39 };
  40
  41 static DECLARE_RWSEM(snd_ioctl_rwsem);
  42 static LIST_HEAD(snd_control_ioctls);
  43 #ifdef CONFIG_COMPAT
  44 static LIST_HEAD(snd_control_compat_ioctls);
  45 #endif
  46
  47 static int snd_ctl_open(struct inode *inode, struct file *file)
  48 {
  49         unsigned long flags;
  50         struct snd_card *card;
  51         struct snd_ctl_file *ctl;
  52         int err;
  53
  54         card = snd_lookup_minor_data(iminor(inode), SNDRV_DEVICE_TYPE_CONTROL);
  55         if (!card) {
  56                 err = -ENODEV;
  57                 goto __error1;
  58         }
  59         err = snd_card_file_add(card, file);
  60         if (err < 0) {
  61                 err = -ENODEV;
  62                 goto __error1;
  63         }
  64         if (!try_module_get(card->module)) {
  65                 err = -EFAULT;
  66                 goto __error2;
  67         }
  68         ctl = kzalloc(sizeof(*ctl), GFP_KERNEL);
  69         if (ctl == NULL) {
  70                 err = -ENOMEM;
  71                 goto __error;
  72         }
  73         INIT_LIST_HEAD(&ctl->events);
  74         init_waitqueue_head(&ctl->change_sleep);
  75         spin_lock_init(&ctl->read_lock);
  76         ctl->card = card;
  77         ctl->prefer_pcm_subdevice = -1;
  78         ctl->prefer_rawmidi_subdevice = -1;
  79         ctl->pid = current->pid;
  80         file->private_data = ctl;
  81         write_lock_irqsave(&card->ctl_files_rwlock, flags);
  82         list_add_tail(&ctl->list, &card->ctl_files);
  83         write_unlock_irqrestore(&card->ctl_files_rwlock, flags);
  84         return 0;
  85
  86       __error:
  87         module_put(card->module);
  88       __error2:
  89         snd_card_file_remove(card, file);
  90       __error1:
  91         return err;
  92 }
  93
  94 static void snd_ctl_empty_read_queue(struct snd_ctl_file * ctl)
  95 {
  96         unsigned long flags;
  97         struct snd_kctl_event *cread;
  98
  99         spin_lock_irqsave(&ctl->read_lock, flags);
 100         while (!list_empty(&ctl->events)) {
 101                 cread = snd_kctl_event(ctl->events.next);
 102                 list_del(&cread->list);
 103                 kfree(cread);
 104         }
 105         spin_unlock_irqrestore(&ctl->read_lock, flags);
 106 }
 107
 108 static int snd_ctl_release(struct inode *inode, struct file *file)
 109 {
 110         unsigned long flags;
 111         struct snd_card *card;
 112         struct snd_ctl_file *ctl;
 113         struct snd_kcontrol *control;
 114         unsigned int idx;
 115
 116         ctl = file->private_data;
 117         fasync_helper(-1, file, 0, &ctl->fasync);
 118         file->private_data = NULL;
 119         card = ctl->card;
 120         write_lock_irqsave(&card->ctl_files_rwlock, flags);
 121         list_del(&ctl->list);
 122         write_unlock_irqrestore(&card->ctl_files_rwlock, flags);
 123         down_write(&card->controls_rwsem);
 124         list_for_each_entry(control, &card->controls, list)
 125                 for (idx = 0; idx < control->count; idx++)
 126                         if (control->vd[idx].owner == ctl)
 127                                 control->vd[idx].owner = NULL;
 128         up_write(&card->controls_rwsem);
 129         snd_ctl_empty_read_queue(ctl);
 130         kfree(ctl);
 131         module_put(card->module);
 132         snd_card_file_remove(card, file);
 133         return 0;
 134 }
 135
 136 void snd_ctl_notify(struct snd_card *card, unsigned int mask,
 137                     struct snd_ctl_elem_id *id)
 138 {
 139         unsigned long flags;
 140         struct snd_ctl_file *ctl;
 141         struct snd_kctl_event *ev;
 142
 143         snd_assert(card != NULL && id != NULL, return);
 144         read_lock(&card->ctl_files_rwlock);
 145 #if defined(CONFIG_SND_MIXER_OSS) || defined(CONFIG_SND_MIXER_OSS_MODULE)
 146         card->mixer_oss_change_count++;
 147 #endif
 148         list_for_each_entry(ctl, &card->ctl_files, list) {
 149                 if (!ctl->subscribed)
 150                         continue;
 151                 spin_lock_irqsave(&ctl->read_lock, flags);
 152                 list_for_each_entry(ev, &ctl->events, list) {
 153                         if (ev->id.numid == id->numid) {
 154                                 ev->mask |= mask;
 155                                 goto _found;
 156                         }
 157                 }
 158                 ev = kzalloc(sizeof(*ev), GFP_ATOMIC);
 159                 if (ev) {
 160                         ev->id = *id;
 161                         ev->mask = mask;
 162                         list_add_tail(&ev->list, &ctl->events);
 163                 } else {
 164                         snd_printk(KERN_ERR "No memory available to allocate event\n");
 165                 }
 166         _found:
 167                 wake_up(&ctl->change_sleep);
 168                 spin_unlock_irqrestore(&ctl->read_lock, flags);
 169                 kill_fasync(&ctl->fasync, SIGIO, POLL_IN);
 170         }
 171         read_unlock(&card->ctl_files_rwlock);
 172 }
 173
 174 EXPORT_SYMBOL(snd_ctl_notify);
 175
 176 /**
 177  * snd_ctl_new - create a control instance from the template
 178  * @control: the control template
 179  * @access: the default control access
 180  *
 181  * Allocates a new struct snd_kcontrol instance and copies the given template
 182  * to the new instance. It does not copy volatile data (access).
 183  *
 184  * Returns the pointer of the new instance, or NULL on failure.
 185  */
 186 static struct snd_kcontrol *snd_ctl_new(struct snd_kcontrol *control,
 187                                         unsigned int access)
 188 {
 189         struct snd_kcontrol *kctl;
 190         unsigned int idx;
 191
 192         snd_assert(control != NULL, return NULL);
 193         snd_assert(control->count > 0, return NULL);
 194         kctl = kzalloc(sizeof(*kctl) + sizeof(struct snd_kcontrol_volatile) * control->count, GFP_KERNEL);
 195         if (kctl == NULL) {
 196                 snd_printk(KERN_ERR "Cannot allocate control instance\n");
 197                 return NULL;
 198         }
 199         *kctl = *control;
 200         for (idx = 0; idx < kctl->count; idx++)
 201                 kctl->vd[idx].access = access;
 202         return kctl;
 203 }
 204
 205 /**
 206  * snd_ctl_new1 - create a control instance from the template
 207  * @ncontrol: the initialization record
 208  * @private_data: the private data to set
 209  *
 210  * Allocates a new struct snd_kcontrol instance and initialize from the given
 211  * template.  When the access field of ncontrol is 0, it's assumed as
 212  * READWRITE access. When the count field is 0, it's assumes as one.
 213  *
 214  * Returns the pointer of the newly generated instance, or NULL on failure.
 215  */
 216 struct snd_kcontrol *snd_ctl_new1(const struct snd_kcontrol_new *ncontrol,
 217                                   void *private_data)
 218 {
 219         struct snd_kcontrol kctl;
 220         unsigned int access;
 221
 222         snd_assert(ncontrol != NULL, return NULL);
 223         snd_assert(ncontrol->info != NULL, return NULL);
 224         memset(&kctl, 0, sizeof(kctl));
 225         kctl.id.iface = ncontrol->iface;
 226         kctl.id.device = ncontrol->device;
 227         kctl.id.subdevice = ncontrol->subdevice;
 228         if (ncontrol->name)
 229                 strlcpy(kctl.id.name, ncontrol->name, sizeof(kctl.id.name));
 230         kctl.id.index = ncontrol->index;
 231         kctl.count = ncontrol->count ? ncontrol->count : 1;
 232         access = ncontrol->access == 0 ? SNDRV_CTL_ELEM_ACCESS_READWRITE :
 233                  (ncontrol->access & (SNDRV_CTL_ELEM_ACCESS_READWRITE|
 234                                       SNDRV_CTL_ELEM_ACCESS_INACTIVE|
 235                                       SNDRV_CTL_ELEM_ACCESS_TLV_READWRITE|
 236                                       SNDRV_CTL_ELEM_ACCESS_TLV_CALLBACK));
 237         kctl.info = ncontrol->info;
 238         kctl.get = ncontrol->get;
 239         kctl.put = ncontrol->put;
 240         kctl.tlv.p = ncontrol->tlv.p;
 241         kctl.private_value = ncontrol->private_value;
 242         kctl.private_data = private_data;
 243         return snd_ctl_new(&kctl, access);
 244 }
 245
 246 EXPORT_SYMBOL(snd_ctl_new1);
 247
 248 /**
 249  * snd_ctl_free_one - release the control instance
 250  * @kcontrol: the control instance
 251  *
 252  * Releases the control instance created via snd_ctl_new()
 253  * or snd_ctl_new1().
 254  * Don't call this after the control was added to the card.
 255  */
 256 void snd_ctl_free_one(struct snd_kcontrol *kcontrol)
 257 {
 258         if (kcontrol) {
 259                 if (kcontrol->private_free)
 260                         kcontrol->private_free(kcontrol);
 261                 kfree(kcontrol);
 262         }
 263 }
 264
 265 EXPORT_SYMBOL(snd_ctl_free_one);
 266
 267 static unsigned int snd_ctl_hole_check(struct snd_card *card,
 268                                        unsigned int count)
 269 {
 270         struct snd_kcontrol *kctl;
 271
 272         list_for_each_entry(kctl, &card->controls, list) {
 273                 if ((kctl->id.numid <= card->last_numid &&
 274                      kctl->id.numid + kctl->count > card->last_numid) ||
 275                     (kctl->id.numid <= card->last_numid + count - 1 &&
 276                      kctl->id.numid + kctl->count > card->last_numid + count - 1))
 277                         return card->last_numid = kctl->id.numid + kctl->count - 1;
 278         }
 279         return card->last_numid;
 280 }
 281
 282 static int snd_ctl_find_hole(struct snd_card *card, unsigned int count)
 283 {
 284         unsigned int last_numid, iter = 100000;
 285
 286         last_numid = card->last_numid;
 287         while (last_numid != snd_ctl_hole_check(card, count)) {
 288                 if (--iter == 0) {
 289                         /* this situation is very unlikely */
 290                         snd_printk(KERN_ERR "unable to allocate new control numid\n");
 291                         return -ENOMEM;
 292                 }
 293                 last_numid = card->last_numid;
 294         }
 295         return 0;
 296 }
 297
 298 /**
 299  * snd_ctl_add - add the control instance to the card
 300  * @card: the card instance
 301  * @kcontrol: the control instance to add
 302  *
 303  * Adds the control instance created via snd_ctl_new() or
 304  * snd_ctl_new1() to the given card. Assigns also an unique
 305  * numid used for fast search.
 306  *
 307  * Returns zero if successful, or a negative error code on failure.
 308  *
 309  * It frees automatically the control which cannot be added.
 310  */
 311 int snd_ctl_add(struct snd_card *card, struct snd_kcontrol *kcontrol)
 312 {
 313         struct snd_ctl_elem_id id;
 314         unsigned int idx;
 315         int err = -EINVAL;
 316
 317         if (! kcontrol)
 318                 return err;
 319         snd_assert(card != NULL, goto error);
 320         snd_assert(kcontrol->info != NULL, goto error);
 321         id = kcontrol->id;
 322         down_write(&card->controls_rwsem);
 323         if (snd_ctl_find_id(card, &id)) {
 324                 up_write(&card->controls_rwsem);
 325                 snd_printd(KERN_ERR "control %i:%i:%i:%s:%i is already present\n",
 326                                         id.iface,
 327                                         id.device,
 328                                         id.subdevice,
 329                                         id.name,
 330                                         id.index);
 331                 err = -EBUSY;
 332                 goto error;
 333         }
 334         if (snd_ctl_find_hole(card, kcontrol->count) < 0) {
 335                 up_write(&card->controls_rwsem);
 336                 err = -ENOMEM;
 337                 goto error;
 338         }
 339         list_add_tail(&kcontrol->list, &card->controls);
 340         card->controls_count += kcontrol->count;
 341         kcontrol->id.numid = card->last_numid + 1;
 342         card->last_numid += kcontrol->count;
 343         up_write(&card->controls_rwsem);
 344         for (idx = 0; idx < kcontrol->count; idx++, id.index++, id.numid++)
 345                 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_ADD, &id);
 346         return 0;
 347
 348  error:
 349         snd_ctl_free_one(kcontrol);
 350         return err;
 351 }
 352
 353 EXPORT_SYMBOL(snd_ctl_add);
 354
 355 /**
 356  * snd_ctl_remove - remove the control from the card and release it
 357  * @card: the card instance
 358  * @kcontrol: the control instance to remove
 359  *
 360  * Removes the control from the card and then releases the instance.
 361  * You don't need to call snd_ctl_free_one(). You must be in
 362  * the write lock - down_write(&card->controls_rwsem).
 363  *
 364  * Returns 0 if successful, or a negative error code on failure.
 365  */
 366 int snd_ctl_remove(struct snd_card *card, struct snd_kcontrol *kcontrol)
 367 {
 368         struct snd_ctl_elem_id id;
 369         unsigned int idx;
 370
 371         snd_assert(card != NULL && kcontrol != NULL, return -EINVAL);
 372         list_del(&kcontrol->list);
 373         card->controls_count -= kcontrol->count;
 374         id = kcontrol->id;
 375         for (idx = 0; idx < kcontrol->count; idx++, id.index++, id.numid++)
 376                 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_REMOVE, &id);
 377         snd_ctl_free_one(kcontrol);
 378         return 0;
 379 }
 380
 381 EXPORT_SYMBOL(snd_ctl_remove);
 382
 383 /**
 384  * snd_ctl_remove_id - remove the control of the given id and release it
 385  * @card: the card instance
 386  * @id: the control id to remove
 387  *
 388  * Finds the control instance with the given id, removes it from the
 389  * card list and releases it.
 390  *
 391  * Returns 0 if successful, or a negative error code on failure.
 392  */
 393 int snd_ctl_remove_id(struct snd_card *card, struct snd_ctl_elem_id *id)
 394 {
 395         struct snd_kcontrol *kctl;
 396         int ret;
 397
 398         down_write(&card->controls_rwsem);
 399         kctl = snd_ctl_find_id(card, id);
 400         if (kctl == NULL) {
 401                 up_write(&card->controls_rwsem);
 402                 return -ENOENT;
 403         }
 404         ret = snd_ctl_remove(card, kctl);
 405         up_write(&card->controls_rwsem);
 406         return ret;
 407 }
 408
 409 EXPORT_SYMBOL(snd_ctl_remove_id);
 410
 411 /**
 412  * snd_ctl_remove_unlocked_id - remove the unlocked control of the given id and release it
 413  * @file: active control handle
 414  * @id: the control id to remove
 415  *
 416  * Finds the control instance with the given id, removes it from the
 417  * card list and releases it.
 418  *
 419  * Returns 0 if successful, or a negative error code on failure.
 420  */
 421 static int snd_ctl_remove_unlocked_id(struct snd_ctl_file * file,
 422                                       struct snd_ctl_elem_id *id)
 423 {
 424         struct snd_card *card = file->card;
 425         struct snd_kcontrol *kctl;
 426         int idx, ret;
 427
 428         down_write(&card->controls_rwsem);
 429         kctl = snd_ctl_find_id(card, id);
 430         if (kctl == NULL) {
 431                 up_write(&card->controls_rwsem);
 432                 return -ENOENT;
 433         }
 434         for (idx = 0; idx < kctl->count; idx++)
 435                 if (kctl->vd[idx].owner != NULL && kctl->vd[idx].owner != file) {
 436                         up_write(&card->controls_rwsem);
 437                         return -EBUSY;
 438                 }
 439         ret = snd_ctl_remove(card, kctl);
 440         up_write(&card->controls_rwsem);
 441         return ret;
 442 }
 443
 444 /**
 445  * snd_ctl_rename_id - replace the id of a control on the card
 446  * @card: the card instance
 447  * @src_id: the old id
 448  * @dst_id: the new id
 449  *
 450  * Finds the control with the old id from the card, and replaces the
 451  * id with the new one.
 452  *
 453  * Returns zero if successful, or a negative error code on failure.
 454  */
 455 int snd_ctl_rename_id(struct snd_card *card, struct snd_ctl_elem_id *src_id,
 456                       struct snd_ctl_elem_id *dst_id)
 457 {
 458         struct snd_kcontrol *kctl;
 459
 460         down_write(&card->controls_rwsem);
 461         kctl = snd_ctl_find_id(card, src_id);
 462         if (kctl == NULL) {
 463                 up_write(&card->controls_rwsem);
 464                 return -ENOENT;
 465         }
 466         kctl->id = *dst_id;
 467         kctl->id.numid = card->last_numid + 1;
 468         card->last_numid += kctl->count;
 469         up_write(&card->controls_rwsem);
 470         return 0;
 471 }
 472
 473 EXPORT_SYMBOL(snd_ctl_rename_id);
 474
 475 /**
 476  * snd_ctl_find_numid - find the control instance with the given number-id
 477  * @card: the card instance
 478  * @numid: the number-id to search
 479  *
 480  * Finds the control instance with the given number-id from the card.
 481  *
 482  * Returns the pointer of the instance if found, or NULL if not.
 483  *
 484  * The caller must down card->controls_rwsem before calling this function
 485  * (if the race condition can happen).
 486  */
 487 struct snd_kcontrol *snd_ctl_find_numid(struct snd_card *card, unsigned int numid)
 488 {
 489         struct snd_kcontrol *kctl;
 490
 491         snd_assert(card != NULL && numid != 0, return NULL);
 492         list_for_each_entry(kctl, &card->controls, list) {
 493                 if (kctl->id.numid <= numid && kctl->id.numid + kctl->count > numid)
 494                         return kctl;
 495         }
 496         return NULL;
 497 }
 498
 499 EXPORT_SYMBOL(snd_ctl_find_numid);
 500
 501 /**
 502  * snd_ctl_find_id - find the control instance with the given id
 503  * @card: the card instance
 504  * @id: the id to search
 505  *
 506  * Finds the control instance with the given id from the card.
 507  *
 508  * Returns the pointer of the instance if found, or NULL if not.
 509  *
 510  * The caller must down card->controls_rwsem before calling this function
 511  * (if the race condition can happen).
 512  */
 513 struct snd_kcontrol *snd_ctl_find_id(struct snd_card *card,
 514                                      struct snd_ctl_elem_id *id)
 515 {
 516         struct snd_kcontrol *kctl;
 517
 518         snd_assert(card != NULL && id != NULL, return NULL);
 519         if (id->numid != 0)
 520                 return snd_ctl_find_numid(card, id->numid);
 521         list_for_each_entry(kctl, &card->controls, list) {
 522                 if (kctl->id.iface != id->iface)
 523                         continue;
 524                 if (kctl->id.device != id->device)
 525                         continue;
 526                 if (kctl->id.subdevice != id->subdevice)
 527                         continue;
 528                 if (strncmp(kctl->id.name, id->name, sizeof(kctl->id.name)))
 529                         continue;
 530                 if (kctl->id.index > id->index)
 531                         continue;
 532                 if (kctl->id.index + kctl->count <= id->index)
 533                         continue;
 534                 return kctl;
 535         }
 536         return NULL;
 537 }
 538
 539 EXPORT_SYMBOL(snd_ctl_find_id);
 540
 541 static int snd_ctl_card_info(struct snd_card *card, struct snd_ctl_file * ctl,
 542                              unsigned int cmd, void __user *arg)
 543 {
 544         struct snd_ctl_card_info *info;
 545
 546         info = kzalloc(sizeof(*info), GFP_KERNEL);
 547         if (! info)
 548                 return -ENOMEM;
 549         down_read(&snd_ioctl_rwsem);
 550         info->card = card->number;
 551         strlcpy(info->id, card->id, sizeof(info->id));
 552         strlcpy(info->driver, card->driver, sizeof(info->driver));
 553         strlcpy(info->name, card->shortname, sizeof(info->name));
 554         strlcpy(info->longname, card->longname, sizeof(info->longname));
 555         strlcpy(info->mixername, card->mixername, sizeof(info->mixername));
 556         strlcpy(info->components, card->components, sizeof(info->components));
 557         up_read(&snd_ioctl_rwsem);
 558         if (copy_to_user(arg, info, sizeof(struct snd_ctl_card_info))) {
 559                 kfree(info);
 560                 return -EFAULT;
 561         }
 562         kfree(info);
 563         return 0;
 564 }
 565
 566 static int snd_ctl_elem_list(struct snd_card *card,
 567                              struct snd_ctl_elem_list __user *_list)
 568 {
 569         struct list_head *plist;
 570         struct snd_ctl_elem_list list;
 571         struct snd_kcontrol *kctl;
 572         struct snd_ctl_elem_id *dst, *id;
 573         unsigned int offset, space, first, jidx;
 574
 575         if (copy_from_user(&list, _list, sizeof(list)))
 576                 return -EFAULT;
 577         offset = list.offset;
 578         space = list.space;
 579         first = 0;
 580         /* try limit maximum space */
 581         if (space > 16384)
 582                 return -ENOMEM;
 583         if (space > 0) {
 584                 /* allocate temporary buffer for atomic operation */
 585                 dst = vmalloc(space * sizeof(struct snd_ctl_elem_id));
 586                 if (dst == NULL)
 587                         return -ENOMEM;
 588                 down_read(&card->controls_rwsem);
 589                 list.count = card->controls_count;
 590                 plist = card->controls.next;
 591                 while (plist != &card->controls) {
 592                         if (offset == 0)
 593                                 break;
 594                         kctl = snd_kcontrol(plist);
 595                         if (offset < kctl->count)
 596                                 break;
 597                         offset -= kctl->count;
 598                         plist = plist->next;
 599                 }
 600                 list.used = 0;
 601                 id = dst;
 602                 while (space > 0 && plist != &card->controls) {
 603                         kctl = snd_kcontrol(plist);
 604                         for (jidx = offset; space > 0 && jidx < kctl->count; jidx++) {
 605                                 snd_ctl_build_ioff(id, kctl, jidx);
 606                                 id++;
 607                                 space--;
 608                                 list.used++;
 609                         }
 610                         plist = plist->next;
 611                         offset = 0;
 612                 }
 613                 up_read(&card->controls_rwsem);
 614                 if (list.used > 0 &&
 615                     copy_to_user(list.pids, dst,
 616                                  list.used * sizeof(struct snd_ctl_elem_id))) {
 617                         vfree(dst);
 618                         return -EFAULT;
 619                 }
 620                 vfree(dst);
 621         } else {
 622                 down_read(&card->controls_rwsem);
 623                 list.count = card->controls_count;
 624                 up_read(&card->controls_rwsem);
 625         }
 626         if (copy_to_user(_list, &list, sizeof(list)))
 627                 return -EFAULT;
 628         return 0;
 629 }
 630
 631 static int snd_ctl_elem_info(struct snd_ctl_file *ctl,
 632                              struct snd_ctl_elem_info *info)
 633 {
 634         struct snd_card *card = ctl->card;
 635         struct snd_kcontrol *kctl;
 636         struct snd_kcontrol_volatile *vd;
 637         unsigned int index_offset;
 638         int result;
 639
 640         down_read(&card->controls_rwsem);
 641         kctl = snd_ctl_find_id(card, &info->id);
 642         if (kctl == NULL) {
 643                 up_read(&card->controls_rwsem);
 644                 return -ENOENT;
 645         }
 646 #ifdef CONFIG_SND_DEBUG
 647         info->access = 0;
 648 #endif
 649         result = kctl->info(kctl, info);
 650         if (result >= 0) {
 651                 snd_assert(info->access == 0, );
 652                 index_offset = snd_ctl_get_ioff(kctl, &info->id);
 653                 vd = &kctl->vd[index_offset];
 654                 snd_ctl_build_ioff(&info->id, kctl, index_offset);
 655                 info->access = vd->access;
 656                 if (vd->owner) {
 657                         info->access |= SNDRV_CTL_ELEM_ACCESS_LOCK;
 658                         if (vd->owner == ctl)
 659                                 info->access |= SNDRV_CTL_ELEM_ACCESS_OWNER;
 660                         info->owner = vd->owner_pid;
 661                 } else {
 662                         info->owner = -1;
 663                 }
 664         }
 665         up_read(&card->controls_rwsem);
 666         return result;
 667 }
 668
 669 static int snd_ctl_elem_info_user(struct snd_ctl_file *ctl,
 670                                   struct snd_ctl_elem_info __user *_info)
 671 {
 672         struct snd_ctl_elem_info info;
 673         int result;
 674
 675         if (copy_from_user(&info, _info, sizeof(info)))
 676                 return -EFAULT;
 677         snd_power_lock(ctl->card);
 678         result = snd_power_wait(ctl->card, SNDRV_CTL_POWER_D0);
 679         if (result >= 0)
 680                 result = snd_ctl_elem_info(ctl, &info);
 681         snd_power_unlock(ctl->card);
 682         if (result >= 0)
 683                 if (copy_to_user(_info, &info, sizeof(info)))
 684                         return -EFAULT;
 685         return result;
 686 }
 687
 688 int snd_ctl_elem_read(struct snd_card *card, struct snd_ctl_elem_value *control)
 689 {
 690         struct snd_kcontrol *kctl;
 691         struct snd_kcontrol_volatile *vd;
 692         unsigned int index_offset;
 693         int result;
 694
 695         down_read(&card->controls_rwsem);
 696         kctl = snd_ctl_find_id(card, &control->id);
 697         if (kctl == NULL) {
 698                 result = -ENOENT;
 699         } else {
 700                 index_offset = snd_ctl_get_ioff(kctl, &control->id);
 701                 vd = &kctl->vd[index_offset];
 702                 if ((vd->access & SNDRV_CTL_ELEM_ACCESS_READ) &&
 703                     kctl->get != NULL) {
 704                         snd_ctl_build_ioff(&control->id, kctl, index_offset);
 705                         result = kctl->get(kctl, control);
 706                 } else
 707                         result = -EPERM;
 708         }
 709         up_read(&card->controls_rwsem);
 710         return result;
 711 }
 712
 713 static int snd_ctl_elem_read_user(struct snd_card *card,
 714                                   struct snd_ctl_elem_value __user *_control)
 715 {
 716         struct snd_ctl_elem_value *control;
 717         int result;
 718
 719         control = kmalloc(sizeof(*control), GFP_KERNEL);
 720         if (control == NULL)
 721                 return -ENOMEM;
 722         if (copy_from_user(control, _control, sizeof(*control))) {
 723                 kfree(control);
 724                 return -EFAULT;
 725         }
 726         snd_power_lock(card);
 727         result = snd_power_wait(card, SNDRV_CTL_POWER_D0);
 728         if (result >= 0)
 729                 result = snd_ctl_elem_read(card, control);
 730         snd_power_unlock(card);
 731         if (result >= 0)
 732                 if (copy_to_user(_control, control, sizeof(*control)))
 733                         result = -EFAULT;
 734         kfree(control);
 735         return result;
 736 }
 737
 738 int snd_ctl_elem_write(struct snd_card *card, struct snd_ctl_file *file,
 739                        struct snd_ctl_elem_value *control)
 740 {
 741         struct snd_kcontrol *kctl;
 742         struct snd_kcontrol_volatile *vd;
 743         unsigned int index_offset;
 744         int result;
 745
 746         down_read(&card->controls_rwsem);
 747         kctl = snd_ctl_find_id(card, &control->id);
 748         if (kctl == NULL) {
 749                 result = -ENOENT;
 750         } else {
 751                 index_offset = snd_ctl_get_ioff(kctl, &control->id);
 752                 vd = &kctl->vd[index_offset];
 753                 if (!(vd->access & SNDRV_CTL_ELEM_ACCESS_WRITE) ||
 754                     kctl->put == NULL ||
 755                     (file && vd->owner && vd->owner != file)) {
 756                         result = -EPERM;
 757                 } else {
 758                         snd_ctl_build_ioff(&control->id, kctl, index_offset);
 759                         result = kctl->put(kctl, control);
 760                 }
 761                 if (result > 0) {
 762                         up_read(&card->controls_rwsem);
 763                         snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
 764                                        &control->id);
 765                         return 0;
 766                 }
 767         }
 768         up_read(&card->controls_rwsem);
 769         return result;
 770 }
 771
 772 static int snd_ctl_elem_write_user(struct snd_ctl_file *file,
 773                                    struct snd_ctl_elem_value __user *_control)
 774 {
 775         struct snd_ctl_elem_value *control;
 776         struct snd_card *card;
 777         int result;
 778
 779         control = kmalloc(sizeof(*control), GFP_KERNEL);
 780         if (control == NULL)
 781                 return -ENOMEM;
 782         if (copy_from_user(control, _control, sizeof(*control))) {
 783                 kfree(control);
 784                 return -EFAULT;
 785         }
 786         card = file->card;
 787         snd_power_lock(card);
 788         result = snd_power_wait(card, SNDRV_CTL_POWER_D0);
 789         if (result >= 0)
 790                 result = snd_ctl_elem_write(card, file, control);
 791         snd_power_unlock(card);
 792         if (result >= 0)
 793                 if (copy_to_user(_control, control, sizeof(*control)))
 794                         result = -EFAULT;
 795         kfree(control);
 796         return result;
 797 }
 798
 799 static int snd_ctl_elem_lock(struct snd_ctl_file *file,
 800                              struct snd_ctl_elem_id __user *_id)
 801 {
 802         struct snd_card *card = file->card;
 803         struct snd_ctl_elem_id id;
 804         struct snd_kcontrol *kctl;
 805         struct snd_kcontrol_volatile *vd;
 806         int result;
 807
 808         if (copy_from_user(&id, _id, sizeof(id)))
 809                 return -EFAULT;
 810         down_write(&card->controls_rwsem);
 811         kctl = snd_ctl_find_id(card, &id);
 812         if (kctl == NULL) {
 813                 result = -ENOENT;
 814         } else {
 815                 vd = &kctl->vd[snd_ctl_get_ioff(kctl, &id)];
 816                 if (vd->owner != NULL)
 817                         result = -EBUSY;
 818                 else {
 819                         vd->owner = file;
 820                         vd->owner_pid = current->pid;
 821                         result = 0;
 822                 }
 823         }
 824         up_write(&card->controls_rwsem);
 825         return result;
 826 }
 827
 828 static int snd_ctl_elem_unlock(struct snd_ctl_file *file,
 829                                struct snd_ctl_elem_id __user *_id)
 830 {
 831         struct snd_card *card = file->card;
 832         struct snd_ctl_elem_id id;
 833         struct snd_kcontrol *kctl;
 834         struct snd_kcontrol_volatile *vd;
 835         int result;
 836
 837         if (copy_from_user(&id, _id, sizeof(id)))
 838                 return -EFAULT;
 839         down_write(&card->controls_rwsem);
 840         kctl = snd_ctl_find_id(card, &id);
 841         if (kctl == NULL) {
 842                 result = -ENOENT;
 843         } else {
 844                 vd = &kctl->vd[snd_ctl_get_ioff(kctl, &id)];
 845                 if (vd->owner == NULL)
 846                         result = -EINVAL;
 847                 else if (vd->owner != file)
 848                         result = -EPERM;
 849                 else {
 850                         vd->owner = NULL;
 851                         vd->owner_pid = 0;
 852                         result = 0;
 853                 }
 854         }
 855         up_write(&card->controls_rwsem);
 856         return result;
 857 }
 858
 859 struct user_element {
 860         struct snd_ctl_elem_info info;
 861         void *elem_data;                /* element data */
 862         unsigned long elem_data_size;   /* size of element data in bytes */
 863         void *tlv_data;                 /* TLV data */
 864         unsigned long tlv_data_size;    /* TLV data size */
 865         void *priv_data;                /* private data (like strings for enumerated type) */
 866         unsigned long priv_data_size;   /* size of private data in bytes */
 867 };
 868
 869 static int snd_ctl_elem_user_info(struct snd_kcontrol *kcontrol,
 870                                   struct snd_ctl_elem_info *uinfo)
 871 {
 872         struct user_element *ue = kcontrol->private_data;
 873
 874         *uinfo = ue->info;
 875         return 0;
 876 }
 877
 878 static int snd_ctl_elem_user_get(struct snd_kcontrol *kcontrol,
 879                                  struct snd_ctl_elem_value *ucontrol)
 880 {
 881         struct user_element *ue = kcontrol->private_data;
 882
 883         memcpy(&ucontrol->value, ue->elem_data, ue->elem_data_size);
 884         return 0;
 885 }
 886
 887 static int snd_ctl_elem_user_put(struct snd_kcontrol *kcontrol,
 888                                  struct snd_ctl_elem_value *ucontrol)
 889 {
 890         int change;
 891         struct user_element *ue = kcontrol->private_data;
 892
 893         change = memcmp(&ucontrol->value, ue->elem_data, ue->elem_data_size) != 0;
 894         if (change)
 895                 memcpy(ue->elem_data, &ucontrol->value, ue->elem_data_size);
 896         return change;
 897 }
 898
 899 static int snd_ctl_elem_user_tlv(struct snd_kcontrol *kcontrol,
 900                                  int op_flag,
 901                                  unsigned int size,
 902                                  unsigned int __user *tlv)
 903 {
 904         struct user_element *ue = kcontrol->private_data;
 905         int change = 0;
 906         void *new_data;
 907
 908         if (op_flag > 0) {
 909                 if (size > 1024 * 128)  /* sane value */
 910                         return -EINVAL;
 911                 new_data = kmalloc(size, GFP_KERNEL);
 912                 if (new_data == NULL)
 913                         return -ENOMEM;
 914                 if (copy_from_user(new_data, tlv, size)) {
 915                         kfree(new_data);
 916                         return -EFAULT;
 917                 }
 918                 change = ue->tlv_data_size != size;
 919                 if (!change)
 920                         change = memcmp(ue->tlv_data, new_data, size);
 921                 kfree(ue->tlv_data);
 922                 ue->tlv_data = new_data;
 923                 ue->tlv_data_size = size;
 924         } else {
 925                 if (! ue->tlv_data_size || ! ue->tlv_data)
 926                         return -ENXIO;
 927                 if (size < ue->tlv_data_size)
 928                         return -ENOSPC;
 929                 if (copy_to_user(tlv, ue->tlv_data, ue->tlv_data_size))
 930                         return -EFAULT;
 931         }
 932         return change;
 933 }
 934
 935 static void snd_ctl_elem_user_free(struct snd_kcontrol *kcontrol)
 936 {
 937         struct user_element *ue = kcontrol->private_data;
 938         if (ue->tlv_data)
 939                 kfree(ue->tlv_data);
 940         kfree(ue);
 941 }
 942
 943 static int snd_ctl_elem_add(struct snd_ctl_file *file,
 944                             struct snd_ctl_elem_info *info, int replace)
 945 {
 946         struct snd_card *card = file->card;
 947         struct snd_kcontrol kctl, *_kctl;
 948         unsigned int access;
 949         long private_size;
 950         struct user_element *ue;
 951         int idx, err;
 952
 953         if (card->user_ctl_count >= MAX_USER_CONTROLS)
 954                 return -ENOMEM;
 955         if (info->count > 1024)
 956                 return -EINVAL;
 957         access = info->access == 0 ? SNDRV_CTL_ELEM_ACCESS_READWRITE :
 958                 (info->access & (SNDRV_CTL_ELEM_ACCESS_READWRITE|
 959                                  SNDRV_CTL_ELEM_ACCESS_INACTIVE|
 960                                  SNDRV_CTL_ELEM_ACCESS_TLV_READWRITE));
 961         info->id.numid = 0;
 962         memset(&kctl, 0, sizeof(kctl));
 963         down_write(&card->controls_rwsem);
 964         _kctl = snd_ctl_find_id(card, &info->id);
 965         err = 0;
 966         if (_kctl) {
 967                 if (replace)
 968                         err = snd_ctl_remove(card, _kctl);
 969                 else
 970                         err = -EBUSY;
 971         } else {
 972                 if (replace)
 973                         err = -ENOENT;
 974         }
 975         up_write(&card->controls_rwsem);
 976         if (err < 0)
 977                 return err;
 978         memcpy(&kctl.id, &info->id, sizeof(info->id));
 979         kctl.count = info->owner ? info->owner : 1;
 980         access |= SNDRV_CTL_ELEM_ACCESS_USER;
 981         kctl.info = snd_ctl_elem_user_info;
 982         if (access & SNDRV_CTL_ELEM_ACCESS_READ)
 983                 kctl.get = snd_ctl_elem_user_get;
 984         if (access & SNDRV_CTL_ELEM_ACCESS_WRITE)
 985                 kctl.put = snd_ctl_elem_user_put;
 986         if (access & SNDRV_CTL_ELEM_ACCESS_TLV_READWRITE) {
 987                 kctl.tlv.c = snd_ctl_elem_user_tlv;
 988                 access |= SNDRV_CTL_ELEM_ACCESS_TLV_CALLBACK;
 989         }
 990         switch (info->type) {
 991         case SNDRV_CTL_ELEM_TYPE_BOOLEAN:
 992         case SNDRV_CTL_ELEM_TYPE_INTEGER:
 993                 private_size = sizeof(long);
 994                 if (info->count > 128)
 995                         return -EINVAL;
 996                 break;
 997         case SNDRV_CTL_ELEM_TYPE_INTEGER64:
 998                 private_size = sizeof(long long);
 999                 if (info->count > 64)
1000                         return -EINVAL;
1001                 break;
1002         case SNDRV_CTL_ELEM_TYPE_BYTES:
1003                 private_size = sizeof(unsigned char);
1004                 if (info->count > 512)
1005                         return -EINVAL;
1006                 break;
1007         case SNDRV_CTL_ELEM_TYPE_IEC958:
1008                 private_size = sizeof(struct snd_aes_iec958);
1009                 if (info->count != 1)
1010                         return -EINVAL;
1011                 break;
1012         default:
1013                 return -EINVAL;
1014         }
1015         private_size *= info->count;
1016         ue = kzalloc(sizeof(struct user_element) + private_size, GFP_KERNEL);
1017         if (ue == NULL)
1018                 return -ENOMEM;
1019         ue->info = *info;
1020         ue->info.access = 0;
1021         ue->elem_data = (char *)ue + sizeof(*ue);
1022         ue->elem_data_size = private_size;
1023         kctl.private_free = snd_ctl_elem_user_free;
1024         _kctl = snd_ctl_new(&kctl, access);
1025         if (_kctl == NULL) {
1026                 kfree(ue);
1027                 return -ENOMEM;
1028         }
1029         _kctl->private_data = ue;
1030         for (idx = 0; idx < _kctl->count; idx++)
1031                 _kctl->vd[idx].owner = file;
1032         err = snd_ctl_add(card, _kctl);
1033         if (err < 0)
1034                 return err;
1035
1036         down_write(&card->controls_rwsem);
1037         card->user_ctl_count++;
1038         up_write(&card->controls_rwsem);
1039
1040         return 0;
1041 }
1042
1043 static int snd_ctl_elem_add_user(struct snd_ctl_file *file,
1044                                  struct snd_ctl_elem_info __user *_info, int replace)
1045 {
1046         struct snd_ctl_elem_info info;
1047         if (copy_from_user(&info, _info, sizeof(info)))
1048                 return -EFAULT;
1049         return snd_ctl_elem_add(file, &info, replace);
1050 }
1051
1052 static int snd_ctl_elem_remove(struct snd_ctl_file *file,
1053                                struct snd_ctl_elem_id __user *_id)
1054 {
1055         struct snd_ctl_elem_id id;
1056         int err;
1057
1058         if (copy_from_user(&id, _id, sizeof(id)))
1059                 return -EFAULT;
1060         err = snd_ctl_remove_unlocked_id(file, &id);
1061         if (! err) {
1062                 struct snd_card *card = file->card;
1063                 down_write(&card->controls_rwsem);
1064                 card->user_ctl_count--;
1065                 up_write(&card->controls_rwsem);
1066         }
1067         return err;
1068 }
1069
1070 static int snd_ctl_subscribe_events(struct snd_ctl_file *file, int __user *ptr)
1071 {
1072         int subscribe;
1073         if (get_user(subscribe, ptr))
1074                 return -EFAULT;
1075         if (subscribe < 0) {
1076                 subscribe = file->subscribed;
1077                 if (put_user(subscribe, ptr))
1078                         return -EFAULT;
1079                 return 0;
1080         }
1081         if (subscribe) {
1082                 file->subscribed = 1;
1083                 return 0;
1084         } else if (file->subscribed) {
1085                 snd_ctl_empty_read_queue(file);
1086                 file->subscribed = 0;
1087         }
1088         return 0;
1089 }
1090
1091 static int snd_ctl_tlv_ioctl(struct snd_ctl_file *file,
1092                              struct snd_ctl_tlv __user *_tlv,
1093                              int op_flag)
1094 {
1095         struct snd_card *card = file->card;
1096         struct snd_ctl_tlv tlv;
1097         struct snd_kcontrol *kctl;
1098         struct snd_kcontrol_volatile *vd;
1099         unsigned int len;
1100         int err = 0;
1101
1102         if (copy_from_user(&tlv, _tlv, sizeof(tlv)))
1103                 return -EFAULT;
1104         if (tlv.length < sizeof(unsigned int) * 3)
1105                 return -EINVAL;
1106         down_read(&card->controls_rwsem);
1107         kctl = snd_ctl_find_numid(card, tlv.numid);
1108         if (kctl == NULL) {
1109                 err = -ENOENT;
1110                 goto __kctl_end;
1111         }
1112         if (kctl->tlv.p == NULL) {
1113                 err = -ENXIO;
1114                 goto __kctl_end;
1115         }
1116         vd = &kctl->vd[tlv.numid - kctl->id.numid];
1117         if ((op_flag == 0 && (vd->access & SNDRV_CTL_ELEM_ACCESS_TLV_READ) == 0) ||
1118             (op_flag > 0 && (vd->access & SNDRV_CTL_ELEM_ACCESS_TLV_WRITE) == 0) ||
1119             (op_flag < 0 && (vd->access & SNDRV_CTL_ELEM_ACCESS_TLV_COMMAND) == 0)) {
1120                 err = -ENXIO;
1121                 goto __kctl_end;
1122         }
1123         if (vd->access & SNDRV_CTL_ELEM_ACCESS_TLV_CALLBACK) {
1124                 if (file && vd->owner != NULL && vd->owner != file) {
1125                         err = -EPERM;
1126                         goto __kctl_end;
1127                 }
1128                 err = kctl->tlv.c(kctl, op_flag, tlv.length, _tlv->tlv);
1129                 if (err > 0) {
1130                         up_read(&card->controls_rwsem);
1131                         snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_TLV, &kctl->id);
1132                         return 0;
1133                 }
1134         } else {
1135                 if (op_flag) {
1136                         err = -ENXIO;
1137                         goto __kctl_end;
1138                 }
1139                 len = kctl->tlv.p[1] + 2 * sizeof(unsigned int);
1140                 if (tlv.length < len) {
1141                         err = -ENOMEM;
1142                         goto __kctl_end;
1143                 }
1144                 if (copy_to_user(_tlv->tlv, kctl->tlv.p, len))
1145                         err = -EFAULT;
1146         }
1147       __kctl_end:
1148         up_read(&card->controls_rwsem);
1149         return err;
1150 }
1151
1152 static long snd_ctl_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
1153 {
1154         struct snd_ctl_file *ctl;
1155         struct snd_card *card;
1156         struct snd_kctl_ioctl *p;
1157         void __user *argp = (void __user *)arg;
1158         int __user *ip = argp;
1159         int err;
1160
1161         ctl = file->private_data;
1162         card = ctl->card;
1163         snd_assert(card != NULL, return -ENXIO);
1164         switch (cmd) {
1165         case SNDRV_CTL_IOCTL_PVERSION:
1166                 return put_user(SNDRV_CTL_VERSION, ip) ? -EFAULT : 0;
1167         case SNDRV_CTL_IOCTL_CARD_INFO:
1168                 return snd_ctl_card_info(card, ctl, cmd, argp);
1169         case SNDRV_CTL_IOCTL_ELEM_LIST:
1170                 return snd_ctl_elem_list(card, argp);
1171         case SNDRV_CTL_IOCTL_ELEM_INFO:
1172                 return snd_ctl_elem_info_user(ctl, argp);
1173         case SNDRV_CTL_IOCTL_ELEM_READ:
1174                 return snd_ctl_elem_read_user(card, argp);
1175         case SNDRV_CTL_IOCTL_ELEM_WRITE:
1176                 return snd_ctl_elem_write_user(ctl, argp);
1177         case SNDRV_CTL_IOCTL_ELEM_LOCK:
1178                 return snd_ctl_elem_lock(ctl, argp);
1179         case SNDRV_CTL_IOCTL_ELEM_UNLOCK:
1180                 return snd_ctl_elem_unlock(ctl, argp);
1181         case SNDRV_CTL_IOCTL_ELEM_ADD:
1182                 return snd_ctl_elem_add_user(ctl, argp, 0);
1183         case SNDRV_CTL_IOCTL_ELEM_REPLACE:
1184                 return snd_ctl_elem_add_user(ctl, argp, 1);
1185         case SNDRV_CTL_IOCTL_ELEM_REMOVE:
1186                 return snd_ctl_elem_remove(ctl, argp);
1187         case SNDRV_CTL_IOCTL_SUBSCRIBE_EVENTS:
1188                 return snd_ctl_subscribe_events(ctl, ip);
1189         case SNDRV_CTL_IOCTL_TLV_READ:
1190                 return snd_ctl_tlv_ioctl(ctl, argp, 0);
1191         case SNDRV_CTL_IOCTL_TLV_WRITE:
1192                 return snd_ctl_tlv_ioctl(ctl, argp, 1);
1193         case SNDRV_CTL_IOCTL_TLV_COMMAND:
1194                 return snd_ctl_tlv_ioctl(ctl, argp, -1);
1195         case SNDRV_CTL_IOCTL_POWER:
1196                 return -ENOPROTOOPT;
1197         case SNDRV_CTL_IOCTL_POWER_STATE:
1198 #ifdef CONFIG_PM
1199                 return put_user(card->power_state, ip) ? -EFAULT : 0;
1200 #else
1201                 return put_user(SNDRV_CTL_POWER_D0, ip) ? -EFAULT : 0;
1202 #endif
1203         }
1204         down_read(&snd_ioctl_rwsem);
1205         list_for_each_entry(p, &snd_control_ioctls, list) {
1206                 err = p->fioctl(card, ctl, cmd, arg);
1207                 if (err != -ENOIOCTLCMD) {
1208                         up_read(&snd_ioctl_rwsem);
1209                         return err;
1210                 }
1211         }
1212         up_read(&snd_ioctl_rwsem);
1213         snd_printdd("unknown ioctl = 0x%x\n", cmd);
1214         return -ENOTTY;
1215 }
1216
1217 static ssize_t snd_ctl_read(struct file *file, char __user *buffer,
1218                             size_t count, loff_t * offset)
1219 {
1220         struct snd_ctl_file *ctl;
1221         int err = 0;
1222         ssize_t result = 0;
1223
1224         ctl = file->private_data;
1225         snd_assert(ctl != NULL && ctl->card != NULL, return -ENXIO);
1226         if (!ctl->subscribed)
1227                 return -EBADFD;
1228         if (count < sizeof(struct snd_ctl_event))
1229                 return -EINVAL;
1230         spin_lock_irq(&ctl->read_lock);
1231         while (count >= sizeof(struct snd_ctl_event)) {
1232                 struct snd_ctl_event ev;
1233                 struct snd_kctl_event *kev;
1234                 while (list_empty(&ctl->events)) {
1235                         wait_queue_t wait;
1236                         if ((file->f_flags & O_NONBLOCK) != 0 || result > 0) {
1237                                 err = -EAGAIN;
1238                                 goto __end_lock;
1239                         }
1240                         init_waitqueue_entry(&wait, current);
1241                         add_wait_queue(&ctl->change_sleep, &wait);
1242                         set_current_state(TASK_INTERRUPTIBLE);
1243                         spin_unlock_irq(&ctl->read_lock);
1244                         schedule();
1245                         remove_wait_queue(&ctl->change_sleep, &wait);
1246                         if (signal_pending(current))
1247                                 return -ERESTARTSYS;
1248                         spin_lock_irq(&ctl->read_lock);
1249                 }
1250                 kev = snd_kctl_event(ctl->events.next);
1251                 ev.type = SNDRV_CTL_EVENT_ELEM;
1252                 ev.data.elem.mask = kev->mask;
1253                 ev.data.elem.id = kev->id;
1254                 list_del(&kev->list);
1255                 spin_unlock_irq(&ctl->read_lock);
1256                 kfree(kev);
1257                 if (copy_to_user(buffer, &ev, sizeof(struct snd_ctl_event))) {
1258                         err = -EFAULT;
1259                         goto __end;
1260                 }
1261                 spin_lock_irq(&ctl->read_lock);
1262                 buffer += sizeof(struct snd_ctl_event);
1263                 count -= sizeof(struct snd_ctl_event);
1264                 result += sizeof(struct snd_ctl_event);
1265         }
1266       __end_lock:
1267         spin_unlock_irq(&ctl->read_lock);
1268       __end:
1269         return result > 0 ? result : err;
1270 }
1271
1272 static unsigned int snd_ctl_poll(struct file *file, poll_table * wait)
1273 {
1274         unsigned int mask;
1275         struct snd_ctl_file *ctl;
1276
1277         ctl = file->private_data;
1278         if (!ctl->subscribed)
1279                 return 0;
1280         poll_wait(file, &ctl->change_sleep, wait);
1281
1282         mask = 0;
1283         if (!list_empty(&ctl->events))
1284                 mask |= POLLIN | POLLRDNORM;
1285
1286         return mask;
1287 }
1288
1289 /*
1290  * register the device-specific control-ioctls.
1291  * called from each device manager like pcm.c, hwdep.c, etc.
1292  */
1293 static int _snd_ctl_register_ioctl(snd_kctl_ioctl_func_t fcn, struct list_head *lists)
1294 {
1295         struct snd_kctl_ioctl *pn;
1296
1297         pn = kzalloc(sizeof(struct snd_kctl_ioctl), GFP_KERNEL);
1298         if (pn == NULL)
1299                 return -ENOMEM;
1300         pn->fioctl = fcn;
1301         down_write(&snd_ioctl_rwsem);
1302         list_add_tail(&pn->list, lists);
1303         up_write(&snd_ioctl_rwsem);
1304         return 0;
1305 }
1306
1307 int snd_ctl_register_ioctl(snd_kctl_ioctl_func_t fcn)
1308 {
1309         return _snd_ctl_register_ioctl(fcn, &snd_control_ioctls);
1310 }
1311
1312 EXPORT_SYMBOL(snd_ctl_register_ioctl);
1313
1314 #ifdef CONFIG_COMPAT
1315 int snd_ctl_register_ioctl_compat(snd_kctl_ioctl_func_t fcn)
1316 {
1317         return _snd_ctl_register_ioctl(fcn, &snd_control_compat_ioctls);
1318 }
1319
1320 EXPORT_SYMBOL(snd_ctl_register_ioctl_compat);
1321 #endif
1322
1323 /*
1324  * de-register the device-specific control-ioctls.
1325  */
1326 static int _snd_ctl_unregister_ioctl(snd_kctl_ioctl_func_t fcn,
1327                                      struct list_head *lists)
1328 {
1329         struct snd_kctl_ioctl *p;
1330
1331         snd_assert(fcn != NULL, return -EINVAL);
1332         down_write(&snd_ioctl_rwsem);
1333         list_for_each_entry(p, lists, list) {
1334                 if (p->fioctl == fcn) {
1335                         list_del(&p->list);
1336                         up_write(&snd_ioctl_rwsem);
1337                         kfree(p);
1338                         return 0;
1339                 }
1340         }
1341         up_write(&snd_ioctl_rwsem);
1342         snd_BUG();
1343         return -EINVAL;
1344 }
1345
1346 int snd_ctl_unregister_ioctl(snd_kctl_ioctl_func_t fcn)
1347 {
1348         return _snd_ctl_unregister_ioctl(fcn, &snd_control_ioctls);
1349 }
1350
1351 EXPORT_SYMBOL(snd_ctl_unregister_ioctl);
1352
1353 #ifdef CONFIG_COMPAT
1354 int snd_ctl_unregister_ioctl_compat(snd_kctl_ioctl_func_t fcn)
1355 {
1356         return _snd_ctl_unregister_ioctl(fcn, &snd_control_compat_ioctls);
1357 }
1358
1359 EXPORT_SYMBOL(snd_ctl_unregister_ioctl_compat);
1360 #endif
1361
1362 static int snd_ctl_fasync(int fd, struct file * file, int on)
1363 {
1364         struct snd_ctl_file *ctl;
1365         int err;
1366         ctl = file->private_data;
1367         err = fasync_helper(fd, file, on, &ctl->fasync);
1368         if (err < 0)
1369                 return err;
1370         return 0;
1371 }
1372
1373 /*
1374  * ioctl32 compat
1375  */
1376 #ifdef CONFIG_COMPAT
1377 #include "control_compat.c"
1378 #else
1379 #define snd_ctl_ioctl_compat    NULL
1380 #endif
1381
1382 /*
1383  *  INIT PART
1384  */
1385
1386 static const struct file_operations snd_ctl_f_ops =
1387 {
1388         .owner =        THIS_MODULE,
1389         .read =         snd_ctl_read,
1390         .open =         snd_ctl_open,
1391         .release =      snd_ctl_release,
1392         .poll =         snd_ctl_poll,
1393         .unlocked_ioctl =       snd_ctl_ioctl,
1394         .compat_ioctl = snd_ctl_ioctl_compat,
1395         .fasync =       snd_ctl_fasync,
1396 };
1397
1398 /*
1399  * registration of the control device
1400  */
1401 static int snd_ctl_dev_register(struct snd_device *device)
1402 {
1403         struct snd_card *card = device->device_data;
1404         int err, cardnum;
1405         char name[16];
1406
1407         snd_assert(card != NULL, return -ENXIO);
1408         cardnum = card->number;
1409         snd_assert(cardnum >= 0 && cardnum < SNDRV_CARDS, return -ENXIO);
1410         sprintf(name, "controlC%i", cardnum);
1411         if ((err = snd_register_device(SNDRV_DEVICE_TYPE_CONTROL, card, -1,
1412                                        &snd_ctl_f_ops, card, name)) < 0)
1413                 return err;
1414         return 0;
1415 }
1416
1417 /*
1418  * disconnection of the control device
1419  */
1420 static int snd_ctl_dev_disconnect(struct snd_device *device)
1421 {
1422         struct snd_card *card = device->device_data;
1423         struct snd_ctl_file *ctl;
1424         int err, cardnum;
1425
1426         snd_assert(card != NULL, return -ENXIO);
1427         cardnum = card->number;
1428         snd_assert(cardnum >= 0 && cardnum < SNDRV_CARDS, return -ENXIO);
1429
1430         down_read(&card->controls_rwsem);
1431         list_for_each_entry(ctl, &card->ctl_files, list) {
1432                 wake_up(&ctl->change_sleep);
1433                 kill_fasync(&ctl->fasync, SIGIO, POLL_ERR);
1434         }
1435         up_read(&card->controls_rwsem);
1436
1437         if ((err = snd_unregister_device(SNDRV_DEVICE_TYPE_CONTROL,
1438                                          card, -1)) < 0)
1439                 return err;
1440         return 0;
1441 }
1442
1443 /*
1444  * free all controls
1445  */
1446 static int snd_ctl_dev_free(struct snd_device *device)
1447 {
1448         struct snd_card *card = device->device_data;
1449         struct snd_kcontrol *control;
1450
1451         down_write(&card->controls_rwsem);
1452         while (!list_empty(&card->controls)) {
1453                 control = snd_kcontrol(card->controls.next);
1454                 snd_ctl_remove(card, control);
1455         }
1456         up_write(&card->controls_rwsem);
1457         return 0;
1458 }
1459
1460 /*
1461  * create control core:
1462  * called from init.c
1463  */
1464 int snd_ctl_create(struct snd_card *card)
1465 {
1466         static struct snd_device_ops ops = {
1467                 .dev_free = snd_ctl_dev_free,
1468                 .dev_register = snd_ctl_dev_register,
1469                 .dev_disconnect = snd_ctl_dev_disconnect,
1470         };
1471
1472         snd_assert(card != NULL, return -ENXIO);
1473         return snd_device_new(card, SNDRV_DEV_CONTROL, card, &ops);
1474 }
1475
1476 /*
1477  * Frequently used control callbacks
1478  */
1479 int snd_ctl_boolean_mono_info(struct snd_kcontrol *kcontrol,
1480                               struct snd_ctl_elem_info *uinfo)
1481 {
1482         uinfo->type = SNDRV_CTL_ELEM_TYPE_BOOLEAN;
1483         uinfo->count = 1;
1484         uinfo->value.integer.min = 0;
1485         uinfo->value.integer.max = 1;
1486         return 0;
1487 }
1488
1489 EXPORT_SYMBOL(snd_ctl_boolean_mono_info);
1490
1491 int snd_ctl_boolean_stereo_info(struct snd_kcontrol *kcontrol,
1492                                 struct snd_ctl_elem_info *uinfo)
1493 {
1494         uinfo->type = SNDRV_CTL_ELEM_TYPE_BOOLEAN;
1495         uinfo->count = 2;
1496         uinfo->value.integer.min = 0;
1497         uinfo->value.integer.max = 1;
1498         return 0;
1499 }
1500
1501 EXPORT_SYMBOL(snd_ctl_boolean_stereo_info);