bb329385143cd84fe3c41679e2455a69732bad27
[asterisk/asterisk.git] / apps / app_page.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (c) 2004 - 2006 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 /*** MODULEINFO
29         <depend>zaptel</depend>
30  ***/
31
32 #include <stdio.h>
33 #include <stdlib.h>
34 #include <unistd.h>
35 #include <string.h>
36 #include <errno.h>
37
38 #include "asterisk.h"
39
40 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
41
42 #include "asterisk/options.h"
43 #include "asterisk/logger.h"
44 #include "asterisk/channel.h"
45 #include "asterisk/pbx.h"
46 #include "asterisk/module.h"
47 #include "asterisk/file.h"
48 #include "asterisk/app.h"
49 #include "asterisk/chanvars.h"
50 #include "asterisk/utils.h"
51
52 static const char *app_page= "Page";
53
54 static const char *page_synopsis = "Pages phones";
55
56 static const char *page_descrip =
57 "Page(Technology/Resource&Technology2/Resource2[|options])\n"
58 "  Places outbound calls to the given technology / resource and dumps\n"
59 "them into a conference bridge as muted participants.  The original\n"
60 "caller is dumped into the conference as a speaker and the room is\n"
61 "destroyed when the original caller leaves.  Valid options are:\n"
62 "        d - full duplex audio\n"
63 "        q - quiet, do not play beep to caller\n";
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, 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 = ast_random();
149         struct ast_app *app;
150         char *tmp;
151         int res=0;
152         char originator[AST_CHANNEL_NAME];
153
154         if (ast_strlen_zero(data)) {
155                 ast_log(LOG_WARNING, "This application requires at least one argument (destination(s) to page)\n");
156                 return -1;
157         }
158
159         LOCAL_USER_ADD(u);
160
161         if (!(app = pbx_findapp("MeetMe"))) {
162                 ast_log(LOG_WARNING, "There is no MeetMe application available!\n");
163                 LOCAL_USER_REMOVE(u);
164                 return -1;
165         };
166
167         if (!(options = ast_strdupa(data))) {
168                 LOCAL_USER_REMOVE(u);
169                 return -1;
170         }
171
172         ast_copy_string(originator, chan->name, sizeof(originator));
173         if ((tmp = strchr(originator, '-')))
174                 *tmp = '\0';
175
176         tmp = strsep(&options, "|");
177         if (options)
178                 ast_app_parse_options(page_opts, &flags, NULL, options);
179
180         snprintf(meetmeopts, sizeof(meetmeopts), "%ud|%sqxdw", confid, ast_test_flag(&flags, PAGE_DUPLEX) ? "" : "m");
181
182         while ((tech = strsep(&tmp, "&"))) {
183                 /* don't call the originating device */
184                 if (!strcasecmp(tech, originator))
185                         continue;
186
187                 if ((resource = strchr(tech, '/'))) {
188                         *resource++ = '\0';
189                         launch_page(chan, meetmeopts, tech, resource);
190                 } else {
191                         ast_log(LOG_WARNING, "Incomplete destination '%s' supplied.\n", tech);
192                 }
193         }
194
195         if (!ast_test_flag(&flags, PAGE_QUIET)) {
196                 res = ast_streamfile(chan, "beep", chan->language);
197                 if (!res)
198                         res = ast_waitstream(chan, "");
199         }
200         if (!res) {
201                 snprintf(meetmeopts, sizeof(meetmeopts), "%ud|A%sqxd", confid, ast_test_flag(&flags, PAGE_DUPLEX) ? "" : "t");
202                 pbx_exec(chan, app, meetmeopts);
203         }
204
205         LOCAL_USER_REMOVE(u);
206
207         return -1;
208 }
209
210 static int unload_module(void *mod)
211 {
212         int res;
213
214         res =  ast_unregister_application(app_page);
215
216         STANDARD_HANGUP_LOCALUSERS;
217
218         return res;
219 }
220
221 static int load_module(void *mod)
222 {
223         return ast_register_application(app_page, page_exec, page_synopsis, page_descrip);
224 }
225
226 static const char *description(void)
227 {
228         return "Page Multiple Phones";
229 }
230
231 static const char *key(void)
232 {
233         return ASTERISK_GPL_KEY;
234 }
235
236 STD_MOD1;
237