[linux-2.6-block.git] / sound / oss / sh_dac_audio.c

#include <linux/module.h>
#include <linux/init.h>
#include <linux/sched.h>
#include <linux/linkage.h>
#include <linux/slab.h>
#include <linux/fs.h>
#include <linux/sound.h>
#include <linux/soundcard.h>
#include <linux/interrupt.h>
#include <asm/io.h>
#include <asm/uaccess.h>
#include <asm/irq.h>
#include <asm/delay.h>
#include <asm/cpu/dac.h>
#include <asm/machvec.h>
#include <asm/hp6xx/hp6xx.h>
#include <asm/hd64461/hd64461.h>

#define MODNAME "sh_dac_audio"

#define TMU_TOCR_INIT	0x00

#define TMU1_TCR_INIT	0x0020	/* Clock/4, rising edge; interrupt on */
#define TMU1_TSTR_INIT  0x02	/* Bit to turn on TMU1 */

#define TMU_TSTR	0xfffffe92
#define TMU1_TCOR	0xfffffea0
#define TMU1_TCNT	0xfffffea4
#define TMU1_TCR	0xfffffea8

#define BUFFER_SIZE 48000

static int rate;
static int empty;
static char *data_buffer, *buffer_begin, *buffer_end;
static int in_use, device_major;

static void dac_audio_start_timer(void)
{
	u8 tstr;

	tstr = ctrl_inb(TMU_TSTR);
	tstr |= TMU1_TSTR_INIT;
	ctrl_outb(tstr, TMU_TSTR);
}

static void dac_audio_stop_timer(void)
{
	u8 tstr;

	tstr = ctrl_inb(TMU_TSTR);
	tstr &= ~TMU1_TSTR_INIT;
	ctrl_outb(tstr, TMU_TSTR);
}

static void dac_audio_reset(void)
{
	dac_audio_stop_timer();
	buffer_begin = buffer_end = data_buffer;
	empty = 1;
}

static void dac_audio_sync(void)
{
	while (!empty)
		schedule();
}

static void dac_audio_start(void)
{
	if (mach_is_hp6xx()) {
		u16 v = inw(HD64461_GPADR);
		v &= ~HD64461_GPADR_SPEAKER;
		outw(v, HD64461_GPADR);
	}

	sh_dac_enable(CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
	ctrl_outw(TMU1_TCR_INIT, TMU1_TCR);
}
static void dac_audio_stop(void)
{
	dac_audio_stop_timer();

	if (mach_is_hp6xx()) {
		u16 v = inw(HD64461_GPADR);
		v |= HD64461_GPADR_SPEAKER;
		outw(v, HD64461_GPADR);
	}

	sh_dac_disable(CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
}

static void dac_audio_set_rate(void)
{
	unsigned long interval;

	interval = (current_cpu_data.module_clock / 4) / rate;
	ctrl_outl(interval, TMU1_TCOR);
	ctrl_outl(interval, TMU1_TCNT);
}

static int dac_audio_ioctl(struct inode *inode, struct file *file,
			   unsigned int cmd, unsigned long arg)
{
	int val;

	switch (cmd) {
	case OSS_GETVERSION:
		return put_user(SOUND_VERSION, (int *)arg);

	case SNDCTL_DSP_SYNC:
		dac_audio_sync();
		return 0;

	case SNDCTL_DSP_RESET:
		dac_audio_reset();
		return 0;

	case SNDCTL_DSP_GETFMTS:
		return put_user(AFMT_U8, (int *)arg);

	case SNDCTL_DSP_SETFMT:
		return put_user(AFMT_U8, (int *)arg);

	case SNDCTL_DSP_NONBLOCK:
		file->f_flags |= O_NONBLOCK;
		return 0;

	case SNDCTL_DSP_GETCAPS:
		return 0;

	case SOUND_PCM_WRITE_RATE:
		val = *(int *)arg;
		if (val > 0) {
			rate = val;
			dac_audio_set_rate();
		}
		return put_user(rate, (int *)arg);

	case SNDCTL_DSP_STEREO:
		return put_user(0, (int *)arg);

	case SOUND_PCM_WRITE_CHANNELS:
		return put_user(1, (int *)arg);

	case SNDCTL_DSP_SETDUPLEX:
		return -EINVAL;

	case SNDCTL_DSP_PROFILE:
		return -EINVAL;

	case SNDCTL_DSP_GETBLKSIZE:
		return put_user(BUFFER_SIZE, (int *)arg);

	case SNDCTL_DSP_SETFRAGMENT:
		return 0;

	default:
		printk(KERN_ERR "sh_dac_audio: unimplemented ioctl=0x%x\n",
		       cmd);
		return -EINVAL;
	}
	return -EINVAL;
}

static ssize_t dac_audio_write(struct file *file, const char *buf, size_t count,
			       loff_t * ppos)
{
	int free;
	int nbytes;

	if (count < 0)
		return -EINVAL;

	if (!count) {
		dac_audio_sync();
		return 0;
	}

	free = buffer_begin - buffer_end;

	if (free < 0)
		free += BUFFER_SIZE;
	if ((free == 0) && (empty))
		free = BUFFER_SIZE;
	if (count > free)
		count = free;
	if (buffer_begin > buffer_end) {
		if (copy_from_user((void *)buffer_end, buf, count))
			return -EFAULT;

		buffer_end += count;
	} else {
		nbytes = data_buffer + BUFFER_SIZE - buffer_end;
		if (nbytes > count) {
			if (copy_from_user((void *)buffer_end, buf, count))
				return -EFAULT;
			buffer_end += count;
		} else {
			if (copy_from_user((void *)buffer_end, buf, nbytes))
				return -EFAULT;
			if (copy_from_user
			    ((void *)data_buffer, buf + nbytes, count - nbytes))
				return -EFAULT;
			buffer_end = data_buffer + count - nbytes;
		}
	}

	if (empty) {
		empty = 0;
		dac_audio_start_timer();
	}

	return count;
}

static ssize_t dac_audio_read(struct file *file, char *buf, size_t count,
			      loff_t * ppos)
{
	return -EINVAL;
}

static int dac_audio_open(struct inode *inode, struct file *file)
{
	if (file->f_mode & FMODE_READ)
		return -ENODEV;
	if (in_use)
		return -EBUSY;

	in_use = 1;

	dac_audio_start();

	return 0;
}

static int dac_audio_release(struct inode *inode, struct file *file)
{
	dac_audio_sync();
	dac_audio_stop();
	in_use = 0;

	return 0;
}

struct file_operations dac_audio_fops = {
      .read =		dac_audio_read,
      .write =	dac_audio_write,
      .ioctl =	dac_audio_ioctl,
      .open =		dac_audio_open,
      .release =	dac_audio_release,
};

static irqreturn_t timer1_interrupt(int irq, void *dev, struct pt_regs *regs)
{
	unsigned long timer_status;

	timer_status = ctrl_inw(TMU1_TCR);
	timer_status &= ~0x100;
	ctrl_outw(timer_status, TMU1_TCR);

	if (!empty) {
		sh_dac_output(*buffer_begin, CONFIG_SOUND_SH_DAC_AUDIO_CHANNEL);
		buffer_begin++;

		if (buffer_begin == data_buffer + BUFFER_SIZE)
			buffer_begin = data_buffer;
		if (buffer_begin == buffer_end) {
			empty = 1;
			dac_audio_stop_timer();
		}
	}
	return IRQ_HANDLED;
}

static int __init dac_audio_init(void)
{
	int retval;

	if ((device_major = register_sound_dsp(&dac_audio_fops, -1)) < 0) {
		printk(KERN_ERR "Cannot register dsp device");
		return device_major;
	}

	in_use = 0;

	data_buffer = kmalloc(BUFFER_SIZE, GFP_KERNEL);
	if (data_buffer == NULL)
		return -ENOMEM;

	dac_audio_reset();
	rate = 8000;
	dac_audio_set_rate();

	retval =
	    request_irq(TIMER1_IRQ, timer1_interrupt, IRQF_DISABLED, MODNAME, 0);
	if (retval < 0) {
		printk(KERN_ERR "sh_dac_audio: IRQ %d request failed\n",
		       TIMER1_IRQ);
		return retval;
	}

	return 0;
}

static void __exit dac_audio_exit(void)
{
	free_irq(TIMER1_IRQ, 0);

	unregister_sound_dsp(device_major);
	kfree((void *)data_buffer);
}

module_init(dac_audio_init);
module_exit(dac_audio_exit);

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