Goodbye Zaptel, hello DAHDI. Removes Zaptel driver support with DAHDI. Configuration...
[asterisk/asterisk.git] / apps / app_dahdiras.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 Execute an ISDN RAS
22  *
23  * \author Mark Spencer <markster@digium.com>
24  * 
25  * \ingroup applications
26  */
27
28 /*** MODULEINFO
29         <depend>dahdi</depend>
30  ***/
31
32 #include "asterisk.h"
33
34 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
35
36 #include <sys/ioctl.h>
37 #include <sys/wait.h>
38 #ifdef __linux__
39 #include <sys/signal.h>
40 #else
41 #include <signal.h>
42 #endif /* __linux__ */
43
44 #include <fcntl.h>
45
46 #include "asterisk/dahdi.h"
47
48 #include "asterisk/lock.h"
49 #include "asterisk/file.h"
50 #include "asterisk/channel.h"
51 #include "asterisk/pbx.h"
52 #include "asterisk/module.h"
53 #include "asterisk/app.h"
54
55 static char *app = "DAHDIRAS";
56 static char *deprecated_app = "ZapRAS";
57
58 static char *synopsis = "Executes DAHDI ISDN RAS application";
59
60 static char *descrip =
61 "  DAHDIRAS(args): Executes a RAS server using pppd on the given channel.\n"
62 "The channel must be a clear channel (i.e. PRI source) and a DAHDI\n"
63 "channel to be able to use this function (No modem emulation is included).\n"
64 "Your pppd must be patched to be DAHDI aware. Arguments should be\n"
65 "separated by , characters.\n";
66
67
68 #define PPP_MAX_ARGS    32
69 #define PPP_EXEC        "/usr/sbin/pppd"
70
71 static pid_t spawn_ras(struct ast_channel *chan, char *args)
72 {
73         pid_t pid;
74         char *c;
75
76         char *argv[PPP_MAX_ARGS];
77         int argc = 0;
78         char *stringp=NULL;
79
80         /* Start by forking */
81         pid = ast_safe_fork(1);
82         if (pid) {
83                 return pid;
84         }
85
86         /* Execute RAS on File handles */
87         dup2(chan->fds[0], STDIN_FILENO);
88
89         /* Drop high priority */
90         if (ast_opt_high_priority)
91                 ast_set_priority(0);
92
93         /* Close other file descriptors */
94         ast_close_fds_above_n(STDERR_FILENO);
95
96         /* Reset all arguments */
97         memset(argv, 0, sizeof(argv));
98
99         /* First argument is executable, followed by standard
100            arguments for DAHDI PPP */
101         argv[argc++] = PPP_EXEC;
102         argv[argc++] = "nodetach";
103
104         /* And all the other arguments */
105         stringp=args;
106         c = strsep(&stringp, ",");
107         while(c && strlen(c) && (argc < (PPP_MAX_ARGS - 4))) {
108                 argv[argc++] = c;
109                 c = strsep(&stringp, ",");
110         }
111
112         argv[argc++] = "plugin";
113         argv[argc++] = "dahdi.so";
114         argv[argc++] = "stdin";
115
116         /* Finally launch PPP */
117         execv(PPP_EXEC, argv);
118         fprintf(stderr, "Failed to exec PPPD!\n");
119         exit(1);
120 }
121
122 static void run_ras(struct ast_channel *chan, char *args)
123 {
124         pid_t pid;
125         int status;
126         int res;
127         int signalled = 0;
128         struct dahdi_bufferinfo savebi;
129         int x;
130         
131         res = ioctl(chan->fds[0], DAHDI_GET_BUFINFO, &savebi);
132         if(res) {
133                 ast_log(LOG_WARNING, "Unable to check buffer policy on channel %s\n", chan->name);
134                 return;
135         }
136
137         pid = spawn_ras(chan, args);
138         if (pid < 0) {
139                 ast_log(LOG_WARNING, "Failed to spawn RAS\n");
140         } else {
141                 for (;;) {
142                         res = wait4(pid, &status, WNOHANG, NULL);
143                         if (!res) {
144                                 /* Check for hangup */
145                                 if (ast_check_hangup(chan) && !signalled) {
146                                         ast_debug(1, "Channel '%s' hungup.  Signalling RAS at %d to die...\n", chan->name, pid);
147                                         kill(pid, SIGTERM);
148                                         signalled=1;
149                                 }
150                                 /* Try again */
151                                 sleep(1);
152                                 continue;
153                         }
154                         if (res < 0) {
155                                 ast_log(LOG_WARNING, "wait4 returned %d: %s\n", res, strerror(errno));
156                         }
157                         if (WIFEXITED(status)) {
158                                 ast_verb(3, "RAS on %s terminated with status %d\n", chan->name, WEXITSTATUS(status));
159                         } else if (WIFSIGNALED(status)) {
160                                 ast_verb(3, "RAS on %s terminated with signal %d\n", 
161                                          chan->name, WTERMSIG(status));
162                         } else {
163                                 ast_verb(3, "RAS on %s terminated weirdly.\n", chan->name);
164                         }
165                         /* Throw back into audio mode */
166                         x = 1;
167                         ioctl(chan->fds[0], DAHDI_AUDIOMODE, &x);
168
169                         /* Restore saved values */
170                         res = ioctl(chan->fds[0], DAHDI_SET_BUFINFO, &savebi);
171                         if (res < 0) {
172                                 ast_log(LOG_WARNING, "Unable to set buffer policy on channel %s\n", chan->name);
173                         }
174                         break;
175                 }
176         }
177         ast_safe_fork_cleanup();
178 }
179
180 static int dahdiras_exec(struct ast_channel *chan, void *data)
181 {
182         int res=-1;
183         char *args;
184         DAHDI_PARAMS dahdip;
185
186         if (!data) 
187                 data = "";
188
189         args = ast_strdupa(data);
190         
191         /* Answer the channel if it's not up */
192         if (chan->_state != AST_STATE_UP)
193                 ast_answer(chan);
194         if (strcasecmp(chan->tech->type, "DAHDI")) {
195                 /* If it's not a DAHDI channel, we're done.  Wait a couple of
196                    seconds and then hangup... */
197                 ast_verb(2, "Channel %s is not a DAHDI channel\n", chan->name);
198                 sleep(2);
199         } else {
200                 memset(&dahdip, 0, sizeof(dahdip));
201                 if (ioctl(chan->fds[0], DAHDI_GET_PARAMS, &dahdip)) {
202                         ast_log(LOG_WARNING, "Unable to get DAHDI parameters\n");
203                 } else if (dahdip.sigtype != DAHDI_SIG_CLEAR) {
204                         ast_verb(2, "Channel %s is not a clear channel\n", chan->name);
205                 } else {
206                         /* Everything should be okay.  Run PPP. */
207                         ast_verb(3, "Starting RAS on %s\n", chan->name);
208                         /* Execute RAS */
209                         run_ras(chan, args);
210                 }
211         }
212         return res;
213 }
214
215 static int dahdiras_exec_warn(struct ast_channel *chan, void *data)
216 {
217         ast_log(LOG_WARNING, "Use of the command %s is deprecated, please use %s instead.\n", deprecated_app, app);
218         return dahdiras_exec(chan, data);
219 }
220
221 static int unload_module(void) 
222 {
223         return ast_unregister_application(app);
224 }
225
226 static int load_module(void)
227 {
228     ast_register_application(deprecated_app, dahdiras_exec_warn, synopsis, descrip);
229         return ((ast_register_application(app, dahdiras_exec, synopsis, descrip)) ? AST_MODULE_LOAD_FAILURE : AST_MODULE_LOAD_SUCCESS);
230 }
231
232 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "DAHDI ISDN Remote Access Server");
233