1/*
2 *  Support for Digigram Lola PCI-e boards
3 *
4 *  Copyright (c) 2011 Takashi Iwai <tiwai@suse.de>
5 *
6 *  This program is free software; you can redistribute it and/or modify it
7 *  under the terms of the GNU General Public License as published by the Free
8 *  Software Foundation; either version 2 of the License, or (at your option)
9 *  any later version.
10 *
11 *  This program is distributed in the hope that it will be useful, but WITHOUT
12 *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
14 *  more details.
15 *
16 *  You should have received a copy of the GNU General Public License along with
17 *  this program; if not, write to the Free Software Foundation, Inc., 59
18 *  Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19 */
20
21#include <linux/kernel.h>
22#include <linux/init.h>
23#include <linux/io.h>
24#include <sound/core.h>
25#include <sound/info.h>
26#include <sound/pcm.h>
27#include "lola.h"
28
29static void print_audio_widget(struct snd_info_buffer *buffer,
30			       struct lola *chip, int nid, const char *name)
31{
32	unsigned int val;
33
34	lola_read_param(chip, nid, LOLA_PAR_AUDIO_WIDGET_CAP, &val);
35	snd_iprintf(buffer, "Node 0x%02x %s wcaps 0x%x\n", nid, name, val);
36	lola_read_param(chip, nid, LOLA_PAR_STREAM_FORMATS, &val);
37	snd_iprintf(buffer, "  Formats: 0x%x\n", val);
38}
39
40static void print_pin_widget(struct snd_info_buffer *buffer,
41			     struct lola *chip, int nid, unsigned int ampcap,
42			     const char *name)
43{
44	unsigned int val;
45
46	lola_read_param(chip, nid, LOLA_PAR_AUDIO_WIDGET_CAP, &val);
47	snd_iprintf(buffer, "Node 0x%02x %s wcaps 0x%x\n", nid, name, val);
48	if (val == 0x00400200)
49		return;
50	lola_read_param(chip, nid, ampcap, &val);
51	snd_iprintf(buffer, "  Amp-Caps: 0x%x\n", val);
52	snd_iprintf(buffer, "    mute=%d, step-size=%d, steps=%d, ofs=%d\n",
53		    LOLA_AMP_MUTE_CAPABLE(val),
54		    LOLA_AMP_STEP_SIZE(val),
55		    LOLA_AMP_NUM_STEPS(val),
56		    LOLA_AMP_OFFSET(val));
57	lola_codec_read(chip, nid, LOLA_VERB_GET_MAX_LEVEL, 0, 0, &val, NULL);
58	snd_iprintf(buffer, "  Max-level: 0x%x\n", val);
59}
60
61static void print_clock_widget(struct snd_info_buffer *buffer,
62			       struct lola *chip, int nid)
63{
64	int i, j, num_clocks;
65	unsigned int val;
66
67	lola_read_param(chip, nid, LOLA_PAR_AUDIO_WIDGET_CAP, &val);
68	snd_iprintf(buffer, "Node 0x%02x [Clock] wcaps 0x%x\n", nid, val);
69	num_clocks = val & 0xff;
70	for (i = 0; i < num_clocks; i += 4) {
71		unsigned int res_ex;
72		unsigned short items[4];
73		const char *name;
74
75		lola_codec_read(chip, nid, LOLA_VERB_GET_CLOCK_LIST,
76				i, 0, &val, &res_ex);
77		items[0] = val & 0xfff;
78		items[1] = (val >> 16) & 0xfff;
79		items[2] = res_ex & 0xfff;
80		items[3] = (res_ex >> 16) & 0xfff;
81		for (j = 0; j < 4; j++) {
82			unsigned char type = items[j] >> 8;
83			unsigned int freq = items[j] & 0xff;
84			if (i + j >= num_clocks)
85				break;
86			if (type == LOLA_CLOCK_TYPE_INTERNAL) {
87				name = "Internal";
88				freq = lola_sample_rate_convert(freq);
89			} else if (type == LOLA_CLOCK_TYPE_VIDEO) {
90				name = "Video";
91				freq = lola_sample_rate_convert(freq);
92			} else {
93				name = "Other";
94			}
95			snd_iprintf(buffer, "  Clock %d: Type %d:%s, freq=%d\n",
96				    i + j, type, name, freq);
97		}
98	}
99}
100
101static void print_mixer_widget(struct snd_info_buffer *buffer,
102			       struct lola *chip, int nid)
103{
104	unsigned int val;
105
106	lola_read_param(chip, nid, LOLA_PAR_AUDIO_WIDGET_CAP, &val);
107	snd_iprintf(buffer, "Node 0x%02x [Mixer] wcaps 0x%x\n", nid, val);
108}
109
110static void lola_proc_codec_read(struct snd_info_entry *entry,
111				 struct snd_info_buffer *buffer)
112{
113	struct lola *chip = entry->private_data;
114	unsigned int val;
115	int i, nid;
116
117	lola_read_param(chip, 0, LOLA_PAR_VENDOR_ID, &val);
118	snd_iprintf(buffer, "Vendor: 0x%08x\n", val);
119	lola_read_param(chip, 1, LOLA_PAR_FUNCTION_TYPE, &val);
120	snd_iprintf(buffer, "Function Type: %d\n", val);
121	lola_read_param(chip, 1, LOLA_PAR_SPECIFIC_CAPS, &val);
122	snd_iprintf(buffer, "Specific-Caps: 0x%08x\n", val);
123	snd_iprintf(buffer, "  Pins-In %d, Pins-Out %d\n",
124		    chip->pin[CAPT].num_pins, chip->pin[PLAY].num_pins);
125	nid = 2;
126	for (i = 0; i < chip->pcm[CAPT].num_streams; i++, nid++)
127		print_audio_widget(buffer, chip, nid, "[Audio-In]");
128	for (i = 0; i < chip->pcm[PLAY].num_streams; i++, nid++)
129		print_audio_widget(buffer, chip, nid, "[Audio-Out]");
130	for (i = 0; i < chip->pin[CAPT].num_pins; i++, nid++)
131		print_pin_widget(buffer, chip, nid, LOLA_PAR_AMP_IN_CAP,
132				 "[Pin-In]");
133	for (i = 0; i < chip->pin[PLAY].num_pins; i++, nid++)
134		print_pin_widget(buffer, chip, nid, LOLA_PAR_AMP_OUT_CAP,
135				 "[Pin-Out]");
136	if (LOLA_AFG_CLOCK_WIDGET_PRESENT(chip->lola_caps)) {
137		print_clock_widget(buffer, chip, nid);
138		nid++;
139	}
140	if (LOLA_AFG_MIXER_WIDGET_PRESENT(chip->lola_caps)) {
141		print_mixer_widget(buffer, chip, nid);
142		nid++;
143	}
144}
145
146/* direct codec access for debugging */
147static void lola_proc_codec_rw_write(struct snd_info_entry *entry,
148				     struct snd_info_buffer *buffer)
149{
150	struct lola *chip = entry->private_data;
151	char line[64];
152	unsigned int id, verb, data, extdata;
153	while (!snd_info_get_line(buffer, line, sizeof(line))) {
154		if (sscanf(line, "%u %u %u %u", &id, &verb, &data, &extdata) != 4)
155			continue;
156		lola_codec_read(chip, id, verb, data, extdata,
157				&chip->debug_res,
158				&chip->debug_res_ex);
159	}
160}
161
162static void lola_proc_codec_rw_read(struct snd_info_entry *entry,
163				    struct snd_info_buffer *buffer)
164{
165	struct lola *chip = entry->private_data;
166	snd_iprintf(buffer, "0x%x 0x%x\n", chip->debug_res, chip->debug_res_ex);
167}
168
169/*
170 * dump some registers
171 */
172static void lola_proc_regs_read(struct snd_info_entry *entry,
173				struct snd_info_buffer *buffer)
174{
175	struct lola *chip = entry->private_data;
176	int i;
177
178	for (i = 0; i < 0x40; i += 4) {
179		snd_iprintf(buffer, "BAR0 %02x: %08x\n", i,
180			    readl(chip->bar[BAR0].remap_addr + i));
181	}
182	snd_iprintf(buffer, "\n");
183	for (i = 0; i < 0x30; i += 4) {
184		snd_iprintf(buffer, "BAR1 %02x: %08x\n", i,
185			    readl(chip->bar[BAR1].remap_addr + i));
186	}
187	snd_iprintf(buffer, "\n");
188	for (i = 0x80; i < 0xa0; i += 4) {
189		snd_iprintf(buffer, "BAR1 %02x: %08x\n", i,
190			    readl(chip->bar[BAR1].remap_addr + i));
191	}
192	snd_iprintf(buffer, "\n");
193	for (i = 0; i < 32; i++) {
194		snd_iprintf(buffer, "DSD %02x STS  %08x\n", i,
195			    lola_dsd_read(chip, i, STS));
196		snd_iprintf(buffer, "DSD %02x LPIB %08x\n", i,
197			    lola_dsd_read(chip, i, LPIB));
198		snd_iprintf(buffer, "DSD %02x CTL  %08x\n", i,
199			    lola_dsd_read(chip, i, CTL));
200		snd_iprintf(buffer, "DSD %02x LVIL %08x\n", i,
201			    lola_dsd_read(chip, i, LVI));
202		snd_iprintf(buffer, "DSD %02x BDPL %08x\n", i,
203			    lola_dsd_read(chip, i, BDPL));
204		snd_iprintf(buffer, "DSD %02x BDPU %08x\n", i,
205			    lola_dsd_read(chip, i, BDPU));
206	}
207}
208
209void lola_proc_debug_new(struct lola *chip)
210{
211	struct snd_info_entry *entry;
212
213	if (!snd_card_proc_new(chip->card, "codec", &entry))
214		snd_info_set_text_ops(entry, chip, lola_proc_codec_read);
215	if (!snd_card_proc_new(chip->card, "codec_rw", &entry)) {
216		snd_info_set_text_ops(entry, chip, lola_proc_codec_rw_read);
217		entry->mode |= S_IWUSR;
218		entry->c.text.write = lola_proc_codec_rw_write;
219	}
220	if (!snd_card_proc_new(chip->card, "regs", &entry))
221		snd_info_set_text_ops(entry, chip, lola_proc_regs_read);
222}
223