1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
|
// An implementation of the MIDI Capability Inquiry v1.2 Specification, over a MIDI 1.0 transport,
// with only Property Exchange support.
// Intended to be read alongside the corresponding specs; specifically in the order:
// - MIDI CI Specification, minimum requirements + Property Exchange chapter,
// - Common Rules for MIDI CI Property Exchange.
#include "base_midi.h"
uint32_t our_muid = rand(); // TODO: think.
#define MIDI_CI_SUBID 0x0d
#define PROFILE_CONFIGURATION_MASK 0x20
#define PROPERTY_EXCHANGE_MASK 0x30
#define PROCESS_INQUIRY_MASK 0x40
#define MANAGEMENT_MASK 0x70
#define MIDI_CI_VERSION 0x02
#define TO_FUNCTION_BLOCK_ID 0x7f
static void ci(uint8_t source_target, uint8_t message_type, uint32_t destination_miud,
uint8_t *contents, uint8_t contents_len) {
uint8_t *new = malloc(1 + 4 + 4 + contents_len);
new[0] = MIDI_CI_VERSION;
new[1] = our_muid & 0x00'00'00'ff;
new[2] = (our_muid >> 8) & 0x00'00'00'ff;
new[3] = (our_muid >> 16) & 0x00'00'00'ff;
new[4] = (our_muid >> 24) & 0x00'00'00'ff;
new[8] = target_muid & 0x00'00'00'ff;
new[7] = (target_muid >> 8) & 0x00'00'00'ff;
new[6] = (target_muid >> 16) & 0x00'00'00'ff;
new[5] = (target_muid >> 24) & 0x00'00'00'ff;
memcpy(new + 9, contents, contents_len);
universal_nonrealtime(source_target, (MIDI_CI_SUBID << 8) | message_type, contents, 1 + 4 + 4 + contents_len);
free(new);
}
#define DISCOVERY_SUBID (MANAGEMENT_MASK | 0x00)
#define CI_CATEGORY_SUPPORTED 0b00011100
#define MAX_SYSEX_SIZE 512
#define BROADCAST_MUID 0x7f'7f'7f'7f
#define SINGLE_OUTPUT_PATH 0x00
void discovery() {
uint8_t *new = malloc(3 + 2 + 2 + 4 + 1 + 4 + 1);
#if (DEVICE_MANUFACTURER <= MAX_DATA_BYTE)
new[0] = DEVICE_MANUFACTURER;
new[1] = 0;
new[2] = 0;
#else
new[0] = 0;
new[1] = DEVICE_MANUFACTURER >> 8;
new[2] = DEVICE_MANUFACTURER & 0x00ff;
#endif
new[3] = DEVICE_FAMILY & 0x00ff;
new[4] = DEVICE_FAMILY >> 8;
new[5] = DEVICE_MODEL & 0x00ff;
new[6] = DEVICE_MODEL >> 8;
new[7] = SOFTWARE_REVISION & 0x00'00'00'ff;
new[8] = (SOFTWARE_REVISION >> 8) & 0x00'00'00'ff;
new[9] = (SOFTWARE_REVISION >> 16) & 0x00'00'00'ff;
new[10] = (SOFTWARE_REVISION >> 24) & 0x00'00'00'ff;
new[11] = CI_CATEGORY_SUPPORTED;
new[12] = MAX_SYSEX_SIZE & 0x00'00'00'ff;
new[13] = (MAX_SYSEX_SIZE >> 8) & 0x00'00'00'ff;
new[14] = (MAX_SYSEX_SIZE >> 16) & 0x00'00'00'ff;
new[15] = (MAX_SYSEX_SIZE >> 24) & 0x00'00'00'ff;
new[16] = SINGLE_OUTPUT_PATH;
ci(TO_FUNCTION_BLOCK_ID, DISCOVERY_SUBID, BROADCAST_MUID, new, 17);
free(new);
}
#define REPLY_TO_DISCOVERY_SUBID 0x71
#define NO_FUNCTION_BLOCK 0x7f
void discovery_reply(uint8_t initiator_muid, uint8_t initiator_output_path_id) {
uint8_t *new = malloc(3 + 2 + 2 + 4 + 1 + 4 + 1 + 1);
#if (DEVICE_MANUFACTURER <= MAX_DATA_BYTE)
new[0] = DEVICE_MANUFACTURER;
new[1] = 0;
new[2] = 0;
#else
new[0] = 0;
new[1] = DEVICE_MANUFACTURER >> 8;
new[2] = DEVICE_MANUFACTURER & 0x00ff;
#endif
new[3] = DEVICE_FAMILY & 0x00ff;
new[4] = DEVICE_FAMILY >> 8;
new[5] = DEVICE_MODEL & 0x00ff;
new[6] = DEVICE_MODEL >> 8;
new[7] = SOFTWARE_REVISION & 0x00'00'00'ff;
new[8] = (SOFTWARE_REVISION >> 8) & 0x00'00'00'ff;
new[9] = (SOFTWARE_REVISION >> 16) & 0x00'00'00'ff;
new[10] = (SOFTWARE_REVISION >> 24) & 0x00'00'00'ff;
new[11] = CI_CATEGORY_SUPPORTED;
new[12] = MAX_SYSEX_SIZE & 0x00'00'00'ff;
new[13] = (MAX_SYSEX_SIZE >> 8) & 0x00'00'00'ff;
new[14] = (MAX_SYSEX_SIZE >> 16) & 0x00'00'00'ff;
new[15] = (MAX_SYSEX_SIZE >> 24) & 0x00'00'00'ff;
new[16] = initiator_output_path_id;
new[17] = NO_FUNCTION_BLOCK;
ci(TO_FUNCTION_BLOCK_ID, REPLY_TO_DISCOVERY_SUBID, initiator_muid, new, 18);
free(new);
}
// TODO: Decide if Inquiry: Endpoint and Reply to Endpoint are necessary for standard conformace if we're over MIDI 1.0.
// TODO: should we set a new MUID inside this function?
#define INVALIDATE_MUID_SUBID 0x7e
void invalidate_muid() {
uint8_t *new = malloc(4);
new[0] = our_muid & 0x00'00'00'ff;
new[1] = (our_muid >> 8) & 0x00'00'00'ff;
new[2] = (our_muid >> 16) & 0x00'00'00'ff;
new[3] = (our_muid >> 24) & 0x00'00'00'ff;
ci(TO_FUNCTION_BLOCK_ID, BROADCAST_MUID, new, 4);
free(new);
}
// TODO: consider structifying?
#define ACK_SUBID 0x7d
void ci_ack(uint8_t acking_device_id, uint8_t acking_muid, uint8_t original_classification, uint8_t status_code,
uint8_t status_data,
uint8_t details1, uint8_t details2, uint8_t details3, uint8_t details4, uint8_t details5,
uint16_t length, uint8_t *text) {
uint8_t *new = malloc(1 + 1 + 1 + 5 + 2 + length);
new[0] = original_classification;
new[1] = status_code;
new[2] = status_data;
new[3] = details1;
new[4] = details2;
new[5] = details3;
new[6] = details4;
new[7] = details5;
new[8] = length & 0x00ff;
new[9] = length >> 8;
memcpy(new + 10, text, length);
ci(acking_device_id, ACK_SUBID, acking_muid, new, 1 + 1 + 1 + 5 + 2 + length);
free(new);
}
#define NAK_SUBID 0x7f
void ci_nack(uint8_t naking_device_id, uint8_t naking_muid, uint8_t original_classification, uint8_t status_code,
uint8_t status_data,
uint8_t details1, uint8_t details2, uint8_t details3, uint8_t details4, uint8_t details5,
uint16_t length, uint8_t *text) {
uint8_t *new = malloc(1 + 1 + 1 + 5 + 2 + length);
new[0] = original_classification;
new[1] = status_code;
new[2] = status_data;
new[3] = details1;
new[4] = details2;
new[5] = details3;
new[6] = details4;
new[7] = details5;
new[8] = length & 0x00ff;
new[9] = length >> 8;
memcpy(new + 10, text, length);
ci(naking_device_id, NAK_SUBID, naking_muid, new, 1 + 1 + 1 + 5 + 2 + length);
free(new);
}
|
