ALSA: asihpi - Control name updates
[firefly-linux-kernel-4.4.55.git] / sound / pci / asihpi / asihpi.c
1 /*
2  *  Asihpi soundcard
3  *  Copyright (c) by AudioScience Inc <alsa@audioscience.com>
4  *
5  *   This program is free software; you can redistribute it and/or modify
6  *   it under the terms of version 2 of the GNU General Public License as
7  *   published by the Free Software Foundation;
8  *
9  *   This program is distributed in the hope that it will be useful,
10  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
11  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  *   GNU General Public License for more details.
13  *
14  *   You should have received a copy of the GNU General Public License
15  *   along with this program; if not, write to the Free Software
16  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
17  *
18  *
19  *  The following is not a condition of use, merely a request:
20  *  If you modify this program, particularly if you fix errors, AudioScience Inc
21  *  would appreciate it if you grant us the right to use those modifications
22  *  for any purpose including commercial applications.
23  */
24
25 #include "hpi_internal.h"
26 #include "hpimsginit.h"
27 #include "hpioctl.h"
28
29 #include <linux/pci.h>
30 #include <linux/version.h>
31 #include <linux/init.h>
32 #include <linux/jiffies.h>
33 #include <linux/slab.h>
34 #include <linux/time.h>
35 #include <linux/wait.h>
36 #include <sound/core.h>
37 #include <sound/control.h>
38 #include <sound/pcm.h>
39 #include <sound/pcm_params.h>
40 #include <sound/info.h>
41 #include <sound/initval.h>
42 #include <sound/tlv.h>
43 #include <sound/hwdep.h>
44
45
46 MODULE_LICENSE("GPL");
47 MODULE_AUTHOR("AudioScience inc. <support@audioscience.com>");
48 MODULE_DESCRIPTION("AudioScience ALSA ASI5000 ASI6000 ASI87xx ASI89xx");
49
50 #if defined CONFIG_SND_DEBUG
51 /* copied from pcm_lib.c, hope later patch will make that version public
52 and this copy can be removed */
53 static inline void
54 snd_pcm_debug_name(struct snd_pcm_substream *substream, char *buf, size_t size)
55 {
56         snprintf(buf, size, "pcmC%dD%d%c:%d",
57                  substream->pcm->card->number,
58                  substream->pcm->device,
59                  substream->stream ? 'c' : 'p',
60                  substream->number);
61 }
62 #else
63 static inline void
64 snd_pcm_debug_name(struct snd_pcm_substream *substream, char *buf, size_t size)
65 {
66         *buf = 0;
67 }
68 #endif
69
70 #if defined CONFIG_SND_DEBUG_VERBOSE
71 /**
72  * snd_printddd - very verbose debug printk
73  * @format: format string
74  *
75  * Works like snd_printk() for debugging purposes.
76  * Ignored when CONFIG_SND_DEBUG_VERBOSE is not set.
77  * Must set snd module debug parameter to 3 to enable at runtime.
78  */
79 #define snd_printddd(format, args...) \
80         __snd_printk(3, __FILE__, __LINE__, format, ##args)
81 #else
82 #define snd_printddd(format, args...) do { } while (0)
83 #endif
84
85 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* index 0-MAX */
86 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
87 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
88 static int enable_hpi_hwdep = 1;
89
90 module_param_array(index, int, NULL, S_IRUGO);
91 MODULE_PARM_DESC(index, "ALSA index value for AudioScience soundcard.");
92
93 module_param_array(id, charp, NULL, S_IRUGO);
94 MODULE_PARM_DESC(id, "ALSA ID string for AudioScience soundcard.");
95
96 module_param_array(enable, bool, NULL, S_IRUGO);
97 MODULE_PARM_DESC(enable, "ALSA enable AudioScience soundcard.");
98
99 module_param(enable_hpi_hwdep, bool, S_IRUGO|S_IWUSR);
100 MODULE_PARM_DESC(enable_hpi_hwdep,
101                 "ALSA enable HPI hwdep for AudioScience soundcard ");
102
103 /* identify driver */
104 #ifdef KERNEL_ALSA_BUILD
105 static char *build_info = "Built using headers from kernel source";
106 module_param(build_info, charp, S_IRUGO);
107 MODULE_PARM_DESC(build_info, "built using headers from kernel source");
108 #else
109 static char *build_info = "Built within ALSA source";
110 module_param(build_info, charp, S_IRUGO);
111 MODULE_PARM_DESC(build_info, "built within ALSA source");
112 #endif
113
114 /* set to 1 to dump every control from adapter to log */
115 static const int mixer_dump;
116
117 #define DEFAULT_SAMPLERATE 44100
118 static int adapter_fs = DEFAULT_SAMPLERATE;
119
120 /* defaults */
121 #define PERIODS_MIN 2
122 #define PERIOD_BYTES_MIN  2048
123 #define BUFFER_BYTES_MAX (512 * 1024)
124
125 #define MAX_CLOCKSOURCES (HPI_SAMPLECLOCK_SOURCE_LAST + 1 + 7)
126
127 struct clk_source {
128         int source;
129         int index;
130         char *name;
131 };
132
133 struct clk_cache {
134         int count;
135         int has_local;
136         struct clk_source s[MAX_CLOCKSOURCES];
137 };
138
139 /* Per card data */
140 struct snd_card_asihpi {
141         struct snd_card *card;
142         struct pci_dev *pci;
143         u16 adapter_index;
144         u32 serial_number;
145         u16 type;
146         u16 version;
147         u16 num_outstreams;
148         u16 num_instreams;
149
150         u32 h_mixer;
151         struct clk_cache cc;
152
153         u16 can_dma;
154         u16 support_grouping;
155         u16 support_mrx;
156         u16 update_interval_frames;
157         u16 in_max_chans;
158         u16 out_max_chans;
159 };
160
161 /* Per stream data */
162 struct snd_card_asihpi_pcm {
163         struct timer_list timer;
164         unsigned int respawn_timer;
165         unsigned int hpi_buffer_attached;
166         unsigned int buffer_bytes;
167         unsigned int period_bytes;
168         unsigned int bytes_per_sec;
169         unsigned int pcm_buf_host_rw_ofs; /* Host R/W pos */
170         unsigned int pcm_buf_dma_ofs;   /* DMA R/W offset in buffer */
171         unsigned int pcm_buf_elapsed_dma_ofs;   /* DMA R/W offset in buffer */
172         unsigned int drained_count;
173         struct snd_pcm_substream *substream;
174         u32 h_stream;
175         struct hpi_format format;
176 };
177
178 /* universal stream verbs work with out or in stream handles */
179
180 /* Functions to allow driver to give a buffer to HPI for busmastering */
181
182 static u16 hpi_stream_host_buffer_attach(
183         u32 h_stream,   /* handle to outstream. */
184         u32 size_in_bytes, /* size in bytes of bus mastering buffer */
185         u32 pci_address
186 )
187 {
188         struct hpi_message hm;
189         struct hpi_response hr;
190         unsigned int obj = hpi_handle_object(h_stream);
191
192         if (!h_stream)
193                 return HPI_ERROR_INVALID_OBJ;
194         hpi_init_message_response(&hm, &hr, obj,
195                         obj == HPI_OBJ_OSTREAM ?
196                                 HPI_OSTREAM_HOSTBUFFER_ALLOC :
197                                 HPI_ISTREAM_HOSTBUFFER_ALLOC);
198
199         hpi_handle_to_indexes(h_stream, &hm.adapter_index,
200                                 &hm.obj_index);
201
202         hm.u.d.u.buffer.buffer_size = size_in_bytes;
203         hm.u.d.u.buffer.pci_address = pci_address;
204         hm.u.d.u.buffer.command = HPI_BUFFER_CMD_INTERNAL_GRANTADAPTER;
205         hpi_send_recv(&hm, &hr);
206         return hr.error;
207 }
208
209 static u16 hpi_stream_host_buffer_detach(u32  h_stream)
210 {
211         struct hpi_message hm;
212         struct hpi_response hr;
213         unsigned int obj = hpi_handle_object(h_stream);
214
215         if (!h_stream)
216                 return HPI_ERROR_INVALID_OBJ;
217
218         hpi_init_message_response(&hm, &hr,  obj,
219                         obj == HPI_OBJ_OSTREAM ?
220                                 HPI_OSTREAM_HOSTBUFFER_FREE :
221                                 HPI_ISTREAM_HOSTBUFFER_FREE);
222
223         hpi_handle_to_indexes(h_stream, &hm.adapter_index,
224                                 &hm.obj_index);
225         hm.u.d.u.buffer.command = HPI_BUFFER_CMD_INTERNAL_REVOKEADAPTER;
226         hpi_send_recv(&hm, &hr);
227         return hr.error;
228 }
229
230 static inline u16 hpi_stream_start(u32 h_stream)
231 {
232         if (hpi_handle_object(h_stream) ==  HPI_OBJ_OSTREAM)
233                 return hpi_outstream_start(h_stream);
234         else
235                 return hpi_instream_start(h_stream);
236 }
237
238 static inline u16 hpi_stream_stop(u32 h_stream)
239 {
240         if (hpi_handle_object(h_stream) ==  HPI_OBJ_OSTREAM)
241                 return hpi_outstream_stop(h_stream);
242         else
243                 return hpi_instream_stop(h_stream);
244 }
245
246 static inline u16 hpi_stream_get_info_ex(
247     u32 h_stream,
248     u16        *pw_state,
249     u32        *pbuffer_size,
250     u32        *pdata_in_buffer,
251     u32        *psample_count,
252     u32        *pauxiliary_data
253 )
254 {
255         u16 e;
256         if (hpi_handle_object(h_stream)  ==  HPI_OBJ_OSTREAM)
257                 e = hpi_outstream_get_info_ex(h_stream, pw_state,
258                                         pbuffer_size, pdata_in_buffer,
259                                         psample_count, pauxiliary_data);
260         else
261                 e = hpi_instream_get_info_ex(h_stream, pw_state,
262                                         pbuffer_size, pdata_in_buffer,
263                                         psample_count, pauxiliary_data);
264         return e;
265 }
266
267 static inline u16 hpi_stream_group_add(
268                                         u32 h_master,
269                                         u32 h_stream)
270 {
271         if (hpi_handle_object(h_master) ==  HPI_OBJ_OSTREAM)
272                 return hpi_outstream_group_add(h_master, h_stream);
273         else
274                 return hpi_instream_group_add(h_master, h_stream);
275 }
276
277 static inline u16 hpi_stream_group_reset(u32 h_stream)
278 {
279         if (hpi_handle_object(h_stream) ==  HPI_OBJ_OSTREAM)
280                 return hpi_outstream_group_reset(h_stream);
281         else
282                 return hpi_instream_group_reset(h_stream);
283 }
284
285 static inline u16 hpi_stream_group_get_map(
286                                 u32 h_stream, u32 *mo, u32 *mi)
287 {
288         if (hpi_handle_object(h_stream) ==  HPI_OBJ_OSTREAM)
289                 return hpi_outstream_group_get_map(h_stream, mo, mi);
290         else
291                 return hpi_instream_group_get_map(h_stream, mo, mi);
292 }
293
294 static u16 handle_error(u16 err, int line, char *filename)
295 {
296         if (err)
297                 printk(KERN_WARNING
298                         "in file %s, line %d: HPI error %d\n",
299                         filename, line, err);
300         return err;
301 }
302
303 #define hpi_handle_error(x)  handle_error(x, __LINE__, __FILE__)
304
305 /***************************** GENERAL PCM ****************/
306
307 static void print_hwparams(struct snd_pcm_substream *substream,
308                                 struct snd_pcm_hw_params *p)
309 {
310         char name[16];
311         snd_pcm_debug_name(substream, name, sizeof(name));
312         snd_printd("%s HWPARAMS\n", name);
313         snd_printd(" samplerate %d Hz\n", params_rate(p));
314         snd_printd(" channels %d\n", params_channels(p));
315         snd_printd(" format %d\n", params_format(p));
316         snd_printd(" subformat %d\n", params_subformat(p));
317         snd_printd(" buffer %d B\n", params_buffer_bytes(p));
318         snd_printd(" period %d B\n", params_period_bytes(p));
319         snd_printd(" access %d\n", params_access(p));
320         snd_printd(" period_size %d\n", params_period_size(p));
321         snd_printd(" periods %d\n", params_periods(p));
322         snd_printd(" buffer_size %d\n", params_buffer_size(p));
323         snd_printd(" %d B/s\n", params_rate(p) *
324                 params_channels(p) *
325                 snd_pcm_format_width(params_format(p)) / 8);
326
327 }
328
329 static snd_pcm_format_t hpi_to_alsa_formats[] = {
330         -1,                     /* INVALID */
331         SNDRV_PCM_FORMAT_U8,    /* HPI_FORMAT_PCM8_UNSIGNED        1 */
332         SNDRV_PCM_FORMAT_S16,   /* HPI_FORMAT_PCM16_SIGNED         2 */
333         -1,                     /* HPI_FORMAT_MPEG_L1              3 */
334         SNDRV_PCM_FORMAT_MPEG,  /* HPI_FORMAT_MPEG_L2              4 */
335         SNDRV_PCM_FORMAT_MPEG,  /* HPI_FORMAT_MPEG_L3              5 */
336         -1,                     /* HPI_FORMAT_DOLBY_AC2            6 */
337         -1,                     /* HPI_FORMAT_DOLBY_AC3            7 */
338         SNDRV_PCM_FORMAT_S16_BE,/* HPI_FORMAT_PCM16_BIGENDIAN      8 */
339         -1,                     /* HPI_FORMAT_AA_TAGIT1_HITS       9 */
340         -1,                     /* HPI_FORMAT_AA_TAGIT1_INSERTS   10 */
341         SNDRV_PCM_FORMAT_S32,   /* HPI_FORMAT_PCM32_SIGNED        11 */
342         -1,                     /* HPI_FORMAT_RAW_BITSTREAM       12 */
343         -1,                     /* HPI_FORMAT_AA_TAGIT1_HITS_EX1  13 */
344         SNDRV_PCM_FORMAT_FLOAT, /* HPI_FORMAT_PCM32_FLOAT         14 */
345 #if 1
346         /* ALSA can't handle 3 byte sample size together with power-of-2
347          *  constraint on buffer_bytes, so disable this format
348          */
349         -1
350 #else
351         /* SNDRV_PCM_FORMAT_S24_3LE */ /* HPI_FORMAT_PCM24_SIGNED 15 */
352 #endif
353 };
354
355
356 static int snd_card_asihpi_format_alsa2hpi(snd_pcm_format_t alsa_format,
357                                            u16 *hpi_format)
358 {
359         u16 format;
360
361         for (format = HPI_FORMAT_PCM8_UNSIGNED;
362              format <= HPI_FORMAT_PCM24_SIGNED; format++) {
363                 if (hpi_to_alsa_formats[format] == alsa_format) {
364                         *hpi_format = format;
365                         return 0;
366                 }
367         }
368
369         snd_printd(KERN_WARNING "failed match for alsa format %d\n",
370                    alsa_format);
371         *hpi_format = 0;
372         return -EINVAL;
373 }
374
375 static void snd_card_asihpi_pcm_samplerates(struct snd_card_asihpi *asihpi,
376                                          struct snd_pcm_hardware *pcmhw)
377 {
378         u16 err;
379         u32 h_control;
380         u32 sample_rate;
381         int idx;
382         unsigned int rate_min = 200000;
383         unsigned int rate_max = 0;
384         unsigned int rates = 0;
385
386         if (asihpi->support_mrx) {
387                 rates |= SNDRV_PCM_RATE_CONTINUOUS;
388                 rates |= SNDRV_PCM_RATE_8000_96000;
389                 rate_min = 8000;
390                 rate_max = 100000;
391         } else {
392                 /* on cards without SRC,
393                    valid rates are determined by sampleclock */
394                 err = hpi_mixer_get_control(asihpi->h_mixer,
395                                           HPI_SOURCENODE_CLOCK_SOURCE, 0, 0, 0,
396                                           HPI_CONTROL_SAMPLECLOCK, &h_control);
397                 if (err) {
398                         snd_printk(KERN_ERR
399                                 "No local sampleclock, err %d\n", err);
400                 }
401
402                 for (idx = -1; idx < 100; idx++) {
403                         if (idx == -1) {
404                                 if (hpi_sample_clock_get_sample_rate(h_control,
405                                                                 &sample_rate))
406                                         continue;
407                         } else if (hpi_sample_clock_query_local_rate(h_control,
408                                                         idx, &sample_rate)) {
409                                 break;
410                         }
411
412                         rate_min = min(rate_min, sample_rate);
413                         rate_max = max(rate_max, sample_rate);
414
415                         switch (sample_rate) {
416                         case 5512:
417                                 rates |= SNDRV_PCM_RATE_5512;
418                                 break;
419                         case 8000:
420                                 rates |= SNDRV_PCM_RATE_8000;
421                                 break;
422                         case 11025:
423                                 rates |= SNDRV_PCM_RATE_11025;
424                                 break;
425                         case 16000:
426                                 rates |= SNDRV_PCM_RATE_16000;
427                                 break;
428                         case 22050:
429                                 rates |= SNDRV_PCM_RATE_22050;
430                                 break;
431                         case 32000:
432                                 rates |= SNDRV_PCM_RATE_32000;
433                                 break;
434                         case 44100:
435                                 rates |= SNDRV_PCM_RATE_44100;
436                                 break;
437                         case 48000:
438                                 rates |= SNDRV_PCM_RATE_48000;
439                                 break;
440                         case 64000:
441                                 rates |= SNDRV_PCM_RATE_64000;
442                                 break;
443                         case 88200:
444                                 rates |= SNDRV_PCM_RATE_88200;
445                                 break;
446                         case 96000:
447                                 rates |= SNDRV_PCM_RATE_96000;
448                                 break;
449                         case 176400:
450                                 rates |= SNDRV_PCM_RATE_176400;
451                                 break;
452                         case 192000:
453                                 rates |= SNDRV_PCM_RATE_192000;
454                                 break;
455                         default: /* some other rate */
456                                 rates |= SNDRV_PCM_RATE_KNOT;
457                         }
458                 }
459         }
460
461         pcmhw->rates = rates;
462         pcmhw->rate_min = rate_min;
463         pcmhw->rate_max = rate_max;
464 }
465
466 static int snd_card_asihpi_pcm_hw_params(struct snd_pcm_substream *substream,
467                                          struct snd_pcm_hw_params *params)
468 {
469         struct snd_pcm_runtime *runtime = substream->runtime;
470         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
471         struct snd_card_asihpi *card = snd_pcm_substream_chip(substream);
472         int err;
473         u16 format;
474         int width;
475         unsigned int bytes_per_sec;
476
477         print_hwparams(substream, params);
478         err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(params));
479         if (err < 0)
480                 return err;
481         err = snd_card_asihpi_format_alsa2hpi(params_format(params), &format);
482         if (err)
483                 return err;
484
485         hpi_handle_error(hpi_format_create(&dpcm->format,
486                         params_channels(params),
487                         format, params_rate(params), 0, 0));
488
489         if (substream->stream == SNDRV_PCM_STREAM_CAPTURE) {
490                 if (hpi_instream_reset(dpcm->h_stream) != 0)
491                         return -EINVAL;
492
493                 if (hpi_instream_set_format(
494                         dpcm->h_stream, &dpcm->format) != 0)
495                         return -EINVAL;
496         }
497
498         dpcm->hpi_buffer_attached = 0;
499         if (card->can_dma) {
500                 err = hpi_stream_host_buffer_attach(dpcm->h_stream,
501                         params_buffer_bytes(params),  runtime->dma_addr);
502                 if (err == 0) {
503                         snd_printdd(
504                                 "stream_host_buffer_attach succeeded %u %lu\n",
505                                 params_buffer_bytes(params),
506                                 (unsigned long)runtime->dma_addr);
507                 } else {
508                         snd_printd("stream_host_buffer_attach error %d\n",
509                                         err);
510                         return -ENOMEM;
511                 }
512
513                 err = hpi_stream_get_info_ex(dpcm->h_stream, NULL,
514                                                 &dpcm->hpi_buffer_attached,
515                                                 NULL, NULL, NULL);
516
517                 snd_printdd("stream_host_buffer_attach status 0x%x\n",
518                                 dpcm->hpi_buffer_attached);
519         }
520         bytes_per_sec = params_rate(params) * params_channels(params);
521         width = snd_pcm_format_width(params_format(params));
522         bytes_per_sec *= width;
523         bytes_per_sec /= 8;
524         if (width < 0 || bytes_per_sec == 0)
525                 return -EINVAL;
526
527         dpcm->bytes_per_sec = bytes_per_sec;
528         dpcm->buffer_bytes = params_buffer_bytes(params);
529         dpcm->period_bytes = params_period_bytes(params);
530
531         return 0;
532 }
533
534 static int
535 snd_card_asihpi_hw_free(struct snd_pcm_substream *substream)
536 {
537         struct snd_pcm_runtime *runtime = substream->runtime;
538         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
539         if (dpcm->hpi_buffer_attached)
540                 hpi_stream_host_buffer_detach(dpcm->h_stream);
541
542         snd_pcm_lib_free_pages(substream);
543         return 0;
544 }
545
546 static void snd_card_asihpi_runtime_free(struct snd_pcm_runtime *runtime)
547 {
548         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
549         kfree(dpcm);
550 }
551
552 static void snd_card_asihpi_pcm_timer_start(struct snd_pcm_substream *
553                                             substream)
554 {
555         struct snd_pcm_runtime *runtime = substream->runtime;
556         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
557         int expiry;
558
559         expiry = HZ / 200;
560         /*? (dpcm->period_bytes * HZ / dpcm->bytes_per_sec); */
561         expiry = max(expiry, 1); /* don't let it be zero! */
562         dpcm->timer.expires = jiffies + expiry;
563         dpcm->respawn_timer = 1;
564         add_timer(&dpcm->timer);
565 }
566
567 static void snd_card_asihpi_pcm_timer_stop(struct snd_pcm_substream *substream)
568 {
569         struct snd_pcm_runtime *runtime = substream->runtime;
570         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
571
572         dpcm->respawn_timer = 0;
573         del_timer(&dpcm->timer);
574 }
575
576 static int snd_card_asihpi_trigger(struct snd_pcm_substream *substream,
577                                            int cmd)
578 {
579         struct snd_card_asihpi_pcm *dpcm = substream->runtime->private_data;
580         struct snd_card_asihpi *card = snd_pcm_substream_chip(substream);
581         struct snd_pcm_substream *s;
582         u16 e;
583         char name[16];
584
585         snd_pcm_debug_name(substream, name, sizeof(name));
586         snd_printdd("%s trigger\n", name);
587
588         switch (cmd) {
589         case SNDRV_PCM_TRIGGER_START:
590                 snd_pcm_group_for_each_entry(s, substream) {
591                         struct snd_pcm_runtime *runtime = s->runtime;
592                         struct snd_card_asihpi_pcm *ds = runtime->private_data;
593
594                         if (snd_pcm_substream_chip(s) != card)
595                                 continue;
596
597                         /* don't link Cap and Play */
598                         if (substream->stream != s->stream)
599                                 continue;
600
601                         ds->drained_count = 0;
602                         if (s->stream == SNDRV_PCM_STREAM_PLAYBACK) {
603                                 /* How do I know how much valid data is present
604                                 * in buffer? Must be at least one period!
605                                 * Guessing 2 periods, but if
606                                 * buffer is bigger it may contain even more
607                                 * data??
608                                 */
609                                 unsigned int preload = ds->period_bytes * 1;
610                                 snd_printddd("%d preload x%x\n", s->number, preload);
611                                 hpi_handle_error(hpi_outstream_write_buf(
612                                                 ds->h_stream,
613                                                 &runtime->dma_area[0],
614                                                 preload,
615                                                 &ds->format));
616                                 ds->pcm_buf_host_rw_ofs = preload;
617                         }
618
619                         if (card->support_grouping) {
620                                 snd_printdd("%d group\n", s->number);
621                                 e = hpi_stream_group_add(
622                                         dpcm->h_stream,
623                                         ds->h_stream);
624                                 if (!e) {
625                                         snd_pcm_trigger_done(s, substream);
626                                 } else {
627                                         hpi_handle_error(e);
628                                         break;
629                                 }
630                         } else
631                                 break;
632                 }
633                 snd_printdd("start\n");
634                 /* start the master stream */
635                 snd_card_asihpi_pcm_timer_start(substream);
636                 if ((substream->stream == SNDRV_PCM_STREAM_CAPTURE) ||
637                         !card->can_dma)
638                         hpi_handle_error(hpi_stream_start(dpcm->h_stream));
639                 break;
640
641         case SNDRV_PCM_TRIGGER_STOP:
642                 snd_card_asihpi_pcm_timer_stop(substream);
643                 snd_pcm_group_for_each_entry(s, substream) {
644                         if (snd_pcm_substream_chip(s) != card)
645                                 continue;
646                         /* don't link Cap and Play */
647                         if (substream->stream != s->stream)
648                                 continue;
649
650                         /*? workaround linked streams don't
651                         transition to SETUP 20070706*/
652                         s->runtime->status->state = SNDRV_PCM_STATE_SETUP;
653
654                         if (card->support_grouping) {
655                                 snd_printdd("%d group\n", s->number);
656                                 snd_pcm_trigger_done(s, substream);
657                         } else
658                                 break;
659                 }
660                 snd_printdd("stop\n");
661
662                 /* _prepare and _hwparams reset the stream */
663                 hpi_handle_error(hpi_stream_stop(dpcm->h_stream));
664                 if (substream->stream == SNDRV_PCM_STREAM_PLAYBACK)
665                         hpi_handle_error(
666                                 hpi_outstream_reset(dpcm->h_stream));
667
668                 if (card->support_grouping)
669                         hpi_handle_error(hpi_stream_group_reset(dpcm->h_stream));
670                 break;
671
672         case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
673                 snd_printdd("pause release\n");
674                 hpi_handle_error(hpi_stream_start(dpcm->h_stream));
675                 snd_card_asihpi_pcm_timer_start(substream);
676                 break;
677         case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
678                 snd_printdd("pause\n");
679                 snd_card_asihpi_pcm_timer_stop(substream);
680                 hpi_handle_error(hpi_stream_stop(dpcm->h_stream));
681                 break;
682         default:
683                 snd_printd(KERN_ERR "\tINVALID\n");
684                 return -EINVAL;
685         }
686
687         return 0;
688 }
689
690 /*algorithm outline
691  Without linking degenerates to getting single stream pos etc
692  Without mmap 2nd loop degenerates to snd_pcm_period_elapsed
693 */
694 /*
695 pcm_buf_dma_ofs=get_buf_pos(s);
696 for_each_linked_stream(s) {
697         pcm_buf_dma_ofs=get_buf_pos(s);
698         min_buf_pos = modulo_min(min_buf_pos, pcm_buf_dma_ofs, buffer_bytes)
699         new_data = min(new_data, calc_new_data(pcm_buf_dma_ofs,irq_pos)
700 }
701 timer.expires = jiffies + predict_next_period_ready(min_buf_pos);
702 for_each_linked_stream(s) {
703         s->pcm_buf_dma_ofs = min_buf_pos;
704         if (new_data > period_bytes) {
705                 if (mmap) {
706                         irq_pos = (irq_pos + period_bytes) % buffer_bytes;
707                         if (playback) {
708                                 write(period_bytes);
709                         } else {
710                                 read(period_bytes);
711                         }
712                 }
713                 snd_pcm_period_elapsed(s);
714         }
715 }
716 */
717
718 /** Minimum of 2 modulo values.  Works correctly when the difference between
719 * the values is less than half the modulus
720 */
721 static inline unsigned int modulo_min(unsigned int a, unsigned int b,
722                                         unsigned long int modulus)
723 {
724         unsigned int result;
725         if (((a-b) % modulus) < (modulus/2))
726                 result = b;
727         else
728                 result = a;
729
730         return result;
731 }
732
733 /** Timer function, equivalent to interrupt service routine for cards
734 */
735 static void snd_card_asihpi_timer_function(unsigned long data)
736 {
737         struct snd_card_asihpi_pcm *dpcm = (struct snd_card_asihpi_pcm *)data;
738         struct snd_pcm_substream *substream = dpcm->substream;
739         struct snd_card_asihpi *card = snd_pcm_substream_chip(substream);
740         struct snd_pcm_runtime *runtime;
741         struct snd_pcm_substream *s;
742         unsigned int newdata = 0;
743         unsigned int pcm_buf_dma_ofs, min_buf_pos = 0;
744         unsigned int remdata, xfercount, next_jiffies;
745         int first = 1;
746         int loops = 0;
747         u16 state;
748         u32 buffer_size, bytes_avail, samples_played, on_card_bytes;
749         char name[16];
750
751         snd_pcm_debug_name(substream, name, sizeof(name));
752
753         snd_printdd("%s snd_card_asihpi_timer_function\n", name);
754
755         /* find minimum newdata and buffer pos in group */
756         snd_pcm_group_for_each_entry(s, substream) {
757                 struct snd_card_asihpi_pcm *ds = s->runtime->private_data;
758                 runtime = s->runtime;
759
760                 if (snd_pcm_substream_chip(s) != card)
761                         continue;
762
763                 /* don't link Cap and Play */
764                 if (substream->stream != s->stream)
765                         continue;
766
767                 hpi_handle_error(hpi_stream_get_info_ex(
768                                         ds->h_stream, &state,
769                                         &buffer_size, &bytes_avail,
770                                         &samples_played, &on_card_bytes));
771
772                 /* number of bytes in on-card buffer */
773                 runtime->delay = on_card_bytes;
774
775                 if (!card->can_dma)
776                         on_card_bytes = bytes_avail;
777
778                 if (s->stream == SNDRV_PCM_STREAM_PLAYBACK) {
779                         pcm_buf_dma_ofs = ds->pcm_buf_host_rw_ofs - bytes_avail;
780                         if (state == HPI_STATE_STOPPED) {
781                                 if ((bytes_avail == 0) &&
782                                     (on_card_bytes < ds->pcm_buf_host_rw_ofs)) {
783                                         hpi_handle_error(hpi_stream_start(ds->h_stream));
784                                         snd_printdd("P%d start\n", s->number);
785                                         ds->drained_count = 0;
786                                 }
787                         } else if (state == HPI_STATE_DRAINED) {
788                                 snd_printd(KERN_WARNING "P%d drained\n",
789                                                 s->number);
790                                 ds->drained_count++;
791                                 if (ds->drained_count > 2) {
792                                         snd_pcm_stop(s, SNDRV_PCM_STATE_XRUN);
793                                         continue;
794                                 }
795                         } else {
796                                 ds->drained_count = 0;
797                         }
798                 } else
799                         pcm_buf_dma_ofs = bytes_avail + ds->pcm_buf_host_rw_ofs;
800
801                 if (first) {
802                         /* can't statically init min when wrap is involved */
803                         min_buf_pos = pcm_buf_dma_ofs;
804                         newdata = (pcm_buf_dma_ofs - ds->pcm_buf_elapsed_dma_ofs) % ds->buffer_bytes;
805                         first = 0;
806                 } else {
807                         min_buf_pos =
808                                 modulo_min(min_buf_pos, pcm_buf_dma_ofs, UINT_MAX+1L);
809                         newdata = min(
810                                 (pcm_buf_dma_ofs - ds->pcm_buf_elapsed_dma_ofs) % ds->buffer_bytes,
811                                 newdata);
812                 }
813
814                 snd_printdd("hw_ptr 0x%04lX, appl_ptr 0x%04lX\n",
815                         (unsigned long)frames_to_bytes(runtime,
816                                                 runtime->status->hw_ptr),
817                         (unsigned long)frames_to_bytes(runtime,
818                                                 runtime->control->appl_ptr));
819
820                 snd_printdd("%d S=%d, "
821                         "rw=0x%04X, dma=0x%04X, left=0x%04X, "
822                         "aux=0x%04X space=0x%04X\n",
823                         s->number, state,
824                         ds->pcm_buf_host_rw_ofs, pcm_buf_dma_ofs,
825                         (int)bytes_avail,
826                         (int)on_card_bytes, buffer_size-bytes_avail);
827                 loops++;
828         }
829         pcm_buf_dma_ofs = min_buf_pos;
830
831         remdata = newdata % dpcm->period_bytes;
832         xfercount = newdata - remdata; /* a multiple of period_bytes */
833         /* come back when on_card_bytes has decreased enough to allow
834            write to happen, or when data has been consumed to make another
835            period
836         */
837         if (xfercount && (on_card_bytes  > dpcm->period_bytes))
838                 next_jiffies = ((on_card_bytes - dpcm->period_bytes) * HZ / dpcm->bytes_per_sec);
839         else
840                 next_jiffies = ((dpcm->period_bytes - remdata) * HZ / dpcm->bytes_per_sec);
841
842         next_jiffies = max(next_jiffies, 1U);
843         dpcm->timer.expires = jiffies + next_jiffies;
844         snd_printdd("jif %d buf pos 0x%04X newdata 0x%04X xfer 0x%04X\n",
845                         next_jiffies, pcm_buf_dma_ofs, newdata, xfercount);
846
847         snd_pcm_group_for_each_entry(s, substream) {
848                 struct snd_card_asihpi_pcm *ds = s->runtime->private_data;
849
850                 /* don't link Cap and Play */
851                 if (substream->stream != s->stream)
852                         continue;
853
854                 ds->pcm_buf_dma_ofs = pcm_buf_dma_ofs;
855
856                 if (xfercount &&
857                         /* Limit use of on card fifo for playback */
858                         ((on_card_bytes <= ds->period_bytes) ||
859                         (s->stream == SNDRV_PCM_STREAM_CAPTURE)))
860
861                 {
862
863                         unsigned int buf_ofs = ds->pcm_buf_host_rw_ofs % ds->buffer_bytes;
864                         unsigned int xfer1, xfer2;
865                         char *pd = &s->runtime->dma_area[buf_ofs];
866
867                         if (card->can_dma) { /* buffer wrap is handled at lower level */
868                                 xfer1 = xfercount;
869                                 xfer2 = 0;
870                         } else {
871                                 xfer1 = min(xfercount, ds->buffer_bytes - buf_ofs);
872                                 xfer2 = xfercount - xfer1;
873                         }
874
875                         if (s->stream == SNDRV_PCM_STREAM_PLAYBACK) {
876                                 snd_printddd("P%d write1 0x%04X 0x%04X\n",
877                                         s->number, xfer1, buf_ofs);
878                                 hpi_handle_error(
879                                         hpi_outstream_write_buf(
880                                                 ds->h_stream, pd, xfer1,
881                                                 &ds->format));
882
883                                 if (xfer2) {
884                                         pd = s->runtime->dma_area;
885
886                                         snd_printddd("P%d write2 0x%04X 0x%04X\n",
887                                                         s->number,
888                                                         xfercount - xfer1, buf_ofs);
889                                         hpi_handle_error(
890                                                 hpi_outstream_write_buf(
891                                                         ds->h_stream, pd,
892                                                         xfercount - xfer1,
893                                                         &ds->format));
894                                 }
895                         } else {
896                                 snd_printddd("C%d read1 0x%04x\n",
897                                         s->number, xfer1);
898                                 hpi_handle_error(
899                                         hpi_instream_read_buf(
900                                                 ds->h_stream,
901                                                 pd, xfer1));
902                                 if (xfer2) {
903                                         pd = s->runtime->dma_area;
904                                         snd_printddd("C%d read2 0x%04x\n",
905                                                 s->number, xfer2);
906                                         hpi_handle_error(
907                                                 hpi_instream_read_buf(
908                                                         ds->h_stream,
909                                                         pd, xfer2));
910                                 }
911                         }
912                         ds->pcm_buf_host_rw_ofs = ds->pcm_buf_host_rw_ofs + xfercount;
913                         ds->pcm_buf_elapsed_dma_ofs = pcm_buf_dma_ofs;
914                         snd_pcm_period_elapsed(s);
915                 }
916         }
917
918         if (dpcm->respawn_timer)
919                 add_timer(&dpcm->timer);
920 }
921
922 /***************************** PLAYBACK OPS ****************/
923 static int snd_card_asihpi_playback_ioctl(struct snd_pcm_substream *substream,
924                                           unsigned int cmd, void *arg)
925 {
926         snd_printddd(KERN_INFO "P%d ioctl %d\n", substream->number, cmd);
927         return snd_pcm_lib_ioctl(substream, cmd, arg);
928 }
929
930 static int snd_card_asihpi_playback_prepare(struct snd_pcm_substream *
931                                             substream)
932 {
933         struct snd_pcm_runtime *runtime = substream->runtime;
934         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
935
936         snd_printdd("P%d prepare\n", substream->number);
937
938         hpi_handle_error(hpi_outstream_reset(dpcm->h_stream));
939         dpcm->pcm_buf_host_rw_ofs = 0;
940         dpcm->pcm_buf_dma_ofs = 0;
941         dpcm->pcm_buf_elapsed_dma_ofs = 0;
942         return 0;
943 }
944
945 static snd_pcm_uframes_t
946 snd_card_asihpi_playback_pointer(struct snd_pcm_substream *substream)
947 {
948         struct snd_pcm_runtime *runtime = substream->runtime;
949         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
950         snd_pcm_uframes_t ptr;
951
952         ptr = bytes_to_frames(runtime, dpcm->pcm_buf_dma_ofs  % dpcm->buffer_bytes);
953         snd_printddd("P%d pointer = 0x%04lx\n", substream->number, (unsigned long)ptr);
954         return ptr;
955 }
956
957 static void snd_card_asihpi_playback_format(struct snd_card_asihpi *asihpi,
958                                                 u32 h_stream,
959                                                 struct snd_pcm_hardware *pcmhw)
960 {
961         struct hpi_format hpi_format;
962         u16 format;
963         u16 err;
964         u32 h_control;
965         u32 sample_rate = 48000;
966
967         /* on cards without SRC, must query at valid rate,
968         * maybe set by external sync
969         */
970         err = hpi_mixer_get_control(asihpi->h_mixer,
971                                   HPI_SOURCENODE_CLOCK_SOURCE, 0, 0, 0,
972                                   HPI_CONTROL_SAMPLECLOCK, &h_control);
973
974         if (!err)
975                 err = hpi_sample_clock_get_sample_rate(h_control,
976                                 &sample_rate);
977
978         for (format = HPI_FORMAT_PCM8_UNSIGNED;
979              format <= HPI_FORMAT_PCM24_SIGNED; format++) {
980                 err = hpi_format_create(&hpi_format,
981                                         2, format, sample_rate, 128000, 0);
982                 if (!err)
983                         err = hpi_outstream_query_format(h_stream,
984                                                         &hpi_format);
985                 if (!err && (hpi_to_alsa_formats[format] != -1))
986                         pcmhw->formats |=
987                                 (1ULL << hpi_to_alsa_formats[format]);
988         }
989 }
990
991 static struct snd_pcm_hardware snd_card_asihpi_playback = {
992         .channels_min = 1,
993         .channels_max = 2,
994         .buffer_bytes_max = BUFFER_BYTES_MAX,
995         .period_bytes_min = PERIOD_BYTES_MIN,
996         .period_bytes_max = BUFFER_BYTES_MAX / PERIODS_MIN,
997         .periods_min = PERIODS_MIN,
998         .periods_max = BUFFER_BYTES_MAX / PERIOD_BYTES_MIN,
999         .fifo_size = 0,
1000 };
1001
1002 static int snd_card_asihpi_playback_open(struct snd_pcm_substream *substream)
1003 {
1004         struct snd_pcm_runtime *runtime = substream->runtime;
1005         struct snd_card_asihpi_pcm *dpcm;
1006         struct snd_card_asihpi *card = snd_pcm_substream_chip(substream);
1007         int err;
1008
1009         dpcm = kzalloc(sizeof(*dpcm), GFP_KERNEL);
1010         if (dpcm == NULL)
1011                 return -ENOMEM;
1012
1013         err =
1014             hpi_outstream_open(card->adapter_index,
1015                               substream->number, &dpcm->h_stream);
1016         hpi_handle_error(err);
1017         if (err)
1018                 kfree(dpcm);
1019         if (err == HPI_ERROR_OBJ_ALREADY_OPEN)
1020                 return -EBUSY;
1021         if (err)
1022                 return -EIO;
1023
1024         /*? also check ASI5000 samplerate source
1025             If external, only support external rate.
1026             If internal and other stream playing, can't switch
1027         */
1028
1029         init_timer(&dpcm->timer);
1030         dpcm->timer.data = (unsigned long) dpcm;
1031         dpcm->timer.function = snd_card_asihpi_timer_function;
1032         dpcm->substream = substream;
1033         runtime->private_data = dpcm;
1034         runtime->private_free = snd_card_asihpi_runtime_free;
1035
1036         snd_card_asihpi_playback.channels_max = card->out_max_chans;
1037         /*?snd_card_asihpi_playback.period_bytes_min =
1038         card->out_max_chans * 4096; */
1039
1040         snd_card_asihpi_playback_format(card, dpcm->h_stream,
1041                                         &snd_card_asihpi_playback);
1042
1043         snd_card_asihpi_pcm_samplerates(card,  &snd_card_asihpi_playback);
1044
1045         snd_card_asihpi_playback.info = SNDRV_PCM_INFO_INTERLEAVED |
1046                                         SNDRV_PCM_INFO_DOUBLE |
1047                                         SNDRV_PCM_INFO_BATCH |
1048                                         SNDRV_PCM_INFO_BLOCK_TRANSFER |
1049                                         SNDRV_PCM_INFO_PAUSE |
1050                                         SNDRV_PCM_INFO_MMAP |
1051                                         SNDRV_PCM_INFO_MMAP_VALID;
1052
1053         if (card->support_grouping)
1054                 snd_card_asihpi_playback.info |= SNDRV_PCM_INFO_SYNC_START;
1055
1056         /* struct is copied, so can create initializer dynamically */
1057         runtime->hw = snd_card_asihpi_playback;
1058
1059         if (card->can_dma)
1060                 err = snd_pcm_hw_constraint_pow2(runtime, 0,
1061                                         SNDRV_PCM_HW_PARAM_BUFFER_BYTES);
1062         if (err < 0)
1063                 return err;
1064
1065         snd_pcm_hw_constraint_step(runtime, 0, SNDRV_PCM_HW_PARAM_PERIOD_SIZE,
1066                 card->update_interval_frames);
1067
1068         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_PERIOD_SIZE,
1069                 card->update_interval_frames * 2, UINT_MAX);
1070
1071         snd_pcm_set_sync(substream);
1072
1073         snd_printdd("playback open\n");
1074
1075         return 0;
1076 }
1077
1078 static int snd_card_asihpi_playback_close(struct snd_pcm_substream *substream)
1079 {
1080         struct snd_pcm_runtime *runtime = substream->runtime;
1081         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
1082
1083         hpi_handle_error(hpi_outstream_close(dpcm->h_stream));
1084         snd_printdd("playback close\n");
1085
1086         return 0;
1087 }
1088
1089 static struct snd_pcm_ops snd_card_asihpi_playback_mmap_ops = {
1090         .open = snd_card_asihpi_playback_open,
1091         .close = snd_card_asihpi_playback_close,
1092         .ioctl = snd_card_asihpi_playback_ioctl,
1093         .hw_params = snd_card_asihpi_pcm_hw_params,
1094         .hw_free = snd_card_asihpi_hw_free,
1095         .prepare = snd_card_asihpi_playback_prepare,
1096         .trigger = snd_card_asihpi_trigger,
1097         .pointer = snd_card_asihpi_playback_pointer,
1098 };
1099
1100 /***************************** CAPTURE OPS ****************/
1101 static snd_pcm_uframes_t
1102 snd_card_asihpi_capture_pointer(struct snd_pcm_substream *substream)
1103 {
1104         struct snd_pcm_runtime *runtime = substream->runtime;
1105         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
1106
1107         snd_printddd("capture pointer %d=%d\n",
1108                         substream->number, dpcm->pcm_buf_dma_ofs);
1109         /* NOTE Unlike playback can't use actual samples_played
1110                 for the capture position, because those samples aren't yet in
1111                 the local buffer available for reading.
1112         */
1113         return bytes_to_frames(runtime, dpcm->pcm_buf_dma_ofs % dpcm->buffer_bytes);
1114 }
1115
1116 static int snd_card_asihpi_capture_ioctl(struct snd_pcm_substream *substream,
1117                                          unsigned int cmd, void *arg)
1118 {
1119         return snd_pcm_lib_ioctl(substream, cmd, arg);
1120 }
1121
1122 static int snd_card_asihpi_capture_prepare(struct snd_pcm_substream *substream)
1123 {
1124         struct snd_pcm_runtime *runtime = substream->runtime;
1125         struct snd_card_asihpi_pcm *dpcm = runtime->private_data;
1126
1127         hpi_handle_error(hpi_instream_reset(dpcm->h_stream));
1128         dpcm->pcm_buf_host_rw_ofs = 0;
1129         dpcm->pcm_buf_dma_ofs = 0;
1130         dpcm->pcm_buf_elapsed_dma_ofs = 0;
1131
1132         snd_printdd("Capture Prepare %d\n", substream->number);
1133         return 0;
1134 }
1135
1136
1137
1138 static void snd_card_asihpi_capture_format(struct snd_card_asihpi *asihpi,
1139                                         u32 h_stream,
1140                                          struct snd_pcm_hardware *pcmhw)
1141 {
1142   struct hpi_format hpi_format;
1143         u16 format;
1144         u16 err;
1145         u32 h_control;
1146         u32 sample_rate = 48000;
1147
1148         /* on cards without SRC, must query at valid rate,
1149                 maybe set by external sync */
1150         err = hpi_mixer_get_control(asihpi->h_mixer,
1151                                   HPI_SOURCENODE_CLOCK_SOURCE, 0, 0, 0,
1152                                   HPI_CONTROL_SAMPLECLOCK, &h_control);
1153
1154         if (!err)
1155                 err = hpi_sample_clock_get_sample_rate(h_control,
1156                         &sample_rate);
1157
1158         for (format = HPI_FORMAT_PCM8_UNSIGNED;
1159                 format <= HPI_FORMAT_PCM24_SIGNED; format++) {
1160
1161                 err = hpi_format_create(&hpi_format, 2, format,
1162                                 sample_rate, 128000, 0);
1163                 if (!err)
1164                         err = hpi_instream_query_format(h_stream,
1165                                             &hpi_format);
1166                 if (!err)
1167                         pcmhw->formats |=
1168                                 (1ULL << hpi_to_alsa_formats[format]);
1169         }
1170 }
1171
1172
1173 static struct snd_pcm_hardware snd_card_asihpi_capture = {
1174         .channels_min = 1,
1175         .channels_max = 2,
1176         .buffer_bytes_max = BUFFER_BYTES_MAX,
1177         .period_bytes_min = PERIOD_BYTES_MIN,
1178         .period_bytes_max = BUFFER_BYTES_MAX / PERIODS_MIN,
1179         .periods_min = PERIODS_MIN,
1180         .periods_max = BUFFER_BYTES_MAX / PERIOD_BYTES_MIN,
1181         .fifo_size = 0,
1182 };
1183
1184 static int snd_card_asihpi_capture_open(struct snd_pcm_substream *substream)
1185 {
1186         struct snd_pcm_runtime *runtime = substream->runtime;
1187         struct snd_card_asihpi *card = snd_pcm_substream_chip(substream);
1188         struct snd_card_asihpi_pcm *dpcm;
1189         int err;
1190
1191         dpcm = kzalloc(sizeof(*dpcm), GFP_KERNEL);
1192         if (dpcm == NULL)
1193                 return -ENOMEM;
1194
1195         snd_printdd("capture open adapter %d stream %d\n",
1196                    card->adapter_index, substream->number);
1197
1198         err = hpi_handle_error(
1199             hpi_instream_open(card->adapter_index,
1200                              substream->number, &dpcm->h_stream));
1201         if (err)
1202                 kfree(dpcm);
1203         if (err == HPI_ERROR_OBJ_ALREADY_OPEN)
1204                 return -EBUSY;
1205         if (err)
1206                 return -EIO;
1207
1208
1209         init_timer(&dpcm->timer);
1210         dpcm->timer.data = (unsigned long) dpcm;
1211         dpcm->timer.function = snd_card_asihpi_timer_function;
1212         dpcm->substream = substream;
1213         runtime->private_data = dpcm;
1214         runtime->private_free = snd_card_asihpi_runtime_free;
1215
1216         snd_card_asihpi_capture.channels_max = card->in_max_chans;
1217         snd_card_asihpi_capture_format(card, dpcm->h_stream,
1218                                        &snd_card_asihpi_capture);
1219         snd_card_asihpi_pcm_samplerates(card,  &snd_card_asihpi_capture);
1220         snd_card_asihpi_capture.info = SNDRV_PCM_INFO_INTERLEAVED |
1221                                         SNDRV_PCM_INFO_MMAP |
1222                                         SNDRV_PCM_INFO_MMAP_VALID;
1223
1224         if (card->support_grouping)
1225                 snd_card_asihpi_capture.info |= SNDRV_PCM_INFO_SYNC_START;
1226
1227         runtime->hw = snd_card_asihpi_capture;
1228
1229         if (card->can_dma)
1230                 err = snd_pcm_hw_constraint_pow2(runtime, 0,
1231                                         SNDRV_PCM_HW_PARAM_BUFFER_BYTES);
1232         if (err < 0)
1233                 return err;
1234
1235         snd_pcm_hw_constraint_step(runtime, 0, SNDRV_PCM_HW_PARAM_PERIOD_SIZE,
1236                 card->update_interval_frames);
1237         snd_pcm_hw_constraint_minmax(runtime, SNDRV_PCM_HW_PARAM_PERIOD_SIZE,
1238                 card->update_interval_frames * 2, UINT_MAX);
1239
1240         snd_pcm_set_sync(substream);
1241
1242         return 0;
1243 }
1244
1245 static int snd_card_asihpi_capture_close(struct snd_pcm_substream *substream)
1246 {
1247         struct snd_card_asihpi_pcm *dpcm = substream->runtime->private_data;
1248
1249         hpi_handle_error(hpi_instream_close(dpcm->h_stream));
1250         return 0;
1251 }
1252
1253 static struct snd_pcm_ops snd_card_asihpi_capture_mmap_ops = {
1254         .open = snd_card_asihpi_capture_open,
1255         .close = snd_card_asihpi_capture_close,
1256         .ioctl = snd_card_asihpi_capture_ioctl,
1257         .hw_params = snd_card_asihpi_pcm_hw_params,
1258         .hw_free = snd_card_asihpi_hw_free,
1259         .prepare = snd_card_asihpi_capture_prepare,
1260         .trigger = snd_card_asihpi_trigger,
1261         .pointer = snd_card_asihpi_capture_pointer,
1262 };
1263
1264 static int __devinit snd_card_asihpi_pcm_new(struct snd_card_asihpi *asihpi,
1265                                       int device, int substreams)
1266 {
1267         struct snd_pcm *pcm;
1268         int err;
1269
1270         err = snd_pcm_new(asihpi->card, "Asihpi PCM", device,
1271                          asihpi->num_outstreams, asihpi->num_instreams,
1272                          &pcm);
1273         if (err < 0)
1274                 return err;
1275         /* pointer to ops struct is stored, dont change ops afterwards! */
1276                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
1277                                 &snd_card_asihpi_playback_mmap_ops);
1278                 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE,
1279                                 &snd_card_asihpi_capture_mmap_ops);
1280
1281         pcm->private_data = asihpi;
1282         pcm->info_flags = 0;
1283         strcpy(pcm->name, "Asihpi PCM");
1284
1285         /*? do we want to emulate MMAP for non-BBM cards?
1286         Jack doesn't work with ALSAs MMAP emulation - WHY NOT? */
1287         snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
1288                                                 snd_dma_pci_data(asihpi->pci),
1289                                                 64*1024, BUFFER_BYTES_MAX);
1290
1291         return 0;
1292 }
1293
1294 /***************************** MIXER CONTROLS ****************/
1295 struct hpi_control {
1296         u32 h_control;
1297         u16 control_type;
1298         u16 src_node_type;
1299         u16 src_node_index;
1300         u16 dst_node_type;
1301         u16 dst_node_index;
1302         u16 band;
1303         char name[44]; /* copied to snd_ctl_elem_id.name[44]; */
1304 };
1305
1306 static const char * const asihpi_tuner_band_names[] = {
1307         "invalid",
1308         "AM",
1309         "FM mono",
1310         "TV NTSC-M",
1311         "FM stereo",
1312         "AUX",
1313         "TV PAL BG",
1314         "TV PAL I",
1315         "TV PAL DK",
1316         "TV SECAM",
1317 };
1318
1319 compile_time_assert(
1320         (ARRAY_SIZE(asihpi_tuner_band_names) ==
1321                 (HPI_TUNER_BAND_LAST+1)),
1322         assert_tuner_band_names_size);
1323
1324 static const char * const asihpi_src_names[] = {
1325         "no source",
1326         "PCM",
1327         "Line",
1328         "Digital",
1329         "Tuner",
1330         "RF",
1331         "Clock",
1332         "Bitstream",
1333         "Mic",
1334         "Net",
1335         "Analog",
1336         "Adapter",
1337         "RTP",
1338         "GPI",
1339 };
1340
1341 compile_time_assert(
1342         (ARRAY_SIZE(asihpi_src_names) ==
1343                 (HPI_SOURCENODE_LAST_INDEX-HPI_SOURCENODE_NONE+1)),
1344         assert_src_names_size);
1345
1346 static const char * const asihpi_dst_names[] = {
1347         "no destination",
1348         "PCM",
1349         "Line",
1350         "Digital",
1351         "RF",
1352         "Speaker",
1353         "Net",
1354         "Analog",
1355         "RTP",
1356         "GPO",
1357 };
1358
1359 compile_time_assert(
1360         (ARRAY_SIZE(asihpi_dst_names) ==
1361                 (HPI_DESTNODE_LAST_INDEX-HPI_DESTNODE_NONE+1)),
1362         assert_dst_names_size);
1363
1364 static inline int ctl_add(struct snd_card *card, struct snd_kcontrol_new *ctl,
1365                                 struct snd_card_asihpi *asihpi)
1366 {
1367         int err;
1368
1369         err = snd_ctl_add(card, snd_ctl_new1(ctl, asihpi));
1370         if (err < 0)
1371                 return err;
1372         else if (mixer_dump)
1373                 snd_printk(KERN_INFO "added %s(%d)\n", ctl->name, ctl->index);
1374
1375         return 0;
1376 }
1377
1378 /* Convert HPI control name and location into ALSA control name */
1379 static void asihpi_ctl_init(struct snd_kcontrol_new *snd_control,
1380                                 struct hpi_control *hpi_ctl,
1381                                 char *name)
1382 {
1383         char *dir;
1384         memset(snd_control, 0, sizeof(*snd_control));
1385         snd_control->name = hpi_ctl->name;
1386         snd_control->private_value = hpi_ctl->h_control;
1387         snd_control->iface = SNDRV_CTL_ELEM_IFACE_MIXER;
1388         snd_control->index = 0;
1389
1390         if (hpi_ctl->src_node_type + HPI_SOURCENODE_NONE == HPI_SOURCENODE_CLOCK_SOURCE)
1391                 dir = ""; /* clock is neither capture nor playback */
1392         else if (hpi_ctl->dst_node_type + HPI_DESTNODE_NONE == HPI_DESTNODE_ISTREAM)
1393                 dir = "Capture ";  /* On or towards a PCM capture destination*/
1394         else if ((hpi_ctl->src_node_type + HPI_SOURCENODE_NONE != HPI_SOURCENODE_OSTREAM) &&
1395                 (!hpi_ctl->dst_node_type))
1396                 dir = "Capture "; /* On a source node that is not PCM playback */
1397         else if (hpi_ctl->src_node_type &&
1398                 (hpi_ctl->src_node_type + HPI_SOURCENODE_NONE != HPI_SOURCENODE_OSTREAM) &&
1399                 (hpi_ctl->dst_node_type))
1400                 dir = "Monitor Playback "; /* Between an input and an output */
1401         else
1402                 dir = "Playback "; /* PCM Playback source, or  output node */
1403
1404         if (hpi_ctl->src_node_type && hpi_ctl->dst_node_type)
1405                 sprintf(hpi_ctl->name, "%s %d %s %d %s%s",
1406                         asihpi_src_names[hpi_ctl->src_node_type],
1407                         hpi_ctl->src_node_index,
1408                         asihpi_dst_names[hpi_ctl->dst_node_type],
1409                         hpi_ctl->dst_node_index,
1410                         dir, name);
1411         else if (hpi_ctl->dst_node_type) {
1412                 sprintf(hpi_ctl->name, "%s %d %s%s",
1413                 asihpi_dst_names[hpi_ctl->dst_node_type],
1414                 hpi_ctl->dst_node_index,
1415                 dir, name);
1416         } else {
1417                 sprintf(hpi_ctl->name, "%s %d %s%s",
1418                 asihpi_src_names[hpi_ctl->src_node_type],
1419                 hpi_ctl->src_node_index,
1420                 dir, name);
1421         }
1422         /* printk(KERN_INFO "Adding %s %d to %d ",  hpi_ctl->name,
1423                 hpi_ctl->wSrcNodeType, hpi_ctl->wDstNodeType); */
1424 }
1425
1426 /*------------------------------------------------------------
1427    Volume controls
1428  ------------------------------------------------------------*/
1429 #define VOL_STEP_mB 1
1430 static int snd_asihpi_volume_info(struct snd_kcontrol *kcontrol,
1431                                   struct snd_ctl_elem_info *uinfo)
1432 {
1433         u32 h_control = kcontrol->private_value;
1434         u16 err;
1435         /* native gains are in millibels */
1436         short min_gain_mB;
1437         short max_gain_mB;
1438         short step_gain_mB;
1439
1440         err = hpi_volume_query_range(h_control,
1441                         &min_gain_mB, &max_gain_mB, &step_gain_mB);
1442         if (err) {
1443                 max_gain_mB = 0;
1444                 min_gain_mB = -10000;
1445                 step_gain_mB = VOL_STEP_mB;
1446         }
1447
1448         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1449         uinfo->count = 2;
1450         uinfo->value.integer.min = min_gain_mB / VOL_STEP_mB;
1451         uinfo->value.integer.max = max_gain_mB / VOL_STEP_mB;
1452         uinfo->value.integer.step = step_gain_mB / VOL_STEP_mB;
1453         return 0;
1454 }
1455
1456 static int snd_asihpi_volume_get(struct snd_kcontrol *kcontrol,
1457                                  struct snd_ctl_elem_value *ucontrol)
1458 {
1459         u32 h_control = kcontrol->private_value;
1460         short an_gain_mB[HPI_MAX_CHANNELS];
1461
1462         hpi_handle_error(hpi_volume_get_gain(h_control, an_gain_mB));
1463         ucontrol->value.integer.value[0] = an_gain_mB[0] / VOL_STEP_mB;
1464         ucontrol->value.integer.value[1] = an_gain_mB[1] / VOL_STEP_mB;
1465
1466         return 0;
1467 }
1468
1469 static int snd_asihpi_volume_put(struct snd_kcontrol *kcontrol,
1470                                  struct snd_ctl_elem_value *ucontrol)
1471 {
1472         int change;
1473         u32 h_control = kcontrol->private_value;
1474         short an_gain_mB[HPI_MAX_CHANNELS];
1475
1476         an_gain_mB[0] =
1477             (ucontrol->value.integer.value[0]) * VOL_STEP_mB;
1478         an_gain_mB[1] =
1479             (ucontrol->value.integer.value[1]) * VOL_STEP_mB;
1480         /*  change = asihpi->mixer_volume[addr][0] != left ||
1481            asihpi->mixer_volume[addr][1] != right;
1482          */
1483         change = 1;
1484         hpi_handle_error(hpi_volume_set_gain(h_control, an_gain_mB));
1485         return change;
1486 }
1487
1488 static const DECLARE_TLV_DB_SCALE(db_scale_100, -10000, VOL_STEP_mB, 0);
1489
1490 static int __devinit snd_asihpi_volume_add(struct snd_card_asihpi *asihpi,
1491                                         struct hpi_control *hpi_ctl)
1492 {
1493         struct snd_card *card = asihpi->card;
1494         struct snd_kcontrol_new snd_control;
1495
1496         asihpi_ctl_init(&snd_control, hpi_ctl, "Volume");
1497         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE |
1498                                 SNDRV_CTL_ELEM_ACCESS_TLV_READ;
1499         snd_control.info = snd_asihpi_volume_info;
1500         snd_control.get = snd_asihpi_volume_get;
1501         snd_control.put = snd_asihpi_volume_put;
1502         snd_control.tlv.p = db_scale_100;
1503
1504         return ctl_add(card, &snd_control, asihpi);
1505 }
1506
1507 /*------------------------------------------------------------
1508    Level controls
1509  ------------------------------------------------------------*/
1510 static int snd_asihpi_level_info(struct snd_kcontrol *kcontrol,
1511                                  struct snd_ctl_elem_info *uinfo)
1512 {
1513         u32 h_control = kcontrol->private_value;
1514         u16 err;
1515         short min_gain_mB;
1516         short max_gain_mB;
1517         short step_gain_mB;
1518
1519         err =
1520             hpi_level_query_range(h_control, &min_gain_mB,
1521                                &max_gain_mB, &step_gain_mB);
1522         if (err) {
1523                 max_gain_mB = 2400;
1524                 min_gain_mB = -1000;
1525                 step_gain_mB = 100;
1526         }
1527
1528         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1529         uinfo->count = 2;
1530         uinfo->value.integer.min = min_gain_mB / HPI_UNITS_PER_dB;
1531         uinfo->value.integer.max = max_gain_mB / HPI_UNITS_PER_dB;
1532         uinfo->value.integer.step = step_gain_mB / HPI_UNITS_PER_dB;
1533         return 0;
1534 }
1535
1536 static int snd_asihpi_level_get(struct snd_kcontrol *kcontrol,
1537                                 struct snd_ctl_elem_value *ucontrol)
1538 {
1539         u32 h_control = kcontrol->private_value;
1540         short an_gain_mB[HPI_MAX_CHANNELS];
1541
1542         hpi_handle_error(hpi_level_get_gain(h_control, an_gain_mB));
1543         ucontrol->value.integer.value[0] =
1544             an_gain_mB[0] / HPI_UNITS_PER_dB;
1545         ucontrol->value.integer.value[1] =
1546             an_gain_mB[1] / HPI_UNITS_PER_dB;
1547
1548         return 0;
1549 }
1550
1551 static int snd_asihpi_level_put(struct snd_kcontrol *kcontrol,
1552                                 struct snd_ctl_elem_value *ucontrol)
1553 {
1554         int change;
1555         u32 h_control = kcontrol->private_value;
1556         short an_gain_mB[HPI_MAX_CHANNELS];
1557
1558         an_gain_mB[0] =
1559             (ucontrol->value.integer.value[0]) * HPI_UNITS_PER_dB;
1560         an_gain_mB[1] =
1561             (ucontrol->value.integer.value[1]) * HPI_UNITS_PER_dB;
1562         /*  change = asihpi->mixer_level[addr][0] != left ||
1563            asihpi->mixer_level[addr][1] != right;
1564          */
1565         change = 1;
1566         hpi_handle_error(hpi_level_set_gain(h_control, an_gain_mB));
1567         return change;
1568 }
1569
1570 static const DECLARE_TLV_DB_SCALE(db_scale_level, -1000, 100, 0);
1571
1572 static int __devinit snd_asihpi_level_add(struct snd_card_asihpi *asihpi,
1573                                         struct hpi_control *hpi_ctl)
1574 {
1575         struct snd_card *card = asihpi->card;
1576         struct snd_kcontrol_new snd_control;
1577
1578         /* can't use 'volume' cos some nodes have volume as well */
1579         asihpi_ctl_init(&snd_control, hpi_ctl, "Level");
1580         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE |
1581                                 SNDRV_CTL_ELEM_ACCESS_TLV_READ;
1582         snd_control.info = snd_asihpi_level_info;
1583         snd_control.get = snd_asihpi_level_get;
1584         snd_control.put = snd_asihpi_level_put;
1585         snd_control.tlv.p = db_scale_level;
1586
1587         return ctl_add(card, &snd_control, asihpi);
1588 }
1589
1590 /*------------------------------------------------------------
1591    AESEBU controls
1592  ------------------------------------------------------------*/
1593
1594 /* AESEBU format */
1595 static const char * const asihpi_aesebu_format_names[] = {
1596         "N/A", "S/PDIF", "AES/EBU" };
1597
1598 static int snd_asihpi_aesebu_format_info(struct snd_kcontrol *kcontrol,
1599                                   struct snd_ctl_elem_info *uinfo)
1600 {
1601         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
1602         uinfo->count = 1;
1603         uinfo->value.enumerated.items = 3;
1604
1605         if (uinfo->value.enumerated.item >= uinfo->value.enumerated.items)
1606                 uinfo->value.enumerated.item =
1607                         uinfo->value.enumerated.items - 1;
1608
1609         strcpy(uinfo->value.enumerated.name,
1610                 asihpi_aesebu_format_names[uinfo->value.enumerated.item]);
1611
1612         return 0;
1613 }
1614
1615 static int snd_asihpi_aesebu_format_get(struct snd_kcontrol *kcontrol,
1616                         struct snd_ctl_elem_value *ucontrol,
1617                         u16 (*func)(u32, u16 *))
1618 {
1619         u32 h_control = kcontrol->private_value;
1620         u16 source, err;
1621
1622         err = func(h_control, &source);
1623
1624         /* default to N/A */
1625         ucontrol->value.enumerated.item[0] = 0;
1626         /* return success but set the control to N/A */
1627         if (err)
1628                 return 0;
1629         if (source == HPI_AESEBU_FORMAT_SPDIF)
1630                 ucontrol->value.enumerated.item[0] = 1;
1631         if (source == HPI_AESEBU_FORMAT_AESEBU)
1632                 ucontrol->value.enumerated.item[0] = 2;
1633
1634         return 0;
1635 }
1636
1637 static int snd_asihpi_aesebu_format_put(struct snd_kcontrol *kcontrol,
1638                         struct snd_ctl_elem_value *ucontrol,
1639                          u16 (*func)(u32, u16))
1640 {
1641         u32 h_control = kcontrol->private_value;
1642
1643         /* default to S/PDIF */
1644         u16 source = HPI_AESEBU_FORMAT_SPDIF;
1645
1646         if (ucontrol->value.enumerated.item[0] == 1)
1647                 source = HPI_AESEBU_FORMAT_SPDIF;
1648         if (ucontrol->value.enumerated.item[0] == 2)
1649                 source = HPI_AESEBU_FORMAT_AESEBU;
1650
1651         if (func(h_control, source) != 0)
1652                 return -EINVAL;
1653
1654         return 1;
1655 }
1656
1657 static int snd_asihpi_aesebu_rx_format_get(struct snd_kcontrol *kcontrol,
1658                                  struct snd_ctl_elem_value *ucontrol) {
1659         return snd_asihpi_aesebu_format_get(kcontrol, ucontrol,
1660                                         hpi_aesebu_receiver_get_format);
1661 }
1662
1663 static int snd_asihpi_aesebu_rx_format_put(struct snd_kcontrol *kcontrol,
1664                                  struct snd_ctl_elem_value *ucontrol) {
1665         return snd_asihpi_aesebu_format_put(kcontrol, ucontrol,
1666                                         hpi_aesebu_receiver_set_format);
1667 }
1668
1669 static int snd_asihpi_aesebu_rxstatus_info(struct snd_kcontrol *kcontrol,
1670                                   struct snd_ctl_elem_info *uinfo)
1671 {
1672         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1673         uinfo->count = 1;
1674
1675         uinfo->value.integer.min = 0;
1676         uinfo->value.integer.max = 0X1F;
1677         uinfo->value.integer.step = 1;
1678
1679         return 0;
1680 }
1681
1682 static int snd_asihpi_aesebu_rxstatus_get(struct snd_kcontrol *kcontrol,
1683                                  struct snd_ctl_elem_value *ucontrol) {
1684
1685         u32 h_control = kcontrol->private_value;
1686         u16 status;
1687
1688         hpi_handle_error(hpi_aesebu_receiver_get_error_status(
1689                                          h_control, &status));
1690         ucontrol->value.integer.value[0] = status;
1691         return 0;
1692 }
1693
1694 static int __devinit snd_asihpi_aesebu_rx_add(struct snd_card_asihpi *asihpi,
1695                                         struct hpi_control *hpi_ctl)
1696 {
1697         struct snd_card *card = asihpi->card;
1698         struct snd_kcontrol_new snd_control;
1699
1700         asihpi_ctl_init(&snd_control, hpi_ctl, "Format");
1701         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE;
1702         snd_control.info = snd_asihpi_aesebu_format_info;
1703         snd_control.get = snd_asihpi_aesebu_rx_format_get;
1704         snd_control.put = snd_asihpi_aesebu_rx_format_put;
1705
1706
1707         if (ctl_add(card, &snd_control, asihpi) < 0)
1708                 return -EINVAL;
1709
1710         asihpi_ctl_init(&snd_control, hpi_ctl, "Status");
1711         snd_control.access =
1712             SNDRV_CTL_ELEM_ACCESS_VOLATILE | SNDRV_CTL_ELEM_ACCESS_READ;
1713         snd_control.info = snd_asihpi_aesebu_rxstatus_info;
1714         snd_control.get = snd_asihpi_aesebu_rxstatus_get;
1715
1716         return ctl_add(card, &snd_control, asihpi);
1717 }
1718
1719 static int snd_asihpi_aesebu_tx_format_get(struct snd_kcontrol *kcontrol,
1720                                  struct snd_ctl_elem_value *ucontrol) {
1721         return snd_asihpi_aesebu_format_get(kcontrol, ucontrol,
1722                                         hpi_aesebu_transmitter_get_format);
1723 }
1724
1725 static int snd_asihpi_aesebu_tx_format_put(struct snd_kcontrol *kcontrol,
1726                                  struct snd_ctl_elem_value *ucontrol) {
1727         return snd_asihpi_aesebu_format_put(kcontrol, ucontrol,
1728                                         hpi_aesebu_transmitter_set_format);
1729 }
1730
1731
1732 static int __devinit snd_asihpi_aesebu_tx_add(struct snd_card_asihpi *asihpi,
1733                                         struct hpi_control *hpi_ctl)
1734 {
1735         struct snd_card *card = asihpi->card;
1736         struct snd_kcontrol_new snd_control;
1737
1738         asihpi_ctl_init(&snd_control, hpi_ctl, "Format");
1739         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE;
1740         snd_control.info = snd_asihpi_aesebu_format_info;
1741         snd_control.get = snd_asihpi_aesebu_tx_format_get;
1742         snd_control.put = snd_asihpi_aesebu_tx_format_put;
1743
1744         return ctl_add(card, &snd_control, asihpi);
1745 }
1746
1747 /*------------------------------------------------------------
1748    Tuner controls
1749  ------------------------------------------------------------*/
1750
1751 /* Gain */
1752
1753 static int snd_asihpi_tuner_gain_info(struct snd_kcontrol *kcontrol,
1754                                   struct snd_ctl_elem_info *uinfo)
1755 {
1756         u32 h_control = kcontrol->private_value;
1757         u16 err;
1758         short idx;
1759         u16 gain_range[3];
1760
1761         for (idx = 0; idx < 3; idx++) {
1762                 err = hpi_tuner_query_gain(h_control,
1763                                           idx, &gain_range[idx]);
1764                 if (err != 0)
1765                         return err;
1766         }
1767
1768         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1769         uinfo->count = 1;
1770         uinfo->value.integer.min = ((int)gain_range[0]) / HPI_UNITS_PER_dB;
1771         uinfo->value.integer.max = ((int)gain_range[1]) / HPI_UNITS_PER_dB;
1772         uinfo->value.integer.step = ((int) gain_range[2]) / HPI_UNITS_PER_dB;
1773         return 0;
1774 }
1775
1776 static int snd_asihpi_tuner_gain_get(struct snd_kcontrol *kcontrol,
1777                                  struct snd_ctl_elem_value *ucontrol)
1778 {
1779         /*
1780         struct snd_card_asihpi *asihpi = snd_kcontrol_chip(kcontrol);
1781         */
1782         u32 h_control = kcontrol->private_value;
1783         short gain;
1784
1785         hpi_handle_error(hpi_tuner_get_gain(h_control, &gain));
1786         ucontrol->value.integer.value[0] = gain / HPI_UNITS_PER_dB;
1787
1788         return 0;
1789 }
1790
1791 static int snd_asihpi_tuner_gain_put(struct snd_kcontrol *kcontrol,
1792                                  struct snd_ctl_elem_value *ucontrol)
1793 {
1794         /*
1795         struct snd_card_asihpi *asihpi = snd_kcontrol_chip(kcontrol);
1796         */
1797         u32 h_control = kcontrol->private_value;
1798         short gain;
1799
1800         gain = (ucontrol->value.integer.value[0]) * HPI_UNITS_PER_dB;
1801         hpi_handle_error(hpi_tuner_set_gain(h_control, gain));
1802
1803         return 1;
1804 }
1805
1806 /* Band  */
1807
1808 static int asihpi_tuner_band_query(struct snd_kcontrol *kcontrol,
1809                                         u16 *band_list, u32 len) {
1810         u32 h_control = kcontrol->private_value;
1811         u16 err = 0;
1812         u32 i;
1813
1814         for (i = 0; i < len; i++) {
1815                 err = hpi_tuner_query_band(
1816                                 h_control, i, &band_list[i]);
1817                 if (err != 0)
1818                         break;
1819         }
1820
1821         if (err && (err != HPI_ERROR_INVALID_OBJ_INDEX))
1822                 return -EIO;
1823
1824         return i;
1825 }
1826
1827 static int snd_asihpi_tuner_band_info(struct snd_kcontrol *kcontrol,
1828                                   struct snd_ctl_elem_info *uinfo)
1829 {
1830         u16 tuner_bands[HPI_TUNER_BAND_LAST];
1831         int num_bands = 0;
1832
1833         num_bands = asihpi_tuner_band_query(kcontrol, tuner_bands,
1834                                 HPI_TUNER_BAND_LAST);
1835
1836         if (num_bands < 0)
1837                 return num_bands;
1838
1839         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
1840         uinfo->count = 1;
1841         uinfo->value.enumerated.items = num_bands;
1842
1843         if (num_bands > 0) {
1844                 if (uinfo->value.enumerated.item >=
1845                                         uinfo->value.enumerated.items)
1846                         uinfo->value.enumerated.item =
1847                                 uinfo->value.enumerated.items - 1;
1848
1849                 strcpy(uinfo->value.enumerated.name,
1850                         asihpi_tuner_band_names[
1851                                 tuner_bands[uinfo->value.enumerated.item]]);
1852
1853         }
1854         return 0;
1855 }
1856
1857 static int snd_asihpi_tuner_band_get(struct snd_kcontrol *kcontrol,
1858                                  struct snd_ctl_elem_value *ucontrol)
1859 {
1860         u32 h_control = kcontrol->private_value;
1861         /*
1862         struct snd_card_asihpi *asihpi = snd_kcontrol_chip(kcontrol);
1863         */
1864         u16 band, idx;
1865         u16 tuner_bands[HPI_TUNER_BAND_LAST];
1866         u32 num_bands = 0;
1867
1868         num_bands = asihpi_tuner_band_query(kcontrol, tuner_bands,
1869                                 HPI_TUNER_BAND_LAST);
1870
1871         hpi_handle_error(hpi_tuner_get_band(h_control, &band));
1872
1873         ucontrol->value.enumerated.item[0] = -1;
1874         for (idx = 0; idx < HPI_TUNER_BAND_LAST; idx++)
1875                 if (tuner_bands[idx] == band) {
1876                         ucontrol->value.enumerated.item[0] = idx;
1877                         break;
1878                 }
1879
1880         return 0;
1881 }
1882
1883 static int snd_asihpi_tuner_band_put(struct snd_kcontrol *kcontrol,
1884                                  struct snd_ctl_elem_value *ucontrol)
1885 {
1886         /*
1887         struct snd_card_asihpi *asihpi = snd_kcontrol_chip(kcontrol);
1888         */
1889         u32 h_control = kcontrol->private_value;
1890         u16 band;
1891         u16 tuner_bands[HPI_TUNER_BAND_LAST];
1892         u32 num_bands = 0;
1893
1894         num_bands = asihpi_tuner_band_query(kcontrol, tuner_bands,
1895                         HPI_TUNER_BAND_LAST);
1896
1897         band = tuner_bands[ucontrol->value.enumerated.item[0]];
1898         hpi_handle_error(hpi_tuner_set_band(h_control, band));
1899
1900         return 1;
1901 }
1902
1903 /* Freq */
1904
1905 static int snd_asihpi_tuner_freq_info(struct snd_kcontrol *kcontrol,
1906                                   struct snd_ctl_elem_info *uinfo)
1907 {
1908         u32 h_control = kcontrol->private_value;
1909         u16 err;
1910         u16 tuner_bands[HPI_TUNER_BAND_LAST];
1911         u16 num_bands = 0, band_iter, idx;
1912         u32 freq_range[3], temp_freq_range[3];
1913
1914         num_bands = asihpi_tuner_band_query(kcontrol, tuner_bands,
1915                         HPI_TUNER_BAND_LAST);
1916
1917         freq_range[0] = INT_MAX;
1918         freq_range[1] = 0;
1919         freq_range[2] = INT_MAX;
1920
1921         for (band_iter = 0; band_iter < num_bands; band_iter++) {
1922                 for (idx = 0; idx < 3; idx++) {
1923                         err = hpi_tuner_query_frequency(h_control,
1924                                 idx, tuner_bands[band_iter],
1925                                 &temp_freq_range[idx]);
1926                         if (err != 0)
1927                                 return err;
1928                 }
1929
1930                 /* skip band with bogus stepping */
1931                 if (temp_freq_range[2] <= 0)
1932                         continue;
1933
1934                 if (temp_freq_range[0] < freq_range[0])
1935                         freq_range[0] = temp_freq_range[0];
1936                 if (temp_freq_range[1] > freq_range[1])
1937                         freq_range[1] = temp_freq_range[1];
1938                 if (temp_freq_range[2] < freq_range[2])
1939                         freq_range[2] = temp_freq_range[2];
1940         }
1941
1942         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
1943         uinfo->count = 1;
1944         uinfo->value.integer.min = ((int)freq_range[0]);
1945         uinfo->value.integer.max = ((int)freq_range[1]);
1946         uinfo->value.integer.step = ((int)freq_range[2]);
1947         return 0;
1948 }
1949
1950 static int snd_asihpi_tuner_freq_get(struct snd_kcontrol *kcontrol,
1951                                  struct snd_ctl_elem_value *ucontrol)
1952 {
1953         u32 h_control = kcontrol->private_value;
1954         u32 freq;
1955
1956         hpi_handle_error(hpi_tuner_get_frequency(h_control, &freq));
1957         ucontrol->value.integer.value[0] = freq;
1958
1959         return 0;
1960 }
1961
1962 static int snd_asihpi_tuner_freq_put(struct snd_kcontrol *kcontrol,
1963                                  struct snd_ctl_elem_value *ucontrol)
1964 {
1965         u32 h_control = kcontrol->private_value;
1966         u32 freq;
1967
1968         freq = ucontrol->value.integer.value[0];
1969         hpi_handle_error(hpi_tuner_set_frequency(h_control, freq));
1970
1971         return 1;
1972 }
1973
1974 /* Tuner control group initializer  */
1975 static int __devinit snd_asihpi_tuner_add(struct snd_card_asihpi *asihpi,
1976                                         struct hpi_control *hpi_ctl)
1977 {
1978         struct snd_card *card = asihpi->card;
1979         struct snd_kcontrol_new snd_control;
1980
1981         snd_control.private_value = hpi_ctl->h_control;
1982         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE;
1983
1984         if (!hpi_tuner_get_gain(hpi_ctl->h_control, NULL)) {
1985                 asihpi_ctl_init(&snd_control, hpi_ctl, "Gain");
1986                 snd_control.info = snd_asihpi_tuner_gain_info;
1987                 snd_control.get = snd_asihpi_tuner_gain_get;
1988                 snd_control.put = snd_asihpi_tuner_gain_put;
1989
1990                 if (ctl_add(card, &snd_control, asihpi) < 0)
1991                         return -EINVAL;
1992         }
1993
1994         asihpi_ctl_init(&snd_control, hpi_ctl, "Band");
1995         snd_control.info = snd_asihpi_tuner_band_info;
1996         snd_control.get = snd_asihpi_tuner_band_get;
1997         snd_control.put = snd_asihpi_tuner_band_put;
1998
1999         if (ctl_add(card, &snd_control, asihpi) < 0)
2000                 return -EINVAL;
2001
2002         asihpi_ctl_init(&snd_control, hpi_ctl, "Freq");
2003         snd_control.info = snd_asihpi_tuner_freq_info;
2004         snd_control.get = snd_asihpi_tuner_freq_get;
2005         snd_control.put = snd_asihpi_tuner_freq_put;
2006
2007         return ctl_add(card, &snd_control, asihpi);
2008 }
2009
2010 /*------------------------------------------------------------
2011    Meter controls
2012  ------------------------------------------------------------*/
2013 static int snd_asihpi_meter_info(struct snd_kcontrol *kcontrol,
2014                                  struct snd_ctl_elem_info *uinfo)
2015 {
2016         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
2017         uinfo->count = HPI_MAX_CHANNELS;
2018         uinfo->value.integer.min = 0;
2019         uinfo->value.integer.max = 0x7FFFFFFF;
2020         return 0;
2021 }
2022
2023 /* linear values for 10dB steps */
2024 static int log2lin[] = {
2025         0x7FFFFFFF, /* 0dB */
2026         679093956,
2027         214748365,
2028          67909396,
2029          21474837,
2030           6790940,
2031           2147484, /* -60dB */
2032            679094,
2033            214748, /* -80 */
2034             67909,
2035             21475, /* -100 */
2036              6791,
2037              2147,
2038               679,
2039               214,
2040                68,
2041                21,
2042                 7,
2043                 2
2044 };
2045
2046 static int snd_asihpi_meter_get(struct snd_kcontrol *kcontrol,
2047                                 struct snd_ctl_elem_value *ucontrol)
2048 {
2049         u32 h_control = kcontrol->private_value;
2050         short an_gain_mB[HPI_MAX_CHANNELS], i;
2051         u16 err;
2052
2053         err = hpi_meter_get_peak(h_control, an_gain_mB);
2054
2055         for (i = 0; i < HPI_MAX_CHANNELS; i++) {
2056                 if (err) {
2057                         ucontrol->value.integer.value[i] = 0;
2058                 } else if (an_gain_mB[i] >= 0) {
2059                         ucontrol->value.integer.value[i] =
2060                                 an_gain_mB[i] << 16;
2061                 } else {
2062                         /* -ve is log value in millibels < -60dB,
2063                         * convert to (roughly!) linear,
2064                         */
2065                         ucontrol->value.integer.value[i] =
2066                                         log2lin[an_gain_mB[i] / -1000];
2067                 }
2068         }
2069         return 0;
2070 }
2071
2072 static int __devinit snd_asihpi_meter_add(struct snd_card_asihpi *asihpi,
2073                                         struct hpi_control *hpi_ctl, int subidx)
2074 {
2075         struct snd_card *card = asihpi->card;
2076         struct snd_kcontrol_new snd_control;
2077
2078         asihpi_ctl_init(&snd_control, hpi_ctl, "Meter");
2079         snd_control.access =
2080             SNDRV_CTL_ELEM_ACCESS_VOLATILE | SNDRV_CTL_ELEM_ACCESS_READ;
2081         snd_control.info = snd_asihpi_meter_info;
2082         snd_control.get = snd_asihpi_meter_get;
2083
2084         snd_control.index = subidx;
2085
2086         return ctl_add(card, &snd_control, asihpi);
2087 }
2088
2089 /*------------------------------------------------------------
2090    Multiplexer controls
2091  ------------------------------------------------------------*/
2092 static int snd_card_asihpi_mux_count_sources(struct snd_kcontrol *snd_control)
2093 {
2094         u32 h_control = snd_control->private_value;
2095         struct hpi_control hpi_ctl;
2096         int s, err;
2097         for (s = 0; s < 32; s++) {
2098                 err = hpi_multiplexer_query_source(h_control, s,
2099                                                   &hpi_ctl.
2100                                                   src_node_type,
2101                                                   &hpi_ctl.
2102                                                   src_node_index);
2103                 if (err)
2104                         break;
2105         }
2106         return s;
2107 }
2108
2109 static int snd_asihpi_mux_info(struct snd_kcontrol *kcontrol,
2110                                struct snd_ctl_elem_info *uinfo)
2111 {
2112         int err;
2113         u16 src_node_type, src_node_index;
2114         u32 h_control = kcontrol->private_value;
2115
2116         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
2117         uinfo->count = 1;
2118         uinfo->value.enumerated.items =
2119             snd_card_asihpi_mux_count_sources(kcontrol);
2120
2121         if (uinfo->value.enumerated.item >= uinfo->value.enumerated.items)
2122                 uinfo->value.enumerated.item =
2123                     uinfo->value.enumerated.items - 1;
2124
2125         err =
2126             hpi_multiplexer_query_source(h_control,
2127                                         uinfo->value.enumerated.item,
2128                                         &src_node_type, &src_node_index);
2129
2130         sprintf(uinfo->value.enumerated.name, "%s %d",
2131                 asihpi_src_names[src_node_type - HPI_SOURCENODE_NONE],
2132                 src_node_index);
2133         return 0;
2134 }
2135
2136 static int snd_asihpi_mux_get(struct snd_kcontrol *kcontrol,
2137                               struct snd_ctl_elem_value *ucontrol)
2138 {
2139         u32 h_control = kcontrol->private_value;
2140         u16 source_type, source_index;
2141         u16 src_node_type, src_node_index;
2142         int s;
2143
2144         hpi_handle_error(hpi_multiplexer_get_source(h_control,
2145                                 &source_type, &source_index));
2146         /* Should cache this search result! */
2147         for (s = 0; s < 256; s++) {
2148                 if (hpi_multiplexer_query_source(h_control, s,
2149                                             &src_node_type, &src_node_index))
2150                         break;
2151
2152                 if ((source_type == src_node_type)
2153                     && (source_index == src_node_index)) {
2154                         ucontrol->value.enumerated.item[0] = s;
2155                         return 0;
2156                 }
2157         }
2158         snd_printd(KERN_WARNING
2159                 "Control %x failed to match mux source %hu %hu\n",
2160                 h_control, source_type, source_index);
2161         ucontrol->value.enumerated.item[0] = 0;
2162         return 0;
2163 }
2164
2165 static int snd_asihpi_mux_put(struct snd_kcontrol *kcontrol,
2166                               struct snd_ctl_elem_value *ucontrol)
2167 {
2168         int change;
2169         u32 h_control = kcontrol->private_value;
2170         u16 source_type, source_index;
2171         u16 e;
2172
2173         change = 1;
2174
2175         e = hpi_multiplexer_query_source(h_control,
2176                                     ucontrol->value.enumerated.item[0],
2177                                     &source_type, &source_index);
2178         if (!e)
2179                 hpi_handle_error(
2180                         hpi_multiplexer_set_source(h_control,
2181                                                 source_type, source_index));
2182         return change;
2183 }
2184
2185
2186 static int  __devinit snd_asihpi_mux_add(struct snd_card_asihpi *asihpi,
2187                                         struct hpi_control *hpi_ctl)
2188 {
2189         struct snd_card *card = asihpi->card;
2190         struct snd_kcontrol_new snd_control;
2191
2192         asihpi_ctl_init(&snd_control, hpi_ctl, "Route");
2193         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE;
2194         snd_control.info = snd_asihpi_mux_info;
2195         snd_control.get = snd_asihpi_mux_get;
2196         snd_control.put = snd_asihpi_mux_put;
2197
2198         return ctl_add(card, &snd_control, asihpi);
2199
2200 }
2201
2202 /*------------------------------------------------------------
2203    Channel mode controls
2204  ------------------------------------------------------------*/
2205 static int snd_asihpi_cmode_info(struct snd_kcontrol *kcontrol,
2206                                  struct snd_ctl_elem_info *uinfo)
2207 {
2208         static const char * const mode_names[HPI_CHANNEL_MODE_LAST + 1] = {
2209                 "invalid",
2210                 "Normal", "Swap",
2211                 "From Left", "From Right",
2212                 "To Left", "To Right"
2213         };
2214
2215         u32 h_control = kcontrol->private_value;
2216         u16 mode;
2217         int i;
2218         u16 mode_map[6];
2219         int valid_modes = 0;
2220
2221         /* HPI channel mode values can be from 1 to 6
2222         Some adapters only support a contiguous subset
2223         */
2224         for (i = 0; i < HPI_CHANNEL_MODE_LAST; i++)
2225                 if (!hpi_channel_mode_query_mode(
2226                         h_control, i, &mode)) {
2227                         mode_map[valid_modes] = mode;
2228                         valid_modes++;
2229                         }
2230
2231         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
2232         uinfo->count = 1;
2233         uinfo->value.enumerated.items = valid_modes;
2234
2235         if (uinfo->value.enumerated.item >= valid_modes)
2236                 uinfo->value.enumerated.item = valid_modes - 1;
2237
2238         strcpy(uinfo->value.enumerated.name,
2239                mode_names[mode_map[uinfo->value.enumerated.item]]);
2240
2241         return 0;
2242 }
2243
2244 static int snd_asihpi_cmode_get(struct snd_kcontrol *kcontrol,
2245                                 struct snd_ctl_elem_value *ucontrol)
2246 {
2247         u32 h_control = kcontrol->private_value;
2248         u16 mode;
2249
2250         if (hpi_channel_mode_get(h_control, &mode))
2251                 mode = 1;
2252
2253         ucontrol->value.enumerated.item[0] = mode - 1;
2254
2255         return 0;
2256 }
2257
2258 static int snd_asihpi_cmode_put(struct snd_kcontrol *kcontrol,
2259                                 struct snd_ctl_elem_value *ucontrol)
2260 {
2261         int change;
2262         u32 h_control = kcontrol->private_value;
2263
2264         change = 1;
2265
2266         hpi_handle_error(hpi_channel_mode_set(h_control,
2267                            ucontrol->value.enumerated.item[0] + 1));
2268         return change;
2269 }
2270
2271
2272 static int __devinit snd_asihpi_cmode_add(struct snd_card_asihpi *asihpi,
2273                                         struct hpi_control *hpi_ctl)
2274 {
2275         struct snd_card *card = asihpi->card;
2276         struct snd_kcontrol_new snd_control;
2277
2278         asihpi_ctl_init(&snd_control, hpi_ctl, "Mode");
2279         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE;
2280         snd_control.info = snd_asihpi_cmode_info;
2281         snd_control.get = snd_asihpi_cmode_get;
2282         snd_control.put = snd_asihpi_cmode_put;
2283
2284         return ctl_add(card, &snd_control, asihpi);
2285 }
2286
2287 /*------------------------------------------------------------
2288    Sampleclock source  controls
2289  ------------------------------------------------------------*/
2290 static char *sampleclock_sources[MAX_CLOCKSOURCES] = {
2291         "N/A", "Local PLL", "Digital Sync", "Word External", "Word Header",
2292         "SMPTE", "Digital1", "Auto", "Network", "Invalid",
2293         "Prev Module",
2294         "Digital2", "Digital3", "Digital4", "Digital5",
2295         "Digital6", "Digital7", "Digital8"};
2296
2297 static int snd_asihpi_clksrc_info(struct snd_kcontrol *kcontrol,
2298                                   struct snd_ctl_elem_info *uinfo)
2299 {
2300         struct snd_card_asihpi *asihpi =
2301                         (struct snd_card_asihpi *)(kcontrol->private_data);
2302         struct clk_cache *clkcache = &asihpi->cc;
2303         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
2304         uinfo->count = 1;
2305         uinfo->value.enumerated.items = clkcache->count;
2306
2307         if (uinfo->value.enumerated.item >= uinfo->value.enumerated.items)
2308                 uinfo->value.enumerated.item =
2309                                 uinfo->value.enumerated.items - 1;
2310
2311         strcpy(uinfo->value.enumerated.name,
2312                clkcache->s[uinfo->value.enumerated.item].name);
2313         return 0;
2314 }
2315
2316 static int snd_asihpi_clksrc_get(struct snd_kcontrol *kcontrol,
2317                                  struct snd_ctl_elem_value *ucontrol)
2318 {
2319         struct snd_card_asihpi *asihpi =
2320                         (struct snd_card_asihpi *)(kcontrol->private_data);
2321         struct clk_cache *clkcache = &asihpi->cc;
2322         u32 h_control = kcontrol->private_value;
2323         u16 source, srcindex = 0;
2324         int i;
2325
2326         ucontrol->value.enumerated.item[0] = 0;
2327         if (hpi_sample_clock_get_source(h_control, &source))
2328                 source = 0;
2329
2330         if (source == HPI_SAMPLECLOCK_SOURCE_AESEBU_INPUT)
2331                 if (hpi_sample_clock_get_source_index(h_control, &srcindex))
2332                         srcindex = 0;
2333
2334         for (i = 0; i < clkcache->count; i++)
2335                 if ((clkcache->s[i].source == source) &&
2336                         (clkcache->s[i].index == srcindex))
2337                         break;
2338
2339         ucontrol->value.enumerated.item[0] = i;
2340
2341         return 0;
2342 }
2343
2344 static int snd_asihpi_clksrc_put(struct snd_kcontrol *kcontrol,
2345                                  struct snd_ctl_elem_value *ucontrol)
2346 {
2347         struct snd_card_asihpi *asihpi =
2348                         (struct snd_card_asihpi *)(kcontrol->private_data);
2349         struct clk_cache *clkcache = &asihpi->cc;
2350         int change, item;
2351         u32 h_control = kcontrol->private_value;
2352
2353         change = 1;
2354         item = ucontrol->value.enumerated.item[0];
2355         if (item >= clkcache->count)
2356                 item = clkcache->count-1;
2357
2358         hpi_handle_error(hpi_sample_clock_set_source(
2359                                 h_control, clkcache->s[item].source));
2360
2361         if (clkcache->s[item].source == HPI_SAMPLECLOCK_SOURCE_AESEBU_INPUT)
2362                 hpi_handle_error(hpi_sample_clock_set_source_index(
2363                                 h_control, clkcache->s[item].index));
2364         return change;
2365 }
2366
2367 /*------------------------------------------------------------
2368    Clkrate controls
2369  ------------------------------------------------------------*/
2370 /* Need to change this to enumerated control with list of rates */
2371 static int snd_asihpi_clklocal_info(struct snd_kcontrol *kcontrol,
2372                                    struct snd_ctl_elem_info *uinfo)
2373 {
2374         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
2375         uinfo->count = 1;
2376         uinfo->value.integer.min = 8000;
2377         uinfo->value.integer.max = 192000;
2378         uinfo->value.integer.step = 100;
2379
2380         return 0;
2381 }
2382
2383 static int snd_asihpi_clklocal_get(struct snd_kcontrol *kcontrol,
2384                                   struct snd_ctl_elem_value *ucontrol)
2385 {
2386         u32 h_control = kcontrol->private_value;
2387         u32 rate;
2388         u16 e;
2389
2390         e = hpi_sample_clock_get_local_rate(h_control, &rate);
2391         if (!e)
2392                 ucontrol->value.integer.value[0] = rate;
2393         else
2394                 ucontrol->value.integer.value[0] = 0;
2395         return 0;
2396 }
2397
2398 static int snd_asihpi_clklocal_put(struct snd_kcontrol *kcontrol,
2399                                   struct snd_ctl_elem_value *ucontrol)
2400 {
2401         int change;
2402         u32 h_control = kcontrol->private_value;
2403
2404         /*  change = asihpi->mixer_clkrate[addr][0] != left ||
2405            asihpi->mixer_clkrate[addr][1] != right;
2406          */
2407         change = 1;
2408         hpi_handle_error(hpi_sample_clock_set_local_rate(h_control,
2409                                       ucontrol->value.integer.value[0]));
2410         return change;
2411 }
2412
2413 static int snd_asihpi_clkrate_info(struct snd_kcontrol *kcontrol,
2414                                    struct snd_ctl_elem_info *uinfo)
2415 {
2416         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
2417         uinfo->count = 1;
2418         uinfo->value.integer.min = 8000;
2419         uinfo->value.integer.max = 192000;
2420         uinfo->value.integer.step = 100;
2421
2422         return 0;
2423 }
2424
2425 static int snd_asihpi_clkrate_get(struct snd_kcontrol *kcontrol,
2426                                   struct snd_ctl_elem_value *ucontrol)
2427 {
2428         u32 h_control = kcontrol->private_value;
2429         u32 rate;
2430         u16 e;
2431
2432         e = hpi_sample_clock_get_sample_rate(h_control, &rate);
2433         if (!e)
2434                 ucontrol->value.integer.value[0] = rate;
2435         else
2436                 ucontrol->value.integer.value[0] = 0;
2437         return 0;
2438 }
2439
2440 static int __devinit snd_asihpi_sampleclock_add(struct snd_card_asihpi *asihpi,
2441                                         struct hpi_control *hpi_ctl)
2442 {
2443         struct snd_card *card = asihpi->card;
2444         struct snd_kcontrol_new snd_control;
2445
2446         struct clk_cache *clkcache = &asihpi->cc;
2447         u32 hSC =  hpi_ctl->h_control;
2448         int has_aes_in = 0;
2449         int i, j;
2450         u16 source;
2451
2452         snd_control.private_value = hpi_ctl->h_control;
2453
2454         clkcache->has_local = 0;
2455
2456         for (i = 0; i <= HPI_SAMPLECLOCK_SOURCE_LAST; i++) {
2457                 if  (hpi_sample_clock_query_source(hSC,
2458                                 i, &source))
2459                         break;
2460                 clkcache->s[i].source = source;
2461                 clkcache->s[i].index = 0;
2462                 clkcache->s[i].name = sampleclock_sources[source];
2463                 if (source == HPI_SAMPLECLOCK_SOURCE_AESEBU_INPUT)
2464                         has_aes_in = 1;
2465                 if (source == HPI_SAMPLECLOCK_SOURCE_LOCAL)
2466                         clkcache->has_local = 1;
2467         }
2468         if (has_aes_in)
2469                 /* already will have picked up index 0 above */
2470                 for (j = 1; j < 8; j++) {
2471                         if (hpi_sample_clock_query_source_index(hSC,
2472                                 j, HPI_SAMPLECLOCK_SOURCE_AESEBU_INPUT,
2473                                 &source))
2474                                 break;
2475                         clkcache->s[i].source =
2476                                 HPI_SAMPLECLOCK_SOURCE_AESEBU_INPUT;
2477                         clkcache->s[i].index = j;
2478                         clkcache->s[i].name = sampleclock_sources[
2479                                         j+HPI_SAMPLECLOCK_SOURCE_LAST];
2480                         i++;
2481                 }
2482         clkcache->count = i;
2483
2484         asihpi_ctl_init(&snd_control, hpi_ctl, "Source");
2485         snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE ;
2486         snd_control.info = snd_asihpi_clksrc_info;
2487         snd_control.get = snd_asihpi_clksrc_get;
2488         snd_control.put = snd_asihpi_clksrc_put;
2489         if (ctl_add(card, &snd_control, asihpi) < 0)
2490                 return -EINVAL;
2491
2492
2493         if (clkcache->has_local) {
2494                 asihpi_ctl_init(&snd_control, hpi_ctl, "Localrate");
2495                 snd_control.access = SNDRV_CTL_ELEM_ACCESS_READWRITE ;
2496                 snd_control.info = snd_asihpi_clklocal_info;
2497                 snd_control.get = snd_asihpi_clklocal_get;
2498                 snd_control.put = snd_asihpi_clklocal_put;
2499
2500
2501                 if (ctl_add(card, &snd_control, asihpi) < 0)
2502                         return -EINVAL;
2503         }
2504
2505         asihpi_ctl_init(&snd_control, hpi_ctl, "Rate");
2506         snd_control.access =
2507             SNDRV_CTL_ELEM_ACCESS_VOLATILE | SNDRV_CTL_ELEM_ACCESS_READ;
2508         snd_control.info = snd_asihpi_clkrate_info;
2509         snd_control.get = snd_asihpi_clkrate_get;
2510
2511         return ctl_add(card, &snd_control, asihpi);
2512 }
2513 /*------------------------------------------------------------
2514    Mixer
2515  ------------------------------------------------------------*/
2516
2517 static int __devinit snd_card_asihpi_mixer_new(struct snd_card_asihpi *asihpi)
2518 {
2519         struct snd_card *card = asihpi->card;
2520         unsigned int idx = 0;
2521         unsigned int subindex = 0;
2522         int err;
2523         struct hpi_control hpi_ctl, prev_ctl;
2524
2525         if (snd_BUG_ON(!asihpi))
2526                 return -EINVAL;
2527         strcpy(card->mixername, "Asihpi Mixer");
2528
2529         err =
2530             hpi_mixer_open(asihpi->adapter_index,
2531                           &asihpi->h_mixer);
2532         hpi_handle_error(err);
2533         if (err)
2534                 return -err;
2535
2536         memset(&prev_ctl, 0, sizeof(prev_ctl));
2537         prev_ctl.control_type = -1;
2538
2539         for (idx = 0; idx < 2000; idx++) {
2540                 err = hpi_mixer_get_control_by_index(
2541                                 asihpi->h_mixer,
2542                                 idx,
2543                                 &hpi_ctl.src_node_type,
2544                                 &hpi_ctl.src_node_index,
2545                                 &hpi_ctl.dst_node_type,
2546                                 &hpi_ctl.dst_node_index,
2547                                 &hpi_ctl.control_type,
2548                                 &hpi_ctl.h_control);
2549                 if (err) {
2550                         if (err == HPI_ERROR_CONTROL_DISABLED) {
2551                                 if (mixer_dump)
2552                                         snd_printk(KERN_INFO
2553                                                    "Disabled HPI Control(%d)\n",
2554                                                    idx);
2555                                 continue;
2556                         } else
2557                                 break;
2558
2559                 }
2560
2561                 hpi_ctl.src_node_type -= HPI_SOURCENODE_NONE;
2562                 hpi_ctl.dst_node_type -= HPI_DESTNODE_NONE;
2563
2564                 /* ASI50xx in SSX mode has multiple meters on the same node.
2565                    Use subindex to create distinct ALSA controls
2566                    for any duplicated controls.
2567                 */
2568                 if ((hpi_ctl.control_type == prev_ctl.control_type) &&
2569                     (hpi_ctl.src_node_type == prev_ctl.src_node_type) &&
2570                     (hpi_ctl.src_node_index == prev_ctl.src_node_index) &&
2571                     (hpi_ctl.dst_node_type == prev_ctl.dst_node_type) &&
2572                     (hpi_ctl.dst_node_index == prev_ctl.dst_node_index))
2573                         subindex++;
2574                 else
2575                         subindex = 0;
2576
2577                 prev_ctl = hpi_ctl;
2578
2579                 switch (hpi_ctl.control_type) {
2580                 case HPI_CONTROL_VOLUME:
2581                         err = snd_asihpi_volume_add(asihpi, &hpi_ctl);
2582                         break;
2583                 case HPI_CONTROL_LEVEL:
2584                         err = snd_asihpi_level_add(asihpi, &hpi_ctl);
2585                         break;
2586                 case HPI_CONTROL_MULTIPLEXER:
2587                         err = snd_asihpi_mux_add(asihpi, &hpi_ctl);
2588                         break;
2589                 case HPI_CONTROL_CHANNEL_MODE:
2590                         err = snd_asihpi_cmode_add(asihpi, &hpi_ctl);
2591                         break;
2592                 case HPI_CONTROL_METER:
2593                         err = snd_asihpi_meter_add(asihpi, &hpi_ctl, subindex);
2594                         break;
2595                 case HPI_CONTROL_SAMPLECLOCK:
2596                         err = snd_asihpi_sampleclock_add(
2597                                                 asihpi, &hpi_ctl);
2598                         break;
2599                 case HPI_CONTROL_CONNECTION:    /* ignore these */
2600                         continue;
2601                 case HPI_CONTROL_TUNER:
2602                         err = snd_asihpi_tuner_add(asihpi, &hpi_ctl);
2603                         break;
2604                 case HPI_CONTROL_AESEBU_TRANSMITTER:
2605                         err = snd_asihpi_aesebu_tx_add(asihpi, &hpi_ctl);
2606                         break;
2607                 case HPI_CONTROL_AESEBU_RECEIVER:
2608                         err = snd_asihpi_aesebu_rx_add(asihpi, &hpi_ctl);
2609                         break;
2610                 case HPI_CONTROL_VOX:
2611                 case HPI_CONTROL_BITSTREAM:
2612                 case HPI_CONTROL_MICROPHONE:
2613                 case HPI_CONTROL_PARAMETRIC_EQ:
2614                 case HPI_CONTROL_COMPANDER:
2615                 default:
2616                         if (mixer_dump)
2617                                 snd_printk(KERN_INFO
2618                                         "Untranslated HPI Control"
2619                                         "(%d) %d %d %d %d %d\n",
2620                                         idx,
2621                                         hpi_ctl.control_type,
2622                                         hpi_ctl.src_node_type,
2623                                         hpi_ctl.src_node_index,
2624                                         hpi_ctl.dst_node_type,
2625                                         hpi_ctl.dst_node_index);
2626                         continue;
2627                 };
2628                 if (err < 0)
2629                         return err;
2630         }
2631         if (HPI_ERROR_INVALID_OBJ_INDEX != err)
2632                 hpi_handle_error(err);
2633
2634         snd_printk(KERN_INFO "%d mixer controls found\n", idx);
2635
2636         return 0;
2637 }
2638
2639 /*------------------------------------------------------------
2640    /proc interface
2641  ------------------------------------------------------------*/
2642
2643 static void
2644 snd_asihpi_proc_read(struct snd_info_entry *entry,
2645                         struct snd_info_buffer *buffer)
2646 {
2647         struct snd_card_asihpi *asihpi = entry->private_data;
2648         u16 version;
2649         u32 h_control;
2650         u32 rate = 0;
2651         u16 source = 0;
2652         int err;
2653
2654         snd_iprintf(buffer, "ASIHPI driver proc file\n");
2655         snd_iprintf(buffer,
2656                 "adapter ID=%4X\n_index=%d\n"
2657                 "num_outstreams=%d\n_num_instreams=%d\n",
2658                 asihpi->type, asihpi->adapter_index,
2659                 asihpi->num_outstreams, asihpi->num_instreams);
2660
2661         version = asihpi->version;
2662         snd_iprintf(buffer,
2663                 "serial#=%d\n_hw version %c%d\nDSP code version %03d\n",
2664                 asihpi->serial_number, ((version >> 3) & 0xf) + 'A',
2665                 version & 0x7,
2666                 ((version >> 13) * 100) + ((version >> 7) & 0x3f));
2667
2668         err = hpi_mixer_get_control(asihpi->h_mixer,
2669                                   HPI_SOURCENODE_CLOCK_SOURCE, 0, 0, 0,
2670                                   HPI_CONTROL_SAMPLECLOCK, &h_control);
2671
2672         if (!err) {
2673                 err = hpi_sample_clock_get_sample_rate(
2674                                         h_control, &rate);
2675                 err += hpi_sample_clock_get_source(h_control, &source);
2676
2677                 if (!err)
2678                         snd_iprintf(buffer, "sample_clock=%d_hz, source %s\n",
2679                         rate, sampleclock_sources[source]);
2680         }
2681
2682 }
2683
2684
2685 static void __devinit snd_asihpi_proc_init(struct snd_card_asihpi *asihpi)
2686 {
2687         struct snd_info_entry *entry;
2688
2689         if (!snd_card_proc_new(asihpi->card, "info", &entry))
2690                 snd_info_set_text_ops(entry, asihpi, snd_asihpi_proc_read);
2691 }
2692
2693 /*------------------------------------------------------------
2694    HWDEP
2695  ------------------------------------------------------------*/
2696
2697 static int snd_asihpi_hpi_open(struct snd_hwdep *hw, struct file *file)
2698 {
2699         if (enable_hpi_hwdep)
2700                 return 0;
2701         else
2702                 return -ENODEV;
2703
2704 }
2705
2706 static int snd_asihpi_hpi_release(struct snd_hwdep *hw, struct file *file)
2707 {
2708         if (enable_hpi_hwdep)
2709                 return asihpi_hpi_release(file);
2710         else
2711                 return -ENODEV;
2712 }
2713
2714 static int snd_asihpi_hpi_ioctl(struct snd_hwdep *hw, struct file *file,
2715                                 unsigned int cmd, unsigned long arg)
2716 {
2717         if (enable_hpi_hwdep)
2718                 return asihpi_hpi_ioctl(file, cmd, arg);
2719         else
2720                 return -ENODEV;
2721 }
2722
2723
2724 /* results in /dev/snd/hwC#D0 file for each card with index #
2725    also /proc/asound/hwdep will contain '#-00: asihpi (HPI) for each card'
2726 */
2727 static int __devinit snd_asihpi_hpi_new(struct snd_card_asihpi *asihpi,
2728         int device, struct snd_hwdep **rhwdep)
2729 {
2730         struct snd_hwdep *hw;
2731         int err;
2732
2733         if (rhwdep)
2734                 *rhwdep = NULL;
2735         err = snd_hwdep_new(asihpi->card, "HPI", device, &hw);
2736         if (err < 0)
2737                 return err;
2738         strcpy(hw->name, "asihpi (HPI)");
2739         hw->iface = SNDRV_HWDEP_IFACE_LAST;
2740         hw->ops.open = snd_asihpi_hpi_open;
2741         hw->ops.ioctl = snd_asihpi_hpi_ioctl;
2742         hw->ops.release = snd_asihpi_hpi_release;
2743         hw->private_data = asihpi;
2744         if (rhwdep)
2745                 *rhwdep = hw;
2746         return 0;
2747 }
2748
2749 /*------------------------------------------------------------
2750    CARD
2751  ------------------------------------------------------------*/
2752 static int __devinit snd_asihpi_probe(struct pci_dev *pci_dev,
2753                                        const struct pci_device_id *pci_id)
2754 {
2755         int err;
2756
2757         u16 version;
2758         int pcm_substreams;
2759
2760         struct hpi_adapter *hpi_card;
2761         struct snd_card *card;
2762         struct snd_card_asihpi *asihpi;
2763
2764         u32 h_control;
2765         u32 h_stream;
2766
2767         static int dev;
2768         if (dev >= SNDRV_CARDS)
2769                 return -ENODEV;
2770
2771         /* Should this be enable[hpi_card->index] ? */
2772         if (!enable[dev]) {
2773                 dev++;
2774                 return -ENOENT;
2775         }
2776
2777         err = asihpi_adapter_probe(pci_dev, pci_id);
2778         if (err < 0)
2779                 return err;
2780
2781         hpi_card = pci_get_drvdata(pci_dev);
2782         /* first try to give the card the same index as its hardware index */
2783         err = snd_card_create(hpi_card->index,
2784                               id[hpi_card->index], THIS_MODULE,
2785                               sizeof(struct snd_card_asihpi),
2786                               &card);
2787         if (err < 0) {
2788                 /* if that fails, try the default index==next available */
2789                 err =
2790                     snd_card_create(index[dev], id[dev],
2791                                     THIS_MODULE,
2792                                     sizeof(struct snd_card_asihpi),
2793                                     &card);
2794                 if (err < 0)
2795                         return err;
2796                 snd_printk(KERN_WARNING
2797                         "**** WARNING **** Adapter index %d->ALSA index %d\n",
2798                         hpi_card->index, card->number);
2799         }
2800
2801         snd_card_set_dev(card, &pci_dev->dev);
2802
2803         asihpi = (struct snd_card_asihpi *) card->private_data;
2804         asihpi->card = card;
2805         asihpi->pci = pci_dev;
2806         asihpi->adapter_index = hpi_card->index;
2807         hpi_handle_error(hpi_adapter_get_info(
2808                                  asihpi->adapter_index,
2809                                  &asihpi->num_outstreams,
2810                                  &asihpi->num_instreams,
2811                                  &asihpi->version,
2812                                  &asihpi->serial_number, &asihpi->type));
2813
2814         version = asihpi->version;
2815         snd_printk(KERN_INFO "adapter ID=%4X index=%d num_outstreams=%d "
2816                         "num_instreams=%d S/N=%d\n"
2817                         "Hw Version %c%d DSP code version %03d\n",
2818                         asihpi->type, asihpi->adapter_index,
2819                         asihpi->num_outstreams,
2820                         asihpi->num_instreams, asihpi->serial_number,
2821                         ((version >> 3) & 0xf) + 'A',
2822                         version & 0x7,
2823                         ((version >> 13) * 100) + ((version >> 7) & 0x3f));
2824
2825         pcm_substreams = asihpi->num_outstreams;
2826         if (pcm_substreams < asihpi->num_instreams)
2827                 pcm_substreams = asihpi->num_instreams;
2828
2829         err = hpi_adapter_get_property(asihpi->adapter_index,
2830                 HPI_ADAPTER_PROPERTY_CAPS1,
2831                 NULL, &asihpi->support_grouping);
2832         if (err)
2833                 asihpi->support_grouping = 0;
2834
2835         err = hpi_adapter_get_property(asihpi->adapter_index,
2836                 HPI_ADAPTER_PROPERTY_CAPS2,
2837                 &asihpi->support_mrx, NULL);
2838         if (err)
2839                 asihpi->support_mrx = 0;
2840
2841         err = hpi_adapter_get_property(asihpi->adapter_index,
2842                 HPI_ADAPTER_PROPERTY_INTERVAL,
2843                 NULL, &asihpi->update_interval_frames);
2844         if (err)
2845                 asihpi->update_interval_frames = 512;
2846
2847         if (!asihpi->can_dma)
2848                 asihpi->update_interval_frames *= 2;
2849
2850         hpi_handle_error(hpi_instream_open(asihpi->adapter_index,
2851                              0, &h_stream));
2852
2853         err = hpi_instream_host_buffer_free(h_stream);
2854         asihpi->can_dma = (!err);
2855
2856         hpi_handle_error(hpi_instream_close(h_stream));
2857
2858         err = hpi_adapter_get_property(asihpi->adapter_index,
2859                 HPI_ADAPTER_PROPERTY_CURCHANNELS,
2860                 &asihpi->in_max_chans, &asihpi->out_max_chans);
2861         if (err) {
2862                 asihpi->in_max_chans = 2;
2863                 asihpi->out_max_chans = 2;
2864         }
2865
2866         snd_printk(KERN_INFO "has dma:%d, grouping:%d, mrx:%d\n",
2867                         asihpi->can_dma,
2868                         asihpi->support_grouping,
2869                         asihpi->support_mrx
2870               );
2871
2872         err = snd_card_asihpi_pcm_new(asihpi, 0, pcm_substreams);
2873         if (err < 0) {
2874                 snd_printk(KERN_ERR "pcm_new failed\n");
2875                 goto __nodev;
2876         }
2877         err = snd_card_asihpi_mixer_new(asihpi);
2878         if (err < 0) {
2879                 snd_printk(KERN_ERR "mixer_new failed\n");
2880                 goto __nodev;
2881         }
2882
2883         err = hpi_mixer_get_control(asihpi->h_mixer,
2884                                   HPI_SOURCENODE_CLOCK_SOURCE, 0, 0, 0,
2885                                   HPI_CONTROL_SAMPLECLOCK, &h_control);
2886
2887         if (!err)
2888                 err = hpi_sample_clock_set_local_rate(
2889                         h_control, adapter_fs);
2890
2891         snd_asihpi_proc_init(asihpi);
2892
2893         /* always create, can be enabled or disabled dynamically
2894             by enable_hwdep  module param*/
2895         snd_asihpi_hpi_new(asihpi, 0, NULL);
2896
2897         strcpy(card->driver, "ASIHPI");
2898
2899         sprintf(card->shortname, "AudioScience ASI%4X", asihpi->type);
2900         sprintf(card->longname, "%s %i",
2901                         card->shortname, asihpi->adapter_index);
2902         err = snd_card_register(card);
2903
2904         if (!err) {
2905                 hpi_card->snd_card_asihpi = card;
2906                 dev++;
2907                 return 0;
2908         }
2909 __nodev:
2910         snd_card_free(card);
2911         snd_printk(KERN_ERR "snd_asihpi_probe error %d\n", err);
2912         return err;
2913
2914 }
2915
2916 static void __devexit snd_asihpi_remove(struct pci_dev *pci_dev)
2917 {
2918         struct hpi_adapter *hpi_card = pci_get_drvdata(pci_dev);
2919
2920         snd_card_free(hpi_card->snd_card_asihpi);
2921         hpi_card->snd_card_asihpi = NULL;
2922         asihpi_adapter_remove(pci_dev);
2923 }
2924
2925 static DEFINE_PCI_DEVICE_TABLE(asihpi_pci_tbl) = {
2926         {HPI_PCI_VENDOR_ID_TI, HPI_PCI_DEV_ID_DSP6205,
2927                 HPI_PCI_VENDOR_ID_AUDIOSCIENCE, PCI_ANY_ID, 0, 0,
2928                 (kernel_ulong_t)HPI_6205},
2929         {HPI_PCI_VENDOR_ID_TI, HPI_PCI_DEV_ID_PCI2040,
2930                 HPI_PCI_VENDOR_ID_AUDIOSCIENCE, PCI_ANY_ID, 0, 0,
2931                 (kernel_ulong_t)HPI_6000},
2932         {0,}
2933 };
2934 MODULE_DEVICE_TABLE(pci, asihpi_pci_tbl);
2935
2936 static struct pci_driver driver = {
2937         .name = KBUILD_MODNAME,
2938         .id_table = asihpi_pci_tbl,
2939         .probe = snd_asihpi_probe,
2940         .remove = __devexit_p(snd_asihpi_remove),
2941 #ifdef CONFIG_PM
2942 /*      .suspend = snd_asihpi_suspend,
2943         .resume = snd_asihpi_resume, */
2944 #endif
2945 };
2946
2947 static int __init snd_asihpi_init(void)
2948 {
2949         asihpi_init();
2950         return pci_register_driver(&driver);
2951 }
2952
2953 static void __exit snd_asihpi_exit(void)
2954 {
2955
2956         pci_unregister_driver(&driver);
2957         asihpi_exit();
2958 }
2959
2960 module_init(snd_asihpi_init)
2961 module_exit(snd_asihpi_exit)
2962