Largely simplify format handlers (for file copy etc.)
[asterisk/asterisk.git] / formats / format_sln.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Anthony Minessale
5  * Anthony Minessale (anthmct@yahoo.com)
6  *
7  * See http://www.asterisk.org for more information about
8  * the Asterisk project. Please do not directly contact
9  * any of the maintainers of this project for assistance;
10  * the project provides a web site, mailing lists and IRC
11  * channels for your use.
12  *
13  * This program is free software, distributed under the terms of
14  * the GNU General Public License Version 2. See the LICENSE file
15  * at the top of the source tree.
16  */
17
18 /*! \file
19  *
20  * \brief RAW SLINEAR Format
21  * \arg File name extensions: sln, raw
22  * \ingroup formats
23  */
24  
25 #include <unistd.h>
26 #include <netinet/in.h>
27 #include <arpa/inet.h>
28 #include <stdlib.h>
29 #include <sys/time.h>
30 #include <stdio.h>
31 #include <errno.h>
32 #include <string.h>
33
34 #include "asterisk.h"
35
36 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
37
38 #include "asterisk/lock.h"
39 #include "asterisk/channel.h"
40 #include "asterisk/file.h"
41 #include "asterisk/logger.h"
42 #include "asterisk/sched.h"
43 #include "asterisk/module.h"
44 #include "asterisk/endian.h"
45
46 #define BUF_SIZE        320             /* 320 bytes, 160 samples */
47 #define SLIN_SAMPLES    160
48
49 static struct ast_frame *slinear_read(struct ast_filestream *s, int *whennext)
50 {
51         int res;
52         /* Send a frame from the file to the appropriate channel */
53
54         s->fr.frametype = AST_FRAME_VOICE;
55         s->fr.subclass = AST_FORMAT_SLINEAR;
56         s->fr.offset = AST_FRIENDLY_OFFSET;
57         s->fr.mallocd = 0;
58         FR_SET_BUF(&s->fr, s->buf, AST_FRIENDLY_OFFSET, BUF_SIZE);
59         if ((res = fread(s->fr.data, 1, s->fr.datalen, s->f)) < 1) {
60                 if (res)
61                         ast_log(LOG_WARNING, "Short read (%d) (%s)!\n", res, strerror(errno));
62                 return NULL;
63         }
64         *whennext = s->fr.samples = res/2;
65         s->fr.datalen = res;
66         return &s->fr;
67 }
68
69 static int slinear_write(struct ast_filestream *fs, struct ast_frame *f)
70 {
71         int res;
72         if (f->frametype != AST_FRAME_VOICE) {
73                 ast_log(LOG_WARNING, "Asked to write non-voice frame!\n");
74                 return -1;
75         }
76         if (f->subclass != AST_FORMAT_SLINEAR) {
77                 ast_log(LOG_WARNING, "Asked to write non-slinear frame (%d)!\n", f->subclass);
78                 return -1;
79         }
80         if ((res = fwrite(f->data, 1, f->datalen, fs->f)) != f->datalen) {
81                         ast_log(LOG_WARNING, "Bad write (%d/%d): %s\n", res, f->datalen, strerror(errno));
82                         return -1;
83         }
84         return 0;
85 }
86
87 static int slinear_seek(struct ast_filestream *fs, off_t sample_offset, int whence)
88 {
89         off_t offset=0,min,cur,max;
90
91         min = 0;
92         sample_offset <<= 1;
93         cur = ftello(fs->f);
94         fseeko(fs->f, 0, SEEK_END);
95         max = ftello(fs->f);
96         if (whence == SEEK_SET)
97                 offset = sample_offset;
98         else if (whence == SEEK_CUR || whence == SEEK_FORCECUR)
99                 offset = sample_offset + cur;
100         else if (whence == SEEK_END)
101                 offset = max - sample_offset;
102         if (whence != SEEK_FORCECUR) {
103                 offset = (offset > max)?max:offset;
104         }
105         /* always protect against seeking past begining. */
106         offset = (offset < min)?min:offset;
107         return fseeko(fs->f, offset, SEEK_SET);
108 }
109
110 static int slinear_trunc(struct ast_filestream *fs)
111 {
112         return ftruncate(fileno(fs->f), ftello(fs->f));
113 }
114
115 static off_t slinear_tell(struct ast_filestream *fs)
116 {
117         return ftello(fs->f) / 2;
118 }
119
120 static struct ast_format_lock me = { .usecnt = -1 };
121
122 static const struct ast_format slin_f = {
123         .name = "sln",
124         .exts = "sln|raw",
125         .format = AST_FORMAT_SLINEAR,
126         .write = slinear_write,
127         .seek = slinear_seek,
128         .trunc = slinear_trunc,
129         .tell = slinear_tell,
130         .read = slinear_read,
131         .buf_size = BUF_SIZE + AST_FRIENDLY_OFFSET,
132         .lockp = &me,
133 };
134
135 int load_module()
136 {
137         return ast_format_register(&slin_f);
138 }
139
140 int unload_module()
141 {
142         return ast_format_unregister(slin_f.name);
143 }       
144
145 int usecount()
146 {
147         return me.usecnt;
148 }
149
150 char *description()
151 {
152         return "Raw Signed Linear Audio support (SLN)";
153 }
154
155 char *key()
156 {
157         return ASTERISK_GPL_KEY;
158 }