formats/format_siren7.c

   1 /*
   2  * Asterisk -- An open source telephony toolkit.
   3  *
   4  * Copyright (C) 1999 - 2008, Anthony Minessale and Digium, Inc.
   5  * Anthony Minessale (anthmct@yahoo.com)
   6  * Kevin P. Fleming <kpfleming@digium.com>
   7  *
   8  * See http://www.asterisk.org for more information about
   9  * the Asterisk project. Please do not directly contact
  10  * any of the maintainers of this project for assistance;
  11  * the project provides a web site, mailing lists and IRC
  12  * channels for your use.
  13  *
  14  * This program is free software, distributed under the terms of
  15  * the GNU General Public License Version 2. See the LICENSE file
  16  * at the top of the source tree.
  17  */
  18
  19 /*! \file
  20  *
  21  * \brief ITU G.722.1 (Siren7, licensed from Polycom) format, 32kbps bitrate only
  22  * \arg File name extensions: siren7
  23  * \ingroup formats
  24  */
  25
  26 /*** MODULEINFO
  27         <support_level>core</support_level>
  28  ***/
  29
  30 #include "asterisk.h"
  31
  32 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
  33
  34 #include "asterisk/mod_format.h"
  35 #include "asterisk/module.h"
  36 #include "asterisk/endian.h"
  37
  38 #define BUF_SIZE        80              /* 20 milliseconds == 80 bytes, 320 samples */
  39 #define SAMPLES_TO_BYTES(x)     x / (320 / 80)
  40 #define BYTES_TO_SAMPLES(x)     x * (320 / 80)
  41
  42 static struct ast_frame *siren7read(struct ast_filestream *s, int *whennext)
  43 {
  44         int res;
  45         /* Send a frame from the file to the appropriate channel */
  46
  47         s->fr.frametype = AST_FRAME_VOICE;
  48         ast_format_set(&s->fr.subclass.format, AST_FORMAT_SIREN7, 0);
  49         s->fr.mallocd = 0;
  50         AST_FRAME_SET_BUFFER(&s->fr, s->buf, AST_FRIENDLY_OFFSET, BUF_SIZE);
  51         if ((res = fread(s->fr.data.ptr, 1, s->fr.datalen, s->f)) != s->fr.datalen) {
  52                 if (res)
  53                         ast_log(LOG_WARNING, "Short read (%d) (%s)!\n", res, strerror(errno));
  54                 return NULL;
  55         }
  56         *whennext = s->fr.samples = BYTES_TO_SAMPLES(res);
  57         return &s->fr;
  58 }
  59
  60 static int siren7write(struct ast_filestream *fs, struct ast_frame *f)
  61 {
  62         int res;
  63
  64         if (f->frametype != AST_FRAME_VOICE) {
  65                 ast_log(LOG_WARNING, "Asked to write non-voice frame!\n");
  66                 return -1;
  67         }
  68         if (f->subclass.format.id != AST_FORMAT_SIREN7) {
  69                 ast_log(LOG_WARNING, "Asked to write non-Siren7 frame (%s)!\n", ast_getformatname(&f->subclass.format));
  70                 return -1;
  71         }
  72         if ((res = fwrite(f->data.ptr, 1, f->datalen, fs->f)) != f->datalen) {
  73                 ast_log(LOG_WARNING, "Bad write (%d/%d): %s\n", res, f->datalen, strerror(errno));
  74                 return -1;
  75         }
  76         return 0;
  77 }
  78
  79 static int siren7seek(struct ast_filestream *fs, off_t sample_offset, int whence)
  80 {
  81         off_t offset = 0, min = 0, cur, max;
  82
  83         sample_offset = SAMPLES_TO_BYTES(sample_offset);
  84
  85         cur = ftello(fs->f);
  86
  87         fseeko(fs->f, 0, SEEK_END);
  88
  89         max = ftello(fs->f);
  90
  91         if (whence == SEEK_SET)
  92                 offset = sample_offset;
  93         else if (whence == SEEK_CUR || whence == SEEK_FORCECUR)
  94                 offset = sample_offset + cur;
  95         else if (whence == SEEK_END)
  96                 offset = max - sample_offset;
  97
  98         if (whence != SEEK_FORCECUR)
  99                 offset = (offset > max) ? max : offset;
 100
 101         /* always protect against seeking past begining. */
 102         offset = (offset < min) ? min : offset;
 103
 104         return fseeko(fs->f, offset, SEEK_SET);
 105 }
 106
 107 static int siren7trunc(struct ast_filestream *fs)
 108 {
 109         return ftruncate(fileno(fs->f), ftello(fs->f));
 110 }
 111
 112 static off_t siren7tell(struct ast_filestream *fs)
 113 {
 114         return BYTES_TO_SAMPLES(ftello(fs->f));
 115 }
 116
 117 static struct ast_format_def siren7_f = {
 118         .name = "siren7",
 119         .exts = "siren7",
 120         .write = siren7write,
 121         .seek = siren7seek,
 122         .trunc = siren7trunc,
 123         .tell = siren7tell,
 124         .read = siren7read,
 125         .buf_size = BUF_SIZE + AST_FRIENDLY_OFFSET,
 126 };
 127
 128 static int load_module(void)
 129 {
 130         ast_format_set(&siren7_f.format, AST_FORMAT_SIREN7, 0);
 131         if (ast_format_def_register(&siren7_f))
 132                 return AST_MODULE_LOAD_DECLINE;
 133
 134         return AST_MODULE_LOAD_SUCCESS;
 135 }
 136
 137 static int unload_module(void)
 138 {
 139         return ast_format_def_unregister(siren7_f.name);
 140 }
 141
 142 AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_LOAD_ORDER, "ITU G.722.1 (Siren7, licensed from Polycom)",
 143         .load = load_module,
 144         .unload = unload_module,
 145         .load_pri = AST_MODPRI_APP_DEPEND
 146 );