Add an 'sms' option to mobile.conf to manually enable or disable SMS support.
[asterisk/asterisk.git] / addons / format_mp3.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Anthony Minessale <anthmct@yahoo.com>
5  *
6  * Derived from other asterisk sound formats by
7  * Mark Spencer <markster@linux-support.net>
8  *
9  * Thanks to mpglib from http://www.mpg123.org/
10  * and Chris Stenton [jacs@gnome.co.uk]
11  * for coding the ability to play stereo and non-8khz files
12  
13  * See http://www.asterisk.org for more information about
14  * the Asterisk project. Please do not directly contact
15  * any of the maintainers of this project for assistance;
16  * the project provides a web site, mailing lists and IRC
17  * channels for your use.
18  *
19  * This program is free software, distributed under the terms of
20  * the GNU General Public License Version 2. See the LICENSE file
21  * at the top of the source tree.
22  */
23
24 /*!
25  * \file
26  * \brief MP3 Format Handler
27  * \ingroup formats
28  */
29
30 /*** MODULEINFO
31         <defaultenabled>no</defaultenabled>
32  ***/
33
34 #include "asterisk.h"
35
36 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
37
38 #include "mp3/mpg123.h"
39 #include "mp3/mpglib.h"
40
41 #include "asterisk/module.h"
42 #include "asterisk/mod_format.h"
43 #include "asterisk/logger.h"
44
45 #define MP3_BUFLEN 320
46 #define MP3_SCACHE 16384
47 #define MP3_DCACHE 8192
48
49 struct mp3_private {
50         char waste[AST_FRIENDLY_OFFSET];        /* Buffer for sending frames, etc */
51         char empty;                             /* Empty character */
52         int lasttimeout;
53         int maxlen;
54         struct timeval last;
55         struct mpstr mp;
56         char sbuf[MP3_SCACHE];
57         char dbuf[MP3_DCACHE];
58         int buflen;
59         int sbuflen;
60         int dbuflen;
61         int dbufoffset;
62         int sbufoffset;
63         int lastseek;
64         int offset;
65         long seek;
66 };
67
68 static const char name[] = "mp3";
69
70 #define BLOCKSIZE 160
71 #define OUTSCALE 4096
72
73 #define GAIN -4         /* 2^GAIN is the multiple to increase the volume by */
74
75 #if __BYTE_ORDER == __LITTLE_ENDIAN
76 #define htoll(b) (b)
77 #define htols(b) (b)
78 #define ltohl(b) (b)
79 #define ltohs(b) (b)
80 #else
81 #if __BYTE_ORDER == __BIG_ENDIAN
82 #define htoll(b)  \
83           (((((b)      ) & 0xFF) << 24) | \
84                ((((b) >>  8) & 0xFF) << 16) | \
85                    ((((b) >> 16) & 0xFF) <<  8) | \
86                    ((((b) >> 24) & 0xFF)      ))
87 #define htols(b) \
88           (((((b)      ) & 0xFF) << 8) | \
89                    ((((b) >> 8) & 0xFF)      ))
90 #define ltohl(b) htoll(b)
91 #define ltohs(b) htols(b)
92 #else
93 #error "Endianess not defined"
94 #endif
95 #endif
96
97
98 static int mp3_open(struct ast_filestream *s)
99 {
100         struct mp3_private *p = s->_private;
101         
102         InitMP3(&p->mp, OUTSCALE);
103         p->dbuflen = 0;
104         s->fr.data.ptr = s->buf;
105         s->fr.frametype = AST_FRAME_VOICE;
106         s->fr.subclass = AST_FORMAT_SLINEAR;
107         /* datalen will vary for each frame */
108         s->fr.src = name;
109         s->fr.mallocd = 0;
110         p->offset = 0;
111         return 0;
112 }
113
114
115 static void mp3_close(struct ast_filestream *s)
116 {
117         struct mp3_private *p = s->_private;
118         
119         ExitMP3(&p->mp);
120         return;
121 }
122
123 static int mp3_squeue(struct ast_filestream *s) 
124 {
125         struct mp3_private *p = s->_private;
126         int res=0;
127         
128         p->lastseek = ftell(s->f);
129         p->sbuflen = fread(p->sbuf, 1, MP3_SCACHE, s->f);
130         if(p->sbuflen < 0) {
131                 ast_log(LOG_WARNING, "Short read (%d) (%s)!\n", p->sbuflen, strerror(errno));
132                 return -1;
133         }
134         res = decodeMP3(&p->mp,p->sbuf,p->sbuflen,p->dbuf,MP3_DCACHE,&p->dbuflen);
135         if(res != MP3_OK)
136                 return -1;
137         p->sbuflen -= p->dbuflen;
138         p->dbufoffset = 0;
139         return 0;
140 }
141
142 static int mp3_dqueue(struct ast_filestream *s) 
143 {
144         struct mp3_private *p = s->_private;
145         int res=0;
146         
147         if((res = decodeMP3(&p->mp,NULL,0,p->dbuf,MP3_DCACHE,&p->dbuflen)) == MP3_OK) {
148                 p->sbuflen -= p->dbuflen;
149                 p->dbufoffset = 0;
150         }
151         return res;
152 }
153
154 static int mp3_queue(struct ast_filestream *s)
155 {
156         struct mp3_private *p = s->_private;
157         int res = 0, bytes = 0;
158         
159         if(p->seek) {
160                 ExitMP3(&p->mp);
161                 InitMP3(&p->mp, OUTSCALE);
162                 fseek(s->f, 0, SEEK_SET);
163                 p->sbuflen = p->dbuflen = p->offset = 0;
164                 while(p->offset < p->seek) {
165                         if(mp3_squeue(s))
166                                 return -1;
167                         while(p->offset < p->seek && ((res = mp3_dqueue(s))) == MP3_OK) {
168                                 for(bytes = 0 ; bytes < p->dbuflen ; bytes++) {
169                                         p->dbufoffset++;
170                                         p->offset++;
171                                         if(p->offset >= p->seek)
172                                                 break;
173                                 }
174                         }
175                         if(res == MP3_ERR)
176                                 return -1;
177                 }
178                 
179                 p->seek = 0;
180                 return 0;
181         }
182         if(p->dbuflen == 0) {
183                 if(p->sbuflen) {
184                         res = mp3_dqueue(s);
185                         if(res == MP3_ERR)
186                                 return -1;
187                 }
188                 if(! p->sbuflen || res != MP3_OK) {
189                         if(mp3_squeue(s))
190                                 return -1;
191                 }
192                 
193         }
194
195         return 0;
196 }
197
198 static struct ast_frame *mp3_read(struct ast_filestream *s, int *whennext)
199 {
200
201         struct mp3_private *p = s->_private;
202         int delay =0;
203         int save=0;
204
205         /* Send a frame from the file to the appropriate channel */
206
207         if(mp3_queue(s))
208                 return NULL;
209
210         if(p->dbuflen) {
211                 for(p->buflen=0; p->buflen < MP3_BUFLEN && p->buflen < p->dbuflen; p->buflen++) {
212                         s->buf[p->buflen] = p->dbuf[p->buflen+p->dbufoffset];
213                         p->sbufoffset++;
214                 }
215                 p->dbufoffset += p->buflen;
216                 p->dbuflen -= p->buflen;
217
218                 if(p->buflen < MP3_BUFLEN) {
219                         if(mp3_queue(s))
220                                 return NULL;
221
222                         for(save = p->buflen; p->buflen < MP3_BUFLEN; p->buflen++) {
223                                 s->buf[p->buflen] = p->dbuf[(p->buflen-save)+p->dbufoffset];
224                                 p->sbufoffset++;
225                         }
226                         p->dbufoffset += (MP3_BUFLEN - save);
227                         p->dbuflen -= (MP3_BUFLEN - save);
228
229                 } 
230
231         }
232         
233         p->offset += p->buflen;
234         delay = p->buflen/2;
235         s->fr.frametype = AST_FRAME_VOICE;
236         s->fr.subclass = AST_FORMAT_SLINEAR;
237         s->fr.offset = AST_FRIENDLY_OFFSET;
238         s->fr.datalen = p->buflen;
239         s->fr.data.ptr = s->buf;
240         s->fr.mallocd = 0;
241         s->fr.samples = delay;
242         *whennext = delay;
243         return &s->fr;
244 }
245
246
247 static int mp3_write(struct ast_filestream *fs, struct ast_frame *f)
248 {
249         ast_log(LOG_ERROR,"I Can't write MP3 only read them.\n");
250         return -1;
251
252 }
253
254
255 static int mp3_seek(struct ast_filestream *s, off_t sample_offset, int whence)
256 {
257         struct mp3_private *p = s->_private;
258         off_t min,max,cur;
259         long offset=0,samples;
260         samples = sample_offset * 2;
261
262         min = 0;
263         fseek(s->f, 0, SEEK_END);
264         max = ftell(s->f) * 100;
265         cur = p->offset;
266
267         if (whence == SEEK_SET)
268                 offset = samples + min;
269         else if (whence == SEEK_CUR || whence == SEEK_FORCECUR)
270                 offset = samples + cur;
271         else if (whence == SEEK_END)
272                 offset = max - samples;
273         if (whence != SEEK_FORCECUR) {
274                 offset = (offset > max)?max:offset;
275         }
276
277         p->seek = offset;
278         return p->seek;
279         
280 }
281
282 static int mp3_rewrite(struct ast_filestream *s, const char *comment) 
283 {
284         ast_log(LOG_ERROR,"I Can't write MP3 only read them.\n");
285         return -1;
286 }
287
288 static int mp3_trunc(struct ast_filestream *s) 
289 {
290
291         ast_log(LOG_ERROR,"I Can't write MP3 only read them.\n");
292         return -1;
293 }
294
295 static off_t mp3_tell(struct ast_filestream *s)
296 {
297         struct mp3_private *p = s->_private;
298         
299         return p->offset/2;
300 }
301
302 static char *mp3_getcomment(struct ast_filestream *s)
303 {
304         return NULL;
305 }
306
307 static const struct ast_format mp3_f = {
308         .name = "mp3",
309         .exts = "mp3",
310         .format = AST_FORMAT_SLINEAR,
311         .open = mp3_open,
312         .write = mp3_write,
313         .rewrite = mp3_rewrite,
314         .seek = mp3_seek,
315         .trunc = mp3_trunc,
316         .tell = mp3_tell,
317         .read = mp3_read,
318         .close = mp3_close,
319         .getcomment = mp3_getcomment,
320         .buf_size = MP3_BUFLEN + AST_FRIENDLY_OFFSET,
321         .desc_size = sizeof(struct mp3_private),
322 };
323
324
325 static int load_module(void)
326 {
327         InitMP3Constants();
328         return ast_format_register(&mp3_f);
329 }
330
331 static int unload_module(void)
332 {
333         return ast_format_unregister(name);
334 }       
335
336 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "MP3 format [Any rate but 8000hz mono is optimal]");