git.sesse.net Git - vlc/blob - modules/codec/zvbi.c

   1 /*****************************************************************************
   2  * zvbi.c : VBI and Teletext PES demux and decoder using libzvbi
   3  *****************************************************************************
   4  * Copyright (C) 2007, M2X
   5  * $Id$
   6  *
   7  * Authors: Derk-Jan Hartman <djhartman at m2x dot nl>
   8  *          Jean-Paul Saman <jpsaman at m2x dot nl>
   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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24 /*****************************************************************************
  25  *
  26  * information on teletext format can be found here :
  27  * http://pdc.ro.nu/teletext.html
  28  *
  29  *****************************************************************************/
  30
  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)
  38  */
  39
  40 #ifdef HAVE_CONFIG_H
  41 # include "config.h"
  42 #endif
  43
  44 #include <vlc_common.h>
  45 #include <vlc_plugin.h>
  46 #include <assert.h>
  47 #include <libzvbi.h>
  48
  49 #include <vlc_codec.h>
  50
  51 /*****************************************************************************
  52  * Module descriptor.
  53  *****************************************************************************/
  54 static int  Open ( vlc_object_t * );
  55 static void Close( vlc_object_t * );
  56
  57 #define PAGE_TEXT N_("Teletext page")
  58 #define PAGE_LONGTEXT N_("Open the indicated Teletext page." \
  59         "Default page is index 100")
  60
  61 #define OPAQUE_TEXT N_("Teletext transparency")
  62 #define OPAQUE_LONGTEXT N_("Setting vbi-opaque to false " \
  63         "makes the boxed text transparent." )
  64
  65 #define POS_TEXT N_("Teletext alignment")
  66 #define POS_LONGTEXT N_( \
  67   "You can enforce the teletext position on the video " \
  68   "(0=center, 1=left, 2=right, 4=top, 8=bottom, you can " \
  69   "also use combinations of these values, eg. 6 = top-right).")
  70
  71 #define TELX_TEXT N_("Teletext text subtitles")
  72 #define TELX_LONGTEXT N_( "Output teletext subtitles as text " \
  73   "instead of as RGBA" )
  74
  75 static const int pi_pos_values[] = { 0, 1, 2, 4, 8, 5, 6, 9, 10 };
  76 static const char *const ppsz_pos_descriptions[] =
  77 { N_("Center"), N_("Left"), N_("Right"), N_("Top"), N_("Bottom"),
  78   N_("Top-Left"), N_("Top-Right"), N_("Bottom-Left"), N_("Bottom-Right") };
  79
  80 vlc_module_begin ()
  81     set_description( N_("VBI and Teletext decoder") )
  82     set_shortname( N_("VBI & Teletext") )
  83     set_capability( "decoder", 51 )
  84     set_category( CAT_INPUT )
  85     set_subcategory( SUBCAT_INPUT_SCODEC )
  86     set_callbacks( Open, Close )
  87
  88     add_integer( "vbi-page", 100,
  89                  PAGE_TEXT, PAGE_LONGTEXT, false )
  90     add_bool( "vbi-opaque", true,
  91                  OPAQUE_TEXT, OPAQUE_LONGTEXT, false )
  92     add_integer( "vbi-position", 4, POS_TEXT, POS_LONGTEXT, false )
  93         change_integer_list( pi_pos_values, ppsz_pos_descriptions );
  94     add_bool( "vbi-text", false,
  95               TELX_TEXT, TELX_LONGTEXT, false )
  96 vlc_module_end ()
  97
  98 /****************************************************************************
  99  * Local structures
 100  ****************************************************************************/
 101
 102 // #define ZVBI_DEBUG
 103
 104 //Guessing table for missing "default region triplet"
 105 static const int pi_default_triplet[] = {
 106  0, 0,           // slo cze
 107  8,              // pol
 108  24,24,24,24,    //ssc scr slv rum
 109  32,32,32,32,32, //est lit rus bul ukr
 110  48,48,          //gre ell
 111  64,             //ara
 112  88,             //heb
 113  16 };           //default
 114 static const char *const ppsz_default_triplet[] = {
 115  "slo", "cze",
 116  "pol",
 117  "ssc", "scr", "slv", "rum",
 118  "est", "lit", "rus", "bul", "ukr",
 119  "gre", "ell",
 120  "ara",
 121  "heb",
 122  NULL
 123 };
 124
 125 typedef enum {
 126     ZVBI_KEY_RED    = 'r' << 16,
 127     ZVBI_KEY_GREEN  = 'g' << 16,
 128     ZVBI_KEY_YELLOW = 'y' << 16,
 129     ZVBI_KEY_BLUE   = 'b' << 16,
 130     ZVBI_KEY_INDEX  = 'i' << 16,
 131 } ttxt_key_id;
 132
 133 typedef enum {
 134     DATA_UNIT_EBU_TELETEXT_NON_SUBTITLE     = 0x02,
 135     DATA_UNIT_EBU_TELETEXT_SUBTITLE         = 0x03,
 136     DATA_UNIT_EBU_TELETEXT_INVERTED         = 0x0C,
 137
 138     DATA_UNIT_ZVBI_WSS_CPR1204              = 0xB4,
 139     DATA_UNIT_ZVBI_CLOSED_CAPTION_525       = 0xB5,
 140     DATA_UNIT_ZVBI_MONOCHROME_SAMPLES_525   = 0xB6,
 141
 142     DATA_UNIT_VPS                           = 0xC3,
 143     DATA_UNIT_WSS                           = 0xC4,
 144     DATA_UNIT_CLOSED_CAPTION                = 0xC5,
 145     DATA_UNIT_MONOCHROME_SAMPLES            = 0xC6,
 146
 147     DATA_UNIT_STUFFING                      = 0xFF,
 148 } data_unit_id;
 149
 150 #define MAX_SLICES 32
 151
 152 struct decoder_sys_t
 153 {
 154     vbi_decoder *     p_vbi_dec;
 155     vbi_sliced        p_vbi_sliced[MAX_SLICES];
 156     unsigned int      i_last_page;
 157     bool              b_update;
 158     bool              b_text;   /* Subtitles as text */
 159
 160     vlc_mutex_t       lock; /* Lock to protect the following variables */
 161     /* Positioning of Teletext images */
 162     int               i_align;
 163     /* */
 164     unsigned int      i_wanted_page;
 165     unsigned int      i_wanted_subpage;
 166     /* */
 167     bool              b_opaque;
 168     struct {
 169         int pgno, subno;
 170     }                 nav_link[6];
 171     int               i_key[3];
 172 };
 173
 174 static subpicture_t *Decode( decoder_t *, block_t ** );
 175
 176 static subpicture_t *Subpicture( decoder_t *p_dec, video_format_t *p_fmt,
 177                                  bool b_text,
 178                                  int i_columns, int i_rows,
 179                                  int i_align, mtime_t i_pts );
 180
 181 static void EventHandler( vbi_event *ev, void *user_data );
 182 static int OpaquePage( picture_t *p_src, const vbi_page p_page,
 183                        const video_format_t fmt, bool b_opaque );
 184
 185 /* Properties callbacks */
 186 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
 187                         vlc_value_t oldval, vlc_value_t newval, void *p_data );
 188 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
 189                    vlc_value_t oldval, vlc_value_t newval, void *p_data );
 190 static int Position( vlc_object_t *p_this, char const *psz_cmd,
 191                      vlc_value_t oldval, vlc_value_t newval, void *p_data );
 192 static int EventKey( vlc_object_t *p_this, char const *psz_cmd,
 193                      vlc_value_t oldval, vlc_value_t newval, void *p_data );
 194
 195 /*****************************************************************************
 196  * Open: probe the decoder and return score
 197  *****************************************************************************
 198  * Tries to launch a decoder and return score so that the interface is able
 199  * to chose.
 200  *****************************************************************************/
 201 static int Open( vlc_object_t *p_this )
 202 {
 203     decoder_t     *p_dec = (decoder_t *) p_this;
 204     decoder_sys_t *p_sys = NULL;
 205
 206     if( p_dec->fmt_in.i_codec != VLC_CODEC_TELETEXT )
 207         return VLC_EGENERIC;
 208
 209     p_dec->pf_decode_sub = Decode;
 210     p_sys = p_dec->p_sys = calloc( 1, sizeof(decoder_sys_t) );
 211     if( p_sys == NULL )
 212         return VLC_ENOMEM;
 213
 214     p_sys->i_key[0] = p_sys->i_key[1] = p_sys->i_key[2] = '*' - '0';
 215     p_sys->b_update = false;
 216     p_sys->p_vbi_dec = vbi_decoder_new();
 217     vlc_mutex_init( &p_sys->lock );
 218
 219     if( p_sys->p_vbi_dec == NULL )
 220     {
 221         msg_Err( p_dec, "VBI decoder could not be created." );
 222         Close( p_this );
 223         return VLC_ENOMEM;
 224     }
 225
 226     /* Some broadcasters in countries with level 1 and level 1.5 still not send a G0 to do
 227      * matches against table 32 of ETSI 300 706. We try to do some best effort guessing
 228      * This is not perfect, but might handle some cases where we know the vbi language
 229      * is known. It would be better if people started sending G0 */
 230     for( int i = 0; ppsz_default_triplet[i] != NULL; i++ )
 231     {
 232         if( p_dec->fmt_in.psz_language && !strcasecmp( p_dec->fmt_in.psz_language, ppsz_default_triplet[i] ) )
 233         {
 234             vbi_teletext_set_default_region( p_sys->p_vbi_dec, pi_default_triplet[i]);
 235             msg_Dbg( p_dec, "overwriting default zvbi region: %d", pi_default_triplet[i] );
 236         }
 237     }
 238
 239     vbi_event_handler_register( p_sys->p_vbi_dec, VBI_EVENT_TTX_PAGE | VBI_EVENT_NETWORK |
 240 #ifdef ZVBI_DEBUG
 241                                 VBI_EVENT_CAPTION | VBI_EVENT_TRIGGER |
 242                                 VBI_EVENT_ASPECT | VBI_EVENT_PROG_INFO | VBI_EVENT_NETWORK_ID |
 243 #endif
 244                                 0 , EventHandler, p_dec );
 245
 246     /* Create the var on vlc_global. */
 247     p_sys->i_wanted_page = var_CreateGetInteger( p_dec, "vbi-page" );
 248     var_AddCallback( p_dec, "vbi-page", RequestPage, p_sys );
 249
 250     /* Check if the Teletext track has a known "initial page". */
 251     if( p_sys->i_wanted_page == 100 && p_dec->fmt_in.subs.teletext.i_magazine != -1 )
 252     {
 253         p_sys->i_wanted_page = 100 * p_dec->fmt_in.subs.teletext.i_magazine +
 254                                vbi_bcd2dec( p_dec->fmt_in.subs.teletext.i_page );
 255         var_SetInteger( p_dec, "vbi-page", p_sys->i_wanted_page );
 256     }
 257     p_sys->i_wanted_subpage = VBI_ANY_SUBNO;
 258
 259     p_sys->b_opaque = var_CreateGetBool( p_dec, "vbi-opaque" );
 260     var_AddCallback( p_dec, "vbi-opaque", Opaque, p_sys );
 261
 262     p_sys->i_align = var_CreateGetInteger( p_dec, "vbi-position" );
 263     var_AddCallback( p_dec, "vbi-position", Position, p_sys );
 264
 265     p_sys->b_text = var_CreateGetBool( p_dec, "vbi-text" );
 266 //    var_AddCallback( p_dec, "vbi-text", Text, p_sys );
 267
 268     /* Listen for keys */
 269     var_AddCallback( p_dec->p_libvlc, "key-pressed", EventKey, p_dec );
 270
 271     es_format_Init( &p_dec->fmt_out, SPU_ES, VLC_CODEC_SPU );
 272     if( p_sys->b_text )
 273         p_dec->fmt_out.video.i_chroma = VLC_CODEC_TEXT;
 274     else
 275         p_dec->fmt_out.video.i_chroma = VLC_CODEC_RGBA;
 276     return VLC_SUCCESS;
 277 }
 278
 279 /*****************************************************************************
 280  * Close:
 281  *****************************************************************************/
 282 static void Close( vlc_object_t *p_this )
 283 {
 284     decoder_t     *p_dec = (decoder_t*) p_this;
 285     decoder_sys_t *p_sys = p_dec->p_sys;
 286
 287     var_DelCallback( p_dec, "vbi-position", Position, p_sys );
 288     var_DelCallback( p_dec, "vbi-opaque", Opaque, p_sys );
 289     var_DelCallback( p_dec, "vbi-page", RequestPage, p_sys );
 290     var_DelCallback( p_dec->p_libvlc, "key-pressed", EventKey, p_dec );
 291
 292     vlc_mutex_destroy( &p_sys->lock );
 293
 294     if( p_sys->p_vbi_dec )
 295         vbi_decoder_delete( p_sys->p_vbi_dec );
 296     free( p_sys );
 297 }
 298
 299 #ifdef WORDS_BIGENDIAN
 300 # define ZVBI_PIXFMT_RGBA32 VBI_PIXFMT_RGBA32_BE
 301 #else
 302 # define ZVBI_PIXFMT_RGBA32 VBI_PIXFMT_RGBA32_LE
 303 #endif
 304
 305 /*****************************************************************************
 306  * Decode:
 307  *****************************************************************************/
 308 static subpicture_t *Decode( decoder_t *p_dec, block_t **pp_block )
 309 {
 310     decoder_sys_t   *p_sys = p_dec->p_sys;
 311     block_t         *p_block;
 312     subpicture_t    *p_spu = NULL;
 313     video_format_t  fmt;
 314     bool            b_cached = false;
 315     vbi_page        p_page;
 316
 317     if( (pp_block == NULL) || (*pp_block == NULL) )
 318         return NULL;
 319
 320     p_block = *pp_block;
 321     *pp_block = NULL;
 322
 323     if( p_block->i_buffer > 0 &&
 324         ( ( p_block->p_buffer[0] >= 0x10 && p_block->p_buffer[0] <= 0x1f ) ||
 325           ( p_block->p_buffer[0] >= 0x99 && p_block->p_buffer[0] <= 0x9b ) ) )
 326     {
 327         vbi_sliced   *p_sliced = p_sys->p_vbi_sliced;
 328         unsigned int i_lines = 0;
 329
 330         p_block->i_buffer--;
 331         p_block->p_buffer++;
 332         while( p_block->i_buffer >= 2 )
 333         {
 334             int      i_id   = p_block->p_buffer[0];
 335             unsigned i_size = p_block->p_buffer[1];
 336
 337             if( 2 + i_size > p_block->i_buffer )
 338                 break;
 339
 340             if( ( i_id == 0x02 || i_id == 0x03 ) && i_size >= 44 && i_lines < MAX_SLICES )
 341             {
 342                 unsigned line_offset  = p_block->p_buffer[2] & 0x1f;
 343                 unsigned field_parity = p_block->p_buffer[2] & 0x20;
 344
 345                 p_sliced[i_lines].id = VBI_SLICED_TELETEXT_B;
 346                 if( line_offset > 0 )
 347                     p_sliced[i_lines].line = line_offset + (field_parity ? 0 : 313);
 348                 else
 349                     p_sliced[i_lines].line = 0;
 350                 for( int i = 0; i < 42; i++ )
 351                     p_sliced[i_lines].data[i] = vbi_rev8( p_block->p_buffer[4 + i] );
 352                 i_lines++;
 353             }
 354
 355             p_block->i_buffer -= 2 + i_size;
 356             p_block->p_buffer += 2 + i_size;
 357         }
 358
 359         if( i_lines > 0 )
 360             vbi_decode( p_sys->p_vbi_dec, p_sliced, i_lines, (double)p_block->i_pts / 1000000 );
 361     }
 362
 363     /* */
 364     vlc_mutex_lock( &p_sys->lock );
 365     const int i_align = p_sys->i_align;
 366     const unsigned int i_wanted_page = p_sys->i_wanted_page;
 367     const unsigned int i_wanted_subpage = p_sys->i_wanted_subpage;
 368     const bool b_opaque = p_sys->b_opaque;
 369     vlc_mutex_unlock( &p_sys->lock );
 370
 371     /* Try to see if the page we want is in the cache yet */
 372     memset( &p_page, 0, sizeof(vbi_page) );
 373     b_cached = vbi_fetch_vt_page( p_sys->p_vbi_dec, &p_page,
 374                                   vbi_dec2bcd( i_wanted_page ),
 375                                   i_wanted_subpage, VBI_WST_LEVEL_3p5,
 376                                   25, true );
 377
 378     if( i_wanted_page == p_sys->i_last_page && !p_sys->b_update )
 379         goto error;
 380
 381     if( !b_cached )
 382     {
 383         if( p_sys->i_last_page != i_wanted_page )
 384         {
 385             /* We need to reset the subtitle */
 386             p_spu = Subpicture( p_dec, &fmt, true,
 387                                 p_page.columns, p_page.rows,
 388                                 i_align, p_block->i_pts );
 389             if( !p_spu )
 390                 goto error;
 391             p_spu->p_region->psz_text = strdup("");
 392
 393             p_sys->b_update = true;
 394             p_sys->i_last_page = i_wanted_page;
 395             goto exit;
 396         }
 397         goto error;
 398     }
 399
 400     p_sys->b_update = false;
 401     p_sys->i_last_page = i_wanted_page;
 402 #ifdef ZVBI_DEBUG
 403     msg_Dbg( p_dec, "we now have page: %d ready for display",
 404              i_wanted_page );
 405 #endif
 406     /* If there is a page or sub to render, then we do that here */
 407     /* Create the subpicture unit */
 408     p_spu = Subpicture( p_dec, &fmt, p_sys->b_text,
 409                         p_page.columns, p_page.rows,
 410                         i_align, p_block->i_pts );
 411     if( !p_spu )
 412         goto error;
 413
 414     if( p_sys->b_text )
 415     {
 416         unsigned int i_textsize = 7000;
 417         int i_total;
 418         char p_text[i_textsize+1];
 419
 420         i_total = vbi_print_page_region( &p_page, p_text, i_textsize,
 421                         "UTF-8", 0, 0, 0, 0, p_page.columns, p_page.rows );
 422         p_text[i_total] = '\0';
 423         /* Strip off the pagenumber */
 424         if( i_total <= 40 )
 425             goto error;
 426         p_spu->p_region->psz_text = strdup( &p_text[8] );
 427
 428 #ifdef ZVBI_DEBUG
 429         msg_Info( p_dec, "page %x-%x(%d)\n%s", p_page.pgno, p_page.subno, i_total, p_text );
 430 #endif
 431     }
 432     else
 433     {
 434         picture_t *p_pic = p_spu->p_region->p_picture;
 435
 436         /* ZVBI is stupid enough to assume pitch == width */
 437         p_pic->p->i_pitch = 4 * fmt.i_width;
 438         vbi_draw_vt_page( &p_page, ZVBI_PIXFMT_RGBA32,
 439                           p_spu->p_region->p_picture->p->p_pixels, 1, 1 );
 440
 441         vlc_mutex_lock( &p_sys->lock );
 442         memcpy( p_sys->nav_link, &p_page.nav_link, sizeof( p_sys->nav_link )) ;
 443         vlc_mutex_unlock( &p_sys->lock );
 444
 445         OpaquePage( p_pic, p_page, fmt, b_opaque );
 446     }
 447
 448 exit:
 449     vbi_unref_page( &p_page );
 450     block_Release( p_block );
 451     return p_spu;
 452
 453 error:
 454     vbi_unref_page( &p_page );
 455     if( p_spu != NULL )
 456     {
 457         decoder_DeleteSubpicture( p_dec, p_spu );
 458         p_spu = NULL;
 459     }
 460
 461     block_Release( p_block );
 462     return NULL;
 463 }
 464
 465 static subpicture_t *Subpicture( decoder_t *p_dec, video_format_t *p_fmt,
 466                                  bool b_text,
 467                                  int i_columns, int i_rows, int i_align,
 468                                  mtime_t i_pts )
 469 {
 470     video_format_t fmt;
 471     subpicture_t *p_spu;
 472
 473     /* If there is a page or sub to render, then we do that here */
 474     /* Create the subpicture unit */
 475     p_spu = decoder_NewSubpicture( p_dec, NULL );
 476     if( !p_spu )
 477     {
 478         msg_Warn( p_dec, "can't get spu buffer" );
 479         return NULL;
 480     }
 481
 482     memset( &fmt, 0, sizeof(video_format_t) );
 483     fmt.i_chroma = b_text ? VLC_CODEC_TEXT : VLC_CODEC_RGBA;
 484     fmt.i_sar_num = 0;
 485     fmt.i_sar_den = 1;
 486     if( b_text )
 487     {
 488         fmt.i_bits_per_pixel = 0;
 489     }
 490     else
 491     {
 492         fmt.i_width = fmt.i_visible_width = i_columns * 12;
 493         fmt.i_height = fmt.i_visible_height = i_rows * 10;
 494         fmt.i_bits_per_pixel = 32;
 495     }
 496     fmt.i_x_offset = fmt.i_y_offset = 0;
 497
 498     p_spu->p_region = subpicture_region_New( &fmt );
 499     if( p_spu->p_region == NULL )
 500     {
 501         msg_Err( p_dec, "cannot allocate SPU region" );
 502         decoder_DeleteSubpicture( p_dec, p_spu );
 503         return NULL;
 504     }
 505
 506     p_spu->p_region->i_x = 0;
 507     p_spu->p_region->i_y = 0;
 508     p_spu->p_region->i_align = i_align;
 509
 510     p_spu->i_start = i_pts;
 511     p_spu->i_stop = 0;
 512     p_spu->b_ephemer = true;
 513     p_spu->b_absolute = false;
 514
 515     if( !b_text )
 516     {
 517         p_spu->i_original_picture_width = fmt.i_width;
 518         p_spu->i_original_picture_height = fmt.i_height;
 519     }
 520
 521     /* */
 522     *p_fmt = fmt;
 523     return p_spu;
 524 }
 525
 526 static void EventHandler( vbi_event *ev, void *user_data )
 527 {
 528     decoder_t *p_dec        = (decoder_t *)user_data;
 529     decoder_sys_t *p_sys    = p_dec->p_sys;
 530
 531     if( ev->type == VBI_EVENT_TTX_PAGE )
 532     {
 533 #ifdef ZVBI_DEBUG
 534         msg_Info( p_dec, "Page %03x.%02x ",
 535                     ev->ev.ttx_page.pgno,
 536                     ev->ev.ttx_page.subno & 0xFF);
 537 #endif
 538         if( p_sys->i_last_page == vbi_bcd2dec( ev->ev.ttx_page.pgno ) )
 539             p_sys->b_update = true;
 540 #ifdef ZVBI_DEBUG
 541         if( ev->ev.ttx_page.clock_update )
 542             msg_Dbg( p_dec, "clock" );
 543         if( ev->ev.ttx_page.header_update )
 544             msg_Dbg( p_dec, "header" );
 545 #endif
 546     }
 547     else if( ev->type == VBI_EVENT_CLOSE )
 548         msg_Dbg( p_dec, "Close event" );
 549     else if( ev->type == VBI_EVENT_CAPTION )
 550         msg_Dbg( p_dec, "Caption line: %x", ev->ev.caption.pgno );
 551     else if( ev->type == VBI_EVENT_NETWORK )
 552     {
 553         msg_Dbg( p_dec, "Network change");
 554         vbi_network n = ev->ev.network;
 555         msg_Dbg( p_dec, "Network id:%d name: %s, call: %s ", n.nuid, n.name, n.call );
 556     }
 557     else if( ev->type == VBI_EVENT_TRIGGER )
 558         msg_Dbg( p_dec, "Trigger event" );
 559     else if( ev->type == VBI_EVENT_ASPECT )
 560         msg_Dbg( p_dec, "Aspect update" );
 561     else if( ev->type == VBI_EVENT_PROG_INFO )
 562         msg_Dbg( p_dec, "Program info received" );
 563     else if( ev->type == VBI_EVENT_NETWORK_ID )
 564         msg_Dbg( p_dec, "Network ID changed" );
 565 }
 566
 567 static int OpaquePage( picture_t *p_src, const vbi_page p_page,
 568                        const video_format_t fmt, bool b_opaque )
 569 {
 570     unsigned int    x, y;
 571
 572     assert( fmt.i_chroma == VLC_CODEC_RGBA );
 573
 574     /* Kludge since zvbi doesn't provide an option to specify opacity. */
 575     for( y = 0; y < fmt.i_height; y++ )
 576     {
 577         for( x = 0; x < fmt.i_width; x++ )
 578         {
 579             const vbi_opacity opacity = p_page.text[ y/10 * p_page.columns + x/12 ].opacity;
 580             const int background = p_page.text[ y/10 * p_page.columns + x/12 ].background;
 581             uint32_t *p_pixel = (uint32_t*)&p_src->p->p_pixels[y * p_src->p->i_pitch + 4*x];
 582
 583             switch( opacity )
 584             {
 585             /* Show video instead of this character */
 586             case VBI_TRANSPARENT_SPACE:
 587                 *p_pixel = 0;
 588                 break;
 589             /* Display foreground and background color */
 590             /* To make the boxed text "closed captioning" transparent
 591              * change true to false.
 592              */
 593             case VBI_OPAQUE:
 594             /* alpha blend video into background color */
 595             case VBI_SEMI_TRANSPARENT:
 596                 if( b_opaque )
 597                     break;
 598             /* Full text transparency. only foreground color is show */
 599             case VBI_TRANSPARENT_FULL:
 600                 if( (*p_pixel) == (0xff000000 | p_page.color_map[background] ) )
 601                     *p_pixel = 0;
 602                 break;
 603             }
 604         }
 605     }
 606     /* end of kludge */
 607     return VLC_SUCCESS;
 608 }
 609
 610 /* Callbacks */
 611 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
 612                         vlc_value_t oldval, vlc_value_t newval, void *p_data )
 613 {
 614     decoder_sys_t *p_sys = p_data;
 615     VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
 616
 617     vlc_mutex_lock( &p_sys->lock );
 618     switch( newval.i_int )
 619     {
 620         case ZVBI_KEY_RED:
 621             p_sys->i_wanted_page = vbi_bcd2dec( p_sys->nav_link[0].pgno );
 622             p_sys->i_wanted_subpage = p_sys->nav_link[0].subno;
 623             break;
 624         case ZVBI_KEY_GREEN:
 625             p_sys->i_wanted_page = vbi_bcd2dec( p_sys->nav_link[1].pgno );
 626             p_sys->i_wanted_subpage = p_sys->nav_link[1].subno;
 627             break;
 628         case ZVBI_KEY_YELLOW:
 629             p_sys->i_wanted_page = vbi_bcd2dec( p_sys->nav_link[2].pgno );
 630             p_sys->i_wanted_subpage = p_sys->nav_link[2].subno;
 631             break;
 632         case ZVBI_KEY_BLUE:
 633             p_sys->i_wanted_page = vbi_bcd2dec( p_sys->nav_link[3].pgno );
 634             p_sys->i_wanted_subpage = p_sys->nav_link[3].subno;
 635             break;
 636         case ZVBI_KEY_INDEX:
 637             p_sys->i_wanted_page = vbi_bcd2dec( p_sys->nav_link[5].pgno ); /* #4 is SKIPPED */
 638             p_sys->i_wanted_subpage = p_sys->nav_link[5].subno;
 639             break;
 640     }
 641     if( newval.i_int > 0 && newval.i_int < 999 )
 642     {
 643         p_sys->i_wanted_page = newval.i_int;
 644         p_sys->i_wanted_subpage = VBI_ANY_SUBNO;
 645     }
 646     vlc_mutex_unlock( &p_sys->lock );
 647
 648     return VLC_SUCCESS;
 649 }
 650
 651 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
 652                    vlc_value_t oldval, vlc_value_t newval, void *p_data )
 653 {
 654     decoder_sys_t *p_sys = p_data;
 655     VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
 656
 657     vlc_mutex_lock( &p_sys->lock );
 658     p_sys->b_opaque = newval.b_bool;
 659     p_sys->b_update = true;
 660     vlc_mutex_unlock( &p_sys->lock );
 661
 662     return VLC_SUCCESS;
 663 }
 664
 665 static int Position( vlc_object_t *p_this, char const *psz_cmd,
 666                      vlc_value_t oldval, vlc_value_t newval, void *p_data )
 667 {
 668     decoder_sys_t *p_sys = p_data;
 669     VLC_UNUSED(p_this); VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval);
 670
 671     vlc_mutex_lock( &p_sys->lock );
 672     p_sys->i_align = newval.i_int;
 673     vlc_mutex_unlock( &p_sys->lock );
 674
 675     return VLC_SUCCESS;
 676 }
 677
 678 static int EventKey( vlc_object_t *p_this, char const *psz_cmd,
 679                         vlc_value_t oldval, vlc_value_t newval, void *p_data )
 680 {
 681     decoder_t *p_dec = p_data;
 682     decoder_sys_t *p_sys = p_dec->p_sys;
 683
 684     VLC_UNUSED(psz_cmd); VLC_UNUSED(oldval); VLC_UNUSED( p_this );
 685
 686     /* FIXME: Capture + and - key for subpage browsing */
 687     if( newval.i_int == '-' || newval.i_int == '+' )
 688     {
 689         vlc_mutex_lock( &p_sys->lock );
 690         if( p_sys->i_wanted_subpage == VBI_ANY_SUBNO && newval.i_int == '+' )
 691             p_sys->i_wanted_subpage = vbi_dec2bcd(1);
 692         else if ( newval.i_int == '+' )
 693             p_sys->i_wanted_subpage = vbi_add_bcd( p_sys->i_wanted_subpage, 1);
 694         else if( newval.i_int == '-')
 695             p_sys->i_wanted_subpage = vbi_add_bcd( p_sys->i_wanted_subpage, 0xF9999999); /* BCD complement - 1 */
 696
 697         if ( !vbi_bcd_digits_greater( p_sys->i_wanted_subpage, 0x00 ) || vbi_bcd_digits_greater( p_sys->i_wanted_subpage, 0x99 ) )
 698                 p_sys->i_wanted_subpage = VBI_ANY_SUBNO;
 699         else
 700             msg_Info( p_dec, "subpage: %d",
 701                       vbi_bcd2dec( p_sys->i_wanted_subpage) );
 702
 703         p_sys->b_update = true;
 704         vlc_mutex_unlock( &p_sys->lock );
 705     }
 706
 707     /* Capture 0-9 for page selection */
 708     if( newval.i_int < '0' || newval.i_int > '9' )
 709         return VLC_SUCCESS;
 710
 711     vlc_mutex_lock( &p_sys->lock );
 712     p_sys->i_key[0] = p_sys->i_key[1];
 713     p_sys->i_key[1] = p_sys->i_key[2];
 714     p_sys->i_key[2] = (int)(newval.i_int - '0');
 715     msg_Info( p_dec, "page: %c%c%c", (char)(p_sys->i_key[0]+'0'),
 716               (char)(p_sys->i_key[1]+'0'), (char)(p_sys->i_key[2]+'0') );
 717
 718     int i_new_page = 0;
 719
 720     if( p_sys->i_key[0] > 0 && p_sys->i_key[0] <= 8 &&
 721         p_sys->i_key[1] >= 0 && p_sys->i_key[1] <= 9 &&
 722         p_sys->i_key[2] >= 0 && p_sys->i_key[2] <= 9 )
 723     {
 724         i_new_page = p_sys->i_key[0]*100 + p_sys->i_key[1]*10 + p_sys->i_key[2];
 725         p_sys->i_key[0] = p_sys->i_key[1] = p_sys->i_key[2] = '*' - '0';
 726     }
 727     vlc_mutex_unlock( &p_sys->lock );
 728
 729     if( i_new_page > 0 )
 730         var_SetInteger( p_dec, "vbi-page", i_new_page );
 731
 732     return VLC_SUCCESS;
 733 }