Revert r1404 and keep it on a development branch until it is fully tested.
[profile/ivi/pulseaudio-panda.git] / src / modules / module-jack-source.c
1 /* $Id$ */
2
3 /***
4   This file is part of PulseAudio.
5  
6   PulseAudio is free software; you can redistribute it and/or modify
7   it under the terms of the GNU Lesser General Public License as published
8   by the Free Software Foundation; either version 2 of the License,
9   or (at your option) any later version.
10  
11   PulseAudio is distributed in the hope that it will be useful, but
12   WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14   General Public License for more details.
15  
16   You should have received a copy of the GNU Lesser General Public License
17   along with PulseAudio; if not, write to the Free Software
18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
19   USA.
20 ***/
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include <stdlib.h>
27 #include <sys/stat.h>
28 #include <stdio.h>
29 #include <assert.h>
30 #include <errno.h>
31 #include <string.h>
32 #include <fcntl.h>
33 #include <unistd.h>
34 #include <limits.h>
35 #include <pthread.h>
36
37 #include <jack/jack.h>
38
39 #include <pulse/xmalloc.h>
40
41 #include <pulsecore/core-error.h>
42 #include <pulsecore/iochannel.h>
43 #include <pulsecore/source.h>
44 #include <pulsecore/module.h>
45 #include <pulsecore/core-util.h>
46 #include <pulsecore/modargs.h>
47 #include <pulsecore/log.h>
48 #include <pulse/mainloop-api.h>
49
50 #include "module-jack-source-symdef.h"
51
52 PA_MODULE_AUTHOR("Lennart Poettering")
53 PA_MODULE_DESCRIPTION("Jack Source")
54 PA_MODULE_VERSION(PACKAGE_VERSION)
55 PA_MODULE_USAGE(
56         "source_name=<name of source> "
57         "server_name=<jack server name> "
58         "client_name=<jack client name> "
59         "channels=<number of channels> "
60         "connect=<connect ports?>"
61         "channel_map=<channel map>")
62
63 #define DEFAULT_SOURCE_NAME "jack_in"
64
65 struct userdata {
66     pa_core *core;
67     pa_module *module;
68
69     pa_source *source;
70
71     unsigned channels;
72
73     jack_port_t* port[PA_CHANNELS_MAX];
74     jack_client_t *client;
75
76     pthread_mutex_t mutex;
77     pthread_cond_t cond;
78     
79     void * buffer[PA_CHANNELS_MAX];
80     jack_nframes_t frames_posted;
81     int quit_requested;
82
83     int pipe_fds[2];
84     int pipe_fd_type;
85     pa_io_event *io_event;
86
87     jack_nframes_t frames_in_buffer;
88     jack_nframes_t timestamp;
89 };
90
91 static const char* const valid_modargs[] = {
92     "source_name",
93     "server_name",
94     "client_name",
95     "channels",
96     "connect",
97     "channel_map",
98     NULL
99 };
100
101 static void stop_source(struct userdata *u) {
102     assert (u);
103     
104     jack_client_close(u->client);
105     u->client = NULL;
106     u->core->mainloop->io_free(u->io_event);
107     u->io_event = NULL;
108     pa_source_disconnect(u->source);
109     pa_source_unref(u->source);
110     u->source = NULL;
111     pa_module_unload_request(u->module);
112 }
113
114 static void io_event_cb(pa_mainloop_api *m, pa_io_event *e, int fd, pa_io_event_flags_t flags, void *userdata) {
115     struct userdata *u = userdata;
116     char x;
117     
118     assert(m);
119     assert(flags == PA_IO_EVENT_INPUT);
120     assert(u);
121     assert(u->pipe_fds[0] == fd);
122
123     pa_read(fd, &x, 1, &u->pipe_fd_type);
124     
125     if (u->quit_requested) {
126         stop_source(u);
127         u->quit_requested = 0;
128         return;
129     }
130     
131     pthread_mutex_lock(&u->mutex);
132
133     if (u->frames_posted > 0) {
134         unsigned fs;
135         jack_nframes_t frame_idx;
136         pa_memchunk chunk;
137         
138         fs = pa_frame_size(&u->source->sample_spec);
139
140         chunk.memblock = pa_memblock_new(u->core->mempool, chunk.length = u->frames_posted * fs);
141         chunk.index = 0;
142         
143         for (frame_idx = 0; frame_idx < u->frames_posted; frame_idx ++) {
144             unsigned c;
145                 
146             for (c = 0; c < u->channels; c++) {
147                 float *s = ((float*) u->buffer[c]) + frame_idx;
148                 float *d = ((float*) ((uint8_t*) chunk.memblock->data + chunk.index)) + (frame_idx * u->channels) + c;
149                 
150                 *d = *s;
151             }
152         }
153
154         pa_source_post(u->source, &chunk);
155         pa_memblock_unref(chunk.memblock);
156
157         u->frames_posted = 0;
158         
159         pthread_cond_signal(&u->cond);
160     }
161
162     pthread_mutex_unlock(&u->mutex);
163 }
164
165 static void request_post(struct userdata *u) {
166     char c = 'x';
167     assert(u);
168
169     assert(u->pipe_fds[1] >= 0);
170     pa_write(u->pipe_fds[1], &c, 1, &u->pipe_fd_type);
171 }
172
173 static void jack_shutdown(void *arg) {
174     struct userdata *u = arg;
175     assert(u);
176
177     u->quit_requested = 1;
178     request_post(u);
179 }
180
181 static int jack_process(jack_nframes_t nframes, void *arg) {
182     struct userdata *u = arg;
183     assert(u);
184
185     if (jack_transport_query(u->client, NULL) == JackTransportRolling) {
186         unsigned c;
187         
188         pthread_mutex_lock(&u->mutex);
189         
190         u->frames_posted = nframes;
191         
192         for (c = 0; c < u->channels; c++) {
193             u->buffer[c] = jack_port_get_buffer(u->port[c], nframes);
194             assert(u->buffer[c]);
195         }
196         
197         request_post(u);
198         
199         pthread_cond_wait(&u->cond, &u->mutex);
200
201         u->frames_in_buffer = nframes;
202         u->timestamp = jack_get_current_transport_frame(u->client);
203         
204         pthread_mutex_unlock(&u->mutex);
205     }
206     
207     return 0;
208 }
209
210 static pa_usec_t source_get_latency_cb(pa_source *s) {
211     struct userdata *u;
212     jack_nframes_t n, l, d;
213     
214     assert(s);
215     u = s->userdata;
216     
217     if (jack_transport_query(u->client, NULL) != JackTransportRolling)
218         return 0;
219
220     n = jack_get_current_transport_frame(u->client);
221
222     if (n < u->timestamp)
223         return 0;
224
225     d = n - u->timestamp;
226     l = jack_port_get_total_latency(u->client, u->port[0]);
227     
228     return pa_bytes_to_usec((l + d) * pa_frame_size(&s->sample_spec), &s->sample_spec);
229 }
230
231 static void jack_error_func(const char*t) {
232     pa_log_warn("JACK error >%s<", t);
233 }
234
235 int pa__init(pa_core *c, pa_module*m) {
236     struct userdata *u = NULL;
237     pa_sample_spec ss;
238     pa_channel_map map;
239     pa_modargs *ma = NULL;
240     jack_status_t status;
241     const char *server_name, *client_name;
242     uint32_t channels = 0;
243     int do_connect = 1;
244     unsigned i;
245     const char **ports = NULL, **p;
246     char *t;
247     
248     assert(c);
249     assert(m);
250
251     jack_set_error_function(jack_error_func);
252     
253     if (!(ma = pa_modargs_new(m->argument, valid_modargs))) {
254         pa_log("failed to parse module arguments.");
255         goto fail;
256     }
257
258     if (pa_modargs_get_value_boolean(ma, "connect", &do_connect) < 0) {
259         pa_log("failed to parse connect= argument.");
260         goto fail;
261     }
262         
263     server_name = pa_modargs_get_value(ma, "server_name", NULL);
264     client_name = pa_modargs_get_value(ma, "client_name", "PulseAudio");
265
266     u = pa_xnew0(struct userdata, 1);
267     m->userdata = u;
268     u->core = c;
269     u->module = m;
270     u->pipe_fds[0] = u->pipe_fds[1] = -1;
271     u->pipe_fd_type = 0;
272
273     pthread_mutex_init(&u->mutex, NULL);
274     pthread_cond_init(&u->cond, NULL);
275     
276     if (pipe(u->pipe_fds) < 0) {
277         pa_log("pipe() failed: %s", pa_cstrerror(errno));
278         goto fail;
279     }
280
281     pa_make_nonblock_fd(u->pipe_fds[1]);
282     
283     if (!(u->client = jack_client_open(client_name, server_name ? JackServerName : JackNullOption, &status, server_name))) {
284         pa_log("jack_client_open() failed.");
285         goto fail;
286     }
287
288     ports = jack_get_ports(u->client, NULL, NULL, JackPortIsPhysical|JackPortIsOutput);
289     
290     channels = 0;
291     for (p = ports; *p; p++)
292         channels++;
293
294     if (!channels)
295         channels = c->default_sample_spec.channels;
296     
297     if (pa_modargs_get_value_u32(ma, "channels", &channels) < 0 || channels <= 0 || channels >= PA_CHANNELS_MAX) {
298         pa_log("failed to parse channels= argument.");
299         goto fail;
300     }
301
302     pa_channel_map_init_auto(&map, channels, PA_CHANNEL_MAP_ALSA);
303     if (pa_modargs_get_channel_map(ma, &map) < 0 || map.channels != channels) {
304         pa_log("failed to parse channel_map= argument.");
305         goto fail;
306     }
307     
308     pa_log_info("Successfully connected as '%s'", jack_get_client_name(u->client));
309
310     ss.channels = u->channels = channels;
311     ss.rate = jack_get_sample_rate(u->client);
312     ss.format = PA_SAMPLE_FLOAT32NE;
313
314     assert(pa_sample_spec_valid(&ss));
315
316     for (i = 0; i < ss.channels; i++) {
317         if (!(u->port[i] = jack_port_register(u->client, pa_channel_position_to_string(map.map[i]), JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput|JackPortIsTerminal, 0))) {
318             pa_log("jack_port_register() failed.");
319             goto fail;
320         }
321     }
322
323     if (!(u->source = pa_source_new(c, __FILE__, pa_modargs_get_value(ma, "source_name", DEFAULT_SOURCE_NAME), 0, &ss, &map))) {
324         pa_log("failed to create source.");
325         goto fail;
326     }
327
328     u->source->userdata = u;
329     pa_source_set_owner(u->source, m);
330     pa_source_set_description(u->source, t = pa_sprintf_malloc("Jack source (%s)", jack_get_client_name(u->client)));
331     pa_xfree(t);
332     u->source->get_latency = source_get_latency_cb;
333
334     jack_set_process_callback(u->client, jack_process, u);
335     jack_on_shutdown(u->client, jack_shutdown, u);
336
337     if (jack_activate(u->client)) {
338         pa_log("jack_activate() failed");
339         goto fail;
340     }
341
342     if (do_connect) {
343         for (i = 0, p = ports; i < ss.channels; i++, p++) {
344
345             if (!*p) {
346                 pa_log("not enough physical output ports, leaving unconnected.");
347                 break;
348             }
349
350             pa_log_info("connecting %s to %s", jack_port_name(u->port[i]), *p);
351             
352             if (jack_connect(u->client, *p, jack_port_name(u->port[i]))) {
353                 pa_log("failed to connect %s to %s, leaving unconnected.", jack_port_name(u->port[i]), *p);
354                 break;
355             }
356         }
357
358     }
359
360     u->io_event = c->mainloop->io_new(c->mainloop, u->pipe_fds[0], PA_IO_EVENT_INPUT, io_event_cb, u);
361     
362     free(ports);
363     pa_modargs_free(ma);
364     
365     return 0;
366
367 fail:
368     if (ma)
369         pa_modargs_free(ma);
370
371     free(ports);
372         
373     pa__done(c, m);
374
375     return -1;
376 }
377
378 void pa__done(pa_core *c, pa_module*m) {
379     struct userdata *u;
380     assert(c && m);
381
382     if (!(u = m->userdata))
383         return;
384
385     if (u->client)
386         jack_client_close(u->client);
387
388     if (u->io_event)
389         c->mainloop->io_free(u->io_event);
390
391     if (u->source) {
392         pa_source_disconnect(u->source);
393         pa_source_unref(u->source);
394     }
395
396     if (u->pipe_fds[0] >= 0)
397         close(u->pipe_fds[0]);
398     if (u->pipe_fds[1] >= 0)
399         close(u->pipe_fds[1]);
400
401     pthread_mutex_destroy(&u->mutex);
402     pthread_cond_destroy(&u->cond);
403     pa_xfree(u);
404 }