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