5 * Copyright (C) by Hannu Savolainen 1993-1997
7 * OSS/Free for Linux is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
8 * Version 2 (June 1991). See the "COPYING" file distributed with this software
10 * Extended by Alan Cox for Red Hat Software. Now a loadable MIDI driver.
11 * 28/4/97 - (C) Copyright Alan Cox. Released under the GPL version 2.
13 * Alan Cox: Updated for new modular code. Removed snd_* irq handling. Now
14 * uses native linux resources
15 * Christoph Hellwig: Adapted to module_init/module_exit
16 * Jeff Garzik: Made it work again, in theory
17 * FIXME: If the request_irq() succeeds, the probe succeeds. Ug.
19 * Status: Testing required (no shit -jgarzik)
24 #include <linux/init.h>
25 #include <linux/interrupt.h>
26 #include <linux/module.h>
27 #include <linux/spinlock.h>
28 /* Mon Nov 22 22:38:35 MET 1993 marco@driq.home.usn.nl:
29 * added 6850 support, used with COVOX SoundMaster II and custom cards.
32 #include "sound_config.h"
34 static int uart6850_base
= 0x330;
36 static int *uart6850_osp
;
38 #define DATAPORT (uart6850_base)
39 #define COMDPORT (uart6850_base+1)
40 #define STATPORT (uart6850_base+1)
42 static int uart6850_status(void)
47 #define input_avail() (uart6850_status()&INPUT_AVAIL)
48 #define output_ready() (uart6850_status()&OUTPUT_READY)
50 static void uart6850_cmd(unsigned char cmd
)
55 static int uart6850_read(void)
60 static void uart6850_write(unsigned char byte
)
65 #define OUTPUT_READY 0x02 /* Mask for data ready Bit */
66 #define INPUT_AVAIL 0x01 /* Mask for Data Send Ready Bit */
68 #define UART_RESET 0x95
69 #define UART_MODE_ON 0x03
71 static int uart6850_opened
;
72 static int uart6850_irq
;
73 static int uart6850_detected
;
75 static spinlock_t lock
=SPIN_LOCK_UNLOCKED
;
77 static void (*midi_input_intr
) (int dev
, unsigned char data
);
78 static void poll_uart6850(unsigned long dummy
);
81 static struct timer_list uart6850_timer
=
82 TIMER_INITIALIZER(poll_uart6850
, 0, 0);
84 static void uart6850_input_loop(void)
95 unsigned char c
= uart6850_read();
97 if (uart6850_opened
& OPEN_READ
)
98 midi_input_intr(my_dev
, c
);
102 while (!input_avail() && count
)
108 static irqreturn_t
m6850intr(int irq
, void *dev_id
, struct pt_regs
*dummy
)
111 uart6850_input_loop();
116 * It looks like there is no input interrupts in the UART mode. Let's try
120 static void poll_uart6850(unsigned long dummy
)
124 if (!(uart6850_opened
& OPEN_READ
))
125 return; /* Device has been closed */
127 spin_lock_irqsave(&lock
,flags
);
129 uart6850_input_loop();
131 uart6850_timer
.expires
= 1 + jiffies
;
132 add_timer(&uart6850_timer
);
138 spin_unlock_irqrestore(&lock
,flags
);
141 static int uart6850_open(int dev
, int mode
,
142 void (*input
) (int dev
, unsigned char data
),
143 void (*output
) (int dev
)
148 /* printk("Midi6850: Midi busy\n");*/
152 uart6850_cmd(UART_RESET
);
153 uart6850_input_loop();
154 midi_input_intr
= input
;
155 uart6850_opened
= mode
;
157 * Enable input polling
163 static void uart6850_close(int dev
)
165 uart6850_cmd(UART_MODE_ON
);
166 del_timer(&uart6850_timer
);
170 static int uart6850_out(int dev
, unsigned char midi_byte
)
176 * Test for input since pending input seems to block the output.
179 spin_lock_irqsave(&lock
,flags
);
182 uart6850_input_loop();
184 spin_unlock_irqrestore(&lock
,flags
);
187 * Sometimes it takes about 13000 loops before the output becomes ready
188 * (After reset). Normally it takes just about 10 loops.
191 for (timeout
= 30000; timeout
> 0 && !output_ready(); timeout
--); /*
196 printk(KERN_WARNING
"Midi6850: Timeout\n");
199 uart6850_write(midi_byte
);
203 static inline int uart6850_command(int dev
, unsigned char *midi_byte
)
208 static inline int uart6850_start_read(int dev
)
213 static inline int uart6850_end_read(int dev
)
218 static inline void uart6850_kick(int dev
)
222 static inline int uart6850_buffer_status(int dev
)
229 #define MIDI_SYNTH_NAME "6850 UART Midi"
230 #define MIDI_SYNTH_CAPS SYNTH_CAP_INPUT
231 #include "midi_synth.h"
233 static struct midi_operations uart6850_operations
=
235 .owner
= THIS_MODULE
,
236 .info
= {"6850 UART", 0, 0, SNDCARD_UART6850
},
237 .converter
= &std_midi_synth
,
239 .open
= uart6850_open
,
240 .close
= uart6850_close
,
241 .outputc
= uart6850_out
,
242 .start_read
= uart6850_start_read
,
243 .end_read
= uart6850_end_read
,
244 .kick
= uart6850_kick
,
245 .command
= uart6850_command
,
246 .buffer_status
= uart6850_buffer_status
250 static void __init
attach_uart6850(struct address_info
*hw_config
)
255 if (!uart6850_detected
)
258 if ((my_dev
= sound_alloc_mididev()) == -1)
260 printk(KERN_INFO
"uart6850: Too many midi devices detected\n");
263 uart6850_base
= hw_config
->io_base
;
264 uart6850_osp
= hw_config
->osp
;
265 uart6850_irq
= hw_config
->irq
;
267 spin_lock_irqsave(&lock
,flags
);
269 for (timeout
= 30000; timeout
> 0 && !output_ready(); timeout
--); /*
272 uart6850_cmd(UART_MODE_ON
);
274 spin_unlock_irqrestore(&lock
,flags
);
276 conf_printf("6850 Midi Interface", hw_config
);
278 std_midi_synth
.midi_dev
= my_dev
;
279 hw_config
->slots
[4] = my_dev
;
280 midi_devs
[my_dev
] = &uart6850_operations
;
284 static inline int reset_uart6850(void)
292 static int __init
probe_uart6850(struct address_info
*hw_config
)
296 uart6850_osp
= hw_config
->osp
;
297 uart6850_base
= hw_config
->io_base
;
298 uart6850_irq
= hw_config
->irq
;
300 if (request_irq(uart6850_irq
, m6850intr
, 0, "MIDI6850", NULL
) < 0)
303 ok
= reset_uart6850();
304 uart6850_detected
= ok
;
308 static void __exit
unload_uart6850(struct address_info
*hw_config
)
310 free_irq(hw_config
->irq
, NULL
);
311 sound_unload_mididev(hw_config
->slots
[4]);
314 static struct address_info cfg_mpu
;
316 static int __initdata io
= -1;
317 static int __initdata irq
= -1;
320 MODULE_PARM(irq
,"i");
322 static int __init
init_uart6850(void)
324 cfg_mpu
.io_base
= io
;
327 if (cfg_mpu
.io_base
== -1 || cfg_mpu
.irq
== -1) {
328 printk(KERN_INFO
"uart6850: irq and io must be set.\n");
332 if (probe_uart6850(&cfg_mpu
))
334 attach_uart6850(&cfg_mpu
);
339 static void __exit
cleanup_uart6850(void)
341 unload_uart6850(&cfg_mpu
);
344 module_init(init_uart6850
);
345 module_exit(cleanup_uart6850
);
348 static int __init
setup_uart6850(char *str
)
353 str
= get_options(str
, ARRAY_SIZE(ints
), ints
);
360 __setup("uart6850=", setup_uart6850
);
362 MODULE_LICENSE("GPL");