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> for M2X
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23 /*****************************************************************************
  24  *
  25  * information on teletext format can be found here :
  26  * http://pdc.ro.nu/teletext.html
  27  *
  28  *****************************************************************************/
  29
  30 /* This module implements:
  31  * ETSI EN 301 775: VBI data in PES
  32  * ETSI EN 300 472: EBU Teletext data in PES
  33  * ETSI EN 300 706: Enhanced Teletext (libzvbi)
  34  * ETSI EN 300 231: Video Programme System [VPS] (libzvbi)
  35  * ETSI EN 300 294: 625-line Wide Screen Signaling [WSS] (libzvbi)
  36  * EIA-608 Revision A: Closed Captioning [CC] (libzvbi)
  37  */
  38
  39 #include <vlc/vlc.h>
  40 #include <assert.h>
  41 #include <stdint.h>
  42 #include <libzvbi.h>
  43
  44 #include "vlc_vout.h"
  45 #include "vlc_bits.h"
  46 #include "vlc_codec.h"
  47
  48 typedef enum {
  49     DATA_UNIT_EBU_TELETEXT_NON_SUBTITLE     = 0x02,
  50     DATA_UNIT_EBU_TELETEXT_SUBTITLE         = 0x03,
  51     DATA_UNIT_EBU_TELETEXT_INVERTED         = 0x0C,
  52
  53     DATA_UNIT_ZVBI_WSS_CPR1204              = 0xB4,
  54     DATA_UNIT_ZVBI_CLOSED_CAPTION_525       = 0xB5,
  55     DATA_UNIT_ZVBI_MONOCHROME_SAMPLES_525   = 0xB6,
  56
  57     DATA_UNIT_VPS                           = 0xC3,
  58     DATA_UNIT_WSS                           = 0xC4,
  59     DATA_UNIT_CLOSED_CAPTION                = 0xC5,
  60     DATA_UNIT_MONOCHROME_SAMPLES            = 0xC6,
  61
  62     DATA_UNIT_STUFFING                      = 0xFF,
  63 } data_unit_id;
  64
  65 /*****************************************************************************
  66  * Module descriptor.
  67  *****************************************************************************/
  68 static int  Open ( vlc_object_t * );
  69 static void Close( vlc_object_t * );
  70 static subpicture_t *Decode( decoder_t *, block_t ** );
  71
  72 #define PAGE_TEXT N_("Teletext page")
  73 #define PAGE_LONGTEXT N_("Open the indicated Teletext page." \
  74         "Default page is index 100")
  75
  76 #define OPAQUE_TEXT N_("Text is always opaque")
  77 #define OPAQUE_LONGTEXT N_("Setting vbi-opaque to false " \
  78         "makes the boxed text transparent." )
  79
  80 vlc_module_begin();
  81     set_description( _("VBI and Teletext decoder") );
  82     set_shortname( "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, NULL,
  89                  PAGE_TEXT, PAGE_LONGTEXT, VLC_FALSE );
  90     add_bool( "vbi-opaque", VLC_TRUE, NULL,
  91                  OPAQUE_TEXT, OPAQUE_LONGTEXT, VLC_FALSE );
  92 vlc_module_end();
  93
  94 /****************************************************************************
  95  * Local structures
  96  ****************************************************************************/
  97
  98 struct decoder_sys_t
  99 {
 100    vbi_decoder *           p_vbi_dec;
 101    vbi_dvb_demux *         p_dvb_demux;
 102    unsigned int            i_wanted_page;
 103    unsigned int            i_last_page;
 104    vlc_bool_t              b_update;
 105    vlc_bool_t              b_opaque;
 106 }
 107
 108 static void event_handler( vbi_event *ev, void *user_data );
 109 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
 110                         vlc_value_t oldval, vlc_value_t newval, void *p_data );
 111 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
 112                    vlc_value_t oldval, vlc_value_t newval, void *p_data );
 113
 114 /*****************************************************************************
 115  * Open: probe the decoder and return score
 116  *****************************************************************************
 117  * Tries to launch a decoder and return score so that the interface is able
 118  * to chose.
 119  *****************************************************************************/
 120 static int Open( vlc_object_t *p_this )
 121 {
 122     decoder_t     *p_dec = (decoder_t *) p_this;
 123     decoder_sys_t *p_sys = NULL;
 124
 125     if( p_dec->fmt_in.i_codec != VLC_FOURCC('t','e','l','x') )
 126     {
 127         return VLC_EGENERIC;
 128     }
 129
 130     p_dec->pf_decode_sub = Decode;
 131     p_sys = p_dec->p_sys = malloc( sizeof(decoder_sys_t) );
 132     if( p_sys == NULL )
 133     {
 134         msg_Err( p_dec, "out of memory" );
 135         return VLC_ENOMEM;
 136
 137     }
 138     memset( p_sys, 0, sizeof(decoder_sys_t) );
 139
 140     p_sys->p_vbi_dec = vbi_decoder_new();
 141     p_sys->p_dvb_demux = vbi_dvb_pes_demux_new( NULL, NULL );
 142
 143     if( (p_sys->p_vbi_dec == NULL) || (p_sys->p_dvb_demux == NULL) )
 144     {
 145         msg_Err( p_dec, "VBI decoder/demux could not be created." );
 146         free( p_sys );
 147         return VLC_ENOMEM;
 148     }
 149
 150     vbi_event_handler_register( p_sys->p_vbi_dec, VBI_EVENT_TTX_PAGE |
 151                                 VBI_EVENT_CAPTION | VBI_EVENT_NETWORK |
 152                                 VBI_EVENT_ASPECT | VBI_EVENT_PROG_INFO,
 153                                 event_handler, p_dec );
 154
 155     /* Create the var on vlc_global. */
 156     p_sys->i_wanted_page = var_CreateGetInteger( p_dec->p_libvlc_global,
 157                                                  "vbi-page" );
 158     var_AddCallback( p_dec->p_libvlc_global, "vbi-page",
 159                      RequestPage, p_sys );
 160
 161     p_sys->b_opaque = var_CreateGetBool( p_dec, "vbi-opaque" );
 162     var_AddCallback( p_dec, "vbi-opaque", Opaque, p_sys );
 163     return VLC_SUCCESS;
 164 }
 165
 166 /*****************************************************************************
 167  * Close:
 168  *****************************************************************************/
 169 static void Close( vlc_object_t *p_this )
 170 {
 171     decoder_t     *p_dec = (decoder_t*) p_this;
 172     decoder_sys_t *p_sys = p_dec->p_sys;
 173
 174     if( p_sys->p_vbi_dec )
 175         vbi_decoder_delete( p_sys->p_vbi_dec );
 176     if( p_sys->p_dvb_demux )
 177         vbi_dvb_demux_delete( p_sys->p_dvb_demux );
 178     free( p_sys );
 179 }
 180
 181 #define MAX_SLICES 32
 182
 183 /*****************************************************************************
 184  * Decode:
 185  *****************************************************************************/
 186 static subpicture_t *Decode( decoder_t *p_dec, block_t **pp_block )
 187 {
 188     decoder_sys_t   *p_sys = p_dec->p_sys;
 189     block_t         *p_block;
 190     subpicture_t    *p_spu = NULL;
 191     video_format_t  fmt;
 192     vlc_bool_t      b_cached = VLC_FALSE;
 193     vbi_page        p_page;
 194     uint8_t         *p_pos;
 195     unsigned int    i_left;
 196
 197     /* part of kludge */
 198     uint32_t        *p_begin, *p_end;
 199     unsigned        int x = 0, y = 0;
 200     vbi_opacity opacity;
 201     /* end part of kludge */
 202
 203     if( (pp_block == NULL) || (*pp_block == NULL) )
 204         return NULL;
 205     p_block = *pp_block;
 206     *pp_block = NULL;
 207
 208     p_pos = p_block->p_buffer;
 209     i_left = p_block->i_buffer;
 210
 211     while( i_left > 0 )
 212     {
 213         vbi_sliced      p_sliced[MAX_SLICES];
 214         unsigned int    i_lines = 0;
 215         int64_t         i_pts;
 216
 217         i_lines = vbi_dvb_demux_cor( p_sys->p_dvb_demux, p_sliced,
 218                                      MAX_SLICES, &i_pts, &p_pos, &i_left );
 219
 220         if( i_lines > 0 )
 221             vbi_decode( p_sys->p_vbi_dec, p_sliced, i_lines, i_pts / 90000.0 );
 222     }
 223
 224     /* Try to see if the page we want is in the cache yet */
 225     b_cached = vbi_fetch_vt_page( p_sys->p_vbi_dec, &p_page,
 226                                   vbi_dec2bcd( p_sys->i_wanted_page ),
 227                                   VBI_ANY_SUBNO, VBI_WST_LEVEL_3p5,
 228                                   25, FALSE );
 229
 230     if( !b_cached )
 231         goto error;
 232
 233     if( (p_sys->i_wanted_page == p_sys->i_last_page) &&
 234          (p_sys->b_update != VLC_TRUE) )
 235         goto error;
 236
 237     p_sys->i_last_page = p_sys->i_wanted_page;
 238     p_sys->b_update = VLC_FALSE;
 239     msg_Dbg( p_dec, "we now have page: %d ready for display",
 240              p_sys->i_wanted_page );
 241
 242     /* If there is a page or sub to render, then we do that here */
 243     /* Create the subpicture unit */
 244     p_spu = p_dec->pf_spu_buffer_new( p_dec );
 245     if( !p_spu )
 246     {
 247         msg_Warn( p_dec, "can't get spu buffer" );
 248         goto error;
 249     }
 250
 251     /* Create a new subpicture region */
 252     memset( &fmt, 0, sizeof(video_format_t) );
 253     fmt.i_chroma = VLC_FOURCC('R','G','B','A');
 254     fmt.i_aspect = VOUT_ASPECT_FACTOR;
 255     fmt.i_sar_num = fmt.i_sar_den = 1;
 256     fmt.i_width = fmt.i_visible_width = p_page.columns * 12;
 257     fmt.i_height = fmt.i_visible_height = p_page.rows * 10;
 258     fmt.i_bits_per_pixel = 32;
 259     fmt.i_x_offset = fmt.i_y_offset = 0;
 260
 261     p_spu->p_region = p_spu->pf_create_region( VLC_OBJECT(p_dec), &fmt );
 262     if( p_spu->p_region == NULL )
 263     {
 264         msg_Err( p_dec, "cannot allocate SPU region" );
 265         goto error;
 266     }
 267
 268     p_spu->p_region->i_x = 0;
 269     p_spu->p_region->i_y = 0;
 270
 271     /* Normal text subs, easy markup */
 272     p_spu->i_flags = SUBPICTURE_ALIGN_TOP;
 273
 274     p_spu->i_start = p_block->i_pts;
 275     p_spu->i_stop = 0;
 276     p_spu->b_ephemer = VLC_TRUE;
 277     p_spu->b_absolute = VLC_FALSE;
 278     p_spu->b_pausable = VLC_TRUE;
 279     p_spu->i_original_picture_width = p_page.columns * 12;
 280     p_spu->i_original_picture_height = p_page.rows * 10;
 281
 282     vbi_draw_vt_page( &p_page, VBI_PIXFMT_RGBA32_LE,
 283                       p_spu->p_region->picture.p->p_pixels, 1, 1 );
 284     p_spu->p_region->picture.p->i_lines = p_page.rows * 10;
 285     p_spu->p_region->picture.p->i_pitch = p_page.columns * 12 * 4;
 286
 287     /* Kludge since zvbi doesn't provide an option to specify opacity. */
 288     p_begin = (uint32_t *)p_spu->p_region->picture.p->p_pixels;
 289     p_end   = (uint32_t *)p_spu->p_region->picture.p->p_pixels+(fmt.i_width * fmt.i_height);
 290
 291     for( ; p_begin < p_end; p_begin++ )
 292     {
 293         opacity = p_page.text[ y / 10 * p_page.columns + x / 12 ].opacity;
 294         switch( opacity )
 295         {
 296             /* Show video instead of this character */
 297             case VBI_TRANSPARENT_SPACE:
 298                 *p_begin = 0;
 299                 break;
 300             /* To make the boxed text "closed captioning" transparent
 301              * change VLC_TRUE to VLC_FALSE.
 302              */
 303             case VBI_OPAQUE:
 304                 if( p_sys->b_opaque )
 305                     break;
 306             /* Full text transparency. only foreground color is show */
 307             case VBI_TRANSPARENT_FULL:
 308             /* Transparency for boxed text */
 309             case VBI_SEMI_TRANSPARENT:
 310                 if( (*p_begin & 0xffffff00) == 0xff  )
 311                     *p_begin = 0;
 312                 break;
 313             default:
 314                 break;
 315         }
 316         x++;
 317         if( x >= fmt.i_width )
 318         {
 319             x = 0;
 320             y++;
 321         }
 322     }
 323     /* end of kludge */
 324
 325 #if 0
 326     unsigned int i_total, i_textsize = 7000;
 327     char p_text[7000];
 328
 329     i_total =  vbi_print_page_region( &p_page, p_text, i_textsize,
 330                         "ISO-8859-1", 0, 0, 0, 0, p_page.columns,
 331                         p_page.rows );
 332     p_text[i_total] = '\0';
 333
 334     msg_Dbg( p_dec, "page %x-%x\n%s", p_page.pgno, p_page.subno, p_text );
 335 #endif
 336
 337     vbi_unref_page( &p_page );
 338     block_Release( p_block );
 339     return p_spu;
 340
 341 error:
 342     vbi_unref_page( &p_page );
 343     if( p_spu != NULL )
 344     {
 345         p_dec->pf_spu_buffer_del( p_dec, p_spu );
 346         p_spu = NULL;
 347     }
 348
 349     block_Release( p_block );
 350     return NULL;
 351 }
 352
 353 static void event_handler( vbi_event *ev, void *user_data)
 354 {
 355     decoder_t *p_dec        = (decoder_t *)user_data;
 356     decoder_sys_t *p_sys    = p_dec->p_sys;
 357
 358     if( ev->type == VBI_EVENT_TTX_PAGE )
 359     {
 360         /* msg_Dbg( p_dec, "Page %03x.%02x ",
 361                     ev->ev.ttx_page.pgno,
 362                     ev->ev.ttx_page.subno & 0xFF);
 363         */
 364         if( p_sys->i_last_page == vbi_bcd2dec( ev->ev.ttx_page.pgno ) )
 365             p_sys->b_update = VLC_TRUE;
 366
 367         if( ev->ev.ttx_page.clock_update )
 368             msg_Dbg( p_dec, "clock" );
 369         if( ev->ev.ttx_page.header_update )
 370             msg_Dbg( p_dec, "header" );
 371     }
 372     else if( ev->type == VBI_EVENT_CAPTION )
 373         msg_Dbg( p_dec, "Caption line: %x", ev->ev.caption.pgno );
 374     else if( ev->type == VBI_EVENT_NETWORK )
 375         msg_Dbg( p_dec, "Network change" );
 376     else if( ev->type == VBI_EVENT_ASPECT )
 377         msg_Dbg( p_dec, "Aspect update" );
 378     else if( ev->type == VBI_EVENT_NETWORK )
 379         msg_Dbg( p_dec, "Program info received" );
 380 }
 381
 382 static int RequestPage( vlc_object_t *p_this, char const *psz_cmd,
 383                         vlc_value_t oldval, vlc_value_t newval, void *p_data )
 384 {
 385     decoder_sys_t   *p_sys = p_data;
 386
 387     if( (newval.i_int > 0) && (newval.i_int < 999) )
 388         p_sys->i_wanted_page = newval.i_int;
 389
 390     return VLC_SUCCESS;
 391 }
 392
 393 static int Opaque( vlc_object_t *p_this, char const *psz_cmd,
 394                    vlc_value_t oldval, vlc_value_t newval, void *p_data )
 395 {
 396     decoder_sys_t *p_sys = p_data;
 397
 398     if( p_sys )
 399         p_sys->b_opaque = newval.b_bool;
 400     return VLC_SUCCESS;
 401 }