Linux 6.14-rc1
[linux-stable.git] / sound / drivers / aloop.c
blobeb8a68a06c4d9c823a617a86729083fed3b55078
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3 * Loopback soundcard
5 * Original code:
6 * Copyright (c) by Jaroslav Kysela <perex@perex.cz>
8 * More accurate positioning and full-duplex support:
9 * Copyright (c) Ahmet İnan <ainan at mathematik.uni-freiburg.de>
11 * Major (almost complete) rewrite:
12 * Copyright (c) by Takashi Iwai <tiwai@suse.de>
14 * A next major update in 2010 (separate timers for playback and capture):
15 * Copyright (c) Jaroslav Kysela <perex@perex.cz>
18 #include <linux/init.h>
19 #include <linux/jiffies.h>
20 #include <linux/slab.h>
21 #include <linux/time.h>
22 #include <linux/wait.h>
23 #include <linux/module.h>
24 #include <linux/platform_device.h>
25 #include <sound/core.h>
26 #include <sound/control.h>
27 #include <sound/pcm.h>
28 #include <sound/pcm_params.h>
29 #include <sound/info.h>
30 #include <sound/initval.h>
31 #include <sound/timer.h>
33 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
34 MODULE_DESCRIPTION("A loopback soundcard");
35 MODULE_LICENSE("GPL");
37 #define MAX_PCM_SUBSTREAMS 8
39 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 0-MAX */
40 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
41 static bool enable[SNDRV_CARDS] = {1, [1 ... (SNDRV_CARDS - 1)] = 0};
42 static int pcm_substreams[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 8};
43 static int pcm_notify[SNDRV_CARDS];
44 static char *timer_source[SNDRV_CARDS];
46 module_param_array(index, int, NULL, 0444);
47 MODULE_PARM_DESC(index, "Index value for loopback soundcard.");
48 module_param_array(id, charp, NULL, 0444);
49 MODULE_PARM_DESC(id, "ID string for loopback soundcard.");
50 module_param_array(enable, bool, NULL, 0444);
51 MODULE_PARM_DESC(enable, "Enable this loopback soundcard.");
52 module_param_array(pcm_substreams, int, NULL, 0444);
53 MODULE_PARM_DESC(pcm_substreams, "PCM substreams # (1-8) for loopback driver.");
54 module_param_array(pcm_notify, int, NULL, 0444);
55 MODULE_PARM_DESC(pcm_notify, "Break capture when PCM format/rate/channels changes.");
56 module_param_array(timer_source, charp, NULL, 0444);
57 MODULE_PARM_DESC(timer_source, "Sound card name or number and device/subdevice number of timer to be used. Empty string for jiffies timer [default].");
59 #define NO_PITCH 100000
61 #define CABLE_VALID_PLAYBACK BIT(SNDRV_PCM_STREAM_PLAYBACK)
62 #define CABLE_VALID_CAPTURE BIT(SNDRV_PCM_STREAM_CAPTURE)
63 #define CABLE_VALID_BOTH (CABLE_VALID_PLAYBACK | CABLE_VALID_CAPTURE)
65 struct loopback_cable;
66 struct loopback_pcm;
68 struct loopback_ops {
69 /* optional
70 * call in loopback->cable_lock
72 int (*open)(struct loopback_pcm *dpcm);
73 /* required
74 * call in cable->lock
76 int (*start)(struct loopback_pcm *dpcm);
77 /* required
78 * call in cable->lock
80 int (*stop)(struct loopback_pcm *dpcm);
81 /* optional */
82 int (*stop_sync)(struct loopback_pcm *dpcm);
83 /* optional */
84 int (*close_substream)(struct loopback_pcm *dpcm);
85 /* optional
86 * call in loopback->cable_lock
88 int (*close_cable)(struct loopback_pcm *dpcm);
89 /* optional
90 * call in cable->lock
92 unsigned int (*pos_update)(struct loopback_cable *cable);
93 /* optional */
94 void (*dpcm_info)(struct loopback_pcm *dpcm,
95 struct snd_info_buffer *buffer);
98 struct loopback_cable {
99 spinlock_t lock;
100 struct loopback_pcm *streams[2];
101 struct snd_pcm_hardware hw;
102 /* flags */
103 unsigned int valid;
104 unsigned int running;
105 unsigned int pause;
106 /* timer specific */
107 const struct loopback_ops *ops;
108 /* If sound timer is used */
109 struct {
110 int stream;
111 struct snd_timer_id id;
112 struct work_struct event_work;
113 struct snd_timer_instance *instance;
114 } snd_timer;
117 struct loopback_setup {
118 unsigned int notify: 1;
119 unsigned int rate_shift;
120 snd_pcm_format_t format;
121 unsigned int rate;
122 snd_pcm_access_t access;
123 unsigned int channels;
124 struct snd_ctl_elem_id active_id;
125 struct snd_ctl_elem_id format_id;
126 struct snd_ctl_elem_id rate_id;
127 struct snd_ctl_elem_id channels_id;
128 struct snd_ctl_elem_id access_id;
131 struct loopback {
132 struct snd_card *card;
133 struct mutex cable_lock;
134 struct loopback_cable *cables[MAX_PCM_SUBSTREAMS][2];
135 struct snd_pcm *pcm[2];
136 struct loopback_setup setup[MAX_PCM_SUBSTREAMS][2];
137 const char *timer_source;
140 struct loopback_pcm {
141 struct loopback *loopback;
142 struct snd_pcm_substream *substream;
143 struct loopback_cable *cable;
144 unsigned int pcm_buffer_size;
145 unsigned int buf_pos; /* position in buffer */
146 unsigned int silent_size;
147 /* PCM parameters */
148 unsigned int pcm_period_size;
149 unsigned int pcm_bps; /* bytes per second */
150 unsigned int pcm_salign; /* bytes per sample * channels */
151 unsigned int pcm_rate_shift; /* rate shift value */
152 /* flags */
153 unsigned int period_update_pending :1;
154 /* timer stuff */
155 unsigned int irq_pos; /* fractional IRQ position in jiffies
156 * ticks
158 unsigned int period_size_frac; /* period size in jiffies ticks */
159 unsigned int last_drift;
160 unsigned long last_jiffies;
161 /* If jiffies timer is used */
162 struct timer_list timer;
164 /* size of per channel buffer in case of non-interleaved access */
165 unsigned int channel_buf_n;
168 static struct platform_device *devices[SNDRV_CARDS];
170 static inline unsigned int byte_pos(struct loopback_pcm *dpcm, unsigned int x)
172 if (dpcm->pcm_rate_shift == NO_PITCH) {
173 x /= HZ;
174 } else {
175 x = div_u64(NO_PITCH * (unsigned long long)x,
176 HZ * (unsigned long long)dpcm->pcm_rate_shift);
178 return x - (x % dpcm->pcm_salign);
181 static inline unsigned int frac_pos(struct loopback_pcm *dpcm, unsigned int x)
183 if (dpcm->pcm_rate_shift == NO_PITCH) { /* no pitch */
184 return x * HZ;
185 } else {
186 x = div_u64(dpcm->pcm_rate_shift * (unsigned long long)x * HZ,
187 NO_PITCH);
189 return x;
192 static inline struct loopback_setup *get_setup(struct loopback_pcm *dpcm)
194 int device = dpcm->substream->pstr->pcm->device;
196 if (dpcm->substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
197 device ^= 1;
198 return &dpcm->loopback->setup[dpcm->substream->number][device];
201 static inline unsigned int get_notify(struct loopback_pcm *dpcm)
203 return get_setup(dpcm)->notify;
206 static inline unsigned int get_rate_shift(struct loopback_pcm *dpcm)
208 return get_setup(dpcm)->rate_shift;
211 /* call in cable->lock */
212 static int loopback_jiffies_timer_start(struct loopback_pcm *dpcm)
214 unsigned long tick;
215 unsigned int rate_shift = get_rate_shift(dpcm);
217 if (rate_shift != dpcm->pcm_rate_shift) {
218 dpcm->pcm_rate_shift = rate_shift;
219 dpcm->period_size_frac = frac_pos(dpcm, dpcm->pcm_period_size);
221 if (dpcm->period_size_frac <= dpcm->irq_pos) {
222 dpcm->irq_pos %= dpcm->period_size_frac;
223 dpcm->period_update_pending = 1;
225 tick = dpcm->period_size_frac - dpcm->irq_pos;
226 tick = DIV_ROUND_UP(tick, dpcm->pcm_bps);
227 mod_timer(&dpcm->timer, jiffies + tick);
229 return 0;
232 /* call in cable->lock */
233 static int loopback_snd_timer_start(struct loopback_pcm *dpcm)
235 struct loopback_cable *cable = dpcm->cable;
236 int err;
238 /* Loopback device has to use same period as timer card. Therefore
239 * wake up for each snd_pcm_period_elapsed() call of timer card.
241 err = snd_timer_start(cable->snd_timer.instance, 1);
242 if (err < 0) {
243 /* do not report error if trying to start but already
244 * running. For example called by opposite substream
245 * of the same cable
247 if (err == -EBUSY)
248 return 0;
250 pcm_err(dpcm->substream->pcm,
251 "snd_timer_start(%d,%d,%d) failed with %d",
252 cable->snd_timer.id.card,
253 cable->snd_timer.id.device,
254 cable->snd_timer.id.subdevice,
255 err);
258 return err;
261 /* call in cable->lock */
262 static inline int loopback_jiffies_timer_stop(struct loopback_pcm *dpcm)
264 del_timer(&dpcm->timer);
265 dpcm->timer.expires = 0;
267 return 0;
270 /* call in cable->lock */
271 static int loopback_snd_timer_stop(struct loopback_pcm *dpcm)
273 struct loopback_cable *cable = dpcm->cable;
274 int err;
276 /* only stop if both devices (playback and capture) are not running */
277 if (cable->running ^ cable->pause)
278 return 0;
280 err = snd_timer_stop(cable->snd_timer.instance);
281 if (err < 0) {
282 pcm_err(dpcm->substream->pcm,
283 "snd_timer_stop(%d,%d,%d) failed with %d",
284 cable->snd_timer.id.card,
285 cable->snd_timer.id.device,
286 cable->snd_timer.id.subdevice,
287 err);
290 return err;
293 static inline int loopback_jiffies_timer_stop_sync(struct loopback_pcm *dpcm)
295 del_timer_sync(&dpcm->timer);
297 return 0;
300 /* call in loopback->cable_lock */
301 static int loopback_snd_timer_close_cable(struct loopback_pcm *dpcm)
303 struct loopback_cable *cable = dpcm->cable;
305 /* snd_timer was not opened */
306 if (!cable->snd_timer.instance)
307 return 0;
309 /* will only be called from free_cable() when other stream was
310 * already closed. Other stream cannot be reopened as long as
311 * loopback->cable_lock is locked. Therefore no need to lock
312 * cable->lock;
314 snd_timer_close(cable->snd_timer.instance);
316 /* wait till drain work has finished if requested */
317 cancel_work_sync(&cable->snd_timer.event_work);
319 snd_timer_instance_free(cable->snd_timer.instance);
320 memset(&cable->snd_timer, 0, sizeof(cable->snd_timer));
322 return 0;
325 static bool is_access_interleaved(snd_pcm_access_t access)
327 switch (access) {
328 case SNDRV_PCM_ACCESS_MMAP_INTERLEAVED:
329 case SNDRV_PCM_ACCESS_RW_INTERLEAVED:
330 return true;
331 default:
332 return false;
336 static int loopback_check_format(struct loopback_cable *cable, int stream)
338 struct snd_pcm_runtime *runtime, *cruntime;
339 struct loopback_setup *setup;
340 struct snd_card *card;
341 int check;
343 if (cable->valid != CABLE_VALID_BOTH) {
344 if (stream == SNDRV_PCM_STREAM_PLAYBACK)
345 goto __notify;
346 return 0;
348 runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
349 substream->runtime;
350 cruntime = cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
351 substream->runtime;
352 check = runtime->format != cruntime->format ||
353 runtime->rate != cruntime->rate ||
354 runtime->channels != cruntime->channels ||
355 is_access_interleaved(runtime->access) !=
356 is_access_interleaved(cruntime->access);
357 if (!check)
358 return 0;
359 if (stream == SNDRV_PCM_STREAM_CAPTURE) {
360 return -EIO;
361 } else {
362 snd_pcm_stop(cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
363 substream, SNDRV_PCM_STATE_DRAINING);
364 __notify:
365 runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
366 substream->runtime;
367 setup = get_setup(cable->streams[SNDRV_PCM_STREAM_PLAYBACK]);
368 card = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->loopback->card;
369 if (setup->format != runtime->format) {
370 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
371 &setup->format_id);
372 setup->format = runtime->format;
374 if (setup->rate != runtime->rate) {
375 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
376 &setup->rate_id);
377 setup->rate = runtime->rate;
379 if (setup->channels != runtime->channels) {
380 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
381 &setup->channels_id);
382 setup->channels = runtime->channels;
384 if (is_access_interleaved(setup->access) !=
385 is_access_interleaved(runtime->access)) {
386 snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
387 &setup->access_id);
388 setup->access = runtime->access;
391 return 0;
394 static void loopback_active_notify(struct loopback_pcm *dpcm)
396 snd_ctl_notify(dpcm->loopback->card,
397 SNDRV_CTL_EVENT_MASK_VALUE,
398 &get_setup(dpcm)->active_id);
401 static int loopback_trigger(struct snd_pcm_substream *substream, int cmd)
403 struct snd_pcm_runtime *runtime = substream->runtime;
404 struct loopback_pcm *dpcm = runtime->private_data;
405 struct loopback_cable *cable = dpcm->cable;
406 int err = 0, stream = 1 << substream->stream;
408 switch (cmd) {
409 case SNDRV_PCM_TRIGGER_START:
410 err = loopback_check_format(cable, substream->stream);
411 if (err < 0)
412 return err;
413 dpcm->last_jiffies = jiffies;
414 dpcm->pcm_rate_shift = 0;
415 dpcm->last_drift = 0;
416 spin_lock(&cable->lock);
417 cable->running |= stream;
418 cable->pause &= ~stream;
419 err = cable->ops->start(dpcm);
420 spin_unlock(&cable->lock);
421 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
422 loopback_active_notify(dpcm);
423 break;
424 case SNDRV_PCM_TRIGGER_STOP:
425 spin_lock(&cable->lock);
426 cable->running &= ~stream;
427 cable->pause &= ~stream;
428 err = cable->ops->stop(dpcm);
429 spin_unlock(&cable->lock);
430 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
431 loopback_active_notify(dpcm);
432 break;
433 case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
434 case SNDRV_PCM_TRIGGER_SUSPEND:
435 spin_lock(&cable->lock);
436 cable->pause |= stream;
437 err = cable->ops->stop(dpcm);
438 spin_unlock(&cable->lock);
439 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
440 loopback_active_notify(dpcm);
441 break;
442 case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
443 case SNDRV_PCM_TRIGGER_RESUME:
444 spin_lock(&cable->lock);
445 dpcm->last_jiffies = jiffies;
446 cable->pause &= ~stream;
447 err = cable->ops->start(dpcm);
448 spin_unlock(&cable->lock);
449 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
450 loopback_active_notify(dpcm);
451 break;
452 default:
453 return -EINVAL;
455 return err;
458 static void params_change(struct snd_pcm_substream *substream)
460 struct snd_pcm_runtime *runtime = substream->runtime;
461 struct loopback_pcm *dpcm = runtime->private_data;
462 struct loopback_cable *cable = dpcm->cable;
464 cable->hw.formats = pcm_format_to_bits(runtime->format);
465 cable->hw.rate_min = runtime->rate;
466 cable->hw.rate_max = runtime->rate;
467 cable->hw.channels_min = runtime->channels;
468 cable->hw.channels_max = runtime->channels;
470 if (cable->snd_timer.instance) {
471 cable->hw.period_bytes_min =
472 frames_to_bytes(runtime, runtime->period_size);
473 cable->hw.period_bytes_max = cable->hw.period_bytes_min;
478 static int loopback_prepare(struct snd_pcm_substream *substream)
480 struct snd_pcm_runtime *runtime = substream->runtime;
481 struct loopback_pcm *dpcm = runtime->private_data;
482 struct loopback_cable *cable = dpcm->cable;
483 int err, bps, salign;
485 if (cable->ops->stop_sync) {
486 err = cable->ops->stop_sync(dpcm);
487 if (err < 0)
488 return err;
491 salign = (snd_pcm_format_physical_width(runtime->format) *
492 runtime->channels) / 8;
493 bps = salign * runtime->rate;
494 if (bps <= 0 || salign <= 0)
495 return -EINVAL;
497 dpcm->buf_pos = 0;
498 dpcm->pcm_buffer_size = frames_to_bytes(runtime, runtime->buffer_size);
499 dpcm->channel_buf_n = dpcm->pcm_buffer_size / runtime->channels;
500 if (substream->stream == SNDRV_PCM_STREAM_CAPTURE) {
501 /* clear capture buffer */
502 dpcm->silent_size = dpcm->pcm_buffer_size;
503 snd_pcm_format_set_silence(runtime->format, runtime->dma_area,
504 runtime->buffer_size * runtime->channels);
507 dpcm->irq_pos = 0;
508 dpcm->period_update_pending = 0;
509 dpcm->pcm_bps = bps;
510 dpcm->pcm_salign = salign;
511 dpcm->pcm_period_size = frames_to_bytes(runtime, runtime->period_size);
513 mutex_lock(&dpcm->loopback->cable_lock);
514 if (!(cable->valid & ~(1 << substream->stream)) ||
515 (get_setup(dpcm)->notify &&
516 substream->stream == SNDRV_PCM_STREAM_PLAYBACK))
517 params_change(substream);
518 cable->valid |= 1 << substream->stream;
519 mutex_unlock(&dpcm->loopback->cable_lock);
521 return 0;
524 static void clear_capture_buf(struct loopback_pcm *dpcm, unsigned int bytes)
526 struct snd_pcm_runtime *runtime = dpcm->substream->runtime;
527 char *dst = runtime->dma_area;
528 unsigned int dst_off = dpcm->buf_pos;
530 if (dpcm->silent_size >= dpcm->pcm_buffer_size)
531 return;
532 if (dpcm->silent_size + bytes > dpcm->pcm_buffer_size)
533 bytes = dpcm->pcm_buffer_size - dpcm->silent_size;
535 for (;;) {
536 unsigned int size = bytes;
537 if (dst_off + size > dpcm->pcm_buffer_size)
538 size = dpcm->pcm_buffer_size - dst_off;
539 snd_pcm_format_set_silence(runtime->format, dst + dst_off,
540 bytes_to_frames(runtime, size) *
541 runtime->channels);
542 dpcm->silent_size += size;
543 bytes -= size;
544 if (!bytes)
545 break;
546 dst_off = 0;
550 static void copy_play_buf_part_n(struct loopback_pcm *play, struct loopback_pcm *capt,
551 unsigned int size, unsigned int src_off, unsigned int dst_off)
553 unsigned int channels = capt->substream->runtime->channels;
554 unsigned int size_p_ch = size / channels;
555 unsigned int src_off_ch = src_off / channels;
556 unsigned int dst_off_ch = dst_off / channels;
557 int i;
559 for (i = 0; i < channels; i++) {
560 memcpy(capt->substream->runtime->dma_area + capt->channel_buf_n * i + dst_off_ch,
561 play->substream->runtime->dma_area + play->channel_buf_n * i + src_off_ch,
562 size_p_ch);
566 static void copy_play_buf(struct loopback_pcm *play,
567 struct loopback_pcm *capt,
568 unsigned int bytes)
570 struct snd_pcm_runtime *runtime = play->substream->runtime;
571 char *src = runtime->dma_area;
572 char *dst = capt->substream->runtime->dma_area;
573 unsigned int src_off = play->buf_pos;
574 unsigned int dst_off = capt->buf_pos;
575 unsigned int clear_bytes = 0;
577 /* check if playback is draining, trim the capture copy size
578 * when our pointer is at the end of playback ring buffer */
579 if (runtime->state == SNDRV_PCM_STATE_DRAINING &&
580 snd_pcm_playback_hw_avail(runtime) < runtime->buffer_size) {
581 snd_pcm_uframes_t appl_ptr, appl_ptr1, diff;
582 appl_ptr = appl_ptr1 = runtime->control->appl_ptr;
583 appl_ptr1 -= appl_ptr1 % runtime->buffer_size;
584 appl_ptr1 += play->buf_pos / play->pcm_salign;
585 if (appl_ptr < appl_ptr1)
586 appl_ptr1 -= runtime->buffer_size;
587 diff = (appl_ptr - appl_ptr1) * play->pcm_salign;
588 if (diff < bytes) {
589 clear_bytes = bytes - diff;
590 bytes = diff;
594 for (;;) {
595 unsigned int size = bytes;
596 if (src_off + size > play->pcm_buffer_size)
597 size = play->pcm_buffer_size - src_off;
598 if (dst_off + size > capt->pcm_buffer_size)
599 size = capt->pcm_buffer_size - dst_off;
600 if (!is_access_interleaved(runtime->access))
601 copy_play_buf_part_n(play, capt, size, src_off, dst_off);
602 else
603 memcpy(dst + dst_off, src + src_off, size);
604 capt->silent_size = 0;
605 bytes -= size;
606 if (!bytes)
607 break;
608 src_off = (src_off + size) % play->pcm_buffer_size;
609 dst_off = (dst_off + size) % capt->pcm_buffer_size;
612 if (clear_bytes > 0) {
613 clear_capture_buf(capt, clear_bytes);
614 capt->silent_size = 0;
618 static inline unsigned int bytepos_delta(struct loopback_pcm *dpcm,
619 unsigned int jiffies_delta)
621 unsigned long last_pos;
622 unsigned int delta;
624 last_pos = byte_pos(dpcm, dpcm->irq_pos);
625 dpcm->irq_pos += jiffies_delta * dpcm->pcm_bps;
626 delta = byte_pos(dpcm, dpcm->irq_pos) - last_pos;
627 if (delta >= dpcm->last_drift)
628 delta -= dpcm->last_drift;
629 dpcm->last_drift = 0;
630 if (dpcm->irq_pos >= dpcm->period_size_frac) {
631 dpcm->irq_pos %= dpcm->period_size_frac;
632 dpcm->period_update_pending = 1;
634 return delta;
637 static inline void bytepos_finish(struct loopback_pcm *dpcm,
638 unsigned int delta)
640 dpcm->buf_pos += delta;
641 dpcm->buf_pos %= dpcm->pcm_buffer_size;
644 /* call in cable->lock */
645 static unsigned int loopback_jiffies_timer_pos_update
646 (struct loopback_cable *cable)
648 struct loopback_pcm *dpcm_play =
649 cable->streams[SNDRV_PCM_STREAM_PLAYBACK];
650 struct loopback_pcm *dpcm_capt =
651 cable->streams[SNDRV_PCM_STREAM_CAPTURE];
652 unsigned long delta_play = 0, delta_capt = 0, cur_jiffies;
653 unsigned int running, count1, count2;
655 cur_jiffies = jiffies;
656 running = cable->running ^ cable->pause;
657 if (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) {
658 delta_play = cur_jiffies - dpcm_play->last_jiffies;
659 dpcm_play->last_jiffies += delta_play;
662 if (running & (1 << SNDRV_PCM_STREAM_CAPTURE)) {
663 delta_capt = cur_jiffies - dpcm_capt->last_jiffies;
664 dpcm_capt->last_jiffies += delta_capt;
667 if (delta_play == 0 && delta_capt == 0)
668 goto unlock;
670 if (delta_play > delta_capt) {
671 count1 = bytepos_delta(dpcm_play, delta_play - delta_capt);
672 bytepos_finish(dpcm_play, count1);
673 delta_play = delta_capt;
674 } else if (delta_play < delta_capt) {
675 count1 = bytepos_delta(dpcm_capt, delta_capt - delta_play);
676 clear_capture_buf(dpcm_capt, count1);
677 bytepos_finish(dpcm_capt, count1);
678 delta_capt = delta_play;
681 if (delta_play == 0 && delta_capt == 0)
682 goto unlock;
684 /* note delta_capt == delta_play at this moment */
685 count1 = bytepos_delta(dpcm_play, delta_play);
686 count2 = bytepos_delta(dpcm_capt, delta_capt);
687 if (count1 < count2) {
688 dpcm_capt->last_drift = count2 - count1;
689 count1 = count2;
690 } else if (count1 > count2) {
691 dpcm_play->last_drift = count1 - count2;
693 copy_play_buf(dpcm_play, dpcm_capt, count1);
694 bytepos_finish(dpcm_play, count1);
695 bytepos_finish(dpcm_capt, count1);
696 unlock:
697 return running;
700 static void loopback_jiffies_timer_function(struct timer_list *t)
702 struct loopback_pcm *dpcm = from_timer(dpcm, t, timer);
703 unsigned long flags;
705 spin_lock_irqsave(&dpcm->cable->lock, flags);
706 if (loopback_jiffies_timer_pos_update(dpcm->cable) &
707 (1 << dpcm->substream->stream)) {
708 loopback_jiffies_timer_start(dpcm);
709 if (dpcm->period_update_pending) {
710 dpcm->period_update_pending = 0;
711 spin_unlock_irqrestore(&dpcm->cable->lock, flags);
712 /* need to unlock before calling below */
713 snd_pcm_period_elapsed(dpcm->substream);
714 return;
717 spin_unlock_irqrestore(&dpcm->cable->lock, flags);
720 /* call in cable->lock */
721 static int loopback_snd_timer_check_resolution(struct snd_pcm_runtime *runtime,
722 unsigned long resolution)
724 if (resolution != runtime->timer_resolution) {
725 struct loopback_pcm *dpcm = runtime->private_data;
726 struct loopback_cable *cable = dpcm->cable;
727 /* Worst case estimation of possible values for resolution
728 * resolution <= (512 * 1024) frames / 8kHz in nsec
729 * resolution <= 65.536.000.000 nsec
731 * period_size <= 65.536.000.000 nsec / 1000nsec/usec * 192kHz +
732 * 500.000
733 * period_size <= 12.582.912.000.000 <64bit
734 * / 1.000.000 usec/sec
736 snd_pcm_uframes_t period_size_usec =
737 resolution / 1000 * runtime->rate;
738 /* round to nearest sample rate */
739 snd_pcm_uframes_t period_size =
740 (period_size_usec + 500 * 1000) / (1000 * 1000);
742 pcm_err(dpcm->substream->pcm,
743 "Period size (%lu frames) of loopback device is not corresponding to timer resolution (%lu nsec = %lu frames) of card timer %d,%d,%d. Use period size of %lu frames for loopback device.",
744 runtime->period_size, resolution, period_size,
745 cable->snd_timer.id.card,
746 cable->snd_timer.id.device,
747 cable->snd_timer.id.subdevice,
748 period_size);
749 return -EINVAL;
751 return 0;
754 static void loopback_snd_timer_period_elapsed(struct loopback_cable *cable,
755 int event,
756 unsigned long resolution)
758 struct loopback_pcm *dpcm_play, *dpcm_capt;
759 struct snd_pcm_substream *substream_play, *substream_capt;
760 struct snd_pcm_runtime *valid_runtime;
761 unsigned int running, elapsed_bytes;
762 unsigned long flags;
764 spin_lock_irqsave(&cable->lock, flags);
765 running = cable->running ^ cable->pause;
766 /* no need to do anything if no stream is running */
767 if (!running) {
768 spin_unlock_irqrestore(&cable->lock, flags);
769 return;
772 dpcm_play = cable->streams[SNDRV_PCM_STREAM_PLAYBACK];
773 dpcm_capt = cable->streams[SNDRV_PCM_STREAM_CAPTURE];
775 if (event == SNDRV_TIMER_EVENT_MSTOP) {
776 if (!dpcm_play ||
777 dpcm_play->substream->runtime->state !=
778 SNDRV_PCM_STATE_DRAINING) {
779 spin_unlock_irqrestore(&cable->lock, flags);
780 return;
784 substream_play = (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) ?
785 dpcm_play->substream : NULL;
786 substream_capt = (running & (1 << SNDRV_PCM_STREAM_CAPTURE)) ?
787 dpcm_capt->substream : NULL;
788 valid_runtime = (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) ?
789 dpcm_play->substream->runtime :
790 dpcm_capt->substream->runtime;
792 /* resolution is only valid for SNDRV_TIMER_EVENT_TICK events */
793 if (event == SNDRV_TIMER_EVENT_TICK) {
794 /* The hardware rules guarantee that playback and capture period
795 * are the same. Therefore only one device has to be checked
796 * here.
798 if (loopback_snd_timer_check_resolution(valid_runtime,
799 resolution) < 0) {
800 spin_unlock_irqrestore(&cable->lock, flags);
801 if (substream_play)
802 snd_pcm_stop_xrun(substream_play);
803 if (substream_capt)
804 snd_pcm_stop_xrun(substream_capt);
805 return;
809 elapsed_bytes = frames_to_bytes(valid_runtime,
810 valid_runtime->period_size);
811 /* The same timer interrupt is used for playback and capture device */
812 if ((running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) &&
813 (running & (1 << SNDRV_PCM_STREAM_CAPTURE))) {
814 copy_play_buf(dpcm_play, dpcm_capt, elapsed_bytes);
815 bytepos_finish(dpcm_play, elapsed_bytes);
816 bytepos_finish(dpcm_capt, elapsed_bytes);
817 } else if (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) {
818 bytepos_finish(dpcm_play, elapsed_bytes);
819 } else if (running & (1 << SNDRV_PCM_STREAM_CAPTURE)) {
820 clear_capture_buf(dpcm_capt, elapsed_bytes);
821 bytepos_finish(dpcm_capt, elapsed_bytes);
823 spin_unlock_irqrestore(&cable->lock, flags);
825 if (substream_play)
826 snd_pcm_period_elapsed(substream_play);
827 if (substream_capt)
828 snd_pcm_period_elapsed(substream_capt);
831 static void loopback_snd_timer_function(struct snd_timer_instance *timeri,
832 unsigned long resolution,
833 unsigned long ticks)
835 struct loopback_cable *cable = timeri->callback_data;
837 loopback_snd_timer_period_elapsed(cable, SNDRV_TIMER_EVENT_TICK,
838 resolution);
841 static void loopback_snd_timer_work(struct work_struct *work)
843 struct loopback_cable *cable;
845 cable = container_of(work, struct loopback_cable, snd_timer.event_work);
846 loopback_snd_timer_period_elapsed(cable, SNDRV_TIMER_EVENT_MSTOP, 0);
849 static void loopback_snd_timer_event(struct snd_timer_instance *timeri,
850 int event,
851 struct timespec64 *tstamp,
852 unsigned long resolution)
854 /* Do not lock cable->lock here because timer->lock is already hold.
855 * There are other functions which first lock cable->lock and than
856 * timer->lock e.g.
857 * loopback_trigger()
858 * spin_lock(&cable->lock)
859 * loopback_snd_timer_start()
860 * snd_timer_start()
861 * spin_lock(&timer->lock)
862 * Therefore when using the oposit order of locks here it could result
863 * in a deadlock.
866 if (event == SNDRV_TIMER_EVENT_MSTOP) {
867 struct loopback_cable *cable = timeri->callback_data;
869 /* sound card of the timer was stopped. Therefore there will not
870 * be any further timer callbacks. Due to this forward audio
871 * data from here if in draining state. When still in running
872 * state the streaming will be aborted by the usual timeout. It
873 * should not be aborted here because may be the timer sound
874 * card does only a recovery and the timer is back soon.
875 * This work triggers loopback_snd_timer_work()
877 schedule_work(&cable->snd_timer.event_work);
881 static void loopback_jiffies_timer_dpcm_info(struct loopback_pcm *dpcm,
882 struct snd_info_buffer *buffer)
884 snd_iprintf(buffer, " update_pending:\t%u\n",
885 dpcm->period_update_pending);
886 snd_iprintf(buffer, " irq_pos:\t\t%u\n", dpcm->irq_pos);
887 snd_iprintf(buffer, " period_frac:\t%u\n", dpcm->period_size_frac);
888 snd_iprintf(buffer, " last_jiffies:\t%lu (%lu)\n",
889 dpcm->last_jiffies, jiffies);
890 snd_iprintf(buffer, " timer_expires:\t%lu\n", dpcm->timer.expires);
893 static void loopback_snd_timer_dpcm_info(struct loopback_pcm *dpcm,
894 struct snd_info_buffer *buffer)
896 struct loopback_cable *cable = dpcm->cable;
898 snd_iprintf(buffer, " sound timer:\thw:%d,%d,%d\n",
899 cable->snd_timer.id.card,
900 cable->snd_timer.id.device,
901 cable->snd_timer.id.subdevice);
902 snd_iprintf(buffer, " timer open:\t\t%s\n",
903 snd_pcm_direction_name(cable->snd_timer.stream));
906 static snd_pcm_uframes_t loopback_pointer(struct snd_pcm_substream *substream)
908 struct snd_pcm_runtime *runtime = substream->runtime;
909 struct loopback_pcm *dpcm = runtime->private_data;
910 snd_pcm_uframes_t pos;
912 spin_lock(&dpcm->cable->lock);
913 if (dpcm->cable->ops->pos_update)
914 dpcm->cable->ops->pos_update(dpcm->cable);
915 pos = dpcm->buf_pos;
916 spin_unlock(&dpcm->cable->lock);
917 return bytes_to_frames(runtime, pos);
920 static const struct snd_pcm_hardware loopback_pcm_hardware =
922 .info = (SNDRV_PCM_INFO_INTERLEAVED | SNDRV_PCM_INFO_MMAP |
923 SNDRV_PCM_INFO_MMAP_VALID | SNDRV_PCM_INFO_PAUSE |
924 SNDRV_PCM_INFO_RESUME | SNDRV_PCM_INFO_NONINTERLEAVED),
925 .formats = (SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S16_BE |
926 SNDRV_PCM_FMTBIT_S24_LE | SNDRV_PCM_FMTBIT_S24_BE |
927 SNDRV_PCM_FMTBIT_S24_3LE | SNDRV_PCM_FMTBIT_S24_3BE |
928 SNDRV_PCM_FMTBIT_S32_LE | SNDRV_PCM_FMTBIT_S32_BE |
929 SNDRV_PCM_FMTBIT_FLOAT_LE | SNDRV_PCM_FMTBIT_FLOAT_BE |
930 SNDRV_PCM_FMTBIT_DSD_U8 |
931 SNDRV_PCM_FMTBIT_DSD_U16_LE | SNDRV_PCM_FMTBIT_DSD_U16_BE |
932 SNDRV_PCM_FMTBIT_DSD_U32_LE | SNDRV_PCM_FMTBIT_DSD_U32_BE),
933 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_768000,
934 .rate_min = 8000,
935 .rate_max = 768000,
936 .channels_min = 1,
937 .channels_max = 32,
938 .buffer_bytes_max = 2 * 1024 * 1024,
939 .period_bytes_min = 64,
940 /* note check overflow in frac_pos() using pcm_rate_shift before
941 changing period_bytes_max value */
942 .period_bytes_max = 1024 * 1024,
943 .periods_min = 1,
944 .periods_max = 1024,
945 .fifo_size = 0,
948 static void loopback_runtime_free(struct snd_pcm_runtime *runtime)
950 struct loopback_pcm *dpcm = runtime->private_data;
951 kfree(dpcm);
954 static int loopback_hw_free(struct snd_pcm_substream *substream)
956 struct snd_pcm_runtime *runtime = substream->runtime;
957 struct loopback_pcm *dpcm = runtime->private_data;
958 struct loopback_cable *cable = dpcm->cable;
960 mutex_lock(&dpcm->loopback->cable_lock);
961 cable->valid &= ~(1 << substream->stream);
962 mutex_unlock(&dpcm->loopback->cable_lock);
963 return 0;
966 static unsigned int get_cable_index(struct snd_pcm_substream *substream)
968 if (!substream->pcm->device)
969 return substream->stream;
970 else
971 return !substream->stream;
974 static int rule_format(struct snd_pcm_hw_params *params,
975 struct snd_pcm_hw_rule *rule)
977 struct loopback_pcm *dpcm = rule->private;
978 struct loopback_cable *cable = dpcm->cable;
979 struct snd_mask m;
981 snd_mask_none(&m);
982 mutex_lock(&dpcm->loopback->cable_lock);
983 m.bits[0] = (u_int32_t)cable->hw.formats;
984 m.bits[1] = (u_int32_t)(cable->hw.formats >> 32);
985 mutex_unlock(&dpcm->loopback->cable_lock);
986 return snd_mask_refine(hw_param_mask(params, rule->var), &m);
989 static int rule_rate(struct snd_pcm_hw_params *params,
990 struct snd_pcm_hw_rule *rule)
992 struct loopback_pcm *dpcm = rule->private;
993 struct loopback_cable *cable = dpcm->cable;
994 struct snd_interval t;
996 mutex_lock(&dpcm->loopback->cable_lock);
997 t.min = cable->hw.rate_min;
998 t.max = cable->hw.rate_max;
999 mutex_unlock(&dpcm->loopback->cable_lock);
1000 t.openmin = t.openmax = 0;
1001 t.integer = 0;
1002 return snd_interval_refine(hw_param_interval(params, rule->var), &t);
1005 static int rule_channels(struct snd_pcm_hw_params *params,
1006 struct snd_pcm_hw_rule *rule)
1008 struct loopback_pcm *dpcm = rule->private;
1009 struct loopback_cable *cable = dpcm->cable;
1010 struct snd_interval t;
1012 mutex_lock(&dpcm->loopback->cable_lock);
1013 t.min = cable->hw.channels_min;
1014 t.max = cable->hw.channels_max;
1015 mutex_unlock(&dpcm->loopback->cable_lock);
1016 t.openmin = t.openmax = 0;
1017 t.integer = 0;
1018 return snd_interval_refine(hw_param_interval(params, rule->var), &t);
1021 static int rule_period_bytes(struct snd_pcm_hw_params *params,
1022 struct snd_pcm_hw_rule *rule)
1024 struct loopback_pcm *dpcm = rule->private;
1025 struct loopback_cable *cable = dpcm->cable;
1026 struct snd_interval t;
1028 mutex_lock(&dpcm->loopback->cable_lock);
1029 t.min = cable->hw.period_bytes_min;
1030 t.max = cable->hw.period_bytes_max;
1031 mutex_unlock(&dpcm->loopback->cable_lock);
1032 t.openmin = 0;
1033 t.openmax = 0;
1034 t.integer = 0;
1035 return snd_interval_refine(hw_param_interval(params, rule->var), &t);
1038 static void free_cable(struct snd_pcm_substream *substream)
1040 struct loopback *loopback = substream->private_data;
1041 int dev = get_cable_index(substream);
1042 struct loopback_cable *cable;
1044 cable = loopback->cables[substream->number][dev];
1045 if (!cable)
1046 return;
1047 if (cable->streams[!substream->stream]) {
1048 /* other stream is still alive */
1049 spin_lock_irq(&cable->lock);
1050 cable->streams[substream->stream] = NULL;
1051 spin_unlock_irq(&cable->lock);
1052 } else {
1053 struct loopback_pcm *dpcm = substream->runtime->private_data;
1055 if (cable->ops && cable->ops->close_cable && dpcm)
1056 cable->ops->close_cable(dpcm);
1057 /* free the cable */
1058 loopback->cables[substream->number][dev] = NULL;
1059 kfree(cable);
1063 static int loopback_jiffies_timer_open(struct loopback_pcm *dpcm)
1065 timer_setup(&dpcm->timer, loopback_jiffies_timer_function, 0);
1067 return 0;
1070 static const struct loopback_ops loopback_jiffies_timer_ops = {
1071 .open = loopback_jiffies_timer_open,
1072 .start = loopback_jiffies_timer_start,
1073 .stop = loopback_jiffies_timer_stop,
1074 .stop_sync = loopback_jiffies_timer_stop_sync,
1075 .close_substream = loopback_jiffies_timer_stop_sync,
1076 .pos_update = loopback_jiffies_timer_pos_update,
1077 .dpcm_info = loopback_jiffies_timer_dpcm_info,
1080 static int loopback_parse_timer_id(const char *str,
1081 struct snd_timer_id *tid)
1083 /* [<pref>:](<card name>|<card idx>)[{.,}<dev idx>[{.,}<subdev idx>]] */
1084 const char * const sep_dev = ".,";
1085 const char * const sep_pref = ":";
1086 const char *name = str;
1087 char *sep, save = '\0';
1088 int card_idx = 0, dev = 0, subdev = 0;
1089 int err;
1091 sep = strpbrk(str, sep_pref);
1092 if (sep)
1093 name = sep + 1;
1094 sep = strpbrk(name, sep_dev);
1095 if (sep) {
1096 save = *sep;
1097 *sep = '\0';
1099 err = kstrtoint(name, 0, &card_idx);
1100 if (err == -EINVAL) {
1101 /* Must be the name, not number */
1102 for (card_idx = 0; card_idx < snd_ecards_limit; card_idx++) {
1103 struct snd_card *card = snd_card_ref(card_idx);
1105 if (card) {
1106 if (!strcmp(card->id, name))
1107 err = 0;
1108 snd_card_unref(card);
1110 if (!err)
1111 break;
1114 if (sep) {
1115 *sep = save;
1116 if (!err) {
1117 char *sep2, save2 = '\0';
1119 sep2 = strpbrk(sep + 1, sep_dev);
1120 if (sep2) {
1121 save2 = *sep2;
1122 *sep2 = '\0';
1124 err = kstrtoint(sep + 1, 0, &dev);
1125 if (sep2) {
1126 *sep2 = save2;
1127 if (!err)
1128 err = kstrtoint(sep2 + 1, 0, &subdev);
1132 if (card_idx == -1)
1133 tid->dev_class = SNDRV_TIMER_CLASS_GLOBAL;
1134 if (!err && tid) {
1135 tid->card = card_idx;
1136 tid->device = dev;
1137 tid->subdevice = subdev;
1139 return err;
1142 /* call in loopback->cable_lock */
1143 static int loopback_snd_timer_open(struct loopback_pcm *dpcm)
1145 int err = 0;
1146 struct snd_timer_id tid = {
1147 .dev_class = SNDRV_TIMER_CLASS_PCM,
1148 .dev_sclass = SNDRV_TIMER_SCLASS_APPLICATION,
1150 struct snd_timer_instance *timeri;
1151 struct loopback_cable *cable = dpcm->cable;
1153 /* check if timer was already opened. It is only opened once
1154 * per playback and capture subdevice (aka cable).
1156 if (cable->snd_timer.instance)
1157 goto exit;
1159 err = loopback_parse_timer_id(dpcm->loopback->timer_source, &tid);
1160 if (err < 0) {
1161 pcm_err(dpcm->substream->pcm,
1162 "Parsing timer source \'%s\' failed with %d",
1163 dpcm->loopback->timer_source, err);
1164 goto exit;
1167 cable->snd_timer.stream = dpcm->substream->stream;
1168 cable->snd_timer.id = tid;
1170 timeri = snd_timer_instance_new(dpcm->loopback->card->id);
1171 if (!timeri) {
1172 err = -ENOMEM;
1173 goto exit;
1175 /* The callback has to be called from another work. If
1176 * SNDRV_TIMER_IFLG_FAST is specified it will be called from the
1177 * snd_pcm_period_elapsed() call of the selected sound card.
1178 * snd_pcm_period_elapsed() helds snd_pcm_stream_lock_irqsave().
1179 * Due to our callback loopback_snd_timer_function() also calls
1180 * snd_pcm_period_elapsed() which calls snd_pcm_stream_lock_irqsave().
1181 * This would end up in a dead lock.
1183 timeri->flags |= SNDRV_TIMER_IFLG_AUTO;
1184 timeri->callback = loopback_snd_timer_function;
1185 timeri->callback_data = (void *)cable;
1186 timeri->ccallback = loopback_snd_timer_event;
1188 /* initialise a work used for draining */
1189 INIT_WORK(&cable->snd_timer.event_work, loopback_snd_timer_work);
1191 /* The mutex loopback->cable_lock is kept locked.
1192 * Therefore snd_timer_open() cannot be called a second time
1193 * by the other device of the same cable.
1194 * Therefore the following issue cannot happen:
1195 * [proc1] Call loopback_timer_open() ->
1196 * Unlock cable->lock for snd_timer_close/open() call
1197 * [proc2] Call loopback_timer_open() -> snd_timer_open(),
1198 * snd_timer_start()
1199 * [proc1] Call snd_timer_open() and overwrite running timer
1200 * instance
1202 err = snd_timer_open(timeri, &cable->snd_timer.id, current->pid);
1203 if (err < 0) {
1204 pcm_err(dpcm->substream->pcm,
1205 "snd_timer_open (%d,%d,%d) failed with %d",
1206 cable->snd_timer.id.card,
1207 cable->snd_timer.id.device,
1208 cable->snd_timer.id.subdevice,
1209 err);
1210 snd_timer_instance_free(timeri);
1211 goto exit;
1214 cable->snd_timer.instance = timeri;
1216 exit:
1217 return err;
1220 /* stop_sync() is not required for sound timer because it does not need to be
1221 * restarted in loopback_prepare() on Xrun recovery
1223 static const struct loopback_ops loopback_snd_timer_ops = {
1224 .open = loopback_snd_timer_open,
1225 .start = loopback_snd_timer_start,
1226 .stop = loopback_snd_timer_stop,
1227 .close_cable = loopback_snd_timer_close_cable,
1228 .dpcm_info = loopback_snd_timer_dpcm_info,
1231 static int loopback_open(struct snd_pcm_substream *substream)
1233 struct snd_pcm_runtime *runtime = substream->runtime;
1234 struct loopback *loopback = substream->private_data;
1235 struct loopback_pcm *dpcm;
1236 struct loopback_cable *cable = NULL;
1237 int err = 0;
1238 int dev = get_cable_index(substream);
1240 mutex_lock(&loopback->cable_lock);
1241 dpcm = kzalloc(sizeof(*dpcm), GFP_KERNEL);
1242 if (!dpcm) {
1243 err = -ENOMEM;
1244 goto unlock;
1246 dpcm->loopback = loopback;
1247 dpcm->substream = substream;
1249 cable = loopback->cables[substream->number][dev];
1250 if (!cable) {
1251 cable = kzalloc(sizeof(*cable), GFP_KERNEL);
1252 if (!cable) {
1253 err = -ENOMEM;
1254 goto unlock;
1256 spin_lock_init(&cable->lock);
1257 cable->hw = loopback_pcm_hardware;
1258 if (loopback->timer_source)
1259 cable->ops = &loopback_snd_timer_ops;
1260 else
1261 cable->ops = &loopback_jiffies_timer_ops;
1262 loopback->cables[substream->number][dev] = cable;
1264 dpcm->cable = cable;
1265 runtime->private_data = dpcm;
1267 if (cable->ops->open) {
1268 err = cable->ops->open(dpcm);
1269 if (err < 0)
1270 goto unlock;
1273 snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS);
1275 /* use dynamic rules based on actual runtime->hw values */
1276 /* note that the default rules created in the PCM midlevel code */
1277 /* are cached -> they do not reflect the actual state */
1278 err = snd_pcm_hw_rule_add(runtime, 0,
1279 SNDRV_PCM_HW_PARAM_FORMAT,
1280 rule_format, dpcm,
1281 SNDRV_PCM_HW_PARAM_FORMAT, -1);
1282 if (err < 0)
1283 goto unlock;
1284 err = snd_pcm_hw_rule_add(runtime, 0,
1285 SNDRV_PCM_HW_PARAM_RATE,
1286 rule_rate, dpcm,
1287 SNDRV_PCM_HW_PARAM_RATE, -1);
1288 if (err < 0)
1289 goto unlock;
1290 err = snd_pcm_hw_rule_add(runtime, 0,
1291 SNDRV_PCM_HW_PARAM_CHANNELS,
1292 rule_channels, dpcm,
1293 SNDRV_PCM_HW_PARAM_CHANNELS, -1);
1294 if (err < 0)
1295 goto unlock;
1297 /* In case of sound timer the period time of both devices of the same
1298 * loop has to be the same.
1299 * This rule only takes effect if a sound timer was chosen
1301 if (cable->snd_timer.instance) {
1302 err = snd_pcm_hw_rule_add(runtime, 0,
1303 SNDRV_PCM_HW_PARAM_PERIOD_BYTES,
1304 rule_period_bytes, dpcm,
1305 SNDRV_PCM_HW_PARAM_PERIOD_BYTES, -1);
1306 if (err < 0)
1307 goto unlock;
1310 /* loopback_runtime_free() has not to be called if kfree(dpcm) was
1311 * already called here. Otherwise it will end up with a double free.
1313 runtime->private_free = loopback_runtime_free;
1314 if (get_notify(dpcm))
1315 runtime->hw = loopback_pcm_hardware;
1316 else
1317 runtime->hw = cable->hw;
1319 spin_lock_irq(&cable->lock);
1320 cable->streams[substream->stream] = dpcm;
1321 spin_unlock_irq(&cable->lock);
1323 unlock:
1324 if (err < 0) {
1325 free_cable(substream);
1326 kfree(dpcm);
1328 mutex_unlock(&loopback->cable_lock);
1329 return err;
1332 static int loopback_close(struct snd_pcm_substream *substream)
1334 struct loopback *loopback = substream->private_data;
1335 struct loopback_pcm *dpcm = substream->runtime->private_data;
1336 int err = 0;
1338 if (dpcm->cable->ops->close_substream)
1339 err = dpcm->cable->ops->close_substream(dpcm);
1340 mutex_lock(&loopback->cable_lock);
1341 free_cable(substream);
1342 mutex_unlock(&loopback->cable_lock);
1343 return err;
1346 static const struct snd_pcm_ops loopback_pcm_ops = {
1347 .open = loopback_open,
1348 .close = loopback_close,
1349 .hw_free = loopback_hw_free,
1350 .prepare = loopback_prepare,
1351 .trigger = loopback_trigger,
1352 .pointer = loopback_pointer,
1355 static int loopback_pcm_new(struct loopback *loopback,
1356 int device, int substreams)
1358 struct snd_pcm *pcm;
1359 int err;
1361 err = snd_pcm_new(loopback->card, "Loopback PCM", device,
1362 substreams, substreams, &pcm);
1363 if (err < 0)
1364 return err;
1365 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &loopback_pcm_ops);
1366 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &loopback_pcm_ops);
1367 snd_pcm_set_managed_buffer_all(pcm, SNDRV_DMA_TYPE_VMALLOC, NULL, 0, 0);
1369 pcm->private_data = loopback;
1370 pcm->info_flags = 0;
1371 strcpy(pcm->name, "Loopback PCM");
1373 loopback->pcm[device] = pcm;
1374 return 0;
1377 static int loopback_rate_shift_info(struct snd_kcontrol *kcontrol,
1378 struct snd_ctl_elem_info *uinfo)
1380 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1381 uinfo->count = 1;
1382 uinfo->value.integer.min = 80000;
1383 uinfo->value.integer.max = 120000;
1384 uinfo->value.integer.step = 1;
1385 return 0;
1388 static int loopback_rate_shift_get(struct snd_kcontrol *kcontrol,
1389 struct snd_ctl_elem_value *ucontrol)
1391 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1393 mutex_lock(&loopback->cable_lock);
1394 ucontrol->value.integer.value[0] =
1395 loopback->setup[kcontrol->id.subdevice]
1396 [kcontrol->id.device].rate_shift;
1397 mutex_unlock(&loopback->cable_lock);
1398 return 0;
1401 static int loopback_rate_shift_put(struct snd_kcontrol *kcontrol,
1402 struct snd_ctl_elem_value *ucontrol)
1404 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1405 unsigned int val;
1406 int change = 0;
1408 val = ucontrol->value.integer.value[0];
1409 if (val < 80000)
1410 val = 80000;
1411 if (val > 120000)
1412 val = 120000;
1413 mutex_lock(&loopback->cable_lock);
1414 if (val != loopback->setup[kcontrol->id.subdevice]
1415 [kcontrol->id.device].rate_shift) {
1416 loopback->setup[kcontrol->id.subdevice]
1417 [kcontrol->id.device].rate_shift = val;
1418 change = 1;
1420 mutex_unlock(&loopback->cable_lock);
1421 return change;
1424 static int loopback_notify_get(struct snd_kcontrol *kcontrol,
1425 struct snd_ctl_elem_value *ucontrol)
1427 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1429 mutex_lock(&loopback->cable_lock);
1430 ucontrol->value.integer.value[0] =
1431 loopback->setup[kcontrol->id.subdevice]
1432 [kcontrol->id.device].notify;
1433 mutex_unlock(&loopback->cable_lock);
1434 return 0;
1437 static int loopback_notify_put(struct snd_kcontrol *kcontrol,
1438 struct snd_ctl_elem_value *ucontrol)
1440 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1441 unsigned int val;
1442 int change = 0;
1444 val = ucontrol->value.integer.value[0] ? 1 : 0;
1445 mutex_lock(&loopback->cable_lock);
1446 if (val != loopback->setup[kcontrol->id.subdevice]
1447 [kcontrol->id.device].notify) {
1448 loopback->setup[kcontrol->id.subdevice]
1449 [kcontrol->id.device].notify = val;
1450 change = 1;
1452 mutex_unlock(&loopback->cable_lock);
1453 return change;
1456 static int loopback_active_get(struct snd_kcontrol *kcontrol,
1457 struct snd_ctl_elem_value *ucontrol)
1459 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1460 struct loopback_cable *cable;
1462 unsigned int val = 0;
1464 mutex_lock(&loopback->cable_lock);
1465 cable = loopback->cables[kcontrol->id.subdevice][kcontrol->id.device ^ 1];
1466 if (cable != NULL) {
1467 unsigned int running = cable->running ^ cable->pause;
1469 val = (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) ? 1 : 0;
1471 mutex_unlock(&loopback->cable_lock);
1472 ucontrol->value.integer.value[0] = val;
1473 return 0;
1476 static int loopback_format_info(struct snd_kcontrol *kcontrol,
1477 struct snd_ctl_elem_info *uinfo)
1479 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1480 uinfo->count = 1;
1481 uinfo->value.integer.min = 0;
1482 uinfo->value.integer.max = (__force int)SNDRV_PCM_FORMAT_LAST;
1483 uinfo->value.integer.step = 1;
1484 return 0;
1487 static int loopback_format_get(struct snd_kcontrol *kcontrol,
1488 struct snd_ctl_elem_value *ucontrol)
1490 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1492 ucontrol->value.integer.value[0] =
1493 (__force int)loopback->setup[kcontrol->id.subdevice]
1494 [kcontrol->id.device].format;
1495 return 0;
1498 static int loopback_rate_info(struct snd_kcontrol *kcontrol,
1499 struct snd_ctl_elem_info *uinfo)
1501 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1502 uinfo->count = 1;
1503 uinfo->value.integer.min = 0;
1504 uinfo->value.integer.max = 192000;
1505 uinfo->value.integer.step = 1;
1506 return 0;
1509 static int loopback_rate_get(struct snd_kcontrol *kcontrol,
1510 struct snd_ctl_elem_value *ucontrol)
1512 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1514 mutex_lock(&loopback->cable_lock);
1515 ucontrol->value.integer.value[0] =
1516 loopback->setup[kcontrol->id.subdevice]
1517 [kcontrol->id.device].rate;
1518 mutex_unlock(&loopback->cable_lock);
1519 return 0;
1522 static int loopback_channels_info(struct snd_kcontrol *kcontrol,
1523 struct snd_ctl_elem_info *uinfo)
1525 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1526 uinfo->count = 1;
1527 uinfo->value.integer.min = 1;
1528 uinfo->value.integer.max = 1024;
1529 uinfo->value.integer.step = 1;
1530 return 0;
1533 static int loopback_channels_get(struct snd_kcontrol *kcontrol,
1534 struct snd_ctl_elem_value *ucontrol)
1536 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1538 mutex_lock(&loopback->cable_lock);
1539 ucontrol->value.integer.value[0] =
1540 loopback->setup[kcontrol->id.subdevice]
1541 [kcontrol->id.device].channels;
1542 mutex_unlock(&loopback->cable_lock);
1543 return 0;
1546 static int loopback_access_info(struct snd_kcontrol *kcontrol,
1547 struct snd_ctl_elem_info *uinfo)
1549 const char * const texts[] = {"Interleaved", "Non-interleaved"};
1551 return snd_ctl_enum_info(uinfo, 1, ARRAY_SIZE(texts), texts);
1554 static int loopback_access_get(struct snd_kcontrol *kcontrol,
1555 struct snd_ctl_elem_value *ucontrol)
1557 struct loopback *loopback = snd_kcontrol_chip(kcontrol);
1558 snd_pcm_access_t access;
1560 mutex_lock(&loopback->cable_lock);
1561 access = loopback->setup[kcontrol->id.subdevice][kcontrol->id.device].access;
1563 ucontrol->value.enumerated.item[0] = !is_access_interleaved(access);
1565 mutex_unlock(&loopback->cable_lock);
1566 return 0;
1569 static const struct snd_kcontrol_new loopback_controls[] = {
1571 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1572 .name = "PCM Rate Shift 100000",
1573 .info = loopback_rate_shift_info,
1574 .get = loopback_rate_shift_get,
1575 .put = loopback_rate_shift_put,
1578 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1579 .name = "PCM Notify",
1580 .info = snd_ctl_boolean_mono_info,
1581 .get = loopback_notify_get,
1582 .put = loopback_notify_put,
1584 #define ACTIVE_IDX 2
1586 .access = SNDRV_CTL_ELEM_ACCESS_READ,
1587 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1588 .name = "PCM Slave Active",
1589 .info = snd_ctl_boolean_mono_info,
1590 .get = loopback_active_get,
1592 #define FORMAT_IDX 3
1594 .access = SNDRV_CTL_ELEM_ACCESS_READ,
1595 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1596 .name = "PCM Slave Format",
1597 .info = loopback_format_info,
1598 .get = loopback_format_get
1600 #define RATE_IDX 4
1602 .access = SNDRV_CTL_ELEM_ACCESS_READ,
1603 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1604 .name = "PCM Slave Rate",
1605 .info = loopback_rate_info,
1606 .get = loopback_rate_get
1608 #define CHANNELS_IDX 5
1610 .access = SNDRV_CTL_ELEM_ACCESS_READ,
1611 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1612 .name = "PCM Slave Channels",
1613 .info = loopback_channels_info,
1614 .get = loopback_channels_get
1616 #define ACCESS_IDX 6
1618 .access = SNDRV_CTL_ELEM_ACCESS_READ,
1619 .iface = SNDRV_CTL_ELEM_IFACE_PCM,
1620 .name = "PCM Slave Access Mode",
1621 .info = loopback_access_info,
1622 .get = loopback_access_get,
1626 static int loopback_mixer_new(struct loopback *loopback, int notify)
1628 struct snd_card *card = loopback->card;
1629 struct snd_pcm *pcm;
1630 struct snd_kcontrol *kctl;
1631 struct loopback_setup *setup;
1632 int err, dev, substr, substr_count, idx;
1634 strcpy(card->mixername, "Loopback Mixer");
1635 for (dev = 0; dev < 2; dev++) {
1636 pcm = loopback->pcm[dev];
1637 substr_count =
1638 pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream_count;
1639 for (substr = 0; substr < substr_count; substr++) {
1640 setup = &loopback->setup[substr][dev];
1641 setup->notify = notify;
1642 setup->rate_shift = NO_PITCH;
1643 setup->format = SNDRV_PCM_FORMAT_S16_LE;
1644 setup->access = SNDRV_PCM_ACCESS_RW_INTERLEAVED;
1645 setup->rate = 48000;
1646 setup->channels = 2;
1647 for (idx = 0; idx < ARRAY_SIZE(loopback_controls);
1648 idx++) {
1649 kctl = snd_ctl_new1(&loopback_controls[idx],
1650 loopback);
1651 if (!kctl)
1652 return -ENOMEM;
1653 kctl->id.device = dev;
1654 kctl->id.subdevice = substr;
1656 /* Add the control before copying the id so that
1657 * the numid field of the id is set in the copy.
1659 err = snd_ctl_add(card, kctl);
1660 if (err < 0)
1661 return err;
1663 switch (idx) {
1664 case ACTIVE_IDX:
1665 setup->active_id = kctl->id;
1666 break;
1667 case FORMAT_IDX:
1668 setup->format_id = kctl->id;
1669 break;
1670 case RATE_IDX:
1671 setup->rate_id = kctl->id;
1672 break;
1673 case CHANNELS_IDX:
1674 setup->channels_id = kctl->id;
1675 break;
1676 case ACCESS_IDX:
1677 setup->access_id = kctl->id;
1678 break;
1679 default:
1680 break;
1685 return 0;
1688 static void print_dpcm_info(struct snd_info_buffer *buffer,
1689 struct loopback_pcm *dpcm,
1690 const char *id)
1692 snd_iprintf(buffer, " %s\n", id);
1693 if (dpcm == NULL) {
1694 snd_iprintf(buffer, " inactive\n");
1695 return;
1697 snd_iprintf(buffer, " buffer_size:\t%u\n", dpcm->pcm_buffer_size);
1698 snd_iprintf(buffer, " buffer_pos:\t\t%u\n", dpcm->buf_pos);
1699 snd_iprintf(buffer, " silent_size:\t%u\n", dpcm->silent_size);
1700 snd_iprintf(buffer, " period_size:\t%u\n", dpcm->pcm_period_size);
1701 snd_iprintf(buffer, " bytes_per_sec:\t%u\n", dpcm->pcm_bps);
1702 snd_iprintf(buffer, " sample_align:\t%u\n", dpcm->pcm_salign);
1703 snd_iprintf(buffer, " rate_shift:\t\t%u\n", dpcm->pcm_rate_shift);
1704 if (dpcm->cable->ops->dpcm_info)
1705 dpcm->cable->ops->dpcm_info(dpcm, buffer);
1708 static void print_substream_info(struct snd_info_buffer *buffer,
1709 struct loopback *loopback,
1710 int sub,
1711 int num)
1713 struct loopback_cable *cable = loopback->cables[sub][num];
1715 snd_iprintf(buffer, "Cable %i substream %i:\n", num, sub);
1716 if (cable == NULL) {
1717 snd_iprintf(buffer, " inactive\n");
1718 return;
1720 snd_iprintf(buffer, " valid: %u\n", cable->valid);
1721 snd_iprintf(buffer, " running: %u\n", cable->running);
1722 snd_iprintf(buffer, " pause: %u\n", cable->pause);
1723 print_dpcm_info(buffer, cable->streams[0], "Playback");
1724 print_dpcm_info(buffer, cable->streams[1], "Capture");
1727 static void print_cable_info(struct snd_info_entry *entry,
1728 struct snd_info_buffer *buffer)
1730 struct loopback *loopback = entry->private_data;
1731 int sub, num;
1733 mutex_lock(&loopback->cable_lock);
1734 num = entry->name[strlen(entry->name)-1];
1735 num = num == '0' ? 0 : 1;
1736 for (sub = 0; sub < MAX_PCM_SUBSTREAMS; sub++)
1737 print_substream_info(buffer, loopback, sub, num);
1738 mutex_unlock(&loopback->cable_lock);
1741 static int loopback_cable_proc_new(struct loopback *loopback, int cidx)
1743 char name[32];
1745 snprintf(name, sizeof(name), "cable#%d", cidx);
1746 return snd_card_ro_proc_new(loopback->card, name, loopback,
1747 print_cable_info);
1750 static void loopback_set_timer_source(struct loopback *loopback,
1751 const char *value)
1753 if (loopback->timer_source) {
1754 devm_kfree(loopback->card->dev, loopback->timer_source);
1755 loopback->timer_source = NULL;
1757 if (value && *value)
1758 loopback->timer_source = devm_kstrdup(loopback->card->dev,
1759 value, GFP_KERNEL);
1762 static void print_timer_source_info(struct snd_info_entry *entry,
1763 struct snd_info_buffer *buffer)
1765 struct loopback *loopback = entry->private_data;
1767 mutex_lock(&loopback->cable_lock);
1768 snd_iprintf(buffer, "%s\n",
1769 loopback->timer_source ? loopback->timer_source : "");
1770 mutex_unlock(&loopback->cable_lock);
1773 static void change_timer_source_info(struct snd_info_entry *entry,
1774 struct snd_info_buffer *buffer)
1776 struct loopback *loopback = entry->private_data;
1777 char line[64];
1779 mutex_lock(&loopback->cable_lock);
1780 if (!snd_info_get_line(buffer, line, sizeof(line)))
1781 loopback_set_timer_source(loopback, strim(line));
1782 mutex_unlock(&loopback->cable_lock);
1785 static int loopback_timer_source_proc_new(struct loopback *loopback)
1787 return snd_card_rw_proc_new(loopback->card, "timer_source", loopback,
1788 print_timer_source_info,
1789 change_timer_source_info);
1792 static int loopback_probe(struct platform_device *devptr)
1794 struct snd_card *card;
1795 struct loopback *loopback;
1796 int dev = devptr->id;
1797 int err;
1799 err = snd_devm_card_new(&devptr->dev, index[dev], id[dev], THIS_MODULE,
1800 sizeof(struct loopback), &card);
1801 if (err < 0)
1802 return err;
1803 loopback = card->private_data;
1805 if (pcm_substreams[dev] < 1)
1806 pcm_substreams[dev] = 1;
1807 if (pcm_substreams[dev] > MAX_PCM_SUBSTREAMS)
1808 pcm_substreams[dev] = MAX_PCM_SUBSTREAMS;
1810 loopback->card = card;
1811 loopback_set_timer_source(loopback, timer_source[dev]);
1813 mutex_init(&loopback->cable_lock);
1815 err = loopback_pcm_new(loopback, 0, pcm_substreams[dev]);
1816 if (err < 0)
1817 return err;
1818 err = loopback_pcm_new(loopback, 1, pcm_substreams[dev]);
1819 if (err < 0)
1820 return err;
1821 err = loopback_mixer_new(loopback, pcm_notify[dev] ? 1 : 0);
1822 if (err < 0)
1823 return err;
1824 loopback_cable_proc_new(loopback, 0);
1825 loopback_cable_proc_new(loopback, 1);
1826 loopback_timer_source_proc_new(loopback);
1827 strcpy(card->driver, "Loopback");
1828 strcpy(card->shortname, "Loopback");
1829 sprintf(card->longname, "Loopback %i", dev + 1);
1830 err = snd_card_register(card);
1831 if (err < 0)
1832 return err;
1833 platform_set_drvdata(devptr, card);
1834 return 0;
1837 static int loopback_suspend(struct device *pdev)
1839 struct snd_card *card = dev_get_drvdata(pdev);
1841 snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1842 return 0;
1845 static int loopback_resume(struct device *pdev)
1847 struct snd_card *card = dev_get_drvdata(pdev);
1849 snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1850 return 0;
1853 static DEFINE_SIMPLE_DEV_PM_OPS(loopback_pm, loopback_suspend, loopback_resume);
1855 #define SND_LOOPBACK_DRIVER "snd_aloop"
1857 static struct platform_driver loopback_driver = {
1858 .probe = loopback_probe,
1859 .driver = {
1860 .name = SND_LOOPBACK_DRIVER,
1861 .pm = &loopback_pm,
1865 static void loopback_unregister_all(void)
1867 int i;
1869 for (i = 0; i < ARRAY_SIZE(devices); ++i)
1870 platform_device_unregister(devices[i]);
1871 platform_driver_unregister(&loopback_driver);
1874 static int __init alsa_card_loopback_init(void)
1876 int i, err, cards;
1878 err = platform_driver_register(&loopback_driver);
1879 if (err < 0)
1880 return err;
1883 cards = 0;
1884 for (i = 0; i < SNDRV_CARDS; i++) {
1885 struct platform_device *device;
1886 if (!enable[i])
1887 continue;
1888 device = platform_device_register_simple(SND_LOOPBACK_DRIVER,
1889 i, NULL, 0);
1890 if (IS_ERR(device))
1891 continue;
1892 if (!platform_get_drvdata(device)) {
1893 platform_device_unregister(device);
1894 continue;
1896 devices[i] = device;
1897 cards++;
1899 if (!cards) {
1900 #ifdef MODULE
1901 pr_err("aloop: No loopback enabled\n");
1902 #endif
1903 loopback_unregister_all();
1904 return -ENODEV;
1906 return 0;
1909 static void __exit alsa_card_loopback_exit(void)
1911 loopback_unregister_all();
1914 module_init(alsa_card_loopback_init)
1915 module_exit(alsa_card_loopback_exit)