Commit 737460900d9c798183bc786316dff6a6e5adf786
1 parent
a8f4b0eb
midi vivian
Showing
2 changed files
with
521 additions
and
0 deletions
Show diff stats
@@ -0,0 +1,83 @@ | @@ -0,0 +1,83 @@ | ||
1 | +#include <stdio.h> | ||
2 | +#include <stdlib.h> | ||
3 | +#include <stdarg.h> | ||
4 | +#include <string.h> | ||
5 | +#include <signal.h> | ||
6 | +#include <getopt.h> | ||
7 | +#include <sys/poll.h> | ||
8 | +#include <alsa/asoundlib.h> | ||
9 | + | ||
10 | + | ||
11 | + | ||
12 | +#define NUM_PORT 24 | ||
13 | + | ||
14 | +static snd_seq_t *seq; | ||
15 | + | ||
16 | +static void init_seq(void) | ||
17 | +{ | ||
18 | + int err; | ||
19 | + | ||
20 | + /* open sequencer */ | ||
21 | + err = snd_seq_open(&seq, "default", SND_SEQ_OPEN_DUPLEX, 0); | ||
22 | + if (err<0) printf("open sequencer"); | ||
23 | + | ||
24 | + /* set our client's name */ | ||
25 | + err = snd_seq_set_client_name(seq, "analyseurmidi"); | ||
26 | + if (err<0) printf("set client name"); | ||
27 | +} | ||
28 | + | ||
29 | +static void create_port(void) | ||
30 | +{ | ||
31 | + int err; | ||
32 | + | ||
33 | + err = snd_seq_create_simple_port(seq, "analyseurmidi", | ||
34 | + SND_SEQ_PORT_CAP_WRITE | | ||
35 | + SND_SEQ_PORT_CAP_SUBS_WRITE, | ||
36 | + SND_SEQ_PORT_TYPE_MIDI_GENERIC | | ||
37 | + SND_SEQ_PORT_TYPE_APPLICATION); | ||
38 | + if (err<0) | ||
39 | + printf("Port non créé \n"); | ||
40 | +} | ||
41 | + | ||
42 | +static void connect_port(void) | ||
43 | +{ | ||
44 | + int err; | ||
45 | + err = snd_seq_connect_from(seq, 0, NUM_PORT, 0); | ||
46 | + if (err < 0) | ||
47 | + printf("Impossible de se connecter au port \n"); | ||
48 | + | ||
49 | +} | ||
50 | + | ||
51 | + | ||
52 | +int main(){ | ||
53 | + init_seq(); | ||
54 | + struct pollfd *pfds; | ||
55 | + int npfds, err; | ||
56 | + create_port(); | ||
57 | + connect_port(); | ||
58 | + | ||
59 | + npfds = snd_seq_poll_descriptors_count(seq, POLLIN); | ||
60 | + pfds = alloca(sizeof(*pfds) * npfds); | ||
61 | + for (;;) { | ||
62 | + snd_seq_poll_descriptors(seq, pfds, npfds, POLLIN); | ||
63 | + if (poll(pfds, npfds, -1) < 0) | ||
64 | + break; | ||
65 | + do { | ||
66 | + snd_seq_event_t *event; | ||
67 | + err = snd_seq_event_input(seq, &event); | ||
68 | + if (err < 0) | ||
69 | + break; | ||
70 | + if (event) | ||
71 | + { | ||
72 | + if (event->type == SND_SEQ_EVENT_NOTEON) printf("coucou %d\n",event->data.note.note); | ||
73 | + } | ||
74 | + } while (err > 0); | ||
75 | + fflush(stdout); | ||
76 | + } | ||
77 | + | ||
78 | + | ||
79 | + | ||
80 | + snd_seq_close(seq); | ||
81 | + | ||
82 | + return 0; | ||
83 | +} |
@@ -0,0 +1,438 @@ | @@ -0,0 +1,438 @@ | ||
1 | +/* | ||
2 | + * aseqdump.c - show the events received at an ALSA sequencer port | ||
3 | + * | ||
4 | + * Copyright (c) 2005 Clemens Ladisch <clemens@ladisch.de> | ||
5 | + * | ||
6 | + * | ||
7 | + * This program is free software; you can redistribute it and/or modify | ||
8 | + * it under the terms of the GNU General Public License as published by | ||
9 | + * the Free Software Foundation; either version 2 of the License, or | ||
10 | + * (at your option) any later version. | ||
11 | + * | ||
12 | + * This program is distributed in the hope that it will be useful, | ||
13 | + * but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
14 | + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
15 | + * GNU General Public License for more details. | ||
16 | + * | ||
17 | + * You should have received a copy of the GNU General Public License | ||
18 | + * along with this program; if not, write to the Free Software | ||
19 | + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | ||
20 | + */ | ||
21 | + | ||
22 | +#include <stdio.h> | ||
23 | +#include <stdlib.h> | ||
24 | +#include <stdarg.h> | ||
25 | +#include <string.h> | ||
26 | +#include <signal.h> | ||
27 | +#include <getopt.h> | ||
28 | +#include <sys/poll.h> | ||
29 | +#include <alsa/asoundlib.h> | ||
30 | +#include "aconfig.h" | ||
31 | +#include "version.h" | ||
32 | + | ||
33 | +static snd_seq_t *seq; | ||
34 | +static int port_count; | ||
35 | +static snd_seq_addr_t *ports; | ||
36 | +static volatile sig_atomic_t stop = 0; | ||
37 | + | ||
38 | + | ||
39 | +/* prints an error message to stderr, and dies */ | ||
40 | +static void fatal(const char *msg, ...) | ||
41 | +{ | ||
42 | + va_list ap; | ||
43 | + | ||
44 | + va_start(ap, msg); | ||
45 | + vfprintf(stderr, msg, ap); | ||
46 | + va_end(ap); | ||
47 | + fputc('\n', stderr); | ||
48 | + exit(EXIT_FAILURE); | ||
49 | +} | ||
50 | + | ||
51 | +/* memory allocation error handling */ | ||
52 | +static void check_mem(void *p) | ||
53 | +{ | ||
54 | + if (!p) | ||
55 | + fatal("Out of memory"); | ||
56 | +} | ||
57 | + | ||
58 | +/* error handling for ALSA functions */ | ||
59 | +static void check_snd(const char *operation, int err) | ||
60 | +{ | ||
61 | + if (err < 0) | ||
62 | + fatal("Cannot %s - %s", operation, snd_strerror(err)); | ||
63 | +} | ||
64 | + | ||
65 | +static void init_seq(void) | ||
66 | +{ | ||
67 | + int err; | ||
68 | + | ||
69 | + /* open sequencer */ | ||
70 | + err = snd_seq_open(&seq, "default", SND_SEQ_OPEN_DUPLEX, 0); | ||
71 | + check_snd("open sequencer", err); | ||
72 | + | ||
73 | + /* set our client's name */ | ||
74 | + err = snd_seq_set_client_name(seq, "aseqdump"); | ||
75 | + check_snd("set client name", err); | ||
76 | +} | ||
77 | + | ||
78 | +/* parses one or more port addresses from the string */ | ||
79 | +static void parse_ports(const char *arg) | ||
80 | +{ | ||
81 | + char *buf, *s, *port_name; | ||
82 | + int err; | ||
83 | + | ||
84 | + /* make a copy of the string because we're going to modify it */ | ||
85 | + buf = strdup(arg); | ||
86 | + check_mem(buf); | ||
87 | + | ||
88 | + for (port_name = s = buf; s; port_name = s + 1) { | ||
89 | + /* Assume that ports are separated by commas. We don't use | ||
90 | + * spaces because those are valid in client names. */ | ||
91 | + s = strchr(port_name, ','); | ||
92 | + if (s) | ||
93 | + *s = '\0'; | ||
94 | + | ||
95 | + ++port_count; | ||
96 | + ports = realloc(ports, port_count * sizeof(snd_seq_addr_t)); | ||
97 | + check_mem(ports); | ||
98 | + | ||
99 | + err = snd_seq_parse_address(seq, &ports[port_count - 1], port_name); | ||
100 | + if (err < 0) | ||
101 | + fatal("Invalid port %s - %s", port_name, snd_strerror(err)); | ||
102 | + } | ||
103 | + | ||
104 | + free(buf); | ||
105 | +} | ||
106 | + | ||
107 | +static void create_port(void) | ||
108 | +{ | ||
109 | + int err; | ||
110 | + | ||
111 | + err = snd_seq_create_simple_port(seq, "aseqdump", | ||
112 | + SND_SEQ_PORT_CAP_WRITE | | ||
113 | + SND_SEQ_PORT_CAP_SUBS_WRITE, | ||
114 | + SND_SEQ_PORT_TYPE_MIDI_GENERIC | | ||
115 | + SND_SEQ_PORT_TYPE_APPLICATION); | ||
116 | + check_snd("create port", err); | ||
117 | +} | ||
118 | + | ||
119 | +static void connect_ports(void) | ||
120 | +{ | ||
121 | + int i, err; | ||
122 | + | ||
123 | + for (i = 0; i < port_count; ++i) { | ||
124 | + err = snd_seq_connect_from(seq, 0, ports[i].client, ports[i].port); | ||
125 | + if (err < 0) | ||
126 | + fatal("Cannot connect from port %d:%d - %s", | ||
127 | + ports[i].client, ports[i].port, snd_strerror(err)); | ||
128 | + } | ||
129 | +} | ||
130 | + | ||
131 | +static void dump_event(const snd_seq_event_t *ev) | ||
132 | +{ | ||
133 | + printf("%3d:%-3d ", ev->source.client, ev->source.port);// source = num du clavier qu'on met ds la ligne de commande; port num usb ? | ||
134 | + switch (ev->type) { | ||
135 | + case SND_SEQ_EVENT_NOTEON: | ||
136 | + if (ev->data.note.velocity) | ||
137 | + printf("Note on %2d, note %d, velocity %d\n", | ||
138 | + ev->data.note.channel, ev->data.note.note, ev->data.note.velocity); | ||
139 | + else | ||
140 | + printf("Note off %2d, note %d\n", | ||
141 | + ev->data.note.channel, ev->data.note.note); | ||
142 | + break; | ||
143 | + case SND_SEQ_EVENT_NOTEOFF: | ||
144 | + printf("Note off %2d, note %d, velocity %d\n", | ||
145 | + ev->data.note.channel, ev->data.note.note, ev->data.note.velocity); | ||
146 | + break; | ||
147 | + case SND_SEQ_EVENT_KEYPRESS: | ||
148 | + printf("Polyphonic aftertouch %2d, note %d, value %d\n", | ||
149 | + ev->data.note.channel, ev->data.note.note, ev->data.note.velocity); | ||
150 | + break; | ||
151 | + case SND_SEQ_EVENT_CONTROLLER: | ||
152 | + printf("Control change %2d, controller %d, value %d\n", | ||
153 | + ev->data.control.channel, ev->data.control.param, ev->data.control.value); | ||
154 | + break; | ||
155 | + case SND_SEQ_EVENT_PGMCHANGE: | ||
156 | + printf("Program change %2d, program %d\n", | ||
157 | + ev->data.control.channel, ev->data.control.value); | ||
158 | + break; | ||
159 | + case SND_SEQ_EVENT_CHANPRESS: | ||
160 | + printf("Channel aftertouch %2d, value %d\n", | ||
161 | + ev->data.control.channel, ev->data.control.value); | ||
162 | + break; | ||
163 | + case SND_SEQ_EVENT_PITCHBEND: | ||
164 | + printf("Pitch bend %2d, value %d\n", | ||
165 | + ev->data.control.channel, ev->data.control.value); | ||
166 | + break; | ||
167 | + case SND_SEQ_EVENT_CONTROL14: | ||
168 | + printf("Control change %2d, controller %d, value %5d\n", | ||
169 | + ev->data.control.channel, ev->data.control.param, ev->data.control.value); | ||
170 | + break; | ||
171 | + case SND_SEQ_EVENT_NONREGPARAM: | ||
172 | + printf("Non-reg. parameter %2d, parameter %d, value %d\n", | ||
173 | + ev->data.control.channel, ev->data.control.param, ev->data.control.value); | ||
174 | + break; | ||
175 | + case SND_SEQ_EVENT_REGPARAM: | ||
176 | + printf("Reg. parameter %2d, parameter %d, value %d\n", | ||
177 | + ev->data.control.channel, ev->data.control.param, ev->data.control.value); | ||
178 | + break; | ||
179 | + case SND_SEQ_EVENT_SONGPOS: | ||
180 | + printf("Song position pointer value %d\n", | ||
181 | + ev->data.control.value); | ||
182 | + break; | ||
183 | + case SND_SEQ_EVENT_SONGSEL: | ||
184 | + printf("Song select value %d\n", | ||
185 | + ev->data.control.value); | ||
186 | + break; | ||
187 | + case SND_SEQ_EVENT_QFRAME: | ||
188 | + printf("MTC quarter frame %02xh\n", | ||
189 | + ev->data.control.value); | ||
190 | + break; | ||
191 | + case SND_SEQ_EVENT_TIMESIGN: | ||
192 | + // XXX how is this encoded? | ||
193 | + printf("SMF time signature (%#010x)\n", | ||
194 | + ev->data.control.value); | ||
195 | + break; | ||
196 | + case SND_SEQ_EVENT_KEYSIGN: | ||
197 | + // XXX how is this encoded? | ||
198 | + printf("SMF key signature (%#010x)\n", | ||
199 | + ev->data.control.value); | ||
200 | + break; | ||
201 | + case SND_SEQ_EVENT_START: | ||
202 | + if (ev->source.client == SND_SEQ_CLIENT_SYSTEM && | ||
203 | + ev->source.port == SND_SEQ_PORT_SYSTEM_TIMER) | ||
204 | + printf("Queue start queue %d\n", | ||
205 | + ev->data.queue.queue); | ||
206 | + else | ||
207 | + printf("Start\n"); | ||
208 | + break; | ||
209 | + case SND_SEQ_EVENT_CONTINUE: | ||
210 | + if (ev->source.client == SND_SEQ_CLIENT_SYSTEM && | ||
211 | + ev->source.port == SND_SEQ_PORT_SYSTEM_TIMER) | ||
212 | + printf("Queue continue queue %d\n", | ||
213 | + ev->data.queue.queue); | ||
214 | + else | ||
215 | + printf("Continue\n"); | ||
216 | + break; | ||
217 | + case SND_SEQ_EVENT_STOP: | ||
218 | + if (ev->source.client == SND_SEQ_CLIENT_SYSTEM && | ||
219 | + ev->source.port == SND_SEQ_PORT_SYSTEM_TIMER) | ||
220 | + printf("Queue stop queue %d\n", | ||
221 | + ev->data.queue.queue); | ||
222 | + else | ||
223 | + printf("Stop\n"); | ||
224 | + break; | ||
225 | + case SND_SEQ_EVENT_SETPOS_TICK: | ||
226 | + printf("Set tick queue pos. queue %d\n", ev->data.queue.queue); | ||
227 | + break; | ||
228 | + case SND_SEQ_EVENT_SETPOS_TIME: | ||
229 | + printf("Set rt queue pos. queue %d\n", ev->data.queue.queue); | ||
230 | + break; | ||
231 | + case SND_SEQ_EVENT_TEMPO: | ||
232 | + printf("Set queue tempo queue %d\n", ev->data.queue.queue); | ||
233 | + break; | ||
234 | + case SND_SEQ_EVENT_CLOCK: | ||
235 | + printf("Clock\n"); | ||
236 | + break; | ||
237 | + case SND_SEQ_EVENT_TICK: | ||
238 | + printf("Tick\n"); | ||
239 | + break; | ||
240 | + case SND_SEQ_EVENT_QUEUE_SKEW: | ||
241 | + printf("Queue timer skew queue %d\n", ev->data.queue.queue); | ||
242 | + break; | ||
243 | + case SND_SEQ_EVENT_TUNE_REQUEST: | ||
244 | + printf("Tune request\n"); | ||
245 | + break; | ||
246 | + case SND_SEQ_EVENT_RESET: | ||
247 | + printf("Reset\n"); | ||
248 | + break; | ||
249 | + case SND_SEQ_EVENT_SENSING: | ||
250 | + printf("Active Sensing\n"); | ||
251 | + break; | ||
252 | + case SND_SEQ_EVENT_CLIENT_START: | ||
253 | + printf("Client start client %d\n", | ||
254 | + ev->data.addr.client); | ||
255 | + break; | ||
256 | + case SND_SEQ_EVENT_CLIENT_EXIT: | ||
257 | + printf("Client exit client %d\n", | ||
258 | + ev->data.addr.client); | ||
259 | + break; | ||
260 | + case SND_SEQ_EVENT_CLIENT_CHANGE: | ||
261 | + printf("Client changed client %d\n", | ||
262 | + ev->data.addr.client); | ||
263 | + break; | ||
264 | + case SND_SEQ_EVENT_PORT_START: | ||
265 | + printf("Port start %d:%d\n", | ||
266 | + ev->data.addr.client, ev->data.addr.port); | ||
267 | + break; | ||
268 | + case SND_SEQ_EVENT_PORT_EXIT: | ||
269 | + printf("Port exit %d:%d\n", | ||
270 | + ev->data.addr.client, ev->data.addr.port); | ||
271 | + break; | ||
272 | + case SND_SEQ_EVENT_PORT_CHANGE: | ||
273 | + printf("Port changed %d:%d\n", | ||
274 | + ev->data.addr.client, ev->data.addr.port); | ||
275 | + break; | ||
276 | + case SND_SEQ_EVENT_PORT_SUBSCRIBED: | ||
277 | + printf("Port subscribed %d:%d -> %d:%d\n", | ||
278 | + ev->data.connect.sender.client, ev->data.connect.sender.port, | ||
279 | + ev->data.connect.dest.client, ev->data.connect.dest.port); | ||
280 | + break; | ||
281 | + case SND_SEQ_EVENT_PORT_UNSUBSCRIBED: | ||
282 | + printf("Port unsubscribed %d:%d -> %d:%d\n", | ||
283 | + ev->data.connect.sender.client, ev->data.connect.sender.port, | ||
284 | + ev->data.connect.dest.client, ev->data.connect.dest.port); | ||
285 | + break; | ||
286 | + case SND_SEQ_EVENT_SYSEX: | ||
287 | + { | ||
288 | + unsigned int i; | ||
289 | + printf("System exclusive "); | ||
290 | + for (i = 0; i < ev->data.ext.len; ++i) | ||
291 | + printf(" %02X", ((unsigned char*)ev->data.ext.ptr)[i]); | ||
292 | + printf("\n"); | ||
293 | + } | ||
294 | + break; | ||
295 | + default: | ||
296 | + printf("Event type %d\n", ev->type); | ||
297 | + } | ||
298 | +} | ||
299 | + | ||
300 | +static void list_ports(void) | ||
301 | +{ | ||
302 | + snd_seq_client_info_t *cinfo; | ||
303 | + snd_seq_port_info_t *pinfo; | ||
304 | + | ||
305 | + snd_seq_client_info_alloca(&cinfo); | ||
306 | + snd_seq_port_info_alloca(&pinfo); | ||
307 | + | ||
308 | + puts(" Port Client name Port name"); | ||
309 | + | ||
310 | + snd_seq_client_info_set_client(cinfo, -1); | ||
311 | + while (snd_seq_query_next_client(seq, cinfo) >= 0) { | ||
312 | + int client = snd_seq_client_info_get_client(cinfo); | ||
313 | + | ||
314 | + snd_seq_port_info_set_client(pinfo, client); | ||
315 | + snd_seq_port_info_set_port(pinfo, -1); | ||
316 | + while (snd_seq_query_next_port(seq, pinfo) >= 0) { | ||
317 | + /* we need both READ and SUBS_READ */ | ||
318 | + if ((snd_seq_port_info_get_capability(pinfo) | ||
319 | + & (SND_SEQ_PORT_CAP_READ | SND_SEQ_PORT_CAP_SUBS_READ)) | ||
320 | + != (SND_SEQ_PORT_CAP_READ | SND_SEQ_PORT_CAP_SUBS_READ)) | ||
321 | + continue; | ||
322 | + printf("%3d:%-3d %-32.32s %s\n", | ||
323 | + snd_seq_port_info_get_client(pinfo), | ||
324 | + snd_seq_port_info_get_port(pinfo), | ||
325 | + snd_seq_client_info_get_name(cinfo), | ||
326 | + snd_seq_port_info_get_name(pinfo)); | ||
327 | + } | ||
328 | + } | ||
329 | +} | ||
330 | + | ||
331 | +static void help(const char *argv0) | ||
332 | +{ | ||
333 | + printf("Usage: %s [options]\n" | ||
334 | + "\nAvailable options:\n" | ||
335 | + " -h,--help this help\n" | ||
336 | + " -V,--version show version\n" | ||
337 | + " -l,--list list input ports\n" | ||
338 | + " -p,--port=client:port,... source port(s)\n", | ||
339 | + argv0); | ||
340 | +} | ||
341 | + | ||
342 | +static void version(void) | ||
343 | +{ | ||
344 | + puts("aseqdump version " SND_UTIL_VERSION_STR); | ||
345 | +} | ||
346 | + | ||
347 | +static void sighandler(int sig) | ||
348 | +{ | ||
349 | + stop = 1; | ||
350 | +} | ||
351 | + | ||
352 | +int main(int argc, char *argv[]) | ||
353 | +{ | ||
354 | + static const char short_options[] = "hVlp:"; | ||
355 | + static const struct option long_options[] = { | ||
356 | + {"help", 0, NULL, 'h'}, | ||
357 | + {"version", 0, NULL, 'V'}, | ||
358 | + {"list", 0, NULL, 'l'}, | ||
359 | + {"port", 1, NULL, 'p'}, | ||
360 | + { } | ||
361 | + }; | ||
362 | + | ||
363 | + int do_list = 0; | ||
364 | + struct pollfd *pfds; | ||
365 | + int npfds; | ||
366 | + int c, err; | ||
367 | + | ||
368 | + init_seq(); | ||
369 | + // Gere les options de la ligne de commande | ||
370 | + while ((c = getopt_long(argc, argv, short_options, | ||
371 | + long_options, NULL)) != -1) { | ||
372 | + switch (c) { | ||
373 | + case 'h': | ||
374 | + help(argv[0]); | ||
375 | + return 0; | ||
376 | + case 'V': | ||
377 | + version(); | ||
378 | + return 0; | ||
379 | + case 'l': | ||
380 | + do_list = 1; | ||
381 | + break; | ||
382 | + case 'p': | ||
383 | + parse_ports(optarg);//optarg = l'option | ||
384 | + break; | ||
385 | + default: | ||
386 | + help(argv[0]); | ||
387 | + return 1; | ||
388 | + } | ||
389 | + } | ||
390 | + if (optind < argc) { | ||
391 | + help(argv[0]); | ||
392 | + return 1; | ||
393 | + } | ||
394 | + | ||
395 | + if (do_list) { | ||
396 | + list_ports(); | ||
397 | + return 0; | ||
398 | + } | ||
399 | + | ||
400 | + create_port(); | ||
401 | + connect_ports(); | ||
402 | + | ||
403 | + err = snd_seq_nonblock(seq, 1); | ||
404 | + check_snd("set nonblock mode", err); | ||
405 | + | ||
406 | + if (port_count > 0) | ||
407 | + printf("Waiting for data."); | ||
408 | + else | ||
409 | + printf("Waiting for data at port %d:0.", | ||
410 | + snd_seq_client_id(seq)); | ||
411 | + printf(" Press Ctrl+C to end.\n"); | ||
412 | + printf("Source Event Ch Data\n"); | ||
413 | + | ||
414 | + signal(SIGINT, sighandler); | ||
415 | + signal(SIGTERM, sighandler); | ||
416 | + | ||
417 | + npfds = snd_seq_poll_descriptors_count(seq, POLLIN); | ||
418 | + pfds = alloca(sizeof(*pfds) * npfds); | ||
419 | + for (;;) { | ||
420 | + snd_seq_poll_descriptors(seq, pfds, npfds, POLLIN); | ||
421 | + if (poll(pfds, npfds, -1) < 0) | ||
422 | + break; | ||
423 | + do { | ||
424 | + snd_seq_event_t *event; | ||
425 | + err = snd_seq_event_input(seq, &event); | ||
426 | + if (err < 0) | ||
427 | + break; | ||
428 | + if (event) | ||
429 | + dump_event(event); | ||
430 | + } while (err > 0); | ||
431 | + fflush(stdout); | ||
432 | + if (stop) | ||
433 | + break; | ||
434 | + } | ||
435 | + | ||
436 | + snd_seq_close(seq); | ||
437 | + return 0; | ||
438 | +} |