Mercurial > mplayer.hg
annotate libass/ass.c @ 23816:f1a98937d141
!00l, last commit mixed up "normal" ggi and ggiwmh tests.
author | reimar |
---|---|
date | Fri, 20 Jul 2007 21:29:44 +0000 |
parents | d655edc9d107 |
children | e36efda34616 |
rev | line source |
---|---|
20008
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
1 // -*- c-basic-offset: 8; indent-tabs-mode: t -*- |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
2 // vim:ts=8:sw=8:noet:ai: |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
3 /* |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
4 Copyright (C) 2006 Evgeniy Stepanov <eugeni.stepanov@gmail.com> |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
5 |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
6 This program is free software; you can redistribute it and/or modify |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
8 the Free Software Foundation; either version 2 of the License, or |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
9 (at your option) any later version. |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
10 |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
11 This program is distributed in the hope that it will be useful, |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
14 GNU General Public License for more details. |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
15 |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
17 along with this program; if not, write to the Free Software |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
18 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
19 */ |
fa122b7c71c6
Add copyright notice and vim/emacs comments to libass and vf_ass.c.
eugeni
parents:
19905
diff
changeset
|
20 |
18937 | 21 #include "config.h" |
22 | |
23 #include <stdio.h> | |
24 #include <stdlib.h> | |
25 #include <string.h> | |
26 #include <assert.h> | |
27 #include <errno.h> | |
28 #include <sys/types.h> | |
29 #include <sys/stat.h> | |
30 #include <unistd.h> | |
19374 | 31 #include <inttypes.h> |
18937 | 32 |
33 #ifdef USE_ICONV | |
34 #include <iconv.h> | |
35 #endif | |
36 | |
37 #include "ass.h" | |
38 #include "ass_utils.h" | |
20477 | 39 #include "ass_library.h" |
21026
d138463e820b
Collect all includes of mplayer headers in libass in a single file (mputils.h).
eugeni
parents:
20698
diff
changeset
|
40 #include "mputils.h" |
18937 | 41 |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
42 typedef enum {PST_UNKNOWN = 0, PST_INFO, PST_STYLES, PST_EVENTS, PST_FONTS} parser_state_t; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
43 |
19492 | 44 struct parser_priv_s { |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
45 parser_state_t state; |
19492 | 46 char* fontname; |
47 char* fontdata; | |
48 int fontdata_size; | |
49 int fontdata_used; | |
50 }; | |
51 | |
18937 | 52 #define ASS_STYLES_ALLOC 20 |
53 #define ASS_EVENTS_ALLOC 200 | |
54 | |
55 void ass_free_track(ass_track_t* track) { | |
56 int i; | |
57 | |
19492 | 58 if (track->parser_priv) { |
59 if (track->parser_priv->fontname) | |
60 free(track->parser_priv->fontname); | |
61 if (track->parser_priv->fontdata) | |
62 free(track->parser_priv->fontdata); | |
63 free(track->parser_priv); | |
64 } | |
18937 | 65 if (track->style_format) |
66 free(track->style_format); | |
67 if (track->event_format) | |
68 free(track->event_format); | |
69 if (track->styles) { | |
19474
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
70 for (i = 0; i < track->n_styles; ++i) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
71 ass_free_style(track, i); |
18937 | 72 free(track->styles); |
73 } | |
74 if (track->events) { | |
19474
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
75 for (i = 0; i < track->n_events; ++i) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
76 ass_free_event(track, i); |
18937 | 77 free(track->events); |
78 } | |
79 } | |
80 | |
81 /// \brief Allocate a new style struct | |
82 /// \param track track | |
83 /// \return style id | |
84 int ass_alloc_style(ass_track_t* track) { | |
85 int sid; | |
86 | |
87 assert(track->n_styles <= track->max_styles); | |
88 | |
89 if (track->n_styles == track->max_styles) { | |
90 track->max_styles += ASS_STYLES_ALLOC; | |
91 track->styles = (ass_style_t*)realloc(track->styles, sizeof(ass_style_t)*track->max_styles); | |
92 } | |
93 | |
94 sid = track->n_styles++; | |
95 memset(track->styles + sid, 0, sizeof(ass_style_t)); | |
96 return sid; | |
97 } | |
98 | |
99 /// \brief Allocate a new event struct | |
100 /// \param track track | |
101 /// \return event id | |
102 int ass_alloc_event(ass_track_t* track) { | |
103 int eid; | |
104 | |
105 assert(track->n_events <= track->max_events); | |
106 | |
107 if (track->n_events == track->max_events) { | |
108 track->max_events += ASS_EVENTS_ALLOC; | |
109 track->events = (ass_event_t*)realloc(track->events, sizeof(ass_event_t)*track->max_events); | |
110 } | |
111 | |
112 eid = track->n_events++; | |
113 memset(track->events + eid, 0, sizeof(ass_event_t)); | |
114 return eid; | |
115 } | |
116 | |
19474
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
117 void ass_free_event(ass_track_t* track, int eid) { |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
118 ass_event_t* event = track->events + eid; |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
119 if (event->Name) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
120 free(event->Name); |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
121 if (event->Effect) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
122 free(event->Effect); |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
123 if (event->Text) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
124 free(event->Text); |
19638
a3473d990fed
Better collision detection algorithm. The idea is to keep a subtitle in place
eugeni
parents:
19635
diff
changeset
|
125 if (event->render_priv) |
a3473d990fed
Better collision detection algorithm. The idea is to keep a subtitle in place
eugeni
parents:
19635
diff
changeset
|
126 free(event->render_priv); |
19474
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
127 } |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
128 |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
129 void ass_free_style(ass_track_t* track, int sid) { |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
130 ass_style_t* style = track->styles + sid; |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
131 if (style->Name) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
132 free(style->Name); |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
133 if (style->FontName) |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
134 free(style->FontName); |
18937 | 135 } |
136 | |
137 // ============================================================================================== | |
138 | |
139 static void skip_spaces(char** str) { | |
140 char* p = *str; | |
141 while ((*p==' ') || (*p=='\t')) | |
142 ++p; | |
143 *str = p; | |
144 } | |
145 | |
146 static void rskip_spaces(char** str, char* limit) { | |
147 char* p = *str; | |
148 while ((p >= limit) && ((*p==' ') || (*p=='\t'))) | |
149 --p; | |
150 *str = p; | |
151 } | |
152 | |
153 /** | |
154 * \brief find style by name | |
155 * \param track track | |
156 * \param name style name | |
157 * \return index in track->styles | |
158 * Returnes 0 if no styles found => expects at least 1 style. | |
159 * Parsing code always adds "Default" style in the end. | |
160 */ | |
161 static int lookup_style(ass_track_t* track, char* name) { | |
162 int i; | |
19567 | 163 if (*name == '*') ++name; // FIXME: what does '*' really mean ? |
18937 | 164 for (i=0; i<track->n_styles; ++i) { |
165 // FIXME: mb strcasecmp ? | |
166 if (strcmp(track->styles[i].Name, name) == 0) | |
167 return i; | |
168 } | |
169 i = track->default_style; | |
21066 | 170 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_NoStyleNamedXFoundUsingY, track, name, track->styles[i].Name); |
18937 | 171 return i; // use the first style |
172 } | |
173 | |
174 static uint32_t string2color(char* p) { | |
175 uint32_t tmp; | |
176 (void)strtocolor(&p, &tmp); | |
177 return tmp; | |
178 } | |
179 | |
180 static long long string2timecode(char* p) { | |
181 unsigned h, m, s, ms; | |
182 long long tm; | |
183 int res = sscanf(p, "%1d:%2d:%2d.%2d", &h, &m, &s, &ms); | |
184 if (res < 4) { | |
21066 | 185 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_BadTimestamp); |
18937 | 186 return 0; |
187 } | |
188 tm = ((h * 60 + m) * 60 + s) * 1000 + ms * 10; | |
189 return tm; | |
190 } | |
191 | |
192 /** | |
193 * \brief converts numpad-style align to align. | |
194 */ | |
195 static int numpad2align(int val) { | |
196 int res, v; | |
197 v = (val - 1) / 3; // 0, 1 or 2 for vertical alignment | |
198 if (v != 0) v = 3 - v; | |
199 res = ((val - 1) % 3) + 1; // horizontal alignment | |
200 res += v*4; | |
201 return res; | |
202 } | |
203 | |
204 #define NEXT(str,token) \ | |
205 token = next_token(&str); \ | |
206 if (!token) break; | |
207 | |
208 #define ANYVAL(name,func) \ | |
209 } else if (strcasecmp(tname, #name) == 0) { \ | |
210 target->name = func(token); \ | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
211 mp_msg(MSGT_ASS, MSGL_DBG2, "%s = %s\n", #name, token); |
19495 | 212 |
213 #define STRVAL(name) \ | |
214 } else if (strcasecmp(tname, #name) == 0) { \ | |
215 if (target->name != NULL) free(target->name); \ | |
216 target->name = strdup(token); \ | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
217 mp_msg(MSGT_ASS, MSGL_DBG2, "%s = %s\n", #name, token); |
19495 | 218 |
18937 | 219 #define COLORVAL(name) ANYVAL(name,string2color) |
220 #define INTVAL(name) ANYVAL(name,atoi) | |
221 #define FPVAL(name) ANYVAL(name,atof) | |
222 #define TIMEVAL(name) ANYVAL(name,string2timecode) | |
223 #define STYLEVAL(name) \ | |
224 } else if (strcasecmp(tname, #name) == 0) { \ | |
225 target->name = lookup_style(track, token); \ | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
226 mp_msg(MSGT_ASS, MSGL_DBG2, "%s = %s\n", #name, token); |
18937 | 227 |
228 #define ALIAS(alias,name) \ | |
229 if (strcasecmp(tname, #alias) == 0) {tname = #name;} | |
230 | |
231 static char* next_token(char** str) { | |
232 char* p = *str; | |
233 char* start; | |
234 skip_spaces(&p); | |
235 if (*p == '\0') { | |
236 *str = p; | |
237 return 0; | |
238 } | |
239 start = p; // start of the token | |
240 for (; (*p != '\0') && (*p != ','); ++p) {} | |
241 if (*p == '\0') { | |
242 *str = p; // eos found, str will point to '\0' at exit | |
243 } else { | |
244 *p = '\0'; | |
245 *str = p + 1; // ',' found, str will point to the next char (beginning of the next token) | |
246 } | |
247 --p; // end of current token | |
248 rskip_spaces(&p, start); | |
249 if (p < start) | |
250 p = start; // empty token | |
251 else | |
252 ++p; // the first space character, or '\0' | |
253 *p = '\0'; | |
254 return start; | |
255 } | |
256 /** | |
257 * \brief Parse the tail of Dialogue line | |
258 * \param track track | |
259 * \param event parsed data goes here | |
260 * \param str string to parse, zero-terminated | |
261 * \param n_ignored number of format options to skip at the beginning | |
262 */ | |
263 static int process_event_tail(ass_track_t* track, ass_event_t* event, char* str, int n_ignored) | |
264 { | |
265 char* token; | |
266 char* tname; | |
267 char* p = str; | |
268 int i; | |
269 ass_event_t* target = event; | |
270 | |
271 char* format = strdup(track->event_format); | |
272 char* q = format; // format scanning pointer | |
273 | |
23539
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
274 if (track->n_styles == 0) { |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
275 // add "Default" style to the end |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
276 // will be used if track does not contain a default style (or even does not contain styles at all) |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
277 int sid = ass_alloc_style(track); |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
278 track->styles[sid].Name = strdup("Default"); |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
279 track->styles[sid].FontName = strdup("Arial"); |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
280 } |
790efaddf175
Make sure there is at least one style in ass_track when parsing events.
eugeni
parents:
23424
diff
changeset
|
281 |
18937 | 282 for (i = 0; i < n_ignored; ++i) { |
283 NEXT(q, tname); | |
284 } | |
285 | |
286 while (1) { | |
287 NEXT(q, tname); | |
288 if (strcasecmp(tname, "Text") == 0) { | |
289 char* last; | |
290 event->Text = strdup(p); | |
19612 | 291 if (*event->Text != 0) { |
292 last = event->Text + strlen(event->Text) - 1; | |
293 if (last >= event->Text && *last == '\r') | |
294 *last = 0; | |
295 } | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
296 mp_msg(MSGT_ASS, MSGL_DBG2, "Text = %s\n", event->Text); |
18937 | 297 event->Duration -= event->Start; |
298 free(format); | |
299 return 0; // "Text" is always the last | |
300 } | |
301 NEXT(p, token); | |
302 | |
303 ALIAS(End,Duration) // temporarily store end timecode in event->Duration | |
304 if (0) { // cool ;) | |
19635 | 305 INTVAL(Layer) |
18937 | 306 STYLEVAL(Style) |
307 STRVAL(Name) | |
308 STRVAL(Effect) | |
309 INTVAL(MarginL) | |
310 INTVAL(MarginR) | |
311 INTVAL(MarginV) | |
312 TIMEVAL(Start) | |
313 TIMEVAL(Duration) | |
314 } | |
315 } | |
316 free(format); | |
317 return 1; | |
318 } | |
319 | |
320 /** | |
19495 | 321 * \brief Parse command line style overrides (--ass-force-style option) |
322 * \param track track to apply overrides to | |
323 * The format for overrides is [StyleName.]Field=Value | |
324 */ | |
19584
586e7d259d05
Apply -ass-force-style also to tracks generated from subdata.
eugeni
parents:
19567
diff
changeset
|
325 void process_force_style(ass_track_t* track) { |
19495 | 326 char **fs, *eq, *dt, *style, *tname, *token; |
327 ass_style_t* target; | |
328 int sid; | |
20477 | 329 char** list = track->library->style_overrides; |
19495 | 330 |
20477 | 331 if (!list) return; |
19495 | 332 |
20477 | 333 for (fs = list; *fs; ++fs) { |
23540
d655edc9d107
When parsing ass-force-style arguments, search for '=' and '.' characters with
eugeni
parents:
23539
diff
changeset
|
334 eq = strrchr(*fs, '='); |
19495 | 335 if (!eq) |
336 continue; | |
337 *eq = '\0'; | |
338 token = eq + 1; | |
339 | |
23540
d655edc9d107
When parsing ass-force-style arguments, search for '=' and '.' characters with
eugeni
parents:
23539
diff
changeset
|
340 dt = strrchr(*fs, '.'); |
19495 | 341 if (dt) { |
342 *dt = '\0'; | |
343 style = *fs; | |
344 tname = dt + 1; | |
345 } else { | |
346 style = NULL; | |
347 tname = *fs; | |
348 } | |
349 for (sid = 0; sid < track->n_styles; ++sid) { | |
350 if (style == NULL || strcasecmp(track->styles[sid].Name, style) == 0) { | |
351 target = track->styles + sid; | |
352 if (0) { | |
353 STRVAL(FontName) | |
354 COLORVAL(PrimaryColour) | |
355 COLORVAL(SecondaryColour) | |
356 COLORVAL(OutlineColour) | |
357 COLORVAL(BackColour) | |
23300 | 358 FPVAL(FontSize) |
19495 | 359 INTVAL(Bold) |
360 INTVAL(Italic) | |
361 INTVAL(Underline) | |
362 INTVAL(StrikeOut) | |
22259 | 363 FPVAL(Spacing) |
19495 | 364 INTVAL(Angle) |
365 INTVAL(BorderStyle) | |
366 INTVAL(Alignment) | |
367 INTVAL(MarginL) | |
368 INTVAL(MarginR) | |
369 INTVAL(MarginV) | |
370 INTVAL(Encoding) | |
371 FPVAL(ScaleX) | |
372 FPVAL(ScaleY) | |
373 FPVAL(Outline) | |
374 FPVAL(Shadow) | |
375 } | |
376 } | |
377 } | |
378 *eq = '='; | |
379 if (dt) *dt = '.'; | |
380 } | |
381 } | |
382 | |
383 /** | |
18937 | 384 * \brief Parse the Style line |
385 * \param track track | |
386 * \param str string to parse, zero-terminated | |
387 * Allocates a new style struct. | |
388 */ | |
389 static int process_style(ass_track_t* track, char *str) | |
390 { | |
391 | |
392 char* token; | |
393 char* tname; | |
394 char* p = str; | |
395 char* format; | |
396 char* q; // format scanning pointer | |
397 int sid; | |
398 ass_style_t* style; | |
399 ass_style_t* target; | |
400 | |
401 if (!track->style_format) { | |
402 // no style format header | |
403 // probably an ancient script version | |
404 if (track->track_type == TRACK_TYPE_SSA) | |
405 track->style_format = strdup("Name, Fontname, Fontsize, PrimaryColour, SecondaryColour," | |
406 "TertiaryColour, BackColour, Bold, Italic, BorderStyle, Outline," | |
407 "Shadow, Alignment, MarginL, MarginR, MarginV, AlphaLevel, Encoding"); | |
408 else | |
409 track->style_format = strdup("Name, Fontname, Fontsize, PrimaryColour, SecondaryColour," | |
410 "OutlineColour, BackColour, Bold, Italic, Underline, StrikeOut," | |
411 "ScaleX, ScaleY, Spacing, Angle, BorderStyle, Outline, Shadow," | |
412 "Alignment, MarginL, MarginR, MarginV, Encoding"); | |
413 } | |
414 | |
415 q = format = strdup(track->style_format); | |
416 | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
417 mp_msg(MSGT_ASS, MSGL_V, "[%p] Style: %s\n", track, str); |
18937 | 418 |
419 sid = ass_alloc_style(track); | |
420 | |
421 style = track->styles + sid; | |
422 target = style; | |
423 // fill style with some default values | |
424 style->ScaleX = 100.; | |
425 style->ScaleY = 100.; | |
426 | |
427 while (1) { | |
428 NEXT(q, tname); | |
429 NEXT(p, token); | |
430 | |
431 // ALIAS(TertiaryColour,OutlineColour) // ignore TertiaryColour; it appears only in SSA, and is overridden by BackColour | |
432 | |
433 if (0) { // cool ;) | |
434 STRVAL(Name) | |
435 if ((strcmp(target->Name, "Default")==0) || (strcmp(target->Name, "*Default")==0)) | |
436 track->default_style = sid; | |
437 STRVAL(FontName) | |
438 COLORVAL(PrimaryColour) | |
439 COLORVAL(SecondaryColour) | |
440 COLORVAL(OutlineColour) // TertiaryColor | |
441 COLORVAL(BackColour) | |
442 // SSA uses BackColour for both outline and shadow | |
443 // this will destroy SSA's TertiaryColour, but i'm not going to use it anyway | |
444 if (track->track_type == TRACK_TYPE_SSA) | |
445 target->OutlineColour = target->BackColour; | |
23300 | 446 FPVAL(FontSize) |
18937 | 447 INTVAL(Bold) |
448 INTVAL(Italic) | |
449 INTVAL(Underline) | |
450 INTVAL(StrikeOut) | |
22259 | 451 FPVAL(Spacing) |
18937 | 452 INTVAL(Angle) |
453 INTVAL(BorderStyle) | |
454 INTVAL(Alignment) | |
455 if (track->track_type == TRACK_TYPE_ASS) | |
456 target->Alignment = numpad2align(target->Alignment); | |
457 INTVAL(MarginL) | |
458 INTVAL(MarginR) | |
459 INTVAL(MarginV) | |
460 INTVAL(Encoding) | |
461 FPVAL(ScaleX) | |
462 FPVAL(ScaleY) | |
463 FPVAL(Outline) | |
464 FPVAL(Shadow) | |
465 } | |
466 } | |
467 style->ScaleX /= 100.; | |
468 style->ScaleY /= 100.; | |
22263 | 469 style->Bold = !!style->Bold; |
470 style->Italic = !!style->Italic; | |
471 style->Underline = !!style->Underline; | |
18937 | 472 if (!style->Name) |
473 style->Name = strdup("Default"); | |
474 if (!style->FontName) | |
475 style->FontName = strdup("Arial"); | |
476 free(format); | |
477 return 0; | |
478 | |
479 } | |
480 | |
19492 | 481 static int process_styles_line(ass_track_t* track, char *str) |
482 { | |
483 if (!strncmp(str,"Format:", 7)) { | |
484 char* p = str + 7; | |
485 skip_spaces(&p); | |
486 track->style_format = strdup(p); | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
487 mp_msg(MSGT_ASS, MSGL_DBG2, "Style format: %s\n", track->style_format); |
19492 | 488 } else if (!strncmp(str,"Style:", 6)) { |
489 char* p = str + 6; | |
490 skip_spaces(&p); | |
491 process_style(track, p); | |
492 } | |
493 return 0; | |
494 } | |
495 | |
496 static int process_info_line(ass_track_t* track, char *str) | |
497 { | |
498 if (!strncmp(str, "PlayResX:", 9)) { | |
499 track->PlayResX = atoi(str + 9); | |
500 } else if (!strncmp(str,"PlayResY:", 9)) { | |
501 track->PlayResY = atoi(str + 9); | |
502 } else if (!strncmp(str,"Timer:", 6)) { | |
503 track->Timer = atof(str + 6); | |
504 } else if (!strncmp(str,"WrapStyle:", 10)) { | |
505 track->WrapStyle = atoi(str + 10); | |
506 } | |
507 return 0; | |
508 } | |
509 | |
510 static int process_events_line(ass_track_t* track, char *str) | |
511 { | |
512 if (!strncmp(str, "Format:", 7)) { | |
513 char* p = str + 7; | |
514 skip_spaces(&p); | |
515 track->event_format = strdup(p); | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
516 mp_msg(MSGT_ASS, MSGL_DBG2, "Event format: %s\n", track->event_format); |
19492 | 517 } else if (!strncmp(str, "Dialogue:", 9)) { |
518 // This should never be reached for embedded subtitles. | |
519 // They have slightly different format and are parsed in ass_process_chunk, | |
520 // called directly from demuxer | |
521 int eid; | |
522 ass_event_t* event; | |
523 | |
524 str += 9; | |
525 skip_spaces(&str); | |
526 | |
527 eid = ass_alloc_event(track); | |
528 event = track->events + eid; | |
529 | |
530 process_event_tail(track, event, str, 0); | |
531 } else { | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
532 mp_msg(MSGT_ASS, MSGL_V, "Not understood: %s \n", str); |
19492 | 533 } |
534 return 0; | |
535 } | |
536 | |
537 // Copied from mkvtoolnix | |
538 static unsigned char* decode_chars(unsigned char c1, unsigned char c2, | |
539 unsigned char c3, unsigned char c4, unsigned char* dst, int cnt) | |
540 { | |
541 uint32_t value; | |
542 unsigned char bytes[3]; | |
543 int i; | |
544 | |
545 value = ((c1 - 33) << 18) + ((c2 - 33) << 12) + ((c3 - 33) << 6) + (c4 - 33); | |
546 bytes[2] = value & 0xff; | |
547 bytes[1] = (value & 0xff00) >> 8; | |
548 bytes[0] = (value & 0xff0000) >> 16; | |
549 | |
550 for (i = 0; i < cnt; ++i) | |
551 *dst++ = bytes[i]; | |
552 return dst; | |
553 } | |
554 | |
555 static int decode_font(ass_track_t* track) | |
556 { | |
557 unsigned char* p; | |
558 unsigned char* q; | |
559 int i; | |
560 int size; // original size | |
561 int dsize; // decoded size | |
562 unsigned char* buf = 0; | |
563 | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
564 mp_msg(MSGT_ASS, MSGL_V, "font: %d bytes encoded data \n", track->parser_priv->fontdata_used); |
19492 | 565 size = track->parser_priv->fontdata_used; |
566 if (size % 4 == 1) { | |
21066 | 567 mp_msg(MSGT_ASS, MSGL_ERR, MSGTR_LIBASS_BadEncodedDataSize); |
19492 | 568 goto error_decode_font; |
569 } | |
570 buf = malloc(size / 4 * 3 + 2); | |
571 q = buf; | |
572 for (i = 0, p = (unsigned char*)track->parser_priv->fontdata; i < size / 4; i++, p+=4) { | |
573 q = decode_chars(p[0], p[1], p[2], p[3], q, 3); | |
574 } | |
575 if (size % 4 == 2) { | |
576 q = decode_chars(p[0], p[1], 0, 0, q, 1); | |
577 } else if (size % 4 == 3) { | |
578 q = decode_chars(p[0], p[1], p[2], 0, q, 2); | |
579 } | |
580 dsize = q - buf; | |
581 assert(dsize <= size / 4 * 3 + 2); | |
582 | |
23264
dc12bca7d4b5
Don't deallocate font data if it will be used later.
eugeni
parents:
22263
diff
changeset
|
583 if (track->library->extract_fonts) { |
21455 | 584 ass_add_font(track->library, track->parser_priv->fontname, (char*)buf, dsize); |
23264
dc12bca7d4b5
Don't deallocate font data if it will be used later.
eugeni
parents:
22263
diff
changeset
|
585 buf = 0; |
dc12bca7d4b5
Don't deallocate font data if it will be used later.
eugeni
parents:
22263
diff
changeset
|
586 } |
19492 | 587 |
588 error_decode_font: | |
589 if (buf) free(buf); | |
590 free(track->parser_priv->fontname); | |
591 free(track->parser_priv->fontdata); | |
592 track->parser_priv->fontname = 0; | |
593 track->parser_priv->fontdata = 0; | |
594 track->parser_priv->fontdata_size = 0; | |
595 track->parser_priv->fontdata_used = 0; | |
596 return 0; | |
597 } | |
598 | |
599 static int process_fonts_line(ass_track_t* track, char *str) | |
600 { | |
601 int len; | |
602 | |
603 if (!strncmp(str, "fontname:", 9)) { | |
604 char* p = str + 9; | |
605 skip_spaces(&p); | |
606 if (track->parser_priv->fontname) { | |
607 decode_font(track); | |
608 } | |
21453
9dd976e14792
Avoid calling validate_fname() twice for one string.
eugeni
parents:
21066
diff
changeset
|
609 track->parser_priv->fontname = strdup(p); |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
610 mp_msg(MSGT_ASS, MSGL_V, "fontname: %s\n", track->parser_priv->fontname); |
19492 | 611 return 0; |
612 } | |
613 | |
614 if (!track->parser_priv->fontname) { | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
615 mp_msg(MSGT_ASS, MSGL_V, "Not understood: %s \n", str); |
19492 | 616 return 0; |
617 } | |
618 | |
619 len = strlen(str); | |
620 if (len > 80) { | |
21066 | 621 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_FontLineTooLong, len, str); |
19492 | 622 return 0; |
623 } | |
624 if (track->parser_priv->fontdata_used + len > track->parser_priv->fontdata_size) { | |
625 track->parser_priv->fontdata_size += 100 * 1024; | |
626 track->parser_priv->fontdata = realloc(track->parser_priv->fontdata, track->parser_priv->fontdata_size); | |
627 } | |
628 memcpy(track->parser_priv->fontdata + track->parser_priv->fontdata_used, str, len); | |
629 track->parser_priv->fontdata_used += len; | |
630 | |
631 return 0; | |
632 } | |
633 | |
18937 | 634 /** |
635 * \brief Parse a header line | |
636 * \param track track | |
637 * \param str string to parse, zero-terminated | |
638 */ | |
19492 | 639 static int process_line(ass_track_t* track, char *str) |
18937 | 640 { |
19492 | 641 if (strstr(str, "[Script Info]")) { // FIXME: strstr to skip possible BOM at the beginning of the script |
642 track->parser_priv->state = PST_INFO; | |
643 } else if (!strncmp(str, "[V4 Styles]", 11)) { | |
644 track->parser_priv->state = PST_STYLES; | |
645 track->track_type = TRACK_TYPE_SSA; | |
646 } else if (!strncmp(str, "[V4+ Styles]", 12)) { | |
647 track->parser_priv->state = PST_STYLES; | |
648 track->track_type = TRACK_TYPE_ASS; | |
649 } else if (!strncmp(str, "[Events]", 8)) { | |
650 track->parser_priv->state = PST_EVENTS; | |
651 } else if (!strncmp(str, "[Fonts]", 7)) { | |
652 track->parser_priv->state = PST_FONTS; | |
653 } else { | |
654 switch (track->parser_priv->state) { | |
655 case PST_INFO: | |
656 process_info_line(track, str); | |
657 break; | |
658 case PST_STYLES: | |
659 process_styles_line(track, str); | |
660 break; | |
661 case PST_EVENTS: | |
662 process_events_line(track, str); | |
663 break; | |
664 case PST_FONTS: | |
665 process_fonts_line(track, str); | |
666 break; | |
667 default: | |
668 break; | |
18937 | 669 } |
19492 | 670 } |
671 | |
672 // there is no explicit end-of-font marker in ssa/ass | |
673 if ((track->parser_priv->state != PST_FONTS) && (track->parser_priv->fontname)) | |
674 decode_font(track); | |
675 | |
676 return 0; | |
677 } | |
678 | |
679 static int process_text(ass_track_t* track, char* str) | |
680 { | |
681 char* p = str; | |
682 while(1) { | |
683 char* q; | |
684 for (;((*p=='\r')||(*p=='\n'));++p) {} | |
685 for (q=p; ((*q!='\0')&&(*q!='\r')&&(*q!='\n')); ++q) {}; | |
686 if (q==p) | |
687 break; | |
688 if (*q != '\0') | |
689 *(q++) = '\0'; | |
690 process_line(track, p); | |
691 if (*q == '\0') | |
692 break; | |
693 p = q; | |
18937 | 694 } |
695 return 0; | |
696 } | |
697 | |
698 /** | |
699 * \brief Process CodecPrivate section of subtitle stream | |
700 * \param track track | |
701 * \param data string to parse | |
702 * \param size length of data | |
19492 | 703 CodecPrivate section contains [Stream Info] and [V4+ Styles] ([V4 Styles] for SSA) sections |
18937 | 704 */ |
19492 | 705 void ass_process_codec_private(ass_track_t* track, char *data, int size) |
18937 | 706 { |
707 char* str = malloc(size + 1); | |
708 | |
709 memcpy(str, data, size); | |
710 str[size] = '\0'; | |
711 | |
19492 | 712 process_text(track, str); |
18937 | 713 free(str); |
714 | |
715 if (!track->event_format) { | |
716 // probably an mkv produced by ancient mkvtoolnix | |
717 // such files don't have [Events] and Format: headers | |
19492 | 718 track->parser_priv->state = PST_EVENTS; |
18937 | 719 if (track->track_type == TRACK_TYPE_SSA) |
720 track->event_format = strdup("Format: Marked, Start, End, Style, Name, MarginL, MarginR, MarginV, Effect, Text"); | |
721 else | |
722 track->event_format = strdup("Format: Layer, Start, End, Style, Actor, MarginL, MarginR, MarginV, Effect, Text"); | |
723 } | |
19495 | 724 |
725 process_force_style(track); | |
18937 | 726 } |
727 | |
728 static int check_duplicate_event(ass_track_t* track, int ReadOrder) | |
729 { | |
730 int i; | |
731 for (i = 0; i<track->n_events - 1; ++i) // ignoring last event, it is the one we are comparing with | |
732 if (track->events[i].ReadOrder == ReadOrder) | |
733 return 1; | |
734 return 0; | |
735 } | |
736 | |
737 /** | |
738 * \brief Process a chunk of subtitle stream data. In matroska, this containes exactly 1 event (or a commentary) | |
739 * \param track track | |
740 * \param data string to parse | |
741 * \param size length of data | |
742 * \param timecode starting time of the event (milliseconds) | |
743 * \param duration duration of the event (milliseconds) | |
744 */ | |
19492 | 745 void ass_process_chunk(ass_track_t* track, char *data, int size, long long timecode, long long duration) |
18937 | 746 { |
747 char* str; | |
748 int eid; | |
749 char* p; | |
750 char* token; | |
751 ass_event_t* event; | |
752 | |
753 if (!track->event_format) { | |
21066 | 754 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_EventFormatHeaderMissing); |
18937 | 755 return; |
756 } | |
757 | |
758 str = malloc(size + 1); | |
759 memcpy(str, data, size); | |
760 str[size] = '\0'; | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
761 mp_msg(MSGT_ASS, MSGL_V, "event at %" PRId64 ", +%" PRId64 ": %s \n", (int64_t)timecode, (int64_t)duration, str); |
18937 | 762 |
763 eid = ass_alloc_event(track); | |
764 event = track->events + eid; | |
765 | |
766 p = str; | |
767 | |
768 do { | |
769 NEXT(p, token); | |
770 event->ReadOrder = atoi(token); | |
771 if (check_duplicate_event(track, event->ReadOrder)) | |
772 break; | |
773 | |
774 NEXT(p, token); | |
775 event->Layer = atoi(token); | |
776 | |
777 process_event_tail(track, event, p, 3); | |
778 | |
779 event->Start = timecode; | |
780 event->Duration = duration; | |
781 | |
782 free(str); | |
783 return; | |
784 // dump_events(tid); | |
785 } while (0); | |
786 // some error | |
19474
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
787 ass_free_event(track, eid); |
07209f48e527
Add public functions for removal of styles and events.
eugeni
parents:
19405
diff
changeset
|
788 track->n_events--; |
18937 | 789 free(str); |
790 } | |
791 | |
792 #ifdef USE_ICONV | |
793 /** \brief recode buffer to utf-8 | |
20477 | 794 * constraint: codepage != 0 |
18937 | 795 * \param data pointer to text buffer |
796 * \param size buffer size | |
797 * \return a pointer to recoded buffer, caller is responsible for freeing it | |
798 **/ | |
20477 | 799 static char* sub_recode(char* data, size_t size, char* codepage) |
18937 | 800 { |
801 static iconv_t icdsc = (iconv_t)(-1); | |
802 char* tocp = "UTF-8"; | |
803 char* outbuf; | |
20477 | 804 assert(codepage); |
18937 | 805 |
806 { | |
20602
f672f6921ced
Bugfix: sub_recode could deallocate global sub_cp under some circumstances.
eugeni
parents:
20503
diff
changeset
|
807 char* cp_tmp = codepage ? strdup(codepage) : 0; |
18937 | 808 #ifdef HAVE_ENCA |
809 char enca_lang[3], enca_fallback[100]; | |
20477 | 810 if (sscanf(codepage, "enca:%2s:%99s", enca_lang, enca_fallback) == 2 |
811 || sscanf(codepage, "ENCA:%2s:%99s", enca_lang, enca_fallback) == 2) { | |
20503 | 812 cp_tmp = guess_buffer_cp((unsigned char*)data, size, enca_lang, enca_fallback); |
18937 | 813 } |
814 #endif | |
815 if ((icdsc = iconv_open (tocp, cp_tmp)) != (iconv_t)(-1)){ | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
816 mp_msg(MSGT_ASS,MSGL_V,"LIBSUB: opened iconv descriptor.\n"); |
18937 | 817 } else |
21066 | 818 mp_msg(MSGT_ASS,MSGL_ERR,MSGTR_LIBASS_ErrorOpeningIconvDescriptor); |
18937 | 819 #ifdef HAVE_ENCA |
820 if (cp_tmp) free(cp_tmp); | |
821 #endif | |
822 } | |
823 | |
824 { | |
825 size_t osize = size; | |
826 size_t ileft = size; | |
827 size_t oleft = size - 1; | |
828 char* ip; | |
829 char* op; | |
830 size_t rc; | |
831 | |
832 outbuf = malloc(size); | |
833 ip = data; | |
834 op = outbuf; | |
835 | |
836 while (ileft) { | |
837 rc = iconv(icdsc, &ip, &ileft, &op, &oleft); | |
838 if (rc == (size_t)(-1)) { | |
839 if (errno == E2BIG) { | |
840 int offset = op - outbuf; | |
841 outbuf = (char*)realloc(outbuf, osize + size); | |
842 op = outbuf + offset; | |
843 osize += size; | |
844 oleft += size; | |
845 } else { | |
21066 | 846 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_ErrorRecodingFile); |
18937 | 847 return NULL; |
848 } | |
849 } | |
850 } | |
851 outbuf[osize - oleft - 1] = 0; | |
852 } | |
853 | |
854 if (icdsc != (iconv_t)(-1)) { | |
855 (void)iconv_close(icdsc); | |
856 icdsc = (iconv_t)(-1); | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
857 mp_msg(MSGT_ASS,MSGL_V,"LIBSUB: closed iconv descriptor.\n"); |
18937 | 858 } |
859 | |
860 return outbuf; | |
861 } | |
862 #endif // ICONV | |
863 | |
864 /** | |
20603 | 865 * \brief read file contents into newly allocated buffer |
866 * \param fname file name | |
867 * \param bufsize out: file size | |
868 * \return pointer to file contents. Caller is responsible for its deallocation. | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
869 */ |
20603 | 870 static char* read_file(char* fname, size_t *bufsize) |
18937 | 871 { |
872 int res; | |
873 long sz; | |
874 long bytes_read; | |
875 char* buf; | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
876 |
18937 | 877 FILE* fp = fopen(fname, "rb"); |
878 if (!fp) { | |
21066 | 879 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_FopenFailed, fname); |
18937 | 880 return 0; |
881 } | |
882 res = fseek(fp, 0, SEEK_END); | |
883 if (res == -1) { | |
21066 | 884 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_FseekFailed, fname); |
18937 | 885 fclose(fp); |
886 return 0; | |
887 } | |
888 | |
889 sz = ftell(fp); | |
890 rewind(fp); | |
891 | |
892 if (sz > 10*1024*1024) { | |
21066 | 893 mp_msg(MSGT_ASS, MSGL_INFO, MSGTR_LIBASS_RefusingToLoadSubtitlesLargerThan10M, fname); |
18937 | 894 fclose(fp); |
895 return 0; | |
896 } | |
897 | |
20629
e8885ec63928
Introduce MSGT_ASS, use it for all libass messages.
eugeni
parents:
20603
diff
changeset
|
898 mp_msg(MSGT_ASS, MSGL_V, "file size: %ld\n", sz); |
18937 | 899 |
900 buf = malloc(sz + 1); | |
901 assert(buf); | |
902 bytes_read = 0; | |
903 do { | |
904 res = fread(buf + bytes_read, 1, sz - bytes_read, fp); | |
905 if (res <= 0) { | |
21066 | 906 mp_msg(MSGT_ASS, MSGL_INFO, MSGTR_LIBASS_ReadFailed, errno, strerror(errno)); |
18937 | 907 fclose(fp); |
908 free(buf); | |
909 return 0; | |
910 } | |
911 bytes_read += res; | |
912 } while (sz - bytes_read > 0); | |
913 buf[sz] = '\0'; | |
914 fclose(fp); | |
915 | |
20603 | 916 if (bufsize) |
917 *bufsize = sz; | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
918 return buf; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
919 } |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
920 |
20603 | 921 /* |
922 * \param buf pointer to subtitle text in utf-8 | |
923 */ | |
924 static ass_track_t* parse_memory(ass_library_t* library, char* buf) | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
925 { |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
926 ass_track_t* track; |
19905 | 927 int i; |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
928 |
20477 | 929 track = ass_new_track(library); |
18937 | 930 |
931 // process header | |
19492 | 932 process_text(track, buf); |
933 | |
19905 | 934 // external SSA/ASS subs does not have ReadOrder field |
935 for (i = 0; i < track->n_events; ++i) | |
936 track->events[i].ReadOrder = i; | |
937 | |
19492 | 938 // there is no explicit end-of-font marker in ssa/ass |
939 if (track->parser_priv->fontname) | |
940 decode_font(track); | |
941 | |
942 if (track->track_type == TRACK_TYPE_UNKNOWN) { | |
18937 | 943 ass_free_track(track); |
944 return 0; | |
945 } | |
946 | |
19495 | 947 process_force_style(track); |
948 | |
20603 | 949 return track; |
950 } | |
951 | |
952 /** | |
953 * \brief Read subtitles from memory. | |
954 * \param library libass library object | |
955 * \param buf pointer to subtitles text | |
956 * \param bufsize size of buffer | |
957 * \param codepage recode buffer contents from given codepage | |
958 * \return newly allocated track | |
959 */ | |
960 ass_track_t* ass_read_memory(ass_library_t* library, char* buf, size_t bufsize, char* codepage) | |
961 { | |
962 ass_track_t* track; | |
963 int need_free = 0; | |
964 | |
965 if (!buf) | |
966 return 0; | |
967 | |
968 #ifdef USE_ICONV | |
969 if (codepage) | |
970 buf = sub_recode(buf, bufsize, codepage); | |
971 if (!buf) | |
972 return 0; | |
973 else | |
974 need_free = 1; | |
975 #endif | |
976 track = parse_memory(library, buf); | |
977 if (need_free) | |
978 free(buf); | |
979 if (!track) | |
980 return 0; | |
981 | |
21066 | 982 mp_msg(MSGT_ASS, MSGL_INFO, MSGTR_LIBASS_AddedSubtitleFileMemory, track->n_styles, track->n_events); |
20603 | 983 return track; |
984 } | |
985 | |
23424
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
986 char* read_file_recode(char* fname, char* codepage, int* size) |
20603 | 987 { |
988 char* buf; | |
989 size_t bufsize; | |
990 | |
991 buf = read_file(fname, &bufsize); | |
992 if (!buf) | |
993 return 0; | |
994 #ifdef USE_ICONV | |
995 if (codepage) { | |
996 char* tmpbuf = sub_recode(buf, bufsize, codepage); | |
997 free(buf); | |
998 buf = tmpbuf; | |
999 } | |
1000 if (!buf) | |
1001 return 0; | |
1002 #endif | |
23424
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1003 *size = bufsize; |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1004 return buf; |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1005 } |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1006 |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1007 /** |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1008 * \brief Read subtitles from file. |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1009 * \param library libass library object |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1010 * \param fname file name |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1011 * \param codepage recode buffer contents from given codepage |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1012 * \return newly allocated track |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1013 */ |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1014 ass_track_t* ass_read_file(ass_library_t* library, char* fname, char* codepage) |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1015 { |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1016 char* buf; |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1017 ass_track_t* track; |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1018 size_t bufsize; |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1019 |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1020 buf = read_file_recode(fname, codepage, &bufsize); |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1021 if (!buf) |
7286d245bf33
Move code for reading a file and recoding it to utf-8 to a separate function.
eugeni
parents:
23300
diff
changeset
|
1022 return 0; |
20603 | 1023 track = parse_memory(library, buf); |
1024 free(buf); | |
1025 if (!track) | |
1026 return 0; | |
1027 | |
1028 track->name = strdup(fname); | |
1029 | |
21066 | 1030 mp_msg(MSGT_ASS, MSGL_INFO, MSGTR_LIBASS_AddedSubtitleFileFname, fname, track->n_styles, track->n_events); |
18937 | 1031 |
1032 // dump_events(forced_tid); | |
1033 return track; | |
1034 } | |
1035 | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1036 /** |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1037 * \brief read styles from file into already initialized track |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1038 */ |
20477 | 1039 int ass_read_styles(ass_track_t* track, char* fname, char* codepage) |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1040 { |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1041 char* buf; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1042 parser_state_t old_state; |
20603 | 1043 size_t sz; |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1044 |
20603 | 1045 buf = read_file(fname, &sz); |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1046 if (!buf) |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1047 return 1; |
20603 | 1048 #ifdef USE_ICONV |
1049 if (codepage) { | |
20698 | 1050 char* tmpbuf; |
20603 | 1051 tmpbuf = sub_recode(buf, sz, codepage); |
1052 free(buf); | |
1053 buf = tmpbuf; | |
1054 } | |
1055 if (!buf) | |
1056 return 0; | |
1057 #endif | |
19652
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1058 |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1059 old_state = track->parser_priv->state; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1060 track->parser_priv->state = PST_STYLES; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1061 process_text(track, buf); |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1062 track->parser_priv->state = old_state; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1063 |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1064 return 0; |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1065 } |
2c016957360a
Add -ass-styles option. It allows to load styles from a file and use them
eugeni
parents:
19639
diff
changeset
|
1066 |
18937 | 1067 long long ass_step_sub(ass_track_t* track, long long now, int movement) { |
1068 int i; | |
1069 | |
1070 if (movement == 0) return 0; | |
1071 if (track->n_events == 0) return 0; | |
1072 | |
1073 if (movement < 0) | |
1074 for (i = 0; (i < track->n_events) && ((long long)(track->events[i].Start + track->events[i].Duration) <= now); ++i) {} | |
1075 else | |
1076 for (i = track->n_events - 1; (i >= 0) && ((long long)(track->events[i].Start) > now); --i) {} | |
1077 | |
1078 // -1 and n_events are ok | |
1079 assert(i >= -1); assert(i <= track->n_events); | |
1080 i += movement; | |
1081 if (i < 0) i = 0; | |
1082 if (i >= track->n_events) i = track->n_events - 1; | |
1083 return ((long long)track->events[i].Start) - now; | |
1084 } | |
1085 | |
20477 | 1086 ass_track_t* ass_new_track(ass_library_t* library) { |
18937 | 1087 ass_track_t* track = calloc(1, sizeof(ass_track_t)); |
20477 | 1088 track->library = library; |
19492 | 1089 track->parser_priv = calloc(1, sizeof(parser_priv_t)); |
18937 | 1090 return track; |
1091 } | |
1092 |