xref: /linux/sound/pci/lx6464es/lx_core.c (revision 95298d63c67673c654c08952672d016212b26054)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /* -*- linux-c -*- *
3  *
4  * ALSA driver for the digigram lx6464es interface
5  * low-level interface
6  *
7  * Copyright (c) 2009 Tim Blechmann <tim@klingt.org>
8  */
9 
10 /* #define RMH_DEBUG 1 */
11 
12 #include <linux/bitops.h>
13 #include <linux/module.h>
14 #include <linux/pci.h>
15 #include <linux/delay.h>
16 
17 #include "lx6464es.h"
18 #include "lx_core.h"
19 
20 /* low-level register access */
21 
22 static const unsigned long dsp_port_offsets[] = {
23 	0,
24 	0x400,
25 	0x401,
26 	0x402,
27 	0x403,
28 	0x404,
29 	0x405,
30 	0x406,
31 	0x407,
32 	0x408,
33 	0x409,
34 	0x40a,
35 	0x40b,
36 	0x40c,
37 
38 	0x410,
39 	0x411,
40 	0x412,
41 	0x413,
42 	0x414,
43 	0x415,
44 	0x416,
45 
46 	0x420,
47 	0x430,
48 	0x431,
49 	0x432,
50 	0x433,
51 	0x434,
52 	0x440
53 };
54 
55 static void __iomem *lx_dsp_register(struct lx6464es *chip, int port)
56 {
57 	void __iomem *base_address = chip->port_dsp_bar;
58 	return base_address + dsp_port_offsets[port]*4;
59 }
60 
61 unsigned long lx_dsp_reg_read(struct lx6464es *chip, int port)
62 {
63 	void __iomem *address = lx_dsp_register(chip, port);
64 	return ioread32(address);
65 }
66 
67 static void lx_dsp_reg_readbuf(struct lx6464es *chip, int port, u32 *data,
68 			       u32 len)
69 {
70 	u32 __iomem *address = lx_dsp_register(chip, port);
71 	int i;
72 
73 	/* we cannot use memcpy_fromio */
74 	for (i = 0; i != len; ++i)
75 		data[i] = ioread32(address + i);
76 }
77 
78 
79 void lx_dsp_reg_write(struct lx6464es *chip, int port, unsigned data)
80 {
81 	void __iomem *address = lx_dsp_register(chip, port);
82 	iowrite32(data, address);
83 }
84 
85 static void lx_dsp_reg_writebuf(struct lx6464es *chip, int port,
86 				const u32 *data, u32 len)
87 {
88 	u32 __iomem *address = lx_dsp_register(chip, port);
89 	int i;
90 
91 	/* we cannot use memcpy_to */
92 	for (i = 0; i != len; ++i)
93 		iowrite32(data[i], address + i);
94 }
95 
96 
97 static const unsigned long plx_port_offsets[] = {
98 	0x04,
99 	0x40,
100 	0x44,
101 	0x48,
102 	0x4c,
103 	0x50,
104 	0x54,
105 	0x58,
106 	0x5c,
107 	0x64,
108 	0x68,
109 	0x6C
110 };
111 
112 static void __iomem *lx_plx_register(struct lx6464es *chip, int port)
113 {
114 	void __iomem *base_address = chip->port_plx_remapped;
115 	return base_address + plx_port_offsets[port];
116 }
117 
118 unsigned long lx_plx_reg_read(struct lx6464es *chip, int port)
119 {
120 	void __iomem *address = lx_plx_register(chip, port);
121 	return ioread32(address);
122 }
123 
124 void lx_plx_reg_write(struct lx6464es *chip, int port, u32 data)
125 {
126 	void __iomem *address = lx_plx_register(chip, port);
127 	iowrite32(data, address);
128 }
129 
130 /* rmh */
131 
132 #ifdef CONFIG_SND_DEBUG
133 #define CMD_NAME(a) a
134 #else
135 #define CMD_NAME(a) NULL
136 #endif
137 
138 #define Reg_CSM_MR			0x00000002
139 #define Reg_CSM_MC			0x00000001
140 
141 struct dsp_cmd_info {
142 	u32    dcCodeOp;	/* Op Code of the command (usually 1st 24-bits
143 				 * word).*/
144 	u16    dcCmdLength;	/* Command length in words of 24 bits.*/
145 	u16    dcStatusType;	/* Status type: 0 for fixed length, 1 for
146 				 * random. */
147 	u16    dcStatusLength;	/* Status length (if fixed).*/
148 	char  *dcOpName;
149 };
150 
151 /*
152   Initialization and control data for the Microblaze interface
153   - OpCode:
154     the opcode field of the command set at the proper offset
155   - CmdLength
156     the number of command words
157   - StatusType
158     offset in the status registers: 0 means that the return value may be
159     different from 0, and must be read
160   - StatusLength
161     the number of status words (in addition to the return value)
162 */
163 
164 static const struct dsp_cmd_info dsp_commands[] =
165 {
166 	{ (CMD_00_INFO_DEBUG << OPCODE_OFFSET)			, 1 /*custom*/
167 	  , 1	, 0 /**/		    , CMD_NAME("INFO_DEBUG") },
168 	{ (CMD_01_GET_SYS_CFG << OPCODE_OFFSET) 		, 1 /**/
169 	  , 1      , 2 /**/		    , CMD_NAME("GET_SYS_CFG") },
170 	{ (CMD_02_SET_GRANULARITY << OPCODE_OFFSET)	        , 1 /**/
171 	  , 1      , 0 /**/		    , CMD_NAME("SET_GRANULARITY") },
172 	{ (CMD_03_SET_TIMER_IRQ << OPCODE_OFFSET)		, 1 /**/
173 	  , 1      , 0 /**/		    , CMD_NAME("SET_TIMER_IRQ") },
174 	{ (CMD_04_GET_EVENT << OPCODE_OFFSET)			, 1 /**/
175 	  , 1      , 0 /*up to 10*/     , CMD_NAME("GET_EVENT") },
176 	{ (CMD_05_GET_PIPES << OPCODE_OFFSET)			, 1 /**/
177 	  , 1      , 2 /*up to 4*/      , CMD_NAME("GET_PIPES") },
178 	{ (CMD_06_ALLOCATE_PIPE << OPCODE_OFFSET)		, 1 /**/
179 	  , 0      , 0 /**/		    , CMD_NAME("ALLOCATE_PIPE") },
180 	{ (CMD_07_RELEASE_PIPE << OPCODE_OFFSET)		, 1 /**/
181 	  , 0      , 0 /**/		    , CMD_NAME("RELEASE_PIPE") },
182 	{ (CMD_08_ASK_BUFFERS << OPCODE_OFFSET) 		, 1 /**/
183 	  , 1      , MAX_STREAM_BUFFER  , CMD_NAME("ASK_BUFFERS") },
184 	{ (CMD_09_STOP_PIPE << OPCODE_OFFSET)			, 1 /**/
185 	  , 0      , 0 /*up to 2*/      , CMD_NAME("STOP_PIPE") },
186 	{ (CMD_0A_GET_PIPE_SPL_COUNT << OPCODE_OFFSET)	        , 1 /**/
187 	  , 1      , 1 /*up to 2*/      , CMD_NAME("GET_PIPE_SPL_COUNT") },
188 	{ (CMD_0B_TOGGLE_PIPE_STATE << OPCODE_OFFSET)           , 1 /*up to 5*/
189 	  , 1      , 0 /**/		    , CMD_NAME("TOGGLE_PIPE_STATE") },
190 	{ (CMD_0C_DEF_STREAM << OPCODE_OFFSET)			, 1 /*up to 4*/
191 	  , 1      , 0 /**/		    , CMD_NAME("DEF_STREAM") },
192 	{ (CMD_0D_SET_MUTE  << OPCODE_OFFSET)			, 3 /**/
193 	  , 1      , 0 /**/		    , CMD_NAME("SET_MUTE") },
194 	{ (CMD_0E_GET_STREAM_SPL_COUNT << OPCODE_OFFSET)        , 1/**/
195 	  , 1      , 2 /**/		    , CMD_NAME("GET_STREAM_SPL_COUNT") },
196 	{ (CMD_0F_UPDATE_BUFFER << OPCODE_OFFSET)		, 3 /*up to 4*/
197 	  , 0      , 1 /**/		    , CMD_NAME("UPDATE_BUFFER") },
198 	{ (CMD_10_GET_BUFFER << OPCODE_OFFSET)			, 1 /**/
199 	  , 1      , 4 /**/		    , CMD_NAME("GET_BUFFER") },
200 	{ (CMD_11_CANCEL_BUFFER << OPCODE_OFFSET)		, 1 /**/
201 	  , 1      , 1 /*up to 4*/      , CMD_NAME("CANCEL_BUFFER") },
202 	{ (CMD_12_GET_PEAK << OPCODE_OFFSET)			, 1 /**/
203 	  , 1      , 1 /**/		    , CMD_NAME("GET_PEAK") },
204 	{ (CMD_13_SET_STREAM_STATE << OPCODE_OFFSET)	        , 1 /**/
205 	  , 1      , 0 /**/		    , CMD_NAME("SET_STREAM_STATE") },
206 };
207 
208 static void lx_message_init(struct lx_rmh *rmh, enum cmd_mb_opcodes cmd)
209 {
210 	snd_BUG_ON(cmd >= CMD_14_INVALID);
211 
212 	rmh->cmd[0] = dsp_commands[cmd].dcCodeOp;
213 	rmh->cmd_len = dsp_commands[cmd].dcCmdLength;
214 	rmh->stat_len = dsp_commands[cmd].dcStatusLength;
215 	rmh->dsp_stat = dsp_commands[cmd].dcStatusType;
216 	rmh->cmd_idx = cmd;
217 	memset(&rmh->cmd[1], 0, (REG_CRM_NUMBER - 1) * sizeof(u32));
218 
219 #ifdef CONFIG_SND_DEBUG
220 	memset(rmh->stat, 0, REG_CRM_NUMBER * sizeof(u32));
221 #endif
222 #ifdef RMH_DEBUG
223 	rmh->cmd_idx = cmd;
224 #endif
225 }
226 
227 #ifdef RMH_DEBUG
228 #define LXRMH "lx6464es rmh: "
229 static void lx_message_dump(struct lx_rmh *rmh)
230 {
231 	u8 idx = rmh->cmd_idx;
232 	int i;
233 
234 	snd_printk(LXRMH "command %s\n", dsp_commands[idx].dcOpName);
235 
236 	for (i = 0; i != rmh->cmd_len; ++i)
237 		snd_printk(LXRMH "\tcmd[%d] %08x\n", i, rmh->cmd[i]);
238 
239 	for (i = 0; i != rmh->stat_len; ++i)
240 		snd_printk(LXRMH "\tstat[%d]: %08x\n", i, rmh->stat[i]);
241 	snd_printk("\n");
242 }
243 #else
244 static inline void lx_message_dump(struct lx_rmh *rmh)
245 {}
246 #endif
247 
248 
249 
250 /* sleep 500 - 100 = 400 times 100us -> the timeout is >= 40 ms */
251 #define XILINX_TIMEOUT_MS       40
252 #define XILINX_POLL_NO_SLEEP    100
253 #define XILINX_POLL_ITERATIONS  150
254 
255 
256 static int lx_message_send_atomic(struct lx6464es *chip, struct lx_rmh *rmh)
257 {
258 	u32 reg = ED_DSP_TIMED_OUT;
259 	int dwloop;
260 
261 	if (lx_dsp_reg_read(chip, eReg_CSM) & (Reg_CSM_MC | Reg_CSM_MR)) {
262 		dev_err(chip->card->dev, "PIOSendMessage eReg_CSM %x\n", reg);
263 		return -EBUSY;
264 	}
265 
266 	/* write command */
267 	lx_dsp_reg_writebuf(chip, eReg_CRM1, rmh->cmd, rmh->cmd_len);
268 
269 	/* MicoBlaze gogogo */
270 	lx_dsp_reg_write(chip, eReg_CSM, Reg_CSM_MC);
271 
272 	/* wait for device to answer */
273 	for (dwloop = 0; dwloop != XILINX_TIMEOUT_MS * 1000; ++dwloop) {
274 		if (lx_dsp_reg_read(chip, eReg_CSM) & Reg_CSM_MR) {
275 			if (rmh->dsp_stat == 0)
276 				reg = lx_dsp_reg_read(chip, eReg_CRM1);
277 			else
278 				reg = 0;
279 			goto polling_successful;
280 		} else
281 			udelay(1);
282 	}
283 	dev_warn(chip->card->dev, "TIMEOUT lx_message_send_atomic! "
284 		   "polling failed\n");
285 
286 polling_successful:
287 	if ((reg & ERROR_VALUE) == 0) {
288 		/* read response */
289 		if (rmh->stat_len) {
290 			snd_BUG_ON(rmh->stat_len >= (REG_CRM_NUMBER-1));
291 			lx_dsp_reg_readbuf(chip, eReg_CRM2, rmh->stat,
292 					   rmh->stat_len);
293 		}
294 	} else
295 		dev_err(chip->card->dev, "rmh error: %08x\n", reg);
296 
297 	/* clear Reg_CSM_MR */
298 	lx_dsp_reg_write(chip, eReg_CSM, 0);
299 
300 	switch (reg) {
301 	case ED_DSP_TIMED_OUT:
302 		dev_warn(chip->card->dev, "lx_message_send: dsp timeout\n");
303 		return -ETIMEDOUT;
304 
305 	case ED_DSP_CRASHED:
306 		dev_warn(chip->card->dev, "lx_message_send: dsp crashed\n");
307 		return -EAGAIN;
308 	}
309 
310 	lx_message_dump(rmh);
311 
312 	return reg;
313 }
314 
315 
316 /* low-level dsp access */
317 int lx_dsp_get_version(struct lx6464es *chip, u32 *rdsp_version)
318 {
319 	u16 ret;
320 
321 	mutex_lock(&chip->msg_lock);
322 
323 	lx_message_init(&chip->rmh, CMD_01_GET_SYS_CFG);
324 	ret = lx_message_send_atomic(chip, &chip->rmh);
325 
326 	*rdsp_version = chip->rmh.stat[1];
327 	mutex_unlock(&chip->msg_lock);
328 	return ret;
329 }
330 
331 int lx_dsp_get_clock_frequency(struct lx6464es *chip, u32 *rfreq)
332 {
333 	u16 ret = 0;
334 	u32 freq_raw = 0;
335 	u32 freq = 0;
336 	u32 frequency = 0;
337 
338 	mutex_lock(&chip->msg_lock);
339 
340 	lx_message_init(&chip->rmh, CMD_01_GET_SYS_CFG);
341 	ret = lx_message_send_atomic(chip, &chip->rmh);
342 
343 	if (ret == 0) {
344 		freq_raw = chip->rmh.stat[0] >> FREQ_FIELD_OFFSET;
345 		freq = freq_raw & XES_FREQ_COUNT8_MASK;
346 
347 		if ((freq < XES_FREQ_COUNT8_48_MAX) ||
348 		    (freq > XES_FREQ_COUNT8_44_MIN))
349 			frequency = 0; /* unknown */
350 		else if (freq >= XES_FREQ_COUNT8_44_MAX)
351 			frequency = 44100;
352 		else
353 			frequency = 48000;
354 	}
355 
356 	mutex_unlock(&chip->msg_lock);
357 
358 	*rfreq = frequency * chip->freq_ratio;
359 
360 	return ret;
361 }
362 
363 int lx_dsp_get_mac(struct lx6464es *chip)
364 {
365 	u32 macmsb, maclsb;
366 
367 	macmsb = lx_dsp_reg_read(chip, eReg_ADMACESMSB) & 0x00FFFFFF;
368 	maclsb = lx_dsp_reg_read(chip, eReg_ADMACESLSB) & 0x00FFFFFF;
369 
370 	/* todo: endianess handling */
371 	chip->mac_address[5] = ((u8 *)(&maclsb))[0];
372 	chip->mac_address[4] = ((u8 *)(&maclsb))[1];
373 	chip->mac_address[3] = ((u8 *)(&maclsb))[2];
374 	chip->mac_address[2] = ((u8 *)(&macmsb))[0];
375 	chip->mac_address[1] = ((u8 *)(&macmsb))[1];
376 	chip->mac_address[0] = ((u8 *)(&macmsb))[2];
377 
378 	return 0;
379 }
380 
381 
382 int lx_dsp_set_granularity(struct lx6464es *chip, u32 gran)
383 {
384 	int ret;
385 
386 	mutex_lock(&chip->msg_lock);
387 
388 	lx_message_init(&chip->rmh, CMD_02_SET_GRANULARITY);
389 	chip->rmh.cmd[0] |= gran;
390 
391 	ret = lx_message_send_atomic(chip, &chip->rmh);
392 	mutex_unlock(&chip->msg_lock);
393 	return ret;
394 }
395 
396 int lx_dsp_read_async_events(struct lx6464es *chip, u32 *data)
397 {
398 	int ret;
399 
400 	mutex_lock(&chip->msg_lock);
401 
402 	lx_message_init(&chip->rmh, CMD_04_GET_EVENT);
403 	chip->rmh.stat_len = 9;	/* we don't necessarily need the full length */
404 
405 	ret = lx_message_send_atomic(chip, &chip->rmh);
406 
407 	if (!ret)
408 		memcpy(data, chip->rmh.stat, chip->rmh.stat_len * sizeof(u32));
409 
410 	mutex_unlock(&chip->msg_lock);
411 	return ret;
412 }
413 
414 #define PIPE_INFO_TO_CMD(capture, pipe)					\
415 	((u32)((u32)(pipe) | ((capture) ? ID_IS_CAPTURE : 0L)) << ID_OFFSET)
416 
417 
418 
419 /* low-level pipe handling */
420 int lx_pipe_allocate(struct lx6464es *chip, u32 pipe, int is_capture,
421 		     int channels)
422 {
423 	int err;
424 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
425 
426 	mutex_lock(&chip->msg_lock);
427 	lx_message_init(&chip->rmh, CMD_06_ALLOCATE_PIPE);
428 
429 	chip->rmh.cmd[0] |= pipe_cmd;
430 	chip->rmh.cmd[0] |= channels;
431 
432 	err = lx_message_send_atomic(chip, &chip->rmh);
433 	mutex_unlock(&chip->msg_lock);
434 
435 	if (err != 0)
436 		dev_err(chip->card->dev, "could not allocate pipe\n");
437 
438 	return err;
439 }
440 
441 int lx_pipe_release(struct lx6464es *chip, u32 pipe, int is_capture)
442 {
443 	int err;
444 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
445 
446 	mutex_lock(&chip->msg_lock);
447 	lx_message_init(&chip->rmh, CMD_07_RELEASE_PIPE);
448 
449 	chip->rmh.cmd[0] |= pipe_cmd;
450 
451 	err = lx_message_send_atomic(chip, &chip->rmh);
452 	mutex_unlock(&chip->msg_lock);
453 
454 	return err;
455 }
456 
457 int lx_buffer_ask(struct lx6464es *chip, u32 pipe, int is_capture,
458 		  u32 *r_needed, u32 *r_freed, u32 *size_array)
459 {
460 	int err;
461 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
462 
463 #ifdef CONFIG_SND_DEBUG
464 	if (size_array)
465 		memset(size_array, 0, sizeof(u32)*MAX_STREAM_BUFFER);
466 #endif
467 
468 	*r_needed = 0;
469 	*r_freed = 0;
470 
471 	mutex_lock(&chip->msg_lock);
472 	lx_message_init(&chip->rmh, CMD_08_ASK_BUFFERS);
473 
474 	chip->rmh.cmd[0] |= pipe_cmd;
475 
476 	err = lx_message_send_atomic(chip, &chip->rmh);
477 
478 	if (!err) {
479 		int i;
480 		for (i = 0; i < MAX_STREAM_BUFFER; ++i) {
481 			u32 stat = chip->rmh.stat[i];
482 			if (stat & (BF_EOB << BUFF_FLAGS_OFFSET)) {
483 				/* finished */
484 				*r_freed += 1;
485 				if (size_array)
486 					size_array[i] = stat & MASK_DATA_SIZE;
487 			} else if ((stat & (BF_VALID << BUFF_FLAGS_OFFSET))
488 				   == 0)
489 				/* free */
490 				*r_needed += 1;
491 		}
492 
493 		dev_dbg(chip->card->dev,
494 			"CMD_08_ASK_BUFFERS: needed %d, freed %d\n",
495 			    *r_needed, *r_freed);
496 		for (i = 0; i < MAX_STREAM_BUFFER; ++i) {
497 			for (i = 0; i != chip->rmh.stat_len; ++i)
498 				dev_dbg(chip->card->dev,
499 					"  stat[%d]: %x, %x\n", i,
500 					    chip->rmh.stat[i],
501 					    chip->rmh.stat[i] & MASK_DATA_SIZE);
502 		}
503 	}
504 
505 	mutex_unlock(&chip->msg_lock);
506 	return err;
507 }
508 
509 
510 int lx_pipe_stop(struct lx6464es *chip, u32 pipe, int is_capture)
511 {
512 	int err;
513 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
514 
515 	mutex_lock(&chip->msg_lock);
516 	lx_message_init(&chip->rmh, CMD_09_STOP_PIPE);
517 
518 	chip->rmh.cmd[0] |= pipe_cmd;
519 
520 	err = lx_message_send_atomic(chip, &chip->rmh);
521 
522 	mutex_unlock(&chip->msg_lock);
523 	return err;
524 }
525 
526 static int lx_pipe_toggle_state(struct lx6464es *chip, u32 pipe, int is_capture)
527 {
528 	int err;
529 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
530 
531 	mutex_lock(&chip->msg_lock);
532 	lx_message_init(&chip->rmh, CMD_0B_TOGGLE_PIPE_STATE);
533 
534 	chip->rmh.cmd[0] |= pipe_cmd;
535 
536 	err = lx_message_send_atomic(chip, &chip->rmh);
537 
538 	mutex_unlock(&chip->msg_lock);
539 	return err;
540 }
541 
542 
543 int lx_pipe_start(struct lx6464es *chip, u32 pipe, int is_capture)
544 {
545 	int err;
546 
547 	err = lx_pipe_wait_for_idle(chip, pipe, is_capture);
548 	if (err < 0)
549 		return err;
550 
551 	err = lx_pipe_toggle_state(chip, pipe, is_capture);
552 
553 	return err;
554 }
555 
556 int lx_pipe_pause(struct lx6464es *chip, u32 pipe, int is_capture)
557 {
558 	int err = 0;
559 
560 	err = lx_pipe_wait_for_start(chip, pipe, is_capture);
561 	if (err < 0)
562 		return err;
563 
564 	err = lx_pipe_toggle_state(chip, pipe, is_capture);
565 
566 	return err;
567 }
568 
569 
570 int lx_pipe_sample_count(struct lx6464es *chip, u32 pipe, int is_capture,
571 			 u64 *rsample_count)
572 {
573 	int err;
574 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
575 
576 	mutex_lock(&chip->msg_lock);
577 	lx_message_init(&chip->rmh, CMD_0A_GET_PIPE_SPL_COUNT);
578 
579 	chip->rmh.cmd[0] |= pipe_cmd;
580 	chip->rmh.stat_len = 2;	/* need all words here! */
581 
582 	err = lx_message_send_atomic(chip, &chip->rmh); /* don't sleep! */
583 
584 	if (err != 0)
585 		dev_err(chip->card->dev,
586 			"could not query pipe's sample count\n");
587 	else {
588 		*rsample_count = ((u64)(chip->rmh.stat[0] & MASK_SPL_COUNT_HI)
589 				  << 24)     /* hi part */
590 			+ chip->rmh.stat[1]; /* lo part */
591 	}
592 
593 	mutex_unlock(&chip->msg_lock);
594 	return err;
595 }
596 
597 int lx_pipe_state(struct lx6464es *chip, u32 pipe, int is_capture, u16 *rstate)
598 {
599 	int err;
600 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
601 
602 	mutex_lock(&chip->msg_lock);
603 	lx_message_init(&chip->rmh, CMD_0A_GET_PIPE_SPL_COUNT);
604 
605 	chip->rmh.cmd[0] |= pipe_cmd;
606 
607 	err = lx_message_send_atomic(chip, &chip->rmh);
608 
609 	if (err != 0)
610 		dev_err(chip->card->dev, "could not query pipe's state\n");
611 	else
612 		*rstate = (chip->rmh.stat[0] >> PSTATE_OFFSET) & 0x0F;
613 
614 	mutex_unlock(&chip->msg_lock);
615 	return err;
616 }
617 
618 static int lx_pipe_wait_for_state(struct lx6464es *chip, u32 pipe,
619 				  int is_capture, u16 state)
620 {
621 	int i;
622 
623 	/* max 2*PCMOnlyGranularity = 2*1024 at 44100 = < 50 ms:
624 	 * timeout 50 ms */
625 	for (i = 0; i != 50; ++i) {
626 		u16 current_state;
627 		int err = lx_pipe_state(chip, pipe, is_capture, &current_state);
628 
629 		if (err < 0)
630 			return err;
631 
632 		if (!err && current_state == state)
633 			return 0;
634 
635 		mdelay(1);
636 	}
637 
638 	return -ETIMEDOUT;
639 }
640 
641 int lx_pipe_wait_for_start(struct lx6464es *chip, u32 pipe, int is_capture)
642 {
643 	return lx_pipe_wait_for_state(chip, pipe, is_capture, PSTATE_RUN);
644 }
645 
646 int lx_pipe_wait_for_idle(struct lx6464es *chip, u32 pipe, int is_capture)
647 {
648 	return lx_pipe_wait_for_state(chip, pipe, is_capture, PSTATE_IDLE);
649 }
650 
651 /* low-level stream handling */
652 int lx_stream_set_state(struct lx6464es *chip, u32 pipe,
653 			       int is_capture, enum stream_state_t state)
654 {
655 	int err;
656 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
657 
658 	mutex_lock(&chip->msg_lock);
659 	lx_message_init(&chip->rmh, CMD_13_SET_STREAM_STATE);
660 
661 	chip->rmh.cmd[0] |= pipe_cmd;
662 	chip->rmh.cmd[0] |= state;
663 
664 	err = lx_message_send_atomic(chip, &chip->rmh);
665 	mutex_unlock(&chip->msg_lock);
666 
667 	return err;
668 }
669 
670 int lx_stream_set_format(struct lx6464es *chip, struct snd_pcm_runtime *runtime,
671 			 u32 pipe, int is_capture)
672 {
673 	int err;
674 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
675 	u32 channels = runtime->channels;
676 
677 	if (runtime->channels != channels)
678 		dev_err(chip->card->dev, "channel count mismatch: %d vs %d",
679 			   runtime->channels, channels);
680 
681 	mutex_lock(&chip->msg_lock);
682 	lx_message_init(&chip->rmh, CMD_0C_DEF_STREAM);
683 
684 	chip->rmh.cmd[0] |= pipe_cmd;
685 
686 	if (runtime->sample_bits == 16)
687 		/* 16 bit format */
688 		chip->rmh.cmd[0] |= (STREAM_FMT_16b << STREAM_FMT_OFFSET);
689 
690 	if (snd_pcm_format_little_endian(runtime->format))
691 		/* little endian/intel format */
692 		chip->rmh.cmd[0] |= (STREAM_FMT_intel << STREAM_FMT_OFFSET);
693 
694 	chip->rmh.cmd[0] |= channels-1;
695 
696 	err = lx_message_send_atomic(chip, &chip->rmh);
697 	mutex_unlock(&chip->msg_lock);
698 
699 	return err;
700 }
701 
702 int lx_stream_state(struct lx6464es *chip, u32 pipe, int is_capture,
703 		    int *rstate)
704 {
705 	int err;
706 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
707 
708 	mutex_lock(&chip->msg_lock);
709 	lx_message_init(&chip->rmh, CMD_0E_GET_STREAM_SPL_COUNT);
710 
711 	chip->rmh.cmd[0] |= pipe_cmd;
712 
713 	err = lx_message_send_atomic(chip, &chip->rmh);
714 
715 	*rstate = (chip->rmh.stat[0] & SF_START) ? START_STATE : PAUSE_STATE;
716 
717 	mutex_unlock(&chip->msg_lock);
718 	return err;
719 }
720 
721 int lx_stream_sample_position(struct lx6464es *chip, u32 pipe, int is_capture,
722 			      u64 *r_bytepos)
723 {
724 	int err;
725 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
726 
727 	mutex_lock(&chip->msg_lock);
728 	lx_message_init(&chip->rmh, CMD_0E_GET_STREAM_SPL_COUNT);
729 
730 	chip->rmh.cmd[0] |= pipe_cmd;
731 
732 	err = lx_message_send_atomic(chip, &chip->rmh);
733 
734 	*r_bytepos = ((u64) (chip->rmh.stat[0] & MASK_SPL_COUNT_HI)
735 		      << 32)	     /* hi part */
736 		+ chip->rmh.stat[1]; /* lo part */
737 
738 	mutex_unlock(&chip->msg_lock);
739 	return err;
740 }
741 
742 /* low-level buffer handling */
743 int lx_buffer_give(struct lx6464es *chip, u32 pipe, int is_capture,
744 		   u32 buffer_size, u32 buf_address_lo, u32 buf_address_hi,
745 		   u32 *r_buffer_index)
746 {
747 	int err;
748 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
749 
750 	mutex_lock(&chip->msg_lock);
751 	lx_message_init(&chip->rmh, CMD_0F_UPDATE_BUFFER);
752 
753 	chip->rmh.cmd[0] |= pipe_cmd;
754 	chip->rmh.cmd[0] |= BF_NOTIFY_EOB; /* request interrupt notification */
755 
756 	/* todo: pause request, circular buffer */
757 
758 	chip->rmh.cmd[1] = buffer_size & MASK_DATA_SIZE;
759 	chip->rmh.cmd[2] = buf_address_lo;
760 
761 	if (buf_address_hi) {
762 		chip->rmh.cmd_len = 4;
763 		chip->rmh.cmd[3] = buf_address_hi;
764 		chip->rmh.cmd[0] |= BF_64BITS_ADR;
765 	}
766 
767 	err = lx_message_send_atomic(chip, &chip->rmh);
768 
769 	if (err == 0) {
770 		*r_buffer_index = chip->rmh.stat[0];
771 		goto done;
772 	}
773 
774 	if (err == EB_RBUFFERS_TABLE_OVERFLOW)
775 		dev_err(chip->card->dev,
776 			"lx_buffer_give EB_RBUFFERS_TABLE_OVERFLOW\n");
777 
778 	if (err == EB_INVALID_STREAM)
779 		dev_err(chip->card->dev,
780 			"lx_buffer_give EB_INVALID_STREAM\n");
781 
782 	if (err == EB_CMD_REFUSED)
783 		dev_err(chip->card->dev,
784 			"lx_buffer_give EB_CMD_REFUSED\n");
785 
786  done:
787 	mutex_unlock(&chip->msg_lock);
788 	return err;
789 }
790 
791 int lx_buffer_free(struct lx6464es *chip, u32 pipe, int is_capture,
792 		   u32 *r_buffer_size)
793 {
794 	int err;
795 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
796 
797 	mutex_lock(&chip->msg_lock);
798 	lx_message_init(&chip->rmh, CMD_11_CANCEL_BUFFER);
799 
800 	chip->rmh.cmd[0] |= pipe_cmd;
801 	chip->rmh.cmd[0] |= MASK_BUFFER_ID; /* ask for the current buffer: the
802 					     * microblaze will seek for it */
803 
804 	err = lx_message_send_atomic(chip, &chip->rmh);
805 
806 	if (err == 0)
807 		*r_buffer_size = chip->rmh.stat[0]  & MASK_DATA_SIZE;
808 
809 	mutex_unlock(&chip->msg_lock);
810 	return err;
811 }
812 
813 int lx_buffer_cancel(struct lx6464es *chip, u32 pipe, int is_capture,
814 		     u32 buffer_index)
815 {
816 	int err;
817 	u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
818 
819 	mutex_lock(&chip->msg_lock);
820 	lx_message_init(&chip->rmh, CMD_11_CANCEL_BUFFER);
821 
822 	chip->rmh.cmd[0] |= pipe_cmd;
823 	chip->rmh.cmd[0] |= buffer_index;
824 
825 	err = lx_message_send_atomic(chip, &chip->rmh);
826 
827 	mutex_unlock(&chip->msg_lock);
828 	return err;
829 }
830 
831 
832 /* low-level gain/peak handling
833  *
834  * \todo: can we unmute capture/playback channels independently?
835  *
836  * */
837 int lx_level_unmute(struct lx6464es *chip, int is_capture, int unmute)
838 {
839 	int err;
840 	/* bit set to 1: channel muted */
841 	u64 mute_mask = unmute ? 0 : 0xFFFFFFFFFFFFFFFFLLU;
842 
843 	mutex_lock(&chip->msg_lock);
844 	lx_message_init(&chip->rmh, CMD_0D_SET_MUTE);
845 
846 	chip->rmh.cmd[0] |= PIPE_INFO_TO_CMD(is_capture, 0);
847 
848 	chip->rmh.cmd[1] = (u32)(mute_mask >> (u64)32);	       /* hi part */
849 	chip->rmh.cmd[2] = (u32)(mute_mask & (u64)0xFFFFFFFF); /* lo part */
850 
851 	dev_dbg(chip->card->dev,
852 		"mute %x %x %x\n", chip->rmh.cmd[0], chip->rmh.cmd[1],
853 		   chip->rmh.cmd[2]);
854 
855 	err = lx_message_send_atomic(chip, &chip->rmh);
856 
857 	mutex_unlock(&chip->msg_lock);
858 	return err;
859 }
860 
861 static const u32 peak_map[] = {
862 	0x00000109, /* -90.308dB */
863 	0x0000083B, /* -72.247dB */
864 	0x000020C4, /* -60.205dB */
865 	0x00008273, /* -48.030dB */
866 	0x00020756, /* -36.005dB */
867 	0x00040C37, /* -30.001dB */
868 	0x00081385, /* -24.002dB */
869 	0x00101D3F, /* -18.000dB */
870 	0x0016C310, /* -15.000dB */
871 	0x002026F2, /* -12.001dB */
872 	0x002D6A86, /* -9.000dB */
873 	0x004026E6, /* -6.004dB */
874 	0x005A9DF6, /* -3.000dB */
875 	0x0065AC8B, /* -2.000dB */
876 	0x00721481, /* -1.000dB */
877 	0x007FFFFF, /* FS */
878 };
879 
880 int lx_level_peaks(struct lx6464es *chip, int is_capture, int channels,
881 		   u32 *r_levels)
882 {
883 	int err = 0;
884 	int i;
885 
886 	mutex_lock(&chip->msg_lock);
887 	for (i = 0; i < channels; i += 4) {
888 		u32 s0, s1, s2, s3;
889 
890 		lx_message_init(&chip->rmh, CMD_12_GET_PEAK);
891 		chip->rmh.cmd[0] |= PIPE_INFO_TO_CMD(is_capture, i);
892 
893 		err = lx_message_send_atomic(chip, &chip->rmh);
894 
895 		if (err == 0) {
896 			s0 = peak_map[chip->rmh.stat[0] & 0x0F];
897 			s1 = peak_map[(chip->rmh.stat[0] >>  4) & 0xf];
898 			s2 = peak_map[(chip->rmh.stat[0] >>  8) & 0xf];
899 			s3 = peak_map[(chip->rmh.stat[0] >>  12) & 0xf];
900 		} else
901 			s0 = s1 = s2 = s3 = 0;
902 
903 		r_levels[0] = s0;
904 		r_levels[1] = s1;
905 		r_levels[2] = s2;
906 		r_levels[3] = s3;
907 
908 		r_levels += 4;
909 	}
910 
911 	mutex_unlock(&chip->msg_lock);
912 	return err;
913 }
914 
915 /* interrupt handling */
916 #define PCX_IRQ_NONE 0
917 #define IRQCS_ACTIVE_PCIDB	BIT(13)
918 #define IRQCS_ENABLE_PCIIRQ	BIT(8)
919 #define IRQCS_ENABLE_PCIDB	BIT(9)
920 
921 static u32 lx_interrupt_test_ack(struct lx6464es *chip)
922 {
923 	u32 irqcs = lx_plx_reg_read(chip, ePLX_IRQCS);
924 
925 	/* Test if PCI Doorbell interrupt is active */
926 	if (irqcs & IRQCS_ACTIVE_PCIDB)	{
927 		u32 temp;
928 		irqcs = PCX_IRQ_NONE;
929 
930 		while ((temp = lx_plx_reg_read(chip, ePLX_L2PCIDB))) {
931 			/* RAZ interrupt */
932 			irqcs |= temp;
933 			lx_plx_reg_write(chip, ePLX_L2PCIDB, temp);
934 		}
935 
936 		return irqcs;
937 	}
938 	return PCX_IRQ_NONE;
939 }
940 
941 static int lx_interrupt_ack(struct lx6464es *chip, u32 *r_irqsrc,
942 			    int *r_async_pending, int *r_async_escmd)
943 {
944 	u32 irq_async;
945 	u32 irqsrc = lx_interrupt_test_ack(chip);
946 
947 	if (irqsrc == PCX_IRQ_NONE)
948 		return 0;
949 
950 	*r_irqsrc = irqsrc;
951 
952 	irq_async = irqsrc & MASK_SYS_ASYNC_EVENTS; /* + EtherSound response
953 						     * (set by xilinx) + EOB */
954 
955 	if (irq_async & MASK_SYS_STATUS_ESA) {
956 		irq_async &= ~MASK_SYS_STATUS_ESA;
957 		*r_async_escmd = 1;
958 	}
959 
960 	if (irq_async) {
961 		/* dev_dbg(chip->card->dev, "interrupt: async event pending\n"); */
962 		*r_async_pending = 1;
963 	}
964 
965 	return 1;
966 }
967 
968 static int lx_interrupt_handle_async_events(struct lx6464es *chip, u32 irqsrc,
969 					    int *r_freq_changed,
970 					    u64 *r_notified_in_pipe_mask,
971 					    u64 *r_notified_out_pipe_mask)
972 {
973 	int err;
974 	u32 stat[9];		/* answer from CMD_04_GET_EVENT */
975 
976 	/* We can optimize this to not read dumb events.
977 	 * Answer words are in the following order:
978 	 * Stat[0]	general status
979 	 * Stat[1]	end of buffer OUT pF
980 	 * Stat[2]	end of buffer OUT pf
981 	 * Stat[3]	end of buffer IN pF
982 	 * Stat[4]	end of buffer IN pf
983 	 * Stat[5]	MSB underrun
984 	 * Stat[6]	LSB underrun
985 	 * Stat[7]	MSB overrun
986 	 * Stat[8]	LSB overrun
987 	 * */
988 
989 	int eb_pending_out = (irqsrc & MASK_SYS_STATUS_EOBO) ? 1 : 0;
990 	int eb_pending_in  = (irqsrc & MASK_SYS_STATUS_EOBI) ? 1 : 0;
991 
992 	*r_freq_changed = (irqsrc & MASK_SYS_STATUS_FREQ) ? 1 : 0;
993 
994 	err = lx_dsp_read_async_events(chip, stat);
995 	if (err < 0)
996 		return err;
997 
998 	if (eb_pending_in) {
999 		*r_notified_in_pipe_mask = ((u64)stat[3] << 32)
1000 			+ stat[4];
1001 		dev_dbg(chip->card->dev, "interrupt: EOBI pending %llx\n",
1002 			    *r_notified_in_pipe_mask);
1003 	}
1004 	if (eb_pending_out) {
1005 		*r_notified_out_pipe_mask = ((u64)stat[1] << 32)
1006 			+ stat[2];
1007 		dev_dbg(chip->card->dev, "interrupt: EOBO pending %llx\n",
1008 			    *r_notified_out_pipe_mask);
1009 	}
1010 
1011 	/* todo: handle xrun notification */
1012 
1013 	return err;
1014 }
1015 
1016 static int lx_interrupt_request_new_buffer(struct lx6464es *chip,
1017 					   struct lx_stream *lx_stream)
1018 {
1019 	struct snd_pcm_substream *substream = lx_stream->stream;
1020 	const unsigned int is_capture = lx_stream->is_capture;
1021 	int err;
1022 
1023 	const u32 channels = substream->runtime->channels;
1024 	const u32 bytes_per_frame = channels * 3;
1025 	const u32 period_size = substream->runtime->period_size;
1026 	const u32 period_bytes = period_size * bytes_per_frame;
1027 	const u32 pos = lx_stream->frame_pos;
1028 	const u32 next_pos = ((pos+1) == substream->runtime->periods) ?
1029 		0 : pos + 1;
1030 
1031 	dma_addr_t buf = substream->dma_buffer.addr + pos * period_bytes;
1032 	u32 buf_hi = 0;
1033 	u32 buf_lo = 0;
1034 	u32 buffer_index = 0;
1035 
1036 	u32 needed, freed;
1037 	u32 size_array[MAX_STREAM_BUFFER];
1038 
1039 	dev_dbg(chip->card->dev, "->lx_interrupt_request_new_buffer\n");
1040 
1041 	mutex_lock(&chip->lock);
1042 
1043 	err = lx_buffer_ask(chip, 0, is_capture, &needed, &freed, size_array);
1044 	dev_dbg(chip->card->dev,
1045 		"interrupt: needed %d, freed %d\n", needed, freed);
1046 
1047 	unpack_pointer(buf, &buf_lo, &buf_hi);
1048 	err = lx_buffer_give(chip, 0, is_capture, period_bytes, buf_lo, buf_hi,
1049 			     &buffer_index);
1050 	dev_dbg(chip->card->dev,
1051 		"interrupt: gave buffer index %x on 0x%lx (%d bytes)\n",
1052 		    buffer_index, (unsigned long)buf, period_bytes);
1053 
1054 	lx_stream->frame_pos = next_pos;
1055 	mutex_unlock(&chip->lock);
1056 
1057 	return err;
1058 }
1059 
1060 irqreturn_t lx_interrupt(int irq, void *dev_id)
1061 {
1062 	struct lx6464es *chip = dev_id;
1063 	int async_pending, async_escmd;
1064 	u32 irqsrc;
1065 	bool wake_thread = false;
1066 
1067 	dev_dbg(chip->card->dev,
1068 		"**************************************************\n");
1069 
1070 	if (!lx_interrupt_ack(chip, &irqsrc, &async_pending, &async_escmd)) {
1071 		dev_dbg(chip->card->dev, "IRQ_NONE\n");
1072 		return IRQ_NONE; /* this device did not cause the interrupt */
1073 	}
1074 
1075 	if (irqsrc & MASK_SYS_STATUS_CMD_DONE)
1076 		return IRQ_HANDLED;
1077 
1078 	if (irqsrc & MASK_SYS_STATUS_EOBI)
1079 		dev_dbg(chip->card->dev, "interrupt: EOBI\n");
1080 
1081 	if (irqsrc & MASK_SYS_STATUS_EOBO)
1082 		dev_dbg(chip->card->dev, "interrupt: EOBO\n");
1083 
1084 	if (irqsrc & MASK_SYS_STATUS_URUN)
1085 		dev_dbg(chip->card->dev, "interrupt: URUN\n");
1086 
1087 	if (irqsrc & MASK_SYS_STATUS_ORUN)
1088 		dev_dbg(chip->card->dev, "interrupt: ORUN\n");
1089 
1090 	if (async_pending) {
1091 		wake_thread = true;
1092 		chip->irqsrc = irqsrc;
1093 	}
1094 
1095 	if (async_escmd) {
1096 		/* backdoor for ethersound commands
1097 		 *
1098 		 * for now, we do not need this
1099 		 *
1100 		 * */
1101 
1102 		dev_dbg(chip->card->dev, "interrupt requests escmd handling\n");
1103 	}
1104 
1105 	return wake_thread ? IRQ_WAKE_THREAD : IRQ_HANDLED;
1106 }
1107 
1108 irqreturn_t lx_threaded_irq(int irq, void *dev_id)
1109 {
1110 	struct lx6464es *chip = dev_id;
1111 	u64 notified_in_pipe_mask = 0;
1112 	u64 notified_out_pipe_mask = 0;
1113 	int freq_changed;
1114 	int err;
1115 
1116 	/* handle async events */
1117 	err = lx_interrupt_handle_async_events(chip, chip->irqsrc,
1118 					       &freq_changed,
1119 					       &notified_in_pipe_mask,
1120 					       &notified_out_pipe_mask);
1121 	if (err)
1122 		dev_err(chip->card->dev, "error handling async events\n");
1123 
1124 	if (notified_in_pipe_mask) {
1125 		struct lx_stream *lx_stream = &chip->capture_stream;
1126 
1127 		dev_dbg(chip->card->dev,
1128 			"requesting audio transfer for capture\n");
1129 		err = lx_interrupt_request_new_buffer(chip, lx_stream);
1130 		if (err < 0)
1131 			dev_err(chip->card->dev,
1132 				"cannot request new buffer for capture\n");
1133 		snd_pcm_period_elapsed(lx_stream->stream);
1134 	}
1135 
1136 	if (notified_out_pipe_mask) {
1137 		struct lx_stream *lx_stream = &chip->playback_stream;
1138 
1139 		dev_dbg(chip->card->dev,
1140 			"requesting audio transfer for playback\n");
1141 		err = lx_interrupt_request_new_buffer(chip, lx_stream);
1142 		if (err < 0)
1143 			dev_err(chip->card->dev,
1144 				"cannot request new buffer for playback\n");
1145 		snd_pcm_period_elapsed(lx_stream->stream);
1146 	}
1147 
1148 	return IRQ_HANDLED;
1149 }
1150 
1151 
1152 static void lx_irq_set(struct lx6464es *chip, int enable)
1153 {
1154 	u32 reg = lx_plx_reg_read(chip, ePLX_IRQCS);
1155 
1156 	/* enable/disable interrupts
1157 	 *
1158 	 * Set the Doorbell and PCI interrupt enable bits
1159 	 *
1160 	 * */
1161 	if (enable)
1162 		reg |=  (IRQCS_ENABLE_PCIIRQ | IRQCS_ENABLE_PCIDB);
1163 	else
1164 		reg &= ~(IRQCS_ENABLE_PCIIRQ | IRQCS_ENABLE_PCIDB);
1165 	lx_plx_reg_write(chip, ePLX_IRQCS, reg);
1166 }
1167 
1168 void lx_irq_enable(struct lx6464es *chip)
1169 {
1170 	dev_dbg(chip->card->dev, "->lx_irq_enable\n");
1171 	lx_irq_set(chip, 1);
1172 }
1173 
1174 void lx_irq_disable(struct lx6464es *chip)
1175 {
1176 	dev_dbg(chip->card->dev, "->lx_irq_disable\n");
1177 	lx_irq_set(chip, 0);
1178 }
1179