1 /*
2 * Copyright (c) 2003, 2012, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation. Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25
26 #define USE_ERROR
27 #define USE_TRACE
28
29 #if USE_PLATFORM_MIDI_OUT == TRUE
30
31 #include <alsa/asoundlib.h>
32 #include "PlatformMidi.h"
33 #include "PLATFORM_API_BsdOS_ALSA_MidiUtils.h"
34
35
36
37 static int CHANNEL_MESSAGE_LENGTH[] = {
38 -1, -1, -1, -1, -1, -1, -1, -1, 3, 3, 3, 3, 2, 2, 3 };
39 /* 8x 9x Ax Bx Cx Dx Ex */
40
41 static int SYSTEM_MESSAGE_LENGTH[] = {
42 -1, 2, 3, 2, -1, -1, 1, 1, 1, -1, 1, 1, 1, -1, 1, 1 };
43 /* F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 FA FB FC FD FE FF */
44
45
46 // the returned length includes the status byte.
47 // for illegal messages, -1 is returned.
48 static int getShortMessageLength(int status) {
49 int dataLength = 0;
50 if (status < 0xF0) { // channel voice message
51 dataLength = CHANNEL_MESSAGE_LENGTH[(status >> 4) & 0xF];
52 } else {
53 dataLength = SYSTEM_MESSAGE_LENGTH[status & 0xF];
54 }
55 return dataLength;
56 }
57
58
59 /*
60 * implementation of the platform-dependent
61 * MIDI out functions declared in PlatformMidi.h
62 */
63 char* MIDI_OUT_GetErrorStr(INT32 err) {
64 return (char*) getErrorStr(err);
65 }
66
67
68 INT32 MIDI_OUT_GetNumDevices() {
69 TRACE0("MIDI_OUT_GetNumDevices()\n");
70 return getMidiDeviceCount(SND_RAWMIDI_STREAM_OUTPUT);
71 }
72
73
74 INT32 MIDI_OUT_GetDeviceName(INT32 deviceIndex, char *name, UINT32 nameLength) {
75 TRACE0("MIDI_OUT_GetDeviceName()\n");
76 return getMidiDeviceName(SND_RAWMIDI_STREAM_OUTPUT, deviceIndex,
77 name, nameLength);
78 }
79
80
81 INT32 MIDI_OUT_GetDeviceVendor(INT32 deviceIndex, char *name, UINT32 nameLength) {
82 TRACE0("MIDI_OUT_GetDeviceVendor()\n");
83 return getMidiDeviceVendor(deviceIndex, name, nameLength);
84 }
85
86
87 INT32 MIDI_OUT_GetDeviceDescription(INT32 deviceIndex, char *name, UINT32 nameLength) {
88 TRACE0("MIDI_OUT_GetDeviceDescription()\n");
89 return getMidiDeviceDescription(SND_RAWMIDI_STREAM_OUTPUT, deviceIndex,
90 name, nameLength);
91 }
92
93
94 INT32 MIDI_OUT_GetDeviceVersion(INT32 deviceIndex, char *name, UINT32 nameLength) {
95 TRACE0("MIDI_OUT_GetDeviceVersion()\n");
96 return getMidiDeviceVersion(deviceIndex, name, nameLength);
97 }
98
99
100 /* *************************** MidiOutDevice implementation *************** */
101
102 INT32 MIDI_OUT_OpenDevice(INT32 deviceIndex, MidiDeviceHandle** handle) {
103 TRACE1("MIDI_OUT_OpenDevice(): deviceIndex: %d\n", (int) deviceIndex);
104 return openMidiDevice(SND_RAWMIDI_STREAM_OUTPUT, deviceIndex, handle);
105 }
106
107
108 INT32 MIDI_OUT_CloseDevice(MidiDeviceHandle* handle) {
109 TRACE0("MIDI_OUT_CloseDevice()\n");
110 return closeMidiDevice(handle);
111 }
112
113
114 INT64 MIDI_OUT_GetTimeStamp(MidiDeviceHandle* handle) {
115 return getMidiTimestamp(handle);
116 }
117
118
119 INT32 MIDI_OUT_SendShortMessage(MidiDeviceHandle* handle, UINT32 packedMsg,
120 UINT32 timestamp) {
121 int err;
122 int status;
123 int data1;
124 int data2;
125 char buffer[3];
126
127 TRACE2("> MIDI_OUT_SendShortMessage() %x, time: %u\n", packedMsg, (unsigned int) timestamp);
128 if (!handle) {
129 ERROR0("< ERROR: MIDI_OUT_SendShortMessage(): handle is NULL\n");
130 return MIDI_INVALID_HANDLE;
131 }
132 if (!handle->deviceHandle) {
133 ERROR0("< ERROR: MIDI_OUT_SendLongMessage(): native handle is NULL\n");
134 return MIDI_INVALID_HANDLE;
135 }
136 status = (packedMsg & 0xFF);
137 buffer[0] = (char) status;
138 buffer[1] = (char) ((packedMsg >> 8) & 0xFF);
139 buffer[2] = (char) ((packedMsg >> 16) & 0xFF);
140 TRACE4("status: %d, data1: %d, data2: %d, length: %d\n", (int) buffer[0], (int) buffer[1], (int) buffer[2], getShortMessageLength(status));
141 err = snd_rawmidi_write((snd_rawmidi_t*) handle->deviceHandle, buffer, getShortMessageLength(status));
142 if (err < 0) {
143 ERROR1(" ERROR: MIDI_OUT_SendShortMessage(): snd_rawmidi_write() returned %d\n", err);
144 }
145
146 TRACE0("< MIDI_OUT_SendShortMessage()\n");
147 return err;
148 }
149
150
151 INT32 MIDI_OUT_SendLongMessage(MidiDeviceHandle* handle, UBYTE* data,
152 UINT32 size, UINT32 timestamp) {
153 int err;
154
155 TRACE2("> MIDI_OUT_SendLongMessage() size %u, time: %u\n", (unsigned int) size, (unsigned int) timestamp);
156 if (!handle) {
157 ERROR0("< ERROR: MIDI_OUT_SendLongMessage(): handle is NULL\n");
158 return MIDI_INVALID_HANDLE;
159 }
160 if (!handle->deviceHandle) {
161 ERROR0("< ERROR: MIDI_OUT_SendLongMessage(): native handle is NULL\n");
162 return MIDI_INVALID_HANDLE;
163 }
164 if (!data) {
165 ERROR0("< ERROR: MIDI_OUT_SendLongMessage(): data is NULL\n");
166 return MIDI_INVALID_HANDLE;
167 }
168 err = snd_rawmidi_write((snd_rawmidi_t*) handle->deviceHandle,
169 data, size);
170 if (err < 0) {
171 ERROR1(" ERROR: MIDI_OUT_SendLongMessage(): snd_rawmidi_write() returned %d\n", err);
172 }
173
174 TRACE0("< MIDI_OUT_SendLongMessage()\n");
175 return err;
176 }
177
178
179 #endif /* USE_PLATFORM_MIDI_OUT */