modules/misc/freetype.c:
[vlc.git] / modules / misc / freetype.c
1 /*****************************************************************************
2  * freetype.c : Put text on the video, using freetype2
3  *****************************************************************************
4  * Copyright (C) 2002, 2003 VideoLAN
5  * $Id: freetype.c,v 1.15 2003/07/31 17:03:46 sigmunau Exp $
6  *
7  * Authors: Sigmund Augdal <sigmunau@idi.ntnu.no>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <stdlib.h>                                      /* malloc(), free() */
28 #include <string.h>
29
30 #include <vlc/vlc.h>
31 #include <vlc/vout.h>
32 #include <osd.h>
33 #include <math.h>
34
35 #include <ft2build.h>
36 #include FT_FREETYPE_H
37 #include FT_GLYPH_H
38
39 #ifdef SYS_DARWIN
40 #define DEFAULT_FONT "/System/Library/Fonts/LucidaGrande.dfont"
41 #elif defined( SYS_BEOS )
42 #define DEFAULT_FONT "/boot/beos/etc/fonts/ttfonts/Swiss721.ttf"
43 #else
44 #define DEFAULT_FONT ""
45 #endif
46
47 typedef struct line_desc_t line_desc_t;
48
49 /*****************************************************************************
50  * Local prototypes
51  *****************************************************************************/
52 static int  Create    ( vlc_object_t * );
53 static void Destroy   ( vlc_object_t * );
54
55 static void Render    ( vout_thread_t *, picture_t *,
56                         const subpicture_t * );
57 static void RenderI420( vout_thread_t *, picture_t *,
58                         const subpicture_t * );
59 static void RenderYUY2( vout_thread_t *, picture_t *,
60                         const subpicture_t * );
61 static int  AddText   ( vout_thread_t *, byte_t *, text_style_t *, int,
62                         int, int, mtime_t, mtime_t );
63 static int  GetUnicodeCharFromUTF8( byte_t ** );
64 static int  CountUtf8Characters( byte_t * );
65 static void FreeString( subpicture_t * );
66 static line_desc_t *NewLine( byte_t * );
67     
68 /*****************************************************************************
69  * Module descriptor
70  *****************************************************************************/
71 #define FONT_TEXT N_("Font")
72 #define FONT_LONGTEXT N_("Filename of Font")
73 #define FONTSIZE_TEXT N_("Font size")
74 #define FONTSIZE_LONGTEXT N_("The size of the fonts used by the osd module" )
75
76 vlc_module_begin();
77     add_category_hint( N_("Fonts"), NULL, VLC_FALSE );
78     add_file( "freetype-font", DEFAULT_FONT, NULL, FONT_TEXT, FONT_LONGTEXT, VLC_FALSE );
79     add_integer( "freetype-fontsize", 16, NULL, FONTSIZE_TEXT, FONTSIZE_LONGTEXT, VLC_FALSE );
80     set_description( _("freetype2 font renderer") );
81     set_capability( "text renderer", 100 );
82     add_shortcut( "text" );
83     set_callbacks( Create, Destroy );
84 vlc_module_end();
85
86 /**
87  * Private data in a aubpicture. Describes a string.
88  */
89 struct subpicture_sys_t
90 {
91     int            i_x_margin;
92     int            i_y_margin;
93     int            i_width;
94     int            i_height;
95     int            i_flags;
96     /** The string associated with this subpicture */
97     byte_t        *psz_text;
98     line_desc_t   *p_lines;
99 };
100
101 struct line_desc_t
102 {
103     /** NULL-terminated list of glyphs making the string */
104     FT_BitmapGlyph *pp_glyphs;
105     /** list of relative positions for the glyphs */
106     FT_Vector      *p_glyph_pos;
107     int             i_height;
108     int             i_width;
109     line_desc_t    *p_next;
110 };
111
112 /*****************************************************************************
113  * text_remderer_sys_t: freetype local data
114  *****************************************************************************
115  * This structure is part of the video output thread descriptor.
116  * It describes the freetype specific properties of an output thread.
117  *****************************************************************************/
118 struct text_renderer_sys_t
119 {
120     FT_Library     p_library;   /* handle to library     */
121     FT_Face        p_face;      /* handle to face object */
122     vlc_mutex_t   *lock;
123     vlc_bool_t     i_use_kerning;
124     uint8_t        pi_gamma[256];
125 };
126
127 /*****************************************************************************
128  * Create: allocates osd-text video thread output method
129  *****************************************************************************
130  * This function allocates and initializes a Clone vout method.
131  *****************************************************************************/
132 #define gamma_value 2.0
133 static int Create( vlc_object_t *p_this )
134 {
135     vout_thread_t *p_vout = (vout_thread_t *)p_this;
136     char *psz_fontfile;
137     int i, i_error;
138     double gamma_inv = 1.0f / gamma_value;
139     vlc_value_t val;
140
141     /* Allocate structure */
142     p_vout->p_text_renderer_data = malloc( sizeof( text_renderer_sys_t ) );
143     if( p_vout->p_text_renderer_data == NULL )
144     {
145         msg_Err( p_vout, "out of memory" );
146         return VLC_ENOMEM;
147     }
148
149     for (i = 0; i < 256; i++) {
150         p_vout->p_text_renderer_data->pi_gamma[i] =
151             (uint8_t)( pow( (double)i / 255.0f, gamma_inv) * 255.0f );
152     }
153
154     var_Create( p_vout, "freetype-font", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
155     var_Create( p_vout, "freetype-fontsize",
156                 VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
157
158     /* Look what method was requested */
159     var_Get( p_vout, "freetype-font", &val );
160     psz_fontfile = val.psz_string;
161
162     if( !psz_fontfile || !*psz_fontfile )
163     {
164         if( psz_fontfile ) free( psz_fontfile );
165         psz_fontfile = (char *)malloc( PATH_MAX + 1 );
166 #ifdef WIN32
167         GetWindowsDirectory( psz_fontfile, PATH_MAX + 1 );
168         strcat( psz_fontfile, "\\fonts\\arial.ttf" );
169 #elif SYS_DARWIN
170         strcpy( psz_fontfile, DEFAULT_FONT );
171 #else
172         msg_Err( p_vout, "user didn't specify a font" );
173         free( p_vout->p_text_renderer_data );
174         return VLC_EGENERIC;
175 #endif
176     }
177
178     i_error = FT_Init_FreeType( &p_vout->p_text_renderer_data->p_library );
179     if( i_error )
180     {
181         msg_Err( p_vout, "couldn't initialize freetype" );
182         free( p_vout->p_text_renderer_data );
183         return VLC_EGENERIC;
184     }
185
186     i_error = FT_New_Face( p_vout->p_text_renderer_data->p_library,
187                            psz_fontfile ? psz_fontfile : "", 0,
188                            &p_vout->p_text_renderer_data->p_face );
189     if( i_error == FT_Err_Unknown_File_Format )
190     {
191         msg_Err( p_vout, "file %s have unknown format", psz_fontfile );
192         FT_Done_FreeType( p_vout->p_text_renderer_data->p_library );
193         free( p_vout->p_text_renderer_data );
194         if( psz_fontfile ) free( psz_fontfile );
195         return VLC_EGENERIC;
196     }
197     else if( i_error )
198     {
199         msg_Err( p_vout, "failed to load font file %s", psz_fontfile );
200         FT_Done_FreeType( p_vout->p_text_renderer_data->p_library );
201         free( p_vout->p_text_renderer_data );
202         if( psz_fontfile ) free( psz_fontfile );
203         return VLC_EGENERIC;
204     }
205     if( psz_fontfile ) free( psz_fontfile );
206
207     i_error = FT_Select_Charmap( p_vout->p_text_renderer_data->p_face,
208                                  ft_encoding_unicode );
209     if ( i_error )
210     {
211         msg_Err( p_vout, "Font has no unicode translation table" );
212         FT_Done_Face( p_vout->p_text_renderer_data->p_face );
213         FT_Done_FreeType( p_vout->p_text_renderer_data->p_library );
214         free( p_vout->p_text_renderer_data );
215         return VLC_EGENERIC;
216     }
217
218     p_vout->p_text_renderer_data->i_use_kerning =
219         FT_HAS_KERNING(p_vout->p_text_renderer_data->p_face);
220     var_Get( p_vout, "freetype-fontsize", &val );
221
222     i_error = FT_Set_Pixel_Sizes( p_vout->p_text_renderer_data->p_face, 0, val.i_int );
223     if( i_error )
224     {
225         msg_Err( p_vout, "couldn't set font size to %d", val.i_int );
226         free( p_vout->p_text_renderer_data );
227         return VLC_EGENERIC;
228     }
229     p_vout->pf_add_string = AddText;
230     return VLC_SUCCESS;
231 }
232
233 /*****************************************************************************
234  * Destroy: destroy Clone video thread output method
235  *****************************************************************************
236  * Clean up all data and library connections
237  *****************************************************************************/
238 static void Destroy( vlc_object_t *p_this )
239 {
240     vout_thread_t *p_vout = (vout_thread_t *)p_this;
241     FT_Done_Face( p_vout->p_text_renderer_data->p_face );
242     FT_Done_FreeType( p_vout->p_text_renderer_data->p_library );
243     free( p_vout->p_text_renderer_data );
244 }
245
246 /*****************************************************************************
247  * Render: place string in picture
248  *****************************************************************************
249  * This function merges the previously rendered freetype glyphs into a picture
250  *****************************************************************************/
251 static void Render( vout_thread_t *p_vout, picture_t *p_pic,
252                     const subpicture_t *p_subpic )
253 {
254     switch( p_vout->output.i_chroma )
255     {
256         /* I420 target, no scaling */
257         case VLC_FOURCC('I','4','2','0'):
258         case VLC_FOURCC('I','Y','U','V'):
259         case VLC_FOURCC('Y','V','1','2'):
260             RenderI420( p_vout, p_pic, p_subpic );
261             break;
262 #if 0
263         /* RV16 target, scaling */
264         case VLC_FOURCC('R','V','1','6'):
265             RenderRV16( p_vout, p_pic, p_subpic );
266             break;
267
268         /* RV32 target, scaling */
269         case VLC_FOURCC('R','V','2','4'):
270         case VLC_FOURCC('R','V','3','2'):
271             RenderRV32( p_vout, p_pic, p_subpic );
272             break;
273 #endif
274         /* NVidia or BeOS overlay, no scaling */
275         case VLC_FOURCC('Y','U','Y','2'):
276             RenderYUY2( p_vout, p_pic, p_subpic );
277             break;
278
279         default:
280             msg_Err( p_vout, "unknown chroma, can't render SPU" );
281             break;
282     }
283 }
284
285 /**
286  * Draw a string on a i420 (or similar) picture
287  */
288 static void RenderI420( vout_thread_t *p_vout, picture_t *p_pic,
289                     const subpicture_t *p_subpic )
290 {
291     subpicture_sys_t *p_string = p_subpic->p_sys;
292     int i_plane, x, y, pen_x, pen_y;
293     unsigned int i;
294     line_desc_t *p_line;
295
296     for( p_line = p_subpic->p_sys->p_lines; p_line != NULL; p_line = p_line->p_next )
297     {
298         for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ )
299         {
300             uint8_t *p_in;
301             int i_pitch = p_pic->p[ i_plane ].i_pitch;
302
303             p_in = p_pic->p[ i_plane ].p_pixels;
304
305             if ( i_plane == 0 )
306             {
307                 if ( p_string->i_flags & OSD_ALIGN_BOTTOM )
308                 {
309                     pen_y = p_pic->p[ i_plane ].i_lines - p_string->i_height -
310                         p_string->i_y_margin;
311                 }
312                 else
313                 {
314                     pen_y = p_string->i_y_margin;
315                 }
316                 pen_y += p_vout->p_text_renderer_data->p_face->size->metrics.ascender >> 6;
317                 if ( p_string->i_flags & OSD_ALIGN_RIGHT )
318                 {
319                     pen_x = i_pitch - p_line->i_width
320                         - p_string->i_x_margin;
321                 }
322                 else
323                 {
324                     pen_x = p_string->i_x_margin;
325                 }
326
327                 for( i = 0; p_line->pp_glyphs[i] != NULL; i++ )
328                 {
329                     FT_BitmapGlyph p_glyph = p_line->pp_glyphs[ i ];
330 #define alpha p_vout->p_text_renderer_data->pi_gamma[ p_glyph->bitmap.buffer[ x + y * p_glyph->bitmap.width ] ]
331 #define pixel p_in[ ( p_line->p_glyph_pos[ i ].y + pen_y + y - p_glyph->top ) * i_pitch+x + pen_x + p_line->p_glyph_pos[ i ].x + p_glyph->left ]
332                     for(y = 0; y < p_glyph->bitmap.rows; y++ )
333                     {
334                         for( x = 0; x < p_glyph->bitmap.width; x++ )
335                         {
336                             pixel = ( ( pixel * ( 255 - alpha ) ) >> 8 ) +
337                                 ( 255 * alpha >> 8 );
338 #undef alpha
339 #undef pixel
340                         }
341                     }
342                 }
343             }
344             else
345             {
346                 if ( p_string->i_flags & OSD_ALIGN_BOTTOM )
347                 {
348                     pen_y = p_pic->p[i_plane].i_lines - ( p_string->i_height>>1) -
349                         (p_string->i_y_margin>>1);
350                 }
351                 else
352                 {
353                     pen_y = p_string->i_y_margin >> 1;
354                 }
355                 pen_y += p_vout->p_text_renderer_data->p_face->size->metrics.ascender >> 7;
356                 if ( p_string->i_flags & OSD_ALIGN_RIGHT )
357                 {
358                     pen_x = i_pitch - ( p_line->i_width >> 1 )
359                         - ( p_string->i_x_margin >> 1 );
360                 }
361                 else
362                 {
363                     pen_x = p_string->i_x_margin >> 1;
364                 }
365
366                 for( i = 0; p_line->pp_glyphs[i] != NULL; i++ )
367                 {
368                     FT_BitmapGlyph p_glyph = p_line->pp_glyphs[ i ];
369 #define alpha p_vout->p_text_renderer_data->pi_gamma[ p_glyph->bitmap.buffer[ ( x + y * p_glyph->bitmap.width ) ] ]
370 #define pixel p_in[ ( ( p_line->p_glyph_pos[ i ].y >> 1 ) + pen_y + ( y >> 1 ) -  ( p_glyph->top >> 1 ) ) * i_pitch + ( x >> 1 ) + pen_x + ( p_line->p_glyph_pos[ i ].x >> 1 ) + ( p_glyph->left >>1) ]
371                     for( y = 0; y < p_glyph->bitmap.rows; y+=2 )
372                     {
373                         for( x = 0; x < p_glyph->bitmap.width; x+=2 )
374                         {
375                             pixel = ( ( pixel * ( 0xFF - alpha ) ) >> 8 ) +
376                                 ( 0x80 * alpha >> 8 );
377 #undef alpha
378 #undef pixel
379                         }
380                     }
381                 }
382             }
383         }
384     }
385 }
386
387 /**
388  * Draw a string on a YUY2 picture
389  */
390 static void RenderYUY2( vout_thread_t *p_vout, picture_t *p_pic,
391                         const subpicture_t *p_subpic )
392 {
393     subpicture_sys_t *p_string = p_subpic->p_sys;
394     int i_plane, x, y, pen_x, pen_y;
395     unsigned int i;
396     line_desc_t *p_line;
397
398     for( p_line = p_subpic->p_sys->p_lines; p_line != NULL; p_line = p_line->p_next )
399     {
400         uint8_t *p_in;
401         int i_pitch = p_pic->p[ i_plane ].i_pitch;
402         
403         p_in = p_pic->p[ i_plane ].p_pixels;
404         
405         if ( p_string->i_flags & OSD_ALIGN_BOTTOM )
406         {
407             pen_y = p_pic->p[ i_plane ].i_lines - p_string->i_height -
408                 p_string->i_y_margin;
409         }
410         else
411         {
412             pen_y = p_string->i_y_margin;
413         }
414         pen_y += p_vout->p_text_renderer_data->p_face->size->metrics.ascender >> 6;
415         if ( p_string->i_flags & OSD_ALIGN_RIGHT )
416         {
417             pen_x = i_pitch - p_line->i_width
418                 - p_string->i_x_margin;
419         }
420         else
421         {
422             pen_x = p_string->i_x_margin;
423         }
424         
425         for( i = 0; p_line->pp_glyphs[i] != NULL; i++ )
426         {
427             FT_BitmapGlyph p_glyph = p_line->pp_glyphs[ i ];
428 #define alpha p_vout->p_text_renderer_data->pi_gamma[ p_glyph->bitmap.buffer[ x + y * p_glyph->bitmap.width ] ]
429 #define pixel p_in[ ( p_line->p_glyph_pos[ i ].y + pen_y + y - p_glyph->top ) * i_pitch + 2 * ( x + pen_x + p_line->p_glyph_pos[ i ].x + p_glyph->left ) ]
430             for(y = 0; y < p_glyph->bitmap.rows; y++ )
431             {
432                 for( x = 0; x < p_glyph->bitmap.width; x++ )
433                 {
434                     pixel = ( ( pixel * ( 255 - alpha ) ) >> 8 ) +
435                         ( 255 * alpha >> 8 );
436 #undef alpha
437 #undef pixel
438                 }
439             }
440         }
441     }
442 }
443
444
445 /**
446  * This function receives a string and creates a subpicture for it. It
447  * also calculates the size needed for this string, and renders the
448  * needed glyphs into memory. It is used as pf_add_string callback in
449  * the vout method by this module
450  */
451 static int AddText ( vout_thread_t *p_vout, byte_t *psz_string,
452                      text_style_t *p_style, int i_flags, int i_hmargin,
453                      int i_vmargin, mtime_t i_start, mtime_t i_stop )
454 {
455     subpicture_sys_t *p_string;
456     int i, i_pen_y, i_pen_x, i_error, i_glyph_index, i_previous, i_char;
457     subpicture_t *p_subpic;
458     line_desc_t  *p_line,  *p_next;
459     
460     FT_BBox line;
461     FT_BBox glyph_size;
462     FT_Vector result;
463     FT_Glyph tmp_glyph;
464
465     result.x = 0;
466     result.y = 0;
467     line.xMin = 0;
468     line.xMax = 0;
469     line.yMin = 0;
470     line.yMax = 0;
471     /* Create and initialize a subpicture */
472     p_subpic = vout_CreateSubPicture( p_vout, MEMORY_SUBPICTURE );
473     if ( p_subpic == NULL )
474     {
475         return VLC_EGENERIC;
476     }
477     p_subpic->pf_render = Render;
478     p_subpic->pf_destroy = FreeString;
479     p_subpic->i_start = i_start;
480     p_subpic->i_stop = i_stop;
481     if( i_stop == 0 )
482     {
483         p_subpic->b_ephemer = VLC_TRUE;
484     }
485     else
486     {
487         p_subpic->b_ephemer = VLC_FALSE;
488     }
489
490     /* Create and initialize private data for the subpicture */
491     p_string = malloc( sizeof(subpicture_sys_t) );
492     if ( p_string == NULL )
493     {
494         vout_DestroySubPicture( p_vout, p_subpic );
495         return VLC_ENOMEM;
496     }
497     p_subpic->p_sys = p_string;
498     p_string->i_flags = i_flags;
499     p_string->i_x_margin = i_hmargin;
500     p_string->i_y_margin = i_vmargin;
501
502     p_string->psz_text = strdup( psz_string );
503
504     /* Calculate relative glyph positions and a bounding box for the
505      * entire string */
506     p_line = NewLine( psz_string );
507     if( p_line == NULL )
508     {
509         msg_Err( p_vout, "Out of memory" );
510         return VLC_ENOMEM;
511     }
512     p_string->p_lines = p_line;
513     i_pen_x = 0;
514     i_pen_y = 0;
515     i_previous = 0;
516     i = 0;
517     while( *psz_string )
518     {
519         i_char = GetUnicodeCharFromUTF8( &psz_string );
520 #define face p_vout->p_text_renderer_data->p_face
521 #define glyph face->glyph
522         if ( i_char == 13 ) /* ignore CR chars wherever they may be */
523         {
524             continue;
525         }
526         if ( i_char == '\n' )
527         {
528             p_next = NewLine( psz_string );
529             if( p_next == NULL )
530             {
531                 msg_Err( p_vout, "Out of memory" );
532                 return VLC_ENOMEM;
533             }
534             p_line->p_next = p_next;
535             p_line->i_width = line.xMax;
536             p_line->i_height = face->size->metrics.height >> 6;
537             p_line->pp_glyphs[ i ] = NULL;
538             p_line = p_next;
539             result.x = __MAX( result.x, line.xMax );
540             result.y += face->size->metrics.height >> 6;
541             i_pen_x = 0;
542             line.xMin = 0;
543             line.xMax = 0;
544             line.yMin = 0;
545             line.yMax = 0;
546             i_pen_y += face->size->metrics.height >> 6;
547             msg_Dbg( p_vout, "Creating new line, i is %d", i );
548             i = 0;
549             continue;
550         }
551         i_glyph_index = FT_Get_Char_Index( face, i_char );
552         if ( p_vout->p_text_renderer_data->i_use_kerning && i_glyph_index
553             && i_previous )
554         {
555             FT_Vector delta;
556             FT_Get_Kerning( face, i_previous, i_glyph_index,
557                             ft_kerning_default, &delta );
558             i_pen_x += delta.x >> 6;
559
560         }
561         p_line->p_glyph_pos[ i ].x = i_pen_x;
562         p_line->p_glyph_pos[ i ].y = i_pen_y;
563         i_error = FT_Load_Glyph( face, i_glyph_index, FT_LOAD_DEFAULT );
564         if ( i_error )
565         {
566             msg_Err( p_vout, "FT_Load_Glyph returned %d", i_error );
567             return VLC_EGENERIC;
568         }
569         i_error = FT_Get_Glyph( glyph, &tmp_glyph );
570         if ( i_error )
571         {
572             msg_Err( p_vout, "FT_Get_Glyph returned %d", i_error );
573             return VLC_EGENERIC;
574         }
575         FT_Glyph_Get_CBox( tmp_glyph, ft_glyph_bbox_pixels, &glyph_size );
576         i_error = FT_Glyph_To_Bitmap( &tmp_glyph, ft_render_mode_normal,
577                                       NULL, 1 );
578         if ( i_error ) continue;
579         p_line->pp_glyphs[ i ] = (FT_BitmapGlyph)tmp_glyph;
580
581         /* Do rest */
582         line.xMax = p_line->p_glyph_pos[i].x + glyph_size.xMax - glyph_size.xMin;
583         line.yMax = __MAX( line.yMax, glyph_size.yMax );
584         line.yMin = __MIN( line.yMin, glyph_size.yMin );
585
586         i_previous = i_glyph_index;
587         i_pen_x += glyph->advance.x >> 6;
588         i++;
589     }
590     p_line->i_width = line.xMax;
591     p_line->i_height = face->size->metrics.height >> 6;
592     p_line->pp_glyphs[ i ] = NULL;
593     result.x = __MAX( result.x, line.xMax );
594     result.y += line.yMax - line.yMin;
595     p_string->i_height = result.y;
596     p_string->i_width = result.x;
597     msg_Dbg( p_vout, "string height is %d, width is %d",
598              p_string->i_height, p_string->i_width );
599     msg_Dbg( p_vout, "adding string \"%s\" at (%d,%d) start_date "I64Fd
600              " end_date" I64Fd, p_string->psz_text, p_string->i_x_margin,
601              p_string->i_y_margin, i_start, i_stop );
602     vout_DisplaySubPicture( p_vout, p_subpic );
603     return VLC_SUCCESS;
604 }
605
606 static void FreeString( subpicture_t *p_subpic )
607 {
608     unsigned int i;
609     subpicture_sys_t *p_string = p_subpic->p_sys;
610     line_desc_t *p_line, *p_next;
611     for( p_line = p_string->p_lines; p_line != NULL; p_line = p_next )
612     {
613         p_next = p_line->p_next;
614         for( i = 0; p_line->pp_glyphs[ i ] != NULL; i++ )
615         {
616             FT_Done_Glyph( (FT_Glyph)p_line->pp_glyphs[ i ] );
617         }
618         free( p_line->pp_glyphs );
619         free( p_line->p_glyph_pos );
620         free( p_line );
621     }
622             
623     free( p_string->psz_text );
624     free( p_string );
625 }
626
627 /* convert one or more utf8 bytes into a unicode character */
628 static int GetUnicodeCharFromUTF8( byte_t **ppsz_utf8_string )
629 {
630     int i_remaining_bytes, i_char = 0;
631     if( ( **ppsz_utf8_string & 0xFC ) == 0xFC )
632     {
633         i_char = **ppsz_utf8_string & 1;
634         i_remaining_bytes = 5;
635     }
636     else if( ( **ppsz_utf8_string & 0xF8 ) == 0xF8 )
637     {
638         i_char = **ppsz_utf8_string & 3;
639         i_remaining_bytes = 4;
640     }
641     else if( ( **ppsz_utf8_string & 0xF0 ) == 0xF0 )
642     {
643         i_char = **ppsz_utf8_string & 7;
644         i_remaining_bytes = 3;
645     }
646     else if( ( **ppsz_utf8_string & 0xE0 ) == 0xE0 )
647     {
648         i_char = **ppsz_utf8_string & 15;
649         i_remaining_bytes = 2;
650     }
651     else if( ( **ppsz_utf8_string & 0xC0 ) == 0xC0 )
652     {
653         i_char = **ppsz_utf8_string & 31;
654         i_remaining_bytes = 1;
655     }
656     else
657     {
658         i_char = **ppsz_utf8_string;
659         i_remaining_bytes = 0;
660     }
661     while( i_remaining_bytes )
662     {
663         (*ppsz_utf8_string)++;
664         i_remaining_bytes--;
665         i_char = ( i_char << 6 ) + ( **ppsz_utf8_string & 0x3F );
666     }
667     (*ppsz_utf8_string)++;
668     return i_char;
669 }
670
671 static int CountUtf8Characters( byte_t *psz_string )
672 {
673     int i, i_num;
674     i = 0;
675     i_num = 0;
676     while( psz_string[ i ] != 0 && psz_string[ i ] != 10 )
677     {
678         if( psz_string[ i ] != 13 && psz_string[ i ] <  0x80 )
679         {
680             i_num++;
681         }
682         i++;
683     }
684     printf( "number of characters in line is %d\n", i_num );
685     return i_num;
686 }
687
688 static line_desc_t *NewLine( byte_t *psz_string )
689 {
690     line_desc_t *p_line;
691     p_line = malloc( sizeof(line_desc_t) );
692     if( !p_line )
693     {
694         return NULL;
695     }
696     p_line->i_height = 0;
697     p_line->i_width = 0;
698     p_line->p_next = NULL;
699     p_line->pp_glyphs = malloc( sizeof(FT_BitmapGlyph)
700                                 * ( CountUtf8Characters( psz_string ) + 1 ) );
701     if( p_line->pp_glyphs == NULL )
702     {
703         return NULL;
704     }
705     p_line->p_glyph_pos = malloc( sizeof( FT_Vector )
706                                   * CountUtf8Characters( psz_string ) );
707     if( p_line->p_glyph_pos == NULL )
708     {
709         return NULL;
710     }
711     return p_line;
712 }