res_rtp: Fix regression when IPv6 is not available.
[asterisk/asterisk.git] / formats / format_h263.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2006, Digium, Inc.
5  *
6  * Mark Spencer <markster@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 Save to raw, headerless h263 data.
22  * \arg File name extension: h263
23  * \ingroup formats
24  * \arg See \ref AstVideo
25  */
26
27 /*** MODULEINFO
28         <support_level>core</support_level>
29  ***/
30  
31 #include "asterisk.h"
32
33 #include "asterisk/mod_format.h"
34 #include "asterisk/module.h"
35 #include "asterisk/endian.h"
36 #include "asterisk/format_cache.h"
37
38 /* Some Ideas for this code came from makeh263e.c by Jeffrey Chilton */
39
40 /* Portions of the conversion code are by guido@sienanet.it */
41
42 /* According to:
43  * http://lists.mpegif.org/pipermail/mp4-tech/2005-July/005741.html
44  * the maximum actual frame size is not 2048, but 8192.  Since the maximum
45  * theoretical limit is not much larger (32k = 15bits), we'll go for that
46  * size to ensure we don't corrupt frames sent to us (unless they're
47  * ridiculously large). */
48 #define BUF_SIZE        32768   /* Four real h.263 Frames */
49
50 #define FRAME_ENDED 0x8000
51
52 struct h263_desc {
53         unsigned int lastts;
54 };
55
56
57 static int h263_open(struct ast_filestream *s)
58 {
59         unsigned int ts;
60
61         if (fread(&ts, 1, sizeof(ts), s->f) < sizeof(ts)) {
62                 ast_log(LOG_WARNING, "Empty file!\n");
63                 return -1;
64         }
65         return 0;
66 }
67
68 static struct ast_frame *h263_read(struct ast_filestream *s, int *whennext)
69 {
70         int res;
71         uint32_t mark;
72         unsigned short len;
73         unsigned int ts;
74         struct h263_desc *fs = (struct h263_desc *)s->_private;
75
76         /* Send a frame from the file to the appropriate channel */
77         if ((res = fread(&len, 1, sizeof(len), s->f)) < 1)
78                 return NULL;
79         len = ntohs(len);
80         mark = (len & FRAME_ENDED) ? 1 : 0;
81         len &= 0x7fff;
82         if (len > BUF_SIZE) {
83                 ast_log(LOG_WARNING, "Length %d is too long\n", len);
84                 return NULL;
85         }
86         AST_FRAME_SET_BUFFER(&s->fr, s->buf, AST_FRIENDLY_OFFSET, len);
87         if ((res = fread(s->fr.data.ptr, 1, s->fr.datalen, s->f)) != s->fr.datalen) {
88                 if (res)
89                         ast_log(LOG_WARNING, "Short read (%d) (%s)!\n", res, strerror(errno));
90                 return NULL;
91         }
92         s->fr.samples = fs->lastts;     /* XXX what ? */
93         s->fr.datalen = len;
94         s->fr.subclass.frame_ending = mark;
95         if ((res = fread(&ts, 1, sizeof(ts), s->f)) == sizeof(ts)) {
96                 fs->lastts = ntohl(ts);
97                 *whennext = fs->lastts * 4/45;
98         } else
99                 *whennext = 0;
100         return &s->fr;
101 }
102
103 static int h263_write(struct ast_filestream *fs, struct ast_frame *f)
104 {
105         int res;
106         unsigned int ts;
107         unsigned short len;
108         uint32_t mark = 0;
109         mark = f->subclass.frame_ending ? FRAME_ENDED : 0;
110         ts = htonl(f->samples);
111         if ((res = fwrite(&ts, 1, sizeof(ts), fs->f)) != sizeof(ts)) {
112                         ast_log(LOG_WARNING, "Bad write (%d/4): %s\n", res, strerror(errno));
113                         return -1;
114         }
115         len = htons(f->datalen | mark);
116         if ((res = fwrite(&len, 1, sizeof(len), fs->f)) != sizeof(len)) {
117                         ast_log(LOG_WARNING, "Bad write (%d/2): %s\n", res, strerror(errno));
118                         return -1;
119         }
120         if ((res = fwrite(f->data.ptr, 1, f->datalen, fs->f)) != f->datalen) {
121                         ast_log(LOG_WARNING, "Bad write (%d/%d): %s\n", res, f->datalen, strerror(errno));
122                         return -1;
123         }
124         return 0;
125 }
126
127 static int h263_seek(struct ast_filestream *fs, off_t sample_offset, int whence)
128 {
129         /* No way Jose */
130         return -1;
131 }
132
133 static int h263_trunc(struct ast_filestream *fs)
134 {
135         int fd;
136         off_t cur;
137
138         if ((fd = fileno(fs->f)) < 0) {
139                 ast_log(AST_LOG_WARNING, "Unable to determine file descriptor for h263 filestream %p: %s\n", fs, strerror(errno));
140                 return -1;
141         }
142         if ((cur = ftello(fs->f)) < 0) {
143                 ast_log(AST_LOG_WARNING, "Unable to determine current position in h263 filestream %p: %s\n", fs, strerror(errno));
144                 return -1;
145         }
146         /* Truncate file to current length */
147         return ftruncate(fd, cur);
148 }
149
150 static off_t h263_tell(struct ast_filestream *fs)
151 {
152         off_t offset = ftello(fs->f);
153         return offset;  /* XXX totally bogus, needs fixing */
154 }
155
156 static struct ast_format_def h263_f = {
157         .name = "h263",
158         .exts = "h263",
159         .open = h263_open,
160         .write = h263_write,
161         .seek = h263_seek,
162         .trunc = h263_trunc,
163         .tell = h263_tell,
164         .read = h263_read,
165         .buf_size = BUF_SIZE + AST_FRIENDLY_OFFSET,
166         .desc_size = sizeof(struct h263_desc),
167 };
168
169 static int load_module(void)
170 {
171         h263_f.format = ast_format_h263;
172         if (ast_format_def_register(&h263_f))
173                 return AST_MODULE_LOAD_FAILURE;
174         return AST_MODULE_LOAD_SUCCESS;
175 }
176
177 static int unload_module(void)
178 {
179         return ast_format_def_unregister(h263_f.name);
180 }
181
182 AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_LOAD_ORDER, "Raw H.263 data",
183         .support_level = AST_MODULE_SUPPORT_CORE,
184         .load = load_module,
185         .unload = unload_module,
186         .load_pri = AST_MODPRI_APP_DEPEND
187 );