78cfb66e4c59cecf83c51d55b8b7f7baf9bf683b
[linux-2.6.git] / sound / oss / sh_dac_audio.c
1 /*
2  * sound/oss/sh_dac_audio.c
3  *
4  * SH DAC based sound :(
5  *
6  *  Copyright (C) 2004,2005  Andriy Skulysh
7  *
8  * This file is subject to the terms and conditions of the GNU General Public
9  * License.  See the file "COPYING" in the main directory of this archive
10  * for more details.
11  */
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/sched.h>
15 #include <linux/linkage.h>
16 #include <linux/slab.h>
17 #include <linux/fs.h>
18 #include <linux/sound.h>
19 #include <linux/soundcard.h>
20 #include <linux/interrupt.h>
21 #include <asm/io.h>
22 #include <asm/uaccess.h>
23 #include <asm/irq.h>
24 #include <asm/delay.h>
25 #include <asm/clock.h>
26 #include <asm/cpu/dac.h>
27 #include <asm/cpu/timer.h>
28 #include <asm/machvec.h>
29 #include <mach/hp6xx.h>
30 #include <asm/hd64461.h>
31
32 #define MODNAME "sh_dac_audio"
33
34 #define TMU_TOCR_INIT   0x00
35
36 #define TMU1_TCR_INIT   0x0020  /* Clock/4, rising edge; interrupt on */
37 #define TMU1_TSTR_INIT  0x02    /* Bit to turn on TMU1 */
38
39 #define BUFFER_SIZE 48000
40
41 static int rate;
42 static int empty;
43 static char *data_buffer, *buffer_begin, *buffer_end;
44 static int in_use, device_major;
45
46 static void dac_audio_start_timer(void)
47 {
48         u8 tstr;
49
50         tstr = ctrl_inb(TMU_TSTR);
51         tstr |= TMU1_TSTR_INIT;
52         ctrl_outb(tstr, TMU_TSTR);
53 }
54
55 static void dac_audio_stop_timer(void)
56 {
57         u8 tstr;
58
59         tstr = ctrl_inb(TMU_TSTR);
60         tstr &= ~TMU1_TSTR_INIT;
61         ctrl_outb(tstr, TMU_TSTR);
62 }
63
64 static void dac_audio_reset(void)
65 {
66         dac_audio_stop_timer();
67         buffer_begin = buffer_end = data_buffer;
68         empty = 1;
69 }
70
71 static void dac_audio_sync(void)
72 {
73         while (!empty)
74                 schedule();
75 }
76
77 static void dac_audio_start(void)
78 {
79         if (mach_is_hp6xx()) {
80                 u16 v = inw(HD64461_GPADR);
81                 v &= ~HD64461_GPADR_SPEAKER;
82                 outw(v, HD64461_GPADR);
83         }
84
85         sh_dac_enable(CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
86         ctrl_outw(TMU1_TCR_INIT, TMU1_TCR);
87 }
88 static void dac_audio_stop(void)
89 {
90         dac_audio_stop_timer();
91
92         if (mach_is_hp6xx()) {
93                 u16 v = inw(HD64461_GPADR);
94                 v |= HD64461_GPADR_SPEAKER;
95                 outw(v, HD64461_GPADR);
96         }
97
98         sh_dac_output(0, CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
99         sh_dac_disable(CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
100 }
101
102 static void dac_audio_set_rate(void)
103 {
104         unsigned long interval;
105         struct clk *clk;
106
107         clk = clk_get(NULL, "module_clk");
108         interval = (clk_get_rate(clk) / 4) / rate;
109         clk_put(clk);
110         ctrl_outl(interval, TMU1_TCOR);
111         ctrl_outl(interval, TMU1_TCNT);
112 }
113
114 static int dac_audio_ioctl(struct inode *inode, struct file *file,
115                            unsigned int cmd, unsigned long arg)
116 {
117         int val;
118
119         switch (cmd) {
120         case OSS_GETVERSION:
121                 return put_user(SOUND_VERSION, (int *)arg);
122
123         case SNDCTL_DSP_SYNC:
124                 dac_audio_sync();
125                 return 0;
126
127         case SNDCTL_DSP_RESET:
128                 dac_audio_reset();
129                 return 0;
130
131         case SNDCTL_DSP_GETFMTS:
132                 return put_user(AFMT_U8, (int *)arg);
133
134         case SNDCTL_DSP_SETFMT:
135                 return put_user(AFMT_U8, (int *)arg);
136
137         case SNDCTL_DSP_NONBLOCK:
138                 spin_lock(&file->f_lock);
139                 file->f_flags |= O_NONBLOCK;
140                 spin_unlock(&file->f_lock);
141                 return 0;
142
143         case SNDCTL_DSP_GETCAPS:
144                 return 0;
145
146         case SOUND_PCM_WRITE_RATE:
147                 val = *(int *)arg;
148                 if (val > 0) {
149                         rate = val;
150                         dac_audio_set_rate();
151                 }
152                 return put_user(rate, (int *)arg);
153
154         case SNDCTL_DSP_STEREO:
155                 return put_user(0, (int *)arg);
156
157         case SOUND_PCM_WRITE_CHANNELS:
158                 return put_user(1, (int *)arg);
159
160         case SNDCTL_DSP_SETDUPLEX:
161                 return -EINVAL;
162
163         case SNDCTL_DSP_PROFILE:
164                 return -EINVAL;
165
166         case SNDCTL_DSP_GETBLKSIZE:
167                 return put_user(BUFFER_SIZE, (int *)arg);
168
169         case SNDCTL_DSP_SETFRAGMENT:
170                 return 0;
171
172         default:
173                 printk(KERN_ERR "sh_dac_audio: unimplemented ioctl=0x%x\n",
174                        cmd);
175                 return -EINVAL;
176         }
177         return -EINVAL;
178 }
179
180 static ssize_t dac_audio_write(struct file *file, const char *buf, size_t count,
181                                loff_t * ppos)
182 {
183         int free;
184         int nbytes;
185
186         if (count < 0)
187                 return -EINVAL;
188
189         if (!count) {
190                 dac_audio_sync();
191                 return 0;
192         }
193
194         free = buffer_begin - buffer_end;
195
196         if (free < 0)
197                 free += BUFFER_SIZE;
198         if ((free == 0) && (empty))
199                 free = BUFFER_SIZE;
200         if (count > free)
201                 count = free;
202         if (buffer_begin > buffer_end) {
203                 if (copy_from_user((void *)buffer_end, buf, count))
204                         return -EFAULT;
205
206                 buffer_end += count;
207         } else {
208                 nbytes = data_buffer + BUFFER_SIZE - buffer_end;
209                 if (nbytes > count) {
210                         if (copy_from_user((void *)buffer_end, buf, count))
211                                 return -EFAULT;
212                         buffer_end += count;
213                 } else {
214                         if (copy_from_user((void *)buffer_end, buf, nbytes))
215                                 return -EFAULT;
216                         if (copy_from_user
217                             ((void *)data_buffer, buf + nbytes, count - nbytes))
218                                 return -EFAULT;
219                         buffer_end = data_buffer + count - nbytes;
220                 }
221         }
222
223         if (empty) {
224                 empty = 0;
225                 dac_audio_start_timer();
226         }
227
228         return count;
229 }
230
231 static ssize_t dac_audio_read(struct file *file, char *buf, size_t count,
232                               loff_t * ppos)
233 {
234         return -EINVAL;
235 }
236
237 static int dac_audio_open(struct inode *inode, struct file *file)
238 {
239         if (file->f_mode & FMODE_READ)
240                 return -ENODEV;
241         if (in_use)
242                 return -EBUSY;
243
244         in_use = 1;
245
246         dac_audio_start();
247
248         return 0;
249 }
250
251 static int dac_audio_release(struct inode *inode, struct file *file)
252 {
253         dac_audio_sync();
254         dac_audio_stop();
255         in_use = 0;
256
257         return 0;
258 }
259
260 const struct file_operations dac_audio_fops = {
261       .read =           dac_audio_read,
262       .write =  dac_audio_write,
263       .ioctl =  dac_audio_ioctl,
264       .open =           dac_audio_open,
265       .release =        dac_audio_release,
266 };
267
268 static irqreturn_t timer1_interrupt(int irq, void *dev)
269 {
270         unsigned long timer_status;
271
272         timer_status = ctrl_inw(TMU1_TCR);
273         timer_status &= ~0x100;
274         ctrl_outw(timer_status, TMU1_TCR);
275
276         if (!empty) {
277                 sh_dac_output(*buffer_begin, CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
278                 buffer_begin++;
279
280                 if (buffer_begin == data_buffer + BUFFER_SIZE)
281                         buffer_begin = data_buffer;
282                 if (buffer_begin == buffer_end) {
283                         empty = 1;
284                         dac_audio_stop_timer();
285                 }
286         }
287         return IRQ_HANDLED;
288 }
289
290 static int __init dac_audio_init(void)
291 {
292         int retval;
293
294         if ((device_major = register_sound_dsp(&dac_audio_fops, -1)) < 0) {
295                 printk(KERN_ERR "Cannot register dsp device");
296                 return device_major;
297         }
298
299         in_use = 0;
300
301         data_buffer = kmalloc(BUFFER_SIZE, GFP_KERNEL);
302         if (data_buffer == NULL)
303                 return -ENOMEM;
304
305         dac_audio_reset();
306         rate = 8000;
307         dac_audio_set_rate();
308
309         retval =
310             request_irq(TIMER1_IRQ, timer1_interrupt, IRQF_DISABLED, MODNAME, 0);
311         if (retval < 0) {
312                 printk(KERN_ERR "sh_dac_audio: IRQ %d request failed\n",
313                        TIMER1_IRQ);
314                 return retval;
315         }
316
317         return 0;
318 }
319
320 static void __exit dac_audio_exit(void)
321 {
322         free_irq(TIMER1_IRQ, 0);
323
324         unregister_sound_dsp(device_major);
325         kfree((void *)data_buffer);
326 }
327
328 module_init(dac_audio_init);
329 module_exit(dac_audio_exit);
330
331 MODULE_AUTHOR("Andriy Skulysh, askulysh@image.kiev.ua");
332 MODULE_DESCRIPTION("SH DAC sound driver");
333 MODULE_LICENSE("GPL");