From 2cdbf636e684ba0675172f2dc34c4ea5b1d50435 Mon Sep 17 00:00:00 2001 From: Laurent Aimar <fenrir@videolan.org> Date: Wed, 17 Oct 2007 19:48:16 +0000 Subject: [PATCH] Closed captions decoder. The rollup and paint on mode is not really good (a lot of flicker) but I don't see how to fix it (the subtitle is updated as soon as a new character is added). --- modules/codec/cc.c | 1143 ++++++++++++++++++++++++++++++++++++++++++++ modules/codec/cc.h | 143 ++++++ 2 files changed, 1286 insertions(+) create mode 100644 modules/codec/cc.c create mode 100644 modules/codec/cc.h diff --git a/modules/codec/cc.c b/modules/codec/cc.c new file mode 100644 index 0000000000..2ca92d70cd --- /dev/null +++ b/modules/codec/cc.c @@ -0,0 +1,1143 @@ +/***************************************************************************** + * cc608.c : CC 608/708 subtitles decoder + ***************************************************************************** + * Copyright (C) 2007 Laurent Aimar + * $Id: subsdec.c 22151 2007-09-18 16:20:49Z courmisch $ + * + * Authors: Laurent Aimar < fenrir # via.ecp.fr> + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA. + *****************************************************************************/ + +/***************************************************************************** + * Preamble + *****************************************************************************/ +/* The EIA 608 decoder part has been initialy based on ccextractor (GPL) + * and rewritten */ + +/* TODO: + * On discontinuity reset the decoder state + * Check parity + * 708 decoding + */ + +#include <vlc/vlc.h> +#include <vlc_vout.h> +#include <vlc_codec.h> +#include <vlc_input.h> + +#include <vlc_osd.h> +#include <vlc_filter.h> +#include <vlc_image.h> +#include <vlc_charset.h> +#include <vlc_stream.h> +#include <vlc_xml.h> +#include <errno.h> +#include <string.h> + +/***************************************************************************** + * Module descriptor. + *****************************************************************************/ +static int Open ( vlc_object_t * ); +static void Close( vlc_object_t * ); + +vlc_module_begin(); + set_shortname( _("CC 608/708")); + set_description( _("Closed Captions decoder") ); + set_capability( "decoder", 50 ); + set_callbacks( Open, Close ); +vlc_module_end(); + +/***************************************************************************** + * Local prototypes + *****************************************************************************/ +typedef enum +{ + EIA608_MODE_POPUP = 0, + EIA608_MODE_ROLLUP_2 = 1, + EIA608_MODE_ROLLUP_3 = 2, + EIA608_MODE_ROLLUP_4 = 3, + EIA608_MODE_PAINTON = 4, + EIA608_MODE_TEXT = 5 +} eia608_mode_t; + +typedef enum +{ + EIA608_COLOR_WHITE = 0, + EIA608_COLOR_GREEN = 1, + EIA608_COLOR_BLUE = 2, + EIA608_COLOR_CYAN = 3, + EIA608_COLOR_RED = 4, + EIA608_COLOR_YELLOW = 5, + EIA608_COLOR_MAGENTA = 6, + EIA608_COLOR_USERDEFINED = 7 +} eia608_color_t; + +typedef enum +{ + EIA608_FONT_REGULAR = 0x00, + EIA608_FONT_ITALICS = 0x01, + EIA608_FONT_UNDERLINE = 0x02, + EIA608_FONT_UNDERLINE_ITALICS = EIA608_FONT_UNDERLINE | EIA608_FONT_ITALICS +} eia608_font_t; + +#define EIA608_SCREEN_ROWS 15 +#define EIA608_SCREEN_COLUMNS 32 + +struct eia608_screen // A CC buffer +{ + uint8_t characters[EIA608_SCREEN_ROWS][EIA608_SCREEN_COLUMNS+1]; + eia608_color_t colors[EIA608_SCREEN_ROWS][EIA608_SCREEN_COLUMNS+1]; + eia608_font_t fonts[EIA608_SCREEN_ROWS][EIA608_SCREEN_COLUMNS+1]; // Extra char at the end for a 0 + int row_used[EIA608_SCREEN_ROWS]; // Any data in row? +}; +typedef struct eia608_screen eia608_screen; + +typedef struct +{ + /* Current channel (used to reject packet without channel information) */ + int i_channel; + + /* */ + int i_screen; /* Displayed screen */ + eia608_screen screen[2]; + + struct + { + int i_row; + int i_column; + } cursor; + + /* */ + eia608_mode_t mode; + eia608_color_t color; + eia608_font_t font; + int i_row_rollup; + + /* Last command pair (used to reject duplicated command) */ + struct + { + uint8_t d1; + uint8_t d2; + } last; +} eia608_t; + +static void Eia608Init( eia608_t * ); +static vlc_bool_t Eia608Parse( eia608_t *h, int i_channel_selected, const uint8_t data[2] ); +static char *Eia608Text( eia608_t *h, vlc_bool_t b_html ); +static void Eia608Exit( eia608_t * ); + +/* It will be enough up to 63 B frames, which is far too high for + * broadcast environment */ +#define CC_MAX_REORDER_SIZE (64) +struct decoder_sys_t +{ + int i; + + int i_block; + block_t *pp_block[CC_MAX_REORDER_SIZE]; + block_t *p_current; + + int i_field; + int i_channel; + + eia608_t eia608; +}; + +static subpicture_t *Decode( decoder_t *, block_t ** ); + +/***************************************************************************** + * Open: probe the decoder and return score + ***************************************************************************** + * Tries to launch a decoder and return score so that the interface is able + * to chose. + *****************************************************************************/ +static int Open( vlc_object_t *p_this ) +{ + decoder_t *p_dec = (decoder_t*)p_this; + decoder_sys_t *p_sys; + int i_field; + int i_channel; + + switch( p_dec->fmt_in.i_codec ) + { + case VLC_FOURCC('c','c','1',' '): + i_field = 0; i_channel = 1; + break; + case VLC_FOURCC('c','c','2',' '): + i_field = 0; i_channel = 2; + break; + case VLC_FOURCC('c','c','3',' '): + i_field = 1; i_channel = 1; + break; + case VLC_FOURCC('c','c','4',' '): + i_field = 1; i_channel = 2; + break; + + default: + return VLC_EGENERIC; + } + + p_dec->pf_decode_sub = Decode; + + /* Allocate the memory needed to store the decoder's structure */ + p_dec->p_sys = p_sys = malloc( sizeof( *p_sys ) ); + if( p_sys == NULL ) + { + msg_Err( p_dec, "out of memory" ); + return VLC_ENOMEM; + } + + /* init of p_sys */ + memset( p_sys, 0, sizeof( *p_sys ) ); + p_sys->i_block = 0; + p_sys->p_current = NULL; + + p_sys->i_field = i_field; + p_sys->i_channel = i_channel; + + Eia608Init( &p_sys->eia608 ); + + return VLC_SUCCESS; +} + +/**************************************************************************** + * Decode: the whole thing + **************************************************************************** + * + ****************************************************************************/ +static void Push( decoder_t *, block_t * ); +static block_t *Pop( decoder_t * ); +static subpicture_t *Convert( decoder_t *, block_t * ); + +static subpicture_t *Decode( decoder_t *p_dec, block_t **pp_block ) +{ + decoder_sys_t *p_sys = p_dec->p_sys; + + if( pp_block && *pp_block ) + { + Push( p_dec, *pp_block ); + *pp_block = NULL; + } + + for( ;; ) + { + block_t *p_block; + + p_block = p_sys->p_current; + if( !p_block ) + p_block = Pop( p_dec ); + if( !p_block ) + break; + + subpicture_t *p_spu = Convert( p_dec, p_block ); + if( p_spu ) + return p_spu; + } + return NULL; +} + +/***************************************************************************** + * CloseDecoder: clean up the decoder + *****************************************************************************/ +static void Close( vlc_object_t *p_this ) +{ + decoder_t *p_dec = (decoder_t *)p_this; + decoder_sys_t *p_sys = p_dec->p_sys; + int i; + + for( i = 0; i < p_sys->i_block; i++ ) + block_Release( p_sys->pp_block[i] ); + Eia608Exit( &p_sys->eia608 ); + free( p_sys ); +} + +/***************************************************************************** + * + *****************************************************************************/ +static void Push( decoder_t *p_dec, block_t *p_block ) +{ + decoder_sys_t *p_sys = p_dec->p_sys; + + if( p_sys->i_block >= CC_MAX_REORDER_SIZE ) + { + msg_Warn( p_dec, "Trashing a CC entry" ); + memmove( &p_sys->pp_block[0], &p_sys->pp_block[1], sizeof(*p_sys->pp_block) * (CC_MAX_REORDER_SIZE-1) ); + p_sys->i_block--; + } + p_sys->pp_block[p_sys->i_block++] = p_block; +} +static block_t *Pop( decoder_t *p_dec ) +{ + decoder_sys_t *p_sys = p_dec->p_sys; + block_t *p_block; + int i_index; + int i; + /* XXX Cc captions data are OUT OF ORDER (because we receive them in the bitstream + * order (ie ordered by video picture dts) instead of the display order. + * We will simulate a simple IPB buffer scheme + * and reorder with pts. + * XXX it won't work with H264 which use non out of order B picture or MMCO + */ + + /* Wait for a P and output all *previous* picture by pts order (for + * hierarchical B frames) */ + if( p_sys->i_block <= 1 || + ( p_sys->pp_block[p_sys->i_block-1]->i_flags & BLOCK_FLAG_TYPE_B ) ) + return NULL; + + p_block = p_sys->pp_block[i_index = 0]; + if( p_block->i_pts > 0 ) + { + for( i = 1; i < p_sys->i_block-1; i++ ) + { + if( p_sys->pp_block[i]->i_pts > 0 && p_block->i_pts > 0 && + p_sys->pp_block[i]->i_pts < p_block->i_pts ) + p_block = p_sys->pp_block[i_index = i]; + } + } + assert( i_index+1 < p_sys->i_block ); + memmove( &p_sys->pp_block[i_index], &p_sys->pp_block[i_index+1], sizeof(*p_sys->pp_block) * ( p_sys->i_block - i_index - 1 ) ); + p_sys->i_block--; + + return p_block; +} + +static subpicture_t *Subtitle( decoder_t *p_dec, char *psz_subtitle, char *psz_html, mtime_t i_pts ) +{ + //decoder_sys_t *p_sys = p_dec->p_sys; + subpicture_t *p_spu = NULL; + video_format_t fmt; + + /* We cannot display a subpicture with no date */ + if( i_pts == 0 ) + { + msg_Warn( p_dec, "subtitle without a date" ); + return NULL; + } + + EnsureUTF8( psz_subtitle ); + if( psz_html ) + EnsureUTF8( psz_html ); + + /* Create the subpicture unit */ + p_spu = p_dec->pf_spu_buffer_new( p_dec ); + if( !p_spu ) + { + msg_Warn( p_dec, "can't get spu buffer" ); + free( psz_subtitle ); + if( psz_html ) + free( psz_html ); + return NULL; + } + + p_spu->b_pausable = VLC_TRUE; + + /* Create a new subpicture region */ + memset( &fmt, 0, sizeof(video_format_t) ); + fmt.i_chroma = VLC_FOURCC('T','E','X','T'); + fmt.i_aspect = 0; + fmt.i_width = fmt.i_height = 0; + fmt.i_x_offset = fmt.i_y_offset = 0; + p_spu->p_region = p_spu->pf_create_region( VLC_OBJECT(p_dec), &fmt ); + if( !p_spu->p_region ) + { + msg_Err( p_dec, "cannot allocate SPU region" ); + free( psz_subtitle ); + if( psz_html ) + free( psz_html ); + p_dec->pf_spu_buffer_del( p_dec, p_spu ); + return NULL; + } + + /* Decode and format the subpicture unit */ + /* Normal text subs, easy markup */ + p_spu->p_region->i_align = SUBPICTURE_ALIGN_BOTTOM;// | SUBPICTURE_ALIGN_LEFT;// | p_sys->i_align; + p_spu->i_x = 0; //p_sys->i_align ? 20 : 0; + p_spu->i_y = 10; + + p_spu->p_region->psz_text = psz_subtitle; + p_spu->p_region->psz_html = psz_html; + + p_spu->i_start = i_pts; + p_spu->i_stop = i_pts + 10000000; /* 10s max */ + p_spu->b_ephemer = VLC_TRUE; + p_spu->b_absolute = VLC_FALSE; + + return p_spu; +} + +static subpicture_t *Convert( decoder_t *p_dec, block_t *p_block ) +{ + decoder_sys_t *p_sys = p_dec->p_sys; + const int64_t i_pts = p_block->i_pts; + vlc_bool_t b_changed = VLC_FALSE; + + p_sys->p_current = p_block; + + /* TODO do the real decoding here */ + while( p_block && p_block->i_buffer >= 3 ) + { + if( p_block->p_buffer[0] == p_sys->i_field ) + b_changed |= Eia608Parse( &p_sys->eia608, p_sys->i_channel, &p_block->p_buffer[1] ); + + p_block->i_buffer -= 3; + p_block->p_buffer += 3; + if( p_block->i_buffer <= 0 ) + { + block_Release( p_block ); + p_sys->p_current = p_block = NULL; + } + } + static int64_t i_last = 0; + if( b_changed )//&& i_pts - i_last > 100*1000 ) + { + char *psz_subtitle = Eia608Text( &p_sys->eia608, VLC_FALSE ); + char *psz_html = NULL;//Eia608Text( &p_sys->eia608, VLC_TRUE ); + i_last = i_pts; + return Subtitle( p_dec, psz_subtitle, psz_html, i_pts ); + } + return NULL; +} + + +/***************************************************************************** + * + *****************************************************************************/ +static const struct { + eia608_color_t i_color; + eia608_font_t i_font; + int i_column; +} pac2_attribs[]= { + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_GREEN, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_GREEN, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_BLUE, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_BLUE, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_CYAN, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_CYAN, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_RED, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_RED, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_YELLOW, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_YELLOW, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_MAGENTA, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_MAGENTA, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_WHITE, EIA608_FONT_ITALICS, 0 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE_ITALICS, 0 }, + + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 0 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 0 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 4 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 4 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 8 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 8 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 12 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 12 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 16 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 16 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 20 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 20 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 24 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 24 }, + { EIA608_COLOR_WHITE, EIA608_FONT_REGULAR, 28 }, + { EIA608_COLOR_WHITE, EIA608_FONT_UNDERLINE, 28 } , +}; + +#define EIA608_COLOR_DEFAULT EIA608_COLOR_WHITE + +static void Eia608Cursor( eia608_t *h, int dx ) +{ + h->cursor.i_column += dx; + if( h->cursor.i_column < 0 ) + h->cursor.i_column = 0; + else if( h->cursor.i_column > EIA608_SCREEN_COLUMNS-1 ) + h->cursor.i_column = EIA608_SCREEN_COLUMNS-1; +} +static void Eia608ClearScreenRowX( eia608_t *h, int i_screen, int i_row, int x ) +{ + eia608_screen *screen = &h->screen[i_screen]; + int i; + + if( x == 0 ) + { + screen->row_used[i_row] = VLC_FALSE; + } + else + { + screen->row_used[i_row] = VLC_FALSE; + for( i = 0; i < x; i++ ) + { + if( screen->characters[i_row][i] != ' ' || + screen->colors[i_row][i] != EIA608_COLOR_DEFAULT || + screen->fonts[i_row][i] != EIA608_FONT_REGULAR ) + { + screen->row_used[i_row] = VLC_TRUE; + break; + } + } + } + + for( ; x < EIA608_SCREEN_COLUMNS+1; x++ ) + { + screen->characters[i_row][x] = x < EIA608_SCREEN_COLUMNS ? ' ' : '\0'; + screen->colors[i_row][x] = EIA608_COLOR_DEFAULT; + screen->fonts[i_row][x] = EIA608_FONT_REGULAR; + } +} + +static void Eia608ClearScreenRow( eia608_t *h, int i_screen, int i_row ) +{ + Eia608ClearScreenRowX( h, i_screen, i_row, 0 ); +} + +static void Eia608ClearScreen( eia608_t *h, int i_screen ) +{ + int i; + for( i = 0; i < EIA608_SCREEN_ROWS; i++ ) + Eia608ClearScreenRow( h, i_screen, i ); +} + +static int Eia608GetWritingScreenIndex( eia608_t *h ) +{ + switch( h->mode ) + { + case EIA608_MODE_POPUP: // Non displayed screen + return 1 - h->i_screen; + + case EIA608_MODE_ROLLUP_2: // Displayed screen + case EIA608_MODE_ROLLUP_3: + case EIA608_MODE_ROLLUP_4: + case EIA608_MODE_PAINTON: + return h->i_screen; + default: + /* It cannot happen, else it is a bug */ + assert( 0 ); + return 0; + } +} + +static void Eia608EraseScreen( eia608_t *h, vlc_bool_t b_displayed ) +{ + Eia608ClearScreen( h, b_displayed ? h->i_screen : (1-h->i_screen) ); +} + +static void Eia608Write( eia608_t *h, const uint8_t c ) +{ + const int i_row = h->cursor.i_row; + const int i_column = h->cursor.i_column; + eia608_screen *screen; + + if( h->mode == EIA608_MODE_TEXT ) + return; + + screen = &h->screen[Eia608GetWritingScreenIndex( h )]; + + screen->characters[i_row][i_column] = c; + screen->colors[i_row][i_column] = h->color; + screen->fonts[i_row][i_column] = h->font; + screen->row_used[i_row] = VLC_TRUE; + Eia608Cursor( h, 1 ); +} +static void Eia608Erase( eia608_t *h ) +{ + const int i_row = h->cursor.i_row; + const int i_column = h->cursor.i_column - 1; + eia608_screen *screen; + + if( h->mode == EIA608_MODE_TEXT ) + return; + if( i_column < 0 ) + return; + + screen = &h->screen[Eia608GetWritingScreenIndex( h )]; + + /* FIXME do we need to reset row_used/colors/font ? */ + screen->characters[i_row][i_column] = ' '; + Eia608Cursor( h, -1 ); +} +static void Eia608EraseToEndOfRow( eia608_t *h ) +{ + if( h->mode == EIA608_MODE_TEXT ) + return; + + Eia608ClearScreenRowX( h, Eia608GetWritingScreenIndex( h ), h->cursor.i_row, h->cursor.i_column ); +} + +static void Eia608RollUp( eia608_t *h ) +{ + const int i_screen = Eia608GetWritingScreenIndex( h ); + eia608_screen *screen = &h->screen[i_screen]; + + int keep_lines; + int i; + + /* Window size */ + if( h->mode == EIA608_MODE_ROLLUP_2 ) + keep_lines = 2; + else if( h->mode == EIA608_MODE_ROLLUP_3 ) + keep_lines = 3; + else if( h->mode == EIA608_MODE_ROLLUP_4 ) + keep_lines = 4; + else + return; + + /* Reset the cursor */ + h->cursor.i_column = 0; + + /* Erase lines above our window */ + for( i = 0; i < h->cursor.i_row - keep_lines; i++ ) + Eia608ClearScreenRow( h, i_screen, i ); + + /* Move up */ + for( i = 0; i < keep_lines-1; i++ ) + { + const int i_row = h->cursor.i_row - keep_lines + i + 1; + if( i_row < 0 ) + continue; + assert( i_row+1 < EIA608_SCREEN_ROWS ); + memcpy( screen->characters[i_row], screen->characters[i_row+1], sizeof(*screen->characters) ); + memcpy( screen->colors[i_row], screen->colors[i_row+1], sizeof(*screen->colors) ); + memcpy( screen->fonts[i_row], screen->fonts[i_row+1], sizeof(*screen->fonts) ); + screen->row_used[i_row] = screen->row_used[i_row+1]; + } + /* Reset current row */ + Eia608ClearScreenRow( h, i_screen, h->cursor.i_row ); +} +static void Eia608ParseChannel( eia608_t *h, uint8_t d1 ) +{ + if( d1 == 0x14 ) + h->i_channel = 1; + else if( d1 == 0x1c ) + h->i_channel = 2; + else if( ( d1 >= 0x01 && d1 <= 0x0f ) || d1 == 0x15 ) + h->i_channel = 3; + else if( d1 == 0x1d ) + h->i_channel = 4; +} +static vlc_bool_t Eia608ParseTextAttribute( eia608_t *h, uint8_t d2 ) +{ + const int i_index = d2 - 0x20; + assert( d2 >= 0x20 && d2 <= 0x2f ); + + h->color = pac2_attribs[i_index].i_color; + h->font = pac2_attribs[i_index].i_font; + Eia608Cursor( h, 1 ); + + return VLC_FALSE; +} +static vlc_bool_t Eia608ParseSingle( eia608_t *h, const uint8_t dx ) +{ + assert( dx >= 0x20 ); + Eia608Write( h, dx ); + return VLC_TRUE; +} +static vlc_bool_t Eia608ParseDouble( eia608_t *h, uint8_t d2 ) +{ + assert( d2 >= 0x30 && d2 <= 0x3f ); + Eia608Write( h, d2 + 0x50 ); /* We use charaters 0x80...0x8f */ + return VLC_TRUE; +} +static vlc_bool_t Eia608ParseExtended( eia608_t *h, uint8_t d1, uint8_t d2 ) +{ + assert( d2 >= 0x20 && d2 <= 0x3f ); + assert( d1 == 0x12 || d1 == 0x13 ); + if( d1 == 0x12 ) + d2 += 0x70; /* We use charaters 0x90-0xaf */ + else + d2 += 0x90; /* We use charaters 0xb0-0xcf */ + + /* The extended characters replace the previous one with a more + * advanced one */ + Eia608Cursor( h, -1 ); + Eia608Write( h, d2 ); + return VLC_TRUE; +} +static vlc_bool_t Eia608ParseCommand0x14( eia608_t *h, uint8_t d2 ) +{ + vlc_bool_t b_changed = VLC_FALSE; + + switch( d2 ) + { + case 0x20: /* Resume caption loading */ + h->mode = EIA608_MODE_POPUP; + break; + case 0x21: /* Backspace */ + Eia608Erase( h ); + b_changed = VLC_TRUE; + break; + case 0x22: /* Reserved */ + case 0x23: + break; + case 0x24: /* Delete to end of row */ + Eia608EraseToEndOfRow( h ); + break; + case 0x25: /* Rollup 2 */ + case 0x26: /* Rollup 3 */ + case 0x27: /* Rollup 4 */ + if( h->mode == EIA608_MODE_POPUP || h->mode == EIA608_MODE_PAINTON ) + { + Eia608EraseScreen( h, VLC_TRUE ); + Eia608EraseScreen( h, VLC_FALSE ); + b_changed = VLC_TRUE; + } + + if( d2 == 0x25 ) + h->mode = EIA608_MODE_ROLLUP_2; + else if( d2 == 0x26 ) + h->mode = EIA608_MODE_ROLLUP_3; + else + h->mode = EIA608_MODE_ROLLUP_4; + + h->cursor.i_column = 0; + h->cursor.i_row = h->i_row_rollup; + break; + case 0x28: /* Flash on */ + /* TODO */ + break; + case 0x29: /* Resume direct captionning */ + h->mode = EIA608_MODE_PAINTON; + break; + case 0x2a: /* Text restart */ + /* TODO */ + break; + + case 0x2b: /* Resume text display */ + h->mode = EIA608_MODE_TEXT; + break; + + case 0x2c: /* Erase displayed memory */ + Eia608EraseScreen( h, VLC_TRUE ); + b_changed = VLC_TRUE; + break; + case 0x2d: /* Carriage return */ + Eia608RollUp(h); + b_changed = VLC_TRUE; + break; + case 0x2e: /* Erase non displayed memory */ + Eia608EraseScreen( h, VLC_FALSE ); + break; + case 0x2f: /* End of caption (flip screen if not paint on) */ + if( h->mode != EIA608_MODE_PAINTON ) + h->i_screen = 1 - h->i_screen; + h->mode = EIA608_MODE_POPUP; + h->cursor.i_column = 0; + h->cursor.i_row = 0; + h->color = EIA608_COLOR_DEFAULT; + h->font = EIA608_FONT_REGULAR; + b_changed = VLC_TRUE; + break; + } + return b_changed; +} +static vlc_bool_t Eia608ParseCommand0x17( eia608_t *h, uint8_t d2 ) +{ + switch( d2 ) + { + case 0x21: /* Tab offset 1 */ + Eia608Cursor( h, 1 ); + break; + case 0x22: /* Tab offset 2 */ + Eia608Cursor( h, 2 ); + break; + case 0x23: /* Tab offset 3 */ + Eia608Cursor( h, 3 ); + break; + } + return VLC_FALSE; +} +static vlc_bool_t Eia608ParsePac( eia608_t *h, uint8_t d1, uint8_t d2 ) +{ + static const int pi_row[] = { + 11, -1, 1, 2, 3, 4, 12, 13, 14, 15, 5, 6, 7, 8, 9, 10 + }; + const int i_row_index = ( (d1<<1) & 0x0e) | ( (d2>>5) & 0x01 ); + + assert( d2 >= 0x40 && d2 <= 0x7f ); + + if( pi_row[i_row_index] <= 0 ) + return VLC_FALSE; + + /* Row */ + if( h->mode != EIA608_MODE_TEXT ) + h->cursor.i_row = pi_row[i_row_index] - 1; + h->i_row_rollup = pi_row[i_row_index] - 1; + /* Column */ + if( d2 >= 0x60 ) + d2 -= 0x60; + else if( d2 >= 0x40 ) + d2 -= 0x40; + h->cursor.i_column = pac2_attribs[d2].i_column; + return VLC_FALSE; +} + +static vlc_bool_t Eia608ParseData( eia608_t *h, uint8_t d1, uint8_t d2 ) +{ + vlc_bool_t b_changed = VLC_FALSE; + + if( d1 >= 0x18 && d1 <= 0x1f ) + d1 -= 8; + +#define ON( d2min, d2max, cmd ) do { if( d2 >= d2min && d2 <= d2max ) b_changed = cmd; } while(0) + switch( d1 ) + { + case 0x11: + ON( 0x20, 0x2f, Eia608ParseTextAttribute( h, d2 ) ); + ON( 0x30, 0x3f, Eia608ParseDouble( h, d2 ) ); + break; + case 0x12: case 0x13: + ON( 0x20, 0x3f, Eia608ParseExtended( h, d1, d2 ) ); + break; + case 0x14: case 0x15: + ON( 0x20, 0x2f, Eia608ParseCommand0x14( h, d2 ) ); + break; + case 0x17: + ON( 0x21, 0x22, Eia608ParseCommand0x17( h, d2 ) ); + ON( 0x2e, 0x2f, Eia608ParseTextAttribute( h, d2 ) ); + break; + } + if( d1 == 0x10 ) + ON( 0x40, 0x5f, Eia608ParsePac( h, d1, d2 ) ); + else if( d1 >= 0x11 && d1 <= 0x17 ) + ON( 0x40, 0x7f, Eia608ParsePac( h, d1, d2 ) ); +#undef ON + if( d1 >= 0x20 ) + { + b_changed = Eia608ParseSingle( h, d1 ); + if( d2 >= 0x20 ) + b_changed |= Eia608ParseSingle( h, d2 ); + } + return b_changed; +} + +static void Eia608TextUtf8( char *psz_utf8, uint8_t c ) // Returns number of bytes used +{ +#define E1(c,u) { c, { u, '\0' } } +#define E2(c,u1,u2) { c, { u1, u2, '\0' } } +#define E3(c,u1,u2,u3) { c, { u1, u2, u3, '\0' } } + static const struct { + uint8_t c; + char utf8[3+1]; + } c2utf8[] = { + // Regular line-21 character set, mostly ASCII except these exceptions + E2( 0x2a, 0xc3,0xa1), // lowercase a, acute accent + E2( 0x5c, 0xc3,0xa9), // lowercase e, acute accent + E2( 0x5e, 0xc3,0xad), // lowercase i, acute accent + E2( 0x5f, 0xc3,0xb3), // lowercase o, acute accent + E2( 0x60, 0xc3,0xba), // lowercase u, acute accent + E2( 0x7b, 0xc3,0xa7), // lowercase c with cedilla + E2( 0x7c, 0xc3,0xb7), // division symbol + E2( 0x7d, 0xc3,0x91), // uppercase N tilde + E2( 0x7e, 0xc3,0xb1), // lowercase n tilde + // THIS BLOCK INCLUDES THE 16 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS + // THAT COME FROM HI BYTE=0x11 AND LOW BETWEEN 0x30 AND 0x3F + E2( 0x80, 0xc2,0xae), // Registered symbol (R) + E2( 0x81, 0xc2,0xb0), // degree sign + E2( 0x82, 0xc2,0xbd), // 1/2 symbol + E2( 0x83, 0xc2,0xbf), // Inverted (open) question mark + E3( 0x84, 0xe2,0x84,0xa2), // Trademark symbol (TM) + E2( 0x85, 0xc2,0xa2), // Cents symbol + E2( 0x86, 0xc2,0xa3), // Pounds sterling + E3( 0x87, 0xe2,0x99,0xaa), // Music note + E2( 0x88, 0xc3,0xa0), // lowercase a, grave accent + E1( 0x89, 0x20), // transparent space, we make it regular + E2( 0x8a, 0xc3,0xa8), // lowercase e, grave accent + E2( 0x8b, 0xc3,0xa2), // lowercase a, circumflex accent + E2( 0x8c, 0xc3,0xaa), // lowercase e, circumflex accent + E2( 0x8d, 0xc3,0xae), // lowercase i, circumflex accent + E2( 0x8e, 0xc3,0xb4), // lowercase o, circumflex accent + E2( 0x8f, 0xc3,0xbb), // lowercase u, circumflex accent + // THIS BLOCK INCLUDES THE 32 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS + // THAT COME FROM HI BYTE=0x12 AND LOW BETWEEN 0x20 AND 0x3F + E2( 0x90, 0xc3,0x81), // capital letter A with acute + E2( 0x91, 0xc3,0x89), // capital letter E with acute + E2( 0x92, 0xc3,0x93), // capital letter O with acute + E2( 0x93, 0xc3,0x9a), // capital letter U with acute + E2( 0x94, 0xc3,0x9c), // capital letter U with diaresis + E2( 0x95, 0xc3,0xbc), // lowercase letter U with diaeresis + E1( 0x96, 0x27), // apostrophe + E2( 0x97, 0xc1,0xa1), // inverted exclamation mark + E1( 0x98, 0x2a), // asterisk + E1( 0x99, 0x27), // apostrophe (yes, duped). See CCADI source code. + E1( 0x9a, 0x2d), // hyphen-minus + E2( 0x9b, 0xc2,0xa9), // copyright sign + E3( 0x9c, 0xe2,0x84,0xa0), // Service mark + E1( 0x9d, 0x2e), // Full stop (.) + E1( 0x9e, 0x22), // Quoatation mark + E1( 0x9f, 0x22), // Quoatation mark + E2( 0xa0, 0xc3,0x80), // uppercase A, grave accent + E2( 0xa1, 0xc3,0x82), // uppercase A, circumflex + E2( 0xa2, 0xc3,0x87), // uppercase C with cedilla + E2( 0xa3, 0xc3,0x88), // uppercase E, grave accent + E2( 0xa4, 0xc3,0x8a), // uppercase E, circumflex + E2( 0xa5, 0xc3,0x8b), // capital letter E with diaresis + E2( 0xa6, 0xc3,0xab), // lowercase letter e with diaresis + E2( 0xa7, 0xc3,0x8e), // uppercase I, circumflex + E2( 0xa8, 0xc3,0x8f), // uppercase I, with diaresis + E2( 0xa9, 0xc3,0xaf), // lowercase i, with diaresis + E2( 0xaa, 0xc3,0x94), // uppercase O, circumflex + E2( 0xab, 0xc3,0x99), // uppercase U, grave accent + E2( 0xac, 0xc3,0xb9), // lowercase u, grave accent + E2( 0xad, 0xc3,0x9b), // uppercase U, circumflex + E2( 0xae, 0xc2,0xab), // LEFT-POINTING DOUBLE ANGLE QUOTATION MARK + E2( 0xaf, 0xc2,0xbb), // RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK + // THIS BLOCK INCLUDES THE 32 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS + // THAT COME FROM HI BYTE=0x13 AND LOW BETWEEN 0x20 AND 0x3F + E2( 0xb0, 0xc3,0x83), // Uppercase A, tilde + E2( 0xb1, 0xc3,0xa3), // Lowercase a, tilde + E2( 0xb2, 0xc3,0x8d), // Uppercase I, acute accent + E2( 0xb3, 0xc3,0x8c), // Uppercase I, grave accent + E2( 0xb4, 0xc3,0xac), // Lowercase i, grave accent + E2( 0xb5, 0xc3,0x92), // Uppercase O, grave accent + E2( 0xb6, 0xc3,0xb2), // Lowercase o, grave accent + E2( 0xb7, 0xc3,0x95), // Uppercase O, tilde + E2( 0xb8, 0xc3,0xb5), // Lowercase o, tilde + E1( 0xb9, 0x7b), // Open curly brace + E1( 0xba, 0x7d), // Closing curly brace + E1( 0xbb, 0x5c), // Backslash + E1( 0xbc, 0x5e), // Caret + E1( 0xbd, 0x5f), // Underscore + E2( 0xbe, 0xc2,0xa6), // Pipe (broken bar) + E1( 0xbf, 0x7e), // Tilde (utf8 code unsure) + E2( 0xc0, 0xc3,0x84), // Uppercase A, umlaut + E2( 0xc1, 0xc3,0xa4), // Lowercase A, umlaut + E2( 0xc2, 0xc3,0x96), // Uppercase O, umlaut + E2( 0xc3, 0xc3,0xb6), // Lowercase o, umlaut + E2( 0xc4, 0xc3,0x9f), // Esszett (sharp S) + E2( 0xc5, 0xc2,0xa5), // Yen symbol + E2( 0xc6, 0xc2,0xa4), // Currency symbol + E1( 0xc7, 0x7c), // Vertical bar + E2( 0xc8, 0xc3,0x85), // Uppercase A, ring + E2( 0xc9, 0xc3,0xa5), // Lowercase A, ring + E2( 0xca, 0xc3,0x98), // Uppercase O, slash + E2( 0xcb, 0xc3,0xb8), // Lowercase o, slash + E3( 0xcc, 0xe2,0x8c,0x9c), // Upper left corner + E3( 0xcd, 0xe2,0x8c,0x9d), // Upper right corner + E3( 0xce, 0xe2,0x8c,0x9e), // Lower left corner + E3( 0xcf, 0xe2,0x8c,0x9f), // Lower right corner + + E1(0,0) + }; +#undef E3 +#undef E2 +#undef E1 + + static const int i_c2utf8 = sizeof(c2utf8)/sizeof(*c2utf8); + int i; + + for( i = 0; i < i_c2utf8; i++ ) + { + if( c2utf8[i].c == c ) + break; + } + if( i >= i_c2utf8 ) + { + psz_utf8[0] = c < 0x80 ? c : '?'; /* Normal : Unsupported */ + psz_utf8[1] = '\0'; + } + else + { + strcpy( psz_utf8, c2utf8[i].utf8 ); + } +} + +static void Eia608Strlcat( char *d, const char *s, int i_max ) +{ + if( i_max > 1 ) + strncat( d, s, i_max-1 - strnlen(d, i_max-1)); + if( i_max > 0 ) + d[i_max-1] = '\0'; +} + +static void Eia608TextLine( struct eia608_screen *screen, char *psz_text, int i_text_max, int i_row, vlc_bool_t b_html ) +{ + const uint8_t *p_char = screen->characters[i_row]; + const eia608_color_t *p_color = screen->colors[i_row]; + const eia608_font_t *p_font = screen->fonts[i_row]; + int i_start; + int i_end; + int x; + eia608_color_t last_color = EIA608_COLOR_DEFAULT; + vlc_bool_t b_last_italics = VLC_FALSE; + vlc_bool_t b_last_underline = VLC_FALSE; + + /* Search the start */ + i_start = 0; + while( i_start < EIA608_SCREEN_COLUMNS-1 && p_char[i_start] == ' ' ) + i_start++; + + /* Search the end */ + i_end = EIA608_SCREEN_COLUMNS-1; + while( i_end > i_start && p_char[i_end] == ' ' ) + i_end--; + + /* */ +#define CAT(t) Eia608Strlcat( psz_text, t, i_text_max ) + for( x = i_start; x <= i_end; x++ ) + { + eia608_color_t color = p_color[x]; + vlc_bool_t b_italics = p_font[x] & EIA608_FONT_ITALICS; + vlc_bool_t b_underline = p_font[x] & EIA608_FONT_UNDERLINE; + char utf8[4]; + + /* */ + if( b_html ) + { + vlc_bool_t b_close_color, b_close_italics, b_close_underline; + + /* We create the tags font / i / u in that orders */ + b_close_color = color != last_color && last_color != EIA608_COLOR_DEFAULT; + b_close_italics = !b_italics && b_last_italics; + b_close_underline = !b_underline && b_last_underline; + + /* Be sure to create valid html */ + b_close_italics |= b_last_italics && b_close_color; + b_close_underline = b_last_underline && ( b_close_italics || b_close_color ); + + if( b_close_underline ) + CAT( "</u>" ); + if( b_close_italics ) + CAT( "</i>" ); + if( b_close_color ) + CAT( "</font>" ); + + if( color != EIA608_COLOR_DEFAULT && color != last_color) + { + static const char *ppsz_color[] = { + "#ffffff", // white + "#00ff00", // green + "#0000ff", // blue + "#00ffff", // cyan + "#ff0000", // red + "#ffff00", // yellow + "#ff00ff", // magenta + "#ffffff", // user defined XXX we use white + }; + CAT( "<font color=" ); + CAT( ppsz_color[color] ); + CAT( ">" ); + } + if( ( b_close_italics && b_italics ) || ( b_italics && !b_last_italics ) ) + CAT( "<i>" ); + if( ( b_close_underline && b_underline ) || ( b_underline && !b_last_underline ) ) + CAT( "<u>" ); + } + + /* */ + Eia608TextUtf8( utf8, p_char[x] ); + CAT( utf8 ); + + /* */ + b_last_underline = b_underline; + b_last_italics = b_italics; + last_color = color; + } + if( b_html ) + { + if( b_last_underline ) + CAT( "</u>" ); + if( b_last_italics ) + CAT( "</i>" ); + if( last_color != EIA608_COLOR_DEFAULT ) + CAT( "</font>" ); + } +#undef CAT +} + +/* */ +static void Eia608Init( eia608_t *h ) +{ + memset( h, 0, sizeof(*h) ); + + /* */ + h->i_channel = -1; + + h->i_screen = 0; + Eia608ClearScreen( h, 0 ); + Eia608ClearScreen( h, 1 ); + + /* Cursor for writing text */ + h->cursor.i_column = 0; + h->cursor.i_row = 0; + + h->last.d1 = 0x00; + h->last.d2 = 0x00; + h->mode = EIA608_MODE_POPUP; + h->color = EIA608_COLOR_DEFAULT; + h->font = EIA608_FONT_REGULAR; + h->i_row_rollup = EIA608_SCREEN_ROWS-1; +} +static vlc_bool_t Eia608Parse( eia608_t *h, int i_channel_selected, const uint8_t data[2] ) +{ + const uint8_t d1 = data[0] & 0x7f; /* Removed parity bit TODO we might want to check them */ + const uint8_t d2 = data[1] & 0x7f; + vlc_bool_t b_screen_changed = VLC_FALSE; + + if( d1 == 0 && d2 == 0 ) + return VLC_FALSE; /* Ignore padding */ + + Eia608ParseChannel( h, d1 ); + if( h->i_channel != i_channel_selected ) + return VLC_FALSE; + + if( d1 >= 0x10 ) + { + if( d1 >= 0x20 || + d1 != h->last.d1 || d2 != h->last.d2 ) /* Command codes can be repeated */ + b_screen_changed = Eia608ParseData( h, d1,d2 ); + + h->last.d1 = d1; + h->last.d2 = d2; + } + else if( ( d1 >= 0x01 && d1 <= 0x0E ) || d1 == 0x0F ) + { + /* XDS block / End of XDS block */ + } + return b_screen_changed; +} + +static char *Eia608Text( eia608_t *h, vlc_bool_t b_html ) +{ + const int i_size = EIA608_SCREEN_ROWS * 3 * EIA608_SCREEN_COLUMNS+1; + struct eia608_screen *screen = &h->screen[h->i_screen]; + vlc_bool_t b_first = VLC_TRUE; + char *psz; + int i; + + /* We allocate a buffer big enough for normal case */ + psz = malloc( i_size ); + *psz = '\0'; + if( b_html ) + Eia608Strlcat( psz, "<text>", i_size ); + for( i = 0; i < EIA608_SCREEN_ROWS; i++ ) + { + if( !screen->row_used[i] ) + continue; + + if( !b_first ) + Eia608Strlcat( psz, b_html ? "<br />" : "\n", i_size ); + b_first = VLC_FALSE; + + Eia608TextLine( screen, psz, i_size, i, b_html ); + } + if( b_html ) + Eia608Strlcat( psz, "</text>", i_size ); + return psz; +} + +static void Eia608Exit( eia608_t *h ) +{ +} + diff --git a/modules/codec/cc.h b/modules/codec/cc.h new file mode 100644 index 0000000000..580319f441 --- /dev/null +++ b/modules/codec/cc.h @@ -0,0 +1,143 @@ +/***************************************************************************** + * cc.h + ***************************************************************************** + * Copyright (C) 2007 Laurent Aimar + * $Id: csa.h 20134 2007-05-16 14:30:27Z jpsaman $ + * + * Authors: Laurent Aimar <fenrir@via.ecp.fr> + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA. + *****************************************************************************/ + +#ifndef _CC_H +#define _C_H 1 + +/* CC have a maximum rate of 9600 bit/s (per field?) */ +#define CC_MAX_DATA_SIZE (2 * 3*600) +typedef struct +{ + /* Which channel are present */ + vlc_bool_t pb_present[4]; + + /* CC data per field + * byte[x+0]: field (0/1) + * byte[x+1]: cc data 1 + * byte[x+2]: cc data 2 + */ + int i_data; + uint8_t p_data[CC_MAX_DATA_SIZE]; +} cc_data_t; + +static inline int cc_Channel( int i_field, const uint8_t p_data[2] ) +{ + const uint8_t d = p_data[0] & 0x7f; + if( i_field != 0 && i_field != 1 ) + return -1; + if( d == 0x14 ) + return 2*i_field + 0; + else if( d == 0x1c ) + return 2*i_field + 1; + /* unknown(middle of a command) or not cc channel */ + return -1; +} +static inline void cc_Init( cc_data_t *c ) +{ + int i; + + for( i = 0; i < 4; i++ ) + c-> pb_present[i] = VLC_FALSE; + c->i_data = 0; +} +static inline void cc_Exit( cc_data_t *c ) +{ + return; +} +static inline void cc_Flush( cc_data_t *c ) +{ + c->i_data = 0; +} +static inline void cc_Extract( cc_data_t *c, const uint8_t *p_src, int i_src ) +{ + static const uint8_t p_cc_ga94[4] = { 0x47, 0x41, 0x39, 0x34 }; + //static const uint8_t p_afd_start[4] = { 0x44, 0x54, 0x47, 0x31 }; + + if( i_src < 4 ) + return; + + /* cc_data() + * u1 reserved(1) + * u1 process_cc_data_flag + * u1 additional_data_flag + * u5 cc_count + * u8 reserved(1111 1111) + * for cc_count + * u5 marker bit(1111 1) + * u1 cc_valid + * u2 cc_type + * u8 cc_data_1 + * u8 cc_data_2 + * u8 marker bit(1111 1111) + * if additional_data_flag + * unknown + */ + /* cc_type: + * 0x00: field 1 + * 0x01: field 2 + */ + if( !memcmp( p_cc_ga94, p_src, 4 ) && i_src >= 5+1+1+1 && p_src[4] == 0x03 ) + { + /* Extract CC from DVB/ATSC TS */ + const uint8_t *cc = &p_src[5]; + const int i_count_cc = cc[0]&0x1f; + int i; + + if( !(cc[0]&0x40) ) // process flag + return; + if( i_src < 5 + 1+1 + i_count_cc*3 + 1) // broken packet + return; + if( i_count_cc <= 0 ) // no cc present + return; + if( cc[2+i_count_cc * 3] != 0xff ) // marker absent + return; + cc += 2; + + for( i = 0; i < i_count_cc; i++, cc += 3 ) + { + int i_field = cc[0] & 0x03; + int i_channel; + if( ( cc[0] & 0xfc ) != 0xfc ) + continue; + if( i_field != 0 && i_field != 1 ) + continue; + if( c->i_data + 3 > CC_MAX_DATA_SIZE ) + continue; + + i_channel = cc_Channel( i_field, &cc[1] ); + if( i_channel >= 0 && i_channel < 4 ) + c->pb_present[i_channel] = VLC_TRUE; + + c->p_data[c->i_data++] = i_field; + c->p_data[c->i_data++] = cc[1]; + c->p_data[c->i_data++] = cc[2]; + } + } + else + { + /* TODO DVD CC, ... */ + } +} + +#endif /* _CC_H */ + -- 2.25.4