merge rizzo's codec module rework (very similar to the format module rework)
[asterisk/asterisk.git] / codecs / codec_a_mu.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Digium, Inc.
5  *
6  * Mark Spencer <markster@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 codec_a_mu.c - translate between alaw and ulaw directly
22  *
23  * \ingroup codecs
24  */
25
26 #include <fcntl.h>
27 #include <netinet/in.h>
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>
31 #include <unistd.h>
32
33 #include "asterisk.h"
34
35 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
36
37 #include "asterisk/lock.h"
38 #include "asterisk/logger.h"
39 #include "asterisk/module.h"
40 #include "asterisk/translate.h"
41 #include "asterisk/channel.h"
42 #include "asterisk/alaw.h"
43 #include "asterisk/ulaw.h"
44 #include "asterisk/utils.h"
45
46 #define BUFFER_SAMPLES   8000   /* size for the translation buffers */
47
48 static unsigned char mu2a[256];
49 static unsigned char a2mu[256];
50
51 /* Sample frame data (Mu data is okay) */
52
53 #include "ulaw_slin_ex.h"
54
55 /*! \brief convert frame data and store into the buffer */
56 static int alawtoulaw_framein(struct ast_trans_pvt *pvt, struct ast_frame *f)
57 {
58         int x;
59         unsigned char *src = f->data;
60         unsigned char *dst = (unsigned char *)pvt->outbuf + pvt->samples;
61
62         for ( x = 0 ; x < f->samples; x++)
63                 dst[x] = a2mu[src[x]];
64         pvt->samples += f->samples;
65         pvt->datalen += f->datalen;
66         return 0;
67 }
68
69 /*! \brief convert frame data and store into the buffer */
70 static int ulawtoalaw_framein(struct ast_trans_pvt *pvt, struct ast_frame *f)
71 {
72         int x;
73         unsigned char *src = f->data;
74         unsigned char *dst = (unsigned char *)pvt->outbuf + pvt->samples;
75
76         for ( x = 0 ; x < f->samples; x++)
77                 dst[x] = mu2a[src[x]];
78         pvt->samples += f->samples;
79         pvt->datalen += f->datalen;
80         return 0;
81 }
82
83 /*
84  * alawToLin_Sample. Just random data, somehow...
85  */
86 static struct ast_frame *alawtoulaw_sample(void)
87 {
88         static struct ast_frame f;
89         f.frametype = AST_FRAME_VOICE;
90         f.subclass = AST_FORMAT_ALAW;
91         f.datalen = sizeof(ulaw_slin_ex);
92         f.samples = sizeof(ulaw_slin_ex);
93         f.mallocd = 0;
94         f.offset = 0;
95         f.src = __PRETTY_FUNCTION__;
96         f.data = ulaw_slin_ex; /* XXX what ? */
97         return &f;
98 }
99
100 static struct ast_frame *ulawtoalaw_sample(void)
101 {
102         static struct ast_frame f;
103         f.frametype = AST_FRAME_VOICE;
104         f.subclass = AST_FORMAT_ULAW;
105         f.datalen = sizeof(ulaw_slin_ex);
106         f.samples = sizeof(ulaw_slin_ex);
107         f.mallocd = 0;
108         f.offset = 0;
109         f.src = __PRETTY_FUNCTION__;
110         f.data = ulaw_slin_ex;
111         return &f;
112 }
113
114 static struct ast_module_lock me = { .usecnt = -1 };
115
116 static struct ast_translator alawtoulaw = {
117         .name = "alawtoulaw",
118         .srcfmt = AST_FORMAT_ALAW,
119         .dstfmt = AST_FORMAT_ULAW,
120         .framein = alawtoulaw_framein,
121         .sample = alawtoulaw_sample,
122         .buffer_samples = BUFFER_SAMPLES,
123         .buf_size = BUFFER_SAMPLES,
124         .lockp = &me,
125 };
126
127 static struct ast_translator ulawtoalaw = {
128         .name = "ulawtoalaw",
129         .srcfmt = AST_FORMAT_ULAW,
130         .dstfmt = AST_FORMAT_ALAW,
131         .framein = ulawtoalaw_framein,
132         .sample = ulawtoalaw_sample,
133         .buffer_samples = BUFFER_SAMPLES,
134         .buf_size = BUFFER_SAMPLES,
135         .lockp = &me,
136 };
137
138 /*! \brief standard module glue */
139
140 int unload_module(void)
141 {
142         int res;
143         ast_mutex_lock(&me.lock);
144         res = ast_unregister_translator(&ulawtoalaw);
145         res |= ast_unregister_translator(&alawtoulaw);
146         if (me.usecnt)
147                 res = -1;
148         ast_mutex_unlock(&me.lock);
149         return res;
150 }
151
152 int load_module(void)
153 {
154         int res;
155         int x;
156         for (x=0;x<256;x++) {
157                 mu2a[x] = AST_LIN2A(AST_MULAW(x));
158                 a2mu[x] = AST_LIN2MU(AST_ALAW(x));
159         }
160         res = ast_register_translator(&alawtoulaw);
161         if (!res)
162                 res = ast_register_translator(&ulawtoalaw);
163         else
164                 ast_unregister_translator(&alawtoulaw);
165         return res;
166 }
167
168 char *description(void)
169 {
170         return "A-law and Mulaw direct Coder/Decoder";
171 }
172
173 int usecount(void)
174 {
175         return me.usecnt;
176 }
177
178 char *key()
179 {
180         return ASTERISK_GPL_KEY;
181 }