sound/drivers/aloop.c

   1 /*
   2  *  Loopback soundcard
   3  *
   4  *  Original code:
   5  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
   6  *
   7  *  More accurate positioning and full-duplex support:
   8  *  Copyright (c) Ahmet İnan <ainan at mathematik.uni-freiburg.de>
   9  *
  10  *  Major (almost complete) rewrite:
  11  *  Copyright (c) by Takashi Iwai <tiwai@suse.de>
  12  *
  13  *  A next major update in 2010 (separate timers for playback and capture):
  14  *  Copyright (c) Jaroslav Kysela <perex@perex.cz>
  15  *
  16  *   This program is free software; you can redistribute it and/or modify
  17  *   it under the terms of the GNU General Public License as published by
  18  *   the Free Software Foundation; either version 2 of the License, or
  19  *   (at your option) any later version.
  20  *
  21  *   This program is distributed in the hope that it will be useful,
  22  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  23  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24  *   GNU General Public License for more details.
  25  *
  26  *   You should have received a copy of the GNU General Public License
  27  *   along with this program; if not, write to the Free Software
  28  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  29  *
  30  */
  31
  32 #include <linux/init.h>
  33 #include <linux/jiffies.h>
  34 #include <linux/slab.h>
  35 #include <linux/time.h>
  36 #include <linux/wait.h>
  37 #include <linux/module.h>
  38 #include <linux/platform_device.h>
  39 #include <sound/core.h>
  40 #include <sound/control.h>
  41 #include <sound/pcm.h>
  42 #include <sound/pcm_params.h>
  43 #include <sound/info.h>
  44 #include <sound/initval.h>
  45
  46 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
  47 MODULE_DESCRIPTION("A loopback soundcard");
  48 MODULE_LICENSE("GPL");
  49 MODULE_SUPPORTED_DEVICE("{{ALSA,Loopback soundcard}}");
  50
  51 #define MAX_PCM_SUBSTREAMS      8
  52
  53 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* Index 0-MAX */
  54 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
  55 static bool enable[SNDRV_CARDS] = {1, [1 ... (SNDRV_CARDS - 1)] = 0};
  56 static int pcm_substreams[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 8};
  57 static int pcm_notify[SNDRV_CARDS];
  58
  59 module_param_array(index, int, NULL, 0444);
  60 MODULE_PARM_DESC(index, "Index value for loopback soundcard.");
  61 module_param_array(id, charp, NULL, 0444);
  62 MODULE_PARM_DESC(id, "ID string for loopback soundcard.");
  63 module_param_array(enable, bool, NULL, 0444);
  64 MODULE_PARM_DESC(enable, "Enable this loopback soundcard.");
  65 module_param_array(pcm_substreams, int, NULL, 0444);
  66 MODULE_PARM_DESC(pcm_substreams, "PCM substreams # (1-8) for loopback driver.");
  67 module_param_array(pcm_notify, int, NULL, 0444);
  68 MODULE_PARM_DESC(pcm_notify, "Break capture when PCM format/rate/channels changes.");
  69
  70 #define NO_PITCH 100000
  71
  72 struct loopback_pcm;
  73
  74 struct loopback_cable {
  75         spinlock_t lock;
  76         struct loopback_pcm *streams[2];
  77         struct snd_pcm_hardware hw;
  78         /* flags */
  79         unsigned int valid;
  80         unsigned int running;
  81         unsigned int pause;
  82 };
  83
  84 struct loopback_setup {
  85         unsigned int notify: 1;
  86         unsigned int rate_shift;
  87         unsigned int format;
  88         unsigned int rate;
  89         unsigned int channels;
  90         struct snd_ctl_elem_id active_id;
  91         struct snd_ctl_elem_id format_id;
  92         struct snd_ctl_elem_id rate_id;
  93         struct snd_ctl_elem_id channels_id;
  94 };
  95
  96 struct loopback {
  97         struct snd_card *card;
  98         struct mutex cable_lock;
  99         struct loopback_cable *cables[MAX_PCM_SUBSTREAMS][2];
 100         struct snd_pcm *pcm[2];
 101         struct loopback_setup setup[MAX_PCM_SUBSTREAMS][2];
 102 };
 103
 104 struct loopback_pcm {
 105         struct loopback *loopback;
 106         struct snd_pcm_substream *substream;
 107         struct loopback_cable *cable;
 108         unsigned int pcm_buffer_size;
 109         unsigned int buf_pos;   /* position in buffer */
 110         unsigned int silent_size;
 111         /* PCM parameters */
 112         unsigned int pcm_period_size;
 113         unsigned int pcm_bps;           /* bytes per second */
 114         unsigned int pcm_salign;        /* bytes per sample * channels */
 115         unsigned int pcm_rate_shift;    /* rate shift value */
 116         /* flags */
 117         unsigned int period_update_pending :1;
 118         /* timer stuff */
 119         unsigned int irq_pos;           /* fractional IRQ position */
 120         unsigned int period_size_frac;
 121         unsigned int last_drift;
 122         unsigned long last_jiffies;
 123         struct timer_list timer;
 124 };
 125
 126 static struct platform_device *devices[SNDRV_CARDS];
 127
 128 static inline unsigned int byte_pos(struct loopback_pcm *dpcm, unsigned int x)
 129 {
 130         if (dpcm->pcm_rate_shift == NO_PITCH) {
 131                 x /= HZ;
 132         } else {
 133                 x = div_u64(NO_PITCH * (unsigned long long)x,
 134                             HZ * (unsigned long long)dpcm->pcm_rate_shift);
 135         }
 136         return x - (x % dpcm->pcm_salign);
 137 }
 138
 139 static inline unsigned int frac_pos(struct loopback_pcm *dpcm, unsigned int x)
 140 {
 141         if (dpcm->pcm_rate_shift == NO_PITCH) { /* no pitch */
 142                 return x * HZ;
 143         } else {
 144                 x = div_u64(dpcm->pcm_rate_shift * (unsigned long long)x * HZ,
 145                             NO_PITCH);
 146         }
 147         return x;
 148 }
 149
 150 static inline struct loopback_setup *get_setup(struct loopback_pcm *dpcm)
 151 {
 152         int device = dpcm->substream->pstr->pcm->device;
 153
 154         if (dpcm->substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
 155                 device ^= 1;
 156         return &dpcm->loopback->setup[dpcm->substream->number][device];
 157 }
 158
 159 static inline unsigned int get_notify(struct loopback_pcm *dpcm)
 160 {
 161         return get_setup(dpcm)->notify;
 162 }
 163
 164 static inline unsigned int get_rate_shift(struct loopback_pcm *dpcm)
 165 {
 166         return get_setup(dpcm)->rate_shift;
 167 }
 168
 169 /* call in cable->lock */
 170 static void loopback_timer_start(struct loopback_pcm *dpcm)
 171 {
 172         unsigned long tick;
 173         unsigned int rate_shift = get_rate_shift(dpcm);
 174
 175         if (rate_shift != dpcm->pcm_rate_shift) {
 176                 dpcm->pcm_rate_shift = rate_shift;
 177                 dpcm->period_size_frac = frac_pos(dpcm, dpcm->pcm_period_size);
 178         }
 179         if (dpcm->period_size_frac <= dpcm->irq_pos) {
 180                 dpcm->irq_pos %= dpcm->period_size_frac;
 181                 dpcm->period_update_pending = 1;
 182         }
 183         tick = dpcm->period_size_frac - dpcm->irq_pos;
 184         tick = (tick + dpcm->pcm_bps - 1) / dpcm->pcm_bps;
 185         mod_timer(&dpcm->timer, jiffies + tick);
 186 }
 187
 188 /* call in cable->lock */
 189 static inline void loopback_timer_stop(struct loopback_pcm *dpcm)
 190 {
 191         del_timer(&dpcm->timer);
 192         dpcm->timer.expires = 0;
 193 }
 194
 195 static inline void loopback_timer_stop_sync(struct loopback_pcm *dpcm)
 196 {
 197         del_timer_sync(&dpcm->timer);
 198 }
 199
 200 #define CABLE_VALID_PLAYBACK    (1 << SNDRV_PCM_STREAM_PLAYBACK)
 201 #define CABLE_VALID_CAPTURE     (1 << SNDRV_PCM_STREAM_CAPTURE)
 202 #define CABLE_VALID_BOTH        (CABLE_VALID_PLAYBACK|CABLE_VALID_CAPTURE)
 203
 204 static int loopback_check_format(struct loopback_cable *cable, int stream)
 205 {
 206         struct snd_pcm_runtime *runtime, *cruntime;
 207         struct loopback_setup *setup;
 208         struct snd_card *card;
 209         int check;
 210
 211         if (cable->valid != CABLE_VALID_BOTH) {
 212                 if (stream == SNDRV_PCM_STREAM_PLAYBACK)
 213                         goto __notify;
 214                 return 0;
 215         }
 216         runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
 217                                                         substream->runtime;
 218         cruntime = cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
 219                                                         substream->runtime;
 220         check = runtime->format != cruntime->format ||
 221                 runtime->rate != cruntime->rate ||
 222                 runtime->channels != cruntime->channels;
 223         if (!check)
 224                 return 0;
 225         if (stream == SNDRV_PCM_STREAM_CAPTURE) {
 226                 return -EIO;
 227         } else {
 228                 snd_pcm_stop(cable->streams[SNDRV_PCM_STREAM_CAPTURE]->
 229                                         substream, SNDRV_PCM_STATE_DRAINING);
 230               __notify:
 231                 runtime = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->
 232                                                         substream->runtime;
 233                 setup = get_setup(cable->streams[SNDRV_PCM_STREAM_PLAYBACK]);
 234                 card = cable->streams[SNDRV_PCM_STREAM_PLAYBACK]->loopback->card;
 235                 if (setup->format != runtime->format) {
 236                         snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
 237                                                         &setup->format_id);
 238                         setup->format = runtime->format;
 239                 }
 240                 if (setup->rate != runtime->rate) {
 241                         snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
 242                                                         &setup->rate_id);
 243                         setup->rate = runtime->rate;
 244                 }
 245                 if (setup->channels != runtime->channels) {
 246                         snd_ctl_notify(card, SNDRV_CTL_EVENT_MASK_VALUE,
 247                                                         &setup->channels_id);
 248                         setup->channels = runtime->channels;
 249                 }
 250         }
 251         return 0;
 252 }
 253
 254 static void loopback_active_notify(struct loopback_pcm *dpcm)
 255 {
 256         snd_ctl_notify(dpcm->loopback->card,
 257                        SNDRV_CTL_EVENT_MASK_VALUE,
 258                        &get_setup(dpcm)->active_id);
 259 }
 260
 261 static int loopback_trigger(struct snd_pcm_substream *substream, int cmd)
 262 {
 263         struct snd_pcm_runtime *runtime = substream->runtime;
 264         struct loopback_pcm *dpcm = runtime->private_data;
 265         struct loopback_cable *cable = dpcm->cable;
 266         int err, stream = 1 << substream->stream;
 267
 268         switch (cmd) {
 269         case SNDRV_PCM_TRIGGER_START:
 270                 err = loopback_check_format(cable, substream->stream);
 271                 if (err < 0)
 272                         return err;
 273                 dpcm->last_jiffies = jiffies;
 274                 dpcm->pcm_rate_shift = 0;
 275                 dpcm->last_drift = 0;
 276                 spin_lock(&cable->lock);
 277                 cable->running |= stream;
 278                 cable->pause &= ~stream;
 279                 loopback_timer_start(dpcm);
 280                 spin_unlock(&cable->lock);
 281                 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
 282                         loopback_active_notify(dpcm);
 283                 break;
 284         case SNDRV_PCM_TRIGGER_STOP:
 285                 spin_lock(&cable->lock);
 286                 cable->running &= ~stream;
 287                 cable->pause &= ~stream;
 288                 loopback_timer_stop(dpcm);
 289                 spin_unlock(&cable->lock);
 290                 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
 291                         loopback_active_notify(dpcm);
 292                 break;
 293         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
 294         case SNDRV_PCM_TRIGGER_SUSPEND:
 295                 spin_lock(&cable->lock);
 296                 cable->pause |= stream;
 297                 loopback_timer_stop(dpcm);
 298                 spin_unlock(&cable->lock);
 299                 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
 300                         loopback_active_notify(dpcm);
 301                 break;
 302         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
 303         case SNDRV_PCM_TRIGGER_RESUME:
 304                 spin_lock(&cable->lock);
 305                 dpcm->last_jiffies = jiffies;
 306                 cable->pause &= ~stream;
 307                 loopback_timer_start(dpcm);
 308                 spin_unlock(&cable->lock);
 309                 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
 310                         loopback_active_notify(dpcm);
 311                 break;
 312         default:
 313                 return -EINVAL;
 314         }
 315         return 0;
 316 }
 317
 318 static void params_change(struct snd_pcm_substream *substream)
 319 {
 320         struct snd_pcm_runtime *runtime = substream->runtime;
 321         struct loopback_pcm *dpcm = runtime->private_data;
 322         struct loopback_cable *cable = dpcm->cable;
 323
 324         cable->hw.formats = pcm_format_to_bits(runtime->format);
 325         cable->hw.rate_min = runtime->rate;
 326         cable->hw.rate_max = runtime->rate;
 327         cable->hw.channels_min = runtime->channels;
 328         cable->hw.channels_max = runtime->channels;
 329 }
 330
 331 static int loopback_prepare(struct snd_pcm_substream *substream)
 332 {
 333         struct snd_pcm_runtime *runtime = substream->runtime;
 334         struct loopback_pcm *dpcm = runtime->private_data;
 335         struct loopback_cable *cable = dpcm->cable;
 336         int bps, salign;
 337
 338         loopback_timer_stop_sync(dpcm);
 339
 340         salign = (snd_pcm_format_width(runtime->format) *
 341                                                 runtime->channels) / 8;
 342         bps = salign * runtime->rate;
 343         if (bps <= 0 || salign <= 0)
 344                 return -EINVAL;
 345
 346         dpcm->buf_pos = 0;
 347         dpcm->pcm_buffer_size = frames_to_bytes(runtime, runtime->buffer_size);
 348         if (substream->stream == SNDRV_PCM_STREAM_CAPTURE) {
 349                 /* clear capture buffer */
 350                 dpcm->silent_size = dpcm->pcm_buffer_size;
 351                 snd_pcm_format_set_silence(runtime->format, runtime->dma_area,
 352                                            runtime->buffer_size * runtime->channels);
 353         }
 354
 355         dpcm->irq_pos = 0;
 356         dpcm->period_update_pending = 0;
 357         dpcm->pcm_bps = bps;
 358         dpcm->pcm_salign = salign;
 359         dpcm->pcm_period_size = frames_to_bytes(runtime, runtime->period_size);
 360
 361         mutex_lock(&dpcm->loopback->cable_lock);
 362         if (!(cable->valid & ~(1 << substream->stream)) ||
 363             (get_setup(dpcm)->notify &&
 364              substream->stream == SNDRV_PCM_STREAM_PLAYBACK))
 365                 params_change(substream);
 366         cable->valid |= 1 << substream->stream;
 367         mutex_unlock(&dpcm->loopback->cable_lock);
 368
 369         return 0;
 370 }
 371
 372 static void clear_capture_buf(struct loopback_pcm *dpcm, unsigned int bytes)
 373 {
 374         struct snd_pcm_runtime *runtime = dpcm->substream->runtime;
 375         char *dst = runtime->dma_area;
 376         unsigned int dst_off = dpcm->buf_pos;
 377
 378         if (dpcm->silent_size >= dpcm->pcm_buffer_size)
 379                 return;
 380         if (dpcm->silent_size + bytes > dpcm->pcm_buffer_size)
 381                 bytes = dpcm->pcm_buffer_size - dpcm->silent_size;
 382
 383         for (;;) {
 384                 unsigned int size = bytes;
 385                 if (dst_off + size > dpcm->pcm_buffer_size)
 386                         size = dpcm->pcm_buffer_size - dst_off;
 387                 snd_pcm_format_set_silence(runtime->format, dst + dst_off,
 388                                            bytes_to_frames(runtime, size) *
 389                                                 runtime->channels);
 390                 dpcm->silent_size += size;
 391                 bytes -= size;
 392                 if (!bytes)
 393                         break;
 394                 dst_off = 0;
 395         }
 396 }
 397
 398 static void copy_play_buf(struct loopback_pcm *play,
 399                           struct loopback_pcm *capt,
 400                           unsigned int bytes)
 401 {
 402         struct snd_pcm_runtime *runtime = play->substream->runtime;
 403         char *src = runtime->dma_area;
 404         char *dst = capt->substream->runtime->dma_area;
 405         unsigned int src_off = play->buf_pos;
 406         unsigned int dst_off = capt->buf_pos;
 407         unsigned int clear_bytes = 0;
 408
 409         /* check if playback is draining, trim the capture copy size
 410          * when our pointer is at the end of playback ring buffer */
 411         if (runtime->status->state == SNDRV_PCM_STATE_DRAINING &&
 412             snd_pcm_playback_hw_avail(runtime) < runtime->buffer_size) {
 413                 snd_pcm_uframes_t appl_ptr, appl_ptr1, diff;
 414                 appl_ptr = appl_ptr1 = runtime->control->appl_ptr;
 415                 appl_ptr1 -= appl_ptr1 % runtime->buffer_size;
 416                 appl_ptr1 += play->buf_pos / play->pcm_salign;
 417                 if (appl_ptr < appl_ptr1)
 418                         appl_ptr1 -= runtime->buffer_size;
 419                 diff = (appl_ptr - appl_ptr1) * play->pcm_salign;
 420                 if (diff < bytes) {
 421                         clear_bytes = bytes - diff;
 422                         bytes = diff;
 423                 }
 424         }
 425
 426         for (;;) {
 427                 unsigned int size = bytes;
 428                 if (src_off + size > play->pcm_buffer_size)
 429                         size = play->pcm_buffer_size - src_off;
 430                 if (dst_off + size > capt->pcm_buffer_size)
 431                         size = capt->pcm_buffer_size - dst_off;
 432                 memcpy(dst + dst_off, src + src_off, size);
 433                 capt->silent_size = 0;
 434                 bytes -= size;
 435                 if (!bytes)
 436                         break;
 437                 src_off = (src_off + size) % play->pcm_buffer_size;
 438                 dst_off = (dst_off + size) % capt->pcm_buffer_size;
 439         }
 440
 441         if (clear_bytes > 0) {
 442                 clear_capture_buf(capt, clear_bytes);
 443                 capt->silent_size = 0;
 444         }
 445 }
 446
 447 static inline unsigned int bytepos_delta(struct loopback_pcm *dpcm,
 448                                          unsigned int jiffies_delta)
 449 {
 450         unsigned long last_pos;
 451         unsigned int delta;
 452
 453         last_pos = byte_pos(dpcm, dpcm->irq_pos);
 454         dpcm->irq_pos += jiffies_delta * dpcm->pcm_bps;
 455         delta = byte_pos(dpcm, dpcm->irq_pos) - last_pos;
 456         if (delta >= dpcm->last_drift)
 457                 delta -= dpcm->last_drift;
 458         dpcm->last_drift = 0;
 459         if (dpcm->irq_pos >= dpcm->period_size_frac) {
 460                 dpcm->irq_pos %= dpcm->period_size_frac;
 461                 dpcm->period_update_pending = 1;
 462         }
 463         return delta;
 464 }
 465
 466 static inline void bytepos_finish(struct loopback_pcm *dpcm,
 467                                   unsigned int delta)
 468 {
 469         dpcm->buf_pos += delta;
 470         dpcm->buf_pos %= dpcm->pcm_buffer_size;
 471 }
 472
 473 /* call in cable->lock */
 474 static unsigned int loopback_pos_update(struct loopback_cable *cable)
 475 {
 476         struct loopback_pcm *dpcm_play =
 477                         cable->streams[SNDRV_PCM_STREAM_PLAYBACK];
 478         struct loopback_pcm *dpcm_capt =
 479                         cable->streams[SNDRV_PCM_STREAM_CAPTURE];
 480         unsigned long delta_play = 0, delta_capt = 0;
 481         unsigned int running, count1, count2;
 482
 483         running = cable->running ^ cable->pause;
 484         if (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) {
 485                 delta_play = jiffies - dpcm_play->last_jiffies;
 486                 dpcm_play->last_jiffies += delta_play;
 487         }
 488
 489         if (running & (1 << SNDRV_PCM_STREAM_CAPTURE)) {
 490                 delta_capt = jiffies - dpcm_capt->last_jiffies;
 491                 dpcm_capt->last_jiffies += delta_capt;
 492         }
 493
 494         if (delta_play == 0 && delta_capt == 0)
 495                 goto unlock;
 496
 497         if (delta_play > delta_capt) {
 498                 count1 = bytepos_delta(dpcm_play, delta_play - delta_capt);
 499                 bytepos_finish(dpcm_play, count1);
 500                 delta_play = delta_capt;
 501         } else if (delta_play < delta_capt) {
 502                 count1 = bytepos_delta(dpcm_capt, delta_capt - delta_play);
 503                 clear_capture_buf(dpcm_capt, count1);
 504                 bytepos_finish(dpcm_capt, count1);
 505                 delta_capt = delta_play;
 506         }
 507
 508         if (delta_play == 0 && delta_capt == 0)
 509                 goto unlock;
 510
 511         /* note delta_capt == delta_play at this moment */
 512         count1 = bytepos_delta(dpcm_play, delta_play);
 513         count2 = bytepos_delta(dpcm_capt, delta_capt);
 514         if (count1 < count2) {
 515                 dpcm_capt->last_drift = count2 - count1;
 516                 count1 = count2;
 517         } else if (count1 > count2) {
 518                 dpcm_play->last_drift = count1 - count2;
 519         }
 520         copy_play_buf(dpcm_play, dpcm_capt, count1);
 521         bytepos_finish(dpcm_play, count1);
 522         bytepos_finish(dpcm_capt, count1);
 523  unlock:
 524         return running;
 525 }
 526
 527 static void loopback_timer_function(unsigned long data)
 528 {
 529         struct loopback_pcm *dpcm = (struct loopback_pcm *)data;
 530         unsigned long flags;
 531
 532         spin_lock_irqsave(&dpcm->cable->lock, flags);
 533         if (loopback_pos_update(dpcm->cable) & (1 << dpcm->substream->stream)) {
 534                 loopback_timer_start(dpcm);
 535                 if (dpcm->period_update_pending) {
 536                         dpcm->period_update_pending = 0;
 537                         spin_unlock_irqrestore(&dpcm->cable->lock, flags);
 538                         /* need to unlock before calling below */
 539                         snd_pcm_period_elapsed(dpcm->substream);
 540                         return;
 541                 }
 542         }
 543         spin_unlock_irqrestore(&dpcm->cable->lock, flags);
 544 }
 545
 546 static snd_pcm_uframes_t loopback_pointer(struct snd_pcm_substream *substream)
 547 {
 548         struct snd_pcm_runtime *runtime = substream->runtime;
 549         struct loopback_pcm *dpcm = runtime->private_data;
 550         snd_pcm_uframes_t pos;
 551
 552         spin_lock(&dpcm->cable->lock);
 553         loopback_pos_update(dpcm->cable);
 554         pos = dpcm->buf_pos;
 555         spin_unlock(&dpcm->cable->lock);
 556         return bytes_to_frames(runtime, pos);
 557 }
 558
 559 static const struct snd_pcm_hardware loopback_pcm_hardware =
 560 {
 561         .info =         (SNDRV_PCM_INFO_INTERLEAVED | SNDRV_PCM_INFO_MMAP |
 562                          SNDRV_PCM_INFO_MMAP_VALID | SNDRV_PCM_INFO_PAUSE |
 563                          SNDRV_PCM_INFO_RESUME),
 564         .formats =      (SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S16_BE |
 565                          SNDRV_PCM_FMTBIT_S32_LE | SNDRV_PCM_FMTBIT_S32_BE |
 566                          SNDRV_PCM_FMTBIT_FLOAT_LE | SNDRV_PCM_FMTBIT_FLOAT_BE),
 567         .rates =        SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_192000,
 568         .rate_min =             8000,
 569         .rate_max =             192000,
 570         .channels_min =         1,
 571         .channels_max =         32,
 572         .buffer_bytes_max =     2 * 1024 * 1024,
 573         .period_bytes_min =     64,
 574         /* note check overflow in frac_pos() using pcm_rate_shift before
 575            changing period_bytes_max value */
 576         .period_bytes_max =     1024 * 1024,
 577         .periods_min =          1,
 578         .periods_max =          1024,
 579         .fifo_size =            0,
 580 };
 581
 582 static void loopback_runtime_free(struct snd_pcm_runtime *runtime)
 583 {
 584         struct loopback_pcm *dpcm = runtime->private_data;
 585         kfree(dpcm);
 586 }
 587
 588 static int loopback_hw_params(struct snd_pcm_substream *substream,
 589                               struct snd_pcm_hw_params *params)
 590 {
 591         return snd_pcm_lib_alloc_vmalloc_buffer(substream,
 592                                                 params_buffer_bytes(params));
 593 }
 594
 595 static int loopback_hw_free(struct snd_pcm_substream *substream)
 596 {
 597         struct snd_pcm_runtime *runtime = substream->runtime;
 598         struct loopback_pcm *dpcm = runtime->private_data;
 599         struct loopback_cable *cable = dpcm->cable;
 600
 601         mutex_lock(&dpcm->loopback->cable_lock);
 602         cable->valid &= ~(1 << substream->stream);
 603         mutex_unlock(&dpcm->loopback->cable_lock);
 604         return snd_pcm_lib_free_vmalloc_buffer(substream);
 605 }
 606
 607 static unsigned int get_cable_index(struct snd_pcm_substream *substream)
 608 {
 609         if (!substream->pcm->device)
 610                 return substream->stream;
 611         else
 612                 return !substream->stream;
 613 }
 614
 615 static int rule_format(struct snd_pcm_hw_params *params,
 616                        struct snd_pcm_hw_rule *rule)
 617 {
 618         struct loopback_pcm *dpcm = rule->private;
 619         struct loopback_cable *cable = dpcm->cable;
 620         struct snd_mask m;
 621
 622         snd_mask_none(&m);
 623         mutex_lock(&dpcm->loopback->cable_lock);
 624         m.bits[0] = (u_int32_t)cable->hw.formats;
 625         m.bits[1] = (u_int32_t)(cable->hw.formats >> 32);
 626         mutex_unlock(&dpcm->loopback->cable_lock);
 627         return snd_mask_refine(hw_param_mask(params, rule->var), &m);
 628 }
 629
 630 static int rule_rate(struct snd_pcm_hw_params *params,
 631                      struct snd_pcm_hw_rule *rule)
 632 {
 633         struct loopback_pcm *dpcm = rule->private;
 634         struct loopback_cable *cable = dpcm->cable;
 635         struct snd_interval t;
 636
 637         mutex_lock(&dpcm->loopback->cable_lock);
 638         t.min = cable->hw.rate_min;
 639         t.max = cable->hw.rate_max;
 640         mutex_unlock(&dpcm->loopback->cable_lock);
 641         t.openmin = t.openmax = 0;
 642         t.integer = 0;
 643         return snd_interval_refine(hw_param_interval(params, rule->var), &t);
 644 }
 645
 646 static int rule_channels(struct snd_pcm_hw_params *params,
 647                          struct snd_pcm_hw_rule *rule)
 648 {
 649         struct loopback_pcm *dpcm = rule->private;
 650         struct loopback_cable *cable = dpcm->cable;
 651         struct snd_interval t;
 652
 653         mutex_lock(&dpcm->loopback->cable_lock);
 654         t.min = cable->hw.channels_min;
 655         t.max = cable->hw.channels_max;
 656         mutex_unlock(&dpcm->loopback->cable_lock);
 657         t.openmin = t.openmax = 0;
 658         t.integer = 0;
 659         return snd_interval_refine(hw_param_interval(params, rule->var), &t);
 660 }
 661
 662 static void free_cable(struct snd_pcm_substream *substream)
 663 {
 664         struct loopback *loopback = substream->private_data;
 665         int dev = get_cable_index(substream);
 666         struct loopback_cable *cable;
 667
 668         cable = loopback->cables[substream->number][dev];
 669         if (!cable)
 670                 return;
 671         if (cable->streams[!substream->stream]) {
 672                 /* other stream is still alive */
 673                 spin_lock_irq(&cable->lock);
 674                 cable->streams[substream->stream] = NULL;
 675                 spin_unlock_irq(&cable->lock);
 676         } else {
 677                 /* free the cable */
 678                 loopback->cables[substream->number][dev] = NULL;
 679                 kfree(cable);
 680         }
 681 }
 682
 683 static int loopback_open(struct snd_pcm_substream *substream)
 684 {
 685         struct snd_pcm_runtime *runtime = substream->runtime;
 686         struct loopback *loopback = substream->private_data;
 687         struct loopback_pcm *dpcm;
 688         struct loopback_cable *cable = NULL;
 689         int err = 0;
 690         int dev = get_cable_index(substream);
 691
 692         mutex_lock(&loopback->cable_lock);
 693         dpcm = kzalloc(sizeof(*dpcm), GFP_KERNEL);
 694         if (!dpcm) {
 695                 err = -ENOMEM;
 696                 goto unlock;
 697         }
 698         dpcm->loopback = loopback;
 699         dpcm->substream = substream;
 700         setup_timer(&dpcm->timer, loopback_timer_function,
 701                     (unsigned long)dpcm);
 702
 703         cable = loopback->cables[substream->number][dev];
 704         if (!cable) {
 705                 cable = kzalloc(sizeof(*cable), GFP_KERNEL);
 706                 if (!cable) {
 707                         err = -ENOMEM;
 708                         goto unlock;
 709                 }
 710                 spin_lock_init(&cable->lock);
 711                 cable->hw = loopback_pcm_hardware;
 712                 loopback->cables[substream->number][dev] = cable;
 713         }
 714         dpcm->cable = cable;
 715
 716         snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS);
 717
 718         /* use dynamic rules based on actual runtime->hw values */
 719         /* note that the default rules created in the PCM midlevel code */
 720         /* are cached -> they do not reflect the actual state */
 721         err = snd_pcm_hw_rule_add(runtime, 0,
 722                                   SNDRV_PCM_HW_PARAM_FORMAT,
 723                                   rule_format, dpcm,
 724                                   SNDRV_PCM_HW_PARAM_FORMAT, -1);
 725         if (err < 0)
 726                 goto unlock;
 727         err = snd_pcm_hw_rule_add(runtime, 0,
 728                                   SNDRV_PCM_HW_PARAM_RATE,
 729                                   rule_rate, dpcm,
 730                                   SNDRV_PCM_HW_PARAM_RATE, -1);
 731         if (err < 0)
 732                 goto unlock;
 733         err = snd_pcm_hw_rule_add(runtime, 0,
 734                                   SNDRV_PCM_HW_PARAM_CHANNELS,
 735                                   rule_channels, dpcm,
 736                                   SNDRV_PCM_HW_PARAM_CHANNELS, -1);
 737         if (err < 0)
 738                 goto unlock;
 739
 740         runtime->private_data = dpcm;
 741         runtime->private_free = loopback_runtime_free;
 742         if (get_notify(dpcm))
 743                 runtime->hw = loopback_pcm_hardware;
 744         else
 745                 runtime->hw = cable->hw;
 746
 747         spin_lock_irq(&cable->lock);
 748         cable->streams[substream->stream] = dpcm;
 749         spin_unlock_irq(&cable->lock);
 750
 751  unlock:
 752         if (err < 0) {
 753                 free_cable(substream);
 754                 kfree(dpcm);
 755         }
 756         mutex_unlock(&loopback->cable_lock);
 757         return err;
 758 }
 759
 760 static int loopback_close(struct snd_pcm_substream *substream)
 761 {
 762         struct loopback *loopback = substream->private_data;
 763         struct loopback_pcm *dpcm = substream->runtime->private_data;
 764
 765         loopback_timer_stop_sync(dpcm);
 766         mutex_lock(&loopback->cable_lock);
 767         free_cable(substream);
 768         mutex_unlock(&loopback->cable_lock);
 769         return 0;
 770 }
 771
 772 static const struct snd_pcm_ops loopback_playback_ops = {
 773         .open =         loopback_open,
 774         .close =        loopback_close,
 775         .ioctl =        snd_pcm_lib_ioctl,
 776         .hw_params =    loopback_hw_params,
 777         .hw_free =      loopback_hw_free,
 778         .prepare =      loopback_prepare,
 779         .trigger =      loopback_trigger,
 780         .pointer =      loopback_pointer,
 781         .page =         snd_pcm_lib_get_vmalloc_page,
 782         .mmap =         snd_pcm_lib_mmap_vmalloc,
 783 };
 784
 785 static const struct snd_pcm_ops loopback_capture_ops = {
 786         .open =         loopback_open,
 787         .close =        loopback_close,
 788         .ioctl =        snd_pcm_lib_ioctl,
 789         .hw_params =    loopback_hw_params,
 790         .hw_free =      loopback_hw_free,
 791         .prepare =      loopback_prepare,
 792         .trigger =      loopback_trigger,
 793         .pointer =      loopback_pointer,
 794         .page =         snd_pcm_lib_get_vmalloc_page,
 795         .mmap =         snd_pcm_lib_mmap_vmalloc,
 796 };
 797
 798 static int loopback_pcm_new(struct loopback *loopback,
 799                             int device, int substreams)
 800 {
 801         struct snd_pcm *pcm;
 802         int err;
 803
 804         err = snd_pcm_new(loopback->card, "Loopback PCM", device,
 805                           substreams, substreams, &pcm);
 806         if (err < 0)
 807                 return err;
 808         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &loopback_playback_ops);
 809         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &loopback_capture_ops);
 810
 811         pcm->private_data = loopback;
 812         pcm->info_flags = 0;
 813         strcpy(pcm->name, "Loopback PCM");
 814
 815         loopback->pcm[device] = pcm;
 816         return 0;
 817 }
 818
 819 static int loopback_rate_shift_info(struct snd_kcontrol *kcontrol,
 820                                     struct snd_ctl_elem_info *uinfo)
 821 {
 822         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 823         uinfo->count = 1;
 824         uinfo->value.integer.min = 80000;
 825         uinfo->value.integer.max = 120000;
 826         uinfo->value.integer.step = 1;
 827         return 0;
 828 }
 829
 830 static int loopback_rate_shift_get(struct snd_kcontrol *kcontrol,
 831                                    struct snd_ctl_elem_value *ucontrol)
 832 {
 833         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 834
 835         mutex_lock(&loopback->cable_lock);
 836         ucontrol->value.integer.value[0] =
 837                 loopback->setup[kcontrol->id.subdevice]
 838                                [kcontrol->id.device].rate_shift;
 839         mutex_unlock(&loopback->cable_lock);
 840         return 0;
 841 }
 842
 843 static int loopback_rate_shift_put(struct snd_kcontrol *kcontrol,
 844                                    struct snd_ctl_elem_value *ucontrol)
 845 {
 846         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 847         unsigned int val;
 848         int change = 0;
 849
 850         val = ucontrol->value.integer.value[0];
 851         if (val < 80000)
 852                 val = 80000;
 853         if (val > 120000)
 854                 val = 120000;
 855         mutex_lock(&loopback->cable_lock);
 856         if (val != loopback->setup[kcontrol->id.subdevice]
 857                                   [kcontrol->id.device].rate_shift) {
 858                 loopback->setup[kcontrol->id.subdevice]
 859                                [kcontrol->id.device].rate_shift = val;
 860                 change = 1;
 861         }
 862         mutex_unlock(&loopback->cable_lock);
 863         return change;
 864 }
 865
 866 static int loopback_notify_get(struct snd_kcontrol *kcontrol,
 867                                struct snd_ctl_elem_value *ucontrol)
 868 {
 869         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 870
 871         mutex_lock(&loopback->cable_lock);
 872         ucontrol->value.integer.value[0] =
 873                 loopback->setup[kcontrol->id.subdevice]
 874                                [kcontrol->id.device].notify;
 875         mutex_unlock(&loopback->cable_lock);
 876         return 0;
 877 }
 878
 879 static int loopback_notify_put(struct snd_kcontrol *kcontrol,
 880                                struct snd_ctl_elem_value *ucontrol)
 881 {
 882         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 883         unsigned int val;
 884         int change = 0;
 885
 886         val = ucontrol->value.integer.value[0] ? 1 : 0;
 887         mutex_lock(&loopback->cable_lock);
 888         if (val != loopback->setup[kcontrol->id.subdevice]
 889                                 [kcontrol->id.device].notify) {
 890                 loopback->setup[kcontrol->id.subdevice]
 891                         [kcontrol->id.device].notify = val;
 892                 change = 1;
 893         }
 894         mutex_unlock(&loopback->cable_lock);
 895         return change;
 896 }
 897
 898 static int loopback_active_get(struct snd_kcontrol *kcontrol,
 899                                struct snd_ctl_elem_value *ucontrol)
 900 {
 901         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 902         struct loopback_cable *cable;
 903
 904         unsigned int val = 0;
 905
 906         mutex_lock(&loopback->cable_lock);
 907         cable = loopback->cables[kcontrol->id.subdevice][kcontrol->id.device ^ 1];
 908         if (cable != NULL) {
 909                 unsigned int running = cable->running ^ cable->pause;
 910
 911                 val = (running & (1 << SNDRV_PCM_STREAM_PLAYBACK)) ? 1 : 0;
 912         }
 913         mutex_unlock(&loopback->cable_lock);
 914         ucontrol->value.integer.value[0] = val;
 915         return 0;
 916 }
 917
 918 static int loopback_format_info(struct snd_kcontrol *kcontrol,
 919                                 struct snd_ctl_elem_info *uinfo)
 920 {
 921         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 922         uinfo->count = 1;
 923         uinfo->value.integer.min = 0;
 924         uinfo->value.integer.max = SNDRV_PCM_FORMAT_LAST;
 925         uinfo->value.integer.step = 1;
 926         return 0;
 927 }
 928
 929 static int loopback_format_get(struct snd_kcontrol *kcontrol,
 930                                struct snd_ctl_elem_value *ucontrol)
 931 {
 932         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 933
 934         ucontrol->value.integer.value[0] =
 935                 loopback->setup[kcontrol->id.subdevice]
 936                                [kcontrol->id.device].format;
 937         return 0;
 938 }
 939
 940 static int loopback_rate_info(struct snd_kcontrol *kcontrol,
 941                               struct snd_ctl_elem_info *uinfo)
 942 {
 943         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 944         uinfo->count = 1;
 945         uinfo->value.integer.min = 0;
 946         uinfo->value.integer.max = 192000;
 947         uinfo->value.integer.step = 1;
 948         return 0;
 949 }
 950
 951 static int loopback_rate_get(struct snd_kcontrol *kcontrol,
 952                              struct snd_ctl_elem_value *ucontrol)
 953 {
 954         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 955
 956         mutex_lock(&loopback->cable_lock);
 957         ucontrol->value.integer.value[0] =
 958                 loopback->setup[kcontrol->id.subdevice]
 959                                [kcontrol->id.device].rate;
 960         mutex_unlock(&loopback->cable_lock);
 961         return 0;
 962 }
 963
 964 static int loopback_channels_info(struct snd_kcontrol *kcontrol,
 965                                   struct snd_ctl_elem_info *uinfo)
 966 {
 967         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 968         uinfo->count = 1;
 969         uinfo->value.integer.min = 1;
 970         uinfo->value.integer.max = 1024;
 971         uinfo->value.integer.step = 1;
 972         return 0;
 973 }
 974
 975 static int loopback_channels_get(struct snd_kcontrol *kcontrol,
 976                                  struct snd_ctl_elem_value *ucontrol)
 977 {
 978         struct loopback *loopback = snd_kcontrol_chip(kcontrol);
 979
 980         mutex_lock(&loopback->cable_lock);
 981         ucontrol->value.integer.value[0] =
 982                 loopback->setup[kcontrol->id.subdevice]
 983                                [kcontrol->id.device].channels;
 984         mutex_unlock(&loopback->cable_lock);
 985         return 0;
 986 }
 987
 988 static struct snd_kcontrol_new loopback_controls[]  = {
 989 {
 990         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
 991         .name =         "PCM Rate Shift 100000",
 992         .info =         loopback_rate_shift_info,
 993         .get =          loopback_rate_shift_get,
 994         .put =          loopback_rate_shift_put,
 995 },
 996 {
 997         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
 998         .name =         "PCM Notify",
 999         .info =         snd_ctl_boolean_mono_info,
1000         .get =          loopback_notify_get,
1001         .put =          loopback_notify_put,
1002 },
1003 #define ACTIVE_IDX 2
1004 {
1005         .access =       SNDRV_CTL_ELEM_ACCESS_READ,
1006         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1007         .name =         "PCM Slave Active",
1008         .info =         snd_ctl_boolean_mono_info,
1009         .get =          loopback_active_get,
1010 },
1011 #define FORMAT_IDX 3
1012 {
1013         .access =       SNDRV_CTL_ELEM_ACCESS_READ,
1014         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1015         .name =         "PCM Slave Format",
1016         .info =         loopback_format_info,
1017         .get =          loopback_format_get
1018 },
1019 #define RATE_IDX 4
1020 {
1021         .access =       SNDRV_CTL_ELEM_ACCESS_READ,
1022         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1023         .name =         "PCM Slave Rate",
1024         .info =         loopback_rate_info,
1025         .get =          loopback_rate_get
1026 },
1027 #define CHANNELS_IDX 5
1028 {
1029         .access =       SNDRV_CTL_ELEM_ACCESS_READ,
1030         .iface =        SNDRV_CTL_ELEM_IFACE_PCM,
1031         .name =         "PCM Slave Channels",
1032         .info =         loopback_channels_info,
1033         .get =          loopback_channels_get
1034 }
1035 };
1036
1037 static int loopback_mixer_new(struct loopback *loopback, int notify)
1038 {
1039         struct snd_card *card = loopback->card;
1040         struct snd_pcm *pcm;
1041         struct snd_kcontrol *kctl;
1042         struct loopback_setup *setup;
1043         int err, dev, substr, substr_count, idx;
1044
1045         strcpy(card->mixername, "Loopback Mixer");
1046         for (dev = 0; dev < 2; dev++) {
1047                 pcm = loopback->pcm[dev];
1048                 substr_count =
1049                     pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream_count;
1050                 for (substr = 0; substr < substr_count; substr++) {
1051                         setup = &loopback->setup[substr][dev];
1052                         setup->notify = notify;
1053                         setup->rate_shift = NO_PITCH;
1054                         setup->format = SNDRV_PCM_FORMAT_S16_LE;
1055                         setup->rate = 48000;
1056                         setup->channels = 2;
1057                         for (idx = 0; idx < ARRAY_SIZE(loopback_controls);
1058                                                                         idx++) {
1059                                 kctl = snd_ctl_new1(&loopback_controls[idx],
1060                                                     loopback);
1061                                 if (!kctl)
1062                                         return -ENOMEM;
1063                                 kctl->id.device = dev;
1064                                 kctl->id.subdevice = substr;
1065
1066                                 /* Add the control before copying the id so that
1067                                  * the numid field of the id is set in the copy.
1068                                  */
1069                                 err = snd_ctl_add(card, kctl);
1070                                 if (err < 0)
1071                                         return err;
1072
1073                                 switch (idx) {
1074                                 case ACTIVE_IDX:
1075                                         setup->active_id = kctl->id;
1076                                         break;
1077                                 case FORMAT_IDX:
1078                                         setup->format_id = kctl->id;
1079                                         break;
1080                                 case RATE_IDX:
1081                                         setup->rate_id = kctl->id;
1082                                         break;
1083                                 case CHANNELS_IDX:
1084                                         setup->channels_id = kctl->id;
1085                                         break;
1086                                 default:
1087                                         break;
1088                                 }
1089                         }
1090                 }
1091         }
1092         return 0;
1093 }
1094
1095 static void print_dpcm_info(struct snd_info_buffer *buffer,
1096                             struct loopback_pcm *dpcm,
1097                             const char *id)
1098 {
1099         snd_iprintf(buffer, "  %s\n", id);
1100         if (dpcm == NULL) {
1101                 snd_iprintf(buffer, "    inactive\n");
1102                 return;
1103         }
1104         snd_iprintf(buffer, "    buffer_size:\t%u\n", dpcm->pcm_buffer_size);
1105         snd_iprintf(buffer, "    buffer_pos:\t\t%u\n", dpcm->buf_pos);
1106         snd_iprintf(buffer, "    silent_size:\t%u\n", dpcm->silent_size);
1107         snd_iprintf(buffer, "    period_size:\t%u\n", dpcm->pcm_period_size);
1108         snd_iprintf(buffer, "    bytes_per_sec:\t%u\n", dpcm->pcm_bps);
1109         snd_iprintf(buffer, "    sample_align:\t%u\n", dpcm->pcm_salign);
1110         snd_iprintf(buffer, "    rate_shift:\t\t%u\n", dpcm->pcm_rate_shift);
1111         snd_iprintf(buffer, "    update_pending:\t%u\n",
1112                                                 dpcm->period_update_pending);
1113         snd_iprintf(buffer, "    irq_pos:\t\t%u\n", dpcm->irq_pos);
1114         snd_iprintf(buffer, "    period_frac:\t%u\n", dpcm->period_size_frac);
1115         snd_iprintf(buffer, "    last_jiffies:\t%lu (%lu)\n",
1116                                         dpcm->last_jiffies, jiffies);
1117         snd_iprintf(buffer, "    timer_expires:\t%lu\n", dpcm->timer.expires);
1118 }
1119
1120 static void print_substream_info(struct snd_info_buffer *buffer,
1121                                  struct loopback *loopback,
1122                                  int sub,
1123                                  int num)
1124 {
1125         struct loopback_cable *cable = loopback->cables[sub][num];
1126
1127         snd_iprintf(buffer, "Cable %i substream %i:\n", num, sub);
1128         if (cable == NULL) {
1129                 snd_iprintf(buffer, "  inactive\n");
1130                 return;
1131         }
1132         snd_iprintf(buffer, "  valid: %u\n", cable->valid);
1133         snd_iprintf(buffer, "  running: %u\n", cable->running);
1134         snd_iprintf(buffer, "  pause: %u\n", cable->pause);
1135         print_dpcm_info(buffer, cable->streams[0], "Playback");
1136         print_dpcm_info(buffer, cable->streams[1], "Capture");
1137 }
1138
1139 static void print_cable_info(struct snd_info_entry *entry,
1140                              struct snd_info_buffer *buffer)
1141 {
1142         struct loopback *loopback = entry->private_data;
1143         int sub, num;
1144
1145         mutex_lock(&loopback->cable_lock);
1146         num = entry->name[strlen(entry->name)-1];
1147         num = num == '0' ? 0 : 1;
1148         for (sub = 0; sub < MAX_PCM_SUBSTREAMS; sub++)
1149                 print_substream_info(buffer, loopback, sub, num);
1150         mutex_unlock(&loopback->cable_lock);
1151 }
1152
1153 static int loopback_proc_new(struct loopback *loopback, int cidx)
1154 {
1155         char name[32];
1156         struct snd_info_entry *entry;
1157         int err;
1158
1159         snprintf(name, sizeof(name), "cable#%d", cidx);
1160         err = snd_card_proc_new(loopback->card, name, &entry);
1161         if (err < 0)
1162                 return err;
1163
1164         snd_info_set_text_ops(entry, loopback, print_cable_info);
1165         return 0;
1166 }
1167
1168 static int loopback_probe(struct platform_device *devptr)
1169 {
1170         struct snd_card *card;
1171         struct loopback *loopback;
1172         int dev = devptr->id;
1173         int err;
1174
1175         err = snd_card_new(&devptr->dev, index[dev], id[dev], THIS_MODULE,
1176                            sizeof(struct loopback), &card);
1177         if (err < 0)
1178                 return err;
1179         loopback = card->private_data;
1180
1181         if (pcm_substreams[dev] < 1)
1182                 pcm_substreams[dev] = 1;
1183         if (pcm_substreams[dev] > MAX_PCM_SUBSTREAMS)
1184                 pcm_substreams[dev] = MAX_PCM_SUBSTREAMS;
1185
1186         loopback->card = card;
1187         mutex_init(&loopback->cable_lock);
1188
1189         err = loopback_pcm_new(loopback, 0, pcm_substreams[dev]);
1190         if (err < 0)
1191                 goto __nodev;
1192         err = loopback_pcm_new(loopback, 1, pcm_substreams[dev]);
1193         if (err < 0)
1194                 goto __nodev;
1195         err = loopback_mixer_new(loopback, pcm_notify[dev] ? 1 : 0);
1196         if (err < 0)
1197                 goto __nodev;
1198         loopback_proc_new(loopback, 0);
1199         loopback_proc_new(loopback, 1);
1200         strcpy(card->driver, "Loopback");
1201         strcpy(card->shortname, "Loopback");
1202         sprintf(card->longname, "Loopback %i", dev + 1);
1203         err = snd_card_register(card);
1204         if (!err) {
1205                 platform_set_drvdata(devptr, card);
1206                 return 0;
1207         }
1208       __nodev:
1209         snd_card_free(card);
1210         return err;
1211 }
1212
1213 static int loopback_remove(struct platform_device *devptr)
1214 {
1215         snd_card_free(platform_get_drvdata(devptr));
1216         return 0;
1217 }
1218
1219 #ifdef CONFIG_PM_SLEEP
1220 static int loopback_suspend(struct device *pdev)
1221 {
1222         struct snd_card *card = dev_get_drvdata(pdev);
1223         struct loopback *loopback = card->private_data;
1224
1225         snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
1226
1227         snd_pcm_suspend_all(loopback->pcm[0]);
1228         snd_pcm_suspend_all(loopback->pcm[1]);
1229         return 0;
1230 }
1231
1232 static int loopback_resume(struct device *pdev)
1233 {
1234         struct snd_card *card = dev_get_drvdata(pdev);
1235
1236         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
1237         return 0;
1238 }
1239
1240 static SIMPLE_DEV_PM_OPS(loopback_pm, loopback_suspend, loopback_resume);
1241 #define LOOPBACK_PM_OPS &loopback_pm
1242 #else
1243 #define LOOPBACK_PM_OPS NULL
1244 #endif
1245
1246 #define SND_LOOPBACK_DRIVER     "snd_aloop"
1247
1248 static struct platform_driver loopback_driver = {
1249         .probe          = loopback_probe,
1250         .remove         = loopback_remove,
1251         .driver         = {
1252                 .name   = SND_LOOPBACK_DRIVER,
1253                 .pm     = LOOPBACK_PM_OPS,
1254         },
1255 };
1256
1257 static void loopback_unregister_all(void)
1258 {
1259         int i;
1260
1261         for (i = 0; i < ARRAY_SIZE(devices); ++i)
1262                 platform_device_unregister(devices[i]);
1263         platform_driver_unregister(&loopback_driver);
1264 }
1265
1266 static int __init alsa_card_loopback_init(void)
1267 {
1268         int i, err, cards;
1269
1270         err = platform_driver_register(&loopback_driver);
1271         if (err < 0)
1272                 return err;
1273
1274
1275         cards = 0;
1276         for (i = 0; i < SNDRV_CARDS; i++) {
1277                 struct platform_device *device;
1278                 if (!enable[i])
1279                         continue;
1280                 device = platform_device_register_simple(SND_LOOPBACK_DRIVER,
1281                                                          i, NULL, 0);
1282                 if (IS_ERR(device))
1283                         continue;
1284                 if (!platform_get_drvdata(device)) {
1285                         platform_device_unregister(device);
1286                         continue;
1287                 }
1288                 devices[i] = device;
1289                 cards++;
1290         }
1291         if (!cards) {
1292 #ifdef MODULE
1293                 printk(KERN_ERR "aloop: No loopback enabled\n");
1294 #endif
1295                 loopback_unregister_all();
1296                 return -ENODEV;
1297         }
1298         return 0;
1299 }
1300
1301 static void __exit alsa_card_loopback_exit(void)
1302 {
1303         loopback_unregister_all();
1304 }
1305
1306 module_init(alsa_card_loopback_init)
1307 module_exit(alsa_card_loopback_exit)