2003-02-06 22:11:43 +00:00
|
|
|
/*
|
2005-09-14 20:46:50 +00:00
|
|
|
* Asterisk -- An open source telephony toolkit.
|
2003-02-06 22:11:43 +00:00
|
|
|
*
|
2005-09-14 20:46:50 +00:00
|
|
|
* Copyright (C) 1999 - 2005, Digium, Inc.
|
|
|
|
*
|
|
|
|
* Mark Spencer <markster@digium.com>
|
2003-02-06 22:11:43 +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.
|
2003-02-06 22:11:43 +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-26 13:03:17 +00:00
|
|
|
/*! \file
|
2005-09-14 20:46:50 +00:00
|
|
|
*
|
2005-10-26 13:03:17 +00:00
|
|
|
* \brief Save to raw, headerless G729 data.
|
2005-11-06 15:09:47 +00:00
|
|
|
* \note This is not an encoder/decoder. The codec fo g729 is only
|
|
|
|
* available with a commercial license from Digium, due to patent
|
|
|
|
* restrictions. Check http://www.digium.com for information.
|
|
|
|
* \arg Extensions: g729
|
|
|
|
* \ingroup formats
|
2003-02-06 22:11:43 +00:00
|
|
|
*/
|
|
|
|
|
2006-06-07 18:54:56 +00:00
|
|
|
#include "asterisk.h"
|
|
|
|
|
|
|
|
ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
|
|
|
|
|
2005-06-07 17:06:33 +00:00
|
|
|
#include <unistd.h>
|
2003-09-08 16:48:07 +00:00
|
|
|
#include <netinet/in.h>
|
2003-02-06 22:11:43 +00:00
|
|
|
#include <arpa/inet.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <sys/time.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <string.h>
|
|
|
|
|
2005-06-06 22:12:19 +00:00
|
|
|
#include "asterisk/lock.h"
|
|
|
|
#include "asterisk/channel.h"
|
|
|
|
#include "asterisk/file.h"
|
|
|
|
#include "asterisk/logger.h"
|
|
|
|
#include "asterisk/sched.h"
|
|
|
|
#include "asterisk/module.h"
|
|
|
|
#include "asterisk/endian.h"
|
|
|
|
|
2004-01-22 21:30:04 +00:00
|
|
|
/* Some Ideas for this code came from makeg729e.c by Jeffrey Chilton */
|
2003-02-06 22:11:43 +00:00
|
|
|
|
|
|
|
/* Portions of the conversion code are by guido@sienanet.it */
|
|
|
|
|
2006-04-04 12:59:25 +00:00
|
|
|
#define BUF_SIZE 20 /* two G729 frames */
|
|
|
|
#define G729A_SAMPLES 160
|
2003-02-06 22:11:43 +00:00
|
|
|
|
2003-06-28 22:50:47 +00:00
|
|
|
static struct ast_frame *g729_read(struct ast_filestream *s, int *whennext)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
|
|
|
int res;
|
|
|
|
/* Send a frame from the file to the appropriate channel */
|
|
|
|
s->fr.frametype = AST_FRAME_VOICE;
|
|
|
|
s->fr.subclass = AST_FORMAT_G729A;
|
|
|
|
s->fr.mallocd = 0;
|
2006-04-04 12:59:25 +00:00
|
|
|
s->fr.samples = G729A_SAMPLES;
|
2006-04-09 22:31:38 +00:00
|
|
|
AST_FRAME_SET_BUFFER(&s->fr, s->buf, AST_FRIENDLY_OFFSET, BUF_SIZE);
|
2006-04-04 12:59:25 +00:00
|
|
|
if ((res = fread(s->fr.data, 1, s->fr.datalen, s->f)) != s->fr.datalen) {
|
|
|
|
if (res && (res != 10)) /* XXX what for ? */
|
2003-02-06 22:11:43 +00:00
|
|
|
ast_log(LOG_WARNING, "Short read (%d) (%s)!\n", res, strerror(errno));
|
2003-06-28 22:50:47 +00:00
|
|
|
return NULL;
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
2003-06-28 22:50:47 +00:00
|
|
|
*whennext = s->fr.samples;
|
|
|
|
return &s->fr;
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static int g729_write(struct ast_filestream *fs, struct ast_frame *f)
|
|
|
|
{
|
|
|
|
int res;
|
|
|
|
if (f->frametype != AST_FRAME_VOICE) {
|
|
|
|
ast_log(LOG_WARNING, "Asked to write non-voice frame!\n");
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
if (f->subclass != AST_FORMAT_G729A) {
|
|
|
|
ast_log(LOG_WARNING, "Asked to write non-G729 frame (%d)!\n", f->subclass);
|
|
|
|
return -1;
|
|
|
|
}
|
2004-01-28 21:32:48 +00:00
|
|
|
if (f->datalen % 10) {
|
|
|
|
ast_log(LOG_WARNING, "Invalid data length, %d, should be multiple of 10\n", f->datalen);
|
2003-02-06 22:11:43 +00:00
|
|
|
return -1;
|
|
|
|
}
|
2005-10-16 16:12:51 +00:00
|
|
|
if ((res = fwrite(f->data, 1, f->datalen, fs->f)) != f->datalen) {
|
2004-01-28 21:32:48 +00:00
|
|
|
ast_log(LOG_WARNING, "Bad write (%d/10): %s\n", res, strerror(errno));
|
2003-02-06 22:11:43 +00:00
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2006-02-20 23:35:12 +00:00
|
|
|
static int g729_seek(struct ast_filestream *fs, off_t sample_offset, int whence)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
|
|
|
long bytes;
|
2003-08-27 23:35:17 +00:00
|
|
|
off_t min,cur,max,offset=0;
|
2003-02-06 22:11:43 +00:00
|
|
|
min = 0;
|
2006-02-20 23:35:12 +00:00
|
|
|
cur = ftello(fs->f);
|
|
|
|
fseeko(fs->f, 0, SEEK_END);
|
|
|
|
max = ftello(fs->f);
|
2003-02-06 22:11:43 +00:00
|
|
|
|
2006-04-04 12:59:25 +00:00
|
|
|
bytes = BUF_SIZE * (sample_offset / G729A_SAMPLES);
|
2003-08-28 20:02:10 +00:00
|
|
|
if (whence == SEEK_SET)
|
2003-02-06 22:11:43 +00:00
|
|
|
offset = bytes;
|
2003-08-28 20:02:10 +00:00
|
|
|
else if (whence == SEEK_CUR || whence == SEEK_FORCECUR)
|
2003-02-06 22:11:43 +00:00
|
|
|
offset = cur + bytes;
|
2003-08-28 20:02:10 +00:00
|
|
|
else if (whence == SEEK_END)
|
2003-02-06 22:11:43 +00:00
|
|
|
offset = max - bytes;
|
2003-08-28 20:02:10 +00:00
|
|
|
if (whence != SEEK_FORCECUR) {
|
|
|
|
offset = (offset > max)?max:offset;
|
|
|
|
}
|
2004-12-19 21:13:41 +00:00
|
|
|
/* protect against seeking beyond begining. */
|
2004-04-15 16:02:42 +00:00
|
|
|
offset = (offset < min)?min:offset;
|
2006-02-20 23:35:12 +00:00
|
|
|
if (fseeko(fs->f, offset, SEEK_SET) < 0)
|
2003-02-06 22:11:43 +00:00
|
|
|
return -1;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int g729_trunc(struct ast_filestream *fs)
|
|
|
|
{
|
|
|
|
/* Truncate file to current length */
|
2006-02-20 23:35:12 +00:00
|
|
|
if (ftruncate(fileno(fs->f), ftello(fs->f)) < 0)
|
2003-02-06 22:11:43 +00:00
|
|
|
return -1;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2006-02-20 23:35:12 +00:00
|
|
|
static off_t g729_tell(struct ast_filestream *fs)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
2006-04-04 12:59:25 +00:00
|
|
|
off_t offset = ftello(fs->f);
|
|
|
|
return (offset/BUF_SIZE)*G729A_SAMPLES;
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
|
|
|
|
2006-04-04 12:59:25 +00:00
|
|
|
static const struct ast_format g729_f = {
|
|
|
|
.name = "g729",
|
|
|
|
.exts = "g729",
|
|
|
|
.format = AST_FORMAT_G729A,
|
|
|
|
.write = g729_write,
|
|
|
|
.seek = g729_seek,
|
|
|
|
.trunc = g729_trunc,
|
|
|
|
.tell = g729_tell,
|
|
|
|
.read = g729_read,
|
|
|
|
.buf_size = BUF_SIZE + AST_FRIENDLY_OFFSET,
|
2006-04-14 14:08:19 +00:00
|
|
|
.module = &mod_data, /* XXX */
|
2006-04-04 12:59:25 +00:00
|
|
|
};
|
|
|
|
|
2006-04-14 14:08:19 +00:00
|
|
|
static int load_module(void *mod)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
2006-04-04 12:59:25 +00:00
|
|
|
return ast_format_register(&g729_f);
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
|
|
|
|
2006-04-14 14:08:19 +00:00
|
|
|
static int unload_module(void *mod)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
2006-04-04 12:59:25 +00:00
|
|
|
return ast_format_unregister(g729_f.name);
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
|
|
|
|
2006-04-14 14:08:19 +00:00
|
|
|
static const char *description(void)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
2006-04-04 12:59:25 +00:00
|
|
|
return "Raw G729 data";
|
2003-02-06 22:11:43 +00:00
|
|
|
}
|
|
|
|
|
2006-04-14 14:08:19 +00:00
|
|
|
static const char *key(void)
|
2003-02-06 22:11:43 +00:00
|
|
|
{
|
|
|
|
return ASTERISK_GPL_KEY;
|
|
|
|
}
|
2006-04-14 14:08:19 +00:00
|
|
|
|
|
|
|
STD_MOD1;
|