udp_send: Add/remove the udp socket fd only once.
[paraslash.git] / afh_common.c
1 /*
2  * Copyright (C) 1997-2010 Andre Noll <maan@systemlinux.org>
3  *
4  * Licensed under the GPL v2. For licencing details see COPYING.
5  */
6
7 /** \file afh_common.c Common audio format handler functions. */
8
9 #include <sys/mman.h> /* mmap */
10 #include <sys/time.h> /* gettimeofday */
11 #include <sys/types.h>
12 #include <dirent.h>
13 #include <regex.h>
14
15 #include "para.h"
16 #include "error.h"
17 #include "string.h"
18 #include "afh.h"
19
20 /* The mp3 audio format handler does not need any libs. */
21 void mp3_init(struct audio_format_handler *);
22
23 #ifdef HAVE_OGGVORBIS
24         void ogg_init(struct audio_format_handler *);
25 #endif
26 #ifdef HAVE_FAAD
27         void aac_afh_init(struct audio_format_handler *);
28 #endif
29 #ifdef HAVE_SPEEX
30         void spx_afh_init(struct audio_format_handler *);
31 #endif
32
33 void wma_afh_init(struct audio_format_handler *);
34 /**
35  * The list of supported audio formats.
36  *
37  * We always define the full array of audio formats even if some audio formats
38  * were not compiled in. This is because for each audio file the number of its
39  * audio format is stored in the database. We don't want that numbers to become
40  * stale just because the user installed a new version of paraslash that
41  * supports a different set of audio formats.
42  *
43  * It can still be easily detected whether an audio format is compiled in by
44  * checking if the init function pointer is not \p NULL.
45  */
46 static struct audio_format_handler afl[] = {
47         {
48                 .name = "mp3",
49                 .init = mp3_init,
50         },
51         {
52                 .name = "ogg",
53 #ifdef HAVE_OGGVORBIS
54                 .init = ogg_init,
55 #endif
56         },
57         {
58                 .name = "aac",
59 #ifdef HAVE_FAAD
60                 .init = aac_afh_init,
61 #endif
62         },
63         {
64                 .name = "wma",
65                 .init = wma_afh_init,
66         },
67         {
68                 .name = "spx",
69 #ifdef HAVE_SPEEX
70                 .init = spx_afh_init,
71 #endif
72         },
73         {
74                 .name = NULL,
75         }
76 };
77
78 static inline int next_audio_format(int format)
79 {
80         for (;;) {
81                 if (!afl[format].name)
82                         return format;
83                 format++;
84                 if (afl[format].init)
85                         return format;
86         }
87
88 }
89
90 /** Iterate over each supported audio format. */
91 #define FOR_EACH_AUDIO_FORMAT(i) for (i = 0; afl[i].name; i = next_audio_format(i))
92
93 /**
94  * Call the init function of each supported audio format handler.
95  */
96 void afh_init(void)
97 {
98         int i;
99
100         PARA_INFO_LOG("supported audio formats: %s\n",
101                 SERVER_AUDIO_FORMATS);
102         FOR_EACH_AUDIO_FORMAT(i) {
103                 PARA_NOTICE_LOG("initializing %s handler\n",
104                         audio_format_name(i));
105                 afl[i].init(&afl[i]);
106         }
107 }
108
109 /**
110  * Guess the audio format judging from filename.
111  *
112  * \param name The filename.
113  *
114  * \return This function returns \p -E_AUDIO_FORMAT if it has no idea what kind
115  * of audio file this might be. Otherwise the (non-negative) number of the
116  * audio format is returned.
117  */
118 int guess_audio_format(const char *name)
119 {
120         int i,j, len = strlen(name);
121
122         FOR_EACH_AUDIO_FORMAT(i) {
123                 for (j = 0; afl[i].suffixes[j]; j++) {
124                         const char *p = afl[i].suffixes[j];
125                         int plen = strlen(p);
126                         if (len < plen + 1)
127                                 continue;
128                         if (name[len - plen - 1] != '.')
129                                 continue;
130                         if (strcasecmp(name + len - plen, p))
131                                 continue;
132 //                      PARA_DEBUG_LOG("might be %s\n", audio_format_name(i));
133                         return i;
134                 }
135         }
136         return -E_AUDIO_FORMAT;
137 }
138
139 /**
140  * Call get_file_info() to obtain an afhi structure.
141  *
142  * \param path The full path of the audio file.
143  * \param data Pointer to the contents of the (mapped) file.
144  * \param size The file size in bytes.
145  * \param fd The open file descriptor.
146  * \param afhi Result pointer.
147  *
148  * \return The number of the audio format on success, \p -E_AUDIO_FORMAT if no
149  * compiled in audio format handler is able to handler the file.
150  *
151  * This function tries to find an audio format handler that can interpret the
152  * file given by \a data and \a size.
153  *
154  * It first tries to determine the audio format from the filename given by \a
155  * path. If this doesn't work, all other audio format handlers are tried until
156  * one is found that can handle the file.
157  */
158 int compute_afhi(const char *path, char *data, size_t size, int fd,
159                 struct afh_info *afhi)
160 {
161         int ret, i, format;
162
163         afhi->header_offset = 0;
164         afhi->header_len = 0;
165         afhi->techinfo = NULL;
166         afhi->tags.artist = NULL;
167         afhi->tags.title = NULL;
168         afhi->tags.year = NULL;
169         afhi->tags.album = NULL;
170         afhi->tags.comment = NULL;
171         format = guess_audio_format(path);
172
173         if (format >= 0) {
174                 ret = afl[format].get_file_info(data, size, fd, afhi);
175                 if (ret >= 0) {
176                         ret = format;
177                         goto success;
178                 }
179         }
180         FOR_EACH_AUDIO_FORMAT(i) {
181                 if (i == format) /* we already tried this one to no avail */
182                         continue;
183                 ret = afl[i].get_file_info(data, size, fd, afhi);
184                 if (ret >= 0) {
185                         ret = i;
186                         goto success;
187                 }
188                 PARA_WARNING_LOG("%s\n", para_strerror(-ret));
189         }
190         return -E_AUDIO_FORMAT;
191 success:
192         if (!afhi->techinfo)
193                 afhi->techinfo = para_strdup(NULL);
194         if (!afhi->tags.artist)
195                 afhi->tags.artist = para_strdup(NULL);
196         if (!afhi->tags.title)
197                 afhi->tags.title = para_strdup(NULL);
198         if (!afhi->tags.year)
199                 afhi->tags.year = para_strdup(NULL);
200         if (!afhi->tags.album)
201                 afhi->tags.album = para_strdup(NULL);
202         if (!afhi->tags.comment)
203                 afhi->tags.comment = para_strdup(NULL);
204         PARA_DEBUG_LOG("techinfo: %s\n", afhi->techinfo);
205         PARA_DEBUG_LOG("artist: %s\n", afhi->tags.artist);
206         PARA_DEBUG_LOG("title: %s\n", afhi->tags.title);
207         PARA_DEBUG_LOG("year: %s\n", afhi->tags.year);
208         PARA_DEBUG_LOG("album: %s\n", afhi->tags.album);
209         PARA_DEBUG_LOG("comment: %s\n", afhi->tags.comment);
210         return ret;
211 }
212
213 /**
214  * Get the name of the given audio format.
215  *
216  * \param i The audio format number.
217  *
218  * This returns a pointer to statically allocated memory so it
219  * must not be freed by the caller.
220  */
221 const char *audio_format_name(int i)
222 {
223         if (i < 0 || i >= ARRAY_SIZE(afl) - 1)
224                 return "???";
225         return afl[i].name;
226 }
227
228 /**
229  * Get one chunk of audio data.
230  *
231  * \param chunk_num The number of the chunk to get.
232  * \param afhi Describes the audio file.
233  * \param map The memory mapped audio file.
234  * \param buf Result pointer.
235  * \param len The length of the chunk in bytes.
236  *
237  * Upon return, \a buf will point so memory inside \a map. The returned buffer
238  * must therefore not be freed by the caller.
239  */
240 void afh_get_chunk(long unsigned chunk_num, struct afh_info *afhi,
241                 void *map, const char **buf, size_t *len)
242 {
243         size_t pos = afhi->chunk_table[chunk_num];
244         *buf = map + pos;
245         *len = afhi->chunk_table[chunk_num + 1] - pos;
246 }
247
248 /**
249  * Get the header of an audio file.
250  *
251  * \param afhi The audio file handler data describing the file.
252  * \param map The data of the audio file.
253  * \param buf The length of the header is stored here.
254  * \param len Points to a buffer containing the header on return.
255  *
256  * This function sets \a buf to \p NULL and \a len to zero if \a map or \a
257  * afhi is \p NULL, or if the current audio format does not need special
258  * header treatment.
259  */
260 void afh_get_header(struct afh_info *afhi, void *map, const char **buf, size_t *len)
261 {
262         if (!map || !afhi || !afhi->header_len) {
263                 *buf = NULL;
264                 *len = 0;
265                 return;
266         }
267         *len = afhi->header_len;
268         *buf = map + afhi->header_offset;
269 }