lavf: move srtdec:read_chunk() to subtitles utils.
[ffmpeg.git] / libavformat / subtitles.c
1 /*
2  * Copyright (c) 2012 Clément Bœsch
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 #include "avformat.h"
22 #include "subtitles.h"
23 #include "libavutil/avstring.h"
24
25 AVPacket *ff_subtitles_queue_insert(FFDemuxSubtitlesQueue *q,
26                                     const uint8_t *event, int len, int merge)
27 {
28     AVPacket *subs, *sub;
29
30     if (merge && q->nb_subs > 0) {
31         /* merge with previous event */
32
33         int old_len;
34         sub = &q->subs[q->nb_subs - 1];
35         old_len = sub->size;
36         if (av_grow_packet(sub, len) < 0)
37             return NULL;
38         memcpy(sub->data + old_len, event, len);
39     } else {
40         /* new event */
41
42         if (q->nb_subs >= INT_MAX/sizeof(*q->subs) - 1)
43             return NULL;
44         subs = av_fast_realloc(q->subs, &q->allocated_size,
45                                (q->nb_subs + 1) * sizeof(*q->subs));
46         if (!subs)
47             return NULL;
48         q->subs = subs;
49         sub = &subs[q->nb_subs++];
50         if (av_new_packet(sub, len) < 0)
51             return NULL;
52         sub->destruct = NULL;
53         sub->flags |= AV_PKT_FLAG_KEY;
54         sub->pts = sub->dts = 0;
55         memcpy(sub->data, event, len);
56     }
57     return sub;
58 }
59
60 static int cmp_pkt_sub(const void *a, const void *b)
61 {
62     const AVPacket *s1 = a;
63     const AVPacket *s2 = b;
64     if (s1->pts == s2->pts) {
65         if (s1->pos == s2->pos)
66             return 0;
67         return s1->pos > s2->pos ? 1 : -1;
68     }
69     return s1->pts > s2->pts ? 1 : -1;
70 }
71
72 void ff_subtitles_queue_finalize(FFDemuxSubtitlesQueue *q)
73 {
74     int i;
75
76     qsort(q->subs, q->nb_subs, sizeof(*q->subs), cmp_pkt_sub);
77     for (i = 0; i < q->nb_subs; i++)
78         if (q->subs[i].duration == -1 && i < q->nb_subs - 1)
79             q->subs[i].duration = q->subs[i + 1].pts - q->subs[i].pts;
80 }
81
82 int ff_subtitles_queue_read_packet(FFDemuxSubtitlesQueue *q, AVPacket *pkt)
83 {
84     AVPacket *sub = q->subs + q->current_sub_idx;
85
86     if (q->current_sub_idx == q->nb_subs)
87         return AVERROR_EOF;
88     *pkt = *sub;
89     pkt->dts = pkt->pts;
90     q->current_sub_idx++;
91     return 0;
92 }
93
94 int ff_subtitles_queue_seek(FFDemuxSubtitlesQueue *q, AVFormatContext *s, int stream_index,
95                             int64_t min_ts, int64_t ts, int64_t max_ts, int flags)
96 {
97     if (flags & AVSEEK_FLAG_BYTE) {
98         return AVERROR(ENOSYS);
99     } else if (flags & AVSEEK_FLAG_FRAME) {
100         if (ts < 0 || ts >= q->nb_subs)
101             return AVERROR(ERANGE);
102         q->current_sub_idx = ts;
103     } else {
104         int i, idx = -1;
105         int64_t min_ts_diff = INT64_MAX;
106         int64_t ts_selected;
107         if (stream_index == -1) {
108             AVRational time_base = s->streams[0]->time_base;
109             ts = av_rescale_q(ts, AV_TIME_BASE_Q, time_base);
110             min_ts = av_rescale_rnd(min_ts, time_base.den,
111                                     time_base.num * (int64_t)AV_TIME_BASE,
112                                     AV_ROUND_UP);
113             max_ts = av_rescale_rnd(max_ts, time_base.den,
114                                     time_base.num * (int64_t)AV_TIME_BASE,
115                                     AV_ROUND_DOWN);
116         }
117         /* TODO: q->subs[] is sorted by pts so we could do a binary search */
118         for (i = 0; i < q->nb_subs; i++) {
119             int64_t pts = q->subs[i].pts;
120             uint64_t ts_diff = FFABS(pts - ts);
121             if (pts >= min_ts && pts <= max_ts && ts_diff < min_ts_diff) {
122                 min_ts_diff = ts_diff;
123                 idx = i;
124             }
125         }
126         if (idx < 0)
127             return AVERROR(ERANGE);
128         /* look back in the latest subtitles for overlapping subtitles */
129         ts_selected = q->subs[idx].pts;
130         for (i = idx - 1; i >= 0; i--) {
131             if (q->subs[i].duration <= 0)
132                 continue;
133             if (q->subs[i].pts > ts_selected - q->subs[i].duration)
134                 idx = i;
135             else
136                 break;
137         }
138         q->current_sub_idx = idx;
139     }
140     return 0;
141 }
142
143 void ff_subtitles_queue_clean(FFDemuxSubtitlesQueue *q)
144 {
145     int i;
146
147     for (i = 0; i < q->nb_subs; i++)
148         av_destruct_packet(&q->subs[i]);
149     av_freep(&q->subs);
150     q->nb_subs = q->allocated_size = q->current_sub_idx = 0;
151 }
152
153 int ff_smil_extract_next_chunk(AVIOContext *pb, AVBPrint *buf, char *c)
154 {
155     int i = 0;
156     char end_chr;
157
158     if (!*c) // cached char?
159         *c = avio_r8(pb);
160     if (!*c)
161         return 0;
162
163     end_chr = *c == '<' ? '>' : '<';
164     do {
165         av_bprint_chars(buf, *c, 1);
166         *c = avio_r8(pb);
167         i++;
168     } while (*c != end_chr && *c);
169     if (end_chr == '>') {
170         av_bprint_chars(buf, '>', 1);
171         *c = 0;
172     }
173     return i;
174 }
175
176 const char *ff_smil_get_attr_ptr(const char *s, const char *attr)
177 {
178     int in_quotes = 0;
179     const int len = strlen(attr);
180
181     while (*s) {
182         while (*s) {
183             if (!in_quotes && isspace(*s))
184                 break;
185             in_quotes ^= *s == '"'; // XXX: support escaping?
186             s++;
187         }
188         while (isspace(*s))
189             s++;
190         if (!av_strncasecmp(s, attr, len) && s[len] == '=')
191             return s + len + 1 + (s[len + 1] == '"');
192     }
193     return NULL;
194 }
195
196 static inline int is_eol(char c)
197 {
198     return c == '\r' || c == '\n';
199 }
200
201 void ff_subtitles_read_chunk(AVIOContext *pb, AVBPrint *buf)
202 {
203     char eol_buf[5];
204     int n = 0, i = 0, nb_eol = 0;
205
206     av_bprint_clear(buf);
207
208     for (;;) {
209         char c = avio_r8(pb);
210
211         if (!c)
212             break;
213
214         /* ignore all initial line breaks */
215         if (n == 0 && is_eol(c))
216             continue;
217
218         /* line break buffering: we don't want to add the trailing \r\n */
219         if (is_eol(c)) {
220             nb_eol += c == '\n';
221             if (nb_eol == 2)
222                 break;
223             eol_buf[i++] = c;
224             if (i == sizeof(eol_buf) - 1)
225                 break;
226             continue;
227         }
228
229         /* only one line break followed by data: we flush the line breaks
230          * buffer */
231         if (i) {
232             eol_buf[i] = 0;
233             av_bprintf(buf, "%s", eol_buf);
234             i = nb_eol = 0;
235         }
236
237         av_bprint_chars(buf, c, 1);
238         n++;
239     }
240 }