08a96f96bc5d05a0b2f7197814c5aeaf67715670
[asterisk/asterisk.git] / apps / app_milliwatt.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 Digital Milliwatt Test
22  *
23  * \author Mark Spencer <markster@digium.com>
24  * 
25  * \ingroup applications
26  */
27
28 #include "asterisk.h"
29
30 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
31
32 #include <stdlib.h>
33 #include <stdio.h>
34 #include <string.h>
35 #include <unistd.h>
36 #include <errno.h>
37
38 #include "asterisk/lock.h"
39 #include "asterisk/file.h"
40 #include "asterisk/logger.h"
41 #include "asterisk/channel.h"
42 #include "asterisk/pbx.h"
43 #include "asterisk/module.h"
44 #include "asterisk/utils.h"
45
46 static char *app = "Milliwatt";
47
48 static char *synopsis = "Generate a Constant 1000Hz tone at 0dbm (mu-law)";
49
50 static char *descrip = 
51 "Milliwatt(): Generate a Constant 1000Hz tone at 0dbm (mu-law)\n";
52
53
54 static char digital_milliwatt[] = {0x1e,0x0b,0x0b,0x1e,0x9e,0x8b,0x8b,0x9e} ;
55
56 static void *milliwatt_alloc(struct ast_channel *chan, void *params)
57 {
58         return ast_calloc(1, sizeof(int));
59 }
60
61 static void milliwatt_release(struct ast_channel *chan, void *data)
62 {
63         free(data);
64         return;
65 }
66
67 static int milliwatt_generate(struct ast_channel *chan, void *data, int len, int samples)
68 {
69         struct ast_frame wf;
70         unsigned char buf[AST_FRIENDLY_OFFSET + 640];
71         const int maxsamples = sizeof (buf) / sizeof (buf[0]);
72         int i, *indexp = (int *) data;
73
74         /* Instead of len, use samples, because channel.c generator_force
75         * generate(chan, tmp, 0, 160) ignores len. In any case, len is
76         * a multiple of samples, given by number of samples times bytes per
77         * sample. In the case of ulaw, len = samples. for signed linear
78         * len = 2 * samples */
79
80         if (samples > maxsamples) {
81                 ast_log(LOG_WARNING, "Only doing %d samples (%d requested)\n", maxsamples, samples);
82                 samples = maxsamples;
83         }
84         len = samples * sizeof (buf[0]);
85         wf.frametype = AST_FRAME_VOICE;
86         wf.subclass = AST_FORMAT_ULAW;
87         wf.offset = AST_FRIENDLY_OFFSET;
88         wf.mallocd = 0;
89         wf.data = buf + AST_FRIENDLY_OFFSET;
90         wf.datalen = len;
91         wf.samples = samples;
92         wf.src = "app_milliwatt";
93         wf.delivery.tv_sec = 0;
94         wf.delivery.tv_usec = 0;
95         wf.prev = wf.next = NULL;
96         /* create a buffer containing the digital milliwatt pattern */
97         for(i = 0; i < len; i++)
98         {
99                 buf[AST_FRIENDLY_OFFSET + i] = digital_milliwatt[(*indexp)++];
100                 *indexp &= 7;
101         }
102         if (ast_write(chan,&wf) < 0)
103         {
104                 ast_log(LOG_WARNING,"Failed to write frame to '%s': %s\n",chan->name,strerror(errno));
105                 return -1;
106         }
107         return 0;
108 }
109
110 static struct ast_generator milliwattgen = 
111 {
112         alloc: milliwatt_alloc,
113         release: milliwatt_release,
114         generate: milliwatt_generate,
115 } ;
116
117 static int milliwatt_exec(struct ast_channel *chan, void *data)
118 {
119
120         struct ast_module_user *u;
121         u = ast_module_user_add(chan);
122         ast_set_write_format(chan, AST_FORMAT_ULAW);
123         ast_set_read_format(chan, AST_FORMAT_ULAW);
124         if (chan->_state != AST_STATE_UP)
125         {
126                 ast_answer(chan);
127         }
128         if (ast_activate_generator(chan,&milliwattgen,"milliwatt") < 0)
129         {
130                 ast_log(LOG_WARNING,"Failed to activate generator on '%s'\n",chan->name);
131                 ast_module_user_remove(u);
132                 return -1;
133         }
134         while(!ast_safe_sleep(chan, 10000));
135         ast_deactivate_generator(chan);
136         ast_module_user_remove(u);
137         return -1;
138 }
139
140 static int unload_module(void)
141 {
142         int res;
143
144         res = ast_unregister_application(app);
145
146         ast_module_user_hangup_all();
147
148         return res;
149 }
150
151 static int load_module(void)
152 {
153         return ast_register_application(app, milliwatt_exec, synopsis, descrip);
154 }
155
156 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Digital Milliwatt (mu-law) Test Application");