xref: /openbmc/linux/sound/drivers/pcsp/pcsp_lib.c (revision 22246614)
1 /*
2  * PC-Speaker driver for Linux
3  *
4  * Copyright (C) 1993-1997  Michael Beck
5  * Copyright (C) 1997-2001  David Woodhouse
6  * Copyright (C) 2001-2008  Stas Sergeev
7  */
8 
9 #include <linux/module.h>
10 #include <linux/moduleparam.h>
11 #include <sound/pcm.h>
12 #include <linux/interrupt.h>
13 #include <asm/io.h>
14 #include "pcsp.h"
15 
16 static int nforce_wa;
17 module_param(nforce_wa, bool, 0444);
18 MODULE_PARM_DESC(nforce_wa, "Apply NForce chipset workaround "
19 		"(expect bad sound)");
20 
21 static void pcsp_start_timer(unsigned long dummy)
22 {
23 	hrtimer_start(&pcsp_chip.timer, ktime_set(0, 0), HRTIMER_MODE_REL);
24 }
25 
26 /*
27  * We need the hrtimer_start as a tasklet to avoid
28  * the nasty locking problem. :(
29  * The problem:
30  * - The timer handler is called with the cpu_base->lock
31  *   already held by hrtimer code.
32  * - snd_pcm_period_elapsed() takes the
33  *   substream->self_group.lock.
34  * So far so good.
35  * But the snd_pcsp_trigger() is called with the
36  * substream->self_group.lock held, and it calls
37  * hrtimer_start(), which takes the cpu_base->lock.
38  * You see the problem. We have the code pathes
39  * which take two locks in a reverse order. This
40  * can deadlock and the lock validator complains.
41  * The only solution I could find was to move the
42  * hrtimer_start() into a tasklet. -stsp
43  */
44 static DECLARE_TASKLET(pcsp_start_timer_tasklet, pcsp_start_timer, 0);
45 
46 enum hrtimer_restart pcsp_do_timer(struct hrtimer *handle)
47 {
48 	unsigned long flags;
49 	unsigned char timer_cnt, val;
50 	int periods_elapsed;
51 	u64 ns;
52 	size_t period_bytes, buffer_bytes;
53 	struct snd_pcm_substream *substream;
54 	struct snd_pcm_runtime *runtime;
55 	struct snd_pcsp *chip = container_of(handle, struct snd_pcsp, timer);
56 
57 	if (chip->thalf) {
58 		outb(chip->val61, 0x61);
59 		chip->thalf = 0;
60 		if (!atomic_read(&chip->timer_active))
61 			return HRTIMER_NORESTART;
62 		hrtimer_forward(&chip->timer, chip->timer.expires,
63 				ktime_set(0, chip->ns_rem));
64 		return HRTIMER_RESTART;
65 	}
66 
67 	/* hrtimer calls us from both hardirq and softirq contexts,
68 	 * so irqsave :( */
69 	spin_lock_irqsave(&chip->substream_lock, flags);
70 	/* Takashi Iwai says regarding this extra lock:
71 
72 	If the irq handler handles some data on the DMA buffer, it should
73 	do snd_pcm_stream_lock().
74 	That protects basically against all races among PCM callbacks, yes.
75 	However, there are two remaining issues:
76 	1. The substream pointer you try to lock isn't protected _before_
77 	  this lock yet.
78 	2. snd_pcm_period_elapsed() itself acquires the lock.
79 	The requirement of another lock is because of 1.  When you get
80 	chip->playback_substream, it's not protected.
81 	Keeping this lock while snd_pcm_period_elapsed() assures the substream
82 	is still protected (at least, not released).  And the other status is
83 	handled properly inside snd_pcm_stream_lock() in
84 	snd_pcm_period_elapsed().
85 
86 	*/
87 	if (!chip->playback_substream)
88 		goto exit_nr_unlock1;
89 	substream = chip->playback_substream;
90 	snd_pcm_stream_lock(substream);
91 	if (!atomic_read(&chip->timer_active))
92 		goto exit_nr_unlock2;
93 
94 	runtime = substream->runtime;
95 	/* assume it is u8 mono */
96 	val = runtime->dma_area[chip->playback_ptr];
97 	timer_cnt = val * CUR_DIV() / 256;
98 
99 	if (timer_cnt && chip->enable) {
100 		spin_lock(&i8253_lock);
101 		if (!nforce_wa) {
102 			outb_p(chip->val61, 0x61);
103 			outb_p(timer_cnt, 0x42);
104 			outb(chip->val61 ^ 1, 0x61);
105 		} else {
106 			outb(chip->val61 ^ 2, 0x61);
107 			chip->thalf = 1;
108 		}
109 		spin_unlock(&i8253_lock);
110 	}
111 
112 	period_bytes = snd_pcm_lib_period_bytes(substream);
113 	buffer_bytes = snd_pcm_lib_buffer_bytes(substream);
114 	chip->playback_ptr += PCSP_INDEX_INC();
115 	periods_elapsed = chip->playback_ptr - chip->period_ptr;
116 	if (periods_elapsed < 0) {
117 		printk(KERN_WARNING "PCSP: playback_ptr inconsistent "
118 			"(%zi %zi %zi)\n",
119 			chip->playback_ptr, period_bytes, buffer_bytes);
120 		periods_elapsed += buffer_bytes;
121 	}
122 	periods_elapsed /= period_bytes;
123 	/* wrap the pointer _before_ calling snd_pcm_period_elapsed(),
124 	 * or ALSA will BUG on us. */
125 	chip->playback_ptr %= buffer_bytes;
126 
127 	snd_pcm_stream_unlock(substream);
128 
129 	if (periods_elapsed) {
130 		snd_pcm_period_elapsed(substream);
131 		chip->period_ptr += periods_elapsed * period_bytes;
132 		chip->period_ptr %= buffer_bytes;
133 	}
134 
135 	spin_unlock_irqrestore(&chip->substream_lock, flags);
136 
137 	if (!atomic_read(&chip->timer_active))
138 		return HRTIMER_NORESTART;
139 
140 	chip->ns_rem = PCSP_PERIOD_NS();
141 	ns = (chip->thalf ? PCSP_CALC_NS(timer_cnt) : chip->ns_rem);
142 	chip->ns_rem -= ns;
143 	hrtimer_forward(&chip->timer, chip->timer.expires, ktime_set(0, ns));
144 	return HRTIMER_RESTART;
145 
146 exit_nr_unlock2:
147 	snd_pcm_stream_unlock(substream);
148 exit_nr_unlock1:
149 	spin_unlock_irqrestore(&chip->substream_lock, flags);
150 	return HRTIMER_NORESTART;
151 }
152 
153 static void pcsp_start_playing(struct snd_pcsp *chip)
154 {
155 #if PCSP_DEBUG
156 	printk(KERN_INFO "PCSP: start_playing called\n");
157 #endif
158 	if (atomic_read(&chip->timer_active)) {
159 		printk(KERN_ERR "PCSP: Timer already active\n");
160 		return;
161 	}
162 
163 	spin_lock(&i8253_lock);
164 	chip->val61 = inb(0x61) | 0x03;
165 	outb_p(0x92, 0x43);	/* binary, mode 1, LSB only, ch 2 */
166 	spin_unlock(&i8253_lock);
167 	atomic_set(&chip->timer_active, 1);
168 	chip->thalf = 0;
169 
170 	tasklet_schedule(&pcsp_start_timer_tasklet);
171 }
172 
173 static void pcsp_stop_playing(struct snd_pcsp *chip)
174 {
175 #if PCSP_DEBUG
176 	printk(KERN_INFO "PCSP: stop_playing called\n");
177 #endif
178 	if (!atomic_read(&chip->timer_active))
179 		return;
180 
181 	atomic_set(&chip->timer_active, 0);
182 	spin_lock(&i8253_lock);
183 	/* restore the timer */
184 	outb_p(0xb6, 0x43);	/* binary, mode 3, LSB/MSB, ch 2 */
185 	outb(chip->val61 & 0xFC, 0x61);
186 	spin_unlock(&i8253_lock);
187 }
188 
189 static int snd_pcsp_playback_close(struct snd_pcm_substream *substream)
190 {
191 	struct snd_pcsp *chip = snd_pcm_substream_chip(substream);
192 #if PCSP_DEBUG
193 	printk(KERN_INFO "PCSP: close called\n");
194 #endif
195 	if (atomic_read(&chip->timer_active)) {
196 		printk(KERN_ERR "PCSP: timer still active\n");
197 		pcsp_stop_playing(chip);
198 	}
199 	spin_lock_irq(&chip->substream_lock);
200 	chip->playback_substream = NULL;
201 	spin_unlock_irq(&chip->substream_lock);
202 	return 0;
203 }
204 
205 static int snd_pcsp_playback_hw_params(struct snd_pcm_substream *substream,
206 				       struct snd_pcm_hw_params *hw_params)
207 {
208 	int err;
209 	err = snd_pcm_lib_malloc_pages(substream,
210 				      params_buffer_bytes(hw_params));
211 	if (err < 0)
212 		return err;
213 	return 0;
214 }
215 
216 static int snd_pcsp_playback_hw_free(struct snd_pcm_substream *substream)
217 {
218 #if PCSP_DEBUG
219 	printk(KERN_INFO "PCSP: hw_free called\n");
220 #endif
221 	return snd_pcm_lib_free_pages(substream);
222 }
223 
224 static int snd_pcsp_playback_prepare(struct snd_pcm_substream *substream)
225 {
226 	struct snd_pcsp *chip = snd_pcm_substream_chip(substream);
227 #if PCSP_DEBUG
228 	printk(KERN_INFO "PCSP: prepare called, "
229 			"size=%zi psize=%zi f=%zi f1=%i\n",
230 			snd_pcm_lib_buffer_bytes(substream),
231 			snd_pcm_lib_period_bytes(substream),
232 			snd_pcm_lib_buffer_bytes(substream) /
233 			snd_pcm_lib_period_bytes(substream),
234 			substream->runtime->periods);
235 #endif
236 	chip->playback_ptr = 0;
237 	chip->period_ptr = 0;
238 	return 0;
239 }
240 
241 static int snd_pcsp_trigger(struct snd_pcm_substream *substream, int cmd)
242 {
243 	struct snd_pcsp *chip = snd_pcm_substream_chip(substream);
244 #if PCSP_DEBUG
245 	printk(KERN_INFO "PCSP: trigger called\n");
246 #endif
247 	switch (cmd) {
248 	case SNDRV_PCM_TRIGGER_START:
249 	case SNDRV_PCM_TRIGGER_RESUME:
250 		pcsp_start_playing(chip);
251 		break;
252 	case SNDRV_PCM_TRIGGER_STOP:
253 	case SNDRV_PCM_TRIGGER_SUSPEND:
254 		pcsp_stop_playing(chip);
255 		break;
256 	default:
257 		return -EINVAL;
258 	}
259 	return 0;
260 }
261 
262 static snd_pcm_uframes_t snd_pcsp_playback_pointer(struct snd_pcm_substream
263 						   *substream)
264 {
265 	struct snd_pcsp *chip = snd_pcm_substream_chip(substream);
266 	return bytes_to_frames(substream->runtime, chip->playback_ptr);
267 }
268 
269 static struct snd_pcm_hardware snd_pcsp_playback = {
270 	.info = (SNDRV_PCM_INFO_INTERLEAVED |
271 		 SNDRV_PCM_INFO_HALF_DUPLEX |
272 		 SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_MMAP_VALID),
273 	.formats = SNDRV_PCM_FMTBIT_U8,
274 	.rates = SNDRV_PCM_RATE_KNOT,
275 	.rate_min = PCSP_DEFAULT_SRATE,
276 	.rate_max = PCSP_DEFAULT_SRATE,
277 	.channels_min = 1,
278 	.channels_max = 1,
279 	.buffer_bytes_max = PCSP_BUFFER_SIZE,
280 	.period_bytes_min = 64,
281 	.period_bytes_max = PCSP_MAX_PERIOD_SIZE,
282 	.periods_min = 2,
283 	.periods_max = PCSP_MAX_PERIODS,
284 	.fifo_size = 0,
285 };
286 
287 static int snd_pcsp_playback_open(struct snd_pcm_substream *substream)
288 {
289 	struct snd_pcsp *chip = snd_pcm_substream_chip(substream);
290 	struct snd_pcm_runtime *runtime = substream->runtime;
291 #if PCSP_DEBUG
292 	printk(KERN_INFO "PCSP: open called\n");
293 #endif
294 	if (atomic_read(&chip->timer_active)) {
295 		printk(KERN_ERR "PCSP: still active!!\n");
296 		return -EBUSY;
297 	}
298 	runtime->hw = snd_pcsp_playback;
299 	spin_lock_irq(&chip->substream_lock);
300 	chip->playback_substream = substream;
301 	spin_unlock_irq(&chip->substream_lock);
302 	return 0;
303 }
304 
305 static struct snd_pcm_ops snd_pcsp_playback_ops = {
306 	.open = snd_pcsp_playback_open,
307 	.close = snd_pcsp_playback_close,
308 	.ioctl = snd_pcm_lib_ioctl,
309 	.hw_params = snd_pcsp_playback_hw_params,
310 	.hw_free = snd_pcsp_playback_hw_free,
311 	.prepare = snd_pcsp_playback_prepare,
312 	.trigger = snd_pcsp_trigger,
313 	.pointer = snd_pcsp_playback_pointer,
314 };
315 
316 int __devinit snd_pcsp_new_pcm(struct snd_pcsp *chip)
317 {
318 	int err;
319 
320 	err = snd_pcm_new(chip->card, "pcspeaker", 0, 1, 0, &chip->pcm);
321 	if (err < 0)
322 		return err;
323 
324 	snd_pcm_set_ops(chip->pcm, SNDRV_PCM_STREAM_PLAYBACK,
325 			&snd_pcsp_playback_ops);
326 
327 	chip->pcm->private_data = chip;
328 	chip->pcm->info_flags = SNDRV_PCM_INFO_HALF_DUPLEX;
329 	strcpy(chip->pcm->name, "pcsp");
330 
331 	snd_pcm_lib_preallocate_pages_for_all(chip->pcm,
332 					      SNDRV_DMA_TYPE_CONTINUOUS,
333 					      snd_dma_continuous_data
334 					      (GFP_KERNEL), PCSP_BUFFER_SIZE,
335 					      PCSP_BUFFER_SIZE);
336 
337 	return 0;
338 }
339