/[paths]/src/main.c
ViewVC logotype

Annotation of /src/main.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 27 - (hide annotations)
Sat Aug 18 09:45:16 2012 UTC (8 years, 1 month ago) by ben
File MIME type: text/plain
File size: 7197 byte(s)
fix midi event storm b/w ON and OFF (do not reserve event when nothing to feed)
1 ben 18 /* Copyright (c) 2012, Benoit Rouits <brouits@free.fr>
2     * Some rights reserved.
3     *
4     * Redistribution and use in source and binary forms, with or without
5     * modification, are permitted provided that the following conditions
6     * are met:
7     * 1. Redistributions of source code must retain the above copyright
8     * notice, this list of conditions and the following disclaimer.
9     * 2. Redistributions in binary form must reproduce the above copyright
10     * notice, this list of conditions and the following disclaimer in the
11     * documentation and/or other materials provided with the distribution.
12     *
13     * ALTHOUGH THIS SOFTWARE IS MADE OF WIN AND SCIENCE, IT IS PROVIDED BY THE
14     * AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
15     * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
16     * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
17     * THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
18     * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
19     * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
20     * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
21     * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
22     * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
23     * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24     *
25     */
26    
27 ben 6 #include <stdio.h>
28 ben 15 #include <stdlib.h>
29     #include <string.h>
30    
31     #include <jack/jack.h>
32     #include <jack/midiport.h>
33    
34     #include <config.h>
35 ben 6 #include "graph.h"
36    
37 ben 23 #define MAX_VOICE 64
38     #define MAX_INST 128
39 ben 15
40 ben 18 #define error(str) fprintf(stderr, "[error]\t%s\n", str)
41 ben 15
42     struct jack {
43     jack_client_t *client;
44 ben 21 jack_transport_state_t state;
45 ben 15 };
46    
47 ben 21 struct voice {
48     struct event* route;
49 ben 16 int count;
50 ben 15 int cur;
51 ben 24 jack_time_t press;
52 ben 15 };
53    
54 ben 21 struct instrument {
55 ben 23 struct voice voices[MAX_VOICE];
56 ben 25 int count;
57     int end;
58    
59 ben 24 jack_port_t *out;
60     void* out_buf;
61 ben 25
62 ben 15 struct graph *graph;
63 ben 21 };
64    
65     struct app {
66     struct instrument* instruments;
67     int count;
68 ben 25 int end;
69    
70 ben 15 struct jack *jack;
71     };
72    
73     static int jack_process_callback(jack_nframes_t nframes, void *ctx)
74 ben 11 {
75 ben 21 struct app *app;
76     jack_transport_state_t state;
77 ben 24 int i, voice, inst;
78 ben 15
79 ben 21 app = ctx;
80 ben 15
81 ben 25 if (nframes <= 0) {
82     error("called process w/o frames");
83 ben 15 return 0;
84 ben 25 }
85 ben 15
86 ben 24 /* prepare all out buffers before writing into them */
87     for (i = 0; i < app->count; i++) {
88     void *port_buf = jack_port_get_buffer(app->instruments[i].out, nframes);
89     jack_midi_clear_buffer(port_buf);
90     app->instruments[i].out_buf = port_buf;
91     }
92    
93 ben 21 /* get transport state, act in consequence */
94 ben 26 state = jack_transport_query(app->jack->client, NULL);
95     if (state == JackTransportStopped) {
96     if (app->jack->state == JackTransportRolling)
97     { /* send not off everywhere! */ }
98     app->jack->state = state;
99     return 0;
100     }
101     app->jack->state = state;
102 ben 24
103 ben 21 /* check end of all voices of all instruments */
104 ben 25 if (app->end >= app->count)
105     return 0;
106 ben 24
107 ben 21 /* go browse all voice states and send events */
108 ben 25 for (i = 0; i < nframes; i++) {
109     if (app->end >= app->count) {
110     fprintf(stderr, "tune ended (%d instruments)\n", app->end);
111     return 0;
112     }
113     for (inst = 0; inst < app->count; inst++) {
114     if (app->instruments[inst].end >= app->instruments[inst].count) {
115     app->end++;
116     fprintf(stderr, "instrument %d ended (%d voices)\n", inst, app->instruments[inst].end);
117     continue;
118     }
119 ben 24 for (voice = 0; voice < app->instruments[inst].count; voice++) {
120 ben 25 jack_time_t *press = &app->instruments[inst].voices[voice].press;
121 ben 24 int *cur = &app->instruments[inst].voices[voice].cur;
122 ben 25 if (*cur >= app->instruments[inst].voices[voice].count) {
123     app->instruments[inst].end++;
124     fprintf(stderr, "voice %d ended (%d notes)\n", voice, *cur);
125 ben 24 continue;
126 ben 25 }
127 ben 24 struct event *ev = &app->instruments[inst].voices[voice].route[*cur];
128 ben 16
129 ben 25 jack_time_t now = jack_get_time();
130    
131     if (*press) { /* note must be released before passing to next note */
132 ben 24 if (*press + ev->duration < now) {
133 ben 27 unsigned char *buf = jack_midi_event_reserve(app->instruments[inst].out_buf, i, 3);
134     if (!buf) {
135     error("no memory, event lost");
136     return 0;
137     }
138 ben 24 buf[2] = ev->velocity;
139     buf[1] = ev->pitch;
140     buf[0] = 0x80; /* note off */
141     press = 0; /* release */
142     (*cur)++; /* go to next node */
143     fprintf(stderr, "off %d (%p)\n", ev->pitch, ev);
144     }
145 ben 25 } else { /* this is a new note */
146 ben 27 unsigned char *buf = jack_midi_event_reserve(app->instruments[inst].out_buf, i, 3);
147     if (!buf) {
148     error("no memory, event lost");
149     return 0;
150     }
151 ben 24 buf[2] = ev->velocity;
152     buf[1] = ev->pitch;
153     buf[0] = 0x90; /* note on */
154     *press = now;
155     fprintf(stderr, "on %d (%p)\n", ev->pitch, ev);
156     }
157     }
158 ben 25 }
159     }
160 ben 24
161 ben 15 return 0;
162     }
163    
164     static int jack_sync_callback(jack_transport_state_t state, jack_position_t *position, void *ctx)
165     {
166 ben 26 struct app *app;
167 ben 15
168 ben 26 app = ctx;
169 ben 15
170     if (state == JackTransportStarting) {
171 ben 21 /* seek in paths (???) according to position->frame */
172 ben 15 } else if (state == JackTransportStopped) {
173 ben 11 }
174 ben 15
175     return 1;
176 ben 11 }
177    
178 ben 21 void jack_shutdown(void* ctx)
179 ben 17 {
180     puts("jack vanished...");
181     }
182    
183 ben 15 int main (int argc, char *argv[])
184 ben 6 {
185 ben 25 struct graph *graph;
186 ben 21 struct instrument instrument;
187     struct voice voice;
188 ben 25 struct jack jack;
189     struct app app;
190 ben 6
191 ben 24 int i, err;
192 ben 15
193     /* create random graph */
194 ben 16 graph = graph_new(100);
195 ben 15 graph_randomize2(graph, 3);
196    
197 ben 25 /* initialize a solo instrument */
198 ben 21 memset(&instrument, 0, sizeof(instrument));
199     instrument.graph = graph;
200 ben 25
201     /* initialize application context */
202     memset(&app, 0, sizeof(app));
203 ben 21 app.jack = &jack;
204     app.instruments = &instrument;
205     app.count = 1;
206 ben 15
207 ben 21 /* create a random route (lol) */
208 ben 25 memset(&voice, 0, sizeof(voice));
209 ben 21 voice.route = &graph->nodes[0].event;
210     voice.count = 1;
211     instrument.voices[0] = voice;
212     instrument.count = 1;
213 ben 15
214 ben 21 /* mark it (...) */
215     app.instruments[0].voices[0].route[0].pitch = 42;
216 ben 27 app.instruments[0].voices[0].route[0].duration = 42000;
217 ben 21
218 ben 15 /* init jack */
219     jack.client = jack_client_open(PACKAGE_NAME, JackNullOption, NULL);
220     if (jack.client == NULL) {
221     error("could not connect to jackd");
222     exit(EXIT_FAILURE);
223     }
224    
225 ben 21 err = jack_set_process_callback(jack.client, jack_process_callback, &app);
226 ben 15
227     if (err) {
228     error("could not set jack process callback");
229     exit(EXIT_FAILURE);
230     }
231    
232 ben 21 err = jack_set_sync_callback(jack.client, jack_sync_callback, &app);
233 ben 15
234     if (err) {
235     error("could not set jack sync callback");
236     exit(EXIT_FAILURE);
237     }
238    
239 ben 21 jack_on_shutdown(jack.client, jack_shutdown, &app);
240 ben 17
241 ben 24 /* allocate one jack port per instrument (midi outs) */
242     for (i = 0; i < app.count; i++) {
243     char name[32];
244     snprintf(name, 32, "out %d", i);
245     app.instruments[i].out = jack_port_register(jack.client, name, JACK_DEFAULT_MIDI_TYPE, JackPortIsOutput, 0);
246     if (app.instruments[i].out == NULL) {
247     error("could not register a jack midi out port");
248     exit(EXIT_FAILURE);
249     }
250 ben 15 }
251    
252     /* activate jack */
253     if (jack_activate(jack.client)) {
254     error("could not activate jack client");
255     exit(EXIT_FAILURE);
256     }
257    
258 ben 26
259     fprintf(stderr, "==========\n");
260 ben 15 /* start playing (event loop) */
261 ben 26 sleep(60);
262     fprintf(stderr, "==========\n");
263 ben 15
264     /* close jack */
265 ben 16 jack_client_close (jack.client);
266 ben 15
267     /* exit */
268 ben 10 graph_destroy(graph);
269 ben 15
270     exit(EXIT_SUCCESS);
271 ben 6 }

  ViewVC Help
Powered by ViewVC 1.1.26