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
);
137 if (!strcmp(cmd
, "samplerate")) {
138 if (cwt
->state
!= CWS_HAVE_HEADER
)
139 return -ERRNO_TO_PARA_ERROR(ENAVAIL
);
140 *result
= make_message("%d", cwt
->samplerate
);
143 if (!strcmp(cmd
, "channels")) {
144 if (cwt
->state
!= CWS_HAVE_HEADER
)
145 return -ERRNO_TO_PARA_ERROR(ENAVAIL
);
146 *result
= make_message("%d", cwt
->samplerate
);
149 return -ERRNO_TO_PARA_ERROR(ENOTSUP
);
152 static void check_wav_post_select_btr(__a_unused
struct sched
*s
, struct task
*t
)
154 struct check_wav_task_btr
*cwt
= container_of(t
, struct check_wav_task_btr
, task
);
156 size_t sz
= btr_get_input_queue_size(cwt
->btrn
);
159 if (cwt
->state
!= CWS_NEED_HEADER
)
161 if (sz
< WAV_HEADER_LEN
) {
162 if (!btr_no_parent(cwt
->btrn
))
165 cwt
->state
= CWS_NO_HEADER
;
168 t
->error
= -E_WRITE_EOF
;
172 cwt
->samplerate
= 44100;
173 btr_next_buffer(cwt
->btrn
, (char **)&a
);
174 if (a
[0] != 'R' || a
[1] != 'I' || a
[2] != 'F' || a
[3] != 'F') {
175 PARA_NOTICE_LOG("wav header not found\n");
176 cwt
->state
= CWS_NO_HEADER
;
177 sprintf(t
->status
, "check wav: no header");
180 PARA_INFO_LOG("found wav header\n");
181 cwt
->state
= CWS_HAVE_HEADER
;
182 sprintf(t
->status
, "check wav: have header");
183 cwt
->channels
= (unsigned) a
[22];
184 cwt
->samplerate
= a
[24] + (a
[25] << 8) + (a
[26] << 16) + (a
[27] << 24);
186 PARA_INFO_LOG("channels: %d, sample rate: %d\n", cwt
->channels
, cwt
->samplerate
);
187 btr_consume(cwt
->btrn
, WAV_HEADER_LEN
);
190 btr_pushdown(cwt
->btrn
);
191 s
->timeout
.tv_sec
= 0;
192 s
->timeout
.tv_usec
= 1;
194 if (btr_no_parent(cwt
->btrn
))
195 t
->error
= -E_WRITE_EOF
;
199 btr_del_node(cwt
->btrn
);
202 static void initial_delay_pre_select(struct sched
*s
, struct task
*t
)
204 struct initial_delay_task
*idt
= container_of(t
, struct initial_delay_task
, task
);
207 if (!idt
->start_time
.tv_sec
&& !idt
->start_time
.tv_usec
) {
208 t
->error
= -E_NO_DELAY
;
209 goto register_check_wav
;
211 if (tv_diff(now
, &idt
->start_time
, &diff
) > 0) {
212 t
->error
= -E_DELAY_TIMEOUT
;
213 goto register_check_wav
;
215 if (tv_diff(&s
->timeout
, &diff
, NULL
) > 0)
219 register_task(&the_check_wav_task
.task
);
220 s
->timeout
.tv_sec
= 0;
221 s
->timeout
.tv_usec
= 1;
225 INIT_STDERR_LOGGING(loglevel
)
227 static struct writer_node_group
*check_args(void)
229 int i
, ret
= -E_WRITE_SYNTAX
;
230 struct writer_node_group
*g
= NULL
;
231 struct initial_delay_task
*idt
= &the_initial_delay_task
;
233 loglevel
= get_loglevel_by_name(conf
.loglevel_arg
);
234 if (conf
.start_time_given
) {
235 long unsigned sec
, usec
;
236 if (sscanf(conf
.start_time_arg
, "%lu:%lu",
239 idt
->start_time
.tv_sec
= sec
;
240 idt
->start_time
.tv_usec
= usec
;
242 if (!conf
.writer_given
) {
243 g
= setup_default_wng();
247 g
= wng_new(conf
.writer_given
);
248 ret
= -E_WRITE_SYNTAX
;
249 for (i
= 0; i
< conf
.writer_given
; i
++) {
251 g
->writer_nodes
[i
].conf
= check_writer_arg(
252 conf
.writer_arg
[i
], &writer_num
);
253 if (!g
->writer_nodes
[i
].conf
)
255 g
->writer_nodes
[i
].writer_num
= writer_num
;
265 __noreturn
static void print_help_and_die(void)
267 int d
= conf
.detailed_help_given
;
268 const char **p
= d
? write_args_info_detailed_help
269 : write_args_info_help
;
271 printf_or_die("%s\n\n", WRITE_CMDLINE_PARSER_PACKAGE
"-"
272 WRITE_CMDLINE_PARSER_VERSION
);
273 printf_or_die("%s\n\n", write_args_info_usage
);
275 printf_or_die("%s\n", *p
);
276 print_writer_helps(d
);
281 TODO: check wav, initial delay, multiple writers, non-default writers
283 static int main_btr(struct sched
*s
)
286 struct check_wav_task_btr _cwt
, *cwt
= &_cwt
;
287 struct writer_node
**wns
;
289 sit
.btrn
= btr_new_node("stdin", NULL
/* stdin has no parent */, NULL
, NULL
);
290 stdin_set_defaults(&sit
);
291 register_task(&sit
.task
);
293 cwt
->state
= CWS_NEED_HEADER
;
294 cwt
->btrn
= btr_new_node("check wav", sit
.btrn
, check_wav_exec
, cwt
);
295 sprintf(cwt
->task
.status
, "check wav");
296 cwt
->task
.pre_select
= check_wav_pre_select_btr
;
297 cwt
->task
.post_select
= check_wav_post_select_btr
;
299 register_task(&cwt
->task
);
301 wns
= para_malloc(conf
.writer_given
* sizeof(*wns
));
303 for (i
= 0; i
< conf
.writer_given
; i
++) {
304 struct writer_node
*wn
= para_calloc(sizeof(*wn
));
308 ret
= -E_WRITE_SYNTAX
;
309 wn
->conf
= check_writer_arg(conf
.writer_arg
[i
],
313 w
= writers
+ wn
->writer_num
;
314 name
= writer_names
[wn
->writer_num
];
315 wn
->btrn
= btr_new_node(name
, cwt
->btrn
, w
->execute
, wn
);
316 sprintf(wn
->task
.status
, "%s", name
);
318 wn
->task
.post_select
= w
->post_select_btr
;
319 wn
->task
.pre_select
= w
->pre_select_btr
;
320 register_task(&wn
->task
);
325 s
->default_timeout
.tv_sec
= 10;
326 s
->default_timeout
.tv_usec
= 50000;
329 for (; i
>= 0; i
--) {
330 struct writer_node
*wn
= wns
[i
];
339 * Para_write's main function.
341 * \param argc The usual argument counter.
342 * \param argv The usual argument vector.
344 * It registers the stdin task, the check_wav_task, the task for initial delay
345 * and all tasks for actually writing out the stream.
347 * \return \p EXIT_SUCCESS or EXIT_FAILURE
349 int main(int argc
, char *argv
[])
351 int ret
= -E_WRITE_SYNTAX
;
352 static struct sched s
;
353 struct check_wav_task
*cwt
= &the_check_wav_task
;
354 struct initial_delay_task
*idt
= &the_initial_delay_task
;
357 write_cmdline_parser(argc
, argv
, &conf
);
358 HANDLE_VERSION_FLAG("write", conf
);
359 if (conf
.help_given
|| conf
.detailed_help_given
)
360 print_help_and_die();
362 if (conf
.buffer_tree_given
) {
369 stdin_set_defaults(&sit
);
370 ret
= -ERRNO_TO_PARA_ERROR(EINVAL
);
371 if (conf
.bufsize_arg
< 0)
373 if (conf
.bufsize_arg
>= INT_MAX
/ 1024)
375 sit
.bufsize
= conf
.bufsize_arg
* 1024;
376 sit
.buf
= para_malloc(sit
.bufsize
);
378 wng
->bufp
= &sit
.buf
;
379 wng
->loaded
= &sit
.loaded
;
380 wng
->input_error
= &sit
.task
.error
;
382 register_task(&sit
.task
);
385 cwt
->loaded
= &sit
.loaded
;
386 cwt
->input_error
= &sit
.task
.error
;
387 sprintf(cwt
->task
.status
, "check wav");
388 cwt
->task
.pre_select
= check_wav_pre_select
;
390 idt
->task
.pre_select
= initial_delay_pre_select
;
391 sprintf(idt
->task
.status
, "initial_delay");
392 register_task(&idt
->task
);
394 s
.default_timeout
.tv_sec
= 10;
395 s
.default_timeout
.tv_usec
= 0;
400 PARA_ERROR_LOG("%s\n", para_strerror(-ret
));