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
|
//#include "stdlib.h"
//#include "stdio.h"
//#include "memory.h"
//#include "assert.h"
#include <fstream>
#include "allegro.h"
#include "mfmidi.h"
#include "portmidi.h"
#include "seq2midi.h"
//#include "string.h"
//#include "strparse.h"
#ifdef WIN32
#include "crtdbg.h" // for memory allocation debugging
#endif
void midi_fail(char *msg)
{
printf("Failure: %s\n", msg);
exit(1);
}
void *midi_alloc(size_t s) { return malloc(s); }
void midi_free(void *a) { free(a); }
void print_help()
{
printf("Usage: allegroplay [-m] [-a] <filename> [-n]\n");
printf(" use -m for midifile, -a for allegro file.\n");
printf(" .mid extension implies -m, .gro implies -a\n");
printf(" use -n for non-interactive use (no prompts)\n");
exit(-1);
}
int main(int argc, char *argv[])
{
if (argc < 2) {
print_help();
}
char *filename = NULL;
bool midifile = false;
bool allegrofile = false;
bool interactive = true;
int i = 1; // scan the command line
while (i < argc) {
if (argv[i][0] == '-') {
if (argv[1][1] == 'm') midifile = true;
else if (argv[i][1] == 'a') allegrofile = true;
else if (argv[i][1] == 'n') interactive = false;
} else {
filename = argv[i];
}
i++;
}
if (!filename) {
print_help();
}
if (!midifile && !allegrofile) {
int len = strlen(filename);
if (len < 4) print_help(); // no extension, need -m or -a
char *ext = filename + len - 4;
if (strcmp(ext, ".mid") == 0) midifile = true;
else if (strcmp(ext, ".gro") == 0) allegrofile = true;
else print_help();
}
Alg_seq seq(filename, midifile);
int events = 0;
for (i = 0; i < seq.tracks(); i++) {
events += seq.track(i)->length();
}
if (interactive) {
printf("%d tracks, %d events\n", seq.tracks(), events);
}
/* PLAY THE FILE VIA MIDI: */
if (interactive) {
printf("type return to play midi file: ");
char input[80];
fgets(input, 80, stdin);
}
seq_play(seq);
return 0;
}
|
