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