Linux Audio

Check our new training course

Loading...
v5.9
  1// SPDX-License-Identifier: GPL-2.0-or-later
  2/*
  3 * Driver for Digigram miXart soundcards
  4 *
  5 * DSP firmware management
  6 *
  7 * Copyright (c) 2003 by Digigram <alsa@digigram.com>
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  8 */
  9
 10#include <linux/interrupt.h>
 11#include <linux/pci.h>
 12#include <linux/firmware.h>
 13#include <linux/vmalloc.h>
 14#include <linux/slab.h>
 15#include <linux/module.h>
 16#include <linux/io.h>
 17#include <sound/core.h>
 18#include "mixart.h"
 19#include "mixart_mixer.h"
 20#include "mixart_core.h"
 21#include "mixart_hwdep.h"
 22
 23
 24/**
 25 * wait for a value on a peudo register, exit with a timeout
 26 *
 27 * @mgr: pointer to miXart manager structure
 28 * @offset: unsigned pseudo_register base + offset of value
 29 * @is_egal: wait for the equal value
 30 * @value: value
 31 * @timeout: timeout in centisenconds
 32 */
 33static int mixart_wait_nice_for_register_value(struct mixart_mgr *mgr,
 34					       u32 offset, int is_egal,
 35					       u32 value, unsigned long timeout)
 36{
 37	unsigned long end_time = jiffies + (timeout * HZ / 100);
 38	u32 read;
 39
 40	do {	/* we may take too long time in this loop.
 41		 * so give controls back to kernel if needed.
 42		 */
 43		cond_resched();
 44
 45		read = readl_be( MIXART_MEM( mgr, offset ));
 46		if(is_egal) {
 47			if(read == value) return 0;
 48		}
 49		else { /* wait for different value */
 50			if(read != value) return 0;
 51		}
 52	} while ( time_after_eq(end_time, jiffies) );
 53
 54	return -EBUSY;
 55}
 56
 57
 58/*
 59  structures needed to upload elf code packets 
 60 */
 61struct snd_mixart_elf32_ehdr {
 62	u8      e_ident[16];
 63	__be16  e_type;
 64	__be16  e_machine;
 65	__be32  e_version;
 66	__be32  e_entry;
 67	__be32  e_phoff;
 68	__be32  e_shoff;
 69	__be32  e_flags;
 70	__be16  e_ehsize;
 71	__be16  e_phentsize;
 72	__be16  e_phnum;
 73	__be16  e_shentsize;
 74	__be16  e_shnum;
 75	__be16  e_shstrndx;
 76};
 77
 78struct snd_mixart_elf32_phdr {
 79	__be32  p_type;
 80	__be32  p_offset;
 81	__be32  p_vaddr;
 82	__be32  p_paddr;
 83	__be32  p_filesz;
 84	__be32  p_memsz;
 85	__be32  p_flags;
 86	__be32  p_align;
 87};
 88
 89static int mixart_load_elf(struct mixart_mgr *mgr, const struct firmware *dsp )
 90{
 91	char                    elf32_magic_number[4] = {0x7f,'E','L','F'};
 92	struct snd_mixart_elf32_ehdr *elf_header;
 93	int                     i;
 94
 95	elf_header = (struct snd_mixart_elf32_ehdr *)dsp->data;
 96	for( i=0; i<4; i++ )
 97		if ( elf32_magic_number[i] != elf_header->e_ident[i] )
 98			return -EINVAL;
 99
100	if( elf_header->e_phoff != 0 ) {
101		struct snd_mixart_elf32_phdr     elf_programheader;
102
103		for( i=0; i < be16_to_cpu(elf_header->e_phnum); i++ ) {
104			u32 pos = be32_to_cpu(elf_header->e_phoff) + (u32)(i * be16_to_cpu(elf_header->e_phentsize));
105
106			memcpy( &elf_programheader, dsp->data + pos, sizeof(elf_programheader) );
107
108			if(elf_programheader.p_type != 0) {
109				if( elf_programheader.p_filesz != 0 ) {
110					memcpy_toio( MIXART_MEM( mgr, be32_to_cpu(elf_programheader.p_vaddr)),
111						     dsp->data + be32_to_cpu( elf_programheader.p_offset ),
112						     be32_to_cpu( elf_programheader.p_filesz ));
113				}
114			}
115		}
116	}
117	return 0;
118}
119
120/*
121 * get basic information and init miXart
122 */
123
124/* audio IDs for request to the board */
125#define MIXART_FIRST_ANA_AUDIO_ID       0
126#define MIXART_FIRST_DIG_AUDIO_ID       8
127
128static int mixart_enum_connectors(struct mixart_mgr *mgr)
129{
130	u32 k;
131	int err;
132	struct mixart_msg request;
133	struct mixart_enum_connector_resp *connector;
134	struct mixart_audio_info_req  *audio_info_req;
135	struct mixart_audio_info_resp *audio_info;
136
137	connector = kmalloc(sizeof(*connector), GFP_KERNEL);
138	audio_info_req = kmalloc(sizeof(*audio_info_req), GFP_KERNEL);
139	audio_info = kmalloc(sizeof(*audio_info), GFP_KERNEL);
140	if (! connector || ! audio_info_req || ! audio_info) {
141		err = -ENOMEM;
142		goto __error;
143	}
144
145	audio_info_req->line_max_level = MIXART_FLOAT_P_22_0_TO_HEX;
146	audio_info_req->micro_max_level = MIXART_FLOAT_M_20_0_TO_HEX;
147	audio_info_req->cd_max_level = MIXART_FLOAT____0_0_TO_HEX;
148
149	request.message_id = MSG_SYSTEM_ENUM_PLAY_CONNECTOR;
150	request.uid = (struct mixart_uid){0,0};  /* board num = 0 */
151	request.data = NULL;
152	request.size = 0;
153
154	err = snd_mixart_send_msg(mgr, &request, sizeof(*connector), connector);
155	if((err < 0) || (connector->error_code) || (connector->uid_count > MIXART_MAX_PHYS_CONNECTORS)) {
156		dev_err(&mgr->pci->dev,
157			"error MSG_SYSTEM_ENUM_PLAY_CONNECTOR\n");
158		err = -EINVAL;
159		goto __error;
160	}
161
162	for(k=0; k < connector->uid_count; k++) {
163		struct mixart_pipe *pipe;
164
165		if(k < MIXART_FIRST_DIG_AUDIO_ID) {
166			pipe = &mgr->chip[k/2]->pipe_out_ana;
167		} else {
168			pipe = &mgr->chip[(k-MIXART_FIRST_DIG_AUDIO_ID)/2]->pipe_out_dig;
169		}
170		if(k & 1) {
171			pipe->uid_right_connector = connector->uid[k];   /* odd */
172		} else {
173			pipe->uid_left_connector = connector->uid[k];    /* even */
174		}
175
176		/* dev_dbg(&mgr->pci->dev, "playback connector[%d].object_id = %x\n", k, connector->uid[k].object_id); */
177
178		/* TODO: really need send_msg MSG_CONNECTOR_GET_AUDIO_INFO for each connector ? perhaps for analog level caps ? */
179		request.message_id = MSG_CONNECTOR_GET_AUDIO_INFO;
180		request.uid = connector->uid[k];
181		request.data = audio_info_req;
182		request.size = sizeof(*audio_info_req);
183
184		err = snd_mixart_send_msg(mgr, &request, sizeof(*audio_info), audio_info);
185		if( err < 0 ) {
186			dev_err(&mgr->pci->dev,
187				"error MSG_CONNECTOR_GET_AUDIO_INFO\n");
188			goto __error;
189		}
190		/*dev_dbg(&mgr->pci->dev, "play  analog_info.analog_level_present = %x\n", audio_info->info.analog_info.analog_level_present);*/
191	}
192
193	request.message_id = MSG_SYSTEM_ENUM_RECORD_CONNECTOR;
194	request.uid = (struct mixart_uid){0,0};  /* board num = 0 */
195	request.data = NULL;
196	request.size = 0;
197
198	err = snd_mixart_send_msg(mgr, &request, sizeof(*connector), connector);
199	if((err < 0) || (connector->error_code) || (connector->uid_count > MIXART_MAX_PHYS_CONNECTORS)) {
200		dev_err(&mgr->pci->dev,
201			"error MSG_SYSTEM_ENUM_RECORD_CONNECTOR\n");
202		err = -EINVAL;
203		goto __error;
204	}
205
206	for(k=0; k < connector->uid_count; k++) {
207		struct mixart_pipe *pipe;
208
209		if(k < MIXART_FIRST_DIG_AUDIO_ID) {
210			pipe = &mgr->chip[k/2]->pipe_in_ana;
211		} else {
212			pipe = &mgr->chip[(k-MIXART_FIRST_DIG_AUDIO_ID)/2]->pipe_in_dig;
213		}
214		if(k & 1) {
215			pipe->uid_right_connector = connector->uid[k];   /* odd */
216		} else {
217			pipe->uid_left_connector = connector->uid[k];    /* even */
218		}
219
220		/* dev_dbg(&mgr->pci->dev, "capture connector[%d].object_id = %x\n", k, connector->uid[k].object_id); */
221
222		/* TODO: really need send_msg MSG_CONNECTOR_GET_AUDIO_INFO for each connector ? perhaps for analog level caps ? */
223		request.message_id = MSG_CONNECTOR_GET_AUDIO_INFO;
224		request.uid = connector->uid[k];
225		request.data = audio_info_req;
226		request.size = sizeof(*audio_info_req);
227
228		err = snd_mixart_send_msg(mgr, &request, sizeof(*audio_info), audio_info);
229		if( err < 0 ) {
230			dev_err(&mgr->pci->dev,
231				"error MSG_CONNECTOR_GET_AUDIO_INFO\n");
232			goto __error;
233		}
234		/*dev_dbg(&mgr->pci->dev, "rec  analog_info.analog_level_present = %x\n", audio_info->info.analog_info.analog_level_present);*/
235	}
236	err = 0;
237
238 __error:
239	kfree(connector);
240	kfree(audio_info_req);
241	kfree(audio_info);
242
243	return err;
244}
245
246static int mixart_enum_physio(struct mixart_mgr *mgr)
247{
248	u32 k;
249	int err;
250	struct mixart_msg request;
251	struct mixart_uid get_console_mgr;
252	struct mixart_return_uid console_mgr;
253	struct mixart_uid_enumeration phys_io;
254
255	/* get the uid for the console manager */
256	get_console_mgr.object_id = 0;
257	get_console_mgr.desc = MSG_CONSOLE_MANAGER | 0; /* cardindex = 0 */
258
259	request.message_id = MSG_CONSOLE_GET_CLOCK_UID;
260	request.uid = get_console_mgr;
261	request.data = &get_console_mgr;
262	request.size = sizeof(get_console_mgr);
263
264	err = snd_mixart_send_msg(mgr, &request, sizeof(console_mgr), &console_mgr);
265
266	if( (err < 0) || (console_mgr.error_code != 0) ) {
267		dev_dbg(&mgr->pci->dev,
268			"error MSG_CONSOLE_GET_CLOCK_UID : err=%x\n",
269			console_mgr.error_code);
270		return -EINVAL;
271	}
272
273	/* used later for clock issues ! */
274	mgr->uid_console_manager = console_mgr.uid;
275
276	request.message_id = MSG_SYSTEM_ENUM_PHYSICAL_IO;
277	request.uid = (struct mixart_uid){0,0};
278	request.data = &console_mgr.uid;
279	request.size = sizeof(console_mgr.uid);
280
281	err = snd_mixart_send_msg(mgr, &request, sizeof(phys_io), &phys_io);
282	if( (err < 0) || ( phys_io.error_code != 0 ) ) {
283		dev_err(&mgr->pci->dev,
284			"error MSG_SYSTEM_ENUM_PHYSICAL_IO err(%x) error_code(%x)\n",
285			err, phys_io.error_code);
286		return -EINVAL;
287	}
288
289	/* min 2 phys io per card (analog in + analog out) */
290	if (phys_io.nb_uid < MIXART_MAX_CARDS * 2)
291		return -EINVAL;
292
293	for(k=0; k<mgr->num_cards; k++) {
294		mgr->chip[k]->uid_in_analog_physio = phys_io.uid[k];
295		mgr->chip[k]->uid_out_analog_physio = phys_io.uid[phys_io.nb_uid/2 + k]; 
296	}
297
298	return 0;
299}
300
301
302static int mixart_first_init(struct mixart_mgr *mgr)
303{
304	u32 k;
305	int err;
306	struct mixart_msg request;
307
308	if((err = mixart_enum_connectors(mgr)) < 0) return err;
309
310	if((err = mixart_enum_physio(mgr)) < 0) return err;
311
312	/* send a synchro command to card (necessary to do this before first MSG_STREAM_START_STREAM_GRP_PACKET) */
313	/* though why not here */
314	request.message_id = MSG_SYSTEM_SEND_SYNCHRO_CMD;
315	request.uid = (struct mixart_uid){0,0};
316	request.data = NULL;
317	request.size = 0;
318	/* this command has no data. response is a 32 bit status */
319	err = snd_mixart_send_msg(mgr, &request, sizeof(k), &k);
320	if( (err < 0) || (k != 0) ) {
321		dev_err(&mgr->pci->dev, "error MSG_SYSTEM_SEND_SYNCHRO_CMD\n");
322		return err == 0 ? -EINVAL : err;
323	}
324
325	return 0;
326}
327
328
329/* firmware base addresses (when hard coded) */
330#define MIXART_MOTHERBOARD_XLX_BASE_ADDRESS   0x00600000
331
332static int mixart_dsp_load(struct mixart_mgr* mgr, int index, const struct firmware *dsp)
333{
334	int           err, card_index;
335	u32           status_xilinx, status_elf, status_daught;
336	u32           val;
337
338	/* read motherboard xilinx status */
339	status_xilinx = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
340	/* read elf status */
341	status_elf = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
342	/* read daughterboard xilinx status */
343	status_daught = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
344
345	/* motherboard xilinx status 5 will say that the board is performing a reset */
346	if (status_xilinx == 5) {
347		dev_err(&mgr->pci->dev, "miXart is resetting !\n");
348		return -EAGAIN; /* try again later */
349	}
350
351	switch (index)   {
352	case MIXART_MOTHERBOARD_XLX_INDEX:
353
354		/* xilinx already loaded ? */ 
355		if (status_xilinx == 4) {
356			dev_dbg(&mgr->pci->dev, "xilinx is already loaded !\n");
357			return 0;
358		}
359		/* the status should be 0 == "idle" */
360		if (status_xilinx != 0) {
361			dev_err(&mgr->pci->dev,
362				"xilinx load error ! status = %d\n",
363				   status_xilinx);
364			return -EIO; /* modprob -r may help ? */
365		}
366
367		/* check xilinx validity */
368		if (((u32*)(dsp->data))[0] == 0xffffffff)
369			return -EINVAL;
370		if (dsp->size % 4)
371			return -EINVAL;
372
373		/* set xilinx status to copying */
374		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
375
376		/* setup xilinx base address */
377		writel_be( MIXART_MOTHERBOARD_XLX_BASE_ADDRESS, MIXART_MEM( mgr,MIXART_PSEUDOREG_MXLX_BASE_ADDR_OFFSET ));
378		/* setup code size for xilinx file */
379		writel_be( dsp->size, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_SIZE_OFFSET ));
380
381		/* copy xilinx code */
382		memcpy_toio(  MIXART_MEM( mgr, MIXART_MOTHERBOARD_XLX_BASE_ADDRESS),  dsp->data,  dsp->size);
383    
384		/* set xilinx status to copy finished */
385		writel_be( 2, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
386
387		/* return, because no further processing needed */
388		return 0;
389
390	case MIXART_MOTHERBOARD_ELF_INDEX:
391
392		if (status_elf == 4) {
393			dev_dbg(&mgr->pci->dev, "elf file already loaded !\n");
394			return 0;
395		}
396
397		/* the status should be 0 == "idle" */
398		if (status_elf != 0) {
399			dev_err(&mgr->pci->dev,
400				"elf load error ! status = %d\n",
401				   status_elf);
402			return -EIO; /* modprob -r may help ? */
403		}
404
405		/* wait for xilinx status == 4 */
406		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET, 1, 4, 500); /* 5sec */
407		if (err < 0) {
408			dev_err(&mgr->pci->dev, "xilinx was not loaded or "
409				   "could not be started\n");
410			return err;
411		}
412
413		/* init some data on the card */
414		writel_be( 0, MIXART_MEM( mgr, MIXART_PSEUDOREG_BOARDNUMBER ) ); /* set miXart boardnumber to 0 */
415		writel_be( 0, MIXART_MEM( mgr, MIXART_FLOWTABLE_PTR ) );         /* reset pointer to flow table on miXart */
416
417		/* set elf status to copying */
418		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
419
420		/* process the copying of the elf packets */
421		err = mixart_load_elf( mgr, dsp );
422		if (err < 0) return err;
423
424		/* set elf status to copy finished */
425		writel_be( 2, MIXART_MEM( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
426
427		/* wait for elf status == 4 */
428		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET, 1, 4, 300); /* 3sec */
429		if (err < 0) {
430			dev_err(&mgr->pci->dev, "elf could not be started\n");
431			return err;
432		}
433
434		/* miXart waits at this point on the pointer to the flow table */
435		writel_be( (u32)mgr->flowinfo.addr, MIXART_MEM( mgr, MIXART_FLOWTABLE_PTR ) ); /* give pointer of flow table to miXart */
436
437		return 0;  /* return, another xilinx file has to be loaded before */
438
439	case MIXART_AESEBUBOARD_XLX_INDEX:
440	default:
441
442		/* elf and xilinx should be loaded */
443		if (status_elf != 4 || status_xilinx != 4) {
444			dev_err(&mgr->pci->dev, "xilinx or elf not "
445			       "successfully loaded\n");
446			return -EIO; /* modprob -r may help ? */
447		}
448
449		/* wait for daughter detection != 0 */
450		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DBRD_PRESENCE_OFFSET, 0, 0, 30); /* 300msec */
451		if (err < 0) {
452			dev_err(&mgr->pci->dev, "error starting elf file\n");
453			return err;
454		}
455
456		/* the board type can now be retrieved */
457		mgr->board_type = (DAUGHTER_TYPE_MASK & readl_be( MIXART_MEM( mgr, MIXART_PSEUDOREG_DBRD_TYPE_OFFSET)));
458
459		if (mgr->board_type == MIXART_DAUGHTER_TYPE_NONE)
460			break;  /* no daughter board; the file does not have to be loaded, continue after the switch */
461
462		/* only if aesebu daughter board presence (elf code must run)  */ 
463		if (mgr->board_type != MIXART_DAUGHTER_TYPE_AES )
464			return -EINVAL;
465
466		/* daughter should be idle */
467		if (status_daught != 0) {
468			dev_err(&mgr->pci->dev,
469				"daughter load error ! status = %d\n",
470			       status_daught);
471			return -EIO; /* modprob -r may help ? */
472		}
473 
474		/* check daughterboard xilinx validity */
475		if (((u32*)(dsp->data))[0] == 0xffffffff)
476			return -EINVAL;
477		if (dsp->size % 4)
478			return -EINVAL;
479
480		/* inform mixart about the size of the file */
481		writel_be( dsp->size, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_SIZE_OFFSET ));
482
483		/* set daughterboard status to 1 */
484		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
485
486		/* wait for status == 2 */
487		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET, 1, 2, 30); /* 300msec */
488		if (err < 0) {
489			dev_err(&mgr->pci->dev, "daughter board load error\n");
490			return err;
491		}
492
493		/* get the address where to write the file */
494		val = readl_be( MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_BASE_ADDR_OFFSET ));
495		if (!val)
496			return -EINVAL;
497
498		/* copy daughterboard xilinx code */
499		memcpy_toio(  MIXART_MEM( mgr, val),  dsp->data,  dsp->size);
500
501		/* set daughterboard status to 4 */
502		writel_be( 4, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
503
504		/* continue with init */
505		break;
506	} /* end of switch file index*/
507
508        /* wait for daughter status == 3 */
509        err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET, 1, 3, 300); /* 3sec */
510        if (err < 0) {
511		dev_err(&mgr->pci->dev,
512			   "daughter board could not be initialised\n");
513		return err;
514	}
515
516	/* init mailbox (communication with embedded) */
517	snd_mixart_init_mailbox(mgr);
518
519	/* first communication with embedded */
520	err = mixart_first_init(mgr);
521        if (err < 0) {
522		dev_err(&mgr->pci->dev, "miXart could not be set up\n");
523		return err;
524	}
525
526       	/* create devices and mixer in accordance with HW options*/
527        for (card_index = 0; card_index < mgr->num_cards; card_index++) {
528		struct snd_mixart *chip = mgr->chip[card_index];
529
530		if ((err = snd_mixart_create_pcm(chip)) < 0)
531			return err;
532
533		if (card_index == 0) {
534			if ((err = snd_mixart_create_mixer(chip->mgr)) < 0)
535	        		return err;
536		}
537
538		if ((err = snd_card_register(chip->card)) < 0)
539			return err;
540	}
541
542	dev_dbg(&mgr->pci->dev,
543		"miXart firmware downloaded and successfully set up\n");
544
545	return 0;
546}
547
548
549int snd_mixart_setup_firmware(struct mixart_mgr *mgr)
550{
551	static const char * const fw_files[3] = {
552		"miXart8.xlx", "miXart8.elf", "miXart8AES.xlx"
553	};
554	char path[32];
555
556	const struct firmware *fw_entry;
557	int i, err;
558
559	for (i = 0; i < 3; i++) {
560		sprintf(path, "mixart/%s", fw_files[i]);
561		if (request_firmware(&fw_entry, path, &mgr->pci->dev)) {
562			dev_err(&mgr->pci->dev,
563				"miXart: can't load firmware %s\n", path);
564			return -ENOENT;
565		}
566		/* fake hwdep dsp record */
567		err = mixart_dsp_load(mgr, i, fw_entry);
568		release_firmware(fw_entry);
569		if (err < 0)
570			return err;
571		mgr->dsp_loaded |= 1 << i;
572	}
573	return 0;
574}
575
576MODULE_FIRMWARE("mixart/miXart8.xlx");
577MODULE_FIRMWARE("mixart/miXart8.elf");
578MODULE_FIRMWARE("mixart/miXart8AES.xlx");
v4.17
 
  1/*
  2 * Driver for Digigram miXart soundcards
  3 *
  4 * DSP firmware management
  5 *
  6 * Copyright (c) 2003 by Digigram <alsa@digigram.com>
  7 *
  8 *   This program is free software; you can redistribute it and/or modify
  9 *   it under the terms of the GNU General Public License as published by
 10 *   the Free Software Foundation; either version 2 of the License, or
 11 *   (at your option) any later version.
 12 *
 13 *   This program is distributed in the hope that it will be useful,
 14 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 15 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 16 *   GNU General Public License for more details.
 17 *
 18 *   You should have received a copy of the GNU General Public License
 19 *   along with this program; if not, write to the Free Software
 20 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 21 */
 22
 23#include <linux/interrupt.h>
 24#include <linux/pci.h>
 25#include <linux/firmware.h>
 26#include <linux/vmalloc.h>
 27#include <linux/slab.h>
 28#include <linux/module.h>
 29#include <linux/io.h>
 30#include <sound/core.h>
 31#include "mixart.h"
 32#include "mixart_mixer.h"
 33#include "mixart_core.h"
 34#include "mixart_hwdep.h"
 35
 36
 37/**
 38 * wait for a value on a peudo register, exit with a timeout
 39 *
 40 * @mgr: pointer to miXart manager structure
 41 * @offset: unsigned pseudo_register base + offset of value
 42 * @is_egal: wait for the equal value
 43 * @value: value
 44 * @timeout: timeout in centisenconds
 45 */
 46static int mixart_wait_nice_for_register_value(struct mixart_mgr *mgr,
 47					       u32 offset, int is_egal,
 48					       u32 value, unsigned long timeout)
 49{
 50	unsigned long end_time = jiffies + (timeout * HZ / 100);
 51	u32 read;
 52
 53	do {	/* we may take too long time in this loop.
 54		 * so give controls back to kernel if needed.
 55		 */
 56		cond_resched();
 57
 58		read = readl_be( MIXART_MEM( mgr, offset ));
 59		if(is_egal) {
 60			if(read == value) return 0;
 61		}
 62		else { /* wait for different value */
 63			if(read != value) return 0;
 64		}
 65	} while ( time_after_eq(end_time, jiffies) );
 66
 67	return -EBUSY;
 68}
 69
 70
 71/*
 72  structures needed to upload elf code packets 
 73 */
 74struct snd_mixart_elf32_ehdr {
 75	u8      e_ident[16];
 76	u16     e_type;
 77	u16     e_machine;
 78	u32     e_version;
 79	u32     e_entry;
 80	u32     e_phoff;
 81	u32     e_shoff;
 82	u32     e_flags;
 83	u16     e_ehsize;
 84	u16     e_phentsize;
 85	u16     e_phnum;
 86	u16     e_shentsize;
 87	u16     e_shnum;
 88	u16     e_shstrndx;
 89};
 90
 91struct snd_mixart_elf32_phdr {
 92	u32     p_type;
 93	u32     p_offset;
 94	u32     p_vaddr;
 95	u32     p_paddr;
 96	u32     p_filesz;
 97	u32     p_memsz;
 98	u32     p_flags;
 99	u32     p_align;
100};
101
102static int mixart_load_elf(struct mixart_mgr *mgr, const struct firmware *dsp )
103{
104	char                    elf32_magic_number[4] = {0x7f,'E','L','F'};
105	struct snd_mixart_elf32_ehdr *elf_header;
106	int                     i;
107
108	elf_header = (struct snd_mixart_elf32_ehdr *)dsp->data;
109	for( i=0; i<4; i++ )
110		if ( elf32_magic_number[i] != elf_header->e_ident[i] )
111			return -EINVAL;
112
113	if( elf_header->e_phoff != 0 ) {
114		struct snd_mixart_elf32_phdr     elf_programheader;
115
116		for( i=0; i < be16_to_cpu(elf_header->e_phnum); i++ ) {
117			u32 pos = be32_to_cpu(elf_header->e_phoff) + (u32)(i * be16_to_cpu(elf_header->e_phentsize));
118
119			memcpy( &elf_programheader, dsp->data + pos, sizeof(elf_programheader) );
120
121			if(elf_programheader.p_type != 0) {
122				if( elf_programheader.p_filesz != 0 ) {
123					memcpy_toio( MIXART_MEM( mgr, be32_to_cpu(elf_programheader.p_vaddr)),
124						     dsp->data + be32_to_cpu( elf_programheader.p_offset ),
125						     be32_to_cpu( elf_programheader.p_filesz ));
126				}
127			}
128		}
129	}
130	return 0;
131}
132
133/*
134 * get basic information and init miXart
135 */
136
137/* audio IDs for request to the board */
138#define MIXART_FIRST_ANA_AUDIO_ID       0
139#define MIXART_FIRST_DIG_AUDIO_ID       8
140
141static int mixart_enum_connectors(struct mixart_mgr *mgr)
142{
143	u32 k;
144	int err;
145	struct mixart_msg request;
146	struct mixart_enum_connector_resp *connector;
147	struct mixart_audio_info_req  *audio_info_req;
148	struct mixart_audio_info_resp *audio_info;
149
150	connector = kmalloc(sizeof(*connector), GFP_KERNEL);
151	audio_info_req = kmalloc(sizeof(*audio_info_req), GFP_KERNEL);
152	audio_info = kmalloc(sizeof(*audio_info), GFP_KERNEL);
153	if (! connector || ! audio_info_req || ! audio_info) {
154		err = -ENOMEM;
155		goto __error;
156	}
157
158	audio_info_req->line_max_level = MIXART_FLOAT_P_22_0_TO_HEX;
159	audio_info_req->micro_max_level = MIXART_FLOAT_M_20_0_TO_HEX;
160	audio_info_req->cd_max_level = MIXART_FLOAT____0_0_TO_HEX;
161
162	request.message_id = MSG_SYSTEM_ENUM_PLAY_CONNECTOR;
163	request.uid = (struct mixart_uid){0,0};  /* board num = 0 */
164	request.data = NULL;
165	request.size = 0;
166
167	err = snd_mixart_send_msg(mgr, &request, sizeof(*connector), connector);
168	if((err < 0) || (connector->error_code) || (connector->uid_count > MIXART_MAX_PHYS_CONNECTORS)) {
169		dev_err(&mgr->pci->dev,
170			"error MSG_SYSTEM_ENUM_PLAY_CONNECTOR\n");
171		err = -EINVAL;
172		goto __error;
173	}
174
175	for(k=0; k < connector->uid_count; k++) {
176		struct mixart_pipe *pipe;
177
178		if(k < MIXART_FIRST_DIG_AUDIO_ID) {
179			pipe = &mgr->chip[k/2]->pipe_out_ana;
180		} else {
181			pipe = &mgr->chip[(k-MIXART_FIRST_DIG_AUDIO_ID)/2]->pipe_out_dig;
182		}
183		if(k & 1) {
184			pipe->uid_right_connector = connector->uid[k];   /* odd */
185		} else {
186			pipe->uid_left_connector = connector->uid[k];    /* even */
187		}
188
189		/* dev_dbg(&mgr->pci->dev, "playback connector[%d].object_id = %x\n", k, connector->uid[k].object_id); */
190
191		/* TODO: really need send_msg MSG_CONNECTOR_GET_AUDIO_INFO for each connector ? perhaps for analog level caps ? */
192		request.message_id = MSG_CONNECTOR_GET_AUDIO_INFO;
193		request.uid = connector->uid[k];
194		request.data = audio_info_req;
195		request.size = sizeof(*audio_info_req);
196
197		err = snd_mixart_send_msg(mgr, &request, sizeof(*audio_info), audio_info);
198		if( err < 0 ) {
199			dev_err(&mgr->pci->dev,
200				"error MSG_CONNECTOR_GET_AUDIO_INFO\n");
201			goto __error;
202		}
203		/*dev_dbg(&mgr->pci->dev, "play  analog_info.analog_level_present = %x\n", audio_info->info.analog_info.analog_level_present);*/
204	}
205
206	request.message_id = MSG_SYSTEM_ENUM_RECORD_CONNECTOR;
207	request.uid = (struct mixart_uid){0,0};  /* board num = 0 */
208	request.data = NULL;
209	request.size = 0;
210
211	err = snd_mixart_send_msg(mgr, &request, sizeof(*connector), connector);
212	if((err < 0) || (connector->error_code) || (connector->uid_count > MIXART_MAX_PHYS_CONNECTORS)) {
213		dev_err(&mgr->pci->dev,
214			"error MSG_SYSTEM_ENUM_RECORD_CONNECTOR\n");
215		err = -EINVAL;
216		goto __error;
217	}
218
219	for(k=0; k < connector->uid_count; k++) {
220		struct mixart_pipe *pipe;
221
222		if(k < MIXART_FIRST_DIG_AUDIO_ID) {
223			pipe = &mgr->chip[k/2]->pipe_in_ana;
224		} else {
225			pipe = &mgr->chip[(k-MIXART_FIRST_DIG_AUDIO_ID)/2]->pipe_in_dig;
226		}
227		if(k & 1) {
228			pipe->uid_right_connector = connector->uid[k];   /* odd */
229		} else {
230			pipe->uid_left_connector = connector->uid[k];    /* even */
231		}
232
233		/* dev_dbg(&mgr->pci->dev, "capture connector[%d].object_id = %x\n", k, connector->uid[k].object_id); */
234
235		/* TODO: really need send_msg MSG_CONNECTOR_GET_AUDIO_INFO for each connector ? perhaps for analog level caps ? */
236		request.message_id = MSG_CONNECTOR_GET_AUDIO_INFO;
237		request.uid = connector->uid[k];
238		request.data = audio_info_req;
239		request.size = sizeof(*audio_info_req);
240
241		err = snd_mixart_send_msg(mgr, &request, sizeof(*audio_info), audio_info);
242		if( err < 0 ) {
243			dev_err(&mgr->pci->dev,
244				"error MSG_CONNECTOR_GET_AUDIO_INFO\n");
245			goto __error;
246		}
247		/*dev_dbg(&mgr->pci->dev, "rec  analog_info.analog_level_present = %x\n", audio_info->info.analog_info.analog_level_present);*/
248	}
249	err = 0;
250
251 __error:
252	kfree(connector);
253	kfree(audio_info_req);
254	kfree(audio_info);
255
256	return err;
257}
258
259static int mixart_enum_physio(struct mixart_mgr *mgr)
260{
261	u32 k;
262	int err;
263	struct mixart_msg request;
264	struct mixart_uid get_console_mgr;
265	struct mixart_return_uid console_mgr;
266	struct mixart_uid_enumeration phys_io;
267
268	/* get the uid for the console manager */
269	get_console_mgr.object_id = 0;
270	get_console_mgr.desc = MSG_CONSOLE_MANAGER | 0; /* cardindex = 0 */
271
272	request.message_id = MSG_CONSOLE_GET_CLOCK_UID;
273	request.uid = get_console_mgr;
274	request.data = &get_console_mgr;
275	request.size = sizeof(get_console_mgr);
276
277	err = snd_mixart_send_msg(mgr, &request, sizeof(console_mgr), &console_mgr);
278
279	if( (err < 0) || (console_mgr.error_code != 0) ) {
280		dev_dbg(&mgr->pci->dev,
281			"error MSG_CONSOLE_GET_CLOCK_UID : err=%x\n",
282			console_mgr.error_code);
283		return -EINVAL;
284	}
285
286	/* used later for clock issues ! */
287	mgr->uid_console_manager = console_mgr.uid;
288
289	request.message_id = MSG_SYSTEM_ENUM_PHYSICAL_IO;
290	request.uid = (struct mixart_uid){0,0};
291	request.data = &console_mgr.uid;
292	request.size = sizeof(console_mgr.uid);
293
294	err = snd_mixart_send_msg(mgr, &request, sizeof(phys_io), &phys_io);
295	if( (err < 0) || ( phys_io.error_code != 0 ) ) {
296		dev_err(&mgr->pci->dev,
297			"error MSG_SYSTEM_ENUM_PHYSICAL_IO err(%x) error_code(%x)\n",
298			err, phys_io.error_code);
299		return -EINVAL;
300	}
301
302	/* min 2 phys io per card (analog in + analog out) */
303	if (phys_io.nb_uid < MIXART_MAX_CARDS * 2)
304		return -EINVAL;
305
306	for(k=0; k<mgr->num_cards; k++) {
307		mgr->chip[k]->uid_in_analog_physio = phys_io.uid[k];
308		mgr->chip[k]->uid_out_analog_physio = phys_io.uid[phys_io.nb_uid/2 + k]; 
309	}
310
311	return 0;
312}
313
314
315static int mixart_first_init(struct mixart_mgr *mgr)
316{
317	u32 k;
318	int err;
319	struct mixart_msg request;
320
321	if((err = mixart_enum_connectors(mgr)) < 0) return err;
322
323	if((err = mixart_enum_physio(mgr)) < 0) return err;
324
325	/* send a synchro command to card (necessary to do this before first MSG_STREAM_START_STREAM_GRP_PACKET) */
326	/* though why not here */
327	request.message_id = MSG_SYSTEM_SEND_SYNCHRO_CMD;
328	request.uid = (struct mixart_uid){0,0};
329	request.data = NULL;
330	request.size = 0;
331	/* this command has no data. response is a 32 bit status */
332	err = snd_mixart_send_msg(mgr, &request, sizeof(k), &k);
333	if( (err < 0) || (k != 0) ) {
334		dev_err(&mgr->pci->dev, "error MSG_SYSTEM_SEND_SYNCHRO_CMD\n");
335		return err == 0 ? -EINVAL : err;
336	}
337
338	return 0;
339}
340
341
342/* firmware base addresses (when hard coded) */
343#define MIXART_MOTHERBOARD_XLX_BASE_ADDRESS   0x00600000
344
345static int mixart_dsp_load(struct mixart_mgr* mgr, int index, const struct firmware *dsp)
346{
347	int           err, card_index;
348	u32           status_xilinx, status_elf, status_daught;
349	u32           val;
350
351	/* read motherboard xilinx status */
352	status_xilinx = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
353	/* read elf status */
354	status_elf = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
355	/* read daughterboard xilinx status */
356	status_daught = readl_be( MIXART_MEM( mgr,MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
357
358	/* motherboard xilinx status 5 will say that the board is performing a reset */
359	if (status_xilinx == 5) {
360		dev_err(&mgr->pci->dev, "miXart is resetting !\n");
361		return -EAGAIN; /* try again later */
362	}
363
364	switch (index)   {
365	case MIXART_MOTHERBOARD_XLX_INDEX:
366
367		/* xilinx already loaded ? */ 
368		if (status_xilinx == 4) {
369			dev_dbg(&mgr->pci->dev, "xilinx is already loaded !\n");
370			return 0;
371		}
372		/* the status should be 0 == "idle" */
373		if (status_xilinx != 0) {
374			dev_err(&mgr->pci->dev,
375				"xilinx load error ! status = %d\n",
376				   status_xilinx);
377			return -EIO; /* modprob -r may help ? */
378		}
379
380		/* check xilinx validity */
381		if (((u32*)(dsp->data))[0] == 0xffffffff)
382			return -EINVAL;
383		if (dsp->size % 4)
384			return -EINVAL;
385
386		/* set xilinx status to copying */
387		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
388
389		/* setup xilinx base address */
390		writel_be( MIXART_MOTHERBOARD_XLX_BASE_ADDRESS, MIXART_MEM( mgr,MIXART_PSEUDOREG_MXLX_BASE_ADDR_OFFSET ));
391		/* setup code size for xilinx file */
392		writel_be( dsp->size, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_SIZE_OFFSET ));
393
394		/* copy xilinx code */
395		memcpy_toio(  MIXART_MEM( mgr, MIXART_MOTHERBOARD_XLX_BASE_ADDRESS),  dsp->data,  dsp->size);
396    
397		/* set xilinx status to copy finished */
398		writel_be( 2, MIXART_MEM( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET ));
399
400		/* return, because no further processing needed */
401		return 0;
402
403	case MIXART_MOTHERBOARD_ELF_INDEX:
404
405		if (status_elf == 4) {
406			dev_dbg(&mgr->pci->dev, "elf file already loaded !\n");
407			return 0;
408		}
409
410		/* the status should be 0 == "idle" */
411		if (status_elf != 0) {
412			dev_err(&mgr->pci->dev,
413				"elf load error ! status = %d\n",
414				   status_elf);
415			return -EIO; /* modprob -r may help ? */
416		}
417
418		/* wait for xilinx status == 4 */
419		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_MXLX_STATUS_OFFSET, 1, 4, 500); /* 5sec */
420		if (err < 0) {
421			dev_err(&mgr->pci->dev, "xilinx was not loaded or "
422				   "could not be started\n");
423			return err;
424		}
425
426		/* init some data on the card */
427		writel_be( 0, MIXART_MEM( mgr, MIXART_PSEUDOREG_BOARDNUMBER ) ); /* set miXart boardnumber to 0 */
428		writel_be( 0, MIXART_MEM( mgr, MIXART_FLOWTABLE_PTR ) );         /* reset pointer to flow table on miXart */
429
430		/* set elf status to copying */
431		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
432
433		/* process the copying of the elf packets */
434		err = mixart_load_elf( mgr, dsp );
435		if (err < 0) return err;
436
437		/* set elf status to copy finished */
438		writel_be( 2, MIXART_MEM( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET ));
439
440		/* wait for elf status == 4 */
441		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_ELF_STATUS_OFFSET, 1, 4, 300); /* 3sec */
442		if (err < 0) {
443			dev_err(&mgr->pci->dev, "elf could not be started\n");
444			return err;
445		}
446
447		/* miXart waits at this point on the pointer to the flow table */
448		writel_be( (u32)mgr->flowinfo.addr, MIXART_MEM( mgr, MIXART_FLOWTABLE_PTR ) ); /* give pointer of flow table to miXart */
449
450		return 0;  /* return, another xilinx file has to be loaded before */
451
452	case MIXART_AESEBUBOARD_XLX_INDEX:
453	default:
454
455		/* elf and xilinx should be loaded */
456		if (status_elf != 4 || status_xilinx != 4) {
457			dev_err(&mgr->pci->dev, "xilinx or elf not "
458			       "successfully loaded\n");
459			return -EIO; /* modprob -r may help ? */
460		}
461
462		/* wait for daughter detection != 0 */
463		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DBRD_PRESENCE_OFFSET, 0, 0, 30); /* 300msec */
464		if (err < 0) {
465			dev_err(&mgr->pci->dev, "error starting elf file\n");
466			return err;
467		}
468
469		/* the board type can now be retrieved */
470		mgr->board_type = (DAUGHTER_TYPE_MASK & readl_be( MIXART_MEM( mgr, MIXART_PSEUDOREG_DBRD_TYPE_OFFSET)));
471
472		if (mgr->board_type == MIXART_DAUGHTER_TYPE_NONE)
473			break;  /* no daughter board; the file does not have to be loaded, continue after the switch */
474
475		/* only if aesebu daughter board presence (elf code must run)  */ 
476		if (mgr->board_type != MIXART_DAUGHTER_TYPE_AES )
477			return -EINVAL;
478
479		/* daughter should be idle */
480		if (status_daught != 0) {
481			dev_err(&mgr->pci->dev,
482				"daughter load error ! status = %d\n",
483			       status_daught);
484			return -EIO; /* modprob -r may help ? */
485		}
486 
487		/* check daughterboard xilinx validity */
488		if (((u32*)(dsp->data))[0] == 0xffffffff)
489			return -EINVAL;
490		if (dsp->size % 4)
491			return -EINVAL;
492
493		/* inform mixart about the size of the file */
494		writel_be( dsp->size, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_SIZE_OFFSET ));
495
496		/* set daughterboard status to 1 */
497		writel_be( 1, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
498
499		/* wait for status == 2 */
500		err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET, 1, 2, 30); /* 300msec */
501		if (err < 0) {
502			dev_err(&mgr->pci->dev, "daughter board load error\n");
503			return err;
504		}
505
506		/* get the address where to write the file */
507		val = readl_be( MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_BASE_ADDR_OFFSET ));
508		if (!val)
509			return -EINVAL;
510
511		/* copy daughterboard xilinx code */
512		memcpy_toio(  MIXART_MEM( mgr, val),  dsp->data,  dsp->size);
513
514		/* set daughterboard status to 4 */
515		writel_be( 4, MIXART_MEM( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET ));
516
517		/* continue with init */
518		break;
519	} /* end of switch file index*/
520
521        /* wait for daughter status == 3 */
522        err = mixart_wait_nice_for_register_value( mgr, MIXART_PSEUDOREG_DXLX_STATUS_OFFSET, 1, 3, 300); /* 3sec */
523        if (err < 0) {
524		dev_err(&mgr->pci->dev,
525			   "daughter board could not be initialised\n");
526		return err;
527	}
528
529	/* init mailbox (communication with embedded) */
530	snd_mixart_init_mailbox(mgr);
531
532	/* first communication with embedded */
533	err = mixart_first_init(mgr);
534        if (err < 0) {
535		dev_err(&mgr->pci->dev, "miXart could not be set up\n");
536		return err;
537	}
538
539       	/* create devices and mixer in accordance with HW options*/
540        for (card_index = 0; card_index < mgr->num_cards; card_index++) {
541		struct snd_mixart *chip = mgr->chip[card_index];
542
543		if ((err = snd_mixart_create_pcm(chip)) < 0)
544			return err;
545
546		if (card_index == 0) {
547			if ((err = snd_mixart_create_mixer(chip->mgr)) < 0)
548	        		return err;
549		}
550
551		if ((err = snd_card_register(chip->card)) < 0)
552			return err;
553	}
554
555	dev_dbg(&mgr->pci->dev,
556		"miXart firmware downloaded and successfully set up\n");
557
558	return 0;
559}
560
561
562int snd_mixart_setup_firmware(struct mixart_mgr *mgr)
563{
564	static char *fw_files[3] = {
565		"miXart8.xlx", "miXart8.elf", "miXart8AES.xlx"
566	};
567	char path[32];
568
569	const struct firmware *fw_entry;
570	int i, err;
571
572	for (i = 0; i < 3; i++) {
573		sprintf(path, "mixart/%s", fw_files[i]);
574		if (request_firmware(&fw_entry, path, &mgr->pci->dev)) {
575			dev_err(&mgr->pci->dev,
576				"miXart: can't load firmware %s\n", path);
577			return -ENOENT;
578		}
579		/* fake hwdep dsp record */
580		err = mixart_dsp_load(mgr, i, fw_entry);
581		release_firmware(fw_entry);
582		if (err < 0)
583			return err;
584		mgr->dsp_loaded |= 1 << i;
585	}
586	return 0;
587}
588
589MODULE_FIRMWARE("mixart/miXart8.xlx");
590MODULE_FIRMWARE("mixart/miXart8.elf");
591MODULE_FIRMWARE("mixart/miXart8AES.xlx");