audiod_command.c: Trivial whitespace fix.
[paraslash.git] / wav_filter.c
1 /*
2 * Copyright (C) 2005 Andre Noll <maan@tuebingen.mpg.de>
3 *
4 * Licensed under the GPL v2. For licencing details see COPYING.
5 */
6
7 /** \file wav_filter.c A filter that inserts a wave header. */
8
9 #include <regex.h>
10
11 #include "para.h"
12 #include "error.h"
13 #include "list.h"
14 #include "sched.h"
15 #include "ggo.h"
16 #include "buffer_tree.h"
17 #include "filter.h"
18 #include "string.h"
19 #include "portable_io.h"
20
21 /** A wav header is always 44 bytes. */
22 #define WAV_HEADER_LEN 44
23 /** Always write 16 bit header. */
24 #define BITS 16
25
26 static void make_wav_header(unsigned int channels, unsigned int sample_rate,
27 char *headbuf)
28 {
29
30 unsigned int size = 0x7fffffff;
31 int bytespersec = channels * sample_rate * BITS / 8;
32 int align = channels * BITS / 8;
33
34 PARA_DEBUG_LOG("writing wave header: %d channels, %d KHz\n", channels, sample_rate);
35 memset(headbuf, 0, WAV_HEADER_LEN);
36 memcpy(headbuf, "RIFF", 4);
37 write_u32(headbuf + 4, size - 8);
38 memcpy(headbuf + 8, "WAVE", 4);
39 memcpy(headbuf + 12, "fmt ", 4);
40 write_u32(headbuf + 16, 16); /* 16 + extra format bytes (zero) */
41 write_u16(headbuf + 20, 1); /* format (1 == PCM/uncompressed) */
42 write_u16(headbuf + 22, channels);
43 write_u32(headbuf + 24, sample_rate);
44 write_u32(headbuf + 28, bytespersec);
45 write_u16(headbuf + 32, align); /* number of bytes per sample slice */
46 write_u16(headbuf + 34, BITS); /* significant bits per sample */
47 memcpy(headbuf + 36, "data", 4); /* chunk ID */
48 write_u32(headbuf + 40, size - 44); /* chunk size */
49 }
50
51 static void wav_close(struct filter_node *fn)
52 {
53 free(fn->private_data);
54 fn->private_data = NULL;
55 }
56
57 static void wav_open(struct filter_node *fn)
58 {
59 int *bof;
60
61 fn->private_data = para_malloc(sizeof(int));
62 bof = fn->private_data;
63 *bof = 1;
64 }
65
66 static void wav_pre_select(struct sched *s, void *context)
67 {
68 struct filter_node *fn = context;
69 size_t iqs = btr_get_input_queue_size(fn->btrn);
70
71 if (iqs == 0)
72 return;
73 sched_min_delay(s);
74 }
75
76 static int wav_post_select(__a_unused struct sched *s, void *context)
77 {
78 struct filter_node *fn = context;
79 struct btr_node *btrn = fn->btrn;
80 size_t iqs = btr_get_input_queue_size(btrn);
81 int ret;
82 char *header, *buf;
83 int32_t rate, ch;
84
85 if (iqs == 0) {
86 ret = -E_WAV_EOF;
87 if (btr_no_parent(btrn))
88 goto err;
89 return 0;
90 }
91 ret = btr_exec_up(btrn, "sample_rate", &buf);
92 if (ret < 0) {
93 ret = -E_WAV_BAD_FC;
94 goto err;
95 }
96 ret = para_atoi32(buf, &rate);
97 free(buf);
98 if (ret < 0)
99 goto err;
100 ret = btr_exec_up(btrn, "channels", &buf);
101 if (ret < 0) {
102 ret = -E_WAV_BAD_FC;
103 goto err;
104 }
105 ret = para_atoi32(buf, &ch);
106 free(buf);
107 if (ret < 0)
108 goto err;
109 header = para_malloc(WAV_HEADER_LEN);
110 make_wav_header(ch, rate, header);
111 btr_add_output(header, WAV_HEADER_LEN, btrn);
112 ret = -E_WAV_SUCCESS;
113 err:
114 if (ret == -E_WAV_SUCCESS)
115 btr_splice_out_node(&fn->btrn);
116 else {
117 btr_remove_node(&fn->btrn);
118 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
119 }
120 return ret;
121 }
122
123 /**
124 * The init function of the wav filter.
125 *
126 * \param f Structure to initialize.
127 */
128 void wav_filter_init(struct filter *f)
129 {
130 f->close = wav_close;
131 f->open = wav_open;
132 f->pre_select = wav_pre_select;
133 f->post_select = wav_post_select;
134 }