1 /*****************************************************************************
2 * cc.c : CC 608/708 subtitles decoder
3 *****************************************************************************
4 * Copyright © 2007-2010 Laurent Aimar, 2011 VLC authors and VideoLAN
6 * Authors: Laurent Aimar < fenrir # via.ecp.fr>
8 * This program is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU Lesser General Public License as published by
10 * the Free Software Foundation; either version 2.1 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public License
19 * along with this program; if not, write to the Free Software Foundation,
20 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21 *****************************************************************************/
23 /*****************************************************************************
25 *****************************************************************************/
26 /* The EIA 608 decoder part has been initialy based on ccextractor (GPL)
40 #include <vlc_common.h>
41 #include <vlc_plugin.h>
42 #include <vlc_codec.h>
43 #include <vlc_charset.h>
47 /*****************************************************************************
49 *****************************************************************************/
50 static int Open ( vlc_object_t
* );
51 static void Close( vlc_object_t
* );
53 #define OPAQUE_TEXT N_("Opacity")
54 #define OPAQUE_LONGTEXT N_("Setting to true " \
55 "makes the text to be boxed and maybe easier to read." )
58 set_shortname( N_("CC 608/708"))
59 set_description( N_("Closed Captions decoder") )
60 set_capability( "spu decoder", 50 )
61 set_category( CAT_INPUT
)
62 set_subcategory( SUBCAT_INPUT_SCODEC
)
63 set_callbacks( Open
, Close
)
65 add_bool( "cc-opaque", true,
66 OPAQUE_TEXT
, OPAQUE_LONGTEXT
, false )
69 /*****************************************************************************
71 *****************************************************************************/
74 EIA608_MODE_POPUP
= 0,
75 EIA608_MODE_ROLLUP_2
= 1,
76 EIA608_MODE_ROLLUP_3
= 2,
77 EIA608_MODE_ROLLUP_4
= 3,
78 EIA608_MODE_PAINTON
= 4,
84 EIA608_COLOR_WHITE
= 0,
85 EIA608_COLOR_GREEN
= 1,
86 EIA608_COLOR_BLUE
= 2,
87 EIA608_COLOR_CYAN
= 3,
89 EIA608_COLOR_YELLOW
= 5,
90 EIA608_COLOR_MAGENTA
= 6,
91 EIA608_COLOR_USERDEFINED
= 7
96 EIA608_FONT_REGULAR
= 0x00,
97 EIA608_FONT_ITALICS
= 0x01,
98 EIA608_FONT_UNDERLINE
= 0x02,
99 EIA608_FONT_UNDERLINE_ITALICS
= EIA608_FONT_UNDERLINE
| EIA608_FONT_ITALICS
102 #define EIA608_SCREEN_ROWS 15
103 #define EIA608_SCREEN_COLUMNS 32
105 struct eia608_screen
// A CC buffer
107 uint8_t characters
[EIA608_SCREEN_ROWS
][EIA608_SCREEN_COLUMNS
+1];
108 eia608_color_t colors
[EIA608_SCREEN_ROWS
][EIA608_SCREEN_COLUMNS
+1];
109 eia608_font_t fonts
[EIA608_SCREEN_ROWS
][EIA608_SCREEN_COLUMNS
+1]; // Extra char at the end for a 0
110 int row_used
[EIA608_SCREEN_ROWS
]; // Any data in row?
112 typedef struct eia608_screen eia608_screen
;
116 EIA608_STATUS_DEFAULT
= 0x00,
117 EIA608_STATUS_CHANGED
= 0x01, /* current screen has been altered */
118 EIA608_STATUS_CAPTION_ENDED
= 0x02, /* screen flip */
119 EIA608_STATUS_CAPTION_CLEARED
= 0x04, /* active screen erased */
120 EIA608_STATUS_DISPLAY
= EIA608_STATUS_CAPTION_CLEARED
| EIA608_STATUS_CAPTION_ENDED
,
123 static const struct {
124 eia608_color_t i_color
;
125 eia608_font_t i_font
;
128 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 0 },
129 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 0 },
130 { EIA608_COLOR_GREEN
, EIA608_FONT_REGULAR
, 0 },
131 { EIA608_COLOR_GREEN
, EIA608_FONT_UNDERLINE
, 0 },
132 { EIA608_COLOR_BLUE
, EIA608_FONT_REGULAR
, 0 },
133 { EIA608_COLOR_BLUE
, EIA608_FONT_UNDERLINE
, 0 },
134 { EIA608_COLOR_CYAN
, EIA608_FONT_REGULAR
, 0 },
135 { EIA608_COLOR_CYAN
, EIA608_FONT_UNDERLINE
, 0 },
136 { EIA608_COLOR_RED
, EIA608_FONT_REGULAR
, 0 },
137 { EIA608_COLOR_RED
, EIA608_FONT_UNDERLINE
, 0 },
138 { EIA608_COLOR_YELLOW
, EIA608_FONT_REGULAR
, 0 },
139 { EIA608_COLOR_YELLOW
, EIA608_FONT_UNDERLINE
, 0 },
140 { EIA608_COLOR_MAGENTA
, EIA608_FONT_REGULAR
, 0 },
141 { EIA608_COLOR_MAGENTA
, EIA608_FONT_UNDERLINE
, 0 },
142 { EIA608_COLOR_WHITE
, EIA608_FONT_ITALICS
, 0 },
143 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE_ITALICS
, 0 },
145 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 0 },
146 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 0 },
147 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 4 },
148 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 4 },
149 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 8 },
150 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 8 },
151 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 12 },
152 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 12 },
153 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 16 },
154 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 16 },
155 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 20 },
156 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 20 },
157 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 24 },
158 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 24 },
159 { EIA608_COLOR_WHITE
, EIA608_FONT_REGULAR
, 28 },
160 { EIA608_COLOR_WHITE
, EIA608_FONT_UNDERLINE
, 28 } ,
163 #define EIA608_COLOR_DEFAULT EIA608_COLOR_WHITE
165 static const int rgi_eia608_colors
[] = {
173 0xffffff, // user defined XXX we use white
178 /* Current channel (used to reject packet without channel information) */
182 int i_screen
; /* Displayed screen */
183 eia608_screen screen
[2];
193 eia608_color_t color
;
197 /* Last command pair (used to reject duplicated command) */
205 static void Eia608Init( eia608_t
* );
206 static eia608_status_t
Eia608Parse( eia608_t
*h
, int i_channel_selected
, const uint8_t data
[2] );
207 static void Eia608FillUpdaterRegions( subpicture_updater_sys_t
*p_updater
, eia608_t
*h
);
209 /* It will be enough up to 63 B frames, which is far too high for
210 * broadcast environment */
211 #define CC_MAX_REORDER_SIZE (64)
226 static int Decode( decoder_t
*, block_t
* );
227 static void Flush( decoder_t
* );
229 /*****************************************************************************
230 * Open: probe the decoder and return score
231 *****************************************************************************
232 * Tries to launch a decoder and return score so that the interface is able
234 *****************************************************************************/
235 static int Open( vlc_object_t
*p_this
)
237 decoder_t
*p_dec
= (decoder_t
*)p_this
;
238 decoder_sys_t
*p_sys
;
242 switch( p_dec
->fmt_in
.i_codec
)
244 case VLC_CODEC_EIA608_1
:
245 i_field
= 0; i_channel
= 1;
247 case VLC_CODEC_EIA608_2
:
248 i_field
= 0; i_channel
= 2;
250 case VLC_CODEC_EIA608_3
:
251 i_field
= 1; i_channel
= 1;
253 case VLC_CODEC_EIA608_4
:
254 i_field
= 1; i_channel
= 2;
261 p_dec
->pf_decode
= Decode
;
262 p_dec
->pf_flush
= Flush
;
264 /* Allocate the memory needed to store the decoder's structure */
265 p_dec
->p_sys
= p_sys
= calloc( 1, sizeof( *p_sys
) );
270 p_sys
->i_field
= i_field
;
271 p_sys
->i_channel
= i_channel
;
273 Eia608Init( &p_sys
->eia608
);
274 p_sys
->b_opaque
= var_InheritBool( p_dec
, "cc-opaque" );
275 p_sys
->i_reorder_depth
= p_dec
->fmt_in
.subs
.cc
.i_reorder_depth
;
277 p_dec
->fmt_out
.i_codec
= VLC_CODEC_TEXT
;
282 /*****************************************************************************
284 *****************************************************************************/
285 static void Flush( decoder_t
*p_dec
)
287 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
289 Eia608Init( &p_sys
->eia608
);
291 block_ChainRelease( p_sys
->p_queue
);
292 p_sys
->p_queue
= NULL
;
296 /****************************************************************************
297 * Decode: the whole thing
298 ****************************************************************************
300 ****************************************************************************/
301 static void Push( decoder_t
*, block_t
* );
302 static block_t
*Pop( decoder_t
*, bool );
303 static void Convert( decoder_t
*, mtime_t
, const uint8_t *, size_t );
305 static bool DoDecode( decoder_t
*p_dec
, bool b_drain
)
307 block_t
*p_block
= Pop( p_dec
, b_drain
);
311 Convert( p_dec
, p_block
->i_pts
, p_block
->p_buffer
, p_block
->i_buffer
);
312 block_Release( p_block
);
317 static int Decode( decoder_t
*p_dec
, block_t
*p_block
)
319 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
323 /* Reset decoder if needed */
324 if( p_block
->i_flags
& (BLOCK_FLAG_DISCONTINUITY
| BLOCK_FLAG_CORRUPTED
) )
327 for( ; DoDecode( p_dec
, true ) ; );
328 Eia608Init( &p_sys
->eia608
);
330 if( (p_block
->i_flags
& BLOCK_FLAG_CORRUPTED
) || p_block
->i_buffer
< 1 )
332 block_Release( p_block
);
333 return VLCDEC_SUCCESS
;
337 /* XXX Cc captions data are OUT OF ORDER (because we receive them in the bitstream
338 * order (ie ordered by video picture dts) instead of the display order.
339 * We will simulate a simple IPB buffer scheme
340 * and reorder with pts.
341 * XXX it won't work with H264 which use non out of order B picture or MMCO */
342 if( p_sys
->i_reorder_depth
== 0 )
344 /* Wait for a P and output all *previous* picture by pts order (for
345 * hierarchical B frames) */
346 if( (p_block
->i_flags
& BLOCK_FLAG_TYPE_B
) == 0 )
347 for( ; DoDecode( p_dec
, true ); );
350 Push( p_dec
, p_block
);
353 for( ; DoDecode( p_dec
, (p_block
== NULL
) ); );
355 return VLCDEC_SUCCESS
;
358 /*****************************************************************************
359 * CloseDecoder: clean up the decoder
360 *****************************************************************************/
361 static void Close( vlc_object_t
*p_this
)
363 decoder_t
*p_dec
= (decoder_t
*)p_this
;
364 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
366 block_ChainRelease( p_sys
->p_queue
);
370 /*****************************************************************************
372 *****************************************************************************/
373 static void Push( decoder_t
*p_dec
, block_t
*p_block
)
375 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
377 if( p_sys
->i_queue
>= CC_MAX_REORDER_SIZE
)
379 block_Release( Pop( p_dec
, true ) );
380 msg_Warn( p_dec
, "Trashing a CC entry" );
384 /* find insertion point */
385 for( pp_block
= &p_sys
->p_queue
; *pp_block
; pp_block
= &((*pp_block
)->p_next
) )
387 if( p_block
->i_pts
== VLC_TS_INVALID
|| (*pp_block
)->i_pts
== VLC_TS_INVALID
)
389 if( p_block
->i_pts
< (*pp_block
)->i_pts
)
391 if( p_sys
->i_reorder_depth
> 0 &&
392 p_sys
->i_queue
< p_sys
->i_reorder_depth
&&
393 pp_block
== &p_sys
->p_queue
)
395 msg_Info( p_dec
, "Increasing reorder depth to %d", ++p_sys
->i_reorder_depth
);
400 /* Insert, keeping a pts and/or fifo ordered list */
401 p_block
->p_next
= *pp_block
? *pp_block
: NULL
;
406 static block_t
*Pop( decoder_t
*p_dec
, bool b_forced
)
408 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
411 if( p_sys
->i_queue
== 0 )
414 if( !b_forced
&& p_sys
->i_queue
< CC_MAX_REORDER_SIZE
)
416 if( p_sys
->i_queue
< p_sys
->i_reorder_depth
|| p_sys
->i_reorder_depth
== 0 )
421 p_block
= p_sys
->p_queue
;
422 p_sys
->p_queue
= p_block
->p_next
;
423 p_block
->p_next
= NULL
;
429 static subpicture_t
*Subtitle( decoder_t
*p_dec
, eia608_t
*h
, mtime_t i_pts
)
431 //decoder_sys_t *p_sys = p_dec->p_sys;
432 subpicture_t
*p_spu
= NULL
;
434 /* We cannot display a subpicture with no date */
435 if( i_pts
<= VLC_TS_INVALID
)
438 /* Create the subpicture unit */
439 p_spu
= decoder_NewSubpictureText( p_dec
);
443 p_spu
->i_start
= i_pts
;
444 p_spu
->i_stop
= i_pts
+ 10000000; /* 10s max */
445 p_spu
->b_ephemer
= true;
446 p_spu
->b_absolute
= false;
448 subpicture_updater_sys_t
*p_spu_sys
= p_spu
->updater
.p_sys
;
450 /* The "leavetext" alignment is a special mode where the subpicture
451 region itself gets aligned, but the text inside it does not */
452 p_spu_sys
->region
.align
= SUBPICTURE_ALIGN_TOP
;
453 p_spu_sys
->region
.inner_align
= SUBPICTURE_ALIGN_LEAVETEXT
;
454 p_spu_sys
->region
.flags
= UPDT_REGION_IGNORE_BACKGROUND
| UPDT_REGION_USES_GRID_COORDINATES
;
455 /* Set style defaults (will be added to segments if none set) */
456 p_spu_sys
->p_default_style
->i_style_flags
|= STYLE_MONOSPACED
;
457 if( p_dec
->p_sys
->b_opaque
)
459 p_spu_sys
->p_default_style
->i_background_alpha
= STYLE_ALPHA_OPAQUE
;
460 p_spu_sys
->p_default_style
->i_features
|= STYLE_HAS_BACKGROUND_ALPHA
;
461 p_spu_sys
->p_default_style
->i_style_flags
|= STYLE_BACKGROUND
;
463 p_spu_sys
->p_default_style
->i_font_color
= rgi_eia608_colors
[EIA608_COLOR_DEFAULT
];
464 /* FCC defined "safe area" for EIA-608 captions is 80% of the height of the display */
465 p_spu_sys
->p_default_style
->f_font_relsize
= 100 * 8 / 10 / EIA608_SCREEN_ROWS
;
466 p_spu_sys
->p_default_style
->i_features
|= (STYLE_HAS_FONT_COLOR
| STYLE_HAS_FLAGS
);
468 Eia608FillUpdaterRegions( p_spu_sys
, h
);
473 static void Convert( decoder_t
*p_dec
, mtime_t i_pts
,
474 const uint8_t *p_buffer
, size_t i_buffer
)
476 decoder_sys_t
*p_sys
= p_dec
->p_sys
;
479 while( i_buffer
>= 3 )
481 /* Mask off the specific i_field bit, else some sequences can be lost. */
482 if ( (p_buffer
[0] & 0x03) == p_sys
->i_field
&&
483 (p_buffer
[0] & 0x04) /* Valid bit */ )
485 eia608_status_t i_status
=
486 Eia608Parse( &p_sys
->eia608
, p_sys
->i_channel
, &p_buffer
[1] );
488 /* a caption is ready or removed, process its screen */
490 * In case of rollup/painton with 1 packet/frame, we need to update on Changed status.
491 * Batch decoding might be incorrect if those in large number of commands (mp4, ...) then.
492 * see CEAv1.2zero.trp tests
494 if( i_status
& (EIA608_STATUS_DISPLAY
| EIA608_STATUS_CHANGED
) )
496 subpicture_t
*p_spu
= Subtitle( p_dec
, &p_sys
->eia608
, i_pts
+ i_ticks
* CLOCK_FREQ
/ 30 );
498 decoder_QueueSub( p_dec
, p_spu
);
509 /*****************************************************************************
511 *****************************************************************************/
512 static void Eia608Cursor( eia608_t
*h
, int dx
)
514 h
->cursor
.i_column
+= dx
;
515 if( h
->cursor
.i_column
< 0 )
516 h
->cursor
.i_column
= 0;
517 else if( h
->cursor
.i_column
> EIA608_SCREEN_COLUMNS
-1 )
518 h
->cursor
.i_column
= EIA608_SCREEN_COLUMNS
-1;
520 static void Eia608ClearScreenRowX( eia608_t
*h
, int i_screen
, int i_row
, int x
)
522 eia608_screen
*screen
= &h
->screen
[i_screen
];
526 screen
->row_used
[i_row
] = false;
530 screen
->row_used
[i_row
] = false;
531 for( int i
= 0; i
< x
; i
++ )
533 if( screen
->characters
[i_row
][i
] != ' ' ||
534 screen
->colors
[i_row
][i
] != EIA608_COLOR_DEFAULT
||
535 screen
->fonts
[i_row
][i
] != EIA608_FONT_REGULAR
)
537 screen
->row_used
[i_row
] = true;
543 for( ; x
< EIA608_SCREEN_COLUMNS
+1; x
++ )
545 screen
->characters
[i_row
][x
] = x
< EIA608_SCREEN_COLUMNS
? ' ' : '\0';
546 screen
->colors
[i_row
][x
] = EIA608_COLOR_DEFAULT
;
547 screen
->fonts
[i_row
][x
] = EIA608_FONT_REGULAR
;
551 static void Eia608ClearScreenRow( eia608_t
*h
, int i_screen
, int i_row
)
553 Eia608ClearScreenRowX( h
, i_screen
, i_row
, 0 );
556 static void Eia608ClearScreen( eia608_t
*h
, int i_screen
)
558 for( int i
= 0; i
< EIA608_SCREEN_ROWS
; i
++ )
559 Eia608ClearScreenRow( h
, i_screen
, i
);
562 static int Eia608GetWritingScreenIndex( eia608_t
*h
)
566 case EIA608_MODE_POPUP
: // Non displayed screen
567 return 1 - h
->i_screen
;
569 case EIA608_MODE_ROLLUP_2
: // Displayed screen
570 case EIA608_MODE_ROLLUP_3
:
571 case EIA608_MODE_ROLLUP_4
:
572 case EIA608_MODE_PAINTON
:
575 /* It cannot happen, else it is a bug */
576 vlc_assert_unreachable();
581 static void Eia608EraseScreen( eia608_t
*h
, bool b_displayed
)
583 Eia608ClearScreen( h
, b_displayed
? h
->i_screen
: (1-h
->i_screen
) );
586 static void Eia608Write( eia608_t
*h
, const uint8_t c
)
588 const int i_row
= h
->cursor
.i_row
;
589 const int i_column
= h
->cursor
.i_column
;
590 eia608_screen
*screen
;
592 if( h
->mode
== EIA608_MODE_TEXT
)
595 screen
= &h
->screen
[Eia608GetWritingScreenIndex( h
)];
597 screen
->characters
[i_row
][i_column
] = c
;
598 screen
->colors
[i_row
][i_column
] = h
->color
;
599 screen
->fonts
[i_row
][i_column
] = h
->font
;
600 screen
->row_used
[i_row
] = true;
601 Eia608Cursor( h
, 1 );
603 static void Eia608Erase( eia608_t
*h
)
605 const int i_row
= h
->cursor
.i_row
;
606 const int i_column
= h
->cursor
.i_column
- 1;
607 eia608_screen
*screen
;
609 if( h
->mode
== EIA608_MODE_TEXT
)
614 screen
= &h
->screen
[Eia608GetWritingScreenIndex( h
)];
616 /* FIXME do we need to reset row_used/colors/font ? */
617 screen
->characters
[i_row
][i_column
] = ' ';
618 Eia608Cursor( h
, -1 );
620 static void Eia608EraseToEndOfRow( eia608_t
*h
)
622 if( h
->mode
== EIA608_MODE_TEXT
)
625 Eia608ClearScreenRowX( h
, Eia608GetWritingScreenIndex( h
), h
->cursor
.i_row
, h
->cursor
.i_column
);
628 static void Eia608RollUp( eia608_t
*h
)
630 if( h
->mode
== EIA608_MODE_TEXT
)
633 const int i_screen
= Eia608GetWritingScreenIndex( h
);
634 eia608_screen
*screen
= &h
->screen
[i_screen
];
639 if( h
->mode
== EIA608_MODE_ROLLUP_2
)
641 else if( h
->mode
== EIA608_MODE_ROLLUP_3
)
643 else if( h
->mode
== EIA608_MODE_ROLLUP_4
)
648 /* Reset the cursor */
649 h
->cursor
.i_column
= 0;
651 /* Erase lines above our window */
652 for( int i
= 0; i
< h
->cursor
.i_row
- keep_lines
; i
++ )
653 Eia608ClearScreenRow( h
, i_screen
, i
);
656 for( int i
= 0; i
< keep_lines
-1; i
++ )
658 const int i_row
= h
->cursor
.i_row
- keep_lines
+ i
+ 1;
661 assert( i_row
+1 < EIA608_SCREEN_ROWS
);
662 memcpy( screen
->characters
[i_row
], screen
->characters
[i_row
+1], sizeof(*screen
->characters
) );
663 memcpy( screen
->colors
[i_row
], screen
->colors
[i_row
+1], sizeof(*screen
->colors
) );
664 memcpy( screen
->fonts
[i_row
], screen
->fonts
[i_row
+1], sizeof(*screen
->fonts
) );
665 screen
->row_used
[i_row
] = screen
->row_used
[i_row
+1];
667 /* Reset current row */
668 Eia608ClearScreenRow( h
, i_screen
, h
->cursor
.i_row
);
670 static void Eia608ParseChannel( eia608_t
*h
, const uint8_t d
[2] )
672 /* Check odd parity */
673 static const int p4
[16] = {
674 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0
676 if( p4
[d
[0] & 0xf] == p4
[d
[0] >> 4] ||
677 p4
[d
[1] & 0xf] == p4
[ d
[1] >> 4] )
684 const int d1
= d
[0] & 0x7f;
685 if( d1
>= 0x10 && d1
<= 0x1f )
686 h
->i_channel
= 1 + ((d1
& 0x08) != 0);
690 static eia608_status_t
Eia608ParseTextAttribute( eia608_t
*h
, uint8_t d2
)
692 const int i_index
= d2
- 0x20;
693 assert( d2
>= 0x20 && d2
<= 0x2f );
695 h
->color
= pac2_attribs
[i_index
].i_color
;
696 h
->font
= pac2_attribs
[i_index
].i_font
;
697 Eia608Cursor( h
, 1 );
699 return EIA608_STATUS_DEFAULT
;
701 static eia608_status_t
Eia608ParseSingle( eia608_t
*h
, const uint8_t dx
)
703 assert( dx
>= 0x20 );
704 Eia608Write( h
, dx
);
705 return EIA608_STATUS_CHANGED
;
707 static eia608_status_t
Eia608ParseDouble( eia608_t
*h
, uint8_t d2
)
709 assert( d2
>= 0x30 && d2
<= 0x3f );
710 Eia608Write( h
, d2
+ 0x50 ); /* We use charaters 0x80...0x8f */
711 return EIA608_STATUS_CHANGED
;
713 static eia608_status_t
Eia608ParseExtended( eia608_t
*h
, uint8_t d1
, uint8_t d2
)
715 assert( d2
>= 0x20 && d2
<= 0x3f );
716 assert( d1
== 0x12 || d1
== 0x13 );
718 d2
+= 0x70; /* We use charaters 0x90-0xaf */
720 d2
+= 0x90; /* We use charaters 0xb0-0xcf */
722 /* The extended characters replace the previous one with a more
724 Eia608Cursor( h
, -1 );
725 Eia608Write( h
, d2
);
726 return EIA608_STATUS_CHANGED
;
728 static eia608_status_t
Eia608ParseCommand0x14( eia608_t
*h
, uint8_t d2
)
730 eia608_status_t i_status
= EIA608_STATUS_DEFAULT
;
734 case 0x20: /* Resume caption loading */
735 h
->mode
= EIA608_MODE_POPUP
;
737 case 0x21: /* Backspace */
739 i_status
= EIA608_STATUS_CHANGED
;
741 case 0x22: /* Reserved */
744 case 0x24: /* Delete to end of row */
745 Eia608EraseToEndOfRow( h
);
747 case 0x25: /* Rollup 2 */
748 case 0x26: /* Rollup 3 */
749 case 0x27: /* Rollup 4 */
750 if( h
->mode
== EIA608_MODE_POPUP
|| h
->mode
== EIA608_MODE_PAINTON
)
752 Eia608EraseScreen( h
, true );
753 Eia608EraseScreen( h
, false );
754 i_status
= EIA608_STATUS_CHANGED
| EIA608_STATUS_CAPTION_CLEARED
;
758 h
->mode
= EIA608_MODE_ROLLUP_2
;
759 else if( d2
== 0x26 )
760 h
->mode
= EIA608_MODE_ROLLUP_3
;
762 h
->mode
= EIA608_MODE_ROLLUP_4
;
764 h
->cursor
.i_column
= 0;
765 h
->cursor
.i_row
= h
->i_row_rollup
;
767 case 0x28: /* Flash on */
770 case 0x29: /* Resume direct captionning */
771 h
->mode
= EIA608_MODE_PAINTON
;
773 case 0x2a: /* Text restart */
777 case 0x2b: /* Resume text display */
778 h
->mode
= EIA608_MODE_TEXT
;
781 case 0x2c: /* Erase displayed memory */
782 Eia608EraseScreen( h
, true );
783 i_status
= EIA608_STATUS_CHANGED
| EIA608_STATUS_CAPTION_CLEARED
;
785 case 0x2d: /* Carriage return */
787 i_status
= EIA608_STATUS_CHANGED
;
789 case 0x2e: /* Erase non displayed memory */
790 Eia608EraseScreen( h
, false );
792 case 0x2f: /* End of caption (flip screen if not paint on) */
793 if( h
->mode
!= EIA608_MODE_PAINTON
)
794 h
->i_screen
= 1 - h
->i_screen
;
795 h
->mode
= EIA608_MODE_POPUP
;
796 h
->cursor
.i_column
= 0;
798 h
->color
= EIA608_COLOR_DEFAULT
;
799 h
->font
= EIA608_FONT_REGULAR
;
800 i_status
= EIA608_STATUS_CHANGED
| EIA608_STATUS_CAPTION_ENDED
;
805 static bool Eia608ParseCommand0x17( eia608_t
*h
, uint8_t d2
)
809 case 0x21: /* Tab offset 1 */
810 Eia608Cursor( h
, 1 );
812 case 0x22: /* Tab offset 2 */
813 Eia608Cursor( h
, 2 );
815 case 0x23: /* Tab offset 3 */
816 Eia608Cursor( h
, 3 );
821 static bool Eia608ParsePac( eia608_t
*h
, uint8_t d1
, uint8_t d2
)
823 static const int pi_row
[] = {
824 11, -1, 1, 2, 3, 4, 12, 13, 14, 15, 5, 6, 7, 8, 9, 10
826 const int i_row_index
= ( (d1
<<1) & 0x0e) | ( (d2
>>5) & 0x01 );
828 assert( d2
>= 0x40 && d2
<= 0x7f );
830 if( pi_row
[i_row_index
] <= 0 )
834 if( h
->mode
!= EIA608_MODE_TEXT
)
835 h
->cursor
.i_row
= pi_row
[i_row_index
] - 1;
836 h
->i_row_rollup
= pi_row
[i_row_index
] - 1;
840 else if( d2
>= 0x40 )
842 h
->cursor
.i_column
= pac2_attribs
[d2
].i_column
;
843 h
->color
= pac2_attribs
[d2
].i_color
;
844 h
->font
= pac2_attribs
[d2
].i_font
;
849 static eia608_status_t
Eia608ParseData( eia608_t
*h
, uint8_t d1
, uint8_t d2
)
851 eia608_status_t i_status
= EIA608_STATUS_DEFAULT
;
853 if( d1
>= 0x18 && d1
<= 0x1f )
856 #define ON( d2min, d2max, cmd ) do { if( d2 >= d2min && d2 <= d2max ) i_status = cmd; } while(0)
860 ON( 0x20, 0x2f, Eia608ParseTextAttribute( h
, d2
) );
861 ON( 0x30, 0x3f, Eia608ParseDouble( h
, d2
) );
863 case 0x12: case 0x13:
864 ON( 0x20, 0x3f, Eia608ParseExtended( h
, d1
, d2
) );
866 case 0x14: case 0x15:
867 ON( 0x20, 0x2f, Eia608ParseCommand0x14( h
, d2
) );
870 ON( 0x21, 0x23, Eia608ParseCommand0x17( h
, d2
) );
871 ON( 0x2e, 0x2f, Eia608ParseTextAttribute( h
, d2
) );
875 ON( 0x40, 0x5f, Eia608ParsePac( h
, d1
, d2
) );
876 else if( d1
>= 0x11 && d1
<= 0x17 )
877 ON( 0x40, 0x7f, Eia608ParsePac( h
, d1
, d2
) );
881 i_status
= Eia608ParseSingle( h
, d1
);
883 i_status
|= Eia608ParseSingle( h
, d2
);
886 /* Ignore changes occuring to doublebuffer */
887 if( h
->mode
== EIA608_MODE_POPUP
&& i_status
== EIA608_STATUS_CHANGED
)
888 i_status
= EIA608_STATUS_DEFAULT
;
893 static void Eia608TextUtf8( char *psz_utf8
, uint8_t c
) // Returns number of bytes used
895 #define E1(c,u) { c, { u, '\0' } }
896 #define E2(c,u1,u2) { c, { u1, u2, '\0' } }
897 #define E3(c,u1,u2,u3) { c, { u1, u2, u3, '\0' } }
898 static const struct {
902 // Regular line-21 character set, mostly ASCII except these exceptions
903 E2( 0x2a, 0xc3,0xa1), // lowercase a, acute accent
904 E2( 0x5c, 0xc3,0xa9), // lowercase e, acute accent
905 E2( 0x5e, 0xc3,0xad), // lowercase i, acute accent
906 E2( 0x5f, 0xc3,0xb3), // lowercase o, acute accent
907 E2( 0x60, 0xc3,0xba), // lowercase u, acute accent
908 E2( 0x7b, 0xc3,0xa7), // lowercase c with cedilla
909 E2( 0x7c, 0xc3,0xb7), // division symbol
910 E2( 0x7d, 0xc3,0x91), // uppercase N tilde
911 E2( 0x7e, 0xc3,0xb1), // lowercase n tilde
912 // THIS BLOCK INCLUDES THE 16 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS
913 // THAT COME FROM HI BYTE=0x11 AND LOW BETWEEN 0x30 AND 0x3F
914 E2( 0x80, 0xc2,0xae), // Registered symbol (R)
915 E2( 0x81, 0xc2,0xb0), // degree sign
916 E2( 0x82, 0xc2,0xbd), // 1/2 symbol
917 E2( 0x83, 0xc2,0xbf), // Inverted (open) question mark
918 E3( 0x84, 0xe2,0x84,0xa2), // Trademark symbol (TM)
919 E2( 0x85, 0xc2,0xa2), // Cents symbol
920 E2( 0x86, 0xc2,0xa3), // Pounds sterling
921 E3( 0x87, 0xe2,0x99,0xaa), // Music note
922 E2( 0x88, 0xc3,0xa0), // lowercase a, grave accent
923 E2( 0x89, 0xc2,0xa0), // transparent space
924 E2( 0x8a, 0xc3,0xa8), // lowercase e, grave accent
925 E2( 0x8b, 0xc3,0xa2), // lowercase a, circumflex accent
926 E2( 0x8c, 0xc3,0xaa), // lowercase e, circumflex accent
927 E2( 0x8d, 0xc3,0xae), // lowercase i, circumflex accent
928 E2( 0x8e, 0xc3,0xb4), // lowercase o, circumflex accent
929 E2( 0x8f, 0xc3,0xbb), // lowercase u, circumflex accent
930 // THIS BLOCK INCLUDES THE 32 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS
931 // THAT COME FROM HI BYTE=0x12 AND LOW BETWEEN 0x20 AND 0x3F
932 E2( 0x90, 0xc3,0x81), // capital letter A with acute
933 E2( 0x91, 0xc3,0x89), // capital letter E with acute
934 E2( 0x92, 0xc3,0x93), // capital letter O with acute
935 E2( 0x93, 0xc3,0x9a), // capital letter U with acute
936 E2( 0x94, 0xc3,0x9c), // capital letter U with diaresis
937 E2( 0x95, 0xc3,0xbc), // lowercase letter U with diaeresis
938 E1( 0x96, 0x27), // apostrophe
939 E2( 0x97, 0xc2,0xa1), // inverted exclamation mark
940 E1( 0x98, 0x2a), // asterisk
941 E1( 0x99, 0x27), // apostrophe (yes, duped). See CCADI source code.
942 E1( 0x9a, 0x2d), // hyphen-minus
943 E2( 0x9b, 0xc2,0xa9), // copyright sign
944 E3( 0x9c, 0xe2,0x84,0xa0), // Service mark
945 E1( 0x9d, 0x2e), // Full stop (.)
946 E3( 0x9e, 0xe2,0x80,0x9c), // Quotation mark
947 E3( 0x9f, 0xe2,0x80,0x9d), // Quotation mark
948 E2( 0xa0, 0xc3,0x80), // uppercase A, grave accent
949 E2( 0xa1, 0xc3,0x82), // uppercase A, circumflex
950 E2( 0xa2, 0xc3,0x87), // uppercase C with cedilla
951 E2( 0xa3, 0xc3,0x88), // uppercase E, grave accent
952 E2( 0xa4, 0xc3,0x8a), // uppercase E, circumflex
953 E2( 0xa5, 0xc3,0x8b), // capital letter E with diaresis
954 E2( 0xa6, 0xc3,0xab), // lowercase letter e with diaresis
955 E2( 0xa7, 0xc3,0x8e), // uppercase I, circumflex
956 E2( 0xa8, 0xc3,0x8f), // uppercase I, with diaresis
957 E2( 0xa9, 0xc3,0xaf), // lowercase i, with diaresis
958 E2( 0xaa, 0xc3,0x94), // uppercase O, circumflex
959 E2( 0xab, 0xc3,0x99), // uppercase U, grave accent
960 E2( 0xac, 0xc3,0xb9), // lowercase u, grave accent
961 E2( 0xad, 0xc3,0x9b), // uppercase U, circumflex
962 E2( 0xae, 0xc2,0xab), // LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
963 E2( 0xaf, 0xc2,0xbb), // RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
964 // THIS BLOCK INCLUDES THE 32 EXTENDED (TWO-BYTE) LINE 21 CHARACTERS
965 // THAT COME FROM HI BYTE=0x13 AND LOW BETWEEN 0x20 AND 0x3F
966 E2( 0xb0, 0xc3,0x83), // Uppercase A, tilde
967 E2( 0xb1, 0xc3,0xa3), // Lowercase a, tilde
968 E2( 0xb2, 0xc3,0x8d), // Uppercase I, acute accent
969 E2( 0xb3, 0xc3,0x8c), // Uppercase I, grave accent
970 E2( 0xb4, 0xc3,0xac), // Lowercase i, grave accent
971 E2( 0xb5, 0xc3,0x92), // Uppercase O, grave accent
972 E2( 0xb6, 0xc3,0xb2), // Lowercase o, grave accent
973 E2( 0xb7, 0xc3,0x95), // Uppercase O, tilde
974 E2( 0xb8, 0xc3,0xb5), // Lowercase o, tilde
975 E1( 0xb9, 0x7b), // Open curly brace
976 E1( 0xba, 0x7d), // Closing curly brace
977 E1( 0xbb, 0x5c), // Backslash
978 E1( 0xbc, 0x5e), // Caret
979 E1( 0xbd, 0x5f), // Underscore
980 E2( 0xbe, 0xc2,0xa6), // Pipe (broken bar)
981 E1( 0xbf, 0x7e), // Tilde (utf8 code unsure)
982 E2( 0xc0, 0xc3,0x84), // Uppercase A, umlaut
983 E2( 0xc1, 0xc3,0xa4), // Lowercase A, umlaut
984 E2( 0xc2, 0xc3,0x96), // Uppercase O, umlaut
985 E2( 0xc3, 0xc3,0xb6), // Lowercase o, umlaut
986 E2( 0xc4, 0xc3,0x9f), // Esszett (sharp S)
987 E2( 0xc5, 0xc2,0xa5), // Yen symbol
988 E2( 0xc6, 0xc2,0xa4), // Currency symbol
989 E1( 0xc7, 0x7c), // Vertical bar
990 E2( 0xc8, 0xc3,0x85), // Uppercase A, ring
991 E2( 0xc9, 0xc3,0xa5), // Lowercase A, ring
992 E2( 0xca, 0xc3,0x98), // Uppercase O, slash
993 E2( 0xcb, 0xc3,0xb8), // Lowercase o, slash
994 E3( 0xcc, 0xe2,0x8c,0x9c), // Upper left corner
995 E3( 0xcd, 0xe2,0x8c,0x9d), // Upper right corner
996 E3( 0xce, 0xe2,0x8c,0x9e), // Lower left corner
997 E3( 0xcf, 0xe2,0x8c,0x9f), // Lower right corner
1005 for( size_t i
= 0; i
< ARRAY_SIZE(c2utf8
) ; i
++ )
1006 if( c2utf8
[i
].c
== c
) {
1007 strcpy( psz_utf8
, c2utf8
[i
].utf8
);
1011 psz_utf8
[0] = c
< 0x80 ? c
: '?'; /* Normal : Unsupported */
1015 static void Eia608Strlcat( char *d
, const char *s
, int i_max
)
1018 strncat( d
, s
, i_max
-1 - strnlen(d
, i_max
-1));
1023 #define CAT(t) Eia608Strlcat( psz_text, t, i_text_max )
1025 static text_segment_t
* Eia608TextLine( struct eia608_screen
*screen
, int i_row
)
1027 const uint8_t *p_char
= screen
->characters
[i_row
];
1028 const eia608_color_t
*p_color
= screen
->colors
[i_row
];
1029 const eia608_font_t
*p_font
= screen
->fonts
[i_row
];
1033 eia608_color_t prev_color
= EIA608_COLOR_DEFAULT
;
1034 eia608_font_t prev_font
= EIA608_FONT_REGULAR
;
1037 const unsigned i_text_max
= 4 * EIA608_SCREEN_COLUMNS
+ 1;
1038 char psz_text
[i_text_max
+ 1];
1041 /* Search the start */
1044 /* Convert leading spaces to non-breaking so that they don't get
1045 stripped by the RenderHtml routine as regular whitespace */
1046 while( i_start
< EIA608_SCREEN_COLUMNS
&& p_char
[i_start
] == ' ' ) {
1047 Eia608TextUtf8( utf8
, 0x89 );
1052 /* Search the end */
1053 i_end
= EIA608_SCREEN_COLUMNS
-1;
1054 while( i_end
> i_start
&& p_char
[i_end
] == ' ' )
1058 if( i_start
> i_end
) /* Nothing to render */
1061 text_segment_t
*p_segment
, *p_segments_head
= p_segment
= text_segment_New( NULL
);
1065 p_segment
->style
= text_style_Create( STYLE_NO_DEFAULTS
);
1066 if(!p_segment
->style
)
1068 text_segment_Delete(p_segment
);
1071 /* Ensure we get a monospaced font (required for accurate positioning */
1072 p_segment
->style
->i_style_flags
|= STYLE_MONOSPACED
;
1074 for( x
= i_start
; x
<= i_end
; x
++ )
1076 eia608_color_t color
= p_color
[x
];
1077 eia608_font_t font
= p_font
[x
];
1079 if(font
!= prev_font
|| color
!= prev_color
)
1081 EnsureUTF8(psz_text
);
1082 p_segment
->psz_text
= strdup(psz_text
);
1084 p_segment
->p_next
= text_segment_New( NULL
);
1085 p_segment
= p_segment
->p_next
;
1087 return p_segments_head
;
1089 p_segment
->style
= text_style_Create( STYLE_NO_DEFAULTS
);
1090 if(!p_segment
->style
)
1092 text_segment_Delete(p_segment
);
1093 return p_segments_head
;
1095 p_segment
->style
->i_style_flags
|= STYLE_MONOSPACED
;
1097 /* start segment with new style */
1098 if(font
& EIA608_FONT_ITALICS
)
1100 p_segment
->style
->i_style_flags
|= STYLE_ITALIC
;
1101 p_segment
->style
->i_features
|= STYLE_HAS_FLAGS
;
1103 if(font
& EIA608_FONT_UNDERLINE
)
1105 p_segment
->style
->i_style_flags
|= STYLE_UNDERLINE
;
1106 p_segment
->style
->i_features
|= STYLE_HAS_FLAGS
;
1109 if(color
!= EIA608_COLOR_DEFAULT
)
1111 p_segment
->style
->i_font_color
= rgi_eia608_colors
[color
];
1112 p_segment
->style
->i_features
|= STYLE_HAS_FONT_COLOR
;
1116 Eia608TextUtf8( utf8
, p_char
[x
] );
1128 assert(!p_segment
->psz_text
); // shouldn't happen
1129 EnsureUTF8(psz_text
);
1130 p_segment
->psz_text
= strdup(psz_text
);
1133 return p_segments_head
;
1136 static void Eia608FillUpdaterRegions( subpicture_updater_sys_t
*p_updater
, eia608_t
*h
)
1138 struct eia608_screen
*screen
= &h
->screen
[h
->i_screen
];
1139 subpicture_updater_sys_region_t
*p_region
= &p_updater
->region
;
1140 text_segment_t
**pp_last
= &p_region
->p_segments
;
1141 bool b_newregion
= false;
1143 for( int i
= 0; i
< EIA608_SCREEN_ROWS
; i
++ )
1145 if( !screen
->row_used
[i
] )
1148 text_segment_t
*p_segments
= Eia608TextLine( screen
, i
);
1153 subpicture_updater_sys_region_t
*p_newregion
;
1154 p_newregion
= SubpictureUpdaterSysRegionNew();
1157 text_segment_ChainDelete( p_segments
);
1160 SubpictureUpdaterSysRegionAdd( p_region
, p_newregion
);
1161 p_region
= p_newregion
;
1162 pp_last
= &p_region
->p_segments
;
1163 b_newregion
= false;
1166 if( p_region
->p_segments
== NULL
) /* First segment in the [new] region */
1168 p_region
->origin
.y
= i
; /* set start line number */
1170 else /* Insert line break between region lines */
1172 *pp_last
= text_segment_New( "\n" );
1174 pp_last
= &((*pp_last
)->p_next
);
1177 *pp_last
= p_segments
;
1178 do { pp_last
= &((*pp_last
)->p_next
); } while ( *pp_last
!= NULL
);
1182 b_newregion
= !!p_region
->p_segments
;
1188 static void Eia608Init( eia608_t
*h
)
1190 memset( h
, 0, sizeof(*h
) );
1196 Eia608ClearScreen( h
, 0 );
1197 Eia608ClearScreen( h
, 1 );
1199 /* Cursor for writing text */
1200 h
->cursor
.i_column
= 0;
1201 h
->cursor
.i_row
= 0;
1205 h
->mode
= EIA608_MODE_POPUP
;
1206 h
->color
= EIA608_COLOR_DEFAULT
;
1207 h
->font
= EIA608_FONT_REGULAR
;
1208 h
->i_row_rollup
= EIA608_SCREEN_ROWS
-1;
1210 static eia608_status_t
Eia608Parse( eia608_t
*h
, int i_channel_selected
, const uint8_t data
[2] )
1212 const uint8_t d1
= data
[0] & 0x7f; /* Removed parity bit */
1213 const uint8_t d2
= data
[1] & 0x7f;
1214 eia608_status_t i_screen_status
= EIA608_STATUS_DEFAULT
;
1216 if( d1
== 0 && d2
== 0 )
1217 return EIA608_STATUS_DEFAULT
; /* Ignore padding (parity check are sometimes invalid on them) */
1219 Eia608ParseChannel( h
, data
);
1220 if( h
->i_channel
!= i_channel_selected
)
1222 //fprintf( stderr, "CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC %x %x\n", data[0], data[1] );
1227 d1
!= h
->last
.d1
|| d2
!= h
->last
.d2
) /* Command codes can be repeated */
1228 i_screen_status
= Eia608ParseData( h
, d1
,d2
);
1233 else if( ( d1
>= 0x01 && d1
<= 0x0E ) || d1
== 0x0F )
1235 /* XDS block / End of XDS block */
1237 return i_screen_status
;