revert my pass through the tree to remove checks of the result of ast_strdupa
[asterisk/asterisk.git] / apps / app_page.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (c) 2004 - 2005 Digium, Inc.  All rights reserved.
5  *
6  * Mark Spencer <markster@digium.com>
7  *
8  * This code is released under the GNU General Public License
9  * version 2.0.  See LICENSE for more information.
10  *
11  * See http://www.asterisk.org for more information about
12  * the Asterisk project. Please do not directly contact
13  * any of the maintainers of this project for assistance;
14  * the project provides a web site, mailing lists and IRC
15  * channels for your use.
16  *
17  */
18
19 /*! \file
20  *
21  * \brief page() - Paging application
22  *
23  * \author Mark Spencer <markster@digium.com>
24  *
25  * \ingroup applications
26  */
27
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <unistd.h>
31 #include <string.h>
32 #include <errno.h>
33
34 #include "asterisk.h"
35
36 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
37
38 #include "asterisk/options.h"
39 #include "asterisk/logger.h"
40 #include "asterisk/channel.h"
41 #include "asterisk/pbx.h"
42 #include "asterisk/module.h"
43 #include "asterisk/file.h"
44 #include "asterisk/app.h"
45 #include "asterisk/chanvars.h"
46 #include "asterisk/utils.h"
47
48 static const char *tdesc = "Page Multiple Phones";
49
50 static const char *app_page= "Page";
51
52 static const char *page_synopsis = "Pages phones";
53
54 static const char *page_descrip =
55 "Page(Technology/Resource&Technology2/Resource2[|options])\n"
56 "  Places outbound calls to the given technology / resource and dumps\n"
57 "them into a conference bridge as muted participants.  The original\n"
58 "caller is dumped into the conference as a speaker and the room is\n"
59 "destroyed when the original caller leaves.  Valid options are:\n"
60 "        d - full duplex audio\n"
61 "        q - quiet, do not play beep to caller\n";
62
63 STANDARD_LOCAL_USER;
64
65 LOCAL_USER_DECL;
66
67 enum {
68         PAGE_DUPLEX = (1 << 0),
69         PAGE_QUIET = (1 << 1),
70 } page_opt_flags;
71
72 AST_APP_OPTIONS(page_opts, {
73         AST_APP_OPTION('d', PAGE_DUPLEX),
74         AST_APP_OPTION('q', PAGE_QUIET),
75 });
76
77 struct calloutdata {
78         char cidnum[64];
79         char cidname[64];
80         char tech[64];
81         char resource[256];
82         char meetmeopts[64];
83         struct ast_variable *variables;
84 };
85
86 static void *page_thread(void *data)
87 {
88         struct calloutdata *cd = data;
89         ast_pbx_outgoing_app(cd->tech, AST_FORMAT_SLINEAR, cd->resource, 30000,
90                 "MeetMe", cd->meetmeopts, NULL, 0, cd->cidnum, cd->cidname, cd->variables, NULL);
91         free(cd);
92         return NULL;
93 }
94
95 static void launch_page(struct ast_channel *chan, const char *meetmeopts, const char *tech, const char *resource)
96 {
97         struct calloutdata *cd;
98         const char *varname;
99         struct ast_variable *lastvar = NULL;
100         struct ast_var_t *varptr;
101         pthread_t t;
102         pthread_attr_t attr;
103         if ((cd = ast_calloc(1, sizeof(*cd)))) {
104                 ast_copy_string(cd->cidnum, chan->cid.cid_num ? chan->cid.cid_num : "", sizeof(cd->cidnum));
105                 ast_copy_string(cd->cidname, chan->cid.cid_name ? chan->cid.cid_name : "", sizeof(cd->cidname));
106                 ast_copy_string(cd->tech, tech, sizeof(cd->tech));
107                 ast_copy_string(cd->resource, resource, sizeof(cd->resource));
108                 ast_copy_string(cd->meetmeopts, meetmeopts, sizeof(cd->meetmeopts));
109
110                 AST_LIST_TRAVERSE(&chan->varshead, varptr, entries) {
111                         if (!(varname = ast_var_full_name(varptr)))
112                                 continue;
113                         if (varname[0] == '_') {
114                                 struct ast_variable *newvar = NULL;
115
116                                 if (varname[1] == '_') {
117                                         newvar = ast_variable_new(varname, ast_var_value(varptr));
118                                 } else {
119                                         newvar = ast_variable_new(&varname[1], ast_var_value(varptr));
120                                 }
121
122                                 if (newvar) {
123                                         if (lastvar)
124                                                 lastvar->next = newvar;
125                                         else
126                                                 cd->variables = newvar;
127                                         lastvar = newvar;
128                                 }
129                         }
130                 }
131
132                 pthread_attr_init(&attr);
133                 pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
134                 if (ast_pthread_create(&t, &attr, page_thread, cd)) {
135                         ast_log(LOG_WARNING, "Unable to create paging thread: %s\n", strerror(errno));
136                         free(cd);
137                 }
138         }
139 }
140
141 static int page_exec(struct ast_channel *chan, void *data)
142 {
143         struct localuser *u;
144         char *options;
145         char *tech, *resource;
146         char meetmeopts[80];
147         struct ast_flags flags = { 0 };
148         unsigned int confid = rand();
149         struct ast_app *app;
150         char *tmp;
151         int res=0;
152
153         if (ast_strlen_zero(data)) {
154                 ast_log(LOG_WARNING, "This application requires at least one argument (destination(s) to page)\n");
155                 return -1;
156         }
157
158         LOCAL_USER_ADD(u);
159
160         if (!(app = pbx_findapp("MeetMe"))) {
161                 ast_log(LOG_WARNING, "There is no MeetMe application available!\n");
162                 LOCAL_USER_REMOVE(u);
163                 return -1;
164         };
165
166         options = ast_strdupa(data);
167         if (!options) {
168                 ast_log(LOG_ERROR, "Out of memory\n");
169                 LOCAL_USER_REMOVE(u);
170                 return -1;
171         }
172
173         tmp = strsep(&options, "|");
174         if (options)
175                 ast_app_parse_options(page_opts, &flags, NULL, options);
176
177         snprintf(meetmeopts, sizeof(meetmeopts), "%ud|%sqxdw", confid, ast_test_flag(&flags, PAGE_DUPLEX) ? "" : "m");
178         while ((tech = strsep(&tmp, "&"))) {
179                 if ((resource = strchr(tech, '/'))) {
180                         *resource++ = '\0';
181                         launch_page(chan, meetmeopts, tech, resource);
182                 } else {
183                         ast_log(LOG_WARNING, "Incomplete destination '%s' supplied.\n", tech);
184                 }
185         }
186         if (!ast_test_flag(&flags, PAGE_QUIET)) {
187                 res = ast_streamfile(chan, "beep", chan->language);
188                 if (!res)
189                         res = ast_waitstream(chan, "");
190         }
191         if (!res) {
192                 snprintf(meetmeopts, sizeof(meetmeopts), "%ud|A%sqxd", confid, ast_test_flag(&flags, PAGE_DUPLEX) ? "" : "t");
193                 pbx_exec(chan, app, meetmeopts, 1);
194         }
195
196         LOCAL_USER_REMOVE(u);
197
198         return -1;
199 }
200
201 int unload_module(void)
202 {
203         int res;
204
205         res =  ast_unregister_application(app_page);
206
207         STANDARD_HANGUP_LOCALUSERS;
208
209         return res;
210 }
211
212 int load_module(void)
213 {
214         return ast_register_application(app_page, page_exec, page_synopsis, page_descrip);
215 }
216
217 char *description(void)
218 {
219         return (char *) tdesc;
220 }
221
222 int usecount(void)
223 {
224         int res;
225
226         STANDARD_USECOUNT(res);
227
228         return res;
229 }
230
231 char *key()
232 {
233         return ASTERISK_GPL_KEY;
234 }