git.oblomov.eu Git - linux-2.6/blob - sound/usb/usx2y/usbusx2yaudio.c

   1 /*
   2  *   US-X2Y AUDIO
   3  *   Copyright (c) 2002-2004 by Karsten Wiese
   4  *
   5  *   based on
   6  *
   7  *   (Tentative) USB Audio Driver for ALSA
   8  *
   9  *   Main and PCM part
  10  *
  11  *   Copyright (c) 2002 by Takashi Iwai <tiwai@suse.de>
  12  *
  13  *   Many codes borrowed from audio.c by
  14  *          Alan Cox (alan@lxorguk.ukuu.org.uk)
  15  *          Thomas Sailer (sailer@ife.ee.ethz.ch)
  16  *
  17  *
  18  *   This program is free software; you can redistribute it and/or modify
  19  *   it under the terms of the GNU General Public License as published by
  20  *   the Free Software Foundation; either version 2 of the License, or
  21  *   (at your option) any later version.
  22  *
  23  *   This program is distributed in the hope that it will be useful,
  24  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  25  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  26  *   GNU General Public License for more details.
  27  *
  28  *   You should have received a copy of the GNU General Public License
  29  *   along with this program; if not, write to the Free Software
  30  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  31  */
  32
  33
  34 #include <sound/driver.h>
  35 #include <linux/interrupt.h>
  36 #include <linux/usb.h>
  37 #include <sound/core.h>
  38 #include <sound/info.h>
  39 #include <sound/pcm.h>
  40 #include <sound/pcm_params.h>
  41 #include "usx2y.h"
  42 #include "usbusx2y.h"
  43
  44 #define USX2Y_NRPACKS 4                 /* Default value used for nr of packs per urb.
  45                                           1 to 4 have been tested ok on uhci.
  46                                           To use 3 on ohci, you'd need a patch:
  47                                           look for "0000425-linux-2.6.9-rc4-mm1_ohci-hcd.patch.gz" on
  48                                           "https://bugtrack.alsa-project.org/alsa-bug/bug_view_page.php?bug_id=0000425"
  49                                           .
  50                                           1, 2 and 4 work out of the box on ohci, if I recall correctly.
  51                                           Bigger is safer operation,
  52                                           smaller gives lower latencies.
  53                                         */
  54 #define USX2Y_NRPACKS_VARIABLE y        /* If your system works ok with this module's parameter
  55                                            nrpacks set to 1, you might as well comment
  56                                            this #define out, and thereby produce smaller, faster code.
  57                                            You'd also set USX2Y_NRPACKS to 1 then.
  58                                         */
  59
  60 #ifdef USX2Y_NRPACKS_VARIABLE
  61  static int nrpacks = USX2Y_NRPACKS; /* number of packets per urb */
  62  #define  nr_of_packs() nrpacks
  63  module_param(nrpacks, int, 0444);
  64  MODULE_PARM_DESC(nrpacks, "Number of packets per URB.");
  65 #else
  66  #define nr_of_packs() USX2Y_NRPACKS
  67 #endif
  68
  69
  70 static int usX2Y_urb_capt_retire(snd_usX2Y_substream_t *subs)
  71 {
  72         struct urb      *urb = subs->completed_urb;
  73         snd_pcm_runtime_t *runtime = subs->pcm_substream->runtime;
  74         unsigned char   *cp;
  75         int             i, len, lens = 0, hwptr_done = subs->hwptr_done;
  76         usX2Ydev_t      *usX2Y = subs->usX2Y;
  77
  78         for (i = 0; i < nr_of_packs(); i++) {
  79                 cp = (unsigned char*)urb->transfer_buffer + urb->iso_frame_desc[i].offset;
  80                 if (urb->iso_frame_desc[i].status) { /* active? hmm, skip this */
  81                         snd_printk(KERN_ERR "activ frame status %i. Most propably some hardware problem.\n", urb->iso_frame_desc[i].status);
  82                         return urb->iso_frame_desc[i].status;
  83                 }
  84                 len = urb->iso_frame_desc[i].actual_length / usX2Y->stride;
  85                 if (! len) {
  86                         snd_printd("0 == len ERROR!\n");
  87                         continue;
  88                 }
  89
  90                 /* copy a data chunk */
  91                 if ((hwptr_done + len) > runtime->buffer_size) {
  92                         int cnt = runtime->buffer_size - hwptr_done;
  93                         int blen = cnt * usX2Y->stride;
  94                         memcpy(runtime->dma_area + hwptr_done * usX2Y->stride, cp, blen);
  95                         memcpy(runtime->dma_area, cp + blen, len * usX2Y->stride - blen);
  96                 } else {
  97                         memcpy(runtime->dma_area + hwptr_done * usX2Y->stride, cp, len * usX2Y->stride);
  98                 }
  99                 lens += len;
 100                 if ((hwptr_done += len) >= runtime->buffer_size)
 101                         hwptr_done -= runtime->buffer_size;
 102         }
 103
 104         subs->hwptr_done = hwptr_done;
 105         subs->transfer_done += lens;
 106         /* update the pointer, call callback if necessary */
 107         if (subs->transfer_done >= runtime->period_size) {
 108                 subs->transfer_done -= runtime->period_size;
 109                 snd_pcm_period_elapsed(subs->pcm_substream);
 110         }
 111         return 0;
 112 }
 113 /*
 114  * prepare urb for playback data pipe
 115  *
 116  * we copy the data directly from the pcm buffer.
 117  * the current position to be copied is held in hwptr field.
 118  * since a urb can handle only a single linear buffer, if the total
 119  * transferred area overflows the buffer boundary, we cannot send
 120  * it directly from the buffer.  thus the data is once copied to
 121  * a temporary buffer and urb points to that.
 122  */
 123 static int usX2Y_urb_play_prepare(snd_usX2Y_substream_t *subs,
 124                                   struct urb *cap_urb,
 125                                   struct urb *urb)
 126 {
 127         int count, counts, pack;
 128         usX2Ydev_t* usX2Y = subs->usX2Y;
 129         snd_pcm_runtime_t *runtime = subs->pcm_substream->runtime;
 130
 131         count = 0;
 132         for (pack = 0; pack <  nr_of_packs(); pack++) {
 133                 /* calculate the size of a packet */
 134                 counts = cap_urb->iso_frame_desc[pack].actual_length / usX2Y->stride;
 135                 count += counts;
 136                 if (counts < 43 || counts > 50) {
 137                         snd_printk(KERN_ERR "should not be here with counts=%i\n", counts);
 138                         return -EPIPE;
 139                 }
 140                 /* set up descriptor */
 141                 urb->iso_frame_desc[pack].offset = pack ?
 142                         urb->iso_frame_desc[pack - 1].offset + urb->iso_frame_desc[pack - 1].length :
 143                         0;
 144                 urb->iso_frame_desc[pack].length = cap_urb->iso_frame_desc[pack].actual_length;
 145         }
 146         if (atomic_read(&subs->state) >= state_PRERUNNING)
 147                 if (subs->hwptr + count > runtime->buffer_size) {
 148                         /* err, the transferred area goes over buffer boundary.
 149                          * copy the data to the temp buffer.
 150                          */
 151                         int len;
 152                         len = runtime->buffer_size - subs->hwptr;
 153                         urb->transfer_buffer = subs->tmpbuf;
 154                         memcpy(subs->tmpbuf, runtime->dma_area + subs->hwptr * usX2Y->stride, len * usX2Y->stride);
 155                         memcpy(subs->tmpbuf + len * usX2Y->stride, runtime->dma_area, (count - len) * usX2Y->stride);
 156                         subs->hwptr += count;
 157                         subs->hwptr -= runtime->buffer_size;
 158                 } else {
 159                         /* set the buffer pointer */
 160                         urb->transfer_buffer = runtime->dma_area + subs->hwptr * usX2Y->stride;
 161                         if ((subs->hwptr += count) >= runtime->buffer_size)
 162                         subs->hwptr -= runtime->buffer_size;
 163                 }
 164         else
 165                 urb->transfer_buffer = subs->tmpbuf;
 166         urb->transfer_buffer_length = count * usX2Y->stride;
 167         return 0;
 168 }
 169
 170 /*
 171  * process after playback data complete
 172  *
 173  * update the current position and call callback if a period is processed.
 174  */
 175 static void usX2Y_urb_play_retire(snd_usX2Y_substream_t *subs, struct urb *urb)
 176 {
 177         snd_pcm_runtime_t *runtime = subs->pcm_substream->runtime;
 178         int             len = urb->actual_length / subs->usX2Y->stride;
 179
 180         subs->transfer_done += len;
 181         subs->hwptr_done +=  len;
 182         if (subs->hwptr_done >= runtime->buffer_size)
 183                 subs->hwptr_done -= runtime->buffer_size;
 184         if (subs->transfer_done >= runtime->period_size) {
 185                 subs->transfer_done -= runtime->period_size;
 186                 snd_pcm_period_elapsed(subs->pcm_substream);
 187         }
 188 }
 189
 190 static int usX2Y_urb_submit(snd_usX2Y_substream_t *subs, struct urb *urb, int frame)
 191 {
 192         int err;
 193         if (!urb)
 194                 return -ENODEV;
 195         urb->start_frame = (frame + NRURBS * nr_of_packs());  // let hcd do rollover sanity checks
 196         urb->hcpriv = NULL;
 197         urb->dev = subs->usX2Y->chip.dev; /* we need to set this at each time */
 198         if ((err = usb_submit_urb(urb, GFP_ATOMIC)) < 0) {
 199                 snd_printk(KERN_ERR "usb_submit_urb() returned %i\n", err);
 200                 return err;
 201         }
 202         return 0;
 203 }
 204
 205 static inline int usX2Y_usbframe_complete(snd_usX2Y_substream_t *capsubs, snd_usX2Y_substream_t *playbacksubs, int frame)
 206 {
 207         int err, state;
 208         {
 209                 struct urb *urb = playbacksubs->completed_urb;
 210
 211                 state = atomic_read(&playbacksubs->state);
 212                 if (NULL != urb) {
 213                         if (state == state_RUNNING)
 214                                 usX2Y_urb_play_retire(playbacksubs, urb);
 215                         else
 216                                 if (state >= state_PRERUNNING) {
 217                                         atomic_inc(&playbacksubs->state);
 218                                 }
 219                 } else {
 220                         switch (state) {
 221                         case state_STARTING1:
 222                                 urb = playbacksubs->urb[0];
 223                                 atomic_inc(&playbacksubs->state);
 224                                 break;
 225                         case state_STARTING2:
 226                                 urb = playbacksubs->urb[1];
 227                                 atomic_inc(&playbacksubs->state);
 228                                 break;
 229                         }
 230                 }
 231                 if (urb) {
 232                         if ((err = usX2Y_urb_play_prepare(playbacksubs, capsubs->completed_urb, urb)) ||
 233                             (err = usX2Y_urb_submit(playbacksubs, urb, frame))) {
 234                                 return err;
 235                         }
 236                 }
 237
 238                 playbacksubs->completed_urb = NULL;
 239         }
 240         state = atomic_read(&capsubs->state);
 241         if (state >= state_PREPARED) {
 242                 if (state == state_RUNNING) {
 243                         if ((err = usX2Y_urb_capt_retire(capsubs)))
 244                                 return err;
 245                 } else
 246                         if (state >= state_PRERUNNING) {
 247                                 atomic_inc(&capsubs->state);
 248                         }
 249                 if ((err = usX2Y_urb_submit(capsubs, capsubs->completed_urb, frame)))
 250                         return err;
 251         }
 252         capsubs->completed_urb = NULL;
 253         return 0;
 254 }
 255
 256
 257 static void usX2Y_clients_stop(usX2Ydev_t *usX2Y)
 258 {
 259         int s, u;
 260         for (s = 0; s < 4; s++) {
 261                 snd_usX2Y_substream_t *subs = usX2Y->subs[s];
 262                 if (subs) {
 263                         snd_printdd("%i %p state=%i\n", s, subs, atomic_read(&subs->state));
 264                         atomic_set(&subs->state, state_STOPPED);
 265                 }
 266         }
 267         for (s = 0; s < 4; s++) {
 268                 snd_usX2Y_substream_t *subs = usX2Y->subs[s];
 269                 if (subs) {
 270                         if (atomic_read(&subs->state) >= state_PRERUNNING) {
 271                                 snd_pcm_stop(subs->pcm_substream, SNDRV_PCM_STATE_XRUN);
 272                         }
 273                         for (u = 0; u < NRURBS; u++) {
 274                                 struct urb *urb = subs->urb[u];
 275                                 if (NULL != urb)
 276                                         snd_printdd("%i status=%i start_frame=%i\n", u, urb->status, urb->start_frame);
 277                         }
 278                 }
 279         }
 280         usX2Y->prepare_subs = NULL;
 281         wake_up(&usX2Y->prepare_wait_queue);
 282 }
 283
 284 static void usX2Y_error_urb_status(usX2Ydev_t *usX2Y, snd_usX2Y_substream_t *subs, struct urb *urb)
 285 {
 286         snd_printk(KERN_ERR "ep=%i stalled with status=%i\n", subs->endpoint, urb->status);
 287         urb->status = 0;
 288         usX2Y_clients_stop(usX2Y);
 289 }
 290
 291 static void usX2Y_error_sequence(usX2Ydev_t *usX2Y, snd_usX2Y_substream_t *subs, struct urb *urb)
 292 {
 293         snd_printk(KERN_ERR "Sequence Error!(hcd_frame=%i ep=%i%s;wait=%i,frame=%i).\n"
 294                    KERN_ERR "Most propably some urb of usb-frame %i is still missing.\n"
 295                    KERN_ERR "Cause could be too long delays in usb-hcd interrupt handling.\n",
 296                    usb_get_current_frame_number(usX2Y->chip.dev),
 297                    subs->endpoint, usb_pipein(urb->pipe) ? "in" : "out", usX2Y->wait_iso_frame, urb->start_frame, usX2Y->wait_iso_frame);
 298         usX2Y_clients_stop(usX2Y);
 299 }
 300
 301 static void i_usX2Y_urb_complete(struct urb *urb, struct pt_regs *regs)
 302 {
 303         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t*)urb->context;
 304         usX2Ydev_t *usX2Y = subs->usX2Y;
 305
 306         if (unlikely(atomic_read(&subs->state) < state_PREPARED)) {
 307                 snd_printdd("hcd_frame=%i ep=%i%s status=%i start_frame=%i\n", usb_get_current_frame_number(usX2Y->chip.dev), subs->endpoint, usb_pipein(urb->pipe) ? "in" : "out", urb->status, urb->start_frame);
 308                 return;
 309         }
 310         if (unlikely(urb->status)) {
 311                 usX2Y_error_urb_status(usX2Y, subs, urb);
 312                 return;
 313         }
 314         if (likely((0xFFFF & urb->start_frame) == usX2Y->wait_iso_frame))
 315                 subs->completed_urb = urb;
 316         else {
 317                 usX2Y_error_sequence(usX2Y, subs, urb);
 318                 return;
 319         }
 320         {
 321                 snd_usX2Y_substream_t *capsubs = usX2Y->subs[SNDRV_PCM_STREAM_CAPTURE],
 322                         *playbacksubs = usX2Y->subs[SNDRV_PCM_STREAM_PLAYBACK];
 323                 if (capsubs->completed_urb && atomic_read(&capsubs->state) >= state_PREPARED &&
 324                     (playbacksubs->completed_urb || atomic_read(&playbacksubs->state) < state_PREPARED)) {
 325                         if (!usX2Y_usbframe_complete(capsubs, playbacksubs, urb->start_frame)) {
 326                                 if (nr_of_packs() <= urb->start_frame &&
 327                                     urb->start_frame <= (2 * nr_of_packs() - 1))        // uhci and ohci
 328                                         usX2Y->wait_iso_frame = urb->start_frame - nr_of_packs();
 329                                 else
 330                                         usX2Y->wait_iso_frame +=  nr_of_packs();
 331                         } else {
 332                                 snd_printdd("\n");
 333                                 usX2Y_clients_stop(usX2Y);
 334                         }
 335                 }
 336         }
 337 }
 338
 339 static void usX2Y_urbs_set_complete(usX2Ydev_t * usX2Y, void (*complete)(struct urb *, struct pt_regs *))
 340 {
 341         int s, u;
 342         for (s = 0; s < 4; s++) {
 343                 snd_usX2Y_substream_t *subs = usX2Y->subs[s];
 344                 if (NULL != subs)
 345                         for (u = 0; u < NRURBS; u++) {
 346                                 struct urb * urb = subs->urb[u];
 347                                 if (NULL != urb)
 348                                         urb->complete = complete;
 349                         }
 350         }
 351 }
 352
 353 static void usX2Y_subs_startup_finish(usX2Ydev_t * usX2Y)
 354 {
 355         usX2Y_urbs_set_complete(usX2Y, i_usX2Y_urb_complete);
 356         usX2Y->prepare_subs = NULL;
 357 }
 358
 359 static void i_usX2Y_subs_startup(struct urb *urb, struct pt_regs *regs)
 360 {
 361         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t*)urb->context;
 362         usX2Ydev_t *usX2Y = subs->usX2Y;
 363         snd_usX2Y_substream_t *prepare_subs = usX2Y->prepare_subs;
 364         if (NULL != prepare_subs)
 365                 if (urb->start_frame == prepare_subs->urb[0]->start_frame) {
 366                         usX2Y_subs_startup_finish(usX2Y);
 367                         atomic_inc(&prepare_subs->state);
 368                         wake_up(&usX2Y->prepare_wait_queue);
 369                 }
 370
 371         i_usX2Y_urb_complete(urb, regs);
 372 }
 373
 374 static void usX2Y_subs_prepare(snd_usX2Y_substream_t *subs)
 375 {
 376         snd_printdd("usX2Y_substream_prepare(%p) ep=%i urb0=%p urb1=%p\n", subs, subs->endpoint, subs->urb[0], subs->urb[1]);
 377         /* reset the pointer */
 378         subs->hwptr = 0;
 379         subs->hwptr_done = 0;
 380         subs->transfer_done = 0;
 381 }
 382
 383
 384 static void usX2Y_urb_release(struct urb** urb, int free_tb)
 385 {
 386         if (*urb) {
 387                 usb_kill_urb(*urb);
 388                 if (free_tb)
 389                         kfree((*urb)->transfer_buffer);
 390                 usb_free_urb(*urb);
 391                 *urb = NULL;
 392         }
 393 }
 394 /*
 395  * release a substreams urbs
 396  */
 397 static void usX2Y_urbs_release(snd_usX2Y_substream_t *subs)
 398 {
 399         int i;
 400         snd_printdd("usX2Y_urbs_release() %i\n", subs->endpoint);
 401         for (i = 0; i < NRURBS; i++)
 402                 usX2Y_urb_release(subs->urb + i, subs != subs->usX2Y->subs[SNDRV_PCM_STREAM_PLAYBACK]);
 403
 404         kfree(subs->tmpbuf);
 405         subs->tmpbuf = NULL;
 406 }
 407 /*
 408  * initialize a substream's urbs
 409  */
 410 static int usX2Y_urbs_allocate(snd_usX2Y_substream_t *subs)
 411 {
 412         int i;
 413         unsigned int pipe;
 414         int is_playback = subs == subs->usX2Y->subs[SNDRV_PCM_STREAM_PLAYBACK];
 415         struct usb_device *dev = subs->usX2Y->chip.dev;
 416
 417         pipe = is_playback ? usb_sndisocpipe(dev, subs->endpoint) :
 418                         usb_rcvisocpipe(dev, subs->endpoint);
 419         subs->maxpacksize = usb_maxpacket(dev, pipe, is_playback);
 420         if (!subs->maxpacksize)
 421                 return -EINVAL;
 422
 423         if (is_playback && NULL == subs->tmpbuf) {      /* allocate a temporary buffer for playback */
 424                 subs->tmpbuf = kcalloc(nr_of_packs(), subs->maxpacksize, GFP_KERNEL);
 425                 if (NULL == subs->tmpbuf) {
 426                         snd_printk(KERN_ERR "cannot malloc tmpbuf\n");
 427                         return -ENOMEM;
 428                 }
 429         }
 430         /* allocate and initialize data urbs */
 431         for (i = 0; i < NRURBS; i++) {
 432                 struct urb** purb = subs->urb + i;
 433                 if (*purb) {
 434                         usb_kill_urb(*purb);
 435                         continue;
 436                 }
 437                 *purb = usb_alloc_urb(nr_of_packs(), GFP_KERNEL);
 438                 if (NULL == *purb) {
 439                         usX2Y_urbs_release(subs);
 440                         return -ENOMEM;
 441                 }
 442                 if (!is_playback && !(*purb)->transfer_buffer) {
 443                         /* allocate a capture buffer per urb */
 444                         (*purb)->transfer_buffer = kmalloc(subs->maxpacksize * nr_of_packs(), GFP_KERNEL);
 445                         if (NULL == (*purb)->transfer_buffer) {
 446                                 usX2Y_urbs_release(subs);
 447                                 return -ENOMEM;
 448                         }
 449                 }
 450                 (*purb)->dev = dev;
 451                 (*purb)->pipe = pipe;
 452                 (*purb)->number_of_packets = nr_of_packs();
 453                 (*purb)->context = subs;
 454                 (*purb)->interval = 1;
 455                 (*purb)->complete = i_usX2Y_subs_startup;
 456         }
 457         return 0;
 458 }
 459
 460 static void usX2Y_subs_startup(snd_usX2Y_substream_t *subs)
 461 {
 462         usX2Ydev_t *usX2Y = subs->usX2Y;
 463         usX2Y->prepare_subs = subs;
 464         subs->urb[0]->start_frame = -1;
 465         wmb();
 466         usX2Y_urbs_set_complete(usX2Y, i_usX2Y_subs_startup);
 467 }
 468
 469 static int usX2Y_urbs_start(snd_usX2Y_substream_t *subs)
 470 {
 471         int i, err;
 472         usX2Ydev_t *usX2Y = subs->usX2Y;
 473
 474         if ((err = usX2Y_urbs_allocate(subs)) < 0)
 475                 return err;
 476         subs->completed_urb = NULL;
 477         for (i = 0; i < 4; i++) {
 478                 snd_usX2Y_substream_t *subs = usX2Y->subs[i];
 479                 if (subs != NULL && atomic_read(&subs->state) >= state_PREPARED)
 480                         goto start;
 481         }
 482         usX2Y->wait_iso_frame = -1;
 483  start:
 484         {
 485                 usX2Y_subs_startup(subs);
 486                 for (i = 0; i < NRURBS; i++) {
 487                         struct urb *urb = subs->urb[i];
 488                         if (usb_pipein(urb->pipe)) {
 489                                 unsigned long pack;
 490                                 if (0 == i)
 491                                         atomic_set(&subs->state, state_STARTING3);
 492                                 urb->dev = usX2Y->chip.dev;
 493                                 urb->transfer_flags = URB_ISO_ASAP;
 494                                 for (pack = 0; pack < nr_of_packs(); pack++) {
 495                                         urb->iso_frame_desc[pack].offset = subs->maxpacksize * pack;
 496                                         urb->iso_frame_desc[pack].length = subs->maxpacksize;
 497                                 }
 498                                 urb->transfer_buffer_length = subs->maxpacksize * nr_of_packs();
 499                                 if ((err = usb_submit_urb(urb, GFP_ATOMIC)) < 0) {
 500                                         snd_printk (KERN_ERR "cannot submit datapipe for urb %d, err = %d\n", i, err);
 501                                         err = -EPIPE;
 502                                         goto cleanup;
 503                                 } else {
 504                                         if (0 > usX2Y->wait_iso_frame)
 505                                                 usX2Y->wait_iso_frame = urb->start_frame;
 506                                 }
 507                                 urb->transfer_flags = 0;
 508                         } else {
 509                                 atomic_set(&subs->state, state_STARTING1);
 510                                 break;
 511                         }
 512                 }
 513                 err = 0;
 514                 wait_event(usX2Y->prepare_wait_queue, NULL == usX2Y->prepare_subs);
 515                 if (atomic_read(&subs->state) != state_PREPARED) {
 516                         err = -EPIPE;
 517                 }
 518
 519         cleanup:
 520                 if (err) {
 521                         usX2Y_subs_startup_finish(usX2Y);
 522                         usX2Y_clients_stop(usX2Y);              // something is completely wroong > stop evrything
 523                 }
 524         }
 525         return err;
 526 }
 527
 528 /*
 529  * return the current pcm pointer.  just return the hwptr_done value.
 530  */
 531 static snd_pcm_uframes_t snd_usX2Y_pcm_pointer(snd_pcm_substream_t *substream)
 532 {
 533         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t *)substream->runtime->private_data;
 534         return subs->hwptr_done;
 535 }
 536 /*
 537  * start/stop substream
 538  */
 539 static int snd_usX2Y_pcm_trigger(snd_pcm_substream_t *substream, int cmd)
 540 {
 541         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t *)substream->runtime->private_data;
 542
 543         switch (cmd) {
 544         case SNDRV_PCM_TRIGGER_START:
 545                 snd_printdd("snd_usX2Y_pcm_trigger(START)\n");
 546                 if (atomic_read(&subs->state) == state_PREPARED &&
 547                     atomic_read(&subs->usX2Y->subs[SNDRV_PCM_STREAM_CAPTURE]->state) >= state_PREPARED) {
 548                         atomic_set(&subs->state, state_PRERUNNING);
 549                 } else {
 550                         snd_printdd("\n");
 551                         return -EPIPE;
 552                 }
 553                 break;
 554         case SNDRV_PCM_TRIGGER_STOP:
 555                 snd_printdd("snd_usX2Y_pcm_trigger(STOP)\n");
 556                 if (atomic_read(&subs->state) >= state_PRERUNNING)
 557                         atomic_set(&subs->state, state_PREPARED);
 558                 break;
 559         default:
 560                 return -EINVAL;
 561         }
 562         return 0;
 563 }
 564
 565
 566 /*
 567  * allocate a buffer, setup samplerate
 568  *
 569  * so far we use a physically linear buffer although packetize transfer
 570  * doesn't need a continuous area.
 571  * if sg buffer is supported on the later version of alsa, we'll follow
 572  * that.
 573  */
 574 static struct s_c2
 575 {
 576         char c1, c2;
 577 }
 578         SetRate44100[] =
 579 {
 580         { 0x14, 0x08},  // this line sets 44100, well actually a little less
 581         { 0x18, 0x40},  // only tascam / frontier design knows the further lines .......
 582         { 0x18, 0x42},
 583         { 0x18, 0x45},
 584         { 0x18, 0x46},
 585         { 0x18, 0x48},
 586         { 0x18, 0x4A},
 587         { 0x18, 0x4C},
 588         { 0x18, 0x4E},
 589         { 0x18, 0x50},
 590         { 0x18, 0x52},
 591         { 0x18, 0x54},
 592         { 0x18, 0x56},
 593         { 0x18, 0x58},
 594         { 0x18, 0x5A},
 595         { 0x18, 0x5C},
 596         { 0x18, 0x5E},
 597         { 0x18, 0x60},
 598         { 0x18, 0x62},
 599         { 0x18, 0x64},
 600         { 0x18, 0x66},
 601         { 0x18, 0x68},
 602         { 0x18, 0x6A},
 603         { 0x18, 0x6C},
 604         { 0x18, 0x6E},
 605         { 0x18, 0x70},
 606         { 0x18, 0x72},
 607         { 0x18, 0x74},
 608         { 0x18, 0x76},
 609         { 0x18, 0x78},
 610         { 0x18, 0x7A},
 611         { 0x18, 0x7C},
 612         { 0x18, 0x7E}
 613 };
 614 static struct s_c2 SetRate48000[] =
 615 {
 616         { 0x14, 0x09},  // this line sets 48000, well actually a little less
 617         { 0x18, 0x40},  // only tascam / frontier design knows the further lines .......
 618         { 0x18, 0x42},
 619         { 0x18, 0x45},
 620         { 0x18, 0x46},
 621         { 0x18, 0x48},
 622         { 0x18, 0x4A},
 623         { 0x18, 0x4C},
 624         { 0x18, 0x4E},
 625         { 0x18, 0x50},
 626         { 0x18, 0x52},
 627         { 0x18, 0x54},
 628         { 0x18, 0x56},
 629         { 0x18, 0x58},
 630         { 0x18, 0x5A},
 631         { 0x18, 0x5C},
 632         { 0x18, 0x5E},
 633         { 0x18, 0x60},
 634         { 0x18, 0x62},
 635         { 0x18, 0x64},
 636         { 0x18, 0x66},
 637         { 0x18, 0x68},
 638         { 0x18, 0x6A},
 639         { 0x18, 0x6C},
 640         { 0x18, 0x6E},
 641         { 0x18, 0x70},
 642         { 0x18, 0x73},
 643         { 0x18, 0x74},
 644         { 0x18, 0x76},
 645         { 0x18, 0x78},
 646         { 0x18, 0x7A},
 647         { 0x18, 0x7C},
 648         { 0x18, 0x7E}
 649 };
 650 #define NOOF_SETRATE_URBS ARRAY_SIZE(SetRate48000)
 651
 652 static void i_usX2Y_04Int(struct urb* urb, struct pt_regs *regs)
 653 {
 654         usX2Ydev_t*     usX2Y = urb->context;
 655
 656         if (urb->status)
 657                 snd_printk(KERN_ERR "snd_usX2Y_04Int() urb->status=%i\n", urb->status);
 658         if (0 == --usX2Y->US04->len)
 659                 wake_up(&usX2Y->In04WaitQueue);
 660 }
 661
 662 static int usX2Y_rate_set(usX2Ydev_t *usX2Y, int rate)
 663 {
 664         int                     err = 0, i;
 665         snd_usX2Y_urbSeq_t      *us = NULL;
 666         int                     *usbdata = NULL;
 667         struct s_c2             *ra = rate == 48000 ? SetRate48000 : SetRate44100;
 668
 669         if (usX2Y->rate != rate) {
 670                 us = kmalloc(sizeof(*us) + sizeof(struct urb*) * NOOF_SETRATE_URBS, GFP_KERNEL);
 671                 if (NULL == us) {
 672                         err = -ENOMEM;
 673                         goto cleanup;
 674                 }
 675                 memset(us, 0, sizeof(*us) + sizeof(struct urb*) * NOOF_SETRATE_URBS);
 676                 usbdata = kmalloc(sizeof(int)*NOOF_SETRATE_URBS, GFP_KERNEL);
 677                 if (NULL == usbdata) {
 678                         err = -ENOMEM;
 679                         goto cleanup;
 680                 }
 681                 for (i = 0; i < NOOF_SETRATE_URBS; ++i) {
 682                         if (NULL == (us->urb[i] = usb_alloc_urb(0, GFP_KERNEL))) {
 683                                 err = -ENOMEM;
 684                                 goto cleanup;
 685                         }
 686                         ((char*)(usbdata + i))[0] = ra[i].c1;
 687                         ((char*)(usbdata + i))[1] = ra[i].c2;
 688                         usb_fill_bulk_urb(us->urb[i], usX2Y->chip.dev, usb_sndbulkpipe(usX2Y->chip.dev, 4),
 689                                           usbdata + i, 2, i_usX2Y_04Int, usX2Y);
 690 #ifdef OLD_USB
 691                         us->urb[i]->transfer_flags = USB_QUEUE_BULK;
 692 #endif
 693                 }
 694                 us->submitted = 0;
 695                 us->len =       NOOF_SETRATE_URBS;
 696                 usX2Y->US04 =   us;
 697                 wait_event_timeout(usX2Y->In04WaitQueue, 0 == us->len, HZ);
 698                 usX2Y->US04 =   NULL;
 699                 if (us->len)
 700                         err = -ENODEV;
 701         cleanup:
 702                 if (us) {
 703                         us->submitted = 2*NOOF_SETRATE_URBS;
 704                         for (i = 0; i < NOOF_SETRATE_URBS; ++i) {
 705                                 struct urb *urb = us->urb[i];
 706                                 if (urb->status) {
 707                                         if (!err)
 708                                                 err = -ENODEV;
 709                                         usb_kill_urb(urb);
 710                                 }
 711                                 usb_free_urb(urb);
 712                         }
 713                         usX2Y->US04 = NULL;
 714                         kfree(usbdata);
 715                         kfree(us);
 716                         if (!err) {
 717                                 usX2Y->rate = rate;
 718                         }
 719                 }
 720         }
 721
 722         return err;
 723 }
 724
 725
 726 static int usX2Y_format_set(usX2Ydev_t *usX2Y, snd_pcm_format_t format)
 727 {
 728         int alternate, err;
 729         struct list_head* p;
 730         if (format == SNDRV_PCM_FORMAT_S24_3LE) {
 731                 alternate = 2;
 732                 usX2Y->stride = 6;
 733         } else {
 734                 alternate = 1;
 735                 usX2Y->stride = 4;
 736         }
 737         list_for_each(p, &usX2Y->chip.midi_list) {
 738                 snd_usbmidi_input_stop(p);
 739         }
 740         usb_kill_urb(usX2Y->In04urb);
 741         if ((err = usb_set_interface(usX2Y->chip.dev, 0, alternate))) {
 742                 snd_printk(KERN_ERR "usb_set_interface error \n");
 743                 return err;
 744         }
 745         usX2Y->In04urb->dev = usX2Y->chip.dev;
 746         err = usb_submit_urb(usX2Y->In04urb, GFP_KERNEL);
 747         list_for_each(p, &usX2Y->chip.midi_list) {
 748                 snd_usbmidi_input_start(p);
 749         }
 750         usX2Y->format = format;
 751         usX2Y->rate = 0;
 752         return err;
 753 }
 754
 755
 756 static int snd_usX2Y_pcm_hw_params(snd_pcm_substream_t *substream,
 757                                    snd_pcm_hw_params_t *hw_params)
 758 {
 759         int                     err = 0;
 760         unsigned int            rate = params_rate(hw_params);
 761         snd_pcm_format_t        format = params_format(hw_params);
 762         snd_printdd("snd_usX2Y_hw_params(%p, %p)\n", substream, hw_params);
 763
 764         {       // all pcm substreams off one usX2Y have to operate at the same rate & format
 765                 snd_card_t *card = substream->pstr->pcm->card;
 766                 struct list_head *list;
 767                 list_for_each(list, &card->devices) {
 768                         snd_device_t *dev;
 769                         snd_pcm_t *pcm;
 770                         int s;
 771                         dev = snd_device(list);
 772                         if (dev->type != SNDRV_DEV_PCM)
 773                                 continue;
 774                         pcm = dev->device_data;
 775                         for (s = 0; s < 2; ++s) {
 776                                 snd_pcm_substream_t *test_substream;
 777                                 test_substream = pcm->streams[s].substream;
 778                                 if (test_substream && test_substream != substream  &&
 779                                     test_substream->runtime &&
 780                                     ((test_substream->runtime->format &&
 781                                       test_substream->runtime->format != format) ||
 782                                      (test_substream->runtime->rate &&
 783                                       test_substream->runtime->rate != rate)))
 784                                         return -EINVAL;
 785                         }
 786                 }
 787         }
 788         if (0 > (err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params)))) {
 789                 snd_printk(KERN_ERR "snd_pcm_lib_malloc_pages(%p, %i) returned %i\n", substream, params_buffer_bytes(hw_params), err);
 790                 return err;
 791         }
 792         return 0;
 793 }
 794
 795 /*
 796  * free the buffer
 797  */
 798 static int snd_usX2Y_pcm_hw_free(snd_pcm_substream_t *substream)
 799 {
 800         snd_pcm_runtime_t *runtime = substream->runtime;
 801         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t *)runtime->private_data;
 802         down(&subs->usX2Y->prepare_mutex);
 803         snd_printdd("snd_usX2Y_hw_free(%p)\n", substream);
 804
 805         if (SNDRV_PCM_STREAM_PLAYBACK == substream->stream) {
 806                 snd_usX2Y_substream_t *cap_subs = subs->usX2Y->subs[SNDRV_PCM_STREAM_CAPTURE];
 807                 atomic_set(&subs->state, state_STOPPED);
 808                 usX2Y_urbs_release(subs);
 809                 if (!cap_subs->pcm_substream ||
 810                     !cap_subs->pcm_substream->runtime ||
 811                     !cap_subs->pcm_substream->runtime->status ||
 812                     cap_subs->pcm_substream->runtime->status->state < SNDRV_PCM_STATE_PREPARED) {
 813                         atomic_set(&cap_subs->state, state_STOPPED);
 814                         usX2Y_urbs_release(cap_subs);
 815                 }
 816         } else {
 817                 snd_usX2Y_substream_t *playback_subs = subs->usX2Y->subs[SNDRV_PCM_STREAM_PLAYBACK];
 818                 if (atomic_read(&playback_subs->state) < state_PREPARED) {
 819                         atomic_set(&subs->state, state_STOPPED);
 820                         usX2Y_urbs_release(subs);
 821                 }
 822         }
 823         up(&subs->usX2Y->prepare_mutex);
 824         return snd_pcm_lib_free_pages(substream);
 825 }
 826 /*
 827  * prepare callback
 828  *
 829  * set format and initialize urbs
 830  */
 831 static int snd_usX2Y_pcm_prepare(snd_pcm_substream_t *substream)
 832 {
 833         snd_pcm_runtime_t *runtime = substream->runtime;
 834         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t *)runtime->private_data;
 835         usX2Ydev_t *usX2Y = subs->usX2Y;
 836         snd_usX2Y_substream_t *capsubs = subs->usX2Y->subs[SNDRV_PCM_STREAM_CAPTURE];
 837         int err = 0;
 838         snd_printdd("snd_usX2Y_pcm_prepare(%p)\n", substream);
 839
 840         down(&usX2Y->prepare_mutex);
 841         usX2Y_subs_prepare(subs);
 842 // Start hardware streams
 843 // SyncStream first....
 844         if (atomic_read(&capsubs->state) < state_PREPARED) {
 845                 if (usX2Y->format != runtime->format)
 846                         if ((err = usX2Y_format_set(usX2Y, runtime->format)) < 0)
 847                                 goto up_prepare_mutex;
 848                 if (usX2Y->rate != runtime->rate)
 849                         if ((err = usX2Y_rate_set(usX2Y, runtime->rate)) < 0)
 850                                 goto up_prepare_mutex;
 851                 snd_printdd("starting capture pipe for %s\n", subs == capsubs ? "self" : "playpipe");
 852                 if (0 > (err = usX2Y_urbs_start(capsubs)))
 853                         goto up_prepare_mutex;
 854         }
 855
 856         if (subs != capsubs && atomic_read(&subs->state) < state_PREPARED)
 857                 err = usX2Y_urbs_start(subs);
 858
 859  up_prepare_mutex:
 860         up(&usX2Y->prepare_mutex);
 861         return err;
 862 }
 863
 864 static snd_pcm_hardware_t snd_usX2Y_2c =
 865 {
 866         .info =                 (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
 867                                  SNDRV_PCM_INFO_BLOCK_TRANSFER |
 868                                  SNDRV_PCM_INFO_MMAP_VALID),
 869         .formats =                 SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S24_3LE,
 870         .rates =                   SNDRV_PCM_RATE_44100 | SNDRV_PCM_RATE_48000,
 871         .rate_min =                44100,
 872         .rate_max =                48000,
 873         .channels_min =            2,
 874         .channels_max =            2,
 875         .buffer_bytes_max =     (2*128*1024),
 876         .period_bytes_min =     64,
 877         .period_bytes_max =     (128*1024),
 878         .periods_min =          2,
 879         .periods_max =          1024,
 880         .fifo_size =              0
 881 };
 882
 883
 884
 885 static int snd_usX2Y_pcm_open(snd_pcm_substream_t *substream)
 886 {
 887         snd_usX2Y_substream_t   *subs = ((snd_usX2Y_substream_t **)
 888                                          snd_pcm_substream_chip(substream))[substream->stream];
 889         snd_pcm_runtime_t       *runtime = substream->runtime;
 890
 891         if (subs->usX2Y->chip_status & USX2Y_STAT_CHIP_MMAP_PCM_URBS)
 892                 return -EBUSY;
 893
 894         runtime->hw = snd_usX2Y_2c;
 895         runtime->private_data = subs;
 896         subs->pcm_substream = substream;
 897         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_PERIOD_TIME, 1000, 200000);
 898         return 0;
 899 }
 900
 901
 902
 903 static int snd_usX2Y_pcm_close(snd_pcm_substream_t *substream)
 904 {
 905         snd_pcm_runtime_t *runtime = substream->runtime;
 906         snd_usX2Y_substream_t *subs = (snd_usX2Y_substream_t *)runtime->private_data;
 907         int err = 0;
 908
 909         subs->pcm_substream = NULL;
 910
 911         return err;
 912 }
 913
 914
 915 static snd_pcm_ops_t snd_usX2Y_pcm_ops =
 916 {
 917         .open =         snd_usX2Y_pcm_open,
 918         .close =        snd_usX2Y_pcm_close,
 919         .ioctl =        snd_pcm_lib_ioctl,
 920         .hw_params =    snd_usX2Y_pcm_hw_params,
 921         .hw_free =      snd_usX2Y_pcm_hw_free,
 922         .prepare =      snd_usX2Y_pcm_prepare,
 923         .trigger =      snd_usX2Y_pcm_trigger,
 924         .pointer =      snd_usX2Y_pcm_pointer,
 925 };
 926
 927
 928 /*
 929  * free a usb stream instance
 930  */
 931 static void usX2Y_audio_stream_free(snd_usX2Y_substream_t **usX2Y_substream)
 932 {
 933         if (NULL != usX2Y_substream[SNDRV_PCM_STREAM_PLAYBACK]) {
 934                 kfree(usX2Y_substream[SNDRV_PCM_STREAM_PLAYBACK]);
 935                 usX2Y_substream[SNDRV_PCM_STREAM_PLAYBACK] = NULL;
 936         }
 937         kfree(usX2Y_substream[SNDRV_PCM_STREAM_CAPTURE]);
 938         usX2Y_substream[SNDRV_PCM_STREAM_CAPTURE] = NULL;
 939 }
 940
 941 static void snd_usX2Y_pcm_private_free(snd_pcm_t *pcm)
 942 {
 943         snd_usX2Y_substream_t **usX2Y_stream = pcm->private_data;
 944         if (usX2Y_stream) {
 945                 snd_pcm_lib_preallocate_free_for_all(pcm);
 946                 usX2Y_audio_stream_free(usX2Y_stream);
 947         }
 948 }
 949
 950 static int usX2Y_audio_stream_new(snd_card_t *card, int playback_endpoint, int capture_endpoint)
 951 {
 952         snd_pcm_t *pcm;
 953         int err, i;
 954         snd_usX2Y_substream_t **usX2Y_substream =
 955                 usX2Y(card)->subs + 2 * usX2Y(card)->chip.pcm_devs;
 956
 957         for (i = playback_endpoint ? SNDRV_PCM_STREAM_PLAYBACK : SNDRV_PCM_STREAM_CAPTURE;
 958              i <= SNDRV_PCM_STREAM_CAPTURE; ++i) {
 959                 usX2Y_substream[i] = kzalloc(sizeof(snd_usX2Y_substream_t), GFP_KERNEL);
 960                 if (NULL == usX2Y_substream[i]) {
 961                         snd_printk(KERN_ERR "cannot malloc\n");
 962                         return -ENOMEM;
 963                 }
 964                 usX2Y_substream[i]->usX2Y = usX2Y(card);
 965         }
 966
 967         if (playback_endpoint)
 968                 usX2Y_substream[SNDRV_PCM_STREAM_PLAYBACK]->endpoint = playback_endpoint;
 969         usX2Y_substream[SNDRV_PCM_STREAM_CAPTURE]->endpoint = capture_endpoint;
 970
 971         err = snd_pcm_new(card, NAME_ALLCAPS" Audio", usX2Y(card)->chip.pcm_devs,
 972                           playback_endpoint ? 1 : 0, 1,
 973                           &pcm);
 974         if (err < 0) {
 975                 usX2Y_audio_stream_free(usX2Y_substream);
 976                 return err;
 977         }
 978
 979         if (playback_endpoint)
 980                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_usX2Y_pcm_ops);
 981         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_usX2Y_pcm_ops);
 982
 983         pcm->private_data = usX2Y_substream;
 984         pcm->private_free = snd_usX2Y_pcm_private_free;
 985         pcm->info_flags = 0;
 986
 987         sprintf(pcm->name, NAME_ALLCAPS" Audio #%d", usX2Y(card)->chip.pcm_devs);
 988
 989         if ((playback_endpoint &&
 990              0 > (err = snd_pcm_lib_preallocate_pages(pcm->streams[SNDRV_PCM_STREAM_PLAYBACK].substream,
 991                                                      SNDRV_DMA_TYPE_CONTINUOUS,
 992                                                      snd_dma_continuous_data(GFP_KERNEL),
 993                                                      64*1024, 128*1024))) ||
 994             0 > (err = snd_pcm_lib_preallocate_pages(pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream,
 995                                                      SNDRV_DMA_TYPE_CONTINUOUS,
 996                                                      snd_dma_continuous_data(GFP_KERNEL),
 997                                                      64*1024, 128*1024))) {
 998                 snd_usX2Y_pcm_private_free(pcm);
 999                 return err;
1000         }
1001         usX2Y(card)->chip.pcm_devs++;
1002
1003         return 0;
1004 }
1005
1006 /*
1007  * create a chip instance and set its names.
1008  */
1009 int usX2Y_audio_create(snd_card_t* card)
1010 {
1011         int err = 0;
1012
1013         INIT_LIST_HEAD(&usX2Y(card)->chip.pcm_list);
1014
1015         if (0 > (err = usX2Y_audio_stream_new(card, 0xA, 0x8)))
1016                 return err;
1017         if (le16_to_cpu(usX2Y(card)->chip.dev->descriptor.idProduct) == USB_ID_US428)
1018              if (0 > (err = usX2Y_audio_stream_new(card, 0, 0xA)))
1019                      return err;
1020         if (le16_to_cpu(usX2Y(card)->chip.dev->descriptor.idProduct) != USB_ID_US122)
1021                 err = usX2Y_rate_set(usX2Y(card), 44100);       // Lets us428 recognize output-volume settings, disturbs us122.
1022         return err;
1023 }