1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
4 *                   Lee Revell <rlrevell@joe-job.com>
5 *                   James Courtier-Dutton <James@superbug.co.uk>
6 *                   Oswald Buddenhagen <oswald.buddenhagen@gmx.de>
7 *                   Creative Labs, Inc.
8 *
9 *  Routines for control of EMU10K1 chips / proc interface routines
10 */
11
12#include <linux/slab.h>
13#include <linux/init.h>
14#include <sound/core.h>
15#include <sound/emu10k1.h>
16#include "p16v.h"
17
18static void snd_emu10k1_proc_spdif_status(struct snd_emu10k1 * emu,
19					  struct snd_info_buffer *buffer,
20					  char *title,
21					  int status_reg,
22					  int rate_reg)
23{
24	static const char * const clkaccy[4] = { "1000ppm", "50ppm", "variable", "unknown" };
25	static const int samplerate[16] = { 44100, 1, 48000, 32000, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 };
26	static const char * const channel[16] = { "unspec", "left", "right", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15" };
27	static const char * const emphasis[8] = { "none", "50/15 usec 2 channel", "2", "3", "4", "5", "6", "7" };
28	unsigned int status, rate = 0;
29
30	status = snd_emu10k1_ptr_read(emu, status_reg, 0);
31
32	snd_iprintf(buffer, "\n%s\n", title);
33
34	if (status != 0xffffffff) {
35		snd_iprintf(buffer, "Professional Mode     : %s\n", (status & SPCS_PROFESSIONAL) ? "yes" : "no");
36		snd_iprintf(buffer, "Not Audio Data        : %s\n", (status & SPCS_NOTAUDIODATA) ? "yes" : "no");
37		snd_iprintf(buffer, "Copyright             : %s\n", (status & SPCS_COPYRIGHT) ? "yes" : "no");
38		snd_iprintf(buffer, "Emphasis              : %s\n", emphasis[(status & SPCS_EMPHASISMASK) >> 3]);
39		snd_iprintf(buffer, "Mode                  : %i\n", (status & SPCS_MODEMASK) >> 6);
40		snd_iprintf(buffer, "Category Code         : 0x%x\n", (status & SPCS_CATEGORYCODEMASK) >> 8);
41		snd_iprintf(buffer, "Generation Status     : %s\n", status & SPCS_GENERATIONSTATUS ? "original" : "copy");
42		snd_iprintf(buffer, "Source Mask           : %i\n", (status & SPCS_SOURCENUMMASK) >> 16);
43		snd_iprintf(buffer, "Channel Number        : %s\n", channel[(status & SPCS_CHANNELNUMMASK) >> 20]);
44		snd_iprintf(buffer, "Sample Rate           : %iHz\n", samplerate[(status & SPCS_SAMPLERATEMASK) >> 24]);
45		snd_iprintf(buffer, "Clock Accuracy        : %s\n", clkaccy[(status & SPCS_CLKACCYMASK) >> 28]);
46
47		if (rate_reg > 0) {
48			rate = snd_emu10k1_ptr_read(emu, rate_reg, 0);
49			snd_iprintf(buffer, "S/PDIF Valid          : %s\n", rate & SRCS_SPDIFVALID ? "on" : "off");
50			snd_iprintf(buffer, "S/PDIF Locked         : %s\n", rate & SRCS_SPDIFLOCKED ? "on" : "off");
51			snd_iprintf(buffer, "Rate Locked           : %s\n", rate & SRCS_RATELOCKED ? "on" : "off");
52			/* From ((Rate * 48000 ) / 262144); */
53			snd_iprintf(buffer, "Estimated Sample Rate : %d\n", ((rate & 0xFFFFF ) * 375) >> 11);
54		}
55	} else {
56		snd_iprintf(buffer, "No signal detected.\n");
57	}
58
59}
60
61static void snd_emu10k1_proc_read(struct snd_info_entry *entry,
62				  struct snd_info_buffer *buffer)
63{
64	struct snd_emu10k1 *emu = entry->private_data;
65	const char * const *inputs = emu->audigy ?
66		snd_emu10k1_audigy_ins : snd_emu10k1_sblive_ins;
67	const char * const *outputs = emu->audigy ?
68		snd_emu10k1_audigy_outs : snd_emu10k1_sblive_outs;
69	unsigned short extin_mask = emu->audigy ? ~0 : emu->fx8010.extin_mask;
70	unsigned short extout_mask = emu->audigy ? ~0 : emu->fx8010.extout_mask;
71	unsigned int val, val1, ptrx, psst, dsl, snda;
72	int nefx = emu->audigy ? 32 : 16;
73	int idx;
74
75	snd_iprintf(buffer, "EMU10K1\n\n");
76	snd_iprintf(buffer, "Card                  : %s\n",
77		    emu->card_capabilities->emu_model ? "E-MU D.A.S." :
78		    emu->card_capabilities->ecard ? "E-MU A.P.S." :
79		    emu->audigy ? "SB Audigy" : "SB Live!");
80	snd_iprintf(buffer, "Internal TRAM (words) : 0x%x\n", emu->fx8010.itram_size);
81	snd_iprintf(buffer, "External TRAM (words) : 0x%x\n", (int)emu->fx8010.etram_pages.bytes / 2);
82
83	snd_iprintf(buffer, "\nEffect Send Routing & Amounts:\n");
84	for (idx = 0; idx < NUM_G; idx++) {
85		ptrx = snd_emu10k1_ptr_read(emu, PTRX, idx);
86		psst = snd_emu10k1_ptr_read(emu, PSST, idx);
87		dsl = snd_emu10k1_ptr_read(emu, DSL, idx);
88		if (emu->audigy) {
89			val = snd_emu10k1_ptr_read(emu, A_FXRT1, idx);
90			val1 = snd_emu10k1_ptr_read(emu, A_FXRT2, idx);
91			snda = snd_emu10k1_ptr_read(emu, A_SENDAMOUNTS, idx);
92			snd_iprintf(buffer, "Ch%-2i: A=%2i:%02x, B=%2i:%02x, C=%2i:%02x, D=%2i:%02x, ",
93				idx,
94				val & 0x3f, REG_VAL_GET(PTRX_FXSENDAMOUNT_A, ptrx),
95				(val >> 8) & 0x3f, REG_VAL_GET(PTRX_FXSENDAMOUNT_B, ptrx),
96				(val >> 16) & 0x3f, REG_VAL_GET(PSST_FXSENDAMOUNT_C, psst),
97				(val >> 24) & 0x3f, REG_VAL_GET(DSL_FXSENDAMOUNT_D, dsl));
98			snd_iprintf(buffer, "E=%2i:%02x, F=%2i:%02x, G=%2i:%02x, H=%2i:%02x\n",
99				val1 & 0x3f, (snda >> 24) & 0xff,
100				(val1 >> 8) & 0x3f, (snda >> 16) & 0xff,
101				(val1 >> 16) & 0x3f, (snda >> 8) & 0xff,
102				(val1 >> 24) & 0x3f, snda & 0xff);
103		} else {
104			val = snd_emu10k1_ptr_read(emu, FXRT, idx);
105			snd_iprintf(buffer, "Ch%-2i: A=%2i:%02x, B=%2i:%02x, C=%2i:%02x, D=%2i:%02x\n",
106				idx,
107				(val >> 16) & 0x0f, REG_VAL_GET(PTRX_FXSENDAMOUNT_A, ptrx),
108				(val >> 20) & 0x0f, REG_VAL_GET(PTRX_FXSENDAMOUNT_B, ptrx),
109				(val >> 24) & 0x0f, REG_VAL_GET(PSST_FXSENDAMOUNT_C, psst),
110				(val >> 28) & 0x0f, REG_VAL_GET(DSL_FXSENDAMOUNT_D, dsl));
111		}
112	}
113	snd_iprintf(buffer, "\nEffect Send Targets:\n");
114	// Audigy actually has 64, but we don't use them all.
115	for (idx = 0; idx < 32; idx++) {
116		const char *c = snd_emu10k1_fxbus[idx];
117		if (c)
118			snd_iprintf(buffer, "  Channel %02i [%s]\n", idx, c);
119	}
120	if (!emu->card_capabilities->emu_model) {
121		snd_iprintf(buffer, "\nOutput Channels:\n");
122		for (idx = 0; idx < 32; idx++)
123			if (outputs[idx] && (extout_mask & (1 << idx)))
124				snd_iprintf(buffer, "  Channel %02i [%s]\n", idx, outputs[idx]);
125		snd_iprintf(buffer, "\nInput Channels:\n");
126		for (idx = 0; idx < 16; idx++)
127			if (inputs[idx] && (extin_mask & (1 << idx)))
128				snd_iprintf(buffer, "  Channel %02i [%s]\n", idx, inputs[idx]);
129		snd_iprintf(buffer, "\nMultichannel Capture Sources:\n");
130		for (idx = 0; idx < nefx; idx++)
131			if (emu->efx_voices_mask[0] & (1 << idx))
132				snd_iprintf(buffer, "  Channel %02i [Output: %s]\n",
133					    idx, outputs[idx] ? outputs[idx] : "???");
134		if (emu->audigy) {
135			for (idx = 0; idx < 32; idx++)
136				if (emu->efx_voices_mask[1] & (1 << idx))
137					snd_iprintf(buffer, "  Channel %02i [Input: %s]\n",
138						    idx + 32, inputs[idx] ? inputs[idx] : "???");
139		} else {
140			for (idx = 0; idx < 16; idx++) {
141				if (emu->efx_voices_mask[0] & ((1 << 16) << idx)) {
142					if (emu->card_capabilities->sblive51) {
143						s8 c = snd_emu10k1_sblive51_fxbus2_map[idx];
144						if (c == -1)
145							snd_iprintf(buffer, "  Channel %02i [Output: %s]\n",
146								    idx + 16, outputs[idx + 16]);
147						else
148							snd_iprintf(buffer, "  Channel %02i [Input: %s]\n",
149								    idx + 16, inputs[c]);
150					} else {
151						snd_iprintf(buffer, "  Channel %02i [Input: %s]\n",
152							    idx + 16, inputs[idx] ? inputs[idx] : "???");
153					}
154				}
155			}
156		}
157	}
158}
159
160static void snd_emu10k1_proc_spdif_read(struct snd_info_entry *entry,
161				  struct snd_info_buffer *buffer)
162{
163	struct snd_emu10k1 *emu = entry->private_data;
164	u32 value;
165	u32 value2;
166
167	if (emu->card_capabilities->emu_model) {
168		// This represents the S/PDIF lock status on 0404b, which is
169		// kinda weird and unhelpful, because monitoring it via IRQ is
170		// impractical (one gets an IRQ flood as long as it is desynced).
171		snd_emu1010_fpga_read(emu, EMU_HANA_IRQ_STATUS, &value);
172		snd_iprintf(buffer, "Lock status 1: %#x\n", value & 0x10);
173
174		// Bit 0x1 in LO being 0 is supposedly for ADAT lock.
175		// The registers are always all zero on 0404b.
176		snd_emu1010_fpga_read(emu, EMU_HANA_LOCK_STS_LO, &value);
177		snd_emu1010_fpga_read(emu, EMU_HANA_LOCK_STS_HI, &value2);
178		snd_iprintf(buffer, "Lock status 2: %#x %#x\n", value, value2);
179
180		snd_iprintf(buffer, "S/PDIF rate: %dHz\n",
181			    snd_emu1010_get_raw_rate(emu, EMU_HANA_WCLOCK_HANA_SPDIF_IN));
182		if (emu->card_capabilities->emu_model != EMU_MODEL_EMU0404) {
183			snd_iprintf(buffer, "ADAT rate: %dHz\n",
184				    snd_emu1010_get_raw_rate(emu, EMU_HANA_WCLOCK_HANA_ADAT_IN));
185			snd_iprintf(buffer, "Dock rate: %dHz\n",
186				    snd_emu1010_get_raw_rate(emu, EMU_HANA_WCLOCK_2ND_HANA));
187		}
188		if (emu->card_capabilities->emu_model == EMU_MODEL_EMU0404 ||
189		    emu->card_capabilities->emu_model == EMU_MODEL_EMU1010)
190			snd_iprintf(buffer, "BNC rate: %dHz\n",
191				    snd_emu1010_get_raw_rate(emu, EMU_HANA_WCLOCK_SYNC_BNC));
192
193		snd_emu1010_fpga_read(emu, EMU_HANA_SPDIF_MODE, &value);
194		if (value & EMU_HANA_SPDIF_MODE_RX_INVALID)
195			snd_iprintf(buffer, "\nS/PDIF input invalid\n");
196		else
197			snd_iprintf(buffer, "\nS/PDIF mode: %s%s\n",
198				    value & EMU_HANA_SPDIF_MODE_RX_PRO ? "professional" : "consumer",
199				    value & EMU_HANA_SPDIF_MODE_RX_NOCOPY ? ", no copy" : "");
200	} else {
201		snd_emu10k1_proc_spdif_status(emu, buffer, "CD-ROM S/PDIF In", CDCS, CDSRCS);
202		snd_emu10k1_proc_spdif_status(emu, buffer, "Optical or Coax S/PDIF In", GPSCS, GPSRCS);
203	}
204#if 0
205	val = snd_emu10k1_ptr_read(emu, ZVSRCS, 0);
206	snd_iprintf(buffer, "\nZoomed Video\n");
207	snd_iprintf(buffer, "Rate Locked           : %s\n", val & SRCS_RATELOCKED ? "on" : "off");
208	snd_iprintf(buffer, "Estimated Sample Rate : 0x%x\n", val & SRCS_ESTSAMPLERATE);
209#endif
210}
211
212static void snd_emu10k1_proc_rates_read(struct snd_info_entry *entry,
213				  struct snd_info_buffer *buffer)
214{
215	static const int samplerate[8] = { 44100, 48000, 96000, 192000, 4, 5, 6, 7 };
216	struct snd_emu10k1 *emu = entry->private_data;
217	unsigned int val, tmp, n;
218	val = snd_emu10k1_ptr20_read(emu, CAPTURE_RATE_STATUS, 0);
219	for (n = 0; n < 4; n++) {
220		tmp = val >> (16 + (n*4));
221		if (tmp & 0x8) snd_iprintf(buffer, "Channel %d: Rate=%d\n", n, samplerate[tmp & 0x7]);
222		else snd_iprintf(buffer, "Channel %d: No input\n", n);
223	}
224}
225
226struct emu10k1_reg_entry {
227	unsigned short base, size;
228	const char *name;
229};
230
231static const struct emu10k1_reg_entry sblive_reg_entries[] = {
232	{    0, 0x10, "FXBUS" },
233	{ 0x10, 0x10, "EXTIN" },
234	{ 0x20, 0x10, "EXTOUT" },
235	{ 0x30, 0x10, "FXBUS2" },
236	{ 0x40, 0x20, NULL },  // Constants
237	{ 0x100, 0x100, "GPR" },
238	{ 0x200, 0x80, "ITRAM_DATA" },
239	{ 0x280, 0x20, "ETRAM_DATA" },
240	{ 0x300, 0x80, "ITRAM_ADDR" },
241	{ 0x380, 0x20, "ETRAM_ADDR" },
242	{ 0x400, 0, NULL }
243};
244
245static const struct emu10k1_reg_entry audigy_reg_entries[] = {
246	{    0, 0x40, "FXBUS" },
247	{ 0x40, 0x10, "EXTIN" },
248	{ 0x50, 0x10, "P16VIN" },
249	{ 0x60, 0x20, "EXTOUT" },
250	{ 0x80, 0x20, "FXBUS2" },
251	{ 0xa0, 0x10, "EMU32OUTH" },
252	{ 0xb0, 0x10, "EMU32OUTL" },
253	{ 0xc0, 0x20, NULL },  // Constants
254	// This can't be quite right - overlap.
255	//{ 0x100, 0xc0, "ITRAM_CTL" },
256	//{ 0x1c0, 0x40, "ETRAM_CTL" },
257	{ 0x160, 0x20, "A3_EMU32IN" },
258	{ 0x1e0, 0x20, "A3_EMU32OUT" },
259	{ 0x200, 0xc0, "ITRAM_DATA" },
260	{ 0x2c0, 0x40, "ETRAM_DATA" },
261	{ 0x300, 0xc0, "ITRAM_ADDR" },
262	{ 0x3c0, 0x40, "ETRAM_ADDR" },
263	{ 0x400, 0x200, "GPR" },
264	{ 0x600, 0, NULL }
265};
266
267static const char * const emu10k1_const_entries[] = {
268	"C_00000000",
269	"C_00000001",
270	"C_00000002",
271	"C_00000003",
272	"C_00000004",
273	"C_00000008",
274	"C_00000010",
275	"C_00000020",
276	"C_00000100",
277	"C_00010000",
278	"C_00000800",
279	"C_10000000",
280	"C_20000000",
281	"C_40000000",
282	"C_80000000",
283	"C_7fffffff",
284	"C_ffffffff",
285	"C_fffffffe",
286	"C_c0000000",
287	"C_4f1bbcdc",
288	"C_5a7ef9db",
289	"C_00100000",
290	"GPR_ACCU",
291	"GPR_COND",
292	"GPR_NOISE0",
293	"GPR_NOISE1",
294	"GPR_IRQ",
295	"GPR_DBAC",
296	"GPR_DBACE",
297	"???",
298};
299
300static int disasm_emu10k1_reg(char *buffer,
301			      const struct emu10k1_reg_entry *entries,
302			      unsigned reg, const char *pfx)
303{
304	for (int i = 0; ; i++) {
305		unsigned base = entries[i].base;
306		unsigned size = entries[i].size;
307		if (!size)
308			return sprintf(buffer, "%s0x%03x", pfx, reg);
309		if (reg >= base && reg < base + size) {
310			const char *name = entries[i].name;
311			reg -= base;
312			if (name)
313				return sprintf(buffer, "%s%s(%u)", pfx, name, reg);
314			return sprintf(buffer, "%s%s", pfx, emu10k1_const_entries[reg]);
315		}
316	}
317}
318
319static int disasm_sblive_reg(char *buffer, unsigned reg, const char *pfx)
320{
321	return disasm_emu10k1_reg(buffer, sblive_reg_entries, reg, pfx);
322}
323
324static int disasm_audigy_reg(char *buffer, unsigned reg, const char *pfx)
325{
326	return disasm_emu10k1_reg(buffer, audigy_reg_entries, reg, pfx);
327}
328
329static void snd_emu10k1_proc_acode_read(struct snd_info_entry *entry,
330				        struct snd_info_buffer *buffer)
331{
332	u32 pc;
333	struct snd_emu10k1 *emu = entry->private_data;
334	static const char * const insns[16] = {
335		"MAC0", "MAC1", "MAC2", "MAC3", "MACINT0", "MACINT1", "ACC3", "MACMV",
336		"ANDXOR", "TSTNEG", "LIMITGE", "LIMITLT", "LOG", "EXP", "INTERP", "SKIP",
337	};
338	static const char spaces[] = "                              ";
339	const int nspaces = sizeof(spaces) - 1;
340
341	snd_iprintf(buffer, "FX8010 Instruction List '%s'\n", emu->fx8010.name);
342	snd_iprintf(buffer, "  Code dump      :\n");
343	for (pc = 0; pc < (emu->audigy ? 1024 : 512); pc++) {
344		u32 low, high;
345		int len;
346		char buf[100];
347		char *bufp = buf;
348
349		low = snd_emu10k1_efx_read(emu, pc * 2);
350		high = snd_emu10k1_efx_read(emu, pc * 2 + 1);
351		if (emu->audigy) {
352			bufp += sprintf(bufp, "    %-7s  ", insns[(high >> 24) & 0x0f]);
353			bufp += disasm_audigy_reg(bufp, (high >> 12) & 0x7ff, "");
354			bufp += disasm_audigy_reg(bufp, (high >> 0) & 0x7ff, ", ");
355			bufp += disasm_audigy_reg(bufp, (low >> 12) & 0x7ff, ", ");
356			bufp += disasm_audigy_reg(bufp, (low >> 0) & 0x7ff, ", ");
357		} else {
358			bufp += sprintf(bufp, "    %-7s  ", insns[(high >> 20) & 0x0f]);
359			bufp += disasm_sblive_reg(bufp, (high >> 10) & 0x3ff, "");
360			bufp += disasm_sblive_reg(bufp, (high >> 0) & 0x3ff, ", ");
361			bufp += disasm_sblive_reg(bufp, (low >> 10) & 0x3ff, ", ");
362			bufp += disasm_sblive_reg(bufp, (low >> 0) & 0x3ff, ", ");
363		}
364		len = (int)(ptrdiff_t)(bufp - buf);
365		snd_iprintf(buffer, "%s %s /* 0x%04x: 0x%08x%08x */\n",
366			    buf, &spaces[nspaces - clamp(65 - len, 0, nspaces)],
367			    pc, high, low);
368	}
369}
370
371#define TOTAL_SIZE_GPR		(0x100*4)
372#define A_TOTAL_SIZE_GPR	(0x200*4)
373#define TOTAL_SIZE_TANKMEM_DATA	(0xa0*4)
374#define TOTAL_SIZE_TANKMEM_ADDR (0xa0*4)
375#define A_TOTAL_SIZE_TANKMEM_DATA (0x100*4)
376#define A_TOTAL_SIZE_TANKMEM_ADDR (0x100*4)
377#define TOTAL_SIZE_CODE		(0x200*8)
378#define A_TOTAL_SIZE_CODE	(0x400*8)
379
380static ssize_t snd_emu10k1_fx8010_read(struct snd_info_entry *entry,
381				       void *file_private_data,
382				       struct file *file, char __user *buf,
383				       size_t count, loff_t pos)
384{
385	struct snd_emu10k1 *emu = entry->private_data;
386	unsigned int offset;
387	int tram_addr = 0;
388	unsigned int *tmp;
389	long res;
390	unsigned int idx;
391
392	if (!strcmp(entry->name, "fx8010_tram_addr")) {
393		offset = TANKMEMADDRREGBASE;
394		tram_addr = 1;
395	} else if (!strcmp(entry->name, "fx8010_tram_data")) {
396		offset = TANKMEMDATAREGBASE;
397	} else if (!strcmp(entry->name, "fx8010_code")) {
398		offset = emu->audigy ? A_MICROCODEBASE : MICROCODEBASE;
399	} else {
400		offset = emu->audigy ? A_FXGPREGBASE : FXGPREGBASE;
401	}
402
403	tmp = kmalloc(count + 8, GFP_KERNEL);
404	if (!tmp)
405		return -ENOMEM;
406	for (idx = 0; idx < ((pos & 3) + count + 3) >> 2; idx++) {
407		unsigned int val;
408		val = snd_emu10k1_ptr_read(emu, offset + idx + (pos >> 2), 0);
409		if (tram_addr && emu->audigy) {
410			val >>= 11;
411			val |= snd_emu10k1_ptr_read(emu, 0x100 + idx + (pos >> 2), 0) << 20;
412		}
413		tmp[idx] = val;
414	}
415	if (copy_to_user(buf, ((char *)tmp) + (pos & 3), count))
416		res = -EFAULT;
417	else
418		res = count;
419	kfree(tmp);
420	return res;
421}
422
423static void snd_emu10k1_proc_voices_read(struct snd_info_entry *entry,
424				  struct snd_info_buffer *buffer)
425{
426	struct snd_emu10k1 *emu = entry->private_data;
427	struct snd_emu10k1_voice *voice;
428	int idx;
429	static const char * const types[] = {
430		"Unused", "EFX", "EFX IRQ", "PCM", "PCM IRQ", "Synth"
431	};
432	static_assert(ARRAY_SIZE(types) == EMU10K1_NUM_TYPES);
433
434	snd_iprintf(buffer, "ch\tdirty\tlast\tuse\n");
435	for (idx = 0; idx < NUM_G; idx++) {
436		voice = &emu->voices[idx];
437		snd_iprintf(buffer, "%i\t%u\t%u\t%s\n",
438			idx,
439			voice->dirty,
440			voice->last,
441			types[voice->use]);
442	}
443}
444
445#ifdef CONFIG_SND_DEBUG
446
447static void snd_emu_proc_emu1010_link_read(struct snd_emu10k1 *emu,
448					   struct snd_info_buffer *buffer,
449					   u32 dst)
450{
451	u32 src = snd_emu1010_fpga_link_dst_src_read(emu, dst);
452	snd_iprintf(buffer, "%04x: %04x\n", dst, src);
453}
454
455static void snd_emu_proc_emu1010_reg_read(struct snd_info_entry *entry,
456				     struct snd_info_buffer *buffer)
457{
458	struct snd_emu10k1 *emu = entry->private_data;
459	u32 value;
460	int i;
461	snd_iprintf(buffer, "EMU1010 Registers:\n\n");
462
463	for(i = 0; i < 0x40; i+=1) {
464		snd_emu1010_fpga_read(emu, i, &value);
465		snd_iprintf(buffer, "%02x: %02x\n", i, value);
466	}
467
468	snd_iprintf(buffer, "\nEMU1010 Routes:\n\n");
469
470	for (i = 0; i < 16; i++)  // To Alice2/Tina[2] via EMU32
471		snd_emu_proc_emu1010_link_read(emu, buffer, i);
472	if (emu->card_capabilities->emu_model != EMU_MODEL_EMU0404)
473		for (i = 0; i < 32; i++)  // To Dock via EDI
474			snd_emu_proc_emu1010_link_read(emu, buffer, 0x100 + i);
475	if (emu->card_capabilities->emu_model != EMU_MODEL_EMU1616)
476		for (i = 0; i < 8; i++)  // To Hamoa/local
477			snd_emu_proc_emu1010_link_read(emu, buffer, 0x200 + i);
478	for (i = 0; i < 8; i++)  // To Hamoa/Mana/local
479		snd_emu_proc_emu1010_link_read(emu, buffer, 0x300 + i);
480	if (emu->card_capabilities->emu_model == EMU_MODEL_EMU1616) {
481		for (i = 0; i < 16; i++)  // To Tina2 via EMU32
482			snd_emu_proc_emu1010_link_read(emu, buffer, 0x400 + i);
483	} else if (emu->card_capabilities->emu_model != EMU_MODEL_EMU0404) {
484		for (i = 0; i < 8; i++)  // To Hana ADAT
485			snd_emu_proc_emu1010_link_read(emu, buffer, 0x400 + i);
486		if (emu->card_capabilities->emu_model == EMU_MODEL_EMU1010B) {
487			for (i = 0; i < 16; i++)  // To Tina via EMU32
488				snd_emu_proc_emu1010_link_read(emu, buffer, 0x500 + i);
489		} else {
490			// To Alice2 via I2S
491			snd_emu_proc_emu1010_link_read(emu, buffer, 0x500);
492			snd_emu_proc_emu1010_link_read(emu, buffer, 0x501);
493			snd_emu_proc_emu1010_link_read(emu, buffer, 0x600);
494			snd_emu_proc_emu1010_link_read(emu, buffer, 0x601);
495			snd_emu_proc_emu1010_link_read(emu, buffer, 0x700);
496			snd_emu_proc_emu1010_link_read(emu, buffer, 0x701);
497		}
498	}
499}
500
501static void snd_emu_proc_io_reg_read(struct snd_info_entry *entry,
502				     struct snd_info_buffer *buffer)
503{
504	struct snd_emu10k1 *emu = entry->private_data;
505	unsigned long value;
506	int i;
507	snd_iprintf(buffer, "IO Registers:\n\n");
508	for(i = 0; i < 0x40; i+=4) {
509		value = inl(emu->port + i);
510		snd_iprintf(buffer, "%02X: %08lX\n", i, value);
511	}
512}
513
514static void snd_emu_proc_io_reg_write(struct snd_info_entry *entry,
515                                      struct snd_info_buffer *buffer)
516{
517	struct snd_emu10k1 *emu = entry->private_data;
518	char line[64];
519	u32 reg, val;
520	while (!snd_info_get_line(buffer, line, sizeof(line))) {
521		if (sscanf(line, "%x %x", &reg, &val) != 2)
522			continue;
523		if (reg < 0x40 && val <= 0xffffffff) {
524			outl(val, emu->port + (reg & 0xfffffffc));
525		}
526	}
527}
528
529static unsigned int snd_ptr_read(struct snd_emu10k1 * emu,
530				 unsigned int iobase,
531				 unsigned int reg,
532				 unsigned int chn)
533{
534	unsigned int regptr, val;
535
536	regptr = (reg << 16) | chn;
537
538	spin_lock_irq(&emu->emu_lock);
539	outl(regptr, emu->port + iobase + PTR);
540	val = inl(emu->port + iobase + DATA);
541	spin_unlock_irq(&emu->emu_lock);
542	return val;
543}
544
545static void snd_ptr_write(struct snd_emu10k1 *emu,
546			  unsigned int iobase,
547			  unsigned int reg,
548			  unsigned int chn,
549			  unsigned int data)
550{
551	unsigned int regptr;
552
553	regptr = (reg << 16) | chn;
554
555	spin_lock_irq(&emu->emu_lock);
556	outl(regptr, emu->port + iobase + PTR);
557	outl(data, emu->port + iobase + DATA);
558	spin_unlock_irq(&emu->emu_lock);
559}
560
561
562static void snd_emu_proc_ptr_reg_read(struct snd_info_entry *entry,
563				      struct snd_info_buffer *buffer, int iobase, int offset, int length, int voices)
564{
565	struct snd_emu10k1 *emu = entry->private_data;
566	unsigned long value;
567	int i,j;
568	if (offset+length > 0xa0) {
569		snd_iprintf(buffer, "Input values out of range\n");
570		return;
571	}
572	snd_iprintf(buffer, "Registers 0x%x\n", iobase);
573	for(i = offset; i < offset+length; i++) {
574		snd_iprintf(buffer, "%02X: ",i);
575		for (j = 0; j < voices; j++) {
576			value = snd_ptr_read(emu, iobase, i, j);
577			snd_iprintf(buffer, "%08lX ", value);
578		}
579		snd_iprintf(buffer, "\n");
580	}
581}
582
583static void snd_emu_proc_ptr_reg_write(struct snd_info_entry *entry,
584				       struct snd_info_buffer *buffer,
585				       int iobase, int length, int voices)
586{
587	struct snd_emu10k1 *emu = entry->private_data;
588	char line[64];
589	unsigned int reg, channel_id , val;
590	while (!snd_info_get_line(buffer, line, sizeof(line))) {
591		if (sscanf(line, "%x %x %x", &reg, &channel_id, &val) != 3)
592			continue;
593		if (reg < length && channel_id < voices)
594			snd_ptr_write(emu, iobase, reg, channel_id, val);
595	}
596}
597
598static void snd_emu_proc_ptr_reg_write00(struct snd_info_entry *entry,
599					 struct snd_info_buffer *buffer)
600{
601	snd_emu_proc_ptr_reg_write(entry, buffer, 0, 0x80, 64);
602}
603
604static void snd_emu_proc_ptr_reg_write20(struct snd_info_entry *entry,
605					 struct snd_info_buffer *buffer)
606{
607	struct snd_emu10k1 *emu = entry->private_data;
608	snd_emu_proc_ptr_reg_write(entry, buffer, 0x20,
609				   emu->card_capabilities->ca0108_chip ? 0xa0 : 0x80, 4);
610}
611
612
613static void snd_emu_proc_ptr_reg_read00a(struct snd_info_entry *entry,
614					 struct snd_info_buffer *buffer)
615{
616	snd_emu_proc_ptr_reg_read(entry, buffer, 0, 0, 0x40, 64);
617}
618
619static void snd_emu_proc_ptr_reg_read00b(struct snd_info_entry *entry,
620					 struct snd_info_buffer *buffer)
621{
622	snd_emu_proc_ptr_reg_read(entry, buffer, 0, 0x40, 0x40, 64);
623}
624
625static void snd_emu_proc_ptr_reg_read20a(struct snd_info_entry *entry,
626					 struct snd_info_buffer *buffer)
627{
628	snd_emu_proc_ptr_reg_read(entry, buffer, 0x20, 0, 0x40, 4);
629}
630
631static void snd_emu_proc_ptr_reg_read20b(struct snd_info_entry *entry,
632					 struct snd_info_buffer *buffer)
633{
634	snd_emu_proc_ptr_reg_read(entry, buffer, 0x20, 0x40, 0x40, 4);
635}
636
637static void snd_emu_proc_ptr_reg_read20c(struct snd_info_entry *entry,
638					 struct snd_info_buffer * buffer)
639{
640	snd_emu_proc_ptr_reg_read(entry, buffer, 0x20, 0x80, 0x20, 4);
641}
642#endif
643
644static const struct snd_info_entry_ops snd_emu10k1_proc_ops_fx8010 = {
645	.read = snd_emu10k1_fx8010_read,
646};
647
648int snd_emu10k1_proc_init(struct snd_emu10k1 *emu)
649{
650	struct snd_info_entry *entry;
651#ifdef CONFIG_SND_DEBUG
652	if (emu->card_capabilities->emu_model) {
653		snd_card_ro_proc_new(emu->card, "emu1010_regs",
654				     emu, snd_emu_proc_emu1010_reg_read);
655	}
656	snd_card_rw_proc_new(emu->card, "io_regs", emu,
657			     snd_emu_proc_io_reg_read,
658			     snd_emu_proc_io_reg_write);
659	snd_card_rw_proc_new(emu->card, "ptr_regs00a", emu,
660			     snd_emu_proc_ptr_reg_read00a,
661			     snd_emu_proc_ptr_reg_write00);
662	snd_card_rw_proc_new(emu->card, "ptr_regs00b", emu,
663			     snd_emu_proc_ptr_reg_read00b,
664			     snd_emu_proc_ptr_reg_write00);
665	if (!emu->card_capabilities->emu_model &&
666	    (emu->card_capabilities->ca0151_chip || emu->card_capabilities->ca0108_chip)) {
667		snd_card_rw_proc_new(emu->card, "ptr_regs20a", emu,
668				     snd_emu_proc_ptr_reg_read20a,
669				     snd_emu_proc_ptr_reg_write20);
670		snd_card_rw_proc_new(emu->card, "ptr_regs20b", emu,
671				     snd_emu_proc_ptr_reg_read20b,
672				     snd_emu_proc_ptr_reg_write20);
673		if (emu->card_capabilities->ca0108_chip)
674			snd_card_rw_proc_new(emu->card, "ptr_regs20c", emu,
675					     snd_emu_proc_ptr_reg_read20c,
676					     snd_emu_proc_ptr_reg_write20);
677	}
678#endif
679
680	snd_card_ro_proc_new(emu->card, "emu10k1", emu, snd_emu10k1_proc_read);
681
682	if (emu->card_capabilities->emu10k2_chip)
683		snd_card_ro_proc_new(emu->card, "spdif-in", emu,
684				     snd_emu10k1_proc_spdif_read);
685	if (emu->card_capabilities->ca0151_chip)
686		snd_card_ro_proc_new(emu->card, "capture-rates", emu,
687				     snd_emu10k1_proc_rates_read);
688
689	snd_card_ro_proc_new(emu->card, "voices", emu,
690			     snd_emu10k1_proc_voices_read);
691
692	if (! snd_card_proc_new(emu->card, "fx8010_gpr", &entry)) {
693		entry->content = SNDRV_INFO_CONTENT_DATA;
694		entry->private_data = emu;
695		entry->mode = S_IFREG | 0444 /*| S_IWUSR*/;
696		entry->size = emu->audigy ? A_TOTAL_SIZE_GPR : TOTAL_SIZE_GPR;
697		entry->c.ops = &snd_emu10k1_proc_ops_fx8010;
698	}
699	if (! snd_card_proc_new(emu->card, "fx8010_tram_data", &entry)) {
700		entry->content = SNDRV_INFO_CONTENT_DATA;
701		entry->private_data = emu;
702		entry->mode = S_IFREG | 0444 /*| S_IWUSR*/;
703		entry->size = emu->audigy ? A_TOTAL_SIZE_TANKMEM_DATA : TOTAL_SIZE_TANKMEM_DATA ;
704		entry->c.ops = &snd_emu10k1_proc_ops_fx8010;
705	}
706	if (! snd_card_proc_new(emu->card, "fx8010_tram_addr", &entry)) {
707		entry->content = SNDRV_INFO_CONTENT_DATA;
708		entry->private_data = emu;
709		entry->mode = S_IFREG | 0444 /*| S_IWUSR*/;
710		entry->size = emu->audigy ? A_TOTAL_SIZE_TANKMEM_ADDR : TOTAL_SIZE_TANKMEM_ADDR ;
711		entry->c.ops = &snd_emu10k1_proc_ops_fx8010;
712	}
713	if (! snd_card_proc_new(emu->card, "fx8010_code", &entry)) {
714		entry->content = SNDRV_INFO_CONTENT_DATA;
715		entry->private_data = emu;
716		entry->mode = S_IFREG | 0444 /*| S_IWUSR*/;
717		entry->size = emu->audigy ? A_TOTAL_SIZE_CODE : TOTAL_SIZE_CODE;
718		entry->c.ops = &snd_emu10k1_proc_ops_fx8010;
719	}
720	snd_card_ro_proc_new(emu->card, "fx8010_acode", emu,
721			     snd_emu10k1_proc_acode_read);
722	return 0;
723}
724