summaryrefslogtreecommitdiffstats
path: root/sys/i386/isa/sound/uart6850.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/i386/isa/sound/uart6850.c')
-rw-r--r--sys/i386/isa/sound/uart6850.c296
1 files changed, 0 insertions, 296 deletions
diff --git a/sys/i386/isa/sound/uart6850.c b/sys/i386/isa/sound/uart6850.c
deleted file mode 100644
index e978fc7..0000000
--- a/sys/i386/isa/sound/uart6850.c
+++ /dev/null
@@ -1,296 +0,0 @@
-/*
- * sound/uart6850.c
- *
- * Copyright by Hannu Savolainen 1993
- *
- * Mon Nov 22 22:38:35 MET 1993 marco@driq.home.usn.nl: added 6850 support, used
- * with COVOX SoundMaster II and custom cards.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions are
- * met: 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer. 2.
- * Redistributions in binary form must reproduce the above copyright notice,
- * this list of conditions and the following disclaimer in the documentation
- * and/or other materials provided with the distribution.
- *
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY
- * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
- * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
- * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
- * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- */
-
-#include <i386/isa/sound/sound_config.h>
-
-#if NSND > 0
-
-#if 1
-/* #if defined(CONFIG_UART6850) && defined(CONFIG_MIDI) */
-
-#define DATAPORT (uart6850_base) /* * * Midi6850 Data I/O Port on IBM */
-#define COMDPORT (uart6850_base+1) /* * * Midi6850 Command Port on IBM */
-#define STATPORT (uart6850_base+1) /* * * Midi6850 Status Port on IBM */
-
-#define uart6850_status() inb( STATPORT)
-#define input_avail() (uart6850_status()&INPUT_AVAIL)
-#define output_ready() (uart6850_status()&OUTPUT_READY)
-#define uart6850_cmd(cmd) outb( COMDPORT, cmd)
-#define uart6850_read() inb( DATAPORT)
-#define uart6850_write(byte) outb( DATAPORT, byte)
-
-#define OUTPUT_READY 0x02 /* * * Mask for Data Read Ready Bit */
-#define INPUT_AVAIL 0x01 /* * * Mask for Data Send Ready Bit */
-
-#define UART_RESET 0x95 /* * * 6850 Total Reset Command */
-#define UART_MODE_ON 0x03 /* * * 6850 Send/Receive UART Mode */
-
-static int uart6850_opened = 0;
-static int uart6850_base = 0x330;
-static int uart6850_irq;
-static int uart6850_detected = 0;
-static int my_dev;
-
-static int reset_uart6850(void);
-static void (*midi_input_intr) (int dev, u_char data);
-static void poll_uart6850(void *dummy);
-
-
-static sound_os_info *uart6850_osp;
-
-static void
-uart6850_input_loop(void)
-{
- int count;
-
- count = 10;
-
- while (count) /* Not timed out */
- if (input_avail()) {
- u_char c = uart6850_read();
-
- count = 100;
-
- if (uart6850_opened & OPEN_READ)
- midi_input_intr(my_dev, c);
- } else
- while (!input_avail() && count)
- count--;
-}
-
-void
-m6850intr(int irq)
-{
- if (input_avail())
- uart6850_input_loop();
-}
-
-/*
- * It looks like there is no input interrupts in the UART mode. Let's try
- * polling.
- */
-
-static void
-poll_uart6850(void * dummy)
-{
- u_long flags;
-
- if (!(uart6850_opened & OPEN_READ))
- return; /* Device has been closed */
-
- flags = splhigh();
-
- if (input_avail())
- uart6850_input_loop();
-
-
- timeout( poll_uart6850, 0, 1); /* Come back later */
-
- splx(flags);
-}
-
-static int
-uart6850_open(int dev, int mode,
- void (*input) (int dev, u_char data),
- void (*output) (int dev)
-)
-{
- if (uart6850_opened) {
- printf("Midi6850: Midi busy\n");
- return -(EBUSY);
- }
- uart6850_cmd(UART_RESET);
-
- uart6850_input_loop();
-
- midi_input_intr = input;
- uart6850_opened = mode;
- poll_uart6850(0); /* Enable input polling */
-
- return 0;
-}
-
-static void
-uart6850_close(int dev)
-{
- uart6850_cmd(UART_MODE_ON);
-
- uart6850_opened = 0;
-}
-
-static int
-uart6850_out(int dev, u_char midi_byte)
-{
- int timeout;
- u_long flags;
-
- /*
- * Test for input since pending input seems to block the output.
- */
-
- flags = splhigh();
-
- if (input_avail())
- uart6850_input_loop();
-
- splx(flags);
-
- /*
- * Sometimes it takes about 13000 loops before the output becomes
- * ready (After reset). Normally it takes just about 10 loops.
- */
-
- for (timeout = 30000; timeout > 0 && !output_ready(); timeout--); /* Wait */
-
- if (!output_ready()) {
- printf("Midi6850: Timeout\n");
- return 0;
- }
- uart6850_write(midi_byte);
- return 1;
-}
-
-static int
-uart6850_command(int dev, u_char *midi_byte)
-{
- return 1;
-}
-
-static int
-uart6850_start_read(int dev)
-{
- return 0;
-}
-
-static int
-uart6850_end_read(int dev)
-{
- return 0;
-}
-
-static int
-uart6850_ioctl(int dev, u_int cmd, ioctl_arg arg)
-{
- return -(EINVAL);
-}
-
-static void
-uart6850_kick(int dev)
-{
-}
-
-static int
-uart6850_buffer_status(int dev)
-{
- return 0; /* No data in buffers */
-}
-
-#define MIDI_SYNTH_NAME "6850 UART Midi"
-#define MIDI_SYNTH_CAPS SYNTH_CAP_INPUT
-#include <i386/isa/sound/midi_synth.h>
-
-static struct midi_operations uart6850_operations =
-{
- {"6850 UART", 0, 0, SNDCARD_UART6850},
- &std_midi_synth,
- {0},
- uart6850_open,
- uart6850_close,
- uart6850_ioctl,
- uart6850_out,
- uart6850_start_read,
- uart6850_end_read,
- uart6850_kick,
- uart6850_command,
- uart6850_buffer_status
-};
-
-
-void
-attach_uart6850(struct address_info * hw_config)
-{
- int ok, timeout;
- u_long flags;
-
- if (num_midis >= MAX_MIDI_DEV) {
- printf("Sound: Too many midi devices detected\n");
- return ;
- }
- uart6850_base = hw_config->io_base;
- uart6850_osp = hw_config->osp;
- uart6850_irq = hw_config->irq;
-
- if (!uart6850_detected)
- return ;
-
- flags = splhigh();
-
- for (timeout = 30000; timeout < 0 && !output_ready(); timeout--); /* Wait */
- uart6850_cmd(UART_MODE_ON);
-
- ok = 1;
-
- splx(flags);
-
- conf_printf("6850 Midi Interface", hw_config);
-
- std_midi_synth.midi_dev = my_dev = num_midis;
- midi_devs[num_midis++] = &uart6850_operations;
- return ;
-}
-
-static int
-reset_uart6850(void)
-{
- uart6850_read();
- return 1; /* OK */
-}
-
-
-int
-probe_uart6850(struct address_info * hw_config)
-{
- int ok = 0;
-
- uart6850_osp = hw_config->osp;
- uart6850_base = hw_config->io_base;
- uart6850_irq = hw_config->irq;
-
- if (snd_set_irq_handler(uart6850_irq, m6850intr, uart6850_osp) < 0)
- return 0;
-
- ok = reset_uart6850();
-
- uart6850_detected = ok;
- return ok;
-}
-
-#endif
-#endif
OpenPOWER on IntegriCloud