codecs: Add Codec 2 mode 2400.
[asterisk/asterisk.git] / main / format_cache.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 2014, Digium, Inc.
5  *
6  * Joshua Colp <jcolp@digium.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*! \file
20  *
21  * \brief Media Format Cache API
22  *
23  * \author Joshua Colp <jcolp@digium.com>
24  */
25
26 /*** MODULEINFO
27         <support_level>core</support_level>
28  ***/
29
30 #include "asterisk.h"
31
32 ASTERISK_REGISTER_FILE()
33
34 #include "asterisk/logger.h"
35 #include "asterisk/format.h"
36 #include "asterisk/format_cache.h"
37 #include "asterisk/astobj2.h"
38 #include "asterisk/strings.h"
39
40 /*!
41  * \brief Built-in cached signed linear 8kHz format.
42  */
43 struct ast_format *ast_format_slin;
44
45 /*!
46  * \brief Built-in cached signed linear 12kHz format.
47  */
48 struct ast_format *ast_format_slin12;
49
50 /*!
51  * \brief Built-in cached signed linear 16kHz format.
52  */
53 struct ast_format *ast_format_slin16;
54
55 /*!
56  * \brief Built-in cached signed linear 24kHz format.
57  */
58 struct ast_format *ast_format_slin24;
59
60 /*!
61  * \brief Built-in cached signed linear 32kHz format.
62  */
63 struct ast_format *ast_format_slin32;
64
65 /*!
66  * \brief Built-in cached signed linear 44kHz format.
67  */
68 struct ast_format *ast_format_slin44;
69
70 /*!
71  * \brief Built-in cached signed linear 48kHz format.
72  */
73 struct ast_format *ast_format_slin48;
74
75 /*!
76  * \brief Built-in cached signed linear 96kHz format.
77  */
78 struct ast_format *ast_format_slin96;
79
80 /*!
81  * \brief Built-in cached signed linear 192kHz format.
82  */
83 struct ast_format *ast_format_slin192;
84
85 /*!
86  * \brief Built-in cached ulaw format.
87  */
88 struct ast_format *ast_format_ulaw;
89
90 /*!
91  * \brief Built-in cached alaw format.
92  */
93 struct ast_format *ast_format_alaw;
94
95 /*!
96  * \brief Built-in cached testlaw format.
97  */
98 struct ast_format *ast_format_testlaw;
99
100 /*!
101  * \brief Built-in cached gsm format.
102  */
103 struct ast_format *ast_format_gsm;
104
105 /*!
106  * \brief Built-in cached adpcm format.
107  */
108 struct ast_format *ast_format_adpcm;
109
110 /*!
111  * \brief Built-in cached g722 format.
112  */
113 struct ast_format *ast_format_g722;
114
115 /*!
116  * \brief Built-in cached g726 format.
117  */
118 struct ast_format *ast_format_g726;
119
120 /*!
121  * \brief Built-in cached g726-aal2 format.
122  */
123 struct ast_format *ast_format_g726_aal2;
124
125 /*!
126  * \brief Built-in cached ilbc format.
127  */
128 struct ast_format *ast_format_ilbc;
129
130 /*!
131  * \brief Built-in cached ilbc format.
132  */
133 struct ast_format *ast_format_lpc10;
134
135 /*!
136  * \brief Built-in cached speex format.
137  */
138 struct ast_format *ast_format_speex;
139
140 /*!
141  * \brief Built-in cached speex at 16kHz format.
142  */
143 struct ast_format *ast_format_speex16;
144
145 /*!
146  * \brief Built-in cached speex at 32kHz format.
147  */
148 struct ast_format *ast_format_speex32;
149
150 /*!
151  * \brief Built-in cached g723.1 format.
152  */
153 struct ast_format *ast_format_g723;
154
155 /*!
156  * \brief Built-in cached g729 format.
157  */
158 struct ast_format *ast_format_g729;
159
160 /*!
161  * \brief Built-in cached g719 format.
162  */
163 struct ast_format *ast_format_g719;
164
165 /*!
166  * \brief Built-in cached h261 format.
167  */
168 struct ast_format *ast_format_h261;
169
170 /*!
171  * \brief Built-in cached h263 format.
172  */
173 struct ast_format *ast_format_h263;
174
175 /*!
176  * \brief Built-in cached h263 plus format.
177  */
178 struct ast_format *ast_format_h263p;
179
180 /*!
181  * \brief Built-in cached h264 format.
182  */
183 struct ast_format *ast_format_h264;
184
185 /*!
186  * \brief Built-in cached mp4 format.
187  */
188 struct ast_format *ast_format_mp4;
189
190 /*!
191  * \brief Built-in cached vp8 format.
192  */
193 struct ast_format *ast_format_vp8;
194
195 /*!
196  * \brief Built-in cached jpeg format.
197  */
198 struct ast_format *ast_format_jpeg;
199
200 /*!
201  * \brief Built-in cached png format.
202  */
203 struct ast_format *ast_format_png;
204
205 /*!
206  * \brief Built-in cached siren14 format.
207  */
208 struct ast_format *ast_format_siren14;
209
210 /*!
211  * \brief Built-in cached siren7 format.
212  */
213 struct ast_format *ast_format_siren7;
214
215 /*!
216  * \brief Built-in cached opus format.
217  */
218 struct ast_format *ast_format_opus;
219
220 /*!
221  * \brief Built-in cached codec2 format.
222  */
223 struct ast_format *ast_format_codec2;
224
225 /*!
226  * \brief Built-in cached t140 format.
227  */
228 struct ast_format *ast_format_t140;
229
230 /*!
231  * \brief Built-in cached t140 red format.
232  */
233 struct ast_format *ast_format_t140_red;
234
235 /*!
236  * \brief Built-in "null" format.
237  */
238 struct ast_format *ast_format_none;
239
240 /*!
241  * \brief Built-in "silk" format
242  */
243 struct ast_format *ast_format_silk8;
244 struct ast_format *ast_format_silk12;
245 struct ast_format *ast_format_silk16;
246 struct ast_format *ast_format_silk24;
247
248 /*! \brief Number of buckets to use for the media format cache (should be prime for performance reasons) */
249 #define CACHE_BUCKETS 53
250
251 /*! \brief Cached formats */
252 static struct ao2_container *formats;
253
254 static int format_hash_cb(const void *obj, int flags)
255 {
256         const struct ast_format *format;
257         const char *key;
258
259         switch (flags & OBJ_SEARCH_MASK) {
260         case OBJ_SEARCH_KEY:
261                 key = obj;
262                 return ast_str_case_hash(key);
263         case OBJ_SEARCH_OBJECT:
264                 format = obj;
265                 return ast_str_case_hash(ast_format_get_name(format));
266         default:
267                 /* Hash can only work on something with a full key. */
268                 ast_assert(0);
269                 return 0;
270         }
271 }
272
273 static int format_cmp_cb(void *obj, void *arg, int flags)
274 {
275         const struct ast_format *left = obj;
276         const struct ast_format *right = arg;
277         const char *right_key = arg;
278         int cmp;
279
280         switch (flags & OBJ_SEARCH_MASK) {
281         case OBJ_SEARCH_OBJECT:
282                 right_key = ast_format_get_name(right);
283                 /* Fall through */
284         case OBJ_SEARCH_KEY:
285                 cmp = strcasecmp(ast_format_get_name(left), right_key);
286                 break;
287         case OBJ_SEARCH_PARTIAL_KEY:
288                 cmp = strncasecmp(ast_format_get_name(left), right_key, strlen(right_key));
289                 break;
290         default:
291                 ast_assert(0);
292                 cmp = 0;
293                 break;
294         }
295         if (cmp) {
296                 return 0;
297         }
298
299         return CMP_MATCH;
300 }
301
302 /*! \brief Function called when the process is shutting down */
303 static void format_cache_shutdown(void)
304 {
305         ao2_cleanup(formats);
306         formats = NULL;
307
308         ao2_replace(ast_format_g723, NULL);
309         ao2_replace(ast_format_ulaw, NULL);
310         ao2_replace(ast_format_alaw, NULL);
311         ao2_replace(ast_format_gsm, NULL);
312         ao2_replace(ast_format_g726, NULL);
313         ao2_replace(ast_format_g726_aal2, NULL);
314         ao2_replace(ast_format_adpcm, NULL);
315         ao2_replace(ast_format_slin, NULL);
316         ao2_replace(ast_format_slin12, NULL);
317         ao2_replace(ast_format_slin16, NULL);
318         ao2_replace(ast_format_slin24, NULL);
319         ao2_replace(ast_format_slin32, NULL);
320         ao2_replace(ast_format_slin44, NULL);
321         ao2_replace(ast_format_slin48, NULL);
322         ao2_replace(ast_format_slin96, NULL);
323         ao2_replace(ast_format_slin192, NULL);
324         ao2_replace(ast_format_lpc10, NULL);
325         ao2_replace(ast_format_g729, NULL);
326         ao2_replace(ast_format_speex, NULL);
327         ao2_replace(ast_format_speex16, NULL);
328         ao2_replace(ast_format_speex32, NULL);
329         ao2_replace(ast_format_ilbc, NULL);
330         ao2_replace(ast_format_g722, NULL);
331         ao2_replace(ast_format_siren7, NULL);
332         ao2_replace(ast_format_siren14, NULL);
333         ao2_replace(ast_format_testlaw, NULL);
334         ao2_replace(ast_format_g719, NULL);
335         ao2_replace(ast_format_opus, NULL);
336         ao2_replace(ast_format_codec2, NULL);
337         ao2_replace(ast_format_jpeg, NULL);
338         ao2_replace(ast_format_png, NULL);
339         ao2_replace(ast_format_h261, NULL);
340         ao2_replace(ast_format_h263, NULL);
341         ao2_replace(ast_format_h263p, NULL);
342         ao2_replace(ast_format_h264, NULL);
343         ao2_replace(ast_format_mp4, NULL);
344         ao2_replace(ast_format_vp8, NULL);
345         ao2_replace(ast_format_t140_red, NULL);
346         ao2_replace(ast_format_t140, NULL);
347         ao2_replace(ast_format_none, NULL);
348         ao2_replace(ast_format_silk8, NULL);
349         ao2_replace(ast_format_silk12, NULL);
350         ao2_replace(ast_format_silk16, NULL);
351         ao2_replace(ast_format_silk24, NULL);
352 }
353
354 int ast_format_cache_init(void)
355 {
356         formats = ao2_container_alloc_options(AO2_ALLOC_OPT_LOCK_RWLOCK, CACHE_BUCKETS,
357                 format_hash_cb, format_cmp_cb);
358         if (!formats) {
359                 return -1;
360         }
361
362         ast_register_cleanup(format_cache_shutdown);
363
364         return 0;
365 }
366
367 static void set_cached_format(const char *name, struct ast_format *format)
368 {
369         if (!strcmp(name, "codec2")) {
370                 ao2_replace(ast_format_codec2, format);
371         } else if (!strcmp(name, "g723")) {
372                 ao2_replace(ast_format_g723, format);
373         } else if (!strcmp(name, "ulaw")) {
374                 ao2_replace(ast_format_ulaw, format);
375         } else if (!strcmp(name, "alaw")) {
376                 ao2_replace(ast_format_alaw, format);
377         } else if (!strcmp(name, "gsm")) {
378                 ao2_replace(ast_format_gsm, format);
379         } else if (!strcmp(name, "g726")) {
380                 ao2_replace(ast_format_g726, format);
381         } else if (!strcmp(name, "g726aal2")) {
382                 ao2_replace(ast_format_g726_aal2, format);
383         } else if (!strcmp(name, "adpcm")) {
384                 ao2_replace(ast_format_adpcm, format);
385         } else if (!strcmp(name, "slin")) {
386                 ao2_replace(ast_format_slin, format);
387         } else if (!strcmp(name, "slin12")) {
388                 ao2_replace(ast_format_slin12, format);
389         } else if (!strcmp(name, "slin16")) {
390                 ao2_replace(ast_format_slin16, format);
391         } else if (!strcmp(name, "slin24")) {
392                 ao2_replace(ast_format_slin24, format);
393         } else if (!strcmp(name, "slin32")) {
394                 ao2_replace(ast_format_slin32, format);
395         } else if (!strcmp(name, "slin44")) {
396                 ao2_replace(ast_format_slin44, format);
397         } else if (!strcmp(name, "slin48")) {
398                 ao2_replace(ast_format_slin48, format);
399         } else if (!strcmp(name, "slin96")) {
400                 ao2_replace(ast_format_slin96, format);
401         } else if (!strcmp(name, "slin192")) {
402                 ao2_replace(ast_format_slin192, format);
403         } else if (!strcmp(name, "lpc10")) {
404                 ao2_replace(ast_format_lpc10, format);
405         } else if (!strcmp(name, "g729")) {
406                 ao2_replace(ast_format_g729, format);
407         } else if (!strcmp(name, "speex")) {
408                 ao2_replace(ast_format_speex, format);
409         } else if (!strcmp(name, "speex16")) {
410                 ao2_replace(ast_format_speex16, format);
411         } else if (!strcmp(name, "speex32")) {
412                 ao2_replace(ast_format_speex32, format);
413         } else if (!strcmp(name, "ilbc")) {
414                 ao2_replace(ast_format_ilbc, format);
415         } else if (!strcmp(name, "g722")) {
416                 ao2_replace(ast_format_g722, format);
417         } else if (!strcmp(name, "siren7")) {
418                 ao2_replace(ast_format_siren7, format);
419         } else if (!strcmp(name, "siren14")) {
420                 ao2_replace(ast_format_siren14, format);
421         } else if (!strcmp(name, "testlaw")) {
422                 ao2_replace(ast_format_testlaw, format);
423         } else if (!strcmp(name, "g719")) {
424                 ao2_replace(ast_format_g719, format);
425         } else if (!strcmp(name, "opus")) {
426                 ao2_replace(ast_format_opus, format);
427         } else if (!strcmp(name, "jpeg")) {
428                 ao2_replace(ast_format_jpeg, format);
429         } else if (!strcmp(name, "png")) {
430                 ao2_replace(ast_format_png, format);
431         } else if (!strcmp(name, "h261")) {
432                 ao2_replace(ast_format_h261, format);
433         } else if (!strcmp(name, "h263")) {
434                 ao2_replace(ast_format_h263, format);
435         } else if (!strcmp(name, "h263p")) {
436                 ao2_replace(ast_format_h263p, format);
437         } else if (!strcmp(name, "h264")) {
438                 ao2_replace(ast_format_h264, format);
439         } else if (!strcmp(name, "mpeg4")) {
440                 ao2_replace(ast_format_mp4, format);
441         } else if (!strcmp(name, "vp8")) {
442                 ao2_replace(ast_format_vp8, format);
443         } else if (!strcmp(name, "red")) {
444                 ao2_replace(ast_format_t140_red, format);
445         } else if (!strcmp(name, "t140")) {
446                 ao2_replace(ast_format_t140, format);
447         } else if (!strcmp(name, "none")) {
448                 ao2_replace(ast_format_none, format);
449         } else if (!strcmp(name, "silk8")) {
450                 ao2_replace(ast_format_silk8, format);
451         } else if (!strcmp(name, "silk12")) {
452                 ao2_replace(ast_format_silk12, format);
453         } else if (!strcmp(name, "silk16")) {
454                 ao2_replace(ast_format_silk16, format);
455         } else if (!strcmp(name, "silk24")) {
456                 ao2_replace(ast_format_silk24, format);
457         }
458 }
459
460 int ast_format_cache_set(struct ast_format *format)
461 {
462         SCOPED_AO2WRLOCK(lock, formats);
463         struct ast_format *old_format;
464
465         ast_assert(format != NULL);
466
467         if (ast_strlen_zero(ast_format_get_name(format))) {
468                 return -1;
469         }
470
471         old_format = ao2_find(formats, ast_format_get_name(format), OBJ_SEARCH_KEY | OBJ_NOLOCK);
472         if (old_format) {
473                 ao2_unlink_flags(formats, old_format, OBJ_NOLOCK);
474         }
475         ao2_link_flags(formats, format, OBJ_NOLOCK);
476
477         set_cached_format(ast_format_get_name(format), format);
478
479         ast_verb(2, "%s cached format with name '%s'\n",
480                 old_format ? "Updated" : "Created",
481                 ast_format_get_name(format));
482
483         ao2_cleanup(old_format);
484
485         return 0;
486 }
487
488 struct ast_format *__ast_format_cache_get(const char *name,
489         const char *tag, const char *file, int line, const char *func)
490 {
491         if (ast_strlen_zero(name)) {
492                 return NULL;
493         }
494
495         return __ao2_find(formats, name, OBJ_SEARCH_KEY, tag, file, line, func);
496 }
497
498 struct ast_format *ast_format_cache_get_slin_by_rate(unsigned int rate)
499 {
500         if (rate >= 192000) {
501                 return ast_format_slin192;
502         } else if (rate >= 96000) {
503                 return ast_format_slin96;
504         } else if (rate >= 48000) {
505                 return ast_format_slin48;
506         } else if (rate >= 44100) {
507                 return ast_format_slin44;
508         } else if (rate >= 32000) {
509                 return ast_format_slin32;
510         } else if (rate >= 24000) {
511                 return ast_format_slin24;
512         } else if (rate >= 16000) {
513                 return ast_format_slin16;
514         } else if (rate >= 12000) {
515                 return ast_format_slin12;
516         }
517         return ast_format_slin;
518 }
519
520 int ast_format_cache_is_slinear(struct ast_format *format)
521 {
522         if ((ast_format_cmp(format, ast_format_slin) == AST_FORMAT_CMP_EQUAL)
523                 || (ast_format_cmp(format, ast_format_slin12) == AST_FORMAT_CMP_EQUAL)
524                 || (ast_format_cmp(format, ast_format_slin16) == AST_FORMAT_CMP_EQUAL)
525                 || (ast_format_cmp(format, ast_format_slin24) == AST_FORMAT_CMP_EQUAL)
526                 || (ast_format_cmp(format, ast_format_slin32) == AST_FORMAT_CMP_EQUAL)
527                 || (ast_format_cmp(format, ast_format_slin44) == AST_FORMAT_CMP_EQUAL)
528                 || (ast_format_cmp(format, ast_format_slin48) == AST_FORMAT_CMP_EQUAL)
529                 || (ast_format_cmp(format, ast_format_slin96) == AST_FORMAT_CMP_EQUAL)
530                 || (ast_format_cmp(format, ast_format_slin192) == AST_FORMAT_CMP_EQUAL)) {
531                 return 1;
532         }
533
534         return 0;
535 }
536