![seanbright](/assets/img/avatar_default.png)
git-svn-id: http://svn.digium.com/svn/asterisk/trunk@137028 f38db490-d61c-443f-a65b-d21fe96a405b
3023 lines
94 KiB
C
3023 lines
94 KiB
C
/*
|
|
* Asterisk -- An open source telephony toolkit.
|
|
*
|
|
* Copyright (C) 1999 - 2006, Digium, Inc.
|
|
*
|
|
* Mark Spencer <markster@digium.com>
|
|
*
|
|
* 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 AGI - the Asterisk Gateway Interface
|
|
*
|
|
* \author Mark Spencer <markster@digium.com>
|
|
*/
|
|
|
|
#include "asterisk.h"
|
|
|
|
ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
|
|
|
|
#include <math.h>
|
|
#include <signal.h>
|
|
#include <sys/time.h>
|
|
#include <sys/wait.h>
|
|
#include <sys/stat.h>
|
|
#include <pthread.h>
|
|
|
|
#include "asterisk/paths.h" /* use many ast_config_AST_*_DIR */
|
|
#include "asterisk/network.h"
|
|
#include "asterisk/file.h"
|
|
#include "asterisk/channel.h"
|
|
#include "asterisk/pbx.h"
|
|
#include "asterisk/module.h"
|
|
#include "asterisk/astdb.h"
|
|
#include "asterisk/callerid.h"
|
|
#include "asterisk/cli.h"
|
|
#include "asterisk/image.h"
|
|
#include "asterisk/say.h"
|
|
#include "asterisk/app.h"
|
|
#include "asterisk/dsp.h"
|
|
#include "asterisk/musiconhold.h"
|
|
#include "asterisk/utils.h"
|
|
#include "asterisk/lock.h"
|
|
#include "asterisk/strings.h"
|
|
#include "asterisk/agi.h"
|
|
#include "asterisk/manager.h"
|
|
#include "asterisk/ast_version.h"
|
|
#include "asterisk/speech.h"
|
|
#include "asterisk/manager.h"
|
|
|
|
#define MAX_ARGS 128
|
|
#define AGI_NANDFS_RETRY 3
|
|
#define AGI_BUF_LEN 2048
|
|
|
|
static char *app = "AGI";
|
|
|
|
static char *eapp = "EAGI";
|
|
|
|
static char *deadapp = "DeadAGI";
|
|
|
|
static char *synopsis = "Executes an AGI compliant application";
|
|
static char *esynopsis = "Executes an EAGI compliant application";
|
|
static char *deadsynopsis = "Executes AGI on a hungup channel";
|
|
|
|
static char *descrip =
|
|
" [E|Dead]AGI(command,args): Executes an Asterisk Gateway Interface compliant\n"
|
|
"program on a channel. AGI allows Asterisk to launch external programs written\n"
|
|
"in any language to control a telephony channel, play audio, read DTMF digits,\n"
|
|
"etc. by communicating with the AGI protocol on stdin and stdout.\n"
|
|
" As of 1.6.0, this channel will not stop dialplan execution on hangup inside\n"
|
|
"of this application. Dialplan execution will continue normally, even upon\n"
|
|
"hangup until the AGI application signals a desire to stop (either by exiting\n"
|
|
"or, in the case of a net script, by closing the connection).\n"
|
|
" A locally executed AGI script will receive SIGHUP on hangup from the channel\n"
|
|
"except when using DeadAGI. A fast AGI server will correspondingly receive a\n"
|
|
"HANGUP in OOB data. Both of these signals may be disabled by setting the\n"
|
|
"AGISIGHUP channel variable to \"no\" before executing the AGI application.\n"
|
|
" Using 'EAGI' provides enhanced AGI, with incoming audio available out of band\n"
|
|
"on file descriptor 3.\n\n"
|
|
" Use the CLI command 'agi show' to list available agi commands.\n"
|
|
" This application sets the following channel variable upon completion:\n"
|
|
" AGISTATUS The status of the attempt to the run the AGI script\n"
|
|
" text string, one of SUCCESS | FAILURE | NOTFOUND | HANGUP\n";
|
|
|
|
static int agidebug = 0;
|
|
|
|
#define TONE_BLOCK_SIZE 200
|
|
|
|
/* Max time to connect to an AGI remote host */
|
|
#define MAX_AGI_CONNECT 2000
|
|
|
|
#define AGI_PORT 4573
|
|
|
|
enum agi_result {
|
|
AGI_RESULT_FAILURE = -1,
|
|
AGI_RESULT_SUCCESS,
|
|
AGI_RESULT_SUCCESS_FAST,
|
|
AGI_RESULT_SUCCESS_ASYNC,
|
|
AGI_RESULT_NOTFOUND,
|
|
AGI_RESULT_HANGUP,
|
|
};
|
|
|
|
static agi_command *find_command(char *cmds[], int exact);
|
|
|
|
AST_THREADSTORAGE(agi_buf);
|
|
#define AGI_BUF_INITSIZE 256
|
|
|
|
int ast_agi_fdprintf(struct ast_channel *chan, int fd, char *fmt, ...)
|
|
{
|
|
int res = 0;
|
|
va_list ap;
|
|
struct ast_str *buf;
|
|
|
|
if (!(buf = ast_str_thread_get(&agi_buf, AGI_BUF_INITSIZE)))
|
|
return -1;
|
|
|
|
va_start(ap, fmt);
|
|
res = ast_str_set_va(&buf, 0, fmt, ap);
|
|
va_end(ap);
|
|
|
|
if (res == -1) {
|
|
ast_log(LOG_ERROR, "Out of memory\n");
|
|
return -1;
|
|
}
|
|
|
|
if (agidebug) {
|
|
if (chan) {
|
|
ast_verbose("<%s>AGI Tx >> %s", chan->name, buf->str);
|
|
} else {
|
|
ast_verbose("AGI Tx >> %s", buf->str);
|
|
}
|
|
}
|
|
|
|
return ast_carefulwrite(fd, buf->str, buf->used, 100);
|
|
}
|
|
|
|
/* linked list of AGI commands ready to be executed by Async AGI */
|
|
struct agi_cmd {
|
|
char *cmd_buffer;
|
|
char *cmd_id;
|
|
AST_LIST_ENTRY(agi_cmd) entry;
|
|
};
|
|
|
|
static void free_agi_cmd(struct agi_cmd *cmd)
|
|
{
|
|
ast_free(cmd->cmd_buffer);
|
|
ast_free(cmd->cmd_id);
|
|
ast_free(cmd);
|
|
}
|
|
|
|
/* AGI datastore destructor */
|
|
static void agi_destroy_commands_cb(void *data)
|
|
{
|
|
struct agi_cmd *cmd;
|
|
AST_LIST_HEAD(, agi_cmd) *chan_cmds = data;
|
|
AST_LIST_LOCK(chan_cmds);
|
|
while ( (cmd = AST_LIST_REMOVE_HEAD(chan_cmds, entry)) ) {
|
|
free_agi_cmd(cmd);
|
|
}
|
|
AST_LIST_UNLOCK(chan_cmds);
|
|
AST_LIST_HEAD_DESTROY(chan_cmds);
|
|
ast_free(chan_cmds);
|
|
}
|
|
|
|
/* channel datastore to keep the queue of AGI commands in the channel */
|
|
static const struct ast_datastore_info agi_commands_datastore_info = {
|
|
.type = "AsyncAGI",
|
|
.destroy = agi_destroy_commands_cb
|
|
};
|
|
|
|
static const char mandescr_asyncagi[] =
|
|
"Description: Add an AGI command to the execute queue of the channel in Async AGI\n"
|
|
"Variables:\n"
|
|
" *Channel: Channel that is currently in Async AGI\n"
|
|
" *Command: Application to execute\n"
|
|
" CommandID: comand id. This will be sent back in CommandID header of AsyncAGI exec event notification\n"
|
|
"\n";
|
|
|
|
static struct agi_cmd *get_agi_cmd(struct ast_channel *chan)
|
|
{
|
|
struct ast_datastore *store;
|
|
struct agi_cmd *cmd;
|
|
AST_LIST_HEAD(, agi_cmd) *agi_commands;
|
|
|
|
ast_channel_lock(chan);
|
|
store = ast_channel_datastore_find(chan, &agi_commands_datastore_info, NULL);
|
|
ast_channel_unlock(chan);
|
|
if (!store) {
|
|
ast_log(LOG_ERROR, "Hu? datastore disappeared at Async AGI on Channel %s!\n", chan->name);
|
|
return NULL;
|
|
}
|
|
agi_commands = store->data;
|
|
AST_LIST_LOCK(agi_commands);
|
|
cmd = AST_LIST_REMOVE_HEAD(agi_commands, entry);
|
|
AST_LIST_UNLOCK(agi_commands);
|
|
return cmd;
|
|
}
|
|
|
|
/* channel is locked when calling this one either from the CLI or manager thread */
|
|
static int add_agi_cmd(struct ast_channel *chan, const char *cmd_buff, const char *cmd_id)
|
|
{
|
|
struct ast_datastore *store;
|
|
struct agi_cmd *cmd;
|
|
AST_LIST_HEAD(, agi_cmd) *agi_commands;
|
|
|
|
store = ast_channel_datastore_find(chan, &agi_commands_datastore_info, NULL);
|
|
if (!store) {
|
|
ast_log(LOG_WARNING, "Channel %s is not at Async AGI.\n", chan->name);
|
|
return -1;
|
|
}
|
|
agi_commands = store->data;
|
|
cmd = ast_calloc(1, sizeof(*cmd));
|
|
if (!cmd) {
|
|
return -1;
|
|
}
|
|
cmd->cmd_buffer = ast_strdup(cmd_buff);
|
|
if (!cmd->cmd_buffer) {
|
|
ast_free(cmd);
|
|
return -1;
|
|
}
|
|
cmd->cmd_id = ast_strdup(cmd_id);
|
|
if (!cmd->cmd_id) {
|
|
ast_free(cmd->cmd_buffer);
|
|
ast_free(cmd);
|
|
return -1;
|
|
}
|
|
AST_LIST_LOCK(agi_commands);
|
|
AST_LIST_INSERT_TAIL(agi_commands, cmd, entry);
|
|
AST_LIST_UNLOCK(agi_commands);
|
|
return 0;
|
|
}
|
|
|
|
static int add_to_agi(struct ast_channel *chan)
|
|
{
|
|
struct ast_datastore *datastore;
|
|
AST_LIST_HEAD(, agi_cmd) *agi_cmds_list;
|
|
|
|
/* check if already on AGI */
|
|
ast_channel_lock(chan);
|
|
datastore = ast_channel_datastore_find(chan, &agi_commands_datastore_info, NULL);
|
|
ast_channel_unlock(chan);
|
|
if (datastore) {
|
|
/* we already have an AGI datastore, let's just
|
|
return success */
|
|
return 0;
|
|
}
|
|
|
|
/* the channel has never been on Async AGI,
|
|
let's allocate it's datastore */
|
|
datastore = ast_datastore_alloc(&agi_commands_datastore_info, "AGI");
|
|
if (!datastore) {
|
|
return -1;
|
|
}
|
|
agi_cmds_list = ast_calloc(1, sizeof(*agi_cmds_list));
|
|
if (!agi_cmds_list) {
|
|
ast_log(LOG_ERROR, "Unable to allocate Async AGI commands list.\n");
|
|
ast_datastore_free(datastore);
|
|
return -1;
|
|
}
|
|
datastore->data = agi_cmds_list;
|
|
AST_LIST_HEAD_INIT(agi_cmds_list);
|
|
ast_channel_lock(chan);
|
|
ast_channel_datastore_add(chan, datastore);
|
|
ast_channel_unlock(chan);
|
|
return 0;
|
|
}
|
|
|
|
/*!
|
|
* \brief CLI command to add applications to execute in Async AGI
|
|
* \param e
|
|
* \param cmd
|
|
* \param a
|
|
*
|
|
* \retval CLI_SUCCESS on success
|
|
* \retval NULL when init or tab completion is used
|
|
*/
|
|
static char *handle_cli_agi_add_cmd(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
|
|
{
|
|
struct ast_channel *chan;
|
|
switch (cmd) {
|
|
case CLI_INIT:
|
|
e->command = "agi exec";
|
|
e->usage = "Usage: agi exec <channel name> <app and arguments> [id]\n"
|
|
" Add AGI command to the execute queue of the specified channel in Async AGI\n";
|
|
return NULL;
|
|
case CLI_GENERATE:
|
|
if (a->pos == 2)
|
|
return ast_complete_channels(a->line, a->word, a->pos, a->n, 2);
|
|
return NULL;
|
|
}
|
|
|
|
if (a->argc < 4)
|
|
return CLI_SHOWUSAGE;
|
|
chan = ast_get_channel_by_name_locked(a->argv[2]);
|
|
if (!chan) {
|
|
ast_log(LOG_WARNING, "Channel %s does not exists or cannot lock it\n", a->argv[2]);
|
|
return CLI_FAILURE;
|
|
}
|
|
if (add_agi_cmd(chan, a->argv[3], (a->argc > 4 ? a->argv[4] : ""))) {
|
|
ast_log(LOG_WARNING, "failed to add AGI command to queue of channel %s\n", chan->name);
|
|
ast_channel_unlock(chan);
|
|
return CLI_FAILURE;
|
|
}
|
|
ast_log(LOG_DEBUG, "Added AGI command to channel %s queue\n", chan->name);
|
|
ast_channel_unlock(chan);
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
/*!
|
|
* \brief Add a new command to execute by the Async AGI application
|
|
* \param s
|
|
* \param m
|
|
*
|
|
* It will append the application to the specified channel's queue
|
|
* if the channel is not inside Async AGI application it will return an error
|
|
* \retval 0 on success or incorrect use
|
|
* \retval 1 on failure to add the command ( most likely because the channel
|
|
* is not in Async AGI loop )
|
|
*/
|
|
static int action_add_agi_cmd(struct mansession *s, const struct message *m)
|
|
{
|
|
const char *channel = astman_get_header(m, "Channel");
|
|
const char *cmdbuff = astman_get_header(m, "Command");
|
|
const char *cmdid = astman_get_header(m, "CommandID");
|
|
struct ast_channel *chan;
|
|
char buf[256];
|
|
if (ast_strlen_zero(channel) || ast_strlen_zero(cmdbuff)) {
|
|
astman_send_error(s, m, "Both, Channel and Command are *required*");
|
|
return 0;
|
|
}
|
|
chan = ast_get_channel_by_name_locked(channel);
|
|
if (!chan) {
|
|
snprintf(buf, sizeof(buf), "Channel %s does not exists or cannot get its lock", channel);
|
|
astman_send_error(s, m, buf);
|
|
return 0;
|
|
}
|
|
if (add_agi_cmd(chan, cmdbuff, cmdid)) {
|
|
snprintf(buf, sizeof(buf), "Failed to add AGI command to channel %s queue", chan->name);
|
|
astman_send_error(s, m, buf);
|
|
ast_channel_unlock(chan);
|
|
return 0;
|
|
}
|
|
astman_send_ack(s, m, "Added AGI command to queue");
|
|
ast_channel_unlock(chan);
|
|
return 0;
|
|
}
|
|
|
|
static int agi_handle_command(struct ast_channel *chan, AGI *agi, char *buf, int dead);
|
|
static void setup_env(struct ast_channel *chan, char *request, int fd, int enhanced, int argc, char *argv[]);
|
|
static enum agi_result launch_asyncagi(struct ast_channel *chan, char *argv[], int *efd)
|
|
{
|
|
/* This buffer sizes might cause truncation if the AGI command writes more data
|
|
than AGI_BUF_SIZE as result. But let's be serious, is there an AGI command
|
|
that writes a response larger than 1024 bytes?, I don't think so, most of
|
|
them are just result=blah stuff. However probably if GET VARIABLE is called
|
|
and the variable has large amount of data, that could be a problem. We could
|
|
make this buffers dynamic, but let's leave that as a second step.
|
|
|
|
AMI_BUF_SIZE is twice AGI_BUF_SIZE just for the sake of choosing a safe
|
|
number. Some characters of AGI buf will be url encoded to be sent to manager
|
|
clients. An URL encoded character will take 3 bytes, but again, to cause
|
|
truncation more than about 70% of the AGI buffer should be URL encoded for
|
|
that to happen. Not likely at all.
|
|
|
|
On the other hand. I wonder if read() could eventually return less data than
|
|
the amount already available in the pipe? If so, how to deal with that?
|
|
So far, my tests on Linux have not had any problems.
|
|
*/
|
|
#define AGI_BUF_SIZE 1024
|
|
#define AMI_BUF_SIZE 2048
|
|
struct ast_frame *f;
|
|
struct agi_cmd *cmd;
|
|
int res, fds[2];
|
|
int timeout = 100;
|
|
char agi_buffer[AGI_BUF_SIZE + 1];
|
|
char ami_buffer[AMI_BUF_SIZE];
|
|
enum agi_result returnstatus = AGI_RESULT_SUCCESS_ASYNC;
|
|
AGI async_agi;
|
|
|
|
if (efd) {
|
|
ast_log(LOG_WARNING, "Async AGI does not support Enhanced AGI yet\n");
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
|
|
/* add AsyncAGI datastore to the channel */
|
|
if (add_to_agi(chan)) {
|
|
ast_log(LOG_ERROR, "failed to start Async AGI on channel %s\n", chan->name);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
|
|
/* this pipe allows us to create a "fake" AGI struct to use
|
|
the AGI commands */
|
|
res = pipe(fds);
|
|
if (res) {
|
|
ast_log(LOG_ERROR, "failed to create Async AGI pipe\n");
|
|
/* intentionally do not remove datastore, added with
|
|
add_to_agi(), from channel. It will be removed when
|
|
the channel is hung up anyways */
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
|
|
/* handlers will get the pipe write fd and we read the AGI responses
|
|
from the pipe read fd */
|
|
async_agi.fd = fds[1];
|
|
async_agi.ctrl = fds[1];
|
|
async_agi.audio = -1; /* no audio support */
|
|
async_agi.fast = 0;
|
|
|
|
/* notify possible manager users of a new channel ready to
|
|
receive commands */
|
|
setup_env(chan, "async", fds[1], 0, 0, NULL);
|
|
/* read the environment */
|
|
res = read(fds[0], agi_buffer, AGI_BUF_SIZE);
|
|
if (!res) {
|
|
ast_log(LOG_ERROR, "failed to read from Async AGI pipe on channel %s\n", chan->name);
|
|
returnstatus = AGI_RESULT_FAILURE;
|
|
goto quit;
|
|
}
|
|
agi_buffer[res] = '\0';
|
|
/* encode it and send it thru the manager so whoever is going to take
|
|
care of AGI commands on this channel can decide which AGI commands
|
|
to execute based on the setup info */
|
|
ast_uri_encode(agi_buffer, ami_buffer, AMI_BUF_SIZE, 1);
|
|
manager_event(EVENT_FLAG_CALL, "AsyncAGI", "SubEvent: Start\r\nChannel: %s\r\nEnv: %s\r\n", chan->name, ami_buffer);
|
|
while (1) {
|
|
/* bail out if we need to hangup */
|
|
if (ast_check_hangup(chan)) {
|
|
ast_log(LOG_DEBUG, "ast_check_hangup returned true on chan %s\n", chan->name);
|
|
break;
|
|
}
|
|
/* retrieve a command
|
|
(commands are added via the manager or the cli threads) */
|
|
cmd = get_agi_cmd(chan);
|
|
if (cmd) {
|
|
/* OK, we have a command, let's call the
|
|
command handler. */
|
|
res = agi_handle_command(chan, &async_agi, cmd->cmd_buffer, 0);
|
|
if ((res < 0) || (res == AST_PBX_KEEPALIVE)) {
|
|
free_agi_cmd(cmd);
|
|
break;
|
|
}
|
|
/* the command handler must have written to our fake
|
|
AGI struct fd (the pipe), let's read the response */
|
|
res = read(fds[0], agi_buffer, AGI_BUF_SIZE);
|
|
if (!res) {
|
|
returnstatus = AGI_RESULT_FAILURE;
|
|
ast_log(LOG_ERROR, "failed to read from AsyncAGI pipe on channel %s\n", chan->name);
|
|
free_agi_cmd(cmd);
|
|
break;
|
|
}
|
|
/* we have a response, let's send the response thru the
|
|
manager. Include the CommandID if it was specified
|
|
when the command was added */
|
|
agi_buffer[res] = '\0';
|
|
ast_uri_encode(agi_buffer, ami_buffer, AMI_BUF_SIZE, 1);
|
|
if (ast_strlen_zero(cmd->cmd_id))
|
|
manager_event(EVENT_FLAG_CALL, "AsyncAGI", "SubEvent: Exec\r\nChannel: %s\r\nResult: %s\r\n", chan->name, ami_buffer);
|
|
else
|
|
manager_event(EVENT_FLAG_CALL, "AsyncAGI", "SubEvent: Exec\r\nChannel: %s\r\nCommandID: %s\r\nResult: %s\r\n", chan->name, cmd->cmd_id, ami_buffer);
|
|
free_agi_cmd(cmd);
|
|
} else {
|
|
/* no command so far, wait a bit for a frame to read */
|
|
res = ast_waitfor(chan, timeout);
|
|
if (res < 0) {
|
|
ast_log(LOG_DEBUG, "ast_waitfor returned <= 0 on chan %s\n", chan->name);
|
|
break;
|
|
}
|
|
if (res == 0)
|
|
continue;
|
|
f = ast_read(chan);
|
|
if (!f) {
|
|
ast_log(LOG_DEBUG, "No frame read on channel %s, going out ...\n", chan->name);
|
|
returnstatus = AGI_RESULT_HANGUP;
|
|
break;
|
|
}
|
|
/* is there any other frame we should care about
|
|
besides AST_CONTROL_HANGUP? */
|
|
if (f->frametype == AST_FRAME_CONTROL && f->subclass == AST_CONTROL_HANGUP) {
|
|
ast_log(LOG_DEBUG, "Got HANGUP frame on channel %s, going out ...\n", chan->name);
|
|
ast_frfree(f);
|
|
break;
|
|
}
|
|
ast_frfree(f);
|
|
}
|
|
}
|
|
quit:
|
|
/* notify manager users this channel cannot be
|
|
controlled anymore by Async AGI */
|
|
manager_event(EVENT_FLAG_CALL, "AsyncAGI", "SubEvent: End\r\nChannel: %s\r\n", chan->name);
|
|
|
|
/* close the pipe */
|
|
close(fds[0]);
|
|
close(fds[1]);
|
|
|
|
/* intentionally don't get rid of the datastore. So commands can be
|
|
still in the queue in case AsyncAGI gets called again.
|
|
Datastore destructor will be called on channel destroy anyway */
|
|
|
|
return returnstatus;
|
|
|
|
#undef AGI_BUF_SIZE
|
|
#undef AMI_BUF_SIZE
|
|
}
|
|
|
|
/* launch_netscript: The fastagi handler.
|
|
FastAGI defaults to port 4573 */
|
|
static enum agi_result launch_netscript(char *agiurl, char *argv[], int *fds, int *efd, int *opid)
|
|
{
|
|
int s, flags, res, port = AGI_PORT;
|
|
struct pollfd pfds[1];
|
|
char *host, *c, *script = "";
|
|
struct sockaddr_in addr_in;
|
|
struct hostent *hp;
|
|
struct ast_hostent ahp;
|
|
|
|
/* agiusl is "agi://host.domain[:port][/script/name]" */
|
|
host = ast_strdupa(agiurl + 6); /* Remove agi:// */
|
|
/* Strip off any script name */
|
|
if ((c = strchr(host, '/'))) {
|
|
*c = '\0';
|
|
c++;
|
|
script = c;
|
|
}
|
|
if ((c = strchr(host, ':'))) {
|
|
*c = '\0';
|
|
c++;
|
|
port = atoi(c);
|
|
}
|
|
if (efd) {
|
|
ast_log(LOG_WARNING, "AGI URI's don't support Enhanced AGI yet\n");
|
|
return -1;
|
|
}
|
|
if (!(hp = ast_gethostbyname(host, &ahp))) {
|
|
ast_log(LOG_WARNING, "Unable to locate host '%s'\n", host);
|
|
return -1;
|
|
}
|
|
if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
|
|
ast_log(LOG_WARNING, "Unable to create socket: %s\n", strerror(errno));
|
|
return -1;
|
|
}
|
|
if ((flags = fcntl(s, F_GETFL)) < 0) {
|
|
ast_log(LOG_WARNING, "Fcntl(F_GETFL) failed: %s\n", strerror(errno));
|
|
close(s);
|
|
return -1;
|
|
}
|
|
if (fcntl(s, F_SETFL, flags | O_NONBLOCK) < 0) {
|
|
ast_log(LOG_WARNING, "Fnctl(F_SETFL) failed: %s\n", strerror(errno));
|
|
close(s);
|
|
return -1;
|
|
}
|
|
memset(&addr_in, 0, sizeof(addr_in));
|
|
addr_in.sin_family = AF_INET;
|
|
addr_in.sin_port = htons(port);
|
|
memcpy(&addr_in.sin_addr, hp->h_addr, sizeof(addr_in.sin_addr));
|
|
if (connect(s, (struct sockaddr *)&addr_in, sizeof(addr_in)) && (errno != EINPROGRESS)) {
|
|
ast_log(LOG_WARNING, "Connect failed with unexpected error: %s\n", strerror(errno));
|
|
close(s);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
|
|
pfds[0].fd = s;
|
|
pfds[0].events = POLLOUT;
|
|
while ((res = poll(pfds, 1, MAX_AGI_CONNECT)) != 1) {
|
|
if (errno != EINTR) {
|
|
if (!res) {
|
|
ast_log(LOG_WARNING, "FastAGI connection to '%s' timed out after MAX_AGI_CONNECT (%d) milliseconds.\n",
|
|
agiurl, MAX_AGI_CONNECT);
|
|
} else
|
|
ast_log(LOG_WARNING, "Connect to '%s' failed: %s\n", agiurl, strerror(errno));
|
|
close(s);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
}
|
|
|
|
if (ast_agi_fdprintf(NULL, s, "agi_network: yes\n") < 0) {
|
|
if (errno != EINTR) {
|
|
ast_log(LOG_WARNING, "Connect to '%s' failed: %s\n", agiurl, strerror(errno));
|
|
close(s);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
}
|
|
|
|
/* If we have a script parameter, relay it to the fastagi server */
|
|
/* Script parameters take the form of: AGI(agi://my.example.com/?extension=${EXTEN}) */
|
|
if (!ast_strlen_zero(script))
|
|
ast_agi_fdprintf(NULL, s, "agi_network_script: %s\n", script);
|
|
|
|
ast_debug(4, "Wow, connected!\n");
|
|
fds[0] = s;
|
|
fds[1] = s;
|
|
*opid = -1;
|
|
return AGI_RESULT_SUCCESS_FAST;
|
|
}
|
|
|
|
static enum agi_result launch_script(struct ast_channel *chan, char *script, char *argv[], int *fds, int *efd, int *opid)
|
|
{
|
|
char tmp[256];
|
|
int pid, toast[2], fromast[2], audio[2], res;
|
|
struct stat st;
|
|
|
|
if (!strncasecmp(script, "agi://", 6))
|
|
return launch_netscript(script, argv, fds, efd, opid);
|
|
if (!strncasecmp(script, "agi:async", sizeof("agi:async")-1))
|
|
return launch_asyncagi(chan, argv, efd);
|
|
|
|
if (script[0] != '/') {
|
|
snprintf(tmp, sizeof(tmp), "%s/%s", ast_config_AST_AGI_DIR, script);
|
|
script = tmp;
|
|
}
|
|
|
|
/* Before even trying let's see if the file actually exists */
|
|
if (stat(script, &st)) {
|
|
ast_log(LOG_WARNING, "Failed to execute '%s': File does not exist.\n", script);
|
|
return AGI_RESULT_NOTFOUND;
|
|
}
|
|
|
|
if (pipe(toast)) {
|
|
ast_log(LOG_WARNING, "Unable to create toast pipe: %s\n",strerror(errno));
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
if (pipe(fromast)) {
|
|
ast_log(LOG_WARNING, "unable to create fromast pipe: %s\n", strerror(errno));
|
|
close(toast[0]);
|
|
close(toast[1]);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
if (efd) {
|
|
if (pipe(audio)) {
|
|
ast_log(LOG_WARNING, "unable to create audio pipe: %s\n", strerror(errno));
|
|
close(fromast[0]);
|
|
close(fromast[1]);
|
|
close(toast[0]);
|
|
close(toast[1]);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
res = fcntl(audio[1], F_GETFL);
|
|
if (res > -1)
|
|
res = fcntl(audio[1], F_SETFL, res | O_NONBLOCK);
|
|
if (res < 0) {
|
|
ast_log(LOG_WARNING, "unable to set audio pipe parameters: %s\n", strerror(errno));
|
|
close(fromast[0]);
|
|
close(fromast[1]);
|
|
close(toast[0]);
|
|
close(toast[1]);
|
|
close(audio[0]);
|
|
close(audio[1]);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
}
|
|
|
|
if ((pid = ast_safe_fork(1)) < 0) {
|
|
ast_log(LOG_WARNING, "Failed to fork(): %s\n", strerror(errno));
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
if (!pid) {
|
|
/* Pass paths to AGI via environmental variables */
|
|
setenv("AST_CONFIG_DIR", ast_config_AST_CONFIG_DIR, 1);
|
|
setenv("AST_CONFIG_FILE", ast_config_AST_CONFIG_FILE, 1);
|
|
setenv("AST_MODULE_DIR", ast_config_AST_MODULE_DIR, 1);
|
|
setenv("AST_SPOOL_DIR", ast_config_AST_SPOOL_DIR, 1);
|
|
setenv("AST_MONITOR_DIR", ast_config_AST_MONITOR_DIR, 1);
|
|
setenv("AST_VAR_DIR", ast_config_AST_VAR_DIR, 1);
|
|
setenv("AST_DATA_DIR", ast_config_AST_DATA_DIR, 1);
|
|
setenv("AST_LOG_DIR", ast_config_AST_LOG_DIR, 1);
|
|
setenv("AST_AGI_DIR", ast_config_AST_AGI_DIR, 1);
|
|
setenv("AST_KEY_DIR", ast_config_AST_KEY_DIR, 1);
|
|
setenv("AST_RUN_DIR", ast_config_AST_RUN_DIR, 1);
|
|
|
|
/* Don't run AGI scripts with realtime priority -- it causes audio stutter */
|
|
ast_set_priority(0);
|
|
|
|
/* Redirect stdin and out, provide enhanced audio channel if desired */
|
|
dup2(fromast[0], STDIN_FILENO);
|
|
dup2(toast[1], STDOUT_FILENO);
|
|
if (efd)
|
|
dup2(audio[0], STDERR_FILENO + 1);
|
|
else
|
|
close(STDERR_FILENO + 1);
|
|
|
|
/* Close everything but stdin/out/error */
|
|
ast_close_fds_above_n(STDERR_FILENO + 1);
|
|
|
|
/* Execute script */
|
|
/* XXX argv should be deprecated in favor of passing agi_argX paramaters */
|
|
execv(script, argv);
|
|
/* Can't use ast_log since FD's are closed */
|
|
ast_child_verbose(1, "Failed to execute '%s': %s", script, strerror(errno));
|
|
/* Special case to set status of AGI to failure */
|
|
fprintf(stdout, "failure\n");
|
|
fflush(stdout);
|
|
_exit(1);
|
|
}
|
|
ast_verb(3, "Launched AGI Script %s\n", script);
|
|
fds[0] = toast[0];
|
|
fds[1] = fromast[1];
|
|
if (efd)
|
|
*efd = audio[1];
|
|
/* close what we're not using in the parent */
|
|
close(toast[1]);
|
|
close(fromast[0]);
|
|
|
|
if (efd)
|
|
close(audio[0]);
|
|
|
|
*opid = pid;
|
|
return AGI_RESULT_SUCCESS;
|
|
}
|
|
|
|
static void setup_env(struct ast_channel *chan, char *request, int fd, int enhanced, int argc, char *argv[])
|
|
{
|
|
int count;
|
|
|
|
/* Print initial environment, with agi_request always being the first
|
|
thing */
|
|
ast_agi_fdprintf(chan, fd, "agi_request: %s\n", request);
|
|
ast_agi_fdprintf(chan, fd, "agi_channel: %s\n", chan->name);
|
|
ast_agi_fdprintf(chan, fd, "agi_language: %s\n", chan->language);
|
|
ast_agi_fdprintf(chan, fd, "agi_type: %s\n", chan->tech->type);
|
|
ast_agi_fdprintf(chan, fd, "agi_uniqueid: %s\n", chan->uniqueid);
|
|
ast_agi_fdprintf(chan, fd, "agi_version: %s\n", ast_get_version());
|
|
|
|
/* ANI/DNIS */
|
|
ast_agi_fdprintf(chan, fd, "agi_callerid: %s\n", S_OR(chan->cid.cid_num, "unknown"));
|
|
ast_agi_fdprintf(chan, fd, "agi_calleridname: %s\n", S_OR(chan->cid.cid_name, "unknown"));
|
|
ast_agi_fdprintf(chan, fd, "agi_callingpres: %d\n", chan->cid.cid_pres);
|
|
ast_agi_fdprintf(chan, fd, "agi_callingani2: %d\n", chan->cid.cid_ani2);
|
|
ast_agi_fdprintf(chan, fd, "agi_callington: %d\n", chan->cid.cid_ton);
|
|
ast_agi_fdprintf(chan, fd, "agi_callingtns: %d\n", chan->cid.cid_tns);
|
|
ast_agi_fdprintf(chan, fd, "agi_dnid: %s\n", S_OR(chan->cid.cid_dnid, "unknown"));
|
|
ast_agi_fdprintf(chan, fd, "agi_rdnis: %s\n", S_OR(chan->cid.cid_rdnis, "unknown"));
|
|
|
|
/* Context information */
|
|
ast_agi_fdprintf(chan, fd, "agi_context: %s\n", chan->context);
|
|
ast_agi_fdprintf(chan, fd, "agi_extension: %s\n", chan->exten);
|
|
ast_agi_fdprintf(chan, fd, "agi_priority: %d\n", chan->priority);
|
|
ast_agi_fdprintf(chan, fd, "agi_enhanced: %s\n", enhanced ? "1.0" : "0.0");
|
|
|
|
/* User information */
|
|
ast_agi_fdprintf(chan, fd, "agi_accountcode: %s\n", chan->accountcode ? chan->accountcode : "");
|
|
ast_agi_fdprintf(chan, fd, "agi_threadid: %ld\n", (long)pthread_self());
|
|
|
|
/* Send any parameters to the fastagi server that have been passed via the agi application */
|
|
/* Agi application paramaters take the form of: AGI(/path/to/example/script|${EXTEN}) */
|
|
for(count = 1; count < argc; count++)
|
|
ast_agi_fdprintf(chan, fd, "agi_arg_%d: %s\n", count, argv[count]);
|
|
|
|
/* End with empty return */
|
|
ast_agi_fdprintf(chan, fd, "\n");
|
|
}
|
|
|
|
static int handle_answer(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res = 0;
|
|
|
|
/* Answer the channel */
|
|
if (chan->_state != AST_STATE_UP)
|
|
res = ast_answer(chan);
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_waitfordigit(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, to;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[3], "%d", &to) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_waitfordigit_full(chan, to, agi->audio, agi->ctrl);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_sendtext(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res;
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
/* At the moment, the parser (perhaps broken) returns with
|
|
the last argument PLUS the newline at the end of the input
|
|
buffer. This probably needs to be fixed, but I wont do that
|
|
because other stuff may break as a result. The right way
|
|
would probably be to strip off the trailing newline before
|
|
parsing, then here, add a newline at the end of the string
|
|
before sending it to ast_sendtext --DUDE */
|
|
res = ast_sendtext(chan, argv[2]);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_recvchar(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res;
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
res = ast_recvchar(chan,atoi(argv[2]));
|
|
if (res == 0) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (timeout)\n", res);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
if (res > 0) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (hangup)\n", res);
|
|
return RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_recvtext(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
char *buf;
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
buf = ast_recvtext(chan, atoi(argv[2]));
|
|
if (buf) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (%s)\n", buf);
|
|
ast_free(buf);
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=-1\n");
|
|
}
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_tddmode(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, x;
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!strncasecmp(argv[2],"on",2)) {
|
|
x = 1;
|
|
} else {
|
|
x = 0;
|
|
}
|
|
if (!strncasecmp(argv[2],"mate",4)) {
|
|
x = 2;
|
|
}
|
|
if (!strncasecmp(argv[2],"tdd",3)) {
|
|
x = 1;
|
|
}
|
|
res = ast_channel_setoption(chan, AST_OPTION_TDD, &x, sizeof(char), 0);
|
|
if (res != RESULT_SUCCESS) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
}
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_sendimage(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res;
|
|
|
|
if (argc != 3) {
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
|
|
res = ast_send_image(chan, argv[2]);
|
|
if (!ast_check_hangup(chan)) {
|
|
res = 0;
|
|
}
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_controlstreamfile(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res = 0, skipms = 3000;
|
|
char *fwd = "#", *rev = "*", *suspend = NULL, *stop = NULL; /* Default values */
|
|
|
|
if (argc < 5 || argc > 9) {
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
|
|
if (!ast_strlen_zero(argv[4])) {
|
|
stop = argv[4];
|
|
}
|
|
|
|
if ((argc > 5) && (sscanf(argv[5], "%d", &skipms) != 1)) {
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
|
|
if (argc > 6 && !ast_strlen_zero(argv[6])) {
|
|
fwd = argv[6];
|
|
}
|
|
|
|
if (argc > 7 && !ast_strlen_zero(argv[7])) {
|
|
rev = argv[7];
|
|
}
|
|
|
|
if (argc > 8 && !ast_strlen_zero(argv[8])) {
|
|
suspend = argv[8];
|
|
}
|
|
|
|
res = ast_control_streamfile(chan, argv[3], fwd, rev, stop, suspend, NULL, skipms, NULL);
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_streamfile(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, vres;
|
|
struct ast_filestream *fs, *vfs;
|
|
long sample_offset = 0, max_length;
|
|
char *edigits = "";
|
|
|
|
if (argc < 4 || argc > 5)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (argv[3])
|
|
edigits = argv[3];
|
|
|
|
if ((argc > 4) && (sscanf(argv[4], "%ld", &sample_offset) != 1))
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!(fs = ast_openstream(chan, argv[2], chan->language))) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d endpos=%ld\n", 0, sample_offset);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if ((vfs = ast_openvstream(chan, argv[2], chan->language)))
|
|
ast_debug(1, "Ooh, found a video stream, too\n");
|
|
|
|
ast_verb(3, "Playing '%s' (escape_digits=%s) (sample_offset %ld)\n", argv[2], edigits, sample_offset);
|
|
|
|
ast_seekstream(fs, 0, SEEK_END);
|
|
max_length = ast_tellstream(fs);
|
|
ast_seekstream(fs, sample_offset, SEEK_SET);
|
|
res = ast_applystream(chan, fs);
|
|
if (vfs)
|
|
vres = ast_applystream(chan, vfs);
|
|
ast_playstream(fs);
|
|
if (vfs)
|
|
ast_playstream(vfs);
|
|
|
|
res = ast_waitstream_full(chan, argv[3], agi->audio, agi->ctrl);
|
|
/* this is to check for if ast_waitstream closed the stream, we probably are at
|
|
* the end of the stream, return that amount, else check for the amount */
|
|
sample_offset = (chan->stream) ? ast_tellstream(fs) : max_length;
|
|
ast_stopstream(chan);
|
|
if (res == 1) {
|
|
/* Stop this command, don't print a result line, as there is a new command */
|
|
return RESULT_SUCCESS;
|
|
}
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d endpos=%ld\n", res, sample_offset);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
/*! \brief get option - really similar to the handle_streamfile, but with a timeout */
|
|
static int handle_getoption(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, vres;
|
|
struct ast_filestream *fs, *vfs;
|
|
long sample_offset = 0, max_length;
|
|
int timeout = 0;
|
|
char *edigits = "";
|
|
|
|
if ( argc < 4 || argc > 5 )
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if ( argv[3] )
|
|
edigits = argv[3];
|
|
|
|
if ( argc == 5 )
|
|
timeout = atoi(argv[4]);
|
|
else if (chan->pbx->dtimeoutms) {
|
|
/* by default dtimeout is set to 5sec */
|
|
timeout = chan->pbx->dtimeoutms; /* in msec */
|
|
}
|
|
|
|
if (!(fs = ast_openstream(chan, argv[2], chan->language))) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d endpos=%ld\n", 0, sample_offset);
|
|
ast_log(LOG_WARNING, "Unable to open %s\n", argv[2]);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if ((vfs = ast_openvstream(chan, argv[2], chan->language)))
|
|
ast_debug(1, "Ooh, found a video stream, too\n");
|
|
|
|
ast_verb(3, "Playing '%s' (escape_digits=%s) (timeout %d)\n", argv[2], edigits, timeout);
|
|
|
|
ast_seekstream(fs, 0, SEEK_END);
|
|
max_length = ast_tellstream(fs);
|
|
ast_seekstream(fs, sample_offset, SEEK_SET);
|
|
res = ast_applystream(chan, fs);
|
|
if (vfs)
|
|
vres = ast_applystream(chan, vfs);
|
|
ast_playstream(fs);
|
|
if (vfs)
|
|
ast_playstream(vfs);
|
|
|
|
res = ast_waitstream_full(chan, argv[3], agi->audio, agi->ctrl);
|
|
/* this is to check for if ast_waitstream closed the stream, we probably are at
|
|
* the end of the stream, return that amount, else check for the amount */
|
|
sample_offset = (chan->stream)?ast_tellstream(fs):max_length;
|
|
ast_stopstream(chan);
|
|
if (res == 1) {
|
|
/* Stop this command, don't print a result line, as there is a new command */
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
/* If the user didnt press a key, wait for digitTimeout*/
|
|
if (res == 0 ) {
|
|
res = ast_waitfordigit_full(chan, timeout, agi->audio, agi->ctrl);
|
|
/* Make sure the new result is in the escape digits of the GET OPTION */
|
|
if ( !strchr(edigits,res) )
|
|
res=0;
|
|
}
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d endpos=%ld\n", res, sample_offset);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
|
|
|
|
|
|
/*! \brief Say number in various language syntaxes */
|
|
/* While waiting, we're sending a NULL. */
|
|
static int handle_saynumber(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, num;
|
|
|
|
if (argc < 4 || argc > 5)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[2], "%d", &num) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_say_number_full(chan, num, argv[3], chan->language, argc > 4 ? argv[4] : NULL, agi->audio, agi->ctrl);
|
|
if (res == 1)
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_saydigits(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, num;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[2], "%d", &num) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
res = ast_say_digit_str_full(chan, argv[2], argv[3], chan->language, agi->audio, agi->ctrl);
|
|
if (res == 1) /* New command */
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_sayalpha(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
res = ast_say_character_str_full(chan, argv[2], argv[3], chan->language, agi->audio, agi->ctrl);
|
|
if (res == 1) /* New command */
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_saydate(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, num;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[2], "%d", &num) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_say_date(chan, num, argv[3], chan->language);
|
|
if (res == 1)
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_saytime(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, num;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[2], "%d", &num) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_say_time(chan, num, argv[3], chan->language);
|
|
if (res == 1)
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_saydatetime(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res = 0;
|
|
time_t unixtime;
|
|
char *format, *zone = NULL;
|
|
|
|
if (argc < 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (argc > 4) {
|
|
format = argv[4];
|
|
} else {
|
|
/* XXX this doesn't belong here, but in the 'say' module */
|
|
if (!strcasecmp(chan->language, "de")) {
|
|
format = "A dBY HMS";
|
|
} else {
|
|
format = "ABdY 'digits/at' IMp";
|
|
}
|
|
}
|
|
|
|
if (argc > 5 && !ast_strlen_zero(argv[5]))
|
|
zone = argv[5];
|
|
|
|
if (ast_get_time_t(argv[2], &unixtime, 0, NULL))
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
res = ast_say_date_with_format(chan, unixtime, argv[3], chan->language, format, zone);
|
|
if (res == 1)
|
|
return RESULT_SUCCESS;
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_sayphonetic(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
res = ast_say_phonetic_str_full(chan, argv[2], argv[3], chan->language, agi->audio, agi->ctrl);
|
|
if (res == 1) /* New command */
|
|
return RESULT_SUCCESS;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
return (res >= 0) ? RESULT_SUCCESS : RESULT_FAILURE;
|
|
}
|
|
|
|
static int handle_getdata(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
int res, max, timeout;
|
|
char data[1024];
|
|
|
|
if (argc < 3)
|
|
return RESULT_SHOWUSAGE;
|
|
if (argc >= 4)
|
|
timeout = atoi(argv[3]);
|
|
else
|
|
timeout = 0;
|
|
if (argc >= 5)
|
|
max = atoi(argv[4]);
|
|
else
|
|
max = 1024;
|
|
res = ast_app_getdata_full(chan, argv[2], data, max, timeout, agi->audio, agi->ctrl);
|
|
if (res == 2) /* New command */
|
|
return RESULT_SUCCESS;
|
|
else if (res == 1)
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%s (timeout)\n", data);
|
|
else if (res < 0 )
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=-1\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%s\n", data);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_setcontext(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
ast_copy_string(chan->context, argv[2], sizeof(chan->context));
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_setextension(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
ast_copy_string(chan->exten, argv[2], sizeof(chan->exten));
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_setpriority(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int pri;
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (sscanf(argv[2], "%d", &pri) != 1) {
|
|
if ((pri = ast_findlabel_extension(chan, chan->context, chan->exten, argv[2], chan->cid.cid_num)) < 1)
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
|
|
ast_explicit_goto(chan, NULL, NULL, pri);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_recordfile(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
struct ast_filestream *fs;
|
|
struct ast_frame *f;
|
|
struct timeval start;
|
|
long sample_offset = 0;
|
|
int res = 0;
|
|
int ms;
|
|
|
|
struct ast_dsp *sildet=NULL; /* silence detector dsp */
|
|
int totalsilence = 0;
|
|
int dspsilence = 0;
|
|
int silence = 0; /* amount of silence to allow */
|
|
int gotsilence = 0; /* did we timeout for silence? */
|
|
char *silencestr = NULL;
|
|
int rfmt = 0;
|
|
|
|
/* XXX EAGI FIXME XXX */
|
|
|
|
if (argc < 6)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[5], "%d", &ms) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (argc > 6)
|
|
silencestr = strchr(argv[6],'s');
|
|
if ((argc > 7) && (!silencestr))
|
|
silencestr = strchr(argv[7],'s');
|
|
if ((argc > 8) && (!silencestr))
|
|
silencestr = strchr(argv[8],'s');
|
|
|
|
if (silencestr) {
|
|
if (strlen(silencestr) > 2) {
|
|
if ((silencestr[0] == 's') && (silencestr[1] == '=')) {
|
|
silencestr++;
|
|
silencestr++;
|
|
if (silencestr)
|
|
silence = atoi(silencestr);
|
|
if (silence > 0)
|
|
silence *= 1000;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (silence > 0) {
|
|
rfmt = chan->readformat;
|
|
res = ast_set_read_format(chan, AST_FORMAT_SLINEAR);
|
|
if (res < 0) {
|
|
ast_log(LOG_WARNING, "Unable to set to linear mode, giving up\n");
|
|
return -1;
|
|
}
|
|
sildet = ast_dsp_new();
|
|
if (!sildet) {
|
|
ast_log(LOG_WARNING, "Unable to create silence detector :(\n");
|
|
return -1;
|
|
}
|
|
ast_dsp_set_threshold(sildet, ast_dsp_get_threshold_from_settings(THRESHOLD_SILENCE));
|
|
}
|
|
|
|
/* backward compatibility, if no offset given, arg[6] would have been
|
|
* caught below and taken to be a beep, else if it is a digit then it is a
|
|
* offset */
|
|
if ((argc >6) && (sscanf(argv[6], "%ld", &sample_offset) != 1) && (!strchr(argv[6], '=')))
|
|
res = ast_streamfile(chan, "beep", chan->language);
|
|
|
|
if ((argc > 7) && (!strchr(argv[7], '=')))
|
|
res = ast_streamfile(chan, "beep", chan->language);
|
|
|
|
if (!res)
|
|
res = ast_waitstream(chan, argv[4]);
|
|
if (res) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (randomerror) endpos=%ld\n", res, sample_offset);
|
|
} else {
|
|
fs = ast_writefile(argv[2], argv[3], NULL, O_CREAT | O_WRONLY | (sample_offset ? O_APPEND : 0), 0, AST_FILE_MODE);
|
|
if (!fs) {
|
|
res = -1;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (writefile)\n", res);
|
|
if (sildet)
|
|
ast_dsp_free(sildet);
|
|
return RESULT_FAILURE;
|
|
}
|
|
|
|
/* Request a video update */
|
|
ast_indicate(chan, AST_CONTROL_VIDUPDATE);
|
|
|
|
chan->stream = fs;
|
|
ast_applystream(chan,fs);
|
|
/* really should have checks */
|
|
ast_seekstream(fs, sample_offset, SEEK_SET);
|
|
ast_truncstream(fs);
|
|
|
|
start = ast_tvnow();
|
|
while ((ms < 0) || ast_tvdiff_ms(ast_tvnow(), start) < ms) {
|
|
res = ast_waitfor(chan, -1);
|
|
if (res < 0) {
|
|
ast_closestream(fs);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (waitfor) endpos=%ld\n", res,sample_offset);
|
|
if (sildet)
|
|
ast_dsp_free(sildet);
|
|
return RESULT_FAILURE;
|
|
}
|
|
f = ast_read(chan);
|
|
if (!f) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (hangup) endpos=%ld\n", -1, sample_offset);
|
|
ast_closestream(fs);
|
|
if (sildet)
|
|
ast_dsp_free(sildet);
|
|
return RESULT_FAILURE;
|
|
}
|
|
switch(f->frametype) {
|
|
case AST_FRAME_DTMF:
|
|
if (strchr(argv[4], f->subclass)) {
|
|
/* This is an interrupting chracter, so rewind to chop off any small
|
|
amount of DTMF that may have been recorded
|
|
*/
|
|
ast_stream_rewind(fs, 200);
|
|
ast_truncstream(fs);
|
|
sample_offset = ast_tellstream(fs);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (dtmf) endpos=%ld\n", f->subclass, sample_offset);
|
|
ast_closestream(fs);
|
|
ast_frfree(f);
|
|
if (sildet)
|
|
ast_dsp_free(sildet);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
break;
|
|
case AST_FRAME_VOICE:
|
|
ast_writestream(fs, f);
|
|
/* this is a safe place to check progress since we know that fs
|
|
* is valid after a write, and it will then have our current
|
|
* location */
|
|
sample_offset = ast_tellstream(fs);
|
|
if (silence > 0) {
|
|
dspsilence = 0;
|
|
ast_dsp_silence(sildet, f, &dspsilence);
|
|
if (dspsilence) {
|
|
totalsilence = dspsilence;
|
|
} else {
|
|
totalsilence = 0;
|
|
}
|
|
if (totalsilence > silence) {
|
|
/* Ended happily with silence */
|
|
gotsilence = 1;
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
case AST_FRAME_VIDEO:
|
|
ast_writestream(fs, f);
|
|
default:
|
|
/* Ignore all other frames */
|
|
break;
|
|
}
|
|
ast_frfree(f);
|
|
if (gotsilence)
|
|
break;
|
|
}
|
|
|
|
if (gotsilence) {
|
|
ast_stream_rewind(fs, silence-1000);
|
|
ast_truncstream(fs);
|
|
sample_offset = ast_tellstream(fs);
|
|
}
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d (timeout) endpos=%ld\n", res, sample_offset);
|
|
ast_closestream(fs);
|
|
}
|
|
|
|
if (silence > 0) {
|
|
res = ast_set_read_format(chan, rfmt);
|
|
if (res)
|
|
ast_log(LOG_WARNING, "Unable to restore read format on '%s'\n", chan->name);
|
|
ast_dsp_free(sildet);
|
|
}
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_autohangup(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
double timeout;
|
|
struct timeval whentohangup = { 0, 0 };
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
if (sscanf(argv[2], "%lf", &timeout) != 1)
|
|
return RESULT_SHOWUSAGE;
|
|
if (timeout < 0)
|
|
timeout = 0;
|
|
if (timeout) {
|
|
whentohangup.tv_sec = timeout;
|
|
whentohangup.tv_usec = (timeout - whentohangup.tv_sec) * 1000000.0;
|
|
}
|
|
ast_channel_setwhentohangup_tv(chan, whentohangup);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_hangup(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
struct ast_channel *c;
|
|
|
|
if (argc == 1) {
|
|
/* no argument: hangup the current channel */
|
|
ast_softhangup(chan,AST_SOFTHANGUP_EXPLICIT);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
return RESULT_SUCCESS;
|
|
} else if (argc == 2) {
|
|
/* one argument: look for info on the specified channel */
|
|
c = ast_get_channel_by_name_locked(argv[1]);
|
|
if (c) {
|
|
/* we have a matching channel */
|
|
ast_softhangup(c,AST_SOFTHANGUP_EXPLICIT);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
ast_channel_unlock(c);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
/* if we get this far no channel name matched the argument given */
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=-1\n");
|
|
return RESULT_SUCCESS;
|
|
} else {
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
}
|
|
|
|
static int handle_exec(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int res;
|
|
struct ast_app *app_to_exec;
|
|
|
|
if (argc < 2)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
ast_verb(3, "AGI Script Executing Application: (%s) Options: (%s)\n", argv[1], argv[2]);
|
|
|
|
if ((app_to_exec = pbx_findapp(argv[1]))) {
|
|
if (ast_compat_res_agi && !ast_strlen_zero(argv[2])) {
|
|
char *compat = alloca(strlen(argv[2]) * 2 + 1), *cptr, *vptr;
|
|
for (cptr = compat, vptr = argv[2]; *vptr; vptr++) {
|
|
if (*vptr == ',') {
|
|
*cptr++ = '\\';
|
|
*cptr++ = ',';
|
|
} else if (*vptr == '|') {
|
|
*cptr++ = ',';
|
|
} else {
|
|
*cptr++ = *vptr;
|
|
}
|
|
}
|
|
*cptr = '\0';
|
|
res = pbx_exec(chan, app_to_exec, compat);
|
|
} else {
|
|
res = pbx_exec(chan, app_to_exec, argv[2]);
|
|
}
|
|
} else {
|
|
ast_log(LOG_WARNING, "Could not find application (%s)\n", argv[1]);
|
|
res = -2;
|
|
}
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", res);
|
|
|
|
/* Even though this is wrong, users are depending upon this result. */
|
|
return res;
|
|
}
|
|
|
|
static int handle_setcallerid(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
char tmp[256]="";
|
|
char *l = NULL, *n = NULL;
|
|
|
|
if (argv[2]) {
|
|
ast_copy_string(tmp, argv[2], sizeof(tmp));
|
|
ast_callerid_parse(tmp, &n, &l);
|
|
if (l)
|
|
ast_shrink_phone_number(l);
|
|
else
|
|
l = "";
|
|
if (!n)
|
|
n = "";
|
|
ast_set_callerid(chan, l, n, NULL);
|
|
}
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_channelstatus(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
struct ast_channel *c;
|
|
if (argc == 2) {
|
|
/* no argument: supply info on the current channel */
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", chan->_state);
|
|
return RESULT_SUCCESS;
|
|
} else if (argc == 3) {
|
|
/* one argument: look for info on the specified channel */
|
|
c = ast_get_channel_by_name_locked(argv[2]);
|
|
if (c) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%d\n", c->_state);
|
|
ast_channel_unlock(c);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
/* if we get this far no channel name matched the argument given */
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=-1\n");
|
|
return RESULT_SUCCESS;
|
|
} else {
|
|
return RESULT_SHOWUSAGE;
|
|
}
|
|
}
|
|
|
|
static int handle_setvariable(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argv[3])
|
|
pbx_builtin_setvar_helper(chan, argv[2], argv[3]);
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_getvariable(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
char *ret;
|
|
char tempstr[1024];
|
|
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
/* check if we want to execute an ast_custom_function */
|
|
if (!ast_strlen_zero(argv[2]) && (argv[2][strlen(argv[2]) - 1] == ')')) {
|
|
ret = ast_func_read(chan, argv[2], tempstr, sizeof(tempstr)) ? NULL : tempstr;
|
|
} else {
|
|
pbx_retrieve_variable(chan, argv[2], &ret, tempstr, sizeof(tempstr), NULL);
|
|
}
|
|
|
|
if (ret)
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (%s)\n", ret);
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_getvariablefull(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
char tmp[4096];
|
|
struct ast_channel *chan2=NULL;
|
|
|
|
if ((argc != 4) && (argc != 5))
|
|
return RESULT_SHOWUSAGE;
|
|
if (argc == 5) {
|
|
chan2 = ast_get_channel_by_name_locked(argv[4]);
|
|
} else {
|
|
chan2 = chan;
|
|
}
|
|
if (chan2) {
|
|
pbx_substitute_variables_helper(chan2, argv[3], tmp, sizeof(tmp) - 1);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (%s)\n", tmp);
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
}
|
|
if (chan2 && (chan2 != chan))
|
|
ast_channel_unlock(chan2);
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_verbose(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int level = 0;
|
|
|
|
if (argc < 2)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (argv[2])
|
|
sscanf(argv[2], "%d", &level);
|
|
|
|
ast_verb(level, "%s: %s\n", chan->data, argv[1]);
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_dbget(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int res;
|
|
char tmp[256];
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_db_get(argv[2], argv[3], tmp, sizeof(tmp));
|
|
if (res)
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (%s)\n", tmp);
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_dbput(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int res;
|
|
|
|
if (argc != 5)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_db_put(argv[2], argv[3], argv[4]);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%c\n", res ? '0' : '1');
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_dbdel(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int res;
|
|
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
res = ast_db_del(argv[2], argv[3]);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%c\n", res ? '0' : '1');
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_dbdeltree(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
int res;
|
|
|
|
if ((argc < 3) || (argc > 4))
|
|
return RESULT_SHOWUSAGE;
|
|
if (argc == 4)
|
|
res = ast_db_deltree(argv[2], argv[3]);
|
|
else
|
|
res = ast_db_deltree(argv[2], NULL);
|
|
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=%c\n", res ? '0' : '1');
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static char *handle_cli_agi_debug(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
|
|
{
|
|
switch (cmd) {
|
|
case CLI_INIT:
|
|
e->command = "agi set debug [on|off]";
|
|
e->usage =
|
|
"Usage: agi set debug [on|off]\n"
|
|
" Enables/disables dumping of AGI transactions for\n"
|
|
" debugging purposes.\n";
|
|
return NULL;
|
|
|
|
case CLI_GENERATE:
|
|
return NULL;
|
|
}
|
|
|
|
if (a->argc != e->args)
|
|
return CLI_SHOWUSAGE;
|
|
|
|
if (strncasecmp(a->argv[3], "off", 3) == 0) {
|
|
agidebug = 0;
|
|
} else if (strncasecmp(a->argv[3], "on", 2) == 0) {
|
|
agidebug = 1;
|
|
} else {
|
|
return CLI_SHOWUSAGE;
|
|
}
|
|
ast_cli(a->fd, "AGI Debugging %sabled\n", agidebug ? "En" : "Dis");
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
static int handle_noop(struct ast_channel *chan, AGI *agi, int arg, char *argv[])
|
|
{
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_setmusic(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
if (!strncasecmp(argv[2], "on", 2))
|
|
ast_moh_start(chan, argc > 3 ? argv[3] : NULL, NULL);
|
|
else if (!strncasecmp(argv[2], "off", 3))
|
|
ast_moh_stop(chan);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechcreate(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
/* If a structure already exists, return an error */
|
|
if (agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if ((agi->speech = ast_speech_new(argv[2], AST_FORMAT_SLINEAR)))
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechset(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
/* Check for minimum arguments */
|
|
if (argc != 3)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
/* Check to make sure speech structure exists */
|
|
if (!agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
ast_speech_change(agi->speech, argv[2], argv[3]);
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechdestroy(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (agi->speech) {
|
|
ast_speech_destroy(agi->speech);
|
|
agi->speech = NULL;
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
}
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechloadgrammar(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argc != 5)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if (ast_speech_grammar_load(agi->speech, argv[3], argv[4]))
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechunloadgrammar(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if (ast_speech_grammar_unload(agi->speech, argv[3]))
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechactivategrammar(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if (ast_speech_grammar_activate(agi->speech, argv[3]))
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_speechdeactivategrammar(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
if (argc != 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!agi->speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
if (ast_speech_grammar_deactivate(agi->speech, argv[3]))
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
else
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1\n");
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int speech_streamfile(struct ast_channel *chan, const char *filename, const char *preflang, int offset)
|
|
{
|
|
struct ast_filestream *fs = NULL;
|
|
|
|
if (!(fs = ast_openstream(chan, filename, preflang)))
|
|
return -1;
|
|
|
|
if (offset)
|
|
ast_seekstream(fs, offset, SEEK_SET);
|
|
|
|
if (ast_applystream(chan, fs))
|
|
return -1;
|
|
|
|
if (ast_playstream(fs))
|
|
return -1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int handle_speechrecognize(struct ast_channel *chan, AGI *agi, int argc, char **argv)
|
|
{
|
|
struct ast_speech *speech = agi->speech;
|
|
char *prompt, dtmf = 0, tmp[4096] = "", *buf = tmp;
|
|
int timeout = 0, offset = 0, old_read_format = 0, res = 0, i = 0;
|
|
long current_offset = 0;
|
|
const char *reason = NULL;
|
|
struct ast_frame *fr = NULL;
|
|
struct ast_speech_result *result = NULL;
|
|
size_t left = sizeof(tmp);
|
|
time_t start = 0, current;
|
|
|
|
if (argc < 4)
|
|
return RESULT_SHOWUSAGE;
|
|
|
|
if (!speech) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
prompt = argv[2];
|
|
timeout = atoi(argv[3]);
|
|
|
|
/* If offset is specified then convert from text to integer */
|
|
if (argc == 5)
|
|
offset = atoi(argv[4]);
|
|
|
|
/* We want frames coming in signed linear */
|
|
old_read_format = chan->readformat;
|
|
if (ast_set_read_format(chan, AST_FORMAT_SLINEAR)) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
/* Setup speech structure */
|
|
if (speech->state == AST_SPEECH_STATE_NOT_READY || speech->state == AST_SPEECH_STATE_DONE) {
|
|
ast_speech_change_state(speech, AST_SPEECH_STATE_NOT_READY);
|
|
ast_speech_start(speech);
|
|
}
|
|
|
|
/* Start playing prompt */
|
|
speech_streamfile(chan, prompt, chan->language, offset);
|
|
|
|
/* Go into loop reading in frames, passing to speech thingy, checking for hangup, all that jazz */
|
|
while (ast_strlen_zero(reason)) {
|
|
/* Run scheduled items */
|
|
ast_sched_runq(chan->sched);
|
|
|
|
/* See maximum time of waiting */
|
|
if ((res = ast_sched_wait(chan->sched)) < 0)
|
|
res = 1000;
|
|
|
|
/* Wait for frame */
|
|
if (ast_waitfor(chan, res) > 0) {
|
|
if (!(fr = ast_read(chan))) {
|
|
reason = "hangup";
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* Perform timeout check */
|
|
if ((timeout > 0) && (start > 0)) {
|
|
time(¤t);
|
|
if ((current - start) >= timeout) {
|
|
reason = "timeout";
|
|
if (fr)
|
|
ast_frfree(fr);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* Check the speech structure for any changes */
|
|
ast_mutex_lock(&speech->lock);
|
|
|
|
/* See if we need to quiet the audio stream playback */
|
|
if (ast_test_flag(speech, AST_SPEECH_QUIET) && chan->stream) {
|
|
current_offset = ast_tellstream(chan->stream);
|
|
ast_stopstream(chan);
|
|
ast_clear_flag(speech, AST_SPEECH_QUIET);
|
|
}
|
|
|
|
/* Check each state */
|
|
switch (speech->state) {
|
|
case AST_SPEECH_STATE_READY:
|
|
/* If the stream is done, start timeout calculation */
|
|
if ((timeout > 0) && ((!chan->stream) || (chan->streamid == -1 && chan->timingfunc == NULL))) {
|
|
ast_stopstream(chan);
|
|
time(&start);
|
|
}
|
|
/* Write audio frame data into speech engine if possible */
|
|
if (fr && fr->frametype == AST_FRAME_VOICE)
|
|
ast_speech_write(speech, fr->data.ptr, fr->datalen);
|
|
break;
|
|
case AST_SPEECH_STATE_WAIT:
|
|
/* Cue waiting sound if not already playing */
|
|
if ((!chan->stream) || (chan->streamid == -1 && chan->timingfunc == NULL)) {
|
|
ast_stopstream(chan);
|
|
/* If a processing sound exists, or is not none - play it */
|
|
if (!ast_strlen_zero(speech->processing_sound) && strcasecmp(speech->processing_sound, "none"))
|
|
speech_streamfile(chan, speech->processing_sound, chan->language, 0);
|
|
}
|
|
break;
|
|
case AST_SPEECH_STATE_DONE:
|
|
/* Get the results */
|
|
speech->results = ast_speech_results_get(speech);
|
|
/* Change state to not ready */
|
|
ast_speech_change_state(speech, AST_SPEECH_STATE_NOT_READY);
|
|
reason = "speech";
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
ast_mutex_unlock(&speech->lock);
|
|
|
|
/* Check frame for DTMF or hangup */
|
|
if (fr) {
|
|
if (fr->frametype == AST_FRAME_DTMF) {
|
|
reason = "dtmf";
|
|
dtmf = fr->subclass;
|
|
} else if (fr->frametype == AST_FRAME_CONTROL && fr->subclass == AST_CONTROL_HANGUP) {
|
|
reason = "hangup";
|
|
}
|
|
ast_frfree(fr);
|
|
}
|
|
}
|
|
|
|
if (!strcasecmp(reason, "speech")) {
|
|
/* Build string containing speech results */
|
|
for (result = speech->results; result; result = AST_LIST_NEXT(result, list)) {
|
|
/* Build result string */
|
|
ast_build_string(&buf, &left, "%sscore%d=%d text%d=\"%s\" grammar%d=%s", (i > 0 ? " " : ""), i, result->score, i, result->text, i, result->grammar);
|
|
/* Increment result count */
|
|
i++;
|
|
}
|
|
/* Print out */
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (speech) endpos=%ld results=%d %s\n", current_offset, i, tmp);
|
|
} else if (!strcasecmp(reason, "dtmf")) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (digit) digit=%c endpos=%ld\n", dtmf, current_offset);
|
|
} else if (!strcasecmp(reason, "hangup") || !strcasecmp(reason, "timeout")) {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=1 (%s) endpos=%ld\n", reason, current_offset);
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0 endpos=%ld\n", current_offset);
|
|
}
|
|
|
|
return RESULT_SUCCESS;
|
|
}
|
|
|
|
static int handle_asyncagi_break(struct ast_channel *chan, AGI *agi, int argc, char *argv[])
|
|
{
|
|
ast_agi_fdprintf(chan, agi->fd, "200 result=0\n");
|
|
return AST_PBX_KEEPALIVE;
|
|
}
|
|
|
|
static char usage_setmusic[] =
|
|
" Usage: SET MUSIC ON <on|off> <class>\n"
|
|
" Enables/Disables the music on hold generator. If <class> is\n"
|
|
" not specified, then the default music on hold class will be used.\n"
|
|
" Always returns 0.\n";
|
|
|
|
static char usage_dbput[] =
|
|
" Usage: DATABASE PUT <family> <key> <value>\n"
|
|
" Adds or updates an entry in the Asterisk database for a\n"
|
|
" given family, key, and value.\n"
|
|
" Returns 1 if successful, 0 otherwise.\n";
|
|
|
|
static char usage_dbget[] =
|
|
" Usage: DATABASE GET <family> <key>\n"
|
|
" Retrieves an entry in the Asterisk database for a\n"
|
|
" given family and key.\n"
|
|
" Returns 0 if <key> is not set. Returns 1 if <key>\n"
|
|
" is set and returns the variable in parentheses.\n"
|
|
" Example return code: 200 result=1 (testvariable)\n";
|
|
|
|
static char usage_dbdel[] =
|
|
" Usage: DATABASE DEL <family> <key>\n"
|
|
" Deletes an entry in the Asterisk database for a\n"
|
|
" given family and key.\n"
|
|
" Returns 1 if successful, 0 otherwise.\n";
|
|
|
|
static char usage_dbdeltree[] =
|
|
" Usage: DATABASE DELTREE <family> [keytree]\n"
|
|
" Deletes a family or specific keytree within a family\n"
|
|
" in the Asterisk database.\n"
|
|
" Returns 1 if successful, 0 otherwise.\n";
|
|
|
|
static char usage_verbose[] =
|
|
" Usage: VERBOSE <message> <level>\n"
|
|
" Sends <message> to the console via verbose message system.\n"
|
|
" <level> is the the verbose level (1-4)\n"
|
|
" Always returns 1.\n";
|
|
|
|
static char usage_getvariable[] =
|
|
" Usage: GET VARIABLE <variablename>\n"
|
|
" Returns 0 if <variablename> is not set. Returns 1 if <variablename>\n"
|
|
" is set and returns the variable in parentheses.\n"
|
|
" example return code: 200 result=1 (testvariable)\n";
|
|
|
|
static char usage_getvariablefull[] =
|
|
" Usage: GET FULL VARIABLE <variablename> [<channel name>]\n"
|
|
" Returns 0 if <variablename> is not set or channel does not exist. Returns 1\n"
|
|
"if <variablename> is set and returns the variable in parenthesis. Understands\n"
|
|
"complex variable names and builtin variables, unlike GET VARIABLE.\n"
|
|
" example return code: 200 result=1 (testvariable)\n";
|
|
|
|
static char usage_setvariable[] =
|
|
" Usage: SET VARIABLE <variablename> <value>\n";
|
|
|
|
static char usage_channelstatus[] =
|
|
" Usage: CHANNEL STATUS [<channelname>]\n"
|
|
" Returns the status of the specified channel.\n"
|
|
" If no channel name is given the returns the status of the\n"
|
|
" current channel. Return values:\n"
|
|
" 0 Channel is down and available\n"
|
|
" 1 Channel is down, but reserved\n"
|
|
" 2 Channel is off hook\n"
|
|
" 3 Digits (or equivalent) have been dialed\n"
|
|
" 4 Line is ringing\n"
|
|
" 5 Remote end is ringing\n"
|
|
" 6 Line is up\n"
|
|
" 7 Line is busy\n";
|
|
|
|
static char usage_setcallerid[] =
|
|
" Usage: SET CALLERID <number>\n"
|
|
" Changes the callerid of the current channel.\n";
|
|
|
|
static char usage_exec[] =
|
|
" Usage: EXEC <application> <options>\n"
|
|
" Executes <application> with given <options>.\n"
|
|
" Returns whatever the application returns, or -2 on failure to find application\n";
|
|
|
|
static char usage_hangup[] =
|
|
" Usage: HANGUP [<channelname>]\n"
|
|
" Hangs up the specified channel.\n"
|
|
" If no channel name is given, hangs up the current channel\n";
|
|
|
|
static char usage_answer[] =
|
|
" Usage: ANSWER\n"
|
|
" Answers channel if not already in answer state. Returns -1 on\n"
|
|
" channel failure, or 0 if successful.\n";
|
|
|
|
static char usage_waitfordigit[] =
|
|
" Usage: WAIT FOR DIGIT <timeout>\n"
|
|
" Waits up to 'timeout' milliseconds for channel to receive a DTMF digit.\n"
|
|
" Returns -1 on channel failure, 0 if no digit is received in the timeout, or\n"
|
|
" the numerical value of the ascii of the digit if one is received. Use -1\n"
|
|
" for the timeout value if you desire the call to block indefinitely.\n";
|
|
|
|
static char usage_sendtext[] =
|
|
" Usage: SEND TEXT \"<text to send>\"\n"
|
|
" Sends the given text on a channel. Most channels do not support the\n"
|
|
" transmission of text. Returns 0 if text is sent, or if the channel does not\n"
|
|
" support text transmission. Returns -1 only on error/hangup. Text\n"
|
|
" consisting of greater than one word should be placed in quotes since the\n"
|
|
" command only accepts a single argument.\n";
|
|
|
|
static char usage_recvchar[] =
|
|
" Usage: RECEIVE CHAR <timeout>\n"
|
|
" Receives a character of text on a channel. Specify timeout to be the\n"
|
|
" maximum time to wait for input in milliseconds, or 0 for infinite. Most channels\n"
|
|
" do not support the reception of text. Returns the decimal value of the character\n"
|
|
" if one is received, or 0 if the channel does not support text reception. Returns\n"
|
|
" -1 only on error/hangup.\n";
|
|
|
|
static char usage_recvtext[] =
|
|
" Usage: RECEIVE TEXT <timeout>\n"
|
|
" Receives a string of text on a channel. Specify timeout to be the\n"
|
|
" maximum time to wait for input in milliseconds, or 0 for infinite. Most channels\n"
|
|
" do not support the reception of text. Returns -1 for failure or 1 for success, and the string in parentheses.\n";
|
|
|
|
static char usage_tddmode[] =
|
|
" Usage: TDD MODE <on|off>\n"
|
|
" Enable/Disable TDD transmission/reception on a channel. Returns 1 if\n"
|
|
" successful, or 0 if channel is not TDD-capable.\n";
|
|
|
|
static char usage_sendimage[] =
|
|
" Usage: SEND IMAGE <image>\n"
|
|
" Sends the given image on a channel. Most channels do not support the\n"
|
|
" transmission of images. Returns 0 if image is sent, or if the channel does not\n"
|
|
" support image transmission. Returns -1 only on error/hangup. Image names\n"
|
|
" should not include extensions.\n";
|
|
|
|
static char usage_streamfile[] =
|
|
" Usage: STREAM FILE <filename> <escape digits> [sample offset]\n"
|
|
" Send the given file, allowing playback to be interrupted by the given\n"
|
|
" digits, if any. Use double quotes for the digits if you wish none to be\n"
|
|
" permitted. If sample offset is provided then the audio will seek to sample\n"
|
|
" offset before play starts. Returns 0 if playback completes without a digit\n"
|
|
" being pressed, or the ASCII numerical value of the digit if one was pressed,\n"
|
|
" or -1 on error or if the channel was disconnected. Remember, the file\n"
|
|
" extension must not be included in the filename.\n";
|
|
|
|
static char usage_controlstreamfile[] =
|
|
" Usage: CONTROL STREAM FILE <filename> <escape digits> [skipms] [ffchar] [rewchr] [pausechr]\n"
|
|
" Send the given file, allowing playback to be controled by the given\n"
|
|
" digits, if any. Use double quotes for the digits if you wish none to be\n"
|
|
" permitted. Returns 0 if playback completes without a digit\n"
|
|
" being pressed, or the ASCII numerical value of the digit if one was pressed,\n"
|
|
" or -1 on error or if the channel was disconnected. Remember, the file\n"
|
|
" extension must not be included in the filename.\n\n"
|
|
" Note: ffchar and rewchar default to * and # respectively.\n";
|
|
|
|
static char usage_getoption[] =
|
|
" Usage: GET OPTION <filename> <escape_digits> [timeout]\n"
|
|
" Behaves similar to STREAM FILE but used with a timeout option.\n";
|
|
|
|
static char usage_saynumber[] =
|
|
" Usage: SAY NUMBER <number> <escape digits> [gender]\n"
|
|
" Say a given number, returning early if any of the given DTMF digits\n"
|
|
" are received on the channel. Returns 0 if playback completes without a digit\n"
|
|
" being pressed, or the ASCII numerical value of the digit if one was pressed or\n"
|
|
" -1 on error/hangup.\n";
|
|
|
|
static char usage_saydigits[] =
|
|
" Usage: SAY DIGITS <number> <escape digits>\n"
|
|
" Say a given digit string, returning early if any of the given DTMF digits\n"
|
|
" are received on the channel. Returns 0 if playback completes without a digit\n"
|
|
" being pressed, or the ASCII numerical value of the digit if one was pressed or\n"
|
|
" -1 on error/hangup.\n";
|
|
|
|
static char usage_sayalpha[] =
|
|
" Usage: SAY ALPHA <number> <escape digits>\n"
|
|
" Say a given character string, returning early if any of the given DTMF digits\n"
|
|
" are received on the channel. Returns 0 if playback completes without a digit\n"
|
|
" being pressed, or the ASCII numerical value of the digit if one was pressed or\n"
|
|
" -1 on error/hangup.\n";
|
|
|
|
static char usage_saydate[] =
|
|
" Usage: SAY DATE <date> <escape digits>\n"
|
|
" Say a given date, returning early if any of the given DTMF digits are\n"
|
|
" received on the channel. <date> is number of seconds elapsed since 00:00:00\n"
|
|
" on January 1, 1970, Coordinated Universal Time (UTC). Returns 0 if playback\n"
|
|
" completes without a digit being pressed, or the ASCII numerical value of the\n"
|
|
" digit if one was pressed or -1 on error/hangup.\n";
|
|
|
|
static char usage_saytime[] =
|
|
" Usage: SAY TIME <time> <escape digits>\n"
|
|
" Say a given time, returning early if any of the given DTMF digits are\n"
|
|
" received on the channel. <time> is number of seconds elapsed since 00:00:00\n"
|
|
" on January 1, 1970, Coordinated Universal Time (UTC). Returns 0 if playback\n"
|
|
" completes without a digit being pressed, or the ASCII numerical value of the\n"
|
|
" digit if one was pressed or -1 on error/hangup.\n";
|
|
|
|
static char usage_saydatetime[] =
|
|
" Usage: SAY DATETIME <time> <escape digits> [format] [timezone]\n"
|
|
" Say a given time, returning early if any of the given DTMF digits are\n"
|
|
" received on the channel. <time> is number of seconds elapsed since 00:00:00\n"
|
|
" on January 1, 1970, Coordinated Universal Time (UTC). [format] is the format\n"
|
|
" the time should be said in. See voicemail.conf (defaults to \"ABdY\n"
|
|
" 'digits/at' IMp\"). Acceptable values for [timezone] can be found in\n"
|
|
" /usr/share/zoneinfo. Defaults to machine default. Returns 0 if playback\n"
|
|
" completes without a digit being pressed, or the ASCII numerical value of the\n"
|
|
" digit if one was pressed or -1 on error/hangup.\n";
|
|
|
|
static char usage_sayphonetic[] =
|
|
" Usage: SAY PHONETIC <string> <escape digits>\n"
|
|
" Say a given character string with phonetics, returning early if any of the\n"
|
|
" given DTMF digits are received on the channel. Returns 0 if playback\n"
|
|
" completes without a digit pressed, the ASCII numerical value of the digit\n"
|
|
" if one was pressed, or -1 on error/hangup.\n";
|
|
|
|
static char usage_getdata[] =
|
|
" Usage: GET DATA <file to be streamed> [timeout] [max digits]\n"
|
|
" Stream the given file, and recieve DTMF data. Returns the digits received\n"
|
|
"from the channel at the other end.\n";
|
|
|
|
static char usage_setcontext[] =
|
|
" Usage: SET CONTEXT <desired context>\n"
|
|
" Sets the context for continuation upon exiting the application.\n";
|
|
|
|
static char usage_setextension[] =
|
|
" Usage: SET EXTENSION <new extension>\n"
|
|
" Changes the extension for continuation upon exiting the application.\n";
|
|
|
|
static char usage_setpriority[] =
|
|
" Usage: SET PRIORITY <priority>\n"
|
|
" Changes the priority for continuation upon exiting the application.\n"
|
|
" The priority must be a valid priority or label.\n";
|
|
|
|
static char usage_recordfile[] =
|
|
" Usage: RECORD FILE <filename> <format> <escape digits> <timeout> \\\n"
|
|
" [offset samples] [BEEP] [s=silence]\n"
|
|
" Record to a file until a given dtmf digit in the sequence is received\n"
|
|
" Returns -1 on hangup or error. The format will specify what kind of file\n"
|
|
" will be recorded. The timeout is the maximum record time in milliseconds, or\n"
|
|
" -1 for no timeout. \"Offset samples\" is optional, and, if provided, will seek\n"
|
|
" to the offset without exceeding the end of the file. \"silence\" is the number\n"
|
|
" of seconds of silence allowed before the function returns despite the\n"
|
|
" lack of dtmf digits or reaching timeout. Silence value must be\n"
|
|
" preceeded by \"s=\" and is also optional.\n";
|
|
|
|
static char usage_autohangup[] =
|
|
" Usage: SET AUTOHANGUP <time>\n"
|
|
" Cause the channel to automatically hangup at <time> seconds in the\n"
|
|
" future. Of course it can be hungup before then as well. Setting to 0 will\n"
|
|
" cause the autohangup feature to be disabled on this channel.\n";
|
|
|
|
static char usage_break_aagi[] =
|
|
" Usage: ASYNCAGI BREAK\n"
|
|
" Break the Async AGI loop.\n";
|
|
|
|
static char usage_noop[] =
|
|
" Usage: NoOp\n"
|
|
" Does nothing.\n";
|
|
|
|
static char usage_speechcreate[] =
|
|
" Usage: SPEECH CREATE <engine>\n"
|
|
" Create a speech object to be used by the other Speech AGI commands.\n";
|
|
|
|
static char usage_speechset[] =
|
|
" Usage: SPEECH SET <name> <value>\n"
|
|
" Set an engine-specific setting.\n";
|
|
|
|
static char usage_speechdestroy[] =
|
|
" Usage: SPEECH DESTROY\n"
|
|
" Destroy the speech object created by SPEECH CREATE.\n";
|
|
|
|
static char usage_speechloadgrammar[] =
|
|
" Usage: SPEECH LOAD GRAMMAR <grammar name> <path to grammar>\n"
|
|
" Loads the specified grammar as the specified name.\n";
|
|
|
|
static char usage_speechunloadgrammar[] =
|
|
" Usage: SPEECH UNLOAD GRAMMAR <grammar name>\n"
|
|
" Unloads the specified grammar.\n";
|
|
|
|
static char usage_speechactivategrammar[] =
|
|
" Usage: SPEECH ACTIVATE GRAMMAR <grammar name>\n"
|
|
" Activates the specified grammar on the speech object.\n";
|
|
|
|
static char usage_speechdeactivategrammar[] =
|
|
" Usage: SPEECH DEACTIVATE GRAMMAR <grammar name>\n"
|
|
" Deactivates the specified grammar on the speech object.\n";
|
|
|
|
static char usage_speechrecognize[] =
|
|
" Usage: SPEECH RECOGNIZE <prompt> <timeout> [<offset>]\n"
|
|
" Plays back given prompt while listening for speech and dtmf.\n";
|
|
|
|
/*!
|
|
* \brief AGI commands list
|
|
*/
|
|
static struct agi_command commands[] = {
|
|
{ { "answer", NULL }, handle_answer, "Answer channel", usage_answer , 0 },
|
|
{ { "channel", "status", NULL }, handle_channelstatus, "Returns status of the connected channel", usage_channelstatus , 0 },
|
|
{ { "database", "del", NULL }, handle_dbdel, "Removes database key/value", usage_dbdel , 1 },
|
|
{ { "database", "deltree", NULL }, handle_dbdeltree, "Removes database keytree/value", usage_dbdeltree , 1 },
|
|
{ { "database", "get", NULL }, handle_dbget, "Gets database value", usage_dbget , 1 },
|
|
{ { "database", "put", NULL }, handle_dbput, "Adds/updates database value", usage_dbput , 1 },
|
|
{ { "exec", NULL }, handle_exec, "Executes a given Application", usage_exec , 1 },
|
|
{ { "get", "data", NULL }, handle_getdata, "Prompts for DTMF on a channel", usage_getdata , 0 },
|
|
{ { "get", "full", "variable", NULL }, handle_getvariablefull, "Evaluates a channel expression", usage_getvariablefull , 1 },
|
|
{ { "get", "option", NULL }, handle_getoption, "Stream file, prompt for DTMF, with timeout", usage_getoption , 0 },
|
|
{ { "get", "variable", NULL }, handle_getvariable, "Gets a channel variable", usage_getvariable , 1 },
|
|
{ { "hangup", NULL }, handle_hangup, "Hangup the current channel", usage_hangup , 0 },
|
|
{ { "noop", NULL }, handle_noop, "Does nothing", usage_noop , 1 },
|
|
{ { "receive", "char", NULL }, handle_recvchar, "Receives one character from channels supporting it", usage_recvchar , 0 },
|
|
{ { "receive", "text", NULL }, handle_recvtext, "Receives text from channels supporting it", usage_recvtext , 0 },
|
|
{ { "record", "file", NULL }, handle_recordfile, "Records to a given file", usage_recordfile , 0 },
|
|
{ { "say", "alpha", NULL }, handle_sayalpha, "Says a given character string", usage_sayalpha , 0 },
|
|
{ { "say", "digits", NULL }, handle_saydigits, "Says a given digit string", usage_saydigits , 0 },
|
|
{ { "say", "number", NULL }, handle_saynumber, "Says a given number", usage_saynumber , 0 },
|
|
{ { "say", "phonetic", NULL }, handle_sayphonetic, "Says a given character string with phonetics", usage_sayphonetic , 0 },
|
|
{ { "say", "date", NULL }, handle_saydate, "Says a given date", usage_saydate , 0 },
|
|
{ { "say", "time", NULL }, handle_saytime, "Says a given time", usage_saytime , 0 },
|
|
{ { "say", "datetime", NULL }, handle_saydatetime, "Says a given time as specfied by the format given", usage_saydatetime , 0 },
|
|
{ { "send", "image", NULL }, handle_sendimage, "Sends images to channels supporting it", usage_sendimage , 0 },
|
|
{ { "send", "text", NULL }, handle_sendtext, "Sends text to channels supporting it", usage_sendtext , 0 },
|
|
{ { "set", "autohangup", NULL }, handle_autohangup, "Autohangup channel in some time", usage_autohangup , 0 },
|
|
{ { "set", "callerid", NULL }, handle_setcallerid, "Sets callerid for the current channel", usage_setcallerid , 0 },
|
|
{ { "set", "context", NULL }, handle_setcontext, "Sets channel context", usage_setcontext , 0 },
|
|
{ { "set", "extension", NULL }, handle_setextension, "Changes channel extension", usage_setextension , 0 },
|
|
{ { "set", "music", NULL }, handle_setmusic, "Enable/Disable Music on hold generator", usage_setmusic , 0 },
|
|
{ { "set", "priority", NULL }, handle_setpriority, "Set channel dialplan priority", usage_setpriority , 0 },
|
|
{ { "set", "variable", NULL }, handle_setvariable, "Sets a channel variable", usage_setvariable , 1 },
|
|
{ { "stream", "file", NULL }, handle_streamfile, "Sends audio file on channel", usage_streamfile , 0 },
|
|
{ { "control", "stream", "file", NULL }, handle_controlstreamfile, "Sends audio file on channel and allows the listner to control the stream", usage_controlstreamfile , 0 },
|
|
{ { "tdd", "mode", NULL }, handle_tddmode, "Toggles TDD mode (for the deaf)", usage_tddmode , 0 },
|
|
{ { "verbose", NULL }, handle_verbose, "Logs a message to the asterisk verbose log", usage_verbose , 1 },
|
|
{ { "wait", "for", "digit", NULL }, handle_waitfordigit, "Waits for a digit to be pressed", usage_waitfordigit , 0 },
|
|
{ { "speech", "create", NULL }, handle_speechcreate, "Creates a speech object", usage_speechcreate, 0 },
|
|
{ { "speech", "set", NULL }, handle_speechset, "Sets a speech engine setting", usage_speechset, 0 },
|
|
{ { "speech", "destroy", NULL }, handle_speechdestroy, "Destroys a speech object", usage_speechdestroy, 1 },
|
|
{ { "speech", "load", "grammar", NULL }, handle_speechloadgrammar, "Loads a grammar", usage_speechloadgrammar, 0 },
|
|
{ { "speech", "unload", "grammar", NULL }, handle_speechunloadgrammar, "Unloads a grammar", usage_speechunloadgrammar, 1 },
|
|
{ { "speech", "activate", "grammar", NULL }, handle_speechactivategrammar, "Activates a grammar", usage_speechactivategrammar, 0 },
|
|
{ { "speech", "deactivate", "grammar", NULL }, handle_speechdeactivategrammar, "Deactivates a grammar", usage_speechdeactivategrammar, 0 },
|
|
{ { "speech", "recognize", NULL }, handle_speechrecognize, "Recognizes speech", usage_speechrecognize, 0 },
|
|
{ { "asyncagi", "break", NULL }, handle_asyncagi_break, "Break AsyncAGI loop", usage_break_aagi, 0 },
|
|
};
|
|
|
|
static AST_RWLIST_HEAD_STATIC(agi_commands, agi_command);
|
|
|
|
static char *help_workhorse(int fd, char *match[])
|
|
{
|
|
char fullcmd[80], matchstr[80];
|
|
struct agi_command *e;
|
|
|
|
if (match)
|
|
ast_join(matchstr, sizeof(matchstr), match);
|
|
|
|
ast_cli(fd, "%5.5s %30.30s %s\n","Dead","Command","Description");
|
|
AST_RWLIST_RDLOCK(&agi_commands);
|
|
AST_RWLIST_TRAVERSE(&agi_commands, e, list) {
|
|
if (!e->cmda[0])
|
|
break;
|
|
/* Hide commands that start with '_' */
|
|
if ((e->cmda[0])[0] == '_')
|
|
continue;
|
|
ast_join(fullcmd, sizeof(fullcmd), e->cmda);
|
|
if (match && strncasecmp(matchstr, fullcmd, strlen(matchstr)))
|
|
continue;
|
|
ast_cli(fd, "%5.5s %30.30s %s\n", e->dead ? "Yes" : "No" , fullcmd, e->summary);
|
|
}
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
int ast_agi_register(struct ast_module *mod, agi_command *cmd)
|
|
{
|
|
char fullcmd[80];
|
|
|
|
ast_join(fullcmd, sizeof(fullcmd), cmd->cmda);
|
|
|
|
if (!find_command(cmd->cmda,1)) {
|
|
cmd->mod = mod;
|
|
AST_RWLIST_WRLOCK(&agi_commands);
|
|
AST_LIST_INSERT_TAIL(&agi_commands, cmd, list);
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
if (mod != ast_module_info->self)
|
|
ast_module_ref(ast_module_info->self);
|
|
ast_verb(2, "AGI Command '%s' registered\n",fullcmd);
|
|
return 1;
|
|
} else {
|
|
ast_log(LOG_WARNING, "Command already registered!\n");
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
int ast_agi_unregister(struct ast_module *mod, agi_command *cmd)
|
|
{
|
|
struct agi_command *e;
|
|
int unregistered = 0;
|
|
char fullcmd[80];
|
|
|
|
ast_join(fullcmd, sizeof(fullcmd), cmd->cmda);
|
|
|
|
AST_RWLIST_WRLOCK(&agi_commands);
|
|
AST_RWLIST_TRAVERSE_SAFE_BEGIN(&agi_commands, e, list) {
|
|
if (cmd == e) {
|
|
AST_RWLIST_REMOVE_CURRENT(list);
|
|
if (mod != ast_module_info->self)
|
|
ast_module_unref(ast_module_info->self);
|
|
unregistered=1;
|
|
break;
|
|
}
|
|
}
|
|
AST_RWLIST_TRAVERSE_SAFE_END;
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
if (unregistered)
|
|
ast_verb(2, "AGI Command '%s' unregistered\n",fullcmd);
|
|
else
|
|
ast_log(LOG_WARNING, "Unable to unregister command: '%s'!\n",fullcmd);
|
|
return unregistered;
|
|
}
|
|
|
|
void ast_agi_register_multiple(struct ast_module *mod, agi_command *cmd, int len)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++)
|
|
ast_agi_register(mod, cmd + i);
|
|
|
|
}
|
|
|
|
void ast_agi_unregister_multiple(struct ast_module *mod, agi_command *cmd, int len)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++)
|
|
ast_agi_unregister(mod, cmd + i);
|
|
}
|
|
|
|
static agi_command *find_command(char *cmds[], int exact)
|
|
{
|
|
int y, match;
|
|
struct agi_command *e;
|
|
|
|
AST_RWLIST_RDLOCK(&agi_commands);
|
|
AST_RWLIST_TRAVERSE(&agi_commands, e, list) {
|
|
if (!e->cmda[0])
|
|
break;
|
|
/* start optimistic */
|
|
match = 1;
|
|
for (y = 0; match && cmds[y]; y++) {
|
|
/* If there are no more words in the command (and we're looking for
|
|
an exact match) or there is a difference between the two words,
|
|
then this is not a match */
|
|
if (!e->cmda[y] && !exact)
|
|
break;
|
|
/* don't segfault if the next part of a command doesn't exist */
|
|
if (!e->cmda[y]) {
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
return NULL;
|
|
}
|
|
if (strcasecmp(e->cmda[y], cmds[y]))
|
|
match = 0;
|
|
}
|
|
/* If more words are needed to complete the command then this is not
|
|
a candidate (unless we're looking for a really inexact answer */
|
|
if ((exact > -1) && e->cmda[y])
|
|
match = 0;
|
|
if (match) {
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
return e;
|
|
}
|
|
}
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
return NULL;
|
|
}
|
|
|
|
static int parse_args(char *s, int *max, char *argv[])
|
|
{
|
|
int x = 0, quoted = 0, escaped = 0, whitespace = 1;
|
|
char *cur;
|
|
|
|
cur = s;
|
|
while(*s) {
|
|
switch(*s) {
|
|
case '"':
|
|
/* If it's escaped, put a literal quote */
|
|
if (escaped)
|
|
goto normal;
|
|
else
|
|
quoted = !quoted;
|
|
if (quoted && whitespace) {
|
|
/* If we're starting a quote, coming off white space start a new word, too */
|
|
argv[x++] = cur;
|
|
whitespace=0;
|
|
}
|
|
escaped = 0;
|
|
break;
|
|
case ' ':
|
|
case '\t':
|
|
if (!quoted && !escaped) {
|
|
/* If we're not quoted, mark this as whitespace, and
|
|
end the previous argument */
|
|
whitespace = 1;
|
|
*(cur++) = '\0';
|
|
} else
|
|
/* Otherwise, just treat it as anything else */
|
|
goto normal;
|
|
break;
|
|
case '\\':
|
|
/* If we're escaped, print a literal, otherwise enable escaping */
|
|
if (escaped) {
|
|
goto normal;
|
|
} else {
|
|
escaped=1;
|
|
}
|
|
break;
|
|
default:
|
|
normal:
|
|
if (whitespace) {
|
|
if (x >= MAX_ARGS -1) {
|
|
ast_log(LOG_WARNING, "Too many arguments, truncating\n");
|
|
break;
|
|
}
|
|
/* Coming off of whitespace, start the next argument */
|
|
argv[x++] = cur;
|
|
whitespace=0;
|
|
}
|
|
*(cur++) = *s;
|
|
escaped=0;
|
|
}
|
|
s++;
|
|
}
|
|
/* Null terminate */
|
|
*(cur++) = '\0';
|
|
argv[x] = NULL;
|
|
*max = x;
|
|
return 0;
|
|
}
|
|
|
|
static int agi_handle_command(struct ast_channel *chan, AGI *agi, char *buf, int dead)
|
|
{
|
|
char *argv[MAX_ARGS];
|
|
int argc = MAX_ARGS, res;
|
|
agi_command *c;
|
|
const char *ami_res = "Unknown Result";
|
|
char *ami_cmd = ast_strdupa(buf);
|
|
int command_id = ast_random(), resultcode = 200;
|
|
|
|
manager_event(EVENT_FLAG_CALL, "AGIExec",
|
|
"SubEvent: Start\r\n"
|
|
"Channel: %s\r\n"
|
|
"CommandId: %d\r\n"
|
|
"Command: %s\r\n", chan->name, command_id, ami_cmd);
|
|
parse_args(buf, &argc, argv);
|
|
if ((c = find_command(argv, 0)) && (!dead || (dead && c->dead))) {
|
|
/* if this command wasnt registered by res_agi, be sure to usecount
|
|
the module we are using */
|
|
if (c->mod != ast_module_info->self)
|
|
ast_module_ref(c->mod);
|
|
res = c->handler(chan, agi, argc, argv);
|
|
if (c->mod != ast_module_info->self)
|
|
ast_module_unref(c->mod);
|
|
switch (res) {
|
|
case RESULT_SHOWUSAGE: ami_res = "Usage"; resultcode = 520; break;
|
|
case AST_PBX_KEEPALIVE: ami_res = "KeepAlive"; resultcode = 210; break;
|
|
case RESULT_FAILURE: ami_res = "Failure"; resultcode = -1; break;
|
|
case RESULT_SUCCESS: ami_res = "Success"; resultcode = 200; break;
|
|
}
|
|
manager_event(EVENT_FLAG_CALL, "AGIExec",
|
|
"SubEvent: End\r\n"
|
|
"Channel: %s\r\n"
|
|
"CommandId: %d\r\n"
|
|
"Command: %s\r\n"
|
|
"ResultCode: %d\r\n"
|
|
"Result: %s\r\n", chan->name, command_id, ami_cmd, resultcode, ami_res);
|
|
switch(res) {
|
|
case RESULT_SHOWUSAGE:
|
|
ast_agi_fdprintf(chan, agi->fd, "520-Invalid command syntax. Proper usage follows:\n");
|
|
ast_agi_fdprintf(chan, agi->fd, c->usage);
|
|
ast_agi_fdprintf(chan, agi->fd, "520 End of proper usage.\n");
|
|
break;
|
|
case AST_PBX_KEEPALIVE:
|
|
/* We've been asked to keep alive, so do so */
|
|
return AST_PBX_KEEPALIVE;
|
|
break;
|
|
case RESULT_FAILURE:
|
|
/* They've already given the failure. We've been hung up on so handle this
|
|
appropriately */
|
|
return -1;
|
|
}
|
|
} else if ((c = find_command(argv, 0))) {
|
|
ast_agi_fdprintf(chan, agi->fd, "511 Command Not Permitted on a dead channel\n");
|
|
manager_event(EVENT_FLAG_CALL, "AGIExec",
|
|
"SubEvent: End\r\n"
|
|
"Channel: %s\r\n"
|
|
"CommandId: %d\r\n"
|
|
"Command: %s\r\n"
|
|
"ResultCode: 511\r\n"
|
|
"Result: Command not permitted on a dead channel\r\n", chan->name, command_id, ami_cmd);
|
|
} else {
|
|
ast_agi_fdprintf(chan, agi->fd, "510 Invalid or unknown command\n");
|
|
manager_event(EVENT_FLAG_CALL, "AGIExec",
|
|
"SubEvent: End\r\n"
|
|
"Channel: %s\r\n"
|
|
"CommandId: %d\r\n"
|
|
"Command: %s\r\n"
|
|
"ResultCode: 510\r\n"
|
|
"Result: Invalid or unknown command\r\n", chan->name, command_id, ami_cmd);
|
|
}
|
|
return 0;
|
|
}
|
|
static enum agi_result run_agi(struct ast_channel *chan, char *request, AGI *agi, int pid, int *status, int dead, int argc, char *argv[])
|
|
{
|
|
struct ast_channel *c;
|
|
int outfd, ms, needhup = 0;
|
|
enum agi_result returnstatus = AGI_RESULT_SUCCESS;
|
|
struct ast_frame *f;
|
|
char buf[AGI_BUF_LEN];
|
|
char *res = NULL;
|
|
FILE *readf;
|
|
/* how many times we'll retry if ast_waitfor_nandfs will return without either
|
|
channel or file descriptor in case select is interrupted by a system call (EINTR) */
|
|
int retry = AGI_NANDFS_RETRY;
|
|
const char *sighup;
|
|
|
|
if (!(readf = fdopen(agi->ctrl, "r"))) {
|
|
ast_log(LOG_WARNING, "Unable to fdopen file descriptor\n");
|
|
if (pid > -1)
|
|
kill(pid, SIGHUP);
|
|
close(agi->ctrl);
|
|
return AGI_RESULT_FAILURE;
|
|
}
|
|
setlinebuf(readf);
|
|
setup_env(chan, request, agi->fd, (agi->audio > -1), argc, argv);
|
|
for (;;) {
|
|
if (needhup) {
|
|
needhup = 0;
|
|
dead = 1;
|
|
if (pid > -1) {
|
|
kill(pid, SIGHUP);
|
|
} else if (agi->fast) {
|
|
send(agi->ctrl, "HANGUP\n", 7, MSG_OOB);
|
|
}
|
|
}
|
|
ms = -1;
|
|
c = ast_waitfor_nandfds(&chan, dead ? 0 : 1, &agi->ctrl, 1, NULL, &outfd, &ms);
|
|
if (c) {
|
|
retry = AGI_NANDFS_RETRY;
|
|
/* Idle the channel until we get a command */
|
|
f = ast_read(c);
|
|
if (!f) {
|
|
ast_debug(1, "%s hungup\n", chan->name);
|
|
returnstatus = AGI_RESULT_HANGUP;
|
|
needhup = 1;
|
|
continue;
|
|
} else {
|
|
/* If it's voice, write it to the audio pipe */
|
|
if ((agi->audio > -1) && (f->frametype == AST_FRAME_VOICE)) {
|
|
/* Write, ignoring errors */
|
|
write(agi->audio, f->data.ptr, f->datalen);
|
|
}
|
|
ast_frfree(f);
|
|
}
|
|
} else if (outfd > -1) {
|
|
size_t len = sizeof(buf);
|
|
size_t buflen = 0;
|
|
|
|
retry = AGI_NANDFS_RETRY;
|
|
buf[0] = '\0';
|
|
|
|
while (buflen < (len - 1)) {
|
|
res = fgets(buf + buflen, len, readf);
|
|
if (feof(readf))
|
|
break;
|
|
if (ferror(readf) && ((errno != EINTR) && (errno != EAGAIN)))
|
|
break;
|
|
if (res != NULL && !agi->fast)
|
|
break;
|
|
buflen = strlen(buf);
|
|
if (buflen && buf[buflen - 1] == '\n')
|
|
break;
|
|
len -= buflen;
|
|
if (agidebug)
|
|
ast_verbose( "AGI Rx << temp buffer %s - errno %s\n", buf, strerror(errno));
|
|
}
|
|
|
|
if (!buf[0]) {
|
|
/* Program terminated */
|
|
if (returnstatus && returnstatus != AST_PBX_KEEPALIVE)
|
|
returnstatus = -1;
|
|
ast_verb(3, "<%s>AGI Script %s completed, returning %d\n", chan->name, request, returnstatus);
|
|
if (pid > 0)
|
|
waitpid(pid, status, 0);
|
|
/* No need to kill the pid anymore, since they closed us */
|
|
pid = -1;
|
|
break;
|
|
}
|
|
|
|
/* Special case for inability to execute child process */
|
|
if (*buf && strncasecmp(buf, "failure", 7) == 0) {
|
|
returnstatus = AGI_RESULT_FAILURE;
|
|
break;
|
|
}
|
|
|
|
/* get rid of trailing newline, if any */
|
|
if (*buf && buf[strlen(buf) - 1] == '\n')
|
|
buf[strlen(buf) - 1] = 0;
|
|
if (agidebug)
|
|
ast_verbose("<%s>AGI Rx << %s\n", chan->name, buf);
|
|
returnstatus |= agi_handle_command(chan, agi, buf, dead);
|
|
/* If the handle_command returns -1, we need to stop */
|
|
if ((returnstatus < 0) || (returnstatus == AST_PBX_KEEPALIVE)) {
|
|
needhup = 1;
|
|
continue;
|
|
}
|
|
} else {
|
|
if (--retry <= 0) {
|
|
ast_log(LOG_WARNING, "No channel, no fd?\n");
|
|
returnstatus = AGI_RESULT_FAILURE;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
/* Notify process */
|
|
sighup = pbx_builtin_getvar_helper(chan, "AGISIGHUP");
|
|
if (ast_strlen_zero(sighup) || !ast_false(sighup)) {
|
|
if (pid > -1) {
|
|
if (kill(pid, SIGHUP)) {
|
|
ast_log(LOG_WARNING, "unable to send SIGHUP to AGI process %d: %s\n", pid, strerror(errno));
|
|
} else { /* Give the process a chance to die */
|
|
usleep(1);
|
|
}
|
|
waitpid(pid, status, WNOHANG);
|
|
} else if (agi->fast) {
|
|
send(agi->ctrl, "HANGUP\n", 7, MSG_OOB);
|
|
}
|
|
}
|
|
fclose(readf);
|
|
return returnstatus;
|
|
}
|
|
|
|
static char *handle_cli_agi_show(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
|
|
{
|
|
struct agi_command *command;
|
|
char fullcmd[80];
|
|
|
|
switch (cmd) {
|
|
case CLI_INIT:
|
|
e->command = "agi show";
|
|
e->usage =
|
|
"Usage: agi show [topic]\n"
|
|
" When called with a topic as an argument, displays usage\n"
|
|
" information on the given command. If called without a\n"
|
|
" topic, it provides a list of AGI commands.\n";
|
|
case CLI_GENERATE:
|
|
return NULL;
|
|
}
|
|
if (a->argc < e->args)
|
|
return CLI_SHOWUSAGE;
|
|
if (a->argc > e->args) {
|
|
command = find_command(a->argv + e->args, 1);
|
|
if (command) {
|
|
ast_cli(a->fd, "%s", command->usage);
|
|
ast_cli(a->fd, " Runs Dead : %s\n", command->dead ? "Yes" : "No");
|
|
} else {
|
|
if (find_command(a->argv + e->args, -1)) {
|
|
return help_workhorse(a->fd, a->argv + e->args);
|
|
} else {
|
|
ast_join(fullcmd, sizeof(fullcmd), a->argv + e->args);
|
|
ast_cli(a->fd, "No such command '%s'.\n", fullcmd);
|
|
}
|
|
}
|
|
} else {
|
|
return help_workhorse(a->fd, NULL);
|
|
}
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
/*! \brief Convert string to use HTML escaped characters
|
|
\note Maybe this should be a generic function?
|
|
*/
|
|
static void write_html_escaped(FILE *htmlfile, char *str)
|
|
{
|
|
char *cur = str;
|
|
|
|
while(*cur) {
|
|
switch (*cur) {
|
|
case '<':
|
|
fprintf(htmlfile, "%s", "<");
|
|
break;
|
|
case '>':
|
|
fprintf(htmlfile, "%s", ">");
|
|
break;
|
|
case '&':
|
|
fprintf(htmlfile, "%s", "&");
|
|
break;
|
|
case '"':
|
|
fprintf(htmlfile, "%s", """);
|
|
break;
|
|
default:
|
|
fprintf(htmlfile, "%c", *cur);
|
|
break;
|
|
}
|
|
cur++;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
static int write_htmldump(char *filename)
|
|
{
|
|
struct agi_command *command;
|
|
char fullcmd[80];
|
|
FILE *htmlfile;
|
|
|
|
if (!(htmlfile = fopen(filename, "wt")))
|
|
return -1;
|
|
|
|
fprintf(htmlfile, "<HTML>\n<HEAD>\n<TITLE>AGI Commands</TITLE>\n</HEAD>\n");
|
|
fprintf(htmlfile, "<BODY>\n<CENTER><B><H1>AGI Commands</H1></B></CENTER>\n\n");
|
|
fprintf(htmlfile, "<TABLE BORDER=\"0\" CELLSPACING=\"10\">\n");
|
|
|
|
AST_RWLIST_RDLOCK(&agi_commands);
|
|
AST_RWLIST_TRAVERSE(&agi_commands, command, list) {
|
|
char *stringp, *tempstr;
|
|
|
|
if (!command->cmda[0]) /* end ? */
|
|
break;
|
|
/* Hide commands that start with '_' */
|
|
if ((command->cmda[0])[0] == '_')
|
|
continue;
|
|
ast_join(fullcmd, sizeof(fullcmd), command->cmda);
|
|
|
|
fprintf(htmlfile, "<TR><TD><TABLE BORDER=\"1\" CELLPADDING=\"5\" WIDTH=\"100%%\">\n");
|
|
fprintf(htmlfile, "<TR><TH ALIGN=\"CENTER\"><B>%s - %s</B></TH></TR>\n", fullcmd, command->summary);
|
|
|
|
stringp = command->usage;
|
|
tempstr = strsep(&stringp, "\n");
|
|
|
|
fprintf(htmlfile, "<TR><TD ALIGN=\"CENTER\">");
|
|
write_html_escaped(htmlfile, tempstr);
|
|
fprintf(htmlfile, "</TD></TR>\n");
|
|
fprintf(htmlfile, "<TR><TD ALIGN=\"CENTER\">\n");
|
|
|
|
while ((tempstr = strsep(&stringp, "\n")) != NULL) {
|
|
write_html_escaped(htmlfile, tempstr);
|
|
fprintf(htmlfile, "<BR>\n");
|
|
}
|
|
fprintf(htmlfile, "</TD></TR>\n");
|
|
fprintf(htmlfile, "</TABLE></TD></TR>\n\n");
|
|
}
|
|
AST_RWLIST_UNLOCK(&agi_commands);
|
|
fprintf(htmlfile, "</TABLE>\n</BODY>\n</HTML>\n");
|
|
fclose(htmlfile);
|
|
return 0;
|
|
}
|
|
|
|
static char *handle_cli_agi_dumphtml_deprecated(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
|
|
{
|
|
switch (cmd) {
|
|
case CLI_INIT:
|
|
e->command = "agi dumphtml";
|
|
e->usage =
|
|
"Usage: agi dumphtml <filename>\n"
|
|
" Dumps the AGI command list in HTML format to the given\n"
|
|
" file.\n";
|
|
return NULL;
|
|
case CLI_GENERATE:
|
|
return NULL;
|
|
}
|
|
if (a->argc < e->args + 1)
|
|
return CLI_SHOWUSAGE;
|
|
|
|
if (write_htmldump(a->argv[2]) < 0) {
|
|
ast_cli(a->fd, "Could not create file '%s'\n", a->argv[2]);
|
|
return CLI_SHOWUSAGE;
|
|
}
|
|
ast_cli(a->fd, "AGI HTML commands dumped to: %s\n", a->argv[2]);
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
static char *handle_cli_agi_dump_html(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
|
|
{
|
|
switch (cmd) {
|
|
case CLI_INIT:
|
|
e->command = "agi dump html";
|
|
e->usage =
|
|
"Usage: agi dump html <filename>\n"
|
|
" Dumps the AGI command list in HTML format to the given\n"
|
|
" file.\n";
|
|
return NULL;
|
|
case CLI_GENERATE:
|
|
return NULL;
|
|
}
|
|
if (a->argc != e->args + 1)
|
|
return CLI_SHOWUSAGE;
|
|
|
|
if (write_htmldump(a->argv[e->args]) < 0) {
|
|
ast_cli(a->fd, "Could not create file '%s'\n", a->argv[e->args]);
|
|
return CLI_SHOWUSAGE;
|
|
}
|
|
ast_cli(a->fd, "AGI HTML commands dumped to: %s\n", a->argv[e->args]);
|
|
return CLI_SUCCESS;
|
|
}
|
|
|
|
static int agi_exec_full(struct ast_channel *chan, void *data, int enhanced, int dead)
|
|
{
|
|
enum agi_result res;
|
|
char buf[AGI_BUF_LEN] = "", *tmp = buf;
|
|
int fds[2], efd = -1, pid;
|
|
AST_DECLARE_APP_ARGS(args,
|
|
AST_APP_ARG(arg)[MAX_ARGS];
|
|
);
|
|
AGI agi;
|
|
|
|
if (ast_strlen_zero(data)) {
|
|
ast_log(LOG_WARNING, "AGI requires an argument (script)\n");
|
|
return -1;
|
|
}
|
|
if (dead)
|
|
ast_debug(3, "Hungup channel detected, running agi in dead mode.\n");
|
|
ast_copy_string(buf, data, sizeof(buf));
|
|
memset(&agi, 0, sizeof(agi));
|
|
AST_STANDARD_APP_ARGS(args, tmp);
|
|
args.argv[args.argc] = NULL;
|
|
#if 0
|
|
/* Answer if need be */
|
|
if (chan->_state != AST_STATE_UP) {
|
|
if (ast_answer(chan))
|
|
return -1;
|
|
}
|
|
#endif
|
|
res = launch_script(chan, args.argv[0], args.argv, fds, enhanced ? &efd : NULL, &pid);
|
|
/* Async AGI do not require run_agi(), so just proceed if normal AGI
|
|
or Fast AGI are setup with success. */
|
|
if (res == AGI_RESULT_SUCCESS || res == AGI_RESULT_SUCCESS_FAST) {
|
|
int status = 0;
|
|
agi.fd = fds[1];
|
|
agi.ctrl = fds[0];
|
|
agi.audio = efd;
|
|
agi.fast = (res == AGI_RESULT_SUCCESS_FAST) ? 1 : 0;
|
|
res = run_agi(chan, args.argv[0], &agi, pid, &status, dead, args.argc, args.argv);
|
|
/* If the fork'd process returns non-zero, set AGISTATUS to FAILURE */
|
|
if ((res == AGI_RESULT_SUCCESS || res == AGI_RESULT_SUCCESS_FAST) && status)
|
|
res = AGI_RESULT_FAILURE;
|
|
if (fds[1] != fds[0])
|
|
close(fds[1]);
|
|
if (efd > -1)
|
|
close(efd);
|
|
}
|
|
ast_safe_fork_cleanup();
|
|
|
|
switch (res) {
|
|
case AGI_RESULT_SUCCESS:
|
|
case AGI_RESULT_SUCCESS_FAST:
|
|
case AGI_RESULT_SUCCESS_ASYNC:
|
|
pbx_builtin_setvar_helper(chan, "AGISTATUS", "SUCCESS");
|
|
break;
|
|
case AGI_RESULT_FAILURE:
|
|
pbx_builtin_setvar_helper(chan, "AGISTATUS", "FAILURE");
|
|
break;
|
|
case AGI_RESULT_NOTFOUND:
|
|
pbx_builtin_setvar_helper(chan, "AGISTATUS", "NOTFOUND");
|
|
break;
|
|
case AGI_RESULT_HANGUP:
|
|
pbx_builtin_setvar_helper(chan, "AGISTATUS", "HANGUP");
|
|
return -1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int agi_exec(struct ast_channel *chan, void *data)
|
|
{
|
|
if (!ast_check_hangup(chan))
|
|
return agi_exec_full(chan, data, 0, 0);
|
|
else
|
|
return agi_exec_full(chan, data, 0, 1);
|
|
}
|
|
|
|
static int eagi_exec(struct ast_channel *chan, void *data)
|
|
{
|
|
int readformat, res;
|
|
|
|
if (ast_check_hangup(chan)) {
|
|
ast_log(LOG_ERROR, "EAGI cannot be run on a dead/hungup channel, please use AGI.\n");
|
|
return 0;
|
|
}
|
|
readformat = chan->readformat;
|
|
if (ast_set_read_format(chan, AST_FORMAT_SLINEAR)) {
|
|
ast_log(LOG_WARNING, "Unable to set channel '%s' to linear mode\n", chan->name);
|
|
return -1;
|
|
}
|
|
res = agi_exec_full(chan, data, 1, 0);
|
|
if (!res) {
|
|
if (ast_set_read_format(chan, readformat)) {
|
|
ast_log(LOG_WARNING, "Unable to restore channel '%s' to format %s\n", chan->name, ast_getformatname(readformat));
|
|
}
|
|
}
|
|
return res;
|
|
}
|
|
|
|
static int deadagi_exec(struct ast_channel *chan, void *data)
|
|
{
|
|
ast_log(LOG_WARNING, "DeadAGI has been deprecated, please use AGI in all cases!\n");
|
|
return agi_exec(chan, data);
|
|
}
|
|
|
|
static struct ast_cli_entry cli_agi_dumphtml_deprecated = AST_CLI_DEFINE(handle_cli_agi_dumphtml_deprecated, "Dumps a list of AGI commands in HTML format");
|
|
|
|
static struct ast_cli_entry cli_agi[] = {
|
|
AST_CLI_DEFINE(handle_cli_agi_add_cmd, "Add AGI command to a channel in Async AGI"),
|
|
AST_CLI_DEFINE(handle_cli_agi_debug, "Enable/Disable AGI debugging"),
|
|
AST_CLI_DEFINE(handle_cli_agi_show, "List AGI commands or specific help"),
|
|
AST_CLI_DEFINE(handle_cli_agi_dump_html, "Dumps a list of AGI commands in HTML format", .deprecate_cmd = &cli_agi_dumphtml_deprecated)
|
|
};
|
|
|
|
static int unload_module(void)
|
|
{
|
|
ast_cli_unregister_multiple(cli_agi, sizeof(cli_agi) / sizeof(struct ast_cli_entry));
|
|
ast_agi_unregister_multiple(ast_module_info->self, commands, sizeof(commands) / sizeof(struct agi_command));
|
|
ast_unregister_application(eapp);
|
|
ast_unregister_application(deadapp);
|
|
ast_manager_unregister("AGI");
|
|
return ast_unregister_application(app);
|
|
}
|
|
|
|
static int load_module(void)
|
|
{
|
|
ast_cli_register_multiple(cli_agi, sizeof(cli_agi) / sizeof(struct ast_cli_entry));
|
|
ast_agi_register_multiple(ast_module_info->self, commands, sizeof(commands) / sizeof(struct agi_command));
|
|
ast_register_application(deadapp, deadagi_exec, deadsynopsis, descrip);
|
|
ast_register_application(eapp, eagi_exec, esynopsis, descrip);
|
|
ast_manager_register2("AGI", EVENT_FLAG_CALL, action_add_agi_cmd, "Add an AGI command to execute by Async AGI", mandescr_asyncagi);
|
|
return ast_register_application(app, agi_exec, synopsis, descrip);
|
|
}
|
|
|
|
AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_GLOBAL_SYMBOLS, "Asterisk Gateway Interface (AGI)",
|
|
.load = load_module,
|
|
.unload = unload_module,
|
|
);
|