Update of /usr/cvsroot/asterisk/apps
In directory mongoose.digium.com:/tmp/cvs-serv25225/apps
Modified Files:
Makefile
Added Files:
app_stack.c
Log Message:
issue #2720
--- NEW FILE: app_stack.c ---
/*
* Asterisk -- An open source telephony toolkit.
*
* Copyright (c) 2004-2005 Tilghman Lesher <[EMAIL PROTECTED]>.
*
* This code is released by the author with no restrictions on usage.
*
* 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 Stack applications Gosub, Return, etc.
*
* \ingroup applications
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include "asterisk/options.h"
#include "asterisk/logger.h"
#include "asterisk/channel.h"
#include "asterisk/chanvars.h"
#include "asterisk/pbx.h"
#include "asterisk/module.h"
#include "asterisk/config.h"
#define STACKVAR "~GOSUB~STACK~"
static const char *tdesc = "Stack Routines";
static const char *app_gosub = "Gosub";
static const char *app_gosubif = "GosubIf";
static const char *app_return = "Return";
static const char *app_pop = "StackPop";
static const char *gosub_synopsis = "Jump to label, saving return address";
static const char *gosubif_synopsis = "Jump to label, saving return address";
static const char *return_synopsis = "Return from gosub routine";
static const char *pop_synopsis = "Remove one address from gosub stack";
static const char *gosub_descrip =
"Gosub([[context|]exten|]priority)\n"
" Jumps to the label specified, saving the return address.\n"
" Returns 0 if the label exists or -1 otherwise.\n";
static const char *gosubif_descrip =
"Gosub(condition?labeliftrue[:labeliffalse])\n"
" If the condition is true, then jump to labeliftrue. If false, jumps to\n"
"labeliffalse, if specified. In either case, a jump saves the return point\n"
"in the dialplan, to be returned to with a Return.\n"
" Returns 0 if the label exists or -1 otherwise.\n";
static const char *return_descrip =
"Return()\n"
" Jumps to the last label in the stack, removing it.\n"
" Returns 0 if there's a label in the stack or -1 otherwise.\n";
static const char *pop_descrip =
"StackPop()\n"
" Removes last label in the stack, discarding it.\n"
" Always returns 0, even if the stack is empty.\n";
STANDARD_LOCAL_USER;
LOCAL_USER_DECL;
static int pop_exec(struct ast_channel *chan, void *data)
{
pbx_builtin_setvar_helper(chan, STACKVAR, NULL);
return 0;
}
static int return_exec(struct ast_channel *chan, void *data)
{
char *label = pbx_builtin_getvar_helper(chan, STACKVAR);
if (ast_strlen_zero(label)) {
ast_log(LOG_ERROR, "Return without Gosub: stack is empty\n");
return -1;
} else if (ast_parseable_goto(chan, label)) {
ast_log(LOG_WARNING, "No next statement after Gosub?\n");
return -1;
}
pbx_builtin_setvar_helper(chan, STACKVAR, NULL);
return 0;
}
static int gosub_exec(struct ast_channel *chan, void *data)
{
char newlabel[AST_MAX_EXTENSION * 2 + 3 + 11];
struct localuser *u;
if (ast_strlen_zero(data)) {
ast_log(LOG_ERROR, "%s requires an argument:
%s([[context|]exten|]priority)\n", app_gosub, app_gosub);
return -1;
}
LOCAL_USER_ADD(u);
snprintf(newlabel, sizeof(newlabel), "%s|%s|%d", chan->context,
chan->exten, chan->priority + 1);
if (ast_parseable_goto(chan, data)) {
LOCAL_USER_REMOVE(u);
return -1;
}
pbx_builtin_pushvar_helper(chan, STACKVAR, newlabel);
LOCAL_USER_REMOVE(u);
return 0;
}
static int gosubif_exec(struct ast_channel *chan, void *data)
{
struct localuser *u;
char *condition="", *label1, *label2, *args;
int res=0;
if (ast_strlen_zero(data)) {
ast_log(LOG_WARNING, "GosubIf requires an argument\n");
return 0;
}
args = ast_strdupa((char *)data);
if (!args) {
ast_log(LOG_ERROR, "Out of memory\n");
return -1;
}
LOCAL_USER_ADD(u);
condition = strsep(&args, "?");
label1 = strsep(&args, ":");
label2 = args;
if (ast_true(condition)) {
if (label1) {
res = gosub_exec(chan, label1);
}
} else if (label2) {
res = gosub_exec(chan, label2);
}
LOCAL_USER_REMOVE(u);
return res;
}
int unload_module(void)
{
ast_unregister_application(app_return);
ast_unregister_application(app_pop);
ast_unregister_application(app_gosubif);
ast_unregister_application(app_gosub);
STANDARD_HANGUP_LOCALUSERS;
return 0;
}
int load_module(void)
{
ast_register_application(app_pop, pop_exec, pop_synopsis, pop_descrip);
ast_register_application(app_return, return_exec, return_synopsis,
return_descrip);
ast_register_application(app_gosubif, gosubif_exec, gosubif_synopsis,
gosubif_descrip);
ast_register_application(app_gosub, gosub_exec, gosub_synopsis,
gosub_descrip);
return 0;
}
char *description(void)
{
return (char *) tdesc;
}
int usecount(void)
{
int res;
STANDARD_USECOUNT(res);
return res;
}
char *key()
{
return ASTERISK_GPL_KEY;
}
Index: Makefile
===================================================================
RCS file: /usr/cvsroot/asterisk/apps/Makefile,v
retrieving revision 1.118
retrieving revision 1.119
diff -u -d -r1.118 -r1.119
--- Makefile 8 Nov 2005 00:12:21 -0000 1.118
+++ Makefile 8 Nov 2005 23:37:53 -0000 1.119
@@ -29,7 +29,7 @@
app_dumpchan.so app_waitforsilence.so app_while.so app_setrdnis.so \
app_md5.so app_readfile.so app_chanspy.so app_settransfercapability.so \
app_dictate.so app_externalivr.so app_directed_pickup.so \
- app_mixmonitor.so
+ app_mixmonitor.so app_stack.so
#
# Obsolete things...
_______________________________________________
Asterisk-Cvs mailing list
[email protected]
http://lists.digium.com/mailman/listinfo/asterisk-cvs
