1 /****************************************************************************
2
3 Copyright Echo Digital Audio Corporation (c) 1998 - 2004
4 All rights reserved
5 www.echoaudio.com
6
7 This file is part of Echo Digital Audio's generic driver library.
8
9 Echo Digital Audio's generic driver library is free software;
10 you can redistribute it and/or modify it under the terms of
11 the GNU General Public License as published by the Free Software
12 Foundation.
13
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston,
22 MA 02111-1307, USA.
23
24 *************************************************************************
25
26 Translation from C++ and adaptation for use in ALSA-Driver
27 were made by Giuliano Pochini <pochini@shiny.it>
28
29 ****************************************************************************/
30
31
32 static int write_control_reg(struct echoaudio *chip, u32 value, char force);
33 static int set_input_clock(struct echoaudio *chip, u16 clock);
34 static int set_professional_spdif(struct echoaudio *chip, char prof);
35 static int set_digital_mode(struct echoaudio *chip, u8 mode);
36 static int load_asic_generic(struct echoaudio *chip, u32 cmd, short asic);
37 static int check_asic_status(struct echoaudio *chip);
38
39
init_hw(struct echoaudio * chip,u16 device_id,u16 subdevice_id)40 static int init_hw(struct echoaudio *chip, u16 device_id, u16 subdevice_id)
41 {
42 int err;
43
44 if (snd_BUG_ON((subdevice_id & 0xfff0) != MONA))
45 return -ENODEV;
46
47 err = init_dsp_comm_page(chip);
48 if (err) {
49 dev_err(chip->card->dev,
50 "init_hw - could not initialize DSP comm page\n");
51 return err;
52 }
53
54 chip->device_id = device_id;
55 chip->subdevice_id = subdevice_id;
56 chip->bad_board = true;
57 chip->input_clock_types =
58 ECHO_CLOCK_BIT_INTERNAL | ECHO_CLOCK_BIT_SPDIF |
59 ECHO_CLOCK_BIT_WORD | ECHO_CLOCK_BIT_ADAT;
60 chip->digital_modes =
61 ECHOCAPS_HAS_DIGITAL_MODE_SPDIF_RCA |
62 ECHOCAPS_HAS_DIGITAL_MODE_SPDIF_OPTICAL |
63 ECHOCAPS_HAS_DIGITAL_MODE_ADAT;
64
65 /* Mona comes in both '301 and '361 flavors */
66 if (chip->device_id == DEVICE_ID_56361)
67 chip->dsp_code_to_load = FW_MONA_361_DSP;
68 else
69 chip->dsp_code_to_load = FW_MONA_301_DSP;
70
71 err = load_firmware(chip);
72 if (err < 0)
73 return err;
74 chip->bad_board = false;
75
76 return err;
77 }
78
79
80
set_mixer_defaults(struct echoaudio * chip)81 static int set_mixer_defaults(struct echoaudio *chip)
82 {
83 chip->digital_mode = DIGITAL_MODE_SPDIF_RCA;
84 chip->professional_spdif = false;
85 chip->digital_in_automute = true;
86 return init_line_levels(chip);
87 }
88
89
90
detect_input_clocks(const struct echoaudio * chip)91 static u32 detect_input_clocks(const struct echoaudio *chip)
92 {
93 u32 clocks_from_dsp, clock_bits;
94
95 /* Map the DSP clock detect bits to the generic driver clock
96 detect bits */
97 clocks_from_dsp = le32_to_cpu(chip->comm_page->status_clocks);
98
99 clock_bits = ECHO_CLOCK_BIT_INTERNAL;
100
101 if (clocks_from_dsp & GML_CLOCK_DETECT_BIT_SPDIF)
102 clock_bits |= ECHO_CLOCK_BIT_SPDIF;
103
104 if (clocks_from_dsp & GML_CLOCK_DETECT_BIT_ADAT)
105 clock_bits |= ECHO_CLOCK_BIT_ADAT;
106
107 if (clocks_from_dsp & GML_CLOCK_DETECT_BIT_WORD)
108 clock_bits |= ECHO_CLOCK_BIT_WORD;
109
110 return clock_bits;
111 }
112
113
114
115 /* Mona has an ASIC on the PCI card and another ASIC in the external box;
116 both need to be loaded. */
load_asic(struct echoaudio * chip)117 static int load_asic(struct echoaudio *chip)
118 {
119 u32 control_reg;
120 int err;
121 short asic;
122
123 if (chip->asic_loaded)
124 return 0;
125
126 mdelay(10);
127
128 if (chip->device_id == DEVICE_ID_56361)
129 asic = FW_MONA_361_1_ASIC48;
130 else
131 asic = FW_MONA_301_1_ASIC48;
132
133 err = load_asic_generic(chip, DSP_FNC_LOAD_MONA_PCI_CARD_ASIC, asic);
134 if (err < 0)
135 return err;
136
137 chip->asic_code = asic;
138 mdelay(10);
139
140 /* Do the external one */
141 err = load_asic_generic(chip, DSP_FNC_LOAD_MONA_EXTERNAL_ASIC,
142 FW_MONA_2_ASIC);
143 if (err < 0)
144 return err;
145
146 mdelay(10);
147 err = check_asic_status(chip);
148
149 /* Set up the control register if the load succeeded -
150 48 kHz, internal clock, S/PDIF RCA mode */
151 if (!err) {
152 control_reg = GML_CONVERTER_ENABLE | GML_48KHZ;
153 err = write_control_reg(chip, control_reg, true);
154 }
155
156 return err;
157 }
158
159
160
161 /* Depending on what digital mode you want, Mona needs different ASICs
162 loaded. This function checks the ASIC needed for the new mode and sees
163 if it matches the one already loaded. */
switch_asic(struct echoaudio * chip,char double_speed)164 static int switch_asic(struct echoaudio *chip, char double_speed)
165 {
166 int err;
167 short asic;
168
169 /* Check the clock detect bits to see if this is
170 a single-speed clock or a double-speed clock; load
171 a new ASIC if necessary. */
172 if (chip->device_id == DEVICE_ID_56361) {
173 if (double_speed)
174 asic = FW_MONA_361_1_ASIC96;
175 else
176 asic = FW_MONA_361_1_ASIC48;
177 } else {
178 if (double_speed)
179 asic = FW_MONA_301_1_ASIC96;
180 else
181 asic = FW_MONA_301_1_ASIC48;
182 }
183
184 if (asic != chip->asic_code) {
185 /* Load the desired ASIC */
186 err = load_asic_generic(chip, DSP_FNC_LOAD_MONA_PCI_CARD_ASIC,
187 asic);
188 if (err < 0)
189 return err;
190 chip->asic_code = asic;
191 }
192
193 return 0;
194 }
195
196
197
set_sample_rate(struct echoaudio * chip,u32 rate)198 static int set_sample_rate(struct echoaudio *chip, u32 rate)
199 {
200 u32 control_reg, clock;
201 short asic;
202 char force_write;
203
204 /* Only set the clock for internal mode. */
205 if (chip->input_clock != ECHO_CLOCK_INTERNAL) {
206 dev_dbg(chip->card->dev,
207 "Cannot set sample rate - clock not set to CLK_CLOCKININTERNAL\n");
208 /* Save the rate anyhow */
209 chip->comm_page->sample_rate = cpu_to_le32(rate);
210 chip->sample_rate = rate;
211 return 0;
212 }
213
214 /* Now, check to see if the required ASIC is loaded */
215 if (rate >= 88200) {
216 if (chip->digital_mode == DIGITAL_MODE_ADAT)
217 return -EINVAL;
218 if (chip->device_id == DEVICE_ID_56361)
219 asic = FW_MONA_361_1_ASIC96;
220 else
221 asic = FW_MONA_301_1_ASIC96;
222 } else {
223 if (chip->device_id == DEVICE_ID_56361)
224 asic = FW_MONA_361_1_ASIC48;
225 else
226 asic = FW_MONA_301_1_ASIC48;
227 }
228
229 force_write = 0;
230 if (asic != chip->asic_code) {
231 int err;
232 /* Load the desired ASIC (load_asic_generic() can sleep) */
233 spin_unlock_irq(&chip->lock);
234 err = load_asic_generic(chip, DSP_FNC_LOAD_MONA_PCI_CARD_ASIC,
235 asic);
236 spin_lock_irq(&chip->lock);
237
238 if (err < 0)
239 return err;
240 chip->asic_code = asic;
241 force_write = 1;
242 }
243
244 /* Compute the new control register value */
245 clock = 0;
246 control_reg = le32_to_cpu(chip->comm_page->control_register);
247 control_reg &= GML_CLOCK_CLEAR_MASK;
248 control_reg &= GML_SPDIF_RATE_CLEAR_MASK;
249
250 switch (rate) {
251 case 96000:
252 clock = GML_96KHZ;
253 break;
254 case 88200:
255 clock = GML_88KHZ;
256 break;
257 case 48000:
258 clock = GML_48KHZ | GML_SPDIF_SAMPLE_RATE1;
259 break;
260 case 44100:
261 clock = GML_44KHZ;
262 /* Professional mode */
263 if (control_reg & GML_SPDIF_PRO_MODE)
264 clock |= GML_SPDIF_SAMPLE_RATE0;
265 break;
266 case 32000:
267 clock = GML_32KHZ | GML_SPDIF_SAMPLE_RATE0 |
268 GML_SPDIF_SAMPLE_RATE1;
269 break;
270 case 22050:
271 clock = GML_22KHZ;
272 break;
273 case 16000:
274 clock = GML_16KHZ;
275 break;
276 case 11025:
277 clock = GML_11KHZ;
278 break;
279 case 8000:
280 clock = GML_8KHZ;
281 break;
282 default:
283 dev_err(chip->card->dev,
284 "set_sample_rate: %d invalid!\n", rate);
285 return -EINVAL;
286 }
287
288 control_reg |= clock;
289
290 chip->comm_page->sample_rate = cpu_to_le32(rate); /* ignored by the DSP */
291 chip->sample_rate = rate;
292 dev_dbg(chip->card->dev,
293 "set_sample_rate: %d clock %d\n", rate, clock);
294
295 return write_control_reg(chip, control_reg, force_write);
296 }
297
298
299
set_input_clock(struct echoaudio * chip,u16 clock)300 static int set_input_clock(struct echoaudio *chip, u16 clock)
301 {
302 u32 control_reg, clocks_from_dsp;
303 int err;
304
305 /* Mask off the clock select bits */
306 control_reg = le32_to_cpu(chip->comm_page->control_register) &
307 GML_CLOCK_CLEAR_MASK;
308 clocks_from_dsp = le32_to_cpu(chip->comm_page->status_clocks);
309
310 switch (clock) {
311 case ECHO_CLOCK_INTERNAL:
312 chip->input_clock = ECHO_CLOCK_INTERNAL;
313 return set_sample_rate(chip, chip->sample_rate);
314 case ECHO_CLOCK_SPDIF:
315 if (chip->digital_mode == DIGITAL_MODE_ADAT)
316 return -EAGAIN;
317 spin_unlock_irq(&chip->lock);
318 err = switch_asic(chip, clocks_from_dsp &
319 GML_CLOCK_DETECT_BIT_SPDIF96);
320 spin_lock_irq(&chip->lock);
321 if (err < 0)
322 return err;
323 control_reg |= GML_SPDIF_CLOCK;
324 if (clocks_from_dsp & GML_CLOCK_DETECT_BIT_SPDIF96)
325 control_reg |= GML_DOUBLE_SPEED_MODE;
326 else
327 control_reg &= ~GML_DOUBLE_SPEED_MODE;
328 break;
329 case ECHO_CLOCK_WORD:
330 spin_unlock_irq(&chip->lock);
331 err = switch_asic(chip, clocks_from_dsp &
332 GML_CLOCK_DETECT_BIT_WORD96);
333 spin_lock_irq(&chip->lock);
334 if (err < 0)
335 return err;
336 control_reg |= GML_WORD_CLOCK;
337 if (clocks_from_dsp & GML_CLOCK_DETECT_BIT_WORD96)
338 control_reg |= GML_DOUBLE_SPEED_MODE;
339 else
340 control_reg &= ~GML_DOUBLE_SPEED_MODE;
341 break;
342 case ECHO_CLOCK_ADAT:
343 dev_dbg(chip->card->dev, "Set Mona clock to ADAT\n");
344 if (chip->digital_mode != DIGITAL_MODE_ADAT)
345 return -EAGAIN;
346 control_reg |= GML_ADAT_CLOCK;
347 control_reg &= ~GML_DOUBLE_SPEED_MODE;
348 break;
349 default:
350 dev_err(chip->card->dev,
351 "Input clock 0x%x not supported for Mona\n", clock);
352 return -EINVAL;
353 }
354
355 chip->input_clock = clock;
356 return write_control_reg(chip, control_reg, true);
357 }
358
359
360
dsp_set_digital_mode(struct echoaudio * chip,u8 mode)361 static int dsp_set_digital_mode(struct echoaudio *chip, u8 mode)
362 {
363 u32 control_reg;
364 int err, incompatible_clock;
365
366 /* Set clock to "internal" if it's not compatible with the new mode */
367 incompatible_clock = false;
368 switch (mode) {
369 case DIGITAL_MODE_SPDIF_OPTICAL:
370 case DIGITAL_MODE_SPDIF_RCA:
371 if (chip->input_clock == ECHO_CLOCK_ADAT)
372 incompatible_clock = true;
373 break;
374 case DIGITAL_MODE_ADAT:
375 if (chip->input_clock == ECHO_CLOCK_SPDIF)
376 incompatible_clock = true;
377 break;
378 default:
379 dev_err(chip->card->dev,
380 "Digital mode not supported: %d\n", mode);
381 return -EINVAL;
382 }
383
384 spin_lock_irq(&chip->lock);
385
386 if (incompatible_clock) { /* Switch to 48KHz, internal */
387 chip->sample_rate = 48000;
388 set_input_clock(chip, ECHO_CLOCK_INTERNAL);
389 }
390
391 /* Clear the current digital mode */
392 control_reg = le32_to_cpu(chip->comm_page->control_register);
393 control_reg &= GML_DIGITAL_MODE_CLEAR_MASK;
394
395 /* Tweak the control reg */
396 switch (mode) {
397 case DIGITAL_MODE_SPDIF_OPTICAL:
398 control_reg |= GML_SPDIF_OPTICAL_MODE;
399 break;
400 case DIGITAL_MODE_SPDIF_RCA:
401 /* GML_SPDIF_OPTICAL_MODE bit cleared */
402 break;
403 case DIGITAL_MODE_ADAT:
404 /* If the current ASIC is the 96KHz ASIC, switch the ASIC
405 and set to 48 KHz */
406 if (chip->asic_code == FW_MONA_361_1_ASIC96 ||
407 chip->asic_code == FW_MONA_301_1_ASIC96) {
408 set_sample_rate(chip, 48000);
409 }
410 control_reg |= GML_ADAT_MODE;
411 control_reg &= ~GML_DOUBLE_SPEED_MODE;
412 break;
413 }
414
415 err = write_control_reg(chip, control_reg, false);
416 spin_unlock_irq(&chip->lock);
417 if (err < 0)
418 return err;
419 chip->digital_mode = mode;
420
421 dev_dbg(chip->card->dev, "set_digital_mode to %d\n", mode);
422 return incompatible_clock;
423 }
424