2004-02-17 07:03:14 +00:00
|
|
|
/*
|
2005-09-14 20:46:50 +00:00
|
|
|
* Asterisk -- An open source telephony toolkit.
|
2004-02-17 07:03:14 +00:00
|
|
|
*
|
2005-09-14 20:46:50 +00:00
|
|
|
* Copyright (C) 1999 - 2005, Digium, Inc.
|
|
|
|
*
|
|
|
|
* Mark Spencer <markster@digium.com>
|
2004-02-17 07:03:14 +00:00
|
|
|
*
|
2005-09-14 20:46:50 +00:00
|
|
|
* 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.
|
2004-02-17 07:03:14 +00:00
|
|
|
*
|
|
|
|
* This program is free software, distributed under the terms of
|
2005-09-14 20:46:50 +00:00
|
|
|
* the GNU General Public License Version 2. See the LICENSE file
|
|
|
|
* at the top of the source tree.
|
|
|
|
*/
|
|
|
|
|
2005-10-24 20:12:06 +00:00
|
|
|
/*! \file
|
2005-09-14 20:46:50 +00:00
|
|
|
*
|
2005-10-24 20:12:06 +00:00
|
|
|
* \brief Stream to an icecast server via ICES (see contrib/asterisk-ices.xml)
|
2005-12-30 21:18:06 +00:00
|
|
|
*
|
|
|
|
* \author Mark Spencer <markster@digium.com>
|
2005-09-14 20:46:50 +00:00
|
|
|
*
|
2007-03-07 08:08:46 +00:00
|
|
|
* \extref ICES - http://www.icecast.org/ices.php
|
|
|
|
*
|
2005-11-06 15:09:47 +00:00
|
|
|
* \ingroup applications
|
2004-02-17 07:03:14 +00:00
|
|
|
*/
|
|
|
|
|
2006-06-07 18:54:56 +00:00
|
|
|
#include "asterisk.h"
|
|
|
|
|
|
|
|
ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
|
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
#include <string.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <signal.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
#include <sys/time.h>
|
|
|
|
#include <errno.h>
|
2005-06-06 22:39:32 +00:00
|
|
|
|
|
|
|
#include "asterisk/lock.h"
|
|
|
|
#include "asterisk/file.h"
|
|
|
|
#include "asterisk/logger.h"
|
|
|
|
#include "asterisk/channel.h"
|
|
|
|
#include "asterisk/frame.h"
|
|
|
|
#include "asterisk/pbx.h"
|
|
|
|
#include "asterisk/module.h"
|
|
|
|
#include "asterisk/translate.h"
|
2006-05-01 21:48:30 +00:00
|
|
|
#include "asterisk/options.h"
|
2005-06-06 22:39:32 +00:00
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
#define ICES "/usr/bin/ices"
|
|
|
|
#define LOCAL_ICES "/usr/local/bin/ices"
|
|
|
|
|
|
|
|
static char *app = "ICES";
|
|
|
|
|
|
|
|
static char *synopsis = "Encode and stream using 'ices'";
|
|
|
|
|
|
|
|
static char *descrip =
|
|
|
|
" ICES(config.xml) Streams to an icecast server using ices\n"
|
|
|
|
"(available separately). A configuration file must be supplied\n"
|
2005-11-07 22:01:22 +00:00
|
|
|
"for ices (see examples/asterisk-ices.conf). \n";
|
2004-02-17 07:03:14 +00:00
|
|
|
|
|
|
|
|
|
|
|
static int icesencode(char *filename, int fd)
|
|
|
|
{
|
|
|
|
int res;
|
|
|
|
int x;
|
2006-12-11 00:52:19 +00:00
|
|
|
sigset_t fullset, oldset;
|
|
|
|
|
|
|
|
sigfillset(&fullset);
|
|
|
|
pthread_sigmask(SIG_BLOCK, &fullset, &oldset);
|
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
res = fork();
|
|
|
|
if (res < 0)
|
|
|
|
ast_log(LOG_WARNING, "Fork failed\n");
|
2006-12-11 00:52:19 +00:00
|
|
|
if (res) {
|
|
|
|
pthread_sigmask(SIG_SETMASK, &oldset, NULL);
|
2004-02-17 07:03:14 +00:00
|
|
|
return res;
|
2006-12-11 00:52:19 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Stop ignoring PIPE */
|
|
|
|
signal(SIGPIPE, SIG_DFL);
|
|
|
|
pthread_sigmask(SIG_UNBLOCK, &fullset, NULL);
|
|
|
|
|
2006-05-01 21:48:30 +00:00
|
|
|
if (ast_opt_high_priority)
|
|
|
|
ast_set_priority(0);
|
2004-02-17 07:03:14 +00:00
|
|
|
dup2(fd, STDIN_FILENO);
|
2006-12-11 00:52:19 +00:00
|
|
|
for (x=STDERR_FILENO + 1;x<1024;x++) {
|
2004-02-17 07:03:14 +00:00
|
|
|
if ((x != STDIN_FILENO) && (x != STDOUT_FILENO))
|
|
|
|
close(x);
|
|
|
|
}
|
|
|
|
/* Most commonly installed in /usr/local/bin */
|
|
|
|
execl(ICES, "ices", filename, (char *)NULL);
|
|
|
|
/* But many places has it in /usr/bin */
|
|
|
|
execl(LOCAL_ICES, "ices", filename, (char *)NULL);
|
|
|
|
/* As a last-ditch effort, try to use PATH */
|
|
|
|
execlp("ices", "ices", filename, (char *)NULL);
|
|
|
|
ast_log(LOG_WARNING, "Execute of ices failed\n");
|
2006-12-11 00:52:19 +00:00
|
|
|
_exit(0);
|
2004-02-17 07:03:14 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static int ices_exec(struct ast_channel *chan, void *data)
|
|
|
|
{
|
2007-07-16 14:39:29 +00:00
|
|
|
int res = 0;
|
2004-02-17 07:03:14 +00:00
|
|
|
int fds[2];
|
|
|
|
int ms = -1;
|
|
|
|
int pid = -1;
|
|
|
|
int flags;
|
|
|
|
int oreadformat;
|
|
|
|
struct timeval last;
|
|
|
|
struct ast_frame *f;
|
|
|
|
char filename[256]="";
|
|
|
|
char *c;
|
2005-10-19 18:19:02 +00:00
|
|
|
|
2005-10-26 19:48:14 +00:00
|
|
|
if (ast_strlen_zero(data)) {
|
2004-02-17 07:03:14 +00:00
|
|
|
ast_log(LOG_WARNING, "ICES requires an argument (configfile.xml)\n");
|
|
|
|
return -1;
|
|
|
|
}
|
2005-10-19 18:19:02 +00:00
|
|
|
|
|
|
|
last = ast_tv(0, 0);
|
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
if (pipe(fds)) {
|
|
|
|
ast_log(LOG_WARNING, "Unable to create pipe\n");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
flags = fcntl(fds[1], F_GETFL);
|
|
|
|
fcntl(fds[1], F_SETFL, flags | O_NONBLOCK);
|
|
|
|
|
|
|
|
ast_stopstream(chan);
|
|
|
|
|
|
|
|
if (chan->_state != AST_STATE_UP)
|
|
|
|
res = ast_answer(chan);
|
|
|
|
|
|
|
|
if (res) {
|
|
|
|
close(fds[0]);
|
|
|
|
close(fds[1]);
|
|
|
|
ast_log(LOG_WARNING, "Answer failed!\n");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
oreadformat = chan->readformat;
|
2004-04-06 22:17:32 +00:00
|
|
|
res = ast_set_read_format(chan, AST_FORMAT_SLINEAR);
|
2004-02-17 07:03:14 +00:00
|
|
|
if (res < 0) {
|
|
|
|
close(fds[0]);
|
|
|
|
close(fds[1]);
|
|
|
|
ast_log(LOG_WARNING, "Unable to set write format to signed linear\n");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
if (((char *)data)[0] == '/')
|
2006-10-25 14:44:50 +00:00
|
|
|
ast_copy_string(filename, (char *) data, sizeof(filename));
|
2004-02-17 07:03:14 +00:00
|
|
|
else
|
|
|
|
snprintf(filename, sizeof(filename), "%s/%s", (char *)ast_config_AST_CONFIG_DIR, (char *)data);
|
|
|
|
/* Placeholder for options */
|
|
|
|
c = strchr(filename, '|');
|
|
|
|
if (c)
|
|
|
|
*c = '\0';
|
|
|
|
res = icesencode(filename, fds[0]);
|
|
|
|
close(fds[0]);
|
|
|
|
if (res >= 0) {
|
|
|
|
pid = res;
|
|
|
|
for (;;) {
|
|
|
|
/* Wait for audio, and stream */
|
|
|
|
ms = ast_waitfor(chan, -1);
|
|
|
|
if (ms < 0) {
|
2007-06-14 19:39:12 +00:00
|
|
|
ast_debug(1, "Hangup detected\n");
|
2004-02-17 07:03:14 +00:00
|
|
|
res = -1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
f = ast_read(chan);
|
|
|
|
if (!f) {
|
2007-06-14 19:39:12 +00:00
|
|
|
ast_debug(1, "Null frame == hangup() detected\n");
|
2004-02-17 07:03:14 +00:00
|
|
|
res = -1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (f->frametype == AST_FRAME_VOICE) {
|
|
|
|
res = write(fds[1], f->data, f->datalen);
|
|
|
|
if (res < 0) {
|
|
|
|
if (errno != EAGAIN) {
|
|
|
|
ast_log(LOG_WARNING, "Write failed to pipe: %s\n", strerror(errno));
|
|
|
|
res = -1;
|
2006-06-11 20:49:16 +00:00
|
|
|
ast_frfree(f);
|
2004-02-17 07:03:14 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
ast_frfree(f);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
close(fds[1]);
|
2005-10-19 18:19:02 +00:00
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
if (pid > -1)
|
|
|
|
kill(pid, SIGKILL);
|
|
|
|
if (!res && oreadformat)
|
2004-04-06 22:17:32 +00:00
|
|
|
ast_set_read_format(chan, oreadformat);
|
2005-10-19 18:19:02 +00:00
|
|
|
|
2004-02-17 07:03:14 +00:00
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
2006-08-21 02:11:39 +00:00
|
|
|
static int unload_module(void)
|
2004-02-17 07:03:14 +00:00
|
|
|
{
|
2007-07-16 13:35:20 +00:00
|
|
|
return ast_unregister_application(app);
|
2004-02-17 07:03:14 +00:00
|
|
|
}
|
|
|
|
|
2006-08-21 02:11:39 +00:00
|
|
|
static int load_module(void)
|
2004-02-17 07:03:14 +00:00
|
|
|
{
|
|
|
|
return ast_register_application(app, ices_exec, synopsis, descrip);
|
|
|
|
}
|
|
|
|
|
2006-08-21 02:11:39 +00:00
|
|
|
AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Encode and Stream via icecast and ices");
|