From f8247040e6231c4b3b5099ea3a526348b7941566 Mon Sep 17 00:00:00 2001 From: russell Date: Sat, 19 Jan 2008 00:19:29 +0000 Subject: Creating tag for the release of asterisk-1.6.0-beta1 git-svn-id: http://svn.digium.com/svn/asterisk/tags/1.6.0-beta1@99163 f38db490-d61c-443f-a65b-d21fe96a405b --- trunk/apps/app_zapras.c | 238 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 238 insertions(+) create mode 100644 trunk/apps/app_zapras.c (limited to 'trunk/apps/app_zapras.c') diff --git a/trunk/apps/app_zapras.c b/trunk/apps/app_zapras.c new file mode 100644 index 000000000..480e5f643 --- /dev/null +++ b/trunk/apps/app_zapras.c @@ -0,0 +1,238 @@ +/* + * Asterisk -- An open source telephony toolkit. + * + * Copyright (C) 1999 - 2005, Digium, Inc. + * + * Mark Spencer + * + * See http://www.asterisk.org for more information about + * the Asterisk project. Please do not directly contact + * any of the maintainers of this project for assistance; + * the project provides a web site, mailing lists and IRC + * channels for your use. + * + * This program is free software, distributed under the terms of + * the GNU General Public License Version 2. See the LICENSE file + * at the top of the source tree. + */ + +/*! \file + * + * \brief Execute an ISDN RAS + * + * \author Mark Spencer + * + * \ingroup applications + */ + +/*** MODULEINFO + zaptel + ***/ + +#include "asterisk.h" + +ASTERISK_FILE_VERSION(__FILE__, "$Revision$") + +#include +#include +#ifdef __linux__ +#include +#else +#include +#endif /* __linux__ */ + +#include + +#include "asterisk/zapata.h" + +#include "asterisk/lock.h" +#include "asterisk/file.h" +#include "asterisk/channel.h" +#include "asterisk/pbx.h" +#include "asterisk/module.h" + +static char *app = "ZapRAS"; + +static char *synopsis = "Executes Zaptel ISDN RAS application"; + +static char *descrip = +" ZapRAS(args): Executes a RAS server using pppd on the given channel.\n" +"The channel must be a clear channel (i.e. PRI source) and a Zaptel\n" +"channel to be able to use this function (No modem emulation is included).\n" +"Your pppd must be patched to be zaptel aware. Arguments should be\n" +"separated by , characters.\n"; + + +#define PPP_MAX_ARGS 32 +#define PPP_EXEC "/usr/sbin/pppd" + +static pid_t spawn_ras(struct ast_channel *chan, char *args) +{ + pid_t pid; + int x; + char *c; + + char *argv[PPP_MAX_ARGS]; + int argc = 0; + char *stringp=NULL; + sigset_t fullset, oldset; + + sigfillset(&fullset); + pthread_sigmask(SIG_BLOCK, &fullset, &oldset); + + /* Start by forking */ + pid = fork(); + if (pid) { + pthread_sigmask(SIG_SETMASK, &oldset, NULL); + return pid; + } + + /* Restore original signal handlers */ + for (x=0;xfds[0], STDIN_FILENO); + + /* Drop high priority */ + if (ast_opt_high_priority) + ast_set_priority(0); + + /* Close other file descriptors */ + for (x=STDERR_FILENO + 1;x<1024;x++) + close(x); + + /* Reset all arguments */ + memset(argv, 0, sizeof(argv)); + + /* First argument is executable, followed by standard + arguments for zaptel PPP */ + argv[argc++] = PPP_EXEC; + argv[argc++] = "nodetach"; + + /* And all the other arguments */ + stringp=args; + c = strsep(&stringp, ","); + while(c && strlen(c) && (argc < (PPP_MAX_ARGS - 4))) { + argv[argc++] = c; + c = strsep(&stringp, ","); + } + + argv[argc++] = "plugin"; + argv[argc++] = "zaptel.so"; + argv[argc++] = "stdin"; + + /* Finally launch PPP */ + execv(PPP_EXEC, argv); + fprintf(stderr, "Failed to exec PPPD!\n"); + exit(1); +} + +static void run_ras(struct ast_channel *chan, char *args) +{ + pid_t pid; + int status; + int res; + int signalled = 0; + struct zt_bufferinfo savebi; + int x; + + res = ioctl(chan->fds[0], ZT_GET_BUFINFO, &savebi); + if(res) { + ast_log(LOG_WARNING, "Unable to check buffer policy on channel %s\n", chan->name); + return; + } + + pid = spawn_ras(chan, args); + if (pid < 0) { + ast_log(LOG_WARNING, "Failed to spawn RAS\n"); + } else { + for (;;) { + res = wait4(pid, &status, WNOHANG, NULL); + if (!res) { + /* Check for hangup */ + if (ast_check_hangup(chan) && !signalled) { + ast_debug(1, "Channel '%s' hungup. Signalling RAS at %d to die...\n", chan->name, pid); + kill(pid, SIGTERM); + signalled=1; + } + /* Try again */ + sleep(1); + continue; + } + if (res < 0) { + ast_log(LOG_WARNING, "wait4 returned %d: %s\n", res, strerror(errno)); + } + if (option_verbose > 2) { + if (WIFEXITED(status)) { + ast_verbose(VERBOSE_PREFIX_3 "RAS on %s terminated with status %d\n", chan->name, WEXITSTATUS(status)); + } else if (WIFSIGNALED(status)) { + ast_verbose(VERBOSE_PREFIX_3 "RAS on %s terminated with signal %d\n", + chan->name, WTERMSIG(status)); + } else { + ast_verbose(VERBOSE_PREFIX_3 "RAS on %s terminated weirdly.\n", chan->name); + } + } + /* Throw back into audio mode */ + x = 1; + ioctl(chan->fds[0], ZT_AUDIOMODE, &x); + + /* Restore saved values */ + res = ioctl(chan->fds[0], ZT_SET_BUFINFO, &savebi); + if (res < 0) { + ast_log(LOG_WARNING, "Unable to set buffer policy on channel %s\n", chan->name); + } + break; + } + } +} + +static int zapras_exec(struct ast_channel *chan, void *data) +{ + int res=-1; + char *args; + ZT_PARAMS ztp; + + if (!data) + data = ""; + + args = ast_strdupa(data); + + /* Answer the channel if it's not up */ + if (chan->_state != AST_STATE_UP) + ast_answer(chan); + if (strcasecmp(chan->tech->type, "Zap")) { + /* If it's not a zap channel, we're done. Wait a couple of + seconds and then hangup... */ + ast_verb(2, "Channel %s is not a Zap channel\n", chan->name); + sleep(2); + } else { + memset(&ztp, 0, sizeof(ztp)); + if (ioctl(chan->fds[0], ZT_GET_PARAMS, &ztp)) { + ast_log(LOG_WARNING, "Unable to get zaptel parameters\n"); + } else if (ztp.sigtype != ZT_SIG_CLEAR) { + ast_verb(2, "Channel %s is not a clear channel\n", chan->name); + } else { + /* Everything should be okay. Run PPP. */ + ast_verb(3, "Starting RAS on %s\n", chan->name); + /* Execute RAS */ + run_ras(chan, args); + } + } + return res; +} + +static int unload_module(void) +{ + return ast_unregister_application(app); +} + +static int load_module(void) +{ + return ((ast_register_application(app, zapras_exec, synopsis, descrip)) ? AST_MODULE_LOAD_FAILURE : AST_MODULE_LOAD_SUCCESS); +} + +AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Zaptel ISDN Remote Access Server"); + -- cgit v1.2.3