timer.c 53.6 KB
Newer Older
L
Linus Torvalds 已提交
1 2
/*
 *  Timers abstract layer
3
 *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
L
Linus Torvalds 已提交
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
 *
 *
 *   This program is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   This program is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with this program; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 *
 */

#include <linux/delay.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/time.h>
26
#include <linux/mutex.h>
27
#include <linux/device.h>
28
#include <linux/module.h>
29
#include <linux/string.h>
30
#include <linux/sched/signal.h>
L
Linus Torvalds 已提交
31 32 33 34 35 36 37 38
#include <sound/core.h>
#include <sound/timer.h>
#include <sound/control.h>
#include <sound/info.h>
#include <sound/minors.h>
#include <sound/initval.h>
#include <linux/kmod.h>

39 40 41
/* internal flags */
#define SNDRV_TIMER_IFLG_PAUSED		0x00010000

42
#if IS_ENABLED(CONFIG_SND_HRTIMER)
43
#define DEFAULT_TIMER_LIMIT 4
L
Linus Torvalds 已提交
44 45 46 47 48
#else
#define DEFAULT_TIMER_LIMIT 1
#endif

static int timer_limit = DEFAULT_TIMER_LIMIT;
49
static int timer_tstamp_monotonic = 1;
50
MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>, Takashi Iwai <tiwai@suse.de>");
L
Linus Torvalds 已提交
51 52 53 54
MODULE_DESCRIPTION("ALSA timer interface");
MODULE_LICENSE("GPL");
module_param(timer_limit, int, 0444);
MODULE_PARM_DESC(timer_limit, "Maximum global timers in system.");
55 56
module_param(timer_tstamp_monotonic, int, 0444);
MODULE_PARM_DESC(timer_tstamp_monotonic, "Use posix monotonic clock source for timestamps (default).");
L
Linus Torvalds 已提交
57

58 59 60
MODULE_ALIAS_CHARDEV(CONFIG_SND_MAJOR, SNDRV_MINOR_TIMER);
MODULE_ALIAS("devname:snd/timer");

61 62
struct snd_timer_user {
	struct snd_timer_instance *timeri;
63
	int tread;		/* enhanced read with timestamps and events */
L
Linus Torvalds 已提交
64 65 66 67 68 69
	unsigned long ticks;
	unsigned long overrun;
	int qhead;
	int qtail;
	int qused;
	int queue_size;
70
	bool disconnected;
71 72
	struct snd_timer_read *queue;
	struct snd_timer_tread *tqueue;
L
Linus Torvalds 已提交
73 74 75 76 77 78
	spinlock_t qlock;
	unsigned long last_resolution;
	unsigned int filter;
	struct timespec tstamp;		/* trigger tstamp */
	wait_queue_head_t qchange_sleep;
	struct fasync_struct *fasync;
79
	struct mutex ioctl_lock;
80
};
L
Linus Torvalds 已提交
81 82 83 84 85 86 87 88 89 90

/* list of timers */
static LIST_HEAD(snd_timer_list);

/* list of slave instances */
static LIST_HEAD(snd_timer_slave_list);

/* lock for slave active lists */
static DEFINE_SPINLOCK(slave_active_lock);

91
static DEFINE_MUTEX(register_mutex);
L
Linus Torvalds 已提交
92

93 94 95
static int snd_timer_free(struct snd_timer *timer);
static int snd_timer_dev_free(struct snd_device *device);
static int snd_timer_dev_register(struct snd_device *device);
96
static int snd_timer_dev_disconnect(struct snd_device *device);
L
Linus Torvalds 已提交
97

98
static void snd_timer_reschedule(struct snd_timer * timer, unsigned long ticks_left);
L
Linus Torvalds 已提交
99 100 101 102 103

/*
 * create a timer instance with the given owner string.
 * when timer is not NULL, increments the module counter
 */
104 105
static struct snd_timer_instance *snd_timer_instance_new(char *owner,
							 struct snd_timer *timer)
L
Linus Torvalds 已提交
106
{
107
	struct snd_timer_instance *timeri;
108
	timeri = kzalloc(sizeof(*timeri), GFP_KERNEL);
L
Linus Torvalds 已提交
109 110
	if (timeri == NULL)
		return NULL;
111
	timeri->owner = kstrdup(owner, GFP_KERNEL);
L
Linus Torvalds 已提交
112 113 114 115 116 117 118 119 120 121 122
	if (! timeri->owner) {
		kfree(timeri);
		return NULL;
	}
	INIT_LIST_HEAD(&timeri->open_list);
	INIT_LIST_HEAD(&timeri->active_list);
	INIT_LIST_HEAD(&timeri->ack_list);
	INIT_LIST_HEAD(&timeri->slave_list_head);
	INIT_LIST_HEAD(&timeri->slave_active_head);

	timeri->timer = timer;
123
	if (timer && !try_module_get(timer->module)) {
L
Linus Torvalds 已提交
124 125 126 127 128 129 130 131 132 133 134
		kfree(timeri->owner);
		kfree(timeri);
		return NULL;
	}

	return timeri;
}

/*
 * find a timer instance from the given timer id
 */
135
static struct snd_timer *snd_timer_find(struct snd_timer_id *tid)
L
Linus Torvalds 已提交
136
{
137
	struct snd_timer *timer = NULL;
L
Linus Torvalds 已提交
138

139
	list_for_each_entry(timer, &snd_timer_list, device_list) {
L
Linus Torvalds 已提交
140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155
		if (timer->tmr_class != tid->dev_class)
			continue;
		if ((timer->tmr_class == SNDRV_TIMER_CLASS_CARD ||
		     timer->tmr_class == SNDRV_TIMER_CLASS_PCM) &&
		    (timer->card == NULL ||
		     timer->card->number != tid->card))
			continue;
		if (timer->tmr_device != tid->device)
			continue;
		if (timer->tmr_subdevice != tid->subdevice)
			continue;
		return timer;
	}
	return NULL;
}

156
#ifdef CONFIG_MODULES
L
Linus Torvalds 已提交
157

158
static void snd_timer_request(struct snd_timer_id *tid)
L
Linus Torvalds 已提交
159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182
{
	switch (tid->dev_class) {
	case SNDRV_TIMER_CLASS_GLOBAL:
		if (tid->device < timer_limit)
			request_module("snd-timer-%i", tid->device);
		break;
	case SNDRV_TIMER_CLASS_CARD:
	case SNDRV_TIMER_CLASS_PCM:
		if (tid->card < snd_ecards_limit)
			request_module("snd-card-%i", tid->card);
		break;
	default:
		break;
	}
}

#endif

/*
 * look for a master instance matching with the slave id of the given slave.
 * when found, relink the open_link of the slave.
 *
 * call this with register_mutex down.
 */
183
static void snd_timer_check_slave(struct snd_timer_instance *slave)
L
Linus Torvalds 已提交
184
{
185 186
	struct snd_timer *timer;
	struct snd_timer_instance *master;
L
Linus Torvalds 已提交
187 188

	/* FIXME: it's really dumb to look up all entries.. */
189 190
	list_for_each_entry(timer, &snd_timer_list, device_list) {
		list_for_each_entry(master, &timer->open_list_head, open_list) {
L
Linus Torvalds 已提交
191 192
			if (slave->slave_class == master->slave_class &&
			    slave->slave_id == master->slave_id) {
193 194
				list_move_tail(&slave->open_list,
					       &master->slave_list_head);
L
Linus Torvalds 已提交
195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210
				spin_lock_irq(&slave_active_lock);
				slave->master = master;
				slave->timer = master->timer;
				spin_unlock_irq(&slave_active_lock);
				return;
			}
		}
	}
}

/*
 * look for slave instances matching with the slave id of the given master.
 * when found, relink the open_link of slaves.
 *
 * call this with register_mutex down.
 */
211
static void snd_timer_check_master(struct snd_timer_instance *master)
L
Linus Torvalds 已提交
212
{
213
	struct snd_timer_instance *slave, *tmp;
L
Linus Torvalds 已提交
214 215

	/* check all pending slaves */
216
	list_for_each_entry_safe(slave, tmp, &snd_timer_slave_list, open_list) {
L
Linus Torvalds 已提交
217 218
		if (slave->slave_class == master->slave_class &&
		    slave->slave_id == master->slave_id) {
219
			list_move_tail(&slave->open_list, &master->slave_list_head);
L
Linus Torvalds 已提交
220
			spin_lock_irq(&slave_active_lock);
221
			spin_lock(&master->timer->lock);
L
Linus Torvalds 已提交
222 223 224
			slave->master = master;
			slave->timer = master->timer;
			if (slave->flags & SNDRV_TIMER_IFLG_RUNNING)
225 226
				list_add_tail(&slave->active_list,
					      &master->slave_active_head);
227
			spin_unlock(&master->timer->lock);
L
Linus Torvalds 已提交
228 229 230 231 232 233 234 235 236
			spin_unlock_irq(&slave_active_lock);
		}
	}
}

/*
 * open a timer instance
 * when opening a master, the slave id must be here given.
 */
237 238
int snd_timer_open(struct snd_timer_instance **ti,
		   char *owner, struct snd_timer_id *tid,
L
Linus Torvalds 已提交
239 240
		   unsigned int slave_id)
{
241 242
	struct snd_timer *timer;
	struct snd_timer_instance *timeri = NULL;
243

L
Linus Torvalds 已提交
244 245 246 247
	if (tid->dev_class == SNDRV_TIMER_CLASS_SLAVE) {
		/* open a slave instance */
		if (tid->dev_sclass <= SNDRV_TIMER_SCLASS_NONE ||
		    tid->dev_sclass > SNDRV_TIMER_SCLASS_OSS_SEQUENCER) {
248 249
			pr_debug("ALSA: timer: invalid slave class %i\n",
				 tid->dev_sclass);
L
Linus Torvalds 已提交
250 251
			return -EINVAL;
		}
252
		mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
253
		timeri = snd_timer_instance_new(owner, NULL);
254
		if (!timeri) {
255
			mutex_unlock(&register_mutex);
256 257
			return -ENOMEM;
		}
L
Linus Torvalds 已提交
258 259 260 261 262
		timeri->slave_class = tid->dev_sclass;
		timeri->slave_id = tid->device;
		timeri->flags |= SNDRV_TIMER_IFLG_SLAVE;
		list_add_tail(&timeri->open_list, &snd_timer_slave_list);
		snd_timer_check_slave(timeri);
263
		mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
264 265 266 267 268
		*ti = timeri;
		return 0;
	}

	/* open a master instance */
269
	mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
270
	timer = snd_timer_find(tid);
271 272
#ifdef CONFIG_MODULES
	if (!timer) {
273
		mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
274
		snd_timer_request(tid);
275
		mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
276 277 278
		timer = snd_timer_find(tid);
	}
#endif
279
	if (!timer) {
280
		mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
281 282
		return -ENODEV;
	}
283 284
	if (!list_empty(&timer->open_list_head)) {
		timeri = list_entry(timer->open_list_head.next,
285
				    struct snd_timer_instance, open_list);
286
		if (timeri->flags & SNDRV_TIMER_IFLG_EXCLUSIVE) {
287
			mutex_unlock(&register_mutex);
288 289 290 291 292
			return -EBUSY;
		}
	}
	timeri = snd_timer_instance_new(owner, timer);
	if (!timeri) {
293
		mutex_unlock(&register_mutex);
294 295
		return -ENOMEM;
	}
296 297 298
	/* take a card refcount for safe disconnection */
	if (timer->card)
		get_device(&timer->card->card_dev);
299 300
	timeri->slave_class = tid->dev_sclass;
	timeri->slave_id = slave_id;
301 302 303 304 305 306 307 308 309 310 311 312 313 314 315

	if (list_empty(&timer->open_list_head) && timer->hw.open) {
		int err = timer->hw.open(timer);
		if (err) {
			kfree(timeri->owner);
			kfree(timeri);

			if (timer->card)
				put_device(&timer->card->card_dev);
			module_put(timer->module);
			mutex_unlock(&register_mutex);
			return err;
		}
	}

316 317
	list_add_tail(&timeri->open_list, &timer->open_list_head);
	snd_timer_check_master(timeri);
318
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
319 320 321 322 323 324 325
	*ti = timeri;
	return 0;
}

/*
 * close a timer instance
 */
326
int snd_timer_close(struct snd_timer_instance *timeri)
L
Linus Torvalds 已提交
327
{
328
	struct snd_timer *timer = NULL;
329
	struct snd_timer_instance *slave, *tmp;
L
Linus Torvalds 已提交
330

331
	if (snd_BUG_ON(!timeri))
332
		return -ENXIO;
L
Linus Torvalds 已提交
333

334 335 336
	mutex_lock(&register_mutex);
	list_del(&timeri->open_list);

L
Linus Torvalds 已提交
337 338 339
	/* force to stop the timer */
	snd_timer_stop(timeri);

340 341
	timer = timeri->timer;
	if (timer) {
L
Linus Torvalds 已提交
342 343 344 345 346 347 348 349
		/* wait, until the active callback is finished */
		spin_lock_irq(&timer->lock);
		while (timeri->flags & SNDRV_TIMER_IFLG_CALLBACK) {
			spin_unlock_irq(&timer->lock);
			udelay(10);
			spin_lock_irq(&timer->lock);
		}
		spin_unlock_irq(&timer->lock);
350

L
Linus Torvalds 已提交
351
		/* remove slave links */
352 353
		spin_lock_irq(&slave_active_lock);
		spin_lock(&timer->lock);
354 355 356
		list_for_each_entry_safe(slave, tmp, &timeri->slave_list_head,
					 open_list) {
			list_move_tail(&slave->open_list, &snd_timer_slave_list);
L
Linus Torvalds 已提交
357 358
			slave->master = NULL;
			slave->timer = NULL;
359 360
			list_del_init(&slave->ack_list);
			list_del_init(&slave->active_list);
L
Linus Torvalds 已提交
361
		}
362 363
		spin_unlock(&timer->lock);
		spin_unlock_irq(&slave_active_lock);
364 365 366 367

		/* slave doesn't need to release timer resources below */
		if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
			timer = NULL;
L
Linus Torvalds 已提交
368
	}
369

L
Linus Torvalds 已提交
370 371 372 373
	if (timeri->private_free)
		timeri->private_free(timeri);
	kfree(timeri->owner);
	kfree(timeri);
374 375 376 377 378 379 380

	if (timer) {
		if (list_empty(&timer->open_list_head) && timer->hw.close)
			timer->hw.close(timer);
		/* release a card refcount for safe disconnection */
		if (timer->card)
			put_device(&timer->card->card_dev);
381
		module_put(timer->module);
382 383 384
	}

	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
385 386 387
	return 0;
}

388
unsigned long snd_timer_resolution(struct snd_timer_instance *timeri)
L
Linus Torvalds 已提交
389
{
390
	struct snd_timer * timer;
L
Linus Torvalds 已提交
391 392 393 394 395 396 397 398 399 400 401

	if (timeri == NULL)
		return 0;
	if ((timer = timeri->timer) != NULL) {
		if (timer->hw.c_resolution)
			return timer->hw.c_resolution(timer);
		return timer->hw.resolution;
	}
	return 0;
}

402
static void snd_timer_notify1(struct snd_timer_instance *ti, int event)
L
Linus Torvalds 已提交
403
{
404
	struct snd_timer *timer;
L
Linus Torvalds 已提交
405
	unsigned long resolution = 0;
406
	struct snd_timer_instance *ts;
L
Linus Torvalds 已提交
407 408
	struct timespec tstamp;

409
	if (timer_tstamp_monotonic)
410
		ktime_get_ts(&tstamp);
411 412
	else
		getnstimeofday(&tstamp);
413 414 415
	if (snd_BUG_ON(event < SNDRV_TIMER_EVENT_START ||
		       event > SNDRV_TIMER_EVENT_PAUSE))
		return;
416 417
	if (event == SNDRV_TIMER_EVENT_START ||
	    event == SNDRV_TIMER_EVENT_CONTINUE)
L
Linus Torvalds 已提交
418 419
		resolution = snd_timer_resolution(ti);
	if (ti->ccallback)
420
		ti->ccallback(ti, event, &tstamp, resolution);
L
Linus Torvalds 已提交
421 422 423 424 425 426 427
	if (ti->flags & SNDRV_TIMER_IFLG_SLAVE)
		return;
	timer = ti->timer;
	if (timer == NULL)
		return;
	if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
		return;
428
	list_for_each_entry(ts, &ti->slave_active_head, active_list)
L
Linus Torvalds 已提交
429
		if (ts->ccallback)
430
			ts->ccallback(ts, event + 100, &tstamp, resolution);
L
Linus Torvalds 已提交
431 432
}

433 434 435
/* start/continue a master timer */
static int snd_timer_start1(struct snd_timer_instance *timeri,
			    bool start, unsigned long ticks)
L
Linus Torvalds 已提交
436
{
437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461
	struct snd_timer *timer;
	int result;
	unsigned long flags;

	timer = timeri->timer;
	if (!timer)
		return -EINVAL;

	spin_lock_irqsave(&timer->lock, flags);
	if (timer->card && timer->card->shutdown) {
		result = -ENODEV;
		goto unlock;
	}
	if (timeri->flags & (SNDRV_TIMER_IFLG_RUNNING |
			     SNDRV_TIMER_IFLG_START)) {
		result = -EBUSY;
		goto unlock;
	}

	if (start)
		timeri->ticks = timeri->cticks = ticks;
	else if (!timeri->cticks)
		timeri->cticks = 1;
	timeri->pticks = 0;

462
	list_move_tail(&timeri->active_list, &timer->active_list_head);
L
Linus Torvalds 已提交
463 464 465 466 467
	if (timer->running) {
		if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
			goto __start_now;
		timer->flags |= SNDRV_TIMER_FLG_RESCHED;
		timeri->flags |= SNDRV_TIMER_IFLG_START;
468
		result = 1; /* delayed start */
L
Linus Torvalds 已提交
469
	} else {
470 471
		if (start)
			timer->sticks = ticks;
L
Linus Torvalds 已提交
472 473 474 475
		timer->hw.start(timer);
	      __start_now:
		timer->running++;
		timeri->flags |= SNDRV_TIMER_IFLG_RUNNING;
476
		result = 0;
L
Linus Torvalds 已提交
477
	}
478 479 480 481 482
	snd_timer_notify1(timeri, start ? SNDRV_TIMER_EVENT_START :
			  SNDRV_TIMER_EVENT_CONTINUE);
 unlock:
	spin_unlock_irqrestore(&timer->lock, flags);
	return result;
L
Linus Torvalds 已提交
483 484
}

485 486 487
/* start/continue a slave timer */
static int snd_timer_start_slave(struct snd_timer_instance *timeri,
				 bool start)
L
Linus Torvalds 已提交
488 489 490 491
{
	unsigned long flags;

	spin_lock_irqsave(&slave_active_lock, flags);
492 493 494 495
	if (timeri->flags & SNDRV_TIMER_IFLG_RUNNING) {
		spin_unlock_irqrestore(&slave_active_lock, flags);
		return -EBUSY;
	}
L
Linus Torvalds 已提交
496
	timeri->flags |= SNDRV_TIMER_IFLG_RUNNING;
497 498
	if (timeri->master && timeri->timer) {
		spin_lock(&timeri->timer->lock);
499 500
		list_add_tail(&timeri->active_list,
			      &timeri->master->slave_active_head);
501 502
		snd_timer_notify1(timeri, start ? SNDRV_TIMER_EVENT_START :
				  SNDRV_TIMER_EVENT_CONTINUE);
503 504
		spin_unlock(&timeri->timer->lock);
	}
L
Linus Torvalds 已提交
505 506 507 508
	spin_unlock_irqrestore(&slave_active_lock, flags);
	return 1; /* delayed start */
}

509 510
/* stop/pause a master timer */
static int snd_timer_stop1(struct snd_timer_instance *timeri, bool stop)
L
Linus Torvalds 已提交
511
{
512
	struct snd_timer *timer;
513
	int result = 0;
L
Linus Torvalds 已提交
514 515 516 517 518 519
	unsigned long flags;

	timer = timeri->timer;
	if (!timer)
		return -EINVAL;
	spin_lock_irqsave(&timer->lock, flags);
520 521
	if (!(timeri->flags & (SNDRV_TIMER_IFLG_RUNNING |
			       SNDRV_TIMER_IFLG_START))) {
522 523
		result = -EBUSY;
		goto unlock;
524
	}
L
Linus Torvalds 已提交
525 526
	list_del_init(&timeri->ack_list);
	list_del_init(&timeri->active_list);
527 528 529 530 531
	if (timer->card && timer->card->shutdown)
		goto unlock;
	if (stop) {
		timeri->cticks = timeri->ticks;
		timeri->pticks = 0;
532
	}
L
Linus Torvalds 已提交
533 534 535 536 537 538 539 540 541 542 543 544
	if ((timeri->flags & SNDRV_TIMER_IFLG_RUNNING) &&
	    !(--timer->running)) {
		timer->hw.stop(timer);
		if (timer->flags & SNDRV_TIMER_FLG_RESCHED) {
			timer->flags &= ~SNDRV_TIMER_FLG_RESCHED;
			snd_timer_reschedule(timer, 0);
			if (timer->flags & SNDRV_TIMER_FLG_CHANGE) {
				timer->flags &= ~SNDRV_TIMER_FLG_CHANGE;
				timer->hw.start(timer);
			}
		}
	}
545
	timeri->flags &= ~(SNDRV_TIMER_IFLG_RUNNING | SNDRV_TIMER_IFLG_START);
546 547 548 549
	if (stop)
		timeri->flags &= ~SNDRV_TIMER_IFLG_PAUSED;
	else
		timeri->flags |= SNDRV_TIMER_IFLG_PAUSED;
550 551 552
	snd_timer_notify1(timeri, stop ? SNDRV_TIMER_EVENT_STOP :
			  SNDRV_TIMER_EVENT_CONTINUE);
 unlock:
L
Linus Torvalds 已提交
553
	spin_unlock_irqrestore(&timer->lock, flags);
554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576
	return result;
}

/* stop/pause a slave timer */
static int snd_timer_stop_slave(struct snd_timer_instance *timeri, bool stop)
{
	unsigned long flags;

	spin_lock_irqsave(&slave_active_lock, flags);
	if (!(timeri->flags & SNDRV_TIMER_IFLG_RUNNING)) {
		spin_unlock_irqrestore(&slave_active_lock, flags);
		return -EBUSY;
	}
	timeri->flags &= ~SNDRV_TIMER_IFLG_RUNNING;
	if (timeri->timer) {
		spin_lock(&timeri->timer->lock);
		list_del_init(&timeri->ack_list);
		list_del_init(&timeri->active_list);
		snd_timer_notify1(timeri, stop ? SNDRV_TIMER_EVENT_STOP :
				  SNDRV_TIMER_EVENT_CONTINUE);
		spin_unlock(&timeri->timer->lock);
	}
	spin_unlock_irqrestore(&slave_active_lock, flags);
L
Linus Torvalds 已提交
577 578 579
	return 0;
}

580 581 582 583 584 585 586 587 588 589 590 591 592
/*
 *  start the timer instance
 */
int snd_timer_start(struct snd_timer_instance *timeri, unsigned int ticks)
{
	if (timeri == NULL || ticks < 1)
		return -EINVAL;
	if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
		return snd_timer_start_slave(timeri, true);
	else
		return snd_timer_start1(timeri, true, ticks);
}

L
Linus Torvalds 已提交
593 594 595 596 597
/*
 * stop the timer instance.
 *
 * do not call this from the timer callback!
 */
598
int snd_timer_stop(struct snd_timer_instance *timeri)
L
Linus Torvalds 已提交
599
{
600 601 602 603
	if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
		return snd_timer_stop_slave(timeri, true);
	else
		return snd_timer_stop1(timeri, true);
L
Linus Torvalds 已提交
604 605 606 607 608
}

/*
 * start again..  the tick is kept.
 */
609
int snd_timer_continue(struct snd_timer_instance *timeri)
L
Linus Torvalds 已提交
610
{
611 612 613 614
	/* timer can continue only after pause */
	if (!(timeri->flags & SNDRV_TIMER_IFLG_PAUSED))
		return -EINVAL;

L
Linus Torvalds 已提交
615
	if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
616 617 618
		return snd_timer_start_slave(timeri, false);
	else
		return snd_timer_start1(timeri, false, 0);
L
Linus Torvalds 已提交
619 620 621 622 623
}

/*
 * pause.. remember the ticks left
 */
624
int snd_timer_pause(struct snd_timer_instance * timeri)
L
Linus Torvalds 已提交
625
{
626 627 628 629
	if (timeri->flags & SNDRV_TIMER_IFLG_SLAVE)
		return snd_timer_stop_slave(timeri, false);
	else
		return snd_timer_stop1(timeri, false);
L
Linus Torvalds 已提交
630 631 632 633 634 635 636 637
}

/*
 * reschedule the timer
 *
 * start pending instances and check the scheduling ticks.
 * when the scheduling ticks is changed set CHANGE flag to reprogram the timer.
 */
638
static void snd_timer_reschedule(struct snd_timer * timer, unsigned long ticks_left)
L
Linus Torvalds 已提交
639
{
640
	struct snd_timer_instance *ti;
L
Linus Torvalds 已提交
641 642
	unsigned long ticks = ~0UL;

643
	list_for_each_entry(ti, &timer->active_list_head, active_list) {
L
Linus Torvalds 已提交
644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670
		if (ti->flags & SNDRV_TIMER_IFLG_START) {
			ti->flags &= ~SNDRV_TIMER_IFLG_START;
			ti->flags |= SNDRV_TIMER_IFLG_RUNNING;
			timer->running++;
		}
		if (ti->flags & SNDRV_TIMER_IFLG_RUNNING) {
			if (ticks > ti->cticks)
				ticks = ti->cticks;
		}
	}
	if (ticks == ~0UL) {
		timer->flags &= ~SNDRV_TIMER_FLG_RESCHED;
		return;
	}
	if (ticks > timer->hw.ticks)
		ticks = timer->hw.ticks;
	if (ticks_left != ticks)
		timer->flags |= SNDRV_TIMER_FLG_CHANGE;
	timer->sticks = ticks;
}

/*
 * timer tasklet
 *
 */
static void snd_timer_tasklet(unsigned long arg)
{
671 672
	struct snd_timer *timer = (struct snd_timer *) arg;
	struct snd_timer_instance *ti;
L
Linus Torvalds 已提交
673 674
	struct list_head *p;
	unsigned long resolution, ticks;
675
	unsigned long flags;
L
Linus Torvalds 已提交
676

677 678 679
	if (timer->card && timer->card->shutdown)
		return;

680
	spin_lock_irqsave(&timer->lock, flags);
L
Linus Torvalds 已提交
681 682 683
	/* now process all callbacks */
	while (!list_empty(&timer->sack_list_head)) {
		p = timer->sack_list_head.next;		/* get first item */
684
		ti = list_entry(p, struct snd_timer_instance, ack_list);
L
Linus Torvalds 已提交
685 686 687

		/* remove from ack_list and make empty */
		list_del_init(p);
688

L
Linus Torvalds 已提交
689 690 691 692 693 694 695 696 697 698 699
		ticks = ti->pticks;
		ti->pticks = 0;
		resolution = ti->resolution;

		ti->flags |= SNDRV_TIMER_IFLG_CALLBACK;
		spin_unlock(&timer->lock);
		if (ti->callback)
			ti->callback(ti, resolution, ticks);
		spin_lock(&timer->lock);
		ti->flags &= ~SNDRV_TIMER_IFLG_CALLBACK;
	}
700
	spin_unlock_irqrestore(&timer->lock, flags);
L
Linus Torvalds 已提交
701 702 703 704 705 706 707 708
}

/*
 * timer interrupt
 *
 * ticks_left is usually equal to timer->sticks.
 *
 */
709
void snd_timer_interrupt(struct snd_timer * timer, unsigned long ticks_left)
L
Linus Torvalds 已提交
710
{
711
	struct snd_timer_instance *ti, *ts, *tmp;
L
Linus Torvalds 已提交
712
	unsigned long resolution, ticks;
713
	struct list_head *p, *ack_list_head;
714
	unsigned long flags;
L
Linus Torvalds 已提交
715 716 717 718 719
	int use_tasklet = 0;

	if (timer == NULL)
		return;

720 721 722
	if (timer->card && timer->card->shutdown)
		return;

723
	spin_lock_irqsave(&timer->lock, flags);
L
Linus Torvalds 已提交
724 725 726 727 728 729 730 731

	/* remember the current resolution */
	if (timer->hw.c_resolution)
		resolution = timer->hw.c_resolution(timer);
	else
		resolution = timer->hw.resolution;

	/* loop for all active instances
732
	 * Here we cannot use list_for_each_entry because the active_list of a
733 734
	 * processed instance is relinked to done_list_head before the callback
	 * is called.
L
Linus Torvalds 已提交
735
	 */
736 737
	list_for_each_entry_safe(ti, tmp, &timer->active_list_head,
				 active_list) {
L
Linus Torvalds 已提交
738 739 740 741 742 743 744 745 746 747 748 749 750 751
		if (!(ti->flags & SNDRV_TIMER_IFLG_RUNNING))
			continue;
		ti->pticks += ticks_left;
		ti->resolution = resolution;
		if (ti->cticks < ticks_left)
			ti->cticks = 0;
		else
			ti->cticks -= ticks_left;
		if (ti->cticks) /* not expired */
			continue;
		if (ti->flags & SNDRV_TIMER_IFLG_AUTO) {
			ti->cticks = ti->ticks;
		} else {
			ti->flags &= ~SNDRV_TIMER_IFLG_RUNNING;
752 753
			--timer->running;
			list_del_init(&ti->active_list);
L
Linus Torvalds 已提交
754
		}
755 756 757 758 759 760 761
		if ((timer->hw.flags & SNDRV_TIMER_HW_TASKLET) ||
		    (ti->flags & SNDRV_TIMER_IFLG_FAST))
			ack_list_head = &timer->ack_list_head;
		else
			ack_list_head = &timer->sack_list_head;
		if (list_empty(&ti->ack_list))
			list_add_tail(&ti->ack_list, ack_list_head);
762
		list_for_each_entry(ts, &ti->slave_active_head, active_list) {
L
Linus Torvalds 已提交
763 764
			ts->pticks = ti->pticks;
			ts->resolution = resolution;
765 766
			if (list_empty(&ts->ack_list))
				list_add_tail(&ts->ack_list, ack_list_head);
L
Linus Torvalds 已提交
767 768 769
		}
	}
	if (timer->flags & SNDRV_TIMER_FLG_RESCHED)
770
		snd_timer_reschedule(timer, timer->sticks);
L
Linus Torvalds 已提交
771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788
	if (timer->running) {
		if (timer->hw.flags & SNDRV_TIMER_HW_STOP) {
			timer->hw.stop(timer);
			timer->flags |= SNDRV_TIMER_FLG_CHANGE;
		}
		if (!(timer->hw.flags & SNDRV_TIMER_HW_AUTO) ||
		    (timer->flags & SNDRV_TIMER_FLG_CHANGE)) {
			/* restart timer */
			timer->flags &= ~SNDRV_TIMER_FLG_CHANGE;
			timer->hw.start(timer);
		}
	} else {
		timer->hw.stop(timer);
	}

	/* now process all fast callbacks */
	while (!list_empty(&timer->ack_list_head)) {
		p = timer->ack_list_head.next;		/* get first item */
789
		ti = list_entry(p, struct snd_timer_instance, ack_list);
790

L
Linus Torvalds 已提交
791 792
		/* remove from ack_list and make empty */
		list_del_init(p);
793

L
Linus Torvalds 已提交
794 795 796 797 798 799 800 801 802 803 804 805 806
		ticks = ti->pticks;
		ti->pticks = 0;

		ti->flags |= SNDRV_TIMER_IFLG_CALLBACK;
		spin_unlock(&timer->lock);
		if (ti->callback)
			ti->callback(ti, resolution, ticks);
		spin_lock(&timer->lock);
		ti->flags &= ~SNDRV_TIMER_IFLG_CALLBACK;
	}

	/* do we have any slow callbacks? */
	use_tasklet = !list_empty(&timer->sack_list_head);
807
	spin_unlock_irqrestore(&timer->lock, flags);
L
Linus Torvalds 已提交
808 809

	if (use_tasklet)
810
		tasklet_schedule(&timer->task_queue);
L
Linus Torvalds 已提交
811 812 813 814 815 816
}

/*

 */

817 818
int snd_timer_new(struct snd_card *card, char *id, struct snd_timer_id *tid,
		  struct snd_timer **rtimer)
L
Linus Torvalds 已提交
819
{
820
	struct snd_timer *timer;
L
Linus Torvalds 已提交
821
	int err;
822
	static struct snd_device_ops ops = {
L
Linus Torvalds 已提交
823 824
		.dev_free = snd_timer_dev_free,
		.dev_register = snd_timer_dev_register,
825
		.dev_disconnect = snd_timer_dev_disconnect,
L
Linus Torvalds 已提交
826 827
	};

828 829 830 831
	if (snd_BUG_ON(!tid))
		return -EINVAL;
	if (rtimer)
		*rtimer = NULL;
832
	timer = kzalloc(sizeof(*timer), GFP_KERNEL);
833
	if (!timer)
L
Linus Torvalds 已提交
834 835 836 837 838 839 840
		return -ENOMEM;
	timer->tmr_class = tid->dev_class;
	timer->card = card;
	timer->tmr_device = tid->device;
	timer->tmr_subdevice = tid->subdevice;
	if (id)
		strlcpy(timer->id, id, sizeof(timer->id));
841
	timer->sticks = 1;
L
Linus Torvalds 已提交
842 843 844 845 846 847
	INIT_LIST_HEAD(&timer->device_list);
	INIT_LIST_HEAD(&timer->open_list_head);
	INIT_LIST_HEAD(&timer->active_list_head);
	INIT_LIST_HEAD(&timer->ack_list_head);
	INIT_LIST_HEAD(&timer->sack_list_head);
	spin_lock_init(&timer->lock);
848 849
	tasklet_init(&timer->task_queue, snd_timer_tasklet,
		     (unsigned long)timer);
L
Linus Torvalds 已提交
850
	if (card != NULL) {
851
		timer->module = card->module;
852 853
		err = snd_device_new(card, SNDRV_DEV_TIMER, timer, &ops);
		if (err < 0) {
L
Linus Torvalds 已提交
854 855 856 857
			snd_timer_free(timer);
			return err;
		}
	}
858 859
	if (rtimer)
		*rtimer = timer;
L
Linus Torvalds 已提交
860 861 862
	return 0;
}

863
static int snd_timer_free(struct snd_timer *timer)
L
Linus Torvalds 已提交
864
{
865 866
	if (!timer)
		return 0;
867 868 869 870 871

	mutex_lock(&register_mutex);
	if (! list_empty(&timer->open_list_head)) {
		struct list_head *p, *n;
		struct snd_timer_instance *ti;
872
		pr_warn("ALSA: timer %p is busy?\n", timer);
873 874 875 876 877 878 879 880 881
		list_for_each_safe(p, n, &timer->open_list_head) {
			list_del_init(p);
			ti = list_entry(p, struct snd_timer_instance, open_list);
			ti->timer = NULL;
		}
	}
	list_del(&timer->device_list);
	mutex_unlock(&register_mutex);

L
Linus Torvalds 已提交
882 883 884 885 886 887
	if (timer->private_free)
		timer->private_free(timer);
	kfree(timer);
	return 0;
}

888
static int snd_timer_dev_free(struct snd_device *device)
L
Linus Torvalds 已提交
889
{
890
	struct snd_timer *timer = device->device_data;
L
Linus Torvalds 已提交
891 892 893
	return snd_timer_free(timer);
}

894
static int snd_timer_dev_register(struct snd_device *dev)
L
Linus Torvalds 已提交
895
{
896 897
	struct snd_timer *timer = dev->device_data;
	struct snd_timer *timer1;
L
Linus Torvalds 已提交
898

899 900
	if (snd_BUG_ON(!timer || !timer->hw.start || !timer->hw.stop))
		return -ENXIO;
L
Linus Torvalds 已提交
901 902 903 904
	if (!(timer->hw.flags & SNDRV_TIMER_HW_SLAVE) &&
	    !timer->hw.resolution && timer->hw.c_resolution == NULL)
	    	return -EINVAL;

905
	mutex_lock(&register_mutex);
906
	list_for_each_entry(timer1, &snd_timer_list, device_list) {
L
Linus Torvalds 已提交
907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925
		if (timer1->tmr_class > timer->tmr_class)
			break;
		if (timer1->tmr_class < timer->tmr_class)
			continue;
		if (timer1->card && timer->card) {
			if (timer1->card->number > timer->card->number)
				break;
			if (timer1->card->number < timer->card->number)
				continue;
		}
		if (timer1->tmr_device > timer->tmr_device)
			break;
		if (timer1->tmr_device < timer->tmr_device)
			continue;
		if (timer1->tmr_subdevice > timer->tmr_subdevice)
			break;
		if (timer1->tmr_subdevice < timer->tmr_subdevice)
			continue;
		/* conflicts.. */
926
		mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
927 928
		return -EBUSY;
	}
929
	list_add_tail(&timer->device_list, &timer1->device_list);
930
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
931 932 933
	return 0;
}

934
static int snd_timer_dev_disconnect(struct snd_device *device)
L
Linus Torvalds 已提交
935
{
936
	struct snd_timer *timer = device->device_data;
937 938
	struct snd_timer_instance *ti;

939
	mutex_lock(&register_mutex);
940
	list_del_init(&timer->device_list);
941 942
	/* wake up pending sleepers */
	list_for_each_entry(ti, &timer->open_list_head, open_list) {
943 944
		if (ti->disconnect)
			ti->disconnect(ti);
945
	}
946
	mutex_unlock(&register_mutex);
947
	return 0;
L
Linus Torvalds 已提交
948 949
}

950
void snd_timer_notify(struct snd_timer *timer, int event, struct timespec *tstamp)
L
Linus Torvalds 已提交
951 952 953
{
	unsigned long flags;
	unsigned long resolution = 0;
954
	struct snd_timer_instance *ti, *ts;
L
Linus Torvalds 已提交
955

956 957
	if (timer->card && timer->card->shutdown)
		return;
958 959
	if (! (timer->hw.flags & SNDRV_TIMER_HW_SLAVE))
		return;
960 961 962
	if (snd_BUG_ON(event < SNDRV_TIMER_EVENT_MSTART ||
		       event > SNDRV_TIMER_EVENT_MRESUME))
		return;
L
Linus Torvalds 已提交
963
	spin_lock_irqsave(&timer->lock, flags);
964 965 966
	if (event == SNDRV_TIMER_EVENT_MSTART ||
	    event == SNDRV_TIMER_EVENT_MCONTINUE ||
	    event == SNDRV_TIMER_EVENT_MRESUME) {
L
Linus Torvalds 已提交
967 968 969 970 971
		if (timer->hw.c_resolution)
			resolution = timer->hw.c_resolution(timer);
		else
			resolution = timer->hw.resolution;
	}
972
	list_for_each_entry(ti, &timer->active_list_head, active_list) {
L
Linus Torvalds 已提交
973 974
		if (ti->ccallback)
			ti->ccallback(ti, event, tstamp, resolution);
975
		list_for_each_entry(ts, &ti->slave_active_head, active_list)
L
Linus Torvalds 已提交
976 977 978 979 980 981 982 983 984
			if (ts->ccallback)
				ts->ccallback(ts, event, tstamp, resolution);
	}
	spin_unlock_irqrestore(&timer->lock, flags);
}

/*
 * exported functions for global timers
 */
985
int snd_timer_global_new(char *id, int device, struct snd_timer **rtimer)
L
Linus Torvalds 已提交
986
{
987
	struct snd_timer_id tid;
988

L
Linus Torvalds 已提交
989 990 991 992 993 994 995 996
	tid.dev_class = SNDRV_TIMER_CLASS_GLOBAL;
	tid.dev_sclass = SNDRV_TIMER_SCLASS_NONE;
	tid.card = -1;
	tid.device = device;
	tid.subdevice = 0;
	return snd_timer_new(NULL, id, &tid, rtimer);
}

997
int snd_timer_global_free(struct snd_timer *timer)
L
Linus Torvalds 已提交
998 999 1000 1001
{
	return snd_timer_free(timer);
}

1002
int snd_timer_global_register(struct snd_timer *timer)
L
Linus Torvalds 已提交
1003
{
1004
	struct snd_device dev;
L
Linus Torvalds 已提交
1005 1006 1007 1008 1009 1010

	memset(&dev, 0, sizeof(dev));
	dev.device_data = timer;
	return snd_timer_dev_register(&dev);
}

1011
/*
L
Linus Torvalds 已提交
1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023
 *  System timer
 */

struct snd_timer_system_private {
	struct timer_list tlist;
	unsigned long last_expires;
	unsigned long last_jiffies;
	unsigned long correction;
};

static void snd_timer_s_function(unsigned long data)
{
1024
	struct snd_timer *timer = (struct snd_timer *)data;
L
Linus Torvalds 已提交
1025 1026 1027
	struct snd_timer_system_private *priv = timer->private_data;
	unsigned long jiff = jiffies;
	if (time_after(jiff, priv->last_expires))
1028
		priv->correction += (long)jiff - (long)priv->last_expires;
L
Linus Torvalds 已提交
1029 1030 1031
	snd_timer_interrupt(timer, (long)jiff - (long)priv->last_jiffies);
}

1032
static int snd_timer_s_start(struct snd_timer * timer)
L
Linus Torvalds 已提交
1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043
{
	struct snd_timer_system_private *priv;
	unsigned long njiff;

	priv = (struct snd_timer_system_private *) timer->private_data;
	njiff = (priv->last_jiffies = jiffies);
	if (priv->correction > timer->sticks - 1) {
		priv->correction -= timer->sticks - 1;
		njiff++;
	} else {
		njiff += timer->sticks - priv->correction;
1044
		priv->correction = 0;
L
Linus Torvalds 已提交
1045
	}
1046 1047
	priv->last_expires = njiff;
	mod_timer(&priv->tlist, njiff);
L
Linus Torvalds 已提交
1048 1049 1050
	return 0;
}

1051
static int snd_timer_s_stop(struct snd_timer * timer)
L
Linus Torvalds 已提交
1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062
{
	struct snd_timer_system_private *priv;
	unsigned long jiff;

	priv = (struct snd_timer_system_private *) timer->private_data;
	del_timer(&priv->tlist);
	jiff = jiffies;
	if (time_before(jiff, priv->last_expires))
		timer->sticks = priv->last_expires - jiff;
	else
		timer->sticks = 1;
1063
	priv->correction = 0;
L
Linus Torvalds 已提交
1064 1065 1066
	return 0;
}

1067 1068 1069 1070 1071 1072 1073 1074 1075
static int snd_timer_s_close(struct snd_timer *timer)
{
	struct snd_timer_system_private *priv;

	priv = (struct snd_timer_system_private *)timer->private_data;
	del_timer_sync(&priv->tlist);
	return 0;
}

1076
static struct snd_timer_hardware snd_timer_system =
L
Linus Torvalds 已提交
1077 1078 1079 1080
{
	.flags =	SNDRV_TIMER_HW_FIRST | SNDRV_TIMER_HW_TASKLET,
	.resolution =	1000000000L / HZ,
	.ticks =	10000000L,
1081
	.close =	snd_timer_s_close,
L
Linus Torvalds 已提交
1082 1083 1084 1085
	.start =	snd_timer_s_start,
	.stop =		snd_timer_s_stop
};

1086
static void snd_timer_free_system(struct snd_timer *timer)
L
Linus Torvalds 已提交
1087 1088 1089 1090 1091 1092
{
	kfree(timer->private_data);
}

static int snd_timer_register_system(void)
{
1093
	struct snd_timer *timer;
L
Linus Torvalds 已提交
1094 1095 1096
	struct snd_timer_system_private *priv;
	int err;

1097 1098
	err = snd_timer_global_new("system", SNDRV_TIMER_GLOBAL_SYSTEM, &timer);
	if (err < 0)
L
Linus Torvalds 已提交
1099 1100 1101
		return err;
	strcpy(timer->name, "system timer");
	timer->hw = snd_timer_system;
1102
	priv = kzalloc(sizeof(*priv), GFP_KERNEL);
L
Linus Torvalds 已提交
1103 1104 1105 1106
	if (priv == NULL) {
		snd_timer_free(timer);
		return -ENOMEM;
	}
1107
	setup_timer(&priv->tlist, snd_timer_s_function, (unsigned long) timer);
L
Linus Torvalds 已提交
1108 1109 1110 1111 1112
	timer->private_data = priv;
	timer->private_free = snd_timer_free_system;
	return snd_timer_global_register(timer);
}

1113
#ifdef CONFIG_SND_PROC_FS
L
Linus Torvalds 已提交
1114 1115 1116 1117
/*
 *  Info interface
 */

1118 1119
static void snd_timer_proc_read(struct snd_info_entry *entry,
				struct snd_info_buffer *buffer)
L
Linus Torvalds 已提交
1120
{
1121 1122
	struct snd_timer *timer;
	struct snd_timer_instance *ti;
L
Linus Torvalds 已提交
1123

1124
	mutex_lock(&register_mutex);
1125
	list_for_each_entry(timer, &snd_timer_list, device_list) {
1126 1127
		if (timer->card && timer->card->shutdown)
			continue;
L
Linus Torvalds 已提交
1128 1129 1130 1131 1132
		switch (timer->tmr_class) {
		case SNDRV_TIMER_CLASS_GLOBAL:
			snd_iprintf(buffer, "G%i: ", timer->tmr_device);
			break;
		case SNDRV_TIMER_CLASS_CARD:
1133 1134
			snd_iprintf(buffer, "C%i-%i: ",
				    timer->card->number, timer->tmr_device);
L
Linus Torvalds 已提交
1135 1136
			break;
		case SNDRV_TIMER_CLASS_PCM:
1137 1138
			snd_iprintf(buffer, "P%i-%i-%i: ", timer->card->number,
				    timer->tmr_device, timer->tmr_subdevice);
L
Linus Torvalds 已提交
1139 1140
			break;
		default:
1141 1142 1143
			snd_iprintf(buffer, "?%i-%i-%i-%i: ", timer->tmr_class,
				    timer->card ? timer->card->number : -1,
				    timer->tmr_device, timer->tmr_subdevice);
L
Linus Torvalds 已提交
1144 1145 1146
		}
		snd_iprintf(buffer, "%s :", timer->name);
		if (timer->hw.resolution)
1147 1148 1149 1150
			snd_iprintf(buffer, " %lu.%03luus (%lu ticks)",
				    timer->hw.resolution / 1000,
				    timer->hw.resolution % 1000,
				    timer->hw.ticks);
L
Linus Torvalds 已提交
1151 1152 1153
		if (timer->hw.flags & SNDRV_TIMER_HW_SLAVE)
			snd_iprintf(buffer, " SLAVE");
		snd_iprintf(buffer, "\n");
1154
		list_for_each_entry(ti, &timer->open_list_head, open_list)
1155 1156 1157 1158 1159
			snd_iprintf(buffer, "  Client %s : %s\n",
				    ti->owner ? ti->owner : "unknown",
				    ti->flags & (SNDRV_TIMER_IFLG_START |
						 SNDRV_TIMER_IFLG_RUNNING)
				    ? "running" : "stopped");
L
Linus Torvalds 已提交
1160
	}
1161
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
1162 1163
}

1164
static struct snd_info_entry *snd_timer_proc_entry;
1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182

static void __init snd_timer_proc_init(void)
{
	struct snd_info_entry *entry;

	entry = snd_info_create_module_entry(THIS_MODULE, "timers", NULL);
	if (entry != NULL) {
		entry->c.text.read = snd_timer_proc_read;
		if (snd_info_register(entry) < 0) {
			snd_info_free_entry(entry);
			entry = NULL;
		}
	}
	snd_timer_proc_entry = entry;
}

static void __exit snd_timer_proc_done(void)
{
1183
	snd_info_free_entry(snd_timer_proc_entry);
1184
}
1185
#else /* !CONFIG_SND_PROC_FS */
1186 1187 1188 1189
#define snd_timer_proc_init()
#define snd_timer_proc_done()
#endif

L
Linus Torvalds 已提交
1190 1191 1192 1193
/*
 *  USER SPACE interface
 */

1194
static void snd_timer_user_interrupt(struct snd_timer_instance *timeri,
L
Linus Torvalds 已提交
1195 1196 1197
				     unsigned long resolution,
				     unsigned long ticks)
{
1198 1199
	struct snd_timer_user *tu = timeri->callback_data;
	struct snd_timer_read *r;
L
Linus Torvalds 已提交
1200
	int prev;
1201

L
Linus Torvalds 已提交
1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225
	spin_lock(&tu->qlock);
	if (tu->qused > 0) {
		prev = tu->qtail == 0 ? tu->queue_size - 1 : tu->qtail - 1;
		r = &tu->queue[prev];
		if (r->resolution == resolution) {
			r->ticks += ticks;
			goto __wake;
		}
	}
	if (tu->qused >= tu->queue_size) {
		tu->overrun++;
	} else {
		r = &tu->queue[tu->qtail++];
		tu->qtail %= tu->queue_size;
		r->resolution = resolution;
		r->ticks = ticks;
		tu->qused++;
	}
      __wake:
	spin_unlock(&tu->qlock);
	kill_fasync(&tu->fasync, SIGIO, POLL_IN);
	wake_up(&tu->qchange_sleep);
}

1226 1227
static void snd_timer_user_append_to_tqueue(struct snd_timer_user *tu,
					    struct snd_timer_tread *tread)
L
Linus Torvalds 已提交
1228 1229 1230 1231 1232 1233 1234 1235 1236 1237
{
	if (tu->qused >= tu->queue_size) {
		tu->overrun++;
	} else {
		memcpy(&tu->tqueue[tu->qtail++], tread, sizeof(*tread));
		tu->qtail %= tu->queue_size;
		tu->qused++;
	}
}

1238 1239
static void snd_timer_user_ccallback(struct snd_timer_instance *timeri,
				     int event,
L
Linus Torvalds 已提交
1240 1241 1242
				     struct timespec *tstamp,
				     unsigned long resolution)
{
1243 1244
	struct snd_timer_user *tu = timeri->callback_data;
	struct snd_timer_tread r1;
1245
	unsigned long flags;
L
Linus Torvalds 已提交
1246

1247 1248
	if (event >= SNDRV_TIMER_EVENT_START &&
	    event <= SNDRV_TIMER_EVENT_PAUSE)
L
Linus Torvalds 已提交
1249 1250 1251
		tu->tstamp = *tstamp;
	if ((tu->filter & (1 << event)) == 0 || !tu->tread)
		return;
1252
	memset(&r1, 0, sizeof(r1));
L
Linus Torvalds 已提交
1253 1254 1255
	r1.event = event;
	r1.tstamp = *tstamp;
	r1.val = resolution;
1256
	spin_lock_irqsave(&tu->qlock, flags);
L
Linus Torvalds 已提交
1257
	snd_timer_user_append_to_tqueue(tu, &r1);
1258
	spin_unlock_irqrestore(&tu->qlock, flags);
L
Linus Torvalds 已提交
1259 1260 1261 1262
	kill_fasync(&tu->fasync, SIGIO, POLL_IN);
	wake_up(&tu->qchange_sleep);
}

1263 1264 1265 1266 1267 1268 1269 1270
static void snd_timer_user_disconnect(struct snd_timer_instance *timeri)
{
	struct snd_timer_user *tu = timeri->callback_data;

	tu->disconnected = true;
	wake_up(&tu->qchange_sleep);
}

1271
static void snd_timer_user_tinterrupt(struct snd_timer_instance *timeri,
L
Linus Torvalds 已提交
1272 1273 1274
				      unsigned long resolution,
				      unsigned long ticks)
{
1275 1276
	struct snd_timer_user *tu = timeri->callback_data;
	struct snd_timer_tread *r, r1;
L
Linus Torvalds 已提交
1277 1278 1279
	struct timespec tstamp;
	int prev, append = 0;

1280
	memset(&r1, 0, sizeof(r1));
1281
	memset(&tstamp, 0, sizeof(tstamp));
L
Linus Torvalds 已提交
1282
	spin_lock(&tu->qlock);
1283 1284
	if ((tu->filter & ((1 << SNDRV_TIMER_EVENT_RESOLUTION) |
			   (1 << SNDRV_TIMER_EVENT_TICK))) == 0) {
L
Linus Torvalds 已提交
1285 1286 1287
		spin_unlock(&tu->qlock);
		return;
	}
1288 1289
	if (tu->last_resolution != resolution || ticks > 0) {
		if (timer_tstamp_monotonic)
1290
			ktime_get_ts(&tstamp);
1291 1292 1293
		else
			getnstimeofday(&tstamp);
	}
1294 1295
	if ((tu->filter & (1 << SNDRV_TIMER_EVENT_RESOLUTION)) &&
	    tu->last_resolution != resolution) {
L
Linus Torvalds 已提交
1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331
		r1.event = SNDRV_TIMER_EVENT_RESOLUTION;
		r1.tstamp = tstamp;
		r1.val = resolution;
		snd_timer_user_append_to_tqueue(tu, &r1);
		tu->last_resolution = resolution;
		append++;
	}
	if ((tu->filter & (1 << SNDRV_TIMER_EVENT_TICK)) == 0)
		goto __wake;
	if (ticks == 0)
		goto __wake;
	if (tu->qused > 0) {
		prev = tu->qtail == 0 ? tu->queue_size - 1 : tu->qtail - 1;
		r = &tu->tqueue[prev];
		if (r->event == SNDRV_TIMER_EVENT_TICK) {
			r->tstamp = tstamp;
			r->val += ticks;
			append++;
			goto __wake;
		}
	}
	r1.event = SNDRV_TIMER_EVENT_TICK;
	r1.tstamp = tstamp;
	r1.val = ticks;
	snd_timer_user_append_to_tqueue(tu, &r1);
	append++;
      __wake:
	spin_unlock(&tu->qlock);
	if (append == 0)
		return;
	kill_fasync(&tu->fasync, SIGIO, POLL_IN);
	wake_up(&tu->qchange_sleep);
}

static int snd_timer_user_open(struct inode *inode, struct file *file)
{
1332
	struct snd_timer_user *tu;
1333 1334 1335 1336 1337
	int err;

	err = nonseekable_open(inode, file);
	if (err < 0)
		return err;
1338

1339
	tu = kzalloc(sizeof(*tu), GFP_KERNEL);
L
Linus Torvalds 已提交
1340 1341 1342 1343
	if (tu == NULL)
		return -ENOMEM;
	spin_lock_init(&tu->qlock);
	init_waitqueue_head(&tu->qchange_sleep);
1344
	mutex_init(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1345 1346
	tu->ticks = 1;
	tu->queue_size = 128;
1347
	tu->queue = kmalloc(tu->queue_size * sizeof(struct snd_timer_read),
1348
			    GFP_KERNEL);
L
Linus Torvalds 已提交
1349 1350 1351 1352 1353 1354 1355 1356 1357 1358
	if (tu->queue == NULL) {
		kfree(tu);
		return -ENOMEM;
	}
	file->private_data = tu;
	return 0;
}

static int snd_timer_user_release(struct inode *inode, struct file *file)
{
1359
	struct snd_timer_user *tu;
L
Linus Torvalds 已提交
1360 1361 1362 1363

	if (file->private_data) {
		tu = file->private_data;
		file->private_data = NULL;
1364
		mutex_lock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1365 1366
		if (tu->timeri)
			snd_timer_close(tu->timeri);
1367
		mutex_unlock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1368 1369 1370 1371 1372 1373 1374
		kfree(tu->queue);
		kfree(tu->tqueue);
		kfree(tu);
	}
	return 0;
}

1375
static void snd_timer_user_zero_id(struct snd_timer_id *id)
L
Linus Torvalds 已提交
1376 1377 1378 1379 1380 1381 1382 1383
{
	id->dev_class = SNDRV_TIMER_CLASS_NONE;
	id->dev_sclass = SNDRV_TIMER_SCLASS_NONE;
	id->card = -1;
	id->device = -1;
	id->subdevice = -1;
}

1384
static void snd_timer_user_copy_id(struct snd_timer_id *id, struct snd_timer *timer)
L
Linus Torvalds 已提交
1385 1386 1387 1388 1389 1390 1391 1392
{
	id->dev_class = timer->tmr_class;
	id->dev_sclass = SNDRV_TIMER_SCLASS_NONE;
	id->card = timer->card ? timer->card->number : -1;
	id->device = timer->tmr_device;
	id->subdevice = timer->tmr_subdevice;
}

1393
static int snd_timer_user_next_device(struct snd_timer_id __user *_tid)
L
Linus Torvalds 已提交
1394
{
1395 1396
	struct snd_timer_id id;
	struct snd_timer *timer;
L
Linus Torvalds 已提交
1397
	struct list_head *p;
1398

L
Linus Torvalds 已提交
1399 1400
	if (copy_from_user(&id, _tid, sizeof(id)))
		return -EFAULT;
1401
	mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
1402 1403 1404 1405
	if (id.dev_class < 0) {		/* first item */
		if (list_empty(&snd_timer_list))
			snd_timer_user_zero_id(&id);
		else {
1406
			timer = list_entry(snd_timer_list.next,
1407
					   struct snd_timer, device_list);
L
Linus Torvalds 已提交
1408 1409 1410 1411 1412 1413 1414
			snd_timer_user_copy_id(&id, timer);
		}
	} else {
		switch (id.dev_class) {
		case SNDRV_TIMER_CLASS_GLOBAL:
			id.device = id.device < 0 ? 0 : id.device + 1;
			list_for_each(p, &snd_timer_list) {
1415
				timer = list_entry(p, struct snd_timer, device_list);
L
Linus Torvalds 已提交
1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432
				if (timer->tmr_class > SNDRV_TIMER_CLASS_GLOBAL) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
				if (timer->tmr_device >= id.device) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
			}
			if (p == &snd_timer_list)
				snd_timer_user_zero_id(&id);
			break;
		case SNDRV_TIMER_CLASS_CARD:
		case SNDRV_TIMER_CLASS_PCM:
			if (id.card < 0) {
				id.card = 0;
			} else {
1433 1434
				if (id.device < 0) {
					id.device = 0;
L
Linus Torvalds 已提交
1435
				} else {
1436 1437 1438 1439
					if (id.subdevice < 0)
						id.subdevice = 0;
					else
						id.subdevice++;
L
Linus Torvalds 已提交
1440 1441 1442
				}
			}
			list_for_each(p, &snd_timer_list) {
1443
				timer = list_entry(p, struct snd_timer, device_list);
L
Linus Torvalds 已提交
1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477
				if (timer->tmr_class > id.dev_class) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
				if (timer->tmr_class < id.dev_class)
					continue;
				if (timer->card->number > id.card) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
				if (timer->card->number < id.card)
					continue;
				if (timer->tmr_device > id.device) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
				if (timer->tmr_device < id.device)
					continue;
				if (timer->tmr_subdevice > id.subdevice) {
					snd_timer_user_copy_id(&id, timer);
					break;
				}
				if (timer->tmr_subdevice < id.subdevice)
					continue;
				snd_timer_user_copy_id(&id, timer);
				break;
			}
			if (p == &snd_timer_list)
				snd_timer_user_zero_id(&id);
			break;
		default:
			snd_timer_user_zero_id(&id);
		}
	}
1478
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
1479 1480 1481
	if (copy_to_user(_tid, &id, sizeof(*_tid)))
		return -EFAULT;
	return 0;
1482
}
L
Linus Torvalds 已提交
1483

1484
static int snd_timer_user_ginfo(struct file *file,
1485
				struct snd_timer_ginfo __user *_ginfo)
L
Linus Torvalds 已提交
1486
{
1487 1488 1489
	struct snd_timer_ginfo *ginfo;
	struct snd_timer_id tid;
	struct snd_timer *t;
L
Linus Torvalds 已提交
1490 1491 1492
	struct list_head *p;
	int err = 0;

1493 1494 1495 1496
	ginfo = memdup_user(_ginfo, sizeof(*ginfo));
	if (IS_ERR(ginfo))
		return PTR_ERR(ginfo);

L
Linus Torvalds 已提交
1497 1498 1499
	tid = ginfo->tid;
	memset(ginfo, 0, sizeof(*ginfo));
	ginfo->tid = tid;
1500
	mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518
	t = snd_timer_find(&tid);
	if (t != NULL) {
		ginfo->card = t->card ? t->card->number : -1;
		if (t->hw.flags & SNDRV_TIMER_HW_SLAVE)
			ginfo->flags |= SNDRV_TIMER_FLG_SLAVE;
		strlcpy(ginfo->id, t->id, sizeof(ginfo->id));
		strlcpy(ginfo->name, t->name, sizeof(ginfo->name));
		ginfo->resolution = t->hw.resolution;
		if (t->hw.resolution_min > 0) {
			ginfo->resolution_min = t->hw.resolution_min;
			ginfo->resolution_max = t->hw.resolution_max;
		}
		list_for_each(p, &t->open_list_head) {
			ginfo->clients++;
		}
	} else {
		err = -ENODEV;
	}
1519
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
1520 1521 1522 1523 1524 1525
	if (err >= 0 && copy_to_user(_ginfo, ginfo, sizeof(*ginfo)))
		err = -EFAULT;
	kfree(ginfo);
	return err;
}

1526
static int timer_set_gparams(struct snd_timer_gparams *gparams)
L
Linus Torvalds 已提交
1527
{
1528
	struct snd_timer *t;
L
Linus Torvalds 已提交
1529 1530
	int err;

1531
	mutex_lock(&register_mutex);
1532
	t = snd_timer_find(&gparams->tid);
1533
	if (!t) {
L
Linus Torvalds 已提交
1534
		err = -ENODEV;
1535 1536 1537 1538 1539 1540 1541 1542 1543
		goto _error;
	}
	if (!list_empty(&t->open_list_head)) {
		err = -EBUSY;
		goto _error;
	}
	if (!t->hw.set_period) {
		err = -ENOSYS;
		goto _error;
L
Linus Torvalds 已提交
1544
	}
1545
	err = t->hw.set_period(t, gparams->period_num, gparams->period_den);
1546
_error:
1547
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
1548 1549 1550
	return err;
}

1551 1552 1553 1554 1555 1556 1557 1558 1559 1560
static int snd_timer_user_gparams(struct file *file,
				  struct snd_timer_gparams __user *_gparams)
{
	struct snd_timer_gparams gparams;

	if (copy_from_user(&gparams, _gparams, sizeof(gparams)))
		return -EFAULT;
	return timer_set_gparams(&gparams);
}

1561
static int snd_timer_user_gstatus(struct file *file,
1562
				  struct snd_timer_gstatus __user *_gstatus)
L
Linus Torvalds 已提交
1563
{
1564 1565 1566
	struct snd_timer_gstatus gstatus;
	struct snd_timer_id tid;
	struct snd_timer *t;
L
Linus Torvalds 已提交
1567 1568 1569 1570 1571 1572 1573
	int err = 0;

	if (copy_from_user(&gstatus, _gstatus, sizeof(gstatus)))
		return -EFAULT;
	tid = gstatus.tid;
	memset(&gstatus, 0, sizeof(gstatus));
	gstatus.tid = tid;
1574
	mutex_lock(&register_mutex);
L
Linus Torvalds 已提交
1575 1576 1577 1578 1579 1580 1581
	t = snd_timer_find(&tid);
	if (t != NULL) {
		if (t->hw.c_resolution)
			gstatus.resolution = t->hw.c_resolution(t);
		else
			gstatus.resolution = t->hw.resolution;
		if (t->hw.precise_resolution) {
1582 1583
			t->hw.precise_resolution(t, &gstatus.resolution_num,
						 &gstatus.resolution_den);
L
Linus Torvalds 已提交
1584 1585 1586 1587 1588 1589 1590
		} else {
			gstatus.resolution_num = gstatus.resolution;
			gstatus.resolution_den = 1000000000uL;
		}
	} else {
		err = -ENODEV;
	}
1591
	mutex_unlock(&register_mutex);
L
Linus Torvalds 已提交
1592 1593 1594 1595 1596
	if (err >= 0 && copy_to_user(_gstatus, &gstatus, sizeof(gstatus)))
		err = -EFAULT;
	return err;
}

1597
static int snd_timer_user_tselect(struct file *file,
1598
				  struct snd_timer_select __user *_tselect)
L
Linus Torvalds 已提交
1599
{
1600 1601
	struct snd_timer_user *tu;
	struct snd_timer_select tselect;
L
Linus Torvalds 已提交
1602
	char str[32];
1603
	int err = 0;
1604

L
Linus Torvalds 已提交
1605
	tu = file->private_data;
1606
	if (tu->timeri) {
L
Linus Torvalds 已提交
1607
		snd_timer_close(tu->timeri);
1608 1609 1610 1611 1612 1613
		tu->timeri = NULL;
	}
	if (copy_from_user(&tselect, _tselect, sizeof(tselect))) {
		err = -EFAULT;
		goto __err;
	}
L
Linus Torvalds 已提交
1614 1615 1616
	sprintf(str, "application %i", current->pid);
	if (tselect.id.dev_class != SNDRV_TIMER_CLASS_SLAVE)
		tselect.id.dev_sclass = SNDRV_TIMER_SCLASS_APPLICATION;
1617 1618
	err = snd_timer_open(&tu->timeri, str, &tselect.id, current->pid);
	if (err < 0)
1619
		goto __err;
L
Linus Torvalds 已提交
1620

1621
	tu->qhead = tu->qtail = tu->qused = 0;
1622 1623 1624 1625
	kfree(tu->queue);
	tu->queue = NULL;
	kfree(tu->tqueue);
	tu->tqueue = NULL;
L
Linus Torvalds 已提交
1626
	if (tu->tread) {
1627
		tu->tqueue = kmalloc(tu->queue_size * sizeof(struct snd_timer_tread),
1628
				     GFP_KERNEL);
1629 1630
		if (tu->tqueue == NULL)
			err = -ENOMEM;
L
Linus Torvalds 已提交
1631
	} else {
1632
		tu->queue = kmalloc(tu->queue_size * sizeof(struct snd_timer_read),
1633
				    GFP_KERNEL);
1634 1635
		if (tu->queue == NULL)
			err = -ENOMEM;
L
Linus Torvalds 已提交
1636
	}
1637

1638 1639 1640 1641 1642
      	if (err < 0) {
		snd_timer_close(tu->timeri);
      		tu->timeri = NULL;
      	} else {
		tu->timeri->flags |= SNDRV_TIMER_IFLG_FAST;
1643 1644
		tu->timeri->callback = tu->tread
			? snd_timer_user_tinterrupt : snd_timer_user_interrupt;
1645 1646
		tu->timeri->ccallback = snd_timer_user_ccallback;
		tu->timeri->callback_data = (void *)tu;
1647
		tu->timeri->disconnect = snd_timer_user_disconnect;
1648 1649 1650 1651
	}

      __err:
	return err;
L
Linus Torvalds 已提交
1652 1653
}

1654
static int snd_timer_user_info(struct file *file,
1655
			       struct snd_timer_info __user *_info)
L
Linus Torvalds 已提交
1656
{
1657 1658 1659
	struct snd_timer_user *tu;
	struct snd_timer_info *info;
	struct snd_timer *t;
L
Linus Torvalds 已提交
1660 1661 1662
	int err = 0;

	tu = file->private_data;
1663 1664
	if (!tu->timeri)
		return -EBADFD;
L
Linus Torvalds 已提交
1665
	t = tu->timeri->timer;
1666 1667
	if (!t)
		return -EBADFD;
L
Linus Torvalds 已提交
1668

1669
	info = kzalloc(sizeof(*info), GFP_KERNEL);
L
Linus Torvalds 已提交
1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683
	if (! info)
		return -ENOMEM;
	info->card = t->card ? t->card->number : -1;
	if (t->hw.flags & SNDRV_TIMER_HW_SLAVE)
		info->flags |= SNDRV_TIMER_FLG_SLAVE;
	strlcpy(info->id, t->id, sizeof(info->id));
	strlcpy(info->name, t->name, sizeof(info->name));
	info->resolution = t->hw.resolution;
	if (copy_to_user(_info, info, sizeof(*_info)))
		err = -EFAULT;
	kfree(info);
	return err;
}

1684
static int snd_timer_user_params(struct file *file,
1685
				 struct snd_timer_params __user *_params)
L
Linus Torvalds 已提交
1686
{
1687 1688 1689 1690 1691
	struct snd_timer_user *tu;
	struct snd_timer_params params;
	struct snd_timer *t;
	struct snd_timer_read *tr;
	struct snd_timer_tread *ttr;
L
Linus Torvalds 已提交
1692
	int err;
1693

L
Linus Torvalds 已提交
1694
	tu = file->private_data;
1695 1696
	if (!tu->timeri)
		return -EBADFD;
L
Linus Torvalds 已提交
1697
	t = tu->timeri->timer;
1698 1699
	if (!t)
		return -EBADFD;
L
Linus Torvalds 已提交
1700 1701
	if (copy_from_user(&params, _params, sizeof(params)))
		return -EFAULT;
1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716
	if (!(t->hw.flags & SNDRV_TIMER_HW_SLAVE)) {
		u64 resolution;

		if (params.ticks < 1) {
			err = -EINVAL;
			goto _end;
		}

		/* Don't allow resolution less than 1ms */
		resolution = snd_timer_resolution(tu->timeri);
		resolution *= params.ticks;
		if (resolution < 1000000) {
			err = -EINVAL;
			goto _end;
		}
L
Linus Torvalds 已提交
1717
	}
1718 1719
	if (params.queue_size > 0 &&
	    (params.queue_size < 32 || params.queue_size > 1024)) {
L
Linus Torvalds 已提交
1720 1721 1722 1723 1724 1725 1726 1727 1728
		err = -EINVAL;
		goto _end;
	}
	if (params.filter & ~((1<<SNDRV_TIMER_EVENT_RESOLUTION)|
			      (1<<SNDRV_TIMER_EVENT_TICK)|
			      (1<<SNDRV_TIMER_EVENT_START)|
			      (1<<SNDRV_TIMER_EVENT_STOP)|
			      (1<<SNDRV_TIMER_EVENT_CONTINUE)|
			      (1<<SNDRV_TIMER_EVENT_PAUSE)|
1729 1730
			      (1<<SNDRV_TIMER_EVENT_SUSPEND)|
			      (1<<SNDRV_TIMER_EVENT_RESUME)|
L
Linus Torvalds 已提交
1731 1732 1733
			      (1<<SNDRV_TIMER_EVENT_MSTART)|
			      (1<<SNDRV_TIMER_EVENT_MSTOP)|
			      (1<<SNDRV_TIMER_EVENT_MCONTINUE)|
1734 1735
			      (1<<SNDRV_TIMER_EVENT_MPAUSE)|
			      (1<<SNDRV_TIMER_EVENT_MSUSPEND)|
1736
			      (1<<SNDRV_TIMER_EVENT_MRESUME))) {
L
Linus Torvalds 已提交
1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751
		err = -EINVAL;
		goto _end;
	}
	snd_timer_stop(tu->timeri);
	spin_lock_irq(&t->lock);
	tu->timeri->flags &= ~(SNDRV_TIMER_IFLG_AUTO|
			       SNDRV_TIMER_IFLG_EXCLUSIVE|
			       SNDRV_TIMER_IFLG_EARLY_EVENT);
	if (params.flags & SNDRV_TIMER_PSFLG_AUTO)
		tu->timeri->flags |= SNDRV_TIMER_IFLG_AUTO;
	if (params.flags & SNDRV_TIMER_PSFLG_EXCLUSIVE)
		tu->timeri->flags |= SNDRV_TIMER_IFLG_EXCLUSIVE;
	if (params.flags & SNDRV_TIMER_PSFLG_EARLY_EVENT)
		tu->timeri->flags |= SNDRV_TIMER_IFLG_EARLY_EVENT;
	spin_unlock_irq(&t->lock);
1752 1753
	if (params.queue_size > 0 &&
	    (unsigned int)tu->queue_size != params.queue_size) {
L
Linus Torvalds 已提交
1754
		if (tu->tread) {
1755 1756
			ttr = kmalloc(params.queue_size * sizeof(*ttr),
				      GFP_KERNEL);
L
Linus Torvalds 已提交
1757 1758 1759 1760 1761 1762
			if (ttr) {
				kfree(tu->tqueue);
				tu->queue_size = params.queue_size;
				tu->tqueue = ttr;
			}
		} else {
1763 1764
			tr = kmalloc(params.queue_size * sizeof(*tr),
				     GFP_KERNEL);
L
Linus Torvalds 已提交
1765 1766 1767 1768 1769 1770 1771 1772 1773 1774
			if (tr) {
				kfree(tu->queue);
				tu->queue_size = params.queue_size;
				tu->queue = tr;
			}
		}
	}
	tu->qhead = tu->qtail = tu->qused = 0;
	if (tu->timeri->flags & SNDRV_TIMER_IFLG_EARLY_EVENT) {
		if (tu->tread) {
1775
			struct snd_timer_tread tread;
1776
			memset(&tread, 0, sizeof(tread));
L
Linus Torvalds 已提交
1777 1778 1779 1780 1781 1782
			tread.event = SNDRV_TIMER_EVENT_EARLY;
			tread.tstamp.tv_sec = 0;
			tread.tstamp.tv_nsec = 0;
			tread.val = 0;
			snd_timer_user_append_to_tqueue(tu, &tread);
		} else {
1783
			struct snd_timer_read *r = &tu->queue[0];
L
Linus Torvalds 已提交
1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798
			r->resolution = 0;
			r->ticks = 0;
			tu->qused++;
			tu->qtail++;
		}
	}
	tu->filter = params.filter;
	tu->ticks = params.ticks;
	err = 0;
 _end:
	if (copy_to_user(_params, &params, sizeof(params)))
		return -EFAULT;
	return err;
}

1799
static int snd_timer_user_status(struct file *file,
1800
				 struct snd_timer_status __user *_status)
L
Linus Torvalds 已提交
1801
{
1802 1803
	struct snd_timer_user *tu;
	struct snd_timer_status status;
1804

L
Linus Torvalds 已提交
1805
	tu = file->private_data;
1806 1807
	if (!tu->timeri)
		return -EBADFD;
L
Linus Torvalds 已提交
1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823
	memset(&status, 0, sizeof(status));
	status.tstamp = tu->tstamp;
	status.resolution = snd_timer_resolution(tu->timeri);
	status.lost = tu->timeri->lost;
	status.overrun = tu->overrun;
	spin_lock_irq(&tu->qlock);
	status.queue = tu->qused;
	spin_unlock_irq(&tu->qlock);
	if (copy_to_user(_status, &status, sizeof(status)))
		return -EFAULT;
	return 0;
}

static int snd_timer_user_start(struct file *file)
{
	int err;
1824
	struct snd_timer_user *tu;
1825

L
Linus Torvalds 已提交
1826
	tu = file->private_data;
1827 1828
	if (!tu->timeri)
		return -EBADFD;
L
Linus Torvalds 已提交
1829 1830 1831 1832 1833 1834 1835 1836 1837
	snd_timer_stop(tu->timeri);
	tu->timeri->lost = 0;
	tu->last_resolution = 0;
	return (err = snd_timer_start(tu->timeri, tu->ticks)) < 0 ? err : 0;
}

static int snd_timer_user_stop(struct file *file)
{
	int err;
1838
	struct snd_timer_user *tu;
1839

L
Linus Torvalds 已提交
1840
	tu = file->private_data;
1841 1842
	if (!tu->timeri)
		return -EBADFD;
L
Linus Torvalds 已提交
1843 1844 1845 1846 1847 1848
	return (err = snd_timer_stop(tu->timeri)) < 0 ? err : 0;
}

static int snd_timer_user_continue(struct file *file)
{
	int err;
1849
	struct snd_timer_user *tu;
1850

L
Linus Torvalds 已提交
1851
	tu = file->private_data;
1852 1853
	if (!tu->timeri)
		return -EBADFD;
1854 1855 1856
	/* start timer instead of continue if it's not used before */
	if (!(tu->timeri->flags & SNDRV_TIMER_IFLG_PAUSED))
		return snd_timer_user_start(file);
L
Linus Torvalds 已提交
1857 1858 1859 1860
	tu->timeri->lost = 0;
	return (err = snd_timer_continue(tu->timeri)) < 0 ? err : 0;
}

1861 1862 1863
static int snd_timer_user_pause(struct file *file)
{
	int err;
1864
	struct snd_timer_user *tu;
1865

1866
	tu = file->private_data;
1867 1868
	if (!tu->timeri)
		return -EBADFD;
1869
	return (err = snd_timer_pause(tu->timeri)) < 0 ? err : 0;
1870 1871
}

1872 1873 1874 1875 1876 1877 1878
enum {
	SNDRV_TIMER_IOCTL_START_OLD = _IO('T', 0x20),
	SNDRV_TIMER_IOCTL_STOP_OLD = _IO('T', 0x21),
	SNDRV_TIMER_IOCTL_CONTINUE_OLD = _IO('T', 0x22),
	SNDRV_TIMER_IOCTL_PAUSE_OLD = _IO('T', 0x23),
};

1879
static long __snd_timer_user_ioctl(struct file *file, unsigned int cmd,
1880
				 unsigned long arg)
L
Linus Torvalds 已提交
1881
{
1882
	struct snd_timer_user *tu;
L
Linus Torvalds 已提交
1883 1884
	void __user *argp = (void __user *)arg;
	int __user *p = argp;
1885

L
Linus Torvalds 已提交
1886 1887 1888 1889 1890 1891 1892 1893 1894
	tu = file->private_data;
	switch (cmd) {
	case SNDRV_TIMER_IOCTL_PVERSION:
		return put_user(SNDRV_TIMER_VERSION, p) ? -EFAULT : 0;
	case SNDRV_TIMER_IOCTL_NEXT_DEVICE:
		return snd_timer_user_next_device(argp);
	case SNDRV_TIMER_IOCTL_TREAD:
	{
		int xarg;
1895

1896
		if (tu->timeri)	/* too late */
L
Linus Torvalds 已提交
1897
			return -EBUSY;
1898
		if (get_user(xarg, p))
L
Linus Torvalds 已提交
1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917
			return -EFAULT;
		tu->tread = xarg ? 1 : 0;
		return 0;
	}
	case SNDRV_TIMER_IOCTL_GINFO:
		return snd_timer_user_ginfo(file, argp);
	case SNDRV_TIMER_IOCTL_GPARAMS:
		return snd_timer_user_gparams(file, argp);
	case SNDRV_TIMER_IOCTL_GSTATUS:
		return snd_timer_user_gstatus(file, argp);
	case SNDRV_TIMER_IOCTL_SELECT:
		return snd_timer_user_tselect(file, argp);
	case SNDRV_TIMER_IOCTL_INFO:
		return snd_timer_user_info(file, argp);
	case SNDRV_TIMER_IOCTL_PARAMS:
		return snd_timer_user_params(file, argp);
	case SNDRV_TIMER_IOCTL_STATUS:
		return snd_timer_user_status(file, argp);
	case SNDRV_TIMER_IOCTL_START:
1918
	case SNDRV_TIMER_IOCTL_START_OLD:
L
Linus Torvalds 已提交
1919 1920
		return snd_timer_user_start(file);
	case SNDRV_TIMER_IOCTL_STOP:
1921
	case SNDRV_TIMER_IOCTL_STOP_OLD:
L
Linus Torvalds 已提交
1922 1923
		return snd_timer_user_stop(file);
	case SNDRV_TIMER_IOCTL_CONTINUE:
1924
	case SNDRV_TIMER_IOCTL_CONTINUE_OLD:
L
Linus Torvalds 已提交
1925
		return snd_timer_user_continue(file);
1926
	case SNDRV_TIMER_IOCTL_PAUSE:
1927
	case SNDRV_TIMER_IOCTL_PAUSE_OLD:
1928
		return snd_timer_user_pause(file);
L
Linus Torvalds 已提交
1929 1930 1931 1932
	}
	return -ENOTTY;
}

1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944
static long snd_timer_user_ioctl(struct file *file, unsigned int cmd,
				 unsigned long arg)
{
	struct snd_timer_user *tu = file->private_data;
	long ret;

	mutex_lock(&tu->ioctl_lock);
	ret = __snd_timer_user_ioctl(file, cmd, arg);
	mutex_unlock(&tu->ioctl_lock);
	return ret;
}

L
Linus Torvalds 已提交
1945 1946
static int snd_timer_user_fasync(int fd, struct file * file, int on)
{
1947
	struct snd_timer_user *tu;
1948

L
Linus Torvalds 已提交
1949
	tu = file->private_data;
1950
	return fasync_helper(fd, file, on, &tu->fasync);
L
Linus Torvalds 已提交
1951 1952
}

1953 1954
static ssize_t snd_timer_user_read(struct file *file, char __user *buffer,
				   size_t count, loff_t *offset)
L
Linus Torvalds 已提交
1955
{
1956
	struct snd_timer_user *tu;
L
Linus Torvalds 已提交
1957
	long result = 0, unit;
1958
	int qhead;
L
Linus Torvalds 已提交
1959
	int err = 0;
1960

L
Linus Torvalds 已提交
1961
	tu = file->private_data;
1962
	unit = tu->tread ? sizeof(struct snd_timer_tread) : sizeof(struct snd_timer_read);
1963
	mutex_lock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1964 1965 1966
	spin_lock_irq(&tu->qlock);
	while ((long)count - result >= unit) {
		while (!tu->qused) {
1967
			wait_queue_entry_t wait;
L
Linus Torvalds 已提交
1968 1969 1970

			if ((file->f_flags & O_NONBLOCK) != 0 || result > 0) {
				err = -EAGAIN;
1971
				goto _error;
L
Linus Torvalds 已提交
1972 1973 1974 1975 1976 1977 1978
			}

			set_current_state(TASK_INTERRUPTIBLE);
			init_waitqueue_entry(&wait, current);
			add_wait_queue(&tu->qchange_sleep, &wait);

			spin_unlock_irq(&tu->qlock);
1979
			mutex_unlock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1980
			schedule();
1981
			mutex_lock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
1982 1983 1984 1985
			spin_lock_irq(&tu->qlock);

			remove_wait_queue(&tu->qchange_sleep, &wait);

1986 1987
			if (tu->disconnected) {
				err = -ENODEV;
1988
				goto _error;
1989
			}
L
Linus Torvalds 已提交
1990 1991
			if (signal_pending(current)) {
				err = -ERESTARTSYS;
1992
				goto _error;
L
Linus Torvalds 已提交
1993 1994 1995
			}
		}

1996 1997
		qhead = tu->qhead++;
		tu->qhead %= tu->queue_size;
1998
		tu->qused--;
L
Linus Torvalds 已提交
1999 2000 2001
		spin_unlock_irq(&tu->qlock);

		if (tu->tread) {
2002 2003
			if (copy_to_user(buffer, &tu->tqueue[qhead],
					 sizeof(struct snd_timer_tread)))
L
Linus Torvalds 已提交
2004 2005
				err = -EFAULT;
		} else {
2006 2007
			if (copy_to_user(buffer, &tu->queue[qhead],
					 sizeof(struct snd_timer_read)))
L
Linus Torvalds 已提交
2008 2009 2010 2011
				err = -EFAULT;
		}

		spin_lock_irq(&tu->qlock);
2012 2013 2014 2015
		if (err < 0)
			goto _error;
		result += unit;
		buffer += unit;
L
Linus Torvalds 已提交
2016 2017
	}
 _error:
2018
	spin_unlock_irq(&tu->qlock);
2019
	mutex_unlock(&tu->ioctl_lock);
L
Linus Torvalds 已提交
2020 2021 2022 2023 2024 2025
	return result > 0 ? result : err;
}

static unsigned int snd_timer_user_poll(struct file *file, poll_table * wait)
{
        unsigned int mask;
2026
        struct snd_timer_user *tu;
L
Linus Torvalds 已提交
2027 2028 2029 2030

        tu = file->private_data;

        poll_wait(file, &tu->qchange_sleep, wait);
2031

L
Linus Torvalds 已提交
2032 2033 2034
	mask = 0;
	if (tu->qused)
		mask |= POLLIN | POLLRDNORM;
2035 2036
	if (tu->disconnected)
		mask |= POLLERR;
L
Linus Torvalds 已提交
2037 2038 2039 2040 2041 2042 2043 2044 2045 2046

	return mask;
}

#ifdef CONFIG_COMPAT
#include "timer_compat.c"
#else
#define snd_timer_user_ioctl_compat	NULL
#endif

2047
static const struct file_operations snd_timer_f_ops =
L
Linus Torvalds 已提交
2048 2049 2050 2051 2052
{
	.owner =	THIS_MODULE,
	.read =		snd_timer_user_read,
	.open =		snd_timer_user_open,
	.release =	snd_timer_user_release,
2053
	.llseek =	no_llseek,
L
Linus Torvalds 已提交
2054 2055 2056 2057 2058 2059
	.poll =		snd_timer_user_poll,
	.unlocked_ioctl =	snd_timer_user_ioctl,
	.compat_ioctl =	snd_timer_user_ioctl_compat,
	.fasync = 	snd_timer_user_fasync,
};

2060 2061 2062 2063 2064 2065 2066 2067 2068
/* unregister the system timer */
static void snd_timer_free_all(void)
{
	struct snd_timer *timer, *n;

	list_for_each_entry_safe(timer, n, &snd_timer_list, device_list)
		snd_timer_free(timer);
}

2069 2070
static struct device timer_dev;

L
Linus Torvalds 已提交
2071 2072 2073 2074 2075 2076 2077 2078
/*
 *  ENTRY functions
 */

static int __init alsa_timer_init(void)
{
	int err;

2079 2080 2081
	snd_device_initialize(&timer_dev, NULL);
	dev_set_name(&timer_dev, "timer");

L
Linus Torvalds 已提交
2082
#ifdef SNDRV_OSS_INFO_DEV_TIMERS
2083 2084
	snd_oss_info_register(SNDRV_OSS_INFO_DEV_TIMERS, SNDRV_CARDS - 1,
			      "system timer");
L
Linus Torvalds 已提交
2085
#endif
2086

2087 2088
	err = snd_timer_register_system();
	if (err < 0) {
2089
		pr_err("ALSA: unable to register system timer (%i)\n", err);
2090
		put_device(&timer_dev);
2091 2092 2093
		return err;
	}

2094 2095
	err = snd_register_device(SNDRV_DEVICE_TYPE_TIMER, NULL, 0,
				  &snd_timer_f_ops, NULL, &timer_dev);
2096
	if (err < 0) {
2097
		pr_err("ALSA: unable to register timer device (%i)\n", err);
2098
		snd_timer_free_all();
2099
		put_device(&timer_dev);
2100 2101 2102
		return err;
	}

2103
	snd_timer_proc_init();
L
Linus Torvalds 已提交
2104 2105 2106 2107 2108
	return 0;
}

static void __exit alsa_timer_exit(void)
{
2109
	snd_unregister_device(&timer_dev);
2110
	snd_timer_free_all();
2111
	put_device(&timer_dev);
2112
	snd_timer_proc_done();
L
Linus Torvalds 已提交
2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133
#ifdef SNDRV_OSS_INFO_DEV_TIMERS
	snd_oss_info_unregister(SNDRV_OSS_INFO_DEV_TIMERS, SNDRV_CARDS - 1);
#endif
}

module_init(alsa_timer_init)
module_exit(alsa_timer_exit)

EXPORT_SYMBOL(snd_timer_open);
EXPORT_SYMBOL(snd_timer_close);
EXPORT_SYMBOL(snd_timer_resolution);
EXPORT_SYMBOL(snd_timer_start);
EXPORT_SYMBOL(snd_timer_stop);
EXPORT_SYMBOL(snd_timer_continue);
EXPORT_SYMBOL(snd_timer_pause);
EXPORT_SYMBOL(snd_timer_new);
EXPORT_SYMBOL(snd_timer_notify);
EXPORT_SYMBOL(snd_timer_global_new);
EXPORT_SYMBOL(snd_timer_global_free);
EXPORT_SYMBOL(snd_timer_global_register);
EXPORT_SYMBOL(snd_timer_interrupt);
新手
引导
客服 返回
顶部