1 /*****************************************************************************
2 * zvbi.c : VBI and Teletext PES demux and decoder using libzvbi
3 *****************************************************************************
4 * Copyright (C) 2007, M2X
7 * Authors: Derk-Jan Hartman <djhartman at m2x dot nl>
8 * Jean-Paul Saman <jpsaman at m2x dot nl>
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.
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.
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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23 *****************************************************************************/
24 /*****************************************************************************
26 * information on teletext format can be found here :
27 * http://pdc.ro.nu/teletext.html
29 *****************************************************************************/
31 /* This module implements:
32 * ETSI EN 301 775: VBI data in PES
33 * ETSI EN 300 472: EBU Teletext data in PES
34 * ETSI EN 300 706: Enhanced Teletext (libzvbi)
35 * ETSI EN 300 231: Video Programme System [VPS] (libzvbi)
36 * ETSI EN 300 294: 625-line Wide Screen Signaling [WSS] (libzvbi)
37 * EIA-608 Revision A: Closed Captioning [CC] (libzvbi)
44 #include <vlc_common.h>
45 #include <vlc_plugin.h>
50 #include "vlc_codec.h"
52 /*****************************************************************************
54 *****************************************************************************/
55 static int Open ( vlc_object_t * );
56 static void Close( vlc_object_t * );
58 #define PAGE_TEXT N_("Teletext page")
59 #define PAGE_LONGTEXT N_("Open the indicated Teletext page." \
60 "Default page is index 100")
62 #define OPAQUE_TEXT N_("Text is always opaque")
63 #define OPAQUE_LONGTEXT N_("Setting vbi-opaque to false " \
64 "makes the boxed text transparent." )
66 #define POS_TEXT N_("Teletext alignment")
67 #define POS_LONGTEXT N_( \
68 "You can enforce the teletext position on the video " \
69 "(0=center, 1=left, 2=right, 4=top, 8=bottom, you can " \
70 "also use combinations of these values, eg. 6 = top-right).")
72 #define TELX_TEXT N_("Teletext text subtitles")
73 #define TELX_LONGTEXT N_( "Output teletext subtitles as text " \
74 "instead of as RGBA" )
76 static const int pi_pos_values[] = { 0, 1, 2, 4, 8, 5, 6, 9, 10 };
77 static const char *const ppsz_pos_descriptions[] =
78 { N_("Center"), N_("Left"), N_("Right"), N_("Top"), N_("Bottom"),
79 N_("Top-Left"), N_("Top-Right"), N_("Bottom-Left"), N_("Bottom-Right") };
82 set_description( N_("VBI and Teletext decoder") );
83 set_shortname( N_("VBI & Teletext") );
84 set_capability( "decoder", 51 );
85 set_category( CAT_INPUT );
86 set_subcategory( SUBCAT_INPUT_SCODEC );
87 set_callbacks( Open, Close );
89 add_integer( "vbi-page", 100, NULL,
90 PAGE_TEXT, PAGE_LONGTEXT, false );
91 add_bool( "vbi-opaque", true, NULL,
92 OPAQUE_TEXT, OPAQUE_LONGTEXT, false );
93 add_integer( "vbi-position", 4, NULL, POS_TEXT, POS_LONGTEXT, false );
94 change_integer_list( pi_pos_values, ppsz_pos_descriptions, NULL );
95 add_bool( "vbi-text", false, NULL,
96 TELX_TEXT, TELX_LONGTEXT, false );
99 /****************************************************************************
101 ****************************************************************************/
103 // #define ZVBI_DEBUG
105 //Guessing table for missing "default region triplet"
106 static const int pi_default_triplet[] = {
109 24,24,24,24, //ssc scr slv rum
110 32,32,32,32,32, //est lit rus bul ukr
115 static const char *const ppsz_default_triplet[] = {
118 "ssc", "scr", "slv", "rum",
119 "est", "lit", "rus", "bul", "ukr",
127 DATA_UNIT_EBU_TELETEXT_NON_SUBTITLE = 0x02,
128 DATA_UNIT_EBU_TELETEXT_SUBTITLE = 0x03,
129 DATA_UNIT_EBU_TELETEXT_INVERTED = 0x0C,
131 DATA_UNIT_ZVBI_WSS_CPR1204 = 0xB4,
132 DATA_UNIT_ZVBI_CLOSED_CAPTION_525 = 0xB5,
133 DATA_UNIT_ZVBI_MONOCHROME_SAMPLES_525 = 0xB6,
135 DATA_UNIT_VPS = 0xC3,
136 DATA_UNIT_WSS = 0xC4,
137 DATA_UNIT_CLOSED_CAPTION = 0xC5,
138 DATA_UNIT_MONOCHROME_SAMPLES = 0xC6,
140 DATA_UNIT_STUFFING = 0xFF,
145 vbi_decoder * p_vbi_dec;
146 vbi_dvb_demux * p_dvb_demux;
147 unsigned int i_last_page;
149 bool b_text; /* Subtitles as text */
151 vlc_mutex_t lock; /* Lock to protect the following variables */
152 /* Positioning of Teletext images */
155 unsigned int i_wanted_page;
160 static subpicture_t *Decode( decoder_t *, block_t ** );
162 static subpicture_t *Subpicture( decoder_t *p_dec, video_format_t *p_fmt,
164 int i_columns, int i_rows,
165 int i_align, mtime_t i_pts );
167 static void EventHandler( vbi_event *ev, void *user_data );
168 static int OpaquePage( picture_t *p_src, const vbi_page p_page,
169 const video_format_t fmt, bool b_opaque );
171 /* Properties callbacks */
172 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
173 vlc_value_t oldval, vlc_value_t newval, void *p_data );
174 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
175 vlc_value_t oldval, vlc_value_t newval, void *p_data );
176 static int Position( vlc_object_t *p_this, char const *psz_cmd,
177 vlc_value_t oldval, vlc_value_t newval, void *p_data );
179 /*****************************************************************************
180 * Open: probe the decoder and return score
181 *****************************************************************************
182 * Tries to launch a decoder and return score so that the interface is able
184 *****************************************************************************/
185 static int Open( vlc_object_t *p_this )
187 decoder_t *p_dec = (decoder_t *) p_this;
188 decoder_sys_t *p_sys = NULL;
190 if( p_dec->fmt_in.i_codec != VLC_FOURCC('t','e','l','x') )
193 p_dec->pf_decode_sub = Decode;
194 p_sys = p_dec->p_sys = malloc( sizeof(decoder_sys_t) );
197 memset( p_sys, 0, sizeof(decoder_sys_t) );
199 p_sys->b_update = false;
200 p_sys->p_vbi_dec = vbi_decoder_new();
201 p_sys->p_dvb_demux = vbi_dvb_pes_demux_new( NULL, NULL );
202 vlc_mutex_init( &p_sys->lock );
204 if( (p_sys->p_vbi_dec == NULL) || (p_sys->p_dvb_demux == NULL) )
206 msg_Err( p_dec, "VBI decoder/demux could not be created." );
211 /* Some broadcasters in countries with level 1 and level 1.5 still not send a G0 to do
212 * matches against table 32 of ETSI 300 706. We try to do some best effort guessing
213 * This is not perfect, but might handle some cases where we know the vbi language
214 * is known. It would be better if people started sending G0 */
215 for( int i = 0; ppsz_default_triplet[i] != NULL; i++ )
217 if( p_dec->fmt_in.psz_language && !strcasecmp( p_dec->fmt_in.psz_language, ppsz_default_triplet[i] ) )
219 vbi_teletext_set_default_region( p_sys->p_vbi_dec, pi_default_triplet[i]);
220 msg_Dbg( p_dec, "overwriting default zvbi region: %d", pi_default_triplet[i] );
224 vbi_event_handler_register( p_sys->p_vbi_dec, VBI_EVENT_TTX_PAGE |
225 VBI_EVENT_CAPTION | VBI_EVENT_NETWORK |
226 VBI_EVENT_ASPECT | VBI_EVENT_PROG_INFO,
227 EventHandler, p_dec );
229 /* Create the var on vlc_global. */
230 p_sys->i_wanted_page = var_CreateGetInteger( p_dec, "vbi-page" );
231 var_AddCallback( p_dec, "vbi-page",
232 RequestPage, p_sys );
234 /* Check if the Teletext track has a known "initial page". */
235 if( p_sys->i_wanted_page == 100 && p_dec->fmt_in.subs.dvb.i_id != -1 )
237 int i_wanted_magazine = p_dec->fmt_in.subs.dvb.i_id >> 16;
238 if( i_wanted_magazine == 0 )
239 i_wanted_magazine = 8;
240 p_sys->i_wanted_page = vbi_bcd2dec(p_dec->fmt_in.subs.dvb.i_id & 0xff);
241 p_sys->i_wanted_page += 100*i_wanted_magazine;
244 p_sys->b_opaque = var_CreateGetBool( p_dec, "vbi-opaque" );
245 var_AddCallback( p_dec, "vbi-opaque", Opaque, p_sys );
247 p_sys->i_align = var_CreateGetInteger( p_dec, "vbi-position" );
248 var_AddCallback( p_dec, "vbi-position", Position, p_sys );
250 p_sys->b_text = var_CreateGetBool( p_dec, "vbi-text" );
251 // var_AddCallback( p_dec, "vbi-text", Text, p_sys );
253 es_format_Init( &p_dec->fmt_out, SPU_ES, VLC_FOURCC( 's','p','u',' ' ) );
255 p_dec->fmt_out.video.i_chroma = VLC_FOURCC('T','E','X','T');
257 p_dec->fmt_out.video.i_chroma = VLC_FOURCC('R','G','B','A');
261 /*****************************************************************************
263 *****************************************************************************/
264 static void Close( vlc_object_t *p_this )
266 decoder_t *p_dec = (decoder_t*) p_this;
267 decoder_sys_t *p_sys = p_dec->p_sys;
269 var_DelCallback( p_dec, "vbi-position", Position, p_sys );
270 var_DelCallback( p_dec, "vbi-opaque", Opaque, p_sys );
271 var_DelCallback( p_dec, "vbi-page", RequestPage, p_sys );
273 vlc_mutex_destroy( &p_sys->lock );
275 if( p_sys->p_vbi_dec )
276 vbi_decoder_delete( p_sys->p_vbi_dec );
277 if( p_sys->p_dvb_demux )
278 vbi_dvb_demux_delete( p_sys->p_dvb_demux );
282 #define MAX_SLICES 32
284 #ifdef WORDS_BIGENDIAN
285 # define ZVBI_PIXFMT_RGBA32 VBI_PIXFMT_RGBA32_BE
287 # define ZVBI_PIXFMT_RGBA32 VBI_PIXFMT_RGBA32_LE
291 /*****************************************************************************
293 *****************************************************************************/
294 static subpicture_t *Decode( decoder_t *p_dec, block_t **pp_block )
296 decoder_sys_t *p_sys = p_dec->p_sys;
298 subpicture_t *p_spu = NULL;
300 bool b_cached = false;
302 const uint8_t *p_pos;
305 if( (pp_block == NULL) || (*pp_block == NULL) )
311 p_pos = p_block->p_buffer;
312 i_left = p_block->i_buffer;
316 vbi_sliced p_sliced[MAX_SLICES];
317 unsigned int i_lines = 0;
320 i_lines = vbi_dvb_demux_cor( p_sys->p_dvb_demux, p_sliced,
321 MAX_SLICES, &i_pts, &p_pos, &i_left );
324 vbi_decode( p_sys->p_vbi_dec, p_sliced, i_lines, i_pts / 90000.0 );
328 vlc_mutex_lock( &p_sys->lock );
329 const int i_align = p_sys->i_align;
330 const unsigned int i_wanted_page = p_sys->i_wanted_page;
331 const bool b_opaque = p_sys->b_opaque;
332 vlc_mutex_unlock( &p_sys->lock );
335 /* Try to see if the page we want is in the cache yet */
336 b_cached = vbi_fetch_vt_page( p_sys->p_vbi_dec, &p_page,
337 vbi_dec2bcd( i_wanted_page ),
338 VBI_ANY_SUBNO, VBI_WST_LEVEL_3p5,
341 if( i_wanted_page == p_sys->i_last_page && !p_sys->b_update )
346 if( p_sys->i_last_page != i_wanted_page )
348 /* We need to reset the subtitle */
349 p_spu = Subpicture( p_dec, &fmt, true,
350 p_page.columns, p_page.rows,
351 i_align, p_block->i_pts );
354 p_spu->p_region->psz_text = strdup("");
356 p_sys->b_update = true;
357 p_sys->i_last_page = i_wanted_page;
363 p_sys->b_update = false;
364 p_sys->i_last_page = i_wanted_page;
366 msg_Dbg( p_dec, "we now have page: %d ready for display",
369 /* If there is a page or sub to render, then we do that here */
370 /* Create the subpicture unit */
371 p_spu = Subpicture( p_dec, &fmt, p_sys->b_text,
372 p_page.columns, p_page.rows,
373 i_align, p_block->i_pts );
379 unsigned int i_textsize = 7000;
381 char p_text[i_textsize+1];
383 i_total = vbi_print_page_region( &p_page, p_text, i_textsize,
384 "UTF-8", 0, 0, 0, 0, p_page.columns, p_page.rows );
385 p_text[i_total] = '\0';
386 /* Strip off the pagenumber */
389 p_spu->p_region->psz_text = strdup( &p_text[8] );
392 msg_Info( p_dec, "page %x-%x(%d)\n%s", p_page.pgno, p_page.subno, i_total, p_text );
397 picture_t *p_pic = &p_spu->p_region->picture;
399 /* ZVBI is stupid enough to assume pitch == width */
400 p_pic->p->i_pitch = 4 * fmt.i_width;
401 vbi_draw_vt_page( &p_page, ZVBI_PIXFMT_RGBA32,
402 p_spu->p_region->picture.p->p_pixels, 1, 1 );
404 OpaquePage( p_pic, p_page, fmt, b_opaque );
408 vbi_unref_page( &p_page );
409 block_Release( p_block );
413 vbi_unref_page( &p_page );
416 p_dec->pf_spu_buffer_del( p_dec, p_spu );
420 block_Release( p_block );
424 static subpicture_t *Subpicture( decoder_t *p_dec, video_format_t *p_fmt,
426 int i_columns, int i_rows, int i_align,
432 /* If there is a page or sub to render, then we do that here */
433 /* Create the subpicture unit */
434 p_spu = p_dec->pf_spu_buffer_new( p_dec );
437 msg_Warn( p_dec, "can't get spu buffer" );
441 memset( &fmt, 0, sizeof(video_format_t) );
442 fmt.i_chroma = b_text ? VLC_FOURCC('T','E','X','T') :
443 VLC_FOURCC('R','G','B','A');
444 fmt.i_aspect = b_text ? 0 : VOUT_ASPECT_FACTOR;
447 fmt.i_bits_per_pixel = 0;
451 fmt.i_sar_num = fmt.i_sar_den = 1;
452 fmt.i_width = fmt.i_visible_width = i_columns * 12;
453 fmt.i_height = fmt.i_visible_height = i_rows * 10;
454 fmt.i_bits_per_pixel = 32;
456 fmt.i_x_offset = fmt.i_y_offset = 0;
458 p_spu->p_region = p_spu->pf_create_region( VLC_OBJECT(p_dec), &fmt );
459 if( p_spu->p_region == NULL )
461 msg_Err( p_dec, "cannot allocate SPU region" );
462 p_dec->pf_spu_buffer_del( p_dec, p_spu );
466 p_spu->p_region->i_x = 0;
467 p_spu->p_region->i_y = 0;
468 p_spu->p_region->i_align = i_align;
470 /* Normal text subs, easy markup */
471 p_spu->i_flags = SUBPICTURE_ALIGN_BOTTOM;
473 p_spu->i_start = i_pts;
475 p_spu->b_ephemer = true;
476 p_spu->b_absolute = false;
477 p_spu->b_pausable = true;
483 p_spu->i_original_picture_width = fmt.i_width;
485 p_spu->i_original_picture_height = fmt.i_height;
493 static void EventHandler( vbi_event *ev, void *user_data )
495 decoder_t *p_dec = (decoder_t *)user_data;
496 decoder_sys_t *p_sys = p_dec->p_sys;
498 if( ev->type == VBI_EVENT_TTX_PAGE )
501 msg_Info( p_dec, "Page %03x.%02x ",
502 ev->ev.ttx_page.pgno,
503 ev->ev.ttx_page.subno & 0xFF);
505 if( p_sys->i_last_page == vbi_bcd2dec( ev->ev.ttx_page.pgno ) )
506 p_sys->b_update = true;
508 if( ev->ev.ttx_page.clock_update )
509 msg_Dbg( p_dec, "clock" );
511 if( ev->ev.ttx_page.header_update )
512 msg_Dbg( p_dec, "header" );
515 else if( ev->type == VBI_EVENT_CAPTION )
516 msg_Dbg( p_dec, "Caption line: %x", ev->ev.caption.pgno );
517 else if( ev->type == VBI_EVENT_NETWORK )
518 msg_Dbg( p_dec, "Network change" );
519 else if( ev->type == VBI_EVENT_ASPECT )
520 msg_Dbg( p_dec, "Aspect update" );
521 else if( ev->type == VBI_EVENT_NETWORK )
522 msg_Dbg( p_dec, "Program info received" );
525 static int OpaquePage( picture_t *p_src, const vbi_page p_page,
526 const video_format_t fmt, bool b_opaque )
530 assert( fmt.i_chroma == VLC_FOURCC('R','G','B','A' ) );
532 /* Kludge since zvbi doesn't provide an option to specify opacity. */
533 for( y = 0; y < fmt.i_height; y++ )
535 for( x = 0; x < fmt.i_width; x++ )
537 const vbi_opacity opacity = p_page.text[ y/10 * p_page.columns + x/12 ].opacity;
538 uint32_t *p_pixel = (uint32_t*)&p_src->p->p_pixels[y * p_src->p->i_pitch + 4*x];
541 /* Show video instead of this character */
542 case VBI_TRANSPARENT_SPACE:
545 /* To make the boxed text "closed captioning" transparent
546 * change true to false.
551 /* Full text transparency. only foreground color is show */
552 case VBI_TRANSPARENT_FULL:
555 /* Transparency for boxed text */
556 case VBI_SEMI_TRANSPARENT:
557 if( (*p_pixel) == 0xff000000 && 0 ) /* Disabled until someone implement borders */
568 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
569 vlc_value_t oldval, vlc_value_t newval, void *p_data )
571 decoder_sys_t *p_sys = p_data;
572 VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
574 vlc_mutex_lock( &p_sys->lock );
575 if( newval.i_int > 0 && newval.i_int < 999 )
576 p_sys->i_wanted_page = newval.i_int;
577 vlc_mutex_unlock( &p_sys->lock );
582 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
583 vlc_value_t oldval, vlc_value_t newval, void *p_data )
585 decoder_sys_t *p_sys = p_data;
586 VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
588 vlc_mutex_lock( &p_sys->lock );
589 p_sys->b_opaque = newval.b_bool;
590 vlc_mutex_unlock( &p_sys->lock );
595 static int Position( vlc_object_t *p_this, char const *psz_cmd,
596 vlc_value_t oldval, vlc_value_t newval, void *p_data )
598 decoder_sys_t *p_sys = p_data;
599 VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
601 vlc_mutex_lock( &p_sys->lock );
602 p_sys->i_align = newval.i_int;
603 vlc_mutex_unlock( &p_sys->lock );