?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge svn changes up to r27514
[mplayer.git] / libass / ass_render.c
blobdf75aeb76e88d15989a2970e6518913f617750d9
1 // -*- c-basic-offset: 8; indent-tabs-mode: t -*-
2 // vim:ts=8:sw=8:noet:ai:
3 /*
4 * Copyright (C) 2006 Evgeniy Stepanov <eugeni.stepanov@gmail.com>
5 *
6 * This file is part of libass.
7 *
8 * libass is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * libass 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
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License along
19 * with libass; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 */
22
23 #include "config.h"
24
25 #include <assert.h>
26 #include <math.h>
27 #include <inttypes.h>
28 #include <ft2build.h>
29 #include FT_FREETYPE_H
30 #include FT_STROKER_H
31 #include FT_GLYPH_H
32 #include FT_SYNTHESIS_H
33
34 #include "mputils.h"
35
36 #include "ass.h"
37 #include "ass_font.h"
38 #include "ass_bitmap.h"
39 #include "ass_cache.h"
40 #include "ass_utils.h"
41 #include "ass_fontconfig.h"
42 #include "ass_library.h"
43
44 #define MAX_GLYPHS 1000
45 #define MAX_LINES 100
46
47 static int last_render_id = 0;
48
49 typedef struct ass_settings_s {
50 int frame_width;
51 int frame_height;
52 double font_size_coeff; // font size multiplier
53 double line_spacing; // additional line spacing (in frame pixels)
54 int top_margin; // height of top margin. Everything except toptitles is shifted down by top_margin.
55 int bottom_margin; // height of bottom margin. (frame_height - top_margin - bottom_margin) is original video height.
56 int left_margin;
57 int right_margin;
58 int use_margins; // 0 - place all subtitles inside original frame
59 // 1 - use margins for placing toptitles and subtitles
60 double aspect; // frame aspect ratio, d_width / d_height.
61 ass_hinting_t hinting;
62
63 char* default_font;
64 char* default_family;
65 } ass_settings_t;
66
67 // a rendered event
68 typedef struct event_images_s {
69 ass_image_t* imgs;
70 int top, height;
71 int detect_collisions;
72 int shift_direction;
73 ass_event_t* event;
74 } event_images_t;
75
76 struct ass_renderer_s {
77 ass_library_t* library;
78 FT_Library ftlibrary;
79 fc_instance_t* fontconfig_priv;
80 ass_settings_t settings;
81 int render_id;
82 ass_synth_priv_t* synth_priv;
83
84 ass_image_t* images_root; // rendering result is stored here
85 ass_image_t* prev_images_root;
86
87 event_images_t* eimg; // temporary buffer for sorting rendered events
88 int eimg_size; // allocated buffer size
89 };
90
91 typedef enum {EF_NONE = 0, EF_KARAOKE, EF_KARAOKE_KF, EF_KARAOKE_KO} effect_t;
92
93 // describes a glyph
94 // glyph_info_t and text_info_t are used for text centering and word-wrapping operations
95 typedef struct glyph_info_s {
96 unsigned symbol;
97 FT_Glyph glyph;
98 FT_Glyph outline_glyph;
99 bitmap_t* bm; // glyph bitmap
100 bitmap_t* bm_o; // outline bitmap
101 bitmap_t* bm_s; // shadow bitmap
102 FT_BBox bbox;
103 FT_Vector pos;
104 char linebreak; // the first (leading) glyph of some line ?
105 uint32_t c[4]; // colors
106 FT_Vector advance; // 26.6
107 effect_t effect_type;
108 int effect_timing; // time duration of current karaoke word
109 // after process_karaoke_effects: distance in pixels from the glyph origin.
110 // part of the glyph to the left of it is displayed in a different color.
111 int effect_skip_timing; // delay after the end of last karaoke word
112 int asc, desc; // font max ascender and descender
113 // int height;
114 int be; // blur edges
115 int shadow;
116 double frx, fry, frz; // rotation
117
118 bitmap_hash_key_t hash_key;
119 } glyph_info_t;
120
121 typedef struct line_info_s {
122 int asc, desc;
123 } line_info_t;
124
125 typedef struct text_info_s {
126 glyph_info_t* glyphs;
127 int length;
128 line_info_t lines[MAX_LINES];
129 int n_lines;
130 int height;
131 } text_info_t;
132
133
134 // Renderer state.
135 // Values like current font face, color, screen position, clipping and so on are stored here.
136 typedef struct render_context_s {
137 ass_event_t* event;
138 ass_style_t* style;
139
140 ass_font_t* font;
141 char* font_path;
142 double font_size;
143
144 FT_Stroker stroker;
145 int alignment; // alignment overrides go here; if zero, style value will be used
146 double frx, fry, frz;
147 enum { EVENT_NORMAL, // "normal" top-, sub- or mid- title
148 EVENT_POSITIONED, // happens after pos(,), margins are ignored
149 EVENT_HSCROLL, // "Banner" transition effect, text_width is unlimited
150 EVENT_VSCROLL // "Scroll up", "Scroll down" transition effects
151 } evt_type;
152 double pos_x, pos_y; // position
153 double org_x, org_y; // origin
154 char have_origin; // origin is explicitly defined; if 0, get_base_point() is used
155 double scale_x, scale_y;
156 double hspacing; // distance between letters, in pixels
157 double border; // outline width
158 uint32_t c[4]; // colors(Primary, Secondary, so on) in RGBA
159 int clip_x0, clip_y0, clip_x1, clip_y1;
160 char detect_collisions;
161 uint32_t fade; // alpha from \fad
162 char be; // blur edges
163 int shadow;
164 int drawing_mode; // not implemented; when != 0 text is discarded, except for style override tags
165
166 effect_t effect_type;
167 int effect_timing;
168 int effect_skip_timing;
169
170 enum { SCROLL_LR, // left-to-right
171 SCROLL_RL,
172 SCROLL_TB, // top-to-bottom
173 SCROLL_BT
174 } scroll_direction; // for EVENT_HSCROLL, EVENT_VSCROLL
175 int scroll_shift;
176
177 // face properties
178 char* family;
179 unsigned bold;
180 unsigned italic;
181
182 } render_context_t;
183
184 // frame-global data
185 typedef struct frame_context_s {
186 ass_renderer_t* ass_priv;
187 int width, height; // screen dimensions
188 int orig_height; // frame height ( = screen height - margins )
189 int orig_width; // frame width ( = screen width - margins )
190 int orig_height_nocrop; // frame height ( = screen height - margins + cropheight)
191 int orig_width_nocrop; // frame width ( = screen width - margins + cropwidth)
192 ass_track_t* track;
193 long long time; // frame's timestamp, ms
194 double font_scale;
195 double font_scale_x; // x scale applied to all glyphs to preserve text aspect ratio
196 double border_scale;
197 } frame_context_t;
198
199 static ass_renderer_t* ass_renderer;
200 static ass_settings_t* global_settings;
201 static text_info_t text_info;
202 static render_context_t render_context;
203 static frame_context_t frame_context;
204
205 struct render_priv_s {
206 int top, height;
207 int render_id;
208 };
209
210 static void ass_lazy_track_init(void)
211 {
212 ass_track_t* track = frame_context.track;
213 if (track->PlayResX && track->PlayResY)
214 return;
215 if (!track->PlayResX && !track->PlayResY) {
216 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_NeitherPlayResXNorPlayResYDefined);
217 track->PlayResX = 384;
218 track->PlayResY = 288;
219 } else {
220 double orig_aspect = (global_settings->aspect * frame_context.height * frame_context.orig_width) /
221 frame_context.orig_height / frame_context.width;
222 if (!track->PlayResY) {
223 track->PlayResY = track->PlayResX / orig_aspect + .5;
224 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_PlayResYUndefinedSettingY, track->PlayResY);
225 } else if (!track->PlayResX) {
226 track->PlayResX = track->PlayResY * orig_aspect + .5;
227 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_PlayResXUndefinedSettingX, track->PlayResX);
228 }
229 }
230 }
231
232 ass_renderer_t* ass_renderer_init(ass_library_t* library)
233 {
234 int error;
235 FT_Library ft;
236 ass_renderer_t* priv = 0;
237 int vmajor, vminor, vpatch;
238
239 memset(&render_context, 0, sizeof(render_context));
240 memset(&frame_context, 0, sizeof(frame_context));
241 memset(&text_info, 0, sizeof(text_info));
242
243 error = FT_Init_FreeType( &ft );
244 if ( error ) {
245 mp_msg(MSGT_ASS, MSGL_FATAL, MSGTR_LIBASS_FT_Init_FreeTypeFailed);
246 goto ass_init_exit;
247 }
248
249 FT_Library_Version(ft, &vmajor, &vminor, &vpatch);
250 mp_msg(MSGT_ASS, MSGL_V, "FreeType library version: %d.%d.%d\n",
251 vmajor, vminor, vpatch);
252 mp_msg(MSGT_ASS, MSGL_V, "FreeType headers version: %d.%d.%d\n",
253 FREETYPE_MAJOR, FREETYPE_MINOR, FREETYPE_PATCH);
254
255 priv = calloc(1, sizeof(ass_renderer_t));
256 if (!priv) {
257 FT_Done_FreeType(ft);
258 goto ass_init_exit;
259 }
260
261 priv->synth_priv = ass_synth_init();
262
263 priv->library = library;
264 priv->ftlibrary = ft;
265 // images_root and related stuff is zero-filled in calloc
266
267 ass_font_cache_init();
268 ass_bitmap_cache_init();
269 ass_glyph_cache_init();
270
271 text_info.glyphs = calloc(MAX_GLYPHS, sizeof(glyph_info_t));
272
273 ass_init_exit:
274 if (priv) mp_msg(MSGT_ASS, MSGL_INFO, MSGTR_LIBASS_Init);
275 else mp_msg(MSGT_ASS, MSGL_ERR, MSGTR_LIBASS_InitFailed);
276
277 return priv;
278 }
279
280 void ass_renderer_done(ass_renderer_t* priv)
281 {
282 ass_font_cache_done();
283 ass_bitmap_cache_done();
284 ass_glyph_cache_done();
285 if (render_context.stroker) {
286 FT_Stroker_Done(render_context.stroker);
287 render_context.stroker = 0;
288 }
289 if (priv && priv->ftlibrary) FT_Done_FreeType(priv->ftlibrary);
290 if (priv && priv->fontconfig_priv) fontconfig_done(priv->fontconfig_priv);
291 if (priv && priv->synth_priv) ass_synth_done(priv->synth_priv);
292 if (priv && priv->eimg) free(priv->eimg);
293 if (priv) free(priv);
294 if (text_info.glyphs) free(text_info.glyphs);
295 }
296
297 /**
298 * \brief Create a new ass_image_t
299 * Parameters are the same as ass_image_t fields.
300 */
301 static ass_image_t* my_draw_bitmap(unsigned char* bitmap, int bitmap_w, int bitmap_h, int stride, int dst_x, int dst_y, uint32_t color)
302 {
303 ass_image_t* img = calloc(1, sizeof(ass_image_t));
304
305 img->w = bitmap_w;
306 img->h = bitmap_h;
307 img->stride = stride;
308 img->bitmap = bitmap;
309 img->color = color;
310 img->dst_x = dst_x;
311 img->dst_y = dst_y;
312
313 return img;
314 }
315
316 /**
317 * \brief convert bitmap glyph into ass_image_t struct(s)
318 * \param bit freetype bitmap glyph, FT_PIXEL_MODE_GRAY
319 * \param dst_x bitmap x coordinate in video frame
320 * \param dst_y bitmap y coordinate in video frame
321 * \param color first color, RGBA
322 * \param color2 second color, RGBA
323 * \param brk x coordinate relative to glyph origin, color is used to the left of brk, color2 - to the right
324 * \param tail pointer to the last image's next field, head of the generated list should be stored here
325 * \return pointer to the new list tail
326 * Performs clipping. Uses my_draw_bitmap for actual bitmap convertion.
327 */
328 static ass_image_t** render_glyph(bitmap_t* bm, int dst_x, int dst_y, uint32_t color, uint32_t color2, int brk, ass_image_t** tail)
329 {
330 // brk is relative to dst_x
331 // color = color left of brk
332 // color2 = color right of brk
333 int b_x0, b_y0, b_x1, b_y1; // visible part of the bitmap
334 int clip_x0, clip_y0, clip_x1, clip_y1;
335 int tmp;
336 ass_image_t* img;
337
338 dst_x += bm->left;
339 dst_y += bm->top;
340 brk -= bm->left;
341
342 // clipping
343 clip_x0 = render_context.clip_x0;
344 clip_y0 = render_context.clip_y0;
345 clip_x1 = render_context.clip_x1;
346 clip_y1 = render_context.clip_y1;
347 b_x0 = 0;
348 b_y0 = 0;
349 b_x1 = bm->w;
350 b_y1 = bm->h;
351
352 tmp = dst_x - clip_x0;
353 if (tmp < 0) {
354 mp_msg(MSGT_ASS, MSGL_DBG2, "clip left\n");
355 b_x0 = - tmp;
356 }
357 tmp = dst_y - clip_y0;
358 if (tmp < 0) {
359 mp_msg(MSGT_ASS, MSGL_DBG2, "clip top\n");
360 b_y0 = - tmp;
361 }
362 tmp = clip_x1 - dst_x - bm->w;
363 if (tmp < 0) {
364 mp_msg(MSGT_ASS, MSGL_DBG2, "clip right\n");
365 b_x1 = bm->w + tmp;
366 }
367 tmp = clip_y1 - dst_y - bm->h;
368 if (tmp < 0) {
369 mp_msg(MSGT_ASS, MSGL_DBG2, "clip bottom\n");
370 b_y1 = bm->h + tmp;
371 }
372
373 if ((b_y0 >= b_y1) || (b_x0 >= b_x1))
374 return tail;
375
376 if (brk > b_x0) { // draw left part
377 if (brk > b_x1) brk = b_x1;
378 img = my_draw_bitmap(bm->buffer + bm->w * b_y0 + b_x0,
379 brk - b_x0, b_y1 - b_y0, bm->w,
380 dst_x + b_x0, dst_y + b_y0, color);
381 *tail = img;
382 tail = &img->next;
383 }
384 if (brk < b_x1) { // draw right part
385 if (brk < b_x0) brk = b_x0;
386 img = my_draw_bitmap(bm->buffer + bm->w * b_y0 + brk,
387 b_x1 - brk, b_y1 - b_y0, bm->w,
388 dst_x + brk, dst_y + b_y0, color2);
389 *tail = img;
390 tail = &img->next;
391 }
392 return tail;
393 }
394
395 /**
396 * \brief Convert text_info_t struct to ass_image_t list
397 * Splits glyphs in halves when needed (for \kf karaoke).
398 */
399 static ass_image_t* render_text(text_info_t* text_info, int dst_x, int dst_y)
400 {
401 int pen_x, pen_y;
402 int i;
403 bitmap_t* bm;
404 ass_image_t* head;
405 ass_image_t** tail = &head;
406
407 for (i = 0; i < text_info->length; ++i) {
408 glyph_info_t* info = text_info->glyphs + i;
409 if ((info->symbol == 0) || (info->symbol == '\n') || !info->bm_s || (info->shadow == 0))
410 continue;
411
412 pen_x = dst_x + info->pos.x + info->shadow;
413 pen_y = dst_y + info->pos.y + info->shadow;
414 bm = info->bm_s;
415
416 tail = render_glyph(bm, pen_x, pen_y, info->c[3], 0, 1000000, tail);
417 }
418
419 for (i = 0; i < text_info->length; ++i) {
420 glyph_info_t* info = text_info->glyphs + i;
421 if ((info->symbol == 0) || (info->symbol == '\n') || !info->bm_o)
422 continue;
423
424 pen_x = dst_x + info->pos.x;
425 pen_y = dst_y + info->pos.y;
426 bm = info->bm_o;
427
428 if ((info->effect_type == EF_KARAOKE_KO) && (info->effect_timing <= info->bbox.xMax)) {
429 // do nothing
430 } else
431 tail = render_glyph(bm, pen_x, pen_y, info->c[2], 0, 1000000, tail);
432 }
433 for (i = 0; i < text_info->length; ++i) {
434 glyph_info_t* info = text_info->glyphs + i;
435 if ((info->symbol == 0) || (info->symbol == '\n') || !info->bm)
436 continue;
437
438 pen_x = dst_x + info->pos.x;
439 pen_y = dst_y + info->pos.y;
440 bm = info->bm;
441
442 if ((info->effect_type == EF_KARAOKE) || (info->effect_type == EF_KARAOKE_KO)) {
443 if (info->effect_timing > info->bbox.xMax)
444 tail = render_glyph(bm, pen_x, pen_y, info->c[0], 0, 1000000, tail);
445 else
446 tail = render_glyph(bm, pen_x, pen_y, info->c[1], 0, 1000000, tail);
447 } else if (info->effect_type == EF_KARAOKE_KF) {
448 tail = render_glyph(bm, pen_x, pen_y, info->c[0], info->c[1], info->effect_timing, tail);
449 } else
450 tail = render_glyph(bm, pen_x, pen_y, info->c[0], 0, 1000000, tail);
451 }
452
453 *tail = 0;
454 return head;
455 }
456
457 /**
458 * \brief Mapping between script and screen coordinates
459 */
460 static int x2scr(double x) {
461 return x*frame_context.orig_width_nocrop / frame_context.track->PlayResX +
462 FFMAX(global_settings->left_margin, 0);
463 }
464 /**
465 * \brief Mapping between script and screen coordinates
466 */
467 static int y2scr(double y) {
468 return y * frame_context.orig_height_nocrop / frame_context.track->PlayResY +
469 FFMAX(global_settings->top_margin, 0);
470 }
471 // the same for toptitles
472 static int y2scr_top(double y) {
473 if (global_settings->use_margins)
474 return y * frame_context.orig_height_nocrop / frame_context.track->PlayResY;
475 else
476 return y * frame_context.orig_height_nocrop / frame_context.track->PlayResY +
477 FFMAX(global_settings->top_margin, 0);
478 }
479 // the same for subtitles
480 static int y2scr_sub(double y) {
481 if (global_settings->use_margins)
482 return y * frame_context.orig_height_nocrop / frame_context.track->PlayResY +
483 FFMAX(global_settings->top_margin, 0) +
484 FFMAX(global_settings->bottom_margin, 0);
485 else
486 return y * frame_context.orig_height_nocrop / frame_context.track->PlayResY +
487 FFMAX(global_settings->top_margin, 0);
488 }
489
490 static void compute_string_bbox( text_info_t* info, FT_BBox *abbox ) {
491 FT_BBox bbox;
492 int i;
493
494 if (text_info.length > 0) {
495 bbox.xMin = 32000;
496 bbox.xMax = -32000;
497 bbox.yMin = - d6_to_int(text_info.lines[0].asc) + text_info.glyphs[0].pos.y;
498 bbox.yMax = d6_to_int(text_info.height - text_info.lines[0].asc) + text_info.glyphs[0].pos.y;
499
500 for (i = 0; i < text_info.length; ++i) {
501 int s = text_info.glyphs[i].pos.x;
502 int e = s + d6_to_int(text_info.glyphs[i].advance.x);
503 bbox.xMin = FFMIN(bbox.xMin, s);
504 bbox.xMax = FFMAX(bbox.xMax, e);
505 }
506 } else
507 bbox.xMin = bbox.xMax = bbox.yMin = bbox.yMax = 0;
508
509 /* return string bbox */
510 *abbox = bbox;
511 }
512
513
514 /**
515 * \brief Check if starting part of (*p) matches sample. If true, shift p to the first symbol after the matching part.
516 */
517 static inline int mystrcmp(char** p, const char* sample) {
518 int len = strlen(sample);
519 if (strncmp(*p, sample, len) == 0) {
520 (*p) += len;
521 return 1;
522 } else
523 return 0;
524 }
525
526 static void change_font_size(double sz)
527 {
528 double size = sz * frame_context.font_scale;
529
530 if (size < 1)
531 size = 1;
532 else if (size > frame_context.height * 2)
533 size = frame_context.height * 2;
534
535 ass_font_set_size(render_context.font, size);
536
537 render_context.font_size = sz;
538 }
539
540 /**
541 * \brief Change current font, using setting from render_context.
542 */
543 static void update_font(void)
544 {
545 unsigned val;
546 ass_renderer_t* priv = frame_context.ass_priv;
547 ass_font_desc_t desc;
548 desc.family = strdup(render_context.family);
549
550 val = render_context.bold;
551 // 0 = normal, 1 = bold, >1 = exact weight
552 if (val == 0) val = 80; // normal
553 else if (val == 1) val = 200; // bold
554 desc.bold = val;
555
556 val = render_context.italic;
557 if (val == 0) val = 0; // normal
558 else if (val == 1) val = 110; //italic
559 desc.italic = val;
560
561 render_context.font = ass_font_new(priv->library, priv->ftlibrary, priv->fontconfig_priv, &desc);
562 free(desc.family);
563
564 if (render_context.font)
565 change_font_size(render_context.font_size);
566 }
567
568 /**
569 * \brief Change border width
570 * negative value resets border to style value
571 */
572 static void change_border(double border)
573 {
574 int b;
575 if (!render_context.font) return;
576
577 if (border < 0) {
578 if (render_context.style->BorderStyle == 1) {
579 if (render_context.style->Outline == 0 && render_context.style->Shadow > 0)
580 border = 1.;
581 else
582 border = render_context.style->Outline;
583 } else
584 border = 1.;
585 }
586 render_context.border = border;
587
588 b = 64 * border * frame_context.border_scale;
589 if (b > 0) {
590 if (!render_context.stroker) {
591 int error;
592 #if (FREETYPE_MAJOR > 2) || ((FREETYPE_MAJOR == 2) && (FREETYPE_MINOR > 1))
593 error = FT_Stroker_New( ass_renderer->ftlibrary, &render_context.stroker );
594 #else // < 2.2
595 error = FT_Stroker_New( render_context.font->faces[0]->memory, &render_context.stroker );
596 #endif
597 if (error) {
598 mp_msg(MSGT_ASS, MSGL_V, "failed to get stroker\n");
599 render_context.stroker = 0;
600 }
601 }
602 if (render_context.stroker)
603 FT_Stroker_Set( render_context.stroker, b,
604 FT_STROKER_LINECAP_ROUND,
605 FT_STROKER_LINEJOIN_ROUND,
606 0 );
607 } else {
608 FT_Stroker_Done(render_context.stroker);
609 render_context.stroker = 0;
610 }
611 }
612
613 #define _r(c) ((c)>>24)
614 #define _g(c) (((c)>>16)&0xFF)
615 #define _b(c) (((c)>>8)&0xFF)
616 #define _a(c) ((c)&0xFF)
617
618 /**
619 * \brief Calculate a weighted average of two colors
620 * calculates c1*(1-a) + c2*a, but separately for each component except alpha
621 */
622 static void change_color(uint32_t* var, uint32_t new, double pwr)
623 {
624 (*var)= ((uint32_t)(_r(*var) * (1 - pwr) + _r(new) * pwr) << 24) +
625 ((uint32_t)(_g(*var) * (1 - pwr) + _g(new) * pwr) << 16) +
626 ((uint32_t)(_b(*var) * (1 - pwr) + _b(new) * pwr) << 8) +
627 _a(*var);
628 }
629
630 // like change_color, but for alpha component only
631 static void change_alpha(uint32_t* var, uint32_t new, double pwr)
632 {
633 *var = (_r(*var) << 24) + (_g(*var) << 16) + (_b(*var) << 8) + (_a(*var) * (1 - pwr) + _a(new) * pwr);
634 }
635
636 /**
637 * \brief Multiply two alpha values
638 * \param a first value
639 * \param b second value
640 * \return result of multiplication
641 * Parameters and result are limited by 0xFF.
642 */
643 static uint32_t mult_alpha(uint32_t a, uint32_t b)
644 {
645 return 0xFF - (0xFF - a) * (0xFF - b) / 0xFF;
646 }
647
648 /**
649 * \brief Calculate alpha value by piecewise linear function
650 * Used for \fad, \fade implementation.
651 */
652 static unsigned interpolate_alpha(long long now,
653 long long t1, long long t2, long long t3, long long t4,
654 unsigned a1, unsigned a2, unsigned a3)
655 {
656 unsigned a;
657 double cf;
658 if (now <= t1) {
659 a = a1;
660 } else if (now >= t4) {
661 a = a3;
662 } else if (now < t2) { // and > t1
663 cf = ((double)(now - t1)) / (t2 - t1);
664 a = a1 * (1 - cf) + a2 * cf;
665 } else if (now > t3) {
666 cf = ((double)(now - t3)) / (t4 - t3);
667 a = a2 * (1 - cf) + a3 * cf;
668 } else { // t2 <= now <= t3
669 a = a2;
670 }
671
672 return a;
673 }
674
675 static void reset_render_context(void);
676
677 /**
678 * \brief Parse style override tag.
679 * \param p string to parse
680 * \param pwr multiplier for some tag effects (comes from \t tags)
681 */
682 static char* parse_tag(char* p, double pwr) {
683 #define skip_to(x) while ((*p != (x)) && (*p != '}') && (*p != 0)) { ++p;}
684 #define skip(x) if (*p == (x)) ++p; else { return p; }
685
686 skip_to('\\');
687 skip('\\');
688 if ((*p == '}') || (*p == 0))
689 return p;
690
691 if (mystrcmp(&p, "fsc")) {
692 char tp = *p++;
693 double val;
694 if (tp == 'x') {
695 if (mystrtod(&p, &val)) {
696 val /= 100;
697 render_context.scale_x = render_context.scale_x * ( 1 - pwr) + val * pwr;
698 } else
699 render_context.scale_x = render_context.style->ScaleX;
700 } else if (tp == 'y') {
701 if (mystrtod(&p, &val)) {
702 val /= 100;
703 render_context.scale_y = render_context.scale_y * ( 1 - pwr) + val * pwr;
704 } else
705 render_context.scale_y = render_context.style->ScaleY;
706 }
707 } else if (mystrcmp(&p, "fsp")) {
708 double val;
709 if (mystrtod(&p, &val))
710 render_context.hspacing = render_context.hspacing * ( 1 - pwr ) + val * pwr;
711 else
712 render_context.hspacing = render_context.style->Spacing;
713 } else if (mystrcmp(&p, "fs")) {
714 double val;
715 if (mystrtod(&p, &val))
716 val = render_context.font_size * ( 1 - pwr ) + val * pwr;
717 else
718 val = render_context.style->FontSize;
719 if (render_context.font)
720 change_font_size(val);
721 } else if (mystrcmp(&p, "bord")) {
722 double val;
723 if (mystrtod(&p, &val))
724 val = render_context.border * ( 1 - pwr ) + val * pwr;
725 else
726 val = -1.; // reset to default
727 change_border(val);
728 } else if (mystrcmp(&p, "move")) {
729 int x1, x2, y1, y2;
730 long long t1, t2, delta_t, t;
731 double x, y;
732 double k;
733 skip('(');
734 x1 = strtol(p, &p, 10);
735 skip(',');
736 y1 = strtol(p, &p, 10);
737 skip(',');
738 x2 = strtol(p, &p, 10);
739 skip(',');
740 y2 = strtol(p, &p, 10);
741 if (*p == ',') {
742 skip(',');
743 t1 = strtoll(p, &p, 10);
744 skip(',');
745 t2 = strtoll(p, &p, 10);
746 mp_msg(MSGT_ASS, MSGL_DBG2, "movement6: (%d, %d) -> (%d, %d), (%" PRId64 " .. %" PRId64 ")\n",
747 x1, y1, x2, y2, (int64_t)t1, (int64_t)t2);
748 } else {
749 t1 = 0;
750 t2 = render_context.event->Duration;
751 mp_msg(MSGT_ASS, MSGL_DBG2, "movement: (%d, %d) -> (%d, %d)\n", x1, y1, x2, y2);
752 }
753 skip(')');
754 delta_t = t2 - t1;
755 t = frame_context.time - render_context.event->Start;
756 if (t < t1)
757 k = 0.;
758 else if (t > t2)
759 k = 1.;
760 else k = ((double)(t - t1)) / delta_t;
761 x = k * (x2 - x1) + x1;
762 y = k * (y2 - y1) + y1;
763 render_context.pos_x = x;
764 render_context.pos_y = y;
765 render_context.detect_collisions = 0;
766 render_context.evt_type = EVENT_POSITIONED;
767 } else if (mystrcmp(&p, "frx")) {
768 double val;
769 if (mystrtod(&p, &val)) {
770 val *= M_PI / 180;
771 render_context.frx = val * pwr + render_context.frx * (1-pwr);
772 } else
773 render_context.frx = 0.;
774 } else if (mystrcmp(&p, "fry")) {
775 double val;
776 if (mystrtod(&p, &val)) {
777 val *= M_PI / 180;
778 render_context.fry = val * pwr + render_context.fry * (1-pwr);
779 } else
780 render_context.fry = 0.;
781 } else if (mystrcmp(&p, "frz") || mystrcmp(&p, "fr")) {
782 double val;
783 if (mystrtod(&p, &val)) {
784 val *= M_PI / 180;
785 render_context.frz = val * pwr + render_context.frz * (1-pwr);
786 } else
787 render_context.frz = M_PI * render_context.style->Angle / 180.;
788 } else if (mystrcmp(&p, "fn")) {
789 char* start = p;
790 char* family;
791 skip_to('\\');
792 if (p > start) {
793 family = malloc(p - start + 1);
794 strncpy(family, start, p - start);
795 family[p - start] = '\0';
796 } else
797 family = strdup(render_context.style->FontName);
798 if (render_context.family)
799 free(render_context.family);
800 render_context.family = family;
801 update_font();
802 } else if (mystrcmp(&p, "alpha")) {
803 uint32_t val;
804 int i;
805 if (strtocolor(&p, &val)) {
806 unsigned char a = val >> 24;
807 for (i = 0; i < 4; ++i)
808 change_alpha(&render_context.c[i], a, pwr);
809 } else {
810 change_alpha(&render_context.c[0], render_context.style->PrimaryColour, pwr);
811 change_alpha(&render_context.c[1], render_context.style->SecondaryColour, pwr);
812 change_alpha(&render_context.c[2], render_context.style->OutlineColour, pwr);
813 change_alpha(&render_context.c[3], render_context.style->BackColour, pwr);
814 }
815 // FIXME: simplify
816 } else if (mystrcmp(&p, "an")) {
817 int val;
818 if (mystrtoi(&p, 10, &val) && val) {
819 int v = (val - 1) / 3; // 0, 1 or 2 for vertical alignment
820 mp_msg(MSGT_ASS, MSGL_DBG2, "an %d\n", val);
821 if (v != 0) v = 3 - v;
822 val = ((val - 1) % 3) + 1; // horizontal alignment
823 val += v*4;
824 mp_msg(MSGT_ASS, MSGL_DBG2, "align %d\n", val);
825 render_context.alignment = val;
826 } else
827 render_context.alignment = render_context.style->Alignment;
828 } else if (mystrcmp(&p, "a")) {
829 int val;
830 if (mystrtoi(&p, 10, &val) && val)
831 render_context.alignment = val;
832 else
833 render_context.alignment = render_context.style->Alignment;
834 } else if (mystrcmp(&p, "pos")) {
835 int v1, v2;
836 skip('(');
837 v1 = strtol(p, &p, 10);
838 skip(',');
839 v2 = strtol(p, &p, 10);
840 skip(')');
841 mp_msg(MSGT_ASS, MSGL_DBG2, "pos(%d, %d)\n", v1, v2);
842 render_context.evt_type = EVENT_POSITIONED;
843 render_context.detect_collisions = 0;
844 render_context.pos_x = v1;
845 render_context.pos_y = v2;
846 } else if (mystrcmp(&p, "fad")) {
847 int a1, a2, a3;
848 long long t1, t2, t3, t4;
849 if (*p == 'e') ++p; // either \fad or \fade
850 skip('(');
851 a1 = strtol(p, &p, 10);
852 skip(',');
853 a2 = strtol(p, &p, 10);
854 if (*p == ')') {
855 // 2-argument version (\fad, according to specs)
856 // a1 and a2 are fade-in and fade-out durations
857 t1 = 0;
858 t4 = render_context.event->Duration;
859 t2 = a1;
860 t3 = t4 - a2;
861 a1 = 0xFF;
862 a2 = 0;
863 a3 = 0xFF;
864 } else {
865 // 6-argument version (\fade)
866 // a1 and a2 (and a3) are opacity values
867 skip(',');
868 a3 = strtol(p, &p, 10);
869 skip(',');
870 t1 = strtoll(p, &p, 10);
871 skip(',');
872 t2 = strtoll(p, &p, 10);
873 skip(',');
874 t3 = strtoll(p, &p, 10);
875 skip(',');
876 t4 = strtoll(p, &p, 10);
877 }
878 skip(')');
879 render_context.fade = interpolate_alpha(frame_context.time - render_context.event->Start, t1, t2, t3, t4, a1, a2, a3);
880 } else if (mystrcmp(&p, "org")) {
881 int v1, v2;
882 skip('(');
883 v1 = strtol(p, &p, 10);
884 skip(',');
885 v2 = strtol(p, &p, 10);
886 skip(')');
887 mp_msg(MSGT_ASS, MSGL_DBG2, "org(%d, %d)\n", v1, v2);
888 // render_context.evt_type = EVENT_POSITIONED;
889 render_context.org_x = v1;
890 render_context.org_y = v2;
891 render_context.have_origin = 1;
892 render_context.detect_collisions = 0;
893 } else if (mystrcmp(&p, "t")) {
894 double v[3];
895 int v1, v2;
896 double v3;
897 int cnt;
898 long long t1, t2, t, delta_t;
899 double k;
900 skip('(');
901 for (cnt = 0; cnt < 3; ++cnt) {
902 if (*p == '\\')
903 break;
904 v[cnt] = strtod(p, &p);
905 skip(',');
906 }
907 if (cnt == 3) {
908 v1 = v[0]; v2 = v[1]; v3 = v[2];
909 } else if (cnt == 2) {
910 v1 = v[0]; v2 = v[1]; v3 = 1.;
911 } else if (cnt == 1) {
912 v1 = 0; v2 = render_context.event->Duration; v3 = v[0];
913 } else { // cnt == 0
914 v1 = 0; v2 = render_context.event->Duration; v3 = 1.;
915 }
916 render_context.detect_collisions = 0;
917 t1 = v1;
918 t2 = v2;
919 delta_t = v2 - v1;
920 if (v3 < 0.)
921 v3 = 0.;
922 t = frame_context.time - render_context.event->Start; // FIXME: move to render_context
923 if (t <= t1)
924 k = 0.;
925 else if (t >= t2)
926 k = 1.;
927 else {
928 assert(delta_t != 0.);
929 k = pow(((double)(t - t1)) / delta_t, v3);
930 }
931 while (*p == '\\')
932 p = parse_tag(p, k); // maybe k*pwr ? no, specs forbid nested \t's
933 skip_to(')'); // in case there is some unknown tag or a comment
934 skip(')');
935 } else if (mystrcmp(&p, "clip")) {
936 int x0, y0, x1, y1;
937 int res = 1;
938 skip('(');
939 res &= mystrtoi(&p, 10, &x0);
940 skip(',');
941 res &= mystrtoi(&p, 10, &y0);
942 skip(',');
943 res &= mystrtoi(&p, 10, &x1);
944 skip(',');
945 res &= mystrtoi(&p, 10, &y1);
946 skip(')');
947 if (res) {
948 render_context.clip_x0 = render_context.clip_x0 * (1-pwr) + x0 * pwr;
949 render_context.clip_x1 = render_context.clip_x1 * (1-pwr) + x1 * pwr;
950 render_context.clip_y0 = render_context.clip_y0 * (1-pwr) + y0 * pwr;
951 render_context.clip_y1 = render_context.clip_y1 * (1-pwr) + y1 * pwr;
952 } else {
953 render_context.clip_x0 = 0;
954 render_context.clip_y0 = 0;
955 render_context.clip_x1 = frame_context.track->PlayResX;
956 render_context.clip_y1 = frame_context.track->PlayResY;
957 }
958 } else if (mystrcmp(&p, "c")) {
959 uint32_t val;
960 if (!strtocolor(&p, &val))
961 val = render_context.style->PrimaryColour;
962 mp_msg(MSGT_ASS, MSGL_DBG2, "color: %X\n", val);
963 change_color(&render_context.c[0], val, pwr);
964 } else if ((*p >= '1') && (*p <= '4') && (++p) && (mystrcmp(&p, "c") || mystrcmp(&p, "a"))) {
965 char n = *(p-2);
966 int cidx = n - '1';
967 char cmd = *(p-1);
968 uint32_t val;
969 assert((n >= '1') && (n <= '4'));
970 if (!strtocolor(&p, &val))
971 switch(n) {
972 case '1': val = render_context.style->PrimaryColour; break;
973 case '2': val = render_context.style->SecondaryColour; break;
974 case '3': val = render_context.style->OutlineColour; break;
975 case '4': val = render_context.style->BackColour; break;
976 default : val = 0; break; // impossible due to assert; avoid compilation warning
977 }
978 switch (cmd) {
979 case 'c': change_color(render_context.c + cidx, val, pwr); break;
980 case 'a': change_alpha(render_context.c + cidx, val >> 24, pwr); break;
981 default: mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_BadCommand, n, cmd); break;
982 }
983 mp_msg(MSGT_ASS, MSGL_DBG2, "single c/a at %f: %c%c = %X \n", pwr, n, cmd, render_context.c[cidx]);
984 } else if (mystrcmp(&p, "r")) {
985 reset_render_context();
986 } else if (mystrcmp(&p, "be")) {
987 int val;
988 if (mystrtoi(&p, 10, &val))
989 render_context.be = val ? 1 : 0;
990 else
991 render_context.be = 0;
992 } else if (mystrcmp(&p, "b")) {
993 int b;
994 if (mystrtoi(&p, 10, &b)) {
995 if (pwr >= .5)
996 render_context.bold = b;
997 } else
998 render_context.bold = render_context.style->Bold;
999 update_font();
1000 } else if (mystrcmp(&p, "i")) {
1001 int i;
1002 if (mystrtoi(&p, 10, &i)) {
1003 if (pwr >= .5)
1004 render_context.italic = i;
1005 } else
1006 render_context.italic = render_context.style->Italic;
1007 update_font();
1008 } else if (mystrcmp(&p, "kf") || mystrcmp(&p, "K")) {
1009 int val = strtol(p, &p, 10);
1010 render_context.effect_type = EF_KARAOKE_KF;
1011 if (render_context.effect_timing)
1012 render_context.effect_skip_timing += render_context.effect_timing;
1013 render_context.effect_timing = val * 10;
1014 } else if (mystrcmp(&p, "ko")) {
1015 int val = strtol(p, &p, 10);
1016 render_context.effect_type = EF_KARAOKE_KO;
1017 if (render_context.effect_timing)
1018 render_context.effect_skip_timing += render_context.effect_timing;
1019 render_context.effect_timing = val * 10;
1020 } else if (mystrcmp(&p, "k")) {
1021 int val = strtol(p, &p, 10);
1022 render_context.effect_type = EF_KARAOKE;
1023 if (render_context.effect_timing)
1024 render_context.effect_skip_timing += render_context.effect_timing;
1025 render_context.effect_timing = val * 10;
1026 } else if (mystrcmp(&p, "shad")) {
1027 int val;
1028 if (mystrtoi(&p, 10, &val))
1029 render_context.shadow = val;
1030 else
1031 render_context.shadow = render_context.style->Shadow;
1032 } else if (mystrcmp(&p, "pbo")) {
1033 (void)strtol(p, &p, 10); // ignored
1034 } else if (mystrcmp(&p, "p")) {
1035 int val;
1036 if (!mystrtoi(&p, 10, &val))
1037 val = 0;
1038 render_context.drawing_mode = !!val;
1039 }
1040
1041 return p;
1042
1043 #undef skip
1044 #undef skip_to
1045 }
1046
1047 /**
1048 * \brief Get next ucs4 char from string, parsing and executing style overrides
1049 * \param str string pointer
1050 * \return ucs4 code of the next char
1051 * On return str points to the unparsed part of the string
1052 */
1053 static unsigned get_next_char(char** str)
1054 {
1055 char* p = *str;
1056 unsigned chr;
1057 if (*p == '{') { // '\0' goes here
1058 p++;
1059 while (1) {
1060 p = parse_tag(p, 1.);
1061 if (*p == '}') { // end of tag
1062 p++;
1063 if (*p == '{') {
1064 p++;
1065 continue;
1066 } else
1067 break;
1068 } else if (*p != '\\')
1069 mp_msg(MSGT_ASS, MSGL_V, "Unable to parse: \"%s\" \n", p);
1070 if (*p == 0)
1071 break;
1072 }
1073 }
1074 if (*p == '\t') {
1075 ++p;
1076 *str = p;
1077 return ' ';
1078 }
1079 if (*p == '\\') {
1080 if ((*(p+1) == 'N') || ((*(p+1) == 'n') && (frame_context.track->WrapStyle == 2))) {
1081 p += 2;
1082 *str = p;
1083 return '\n';
1084 } else if ((*(p+1) == 'n') || (*(p+1) == 'h')) {
1085 p += 2;
1086 *str = p;
1087 return ' ';
1088 }
1089 }
1090 chr = utf8_get_char(&p);
1091 *str = p;
1092 return chr;
1093 }
1094
1095 static void apply_transition_effects(ass_event_t* event)
1096 {
1097 int v[4];
1098 int cnt;
1099 char* p = event->Effect;
1100
1101 if (!p || !*p) return;
1102
1103 cnt = 0;
1104 while (cnt < 4 && (p = strchr(p, ';'))) {
1105 v[cnt++] = atoi(++p);
1106 }
1107
1108 if (strncmp(event->Effect, "Banner;", 7) == 0) {
1109 int delay;
1110 if (cnt < 1) {
1111 mp_msg(MSGT_ASS, MSGL_V, "Error parsing effect: %s \n", event->Effect);
1112 return;
1113 }
1114 if (cnt >= 2 && v[1] == 0) // right-to-left
1115 render_context.scroll_direction = SCROLL_RL;
1116 else // left-to-right
1117 render_context.scroll_direction = SCROLL_LR;
1118
1119 delay = v[0];
1120 if (delay == 0) delay = 1; // ?
1121 render_context.scroll_shift = (frame_context.time - render_context.event->Start) / delay;
1122 render_context.evt_type = EVENT_HSCROLL;
1123 return;
1124 }
1125
1126 if (strncmp(event->Effect, "Scroll up;", 10) == 0) {
1127 render_context.scroll_direction = SCROLL_BT;
1128 } else if (strncmp(event->Effect, "Scroll down;", 12) == 0) {
1129 render_context.scroll_direction = SCROLL_TB;
1130 } else {
1131 mp_msg(MSGT_ASS, MSGL_V, "Unknown transition effect: %s \n", event->Effect);
1132 return;
1133 }
1134 // parse scroll up/down parameters
1135 {
1136 int delay;
1137 int y0, y1;
1138 if (cnt < 3) {
1139 mp_msg(MSGT_ASS, MSGL_V, "Error parsing effect: %s \n", event->Effect);
1140 return;
1141 }
1142 delay = v[2];
1143 if (delay == 0) delay = 1; // ?
1144 render_context.scroll_shift = (frame_context.time - render_context.event->Start) / delay;
1145 if (v[0] < v[1]) {
1146 y0 = v[0]; y1 = v[1];
1147 } else {
1148 y0 = v[1]; y1 = v[0];
1149 }
1150 if (y1 == 0)
1151 y1 = frame_context.track->PlayResY; // y0=y1=0 means fullscreen scrolling
1152 render_context.clip_y0 = y0;
1153 render_context.clip_y1 = y1;
1154 render_context.evt_type = EVENT_VSCROLL;
1155 render_context.detect_collisions = 0;
1156 }
1157
1158 }
1159
1160 /**
1161 * \brief partially reset render_context to style values
1162 * Works like {\r}: resets some style overrides
1163 */
1164 static void reset_render_context(void)
1165 {
1166 render_context.c[0] = render_context.style->PrimaryColour;
1167 render_context.c[1] = render_context.style->SecondaryColour;
1168 render_context.c[2] = render_context.style->OutlineColour;
1169 render_context.c[3] = render_context.style->BackColour;
1170 render_context.font_size = render_context.style->FontSize;
1171
1172 if (render_context.family)
1173 free(render_context.family);
1174 render_context.family = strdup(render_context.style->FontName);
1175 render_context.bold = render_context.style->Bold;
1176 render_context.italic = render_context.style->Italic;
1177 update_font();
1178
1179 change_border(-1.);
1180 render_context.scale_x = render_context.style->ScaleX;
1181 render_context.scale_y = render_context.style->ScaleY;
1182 render_context.hspacing = render_context.style->Spacing;
1183 render_context.be = 0;
1184 render_context.shadow = render_context.style->Shadow;
1185 render_context.frx = render_context.fry = 0.;
1186 render_context.frz = M_PI * render_context.style->Angle / 180.;
1187
1188 // FIXME: does not reset unsupported attributes.
1189 }
1190
1191 /**
1192 * \brief Start new event. Reset render_context.
1193 */
1194 static void init_render_context(ass_event_t* event)
1195 {
1196 render_context.event = event;
1197 render_context.style = frame_context.track->styles + event->Style;
1198
1199 reset_render_context();
1200
1201 render_context.evt_type = EVENT_NORMAL;
1202 render_context.alignment = render_context.style->Alignment;
1203 render_context.pos_x = 0;
1204 render_context.pos_y = 0;
1205 render_context.org_x = 0;
1206 render_context.org_y = 0;
1207 render_context.have_origin = 0;
1208 render_context.clip_x0 = 0;
1209 render_context.clip_y0 = 0;
1210 render_context.clip_x1 = frame_context.track->PlayResX;
1211 render_context.clip_y1 = frame_context.track->PlayResY;
1212 render_context.detect_collisions = 1;
1213 render_context.fade = 0;
1214 render_context.drawing_mode = 0;
1215 render_context.effect_type = EF_NONE;
1216 render_context.effect_timing = 0;
1217 render_context.effect_skip_timing = 0;
1218
1219 apply_transition_effects(event);
1220 }
1221
1222 static void free_render_context(void)
1223 {
1224 }
1225
1226 /**
1227 * \brief Get normal and outline (border) glyphs
1228 * \param symbol ucs4 char
1229 * \param info out: struct filled with extracted data
1230 * \param advance subpixel shift vector used for cache lookup
1231 * Tries to get both glyphs from cache.
1232 * If they can't be found, gets a glyph from font face, generates outline with FT_Stroker,
1233 * and add them to cache.
1234 * The glyphs are returned in info->glyph and info->outline_glyph
1235 */
1236 static void get_outline_glyph(int symbol, glyph_info_t* info, FT_Vector* advance)
1237 {
1238 int error;
1239 glyph_hash_val_t* val;
1240 glyph_hash_key_t key;
1241 key.font = render_context.font;
1242 key.size = render_context.font_size;
1243 key.ch = symbol;
1244 key.scale_x = (render_context.scale_x * 0xFFFF);
1245 key.scale_y = (render_context.scale_y * 0xFFFF);
1246 key.advance = *advance;
1247 key.bold = render_context.bold;
1248 key.italic = render_context.italic;
1249 key.outline = render_context.border * 0xFFFF;
1250
1251 info->glyph = info->outline_glyph = 0;
1252
1253 val = cache_find_glyph(&key);
1254 if (val) {
1255 FT_Glyph_Copy(val->glyph, &info->glyph);
1256 if (val->outline_glyph)
1257 FT_Glyph_Copy(val->outline_glyph, &info->outline_glyph);
1258 info->bbox = val->bbox_scaled;
1259 info->advance.x = val->advance.x;
1260 info->advance.y = val->advance.y;
1261 } else {
1262 glyph_hash_val_t v;
1263 info->glyph = ass_font_get_glyph(frame_context.ass_priv->fontconfig_priv, render_context.font, symbol, global_settings->hinting);
1264 if (!info->glyph)
1265 return;
1266 info->advance.x = d16_to_d6(info->glyph->advance.x);
1267 info->advance.y = d16_to_d6(info->glyph->advance.y);
1268 FT_Glyph_Get_CBox( info->glyph, FT_GLYPH_BBOX_PIXELS, &info->bbox);
1269
1270 if (render_context.stroker) {
1271 info->outline_glyph = info->glyph;
1272 error = FT_Glyph_StrokeBorder( &(info->outline_glyph), render_context.stroker, 0 , 0 ); // don't destroy original
1273 if (error) {
1274 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_FT_Glyph_Stroke_Error, error);
1275 }
1276 }
1277
1278 memset(&v, 0, sizeof(v));
1279 FT_Glyph_Copy(info->glyph, &v.glyph);
1280 if (info->outline_glyph)
1281 FT_Glyph_Copy(info->outline_glyph, &v.outline_glyph);
1282 v.advance = info->advance;
1283 v.bbox_scaled = info->bbox;
1284 cache_add_glyph(&key, &v);
1285 }
1286 }
1287
1288 static void transform_3d(FT_Vector shift, FT_Glyph* glyph, FT_Glyph* glyph2, double frx, double fry, double frz);
1289
1290 /**
1291 * \brief Get bitmaps for a glyph
1292 * \param info glyph info
1293 * Tries to get glyph bitmaps from bitmap cache.
1294 * If they can't be found, they are generated by rotating and rendering the glyph.
1295 * After that, bitmaps are added to the cache.
1296 * They are returned in info->bm (glyph), info->bm_o (outline) and info->bm_s (shadow).
1297 */
1298 static void get_bitmap_glyph(glyph_info_t* info)
1299 {
1300 bitmap_hash_val_t* val;
1301 bitmap_hash_key_t* key = &info->hash_key;
1302
1303 val = cache_find_bitmap(key);
1304 /* val = 0; */
1305
1306 if (val) {
1307 info->bm = val->bm;
1308 info->bm_o = val->bm_o;
1309 info->bm_s = val->bm_s;
1310 } else {
1311 FT_Vector shift;
1312 bitmap_hash_val_t hash_val;
1313 int error;
1314 info->bm = info->bm_o = info->bm_s = 0;
1315 if (info->glyph && info->symbol != '\n' && info->symbol != 0) {
1316 // calculating rotation shift vector (from rotation origin to the glyph basepoint)
1317 shift.x = int_to_d6(info->hash_key.shift_x);
1318 shift.y = int_to_d6(info->hash_key.shift_y);
1319 // apply rotation
1320 transform_3d(shift, &info->glyph, &info->outline_glyph, info->frx, info->fry, info->frz);
1321
1322 // render glyph
1323 error = glyph_to_bitmap(ass_renderer->synth_priv,
1324 info->glyph, info->outline_glyph,
1325 &info->bm, &info->bm_o,
1326 &info->bm_s, info->be);
1327 if (error)
1328 info->symbol = 0;
1329
1330 // add bitmaps to cache
1331 hash_val.bm_o = info->bm_o;
1332 hash_val.bm = info->bm;
1333 hash_val.bm_s = info->bm_s;
1334 cache_add_bitmap(&(info->hash_key), &hash_val);
1335 }
1336 }
1337 // deallocate glyphs
1338 if (info->glyph)
1339 FT_Done_Glyph(info->glyph);
1340 if (info->outline_glyph)
1341 FT_Done_Glyph(info->outline_glyph);
1342 }
1343
1344 /**
1345 * This function goes through text_info and calculates text parameters.
1346 * The following text_info fields are filled:
1347 * height
1348 * lines[].height
1349 * lines[].asc
1350 * lines[].desc
1351 */
1352 static void measure_text(void)
1353 {
1354 int cur_line = 0, max_asc = 0, max_desc = 0;
1355 int i;
1356 text_info.height = 0;
1357 for (i = 0; i < text_info.length + 1; ++i) {
1358 if ((i == text_info.length) || text_info.glyphs[i].linebreak) {
1359 text_info.lines[cur_line].asc = max_asc;
1360 text_info.lines[cur_line].desc = max_desc;
1361 text_info.height += max_asc + max_desc;
1362 cur_line ++;
1363 max_asc = max_desc = 0;
1364 }
1365 if (i < text_info.length) {
1366 glyph_info_t* cur = text_info.glyphs + i;
1367 if (cur->asc > max_asc)
1368 max_asc = cur->asc;
1369 if (cur->desc > max_desc)
1370 max_desc = cur->desc;
1371 }
1372 }
1373 text_info.height += (text_info.n_lines - 1) * double_to_d6(global_settings->line_spacing);
1374 }
1375
1376 /**
1377 * \brief rearrange text between lines
1378 * \param max_text_width maximal text line width in pixels
1379 * The algo is similar to the one in libvo/sub.c:
1380 * 1. Place text, wrapping it when current line is full
1381 * 2. Try moving words from the end of a line to the beginning of the next one while it reduces
1382 * the difference in lengths between this two lines.
1383 * The result may not be optimal, but usually is good enough.
1384 */
1385 static void wrap_lines_smart(int max_text_width)
1386 {
1387 int i, j;
1388 glyph_info_t *cur, *s1, *e1, *s2, *s3, *w;
1389 int last_space;
1390 int break_type;
1391 int exit;
1392 int pen_shift_x;
1393 int pen_shift_y;
1394 int cur_line;
1395
1396 last_space = -1;
1397 text_info.n_lines = 1;
1398 break_type = 0;
1399 s1 = text_info.glyphs; // current line start
1400 for (i = 0; i < text_info.length; ++i) {
1401 int break_at, s_offset, len;
1402 cur = text_info.glyphs + i;
1403 break_at = -1;
1404 s_offset = s1->bbox.xMin + s1->pos.x;
1405 len = (cur->bbox.xMax + cur->pos.x) - s_offset;
1406
1407 if (cur->symbol == '\n') {
1408 break_type = 2;
1409 break_at = i;
1410 mp_msg(MSGT_ASS, MSGL_DBG2, "forced line break at %d\n", break_at);
1411 }
1412
1413 if (len >= max_text_width) {
1414 break_type = 1;
1415 break_at = last_space;
1416 if (break_at == -1)
1417 break_at = i - 1;
1418 if (break_at == -1)
1419 break_at = 0;
1420 mp_msg(MSGT_ASS, MSGL_DBG2, "overfill at %d\n", i);
1421 mp_msg(MSGT_ASS, MSGL_DBG2, "line break at %d\n", break_at);
1422 }
1423
1424 if (break_at != -1) {
1425 // need to use one more line
1426 // marking break_at+1 as start of a new line
1427 int lead = break_at + 1; // the first symbol of the new line
1428 if (text_info.n_lines >= MAX_LINES) {
1429 // to many lines !
1430 // no more linebreaks
1431 for (j = lead; j < text_info.length; ++j)
1432 text_info.glyphs[j].linebreak = 0;
1433 break;
1434 }
1435 if (lead < text_info.length)
1436 text_info.glyphs[lead].linebreak = break_type;
1437 last_space = -1;
1438 s1 = text_info.glyphs + lead;
1439 s_offset = s1->bbox.xMin + s1->pos.x;
1440 text_info.n_lines ++;
1441 }
1442
1443 if (cur->symbol == ' ')
1444 last_space = i;
1445
1446 // make sure the hard linebreak is not forgotten when
1447 // there was a new soft linebreak just inserted
1448 if (cur->symbol == '\n' && break_type == 1)
1449 i--;
1450 }
1451 #define DIFF(x,y) (((x) < (y)) ? (y - x) : (x - y))
1452 exit = 0;
1453 while (!exit) {
1454 exit = 1;
1455 w = s3 = text_info.glyphs;
1456 s1 = s2 = 0;
1457 for (i = 0; i <= text_info.length; ++i) {
1458 cur = text_info.glyphs + i;
1459 if ((i == text_info.length) || cur->linebreak) {
1460 s1 = s2;
1461 s2 = s3;
1462 s3 = cur;
1463 if (s1 && (s2->linebreak == 1)) { // have at least 2 lines, and linebreak is 'soft'
1464 int l1, l2, l1_new, l2_new;
1465
1466 w = s2;
1467 do { --w; } while ((w > s1) && (w->symbol == ' '));
1468 while ((w > s1) && (w->symbol != ' ')) { --w; }
1469 e1 = w;
1470 while ((e1 > s1) && (e1->symbol == ' ')) { --e1; }
1471 if (w->symbol == ' ') ++w;
1472
1473 l1 = ((s2-1)->bbox.xMax + (s2-1)->pos.x) - (s1->bbox.xMin + s1->pos.x);
1474 l2 = ((s3-1)->bbox.xMax + (s3-1)->pos.x) - (s2->bbox.xMin + s2->pos.x);
1475 l1_new = (e1->bbox.xMax + e1->pos.x) - (s1->bbox.xMin + s1->pos.x);
1476 l2_new = ((s3-1)->bbox.xMax + (s3-1)->pos.x) - (w->bbox.xMin + w->pos.x);
1477
1478 if (DIFF(l1_new, l2_new) < DIFF(l1, l2)) {
1479 w->linebreak = 1;
1480 s2->linebreak = 0;
1481 exit = 0;
1482 }
1483 }
1484 }
1485 if (i == text_info.length)
1486 break;
1487 }
1488
1489 }
1490 assert(text_info.n_lines >= 1);
1491 #undef DIFF
1492
1493 measure_text();
1494
1495 pen_shift_x = 0;
1496 pen_shift_y = 0;
1497 cur_line = 1;
1498 for (i = 0; i < text_info.length; ++i) {
1499 cur = text_info.glyphs + i;
1500 if (cur->linebreak) {
1501 int height = text_info.lines[cur_line - 1].desc + text_info.lines[cur_line].asc;
1502 cur_line ++;
1503 pen_shift_x = - cur->pos.x;
1504 pen_shift_y += d6_to_int(height + double_to_d6(global_settings->line_spacing));
1505 mp_msg(MSGT_ASS, MSGL_DBG2, "shifting from %d to %d by (%d, %d)\n", i, text_info.length - 1, pen_shift_x, pen_shift_y);
1506 }
1507 cur->pos.x += pen_shift_x;
1508 cur->pos.y += pen_shift_y;
1509 }
1510 }
1511
1512 /**
1513 * \brief determine karaoke effects
1514 * Karaoke effects cannot be calculated during parse stage (get_next_char()),
1515 * so they are done in a separate step.
1516 * Parse stage: when karaoke style override is found, its parameters are stored in the next glyph's
1517 * (the first glyph of the karaoke word)'s effect_type and effect_timing.
1518 * This function:
1519 * 1. sets effect_type for all glyphs in the word (_karaoke_ word)
1520 * 2. sets effect_timing for all glyphs to x coordinate of the border line between the left and right karaoke parts
1521 * (left part is filled with PrimaryColour, right one - with SecondaryColour).
1522 */
1523 static void process_karaoke_effects(void)
1524 {
1525 glyph_info_t *cur, *cur2;
1526 glyph_info_t *s1, *e1; // start and end of the current word
1527 glyph_info_t *s2; // start of the next word
1528 int i;
1529 int timing; // current timing
1530 int tm_start, tm_end; // timings at start and end of the current word
1531 int tm_current;
1532 double dt;
1533 int x;
1534 int x_start, x_end;
1535
1536 tm_current = frame_context.time - render_context.event->Start;
1537 timing = 0;
1538 s1 = s2 = 0;
1539 for (i = 0; i <= text_info.length; ++i) {
1540 cur = text_info.glyphs + i;
1541 if ((i == text_info.length) || (cur->effect_type != EF_NONE)) {
1542 s1 = s2;
1543 s2 = cur;
1544 if (s1) {
1545 e1 = s2 - 1;
1546 tm_start = timing + s1->effect_skip_timing;
1547 tm_end = tm_start + s1->effect_timing;
1548 timing = tm_end;
1549 x_start = 1000000;
1550 x_end = -1000000;
1551 for (cur2 = s1; cur2 <= e1; ++cur2) {
1552 x_start = FFMIN(x_start, cur2->bbox.xMin + cur2->pos.x);
1553 x_end = FFMAX(x_end, cur2->bbox.xMax + cur2->pos.x);
1554 }
1555
1556 dt = (tm_current - tm_start);
1557 if ((s1->effect_type == EF_KARAOKE) || (s1->effect_type == EF_KARAOKE_KO)) {
1558 if (dt > 0)
1559 x = x_end + 1;
1560 else
1561 x = x_start;
1562 } else if (s1->effect_type == EF_KARAOKE_KF) {
1563 dt /= (tm_end - tm_start);
1564 x = x_start + (x_end - x_start) * dt;
1565 } else {
1566 mp_msg(MSGT_ASS, MSGL_ERR, MSGTR_LIBASS_UnknownEffectType_InternalError);
1567 continue;
1568 }
1569
1570 for (cur2 = s1; cur2 <= e1; ++cur2) {
1571 cur2->effect_type = s1->effect_type;
1572 cur2->effect_timing = x - cur2->pos.x;
1573 }
1574 }
1575 }
1576 }
1577 }
1578
1579 /**
1580 * \brief Calculate base point for positioning and rotation
1581 * \param bbox text bbox
1582 * \param alignment alignment
1583 * \param bx, by out: base point coordinates
1584 */
1585 static void get_base_point(FT_BBox bbox, int alignment, int* bx, int* by)
1586 {
1587 const int halign = alignment & 3;
1588 const int valign = alignment & 12;
1589 if (bx)
1590 switch(halign) {
1591 case HALIGN_LEFT:
1592 *bx = bbox.xMin;
1593 break;
1594 case HALIGN_CENTER:
1595 *bx = (bbox.xMax + bbox.xMin) / 2;
1596 break;
1597 case HALIGN_RIGHT:
1598 *bx = bbox.xMax;
1599 break;
1600 }
1601 if (by)
1602 switch(valign) {
1603 case VALIGN_TOP:
1604 *by = bbox.yMin;
1605 break;
1606 case VALIGN_CENTER:
1607 *by = (bbox.yMax + bbox.yMin) / 2;
1608 break;
1609 case VALIGN_SUB:
1610 *by = bbox.yMax;
1611 break;
1612 }
1613 }
1614
1615 /**
1616 * \brief Multiply 4-vector by 4-matrix
1617 * \param a 4-vector
1618 * \param m 4-matrix]
1619 * \param b out: 4-vector
1620 * Calculates a * m and stores result in b
1621 */
1622 static inline void transform_point_3d(double *a, double *m, double *b)
1623 {
1624 b[0] = a[0] * m[0] + a[1] * m[4] + a[2] * m[8] + a[3] * m[12];
1625 b[1] = a[0] * m[1] + a[1] * m[5] + a[2] * m[9] + a[3] * m[13];
1626 b[2] = a[0] * m[2] + a[1] * m[6] + a[2] * m[10] + a[3] * m[14];
1627 b[3] = a[0] * m[3] + a[1] * m[7] + a[2] * m[11] + a[3] * m[15];
1628 }
1629
1630 /**
1631 * \brief Apply 3d transformation to a vector
1632 * \param v FreeType vector (2d)
1633 * \param m 4-matrix
1634 * Transforms v by m, projects the result back to the screen plane
1635 * Result is returned in v.
1636 */
1637 static inline void transform_vector_3d(FT_Vector* v, double *m) {
1638 const double camera = 2500 * frame_context.border_scale; // camera distance
1639 const double cutoff_z = 10.;
1640 double a[4], b[4];
1641 a[0] = d6_to_double(v->x);
1642 a[1] = d6_to_double(v->y);
1643 a[2] = 0.;
1644 a[3] = 1.;
1645 transform_point_3d(a, m, b);
1646 /* Apply perspective projection with the following matrix:
1647 2500 0 0 0
1648 0 2500 0 0
1649 0 0 0 0
1650 0 0 8 2500
1651 where 2500 is camera distance, 8 - z-axis scale.
1652 Camera is always located in (org_x, org_y, -2500). This means
1653 that different subtitle events can be displayed at the same time
1654 using different cameras. */
1655 b[0] *= camera;
1656 b[1] *= camera;
1657 b[3] = 8 * b[2] + camera;
1658 if (b[3] < cutoff_z)
1659 b[3] = cutoff_z;
1660 v->x = double_to_d6(b[0] / b[3]);
1661 v->y = double_to_d6(b[1] / b[3]);
1662 }
1663
1664 /**
1665 * \brief Apply 3d transformation to a glyph
1666 * \param glyph FreeType glyph
1667 * \param m 4-matrix
1668 * Transforms glyph by m, projects the result back to the screen plane
1669 * Result is returned in glyph.
1670 */
1671 static inline void transform_glyph_3d(FT_Glyph glyph, double *m, FT_Vector shift) {
1672 int i;
1673 FT_Outline* outline = &((FT_OutlineGlyph)glyph)->outline;
1674 FT_Vector* p = outline->points;
1675
1676 for (i=0; i<outline->n_points; i++) {
1677 p[i].x += shift.x;
1678 p[i].y += shift.y;
1679 transform_vector_3d(p + i, m);
1680 p[i].x -= shift.x;
1681 p[i].y -= shift.y;
1682 }
1683
1684 //transform_vector_3d(&glyph->advance, m);
1685 }
1686
1687 /**
1688 * \brief Apply 3d transformation to several objects
1689 * \param shift FreeType vector
1690 * \param glyph FreeType glyph
1691 * \param glyph2 FreeType glyph
1692 * \param frx x-axis rotation angle
1693 * \param fry y-axis rotation angle
1694 * \param frz z-axis rotation angle
1695 * Rotates both glyphs by frx, fry and frz. Shift vector is added before rotation and subtracted after it.
1696 */
1697 static void transform_3d(FT_Vector shift, FT_Glyph* glyph, FT_Glyph* glyph2, double frx, double fry, double frz)
1698 {
1699 fry = - fry; // FreeType's y axis goes in the opposite direction
1700 if (frx != 0. || fry != 0. || frz != 0.) {
1701 double m[16];
1702 double sx = sin(frx);
1703 double sy = sin(fry);
1704 double sz = sin(frz);
1705 double cx = cos(frx);
1706 double cy = cos(fry);
1707 double cz = cos(frz);
1708 m[0] = cy * cz; m[1] = cy*sz; m[2] = -sy; m[3] = 0.0;
1709 m[4] = -cx*sz + sx*sy*cz; m[5] = cx*cz + sx*sy*sz; m[6] = sx*cy; m[7] = 0.0;
1710 m[8] = sx*sz + cx*sy*cz; m[9] = -sx*cz + cx*sy*sz; m[10] = cx*cy; m[11] = 0.0;
1711 m[12] = 0.0; m[13] = 0.0; m[14] = 0.0; m[15] = 1.0;
1712
1713 if (glyph && *glyph)
1714 transform_glyph_3d(*glyph, m, shift);
1715
1716 if (glyph2 && *glyph2)
1717 transform_glyph_3d(*glyph2, m, shift);
1718 }
1719 }
1720
1721 /**
1722 * \brief Main ass rendering function, glues everything together
1723 * \param event event to render
1724 * Process event, appending resulting ass_image_t's to images_root.
1725 */
1726 static int ass_render_event(ass_event_t* event, event_images_t* event_images)
1727 {
1728 char* p;
1729 FT_UInt previous;
1730 FT_UInt num_glyphs;
1731 FT_Vector pen;
1732 unsigned code;
1733 FT_BBox bbox;
1734 int i, j;
1735 FT_Vector shift;
1736 int MarginL, MarginR, MarginV;
1737 int last_break;
1738 int alignment, halign, valign;
1739 int device_x = 0, device_y = 0;
1740
1741 if (event->Style >= frame_context.track->n_styles) {
1742 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_NoStyleFound);
1743 return 1;
1744 }
1745 if (!event->Text) {
1746 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_EmptyEvent);
1747 return 1;
1748 }
1749
1750 init_render_context(event);
1751
1752 text_info.length = 0;
1753 pen.x = 0;
1754 pen.y = 0;
1755 previous = 0;
1756 num_glyphs = 0;
1757 p = event->Text;
1758 // Event parsing.
1759 while (1) {
1760 // get next char, executing style override
1761 // this affects render_context
1762 do {
1763 code = get_next_char(&p);
1764 } while (code && render_context.drawing_mode); // skip everything in drawing mode
1765
1766 // face could have been changed in get_next_char
1767 if (!render_context.font) {
1768 free_render_context();
1769 return 1;
1770 }
1771
1772 if (code == 0)
1773 break;
1774
1775 if (text_info.length >= MAX_GLYPHS) {
1776 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_MAX_GLYPHS_Reached,
1777 (int)(event - frame_context.track->events), event->Start, event->Duration, event->Text);
1778 break;
1779 }
1780
1781 if ( previous && code ) {
1782 FT_Vector delta;
1783 delta = ass_font_get_kerning(render_context.font, previous, code);
1784 pen.x += delta.x * render_context.scale_x;
1785 pen.y += delta.y * render_context.scale_y;
1786 }
1787
1788 shift.x = pen.x & 63;
1789 shift.y = pen.y & 63;
1790
1791 ass_font_set_transform(render_context.font,
1792 render_context.scale_x * frame_context.font_scale_x,
1793 render_context.scale_y,
1794 &shift );
1795
1796 get_outline_glyph(code, text_info.glyphs + text_info.length, &shift);
1797
1798 text_info.glyphs[text_info.length].pos.x = pen.x >> 6;
1799 text_info.glyphs[text_info.length].pos.y = pen.y >> 6;
1800
1801 pen.x += text_info.glyphs[text_info.length].advance.x;
1802 pen.x += double_to_d6(render_context.hspacing);
1803 pen.y += text_info.glyphs[text_info.length].advance.y;
1804
1805 previous = code;
1806
1807 text_info.glyphs[text_info.length].symbol = code;
1808 text_info.glyphs[text_info.length].linebreak = 0;
1809 for (i = 0; i < 4; ++i) {
1810 uint32_t clr = render_context.c[i];
1811 change_alpha(&clr, mult_alpha(_a(clr), render_context.fade), 1.);
1812 text_info.glyphs[text_info.length].c[i] = clr;
1813 }
1814 text_info.glyphs[text_info.length].effect_type = render_context.effect_type;
1815 text_info.glyphs[text_info.length].effect_timing = render_context.effect_timing;
1816 text_info.glyphs[text_info.length].effect_skip_timing = render_context.effect_skip_timing;
1817 text_info.glyphs[text_info.length].be = render_context.be;
1818 text_info.glyphs[text_info.length].shadow = render_context.shadow;
1819 text_info.glyphs[text_info.length].frx = render_context.frx;
1820 text_info.glyphs[text_info.length].fry = render_context.fry;
1821 text_info.glyphs[text_info.length].frz = render_context.frz;
1822 ass_font_get_asc_desc(render_context.font, code,
1823 &text_info.glyphs[text_info.length].asc,
1824 &text_info.glyphs[text_info.length].desc);
1825 text_info.glyphs[text_info.length].asc *= render_context.scale_y;
1826 text_info.glyphs[text_info.length].desc *= render_context.scale_y;
1827
1828 // fill bitmap_hash_key
1829 text_info.glyphs[text_info.length].hash_key.font = render_context.font;
1830 text_info.glyphs[text_info.length].hash_key.size = render_context.font_size;
1831 text_info.glyphs[text_info.length].hash_key.outline = render_context.border * 0xFFFF;
1832 text_info.glyphs[text_info.length].hash_key.scale_x = render_context.scale_x * 0xFFFF;
1833 text_info.glyphs[text_info.length].hash_key.scale_y = render_context.scale_y * 0xFFFF;
1834 text_info.glyphs[text_info.length].hash_key.frx = render_context.frx * 0xFFFF;
1835 text_info.glyphs[text_info.length].hash_key.fry = render_context.fry * 0xFFFF;
1836 text_info.glyphs[text_info.length].hash_key.frz = render_context.frz * 0xFFFF;
1837 text_info.glyphs[text_info.length].hash_key.bold = render_context.bold;
1838 text_info.glyphs[text_info.length].hash_key.italic = render_context.italic;
1839 text_info.glyphs[text_info.length].hash_key.ch = code;
1840 text_info.glyphs[text_info.length].hash_key.advance = shift;
1841 text_info.glyphs[text_info.length].hash_key.be = render_context.be;
1842
1843 text_info.length++;
1844
1845 render_context.effect_type = EF_NONE;
1846 render_context.effect_timing = 0;
1847 render_context.effect_skip_timing = 0;
1848 }
1849
1850 if (text_info.length == 0) {
1851 // no valid symbols in the event; this can be smth like {comment}
1852 free_render_context();
1853 return 1;
1854 }
1855
1856 // depends on glyph x coordinates being monotonous, so it should be done before line wrap
1857 process_karaoke_effects();
1858
1859 // alignments
1860 alignment = render_context.alignment;
1861 halign = alignment & 3;
1862 valign = alignment & 12;
1863
1864 MarginL = (event->MarginL) ? event->MarginL : render_context.style->MarginL;
1865 MarginR = (event->MarginR) ? event->MarginR : render_context.style->MarginR;
1866 MarginV = (event->MarginV) ? event->MarginV : render_context.style->MarginV;
1867
1868 if (render_context.evt_type != EVENT_HSCROLL) {
1869 int max_text_width;
1870
1871 // calculate max length of a line
1872 max_text_width = x2scr(frame_context.track->PlayResX - MarginR) - x2scr(MarginL);
1873
1874 // rearrange text in several lines
1875 wrap_lines_smart(max_text_width);
1876
1877 // align text
1878 last_break = -1;
1879 for (i = 1; i < text_info.length + 1; ++i) { // (text_info.length + 1) is the end of the last line
1880 if ((i == text_info.length) || text_info.glyphs[i].linebreak) {
1881 int width, shift = 0;
1882 glyph_info_t* first_glyph = text_info.glyphs + last_break + 1;
1883 glyph_info_t* last_glyph = text_info.glyphs + i - 1;
1884
1885 while ((last_glyph > first_glyph) && ((last_glyph->symbol == '\n') || (last_glyph->symbol == 0)))
1886 last_glyph --;
1887
1888 width = last_glyph->pos.x + d6_to_int(last_glyph->advance.x) - first_glyph->pos.x;
1889 if (halign == HALIGN_LEFT) { // left aligned, no action
1890 shift = 0;
1891 } else if (halign == HALIGN_RIGHT) { // right aligned
1892 shift = max_text_width - width;
1893 } else if (halign == HALIGN_CENTER) { // centered
1894 shift = (max_text_width - width) / 2;
1895 }
1896 for (j = last_break + 1; j < i; ++j) {
1897 text_info.glyphs[j].pos.x += shift;
1898 }
1899 last_break = i - 1;
1900 }
1901 }
1902 } else { // render_context.evt_type == EVENT_HSCROLL
1903 measure_text();
1904 }
1905
1906 // determing text bounding box
1907 compute_string_bbox(&text_info, &bbox);
1908
1909 // determine device coordinates for text
1910
1911 // x coordinate for everything except positioned events
1912 if (render_context.evt_type == EVENT_NORMAL ||
1913 render_context.evt_type == EVENT_VSCROLL) {
1914 device_x = x2scr(MarginL);
1915 } else if (render_context.evt_type == EVENT_HSCROLL) {
1916 if (render_context.scroll_direction == SCROLL_RL)
1917 device_x = x2scr(frame_context.track->PlayResX - render_context.scroll_shift);
1918 else if (render_context.scroll_direction == SCROLL_LR)
1919 device_x = x2scr(render_context.scroll_shift) - (bbox.xMax - bbox.xMin);
1920 }
1921
1922 // y coordinate for everything except positioned events
1923 if (render_context.evt_type == EVENT_NORMAL ||
1924 render_context.evt_type == EVENT_HSCROLL) {
1925 if (valign == VALIGN_TOP) { // toptitle
1926 device_y = y2scr_top(MarginV) + d6_to_int(text_info.lines[0].asc);
1927 } else if (valign == VALIGN_CENTER) { // midtitle
1928 int scr_y = y2scr(frame_context.track->PlayResY / 2);
1929 device_y = scr_y - (bbox.yMax - bbox.yMin) / 2;
1930 } else { // subtitle
1931 int scr_y;
1932 if (valign != VALIGN_SUB)
1933 mp_msg(MSGT_ASS, MSGL_V, "Invalid valign, supposing 0 (subtitle)\n");
1934 scr_y = y2scr_sub(frame_context.track->PlayResY - MarginV);
1935 device_y = scr_y;
1936 device_y -= d6_to_int(text_info.height);
1937 device_y += d6_to_int(text_info.lines[0].asc);
1938 }
1939 } else if (render_context.evt_type == EVENT_VSCROLL) {
1940 if (render_context.scroll_direction == SCROLL_TB)
1941 device_y = y2scr(render_context.clip_y0 + render_context.scroll_shift) - (bbox.yMax - bbox.yMin);
1942 else if (render_context.scroll_direction == SCROLL_BT)
1943 device_y = y2scr(render_context.clip_y1 - render_context.scroll_shift);
1944 }
1945
1946 // positioned events are totally different
1947 if (render_context.evt_type == EVENT_POSITIONED) {
1948 int base_x = 0;
1949 int base_y = 0;
1950 mp_msg(MSGT_ASS, MSGL_DBG2, "positioned event at %f, %f\n", render_context.pos_x, render_context.pos_y);
1951 get_base_point(bbox, alignment, &base_x, &base_y);
1952 device_x = x2scr(render_context.pos_x) - base_x;
1953 device_y = y2scr(render_context.pos_y) - base_y;
1954 }
1955
1956 // fix clip coordinates (they depend on alignment)
1957 render_context.clip_x0 = x2scr(render_context.clip_x0);
1958 render_context.clip_x1 = x2scr(render_context.clip_x1);
1959 if (render_context.evt_type == EVENT_NORMAL ||
1960 render_context.evt_type == EVENT_HSCROLL ||
1961 render_context.evt_type == EVENT_VSCROLL) {
1962 if (valign == VALIGN_TOP) {
1963 render_context.clip_y0 = y2scr_top(render_context.clip_y0);
1964 render_context.clip_y1 = y2scr_top(render_context.clip_y1);
1965 } else if (valign == VALIGN_CENTER) {
1966 render_context.clip_y0 = y2scr(render_context.clip_y0);
1967 render_context.clip_y1 = y2scr(render_context.clip_y1);
1968 } else if (valign == VALIGN_SUB) {
1969 render_context.clip_y0 = y2scr_sub(render_context.clip_y0);
1970 render_context.clip_y1 = y2scr_sub(render_context.clip_y1);
1971 }
1972 } else if (render_context.evt_type == EVENT_POSITIONED) {
1973 render_context.clip_y0 = y2scr(render_context.clip_y0);
1974 render_context.clip_y1 = y2scr(render_context.clip_y1);
1975 }
1976
1977 // calculate rotation parameters
1978 {
1979 FT_Vector center;
1980
1981 if (render_context.have_origin) {
1982 center.x = x2scr(render_context.org_x);
1983 center.y = y2scr(render_context.org_y);
1984 } else {
1985 int bx, by;
1986 get_base_point(bbox, alignment, &bx, &by);
1987 center.x = device_x + bx;
1988 center.y = device_y + by;
1989 }
1990
1991 for (i = 0; i < text_info.length; ++i) {
1992 glyph_info_t* info = text_info.glyphs + i;
1993
1994 if (info->hash_key.frx || info->hash_key.fry || info->hash_key.frz) {
1995 info->hash_key.shift_x = info->pos.x + device_x - center.x;
1996 info->hash_key.shift_y = - (info->pos.y + device_y - center.y);
1997 } else {
1998 info->hash_key.shift_x = 0;
1999 info->hash_key.shift_y = 0;
2000 }
2001 }
2002 }
2003
2004 // convert glyphs to bitmaps
2005 for (i = 0; i < text_info.length; ++i)
2006 get_bitmap_glyph(text_info.glyphs + i);
2007
2008 event_images->top = device_y - d6_to_int(text_info.lines[0].asc);
2009 event_images->height = d6_to_int(text_info.height);
2010 event_images->detect_collisions = render_context.detect_collisions;
2011 event_images->shift_direction = (valign == VALIGN_TOP) ? 1 : -1;
2012 event_images->event = event;
2013 event_images->imgs = render_text(&text_info, device_x, device_y);
2014
2015 free_render_context();
2016
2017 return 0;
2018 }
2019
2020 /**
2021 * \brief deallocate image list
2022 * \param img list pointer
2023 */
2024 static void ass_free_images(ass_image_t* img)
2025 {
2026 while (img) {
2027 ass_image_t* next = img->next;
2028 free(img);
2029 img = next;
2030 }
2031 }
2032
2033 static void ass_reconfigure(ass_renderer_t* priv)
2034 {
2035 priv->render_id = ++last_render_id;
2036 ass_glyph_cache_reset();
2037 ass_bitmap_cache_reset();
2038 ass_free_images(priv->prev_images_root);
2039 priv->prev_images_root = 0;
2040 }
2041
2042 void ass_set_frame_size(ass_renderer_t* priv, int w, int h)
2043 {
2044 if (priv->settings.frame_width != w || priv->settings.frame_height != h) {
2045 priv->settings.frame_width = w;
2046 priv->settings.frame_height = h;
2047 if (priv->settings.aspect == 0.)
2048 priv->settings.aspect = ((double)w) / h;
2049 ass_reconfigure(priv);
2050 }
2051 }
2052
2053 void ass_set_margins(ass_renderer_t* priv, int t, int b, int l, int r)
2054 {
2055 if (priv->settings.left_margin != l ||
2056 priv->settings.right_margin != r ||
2057 priv->settings.top_margin != t ||
2058 priv->settings.bottom_margin != b) {
2059 priv->settings.left_margin = l;
2060 priv->settings.right_margin = r;
2061 priv->settings.top_margin = t;
2062 priv->settings.bottom_margin = b;
2063 ass_reconfigure(priv);
2064 }
2065 }
2066
2067 void ass_set_use_margins(ass_renderer_t* priv, int use)
2068 {
2069 priv->settings.use_margins = use;
2070 }
2071
2072 void ass_set_aspect_ratio(ass_renderer_t* priv, double ar)
2073 {
2074 if (priv->settings.aspect != ar) {
2075 priv->settings.aspect = ar;
2076 ass_reconfigure(priv);
2077 }
2078 }
2079
2080 void ass_set_font_scale(ass_renderer_t* priv, double font_scale)
2081 {
2082 if (priv->settings.font_size_coeff != font_scale) {
2083 priv->settings.font_size_coeff = font_scale;
2084 ass_reconfigure(priv);
2085 }
2086 }
2087
2088 void ass_set_hinting(ass_renderer_t* priv, ass_hinting_t ht)
2089 {
2090 if (priv->settings.hinting != ht) {
2091 priv->settings.hinting = ht;
2092 ass_reconfigure(priv);
2093 }
2094 }
2095
2096 void ass_set_line_spacing(ass_renderer_t* priv, double line_spacing)
2097 {
2098 priv->settings.line_spacing = line_spacing;
2099 }
2100
2101 static int ass_set_fonts_(ass_renderer_t* priv, const char* default_font, const char* default_family, int fc)
2102 {
2103 if (priv->settings.default_font)
2104 free(priv->settings.default_font);
2105 if (priv->settings.default_family)
2106 free(priv->settings.default_family);
2107
2108 priv->settings.default_font = default_font ? strdup(default_font) : 0;
2109 priv->settings.default_family = default_family ? strdup(default_family) : 0;
2110
2111 if (priv->fontconfig_priv)
2112 fontconfig_done(priv->fontconfig_priv);
2113 priv->fontconfig_priv = fontconfig_init(priv->library, priv->ftlibrary, default_family, default_font, fc);
2114
2115 return !!priv->fontconfig_priv;
2116 }
2117
2118 int ass_set_fonts(ass_renderer_t* priv, const char* default_font, const char* default_family)
2119 {
2120 return ass_set_fonts_(priv, default_font, default_family, 1);
2121 }
2122
2123 int ass_set_fonts_nofc(ass_renderer_t* priv, const char* default_font, const char* default_family)
2124 {
2125 return ass_set_fonts_(priv, default_font, default_family, 0);
2126 }
2127
2128 /**
2129 * \brief Start a new frame
2130 */
2131 static int ass_start_frame(ass_renderer_t *priv, ass_track_t* track, long long now)
2132 {
2133 ass_renderer = priv;
2134 global_settings = &priv->settings;
2135
2136 if (!priv->settings.frame_width && !priv->settings.frame_height)
2137 return 1; // library not initialized
2138
2139 if (track->n_events == 0)
2140 return 1; // nothing to do
2141
2142 frame_context.ass_priv = priv;
2143 frame_context.width = global_settings->frame_width;
2144 frame_context.height = global_settings->frame_height;
2145 frame_context.orig_width = global_settings->frame_width - global_settings->left_margin - global_settings->right_margin;
2146 frame_context.orig_height = global_settings->frame_height - global_settings->top_margin - global_settings->bottom_margin;
2147 frame_context.orig_width_nocrop = global_settings->frame_width -
2148 FFMAX(global_settings->left_margin, 0) -
2149 FFMAX(global_settings->right_margin, 0);
2150 frame_context.orig_height_nocrop = global_settings->frame_height -
2151 FFMAX(global_settings->top_margin, 0) -
2152 FFMAX(global_settings->bottom_margin, 0);
2153 frame_context.track = track;
2154 frame_context.time = now;
2155
2156 ass_lazy_track_init();
2157
2158 frame_context.font_scale = global_settings->font_size_coeff *
2159 frame_context.orig_height / frame_context.track->PlayResY;
2160 frame_context.border_scale = ((double)frame_context.orig_height) / frame_context.track->PlayResY;
2161
2162 if (frame_context.orig_width * track->PlayResY == frame_context.orig_height * track->PlayResX)
2163 frame_context.font_scale_x = 1.;
2164 else
2165 frame_context.font_scale_x = ((double)(frame_context.orig_width * track->PlayResY)) / (frame_context.orig_height * track->PlayResX);
2166
2167 priv->prev_images_root = priv->images_root;
2168 priv->images_root = 0;
2169
2170 return 0;
2171 }
2172
2173 static int cmp_event_layer(const void* p1, const void* p2)
2174 {
2175 ass_event_t* e1 = ((event_images_t*)p1)->event;
2176 ass_event_t* e2 = ((event_images_t*)p2)->event;
2177 if (e1->Layer < e2->Layer)
2178 return -1;
2179 if (e1->Layer > e2->Layer)
2180 return 1;
2181 if (e1->ReadOrder < e2->ReadOrder)
2182 return -1;
2183 if (e1->ReadOrder > e2->ReadOrder)
2184 return 1;
2185 return 0;
2186 }
2187
2188 #define MAX_EVENTS 100
2189
2190 static render_priv_t* get_render_priv(ass_event_t* event)
2191 {
2192 if (!event->render_priv)
2193 event->render_priv = calloc(1, sizeof(render_priv_t));
2194 // FIXME: check render_id
2195 if (ass_renderer->render_id != event->render_priv->render_id) {
2196 memset(event->render_priv, 0, sizeof(render_priv_t));
2197 event->render_priv->render_id = ass_renderer->render_id;
2198 }
2199 return event->render_priv;
2200 }
2201
2202 typedef struct segment_s {
2203 int a, b; // top and height
2204 } segment_t;
2205
2206 static int overlap(segment_t* s1, segment_t* s2)
2207 {
2208 if (s1->a >= s2->b || s2->a >= s1->b)
2209 return 0;
2210 return 1;
2211 }
2212
2213 static int cmp_segment(const void* p1, const void* p2)
2214 {
2215 return ((segment_t*)p1)->a - ((segment_t*)p2)->a;
2216 }
2217
2218 static void shift_event(event_images_t* ei, int shift)
2219 {
2220 ass_image_t* cur = ei->imgs;
2221 while (cur) {
2222 cur->dst_y += shift;
2223 // clip top and bottom
2224 if (cur->dst_y < 0) {
2225 int clip = - cur->dst_y;
2226 cur->h -= clip;
2227 cur->bitmap += clip * cur->stride;
2228 cur->dst_y = 0;
2229 }
2230 if (cur->dst_y + cur->h >= frame_context.height) {
2231 int clip = cur->dst_y + cur->h - frame_context.height;
2232 cur->h -= clip;
2233 }
2234 if (cur->h <= 0) {
2235 cur->h = 0;
2236 cur->dst_y = 0;
2237 }
2238 cur = cur->next;
2239 }
2240 ei->top += shift;
2241 }
2242
2243 // dir: 1 - move down
2244 // -1 - move up
2245 static int fit_segment(segment_t* s, segment_t* fixed, int* cnt, int dir)
2246 {
2247 int i;
2248 int shift = 0;
2249
2250 if (dir == 1) // move down
2251 for (i = 0; i < *cnt; ++i) {
2252 if (s->b + shift <= fixed[i].a || s->a + shift >= fixed[i].b)
2253 continue;
2254 shift = fixed[i].b - s->a;
2255 }
2256 else // dir == -1, move up
2257 for (i = *cnt-1; i >= 0; --i) {
2258 if (s->b + shift <= fixed[i].a || s->a + shift >= fixed[i].b)
2259 continue;
2260 shift = fixed[i].a - s->b;
2261 }
2262
2263 fixed[*cnt].a = s->a + shift;
2264 fixed[*cnt].b = s->b + shift;
2265 (*cnt)++;
2266 qsort(fixed, *cnt, sizeof(segment_t), cmp_segment);
2267
2268 return shift;
2269 }
2270
2271 static void fix_collisions(event_images_t* imgs, int cnt)
2272 {
2273 segment_t used[MAX_EVENTS];
2274 int cnt_used = 0;
2275 int i, j;
2276
2277 // fill used[] with fixed events
2278 for (i = 0; i < cnt; ++i) {
2279 render_priv_t* priv;
2280 if (!imgs[i].detect_collisions) continue;
2281 priv = get_render_priv(imgs[i].event);
2282 if (priv->height > 0) { // it's a fixed event
2283 segment_t s;
2284 s.a = priv->top;
2285 s.b = priv->top + priv->height;
2286 if (priv->height != imgs[i].height) { // no, it's not
2287 mp_msg(MSGT_ASS, MSGL_WARN, MSGTR_LIBASS_EventHeightHasChanged);
2288 priv->top = 0;
2289 priv->height = 0;
2290 }
2291 for (j = 0; j < cnt_used; ++j)
2292 if (overlap(&s, used + j)) { // no, it's not
2293 priv->top = 0;
2294 priv->height = 0;
2295 }
2296 if (priv->height > 0) { // still a fixed event
2297 used[cnt_used].a = priv->top;
2298 used[cnt_used].b = priv->top + priv->height;
2299 cnt_used ++;
2300 shift_event(imgs + i, priv->top - imgs[i].top);
2301 }
2302 }
2303 }
2304 qsort(used, cnt_used, sizeof(segment_t), cmp_segment);
2305
2306 // try to fit other events in free spaces
2307 for (i = 0; i < cnt; ++i) {
2308 render_priv_t* priv;
2309 if (!imgs[i].detect_collisions) continue;
2310 priv = get_render_priv(imgs[i].event);
2311 if (priv->height == 0) { // not a fixed event
2312 int shift;
2313 segment_t s;
2314 s.a = imgs[i].top;
2315 s.b = imgs[i].top + imgs[i].height;
2316 shift = fit_segment(&s, used, &cnt_used, imgs[i].shift_direction);
2317 if (shift) shift_event(imgs + i, shift);
2318 // make it fixed
2319 priv->top = imgs[i].top;
2320 priv->height = imgs[i].height;
2321 }
2322
2323 }
2324 }
2325
2326 /**
2327 * \brief compare two images
2328 * \param i1 first image
2329 * \param i2 second image
2330 * \return 0 if identical, 1 if different positions, 2 if different content
2331 */
2332 static int ass_image_compare(ass_image_t *i1, ass_image_t *i2)
2333 {
2334 if (i1->w != i2->w) return 2;
2335 if (i1->h != i2->h) return 2;
2336 if (i1->stride != i2->stride) return 2;
2337 if (i1->color != i2->color) return 2;
2338 if (i1->bitmap != i2->bitmap)
2339 return 2;
2340 if (i1->dst_x != i2->dst_x) return 1;
2341 if (i1->dst_y != i2->dst_y) return 1;
2342 return 0;
2343 }
2344
2345 /**
2346 * \brief compare current and previous image list
2347 * \param priv library handle
2348 * \return 0 if identical, 1 if different positions, 2 if different content
2349 */
2350 static int ass_detect_change(ass_renderer_t *priv)
2351 {
2352 ass_image_t* img, *img2;
2353 int diff;
2354
2355 img = priv->prev_images_root;
2356 img2 = priv->images_root;
2357 diff = 0;
2358 while (img && diff < 2) {
2359 ass_image_t* next, *next2;
2360 next = img->next;
2361 if (img2) {
2362 int d = ass_image_compare(img, img2);
2363 if (d > diff) diff = d;
2364 next2 = img2->next;
2365 } else {
2366 // previous list is shorter
2367 diff = 2;
2368 break;
2369 }
2370 img = next;
2371 img2 = next2;
2372 }
2373
2374 // is the previous list longer?
2375 if (img2)
2376 diff = 2;
2377
2378 return diff;
2379 }
2380
2381 /**
2382 * \brief render a frame
2383 * \param priv library handle
2384 * \param track track
2385 * \param now current video timestamp (ms)
2386 * \param detect_change a value describing how the new images differ from the previous ones will be written here:
2387 * 0 if identical, 1 if different positions, 2 if different content.
2388 * Can be NULL, in that case no detection is performed.
2389 */
2390 ass_image_t* ass_render_frame(ass_renderer_t *priv, ass_track_t* track, long long now, int* detect_change)
2391 {
2392 int i, cnt, rc;
2393 event_images_t* last;
2394 ass_image_t** tail;
2395
2396 // init frame
2397 rc = ass_start_frame(priv, track, now);
2398 if (rc != 0)
2399 return 0;
2400
2401 // render events separately
2402 cnt = 0;
2403 for (i = 0; i < track->n_events; ++i) {
2404 ass_event_t* event = track->events + i;
2405 if ( (event->Start <= now) && (now < (event->Start + event->Duration)) ) {
2406 if (cnt >= priv->eimg_size) {
2407 priv->eimg_size += 100;
2408 priv->eimg = realloc(priv->eimg, priv->eimg_size * sizeof(event_images_t));
2409 }
2410 rc = ass_render_event(event, priv->eimg + cnt);
2411 if (!rc) ++cnt;
2412 }
2413 }
2414
2415 // sort by layer
2416 qsort(priv->eimg, cnt, sizeof(event_images_t), cmp_event_layer);
2417
2418 // call fix_collisions for each group of events with the same layer
2419 last = priv->eimg;
2420 for (i = 1; i < cnt; ++i)
2421 if (last->event->Layer != priv->eimg[i].event->Layer) {
2422 fix_collisions(last, priv->eimg + i - last);
2423 last = priv->eimg + i;
2424 }
2425 if (cnt > 0)
2426 fix_collisions(last, priv->eimg + cnt - last);
2427
2428 // concat lists
2429 tail = &ass_renderer->images_root;
2430 for (i = 0; i < cnt; ++i) {
2431 ass_image_t* cur = priv->eimg[i].imgs;
2432 while (cur) {
2433 *tail = cur;
2434 tail = &cur->next;
2435 cur = cur->next;
2436 }
2437 }
2438
2439 if (detect_change)
2440 *detect_change = ass_detect_change(priv);
2441
2442 // free the previous image list
2443 ass_free_images(priv->prev_images_root);
2444 priv->prev_images_root = 0;
2445
2446 return ass_renderer->images_root;
2447 }
2448
MPlayer development branch