Fix a bug in para_write.
[paraslash.git] / write_common.c
1 /*
2 * Copyright (C) 2006-2008 Andre Noll <maan@systemlinux.org>
3 *
4 * Licensed under the GPL v2. For licencing details see COPYING.
5 */
6
7 /** \file write_common.c common functions of para_audiod and para_write */
8
9 #include "para.h"
10 #include "string.h"
11 #include "list.h"
12 #include "sched.h"
13 #include "write.h"
14 #include "error.h"
15
16 /** the array containing the names of all supported writers */
17 const char *writer_names[] ={WRITER_NAMES};
18
19 /** the array of supported writers */
20 struct writer writers[NUM_SUPPORTED_WRITERS] = {WRITER_ARRAY};
21
22 static void wng_pre_select(__a_unused struct sched *s, struct task *t)
23 {
24 struct writer_node_group *g = container_of(t, struct writer_node_group, task);
25 int i;
26
27 FOR_EACH_WRITER_NODE(i, g) {
28 struct writer_node *wn = &g->writer_nodes[i];
29 t->error = wn->writer->pre_select(s, wn);
30 if (t->error < 0)
31 return;
32 }
33 }
34
35 static void wng_post_select(struct sched *s, struct task *t)
36 {
37 struct writer_node_group *g = container_of(t, struct writer_node_group, task);
38 int i;
39 size_t min_written = 0;
40
41 FOR_EACH_WRITER_NODE(i, g) {
42 struct writer_node *wn = &g->writer_nodes[i];
43 t->error = wn->writer->post_select(s, wn);
44 if (t->error < 0)
45 return;
46 if (!i)
47 min_written = wn->written;
48 else
49 min_written = PARA_MIN(min_written, wn->written);
50 }
51 //PARA_INFO_LOG("loaded: %zd, min_written: %zd bytes\n", *g->loaded, min_written);
52 if (min_written) {
53 *g->loaded -= min_written;
54 FOR_EACH_WRITER_NODE(i, g)
55 g->writer_nodes[i].written -= min_written;
56 }
57 if (!*g->loaded && *g->input_error) {
58 t->error = *g->input_error;
59 return;
60 }
61 if (*g->loaded && min_written) {
62 // PARA_INFO_LOG("moving %zd bytes\n", *g->loaded);
63 memmove(g->buf, g->buf + min_written, *g->loaded);
64 }
65 }
66
67 /**
68 * call the open function of each writer in the group
69 *
70 * \param g the writer node group
71 *
72 * \return If at least one open function returned an error, all successful
73 * writer notes get closed and this error value is returned. Upon success, a
74 * task associated with \a g is registered to the scheduler and the function
75 * returns a positive value.
76 * */
77 int wng_open(struct writer_node_group *g)
78 {
79 int i, ret = 1;
80
81 PARA_NOTICE_LOG("opening wng %p with %d writer(s)\n", g, g->num_writers);
82 FOR_EACH_WRITER_NODE(i, g) {
83 struct writer_node *wn = &g->writer_nodes[i];
84 wn->wng = g;
85 ret = wn->writer->open(wn);
86 if (ret < 0)
87 goto err_out;
88 wn->chunk_bytes = ret;
89 g->max_chunk_bytes = PARA_MAX(g->max_chunk_bytes, ret);
90 }
91 sprintf(g->task.status, "%s", "writer node group");
92 register_task(&g->task);
93 g->open = 1;
94 return 1;
95 err_out:
96 PARA_ERROR_LOG("%s\n", para_strerror(-ret));
97 while (i > 0) {
98 struct writer_node *wn = &g->writer_nodes[--i];
99 wn->writer->close(wn);
100 }
101 g->num_writers = 0;
102 return ret;
103 }
104
105 /**
106 * call the close function of each writer in the given group
107 *
108 * \param g the writer node group to close
109 *
110 * This function also frees all resources of the given group.
111 */
112 void wng_close(struct writer_node_group *g)
113 {
114 int i;
115
116 if (!g || !g->open)
117 return;
118 PARA_NOTICE_LOG("closing wng with %d writer(s)\n", g->num_writers);
119 FOR_EACH_WRITER_NODE(i, g) {
120 struct writer_node *wn = &g->writer_nodes[i];
121 wn->writer->close(wn);
122 }
123 free(g->writer_nodes);
124 free(g);
125 }
126
127 /**
128 * allocate and initialize a new writer_node_group struct
129 *
130 * \param num_writers the number of writer nodes for the new group
131 *
132 * \return Pointer to the new writer node group
133 */
134 struct writer_node_group *wng_new(unsigned num_writers)
135 {
136 struct writer_node_group *g = para_calloc(sizeof(struct writer_node_group));
137 g->num_writers = num_writers;
138 g->writer_nodes = para_calloc(num_writers
139 * sizeof(struct writer_node));
140 g->task.post_select = wng_post_select;
141 g->task.pre_select = wng_pre_select;
142 return g;
143 }
144
145 /**
146 * call the init function of each supported paraslash writer
147 */
148 void init_supported_writers(void)
149 {
150 int i;
151
152 FOR_EACH_WRITER(i)
153 writers[i].init(&writers[i]);
154 }
155 /**
156 * check if given string is a valid command line for any writer
157 *
158 * \param \wa string of the form writer_name:options
159 * \param writer_num contains the number of the writer upon success
160 *
161 * This function checks whether \a wa starts with the name of a supported
162 * paraslash writer, optionally followed by a colon and any options for that
163 * writer. If a valid writer name was found and further are present, the
164 * remaining part of \a wa is passed to that writer's config parser.
165 *
166 * \return On success, a pointer to the gengetopt args info struct is returned
167 * and \a writer_num contains the number of the writer. Otherwise this function
168 * returns \p NULL.
169 */
170 void *check_writer_arg(const char *wa, int *writer_num)
171 {
172 int i;
173
174 *writer_num = -E_WRITE_COMMON_SYNTAX;
175 PARA_INFO_LOG("checking %s\n", wa);
176 FOR_EACH_WRITER(i) {
177 const char *name = writer_names[i];
178 size_t len = strlen(name);
179 char c;
180 if (strlen(wa) < len)
181 continue;
182 if (strncmp(name, wa, len))
183 continue;
184 c = wa[len];
185 if (c && c != ' ')
186 continue;
187 if (c && !writers[i].parse_config)
188 return NULL;
189 *writer_num = i;
190 return writers[i].parse_config(c? wa + len + 1 : "");
191 }
192 PARA_ERROR_LOG("writer not found\n");
193 return NULL;
194 }
195
196 /**
197 * setup a writer node group with only one writer, the default writer
198 *
199 * The writer which is set up depends on the OS. It defaults to alsa for Linux,
200 * osx_write for OS X, file writer if neither of these is supported.
201 *
202 * \return pointer to the allocated writer node group
203 */
204 struct writer_node_group *setup_default_wng(void)
205 {
206 struct writer_node_group *wng = wng_new(1);
207 wng->writer_nodes[0].writer = &writers[DEFAULT_WRITER];
208 PARA_INFO_LOG("using default writer: %s %p\n",
209 writer_names[DEFAULT_WRITER], writers[DEFAULT_WRITER].parse_config);
210 wng->writer_nodes[0].conf = writers[DEFAULT_WRITER].parse_config("");
211 return wng;
212 }