1 files changed, 229 insertions, 0 deletions

diff --git a/sound/oss/emu10k1/cardmo.c b/sound/oss/emu10k1/cardmo.c
new file mode 100644
index 000000000000..5938d31f9e21
--- /dev/null
+++ b/sound/oss/emu10k1/cardmo.c
@@ -0,0 +1,229 @@
+/*     
+ **********************************************************************
+ *     cardmo.c - MIDI UART output HAL for emu10k1 driver 
+ *     Copyright 1999, 2000 Creative Labs, Inc. 
+ * 
+ ********************************************************************** 
+ * 
+ *     Date                 Author          Summary of changes 
+ *     ----                 ------          ------------------ 
+ *     October 20, 1999     Bertrand Lee    base code release 
+ *     November 2, 1999     Alan Cox        cleaned up
+ * 
+ ********************************************************************** 
+ * 
+ *     This program is free software; you can redistribute it and/or 
+ *     modify it under the terms of the GNU General Public License as 
+ *     published by the Free Software Foundation; either version 2 of 
+ *     the License, or (at your option) any later version. 
+ * 
+ *     This program is distributed in the hope that it will be useful, 
+ *     but WITHOUT ANY WARRANTY; without even the implied warranty of 
+ *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the 
+ *     GNU General Public License for more details. 
+ * 
+ *     You should have received a copy of the GNU General Public 
+ *     License along with this program; if not, write to the Free 
+ *     Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, 
+ *     USA. 
+ * 
+ ********************************************************************** 
+ */
+
+#include <linux/slab.h>
+
+#include "hwaccess.h"
+#include "8010.h"
+#include "cardmo.h"
+#include "irqmgr.h"
+
+/* Installs the IRQ handler for the MPU out port               *
+ * and initialize parameters                                    */
+
+int emu10k1_mpuout_open(struct emu10k1_card *card, struct midi_openinfo *openinfo)
+{
+        struct emu10k1_mpuout *card_mpuout = card->mpuout;
+
+        DPF(2, "emu10k1_mpuout_open()\n");
+
+        if (!(card_mpuout->status & FLAGS_AVAILABLE))
+                return -1;
+
+        /* Copy open info and mark channel as in use */
+        card_mpuout->intr = 0;
+        card_mpuout->openinfo = *openinfo;
+        card_mpuout->status &= ~FLAGS_AVAILABLE;
+        card_mpuout->laststatus = 0x80;
+        card_mpuout->firstmidiq = NULL;
+        card_mpuout->lastmidiq = NULL;
+
+        emu10k1_mpu_reset(card);
+        emu10k1_mpu_acquire(card);
+
+        return 0;
+}
+
+int emu10k1_mpuout_close(struct emu10k1_card *card)
+{
+        struct emu10k1_mpuout *card_mpuout = card->mpuout;
+        struct midi_queue *midiq;
+        struct midi_hdr *midihdr;
+        unsigned long flags;
+
+        DPF(2, "emu10k1_mpuout_close()\n");
+
+        emu10k1_irq_disable(card, card->is_audigy ? A_INTE_MIDITXENABLE : INTE_MIDITXENABLE);
+
+        spin_lock_irqsave(&card_mpuout->lock, flags);
+
+        while (card_mpuout->firstmidiq != NULL) {
+                midiq = card_mpuout->firstmidiq;
+                midihdr = (struct midi_hdr *) midiq->refdata;
+
+                card_mpuout->firstmidiq = midiq->next;
+
+                kfree(midihdr->data);
+                kfree(midihdr);
+                kfree(midiq);
+        }
+
+        card_mpuout->lastmidiq = NULL;
+
+        emu10k1_mpu_release(card);
+
+        card_mpuout->status |= FLAGS_AVAILABLE;
+
+        spin_unlock_irqrestore(&card_mpuout->lock, flags);
+
+        return 0;
+}
+
+/* If there isn't enough buffer space, reject Midi Buffer.     *
+* Otherwise, disable TX, create object to hold Midi            *
+*  uffer, update buffer flags and other parameters             *
+* before enabling TX again.                                    */
+
+int emu10k1_mpuout_add_buffer(struct emu10k1_card *card, struct midi_hdr *midihdr)
+{
+        struct emu10k1_mpuout *card_mpuout = card->mpuout;
+        struct midi_queue *midiq;
+        unsigned long flags;
+
+        DPF(2, "emu10k1_mpuout_add_buffer()\n");
+
+        if (card_mpuout->state == CARDMIDIOUT_STATE_SUSPEND)
+                return 0;
+
+        midihdr->flags |= MIDIBUF_INQUEUE;
+        midihdr->flags &= ~MIDIBUF_DONE;
+
+        if ((midiq = (struct midi_queue *) kmalloc(sizeof(struct midi_queue), GFP_KERNEL)) == NULL) {
+                /* Message lost */
+                return -1;
+        }
+
+        midiq->next = NULL;
+        midiq->qtype = 1;
+        midiq->length = midihdr->bufferlength;
+        midiq->sizeLeft = midihdr->bufferlength;
+        midiq->midibyte = midihdr->data;
+
+        midiq->refdata = (unsigned long) midihdr;
+
+        spin_lock_irqsave(&card_mpuout->lock, flags);
+
+        if (card_mpuout->firstmidiq == NULL) {
+                card_mpuout->firstmidiq = midiq;
+                card_mpuout->lastmidiq = midiq;
+        } else {
+                (card_mpuout->lastmidiq)->next = midiq;
+                card_mpuout->lastmidiq = midiq;
+        }
+
+        card_mpuout->intr = 0;
+
+        emu10k1_irq_enable(card, card->is_audigy ? A_INTE_MIDITXENABLE : INTE_MIDITXENABLE);
+
+        spin_unlock_irqrestore(&card_mpuout->lock, flags);
+
+        return 0;
+}
+
+void emu10k1_mpuout_bh(unsigned long refdata)
+{
+        struct emu10k1_card *card = (struct emu10k1_card *) refdata;
+        struct emu10k1_mpuout *card_mpuout = card->mpuout;
+        int cByteSent = 0;
+        struct midi_queue *midiq;
+        struct midi_queue *doneq = NULL;
+        unsigned long flags;
+
+        spin_lock_irqsave(&card_mpuout->lock, flags);
+
+        while (card_mpuout->firstmidiq != NULL) {
+                midiq = card_mpuout->firstmidiq;
+
+                while (cByteSent < 4 && midiq->sizeLeft) {
+                        if (emu10k1_mpu_write_data(card, *midiq->midibyte) < 0) {
+                                DPF(2, "emu10k1_mpuoutDpcCallback error!!\n");
+                        } else {
+                                ++cByteSent;
+                                --midiq->sizeLeft;
+                                ++midiq->midibyte;
+                        }
+                }
+
+                if (midiq->sizeLeft == 0) {
+                        if (doneq == NULL)
+                                doneq = midiq;
+                        card_mpuout->firstmidiq = midiq->next;
+                } else
+                        break;
+        }
+
+        if (card_mpuout->firstmidiq == NULL)
+                card_mpuout->lastmidiq = NULL;
+
+        if (doneq != NULL) {
+                while (doneq != card_mpuout->firstmidiq) {
+                        unsigned long callback_msg[3];
+
+                        midiq = doneq;
+                        doneq = midiq->next;
+
+                        if (midiq->qtype) {
+                                callback_msg[0] = 0;
+                                callback_msg[1] = midiq->length;
+                                callback_msg[2] = midiq->refdata;
+
+                                emu10k1_midi_callback(ICARDMIDI_OUTLONGDATA, card_mpuout->openinfo.refdata, callback_msg);
+                        } else if (((u8) midiq->refdata) < 0xF0 && ((u8) midiq->refdata) > 0x7F)
+                                card_mpuout->laststatus = (u8) midiq->refdata;
+
+                        kfree(midiq);
+                }
+        }
+
+        if ((card_mpuout->firstmidiq != NULL) || cByteSent) {
+                card_mpuout->intr = 0;
+                emu10k1_irq_enable(card, card->is_audigy ? A_INTE_MIDITXENABLE : INTE_MIDITXENABLE);
+        }
+
+        spin_unlock_irqrestore(&card_mpuout->lock, flags);
+
+        return;
+}
+
+int emu10k1_mpuout_irqhandler(struct emu10k1_card *card)
+{
+        struct emu10k1_mpuout *card_mpuout = card->mpuout;
+
+        DPF(4, "emu10k1_mpuout_irqhandler\n");
+
+        card_mpuout->intr = 1;
+        emu10k1_irq_disable(card, card->is_audigy ? A_INTE_MIDITXENABLE : INTE_MIDITXENABLE);
+
+        tasklet_hi_schedule(&card_mpuout->tasklet);
+
+        return 0;
+}