git.sesse.net Git - vlc/blob - modules/misc/freetype.c

   1 /*****************************************************************************
   2  * freetype.c : Put text on the video, using freetype2
   3  *****************************************************************************
   4  * Copyright (C) 2002 - 2005 VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Sigmund Augdal <sigmunau@idi.ntnu.no>
   8  *          Gildas Bazin <gbazin@videolan.org>
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  23  *****************************************************************************/
  24
  25 /*****************************************************************************
  26  * Preamble
  27  *****************************************************************************/
  28 #include <stdlib.h>                                      /* malloc(), free() */
  29 #include <string.h>
  30
  31 #ifdef HAVE_LINUX_LIMITS_H
  32 #   include <linux/limits.h>
  33 #endif
  34
  35 #include <vlc/vlc.h>
  36 #include <vlc/vout.h>
  37 #include "osd.h"
  38 #include "vlc_block.h"
  39 #include "vlc_filter.h"
  40
  41 #include <math.h>
  42
  43 #ifdef HAVE_ERRNO_H
  44 #   include <errno.h>
  45 #endif
  46
  47 #include <ft2build.h>
  48 #include FT_FREETYPE_H
  49 #include FT_GLYPH_H
  50
  51 #ifdef SYS_DARWIN
  52 #define DEFAULT_FONT "/System/Library/Fonts/LucidaGrande.dfont"
  53 #elif defined( SYS_BEOS )
  54 #define DEFAULT_FONT "/boot/beos/etc/fonts/ttfonts/Swiss721.ttf"
  55 #elif defined( WIN32 )
  56 #define DEFAULT_FONT "" /* Default font found at run-time */
  57 #else
  58 #define DEFAULT_FONT "/usr/share/fonts/truetype/freefont/FreeSerifBold.ttf"
  59 #endif
  60
  61 #if defined(HAVE_FRIBIDI)
  62 #include <fribidi/fribidi.h>
  63 #endif
  64
  65 typedef struct line_desc_t line_desc_t;
  66
  67 /*****************************************************************************
  68  * Local prototypes
  69  *****************************************************************************/
  70 static int  Create ( vlc_object_t * );
  71 static void Destroy( vlc_object_t * );
  72
  73 /* The RenderText call maps to pf_render_string, defined in vlc_filter.h */
  74 static int RenderText( filter_t *, subpicture_region_t *,
  75                        subpicture_region_t * );
  76 static line_desc_t *NewLine( byte_t * );
  77
  78 static int SetFontSize( filter_t *, int );
  79
  80 /*****************************************************************************
  81  * Module descriptor
  82  *****************************************************************************/
  83 #define FONT_TEXT N_("Font")
  84 #define FONT_LONGTEXT N_("Font filename")
  85 #define FONTSIZE_TEXT N_("Font size in pixels")
  86 #define FONTSIZE_LONGTEXT N_("The size of the fonts used by the osd module. " \
  87     "If set to something different than 0 this option will override the " \
  88     "relative font size " )
  89 #define OPACITY_TEXT N_("Opacity, 0..255")
  90 #define OPACITY_LONGTEXT N_("The opacity (inverse of transparency) of " \
  91     "overlay text. 0 = transparent, 255 = totally opaque. " )
  92 #define COLOR_TEXT N_("Text Default Color")
  93 #define COLOR_LONGTEXT N_("The color of overlay text. 1 byte for each color, "\
  94     "hexadecimal. #000000 = all colors off, 0xFF0000 = just Red, " \
  95     "0xFFFFFF = all color on [White]" )
  96 #define FONTSIZER_TEXT N_("Font size")
  97 #define FONTSIZER_LONGTEXT N_("The size of the fonts used by the osd module" )
  98
  99 static int   pi_sizes[] = { 20, 18, 16, 12, 6 };
 100 static char *ppsz_sizes_text[] = { N_("Smaller"), N_("Small"), N_("Normal"),
 101                                    N_("Large"), N_("Larger") };
 102 static int pi_color_values[] = {
 103   0x00000000, 0x00808080, 0x00C0C0C0, 0x00FFFFFF, 0x00800000,
 104   0x00FF0000, 0x00FF00FF, 0x00FFFF00, 0x00808000, 0x00008000, 0x00008080,
 105   0x0000FF00, 0x00800080, 0x00000080, 0x000000FF, 0x0000FFFF };
 106
 107 static char *ppsz_color_descriptions[] = {
 108   N_("Black"), N_("Gray"), N_("Silver"), N_("White"), N_("Maroon"),
 109   N_("Red"), N_("Fuchsia"), N_("Yellow"), N_("Olive"), N_("Green"), N_("Teal"),
 110   N_("Lime"), N_("Purple"), N_("Navy"), N_("Blue"), N_("Aqua") };
 111
 112 vlc_module_begin();
 113     set_shortname( _("Freetype"));
 114     set_description( _("Freetype2 font renderer") );
 115     set_category( CAT_VIDEO );
 116     set_subcategory( SUBCAT_VIDEO_TEXT );
 117
 118     add_file( "freetype-font", DEFAULT_FONT, NULL, FONT_TEXT, FONT_LONGTEXT,
 119               VLC_FALSE );
 120
 121     add_integer( "freetype-fontsize", 0, NULL, FONTSIZE_TEXT,
 122                  FONTSIZE_LONGTEXT, VLC_TRUE );
 123
 124     /* opacity valid on 0..255, with default 255 = fully opaque */
 125     add_integer_with_range( "freetype-opacity", 255, 0, 255, NULL,
 126         OPACITY_TEXT, OPACITY_LONGTEXT, VLC_FALSE );
 127
 128     /* hook to the color values list, with default 0x00ffffff = white */
 129     add_integer( "freetype-color", 0x00FFFFFF, NULL, COLOR_TEXT,
 130                  COLOR_LONGTEXT, VLC_TRUE );
 131         change_integer_list( pi_color_values, ppsz_color_descriptions, 0 );
 132
 133     add_integer( "freetype-rel-fontsize", 16, NULL, FONTSIZER_TEXT,
 134                  FONTSIZER_LONGTEXT, VLC_FALSE );
 135         change_integer_list( pi_sizes, ppsz_sizes_text, 0 );
 136
 137     set_capability( "text renderer", 100 );
 138     add_shortcut( "text" );
 139     set_callbacks( Create, Destroy );
 140 vlc_module_end();
 141
 142 struct line_desc_t
 143 {
 144     /** NULL-terminated list of glyphs making the string */
 145     FT_BitmapGlyph *pp_glyphs;
 146     /** list of relative positions for the glyphs */
 147     FT_Vector      *p_glyph_pos;
 148
 149     int             i_height;
 150     int             i_width;
 151     int             i_red, i_green, i_blue;
 152     int             i_alpha;
 153
 154     line_desc_t    *p_next;
 155 };
 156
 157 static int Render( filter_t *, subpicture_region_t *, line_desc_t *, int, int);
 158 static void FreeLines( line_desc_t * );
 159 static void FreeLine( line_desc_t * );
 160
 161 /*****************************************************************************
 162  * filter_sys_t: freetype local data
 163  *****************************************************************************
 164  * This structure is part of the video output thread descriptor.
 165  * It describes the freetype specific properties of an output thread.
 166  *****************************************************************************/
 167 struct filter_sys_t
 168 {
 169     FT_Library     p_library;   /* handle to library     */
 170     FT_Face        p_face;      /* handle to face object */
 171     vlc_bool_t     i_use_kerning;
 172     uint8_t        i_font_opacity;
 173     int            i_font_color;
 174     int            i_font_size;
 175
 176     int            i_default_font_size;
 177     int            i_display_height;
 178 };
 179
 180 /*****************************************************************************
 181  * Create: allocates osd-text video thread output method
 182  *****************************************************************************
 183  * This function allocates and initializes a Clone vout method.
 184  *****************************************************************************/
 185 static int Create( vlc_object_t *p_this )
 186 {
 187     filter_t *p_filter = (filter_t *)p_this;
 188     filter_sys_t *p_sys;
 189     char *psz_fontfile = NULL;
 190     int i_error;
 191     vlc_value_t val;
 192
 193     /* Allocate structure */
 194     p_filter->p_sys = p_sys = malloc( sizeof( filter_sys_t ) );
 195     if( !p_sys )
 196     {
 197         msg_Err( p_filter, "out of memory" );
 198         return VLC_ENOMEM;
 199     }
 200     p_sys->p_face = 0;
 201     p_sys->p_library = 0;
 202     p_sys->i_font_size = 0;
 203     p_sys->i_display_height = 0;
 204
 205     var_Create( p_filter, "freetype-font",
 206                 VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 207     var_Create( p_filter, "freetype-fontsize",
 208                 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 209     var_Create( p_filter, "freetype-rel-fontsize",
 210                 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 211     var_Create( p_filter, "freetype-opacity",
 212                 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 213     var_Get( p_filter, "freetype-opacity", &val );
 214     p_sys->i_font_opacity = __MAX( __MIN( val.i_int, 255 ), 0 );
 215     var_Create( p_filter, "freetype-color",
 216                 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 217     var_Get( p_filter, "freetype-color", &val );
 218     p_sys->i_font_color = __MAX( __MIN( val.i_int, 0xFFFFFF ), 0 );
 219
 220     /* Look what method was requested */
 221     var_Get( p_filter, "freetype-font", &val );
 222     psz_fontfile = val.psz_string;
 223     if( !psz_fontfile || !*psz_fontfile )
 224     {
 225         if( psz_fontfile ) free( psz_fontfile );
 226         psz_fontfile = (char *)malloc( PATH_MAX + 1 );
 227 #ifdef WIN32
 228         GetWindowsDirectory( psz_fontfile, PATH_MAX + 1 );
 229         strcat( psz_fontfile, "\\fonts\\arial.ttf" );
 230 #elif SYS_DARWIN
 231         strcpy( psz_fontfile, DEFAULT_FONT );
 232 #else
 233         msg_Err( p_filter, "user didn't specify a font" );
 234         goto error;
 235 #endif
 236     }
 237
 238     i_error = FT_Init_FreeType( &p_sys->p_library );
 239     if( i_error )
 240     {
 241         msg_Err( p_filter, "couldn't initialize freetype" );
 242         goto error;
 243     }
 244
 245     i_error = FT_New_Face( p_sys->p_library, psz_fontfile ? psz_fontfile : "",
 246                            0, &p_sys->p_face );
 247     if( i_error == FT_Err_Unknown_File_Format )
 248     {
 249         msg_Err( p_filter, "file %s have unknown format", psz_fontfile );
 250         goto error;
 251     }
 252     else if( i_error )
 253     {
 254         msg_Err( p_filter, "failed to load font file %s", psz_fontfile );
 255         goto error;
 256     }
 257
 258     i_error = FT_Select_Charmap( p_sys->p_face, ft_encoding_unicode );
 259     if( i_error )
 260     {
 261         msg_Err( p_filter, "Font has no unicode translation table" );
 262         goto error;
 263     }
 264
 265     p_sys->i_use_kerning = FT_HAS_KERNING( p_sys->p_face );
 266
 267     var_Get( p_filter, "freetype-fontsize", &val );
 268     p_sys->i_default_font_size = val.i_int;
 269     if( SetFontSize( p_filter, 0 ) != VLC_SUCCESS ) goto error;
 270
 271     if( psz_fontfile ) free( psz_fontfile );
 272     p_filter->pf_render_text = RenderText;
 273     return VLC_SUCCESS;
 274
 275  error:
 276     if( p_sys->p_face ) FT_Done_Face( p_sys->p_face );
 277     if( p_sys->p_library ) FT_Done_FreeType( p_sys->p_library );
 278     if( psz_fontfile ) free( psz_fontfile );
 279     free( p_sys );
 280     return VLC_EGENERIC;
 281 }
 282
 283 /*****************************************************************************
 284  * Destroy: destroy Clone video thread output method
 285  *****************************************************************************
 286  * Clean up all data and library connections
 287  *****************************************************************************/
 288 static void Destroy( vlc_object_t *p_this )
 289 {
 290     filter_t *p_filter = (filter_t *)p_this;
 291     filter_sys_t *p_sys = p_filter->p_sys;
 292
 293     FT_Done_Face( p_sys->p_face );
 294     FT_Done_FreeType( p_sys->p_library );
 295     free( p_sys );
 296 }
 297
 298 /*****************************************************************************
 299  * Render: place string in picture
 300  *****************************************************************************
 301  * This function merges the previously rendered freetype glyphs into a picture
 302  *****************************************************************************/
 303 static int Render( filter_t *p_filter, subpicture_region_t *p_region,
 304                    line_desc_t *p_line, int i_width, int i_height )
 305 {
 306     uint8_t *p_dst;
 307     video_format_t fmt;
 308     int i, x, y, i_pitch;
 309     uint8_t i_y; /* YUV values, derived from incoming RGB */
 310     int8_t i_u, i_v;
 311     subpicture_region_t *p_region_tmp;
 312
 313     /* Create a new subpicture region */
 314     memset( &fmt, 0, sizeof(video_format_t) );
 315     fmt.i_chroma = VLC_FOURCC('Y','U','V','P');
 316     fmt.i_aspect = VOUT_ASPECT_FACTOR;
 317     fmt.i_width = fmt.i_visible_width = i_width + 2;
 318     fmt.i_height = fmt.i_visible_height = i_height + 2;
 319     fmt.i_x_offset = fmt.i_y_offset = 0;
 320     p_region_tmp = spu_CreateRegion( p_filter, &fmt );
 321     if( !p_region_tmp )
 322     {
 323         msg_Err( p_filter, "cannot allocate SPU region" );
 324         return VLC_EGENERIC;
 325     }
 326
 327     p_region->fmt = p_region_tmp->fmt;
 328     p_region->picture = p_region_tmp->picture;
 329     free( p_region_tmp );
 330
 331     /* Calculate text color components */
 332     i_y = (uint8_t)(( 66 * p_line->i_red  + 129 * p_line->i_green +
 333                       25 * p_line->i_blue + 128) >> 8) +  16;
 334     i_u = (int8_t)(( -38 * p_line->i_red  -  74 * p_line->i_green +
 335                      112 * p_line->i_blue + 128) >> 8) + 128;
 336     i_v = (int8_t)(( 112 * p_line->i_red  -  94 * p_line->i_green -
 337                       18 * p_line->i_blue + 128) >> 8) + 128;
 338
 339     /* Build palette */
 340     fmt.p_palette->i_entries = 256;
 341     for( i = 0; i < fmt.p_palette->i_entries; i++ )
 342     {
 343         fmt.p_palette->palette[i][0] = i * i_y / 256;
 344         fmt.p_palette->palette[i][1] = i_u;
 345         fmt.p_palette->palette[i][2] = i_v;
 346         fmt.p_palette->palette[i][3] = i + (255 - i) / 16;
 347         fmt.p_palette->palette[i][3] =
 348             (int)fmt.p_palette->palette[i][3] * (255 - p_line->i_alpha) / 255;
 349     }
 350     fmt.p_palette->palette[0][3] = 0;
 351
 352     p_dst = p_region->picture.Y_PIXELS;
 353     i_pitch = p_region->picture.Y_PITCH;
 354
 355     /* Initialize the region pixels */
 356     memset( p_dst, 0, i_pitch * p_region->fmt.i_height );
 357
 358     for( ; p_line != NULL; p_line = p_line->p_next )
 359     {
 360         int i_glyph_tmax = 0;
 361         int i_bitmap_offset, i_offset, i_align_offset = 0;
 362         for( i = 0; p_line->pp_glyphs[i] != NULL; i++ )
 363         {
 364             FT_BitmapGlyph p_glyph = p_line->pp_glyphs[ i ];
 365             i_glyph_tmax = __MAX( i_glyph_tmax, p_glyph->top );
 366         }
 367
 368         if( p_line->i_width < i_width )
 369         {
 370             if( p_region->i_text_align == SUBPICTURE_ALIGN_RIGHT )
 371             {
 372                 i_align_offset = i_width - p_line->i_width;
 373             }
 374             else if( p_region->i_text_align != SUBPICTURE_ALIGN_LEFT )
 375             {
 376                 i_align_offset = ( i_width - p_line->i_width ) / 2;
 377             }
 378         }
 379         for( i = 0; p_line->pp_glyphs[i] != NULL; i++ )
 380         {
 381             FT_BitmapGlyph p_glyph = p_line->pp_glyphs[ i ];
 382
 383             i_offset = ( p_line->p_glyph_pos[ i ].y +
 384                 i_glyph_tmax - p_glyph->top + 1 ) *
 385                 i_pitch + p_line->p_glyph_pos[ i ].x + p_glyph->left + 1 +
 386                 i_align_offset;
 387
 388             for( y = 0, i_bitmap_offset = 0; y < p_glyph->bitmap.rows; y++ )
 389             {
 390                 for( x = 0; x < p_glyph->bitmap.width; x++, i_bitmap_offset++ )
 391                 {
 392                     if( !p_glyph->bitmap.buffer[i_bitmap_offset] )
 393                         continue;
 394
 395                     i_offset -= i_pitch;
 396                     p_dst[i_offset + x] = ((uint16_t)p_dst[i_offset + x]*2 +
 397                       p_glyph->bitmap.buffer[i_bitmap_offset])/3;
 398                     i_offset += i_pitch; x--;
 399                     p_dst[i_offset + x] = ((uint16_t)p_dst[i_offset + x]*2 +
 400                       p_glyph->bitmap.buffer[i_bitmap_offset])/3;
 401                     x += 2;
 402                     p_dst[i_offset + x] = ((uint16_t)p_dst[i_offset + x]*2 +
 403                       p_glyph->bitmap.buffer[i_bitmap_offset])/3;
 404                     i_offset += i_pitch; x--;
 405                     p_dst[i_offset + x] = ((uint16_t)p_dst[i_offset + x]*2 +
 406                       p_glyph->bitmap.buffer[i_bitmap_offset])/3;
 407                     i_offset -= i_pitch;
 408                 }
 409                 i_offset += i_pitch;
 410             }
 411
 412             i_offset = ( p_line->p_glyph_pos[ i ].y +
 413                 i_glyph_tmax - p_glyph->top + 1 ) *
 414                 i_pitch + p_line->p_glyph_pos[ i ].x + p_glyph->left + 1 +
 415                 i_align_offset;
 416
 417             for( y = 0, i_bitmap_offset = 0; y < p_glyph->bitmap.rows; y++ )
 418             {
 419                for( x = 0; x < p_glyph->bitmap.width; x++, i_bitmap_offset++ )
 420                {
 421                  if( p_glyph->bitmap.buffer[i_bitmap_offset] > 16 )
 422                    p_dst[i_offset+x] = p_glyph->bitmap.buffer[i_bitmap_offset];
 423                }
 424                i_offset += i_pitch;
 425             }
 426         }
 427     }
 428
 429     return VLC_SUCCESS;
 430 }
 431
 432 /**
 433  * This function renders a text subpicture region into another one.
 434  * It also calculates the size needed for this string, and renders the
 435  * needed glyphs into memory. It is used as pf_add_string callback in
 436  * the vout method by this module
 437  */
 438 static int RenderText( filter_t *p_filter, subpicture_region_t *p_region_out,
 439                        subpicture_region_t *p_region_in )
 440 {
 441     filter_sys_t *p_sys = p_filter->p_sys;
 442     line_desc_t  *p_lines = 0, *p_line = 0, *p_next = 0, *p_prev = 0;
 443     int i, i_pen_y, i_pen_x, i_error, i_glyph_index, i_previous;
 444     uint32_t *psz_unicode, *psz_unicode_orig = 0, i_char, *psz_line_start;
 445     int i_string_length;
 446     char *psz_string;
 447     vlc_iconv_t iconv_handle = (vlc_iconv_t)(-1);
 448     int i_font_color, i_font_alpha, i_font_size, i_red, i_green, i_blue;
 449
 450     FT_BBox line;
 451     FT_BBox glyph_size;
 452     FT_Vector result;
 453     FT_Glyph tmp_glyph;
 454
 455     /* Sanity check */
 456     if( !p_region_in || !p_region_out ) return VLC_EGENERIC;
 457     psz_string = p_region_in->psz_text;
 458     if( !psz_string || !*psz_string ) return VLC_EGENERIC;
 459
 460     i_font_color = __MAX( __MIN( p_region_in->i_text_color, 0xFFFFFF ), 0 );
 461     if( i_font_color == 0xFFFFFF ) i_font_color = p_sys->i_font_color;
 462
 463     i_font_alpha = __MAX( __MIN( p_region_in->i_text_alpha, 255 ), 0 );
 464     if( !i_font_alpha ) i_font_alpha = 255 - p_sys->i_font_opacity;
 465
 466     i_font_size  = __MAX( __MIN( p_region_in->i_text_size, 255 ), 0 );
 467     SetFontSize( p_filter, i_font_size );
 468
 469     i_red   = ( i_font_color & 0x00FF0000 ) >> 16;
 470     i_green = ( i_font_color & 0x0000FF00 ) >>  8;
 471     i_blue  =   i_font_color & 0x000000FF;
 472
 473     result.x =  result.y = 0;
 474     line.xMin = line.xMax = line.yMin = line.yMax = 0;
 475
 476     psz_unicode = psz_unicode_orig =
 477         malloc( ( strlen(psz_string) + 1 ) * sizeof(uint32_t) );
 478     if( psz_unicode == NULL )
 479     {
 480         msg_Err( p_filter, "out of memory" );
 481         goto error;
 482     }
 483 #if defined(WORDS_BIGENDIAN)
 484     iconv_handle = vlc_iconv_open( "UCS-4BE", "UTF-8" );
 485 #else
 486     iconv_handle = vlc_iconv_open( "UCS-4LE", "UTF-8" );
 487 #endif
 488     if( iconv_handle == (vlc_iconv_t)-1 )
 489     {
 490         msg_Warn( p_filter, "unable to do conversion" );
 491         goto error;
 492     }
 493
 494     {
 495         char *p_in_buffer, *p_out_buffer;
 496         size_t i_in_bytes, i_out_bytes, i_out_bytes_left, i_ret;
 497         i_in_bytes = strlen( psz_string );
 498         i_out_bytes = i_in_bytes * sizeof( uint32_t );
 499         i_out_bytes_left = i_out_bytes;
 500         p_in_buffer = psz_string;
 501         p_out_buffer = (char *)psz_unicode;
 502         i_ret = vlc_iconv( iconv_handle, &p_in_buffer, &i_in_bytes,
 503                            &p_out_buffer, &i_out_bytes_left );
 504
 505         vlc_iconv_close( iconv_handle );
 506
 507         if( i_in_bytes )
 508         {
 509             msg_Warn( p_filter, "failed to convert string to unicode (%s), "
 510                       "bytes left %d", strerror(errno), i_in_bytes );
 511             goto error;
 512         }
 513         *(uint32_t*)p_out_buffer = 0;
 514         i_string_length = (i_out_bytes - i_out_bytes_left) / sizeof(uint32_t);
 515     }
 516
 517 #if defined(HAVE_FRIBIDI)
 518     {
 519         uint32_t *p_fribidi_string;
 520         FriBidiCharType base_dir = FRIBIDI_TYPE_ON;
 521         p_fribidi_string = malloc( (i_string_length + 1) * sizeof(uint32_t) );
 522         fribidi_log2vis( (FriBidiChar*)psz_unicode, i_string_length,
 523                          &base_dir, (FriBidiChar*)p_fribidi_string, 0, 0, 0 );
 524         free( psz_unicode_orig );
 525         psz_unicode = psz_unicode_orig = p_fribidi_string;
 526         p_fribidi_string[ i_string_length ] = 0;
 527     }
 528 #endif
 529
 530     /* Calculate relative glyph positions and a bounding box for the
 531      * entire string */
 532     if( !(p_line = NewLine( psz_string )) )
 533     {
 534         msg_Err( p_filter, "out of memory" );
 535         goto error;
 536     }
 537     p_lines = p_line;
 538     i_pen_x = i_pen_y = 0;
 539     i_previous = i = 0;
 540     psz_line_start = psz_unicode;
 541
 542 #define face p_sys->p_face
 543 #define glyph face->glyph
 544
 545     while( *psz_unicode )
 546     {
 547         i_char = *psz_unicode++;
 548         if( i_char == '\r' ) /* ignore CR chars wherever they may be */
 549         {
 550             continue;
 551         }
 552
 553         if( i_char == '\n' )
 554         {
 555             psz_line_start = psz_unicode;
 556             if( !(p_next = NewLine( psz_string )) )
 557             {
 558                 msg_Err( p_filter, "out of memory" );
 559                 goto error;
 560             }
 561             p_line->p_next = p_next;
 562             p_line->i_width = line.xMax;
 563             p_line->i_height = face->size->metrics.height >> 6;
 564             p_line->pp_glyphs[ i ] = NULL;
 565             p_line->i_alpha = i_font_alpha;
 566             p_line->i_red = i_red;
 567             p_line->i_green = i_green;
 568             p_line->i_blue = i_blue;
 569             p_prev = p_line;
 570             p_line = p_next;
 571             result.x = __MAX( result.x, line.xMax );
 572             result.y += face->size->metrics.height >> 6;
 573             i_pen_x = 0;
 574             i_previous = i = 0;
 575             line.xMin = line.xMax = line.yMin = line.yMax = 0;
 576             i_pen_y += face->size->metrics.height >> 6;
 577 #if 0
 578             msg_Dbg( p_filter, "Creating new line, i is %d", i );
 579 #endif
 580             continue;
 581         }
 582
 583         i_glyph_index = FT_Get_Char_Index( face, i_char );
 584         if( p_sys->i_use_kerning && i_glyph_index
 585             && i_previous )
 586         {
 587             FT_Vector delta;
 588             FT_Get_Kerning( face, i_previous, i_glyph_index,
 589                             ft_kerning_default, &delta );
 590             i_pen_x += delta.x >> 6;
 591
 592         }
 593         p_line->p_glyph_pos[ i ].x = i_pen_x;
 594         p_line->p_glyph_pos[ i ].y = i_pen_y;
 595         i_error = FT_Load_Glyph( face, i_glyph_index, FT_LOAD_DEFAULT );
 596         if( i_error )
 597         {
 598             msg_Err( p_filter, "FT_Load_Glyph returned %d", i_error );
 599             goto error;
 600         }
 601         i_error = FT_Get_Glyph( glyph, &tmp_glyph );
 602         if( i_error )
 603         {
 604             msg_Err( p_filter, "FT_Get_Glyph returned %d", i_error );
 605             goto error;
 606         }
 607         FT_Glyph_Get_CBox( tmp_glyph, ft_glyph_bbox_pixels, &glyph_size );
 608         i_error = FT_Glyph_To_Bitmap( &tmp_glyph, ft_render_mode_normal, 0, 1);
 609         if( i_error ) continue;
 610         p_line->pp_glyphs[ i ] = (FT_BitmapGlyph)tmp_glyph;
 611
 612         /* Do rest */
 613         line.xMax = p_line->p_glyph_pos[i].x + glyph_size.xMax -
 614             glyph_size.xMin + ((FT_BitmapGlyph)tmp_glyph)->left;
 615         if( line.xMax > (int)p_filter->fmt_out.video.i_visible_width - 20 )
 616         {
 617             p_line->pp_glyphs[ i ] = NULL;
 618             FreeLine( p_line );
 619             p_line = NewLine( psz_string );
 620             if( p_prev ) p_prev->p_next = p_line;
 621             else p_lines = p_line;
 622
 623             while( psz_unicode > psz_line_start && *psz_unicode != ' ' )
 624             {
 625                 psz_unicode--;
 626             }
 627             if( psz_unicode == psz_line_start )
 628             {
 629                 msg_Warn( p_filter, "unbreakable string" );
 630                 goto error;
 631             }
 632             else
 633             {
 634                 *psz_unicode = '\n';
 635             }
 636             psz_unicode = psz_line_start;
 637             i_pen_x = 0;
 638             i_previous = i = 0;
 639             line.xMin = line.xMax = line.yMin = line.yMax = 0;
 640             continue;
 641         }
 642         line.yMax = __MAX( line.yMax, glyph_size.yMax );
 643         line.yMin = __MIN( line.yMin, glyph_size.yMin );
 644
 645         i_previous = i_glyph_index;
 646         i_pen_x += glyph->advance.x >> 6;
 647         i++;
 648     }
 649
 650     p_line->i_width = line.xMax;
 651     p_line->i_height = face->size->metrics.height >> 6;
 652     p_line->pp_glyphs[ i ] = NULL;
 653     p_line->i_alpha = i_font_alpha;
 654     p_line->i_red = i_red;
 655     p_line->i_green = i_green;
 656     p_line->i_blue = i_blue;
 657     result.x = __MAX( result.x, line.xMax );
 658     result.y += line.yMax - line.yMin;
 659
 660 #undef face
 661 #undef glyph
 662
 663     p_region_out->i_x = p_region_in->i_x;
 664     p_region_out->i_y = p_region_in->i_y;
 665
 666     Render( p_filter, p_region_out, p_lines, result.x, result.y );
 667
 668     if( psz_unicode_orig ) free( psz_unicode_orig );
 669     FreeLines( p_lines );
 670     return VLC_SUCCESS;
 671
 672  error:
 673     if( psz_unicode_orig ) free( psz_unicode_orig );
 674     FreeLines( p_lines );
 675     return VLC_EGENERIC;
 676 }
 677
 678 static void FreeLine( line_desc_t *p_line )
 679 {
 680     unsigned int i;
 681     for( i = 0; p_line->pp_glyphs[ i ] != NULL; i++ )
 682     {
 683         FT_Done_Glyph( (FT_Glyph)p_line->pp_glyphs[ i ] );
 684     }
 685     free( p_line->pp_glyphs );
 686     free( p_line->p_glyph_pos );
 687     free( p_line );
 688 }
 689
 690 static void FreeLines( line_desc_t *p_lines )
 691 {
 692     line_desc_t *p_line, *p_next;
 693
 694     if( !p_lines ) return;
 695
 696     for( p_line = p_lines; p_line != NULL; p_line = p_next )
 697     {
 698         p_next = p_line->p_next;
 699         FreeLine( p_line );
 700     }
 701 }
 702
 703 static line_desc_t *NewLine( byte_t *psz_string )
 704 {
 705     int i_count;
 706     line_desc_t *p_line = malloc( sizeof(line_desc_t) );
 707
 708     if( !p_line ) return NULL;
 709     p_line->i_height = 0;
 710     p_line->i_width = 0;
 711     p_line->p_next = NULL;
 712
 713     /* We don't use CountUtf8Characters() here because we are not acutally
 714      * sure the string is utf8. Better be safe than sorry. */
 715     i_count = strlen( psz_string );
 716
 717     p_line->pp_glyphs = malloc( sizeof(FT_BitmapGlyph) * ( i_count + 1 ) );
 718     if( p_line->pp_glyphs == NULL )
 719     {
 720         free( p_line );
 721         return NULL;
 722     }
 723     p_line->pp_glyphs[0] = NULL;
 724
 725     p_line->p_glyph_pos = malloc( sizeof( FT_Vector ) * i_count + 1 );
 726     if( p_line->p_glyph_pos == NULL )
 727     {
 728         free( p_line->pp_glyphs );
 729         free( p_line );
 730         return NULL;
 731     }
 732
 733     return p_line;
 734 }
 735
 736 static int SetFontSize( filter_t *p_filter, int i_size )
 737 {
 738     filter_sys_t *p_sys = p_filter->p_sys;
 739
 740     if( i_size && i_size == p_sys->i_font_size ) return VLC_SUCCESS;
 741
 742     if( !i_size )
 743     {
 744         vlc_value_t val;
 745
 746         if( !p_sys->i_default_font_size &&
 747             p_sys->i_display_height == (int)p_filter->fmt_out.video.i_height )
 748             return VLC_SUCCESS;
 749
 750         if( p_sys->i_default_font_size )
 751         {
 752             i_size = p_sys->i_default_font_size;
 753         }
 754         else
 755         {
 756             var_Get( p_filter, "freetype-rel-fontsize", &val );
 757             i_size = (int)p_filter->fmt_out.video.i_height / val.i_int;
 758             p_filter->p_sys->i_display_height =
 759                 p_filter->fmt_out.video.i_height;
 760         }
 761         if( i_size <= 0 )
 762         {
 763             msg_Warn( p_filter, "Invalid fontsize, using 12" );
 764             i_size = 12;
 765         }
 766
 767         msg_Dbg( p_filter, "Using fontsize: %i", i_size );
 768     }
 769
 770     p_sys->i_font_size = i_size;
 771
 772     if( FT_Set_Pixel_Sizes( p_sys->p_face, 0, i_size ) )
 773     {
 774         msg_Err( p_filter, "couldn't set font size to %d", i_size );
 775         return VLC_EGENERIC;
 776     }
 777
 778     return VLC_SUCCESS;
 779 }