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