avformat/assdec: make sure "Comments:" events end up in the header
[ffmpeg.git] / libavformat / assdec.c
1 /*
2  * SSA/ASS demuxer
3  * Copyright (c) 2008 Michael Niedermayer
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include <stdint.h>
23
24 #include "avformat.h"
25 #include "internal.h"
26 #include "subtitles.h"
27 #include "libavcodec/internal.h"
28 #include "libavutil/bprint.h"
29
30 typedef struct ASSContext {
31     FFDemuxSubtitlesQueue q;
32     unsigned readorder;
33 } ASSContext;
34
35 static int ass_probe(AVProbeData *p)
36 {
37     char buf[13];
38     FFTextReader tr;
39     ff_text_init_buf(&tr, p->buf, p->buf_size);
40
41     ff_text_read(&tr, buf, sizeof(buf));
42
43     if (!memcmp(buf, "[Script Info]", 13))
44         return AVPROBE_SCORE_MAX;
45
46     return 0;
47 }
48
49 static int ass_read_close(AVFormatContext *s)
50 {
51     ASSContext *ass = s->priv_data;
52     ff_subtitles_queue_clean(&ass->q);
53     return 0;
54 }
55
56 static int read_dialogue(ASSContext *ass, AVBPrint *dst, const uint8_t *p,
57                          int64_t *start, int *duration)
58 {
59     int pos;
60     int64_t end;
61     int hh1, mm1, ss1, ms1;
62     int hh2, mm2, ss2, ms2;
63
64     if (sscanf(p, "Dialogue: %*[^,],%d:%d:%d%*c%d,%d:%d:%d%*c%d,%n",
65                &hh1, &mm1, &ss1, &ms1,
66                &hh2, &mm2, &ss2, &ms2, &pos) >= 8) {
67
68         /* This is not part of the sscanf itself in order to handle an actual
69          * number (which would be the Layer) or the form "Marked=N" (which is
70          * the old SSA field, now replaced by Layer, and will be lead to Layer
71          * being 0 here). */
72         const int layer = atoi(p + 10);
73
74         end    = (hh2*3600LL + mm2*60LL + ss2) * 100LL + ms2;
75         *start = (hh1*3600LL + mm1*60LL + ss1) * 100LL + ms1;
76         *duration = end - *start;
77
78         av_bprint_clear(dst);
79         av_bprintf(dst, "%u,%d,%s", ass->readorder++, layer, p + pos);
80
81         /* right strip the buffer */
82         while (dst->len > 0 &&
83                dst->str[dst->len - 1] == '\r' ||
84                dst->str[dst->len - 1] == '\n')
85             dst->str[--dst->len] = 0;
86         return 0;
87     }
88     return -1;
89 }
90
91 static int64_t get_line(AVBPrint *buf, FFTextReader *tr)
92 {
93     int64_t pos = ff_text_pos(tr);
94
95     av_bprint_clear(buf);
96     for (;;) {
97         char c = ff_text_r8(tr);
98         if (!c)
99             break;
100         av_bprint_chars(buf, c, 1);
101         if (c == '\n')
102             break;
103     }
104     return pos;
105 }
106
107 static int ass_read_header(AVFormatContext *s)
108 {
109     ASSContext *ass = s->priv_data;
110     AVBPrint header, line, rline;
111     int res = 0;
112     AVStream *st;
113     FFTextReader tr;
114     ff_text_init_avio(&tr, s->pb);
115
116     st = avformat_new_stream(s, NULL);
117     if (!st)
118         return AVERROR(ENOMEM);
119     avpriv_set_pts_info(st, 64, 1, 100);
120     st->codec->codec_type = AVMEDIA_TYPE_SUBTITLE;
121     st->codec->codec_id   = AV_CODEC_ID_ASS;
122
123     av_bprint_init(&header, 0, AV_BPRINT_SIZE_UNLIMITED);
124     av_bprint_init(&line,   0, AV_BPRINT_SIZE_UNLIMITED);
125     av_bprint_init(&rline,  0, AV_BPRINT_SIZE_UNLIMITED);
126
127     // TODO reindent
128     for (;;) {
129         int64_t pos = get_line(&line, &tr);
130             int64_t ts_start = AV_NOPTS_VALUE;
131             int duration = -1;
132             AVPacket *sub;
133
134         if (!line.str[0]) // EOF
135             break;
136
137             if (read_dialogue(ass, &rline, line.str, &ts_start, &duration) < 0) {
138                 av_bprintf(&header, "%s", line.str);
139                 continue;
140             }
141             sub = ff_subtitles_queue_insert(&ass->q, rline.str, rline.len, 0);
142             if (!sub) {
143                 res = AVERROR(ENOMEM);
144                 goto end;
145             }
146             sub->pos = pos;
147             sub->pts = ts_start;
148             sub->duration = duration;
149     }
150
151     av_bprint_finalize(&line, NULL);
152     av_bprint_finalize(&rline, NULL);
153
154     res = avpriv_bprint_to_extradata(st->codec, &header);
155     if (res < 0)
156         goto end;
157
158     ff_subtitles_queue_finalize(&ass->q);
159
160 end:
161     return res;
162 }
163
164 static int ass_read_packet(AVFormatContext *s, AVPacket *pkt)
165 {
166     ASSContext *ass = s->priv_data;
167     return ff_subtitles_queue_read_packet(&ass->q, pkt);
168 }
169
170 static int ass_read_seek(AVFormatContext *s, int stream_index,
171                          int64_t min_ts, int64_t ts, int64_t max_ts, int flags)
172 {
173     ASSContext *ass = s->priv_data;
174     return ff_subtitles_queue_seek(&ass->q, s, stream_index,
175                                    min_ts, ts, max_ts, flags);
176 }
177
178 AVInputFormat ff_ass_demuxer = {
179     .name           = "ass",
180     .long_name      = NULL_IF_CONFIG_SMALL("SSA (SubStation Alpha) subtitle"),
181     .priv_data_size = sizeof(ASSContext),
182     .read_probe     = ass_probe,
183     .read_header    = ass_read_header,
184     .read_packet    = ass_read_packet,
185     .read_close     = ass_read_close,
186     .read_seek2     = ass_read_seek,
187 };