]> git.sesse.net Git - vlc/blob - modules/codec/telx.c
* modules/demux/ts.c: Parse the telx descriptor and create pseudo ES
[vlc] / modules / codec / telx.c
1 /*****************************************************************************
2  * telx.c : Minimalistic Teletext subtitles decoder
3  *****************************************************************************
4  * Copyright (C) 2007 Vincent Penne
5  * Some code converted from ProjectX java dvb decoder (c) 2001-2005 by dvb.matt
6  * $Id$
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21  *****************************************************************************/
22 /*****************************************************************************
23  * 
24  * information on teletext format can be found here : 
25  * http://pdc.ro.nu/teletext.html
26  *
27  *****************************************************************************/
28 #include <vlc/vlc.h>
29 #include <assert.h>
30 #include <stdint.h>
31
32 #include "vlc_vout.h"
33 #include "vlc_bits.h"
34 #include "vlc_codec.h"
35
36 /* #define TELX_DEBUG */
37 #ifdef TELX_DEBUG
38 #   define dbg( a ) msg_Dbg a 
39 #else
40 #   define dbg( a )
41 #endif
42
43 /*****************************************************************************
44  * Module descriptor.
45  *****************************************************************************/
46 static int  Open ( vlc_object_t * );
47 static void Close( vlc_object_t * );
48 static subpicture_t *Decode( decoder_t *, block_t ** );
49
50 #define OVERRIDE_PAGE_TEXT N_("Override page")
51 #define OVERRIDE_PAGE_LONGTEXT N_("Override the indicated page, try this if " \
52         "your subtitles don't appear (0 = autodetect, usually 888 or 889).")
53
54 #define IGNORE_SUB_FLAG_TEXT N_("Ignore subtitle flag")
55 #define IGNORE_SUB_FLAG_LONGTEXT N_("Ignore the subtitle flag, try this if " \
56         "your subtitles don't appear.")
57
58 vlc_module_begin();
59     set_description( _("Teletext subtitles decoder") );
60     set_shortname( "Teletext" );
61     set_capability( "decoder", 50 );
62     set_category( CAT_INPUT );
63     set_subcategory( SUBCAT_INPUT_SCODEC );
64     set_callbacks( Open, Close );
65
66     add_integer( "telx-override-page", -1, NULL,
67                  OVERRIDE_PAGE_TEXT, OVERRIDE_PAGE_LONGTEXT, VLC_TRUE );
68     add_bool( "telx-ignore-subtitle-flag", 0, NULL,
69               IGNORE_SUB_FLAG_TEXT, IGNORE_SUB_FLAG_LONGTEXT, VLC_TRUE );
70
71 vlc_module_end();
72
73 /****************************************************************************
74  * Local structures
75  ****************************************************************************/
76
77 struct decoder_sys_t
78 {
79   int         i_align;
80   vlc_bool_t  b_is_subtitle[9];
81   char        ppsz_lines[32][128];
82   char        psz_prev_text[512];
83   mtime_t     prev_pts;
84   int         i_page[9];
85   vlc_bool_t  b_erase[9];
86   uint16_t *  pi_active_national_set[9];
87   int         i_wanted_page, i_wanted_magazine;
88   vlc_bool_t  b_ignore_sub_flag;
89 };
90
91 /****************************************************************************
92  * Local data
93  ****************************************************************************/
94
95 /*
96  * My doc only mentions 13 national characters, but experiments show there 
97  * are more, in france for example I already found two more (0x9 and 0xb).
98  *
99  * Conversion is in this order :
100  *
101  * 0x23 0x24 0x40 0x5b 0x5c 0x5d 0x5e 0x5f 0x60 0x7b 0x7c 0x7d 0x7e
102  * (these are the standard ones)
103  * 0x08 0x09 0x0a 0x0b 0x0c 0x0d (apparently a control character) 0x0e 0x0f
104  */
105
106 static uint16_t ppi_national_subsets[][20] =
107 {
108   { 0x00a3, 0x0024, 0x0040, 0x00ab, 0x00bd, 0x00bb, 0x005e, 0x0023, 
109     0x002d, 0x00bc, 0x00a6, 0x00be, 0x00f7 }, /* english ,000 */
110
111   { 0x00e9, 0x00ef, 0x00e0, 0x00eb, 0x00ea, 0x00f9, 0x00ee, 0x0023,
112     0x00e8, 0x00e2, 0x00f4, 0x00fb, 0x00e7, 0, 0x00eb, 0, 0x00ef }, /* french  ,001 */
113
114   { 0x0023, 0x00a4, 0x00c9, 0x00c4, 0x00d6, 0x00c5, 0x00dc, 0x005f, 
115     0x00e9, 0x00e4, 0x00f6, 0x00e5, 0x00fc }, /* swedish,finnish,hungarian ,010 */
116
117   { 0x0023, 0x016f, 0x010d, 0x0165, 0x017e, 0x00fd, 0x00ed, 0x0159, 
118     0x00e9, 0x00e1, 0x0115, 0x00fa, 0x0161 }, /* czech,slovak  ,011 */
119
120   { 0x0023, 0x0024, 0x00a7, 0x00c4, 0x00d6, 0x00dc, 0x005e, 0x005f, 
121     0x00b0, 0x00e4, 0x00f6, 0x00fc, 0x00df }, /* german ,100 */
122
123   { 0x00e7, 0x0024, 0x00a1, 0x00e1, 0x00e9, 0x00ed, 0x00f3, 0x00fa, 
124     0x00bf, 0x00fc, 0x00f1, 0x00e8, 0x00e0 }, /* portuguese,spanish ,101 */
125
126   { 0x00a3, 0x0024, 0x00e9, 0x00b0, 0x00e7, 0x00bb, 0x005e, 0x0023, 
127     0x00f9, 0x00e0, 0x00f2, 0x00e8, 0x00ec }, /* italian  ,110 */
128
129   { 0x0023, 0x00a4, 0x0162, 0x00c2, 0x015e, 0x0102, 0x00ce, 0x0131, 
130     0x0163, 0x00e2, 0x015f, 0x0103, 0x00ee }, /* rumanian ,111 */
131
132   /* I have these tables too, but I don't know how they can be triggered */
133   { 0x0023, 0x0024, 0x0160, 0x0117, 0x0119, 0x017d, 0x010d, 0x016b, 
134     0x0161, 0x0105, 0x0173, 0x017e, 0x012f }, /* lettish,lithuanian ,1000 */
135
136   { 0x0023, 0x0144, 0x0105, 0x005a, 0x015a, 0x0141, 0x0107, 0x00f3, 
137     0x0119, 0x017c, 0x015b, 0x0142, 0x017a }, /* polish,  1001 */
138
139   { 0x0023, 0x00cb, 0x010c, 0x0106, 0x017d, 0x0110, 0x0160, 0x00eb, 
140     0x010d, 0x0107, 0x017e, 0x0111, 0x0161 }, /* serbian,croatian,slovenian, 1010 */
141
142   { 0x0023, 0x00f5, 0x0160, 0x00c4, 0x00d6, 0x017e, 0x00dc, 0x00d5, 
143     0x0161, 0x00e4, 0x00f6, 0x017e, 0x00fc }, /* estonian  ,1011 */
144
145   { 0x0054, 0x011f, 0x0130, 0x015e, 0x00d6, 0x00c7, 0x00dc, 0x011e, 
146     0x0131, 0x015f, 0x00f6, 0x00e7, 0x00fc }, /* turkish  ,1100 */
147 };
148
149
150 /*****************************************************************************
151  * Open: probe the decoder and return score
152  *****************************************************************************
153  * Tries to launch a decoder and return score so that the interface is able
154  * to chose.
155  *****************************************************************************/
156 static int Open( vlc_object_t *p_this )
157 {
158     decoder_t     *p_dec = (decoder_t *) p_this;
159     decoder_sys_t *p_sys = NULL;
160     vlc_value_t    val;
161     int            i;
162
163     if( p_dec->fmt_in.i_codec != VLC_FOURCC('t','e','l','x'))
164     {
165         return VLC_EGENERIC;
166     }
167
168     p_dec->pf_decode_sub = Decode;
169     p_sys = p_dec->p_sys = malloc( sizeof(decoder_sys_t) );
170     if( p_sys == NULL )
171     {
172         msg_Err( p_dec, "out of memory" );
173         return VLC_ENOMEM;
174     }
175
176     memset( p_sys, 0, sizeof(decoder_sys_t) );
177
178     p_sys->i_align = 0;
179     for ( i = 0; i < 9; i++ )
180         p_sys->pi_active_national_set[i] = ppi_national_subsets[1];
181
182     var_Create( p_dec, "telx-override-page",
183                 VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
184     var_Get( p_dec, "telx-override-page", &val );
185     if( val.i_int == -1 )
186     {
187         p_sys->i_wanted_magazine = p_dec->fmt_in.subs.dvb.i_id >> 16;
188         if( p_sys->i_wanted_magazine == 0 )
189             p_sys->i_wanted_magazine = 8;
190         p_sys->i_wanted_page = p_dec->fmt_in.subs.dvb.i_id & 0xff;
191     }
192     else if( val.i_int == 0 )
193     {
194         p_sys->i_wanted_magazine = -1;
195         p_sys->i_wanted_page = -1;
196     }
197     else
198     {
199         p_sys->i_wanted_magazine = val.i_int / 100;
200         p_sys->i_wanted_page = (((val.i_int % 100) / 10) << 4)
201                                 | ((val.i_int % 100) % 10);
202     }
203
204     var_Create( p_dec, "telx-ignore-subtitle-flag",
205                 VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
206     var_Get( p_dec, "telx-ignore-subtitle-flag", &val );
207     p_sys->b_ignore_sub_flag = val.b_bool;
208
209     msg_Dbg( p_dec, "starting telx on magazine %d page %x flag %d",
210              p_sys->i_wanted_magazine, p_sys->i_wanted_page,
211              p_sys->b_ignore_sub_flag );
212
213     return VLC_SUCCESS;
214
215 /*  error: */
216 /*     if (p_sys) { */
217 /*       free(p_sys); */
218 /*       p_sys = NULL; */
219 /*     } */
220 /*     return VLC_EGENERIC; */
221 }
222
223 /*****************************************************************************
224  * Close:
225  *****************************************************************************/
226 static void Close( vlc_object_t *p_this )
227 {
228     decoder_t     *p_dec = (decoder_t*) p_this;
229     decoder_sys_t *p_sys = p_dec->p_sys;
230
231     free( p_sys );
232 }
233
234 /**************************
235  * change bits endianness *
236  **************************/
237 static uint8_t bytereverse( int n )
238 {
239     n = (((n >> 1) & 0x55) | ((n << 1) & 0xaa));
240     n = (((n >> 2) & 0x33) | ((n << 2) & 0xcc));
241     n = (((n >> 4) & 0x0f) | ((n << 4) & 0xf0));
242     return n;
243 }
244
245 static int hamming_8_4( int a )
246 {
247     switch (a) {
248     case 0xA8: 
249         return 0;
250     case 0x0B: 
251         return 1;
252     case 0x26: 
253         return 2;
254     case 0x85: 
255         return 3;
256     case 0x92: 
257         return 4;
258     case 0x31: 
259         return 5;
260     case 0x1C: 
261         return 6;
262     case 0xBF: 
263         return 7;
264     case 0x40: 
265         return 8;
266     case 0xE3: 
267         return 9;
268     case 0xCE: 
269         return 10;
270     case 0x6D: 
271         return 11;
272     case 0x7A: 
273         return 12;
274     case 0xD9: 
275         return 13;
276     case 0xF4: 
277         return 14;
278     case 0x57: 
279         return 15;
280     default: 
281         return -1;     // decoding error , not yet corrected
282     }
283 }
284
285 // utc-2 --> utf-8
286 // this is not a general function, but it's enough for what we do here
287 // the result buffer need to be at least 4 bytes long
288 static void to_utf8( char * res, uint16_t ch )
289 {
290     if( ch >= 0x80 )
291     {
292         if( ch >= 0x800 )
293         {
294             res[0] = (ch >> 12) | 0xE0;
295             res[1] = ((ch >> 6) & 0x3F) | 0x80;
296             res[2] = (ch & 0x3F) | 0x80;
297             res[3] = 0;
298         }
299         else
300         {
301             res[0] = (ch >> 6) | 0xC0;
302             res[1] = (ch & 0x3F) | 0x80;
303             res[2] = 0;
304         }
305     }
306     else
307     {
308         res[0] = ch;
309         res[1] = 0;
310     }
311 }
312
313 static void decode_string( char * res, int res_len, 
314                            decoder_sys_t *p_sys, int magazine, 
315                            uint8_t * packet, int len )
316 {
317     char utf8[7];
318     char * pt = res;
319     int i;
320
321     for ( i = 0; i < len; i++ )
322     {
323         int in = bytereverse( packet[i] ) & 0x7f;
324         uint16_t out = 32;
325         size_t l;
326
327         switch ( in )
328         {
329         /* special national characters */
330         case 0x23:
331             out = p_sys->pi_active_national_set[magazine][0]; 
332             break; 
333         case 0x24:
334             out = p_sys->pi_active_national_set[magazine][1]; 
335             break; 
336         case 0x40:
337             out = p_sys->pi_active_national_set[magazine][2]; 
338             break; 
339         case 0x5b:
340             out = p_sys->pi_active_national_set[magazine][3]; 
341             break; 
342         case 0x5c:
343             out = p_sys->pi_active_national_set[magazine][4]; 
344             break; 
345         case 0x5d:
346             out = p_sys->pi_active_national_set[magazine][5]; 
347             break; 
348         case 0x5e:
349             out = p_sys->pi_active_national_set[magazine][6]; 
350             break; 
351         case 0x5f:
352             out = p_sys->pi_active_national_set[magazine][7]; 
353             break; 
354         case 0x60:
355             out = p_sys->pi_active_national_set[magazine][8]; 
356             break; 
357         case 0x7b:
358             out = p_sys->pi_active_national_set[magazine][9]; 
359             break; 
360         case 0x7c:
361             out = p_sys->pi_active_national_set[magazine][10]; 
362             break; 
363         case 0x7d:
364             out = p_sys->pi_active_national_set[magazine][11]; 
365             break; 
366         case 0x7e:
367             out = p_sys->pi_active_national_set[magazine][12]; 
368             break; 
369
370         /* some special control characters (empirical) */
371         case 0x0d:
372             /* apparently this starts a sequence that ends with 0xb 0xb */
373             while ( i + 1 < len && (bytereverse( packet[i+1] ) & 0x7f) != 0x0b )
374                 i++;
375             i += 2;
376             break;
377             /* goto skip; */
378
379         default:
380             /* non documented national range 0x08 - 0x0f */
381             if ( in >= 0x08 && in <= 0x0f )
382             {
383                 out = p_sys->pi_active_national_set[magazine][13 + in - 8];
384                 break;
385             }
386
387             /* normal ascii */
388             if ( in > 32 && in < 0x7f )
389                 out = in;
390         }
391
392         /* handle undefined national characters */
393         if ( out == 0 )
394             out = 32;
395
396         /* convert to utf-8 */
397         to_utf8( utf8, out );
398         l = strlen( utf8 );
399         if ( pt + l < res + res_len - 1 )
400         {
401             strcpy(pt, utf8);
402             pt += l;
403         }
404
405         /* skip: ; */
406     }
407     /* end: */
408     *pt++ = 0;
409 }  
410
411 /*****************************************************************************
412  * Decode:
413  *****************************************************************************/
414 static subpicture_t *Decode( decoder_t *p_dec, block_t **pp_block )
415 {
416     decoder_sys_t *p_sys = p_dec->p_sys;
417     block_t       *p_block;
418     subpicture_t  *p_spu = NULL;
419     video_format_t fmt;
420     /* int erase = 0; */
421     int len, offset;
422 #if 0
423     int i_wanted_magazine = i_conf_wanted_page / 100;
424     int i_wanted_page = 0x10 * ((i_conf_wanted_page % 100) / 10)
425                          | (i_conf_wanted_page % 10);
426 #endif
427     vlc_bool_t b_update = VLC_FALSE;
428     char psz_text[512], *pt = psz_text;
429     char psz_line[256];
430     int i, total;
431
432     if( pp_block == NULL || *pp_block == NULL ) return NULL;
433     p_block = *pp_block;
434     *pp_block = NULL;
435
436     dbg((p_dec, "start of telx packet with header %2x\n",
437                 * (uint8_t *) p_block->p_buffer));
438     len = p_block->i_buffer;
439     for ( offset = 1; offset + 46 <= len; offset += 46 )
440     {
441         uint8_t * packet = (uint8_t *) p_block->p_buffer+offset;
442         int vbi = ((0x20 & packet[2]) != 0 ? 0 : 313) + (0x1F & packet[2]);
443       
444         dbg((p_dec, "vbi %d header %02x %02x %02x\n", vbi, packet[0], packet[1], packet[2]));
445         if ( packet[0] == 0xFF ) continue;
446
447 /*      if (packet[1] != 0x2C) { */
448 /*         printf("wrong header\n"); */
449 /*         //goto error; */
450 /*         continue; */
451 /*       } */
452
453         int mpag = (hamming_8_4( packet[4] ) << 4) | hamming_8_4( packet[5] );
454         int row, magazine;
455         if ( mpag < 0 )
456         {
457             /* decode error */
458             dbg((p_dec, "mpag hamming error\n"));
459             continue;
460         }
461
462         row = 0xFF & bytereverse(mpag);
463         magazine = (7 & row) == 0 ? 8 : (7 & row);
464         row >>= 3;
465
466         if ( p_sys->i_wanted_page != -1
467               && magazine != p_sys->i_wanted_magazine )
468             continue;
469
470         if ( row == 0 )
471         {
472             /* row 0 : flags and header line */
473             int flag = 0;
474             int a;
475             
476             for ( a = 0; a < 6; a++ )
477             {
478                 flag |= (0xF & (bytereverse( hamming_8_4(packet[8 + a]) ) >> 4))
479                           << (a * 4);
480             }
481
482     /*         if (!p_sys->b_ignore_sub_flag && !(1 & flag>>15)) */
483     /*           continue; */
484
485             p_sys->i_page[magazine] = (0xF0 & bytereverse( hamming_8_4(packet[7]) )) |
486                              (0xF & (bytereverse( hamming_8_4(packet[6]) ) >> 4) );
487
488             decode_string( psz_line, sizeof(psz_line), p_sys, magazine,
489                            packet + 14, 40 - 14 );
490
491             dbg((p_dec, "mag %d flags %x page %x character set %d subtitles %d", magazine, flag,
492                  p_sys->i_page[magazine],
493                  7 & flag>>21, 1 & flag>>15, psz_line));
494
495             p_sys->pi_active_national_set[magazine] =
496                                  ppi_national_subsets[7 & (flag >> 21)];
497
498             p_sys->b_is_subtitle[magazine] = p_sys->b_ignore_sub_flag
499                                               || ( (1 & (flag >> 15))
500                                                   && (1 & (flag>>16)) );
501
502             dbg(( p_dec, "FLAGS%s%s%s%s%s%s%s mag_ser %d",
503                   (1 & (flag>>14))? " news" : "",
504                   (1 & (flag>>15))? " subtitle" : "",
505                   (1 & (flag>>7))? " erase" : "",
506                   (1 & (flag>>16))? " suppressed_head" : "",
507                   (1 & (flag>>17))? " update" : "",
508                   (1 & (flag>>18))? " interrupt" : "",
509                   (1 & (flag>>19))? " inhibit" : "",
510                   (1 & (flag>>20)) ));
511            
512             if ( (p_sys->i_wanted_page != -1
513                    && p_sys->i_page[magazine] != p_sys->i_wanted_page)
514                    || !p_sys->b_is_subtitle[magazine] )
515                 continue;
516
517             p_sys->b_erase[magazine] = (1 & (flag >> 7));
518
519             dbg((p_dec, "%ld --> %ld\n", (long int) p_block->i_pts, (long int)(p_sys->prev_pts+1500000)));
520             /* kludge here : 
521              * we ignore the erase flag if it happens less than 1.5 seconds
522              * before last caption
523              * TODO   make this time configurable
524              * UPDATE the kludge seems to be no more necessary
525              *        so it's commented out*/
526             if ( /*p_block->i_pts > p_sys->prev_pts + 1500000 && */
527                  p_sys->b_erase[magazine] )
528             {
529                 int i;
530               
531                 dbg((p_dec, "ERASE !\n"));
532
533                 p_sys->b_erase[magazine] = 0;          
534                 for ( i = 1; i < 32; i++ )
535                 {
536                     if ( !p_sys->ppsz_lines[i][0] ) continue;
537                     /* b_update = VLC_TRUE; */
538                     p_sys->ppsz_lines[i][0] = 0;
539                 }
540             }
541
542             /* replace the row if it's different */
543             if ( strcmp(psz_line, p_sys->ppsz_lines[row]) )
544             {
545                 strncpy( p_sys->ppsz_lines[row], psz_line,
546                          sizeof(p_sys->ppsz_lines[row]) - 1);
547             }
548             b_update = VLC_TRUE;
549
550         }
551         else if ( row < 24 )
552         {
553             char * t;
554             int i;
555             /* row 1-23 : normal lines */
556
557             if ( (p_sys->i_wanted_page != -1
558                    && p_sys->i_page[magazine] != p_sys->i_wanted_page)
559                    || !p_sys->b_is_subtitle[magazine] 
560                    || (p_sys->i_wanted_page == -1
561                         && p_sys->i_page[magazine] > 0x99) )
562                 continue;
563
564             decode_string( psz_line, sizeof(psz_line), p_sys, magazine,
565                            packet + 6, 40 );
566             t = psz_line;
567
568             /* remove starting spaces */
569             while ( *t == 32 ) t++;
570
571             /* remove trailing spaces */
572             for ( i = strlen(t) - 1; i >= 0 && t[i] == 32; i-- );
573             t[i + 1] = 0;
574
575             /* replace the row if it's different */
576             if ( strcmp( t, p_sys->ppsz_lines[row] ) )
577             {
578                 strncpy( p_sys->ppsz_lines[row], t,
579                          sizeof(p_sys->ppsz_lines[row]) - 1 );
580                 b_update = VLC_TRUE;
581             }
582
583             if (t[0])
584                 p_sys->prev_pts = p_block->i_pts;
585
586             dbg((p_dec, "%d %d : ", magazine, row));
587             dbg((p_dec, "%s\n", t));
588
589 #ifdef TELX_DEBUG
590             {
591                 char dbg[256];
592                 dbg[0] = 0;
593                 for ( i = 0; i < 40; i++ )
594                 {
595                     int in = bytereverse(packet[6 + i]) & 0x7f;
596                     sprintf(dbg + strlen(dbg), "%02x ", in);
597                 }
598                 dbg((p_dec, "%s\n", dbg));
599                 dbg[0] = 0;
600                 for ( i = 0; i < 40; i++ )
601                 {
602                     decode_string( psz_line, sizeof(psz_line), p_sys, magazine,
603                                    packet + 6 + i, 1 );
604                     sprintf( dbg + strlen(dbg), "%s  ", psz_line );
605                 }
606                 dbg((p_dec, "%s\n", dbg));
607             }
608 #endif
609         
610         }
611         else if ( row == 25 )
612         {
613             /* row 25 : alternate header line */
614             if ( (p_sys->i_wanted_page != -1
615                    && p_sys->i_page[magazine] != p_sys->i_wanted_page)
616                    || !p_sys->b_is_subtitle[magazine] )
617                 continue;
618
619             decode_string( psz_line, sizeof(psz_line), p_sys, magazine,
620                            packet + 6, 40 );
621
622             /* replace the row if it's different */
623             if ( strcmp( psz_line, p_sys->ppsz_lines[0] ) )
624             {
625                 strncpy( p_sys->ppsz_lines[0], psz_line,
626                          sizeof(p_sys->ppsz_lines[0]) - 1 );
627                 /* b_update = VLC_TRUE; */
628             }
629         }
630 /*       else if (row == 26) { */
631 /*         // row 26 : TV listings */
632 /*       } else */
633 /*         dbg((p_dec, "%d %d : %s\n", magazine, row, decode_string(p_sys, magazine, packet+6, 40))); */
634     }
635
636     if ( !b_update )
637         goto error;
638
639     total = 0;
640     for ( i = 1; i < 24; i++ )
641     {
642         size_t l = strlen( p_sys->ppsz_lines[i] );
643
644         if ( l > sizeof(psz_text) - total - 1 )
645             l = sizeof(psz_text) - total - 1;
646
647         if ( l > 0 )
648         {
649             memcpy( pt, p_sys->ppsz_lines[i], l );
650             total += l;
651             pt += l;
652             if ( sizeof(psz_text) - total - 1 > 0 )
653             {
654                 *pt++ = '\n';
655                 total++;
656             }
657         }
658     }
659     *pt = 0;
660
661     if ( !strcmp(psz_text, p_sys->psz_prev_text) )
662         goto error;
663
664     dbg((p_dec, "UPDATE TELETEXT PICTURE\n"));
665
666     assert( sizeof(p_sys->psz_prev_text) >= sizeof(psz_text) );
667     strcpy( p_sys->psz_prev_text, psz_text );
668
669     /* Create the subpicture unit */
670     p_spu = p_dec->pf_spu_buffer_new( p_dec );
671     if( !p_spu )
672     {
673         msg_Warn( p_dec, "can't get spu buffer" );
674         goto error;
675     }
676     
677     /* Create a new subpicture region */
678     memset( &fmt, 0, sizeof(video_format_t) );
679     fmt.i_chroma = VLC_FOURCC('T','E','X','T');
680     fmt.i_aspect = 0;
681     fmt.i_width = fmt.i_height = 0;
682     fmt.i_x_offset = fmt.i_y_offset = 0;
683     p_spu->p_region = p_spu->pf_create_region( VLC_OBJECT(p_dec), &fmt );
684     if( p_spu->p_region == NULL )
685     {
686         msg_Err( p_dec, "cannot allocate SPU region" );
687         goto error;
688     }
689
690     /* Normal text subs, easy markup */
691     p_spu->i_flags = SUBPICTURE_ALIGN_BOTTOM | p_sys->i_align;
692     p_spu->i_x = p_sys->i_align ? 20 : 0;
693     p_spu->i_y = 10;
694
695     p_spu->p_region->psz_text = strdup(psz_text);
696     p_spu->i_start = p_block->i_pts;
697     p_spu->i_stop = p_block->i_pts + p_block->i_length;
698     p_spu->b_ephemer = (p_block->i_length == 0);
699     p_spu->b_absolute = VLC_FALSE;
700     p_spu->b_pausable = VLC_TRUE;
701     dbg((p_dec, "%ld --> %ld\n", (long int) p_block->i_pts/100000, (long int)p_block->i_length/100000));
702
703     block_Release( p_block );
704     return p_spu;
705
706 error:
707     if ( p_spu != NULL )
708     {
709         p_dec->pf_spu_buffer_del( p_dec, p_spu );
710         p_spu = NULL;
711     }
712
713     block_Release( p_block );
714     return NULL;
715 }
716