sound/usb/line6/playback.c

   1 /*
   2  * Line 6 Linux USB driver
   3  *
   4  * Copyright (C) 2004-2010 Markus Grabner (grabner@icg.tugraz.at)
   5  *
   6  *      This program is free software; you can redistribute it and/or
   7  *      modify it under the terms of the GNU General Public License as
   8  *      published by the Free Software Foundation, version 2.
   9  *
  10  */
  11
  12 #include <linux/slab.h>
  13 #include <sound/core.h>
  14 #include <sound/pcm.h>
  15 #include <sound/pcm_params.h>
  16
  17 #include "capture.h"
  18 #include "driver.h"
  19 #include "pcm.h"
  20 #include "playback.h"
  21
  22 /*
  23         Software stereo volume control.
  24 */
  25 static void change_volume(struct urb *urb_out, int volume[],
  26                           int bytes_per_frame)
  27 {
  28         int chn = 0;
  29
  30         if (volume[0] == 256 && volume[1] == 256)
  31                 return;         /* maximum volume - no change */
  32
  33         if (bytes_per_frame == 4) {
  34                 short *p, *buf_end;
  35
  36                 p = (short *)urb_out->transfer_buffer;
  37                 buf_end = p + urb_out->transfer_buffer_length / sizeof(*p);
  38
  39                 for (; p < buf_end; ++p) {
  40                         *p = (*p * volume[chn & 1]) >> 8;
  41                         ++chn;
  42                 }
  43         } else if (bytes_per_frame == 6) {
  44                 unsigned char *p, *buf_end;
  45
  46                 p = (unsigned char *)urb_out->transfer_buffer;
  47                 buf_end = p + urb_out->transfer_buffer_length;
  48
  49                 for (; p < buf_end; p += 3) {
  50                         int val;
  51
  52                         val = p[0] + (p[1] << 8) + ((signed char)p[2] << 16);
  53                         val = (val * volume[chn & 1]) >> 8;
  54                         p[0] = val;
  55                         p[1] = val >> 8;
  56                         p[2] = val >> 16;
  57                         ++chn;
  58                 }
  59         }
  60 }
  61
  62 /*
  63         Create signal for impulse response test.
  64 */
  65 static void create_impulse_test_signal(struct snd_line6_pcm *line6pcm,
  66                                        struct urb *urb_out, int bytes_per_frame)
  67 {
  68         int frames = urb_out->transfer_buffer_length / bytes_per_frame;
  69
  70         if (bytes_per_frame == 4) {
  71                 int i;
  72                 short *pi = (short *)line6pcm->prev_fbuf;
  73                 short *po = (short *)urb_out->transfer_buffer;
  74
  75                 for (i = 0; i < frames; ++i) {
  76                         po[0] = pi[0];
  77                         po[1] = 0;
  78                         pi += 2;
  79                         po += 2;
  80                 }
  81         } else if (bytes_per_frame == 6) {
  82                 int i, j;
  83                 unsigned char *pi = line6pcm->prev_fbuf;
  84                 unsigned char *po = urb_out->transfer_buffer;
  85
  86                 for (i = 0; i < frames; ++i) {
  87                         for (j = 0; j < bytes_per_frame / 2; ++j)
  88                                 po[j] = pi[j];
  89
  90                         for (; j < bytes_per_frame; ++j)
  91                                 po[j] = 0;
  92
  93                         pi += bytes_per_frame;
  94                         po += bytes_per_frame;
  95                 }
  96         }
  97         if (--line6pcm->impulse_count <= 0) {
  98                 ((unsigned char *)(urb_out->transfer_buffer))[bytes_per_frame -
  99                                                               1] =
 100                     line6pcm->impulse_volume;
 101                 line6pcm->impulse_count = line6pcm->impulse_period;
 102         }
 103 }
 104
 105 /*
 106         Add signal to buffer for software monitoring.
 107 */
 108 static void add_monitor_signal(struct urb *urb_out, unsigned char *signal,
 109                                int volume, int bytes_per_frame)
 110 {
 111         if (volume == 0)
 112                 return;         /* zero volume - no change */
 113
 114         if (bytes_per_frame == 4) {
 115                 short *pi, *po, *buf_end;
 116
 117                 pi = (short *)signal;
 118                 po = (short *)urb_out->transfer_buffer;
 119                 buf_end = po + urb_out->transfer_buffer_length / sizeof(*po);
 120
 121                 for (; po < buf_end; ++pi, ++po)
 122                         *po += (*pi * volume) >> 8;
 123         }
 124
 125         /*
 126            We don't need to handle devices with 6 bytes per frame here
 127            since they all support hardware monitoring.
 128          */
 129 }
 130
 131 /*
 132         Find a free URB, prepare audio data, and submit URB.
 133 */
 134 static int submit_audio_out_urb(struct snd_line6_pcm *line6pcm)
 135 {
 136         int index;
 137         unsigned long flags;
 138         int i, urb_size, urb_frames;
 139         int ret;
 140         const int bytes_per_frame = line6pcm->properties->bytes_per_frame;
 141         const int frame_increment =
 142             line6pcm->properties->snd_line6_rates.rats[0].num_min;
 143         const int frame_factor =
 144             line6pcm->properties->snd_line6_rates.rats[0].den *
 145             (USB_INTERVALS_PER_SECOND / LINE6_ISO_INTERVAL);
 146         struct urb *urb_out;
 147
 148         spin_lock_irqsave(&line6pcm->out.lock, flags);
 149         index =
 150             find_first_zero_bit(&line6pcm->out.active_urbs, LINE6_ISO_BUFFERS);
 151
 152         if (index < 0 || index >= LINE6_ISO_BUFFERS) {
 153                 spin_unlock_irqrestore(&line6pcm->out.lock, flags);
 154                 dev_err(line6pcm->line6->ifcdev, "no free URB found\n");
 155                 return -EINVAL;
 156         }
 157
 158         urb_out = line6pcm->out.urbs[index];
 159         urb_size = 0;
 160
 161         for (i = 0; i < LINE6_ISO_PACKETS; ++i) {
 162                 /* compute frame size for given sampling rate */
 163                 int fsize = 0;
 164                 struct usb_iso_packet_descriptor *fout =
 165                     &urb_out->iso_frame_desc[i];
 166
 167                 if (line6pcm->flags & LINE6_BITS_CAPTURE_STREAM)
 168                         fsize = line6pcm->prev_fsize;
 169
 170                 if (fsize == 0) {
 171                         int n;
 172
 173                         line6pcm->out.count += frame_increment;
 174                         n = line6pcm->out.count / frame_factor;
 175                         line6pcm->out.count -= n * frame_factor;
 176                         fsize = n * bytes_per_frame;
 177                 }
 178
 179                 fout->offset = urb_size;
 180                 fout->length = fsize;
 181                 urb_size += fsize;
 182         }
 183
 184         if (urb_size == 0) {
 185                 /* can't determine URB size */
 186                 spin_unlock_irqrestore(&line6pcm->out.lock, flags);
 187                 dev_err(line6pcm->line6->ifcdev, "driver bug: urb_size = 0\n");
 188                 return -EINVAL;
 189         }
 190
 191         urb_frames = urb_size / bytes_per_frame;
 192         urb_out->transfer_buffer =
 193             line6pcm->out.buffer +
 194             index * LINE6_ISO_PACKETS * line6pcm->max_packet_size;
 195         urb_out->transfer_buffer_length = urb_size;
 196         urb_out->context = line6pcm;
 197
 198         if (test_bit(LINE6_INDEX_PCM_ALSA_PLAYBACK_STREAM, &line6pcm->flags) &&
 199             !test_bit(LINE6_INDEX_PAUSE_PLAYBACK, &line6pcm->flags)) {
 200                 struct snd_pcm_runtime *runtime =
 201                     get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK)->runtime;
 202
 203                 if (line6pcm->out.pos + urb_frames > runtime->buffer_size) {
 204                         /*
 205                            The transferred area goes over buffer boundary,
 206                            copy the data to the temp buffer.
 207                          */
 208                         int len;
 209
 210                         len = runtime->buffer_size - line6pcm->out.pos;
 211
 212                         if (len > 0) {
 213                                 memcpy(urb_out->transfer_buffer,
 214                                        runtime->dma_area +
 215                                        line6pcm->out.pos * bytes_per_frame,
 216                                        len * bytes_per_frame);
 217                                 memcpy(urb_out->transfer_buffer +
 218                                        len * bytes_per_frame, runtime->dma_area,
 219                                        (urb_frames - len) * bytes_per_frame);
 220                         } else
 221                                 dev_err(line6pcm->line6->ifcdev, "driver bug: len = %d\n",
 222                                         len);
 223                 } else {
 224                         memcpy(urb_out->transfer_buffer,
 225                                runtime->dma_area +
 226                                line6pcm->out.pos * bytes_per_frame,
 227                                urb_out->transfer_buffer_length);
 228                 }
 229
 230                 line6pcm->out.pos += urb_frames;
 231                 if (line6pcm->out.pos >= runtime->buffer_size)
 232                         line6pcm->out.pos -= runtime->buffer_size;
 233         } else {
 234                 memset(urb_out->transfer_buffer, 0,
 235                        urb_out->transfer_buffer_length);
 236         }
 237
 238         change_volume(urb_out, line6pcm->volume_playback, bytes_per_frame);
 239
 240         if (line6pcm->prev_fbuf != NULL) {
 241                 if (line6pcm->flags & LINE6_BITS_PCM_IMPULSE) {
 242                         create_impulse_test_signal(line6pcm, urb_out,
 243                                                    bytes_per_frame);
 244                         if (line6pcm->flags &
 245                             LINE6_BIT_PCM_ALSA_CAPTURE_STREAM) {
 246                                 line6_capture_copy(line6pcm,
 247                                                    urb_out->transfer_buffer,
 248                                                    urb_out->
 249                                                    transfer_buffer_length);
 250                                 line6_capture_check_period(line6pcm,
 251                                         urb_out->transfer_buffer_length);
 252                         }
 253                 } else {
 254                         if (!
 255                             (line6pcm->line6->
 256                              properties->capabilities & LINE6_CAP_HWMON)
 257                             && (line6pcm->flags & LINE6_BITS_PLAYBACK_STREAM)
 258                             && (line6pcm->flags & LINE6_BITS_CAPTURE_STREAM))
 259                                 add_monitor_signal(urb_out, line6pcm->prev_fbuf,
 260                                                    line6pcm->volume_monitor,
 261                                                    bytes_per_frame);
 262                 }
 263         }
 264
 265         ret = usb_submit_urb(urb_out, GFP_ATOMIC);
 266
 267         if (ret == 0)
 268                 set_bit(index, &line6pcm->out.active_urbs);
 269         else
 270                 dev_err(line6pcm->line6->ifcdev,
 271                         "URB out #%d submission failed (%d)\n", index, ret);
 272
 273         spin_unlock_irqrestore(&line6pcm->out.lock, flags);
 274         return 0;
 275 }
 276
 277 /*
 278         Submit all currently available playback URBs.
 279 */
 280 int line6_submit_audio_out_all_urbs(struct snd_line6_pcm *line6pcm)
 281 {
 282         int ret, i;
 283
 284         for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
 285                 ret = submit_audio_out_urb(line6pcm);
 286                 if (ret < 0)
 287                         return ret;
 288         }
 289
 290         return 0;
 291 }
 292
 293 /*
 294         Callback for completed playback URB.
 295 */
 296 static void audio_out_callback(struct urb *urb)
 297 {
 298         int i, index, length = 0, shutdown = 0;
 299         unsigned long flags;
 300         struct snd_line6_pcm *line6pcm = (struct snd_line6_pcm *)urb->context;
 301         struct snd_pcm_substream *substream =
 302             get_substream(line6pcm, SNDRV_PCM_STREAM_PLAYBACK);
 303
 304 #if USE_CLEAR_BUFFER_WORKAROUND
 305         memset(urb->transfer_buffer, 0, urb->transfer_buffer_length);
 306 #endif
 307
 308         line6pcm->out.last_frame = urb->start_frame;
 309
 310         /* find index of URB */
 311         for (index = 0; index < LINE6_ISO_BUFFERS; index++)
 312                 if (urb == line6pcm->out.urbs[index])
 313                         break;
 314
 315         if (index >= LINE6_ISO_BUFFERS)
 316                 return;         /* URB has been unlinked asynchronously */
 317
 318         for (i = 0; i < LINE6_ISO_PACKETS; i++)
 319                 length += urb->iso_frame_desc[i].length;
 320
 321         spin_lock_irqsave(&line6pcm->out.lock, flags);
 322
 323         if (test_bit(LINE6_INDEX_PCM_ALSA_PLAYBACK_STREAM, &line6pcm->flags)) {
 324                 struct snd_pcm_runtime *runtime = substream->runtime;
 325
 326                 line6pcm->out.pos_done +=
 327                     length / line6pcm->properties->bytes_per_frame;
 328
 329                 if (line6pcm->out.pos_done >= runtime->buffer_size)
 330                         line6pcm->out.pos_done -= runtime->buffer_size;
 331         }
 332
 333         clear_bit(index, &line6pcm->out.active_urbs);
 334
 335         for (i = 0; i < LINE6_ISO_PACKETS; i++)
 336                 if (urb->iso_frame_desc[i].status == -EXDEV) {
 337                         shutdown = 1;
 338                         break;
 339                 }
 340
 341         if (test_and_clear_bit(index, &line6pcm->out.unlink_urbs))
 342                 shutdown = 1;
 343
 344         spin_unlock_irqrestore(&line6pcm->out.lock, flags);
 345
 346         if (!shutdown) {
 347                 submit_audio_out_urb(line6pcm);
 348
 349                 if (test_bit(LINE6_INDEX_PCM_ALSA_PLAYBACK_STREAM,
 350                              &line6pcm->flags)) {
 351                         line6pcm->out.bytes += length;
 352                         if (line6pcm->out.bytes >= line6pcm->out.period) {
 353                                 line6pcm->out.bytes %= line6pcm->out.period;
 354                                 snd_pcm_period_elapsed(substream);
 355                         }
 356                 }
 357         }
 358 }
 359
 360 /* open playback callback */
 361 static int snd_line6_playback_open(struct snd_pcm_substream *substream)
 362 {
 363         int err;
 364         struct snd_pcm_runtime *runtime = substream->runtime;
 365         struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
 366
 367         err = snd_pcm_hw_constraint_ratdens(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
 368                                             (&line6pcm->
 369                                              properties->snd_line6_rates));
 370         if (err < 0)
 371                 return err;
 372
 373         runtime->hw = line6pcm->properties->snd_line6_playback_hw;
 374         return 0;
 375 }
 376
 377 /* close playback callback */
 378 static int snd_line6_playback_close(struct snd_pcm_substream *substream)
 379 {
 380         return 0;
 381 }
 382
 383 /* hw_params playback callback */
 384 static int snd_line6_playback_hw_params(struct snd_pcm_substream *substream,
 385                                         struct snd_pcm_hw_params *hw_params)
 386 {
 387         int ret;
 388         struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
 389
 390         ret = line6_pcm_acquire(line6pcm, LINE6_BIT_PCM_ALSA_PLAYBACK_BUFFER);
 391
 392         if (ret < 0)
 393                 return ret;
 394
 395         ret = snd_pcm_lib_malloc_pages(substream,
 396                                        params_buffer_bytes(hw_params));
 397         if (ret < 0) {
 398                 line6_pcm_release(line6pcm, LINE6_BIT_PCM_ALSA_PLAYBACK_BUFFER);
 399                 return ret;
 400         }
 401
 402         line6pcm->out.period = params_period_bytes(hw_params);
 403         return 0;
 404 }
 405
 406 /* hw_free playback callback */
 407 static int snd_line6_playback_hw_free(struct snd_pcm_substream *substream)
 408 {
 409         struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
 410
 411         line6_pcm_release(line6pcm, LINE6_BIT_PCM_ALSA_PLAYBACK_BUFFER);
 412         return snd_pcm_lib_free_pages(substream);
 413 }
 414
 415 /* trigger playback callback */
 416 int snd_line6_playback_trigger(struct snd_line6_pcm *line6pcm, int cmd)
 417 {
 418         int err;
 419
 420         switch (cmd) {
 421         case SNDRV_PCM_TRIGGER_START:
 422         case SNDRV_PCM_TRIGGER_RESUME:
 423                 err = line6_pcm_acquire(line6pcm,
 424                                         LINE6_BIT_PCM_ALSA_PLAYBACK_STREAM);
 425
 426                 if (err < 0)
 427                         return err;
 428
 429                 break;
 430
 431         case SNDRV_PCM_TRIGGER_STOP:
 432         case SNDRV_PCM_TRIGGER_SUSPEND:
 433                 err = line6_pcm_release(line6pcm,
 434                                         LINE6_BIT_PCM_ALSA_PLAYBACK_STREAM);
 435
 436                 if (err < 0)
 437                         return err;
 438
 439                 break;
 440
 441         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
 442                 set_bit(LINE6_INDEX_PAUSE_PLAYBACK, &line6pcm->flags);
 443                 break;
 444
 445         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
 446                 clear_bit(LINE6_INDEX_PAUSE_PLAYBACK, &line6pcm->flags);
 447                 break;
 448
 449         default:
 450                 return -EINVAL;
 451         }
 452
 453         return 0;
 454 }
 455
 456 /* playback pointer callback */
 457 static snd_pcm_uframes_t
 458 snd_line6_playback_pointer(struct snd_pcm_substream *substream)
 459 {
 460         struct snd_line6_pcm *line6pcm = snd_pcm_substream_chip(substream);
 461
 462         return line6pcm->out.pos_done;
 463 }
 464
 465 /* playback operators */
 466 struct snd_pcm_ops snd_line6_playback_ops = {
 467         .open = snd_line6_playback_open,
 468         .close = snd_line6_playback_close,
 469         .ioctl = snd_pcm_lib_ioctl,
 470         .hw_params = snd_line6_playback_hw_params,
 471         .hw_free = snd_line6_playback_hw_free,
 472         .prepare = snd_line6_prepare,
 473         .trigger = snd_line6_trigger,
 474         .pointer = snd_line6_playback_pointer,
 475 };
 476
 477 int line6_create_audio_out_urbs(struct snd_line6_pcm *line6pcm)
 478 {
 479         struct usb_line6 *line6 = line6pcm->line6;
 480         int i;
 481
 482         /* create audio URBs and fill in constant values: */
 483         for (i = 0; i < LINE6_ISO_BUFFERS; ++i) {
 484                 struct urb *urb;
 485
 486                 /* URB for audio out: */
 487                 urb = line6pcm->out.urbs[i] =
 488                     usb_alloc_urb(LINE6_ISO_PACKETS, GFP_KERNEL);
 489
 490                 if (urb == NULL)
 491                         return -ENOMEM;
 492
 493                 urb->dev = line6->usbdev;
 494                 urb->pipe =
 495                     usb_sndisocpipe(line6->usbdev,
 496                                     line6->properties->ep_audio_w &
 497                                     USB_ENDPOINT_NUMBER_MASK);
 498                 urb->transfer_flags = URB_ISO_ASAP;
 499                 urb->start_frame = -1;
 500                 urb->number_of_packets = LINE6_ISO_PACKETS;
 501                 urb->interval = LINE6_ISO_INTERVAL;
 502                 urb->error_count = 0;
 503                 urb->complete = audio_out_callback;
 504         }
 505
 506         return 0;
 507 }