Merge master.kernel.org:/pub/scm/linux/kernel/git/jejb/scsi-rc-fixes-2.6
[linux-2.6] / sound / pci / au88x0 / au88x0_a3d.c
1 /***************************************************************************
2  *            au88x0_a3d.c
3  *
4  *  Fri Jul 18 14:16:22 2003
5  *  Copyright  2003  mjander
6  *  mjander@users.sourceforge.net
7  *
8  * A3D. You may think i'm crazy, but this may work someday. Who knows...
9  ****************************************************************************/
10
11 /*
12  *  This program is free software; you can redistribute it and/or modify
13  *  it under the terms of the GNU General Public License as published by
14  *  the Free Software Foundation; either version 2 of the License, or
15  *  (at your option) any later version.
16  *
17  *  This program is distributed in the hope that it will be useful,
18  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
19  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  *  GNU Library General Public License for more details.
21  *
22  *  You should have received a copy of the GNU General Public License
23  *  along with this program; if not, write to the Free Software
24  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25  */
26
27 #include "au88x0_a3d.h"
28 #include "au88x0_a3ddata.c"
29 #include "au88x0_xtalk.h"
30 #include "au88x0.h"
31
32 static void
33 a3dsrc_SetTimeConsts(a3dsrc_t * a, short HrtfTrack, short ItdTrack,
34                      short GTrack, short CTrack)
35 {
36         vortex_t *vortex = (vortex_t *) (a->vortex);
37         hwwrite(vortex->mmio,
38                 a3d_addrA(a->slice, a->source, A3D_A_HrtfTrackTC), HrtfTrack);
39         hwwrite(vortex->mmio,
40                 a3d_addrA(a->slice, a->source, A3D_A_ITDTrackTC), ItdTrack);
41         hwwrite(vortex->mmio,
42                 a3d_addrA(a->slice, a->source, A3D_A_GainTrackTC), GTrack);
43         hwwrite(vortex->mmio,
44                 a3d_addrA(a->slice, a->source, A3D_A_CoeffTrackTC), CTrack);
45 }
46
47 #if 0
48 static void
49 a3dsrc_GetTimeConsts(a3dsrc_t * a, short *HrtfTrack, short *ItdTrack,
50                      short *GTrack, short *CTrack)
51 {
52         // stub!
53 }
54
55 #endif
56 /* Atmospheric absorbtion. */
57
58 static void
59 a3dsrc_SetAtmosTarget(a3dsrc_t * a, short aa, short b, short c, short d,
60                       short e)
61 {
62         vortex_t *vortex = (vortex_t *) (a->vortex);
63         hwwrite(vortex->mmio,
64                 a3d_addrB(a->slice, a->source, A3D_B_A21Target),
65                 (e << 0x10) | d);
66         hwwrite(vortex->mmio,
67                 a3d_addrB(a->slice, a->source, A3D_B_B10Target),
68                 (b << 0x10) | aa);
69         hwwrite(vortex->mmio,
70                 a3d_addrB(a->slice, a->source, A3D_B_B2Target), c);
71 }
72
73 static void
74 a3dsrc_SetAtmosCurrent(a3dsrc_t * a, short aa, short b, short c, short d,
75                        short e)
76 {
77         vortex_t *vortex = (vortex_t *) (a->vortex);
78         hwwrite(vortex->mmio,
79                 a3d_addrB(a->slice, a->source, A3D_B_A12Current),
80                 (e << 0x10) | d);
81         hwwrite(vortex->mmio,
82                 a3d_addrB(a->slice, a->source, A3D_B_B01Current),
83                 (b << 0x10) | aa);
84         hwwrite(vortex->mmio,
85                 a3d_addrB(a->slice, a->source, A3D_B_B2Current), c);
86 }
87
88 static void
89 a3dsrc_SetAtmosState(a3dsrc_t * a, short x1, short x2, short y1, short y2)
90 {
91         vortex_t *vortex = (vortex_t *) (a->vortex);
92         hwwrite(vortex->mmio, a3d_addrA(a->slice, a->source, A3D_A_x1), x1);
93         hwwrite(vortex->mmio, a3d_addrA(a->slice, a->source, A3D_A_x2), x2);
94         hwwrite(vortex->mmio, a3d_addrA(a->slice, a->source, A3D_A_y1), y1);
95         hwwrite(vortex->mmio, a3d_addrA(a->slice, a->source, A3D_A_y2), y2);
96 }
97
98 #if 0
99 static void
100 a3dsrc_GetAtmosTarget(a3dsrc_t * a, short *aa, short *b, short *c,
101                       short *d, short *e)
102 {
103 }
104 static void
105 a3dsrc_GetAtmosCurrent(a3dsrc_t * a, short *bb01, short *ab01, short *b2,
106                        short *aa12, short *ba12)
107 {
108         vortex_t *vortex = (vortex_t *) (a->vortex);
109         *aa12 =
110             hwread(vortex->mmio,
111                    a3d_addrA(a->slice, a->source, A3D_A_A12Current));
112         *ba12 =
113             hwread(vortex->mmio,
114                    a3d_addrB(a->slice, a->source, A3D_B_A12Current));
115         *ab01 =
116             hwread(vortex->mmio,
117                    a3d_addrA(a->slice, a->source, A3D_A_B01Current));
118         *bb01 =
119             hwread(vortex->mmio,
120                    a3d_addrB(a->slice, a->source, A3D_B_B01Current));
121         *b2 =
122             hwread(vortex->mmio,
123                    a3d_addrA(a->slice, a->source, A3D_A_B2Current));
124 }
125
126 static void
127 a3dsrc_GetAtmosState(a3dsrc_t * a, short *x1, short *x2, short *y1, short *y2)
128 {
129
130 }
131
132 #endif
133 /* HRTF */
134
135 static void
136 a3dsrc_SetHrtfTarget(a3dsrc_t * a, a3d_Hrtf_t const aa, a3d_Hrtf_t const b)
137 {
138         vortex_t *vortex = (vortex_t *) (a->vortex);
139         int i;
140
141         for (i = 0; i < HRTF_SZ; i++)
142                 hwwrite(vortex->mmio,
143                         a3d_addrB(a->slice, a->source,
144                                   A3D_B_HrtfTarget) + (i << 2),
145                         (b[i] << 0x10) | aa[i]);
146 }
147
148 static void
149 a3dsrc_SetHrtfCurrent(a3dsrc_t * a, a3d_Hrtf_t const aa, a3d_Hrtf_t const b)
150 {
151         vortex_t *vortex = (vortex_t *) (a->vortex);
152         int i;
153
154         for (i = 0; i < HRTF_SZ; i++)
155                 hwwrite(vortex->mmio,
156                         a3d_addrB(a->slice, a->source,
157                                   A3D_B_HrtfCurrent) + (i << 2),
158                         (b[i] << 0x10) | aa[i]);
159 }
160
161 static void
162 a3dsrc_SetHrtfState(a3dsrc_t * a, a3d_Hrtf_t const aa, a3d_Hrtf_t const b)
163 {
164         vortex_t *vortex = (vortex_t *) (a->vortex);
165         int i;
166
167         for (i = 0; i < HRTF_SZ; i++)
168                 hwwrite(vortex->mmio,
169                         a3d_addrB(a->slice, a->source,
170                                   A3D_B_HrtfDelayLine) + (i << 2),
171                         (b[i] << 0x10) | aa[i]);
172 }
173
174 static void a3dsrc_SetHrtfOutput(a3dsrc_t * a, short left, short right)
175 {
176         vortex_t *vortex = (vortex_t *) (a->vortex);
177         hwwrite(vortex->mmio,
178                 a3d_addrA(a->slice, a->source, A3D_A_HrtfOutL), left);
179         hwwrite(vortex->mmio,
180                 a3d_addrA(a->slice, a->source, A3D_A_HrtfOutR), right);
181 }
182
183 #if 0
184 static void a3dsrc_GetHrtfTarget(a3dsrc_t * a, a3d_Hrtf_t aa, a3d_Hrtf_t b)
185 {
186         vortex_t *vortex = (vortex_t *) (a->vortex);
187         int i;
188
189         for (i = 0; i < HRTF_SZ; i++)
190                 aa[i] =
191                     hwread(vortex->mmio,
192                            a3d_addrA(a->slice, a->source,
193                                      A3D_A_HrtfTarget + (i << 2)));
194         for (i = 0; i < HRTF_SZ; i++)
195                 b[i] =
196                     hwread(vortex->mmio,
197                            a3d_addrB(a->slice, a->source,
198                                      A3D_B_HrtfTarget + (i << 2)));
199 }
200
201 static void a3dsrc_GetHrtfCurrent(a3dsrc_t * a, a3d_Hrtf_t aa, a3d_Hrtf_t b)
202 {
203         vortex_t *vortex = (vortex_t *) (a->vortex);
204         int i;
205
206         for (i = 0; i < HRTF_SZ; i++)
207                 aa[i] =
208                     hwread(vortex->mmio,
209                            a3d_addrA(a->slice, a->source,
210                                      A3D_A_HrtfCurrent + (i << 2)));
211         for (i = 0; i < HRTF_SZ; i++)
212                 b[i] =
213                     hwread(vortex->mmio,
214                            a3d_addrB(a->slice, a->source,
215                                      A3D_B_HrtfCurrent + (i << 2)));
216 }
217
218 static void a3dsrc_GetHrtfState(a3dsrc_t * a, a3d_Hrtf_t aa, a3d_Hrtf_t b)
219 {
220         vortex_t *vortex = (vortex_t *) (a->vortex);
221         int i;
222         // FIXME: verify this!
223         for (i = 0; i < HRTF_SZ; i++)
224                 aa[i] =
225                     hwread(vortex->mmio,
226                            a3d_addrA(a->slice, a->source,
227                                      A3D_A_HrtfDelayLine + (i << 2)));
228         for (i = 0; i < HRTF_SZ; i++)
229                 b[i] =
230                     hwread(vortex->mmio,
231                            a3d_addrB(a->slice, a->source,
232                                      A3D_B_HrtfDelayLine + (i << 2)));
233 }
234
235 static void a3dsrc_GetHrtfOutput(a3dsrc_t * a, short *left, short *right)
236 {
237         vortex_t *vortex = (vortex_t *) (a->vortex);
238         *left =
239             hwread(vortex->mmio,
240                    a3d_addrA(a->slice, a->source, A3D_A_HrtfOutL));
241         *right =
242             hwread(vortex->mmio,
243                    a3d_addrA(a->slice, a->source, A3D_A_HrtfOutR));
244 }
245
246 #endif
247
248 /* Interaural Time Difference. 
249  * "The other main clue that humans use to locate sounds, is called 
250  * Interaural Time Difference (ITD). The differences in distance from 
251  * the sound source to a listeners ears means  that the sound will 
252  * reach one ear slightly before the other....", found somewhere with google.*/
253 static void a3dsrc_SetItdTarget(a3dsrc_t * a, short litd, short ritd)
254 {
255         vortex_t *vortex = (vortex_t *) (a->vortex);
256
257         if (litd < 0)
258                 litd = 0;
259         if (litd > 0x57FF)
260                 litd = 0x57FF;
261         if (ritd < 0)
262                 ritd = 0;
263         if (ritd > 0x57FF)
264                 ritd = 0x57FF;
265         hwwrite(vortex->mmio,
266                 a3d_addrB(a->slice, a->source, A3D_B_ITDTarget),
267                 (ritd << 0x10) | litd);
268         //hwwrite(vortex->mmio, addr(0x191DF+5, this04, this08), (ritd<<0x10)|litd);
269 }
270
271 static void a3dsrc_SetItdCurrent(a3dsrc_t * a, short litd, short ritd)
272 {
273         vortex_t *vortex = (vortex_t *) (a->vortex);
274
275         if (litd < 0)
276                 litd = 0;
277         if (litd > 0x57FF)
278                 litd = 0x57FF;
279         if (ritd < 0)
280                 ritd = 0;
281         if (ritd > 0x57FF)
282                 ritd = 0x57FF;
283         hwwrite(vortex->mmio,
284                 a3d_addrB(a->slice, a->source, A3D_B_ITDCurrent),
285                 (ritd << 0x10) | litd);
286         //hwwrite(vortex->mmio, addr(0x191DF+1, this04, this08), (ritd<<0x10)|litd);
287 }
288
289 static void a3dsrc_SetItdDline(a3dsrc_t * a, a3d_ItdDline_t const dline)
290 {
291         vortex_t *vortex = (vortex_t *) (a->vortex);
292         int i;
293         /* 45 != 40 -> Check this ! */
294         for (i = 0; i < DLINE_SZ; i++)
295                 hwwrite(vortex->mmio,
296                         a3d_addrA(a->slice, a->source,
297                                   A3D_A_ITDDelayLine) + (i << 2), dline[i]);
298 }
299
300 #if 0
301 static void a3dsrc_GetItdTarget(a3dsrc_t * a, short *litd, short *ritd)
302 {
303         vortex_t *vortex = (vortex_t *) (a->vortex);
304         *ritd =
305             hwread(vortex->mmio,
306                    a3d_addrA(a->slice, a->source, A3D_A_ITDTarget));
307         *litd =
308             hwread(vortex->mmio,
309                    a3d_addrB(a->slice, a->source, A3D_B_ITDTarget));
310 }
311
312 static void a3dsrc_GetItdCurrent(a3dsrc_t * a, short *litd, short *ritd)
313 {
314         vortex_t *vortex = (vortex_t *) (a->vortex);
315
316         *ritd =
317             hwread(vortex->mmio,
318                    a3d_addrA(a->slice, a->source, A3D_A_ITDCurrent));
319         *litd =
320             hwread(vortex->mmio,
321                    a3d_addrB(a->slice, a->source, A3D_B_ITDCurrent));
322 }
323
324 static void a3dsrc_GetItdDline(a3dsrc_t * a, a3d_ItdDline_t dline)
325 {
326         vortex_t *vortex = (vortex_t *) (a->vortex);
327         int i;
328
329         for (i = 0; i < DLINE_SZ; i++)
330                 dline[i] =
331                     hwread(vortex->mmio,
332                            a3d_addrA(a->slice, a->source,
333                                      A3D_A_ITDDelayLine + (i << 2)));
334 }
335
336 #endif
337 /* This is may be used for ILD Interaural Level Difference. */
338
339 static void a3dsrc_SetGainTarget(a3dsrc_t * a, short left, short right)
340 {
341         vortex_t *vortex = (vortex_t *) (a->vortex);
342         hwwrite(vortex->mmio,
343                 a3d_addrB(a->slice, a->source, A3D_B_GainTarget),
344                 (right << 0x10) | left);
345 }
346
347 static void a3dsrc_SetGainCurrent(a3dsrc_t * a, short left, short right)
348 {
349         vortex_t *vortex = (vortex_t *) (a->vortex);
350         hwwrite(vortex->mmio,
351                 a3d_addrB(a->slice, a->source, A3D_B_GainCurrent),
352                 (right << 0x10) | left);
353 }
354
355 #if 0
356 static void a3dsrc_GetGainTarget(a3dsrc_t * a, short *left, short *right)
357 {
358         vortex_t *vortex = (vortex_t *) (a->vortex);
359         *right =
360             hwread(vortex->mmio,
361                    a3d_addrA(a->slice, a->source, A3D_A_GainTarget));
362         *left =
363             hwread(vortex->mmio,
364                    a3d_addrB(a->slice, a->source, A3D_B_GainTarget));
365 }
366
367 static void a3dsrc_GetGainCurrent(a3dsrc_t * a, short *left, short *right)
368 {
369         vortex_t *vortex = (vortex_t *) (a->vortex);
370         *right =
371             hwread(vortex->mmio,
372                    a3d_addrA(a->slice, a->source, A3D_A_GainCurrent));
373         *left =
374             hwread(vortex->mmio,
375                    a3d_addrB(a->slice, a->source, A3D_B_GainCurrent));
376 }
377
378 /* CA3dIO this func seems to be inlined all over this place. */
379 static void CA3dIO_WriteReg(a3dsrc_t * a, unsigned long addr, short aa, short b)
380 {
381         vortex_t *vortex = (vortex_t *) (a->vortex);
382         hwwrite(vortex->mmio, addr, (aa << 0x10) | b);
383 }
384
385 #endif
386 /* Generic A3D stuff */
387
388 static void a3dsrc_SetA3DSampleRate(a3dsrc_t * a, int sr)
389 {
390         vortex_t *vortex = (vortex_t *) (a->vortex);
391         int esp0 = 0;
392
393         esp0 = (((esp0 & 0x7fffffff) | 0xB8000000) & 0x7) | ((sr & 0x1f) << 3);
394         hwwrite(vortex->mmio, A3D_SLICE_Control + ((a->slice) << 0xd), esp0);
395         //hwwrite(vortex->mmio, 0x19C38 + (this08<<0xd), esp0);
396 }
397
398 static void a3dsrc_EnableA3D(a3dsrc_t * a)
399 {
400         vortex_t *vortex = (vortex_t *) (a->vortex);
401         hwwrite(vortex->mmio, A3D_SLICE_Control + ((a->slice) << 0xd),
402                 0xF0000001);
403         //hwwrite(vortex->mmio, 0x19C38 + (this08<<0xd), 0xF0000001);
404 }
405
406 static void a3dsrc_DisableA3D(a3dsrc_t * a)
407 {
408         vortex_t *vortex = (vortex_t *) (a->vortex);
409         hwwrite(vortex->mmio, A3D_SLICE_Control + ((a->slice) << 0xd),
410                 0xF0000000);
411 }
412
413 static void a3dsrc_SetA3DControlReg(a3dsrc_t * a, unsigned long ctrl)
414 {
415         vortex_t *vortex = (vortex_t *) (a->vortex);
416         hwwrite(vortex->mmio, A3D_SLICE_Control + ((a->slice) << 0xd), ctrl);
417 }
418
419 static void a3dsrc_SetA3DPointerReg(a3dsrc_t * a, unsigned long ptr)
420 {
421         vortex_t *vortex = (vortex_t *) (a->vortex);
422         hwwrite(vortex->mmio, A3D_SLICE_Pointers + ((a->slice) << 0xd), ptr);
423 }
424
425 #if 0
426 static void a3dsrc_GetA3DSampleRate(a3dsrc_t * a, int *sr)
427 {
428         vortex_t *vortex = (vortex_t *) (a->vortex);
429         *sr = ((hwread(vortex->mmio, A3D_SLICE_Control + (a->slice << 0xd))
430                 >> 3) & 0x1f);
431         //*sr = ((hwread(vortex->mmio, 0x19C38 + (this08<<0xd))>>3)&0x1f);
432 }
433
434 static void a3dsrc_GetA3DControlReg(a3dsrc_t * a, unsigned long *ctrl)
435 {
436         vortex_t *vortex = (vortex_t *) (a->vortex);
437         *ctrl = hwread(vortex->mmio, A3D_SLICE_Control + ((a->slice) << 0xd));
438 }
439
440 static void a3dsrc_GetA3DPointerReg(a3dsrc_t * a, unsigned long *ptr)
441 {
442         vortex_t *vortex = (vortex_t *) (a->vortex);
443         *ptr = hwread(vortex->mmio, A3D_SLICE_Pointers + ((a->slice) << 0xd));
444 }
445
446 #endif
447 static void a3dsrc_ZeroSliceIO(a3dsrc_t * a)
448 {
449         vortex_t *vortex = (vortex_t *) (a->vortex);
450         int i;
451
452         for (i = 0; i < 8; i++)
453                 hwwrite(vortex->mmio,
454                         A3D_SLICE_VDBDest +
455                         ((((a->slice) << 0xb) + i) << 2), 0);
456         for (i = 0; i < 4; i++)
457                 hwwrite(vortex->mmio,
458                         A3D_SLICE_VDBSource +
459                         ((((a->slice) << 0xb) + i) << 2), 0);
460 }
461
462 /* Reset Single A3D source. */
463 static void a3dsrc_ZeroState(a3dsrc_t * a)
464 {
465
466         //printk("vortex: ZeroState slice: %d, source %d\n", a->slice, a->source);
467
468         a3dsrc_SetAtmosState(a, 0, 0, 0, 0);
469         a3dsrc_SetHrtfState(a, A3dHrirZeros, A3dHrirZeros);
470         a3dsrc_SetItdDline(a, A3dItdDlineZeros);
471         a3dsrc_SetHrtfOutput(a, 0, 0);
472         a3dsrc_SetTimeConsts(a, 0, 0, 0, 0);
473
474         a3dsrc_SetAtmosCurrent(a, 0, 0, 0, 0, 0);
475         a3dsrc_SetAtmosTarget(a, 0, 0, 0, 0, 0);
476         a3dsrc_SetItdCurrent(a, 0, 0);
477         a3dsrc_SetItdTarget(a, 0, 0);
478         a3dsrc_SetGainCurrent(a, 0, 0);
479         a3dsrc_SetGainTarget(a, 0, 0);
480
481         a3dsrc_SetHrtfCurrent(a, A3dHrirZeros, A3dHrirZeros);
482         a3dsrc_SetHrtfTarget(a, A3dHrirZeros, A3dHrirZeros);
483 }
484
485 /* Reset entire A3D engine */
486 static void a3dsrc_ZeroStateA3D(a3dsrc_t * a)
487 {
488         int i, var, var2;
489
490         if ((a->vortex) == NULL) {
491                 printk(KERN_ERR "vortex: ZeroStateA3D: ERROR: a->vortex is NULL\n");
492                 return;
493         }
494
495         a3dsrc_SetA3DControlReg(a, 0);
496         a3dsrc_SetA3DPointerReg(a, 0);
497
498         var = a->slice;
499         var2 = a->source;
500         for (i = 0; i < 4; i++) {
501                 a->slice = i;
502                 a3dsrc_ZeroSliceIO(a);
503                 //a3dsrc_ZeroState(a);
504         }
505         a->source = var2;
506         a->slice = var;
507 }
508
509 /* Program A3D block as pass through */
510 static void a3dsrc_ProgramPipe(a3dsrc_t * a)
511 {
512         a3dsrc_SetTimeConsts(a, 0, 0, 0, 0);
513         a3dsrc_SetAtmosCurrent(a, 0, 0x4000, 0, 0, 0);
514         a3dsrc_SetAtmosTarget(a, 0x4000, 0, 0, 0, 0);
515         a3dsrc_SetItdCurrent(a, 0, 0);
516         a3dsrc_SetItdTarget(a, 0, 0);
517         a3dsrc_SetGainCurrent(a, 0x7fff, 0x7fff);
518         a3dsrc_SetGainTarget(a, 0x7fff, 0x7fff);
519
520         /* SET HRTF HERE */
521
522         /* Single spike leads to identity transfer function. */
523         a3dsrc_SetHrtfCurrent(a, A3dHrirImpulse, A3dHrirImpulse);
524         a3dsrc_SetHrtfTarget(a, A3dHrirImpulse, A3dHrirImpulse);
525
526         /* Test: Sounds saturated. */
527         //a3dsrc_SetHrtfCurrent(a, A3dHrirSatTest, A3dHrirSatTest);
528         //a3dsrc_SetHrtfTarget(a, A3dHrirSatTest, A3dHrirSatTest);      
529 }
530
531 /* VDB = Vortex audio Dataflow Bus */
532 #if 0
533 static void a3dsrc_ClearVDBData(a3dsrc_t * a, unsigned long aa)
534 {
535         vortex_t *vortex = (vortex_t *) (a->vortex);
536
537         // ((aa >> 2) << 8) - (aa >> 2)
538         hwwrite(vortex->mmio,
539                 a3d_addrS(a->slice, A3D_SLICE_VDBDest) + (a->source << 2), 0);
540         hwwrite(vortex->mmio,
541                 a3d_addrS(a->slice,
542                           A3D_SLICE_VDBDest + 4) + (a->source << 2), 0);
543         /*
544            hwwrite(vortex->mmio, 0x19c00 + (((aa>>2)*255*4)+aa)*8, 0);
545            hwwrite(vortex->mmio, 0x19c04 + (((aa>>2)*255*4)+aa)*8, 0);
546          */
547 }
548 #endif
549
550 /* A3D HwSource stuff. */
551
552 static void vortex_A3dSourceHw_Initialize(vortex_t * v, int source, int slice)
553 {
554         a3dsrc_t *a3dsrc = &(v->a3d[source + (slice * 4)]);
555         //a3dsrc_t *a3dsrc = &(v->a3d[source + (slice*4)]);
556
557         a3dsrc->vortex = (void *)v;
558         a3dsrc->source = source;        /* source */
559         a3dsrc->slice = slice;  /* slice */
560         a3dsrc_ZeroState(a3dsrc);
561         /* Added by me. */
562         a3dsrc_SetA3DSampleRate(a3dsrc, 0x11);
563 }
564
565 static int Vort3DRend_Initialize(vortex_t * v, unsigned short mode)
566 {
567         v->xt_mode = mode;      /* this_14 */
568
569         vortex_XtalkHw_init(v);
570         vortex_XtalkHw_SetGainsAllChan(v);
571         switch (v->xt_mode) {
572         case XT_SPEAKER0:
573                 vortex_XtalkHw_ProgramXtalkNarrow(v);
574                 break;
575         case XT_SPEAKER1:
576                 vortex_XtalkHw_ProgramXtalkWide(v);
577                 break;
578         default:
579         case XT_HEADPHONE:
580                 vortex_XtalkHw_ProgramPipe(v);
581                 break;
582         case XT_DIAMOND:
583                 vortex_XtalkHw_ProgramDiamondXtalk(v);
584                 break;
585         }
586         vortex_XtalkHw_SetSampleRate(v, 0x11);
587         vortex_XtalkHw_Enable(v);
588         return 0;
589 }
590
591 /* 3D Sound entry points. */
592
593 static int vortex_a3d_register_controls(vortex_t * vortex);
594 static void vortex_a3d_unregister_controls(vortex_t * vortex);
595 /* A3D base support init/shudown */
596 static void __devinit vortex_Vort3D_enable(vortex_t * v)
597 {
598         int i;
599
600         Vort3DRend_Initialize(v, XT_HEADPHONE);
601         for (i = 0; i < NR_A3D; i++) {
602                 vortex_A3dSourceHw_Initialize(v, i % 4, i >> 2);
603                 a3dsrc_ZeroStateA3D(&(v->a3d[0]));
604         }
605         /* Register ALSA controls */
606         vortex_a3d_register_controls(v);
607 }
608
609 static void vortex_Vort3D_disable(vortex_t * v)
610 {
611         vortex_XtalkHw_Disable(v);
612         vortex_a3d_unregister_controls(v);
613 }
614
615 /* Make A3D subsystem connections. */
616 static void vortex_Vort3D_connect(vortex_t * v, int en)
617 {
618         int i;
619         
620 // Disable AU8810 routes, since they seem to be wrong (in au8810.h).
621 #ifdef CHIP_AU8810
622         return;
623 #endif
624         
625 #if 1
626         /* Alloc Xtalk mixin resources */
627         v->mixxtlk[0] =
628             vortex_adb_checkinout(v, v->fixed_res, en, VORTEX_RESOURCE_MIXIN);
629         if (v->mixxtlk[0] < 0) {
630                 printk
631                     ("vortex: vortex_Vort3D: ERROR: not enough free mixer resources.\n");
632                 return;
633         }
634         v->mixxtlk[1] =
635             vortex_adb_checkinout(v, v->fixed_res, en, VORTEX_RESOURCE_MIXIN);
636         if (v->mixxtlk[1] < 0) {
637                 printk
638                     ("vortex: vortex_Vort3D: ERROR: not enough free mixer resources.\n");
639                 return;
640         }
641 #endif
642
643         /* Connect A3D -> XTALK */
644         for (i = 0; i < 4; i++) {
645                 // 2 outputs per each A3D slice. 
646                 vortex_route(v, en, 0x11, ADB_A3DOUT(i * 2), ADB_XTALKIN(i));
647                 vortex_route(v, en, 0x11, ADB_A3DOUT(i * 2) + 1, ADB_XTALKIN(5 + i));
648         }
649 #if 0
650         vortex_route(v, en, 0x11, ADB_XTALKOUT(0), ADB_EQIN(2));
651         vortex_route(v, en, 0x11, ADB_XTALKOUT(1), ADB_EQIN(3));
652 #else
653         /* Connect XTalk -> mixer */
654         vortex_route(v, en, 0x11, ADB_XTALKOUT(0), ADB_MIXIN(v->mixxtlk[0]));
655         vortex_route(v, en, 0x11, ADB_XTALKOUT(1), ADB_MIXIN(v->mixxtlk[1]));
656         vortex_connection_mixin_mix(v, en, v->mixxtlk[0], v->mixplayb[0], 0);
657         vortex_connection_mixin_mix(v, en, v->mixxtlk[1], v->mixplayb[1], 0);
658         vortex_mix_setinputvolumebyte(v, v->mixplayb[0], v->mixxtlk[0],
659                                       en ? MIX_DEFIGAIN : VOL_MIN);
660         vortex_mix_setinputvolumebyte(v, v->mixplayb[1], v->mixxtlk[1],
661                                       en ? MIX_DEFIGAIN : VOL_MIN);
662         if (VORTEX_IS_QUAD(v)) {
663                 vortex_connection_mixin_mix(v, en, v->mixxtlk[0],
664                                             v->mixplayb[2], 0);
665                 vortex_connection_mixin_mix(v, en, v->mixxtlk[1],
666                                             v->mixplayb[3], 0);
667                 vortex_mix_setinputvolumebyte(v, v->mixplayb[2],
668                                               v->mixxtlk[0],
669                                               en ? MIX_DEFIGAIN : VOL_MIN);
670                 vortex_mix_setinputvolumebyte(v, v->mixplayb[3],
671                                               v->mixxtlk[1],
672                                               en ? MIX_DEFIGAIN : VOL_MIN);
673         }
674 #endif
675 }
676
677 /* Initialize one single A3D source. */
678 static void vortex_Vort3D_InitializeSource(a3dsrc_t * a, int en)
679 {
680         if (a->vortex == NULL) {
681                 printk
682                     ("vortex: Vort3D_InitializeSource: A3D source not initialized\n");
683                 return;
684         }
685         if (en) {
686                 a3dsrc_ProgramPipe(a);
687                 a3dsrc_SetA3DSampleRate(a, 0x11);
688                 a3dsrc_SetTimeConsts(a, HrtfTCDefault,
689                                      ItdTCDefault, GainTCDefault,
690                                      CoefTCDefault);
691                 /* Remark: zero gain is muted. */
692                 //a3dsrc_SetGainTarget(a,0,0);
693                 //a3dsrc_SetGainCurrent(a,0,0);
694                 a3dsrc_EnableA3D(a);
695         } else {
696                 a3dsrc_DisableA3D(a);
697                 a3dsrc_ZeroState(a);
698         }
699 }
700
701 /* Conversion of coordinates into 3D parameters. */
702
703 static void vortex_a3d_coord2hrtf(a3d_Hrtf_t hrtf, int *coord)
704 {
705         /* FIXME: implement this. */
706
707 }
708 static void vortex_a3d_coord2itd(a3d_Itd_t itd, int *coord)
709 {
710         /* FIXME: implement this. */
711
712 }
713 static void vortex_a3d_coord2ild(a3d_LRGains_t ild, int left, int right)
714 {
715         /* FIXME: implement this. */
716
717 }
718 static void vortex_a3d_translate_filter(a3d_atmos_t filter, int *params)
719 {
720         /* FIXME: implement this. */
721
722 }
723
724 /* ALSA control interface.  */
725
726 static int
727 snd_vortex_a3d_hrtf_info(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
728 {
729         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
730         uinfo->count = 6;
731         uinfo->value.integer.min = 0x00000000;
732         uinfo->value.integer.max = 0xffffffff;
733         return 0;
734 }
735 static int
736 snd_vortex_a3d_itd_info(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
737 {
738         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
739         uinfo->count = 2;
740         uinfo->value.integer.min = 0x00000000;
741         uinfo->value.integer.max = 0xffffffff;
742         return 0;
743 }
744 static int
745 snd_vortex_a3d_ild_info(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
746 {
747         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
748         uinfo->count = 2;
749         uinfo->value.integer.min = 0x00000000;
750         uinfo->value.integer.max = 0xffffffff;
751         return 0;
752 }
753 static int
754 snd_vortex_a3d_filter_info(struct snd_kcontrol *kcontrol,
755                            struct snd_ctl_elem_info *uinfo)
756 {
757         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
758         uinfo->count = 4;
759         uinfo->value.integer.min = 0x00000000;
760         uinfo->value.integer.max = 0xffffffff;
761         return 0;
762 }
763
764 static int
765 snd_vortex_a3d_get(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
766 {
767         //a3dsrc_t *a = kcontrol->private_data;
768         /* No read yet. Would this be really useable/needed ? */
769
770         return 0;
771 }
772
773 static int
774 snd_vortex_a3d_hrtf_put(struct snd_kcontrol *kcontrol,
775                         struct snd_ctl_elem_value *ucontrol)
776 {
777         a3dsrc_t *a = kcontrol->private_data;
778         int changed = 1, i;
779         int coord[6];
780         for (i = 0; i < 6; i++)
781                 coord[i] = ucontrol->value.integer.value[i];
782         /* Translate orientation coordinates to a3d params. */
783         vortex_a3d_coord2hrtf(a->hrtf[0], coord);
784         vortex_a3d_coord2hrtf(a->hrtf[1], coord);
785         a3dsrc_SetHrtfTarget(a, a->hrtf[0], a->hrtf[1]);
786         a3dsrc_SetHrtfCurrent(a, a->hrtf[0], a->hrtf[1]);
787         return changed;
788 }
789
790 static int
791 snd_vortex_a3d_itd_put(struct snd_kcontrol *kcontrol,
792                        struct snd_ctl_elem_value *ucontrol)
793 {
794         a3dsrc_t *a = kcontrol->private_data;
795         int coord[6];
796         int i, changed = 1;
797         for (i = 0; i < 6; i++)
798                 coord[i] = ucontrol->value.integer.value[i];
799         /* Translate orientation coordinates to a3d params. */
800         vortex_a3d_coord2itd(a->hrtf[0], coord);
801         vortex_a3d_coord2itd(a->hrtf[1], coord);
802         /* Inter aural time difference. */
803         a3dsrc_SetItdTarget(a, a->itd[0], a->itd[1]);
804         a3dsrc_SetItdCurrent(a, a->itd[0], a->itd[1]);
805         a3dsrc_SetItdDline(a, a->dline);
806         return changed;
807 }
808
809 static int
810 snd_vortex_a3d_ild_put(struct snd_kcontrol *kcontrol,
811                        struct snd_ctl_elem_value *ucontrol)
812 {
813         a3dsrc_t *a = kcontrol->private_data;
814         int changed = 1;
815         int l, r;
816         /* There may be some scale tranlation needed here. */
817         l = ucontrol->value.integer.value[0];
818         r = ucontrol->value.integer.value[1];
819         vortex_a3d_coord2ild(a->ild, l, r);
820         /* Left Right panning. */
821         a3dsrc_SetGainTarget(a, l, r);
822         a3dsrc_SetGainCurrent(a, l, r);
823         return changed;
824 }
825
826 static int
827 snd_vortex_a3d_filter_put(struct snd_kcontrol *kcontrol,
828                           struct snd_ctl_elem_value *ucontrol)
829 {
830         a3dsrc_t *a = kcontrol->private_data;
831         int i, changed = 1;
832         int params[6];
833         for (i = 0; i < 6; i++)
834                 params[i] = ucontrol->value.integer.value[i];
835         /* Translate generic filter params to a3d filter params. */
836         vortex_a3d_translate_filter(a->filter, params);
837         /* Atmospheric absorbtion and filtering. */
838         a3dsrc_SetAtmosTarget(a, a->filter[0],
839                               a->filter[1], a->filter[2],
840                               a->filter[3], a->filter[4]);
841         a3dsrc_SetAtmosCurrent(a, a->filter[0],
842                                a->filter[1], a->filter[2],
843                                a->filter[3], a->filter[4]);
844         return changed;
845 }
846
847 static struct snd_kcontrol_new vortex_a3d_kcontrol __devinitdata = {
848         .iface = SNDRV_CTL_ELEM_IFACE_PCM,
849         .name = "Playback PCM advanced processing",
850         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
851         .info = snd_vortex_a3d_hrtf_info,
852         .get = snd_vortex_a3d_get,
853         .put = snd_vortex_a3d_hrtf_put,
854 };
855
856 /* Control (un)registration. */
857 static int __devinit vortex_a3d_register_controls(vortex_t * vortex)
858 {
859         struct snd_kcontrol *kcontrol;
860         int err, i;
861         /* HRTF controls. */
862         for (i = 0; i < NR_A3D; i++) {
863                 if ((kcontrol =
864                      snd_ctl_new1(&vortex_a3d_kcontrol, &vortex->a3d[i])) == NULL)
865                         return -ENOMEM;
866                 kcontrol->id.numid = CTRLID_HRTF;
867                 kcontrol->info = snd_vortex_a3d_hrtf_info;
868                 kcontrol->put = snd_vortex_a3d_hrtf_put;
869                 if ((err = snd_ctl_add(vortex->card, kcontrol)) < 0)
870                         return err;
871         }
872         /* ITD controls. */
873         for (i = 0; i < NR_A3D; i++) {
874                 if ((kcontrol =
875                      snd_ctl_new1(&vortex_a3d_kcontrol, &vortex->a3d[i])) == NULL)
876                         return -ENOMEM;
877                 kcontrol->id.numid = CTRLID_ITD;
878                 kcontrol->info = snd_vortex_a3d_itd_info;
879                 kcontrol->put = snd_vortex_a3d_itd_put;
880                 if ((err = snd_ctl_add(vortex->card, kcontrol)) < 0)
881                         return err;
882         }
883         /* ILD (gains) controls. */
884         for (i = 0; i < NR_A3D; i++) {
885                 if ((kcontrol =
886                      snd_ctl_new1(&vortex_a3d_kcontrol, &vortex->a3d[i])) == NULL)
887                         return -ENOMEM;
888                 kcontrol->id.numid = CTRLID_GAINS;
889                 kcontrol->info = snd_vortex_a3d_ild_info;
890                 kcontrol->put = snd_vortex_a3d_ild_put;
891                 if ((err = snd_ctl_add(vortex->card, kcontrol)) < 0)
892                         return err;
893         }
894         /* Filter controls. */
895         for (i = 0; i < NR_A3D; i++) {
896                 if ((kcontrol =
897                      snd_ctl_new1(&vortex_a3d_kcontrol, &vortex->a3d[i])) == NULL)
898                         return -ENOMEM;
899                 kcontrol->id.numid = CTRLID_FILTER;
900                 kcontrol->info = snd_vortex_a3d_filter_info;
901                 kcontrol->put = snd_vortex_a3d_filter_put;
902                 if ((err = snd_ctl_add(vortex->card, kcontrol)) < 0)
903                         return err;
904         }
905         return 0;
906 }
907
908 static void vortex_a3d_unregister_controls(vortex_t * vortex)
909 {
910
911 }
912
913 /* End of File*/