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