2 * Copyright (C) 2005-2009 Andre Noll <maan@systemlinux.org>
4 * Licensed under the GPL v2. For licencing details see COPYING.
7 /** \file write.c Paraslash's standalone wav/raw player. */
10 #include <sys/types.h>
16 #include "write.cmdline.h"
21 #include "buffer_tree.h"
23 #include "write_common.h"
29 /** Check if given buffer contains a valid wave header. */
30 struct check_wav_task
{
31 /** The buffer to check. */
33 /** Number of bytes loaded in \a buf. */
35 /** Non-zero if an error occurred or end of file was reached. */
37 /** Number of channels specified in wav header given by \a buf. */
39 /** Sample rate specified in wav header given by \a buf. */
41 /** The task structure used by the scheduler. */
45 enum check_wav_state
{
51 struct check_wav_task_btr
{
53 /** Number of channels specified in wav header given by \a buf. */
55 /** Sample rate specified in wav header given by \a buf. */
57 /** The task structure used by the scheduler. */
59 struct btr_node
*btrn
;
62 /** Delay writing until given time. */
63 struct initial_delay_task
{
64 /** The time the first data should be written out. */
65 struct timeval start_time
;
66 /** The task structure for this task. */
70 static struct write_args_info conf
;
72 static struct stdin_task sit
;
74 static struct check_wav_task the_check_wav_task
;
75 static struct initial_delay_task the_initial_delay_task
;
77 static struct writer_node_group
*wng
;
79 /** Length of a standard wav header. */
80 #define WAV_HEADER_LEN 44
83 * Test if audio buffer contains a valid wave header.
85 * \return If not, return -E_NO_WAV_HEADER, otherwise, return zero. If
86 * there is less than WAV_HEADER_LEN bytes available, return one.
88 static void check_wav_pre_select(__a_unused
struct sched
*s
, struct task
*t
)
90 struct check_wav_task
*cwt
= container_of(t
, struct check_wav_task
, task
);
94 if (*cwt
->loaded
< WAV_HEADER_LEN
) {
95 if (*cwt
->input_error
< 0)
96 t
->error
= *cwt
->input_error
;
100 cwt
->samplerate
= 44100;
101 a
= (unsigned char*)cwt
->buf
;
102 if (a
[0] != 'R' || a
[1] != 'I' || a
[2] != 'F' || a
[3] != 'F') {
103 PARA_NOTICE_LOG("wav header not found\n");
104 t
->error
= -E_NO_WAV_HEADER
;
107 cwt
->channels
= (unsigned) a
[22];
108 cwt
->samplerate
= a
[24] + (a
[25] << 8) + (a
[26] << 16) + (a
[27] << 24);
109 *cwt
->loaded
-= WAV_HEADER_LEN
;
110 memmove(cwt
->buf
, cwt
->buf
+ WAV_HEADER_LEN
, *cwt
->loaded
);
111 t
->error
= -E_WAV_HEADER_SUCCESS
;
112 PARA_INFO_LOG("channels: %d, sample rate: %d\n", cwt
->channels
, cwt
->samplerate
);
114 wng
->channels
= &cwt
->channels
;
115 wng
->samplerate
= &cwt
->samplerate
;
119 s
->timeout
.tv_sec
= 0;
120 s
->timeout
.tv_usec
= 1;
123 static void check_wav_pre_select_btr(__a_unused
struct sched
*s
, struct task
*t
)
125 struct check_wav_task_btr
*cwt
= container_of(t
, struct check_wav_task_btr
, task
);
127 if (btr_get_input_queue_size(cwt
->btrn
) < WAV_HEADER_LEN
)
129 s
->timeout
.tv_sec
= 0;
130 s
->timeout
.tv_usec
= 1;
133 static int check_wav_exec(struct btr_node
*btrn
, const char *cmd
, char **result
)
135 struct check_wav_task_btr
*cwt
= btr_context(btrn
);
138 if (!strcmp(cmd
, "samplerate")) {
139 if (cwt
->state
!= CWS_HAVE_HEADER
)
140 return -ERRNO_TO_PARA_ERROR(ENAVAIL
);
141 *result
= make_message("%d", cwt
->samplerate
);
144 if (!strcmp(cmd
, "channels")) {
145 if (cwt
->state
!= CWS_HAVE_HEADER
)
146 return -ERRNO_TO_PARA_ERROR(ENAVAIL
);
147 *result
= make_message("%d", cwt
->channels
);
150 return -ERRNO_TO_PARA_ERROR(ENOTSUP
);
153 static void check_wav_post_select_btr(__a_unused
struct sched
*s
, struct task
*t
)
155 struct check_wav_task_btr
*cwt
= container_of(t
, struct check_wav_task_btr
, task
);
157 size_t sz
= btr_get_input_queue_size(cwt
->btrn
);
160 if (cwt
->state
!= CWS_NEED_HEADER
)
162 if (sz
< WAV_HEADER_LEN
) {
163 if (!btr_no_parent(cwt
->btrn
))
166 cwt
->state
= CWS_NO_HEADER
;
169 t
->error
= -E_WRITE_EOF
;
173 cwt
->samplerate
= 44100;
174 btr_next_buffer(cwt
->btrn
, (char **)&a
);
175 if (a
[0] != 'R' || a
[1] != 'I' || a
[2] != 'F' || a
[3] != 'F') {
176 PARA_NOTICE_LOG("wav header not found\n");
177 cwt
->state
= CWS_NO_HEADER
;
178 sprintf(t
->status
, "check wav: no header");
181 PARA_INFO_LOG("found wav header\n");
182 cwt
->state
= CWS_HAVE_HEADER
;
183 sprintf(t
->status
, "check wav: have header");
184 cwt
->channels
= (unsigned) a
[22];
185 cwt
->samplerate
= a
[24] + (a
[25] << 8) + (a
[26] << 16) + (a
[27] << 24);
187 PARA_INFO_LOG("channels: %d, sample rate: %d\n", cwt
->channels
, cwt
->samplerate
);
188 btr_consume(cwt
->btrn
, WAV_HEADER_LEN
);
191 btr_pushdown(cwt
->btrn
);
192 s
->timeout
.tv_sec
= 0;
193 s
->timeout
.tv_usec
= 1;
195 if (btr_no_parent(cwt
->btrn
))
196 t
->error
= -E_WRITE_EOF
;
200 btr_del_node(cwt
->btrn
);
203 static void initial_delay_pre_select(struct sched
*s
, struct task
*t
)
205 struct initial_delay_task
*idt
= container_of(t
, struct initial_delay_task
, task
);
208 if (!idt
->start_time
.tv_sec
&& !idt
->start_time
.tv_usec
) {
209 t
->error
= -E_NO_DELAY
;
210 goto register_check_wav
;
212 if (tv_diff(now
, &idt
->start_time
, &diff
) > 0) {
213 t
->error
= -E_DELAY_TIMEOUT
;
214 goto register_check_wav
;
216 if (tv_diff(&s
->timeout
, &diff
, NULL
) > 0)
220 register_task(&the_check_wav_task
.task
);
221 s
->timeout
.tv_sec
= 0;
222 s
->timeout
.tv_usec
= 1;
226 INIT_STDERR_LOGGING(loglevel
)
228 static struct writer_node_group
*check_args(void)
230 int i
, ret
= -E_WRITE_SYNTAX
;
231 struct writer_node_group
*g
= NULL
;
232 struct initial_delay_task
*idt
= &the_initial_delay_task
;
234 loglevel
= get_loglevel_by_name(conf
.loglevel_arg
);
235 if (conf
.start_time_given
) {
236 long unsigned sec
, usec
;
237 if (sscanf(conf
.start_time_arg
, "%lu:%lu",
240 idt
->start_time
.tv_sec
= sec
;
241 idt
->start_time
.tv_usec
= usec
;
243 if (!conf
.writer_given
) {
244 g
= setup_default_wng();
248 g
= wng_new(conf
.writer_given
);
249 ret
= -E_WRITE_SYNTAX
;
250 for (i
= 0; i
< conf
.writer_given
; i
++) {
252 g
->writer_nodes
[i
].conf
= check_writer_arg(
253 conf
.writer_arg
[i
], &writer_num
);
254 if (!g
->writer_nodes
[i
].conf
)
256 g
->writer_nodes
[i
].writer_num
= writer_num
;
266 __noreturn
static void print_help_and_die(void)
268 int d
= conf
.detailed_help_given
;
269 const char **p
= d
? write_args_info_detailed_help
270 : write_args_info_help
;
272 printf_or_die("%s\n\n", WRITE_CMDLINE_PARSER_PACKAGE
"-"
273 WRITE_CMDLINE_PARSER_VERSION
);
274 printf_or_die("%s\n\n", write_args_info_usage
);
276 printf_or_die("%s\n", *p
);
277 print_writer_helps(d
);
282 TODO: check wav, initial delay, multiple writers, non-default writers
284 static int main_btr(struct sched
*s
)
287 struct check_wav_task_btr _cwt
, *cwt
= &_cwt
;
288 struct writer_node
**wns
;
290 sit
.btrn
= btr_new_node("stdin", NULL
/* stdin has no parent */, NULL
, NULL
);
291 stdin_set_defaults(&sit
);
292 register_task(&sit
.task
);
294 cwt
->state
= CWS_NEED_HEADER
;
295 cwt
->btrn
= btr_new_node("check wav", sit
.btrn
, check_wav_exec
, cwt
);
296 sprintf(cwt
->task
.status
, "check wav");
297 cwt
->task
.pre_select
= check_wav_pre_select_btr
;
298 cwt
->task
.post_select
= check_wav_post_select_btr
;
300 register_task(&cwt
->task
);
302 PARA_CRIT_LOG("writers:\n");
304 ret
= -E_WRITE_SYNTAX
;
305 if (!conf
.writer_given
) {
307 wns
= para_malloc(sizeof(*wns
));
308 wns
[0] = setup_writer_node(NULL
, cwt
->btrn
);
312 wns
= para_malloc(conf
.writer_given
* sizeof(*wns
));
313 for (i
= 0; i
< conf
.writer_given
; i
++) {
314 PARA_CRIT_LOG("i: %d\n", i
);
315 wns
[i
] = setup_writer_node(conf
.writer_arg
[i
],
322 s
->default_timeout
.tv_sec
= 10;
323 s
->default_timeout
.tv_usec
= 50000;
326 for (i
--; i
>= 0; i
--) {
327 struct writer_node
*wn
= wns
[i
];
328 struct writer
*w
= writers
+ wn
->writer_num
;
330 free(wn
->conf
); /* FIXME should call gengetopt cleanup funtion */
338 * Para_write's main function.
340 * \param argc The usual argument counter.
341 * \param argv The usual argument vector.
343 * It registers the stdin task, the check_wav_task, the task for initial delay
344 * and all tasks for actually writing out the stream.
346 * \return \p EXIT_SUCCESS or EXIT_FAILURE
348 int main(int argc
, char *argv
[])
350 int ret
= -E_WRITE_SYNTAX
;
351 static struct sched s
;
352 struct check_wav_task
*cwt
= &the_check_wav_task
;
353 struct initial_delay_task
*idt
= &the_initial_delay_task
;
356 write_cmdline_parser(argc
, argv
, &conf
);
357 HANDLE_VERSION_FLAG("write", conf
);
358 if (conf
.help_given
|| conf
.detailed_help_given
)
359 print_help_and_die();
361 if (conf
.buffer_tree_given
) {
368 stdin_set_defaults(&sit
);
369 ret
= -ERRNO_TO_PARA_ERROR(EINVAL
);
370 if (conf
.bufsize_arg
< 0)
372 if (conf
.bufsize_arg
>= INT_MAX
/ 1024)
374 sit
.bufsize
= conf
.bufsize_arg
* 1024;
375 sit
.buf
= para_malloc(sit
.bufsize
);
377 wng
->bufp
= &sit
.buf
;
378 wng
->loaded
= &sit
.loaded
;
379 wng
->input_error
= &sit
.task
.error
;
381 register_task(&sit
.task
);
384 cwt
->loaded
= &sit
.loaded
;
385 cwt
->input_error
= &sit
.task
.error
;
386 sprintf(cwt
->task
.status
, "check wav");
387 cwt
->task
.pre_select
= check_wav_pre_select
;
389 idt
->task
.pre_select
= initial_delay_pre_select
;
390 sprintf(idt
->task
.status
, "initial_delay");
391 register_task(&idt
->task
);
393 s
.default_timeout
.tv_sec
= 10;
394 s
.default_timeout
.tv_usec
= 0;
399 PARA_ERROR_LOG("%s\n", para_strerror(-ret
));