sound/core/timer.c

   1 /*
   2  *  Timers abstract layer
   3  *  Copyright (c) by Jaroslav Kysela <perex@suse.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/delay.h>
  24 #include <linux/init.h>
  25 #include <linux/slab.h>
  26 #include <linux/time.h>
  27 #include <linux/moduleparam.h>
  28 #include <sound/core.h>
  29 #include <sound/timer.h>
  30 #include <sound/control.h>
  31 #include <sound/info.h>
  32 #include <sound/minors.h>
  33 #include <sound/initval.h>
  34 #include <linux/kmod.h>
  35 #ifdef CONFIG_KERNELD
  36 #include <linux/kerneld.h>
  37 #endif
  38
  39 #if !defined(CONFIG_SND_RTCTIMER) && !defined(CONFIG_SND_RTCTIMER_MODULE)
  40 #define DEFAULT_TIMER_LIMIT 1
  41 #else
  42 #define DEFAULT_TIMER_LIMIT 2
  43 #endif
  44
  45 static int timer_limit = DEFAULT_TIMER_LIMIT;
  46 MODULE_AUTHOR("Jaroslav Kysela <perex@suse.cz>, Takashi Iwai <tiwai@suse.de>");
  47 MODULE_DESCRIPTION("ALSA timer interface");
  48 MODULE_LICENSE("GPL");
  49 MODULE_CLASSES("{sound}");
  50 module_param(timer_limit, int, 0444);
  51 MODULE_PARM_DESC(timer_limit, "Maximum global timers in system.");
  52
  53 typedef struct {
  54         snd_timer_instance_t *timeri;
  55         int tread;                      /* enhanced read with timestamps and events */
  56         unsigned long ticks;
  57         unsigned long overrun;
  58         int qhead;
  59         int qtail;
  60         int qused;
  61         int queue_size;
  62         snd_timer_read_t *queue;
  63         snd_timer_tread_t *tqueue;
  64         spinlock_t qlock;
  65         unsigned long last_resolution;
  66         unsigned int filter;
  67         struct timespec tstamp;         /* trigger tstamp */
  68         wait_queue_head_t qchange_sleep;
  69         struct fasync_struct *fasync;
  70 } snd_timer_user_t;
  71
  72 /* list of timers */
  73 static LIST_HEAD(snd_timer_list);
  74
  75 /* list of slave instances */
  76 static LIST_HEAD(snd_timer_slave_list);
  77
  78 /* lock for slave active lists */
  79 static spinlock_t slave_active_lock = SPIN_LOCK_UNLOCKED;
  80
  81 static DECLARE_MUTEX(register_mutex);
  82
  83 static int snd_timer_free(snd_timer_t *timer);
  84 static int snd_timer_dev_free(snd_device_t *device);
  85 static int snd_timer_dev_register(snd_device_t *device);
  86 static int snd_timer_dev_unregister(snd_device_t *device);
  87
  88 static void snd_timer_reschedule(snd_timer_t * timer, unsigned long ticks_left);
  89
  90 /*
  91  * create a timer instance with the given owner string.
  92  * when timer is not NULL, increments the module counter
  93  */
  94 static snd_timer_instance_t *snd_timer_instance_new(char *owner, snd_timer_t *timer)
  95 {
  96         snd_timer_instance_t *timeri;
  97         timeri = snd_kcalloc(sizeof(snd_timer_instance_t), GFP_KERNEL);
  98         if (timeri == NULL)
  99                 return NULL;
 100         timeri->owner = snd_kmalloc_strdup(owner, GFP_KERNEL);
 101         if (! timeri->owner) {
 102                 kfree(timeri);
 103                 return NULL;
 104         }
 105         INIT_LIST_HEAD(&timeri->open_list);
 106         INIT_LIST_HEAD(&timeri->active_list);
 107         INIT_LIST_HEAD(&timeri->ack_list);
 108         INIT_LIST_HEAD(&timeri->slave_list_head);
 109         INIT_LIST_HEAD(&timeri->slave_active_head);
 110
 111         timeri->timer = timer;
 112         if (timer && timer->card && !try_module_get(timer->card->module)) {
 113                 kfree(timeri->owner);
 114                 kfree(timeri);
 115                 return NULL;
 116         }
 117
 118         return timeri;
 119 }
 120
 121 /*
 122  * find a timer instance from the given timer id
 123  */
 124 static snd_timer_t *snd_timer_find(snd_timer_id_t *tid)
 125 {
 126         snd_timer_t *timer = NULL;
 127         struct list_head *p;
 128
 129         list_for_each(p, &snd_timer_list) {
 130                 timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
 131
 132                 if (timer->tmr_class != tid->dev_class)
 133                         continue;
 134                 if ((timer->tmr_class == SNDRV_TIMER_CLASS_CARD ||
 135                      timer->tmr_class == SNDRV_TIMER_CLASS_PCM) &&
 136                     (timer->card == NULL ||
 137                      timer->card->number != tid->card))
 138                         continue;
 139                 if (timer->tmr_device != tid->device)
 140                         continue;
 141                 if (timer->tmr_subdevice != tid->subdevice)
 142                         continue;
 143                 return timer;
 144         }
 145         return NULL;
 146 }
 147
 148 #ifdef CONFIG_KMOD
 149
 150 static void snd_timer_request(snd_timer_id_t *tid)
 151 {
 152         if (! current->fs->root)
 153                 return;
 154         switch (tid->dev_class) {
 155         case SNDRV_TIMER_CLASS_GLOBAL:
 156                 if (tid->device < timer_limit)
 157                         request_module("snd-timer-%i", tid->device);
 158                 break;
 159         case SNDRV_TIMER_CLASS_CARD:
 160         case SNDRV_TIMER_CLASS_PCM:
 161                 if (tid->card < snd_ecards_limit)
 162                         request_module("snd-card-%i", tid->card);
 163                 break;
 164         default:
 165                 break;
 166         }
 167 }
 168
 169 #endif
 170
 171 /*
 172  * look for a master instance matching with the slave id of the given slave.
 173  * when found, relink the open_link of the slave.
 174  *
 175  * call this with register_mutex down.
 176  */
 177 static void snd_timer_check_slave(snd_timer_instance_t *slave)
 178 {
 179         snd_timer_t *timer;
 180         snd_timer_instance_t *master;
 181         struct list_head *p, *q;
 182
 183         /* FIXME: it's really dumb to look up all entries.. */
 184         list_for_each(p, &snd_timer_list) {
 185                 timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
 186                 list_for_each(q, &timer->open_list_head) {
 187                         master = (snd_timer_instance_t *)list_entry(q, snd_timer_instance_t, open_list);
 188                         if (slave->slave_class == master->slave_class &&
 189                             slave->slave_id == master->slave_id) {
 190                                 list_del(&slave->open_list);
 191                                 list_add_tail(&slave->open_list, &master->slave_list_head);
 192                                 spin_lock_irq(&slave_active_lock);
 193                                 slave->master = master;
 194                                 slave->timer = master->timer;
 195                                 spin_unlock_irq(&slave_active_lock);
 196                                 return;
 197                         }
 198                 }
 199         }
 200 }
 201
 202 /*
 203  * look for slave instances matching with the slave id of the given master.
 204  * when found, relink the open_link of slaves.
 205  *
 206  * call this with register_mutex down.
 207  */
 208 static void snd_timer_check_master(snd_timer_instance_t *master)
 209 {
 210         snd_timer_instance_t *slave;
 211         struct list_head *p, *n;
 212
 213         /* check all pending slaves */
 214         list_for_each_safe(p, n, &snd_timer_slave_list) {
 215                 slave = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, open_list);
 216                 if (slave->slave_class == master->slave_class &&
 217                     slave->slave_id == master->slave_id) {
 218                         list_del(p);
 219                         list_add_tail(p, &master->slave_list_head);
 220                         spin_lock_irq(&slave_active_lock);
 221                         slave->master = master;
 222                         slave->timer = master->timer;
 223                         if (slave->flags & SNDRV_TIMER_IFLG_RUNNING)
 224                                 list_add_tail(&slave->active_list, &master->slave_active_head);
 225                         spin_unlock_irq(&slave_active_lock);
 226                 }
 227         }
 228 }
 229
 230 /*
 231  * open a timer instance
 232  * when opening a master, the slave id must be here given.
 233  */
 234 int snd_timer_open(snd_timer_instance_t **ti,
 235                    char *owner, snd_timer_id_t *tid,
 236                    unsigned int slave_id)
 237 {
 238         snd_timer_t *timer;
 239         snd_timer_instance_t *timeri = NULL;
 240
 241         if (tid->dev_class == SNDRV_TIMER_CLASS_SLAVE) {
 242                 /* open a slave instance */
 243                 if (tid->dev_sclass <= SNDRV_TIMER_SCLASS_NONE ||
 244                     tid->dev_sclass > SNDRV_TIMER_SCLASS_OSS_SEQUENCER) {
 245                         snd_printd("invalid slave class %i\n", tid->dev_sclass);
 246                         return -EINVAL;
 247                 }
 248                 down(&register_mutex);
 249                 timeri = snd_timer_instance_new(owner, NULL);
 250                 timeri->slave_class = tid->dev_sclass;
 251                 timeri->slave_id = tid->device;
 252                 timeri->flags |= SNDRV_TIMER_IFLG_SLAVE;
 253                 list_add_tail(&timeri->open_list, &snd_timer_slave_list);
 254                 snd_timer_check_slave(timeri);
 255                 up(&register_mutex);
 256                 *ti = timeri;
 257                 return 0;
 258         }
 259
 260         /* open a master instance */
 261         down(&register_mutex);
 262         timer = snd_timer_find(tid);
 263 #ifdef CONFIG_KMOD
 264         if (timer == NULL) {
 265                 up(&register_mutex);
 266                 snd_timer_request(tid);
 267                 down(&register_mutex);
 268                 timer = snd_timer_find(tid);
 269         }
 270 #endif
 271         if (timer) {
 272                 if (!list_empty(&timer->open_list_head)) {
 273                         timeri = (snd_timer_instance_t *)list_entry(timer->open_list_head.next, snd_timer_instance_t, open_list);
 274                         if (timeri->flags & SNDRV_TIMER_IFLG_EXCLUSIVE) {
 275                                 up(&register_mutex);
 276                                 return -EBUSY;
 277                         }
 278                 }
 279                 timeri = snd_timer_instance_new(owner, timer);
 280                 if (timeri) {
 281                         timeri->slave_class = tid->dev_sclass;
 282                         timeri->slave_id = slave_id;
 283                         if (list_empty(&timer->open_list_head) && timer->hw.open)
 284                                 timer->hw.open(timer);
 285                         list_add_tail(&timeri->open_list, &timer->open_list_head);
 286                         snd_timer_check_master(timeri);
 287                 }
 288         } else {
 289                 up(&register_mutex);
 290                 return -ENODEV;
 291         }
 292         up(&register_mutex);
 293         *ti = timeri;
 294         return 0;
 295 }
 296
 297 static int _snd_timer_stop(snd_timer_instance_t * timeri, int keep_flag, enum sndrv_timer_event event);
 298
 299 /*
 300  * close a timer instance
 301  */
 302 int snd_timer_close(snd_timer_instance_t * timeri)
 303 {
 304         snd_timer_t *timer = NULL;
 305         struct list_head *p, *n;
 306         snd_timer_instance_t *slave;
 307
 308         snd_assert(timeri != NULL, return -ENXIO);
 309
 310         /* force to stop the timer */
 311         snd_timer_stop(timeri);
 312
 313         if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE) {
 314                 /* wait, until the active callback is finished */
 315                 spin_lock_irq(&slave_active_lock);
 316                 while (timeri->flags & SNDRV_TIMER_IFLG_CALLBACK) {
 317                         spin_unlock_irq(&slave_active_lock);
 318                         udelay(10);
 319                         spin_lock_irq(&slave_active_lock);
 320                 }
 321                 spin_unlock_irq(&slave_active_lock);
 322                 down(&register_mutex);
 323                 list_del(&timeri->open_list);
 324                 up(&register_mutex);
 325         } else {
 326                 timer = timeri->timer;
 327                 /* wait, until the active callback is finished */
 328                 spin_lock_irq(&timer->lock);
 329                 while (timeri->flags & SNDRV_TIMER_IFLG_CALLBACK) {
 330                         spin_unlock_irq(&timer->lock);
 331                         udelay(10);
 332                         spin_lock_irq(&timer->lock);
 333                 }
 334                 spin_unlock_irq(&timer->lock);
 335                 down(&register_mutex);
 336                 list_del(&timeri->open_list);
 337                 if (timer && list_empty(&timer->open_list_head) && timer->hw.close)
 338                         timer->hw.close(timer);
 339                 /* remove slave links */
 340                 list_for_each_safe(p, n, &timeri->slave_list_head) {
 341                         slave = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, open_list);
 342                         spin_lock_irq(&slave_active_lock);
 343                         _snd_timer_stop(slave, 1, SNDRV_TIMER_EVENT_RESOLUTION);
 344                         list_del(p);
 345                         list_add_tail(p, &snd_timer_slave_list);
 346                         slave->master = NULL;
 347                         slave->timer = NULL;
 348                         spin_unlock_irq(&slave_active_lock);
 349                 }
 350                 up(&register_mutex);
 351         }
 352         if (timeri->private_free)
 353                 timeri->private_free(timeri);
 354         if (timeri->owner)
 355                 kfree(timeri->owner);
 356         kfree(timeri);
 357         if (timer && timer->card)
 358                 module_put(timer->card->module);
 359         return 0;
 360 }
 361
 362 unsigned long snd_timer_resolution(snd_timer_instance_t * timeri)
 363 {
 364         snd_timer_t * timer;
 365
 366         if (timeri == NULL)
 367                 return 0;
 368         if ((timer = timeri->timer) != NULL) {
 369                 if (timer->hw.c_resolution)
 370                         return timer->hw.c_resolution(timer);
 371                 return timer->hw.resolution;
 372         }
 373         return 0;
 374 }
 375
 376 static void snd_timer_notify1(snd_timer_instance_t *ti, enum sndrv_timer_event event)
 377 {
 378         snd_timer_t *timer;
 379         unsigned long flags;
 380         unsigned long resolution = 0;
 381         snd_timer_instance_t *ts;
 382         struct list_head *n;
 383         struct timespec tstamp;
 384
 385         snd_timestamp_now(&tstamp, 1);
 386         snd_assert(event >= SNDRV_TIMER_EVENT_START && event <= SNDRV_TIMER_EVENT_PAUSE, return);
 387         if (event == SNDRV_TIMER_EVENT_START || event == SNDRV_TIMER_EVENT_CONTINUE)
 388                 resolution = snd_timer_resolution(ti);
 389         if (ti->ccallback)
 390                 ti->ccallback(ti, SNDRV_TIMER_EVENT_START, &tstamp, resolution);
 391         if (ti->flags & SNDRV_TIMER_IFLG_SLAVE)
 392                 return;
 393         timer = ti->timer;
 394         if (timer == NULL)
 395                 return;
 396         if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
 397                 return;
 398         spin_lock_irqsave(&timer->lock, flags);
 399         list_for_each(n, &ti->slave_active_head) {
 400                 ts = (snd_timer_instance_t *)list_entry(n, snd_timer_instance_t, active_list);
 401                 if (ts->ccallback)
 402                         ts->ccallback(ti, event + 100, &tstamp, resolution);
 403         }
 404         spin_unlock_irqrestore(&timer->lock, flags);
 405 }
 406
 407 static int snd_timer_start1(snd_timer_t *timer, snd_timer_instance_t *timeri, unsigned long sticks)
 408 {
 409         list_del(&timeri->active_list);
 410         list_add_tail(&timeri->active_list, &timer->active_list_head);
 411         if (timer->running) {
 412                 if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
 413                         goto __start_now;
 414                 timer->flags |= SNDRV_TIMER_FLG_RESCHED;
 415                 timeri->flags |= SNDRV_TIMER_IFLG_START;
 416                 return 1;       /* delayed start */
 417         } else {
 418                 timer->sticks = sticks;
 419                 timer->hw.start(timer);
 420               __start_now:
 421                 timer->running++;
 422                 timeri->flags |= SNDRV_TIMER_IFLG_RUNNING;
 423                 return 0;
 424         }
 425 }
 426
 427 static int snd_timer_start_slave(snd_timer_instance_t *timeri)
 428 {
 429         unsigned long flags;
 430
 431         spin_lock_irqsave(&slave_active_lock, flags);
 432         timeri->flags |= SNDRV_TIMER_IFLG_RUNNING;
 433         if (timeri->master)
 434                 list_add_tail(&timeri->active_list, &timeri->master->slave_active_head);
 435         spin_unlock_irqrestore(&slave_active_lock, flags);
 436         return 1; /* delayed start */
 437 }
 438
 439 /*
 440  *  start the timer instance
 441  */
 442 int snd_timer_start(snd_timer_instance_t * timeri, unsigned int ticks)
 443 {
 444         snd_timer_t *timer;
 445         int result = -EINVAL;
 446         unsigned long flags;
 447
 448         if (timeri == NULL || ticks < 1)
 449                 return -EINVAL;
 450         if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE) {
 451                 result = snd_timer_start_slave(timeri);
 452                 snd_timer_notify1(timeri, SNDRV_TIMER_EVENT_START);
 453                 return result;
 454         }
 455         timer = timeri->timer;
 456         if (timer == NULL)
 457                 return -EINVAL;
 458         spin_lock_irqsave(&timer->lock, flags);
 459         timeri->ticks = timeri->cticks = ticks;
 460         timeri->pticks = 0;
 461         result = snd_timer_start1(timer, timeri, ticks);
 462         spin_unlock_irqrestore(&timer->lock, flags);
 463         snd_timer_notify1(timeri, SNDRV_TIMER_EVENT_START);
 464         return result;
 465 }
 466
 467 static int _snd_timer_stop(snd_timer_instance_t * timeri, int keep_flag, enum sndrv_timer_event event)
 468 {
 469         snd_timer_t *timer;
 470         unsigned long flags;
 471
 472         snd_assert(timeri != NULL, return -ENXIO);
 473
 474         if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE) {
 475                 if (!keep_flag) {
 476                         spin_lock_irqsave(&slave_active_lock, flags);
 477                         timeri->flags &= ~SNDRV_TIMER_IFLG_RUNNING;
 478                         spin_unlock_irqrestore(&slave_active_lock, flags);
 479                 }
 480                 goto __end;
 481         }
 482         timer = timeri->timer;
 483         if (!timer)
 484                 return -EINVAL;
 485         spin_lock_irqsave(&timer->lock, flags);
 486         list_del_init(&timeri->ack_list);
 487         list_del_init(&timeri->active_list);
 488         if ((timeri->flags & SNDRV_TIMER_IFLG_RUNNING) &&
 489             !(--timer->running)) {
 490                 timer->hw.stop(timer);
 491                 if (timer->flags & SNDRV_TIMER_FLG_RESCHED) {
 492                         timer->flags &= ~SNDRV_TIMER_FLG_RESCHED;
 493                         snd_timer_reschedule(timer, 0);
 494                         if (timer->flags & SNDRV_TIMER_FLG_CHANGE) {
 495                                 timer->flags &= ~SNDRV_TIMER_FLG_CHANGE;
 496                                 timer->hw.start(timer);
 497                         }
 498                 }
 499         }
 500         if (!keep_flag)
 501                 timeri->flags &= ~(SNDRV_TIMER_IFLG_RUNNING|SNDRV_TIMER_IFLG_START);
 502         spin_unlock_irqrestore(&timer->lock, flags);
 503       __end:
 504         if (event != SNDRV_TIMER_EVENT_RESOLUTION)
 505                 snd_timer_notify1(timeri, event);
 506         return 0;
 507 }
 508
 509 /*
 510  * stop the timer instance.
 511  *
 512  * do not call this from the timer callback!
 513  */
 514 int snd_timer_stop(snd_timer_instance_t * timeri)
 515 {
 516         snd_timer_t *timer;
 517         unsigned long flags;
 518         int err;
 519
 520         err = _snd_timer_stop(timeri, 0, SNDRV_TIMER_EVENT_STOP);
 521         if (err < 0)
 522                 return err;
 523         timer = timeri->timer;
 524         spin_lock_irqsave(&timer->lock, flags);
 525         timeri->cticks = timeri->ticks;
 526         timeri->pticks = 0;
 527         spin_unlock_irqrestore(&timer->lock, flags);
 528         return 0;
 529 }
 530
 531 /*
 532  * start again..  the tick is kept.
 533  */
 534 int snd_timer_continue(snd_timer_instance_t * timeri)
 535 {
 536         snd_timer_t *timer;
 537         int result = -EINVAL;
 538         unsigned long flags;
 539
 540         if (timeri == NULL)
 541                 return result;
 542         if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
 543                 return snd_timer_start_slave(timeri);
 544         timer = timeri->timer;
 545         if (! timer)
 546                 return -EINVAL;
 547         spin_lock_irqsave(&timer->lock, flags);
 548         if (!timeri->cticks)
 549                 timeri->cticks = 1;
 550         timeri->pticks = 0;
 551         result = snd_timer_start1(timer, timeri, timer->sticks);
 552         spin_unlock_irqrestore(&timer->lock, flags);
 553         snd_timer_notify1(timeri, SNDRV_TIMER_EVENT_CONTINUE);
 554         return result;
 555 }
 556
 557 /*
 558  * pause.. remember the ticks left
 559  */
 560 int snd_timer_pause(snd_timer_instance_t * timeri)
 561 {
 562         return _snd_timer_stop(timeri, 0, SNDRV_TIMER_EVENT_PAUSE);
 563 }
 564
 565 /*
 566  * reschedule the timer
 567  *
 568  * start pending instances and check the scheduling ticks.
 569  * when the scheduling ticks is changed set CHANGE flag to reprogram the timer.
 570  */
 571 static void snd_timer_reschedule(snd_timer_t * timer, unsigned long ticks_left)
 572 {
 573         snd_timer_instance_t *ti;
 574         unsigned long ticks = ~0UL;
 575         struct list_head *p;
 576
 577         list_for_each(p, &timer->active_list_head) {
 578                 ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, active_list);
 579                 if (ti->flags & SNDRV_TIMER_IFLG_START) {
 580                         ti->flags &= ~SNDRV_TIMER_IFLG_START;
 581                         ti->flags |= SNDRV_TIMER_IFLG_RUNNING;
 582                         timer->running++;
 583                 }
 584                 if (ti->flags & SNDRV_TIMER_IFLG_RUNNING) {
 585                         if (ticks > ti->cticks)
 586                                 ticks = ti->cticks;
 587                 }
 588         }
 589         if (ticks == ~0UL) {
 590                 timer->flags &= ~SNDRV_TIMER_FLG_RESCHED;
 591                 return;
 592         }
 593         if (ticks > timer->hw.ticks)
 594                 ticks = timer->hw.ticks;
 595         if (ticks_left != ticks)
 596                 timer->flags |= SNDRV_TIMER_FLG_CHANGE;
 597         timer->sticks = ticks;
 598 }
 599
 600 /*
 601  * timer tasklet
 602  *
 603  */
 604 static void snd_timer_tasklet(unsigned long arg)
 605 {
 606         snd_timer_t *timer = (snd_timer_t *) arg;
 607         snd_timer_instance_t *ti;
 608         struct list_head *p;
 609         unsigned long resolution, ticks;
 610
 611         spin_lock(&timer->lock);
 612         /* now process all callbacks */
 613         while (!list_empty(&timer->sack_list_head)) {
 614                 p = timer->sack_list_head.next;         /* get first item */
 615                 ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, ack_list);
 616
 617                 /* remove from ack_list and make empty */
 618                 list_del_init(p);
 619
 620                 ticks = ti->pticks;
 621                 ti->pticks = 0;
 622                 resolution = ti->resolution;
 623
 624                 ti->flags |= SNDRV_TIMER_IFLG_CALLBACK;
 625                 spin_unlock(&timer->lock);
 626                 if (ti->callback)
 627                         ti->callback(ti, resolution, ticks);
 628                 spin_lock(&timer->lock);
 629                 ti->flags &= ~SNDRV_TIMER_IFLG_CALLBACK;
 630         }
 631         spin_unlock(&timer->lock);
 632 }
 633
 634 /*
 635  * timer interrupt
 636  *
 637  * ticks_left is usually equal to timer->sticks.
 638  *
 639  */
 640 void snd_timer_interrupt(snd_timer_t * timer, unsigned long ticks_left)
 641 {
 642         snd_timer_instance_t *ti, *ts;
 643         unsigned long resolution, ticks;
 644         struct list_head *p, *q, *n;
 645         int use_tasklet = 0;
 646
 647         if (timer == NULL)
 648                 return;
 649
 650         spin_lock(&timer->lock);
 651
 652         /* remember the current resolution */
 653         if (timer->hw.c_resolution)
 654                 resolution = timer->hw.c_resolution(timer);
 655         else
 656                 resolution = timer->hw.resolution;
 657
 658         /* loop for all active instances
 659          * here we cannot use list_for_each because the active_list of a processed
 660          * instance is relinked to done_list_head before callback is called.
 661          */
 662         list_for_each_safe(p, n, &timer->active_list_head) {
 663                 ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, active_list);
 664                 if (!(ti->flags & SNDRV_TIMER_IFLG_RUNNING))
 665                         continue;
 666                 ti->pticks += ticks_left;
 667                 ti->resolution = resolution;
 668                 if (ti->cticks < ticks_left)
 669                         ti->cticks = 0;
 670                 else
 671                         ti->cticks -= ticks_left;
 672                 if (ti->cticks) /* not expired */
 673                         continue;
 674                 if (ti->flags & SNDRV_TIMER_IFLG_AUTO) {
 675                         ti->cticks = ti->ticks;
 676                 } else {
 677                         ti->flags &= ~SNDRV_TIMER_IFLG_RUNNING;
 678                         if (--timer->running)
 679                                 list_del(p);
 680                 }
 681                 if (list_empty(&ti->ack_list)) {
 682                         if ((timer->hw.flags & SNDRV_TIMER_HW_TASKLET) ||
 683                             (ti->flags & SNDRV_TIMER_IFLG_FAST)) {
 684                                 list_add_tail(&ti->ack_list, &timer->ack_list_head);
 685                         } else {
 686                                 list_add_tail(&ti->ack_list, &timer->sack_list_head);
 687                         }
 688                 }
 689                 list_for_each(q, &ti->slave_active_head) {
 690                         ts = (snd_timer_instance_t *)list_entry(q, snd_timer_instance_t, active_list);
 691                         ts->pticks = ti->pticks;
 692                         ts->resolution = resolution;
 693                         if (list_empty(&ts->ack_list)) {
 694                                 if ((timer->hw.flags & SNDRV_TIMER_HW_TASKLET) ||
 695                                     (ti->flags & SNDRV_TIMER_IFLG_FAST)) {
 696                                         list_add_tail(&ts->ack_list, &timer->ack_list_head);
 697                                 } else {
 698                                         list_add_tail(&ts->ack_list, &timer->sack_list_head);
 699                                 }
 700                         }
 701                 }
 702         }
 703         if (timer->flags & SNDRV_TIMER_FLG_RESCHED)
 704                 snd_timer_reschedule(timer, ticks_left);
 705         if (timer->running) {
 706                 if (timer->hw.flags & SNDRV_TIMER_HW_STOP) {
 707                         timer->hw.stop(timer);
 708                         timer->flags |= SNDRV_TIMER_FLG_CHANGE;
 709                 }
 710                 if (!(timer->hw.flags & SNDRV_TIMER_HW_AUTO) ||
 711                     (timer->flags & SNDRV_TIMER_FLG_CHANGE)) {
 712                         /* restart timer */
 713                         timer->flags &= ~SNDRV_TIMER_FLG_CHANGE;
 714                         timer->hw.start(timer);
 715                 }
 716         } else {
 717                 timer->hw.stop(timer);
 718         }
 719
 720         /* now process all fast callbacks */
 721         while (!list_empty(&timer->ack_list_head)) {
 722                 p = timer->ack_list_head.next;          /* get first item */
 723                 ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, ack_list);
 724
 725                 /* remove from ack_list and make empty */
 726                 list_del_init(p);
 727
 728                 ticks = ti->pticks;
 729                 ti->pticks = 0;
 730
 731                 ti->flags |= SNDRV_TIMER_IFLG_CALLBACK;
 732                 spin_unlock(&timer->lock);
 733                 if (ti->callback)
 734                         ti->callback(ti, resolution, ticks);
 735                 spin_lock(&timer->lock);
 736                 ti->flags &= ~SNDRV_TIMER_IFLG_CALLBACK;
 737         }
 738
 739         /* do we have any slow callbacks? */
 740         use_tasklet = !list_empty(&timer->sack_list_head);
 741         spin_unlock(&timer->lock);
 742
 743         if (use_tasklet)
 744                 tasklet_hi_schedule(&timer->task_queue);
 745 }
 746
 747 /*
 748
 749  */
 750
 751 int snd_timer_new(snd_card_t *card, char *id, snd_timer_id_t *tid, snd_timer_t ** rtimer)
 752 {
 753         snd_timer_t *timer;
 754         int err;
 755         static snd_device_ops_t ops = {
 756                 .dev_free = snd_timer_dev_free,
 757                 .dev_register = snd_timer_dev_register,
 758                 .dev_unregister = snd_timer_dev_unregister
 759         };
 760
 761         snd_assert(tid != NULL, return -EINVAL);
 762         snd_assert(rtimer != NULL, return -EINVAL);
 763         *rtimer = NULL;
 764         timer = snd_magic_kcalloc(snd_timer_t, 0, GFP_KERNEL);
 765         if (timer == NULL)
 766                 return -ENOMEM;
 767         timer->tmr_class = tid->dev_class;
 768         timer->card = card;
 769         timer->tmr_device = tid->device;
 770         timer->tmr_subdevice = tid->subdevice;
 771         if (id)
 772                 strlcpy(timer->id, id, sizeof(timer->id));
 773         INIT_LIST_HEAD(&timer->device_list);
 774         INIT_LIST_HEAD(&timer->open_list_head);
 775         INIT_LIST_HEAD(&timer->active_list_head);
 776         INIT_LIST_HEAD(&timer->ack_list_head);
 777         INIT_LIST_HEAD(&timer->sack_list_head);
 778         spin_lock_init(&timer->lock);
 779         tasklet_init(&timer->task_queue, snd_timer_tasklet, (unsigned long)timer);
 780         if (card != NULL) {
 781                 if ((err = snd_device_new(card, SNDRV_DEV_TIMER, timer, &ops)) < 0) {
 782                         snd_timer_free(timer);
 783                         return err;
 784                 }
 785         }
 786         *rtimer = timer;
 787         return 0;
 788 }
 789
 790 static int snd_timer_free(snd_timer_t *timer)
 791 {
 792         snd_assert(timer != NULL, return -ENXIO);
 793         if (timer->private_free)
 794                 timer->private_free(timer);
 795         snd_magic_kfree(timer);
 796         return 0;
 797 }
 798
 799 int snd_timer_dev_free(snd_device_t *device)
 800 {
 801         snd_timer_t *timer = snd_magic_cast(snd_timer_t, device->device_data, return -ENXIO);
 802         return snd_timer_free(timer);
 803 }
 804
 805 int snd_timer_dev_register(snd_device_t *dev)
 806 {
 807         snd_timer_t *timer = snd_magic_cast(snd_timer_t, dev->device_data, return -ENXIO);
 808         snd_timer_t *timer1;
 809         struct list_head *p;
 810
 811         snd_assert(timer != NULL && timer->hw.start != NULL && timer->hw.stop != NULL, return -ENXIO);
 812         if (!(timer->hw.flags & SNDRV_TIMER_HW_SLAVE) &&
 813             !timer->hw.resolution && timer->hw.c_resolution == NULL)
 814                 return -EINVAL;
 815
 816         down(&register_mutex);
 817         list_for_each(p, &snd_timer_list) {
 818                 timer1 = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
 819                 if (timer1->tmr_class > timer->tmr_class)
 820                         break;
 821                 if (timer1->tmr_class < timer->tmr_class)
 822                         continue;
 823                 if (timer1->card && timer->card) {
 824                         if (timer1->card->number > timer->card->number)
 825                                 break;
 826                         if (timer1->card->number < timer->card->number)
 827                                 continue;
 828                 }
 829                 if (timer1->tmr_device > timer->tmr_device)
 830                         break;
 831                 if (timer1->tmr_device < timer->tmr_device)
 832                         continue;
 833                 if (timer1->tmr_subdevice > timer->tmr_subdevice)
 834                         break;
 835                 if (timer1->tmr_subdevice < timer->tmr_subdevice)
 836                         continue;
 837                 /* conflicts.. */
 838                 up(&register_mutex);
 839                 return -EBUSY;
 840         }
 841         list_add_tail(&timer->device_list, p);
 842         up(&register_mutex);
 843         return 0;
 844 }
 845
 846 int snd_timer_unregister(snd_timer_t *timer)
 847 {
 848         struct list_head *p, *n;
 849         snd_timer_instance_t *ti;
 850
 851         snd_assert(timer != NULL, return -ENXIO);
 852         down(&register_mutex);
 853         if (! list_empty(&timer->open_list_head)) {
 854                 snd_printk(KERN_WARNING "timer 0x%lx is busy?\n", (long)timer);
 855                 list_for_each_safe(p, n, &timer->open_list_head) {
 856                         list_del_init(p);
 857                         ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, open_list);
 858                         ti->timer = NULL;
 859                 }
 860         }
 861         list_del(&timer->device_list);
 862         up(&register_mutex);
 863         return snd_timer_free(timer);
 864 }
 865
 866 static int snd_timer_dev_unregister(snd_device_t *device)
 867 {
 868         snd_timer_t *timer = snd_magic_cast(snd_timer_t, device->device_data, return -ENXIO);
 869         return snd_timer_unregister(timer);
 870 }
 871
 872 void snd_timer_notify(snd_timer_t *timer, enum sndrv_timer_event event, struct timespec *tstamp)
 873 {
 874         unsigned long flags;
 875         unsigned long resolution = 0;
 876         snd_timer_instance_t *ti, *ts;
 877         struct list_head *p, *n;
 878
 879         snd_runtime_check(timer->hw.flags & SNDRV_TIMER_HW_SLAVE, return);
 880         snd_assert(event >= SNDRV_TIMER_EVENT_MSTART && event <= SNDRV_TIMER_EVENT_MPAUSE, return);
 881         spin_lock_irqsave(&timer->lock, flags);
 882         if (event == SNDRV_TIMER_EVENT_MSTART || event == SNDRV_TIMER_EVENT_MCONTINUE) {
 883                 if (timer->hw.c_resolution)
 884                         resolution = timer->hw.c_resolution(timer);
 885                 else
 886                         resolution = timer->hw.resolution;
 887         }
 888         list_for_each(p, &timer->active_list_head) {
 889                 ti = (snd_timer_instance_t *)list_entry(p, snd_timer_instance_t, active_list);
 890                 if (ti->ccallback)
 891                         ti->ccallback(ti, event, tstamp, resolution);
 892                 list_for_each(n, &ti->slave_active_head) {
 893                         ts = (snd_timer_instance_t *)list_entry(n, snd_timer_instance_t, active_list);
 894                         if (ts->ccallback)
 895                                 ts->ccallback(ts, event, tstamp, resolution);
 896                 }
 897         }
 898         spin_unlock_irqrestore(&timer->lock, flags);
 899 }
 900
 901 /*
 902  * exported functions for global timers
 903  */
 904 int snd_timer_global_new(char *id, int device, snd_timer_t **rtimer)
 905 {
 906         snd_timer_id_t tid;
 907
 908         tid.dev_class = SNDRV_TIMER_CLASS_GLOBAL;
 909         tid.dev_sclass = SNDRV_TIMER_SCLASS_NONE;
 910         tid.card = -1;
 911         tid.device = device;
 912         tid.subdevice = 0;
 913         return snd_timer_new(NULL, id, &tid, rtimer);
 914 }
 915
 916 int snd_timer_global_free(snd_timer_t *timer)
 917 {
 918         return snd_timer_free(timer);
 919 }
 920
 921 int snd_timer_global_register(snd_timer_t *timer)
 922 {
 923         snd_device_t dev;
 924
 925         memset(&dev, 0, sizeof(dev));
 926         dev.device_data = timer;
 927         return snd_timer_dev_register(&dev);
 928 }
 929
 930 int snd_timer_global_unregister(snd_timer_t *timer)
 931 {
 932         return snd_timer_unregister(timer);
 933 }
 934
 935 /*
 936  *  System timer
 937  */
 938
 939 struct snd_timer_system_private {
 940         struct timer_list tlist;
 941         struct timer * timer;
 942         unsigned long last_expires;
 943         unsigned long last_jiffies;
 944         unsigned long correction;
 945 };
 946
 947 unsigned int snd_timer_system_resolution(void)
 948 {
 949         return 1000000000L / HZ;
 950 }
 951
 952 static void snd_timer_s_function(unsigned long data)
 953 {
 954         snd_timer_t *timer = (snd_timer_t *)data;
 955         struct snd_timer_system_private *priv = timer->private_data;
 956         unsigned long jiff = jiffies;
 957         if (time_after(jiff, priv->last_expires))
 958                 priv->correction = (long)jiff - (long)priv->last_expires;
 959         snd_timer_interrupt(timer, (long)jiff - (long)priv->last_jiffies);
 960 }
 961
 962 static int snd_timer_s_start(snd_timer_t * timer)
 963 {
 964         struct snd_timer_system_private *priv;
 965         unsigned long njiff;
 966
 967         priv = (struct snd_timer_system_private *) timer->private_data;
 968         njiff = (priv->last_jiffies = jiffies);
 969         if (priv->correction > timer->sticks - 1) {
 970                 priv->correction -= timer->sticks - 1;
 971                 njiff++;
 972         } else {
 973                 njiff += timer->sticks - priv->correction;
 974                 priv->correction -= timer->sticks;
 975         }
 976         priv->last_expires = priv->tlist.expires = njiff;
 977         add_timer(&priv->tlist);
 978         return 0;
 979 }
 980
 981 static int snd_timer_s_stop(snd_timer_t * timer)
 982 {
 983         struct snd_timer_system_private *priv;
 984         unsigned long jiff;
 985
 986         priv = (struct snd_timer_system_private *) timer->private_data;
 987         del_timer(&priv->tlist);
 988         jiff = jiffies;
 989         if (time_before(jiff, priv->last_expires))
 990                 timer->sticks = priv->last_expires - jiff;
 991         else
 992                 timer->sticks = 1;
 993         return 0;
 994 }
 995
 996 static struct _snd_timer_hardware snd_timer_system =
 997 {
 998         .flags =        SNDRV_TIMER_HW_FIRST | SNDRV_TIMER_HW_TASKLET,
 999         .resolution =   1000000000L / HZ,
1000         .ticks =        10000000L,
1001         .start =        snd_timer_s_start,
1002         .stop =         snd_timer_s_stop
1003 };
1004
1005 static void snd_timer_free_system(snd_timer_t *timer)
1006 {
1007         if (timer->private_data)
1008                 kfree(timer->private_data);
1009 }
1010
1011 static int snd_timer_register_system(void)
1012 {
1013         snd_timer_t *timer;
1014         struct snd_timer_system_private *priv;
1015         int err;
1016
1017         if ((err = snd_timer_global_new("system", SNDRV_TIMER_GLOBAL_SYSTEM, &timer)) < 0)
1018                 return err;
1019         strcpy(timer->name, "system timer");
1020         timer->hw = snd_timer_system;
1021         priv = (struct snd_timer_system_private *) snd_kcalloc(sizeof(struct snd_timer_system_private), GFP_KERNEL);
1022         if (priv == NULL) {
1023                 snd_timer_free(timer);
1024                 return -ENOMEM;
1025         }
1026         init_timer(&priv->tlist);
1027         priv->tlist.function = snd_timer_s_function;
1028         priv->tlist.data = (unsigned long) timer;
1029         timer->private_data = priv;
1030         timer->private_free = snd_timer_free_system;
1031         return snd_timer_global_register(timer);
1032 }
1033
1034 /*
1035  *  Info interface
1036  */
1037
1038 static void snd_timer_proc_read(snd_info_entry_t *entry,
1039                                 snd_info_buffer_t * buffer)
1040 {
1041         unsigned long flags;
1042         snd_timer_t *timer;
1043         snd_timer_instance_t *ti;
1044         struct list_head *p, *q;
1045
1046         down(&register_mutex);
1047         list_for_each(p, &snd_timer_list) {
1048                 timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
1049                 switch (timer->tmr_class) {
1050                 case SNDRV_TIMER_CLASS_GLOBAL:
1051                         snd_iprintf(buffer, "G%i: ", timer->tmr_device);
1052                         break;
1053                 case SNDRV_TIMER_CLASS_CARD:
1054                         snd_iprintf(buffer, "C%i-%i: ", timer->card->number, timer->tmr_device);
1055                         break;
1056                 case SNDRV_TIMER_CLASS_PCM:
1057                         snd_iprintf(buffer, "P%i-%i-%i: ", timer->card->number, timer->tmr_device, timer->tmr_subdevice);
1058                         break;
1059                 default:
1060                         snd_iprintf(buffer, "?%i-%i-%i-%i: ", timer->tmr_class, timer->card ? timer->card->number : -1, timer->tmr_device, timer->tmr_subdevice);
1061                 }
1062                 snd_iprintf(buffer, "%s :", timer->name);
1063                 if (timer->hw.resolution)
1064                         snd_iprintf(buffer, " %lu.%03luus (%lu ticks)", timer->hw.resolution / 1000, timer->hw.resolution % 1000, timer->hw.ticks);
1065                 if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
1066                         snd_iprintf(buffer, " SLAVE");
1067                 snd_iprintf(buffer, "\n");
1068                 spin_lock_irqsave(&timer->lock, flags);
1069                 list_for_each(q, &timer->open_list_head) {
1070                         ti = (snd_timer_instance_t *)list_entry(q, snd_timer_instance_t, open_list);
1071                         snd_iprintf(buffer, "  Client %s : %s : lost interrupts %li\n",
1072                                         ti->owner ? ti->owner : "unknown",
1073                                         ti->flags & (SNDRV_TIMER_IFLG_START|SNDRV_TIMER_IFLG_RUNNING) ? "running" : "stopped",
1074                                         ti->lost);
1075                 }
1076                 spin_unlock_irqrestore(&timer->lock, flags);
1077         }
1078         up(&register_mutex);
1079 }
1080
1081 /*
1082  *  USER SPACE interface
1083  */
1084
1085 static void snd_timer_user_interrupt(snd_timer_instance_t *timeri,
1086                                      unsigned long resolution,
1087                                      unsigned long ticks)
1088 {
1089         snd_timer_user_t *tu = snd_magic_cast(snd_timer_user_t, timeri->callback_data, return);
1090         snd_timer_read_t *r;
1091         int prev;
1092
1093         spin_lock(&tu->qlock);
1094         if (tu->qused > 0) {
1095                 prev = tu->qtail == 0 ? tu->queue_size - 1 : tu->qtail - 1;
1096                 r = &tu->queue[prev];
1097                 if (r->resolution == resolution) {
1098                         r->ticks += ticks;
1099                         goto __wake;
1100                 }
1101         }
1102         if (tu->qused >= tu->queue_size) {
1103                 tu->overrun++;
1104         } else {
1105                 r = &tu->queue[tu->qtail++];
1106                 tu->qtail %= tu->queue_size;
1107                 r->resolution = resolution;
1108                 r->ticks = ticks;
1109                 tu->qused++;
1110         }
1111       __wake:
1112         spin_unlock(&tu->qlock);
1113         kill_fasync(&tu->fasync, SIGIO, POLL_IN);
1114         wake_up(&tu->qchange_sleep);
1115 }
1116
1117 static void snd_timer_user_append_to_tqueue(snd_timer_user_t *tu, snd_timer_tread_t *tread)
1118 {
1119         if (tu->qused >= tu->queue_size) {
1120                 tu->overrun++;
1121         } else {
1122                 memcpy(&tu->queue[tu->qtail++], tread, sizeof(*tread));
1123                 tu->qused++;
1124         }
1125 }
1126
1127 static void snd_timer_user_ccallback(snd_timer_instance_t *timeri,
1128                                      enum sndrv_timer_event event,
1129                                      struct timespec *tstamp,
1130                                      unsigned long resolution)
1131 {
1132         snd_timer_user_t *tu = snd_magic_cast(snd_timer_user_t, timeri->callback_data, return);
1133         snd_timer_tread_t r1;
1134
1135         if (event >= SNDRV_TIMER_EVENT_START && event <= SNDRV_TIMER_EVENT_PAUSE)
1136                 tu->tstamp = *tstamp;
1137         if ((tu->filter & (1 << event)) == 0 || !tu->tread)
1138                 return;
1139         r1.event = event;
1140         r1.tstamp = *tstamp;
1141         r1.val = resolution;
1142         spin_lock(&tu->qlock);
1143         snd_timer_user_append_to_tqueue(tu, &r1);
1144         spin_unlock(&tu->qlock);
1145 }
1146
1147 static void snd_timer_user_tinterrupt(snd_timer_instance_t *timeri,
1148                                       unsigned long resolution,
1149                                       unsigned long ticks)
1150 {
1151         snd_timer_user_t *tu = snd_magic_cast(snd_timer_user_t, timeri->callback_data, return);
1152         snd_timer_tread_t *r, r1;
1153         struct timespec tstamp;
1154         int prev, append = 0;
1155
1156         snd_timestamp_zero(&tstamp);
1157         spin_lock(&tu->qlock);
1158         if ((tu->filter & ((1 << SNDRV_TIMER_EVENT_RESOLUTION)|(1 << SNDRV_TIMER_EVENT_TICK))) == 0) {
1159                 spin_unlock(&tu->qlock);
1160                 return;
1161         }
1162         if (tu->last_resolution != resolution || ticks > 0)
1163                 snd_timestamp_now(&tstamp, 1);
1164         if ((tu->filter & (1 << SNDRV_TIMER_EVENT_RESOLUTION)) && tu->last_resolution != resolution) {
1165                 r1.event = SNDRV_TIMER_EVENT_RESOLUTION;
1166                 r1.tstamp = tstamp;
1167                 r1.val = resolution;
1168                 snd_timer_user_append_to_tqueue(tu, &r1);
1169                 tu->last_resolution = resolution;
1170                 append++;
1171         }
1172         if ((tu->filter & (1 << SNDRV_TIMER_EVENT_TICK)) == 0)
1173                 goto __wake;
1174         if (ticks == 0)
1175                 goto __wake;
1176         if (tu->qused > 0) {
1177                 prev = tu->qtail == 0 ? tu->queue_size - 1 : tu->qtail - 1;
1178                 r = &tu->tqueue[prev];
1179                 if (r->event == SNDRV_TIMER_EVENT_TICK) {
1180                         r->tstamp = tstamp;
1181                         r->val += ticks;
1182                         append++;
1183                         goto __wake;
1184                 }
1185         }
1186         r1.event = SNDRV_TIMER_EVENT_TICK;
1187         r1.tstamp = tstamp;
1188         r1.val = ticks;
1189         snd_timer_user_append_to_tqueue(tu, &r1);
1190         append++;
1191       __wake:
1192         spin_unlock(&tu->qlock);
1193         if (append == 0)
1194                 return;
1195         kill_fasync(&tu->fasync, SIGIO, POLL_IN);
1196         wake_up(&tu->qchange_sleep);
1197 }
1198
1199 static int snd_timer_user_open(struct inode *inode, struct file *file)
1200 {
1201         snd_timer_user_t *tu;
1202
1203         tu = snd_magic_kcalloc(snd_timer_user_t, 0, GFP_KERNEL);
1204         if (tu == NULL)
1205                 return -ENOMEM;
1206         spin_lock_init(&tu->qlock);
1207         init_waitqueue_head(&tu->qchange_sleep);
1208         tu->ticks = 1;
1209         tu->queue_size = 128;
1210         tu->queue = (snd_timer_read_t *)kmalloc(tu->queue_size * sizeof(snd_timer_read_t), GFP_KERNEL);
1211         if (tu->queue == NULL) {
1212                 snd_magic_kfree(tu);
1213                 return -ENOMEM;
1214         }
1215         file->private_data = tu;
1216         return 0;
1217 }
1218
1219 static int snd_timer_user_release(struct inode *inode, struct file *file)
1220 {
1221         snd_timer_user_t *tu;
1222
1223         if (file->private_data) {
1224                 tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1225                 file->private_data = NULL;
1226                 fasync_helper(-1, file, 0, &tu->fasync);
1227                 if (tu->timeri)
1228                         snd_timer_close(tu->timeri);
1229                 if (tu->queue)
1230                         kfree(tu->queue);
1231                 if (tu->tqueue)
1232                         kfree(tu->tqueue);
1233                 snd_magic_kfree(tu);
1234         }
1235         return 0;
1236 }
1237
1238 static void snd_timer_user_zero_id(snd_timer_id_t *id)
1239 {
1240         id->dev_class = SNDRV_TIMER_CLASS_NONE;
1241         id->dev_sclass = SNDRV_TIMER_SCLASS_NONE;
1242         id->card = -1;
1243         id->device = -1;
1244         id->subdevice = -1;
1245 }
1246
1247 static void snd_timer_user_copy_id(snd_timer_id_t *id, snd_timer_t *timer)
1248 {
1249         id->dev_class = timer->tmr_class;
1250         id->dev_sclass = SNDRV_TIMER_SCLASS_NONE;
1251         id->card = timer->card ? timer->card->number : -1;
1252         id->device = timer->tmr_device;
1253         id->subdevice = timer->tmr_subdevice;
1254 }
1255
1256 static int snd_timer_user_next_device(snd_timer_id_t __user *_tid)
1257 {
1258         snd_timer_id_t id;
1259         snd_timer_t *timer;
1260         struct list_head *p;
1261
1262         if (copy_from_user(&id, _tid, sizeof(id)))
1263                 return -EFAULT;
1264         down(&register_mutex);
1265         if (id.dev_class < 0) {         /* first item */
1266                 if (list_empty(&snd_timer_list))
1267                         snd_timer_user_zero_id(&id);
1268                 else {
1269                         timer = (snd_timer_t *)list_entry(snd_timer_list.next, snd_timer_t, device_list);
1270                         snd_timer_user_copy_id(&id, timer);
1271                 }
1272         } else {
1273                 switch (id.dev_class) {
1274                 case SNDRV_TIMER_CLASS_GLOBAL:
1275                         id.device = id.device < 0 ? 0 : id.device + 1;
1276                         list_for_each(p, &snd_timer_list) {
1277                                 timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
1278                                 if (timer->tmr_class > SNDRV_TIMER_CLASS_GLOBAL) {
1279                                         snd_timer_user_copy_id(&id, timer);
1280                                         break;
1281                                 }
1282                                 if (timer->tmr_device >= id.device) {
1283                                         snd_timer_user_copy_id(&id, timer);
1284                                         break;
1285                                 }
1286                         }
1287                         if (p == &snd_timer_list)
1288                                 snd_timer_user_zero_id(&id);
1289                         break;
1290                 case SNDRV_TIMER_CLASS_CARD:
1291                 case SNDRV_TIMER_CLASS_PCM:
1292                         if (id.card < 0) {
1293                                 id.card = 0;
1294                         } else {
1295                                 if (id.card < 0) {
1296                                         id.card = 0;
1297                                 } else {
1298                                         if (id.device < 0) {
1299                                                 id.device = 0;
1300                                         } else {
1301                                                 id.subdevice = id.subdevice < 0 ? 0 : id.subdevice + 1;
1302                                         }
1303                                 }
1304                         }
1305                         list_for_each(p, &snd_timer_list) {
1306                                 timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
1307                                 if (timer->tmr_class > id.dev_class) {
1308                                         snd_timer_user_copy_id(&id, timer);
1309                                         break;
1310                                 }
1311                                 if (timer->tmr_class < id.dev_class)
1312                                         continue;
1313                                 if (timer->card->number > id.card) {
1314                                         snd_timer_user_copy_id(&id, timer);
1315                                         break;
1316                                 }
1317                                 if (timer->card->number < id.card)
1318                                         continue;
1319                                 if (timer->tmr_device > id.device) {
1320                                         snd_timer_user_copy_id(&id, timer);
1321                                         break;
1322                                 }
1323                                 if (timer->tmr_device < id.device)
1324                                         continue;
1325                                 if (timer->tmr_subdevice > id.subdevice) {
1326                                         snd_timer_user_copy_id(&id, timer);
1327                                         break;
1328                                 }
1329                                 if (timer->tmr_subdevice < id.subdevice)
1330                                         continue;
1331                                 snd_timer_user_copy_id(&id, timer);
1332                                 break;
1333                         }
1334                         if (p == &snd_timer_list)
1335                                 snd_timer_user_zero_id(&id);
1336                         break;
1337                 default:
1338                         snd_timer_user_zero_id(&id);
1339                 }
1340         }
1341         up(&register_mutex);
1342         if (copy_to_user(_tid, &id, sizeof(*_tid)))
1343                 return -EFAULT;
1344         return 0;
1345 }
1346
1347 static int snd_timer_user_ginfo(struct file *file, snd_timer_ginfo_t __user *_ginfo)
1348 {
1349         snd_timer_ginfo_t ginfo;
1350         snd_timer_id_t tid;
1351         snd_timer_t *t;
1352         struct list_head *p;
1353         int err = 0;
1354
1355         if (copy_from_user(&ginfo, _ginfo, sizeof(ginfo)))
1356                 return -EFAULT;
1357         tid = ginfo.tid;
1358         memset(&ginfo, 0, sizeof(ginfo));
1359         ginfo.tid = tid;
1360         down(&register_mutex);
1361         t = snd_timer_find(&tid);
1362         if (t != NULL) {
1363                 ginfo.card = t->card ? t->card->number : -1;
1364                 if (t->hw.flags & SNDRV_TIMER_HW_SLAVE)
1365                         ginfo.flags |= SNDRV_TIMER_FLG_SLAVE;
1366                 strlcpy(ginfo.id, t->id, sizeof(ginfo.id));
1367                 strlcpy(ginfo.name, t->name, sizeof(ginfo.name));
1368                 ginfo.resolution = t->hw.resolution;
1369                 if (t->hw.resolution_min > 0) {
1370                         ginfo.resolution_min = t->hw.resolution_min;
1371                         ginfo.resolution_max = t->hw.resolution_max;
1372                 }
1373                 list_for_each(p, &t->open_list_head) {
1374                         ginfo.clients++;
1375                 }
1376         } else {
1377                 err = -ENODEV;
1378         }
1379         up(&register_mutex);
1380         if (err >= 0 && copy_to_user(_ginfo, &ginfo, sizeof(ginfo)))
1381                 err = -EFAULT;
1382         return err;
1383 }
1384
1385 static int snd_timer_user_gparams(struct file *file, snd_timer_gparams_t __user *_gparams)
1386 {
1387         snd_timer_gparams_t gparams;
1388         snd_timer_t *t;
1389         int err;
1390
1391         if (copy_from_user(&gparams, _gparams, sizeof(gparams)))
1392                 return -EFAULT;
1393         down(&register_mutex);
1394         t = snd_timer_find(&gparams.tid);
1395         if (t != NULL) {
1396                 if (list_empty(&t->open_list_head)) {
1397                         if (t->hw.set_period)
1398                                 err = t->hw.set_period(t, gparams.period_num, gparams.period_den);
1399                         else
1400                                 err = -ENOSYS;
1401                 } else {
1402                         err = -EBUSY;
1403                 }
1404         } else {
1405                 err = -ENODEV;
1406         }
1407         up(&register_mutex);
1408         return err;
1409 }
1410
1411 static int snd_timer_user_gstatus(struct file *file, snd_timer_gstatus_t __user *_gstatus)
1412 {
1413         snd_timer_gstatus_t gstatus;
1414         snd_timer_id_t tid;
1415         snd_timer_t *t;
1416         int err = 0;
1417
1418         if (copy_from_user(&gstatus, _gstatus, sizeof(gstatus)))
1419                 return -EFAULT;
1420         tid = gstatus.tid;
1421         memset(&gstatus, 0, sizeof(gstatus));
1422         gstatus.tid = tid;
1423         down(&register_mutex);
1424         t = snd_timer_find(&tid);
1425         if (t != NULL) {
1426                 if (t->hw.c_resolution)
1427                         gstatus.resolution = t->hw.c_resolution(t);
1428                 else
1429                         gstatus.resolution = t->hw.resolution;
1430                 if (t->hw.precise_resolution) {
1431                         t->hw.precise_resolution(t, &gstatus.resolution_num, &gstatus.resolution_den);
1432                 } else {
1433                         gstatus.resolution_num = gstatus.resolution;
1434                         gstatus.resolution_den = 1000000000uL;
1435                 }
1436         } else {
1437                 err = -ENODEV;
1438         }
1439         up(&register_mutex);
1440         if (err >= 0 && copy_to_user(_gstatus, &gstatus, sizeof(gstatus)))
1441                 err = -EFAULT;
1442         return err;
1443 }
1444
1445 static int snd_timer_user_tselect(struct file *file, snd_timer_select_t __user *_tselect)
1446 {
1447         snd_timer_user_t *tu;
1448         snd_timer_select_t tselect;
1449         char str[32];
1450         int err;
1451
1452         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1453         if (tu->timeri)
1454                 snd_timer_close(tu->timeri);
1455         if (copy_from_user(&tselect, _tselect, sizeof(tselect)))
1456                 return -EFAULT;
1457         sprintf(str, "application %i", current->pid);
1458         if (tselect.id.dev_class != SNDRV_TIMER_CLASS_SLAVE)
1459                 tselect.id.dev_sclass = SNDRV_TIMER_SCLASS_APPLICATION;
1460         if ((err = snd_timer_open(&tu->timeri, str, &tselect.id, current->pid)) < 0)
1461                 return err;
1462
1463         if (tu->queue) {
1464                 kfree(tu->queue);
1465                 tu->queue = NULL;
1466         }
1467         if (tu->tqueue) {
1468                 kfree(tu->tqueue);
1469                 tu->tqueue = NULL;
1470         }
1471         if (tu->tread) {
1472                 tu->tqueue = (snd_timer_tread_t *)kmalloc(tu->queue_size * sizeof(snd_timer_tread_t), GFP_KERNEL);
1473                 if (tu->tqueue == NULL) {
1474                         snd_timer_close(tu->timeri);
1475                         return -ENOMEM;
1476                 }
1477         } else {
1478                 tu->queue = (snd_timer_read_t *)kmalloc(tu->queue_size * sizeof(snd_timer_read_t), GFP_KERNEL);
1479                 if (tu->queue == NULL) {
1480                         snd_timer_close(tu->timeri);
1481                         return -ENOMEM;
1482                 }
1483         }
1484
1485         tu->timeri->flags |= SNDRV_TIMER_IFLG_FAST;
1486         tu->timeri->callback = tu->tread ? snd_timer_user_tinterrupt : snd_timer_user_interrupt;
1487         tu->timeri->ccallback = snd_timer_user_ccallback;
1488         tu->timeri->callback_data = (void *)tu;
1489         return 0;
1490 }
1491
1492 static int snd_timer_user_info(struct file *file, snd_timer_info_t __user *_info)
1493 {
1494         snd_timer_user_t *tu;
1495         snd_timer_info_t info;
1496         snd_timer_t *t;
1497
1498         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1499         snd_assert(tu->timeri != NULL, return -ENXIO);
1500         t = tu->timeri->timer;
1501         snd_assert(t != NULL, return -ENXIO);
1502         memset(&info, 0, sizeof(info));
1503         info.card = t->card ? t->card->number : -1;
1504         if (t->hw.flags & SNDRV_TIMER_HW_SLAVE)
1505                 info.flags |= SNDRV_TIMER_FLG_SLAVE;
1506         strlcpy(info.id, t->id, sizeof(info.id));
1507         strlcpy(info.name, t->name, sizeof(info.name));
1508         info.resolution = t->hw.resolution;
1509         if (copy_to_user(_info, &info, sizeof(*_info)))
1510                 return -EFAULT;
1511         return 0;
1512 }
1513
1514 static int snd_timer_user_params(struct file *file, snd_timer_params_t __user *_params)
1515 {
1516         snd_timer_user_t *tu;
1517         snd_timer_params_t params;
1518         snd_timer_t *t;
1519         snd_timer_read_t *tr;
1520         snd_timer_tread_t *ttr;
1521         int err;
1522
1523         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1524         snd_assert(tu->timeri != NULL, return -ENXIO);
1525         t = tu->timeri->timer;
1526         snd_assert(t != NULL, return -ENXIO);
1527         if (copy_from_user(&params, _params, sizeof(params)))
1528                 return -EFAULT;
1529         if (!(t->hw.flags & SNDRV_TIMER_HW_SLAVE) && params.ticks < 1) {
1530                 err = -EINVAL;
1531                 goto _end;
1532         }
1533         if (params.queue_size > 0 && (params.queue_size < 32 || params.queue_size > 1024)) {
1534                 err = -EINVAL;
1535                 goto _end;
1536         }
1537         if (params.filter & ~((1<<SNDRV_TIMER_EVENT_RESOLUTION)|
1538                               (1<<SNDRV_TIMER_EVENT_TICK)|
1539                               (1<<SNDRV_TIMER_EVENT_START)|
1540                               (1<<SNDRV_TIMER_EVENT_STOP)|
1541                               (1<<SNDRV_TIMER_EVENT_CONTINUE)|
1542                               (1<<SNDRV_TIMER_EVENT_PAUSE)|
1543                               (1<<SNDRV_TIMER_EVENT_MSTART)|
1544                               (1<<SNDRV_TIMER_EVENT_MSTOP)|
1545                               (1<<SNDRV_TIMER_EVENT_MCONTINUE)|
1546                               (1<<SNDRV_TIMER_EVENT_MPAUSE))) {
1547                 err = -EINVAL;
1548                 goto _end;
1549         }
1550         snd_timer_stop(tu->timeri);
1551         spin_lock_irq(&t->lock);
1552         tu->timeri->flags &= ~(SNDRV_TIMER_IFLG_AUTO|
1553                                SNDRV_TIMER_IFLG_EXCLUSIVE|
1554                                SNDRV_TIMER_IFLG_EARLY_EVENT);
1555         if (params.flags & SNDRV_TIMER_PSFLG_AUTO)
1556                 tu->timeri->flags |= SNDRV_TIMER_IFLG_AUTO;
1557         if (params.flags & SNDRV_TIMER_PSFLG_EXCLUSIVE)
1558                 tu->timeri->flags |= SNDRV_TIMER_IFLG_EXCLUSIVE;
1559         if (params.flags & SNDRV_TIMER_PSFLG_EARLY_EVENT)
1560                 tu->timeri->flags |= SNDRV_TIMER_IFLG_EARLY_EVENT;
1561         spin_unlock_irq(&t->lock);
1562         if (params.queue_size > 0 && (unsigned int)tu->queue_size != params.queue_size) {
1563                 if (tu->tread) {
1564                         ttr = (snd_timer_tread_t *)kmalloc(params.queue_size * sizeof(snd_timer_tread_t), GFP_KERNEL);
1565                         if (ttr) {
1566                                 kfree(tu->tqueue);
1567                                 tu->queue_size = params.queue_size;
1568                                 tu->tqueue = ttr;
1569                         }
1570                 } else {
1571                         tr = (snd_timer_read_t *)kmalloc(params.queue_size * sizeof(snd_timer_read_t), GFP_KERNEL);
1572                         if (tr) {
1573                                 kfree(tu->queue);
1574                                 tu->queue_size = params.queue_size;
1575                                 tu->queue = tr;
1576                         }
1577                 }
1578         }
1579         tu->qhead = tu->qtail = tu->qused = 0;
1580         if (tu->timeri->flags & SNDRV_TIMER_IFLG_EARLY_EVENT) {
1581                 if (tu->tread) {
1582                         snd_timer_tread_t tread;
1583                         tread.event = SNDRV_TIMER_EVENT_EARLY;
1584                         tread.tstamp.tv_sec = 0;
1585                         tread.tstamp.tv_nsec = 0;
1586                         tread.val = 0;
1587                         snd_timer_user_append_to_tqueue(tu, &tread);
1588                 } else {
1589                         snd_timer_read_t *r = &tu->queue[0];
1590                         r->resolution = 0;
1591                         r->ticks = 0;
1592                         tu->qused++;
1593                         tu->qtail++;
1594                 }
1595
1596         }
1597         tu->filter = params.filter;
1598         tu->ticks = params.ticks;
1599         err = 0;
1600  _end:
1601         if (copy_to_user(_params, &params, sizeof(params)))
1602                 return -EFAULT;
1603         return err;
1604 }
1605
1606 static int snd_timer_user_status(struct file *file, snd_timer_status_t __user *_status)
1607 {
1608         snd_timer_user_t *tu;
1609         snd_timer_status_t status;
1610
1611         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1612         snd_assert(tu->timeri != NULL, return -ENXIO);
1613         memset(&status, 0, sizeof(status));
1614         status.tstamp = tu->tstamp;
1615         status.resolution = snd_timer_resolution(tu->timeri);
1616         status.lost = tu->timeri->lost;
1617         status.overrun = tu->overrun;
1618         spin_lock_irq(&tu->qlock);
1619         status.queue = tu->qused;
1620         spin_unlock_irq(&tu->qlock);
1621         if (copy_to_user(_status, &status, sizeof(status)))
1622                 return -EFAULT;
1623         return 0;
1624 }
1625
1626 static int snd_timer_user_start(struct file *file)
1627 {
1628         int err;
1629         snd_timer_user_t *tu;
1630
1631         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1632         snd_assert(tu->timeri != NULL, return -ENXIO);
1633         snd_timer_stop(tu->timeri);
1634         tu->timeri->lost = 0;
1635         tu->last_resolution = 0;
1636         return (err = snd_timer_start(tu->timeri, tu->ticks)) < 0 ? err : 0;
1637 }
1638
1639 static int snd_timer_user_stop(struct file *file)
1640 {
1641         int err;
1642         snd_timer_user_t *tu;
1643
1644         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1645         snd_assert(tu->timeri != NULL, return -ENXIO);
1646         return (err = snd_timer_stop(tu->timeri)) < 0 ? err : 0;
1647 }
1648
1649 static int snd_timer_user_continue(struct file *file)
1650 {
1651         int err;
1652         snd_timer_user_t *tu;
1653
1654         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1655         snd_assert(tu->timeri != NULL, return -ENXIO);
1656         tu->timeri->lost = 0;
1657         return (err = snd_timer_continue(tu->timeri)) < 0 ? err : 0;
1658 }
1659
1660 static int snd_timer_user_ioctl(struct inode *inode, struct file *file,
1661                                 unsigned int cmd, unsigned long arg)
1662 {
1663         snd_timer_user_t *tu;
1664         void __user *argp = (void __user *)arg;
1665         int __user *p = argp;
1666
1667         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1668         switch (cmd) {
1669         case SNDRV_TIMER_IOCTL_PVERSION:
1670                 return put_user(SNDRV_TIMER_VERSION, p) ? -EFAULT : 0;
1671         case SNDRV_TIMER_IOCTL_NEXT_DEVICE:
1672                 return snd_timer_user_next_device(argp);
1673         case SNDRV_TIMER_IOCTL_TREAD:
1674         {
1675                 int xarg;
1676
1677                 if (tu->timeri)         /* too late */
1678                         return -EBUSY;
1679                 if (get_user(xarg, p))
1680                         return -EFAULT;
1681                 tu->tread = xarg ? 1 : 0;
1682                 return 0;
1683         }
1684         case SNDRV_TIMER_IOCTL_GINFO:
1685                 return snd_timer_user_ginfo(file, argp);
1686         case SNDRV_TIMER_IOCTL_GPARAMS:
1687                 return snd_timer_user_gparams(file, argp);
1688         case SNDRV_TIMER_IOCTL_GSTATUS:
1689                 return snd_timer_user_gstatus(file, argp);
1690         case SNDRV_TIMER_IOCTL_SELECT:
1691                 return snd_timer_user_tselect(file, argp);
1692         case SNDRV_TIMER_IOCTL_INFO:
1693                 return snd_timer_user_info(file, argp);
1694         case SNDRV_TIMER_IOCTL_PARAMS:
1695                 return snd_timer_user_params(file, argp);
1696         case SNDRV_TIMER_IOCTL_STATUS:
1697                 return snd_timer_user_status(file, argp);
1698         case SNDRV_TIMER_IOCTL_START:
1699                 return snd_timer_user_start(file);
1700         case SNDRV_TIMER_IOCTL_STOP:
1701                 return snd_timer_user_stop(file);
1702         case SNDRV_TIMER_IOCTL_CONTINUE:
1703                 return snd_timer_user_continue(file);
1704         }
1705         return -ENOTTY;
1706 }
1707
1708 static int snd_timer_user_fasync(int fd, struct file * file, int on)
1709 {
1710         snd_timer_user_t *tu;
1711         int err;
1712
1713         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1714         err = fasync_helper(fd, file, on, &tu->fasync);
1715         if (err < 0)
1716                 return err;
1717         return 0;
1718 }
1719
1720 static ssize_t snd_timer_user_read(struct file *file, char __user *buffer, size_t count, loff_t *offset)
1721 {
1722         snd_timer_user_t *tu;
1723         long result = 0, unit;
1724         int err = 0;
1725
1726         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return -ENXIO);
1727         unit = tu->tread ? sizeof(snd_timer_tread_t) : sizeof(snd_timer_read_t);
1728         spin_lock_irq(&tu->qlock);
1729         while ((long)count - result >= unit) {
1730                 while (!tu->qused) {
1731                         wait_queue_t wait;
1732
1733                         if ((file->f_flags & O_NONBLOCK) != 0 || result > 0) {
1734                                 err = -EAGAIN;
1735                                 break;
1736                         }
1737
1738                         set_current_state(TASK_INTERRUPTIBLE);
1739                         init_waitqueue_entry(&wait, current);
1740                         add_wait_queue(&tu->qchange_sleep, &wait);
1741
1742                         spin_unlock_irq(&tu->qlock);
1743                         schedule();
1744                         spin_lock_irq(&tu->qlock);
1745
1746                         remove_wait_queue(&tu->qchange_sleep, &wait);
1747
1748                         if (signal_pending(current)) {
1749                                 err = -ERESTARTSYS;
1750                                 break;
1751                         }
1752                 }
1753
1754                 spin_unlock_irq(&tu->qlock);
1755                 if (err < 0)
1756                         goto _error;
1757
1758                 if (tu->tread) {
1759                         if (copy_to_user(buffer, &tu->tqueue[tu->qhead++], sizeof(snd_timer_tread_t))) {
1760                                 err = -EFAULT;
1761                                 goto _error;
1762                         }
1763                 } else {
1764                         if (copy_to_user(buffer, &tu->queue[tu->qhead++], sizeof(snd_timer_read_t))) {
1765                                 err = -EFAULT;
1766                                 goto _error;
1767                         }
1768                 }
1769
1770                 tu->qhead %= tu->queue_size;
1771
1772                 result += unit;
1773                 buffer += unit;
1774
1775                 spin_lock_irq(&tu->qlock);
1776                 tu->qused--;
1777         }
1778         spin_unlock_irq(&tu->qlock);
1779  _error:
1780         return result > 0 ? result : err;
1781 }
1782
1783 static unsigned int snd_timer_user_poll(struct file *file, poll_table * wait)
1784 {
1785         unsigned int mask;
1786         snd_timer_user_t *tu;
1787
1788         tu = snd_magic_cast(snd_timer_user_t, file->private_data, return 0);
1789
1790         poll_wait(file, &tu->qchange_sleep, wait);
1791
1792         mask = 0;
1793         if (tu->qused)
1794                 mask |= POLLIN | POLLRDNORM;
1795
1796         return mask;
1797 }
1798
1799 static struct file_operations snd_timer_f_ops =
1800 {
1801         .owner =        THIS_MODULE,
1802         .read =         snd_timer_user_read,
1803         .open =         snd_timer_user_open,
1804         .release =      snd_timer_user_release,
1805         .poll =         snd_timer_user_poll,
1806         .ioctl =        snd_timer_user_ioctl,
1807         .fasync =       snd_timer_user_fasync,
1808 };
1809
1810 static snd_minor_t snd_timer_reg =
1811 {
1812         .comment =      "timer",
1813         .f_ops =        &snd_timer_f_ops,
1814 };
1815
1816 /*
1817  *  ENTRY functions
1818  */
1819
1820 static snd_info_entry_t *snd_timer_proc_entry = NULL;
1821
1822 static int __init alsa_timer_init(void)
1823 {
1824         int err;
1825         snd_info_entry_t *entry;
1826
1827 #ifdef SNDRV_OSS_INFO_DEV_TIMERS
1828         snd_oss_info_register(SNDRV_OSS_INFO_DEV_TIMERS, SNDRV_CARDS - 1, "system timer");
1829 #endif
1830         if ((entry = snd_info_create_module_entry(THIS_MODULE, "timers", NULL)) != NULL) {
1831                 entry->c.text.read_size = SNDRV_TIMER_DEVICES * 128;
1832                 entry->c.text.read = snd_timer_proc_read;
1833                 if (snd_info_register(entry) < 0) {
1834                         snd_info_free_entry(entry);
1835                         entry = NULL;
1836                 }
1837         }
1838         snd_timer_proc_entry = entry;
1839         if ((err = snd_timer_register_system()) < 0)
1840                 snd_printk(KERN_ERR "unable to register system timer (%i)\n", err);
1841         if ((err = snd_register_device(SNDRV_DEVICE_TYPE_TIMER,
1842                                         NULL, 0, &snd_timer_reg, "timer"))<0)
1843                 snd_printk(KERN_ERR "unable to register timer device (%i)\n", err);
1844         return 0;
1845 }
1846
1847 static void __exit alsa_timer_exit(void)
1848 {
1849         struct list_head *p, *n;
1850
1851         snd_unregister_device(SNDRV_DEVICE_TYPE_TIMER, NULL, 0);
1852         /* unregister the system timer */
1853         list_for_each_safe(p, n, &snd_timer_list) {
1854                 snd_timer_t *timer = (snd_timer_t *)list_entry(p, snd_timer_t, device_list);
1855                 snd_timer_unregister(timer);
1856         }
1857         if (snd_timer_proc_entry) {
1858                 snd_info_unregister(snd_timer_proc_entry);
1859                 snd_timer_proc_entry = NULL;
1860         }
1861 #ifdef SNDRV_OSS_INFO_DEV_TIMERS
1862         snd_oss_info_unregister(SNDRV_OSS_INFO_DEV_TIMERS, SNDRV_CARDS - 1);
1863 #endif
1864 }
1865
1866 module_init(alsa_timer_init)
1867 module_exit(alsa_timer_exit)
1868
1869 EXPORT_SYMBOL(snd_timer_open);
1870 EXPORT_SYMBOL(snd_timer_close);
1871 EXPORT_SYMBOL(snd_timer_resolution);
1872 EXPORT_SYMBOL(snd_timer_start);
1873 EXPORT_SYMBOL(snd_timer_stop);
1874 EXPORT_SYMBOL(snd_timer_continue);
1875 EXPORT_SYMBOL(snd_timer_pause);
1876 EXPORT_SYMBOL(snd_timer_new);
1877 EXPORT_SYMBOL(snd_timer_notify);
1878 EXPORT_SYMBOL(snd_timer_global_new);
1879 EXPORT_SYMBOL(snd_timer_global_free);
1880 EXPORT_SYMBOL(snd_timer_global_register);
1881 EXPORT_SYMBOL(snd_timer_global_unregister);
1882 EXPORT_SYMBOL(snd_timer_interrupt);
1883 EXPORT_SYMBOL(snd_timer_system_resolution);