Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / libavcodec / parser.c
1 /*
2  * Audio and Video frame extraction
3  * Copyright (c) 2003 Fabrice Bellard
4  * Copyright (c) 2003 Michael Niedermayer
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 #include <stdint.h>
24 #include <string.h>
25
26 #include "parser.h"
27 #include "libavutil/atomic.h"
28 #include "libavutil/mem.h"
29
30 static AVCodecParser *av_first_parser = NULL;
31
32 AVCodecParser* av_parser_next(AVCodecParser *p){
33     if(p) return p->next;
34     else  return av_first_parser;
35 }
36
37 void av_register_codec_parser(AVCodecParser *parser)
38 {
39     do {
40         parser->next = av_first_parser;
41     } while (parser->next != avpriv_atomic_ptr_cas((void * volatile *)&av_first_parser, parser->next, parser));
42 }
43
44 AVCodecParserContext *av_parser_init(int codec_id)
45 {
46     AVCodecParserContext *s = NULL;
47     AVCodecParser *parser;
48     int ret;
49
50     if(codec_id == AV_CODEC_ID_NONE)
51         return NULL;
52
53     for(parser = av_first_parser; parser != NULL; parser = parser->next) {
54         if (parser->codec_ids[0] == codec_id ||
55             parser->codec_ids[1] == codec_id ||
56             parser->codec_ids[2] == codec_id ||
57             parser->codec_ids[3] == codec_id ||
58             parser->codec_ids[4] == codec_id)
59             goto found;
60     }
61     return NULL;
62  found:
63     s = av_mallocz(sizeof(AVCodecParserContext));
64     if (!s)
65         goto err_out;
66     s->parser = parser;
67     s->priv_data = av_mallocz(parser->priv_data_size);
68     if (!s->priv_data)
69         goto err_out;
70     s->fetch_timestamp=1;
71     s->pict_type = AV_PICTURE_TYPE_I;
72     if (parser->parser_init) {
73         ret = parser->parser_init(s);
74         if (ret != 0)
75             goto err_out;
76     }
77     s->key_frame = -1;
78     s->convergence_duration = 0;
79     s->dts_sync_point       = INT_MIN;
80     s->dts_ref_dts_delta    = INT_MIN;
81     s->pts_dts_delta        = INT_MIN;
82     return s;
83
84 err_out:
85     if (s)
86         av_freep(&s->priv_data);
87     av_free(s);
88     return NULL;
89 }
90
91 void ff_fetch_timestamp(AVCodecParserContext *s, int off, int remove){
92     int i;
93
94     s->dts= s->pts= AV_NOPTS_VALUE;
95     s->pos= -1;
96     s->offset= 0;
97     for(i = 0; i < AV_PARSER_PTS_NB; i++) {
98         if (   s->cur_offset + off >= s->cur_frame_offset[i]
99             && (s->frame_offset < s->cur_frame_offset[i] ||
100               (!s->frame_offset && !s->next_frame_offset)) // first field/frame
101             // check disabled since MPEG-TS does not send complete PES packets
102             && /*s->next_frame_offset + off <*/  s->cur_frame_end[i]){
103             s->dts= s->cur_frame_dts[i];
104             s->pts= s->cur_frame_pts[i];
105             s->pos= s->cur_frame_pos[i];
106             s->offset = s->next_frame_offset - s->cur_frame_offset[i];
107             if(remove)
108                 s->cur_frame_offset[i]= INT64_MAX;
109             if(s->cur_offset + off < s->cur_frame_end[i])
110                 break;
111         }
112     }
113 }
114
115 int av_parser_parse2(AVCodecParserContext *s,
116                      AVCodecContext *avctx,
117                      uint8_t **poutbuf, int *poutbuf_size,
118                      const uint8_t *buf, int buf_size,
119                      int64_t pts, int64_t dts,
120                      int64_t pos)
121 {
122     int index, i;
123     uint8_t dummy_buf[FF_INPUT_BUFFER_PADDING_SIZE];
124
125     if(!(s->flags & PARSER_FLAG_FETCHED_OFFSET)) {
126         s->next_frame_offset =
127         s->cur_offset        = pos;
128         s->flags |= PARSER_FLAG_FETCHED_OFFSET;
129     }
130
131     if (buf_size == 0) {
132         /* padding is always necessary even if EOF, so we add it here */
133         memset(dummy_buf, 0, sizeof(dummy_buf));
134         buf = dummy_buf;
135     } else if (s->cur_offset + buf_size !=
136                s->cur_frame_end[s->cur_frame_start_index]) { /* skip remainder packets */
137         /* add a new packet descriptor */
138             i = (s->cur_frame_start_index + 1) & (AV_PARSER_PTS_NB - 1);
139             s->cur_frame_start_index = i;
140             s->cur_frame_offset[i] = s->cur_offset;
141             s->cur_frame_end[i] = s->cur_offset + buf_size;
142             s->cur_frame_pts[i] = pts;
143             s->cur_frame_dts[i] = dts;
144             s->cur_frame_pos[i] = pos;
145     }
146
147     if (s->fetch_timestamp){
148         s->fetch_timestamp=0;
149         s->last_pts = s->pts;
150         s->last_dts = s->dts;
151         s->last_pos = s->pos;
152         ff_fetch_timestamp(s, 0, 0);
153     }
154
155     /* WARNING: the returned index can be negative */
156     index = s->parser->parser_parse(s, avctx, (const uint8_t **)poutbuf, poutbuf_size, buf, buf_size);
157     /* update the file pointer */
158     if (*poutbuf_size) {
159         /* fill the data for the current frame */
160         s->frame_offset = s->next_frame_offset;
161
162         /* offset of the next frame */
163         s->next_frame_offset = s->cur_offset + index;
164         s->fetch_timestamp=1;
165     }
166     if (index < 0)
167         index = 0;
168     s->cur_offset += index;
169     return index;
170 }
171
172 int av_parser_change(AVCodecParserContext *s,
173                      AVCodecContext *avctx,
174                      uint8_t **poutbuf, int *poutbuf_size,
175                      const uint8_t *buf, int buf_size, int keyframe){
176
177     if(s && s->parser->split){
178         if((avctx->flags & CODEC_FLAG_GLOBAL_HEADER) || (avctx->flags2 & CODEC_FLAG2_LOCAL_HEADER)){
179             int i= s->parser->split(avctx, buf, buf_size);
180             buf += i;
181             buf_size -= i;
182         }
183     }
184
185     /* cast to avoid warning about discarding qualifiers */
186     *poutbuf= (uint8_t *) buf;
187     *poutbuf_size= buf_size;
188     if(avctx->extradata){
189         if(  (keyframe && (avctx->flags2 & CODEC_FLAG2_LOCAL_HEADER))
190             /*||(s->pict_type != AV_PICTURE_TYPE_I && (s->flags & PARSER_FLAG_DUMP_EXTRADATA_AT_NOKEY))*/
191             /*||(? && (s->flags & PARSER_FLAG_DUMP_EXTRADATA_AT_BEGIN)*/){
192             int size= buf_size + avctx->extradata_size;
193             *poutbuf_size= size;
194             *poutbuf= av_malloc(size + FF_INPUT_BUFFER_PADDING_SIZE);
195
196             memcpy(*poutbuf, avctx->extradata, avctx->extradata_size);
197             memcpy((*poutbuf) + avctx->extradata_size, buf, buf_size + FF_INPUT_BUFFER_PADDING_SIZE);
198             return 1;
199         }
200     }
201
202     return 0;
203 }
204
205 void av_parser_close(AVCodecParserContext *s)
206 {
207     if(s){
208         if (s->parser->parser_close)
209             s->parser->parser_close(s);
210         av_free(s->priv_data);
211         av_free(s);
212     }
213 }
214
215 /*****************************************************/
216
217 int ff_combine_frame(ParseContext *pc, int next, const uint8_t **buf, int *buf_size)
218 {
219     if(pc->overread){
220         av_dlog(NULL, "overread %d, state:%X next:%d index:%d o_index:%d\n",
221                 pc->overread, pc->state, next, pc->index, pc->overread_index);
222         av_dlog(NULL, "%X %X %X %X\n", (*buf)[0], (*buf)[1], (*buf)[2], (*buf)[3]);
223     }
224
225     /* Copy overread bytes from last frame into buffer. */
226     for(; pc->overread>0; pc->overread--){
227         pc->buffer[pc->index++]= pc->buffer[pc->overread_index++];
228     }
229
230     /* flush remaining if EOF */
231     if(!*buf_size && next == END_NOT_FOUND){
232         next= 0;
233     }
234
235     pc->last_index= pc->index;
236
237     /* copy into buffer end return */
238     if(next == END_NOT_FOUND){
239         void* new_buffer = av_fast_realloc(pc->buffer, &pc->buffer_size, (*buf_size) + pc->index + FF_INPUT_BUFFER_PADDING_SIZE);
240
241         if(!new_buffer) {
242             pc->index = 0;
243             return AVERROR(ENOMEM);
244         }
245         pc->buffer = new_buffer;
246         memcpy(&pc->buffer[pc->index], *buf, *buf_size);
247         pc->index += *buf_size;
248         return -1;
249     }
250
251     *buf_size=
252     pc->overread_index= pc->index + next;
253
254     /* append to buffer */
255     if(pc->index){
256         void* new_buffer = av_fast_realloc(pc->buffer, &pc->buffer_size, next + pc->index + FF_INPUT_BUFFER_PADDING_SIZE);
257         if(!new_buffer) {
258             pc->overread_index =
259             pc->index = 0;
260             return AVERROR(ENOMEM);
261         }
262         pc->buffer = new_buffer;
263         if (next > -FF_INPUT_BUFFER_PADDING_SIZE)
264             memcpy(&pc->buffer[pc->index], *buf,
265                    next + FF_INPUT_BUFFER_PADDING_SIZE);
266         pc->index = 0;
267         *buf= pc->buffer;
268     }
269
270     /* store overread bytes */
271     for(;next < 0; next++){
272         pc->state = (pc->state<<8) | pc->buffer[pc->last_index + next];
273         pc->state64 = (pc->state64<<8) | pc->buffer[pc->last_index + next];
274         pc->overread++;
275     }
276
277     if(pc->overread){
278         av_dlog(NULL, "overread %d, state:%X next:%d index:%d o_index:%d\n",
279                 pc->overread, pc->state, next, pc->index, pc->overread_index);
280         av_dlog(NULL, "%X %X %X %X\n", (*buf)[0], (*buf)[1],(*buf)[2],(*buf)[3]);
281     }
282
283     return 0;
284 }
285
286 void ff_parse_close(AVCodecParserContext *s)
287 {
288     ParseContext *pc = s->priv_data;
289
290     av_freep(&pc->buffer);
291 }
292
293 /*************************/
294
295 int ff_mpeg4video_split(AVCodecContext *avctx,
296                            const uint8_t *buf, int buf_size)
297 {
298     int i;
299     uint32_t state= -1;
300
301     for(i=0; i<buf_size; i++){
302         state= (state<<8) | buf[i];
303         if(state == 0x1B3 || state == 0x1B6)
304             return i-3;
305     }
306     return 0;
307 }