Ticket #8540: scummvm-atari-mint.patch

backends/midi/stmidi.cpp

@@ +1 @@
+/* ScummVM - Scumm Interpreter
+ * Copyright (C) 2001  Ludvig Strigeus
+ * Copyright (C) 2001-2006 The ScummVM project
+ *
+ * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ */
+
+/*  
+ * Raw MIDI output for the Atari ST line of computers.
+ * Based on the ScummVM SEQ & CoreMIDI drivers.  
+ * TODO: Get it working!
+ */
+
+#if defined MINT
+
+#include <osbind.h>
+#include "common/stdafx.h"
+#include "sound/mpu401.h"
+#include "common/util.h"
+
+class MidiDriver_STMIDI : public MidiDriver_MPU401 {
+public:
+        MidiDriver_STMIDI() : _isOpen (false) { }
+        int open();
+        void close();
+        void send(uint32 b);
+        void sysEx(const byte *msg, uint16 length);
+
+private:
+        bool _isOpen;
+};
+
+int MidiDriver_STMIDI::open() {
+        if ((_isOpen) && (!Bcostat(4)))
+                return MERR_ALREADY_OPEN;
+        _isOpen = true;
+        return 0;
+}
+
+void MidiDriver_STMIDI::close() {
+        MidiDriver_MPU401::close();
+        _isOpen = false;
+}
+
+void MidiDriver_STMIDI::send(uint32 b) {
+
+        byte status_byte = (b & 0x000000FF);
+        byte first_byte = (b & 0x0000FF00) >> 8;
+        byte second_byte = (b & 0x00FF0000) >> 16;
+
+        warning("ST MIDI Packet sent");
+
+        switch (b & 0xF0) {
+        case 0x80:      // Note Off
+        case 0x90:      // Note On
+        case 0xA0:      // Polyphonic Key Pressure
+        case 0xB0:      // Controller
+        case 0xE0:      // Pitch Bend
+                Bconout(3, status_byte);
+                Bconout(3, first_byte);
+                Bconout(3, second_byte);
+                break;
+        case 0xC0:      // Program Change
+        case 0xD0:      // Aftertouch
+                Bconout(3, status_byte);
+                Bconout(3, first_byte);
+                break;
+        default:
+                fprintf(stderr, "Unknown : %08x\n", (int)b);
+                break;
+        }
+}
+
+void MidiDriver_STMIDI::sysEx (const byte *msg, uint16 length) {
+        if (length > 254) {
+                warning ("Cannot send SysEx block - data too large");
+                return;
+        }
+
+        const byte *chr = msg;
+        warning("Sending SysEx Message");
+
+        Bconout(3, '0xF0');
+        for (; length; --length, ++chr) {
+                Bconout(3,((unsigned char) *chr & 0x7F));
+        }
+        Bconout(3, '0xF7');
+}
+
+MidiDriver *MidiDriver_STMIDI_create() {
+        return new MidiDriver_STMIDI();
+}
+
+#endif

backends/module.mk

@@ -12 +12 @@
         midi/morphos.o \
         midi/quicktime.o \
         midi/seq.o \
+        midi/stmidi.o \
         midi/windows.o
 
 MODULE_DIRS += \

common/hashmap.h

@@ -98 +98 @@
 template <class Key, class Val, class HashFunc = Hash<Key>, class EqualFunc = EqualTo<Key> >
 class HashMap {
 private:
-#if defined (_WIN32_WCE) || defined (_MSC_VER) || defined (__SYMBIAN32__) || defined (PALMOS_MODE)
+#if defined (_WIN32_WCE) || defined (_MSC_VER) || defined (__SYMBIAN32__) || defined (PALMOS_MODE) || defined (MINT)
 //FIXME evc4, msvc6,msvc7 & GCC 2.9x doesn't like it as private member
 public:
 #endif

configure

@@ -810 +810 @@
                 os2-emx*)
                         DEFINES="$DEFINES -DUNIX"
                         ;;
+                mint*)
+                        DEFINES="$DEFINES -DMINT -DUNIX -DSYSTEM_NOT_SUPPORTING_D_TYPE" 
+                        ;;
                 # given this is a shell script assume some type of unix
                 *)
                         echo "WARNING: could not establish system type, assuming unix like"

sound/mididrv.cpp

@@ -45 +45 @@
         {"alsa", "ALSA", MD_ALSA, MDT_MIDI},
 #endif
 
+#if defined(MINT)
+        {"stmidi", "Atari ST MIDI", MD_STMIDI, MDT_MIDI},
+#endif
+
 #if defined(UNIX) && !defined(__BEOS__) && !defined(MACOSX) && !defined(__MAEMO__) 
         {"seq", "SEQ", MD_SEQ, MDT_MIDI},
 #endif
@@ -242 +246 @@
 #endif
 #if defined(__MORPHOS__)
         case MD_ETUDE:     return MidiDriver_ETUDE_create();
+#endif
+#if defined(MINT)
+        case MD_STMIDI:    return MidiDriver_STMIDI_create();
 #endif
 #if defined(UNIX) && !defined(__BEOS__) && !defined(MACOSX) && !defined(__MAEMO__)
         case MD_SEQ:       return MidiDriver_SEQ_create();

sound/mididrv.h

@@ -49 +49 @@
         // Windows
         MD_WINDOWS,
 
+        // Atari ST
+        MD_STMIDI,
+
         // Linux
         MD_ALSA,
         MD_SEQ,
@@ -238 +241 @@
 extern MidiDriver *MidiDriver_NULL_create();
 extern MidiDriver *MidiDriver_ADLIB_create(Audio::Mixer *mixer);
 extern MidiDriver *MidiDriver_WIN_create();
+extern MidiDriver *MidiDriver_STMIDI_create();
 extern MidiDriver *MidiDriver_SEQ_create();
 extern MidiDriver *MidiDriver_QT_create();
 extern MidiDriver *MidiDriver_CORE_create();