11446a1506dad244b2d11c447e6dc39e906427f1
[linux-2.6.git] / sound / core / pcm_lib.c
1 /*
2  *  Digital Audio (PCM) abstract layer
3  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
4  *                   Abramo Bagnara <abramo@alsa-project.org>
5  *
6  *
7  *   This program is free software; you can redistribute it and/or modify
8  *   it under the terms of the GNU General Public License as published by
9  *   the Free Software Foundation; either version 2 of the License, or
10  *   (at your option) any later version.
11  *
12  *   This program is distributed in the hope that it will be useful,
13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *   GNU General Public License for more details.
16  *
17  *   You should have received a copy of the GNU General Public License
18  *   along with this program; if not, write to the Free Software
19  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
20  *
21  */
22
23 #include <linux/slab.h>
24 #include <linux/time.h>
25 #include <linux/math64.h>
26 #include <sound/core.h>
27 #include <sound/control.h>
28 #include <sound/info.h>
29 #include <sound/pcm.h>
30 #include <sound/pcm_params.h>
31 #include <sound/timer.h>
32
33 /*
34  * fill ring buffer with silence
35  * runtime->silence_start: starting pointer to silence area
36  * runtime->silence_filled: size filled with silence
37  * runtime->silence_threshold: threshold from application
38  * runtime->silence_size: maximal size from application
39  *
40  * when runtime->silence_size >= runtime->boundary - fill processed area with silence immediately
41  */
42 void snd_pcm_playback_silence(struct snd_pcm_substream *substream, snd_pcm_uframes_t new_hw_ptr)
43 {
44         struct snd_pcm_runtime *runtime = substream->runtime;
45         snd_pcm_uframes_t frames, ofs, transfer;
46
47         if (runtime->silence_size < runtime->boundary) {
48                 snd_pcm_sframes_t noise_dist, n;
49                 if (runtime->silence_start != runtime->control->appl_ptr) {
50                         n = runtime->control->appl_ptr - runtime->silence_start;
51                         if (n < 0)
52                                 n += runtime->boundary;
53                         if ((snd_pcm_uframes_t)n < runtime->silence_filled)
54                                 runtime->silence_filled -= n;
55                         else
56                                 runtime->silence_filled = 0;
57                         runtime->silence_start = runtime->control->appl_ptr;
58                 }
59                 if (runtime->silence_filled >= runtime->buffer_size)
60                         return;
61                 noise_dist = snd_pcm_playback_hw_avail(runtime) + runtime->silence_filled;
62                 if (noise_dist >= (snd_pcm_sframes_t) runtime->silence_threshold)
63                         return;
64                 frames = runtime->silence_threshold - noise_dist;
65                 if (frames > runtime->silence_size)
66                         frames = runtime->silence_size;
67         } else {
68                 if (new_hw_ptr == ULONG_MAX) {  /* initialization */
69                         snd_pcm_sframes_t avail = snd_pcm_playback_hw_avail(runtime);
70                         if (avail > runtime->buffer_size)
71                                 avail = runtime->buffer_size;
72                         runtime->silence_filled = avail > 0 ? avail : 0;
73                         runtime->silence_start = (runtime->status->hw_ptr +
74                                                   runtime->silence_filled) %
75                                                  runtime->boundary;
76                 } else {
77                         ofs = runtime->status->hw_ptr;
78                         frames = new_hw_ptr - ofs;
79                         if ((snd_pcm_sframes_t)frames < 0)
80                                 frames += runtime->boundary;
81                         runtime->silence_filled -= frames;
82                         if ((snd_pcm_sframes_t)runtime->silence_filled < 0) {
83                                 runtime->silence_filled = 0;
84                                 runtime->silence_start = new_hw_ptr;
85                         } else {
86                                 runtime->silence_start = ofs;
87                         }
88                 }
89                 frames = runtime->buffer_size - runtime->silence_filled;
90         }
91         if (snd_BUG_ON(frames > runtime->buffer_size))
92                 return;
93         if (frames == 0)
94                 return;
95         ofs = runtime->silence_start % runtime->buffer_size;
96         while (frames > 0) {
97                 transfer = ofs + frames > runtime->buffer_size ? runtime->buffer_size - ofs : frames;
98                 if (runtime->access == SNDRV_PCM_ACCESS_RW_INTERLEAVED ||
99                     runtime->access == SNDRV_PCM_ACCESS_MMAP_INTERLEAVED) {
100                         if (substream->ops->silence) {
101                                 int err;
102                                 err = substream->ops->silence(substream, -1, ofs, transfer);
103                                 snd_BUG_ON(err < 0);
104                         } else {
105                                 char *hwbuf = runtime->dma_area + frames_to_bytes(runtime, ofs);
106                                 snd_pcm_format_set_silence(runtime->format, hwbuf, transfer * runtime->channels);
107                         }
108                 } else {
109                         unsigned int c;
110                         unsigned int channels = runtime->channels;
111                         if (substream->ops->silence) {
112                                 for (c = 0; c < channels; ++c) {
113                                         int err;
114                                         err = substream->ops->silence(substream, c, ofs, transfer);
115                                         snd_BUG_ON(err < 0);
116                                 }
117                         } else {
118                                 size_t dma_csize = runtime->dma_bytes / channels;
119                                 for (c = 0; c < channels; ++c) {
120                                         char *hwbuf = runtime->dma_area + (c * dma_csize) + samples_to_bytes(runtime, ofs);
121                                         snd_pcm_format_set_silence(runtime->format, hwbuf, transfer);
122                                 }
123                         }
124                 }
125                 runtime->silence_filled += transfer;
126                 frames -= transfer;
127                 ofs = 0;
128         }
129 }
130
131 static void pcm_debug_name(struct snd_pcm_substream *substream,
132                            char *name, size_t len)
133 {
134         snprintf(name, len, "pcmC%dD%d%c:%d",
135                  substream->pcm->card->number,
136                  substream->pcm->device,
137                  substream->stream ? 'c' : 'p',
138                  substream->number);
139 }
140
141 #define XRUN_DEBUG_BASIC        (1<<0)
142 #define XRUN_DEBUG_STACK        (1<<1)  /* dump also stack */
143 #define XRUN_DEBUG_JIFFIESCHECK (1<<2)  /* do jiffies check */
144 #define XRUN_DEBUG_PERIODUPDATE (1<<3)  /* full period update info */
145 #define XRUN_DEBUG_HWPTRUPDATE  (1<<4)  /* full hwptr update info */
146 #define XRUN_DEBUG_LOG          (1<<5)  /* show last 10 positions on err */
147 #define XRUN_DEBUG_LOGONCE      (1<<6)  /* do above only once */
148
149 #ifdef CONFIG_SND_PCM_XRUN_DEBUG
150
151 #define xrun_debug(substream, mask) \
152                         ((substream)->pstr->xrun_debug & (mask))
153 #else
154 #define xrun_debug(substream, mask)     0
155 #endif
156
157 #define dump_stack_on_xrun(substream) do {                      \
158                 if (xrun_debug(substream, XRUN_DEBUG_STACK))    \
159                         dump_stack();                           \
160         } while (0)
161
162 static void xrun(struct snd_pcm_substream *substream)
163 {
164         struct snd_pcm_runtime *runtime = substream->runtime;
165
166         if (runtime->tstamp_mode == SNDRV_PCM_TSTAMP_ENABLE)
167                 snd_pcm_gettime(runtime, (struct timespec *)&runtime->status->tstamp);
168         snd_pcm_stop(substream, SNDRV_PCM_STATE_XRUN);
169         if (xrun_debug(substream, XRUN_DEBUG_BASIC)) {
170                 char name[16];
171                 pcm_debug_name(substream, name, sizeof(name));
172                 snd_printd(KERN_DEBUG "XRUN: %s\n", name);
173                 dump_stack_on_xrun(substream);
174         }
175 }
176
177 #ifdef CONFIG_SND_PCM_XRUN_DEBUG
178 #define hw_ptr_error(substream, fmt, args...)                           \
179         do {                                                            \
180                 if (xrun_debug(substream, XRUN_DEBUG_BASIC)) {          \
181                         xrun_log_show(substream);                       \
182                         if (printk_ratelimit()) {                       \
183                                 snd_printd("PCM: " fmt, ##args);        \
184                         }                                               \
185                         dump_stack_on_xrun(substream);                  \
186                 }                                                       \
187         } while (0)
188
189 #define XRUN_LOG_CNT    10
190
191 struct hwptr_log_entry {
192         unsigned long jiffies;
193         snd_pcm_uframes_t pos;
194         snd_pcm_uframes_t period_size;
195         snd_pcm_uframes_t buffer_size;
196         snd_pcm_uframes_t old_hw_ptr;
197         snd_pcm_uframes_t hw_ptr_base;
198 };
199
200 struct snd_pcm_hwptr_log {
201         unsigned int idx;
202         unsigned int hit: 1;
203         struct hwptr_log_entry entries[XRUN_LOG_CNT];
204 };
205
206 static void xrun_log(struct snd_pcm_substream *substream,
207                      snd_pcm_uframes_t pos)
208 {
209         struct snd_pcm_runtime *runtime = substream->runtime;
210         struct snd_pcm_hwptr_log *log = runtime->hwptr_log;
211         struct hwptr_log_entry *entry;
212
213         if (log == NULL) {
214                 log = kzalloc(sizeof(*log), GFP_ATOMIC);
215                 if (log == NULL)
216                         return;
217                 runtime->hwptr_log = log;
218         } else {
219                 if (xrun_debug(substream, XRUN_DEBUG_LOGONCE) && log->hit)
220                         return;
221         }
222         entry = &log->entries[log->idx];
223         entry->jiffies = jiffies;
224         entry->pos = pos;
225         entry->period_size = runtime->period_size;
226         entry->buffer_size = runtime->buffer_size;
227         entry->old_hw_ptr = runtime->status->hw_ptr;
228         entry->hw_ptr_base = runtime->hw_ptr_base;
229         log->idx = (log->idx + 1) % XRUN_LOG_CNT;
230 }
231
232 static void xrun_log_show(struct snd_pcm_substream *substream)
233 {
234         struct snd_pcm_hwptr_log *log = substream->runtime->hwptr_log;
235         struct hwptr_log_entry *entry;
236         char name[16];
237         unsigned int idx;
238         int cnt;
239
240         if (log == NULL)
241                 return;
242         if (xrun_debug(substream, XRUN_DEBUG_LOGONCE) && log->hit)
243                 return;
244         pcm_debug_name(substream, name, sizeof(name));
245         for (cnt = 0, idx = log->idx; cnt < XRUN_LOG_CNT; cnt++) {
246                 entry = &log->entries[idx];
247                 if (entry->period_size == 0)
248                         break;
249                 snd_printd("hwptr log: %s: j=%lu, pos=%ld/%ld/%ld, "
250                            "hwptr=%ld/%ld\n",
251                            name, entry->jiffies, (unsigned long)entry->pos,
252                            (unsigned long)entry->period_size,
253                            (unsigned long)entry->buffer_size,
254                            (unsigned long)entry->old_hw_ptr,
255                            (unsigned long)entry->hw_ptr_base);
256                 idx++;
257                 idx %= XRUN_LOG_CNT;
258         }
259         log->hit = 1;
260 }
261
262 #else /* ! CONFIG_SND_PCM_XRUN_DEBUG */
263
264 #define hw_ptr_error(substream, fmt, args...) do { } while (0)
265 #define xrun_log(substream, pos)        do { } while (0)
266 #define xrun_log_show(substream)        do { } while (0)
267
268 #endif
269
270 int snd_pcm_update_state(struct snd_pcm_substream *substream,
271                          struct snd_pcm_runtime *runtime)
272 {
273         snd_pcm_uframes_t avail;
274
275         if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
276                 avail = snd_pcm_playback_avail(runtime);
277         else
278                 avail = snd_pcm_capture_avail(runtime);
279         if (avail > runtime->avail_max)
280                 runtime->avail_max = avail;
281         if (runtime->status->state == SNDRV_PCM_STATE_DRAINING) {
282                 if (avail >= runtime->buffer_size) {
283                         snd_pcm_drain_done(substream);
284                         return -EPIPE;
285                 }
286         } else {
287                 if (avail >= runtime->stop_threshold) {
288                         xrun(substream);
289                         return -EPIPE;
290                 }
291         }
292         if (runtime->twake) {
293                 if (avail >= runtime->twake)
294                         wake_up(&runtime->tsleep);
295         } else if (avail >= runtime->control->avail_min)
296                 wake_up(&runtime->sleep);
297         return 0;
298 }
299
300 static int snd_pcm_update_hw_ptr0(struct snd_pcm_substream *substream,
301                                   unsigned int in_interrupt)
302 {
303         struct snd_pcm_runtime *runtime = substream->runtime;
304         snd_pcm_uframes_t pos;
305         snd_pcm_uframes_t old_hw_ptr, new_hw_ptr, hw_base;
306         snd_pcm_sframes_t hdelta, delta;
307         unsigned long jdelta;
308
309         old_hw_ptr = runtime->status->hw_ptr;
310         pos = substream->ops->pointer(substream);
311         if (pos == SNDRV_PCM_POS_XRUN) {
312                 xrun(substream);
313                 return -EPIPE;
314         }
315         if (pos >= runtime->buffer_size) {
316                 if (printk_ratelimit()) {
317                         char name[16];
318                         pcm_debug_name(substream, name, sizeof(name));
319                         xrun_log_show(substream);
320                         snd_printd(KERN_ERR  "BUG: %s, pos = %ld, "
321                                    "buffer size = %ld, period size = %ld\n",
322                                    name, pos, runtime->buffer_size,
323                                    runtime->period_size);
324                 }
325                 pos = 0;
326         }
327         pos -= pos % runtime->min_align;
328         if (xrun_debug(substream, XRUN_DEBUG_LOG))
329                 xrun_log(substream, pos);
330         hw_base = runtime->hw_ptr_base;
331         new_hw_ptr = hw_base + pos;
332         if (in_interrupt) {
333                 /* we know that one period was processed */
334                 /* delta = "expected next hw_ptr" for in_interrupt != 0 */
335                 delta = runtime->hw_ptr_interrupt + runtime->period_size;
336                 if (delta > new_hw_ptr) {
337                         /* check for double acknowledged interrupts */
338                         hdelta = jiffies - runtime->hw_ptr_jiffies;
339                         if (hdelta > runtime->hw_ptr_buffer_jiffies/2) {
340                                 hw_base += runtime->buffer_size;
341                                 if (hw_base >= runtime->boundary)
342                                         hw_base = 0;
343                                 new_hw_ptr = hw_base + pos;
344                                 goto __delta;
345                         }
346                 }
347         }
348         /* new_hw_ptr might be lower than old_hw_ptr in case when */
349         /* pointer crosses the end of the ring buffer */
350         if (new_hw_ptr < old_hw_ptr) {
351                 hw_base += runtime->buffer_size;
352                 if (hw_base >= runtime->boundary)
353                         hw_base = 0;
354                 new_hw_ptr = hw_base + pos;
355         }
356       __delta:
357         delta = new_hw_ptr - old_hw_ptr;
358         if (delta < 0)
359                 delta += runtime->boundary;
360         if (xrun_debug(substream, in_interrupt ?
361                         XRUN_DEBUG_PERIODUPDATE : XRUN_DEBUG_HWPTRUPDATE)) {
362                 char name[16];
363                 pcm_debug_name(substream, name, sizeof(name));
364                 snd_printd("%s_update: %s: pos=%u/%u/%u, "
365                            "hwptr=%ld/%ld/%ld/%ld\n",
366                            in_interrupt ? "period" : "hwptr",
367                            name,
368                            (unsigned int)pos,
369                            (unsigned int)runtime->period_size,
370                            (unsigned int)runtime->buffer_size,
371                            (unsigned long)delta,
372                            (unsigned long)old_hw_ptr,
373                            (unsigned long)new_hw_ptr,
374                            (unsigned long)runtime->hw_ptr_base);
375         }
376         /* something must be really wrong */
377         if (delta >= runtime->buffer_size + runtime->period_size) {
378                 hw_ptr_error(substream,
379                                "Unexpected hw_pointer value %s"
380                                "(stream=%i, pos=%ld, new_hw_ptr=%ld, "
381                                "old_hw_ptr=%ld)\n",
382                                      in_interrupt ? "[Q] " : "[P]",
383                                      substream->stream, (long)pos,
384                                      (long)new_hw_ptr, (long)old_hw_ptr);
385                 return 0;
386         }
387
388         /* Do jiffies check only in xrun_debug mode */
389         if (!xrun_debug(substream, XRUN_DEBUG_JIFFIESCHECK))
390                 goto no_jiffies_check;
391
392         /* Skip the jiffies check for hardwares with BATCH flag.
393          * Such hardware usually just increases the position at each IRQ,
394          * thus it can't give any strange position.
395          */
396         if (runtime->hw.info & SNDRV_PCM_INFO_BATCH)
397                 goto no_jiffies_check;
398         hdelta = delta;
399         if (hdelta < runtime->delay)
400                 goto no_jiffies_check;
401         hdelta -= runtime->delay;
402         jdelta = jiffies - runtime->hw_ptr_jiffies;
403         if (((hdelta * HZ) / runtime->rate) > jdelta + HZ/100) {
404                 delta = jdelta /
405                         (((runtime->period_size * HZ) / runtime->rate)
406                                                                 + HZ/100);
407                 /* move new_hw_ptr according jiffies not pos variable */
408                 new_hw_ptr = old_hw_ptr;
409                 hw_base = delta;
410                 /* use loop to avoid checks for delta overflows */
411                 /* the delta value is small or zero in most cases */
412                 while (delta > 0) {
413                         new_hw_ptr += runtime->period_size;
414                         if (new_hw_ptr >= runtime->boundary)
415                                 new_hw_ptr -= runtime->boundary;
416                         delta--;
417                 }
418                 /* align hw_base to buffer_size */
419                 hw_ptr_error(substream,
420                              "hw_ptr skipping! %s"
421                              "(pos=%ld, delta=%ld, period=%ld, "
422                              "jdelta=%lu/%lu/%lu, hw_ptr=%ld/%ld)\n",
423                              in_interrupt ? "[Q] " : "",
424                              (long)pos, (long)hdelta,
425                              (long)runtime->period_size, jdelta,
426                              ((hdelta * HZ) / runtime->rate), hw_base,
427                              (unsigned long)old_hw_ptr,
428                              (unsigned long)new_hw_ptr);
429                 /* reset values to proper state */
430                 delta = 0;
431                 hw_base = new_hw_ptr - (new_hw_ptr % runtime->buffer_size);
432         }
433  no_jiffies_check:
434         if (delta > runtime->period_size + runtime->period_size / 2) {
435                 hw_ptr_error(substream,
436                              "Lost interrupts? %s"
437                              "(stream=%i, delta=%ld, new_hw_ptr=%ld, "
438                              "old_hw_ptr=%ld)\n",
439                              in_interrupt ? "[Q] " : "",
440                              substream->stream, (long)delta,
441                              (long)new_hw_ptr,
442                              (long)old_hw_ptr);
443         }
444
445         if (runtime->status->hw_ptr == new_hw_ptr)
446                 return 0;
447
448         if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK &&
449             runtime->silence_size > 0)
450                 snd_pcm_playback_silence(substream, new_hw_ptr);
451
452         if (in_interrupt) {
453                 delta = new_hw_ptr - runtime->hw_ptr_interrupt;
454                 if (delta < 0)
455                         delta += runtime->boundary;
456                 delta -= (snd_pcm_uframes_t)delta % runtime->period_size;
457                 runtime->hw_ptr_interrupt += delta;
458                 if (runtime->hw_ptr_interrupt >= runtime->boundary)
459                         runtime->hw_ptr_interrupt -= runtime->boundary;
460         }
461         runtime->hw_ptr_base = hw_base;
462         runtime->status->hw_ptr = new_hw_ptr;
463         runtime->hw_ptr_jiffies = jiffies;
464         if (runtime->tstamp_mode == SNDRV_PCM_TSTAMP_ENABLE)
465                 snd_pcm_gettime(runtime, (struct timespec *)&runtime->status->tstamp);
466
467         return snd_pcm_update_state(substream, runtime);
468 }
469
470 /* CAUTION: call it with irq disabled */
471 int snd_pcm_update_hw_ptr(struct snd_pcm_substream *substream)
472 {
473         return snd_pcm_update_hw_ptr0(substream, 0);
474 }
475
476 /**
477  * snd_pcm_set_ops - set the PCM operators
478  * @pcm: the pcm instance
479  * @direction: stream direction, SNDRV_PCM_STREAM_XXX
480  * @ops: the operator table
481  *
482  * Sets the given PCM operators to the pcm instance.
483  */
484 void snd_pcm_set_ops(struct snd_pcm *pcm, int direction, struct snd_pcm_ops *ops)
485 {
486         struct snd_pcm_str *stream = &pcm->streams[direction];
487         struct snd_pcm_substream *substream;
488         
489         for (substream = stream->substream; substream != NULL; substream = substream->next)
490                 substream->ops = ops;
491 }
492
493 EXPORT_SYMBOL(snd_pcm_set_ops);
494
495 /**
496  * snd_pcm_sync - set the PCM sync id
497  * @substream: the pcm substream
498  *
499  * Sets the PCM sync identifier for the card.
500  */
501 void snd_pcm_set_sync(struct snd_pcm_substream *substream)
502 {
503         struct snd_pcm_runtime *runtime = substream->runtime;
504         
505         runtime->sync.id32[0] = substream->pcm->card->number;
506         runtime->sync.id32[1] = -1;
507         runtime->sync.id32[2] = -1;
508         runtime->sync.id32[3] = -1;
509 }
510
511 EXPORT_SYMBOL(snd_pcm_set_sync);
512
513 /*
514  *  Standard ioctl routine
515  */
516
517 static inline unsigned int div32(unsigned int a, unsigned int b, 
518                                  unsigned int *r)
519 {
520         if (b == 0) {
521                 *r = 0;
522                 return UINT_MAX;
523         }
524         *r = a % b;
525         return a / b;
526 }
527
528 static inline unsigned int div_down(unsigned int a, unsigned int b)
529 {
530         if (b == 0)
531                 return UINT_MAX;
532         return a / b;
533 }
534
535 static inline unsigned int div_up(unsigned int a, unsigned int b)
536 {
537         unsigned int r;
538         unsigned int q;
539         if (b == 0)
540                 return UINT_MAX;
541         q = div32(a, b, &r);
542         if (r)
543                 ++q;
544         return q;
545 }
546
547 static inline unsigned int mul(unsigned int a, unsigned int b)
548 {
549         if (a == 0)
550                 return 0;
551         if (div_down(UINT_MAX, a) < b)
552                 return UINT_MAX;
553         return a * b;
554 }
555
556 static inline unsigned int muldiv32(unsigned int a, unsigned int b,
557                                     unsigned int c, unsigned int *r)
558 {
559         u_int64_t n = (u_int64_t) a * b;
560         if (c == 0) {
561                 snd_BUG_ON(!n);
562                 *r = 0;
563                 return UINT_MAX;
564         }
565         n = div_u64_rem(n, c, r);
566         if (n >= UINT_MAX) {
567                 *r = 0;
568                 return UINT_MAX;
569         }
570         return n;
571 }
572
573 /**
574  * snd_interval_refine - refine the interval value of configurator
575  * @i: the interval value to refine
576  * @v: the interval value to refer to
577  *
578  * Refines the interval value with the reference value.
579  * The interval is changed to the range satisfying both intervals.
580  * The interval status (min, max, integer, etc.) are evaluated.
581  *
582  * Returns non-zero if the value is changed, zero if not changed.
583  */
584 int snd_interval_refine(struct snd_interval *i, const struct snd_interval *v)
585 {
586         int changed = 0;
587         if (snd_BUG_ON(snd_interval_empty(i)))
588                 return -EINVAL;
589         if (i->min < v->min) {
590                 i->min = v->min;
591                 i->openmin = v->openmin;
592                 changed = 1;
593         } else if (i->min == v->min && !i->openmin && v->openmin) {
594                 i->openmin = 1;
595                 changed = 1;
596         }
597         if (i->max > v->max) {
598                 i->max = v->max;
599                 i->openmax = v->openmax;
600                 changed = 1;
601         } else if (i->max == v->max && !i->openmax && v->openmax) {
602                 i->openmax = 1;
603                 changed = 1;
604         }
605         if (!i->integer && v->integer) {
606                 i->integer = 1;
607                 changed = 1;
608         }
609         if (i->integer) {
610                 if (i->openmin) {
611                         i->min++;
612                         i->openmin = 0;
613                 }
614                 if (i->openmax) {
615                         i->max--;
616                         i->openmax = 0;
617                 }
618         } else if (!i->openmin && !i->openmax && i->min == i->max)
619                 i->integer = 1;
620         if (snd_interval_checkempty(i)) {
621                 snd_interval_none(i);
622                 return -EINVAL;
623         }
624         return changed;
625 }
626
627 EXPORT_SYMBOL(snd_interval_refine);
628
629 static int snd_interval_refine_first(struct snd_interval *i)
630 {
631         if (snd_BUG_ON(snd_interval_empty(i)))
632                 return -EINVAL;
633         if (snd_interval_single(i))
634                 return 0;
635         i->max = i->min;
636         i->openmax = i->openmin;
637         if (i->openmax)
638                 i->max++;
639         return 1;
640 }
641
642 static int snd_interval_refine_last(struct snd_interval *i)
643 {
644         if (snd_BUG_ON(snd_interval_empty(i)))
645                 return -EINVAL;
646         if (snd_interval_single(i))
647                 return 0;
648         i->min = i->max;
649         i->openmin = i->openmax;
650         if (i->openmin)
651                 i->min--;
652         return 1;
653 }
654
655 void snd_interval_mul(const struct snd_interval *a, const struct snd_interval *b, struct snd_interval *c)
656 {
657         if (a->empty || b->empty) {
658                 snd_interval_none(c);
659                 return;
660         }
661         c->empty = 0;
662         c->min = mul(a->min, b->min);
663         c->openmin = (a->openmin || b->openmin);
664         c->max = mul(a->max,  b->max);
665         c->openmax = (a->openmax || b->openmax);
666         c->integer = (a->integer && b->integer);
667 }
668
669 /**
670  * snd_interval_div - refine the interval value with division
671  * @a: dividend
672  * @b: divisor
673  * @c: quotient
674  *
675  * c = a / b
676  *
677  * Returns non-zero if the value is changed, zero if not changed.
678  */
679 void snd_interval_div(const struct snd_interval *a, const struct snd_interval *b, struct snd_interval *c)
680 {
681         unsigned int r;
682         if (a->empty || b->empty) {
683                 snd_interval_none(c);
684                 return;
685         }
686         c->empty = 0;
687         c->min = div32(a->min, b->max, &r);
688         c->openmin = (r || a->openmin || b->openmax);
689         if (b->min > 0) {
690                 c->max = div32(a->max, b->min, &r);
691                 if (r) {
692                         c->max++;
693                         c->openmax = 1;
694                 } else
695                         c->openmax = (a->openmax || b->openmin);
696         } else {
697                 c->max = UINT_MAX;
698                 c->openmax = 0;
699         }
700         c->integer = 0;
701 }
702
703 /**
704  * snd_interval_muldivk - refine the interval value
705  * @a: dividend 1
706  * @b: dividend 2
707  * @k: divisor (as integer)
708  * @c: result
709   *
710  * c = a * b / k
711  *
712  * Returns non-zero if the value is changed, zero if not changed.
713  */
714 void snd_interval_muldivk(const struct snd_interval *a, const struct snd_interval *b,
715                       unsigned int k, struct snd_interval *c)
716 {
717         unsigned int r;
718         if (a->empty || b->empty) {
719                 snd_interval_none(c);
720                 return;
721         }
722         c->empty = 0;
723         c->min = muldiv32(a->min, b->min, k, &r);
724         c->openmin = (r || a->openmin || b->openmin);
725         c->max = muldiv32(a->max, b->max, k, &r);
726         if (r) {
727                 c->max++;
728                 c->openmax = 1;
729         } else
730                 c->openmax = (a->openmax || b->openmax);
731         c->integer = 0;
732 }
733
734 /**
735  * snd_interval_mulkdiv - refine the interval value
736  * @a: dividend 1
737  * @k: dividend 2 (as integer)
738  * @b: divisor
739  * @c: result
740  *
741  * c = a * k / b
742  *
743  * Returns non-zero if the value is changed, zero if not changed.
744  */
745 void snd_interval_mulkdiv(const struct snd_interval *a, unsigned int k,
746                       const struct snd_interval *b, struct snd_interval *c)
747 {
748         unsigned int r;
749         if (a->empty || b->empty) {
750                 snd_interval_none(c);
751                 return;
752         }
753         c->empty = 0;
754         c->min = muldiv32(a->min, k, b->max, &r);
755         c->openmin = (r || a->openmin || b->openmax);
756         if (b->min > 0) {
757                 c->max = muldiv32(a->max, k, b->min, &r);
758                 if (r) {
759                         c->max++;
760                         c->openmax = 1;
761                 } else
762                         c->openmax = (a->openmax || b->openmin);
763         } else {
764                 c->max = UINT_MAX;
765                 c->openmax = 0;
766         }
767         c->integer = 0;
768 }
769
770 /* ---- */
771
772
773 /**
774  * snd_interval_ratnum - refine the interval value
775  * @i: interval to refine
776  * @rats_count: number of ratnum_t 
777  * @rats: ratnum_t array
778  * @nump: pointer to store the resultant numerator
779  * @denp: pointer to store the resultant denominator
780  *
781  * Returns non-zero if the value is changed, zero if not changed.
782  */
783 int snd_interval_ratnum(struct snd_interval *i,
784                         unsigned int rats_count, struct snd_ratnum *rats,
785                         unsigned int *nump, unsigned int *denp)
786 {
787         unsigned int best_num, best_den;
788         int best_diff;
789         unsigned int k;
790         struct snd_interval t;
791         int err;
792         unsigned int result_num, result_den;
793         int result_diff;
794
795         best_num = best_den = best_diff = 0;
796         for (k = 0; k < rats_count; ++k) {
797                 unsigned int num = rats[k].num;
798                 unsigned int den;
799                 unsigned int q = i->min;
800                 int diff;
801                 if (q == 0)
802                         q = 1;
803                 den = div_up(num, q);
804                 if (den < rats[k].den_min)
805                         continue;
806                 if (den > rats[k].den_max)
807                         den = rats[k].den_max;
808                 else {
809                         unsigned int r;
810                         r = (den - rats[k].den_min) % rats[k].den_step;
811                         if (r != 0)
812                                 den -= r;
813                 }
814                 diff = num - q * den;
815                 if (diff < 0)
816                         diff = -diff;
817                 if (best_num == 0 ||
818                     diff * best_den < best_diff * den) {
819                         best_diff = diff;
820                         best_den = den;
821                         best_num = num;
822                 }
823         }
824         if (best_den == 0) {
825                 i->empty = 1;
826                 return -EINVAL;
827         }
828         t.min = div_down(best_num, best_den);
829         t.openmin = !!(best_num % best_den);
830         
831         result_num = best_num;
832         result_diff = best_diff;
833         result_den = best_den;
834         best_num = best_den = best_diff = 0;
835         for (k = 0; k < rats_count; ++k) {
836                 unsigned int num = rats[k].num;
837                 unsigned int den;
838                 unsigned int q = i->max;
839                 int diff;
840                 if (q == 0) {
841                         i->empty = 1;
842                         return -EINVAL;
843                 }
844                 den = div_down(num, q);
845                 if (den > rats[k].den_max)
846                         continue;
847                 if (den < rats[k].den_min)
848                         den = rats[k].den_min;
849                 else {
850                         unsigned int r;
851                         r = (den - rats[k].den_min) % rats[k].den_step;
852                         if (r != 0)
853                                 den += rats[k].den_step - r;
854                 }
855                 diff = q * den - num;
856                 if (diff < 0)
857                         diff = -diff;
858                 if (best_num == 0 ||
859                     diff * best_den < best_diff * den) {
860                         best_diff = diff;
861                         best_den = den;
862                         best_num = num;
863                 }
864         }
865         if (best_den == 0) {
866                 i->empty = 1;
867                 return -EINVAL;
868         }
869         t.max = div_up(best_num, best_den);
870         t.openmax = !!(best_num % best_den);
871         t.integer = 0;
872         err = snd_interval_refine(i, &t);
873         if (err < 0)
874                 return err;
875
876         if (snd_interval_single(i)) {
877                 if (best_diff * result_den < result_diff * best_den) {
878                         result_num = best_num;
879                         result_den = best_den;
880                 }
881                 if (nump)
882                         *nump = result_num;
883                 if (denp)
884                         *denp = result_den;
885         }
886         return err;
887 }
888
889 EXPORT_SYMBOL(snd_interval_ratnum);
890
891 /**
892  * snd_interval_ratden - refine the interval value
893  * @i: interval to refine
894  * @rats_count: number of struct ratden
895  * @rats: struct ratden array
896  * @nump: pointer to store the resultant numerator
897  * @denp: pointer to store the resultant denominator
898  *
899  * Returns non-zero if the value is changed, zero if not changed.
900  */
901 static int snd_interval_ratden(struct snd_interval *i,
902                                unsigned int rats_count, struct snd_ratden *rats,
903                                unsigned int *nump, unsigned int *denp)
904 {
905         unsigned int best_num, best_diff, best_den;
906         unsigned int k;
907         struct snd_interval t;
908         int err;
909
910         best_num = best_den = best_diff = 0;
911         for (k = 0; k < rats_count; ++k) {
912                 unsigned int num;
913                 unsigned int den = rats[k].den;
914                 unsigned int q = i->min;
915                 int diff;
916                 num = mul(q, den);
917                 if (num > rats[k].num_max)
918                         continue;
919                 if (num < rats[k].num_min)
920                         num = rats[k].num_max;
921                 else {
922                         unsigned int r;
923                         r = (num - rats[k].num_min) % rats[k].num_step;
924                         if (r != 0)
925                                 num += rats[k].num_step - r;
926                 }
927                 diff = num - q * den;
928                 if (best_num == 0 ||
929                     diff * best_den < best_diff * den) {
930                         best_diff = diff;
931                         best_den = den;
932                         best_num = num;
933                 }
934         }
935         if (best_den == 0) {
936                 i->empty = 1;
937                 return -EINVAL;
938         }
939         t.min = div_down(best_num, best_den);
940         t.openmin = !!(best_num % best_den);
941         
942         best_num = best_den = best_diff = 0;
943         for (k = 0; k < rats_count; ++k) {
944                 unsigned int num;
945                 unsigned int den = rats[k].den;
946                 unsigned int q = i->max;
947                 int diff;
948                 num = mul(q, den);
949                 if (num < rats[k].num_min)
950                         continue;
951                 if (num > rats[k].num_max)
952                         num = rats[k].num_max;
953                 else {
954                         unsigned int r;
955                         r = (num - rats[k].num_min) % rats[k].num_step;
956                         if (r != 0)
957                                 num -= r;
958                 }
959                 diff = q * den - num;
960                 if (best_num == 0 ||
961                     diff * best_den < best_diff * den) {
962                         best_diff = diff;
963                         best_den = den;
964                         best_num = num;
965                 }
966         }
967         if (best_den == 0) {
968                 i->empty = 1;
969                 return -EINVAL;
970         }
971         t.max = div_up(best_num, best_den);
972         t.openmax = !!(best_num % best_den);
973         t.integer = 0;
974         err = snd_interval_refine(i, &t);
975         if (err < 0)
976                 return err;
977
978         if (snd_interval_single(i)) {
979                 if (nump)
980                         *nump = best_num;
981                 if (denp)
982                         *denp = best_den;
983         }
984         return err;
985 }
986
987 /**
988  * snd_interval_list - refine the interval value from the list
989  * @i: the interval value to refine
990  * @count: the number of elements in the list
991  * @list: the value list
992  * @mask: the bit-mask to evaluate
993  *
994  * Refines the interval value from the list.
995  * When mask is non-zero, only the elements corresponding to bit 1 are
996  * evaluated.
997  *
998  * Returns non-zero if the value is changed, zero if not changed.
999  */
1000 int snd_interval_list(struct snd_interval *i, unsigned int count, unsigned int *list, unsigned int mask)
1001 {
1002         unsigned int k;
1003         struct snd_interval list_range;
1004
1005         if (!count) {
1006                 i->empty = 1;
1007                 return -EINVAL;
1008         }
1009         snd_interval_any(&list_range);
1010         list_range.min = UINT_MAX;
1011         list_range.max = 0;
1012         for (k = 0; k < count; k++) {
1013                 if (mask && !(mask & (1 << k)))
1014                         continue;
1015                 if (!snd_interval_test(i, list[k]))
1016                         continue;
1017                 list_range.min = min(list_range.min, list[k]);
1018                 list_range.max = max(list_range.max, list[k]);
1019         }
1020         return snd_interval_refine(i, &list_range);
1021 }
1022
1023 EXPORT_SYMBOL(snd_interval_list);
1024
1025 static int snd_interval_step(struct snd_interval *i, unsigned int min, unsigned int step)
1026 {
1027         unsigned int n;
1028         int changed = 0;
1029         n = (i->min - min) % step;
1030         if (n != 0 || i->openmin) {
1031                 i->min += step - n;
1032                 changed = 1;
1033         }
1034         n = (i->max - min) % step;
1035         if (n != 0 || i->openmax) {
1036                 i->max -= n;
1037                 changed = 1;
1038         }
1039         if (snd_interval_checkempty(i)) {
1040                 i->empty = 1;
1041                 return -EINVAL;
1042         }
1043         return changed;
1044 }
1045
1046 /* Info constraints helpers */
1047
1048 /**
1049  * snd_pcm_hw_rule_add - add the hw-constraint rule
1050  * @runtime: the pcm runtime instance
1051  * @cond: condition bits
1052  * @var: the variable to evaluate
1053  * @func: the evaluation function
1054  * @private: the private data pointer passed to function
1055  * @dep: the dependent variables
1056  *
1057  * Returns zero if successful, or a negative error code on failure.
1058  */
1059 int snd_pcm_hw_rule_add(struct snd_pcm_runtime *runtime, unsigned int cond,
1060                         int var,
1061                         snd_pcm_hw_rule_func_t func, void *private,
1062                         int dep, ...)
1063 {
1064         struct snd_pcm_hw_constraints *constrs = &runtime->hw_constraints;
1065         struct snd_pcm_hw_rule *c;
1066         unsigned int k;
1067         va_list args;
1068         va_start(args, dep);
1069         if (constrs->rules_num >= constrs->rules_all) {
1070                 struct snd_pcm_hw_rule *new;
1071                 unsigned int new_rules = constrs->rules_all + 16;
1072                 new = kcalloc(new_rules, sizeof(*c), GFP_KERNEL);
1073                 if (!new) {
1074                         va_end(args);
1075                         return -ENOMEM;
1076                 }
1077                 if (constrs->rules) {
1078                         memcpy(new, constrs->rules,
1079                                constrs->rules_num * sizeof(*c));
1080                         kfree(constrs->rules);
1081                 }
1082                 constrs->rules = new;
1083                 constrs->rules_all = new_rules;
1084         }
1085         c = &constrs->rules[constrs->rules_num];
1086         c->cond = cond;
1087         c->func = func;
1088         c->var = var;
1089         c->private = private;
1090         k = 0;
1091         while (1) {
1092                 if (snd_BUG_ON(k >= ARRAY_SIZE(c->deps))) {
1093                         va_end(args);
1094                         return -EINVAL;
1095                 }
1096                 c->deps[k++] = dep;
1097                 if (dep < 0)
1098                         break;
1099                 dep = va_arg(args, int);
1100         }
1101         constrs->rules_num++;
1102         va_end(args);
1103         return 0;
1104 }
1105
1106 EXPORT_SYMBOL(snd_pcm_hw_rule_add);
1107
1108 /**
1109  * snd_pcm_hw_constraint_mask - apply the given bitmap mask constraint
1110  * @runtime: PCM runtime instance
1111  * @var: hw_params variable to apply the mask
1112  * @mask: the bitmap mask
1113  *
1114  * Apply the constraint of the given bitmap mask to a 32-bit mask parameter.
1115  */
1116 int snd_pcm_hw_constraint_mask(struct snd_pcm_runtime *runtime, snd_pcm_hw_param_t var,
1117                                u_int32_t mask)
1118 {
1119         struct snd_pcm_hw_constraints *constrs = &runtime->hw_constraints;
1120         struct snd_mask *maskp = constrs_mask(constrs, var);
1121         *maskp->bits &= mask;
1122         memset(maskp->bits + 1, 0, (SNDRV_MASK_MAX-32) / 8); /* clear rest */
1123         if (*maskp->bits == 0)
1124                 return -EINVAL;
1125         return 0;
1126 }
1127
1128 /**
1129  * snd_pcm_hw_constraint_mask64 - apply the given bitmap mask constraint
1130  * @runtime: PCM runtime instance
1131  * @var: hw_params variable to apply the mask
1132  * @mask: the 64bit bitmap mask
1133  *
1134  * Apply the constraint of the given bitmap mask to a 64-bit mask parameter.
1135  */
1136 int snd_pcm_hw_constraint_mask64(struct snd_pcm_runtime *runtime, snd_pcm_hw_param_t var,
1137                                  u_int64_t mask)
1138 {
1139         struct snd_pcm_hw_constraints *constrs = &runtime->hw_constraints;
1140         struct snd_mask *maskp = constrs_mask(constrs, var);
1141         maskp->bits[0] &= (u_int32_t)mask;
1142         maskp->bits[1] &= (u_int32_t)(mask >> 32);
1143         memset(maskp->bits + 2, 0, (SNDRV_MASK_MAX-64) / 8); /* clear rest */
1144         if (! maskp->bits[0] && ! maskp->bits[1])
1145                 return -EINVAL;
1146         return 0;
1147 }
1148
1149 /**
1150  * snd_pcm_hw_constraint_integer - apply an integer constraint to an interval
1151  * @runtime: PCM runtime instance
1152  * @var: hw_params variable to apply the integer constraint
1153  *
1154  * Apply the constraint of integer to an interval parameter.
1155  */
1156 int snd_pcm_hw_constraint_integer(struct snd_pcm_runtime *runtime, snd_pcm_hw_param_t var)
1157 {
1158         struct snd_pcm_hw_constraints *constrs = &runtime->hw_constraints;
1159         return snd_interval_setinteger(constrs_interval(constrs, var));
1160 }
1161
1162 EXPORT_SYMBOL(snd_pcm_hw_constraint_integer);
1163
1164 /**
1165  * snd_pcm_hw_constraint_minmax - apply a min/max range constraint to an interval
1166  * @runtime: PCM runtime instance
1167  * @var: hw_params variable to apply the range
1168  * @min: the minimal value
1169  * @max: the maximal value
1170  * 
1171  * Apply the min/max range constraint to an interval parameter.
1172  */
1173 int snd_pcm_hw_constraint_minmax(struct snd_pcm_runtime *runtime, snd_pcm_hw_param_t var,
1174                                  unsigned int min, unsigned int max)
1175 {
1176         struct snd_pcm_hw_constraints *constrs = &runtime->hw_constraints;
1177         struct snd_interval t;
1178         t.min = min;
1179         t.max = max;
1180         t.openmin = t.openmax = 0;
1181         t.integer = 0;
1182         return snd_interval_refine(constrs_interval(constrs, var), &t);
1183 }
1184
1185 EXPORT_SYMBOL(snd_pcm_hw_constraint_minmax);
1186
1187 static int snd_pcm_hw_rule_list(struct snd_pcm_hw_params *params,
1188                                 struct snd_pcm_hw_rule *rule)
1189 {
1190         struct snd_pcm_hw_constraint_list *list = rule->private;
1191         return snd_interval_list(hw_param_interval(params, rule->var), list->count, list->list, list->mask);
1192 }               
1193
1194
1195 /**
1196  * snd_pcm_hw_constraint_list - apply a list of constraints to a parameter
1197  * @runtime: PCM runtime instance
1198  * @cond: condition bits
1199  * @var: hw_params variable to apply the list constraint
1200  * @l: list
1201  * 
1202  * Apply the list of constraints to an interval parameter.
1203  */
1204 int snd_pcm_hw_constraint_list(struct snd_pcm_runtime *runtime,
1205                                unsigned int cond,
1206                                snd_pcm_hw_param_t var,
1207                                struct snd_pcm_hw_constraint_list *l)
1208 {
1209         return snd_pcm_hw_rule_add(runtime, cond, var,
1210                                    snd_pcm_hw_rule_list, l,
1211                                    var, -1);
1212 }
1213
1214 EXPORT_SYMBOL(snd_pcm_hw_constraint_list);
1215
1216 static int snd_pcm_hw_rule_ratnums(struct snd_pcm_hw_params *params,
1217                                    struct snd_pcm_hw_rule *rule)
1218 {
1219         struct snd_pcm_hw_constraint_ratnums *r = rule->private;
1220         unsigned int num = 0, den = 0;
1221         int err;
1222         err = snd_interval_ratnum(hw_param_interval(params, rule->var),
1223                                   r->nrats, r->rats, &num, &den);
1224         if (err >= 0 && den && rule->var == SNDRV_PCM_HW_PARAM_RATE) {
1225                 params->rate_num = num;
1226                 params->rate_den = den;
1227         }
1228         return err;
1229 }
1230
1231 /**
1232  * snd_pcm_hw_constraint_ratnums - apply ratnums constraint to a parameter
1233  * @runtime: PCM runtime instance
1234  * @cond: condition bits
1235  * @var: hw_params variable to apply the ratnums constraint
1236  * @r: struct snd_ratnums constriants
1237  */
1238 int snd_pcm_hw_constraint_ratnums(struct snd_pcm_runtime *runtime, 
1239                                   unsigned int cond,
1240                                   snd_pcm_hw_param_t var,
1241                                   struct snd_pcm_hw_constraint_ratnums *r)
1242 {
1243         return snd_pcm_hw_rule_add(runtime, cond, var,
1244                                    snd_pcm_hw_rule_ratnums, r,
1245                                    var, -1);
1246 }
1247
1248 EXPORT_SYMBOL(snd_pcm_hw_constraint_ratnums);
1249
1250 static int snd_pcm_hw_rule_ratdens(struct snd_pcm_hw_params *params,
1251                                    struct snd_pcm_hw_rule *rule)
1252 {
1253         struct snd_pcm_hw_constraint_ratdens *r = rule->private;
1254         unsigned int num = 0, den = 0;
1255         int err = snd_interval_ratden(hw_param_interval(params, rule->var),
1256                                   r->nrats, r->rats, &num, &den);
1257         if (err >= 0 && den && rule->var == SNDRV_PCM_HW_PARAM_RATE) {
1258                 params->rate_num = num;
1259                 params->rate_den = den;
1260         }
1261         return err;
1262 }
1263
1264 /**
1265  * snd_pcm_hw_constraint_ratdens - apply ratdens constraint to a parameter
1266  * @runtime: PCM runtime instance
1267  * @cond: condition bits
1268  * @var: hw_params variable to apply the ratdens constraint
1269  * @r: struct snd_ratdens constriants
1270  */
1271 int snd_pcm_hw_constraint_ratdens(struct snd_pcm_runtime *runtime, 
1272                                   unsigned int cond,
1273                                   snd_pcm_hw_param_t var,
1274                                   struct snd_pcm_hw_constraint_ratdens *r)
1275 {
1276         return snd_pcm_hw_rule_add(runtime, cond, var,
1277                                    snd_pcm_hw_rule_ratdens, r,
1278                                    var, -1);
1279 }
1280
1281 EXPORT_SYMBOL(snd_pcm_hw_constraint_ratdens);
1282
1283 static int snd_pcm_hw_rule_msbits(struct snd_pcm_hw_params *params,
1284                                   struct snd_pcm_hw_rule *rule)
1285 {
1286         unsigned int l = (unsigned long) rule->private;
1287         int width = l & 0xffff;
1288         unsigned int msbits = l >> 16;
1289         struct snd_interval *i = hw_param_interval(params, SNDRV_PCM_HW_PARAM_SAMPLE_BITS);
1290         if (snd_interval_single(i) && snd_interval_value(i) == width)
1291                 params->msbits = msbits;
1292         return 0;
1293 }
1294
1295 /**
1296  * snd_pcm_hw_constraint_msbits - add a hw constraint msbits rule
1297  * @runtime: PCM runtime instance
1298  * @cond: condition bits
1299  * @width: sample bits width
1300  * @msbits: msbits width
1301  */
1302 int snd_pcm_hw_constraint_msbits(struct snd_pcm_runtime *runtime, 
1303                                  unsigned int cond,
1304                                  unsigned int width,
1305                                  unsigned int msbits)
1306 {
1307         unsigned long l = (msbits << 16) | width;
1308         return snd_pcm_hw_rule_add(runtime, cond, -1,
1309                                     snd_pcm_hw_rule_msbits,
1310                                     (void*) l,
1311                                     SNDRV_PCM_HW_PARAM_SAMPLE_BITS, -1);
1312 }
1313
1314 EXPORT_SYMBOL(snd_pcm_hw_constraint_msbits);
1315
1316 static int snd_pcm_hw_rule_step(struct snd_pcm_hw_params *params,
1317                                 struct snd_pcm_hw_rule *rule)
1318 {
1319         unsigned long step = (unsigned long) rule->private;
1320         return snd_interval_step(hw_param_interval(params, rule->var), 0, step);
1321 }
1322
1323 /**
1324  * snd_pcm_hw_constraint_step - add a hw constraint step rule
1325  * @runtime: PCM runtime instance
1326  * @cond: condition bits
1327  * @var: hw_params variable to apply the step constraint
1328  * @step: step size
1329  */
1330 int snd_pcm_hw_constraint_step(struct snd_pcm_runtime *runtime,
1331                                unsigned int cond,
1332                                snd_pcm_hw_param_t var,
1333                                unsigned long step)
1334 {
1335         return snd_pcm_hw_rule_add(runtime, cond, var, 
1336                                    snd_pcm_hw_rule_step, (void *) step,
1337                                    var, -1);
1338 }
1339
1340 EXPORT_SYMBOL(snd_pcm_hw_constraint_step);
1341
1342 static int snd_pcm_hw_rule_pow2(struct snd_pcm_hw_params *params, struct snd_pcm_hw_rule *rule)
1343 {
1344         static unsigned int pow2_sizes[] = {
1345                 1<<0, 1<<1, 1<<2, 1<<3, 1<<4, 1<<5, 1<<6, 1<<7,
1346                 1<<8, 1<<9, 1<<10, 1<<11, 1<<12, 1<<13, 1<<14, 1<<15,
1347                 1<<16, 1<<17, 1<<18, 1<<19, 1<<20, 1<<21, 1<<22, 1<<23,
1348                 1<<24, 1<<25, 1<<26, 1<<27, 1<<28, 1<<29, 1<<30
1349         };
1350         return snd_interval_list(hw_param_interval(params, rule->var),
1351                                  ARRAY_SIZE(pow2_sizes), pow2_sizes, 0);
1352 }               
1353
1354 /**
1355  * snd_pcm_hw_constraint_pow2 - add a hw constraint power-of-2 rule
1356  * @runtime: PCM runtime instance
1357  * @cond: condition bits
1358  * @var: hw_params variable to apply the power-of-2 constraint
1359  */
1360 int snd_pcm_hw_constraint_pow2(struct snd_pcm_runtime *runtime,
1361                                unsigned int cond,
1362                                snd_pcm_hw_param_t var)
1363 {
1364         return snd_pcm_hw_rule_add(runtime, cond, var, 
1365                                    snd_pcm_hw_rule_pow2, NULL,
1366                                    var, -1);
1367 }
1368
1369 EXPORT_SYMBOL(snd_pcm_hw_constraint_pow2);
1370
1371 static void _snd_pcm_hw_param_any(struct snd_pcm_hw_params *params,
1372                                   snd_pcm_hw_param_t var)
1373 {
1374         if (hw_is_mask(var)) {
1375                 snd_mask_any(hw_param_mask(params, var));
1376                 params->cmask |= 1 << var;
1377                 params->rmask |= 1 << var;
1378                 return;
1379         }
1380         if (hw_is_interval(var)) {
1381                 snd_interval_any(hw_param_interval(params, var));
1382                 params->cmask |= 1 << var;
1383                 params->rmask |= 1 << var;
1384                 return;
1385         }
1386         snd_BUG();
1387 }
1388
1389 void _snd_pcm_hw_params_any(struct snd_pcm_hw_params *params)
1390 {
1391         unsigned int k;
1392         memset(params, 0, sizeof(*params));
1393         for (k = SNDRV_PCM_HW_PARAM_FIRST_MASK; k <= SNDRV_PCM_HW_PARAM_LAST_MASK; k++)
1394                 _snd_pcm_hw_param_any(params, k);
1395         for (k = SNDRV_PCM_HW_PARAM_FIRST_INTERVAL; k <= SNDRV_PCM_HW_PARAM_LAST_INTERVAL; k++)
1396                 _snd_pcm_hw_param_any(params, k);
1397         params->info = ~0U;
1398 }
1399
1400 EXPORT_SYMBOL(_snd_pcm_hw_params_any);
1401
1402 /**
1403  * snd_pcm_hw_param_value - return @params field @var value
1404  * @params: the hw_params instance
1405  * @var: parameter to retrieve
1406  * @dir: pointer to the direction (-1,0,1) or %NULL
1407  *
1408  * Return the value for field @var if it's fixed in configuration space
1409  * defined by @params. Return -%EINVAL otherwise.
1410  */
1411 int snd_pcm_hw_param_value(const struct snd_pcm_hw_params *params,
1412                            snd_pcm_hw_param_t var, int *dir)
1413 {
1414         if (hw_is_mask(var)) {
1415                 const struct snd_mask *mask = hw_param_mask_c(params, var);
1416                 if (!snd_mask_single(mask))
1417                         return -EINVAL;
1418                 if (dir)
1419                         *dir = 0;
1420                 return snd_mask_value(mask);
1421         }
1422         if (hw_is_interval(var)) {
1423                 const struct snd_interval *i = hw_param_interval_c(params, var);
1424                 if (!snd_interval_single(i))
1425                         return -EINVAL;
1426                 if (dir)
1427                         *dir = i->openmin;
1428                 return snd_interval_value(i);
1429         }
1430         return -EINVAL;
1431 }
1432
1433 EXPORT_SYMBOL(snd_pcm_hw_param_value);
1434
1435 void _snd_pcm_hw_param_setempty(struct snd_pcm_hw_params *params,
1436                                 snd_pcm_hw_param_t var)
1437 {
1438         if (hw_is_mask(var)) {
1439                 snd_mask_none(hw_param_mask(params, var));
1440                 params->cmask |= 1 << var;
1441                 params->rmask |= 1 << var;
1442         } else if (hw_is_interval(var)) {
1443                 snd_interval_none(hw_param_interval(params, var));
1444                 params->cmask |= 1 << var;
1445                 params->rmask |= 1 << var;
1446         } else {
1447                 snd_BUG();
1448         }
1449 }
1450
1451 EXPORT_SYMBOL(_snd_pcm_hw_param_setempty);
1452
1453 static int _snd_pcm_hw_param_first(struct snd_pcm_hw_params *params,
1454                                    snd_pcm_hw_param_t var)
1455 {
1456         int changed;
1457         if (hw_is_mask(var))
1458                 changed = snd_mask_refine_first(hw_param_mask(params, var));
1459         else if (hw_is_interval(var))
1460                 changed = snd_interval_refine_first(hw_param_interval(params, var));
1461         else
1462                 return -EINVAL;
1463         if (changed) {
1464                 params->cmask |= 1 << var;
1465                 params->rmask |= 1 << var;
1466         }
1467         return changed;
1468 }
1469
1470
1471 /**
1472  * snd_pcm_hw_param_first - refine config space and return minimum value
1473  * @pcm: PCM instance
1474  * @params: the hw_params instance
1475  * @var: parameter to retrieve
1476  * @dir: pointer to the direction (-1,0,1) or %NULL
1477  *
1478  * Inside configuration space defined by @params remove from @var all
1479  * values > minimum. Reduce configuration space accordingly.
1480  * Return the minimum.
1481  */
1482 int snd_pcm_hw_param_first(struct snd_pcm_substream *pcm, 
1483                            struct snd_pcm_hw_params *params, 
1484                            snd_pcm_hw_param_t var, int *dir)
1485 {
1486         int changed = _snd_pcm_hw_param_first(params, var);
1487         if (changed < 0)
1488                 return changed;
1489         if (params->rmask) {
1490                 int err = snd_pcm_hw_refine(pcm, params);
1491                 if (snd_BUG_ON(err < 0))
1492                         return err;
1493         }
1494         return snd_pcm_hw_param_value(params, var, dir);
1495 }
1496
1497 EXPORT_SYMBOL(snd_pcm_hw_param_first);
1498
1499 static int _snd_pcm_hw_param_last(struct snd_pcm_hw_params *params,
1500                                   snd_pcm_hw_param_t var)
1501 {
1502         int changed;
1503         if (hw_is_mask(var))
1504                 changed = snd_mask_refine_last(hw_param_mask(params, var));
1505         else if (hw_is_interval(var))
1506                 changed = snd_interval_refine_last(hw_param_interval(params, var));
1507         else
1508                 return -EINVAL;
1509         if (changed) {
1510                 params->cmask |= 1 << var;
1511                 params->rmask |= 1 << var;
1512         }
1513         return changed;
1514 }
1515
1516
1517 /**
1518  * snd_pcm_hw_param_last - refine config space and return maximum value
1519  * @pcm: PCM instance
1520  * @params: the hw_params instance
1521  * @var: parameter to retrieve
1522  * @dir: pointer to the direction (-1,0,1) or %NULL
1523  *
1524  * Inside configuration space defined by @params remove from @var all
1525  * values < maximum. Reduce configuration space accordingly.
1526  * Return the maximum.
1527  */
1528 int snd_pcm_hw_param_last(struct snd_pcm_substream *pcm, 
1529                           struct snd_pcm_hw_params *params,
1530                           snd_pcm_hw_param_t var, int *dir)
1531 {
1532         int changed = _snd_pcm_hw_param_last(params, var);
1533         if (changed < 0)
1534                 return changed;
1535         if (params->rmask) {
1536                 int err = snd_pcm_hw_refine(pcm, params);
1537                 if (snd_BUG_ON(err < 0))
1538                         return err;
1539         }
1540         return snd_pcm_hw_param_value(params, var, dir);
1541 }
1542
1543 EXPORT_SYMBOL(snd_pcm_hw_param_last);
1544
1545 /**
1546  * snd_pcm_hw_param_choose - choose a configuration defined by @params
1547  * @pcm: PCM instance
1548  * @params: the hw_params instance
1549  *
1550  * Choose one configuration from configuration space defined by @params.
1551  * The configuration chosen is that obtained fixing in this order:
1552  * first access, first format, first subformat, min channels,
1553  * min rate, min period time, max buffer size, min tick time
1554  */
1555 int snd_pcm_hw_params_choose(struct snd_pcm_substream *pcm,
1556                              struct snd_pcm_hw_params *params)
1557 {
1558         static int vars[] = {
1559                 SNDRV_PCM_HW_PARAM_ACCESS,
1560                 SNDRV_PCM_HW_PARAM_FORMAT,
1561                 SNDRV_PCM_HW_PARAM_SUBFORMAT,
1562                 SNDRV_PCM_HW_PARAM_CHANNELS,
1563                 SNDRV_PCM_HW_PARAM_RATE,
1564                 SNDRV_PCM_HW_PARAM_PERIOD_TIME,
1565                 SNDRV_PCM_HW_PARAM_BUFFER_SIZE,
1566                 SNDRV_PCM_HW_PARAM_TICK_TIME,
1567                 -1
1568         };
1569         int err, *v;
1570
1571         for (v = vars; *v != -1; v++) {
1572                 if (*v != SNDRV_PCM_HW_PARAM_BUFFER_SIZE)
1573                         err = snd_pcm_hw_param_first(pcm, params, *v, NULL);
1574                 else
1575                         err = snd_pcm_hw_param_last(pcm, params, *v, NULL);
1576                 if (snd_BUG_ON(err < 0))
1577                         return err;
1578         }
1579         return 0;
1580 }
1581
1582 static int snd_pcm_lib_ioctl_reset(struct snd_pcm_substream *substream,
1583                                    void *arg)
1584 {
1585         struct snd_pcm_runtime *runtime = substream->runtime;
1586         unsigned long flags;
1587         snd_pcm_stream_lock_irqsave(substream, flags);
1588         if (snd_pcm_running(substream) &&
1589             snd_pcm_update_hw_ptr(substream) >= 0)
1590                 runtime->status->hw_ptr %= runtime->buffer_size;
1591         else
1592                 runtime->status->hw_ptr = 0;
1593         snd_pcm_stream_unlock_irqrestore(substream, flags);
1594         return 0;
1595 }
1596
1597 static int snd_pcm_lib_ioctl_channel_info(struct snd_pcm_substream *substream,
1598                                           void *arg)
1599 {
1600         struct snd_pcm_channel_info *info = arg;
1601         struct snd_pcm_runtime *runtime = substream->runtime;
1602         int width;
1603         if (!(runtime->info & SNDRV_PCM_INFO_MMAP)) {
1604                 info->offset = -1;
1605                 return 0;
1606         }
1607         width = snd_pcm_format_physical_width(runtime->format);
1608         if (width < 0)
1609                 return width;
1610         info->offset = 0;
1611         switch (runtime->access) {
1612         case SNDRV_PCM_ACCESS_MMAP_INTERLEAVED:
1613         case SNDRV_PCM_ACCESS_RW_INTERLEAVED:
1614                 info->first = info->channel * width;
1615                 info->step = runtime->channels * width;
1616                 break;
1617         case SNDRV_PCM_ACCESS_MMAP_NONINTERLEAVED:
1618         case SNDRV_PCM_ACCESS_RW_NONINTERLEAVED:
1619         {
1620                 size_t size = runtime->dma_bytes / runtime->channels;
1621                 info->first = info->channel * size * 8;
1622                 info->step = width;
1623                 break;
1624         }
1625         default:
1626                 snd_BUG();
1627                 break;
1628         }
1629         return 0;
1630 }
1631
1632 static int snd_pcm_lib_ioctl_fifo_size(struct snd_pcm_substream *substream,
1633                                        void *arg)
1634 {
1635         struct snd_pcm_hw_params *params = arg;
1636         snd_pcm_format_t format;
1637         int channels, width;
1638
1639         params->fifo_size = substream->runtime->hw.fifo_size;
1640         if (!(substream->runtime->hw.info & SNDRV_PCM_INFO_FIFO_IN_FRAMES)) {
1641                 format = params_format(params);
1642                 channels = params_channels(params);
1643                 width = snd_pcm_format_physical_width(format);
1644                 params->fifo_size /= width * channels;
1645         }
1646         return 0;
1647 }
1648
1649 /**
1650  * snd_pcm_lib_ioctl - a generic PCM ioctl callback
1651  * @substream: the pcm substream instance
1652  * @cmd: ioctl command
1653  * @arg: ioctl argument
1654  *
1655  * Processes the generic ioctl commands for PCM.
1656  * Can be passed as the ioctl callback for PCM ops.
1657  *
1658  * Returns zero if successful, or a negative error code on failure.
1659  */
1660 int snd_pcm_lib_ioctl(struct snd_pcm_substream *substream,
1661                       unsigned int cmd, void *arg)
1662 {
1663         switch (cmd) {
1664         case SNDRV_PCM_IOCTL1_INFO:
1665                 return 0;
1666         case SNDRV_PCM_IOCTL1_RESET:
1667                 return snd_pcm_lib_ioctl_reset(substream, arg);
1668         case SNDRV_PCM_IOCTL1_CHANNEL_INFO:
1669                 return snd_pcm_lib_ioctl_channel_info(substream, arg);
1670         case SNDRV_PCM_IOCTL1_FIFO_SIZE:
1671                 return snd_pcm_lib_ioctl_fifo_size(substream, arg);
1672         }
1673         return -ENXIO;
1674 }
1675
1676 EXPORT_SYMBOL(snd_pcm_lib_ioctl);
1677
1678 /**
1679  * snd_pcm_period_elapsed - update the pcm status for the next period
1680  * @substream: the pcm substream instance
1681  *
1682  * This function is called from the interrupt handler when the
1683  * PCM has processed the period size.  It will update the current
1684  * pointer, wake up sleepers, etc.
1685  *
1686  * Even if more than one periods have elapsed since the last call, you
1687  * have to call this only once.
1688  */
1689 void snd_pcm_period_elapsed(struct snd_pcm_substream *substream)
1690 {
1691         struct snd_pcm_runtime *runtime;
1692         unsigned long flags;
1693
1694         if (PCM_RUNTIME_CHECK(substream))
1695                 return;
1696         runtime = substream->runtime;
1697
1698         if (runtime->transfer_ack_begin)
1699                 runtime->transfer_ack_begin(substream);
1700
1701         snd_pcm_stream_lock_irqsave(substream, flags);
1702         if (!snd_pcm_running(substream) ||
1703             snd_pcm_update_hw_ptr0(substream, 1) < 0)
1704                 goto _end;
1705
1706         if (substream->timer_running)
1707                 snd_timer_interrupt(substream->timer, 1);
1708  _end:
1709         snd_pcm_stream_unlock_irqrestore(substream, flags);
1710         if (runtime->transfer_ack_end)
1711                 runtime->transfer_ack_end(substream);
1712         kill_fasync(&runtime->fasync, SIGIO, POLL_IN);
1713 }
1714
1715 EXPORT_SYMBOL(snd_pcm_period_elapsed);
1716
1717 /*
1718  * Wait until avail_min data becomes available
1719  * Returns a negative error code if any error occurs during operation.
1720  * The available space is stored on availp.  When err = 0 and avail = 0
1721  * on the capture stream, it indicates the stream is in DRAINING state.
1722  */
1723 static int wait_for_avail(struct snd_pcm_substream *substream,
1724                               snd_pcm_uframes_t *availp)
1725 {
1726         struct snd_pcm_runtime *runtime = substream->runtime;
1727         int is_playback = substream->stream == SNDRV_PCM_STREAM_PLAYBACK;
1728         wait_queue_t wait;
1729         int err = 0;
1730         snd_pcm_uframes_t avail = 0;
1731         long tout;
1732
1733         init_waitqueue_entry(&wait, current);
1734         add_wait_queue(&runtime->tsleep, &wait);
1735         for (;;) {
1736                 if (signal_pending(current)) {
1737                         err = -ERESTARTSYS;
1738                         break;
1739                 }
1740                 set_current_state(TASK_INTERRUPTIBLE);
1741                 snd_pcm_stream_unlock_irq(substream);
1742                 tout = schedule_timeout(msecs_to_jiffies(10000));
1743                 snd_pcm_stream_lock_irq(substream);
1744                 switch (runtime->status->state) {
1745                 case SNDRV_PCM_STATE_SUSPENDED:
1746                         err = -ESTRPIPE;
1747                         goto _endloop;
1748                 case SNDRV_PCM_STATE_XRUN:
1749                         err = -EPIPE;
1750                         goto _endloop;
1751                 case SNDRV_PCM_STATE_DRAINING:
1752                         if (is_playback)
1753                                 err = -EPIPE;
1754                         else 
1755                                 avail = 0; /* indicate draining */
1756                         goto _endloop;
1757                 case SNDRV_PCM_STATE_OPEN:
1758                 case SNDRV_PCM_STATE_SETUP:
1759                 case SNDRV_PCM_STATE_DISCONNECTED:
1760                         err = -EBADFD;
1761                         goto _endloop;
1762                 }
1763                 if (!tout) {
1764                         snd_printd("%s write error (DMA or IRQ trouble?)\n",
1765                                    is_playback ? "playback" : "capture");
1766                         err = -EIO;
1767                         break;
1768                 }
1769                 if (is_playback)
1770                         avail = snd_pcm_playback_avail(runtime);
1771                 else
1772                         avail = snd_pcm_capture_avail(runtime);
1773                 if (avail >= runtime->twake)
1774                         break;
1775         }
1776  _endloop:
1777         remove_wait_queue(&runtime->tsleep, &wait);
1778         *availp = avail;
1779         return err;
1780 }
1781         
1782 static int snd_pcm_lib_write_transfer(struct snd_pcm_substream *substream,
1783                                       unsigned int hwoff,
1784                                       unsigned long data, unsigned int off,
1785                                       snd_pcm_uframes_t frames)
1786 {
1787         struct snd_pcm_runtime *runtime = substream->runtime;
1788         int err;
1789         char __user *buf = (char __user *) data + frames_to_bytes(runtime, off);
1790         if (substream->ops->copy) {
1791                 if ((err = substream->ops->copy(substream, -1, hwoff, buf, frames)) < 0)
1792                         return err;
1793         } else {
1794                 char *hwbuf = runtime->dma_area + frames_to_bytes(runtime, hwoff);
1795                 if (copy_from_user(hwbuf, buf, frames_to_bytes(runtime, frames)))
1796                         return -EFAULT;
1797         }
1798         return 0;
1799 }
1800  
1801 typedef int (*transfer_f)(struct snd_pcm_substream *substream, unsigned int hwoff,
1802                           unsigned long data, unsigned int off,
1803                           snd_pcm_uframes_t size);
1804
1805 static snd_pcm_sframes_t snd_pcm_lib_write1(struct snd_pcm_substream *substream, 
1806                                             unsigned long data,
1807                                             snd_pcm_uframes_t size,
1808                                             int nonblock,
1809                                             transfer_f transfer)
1810 {
1811         struct snd_pcm_runtime *runtime = substream->runtime;
1812         snd_pcm_uframes_t xfer = 0;
1813         snd_pcm_uframes_t offset = 0;
1814         int err = 0;
1815
1816         if (size == 0)
1817                 return 0;
1818
1819         snd_pcm_stream_lock_irq(substream);
1820         switch (runtime->status->state) {
1821         case SNDRV_PCM_STATE_PREPARED:
1822         case SNDRV_PCM_STATE_RUNNING:
1823         case SNDRV_PCM_STATE_PAUSED:
1824                 break;
1825         case SNDRV_PCM_STATE_XRUN:
1826                 err = -EPIPE;
1827                 goto _end_unlock;
1828         case SNDRV_PCM_STATE_SUSPENDED:
1829                 err = -ESTRPIPE;
1830                 goto _end_unlock;
1831         default:
1832                 err = -EBADFD;
1833                 goto _end_unlock;
1834         }
1835
1836         runtime->twake = runtime->control->avail_min ? : 1;
1837         while (size > 0) {
1838                 snd_pcm_uframes_t frames, appl_ptr, appl_ofs;
1839                 snd_pcm_uframes_t avail;
1840                 snd_pcm_uframes_t cont;
1841                 if (runtime->status->state == SNDRV_PCM_STATE_RUNNING)
1842                         snd_pcm_update_hw_ptr(substream);
1843                 avail = snd_pcm_playback_avail(runtime);
1844                 if (!avail) {
1845                         if (nonblock) {
1846                                 err = -EAGAIN;
1847                                 goto _end_unlock;
1848                         }
1849                         runtime->twake = min_t(snd_pcm_uframes_t, size,
1850                                         runtime->control->avail_min ? : 1);
1851                         err = wait_for_avail(substream, &avail);
1852                         if (err < 0)
1853                                 goto _end_unlock;
1854                 }
1855                 frames = size > avail ? avail : size;
1856                 cont = runtime->buffer_size - runtime->control->appl_ptr % runtime->buffer_size;
1857                 if (frames > cont)
1858                         frames = cont;
1859                 if (snd_BUG_ON(!frames)) {
1860                         runtime->twake = 0;
1861                         snd_pcm_stream_unlock_irq(substream);
1862                         return -EINVAL;
1863                 }
1864                 appl_ptr = runtime->control->appl_ptr;
1865                 appl_ofs = appl_ptr % runtime->buffer_size;
1866                 snd_pcm_stream_unlock_irq(substream);
1867                 err = transfer(substream, appl_ofs, data, offset, frames);
1868                 snd_pcm_stream_lock_irq(substream);
1869                 if (err < 0)
1870                         goto _end_unlock;
1871                 switch (runtime->status->state) {
1872                 case SNDRV_PCM_STATE_XRUN:
1873                         err = -EPIPE;
1874                         goto _end_unlock;
1875                 case SNDRV_PCM_STATE_SUSPENDED:
1876                         err = -ESTRPIPE;
1877                         goto _end_unlock;
1878                 default:
1879                         break;
1880                 }
1881                 appl_ptr += frames;
1882                 if (appl_ptr >= runtime->boundary)
1883                         appl_ptr -= runtime->boundary;
1884                 runtime->control->appl_ptr = appl_ptr;
1885                 if (substream->ops->ack)
1886                         substream->ops->ack(substream);
1887
1888                 offset += frames;
1889                 size -= frames;
1890                 xfer += frames;
1891                 if (runtime->status->state == SNDRV_PCM_STATE_PREPARED &&
1892                     snd_pcm_playback_hw_avail(runtime) >= (snd_pcm_sframes_t)runtime->start_threshold) {
1893                         err = snd_pcm_start(substream);
1894                         if (err < 0)
1895                                 goto _end_unlock;
1896                 }
1897         }
1898  _end_unlock:
1899         runtime->twake = 0;
1900         if (xfer > 0 && err >= 0)
1901                 snd_pcm_update_state(substream, runtime);
1902         snd_pcm_stream_unlock_irq(substream);
1903         return xfer > 0 ? (snd_pcm_sframes_t)xfer : err;
1904 }
1905
1906 /* sanity-check for read/write methods */
1907 static int pcm_sanity_check(struct snd_pcm_substream *substream)
1908 {
1909         struct snd_pcm_runtime *runtime;
1910         if (PCM_RUNTIME_CHECK(substream))
1911                 return -ENXIO;
1912         runtime = substream->runtime;
1913         if (snd_BUG_ON(!substream->ops->copy && !runtime->dma_area))
1914                 return -EINVAL;
1915         if (runtime->status->state == SNDRV_PCM_STATE_OPEN)
1916                 return -EBADFD;
1917         return 0;
1918 }
1919
1920 snd_pcm_sframes_t snd_pcm_lib_write(struct snd_pcm_substream *substream, const void __user *buf, snd_pcm_uframes_t size)
1921 {
1922         struct snd_pcm_runtime *runtime;
1923         int nonblock;
1924         int err;
1925
1926         err = pcm_sanity_check(substream);
1927         if (err < 0)
1928                 return err;
1929         runtime = substream->runtime;
1930         nonblock = !!(substream->f_flags & O_NONBLOCK);
1931
1932         if (runtime->access != SNDRV_PCM_ACCESS_RW_INTERLEAVED &&
1933             runtime->channels > 1)
1934                 return -EINVAL;
1935         return snd_pcm_lib_write1(substream, (unsigned long)buf, size, nonblock,
1936                                   snd_pcm_lib_write_transfer);
1937 }
1938
1939 EXPORT_SYMBOL(snd_pcm_lib_write);
1940
1941 static int snd_pcm_lib_writev_transfer(struct snd_pcm_substream *substream,
1942                                        unsigned int hwoff,
1943                                        unsigned long data, unsigned int off,
1944                                        snd_pcm_uframes_t frames)
1945 {
1946         struct snd_pcm_runtime *runtime = substream->runtime;
1947         int err;
1948         void __user **bufs = (void __user **)data;
1949         int channels = runtime->channels;
1950         int c;
1951         if (substream->ops->copy) {
1952                 if (snd_BUG_ON(!substream->ops->silence))
1953                         return -EINVAL;
1954                 for (c = 0; c < channels; ++c, ++bufs) {
1955                         if (*bufs == NULL) {
1956                                 if ((err = substream->ops->silence(substream, c, hwoff, frames)) < 0)
1957                                         return err;
1958                         } else {
1959                                 char __user *buf = *bufs + samples_to_bytes(runtime, off);
1960                                 if ((err = substream->ops->copy(substream, c, hwoff, buf, frames)) < 0)
1961                                         return err;
1962                         }
1963                 }
1964         } else {
1965                 /* default transfer behaviour */
1966                 size_t dma_csize = runtime->dma_bytes / channels;
1967                 for (c = 0; c < channels; ++c, ++bufs) {
1968                         char *hwbuf = runtime->dma_area + (c * dma_csize) + samples_to_bytes(runtime, hwoff);
1969                         if (*bufs == NULL) {
1970                                 snd_pcm_format_set_silence(runtime->format, hwbuf, frames);
1971                         } else {
1972                                 char __user *buf = *bufs + samples_to_bytes(runtime, off);
1973                                 if (copy_from_user(hwbuf, buf, samples_to_bytes(runtime, frames)))
1974                                         return -EFAULT;
1975                         }
1976                 }
1977         }
1978         return 0;
1979 }
1980  
1981 snd_pcm_sframes_t snd_pcm_lib_writev(struct snd_pcm_substream *substream,
1982                                      void __user **bufs,
1983                                      snd_pcm_uframes_t frames)
1984 {
1985         struct snd_pcm_runtime *runtime;
1986         int nonblock;
1987         int err;
1988
1989         err = pcm_sanity_check(substream);
1990         if (err < 0)
1991                 return err;
1992         runtime = substream->runtime;
1993         nonblock = !!(substream->f_flags & O_NONBLOCK);
1994
1995         if (runtime->access != SNDRV_PCM_ACCESS_RW_NONINTERLEAVED)
1996                 return -EINVAL;
1997         return snd_pcm_lib_write1(substream, (unsigned long)bufs, frames,
1998                                   nonblock, snd_pcm_lib_writev_transfer);
1999 }
2000
2001 EXPORT_SYMBOL(snd_pcm_lib_writev);
2002
2003 static int snd_pcm_lib_read_transfer(struct snd_pcm_substream *substream, 
2004                                      unsigned int hwoff,
2005                                      unsigned long data, unsigned int off,
2006                                      snd_pcm_uframes_t frames)
2007 {
2008         struct snd_pcm_runtime *runtime = substream->runtime;
2009         int err;
2010         char __user *buf = (char __user *) data + frames_to_bytes(runtime, off);
2011         if (substream->ops->copy) {
2012                 if ((err = substream->ops->copy(substream, -1, hwoff, buf, frames)) < 0)
2013                         return err;
2014         } else {
2015                 char *hwbuf = runtime->dma_area + frames_to_bytes(runtime, hwoff);
2016                 if (copy_to_user(buf, hwbuf, frames_to_bytes(runtime, frames)))
2017                         return -EFAULT;
2018         }
2019         return 0;
2020 }
2021
2022 static snd_pcm_sframes_t snd_pcm_lib_read1(struct snd_pcm_substream *substream,
2023                                            unsigned long data,
2024                                            snd_pcm_uframes_t size,
2025                                            int nonblock,
2026                                            transfer_f transfer)
2027 {
2028         struct snd_pcm_runtime *runtime = substream->runtime;
2029         snd_pcm_uframes_t xfer = 0;
2030         snd_pcm_uframes_t offset = 0;
2031         int err = 0;
2032
2033         if (size == 0)
2034                 return 0;
2035
2036         snd_pcm_stream_lock_irq(substream);
2037         switch (runtime->status->state) {
2038         case SNDRV_PCM_STATE_PREPARED:
2039                 if (size >= runtime->start_threshold) {
2040                         err = snd_pcm_start(substream);
2041                         if (err < 0)
2042                                 goto _end_unlock;
2043                 }
2044                 break;
2045         case SNDRV_PCM_STATE_DRAINING:
2046         case SNDRV_PCM_STATE_RUNNING:
2047         case SNDRV_PCM_STATE_PAUSED:
2048                 break;
2049         case SNDRV_PCM_STATE_XRUN:
2050                 err = -EPIPE;
2051                 goto _end_unlock;
2052         case SNDRV_PCM_STATE_SUSPENDED:
2053                 err = -ESTRPIPE;
2054                 goto _end_unlock;
2055         default:
2056                 err = -EBADFD;
2057                 goto _end_unlock;
2058         }
2059
2060         runtime->twake = runtime->control->avail_min ? : 1;
2061         while (size > 0) {
2062                 snd_pcm_uframes_t frames, appl_ptr, appl_ofs;
2063                 snd_pcm_uframes_t avail;
2064                 snd_pcm_uframes_t cont;
2065                 if (runtime->status->state == SNDRV_PCM_STATE_RUNNING)
2066                         snd_pcm_update_hw_ptr(substream);
2067                 avail = snd_pcm_capture_avail(runtime);
2068                 if (!avail) {
2069                         if (runtime->status->state ==
2070                             SNDRV_PCM_STATE_DRAINING) {
2071                                 snd_pcm_stop(substream, SNDRV_PCM_STATE_SETUP);
2072                                 goto _end_unlock;
2073                         }
2074                         if (nonblock) {
2075                                 err = -EAGAIN;
2076                                 goto _end_unlock;
2077                         }
2078                         runtime->twake = min_t(snd_pcm_uframes_t, size,
2079                                         runtime->control->avail_min ? : 1);
2080                         err = wait_for_avail(substream, &avail);
2081                         if (err < 0)
2082                                 goto _end_unlock;
2083                         if (!avail)
2084                                 continue; /* draining */
2085                 }
2086                 frames = size > avail ? avail : size;
2087                 cont = runtime->buffer_size - runtime->control->appl_ptr % runtime->buffer_size;
2088                 if (frames > cont)
2089                         frames = cont;
2090                 if (snd_BUG_ON(!frames)) {
2091                         runtime->twake = 0;
2092                         snd_pcm_stream_unlock_irq(substream);
2093                         return -EINVAL;
2094                 }
2095                 appl_ptr = runtime->control->appl_ptr;
2096                 appl_ofs = appl_ptr % runtime->buffer_size;
2097                 snd_pcm_stream_unlock_irq(substream);
2098                 err = transfer(substream, appl_ofs, data, offset, frames);
2099                 snd_pcm_stream_lock_irq(substream);
2100                 if (err < 0)
2101                         goto _end_unlock;
2102                 switch (runtime->status->state) {
2103                 case SNDRV_PCM_STATE_XRUN:
2104                         err = -EPIPE;
2105                         goto _end_unlock;
2106                 case SNDRV_PCM_STATE_SUSPENDED:
2107                         err = -ESTRPIPE;
2108                         goto _end_unlock;
2109                 default:
2110                         break;
2111                 }
2112                 appl_ptr += frames;
2113                 if (appl_ptr >= runtime->boundary)
2114                         appl_ptr -= runtime->boundary;
2115                 runtime->control->appl_ptr = appl_ptr;
2116                 if (substream->ops->ack)
2117                         substream->ops->ack(substream);
2118
2119                 offset += frames;
2120                 size -= frames;
2121                 xfer += frames;
2122         }
2123  _end_unlock:
2124         runtime->twake = 0;
2125         if (xfer > 0 && err >= 0)
2126                 snd_pcm_update_state(substream, runtime);
2127         snd_pcm_stream_unlock_irq(substream);
2128         return xfer > 0 ? (snd_pcm_sframes_t)xfer : err;
2129 }
2130
2131 snd_pcm_sframes_t snd_pcm_lib_read(struct snd_pcm_substream *substream, void __user *buf, snd_pcm_uframes_t size)
2132 {
2133         struct snd_pcm_runtime *runtime;
2134         int nonblock;
2135         int err;
2136         
2137         err = pcm_sanity_check(substream);
2138         if (err < 0)
2139                 return err;
2140         runtime = substream->runtime;
2141         nonblock = !!(substream->f_flags & O_NONBLOCK);
2142         if (runtime->access != SNDRV_PCM_ACCESS_RW_INTERLEAVED)
2143                 return -EINVAL;
2144         return snd_pcm_lib_read1(substream, (unsigned long)buf, size, nonblock, snd_pcm_lib_read_transfer);
2145 }
2146
2147 EXPORT_SYMBOL(snd_pcm_lib_read);
2148
2149 static int snd_pcm_lib_readv_transfer(struct snd_pcm_substream *substream,
2150                                       unsigned int hwoff,
2151                                       unsigned long data, unsigned int off,
2152                                       snd_pcm_uframes_t frames)
2153 {
2154         struct snd_pcm_runtime *runtime = substream->runtime;
2155         int err;
2156         void __user **bufs = (void __user **)data;
2157         int channels = runtime->channels;
2158         int c;
2159         if (substream->ops->copy) {
2160                 for (c = 0; c < channels; ++c, ++bufs) {
2161                         char __user *buf;
2162                         if (*bufs == NULL)
2163                                 continue;
2164                         buf = *bufs + samples_to_bytes(runtime, off);
2165                         if ((err = substream->ops->copy(substream, c, hwoff, buf, frames)) < 0)
2166                                 return err;
2167                 }
2168         } else {
2169                 snd_pcm_uframes_t dma_csize = runtime->dma_bytes / channels;
2170                 for (c = 0; c < channels; ++c, ++bufs) {
2171                         char *hwbuf;
2172                         char __user *buf;
2173                         if (*bufs == NULL)
2174                                 continue;
2175
2176                         hwbuf = runtime->dma_area + (c * dma_csize) + samples_to_bytes(runtime, hwoff);
2177                         buf = *bufs + samples_to_bytes(runtime, off);
2178                         if (copy_to_user(buf, hwbuf, samples_to_bytes(runtime, frames)))
2179                                 return -EFAULT;
2180                 }
2181         }
2182         return 0;
2183 }
2184  
2185 snd_pcm_sframes_t snd_pcm_lib_readv(struct snd_pcm_substream *substream,
2186                                     void __user **bufs,
2187                                     snd_pcm_uframes_t frames)
2188 {
2189         struct snd_pcm_runtime *runtime;
2190         int nonblock;
2191         int err;
2192
2193         err = pcm_sanity_check(substream);
2194         if (err < 0)
2195                 return err;
2196         runtime = substream->runtime;
2197         if (runtime->status->state == SNDRV_PCM_STATE_OPEN)
2198                 return -EBADFD;
2199
2200         nonblock = !!(substream->f_flags & O_NONBLOCK);
2201         if (runtime->access != SNDRV_PCM_ACCESS_RW_NONINTERLEAVED)
2202                 return -EINVAL;
2203         return snd_pcm_lib_read1(substream, (unsigned long)bufs, frames, nonblock, snd_pcm_lib_readv_transfer);
2204 }
2205
2206 EXPORT_SYMBOL(snd_pcm_lib_readv);