git.sesse.net Git - vlc/blob - modules/demux/subtitle.c

   1 /*****************************************************************************
   2  * subtitle.c: Demux for subtitle text files.
   3  *****************************************************************************
   4  * Copyright (C) 1999-2007 VLC authors and VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
   8  *          Derk-Jan Hartman <hartman at videolan dot org>
   9  *          Jean-Baptiste Kempf <jb@videolan.org>
  10  *
  11  * This program is free software; you can redistribute it and/or modify it
  12  * under the terms of the GNU Lesser General Public License as published by
  13  * the Free Software Foundation; either version 2.1 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  19  * GNU Lesser General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU Lesser General Public License
  22  * along with this program; if not, write to the Free Software Foundation,
  23  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29
  30 #ifdef HAVE_CONFIG_H
  31 # include "config.h"
  32 #endif
  33
  34 #include <vlc_common.h>
  35 #include <vlc_plugin.h>
  36 #include <vlc_input.h>
  37 #include <vlc_memory.h>
  38
  39 #include <ctype.h>
  40 #include <math.h>
  41
  42 #include <vlc_demux.h>
  43 #include <vlc_charset.h>
  44
  45 /*****************************************************************************
  46  * Module descriptor
  47  *****************************************************************************/
  48 static int  Open ( vlc_object_t *p_this );
  49 static void Close( vlc_object_t *p_this );
  50
  51 #define SUB_DELAY_LONGTEXT \
  52     N_("Apply a delay to all subtitles (in 1/10s, eg 100 means 10s).")
  53 #define SUB_FPS_LONGTEXT \
  54     N_("Override the normal frames per second settings. " \
  55     "This will only work with MicroDVD and SubRIP (SRT) subtitles.")
  56 #define SUB_TYPE_LONGTEXT \
  57     N_("Force the subtiles format. Selecting \"auto\" means autodetection and should always work.")
  58 #define SUB_DESCRIPTION_LONGTEXT \
  59     N_("Override the default track description.")
  60
  61 static const char *const ppsz_sub_type[] =
  62 {
  63     "auto", "microdvd", "subrip", "subviewer", "ssa1",
  64     "ssa2-4", "ass", "vplayer", "sami", "dvdsubtitle", "mpl2",
  65     "aqt", "pjs", "mpsub", "jacosub", "psb", "realtext", "dks",
  66     "subviewer1","vtt"
  67 };
  68
  69 vlc_module_begin ()
  70     set_shortname( N_("Subtitles"))
  71     set_description( N_("Text subtitle parser") )
  72     set_capability( "demux", 0 )
  73     set_category( CAT_INPUT )
  74     set_subcategory( SUBCAT_INPUT_DEMUX )
  75     add_float( "sub-fps", 0.0,
  76                N_("Frames per Second"),
  77                SUB_FPS_LONGTEXT, true )
  78     add_integer( "sub-delay", 0,
  79                N_("Subtitle delay"),
  80                SUB_DELAY_LONGTEXT, true )
  81     add_string( "sub-type", "auto", N_("Subtitle format"),
  82                 SUB_TYPE_LONGTEXT, true )
  83         change_string_list( ppsz_sub_type, ppsz_sub_type )
  84     add_string( "sub-description", NULL, N_("Subtitle description"),
  85                 SUB_DESCRIPTION_LONGTEXT, true )
  86     set_callbacks( Open, Close )
  87
  88     add_shortcut( "subtitle" )
  89 vlc_module_end ()
  90
  91 /*****************************************************************************
  92  * Prototypes:
  93  *****************************************************************************/
  94 enum
  95 {
  96     SUB_TYPE_UNKNOWN = -1,
  97     SUB_TYPE_MICRODVD,
  98     SUB_TYPE_SUBRIP,
  99     SUB_TYPE_SSA1,
 100     SUB_TYPE_SSA2_4,
 101     SUB_TYPE_ASS,
 102     SUB_TYPE_VPLAYER,
 103     SUB_TYPE_SAMI,
 104     SUB_TYPE_SUBVIEWER, /* SUBVIEWER 2 */
 105     SUB_TYPE_DVDSUBTITLE, /* Mplayer calls it subviewer2 */
 106     SUB_TYPE_MPL2,
 107     SUB_TYPE_AQT,
 108     SUB_TYPE_PJS,
 109     SUB_TYPE_MPSUB,
 110     SUB_TYPE_JACOSUB,
 111     SUB_TYPE_PSB,
 112     SUB_TYPE_RT,
 113     SUB_TYPE_DKS,
 114     SUB_TYPE_SUBVIEW1, /* SUBVIEWER 1 - mplayer calls it subrip09,
 115                          and Gnome subtitles SubViewer 1.0 */
 116     SUB_TYPE_VTT
 117 };
 118
 119 typedef struct
 120 {
 121     int     i_line_count;
 122     int     i_line;
 123     char    **line;
 124 } text_t;
 125
 126 static int  TextLoad( text_t *, stream_t *s );
 127 static void TextUnload( text_t * );
 128
 129 typedef struct
 130 {
 131     int64_t i_start;
 132     int64_t i_stop;
 133
 134     char    *psz_text;
 135 } subtitle_t;
 136
 137
 138 struct demux_sys_t
 139 {
 140     int         i_type;
 141     text_t      txt;
 142     es_out_id_t *es;
 143
 144     int64_t     i_next_demux_date;
 145     int64_t     i_microsecperframe;
 146
 147     char        *psz_header;
 148     int         i_subtitle;
 149     int         i_subtitles;
 150     subtitle_t  *subtitle;
 151
 152     int64_t     i_length;
 153
 154     /* */
 155     struct
 156     {
 157         bool b_inited;
 158
 159         int i_comment;
 160         int i_time_resolution;
 161         int i_time_shift;
 162     } jss;
 163     struct
 164     {
 165         bool  b_inited;
 166
 167         float f_total;
 168         float f_factor;
 169     } mpsub;
 170 };
 171
 172 static int  ParseMicroDvd   ( demux_t *, subtitle_t *, int );
 173 static int  ParseSubRip     ( demux_t *, subtitle_t *, int );
 174 static int  ParseSubViewer  ( demux_t *, subtitle_t *, int );
 175 static int  ParseSSA        ( demux_t *, subtitle_t *, int );
 176 static int  ParseVplayer    ( demux_t *, subtitle_t *, int );
 177 static int  ParseSami       ( demux_t *, subtitle_t *, int );
 178 static int  ParseDVDSubtitle( demux_t *, subtitle_t *, int );
 179 static int  ParseMPL2       ( demux_t *, subtitle_t *, int );
 180 static int  ParseAQT        ( demux_t *, subtitle_t *, int );
 181 static int  ParsePJS        ( demux_t *, subtitle_t *, int );
 182 static int  ParseMPSub      ( demux_t *, subtitle_t *, int );
 183 static int  ParseJSS        ( demux_t *, subtitle_t *, int );
 184 static int  ParsePSB        ( demux_t *, subtitle_t *, int );
 185 static int  ParseRealText   ( demux_t *, subtitle_t *, int );
 186 static int  ParseDKS        ( demux_t *, subtitle_t *, int );
 187 static int  ParseSubViewer1 ( demux_t *, subtitle_t *, int );
 188 static int  ParseVTT        ( demux_t *, subtitle_t *, int );
 189
 190 static const struct
 191 {
 192     const char *psz_type_name;
 193     int  i_type;
 194     const char *psz_name;
 195     int  (*pf_read)( demux_t *, subtitle_t*, int );
 196 } sub_read_subtitle_function [] =
 197 {
 198     { "microdvd",   SUB_TYPE_MICRODVD,    "MicroDVD",    ParseMicroDvd },
 199     { "subrip",     SUB_TYPE_SUBRIP,      "SubRIP",      ParseSubRip },
 200     { "subviewer",  SUB_TYPE_SUBVIEWER,   "SubViewer",   ParseSubViewer },
 201     { "ssa1",       SUB_TYPE_SSA1,        "SSA-1",       ParseSSA },
 202     { "ssa2-4",     SUB_TYPE_SSA2_4,      "SSA-2/3/4",   ParseSSA },
 203     { "ass",        SUB_TYPE_ASS,         "SSA/ASS",     ParseSSA },
 204     { "vplayer",    SUB_TYPE_VPLAYER,     "VPlayer",     ParseVplayer },
 205     { "sami",       SUB_TYPE_SAMI,        "SAMI",        ParseSami },
 206     { "dvdsubtitle",SUB_TYPE_DVDSUBTITLE, "DVDSubtitle", ParseDVDSubtitle },
 207     { "mpl2",       SUB_TYPE_MPL2,        "MPL2",        ParseMPL2 },
 208     { "aqt",        SUB_TYPE_AQT,         "AQTitle",     ParseAQT },
 209     { "pjs",        SUB_TYPE_PJS,         "PhoenixSub",  ParsePJS },
 210     { "mpsub",      SUB_TYPE_MPSUB,       "MPSub",       ParseMPSub },
 211     { "jacosub",    SUB_TYPE_JACOSUB,     "JacoSub",     ParseJSS },
 212     { "psb",        SUB_TYPE_PSB,         "PowerDivx",   ParsePSB },
 213     { "realtext",   SUB_TYPE_RT,          "RealText",    ParseRealText },
 214     { "dks",        SUB_TYPE_DKS,         "DKS",         ParseDKS },
 215     { "subviewer1", SUB_TYPE_SUBVIEW1,    "Subviewer 1", ParseSubViewer1 },
 216     { "text/vtt",   SUB_TYPE_VTT,         "WebVTT",      ParseVTT },
 217     { NULL,         SUB_TYPE_UNKNOWN,     "Unknown",     NULL }
 218 };
 219 /* When adding support for more formats, be sure to add their file extension
 220  * to src/input/subtitles.c to enable auto-detection.
 221  */
 222
 223 static int Demux( demux_t * );
 224 static int Control( demux_t *, int, va_list );
 225
 226 static void Fix( demux_t * );
 227 static char * get_language_from_filename( const char * );
 228
 229 /*****************************************************************************
 230  * Module initializer
 231  *****************************************************************************/
 232 static int Open ( vlc_object_t *p_this )
 233 {
 234     demux_t        *p_demux = (demux_t*)p_this;
 235     demux_sys_t    *p_sys;
 236     es_format_t    fmt;
 237     float          f_fps;
 238     char           *psz_type;
 239     int  (*pf_read)( demux_t *, subtitle_t*, int );
 240     int            i, i_max;
 241
 242     if( !p_demux->b_force )
 243     {
 244         msg_Dbg( p_demux, "subtitle demux discarded" );
 245         return VLC_EGENERIC;
 246     }
 247
 248     p_demux->pf_demux = Demux;
 249     p_demux->pf_control = Control;
 250     p_demux->p_sys = p_sys = malloc( sizeof( demux_sys_t ) );
 251     if( p_sys == NULL )
 252         return VLC_ENOMEM;
 253
 254     p_sys->psz_header         = NULL;
 255     p_sys->i_subtitle         = 0;
 256     p_sys->i_subtitles        = 0;
 257     p_sys->subtitle           = NULL;
 258     p_sys->i_microsecperframe = 40000;
 259
 260     p_sys->jss.b_inited       = false;
 261     p_sys->mpsub.b_inited     = false;
 262
 263     /* Get the FPS */
 264     f_fps = var_CreateGetFloat( p_demux, "sub-original-fps" ); /* FIXME */
 265     if( f_fps >= 1.f )
 266         p_sys->i_microsecperframe = llroundf( 1000000.f / f_fps );
 267
 268     msg_Dbg( p_demux, "Movie fps: %f", (double) f_fps );
 269
 270     /* Check for override of the fps */
 271     f_fps = var_CreateGetFloat( p_demux, "sub-fps" );
 272     if( f_fps >= 1.f )
 273     {
 274         p_sys->i_microsecperframe = llroundf( 1000000.f / f_fps );
 275         msg_Dbg( p_demux, "Override subtitle fps %f", (double) f_fps );
 276     }
 277
 278     /* Get or probe the type */
 279     p_sys->i_type = SUB_TYPE_UNKNOWN;
 280     psz_type = var_CreateGetString( p_demux, "sub-type" );
 281     if( psz_type && *psz_type )
 282     {
 283         int i;
 284
 285         for( i = 0; ; i++ )
 286         {
 287             if( sub_read_subtitle_function[i].psz_type_name == NULL )
 288                 break;
 289
 290             if( !strcmp( sub_read_subtitle_function[i].psz_type_name,
 291                          psz_type ) )
 292             {
 293                 p_sys->i_type = sub_read_subtitle_function[i].i_type;
 294                 break;
 295             }
 296         }
 297     }
 298     free( psz_type );
 299
 300     /* Detect Unicode while skipping the UTF-8 Byte Order Mark */
 301     bool unicode = false;
 302     const uint8_t *p_data;
 303     if( stream_Peek( p_demux->s, &p_data, 3 ) >= 3
 304      && !memcmp( p_data, "\xEF\xBB\xBF", 3 ) )
 305     {
 306         unicode = true;
 307         stream_Seek( p_demux->s, 3 ); /* skip BOM */
 308         msg_Dbg( p_demux, "detected Unicode Byte Order Mark" );
 309     }
 310
 311     /* Probe if unknown type */
 312     if( p_sys->i_type == SUB_TYPE_UNKNOWN )
 313     {
 314         int     i_try;
 315         char    *s = NULL;
 316
 317         msg_Dbg( p_demux, "autodetecting subtitle format" );
 318         for( i_try = 0; i_try < 256; i_try++ )
 319         {
 320             int i_dummy;
 321             char p_dummy;
 322
 323             if( ( s = stream_ReadLine( p_demux->s ) ) == NULL )
 324                 break;
 325
 326             if( strcasestr( s, "<SAMI>" ) )
 327             {
 328                 p_sys->i_type = SUB_TYPE_SAMI;
 329                 break;
 330             }
 331             else if( sscanf( s, "{%d}{%d}", &i_dummy, &i_dummy ) == 2 ||
 332                      sscanf( s, "{%d}{}", &i_dummy ) == 1)
 333             {
 334                 p_sys->i_type = SUB_TYPE_MICRODVD;
 335                 break;
 336             }
 337             else if( sscanf( s, "%d:%d:%d,%d --> %d:%d:%d,%d",
 338                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 339                              &i_dummy,&i_dummy,&i_dummy,&i_dummy ) == 8 ||
 340                      sscanf( s, "%d:%d:%d --> %d:%d:%d,%d",
 341                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 342                              &i_dummy,&i_dummy,&i_dummy ) == 7 ||
 343                      sscanf( s, "%d:%d:%d,%d --> %d:%d:%d",
 344                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 345                              &i_dummy,&i_dummy,&i_dummy ) == 7 ||
 346                      sscanf( s, "%d:%d:%d.%d --> %d:%d:%d.%d",
 347                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 348                              &i_dummy,&i_dummy,&i_dummy,&i_dummy ) == 8 ||
 349                      sscanf( s, "%d:%d:%d --> %d:%d:%d.%d",
 350                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 351                              &i_dummy,&i_dummy,&i_dummy ) == 7 ||
 352                      sscanf( s, "%d:%d:%d.%d --> %d:%d:%d",
 353                              &i_dummy,&i_dummy,&i_dummy,&i_dummy,
 354                              &i_dummy,&i_dummy,&i_dummy ) == 7 ||
 355                      sscanf( s, "%d:%d:%d --> %d:%d:%d",
 356                              &i_dummy,&i_dummy,&i_dummy,
 357                              &i_dummy,&i_dummy,&i_dummy ) == 6 )
 358             {
 359                 p_sys->i_type = SUB_TYPE_SUBRIP;
 360                 break;
 361             }
 362             else if( !strncasecmp( s, "!: This is a Sub Station Alpha v1", 33 ) )
 363             {
 364                 p_sys->i_type = SUB_TYPE_SSA1;
 365                 break;
 366             }
 367             else if( !strncasecmp( s, "ScriptType: v4.00+", 18 ) )
 368             {
 369                 p_sys->i_type = SUB_TYPE_ASS;
 370                 break;
 371             }
 372             else if( !strncasecmp( s, "ScriptType: v4.00", 17 ) )
 373             {
 374                 p_sys->i_type = SUB_TYPE_SSA2_4;
 375                 break;
 376             }
 377             else if( !strncasecmp( s, "Dialogue: Marked", 16  ) )
 378             {
 379                 p_sys->i_type = SUB_TYPE_SSA2_4;
 380                 break;
 381             }
 382             else if( !strncasecmp( s, "Dialogue:", 9  ) )
 383             {
 384                 p_sys->i_type = SUB_TYPE_ASS;
 385                 break;
 386             }
 387             else if( strcasestr( s, "[INFORMATION]" ) )
 388             {
 389                 p_sys->i_type = SUB_TYPE_SUBVIEWER; /* I hope this will work */
 390                 break;
 391             }
 392             else if( sscanf( s, "%d:%d:%d.%d %d:%d:%d",
 393                                  &i_dummy, &i_dummy, &i_dummy, &i_dummy,
 394                                  &i_dummy, &i_dummy, &i_dummy ) == 7 ||
 395                      sscanf( s, "@%d @%d", &i_dummy, &i_dummy) == 2)
 396             {
 397                 p_sys->i_type = SUB_TYPE_JACOSUB;
 398                 break;
 399             }
 400             else if( sscanf( s, "%d:%d:%d:", &i_dummy, &i_dummy, &i_dummy ) == 3 ||
 401                      sscanf( s, "%d:%d:%d ", &i_dummy, &i_dummy, &i_dummy ) == 3 )
 402             {
 403                 p_sys->i_type = SUB_TYPE_VPLAYER;
 404                 break;
 405             }
 406             else if( sscanf( s, "{T %d:%d:%d:%d", &i_dummy, &i_dummy,
 407                              &i_dummy, &i_dummy ) == 4 )
 408             {
 409                 p_sys->i_type = SUB_TYPE_DVDSUBTITLE;
 410                 break;
 411             }
 412             else if( sscanf( s, "[%d:%d:%d]%c",
 413                      &i_dummy, &i_dummy, &i_dummy, &p_dummy ) == 4 )
 414             {
 415                 p_sys->i_type = SUB_TYPE_DKS;
 416                 break;
 417             }
 418             else if( strstr( s, "*** START SCRIPT" ) )
 419             {
 420                 p_sys->i_type = SUB_TYPE_SUBVIEW1;
 421                 break;
 422             }
 423             else if( sscanf( s, "[%d][%d]", &i_dummy, &i_dummy ) == 2 ||
 424                      sscanf( s, "[%d][]", &i_dummy ) == 1)
 425             {
 426                 p_sys->i_type = SUB_TYPE_MPL2;
 427                 break;
 428             }
 429             else if( sscanf (s, "FORMAT=%d", &i_dummy) == 1 ||
 430                      ( sscanf (s, "FORMAT=TIM%c", &p_dummy) == 1
 431                        && p_dummy =='E' ) )
 432             {
 433                 p_sys->i_type = SUB_TYPE_MPSUB;
 434                 break;
 435             }
 436             else if( sscanf( s, "-->> %d", &i_dummy) == 1 )
 437             {
 438                 p_sys->i_type = SUB_TYPE_AQT;
 439                 break;
 440             }
 441             else if( sscanf( s, "%d,%d,", &i_dummy, &i_dummy ) == 2 )
 442             {
 443                 p_sys->i_type = SUB_TYPE_PJS;
 444                 break;
 445             }
 446             else if( sscanf( s, "{%d:%d:%d}",
 447                                 &i_dummy, &i_dummy, &i_dummy ) == 3 )
 448             {
 449                 p_sys->i_type = SUB_TYPE_PSB;
 450                 break;
 451             }
 452             else if( strcasestr( s, "<time" ) )
 453             {
 454                 p_sys->i_type = SUB_TYPE_RT;
 455                 break;
 456             }
 457             else if( !strncasecmp( s, "WEBVTT",6 ) )
 458             {
 459                 p_sys->i_type = SUB_TYPE_VTT;
 460                 break;
 461             }
 462
 463             free( s );
 464             s = NULL;
 465         }
 466
 467         free( s );
 468
 469         /* It will nearly always work even for non seekable stream thanks the
 470          * caching system, and if it fails we lose just a few sub */
 471         if( stream_Seek( p_demux->s, unicode ? 3 : 0 ) )
 472             msg_Warn( p_demux, "failed to rewind" );
 473     }
 474
 475     /* Quit on unknown subtitles */
 476     if( p_sys->i_type == SUB_TYPE_UNKNOWN )
 477     {
 478         stream_Seek( p_demux->s, 0 );
 479         msg_Warn( p_demux, "failed to recognize subtitle type" );
 480         free( p_sys );
 481         return VLC_EGENERIC;
 482     }
 483
 484     for( i = 0; ; i++ )
 485     {
 486         if( sub_read_subtitle_function[i].i_type == p_sys->i_type )
 487         {
 488             msg_Dbg( p_demux, "detected %s format",
 489                      sub_read_subtitle_function[i].psz_name );
 490             pf_read = sub_read_subtitle_function[i].pf_read;
 491             break;
 492         }
 493     }
 494
 495     msg_Dbg( p_demux, "loading all subtitles..." );
 496
 497     /* Load the whole file */
 498     TextLoad( &p_sys->txt, p_demux->s );
 499
 500     /* Parse it */
 501     for( i_max = 0;; )
 502     {
 503         if( p_sys->i_subtitles >= i_max )
 504         {
 505             i_max += 500;
 506             if( !( p_sys->subtitle = realloc_or_free( p_sys->subtitle,
 507                                               sizeof(subtitle_t) * i_max ) ) )
 508             {
 509                 TextUnload( &p_sys->txt );
 510                 free( p_sys );
 511                 return VLC_ENOMEM;
 512             }
 513         }
 514
 515         if( pf_read( p_demux, &p_sys->subtitle[p_sys->i_subtitles],
 516                      p_sys->i_subtitles ) )
 517             break;
 518
 519         p_sys->i_subtitles++;
 520     }
 521     /* Unload */
 522     TextUnload( &p_sys->txt );
 523
 524     msg_Dbg(p_demux, "loaded %d subtitles", p_sys->i_subtitles );
 525
 526     /* Fix subtitle (order and time) *** */
 527     p_sys->i_subtitle = 0;
 528     p_sys->i_length = 0;
 529     if( p_sys->i_subtitles > 0 )
 530     {
 531         p_sys->i_length = p_sys->subtitle[p_sys->i_subtitles-1].i_stop;
 532         /* +1 to avoid 0 */
 533         if( p_sys->i_length <= 0 )
 534             p_sys->i_length = p_sys->subtitle[p_sys->i_subtitles-1].i_start+1;
 535     }
 536
 537     /* *** add subtitle ES *** */
 538     if( p_sys->i_type == SUB_TYPE_SSA1 ||
 539              p_sys->i_type == SUB_TYPE_SSA2_4 ||
 540              p_sys->i_type == SUB_TYPE_ASS )
 541     {
 542         Fix( p_demux );
 543         es_format_Init( &fmt, SPU_ES, VLC_CODEC_SSA );
 544     }
 545     else
 546         es_format_Init( &fmt, SPU_ES, VLC_CODEC_SUBT );
 547
 548     /* Stupid language detection in the filename */
 549     char * psz_language = get_language_from_filename( p_demux->psz_file );
 550
 551     if( psz_language )
 552     {
 553         fmt.psz_language = psz_language;
 554         msg_Dbg( p_demux, "detected language %s of subtitle: %s", psz_language,
 555                  p_demux->psz_location );
 556     }
 557
 558     if( unicode )
 559         fmt.subs.psz_encoding = strdup( "UTF-8" );
 560     char *psz_description = var_InheritString( p_demux, "sub-description" );
 561     if( psz_description && *psz_description )
 562         fmt.psz_description = psz_description;
 563     else
 564         free( psz_description );
 565     if( p_sys->psz_header != NULL )
 566     {
 567         fmt.i_extra = strlen( p_sys->psz_header ) + 1;
 568         fmt.p_extra = strdup( p_sys->psz_header );
 569     }
 570     p_sys->es = es_out_Add( p_demux->out, &fmt );
 571     es_format_Clean( &fmt );
 572
 573     return VLC_SUCCESS;
 574 }
 575
 576 /*****************************************************************************
 577  * Close: Close subtitle demux
 578  *****************************************************************************/
 579 static void Close( vlc_object_t *p_this )
 580 {
 581     demux_t *p_demux = (demux_t*)p_this;
 582     demux_sys_t *p_sys = p_demux->p_sys;
 583     int i;
 584
 585     for( i = 0; i < p_sys->i_subtitles; i++ )
 586         free( p_sys->subtitle[i].psz_text );
 587     free( p_sys->subtitle );
 588     free( p_sys->psz_header );
 589
 590     free( p_sys );
 591 }
 592
 593 /*****************************************************************************
 594  * Control:
 595  *****************************************************************************/
 596 static int Control( demux_t *p_demux, int i_query, va_list args )
 597 {
 598     demux_sys_t *p_sys = p_demux->p_sys;
 599     int64_t *pi64, i64;
 600     double *pf, f;
 601
 602     switch( i_query )
 603     {
 604         case DEMUX_GET_LENGTH:
 605             pi64 = (int64_t*)va_arg( args, int64_t * );
 606             *pi64 = p_sys->i_length;
 607             return VLC_SUCCESS;
 608
 609         case DEMUX_GET_TIME:
 610             pi64 = (int64_t*)va_arg( args, int64_t * );
 611             if( p_sys->i_subtitle < p_sys->i_subtitles )
 612             {
 613                 *pi64 = p_sys->subtitle[p_sys->i_subtitle].i_start;
 614                 return VLC_SUCCESS;
 615             }
 616             return VLC_EGENERIC;
 617
 618         case DEMUX_SET_TIME:
 619             i64 = (int64_t)va_arg( args, int64_t );
 620             p_sys->i_subtitle = 0;
 621             while( p_sys->i_subtitle < p_sys->i_subtitles )
 622             {
 623                 const subtitle_t *p_subtitle = &p_sys->subtitle[p_sys->i_subtitle];
 624
 625                 if( p_subtitle->i_start > i64 )
 626                     break;
 627                 if( p_subtitle->i_stop > p_subtitle->i_start && p_subtitle->i_stop > i64 )
 628                     break;
 629
 630                 p_sys->i_subtitle++;
 631             }
 632
 633             if( p_sys->i_subtitle >= p_sys->i_subtitles )
 634                 return VLC_EGENERIC;
 635             return VLC_SUCCESS;
 636
 637         case DEMUX_GET_POSITION:
 638             pf = (double*)va_arg( args, double * );
 639             if( p_sys->i_subtitle >= p_sys->i_subtitles )
 640             {
 641                 *pf = 1.0;
 642             }
 643             else if( p_sys->i_subtitles > 0 )
 644             {
 645                 *pf = (double)p_sys->subtitle[p_sys->i_subtitle].i_start /
 646                       (double)p_sys->i_length;
 647             }
 648             else
 649             {
 650                 *pf = 0.0;
 651             }
 652             return VLC_SUCCESS;
 653
 654         case DEMUX_SET_POSITION:
 655             f = (double)va_arg( args, double );
 656             i64 = f * p_sys->i_length;
 657
 658             p_sys->i_subtitle = 0;
 659             while( p_sys->i_subtitle < p_sys->i_subtitles &&
 660                    p_sys->subtitle[p_sys->i_subtitle].i_start < i64 )
 661             {
 662                 p_sys->i_subtitle++;
 663             }
 664             if( p_sys->i_subtitle >= p_sys->i_subtitles )
 665                 return VLC_EGENERIC;
 666             return VLC_SUCCESS;
 667
 668         case DEMUX_SET_NEXT_DEMUX_TIME:
 669             p_sys->i_next_demux_date = (int64_t)va_arg( args, int64_t );
 670             return VLC_SUCCESS;
 671
 672         case DEMUX_GET_PTS_DELAY:
 673         case DEMUX_GET_FPS:
 674         case DEMUX_GET_META:
 675         case DEMUX_GET_ATTACHMENTS:
 676         case DEMUX_GET_TITLE_INFO:
 677         case DEMUX_HAS_UNSUPPORTED_META:
 678         case DEMUX_CAN_RECORD:
 679             return VLC_EGENERIC;
 680
 681         default:
 682             msg_Err( p_demux, "unknown query %d in subtitle control", i_query );
 683             return VLC_EGENERIC;
 684     }
 685 }
 686
 687 /*****************************************************************************
 688  * Demux: Send subtitle to decoder
 689  *****************************************************************************/
 690 static int Demux( demux_t *p_demux )
 691 {
 692     demux_sys_t *p_sys = p_demux->p_sys;
 693     int64_t i_maxdate;
 694
 695     if( p_sys->i_subtitle >= p_sys->i_subtitles )
 696         return 0;
 697
 698     i_maxdate = p_sys->i_next_demux_date - var_GetTime( p_demux->p_parent, "spu-delay" );;
 699     if( i_maxdate <= 0 && p_sys->i_subtitle < p_sys->i_subtitles )
 700     {
 701         /* Should not happen */
 702         i_maxdate = p_sys->subtitle[p_sys->i_subtitle].i_start + 1;
 703     }
 704
 705     while( p_sys->i_subtitle < p_sys->i_subtitles &&
 706            p_sys->subtitle[p_sys->i_subtitle].i_start < i_maxdate )
 707     {
 708         const subtitle_t *p_subtitle = &p_sys->subtitle[p_sys->i_subtitle];
 709
 710         block_t *p_block;
 711         int i_len = strlen( p_subtitle->psz_text ) + 1;
 712
 713         if( i_len <= 1 || p_subtitle->i_start < 0 )
 714         {
 715             p_sys->i_subtitle++;
 716             continue;
 717         }
 718
 719         if( ( p_block = block_Alloc( i_len ) ) == NULL )
 720         {
 721             p_sys->i_subtitle++;
 722             continue;
 723         }
 724
 725         p_block->i_dts =
 726         p_block->i_pts = VLC_TS_0 + p_subtitle->i_start;
 727         if( p_subtitle->i_stop >= 0 && p_subtitle->i_stop >= p_subtitle->i_start )
 728             p_block->i_length = p_subtitle->i_stop - p_subtitle->i_start;
 729
 730         memcpy( p_block->p_buffer, p_subtitle->psz_text, i_len );
 731
 732         es_out_Send( p_demux->out, p_sys->es, p_block );
 733
 734         p_sys->i_subtitle++;
 735     }
 736
 737     /* */
 738     p_sys->i_next_demux_date = 0;
 739
 740     return 1;
 741 }
 742
 743 /*****************************************************************************
 744  * Fix: fix time stamp and order of subtitle
 745  *****************************************************************************/
 746 static void Fix( demux_t *p_demux )
 747 {
 748     demux_sys_t *p_sys = p_demux->p_sys;
 749     bool b_done;
 750
 751     /* *** fix order (to be sure...) *** */
 752     /* We suppose that there are near in order and this durty bubble sort
 753      * would not take too much time
 754      */
 755     do
 756     {
 757         b_done = true;
 758         for( int i_index = 1; i_index < p_sys->i_subtitles; i_index++ )
 759         {
 760             if( p_sys->subtitle[i_index].i_start <
 761                 p_sys->subtitle[i_index - 1].i_start )
 762             {
 763                 subtitle_t sub_xch;
 764                 memcpy( &sub_xch,
 765                         p_sys->subtitle + i_index - 1,
 766                         sizeof( subtitle_t ) );
 767                 memcpy( p_sys->subtitle + i_index - 1,
 768                         p_sys->subtitle + i_index,
 769                         sizeof( subtitle_t ) );
 770                 memcpy( p_sys->subtitle + i_index,
 771                         &sub_xch,
 772                         sizeof( subtitle_t ) );
 773                 b_done = false;
 774             }
 775         }
 776     } while( !b_done );
 777 }
 778
 779 static int TextLoad( text_t *txt, stream_t *s )
 780 {
 781     int   i_line_max;
 782
 783     /* init txt */
 784     i_line_max          = 500;
 785     txt->i_line_count   = 0;
 786     txt->i_line         = 0;
 787     txt->line           = calloc( i_line_max, sizeof( char * ) );
 788     if( !txt->line )
 789         return VLC_ENOMEM;
 790
 791     /* load the complete file */
 792     for( ;; )
 793     {
 794         char *psz = stream_ReadLine( s );
 795
 796         if( psz == NULL )
 797             break;
 798
 799         txt->line[txt->i_line_count++] = psz;
 800         if( txt->i_line_count >= i_line_max )
 801         {
 802             i_line_max += 100;
 803             txt->line = realloc_or_free( txt->line, i_line_max * sizeof( char * ) );
 804             if( !txt->line )
 805                 return VLC_ENOMEM;
 806         }
 807     }
 808
 809     if( txt->i_line_count <= 0 )
 810     {
 811         free( txt->line );
 812         return VLC_EGENERIC;
 813     }
 814
 815     return VLC_SUCCESS;
 816 }
 817 static void TextUnload( text_t *txt )
 818 {
 819     int i;
 820
 821     for( i = 0; i < txt->i_line_count; i++ )
 822     {
 823         free( txt->line[i] );
 824     }
 825     free( txt->line );
 826     txt->i_line       = 0;
 827     txt->i_line_count = 0;
 828 }
 829
 830 static char *TextGetLine( text_t *txt )
 831 {
 832     if( txt->i_line >= txt->i_line_count )
 833         return( NULL );
 834
 835     return txt->line[txt->i_line++];
 836 }
 837 static void TextPreviousLine( text_t *txt )
 838 {
 839     if( txt->i_line > 0 )
 840         txt->i_line--;
 841 }
 842
 843 /*****************************************************************************
 844  * Specific Subtitle function
 845  *****************************************************************************/
 846 /* ParseMicroDvd:
 847  *  Format:
 848  *      {n1}{n2}Line1|Line2|Line3....
 849  *  where n1 and n2 are the video frame number (n2 can be empty)
 850  */
 851 static int ParseMicroDvd( demux_t *p_demux, subtitle_t *p_subtitle,
 852                           int i_idx )
 853 {
 854     VLC_UNUSED( i_idx );
 855     demux_sys_t *p_sys = p_demux->p_sys;
 856     text_t      *txt = &p_sys->txt;
 857     char *psz_text;
 858     int  i_start;
 859     int  i_stop;
 860     int  i;
 861
 862     for( ;; )
 863     {
 864         const char *s = TextGetLine( txt );
 865         if( !s )
 866             return VLC_EGENERIC;
 867
 868         psz_text = malloc( strlen(s) + 1 );
 869         if( !psz_text )
 870             return VLC_ENOMEM;
 871
 872         i_start = 0;
 873         i_stop  = -1;
 874         if( sscanf( s, "{%d}{}%[^\r\n]", &i_start, psz_text ) == 2 ||
 875             sscanf( s, "{%d}{%d}%[^\r\n]", &i_start, &i_stop, psz_text ) == 3)
 876         {
 877             if( i_start != 1 || i_stop != 1 )
 878                 break;
 879
 880             /* We found a possible setting of the framerate "{1}{1}23.976" */
 881             /* Check if it's usable, and if the sub-fps is not set */
 882             float f_fps = us_strtof( psz_text, NULL );
 883             if( f_fps > 0.f && var_GetFloat( p_demux, "sub-fps" ) <= 0.f )
 884                 p_sys->i_microsecperframe = llroundf(1000000.f / f_fps);
 885         }
 886         free( psz_text );
 887     }
 888
 889     /* replace | by \n */
 890     for( i = 0; psz_text[i] != '\0'; i++ )
 891     {
 892         if( psz_text[i] == '|' )
 893             psz_text[i] = '\n';
 894     }
 895
 896     /* */
 897     p_subtitle->i_start  = i_start * p_sys->i_microsecperframe;
 898     p_subtitle->i_stop   = i_stop >= 0 ? (i_stop  * p_sys->i_microsecperframe) : -1;
 899     p_subtitle->psz_text = psz_text;
 900     return VLC_SUCCESS;
 901 }
 902
 903 /* ParseSubRipSubViewer
 904  *  Format SubRip
 905  *      n
 906  *      h1:m1:s1,d1 --> h2:m2:s2,d2
 907  *      Line1
 908  *      Line2
 909  *      ....
 910  *      [Empty line]
 911  *  Format SubViewer v1/v2
 912  *      h1:m1:s1.d1,h2:m2:s2.d2
 913  *      Line1[br]Line2
 914  *      Line3
 915  *      ...
 916  *      [empty line]
 917  *  We ignore line number for SubRip
 918  */
 919 static int ParseSubRipSubViewer( demux_t *p_demux, subtitle_t *p_subtitle,
 920                                  int (* pf_parse_timing)(subtitle_t *, const char *),
 921                                  bool b_replace_br )
 922 {
 923     demux_sys_t *p_sys = p_demux->p_sys;
 924     text_t      *txt = &p_sys->txt;
 925     char    *psz_text;
 926
 927     for( ;; )
 928     {
 929         const char *s = TextGetLine( txt );
 930
 931         if( !s )
 932             return VLC_EGENERIC;
 933
 934         if( pf_parse_timing( p_subtitle, s) == VLC_SUCCESS &&
 935             p_subtitle->i_start < p_subtitle->i_stop )
 936         {
 937             break;
 938         }
 939     }
 940
 941     /* Now read text until an empty line */
 942     psz_text = strdup("");
 943     if( !psz_text )
 944         return VLC_ENOMEM;
 945
 946     for( ;; )
 947     {
 948         const char *s = TextGetLine( txt );
 949         int i_len;
 950         int i_old;
 951
 952         i_len = s ? strlen( s ) : 0;
 953         if( i_len <= 0 )
 954         {
 955             p_subtitle->psz_text = psz_text;
 956             return VLC_SUCCESS;
 957         }
 958
 959         i_old = strlen( psz_text );
 960         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 + 1 );
 961         if( !psz_text )
 962         {
 963             return VLC_ENOMEM;
 964         }
 965         strcat( psz_text, s );
 966         strcat( psz_text, "\n" );
 967
 968         /* replace [br] by \n */
 969         if( b_replace_br )
 970         {
 971             char *p;
 972
 973             while( ( p = strstr( psz_text, "[br]" ) ) )
 974             {
 975                 *p++ = '\n';
 976                 memmove( p, &p[3], strlen(&p[3])+1 );
 977             }
 978         }
 979     }
 980 }
 981
 982 /* subtitle_ParseSubRipTimingValue
 983  * Parses SubRip timing value.
 984  */
 985 static int subtitle_ParseSubRipTimingValue(int64_t *timing_value,
 986                                            const char *s)
 987 {
 988     int h1, m1, s1, d1 = 0;
 989
 990     if ( sscanf( s, "%d:%d:%d,%d",
 991                  &h1, &m1, &s1, &d1 ) == 4 ||
 992          sscanf( s, "%d:%d:%d.%d",
 993                  &h1, &m1, &s1, &d1 ) == 4 ||
 994          sscanf( s, "%d:%d:%d",
 995                  &h1, &m1, &s1) == 3 )
 996     {
 997         (*timing_value) = ( (int64_t)h1 * 3600 * 1000 +
 998                             (int64_t)m1 * 60 * 1000 +
 999                             (int64_t)s1 * 1000 +
1000                             (int64_t)d1 ) * 1000;
1001
1002         return VLC_SUCCESS;
1003     }
1004
1005     return VLC_EGENERIC;
1006 }
1007
1008 /* subtitle_ParseSubRipTiming
1009  * Parses SubRip timing.
1010  */
1011 static int subtitle_ParseSubRipTiming( subtitle_t *p_subtitle,
1012                                        const char *s )
1013 {
1014     int i_result = VLC_EGENERIC;
1015     char *psz_start, *psz_stop;
1016     psz_start = malloc( strlen(s) + 1 );
1017     psz_stop = malloc( strlen(s) + 1 );
1018
1019     if( sscanf( s, "%s --> %s", psz_start, psz_stop) == 2 &&
1020         subtitle_ParseSubRipTimingValue( &p_subtitle->i_start, psz_start ) == VLC_SUCCESS &&
1021         subtitle_ParseSubRipTimingValue( &p_subtitle->i_stop,  psz_stop ) == VLC_SUCCESS )
1022     {
1023         i_result = VLC_SUCCESS;
1024     }
1025
1026     free(psz_start);
1027     free(psz_stop);
1028
1029     return i_result;
1030 }
1031 /* ParseSubRip
1032  */
1033 static int  ParseSubRip( demux_t *p_demux, subtitle_t *p_subtitle,
1034                          int i_idx )
1035 {
1036     VLC_UNUSED( i_idx );
1037     return ParseSubRipSubViewer( p_demux, p_subtitle,
1038                                  &subtitle_ParseSubRipTiming,
1039                                  false );
1040 }
1041
1042 /* subtitle_ParseSubViewerTiming
1043  * Parses SubViewer timing.
1044  */
1045 static int subtitle_ParseSubViewerTiming( subtitle_t *p_subtitle,
1046                                    const char *s )
1047 {
1048     int h1, m1, s1, d1, h2, m2, s2, d2;
1049
1050     if( sscanf( s, "%d:%d:%d.%d,%d:%d:%d.%d",
1051                 &h1, &m1, &s1, &d1, &h2, &m2, &s2, &d2) == 8 )
1052     {
1053         p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
1054                                 (int64_t)m1 * 60*1000 +
1055                                 (int64_t)s1 * 1000 +
1056                                 (int64_t)d1 ) * 1000;
1057
1058         p_subtitle->i_stop  = ( (int64_t)h2 * 3600*1000 +
1059                                 (int64_t)m2 * 60*1000 +
1060                                 (int64_t)s2 * 1000 +
1061                                 (int64_t)d2 ) * 1000;
1062         return VLC_SUCCESS;
1063     }
1064     return VLC_EGENERIC;
1065 }
1066
1067 /* ParseSubViewer
1068  */
1069 static int  ParseSubViewer( demux_t *p_demux, subtitle_t *p_subtitle,
1070                             int i_idx )
1071 {
1072     VLC_UNUSED( i_idx );
1073
1074     return ParseSubRipSubViewer( p_demux, p_subtitle,
1075                                  &subtitle_ParseSubViewerTiming,
1076                                  true );
1077 }
1078
1079 /* ParseSSA
1080  */
1081 static int  ParseSSA( demux_t *p_demux, subtitle_t *p_subtitle,
1082                       int i_idx )
1083 {
1084     demux_sys_t *p_sys = p_demux->p_sys;
1085     text_t      *txt = &p_sys->txt;
1086     size_t header_len = 0;
1087
1088     for( ;; )
1089     {
1090         const char *s = TextGetLine( txt );
1091         int h1, m1, s1, c1, h2, m2, s2, c2;
1092         char *psz_text, *psz_temp;
1093         char temp[16];
1094
1095         if( !s )
1096             return VLC_EGENERIC;
1097
1098         /* We expect (SSA2-4):
1099          * Format: Marked, Start, End, Style, Name, MarginL, MarginR, MarginV, Effect, Text
1100          * Dialogue: Marked=0,0:02:40.65,0:02:41.79,Wolf main,Cher,0000,0000,0000,,Et les enregistrements de ses ondes delta ?
1101          *
1102          * SSA-1 is similar but only has 8 commas up untill the subtitle text. Probably the Effect field is no present, but not 100 % sure.
1103          */
1104
1105         /* For ASS:
1106          * Format: Layer, Start, End, Style, Name, MarginL, MarginR, MarginV, Effect, Text
1107          * Dialogue: Layer#,0:02:40.65,0:02:41.79,Wolf main,Cher,0000,0000,0000,,Et les enregistrements de ses ondes delta ?
1108          */
1109
1110         /* The output text is - at least, not removing numbers - 18 chars shorter than the input text. */
1111         psz_text = malloc( strlen(s) );
1112         if( !psz_text )
1113             return VLC_ENOMEM;
1114
1115         if( sscanf( s,
1116                     "Dialogue: %15[^,],%d:%d:%d.%d,%d:%d:%d.%d,%[^\r\n]",
1117                     temp,
1118                     &h1, &m1, &s1, &c1,
1119                     &h2, &m2, &s2, &c2,
1120                     psz_text ) == 10 )
1121         {
1122             /* The dec expects: ReadOrder, Layer, Style, Name, MarginL, MarginR, MarginV, Effect, Text */
1123             /* (Layer comes from ASS specs ... it's empty for SSA.) */
1124             if( p_sys->i_type == SUB_TYPE_SSA1 )
1125             {
1126                 /* SSA1 has only 8 commas before the text starts, not 9 */
1127                 memmove( &psz_text[1], psz_text, strlen(psz_text)+1 );
1128                 psz_text[0] = ',';
1129             }
1130             else
1131             {
1132                 int i_layer = ( p_sys->i_type == SUB_TYPE_ASS ) ? atoi( temp ) : 0;
1133
1134                 /* ReadOrder, Layer, %s(rest of fields) */
1135                 if( asprintf( &psz_temp, "%d,%d,%s", i_idx, i_layer, psz_text ) == -1 )
1136                 {
1137                     free( psz_text );
1138                     return VLC_ENOMEM;
1139                 }
1140
1141                 free( psz_text );
1142                 psz_text = psz_temp;
1143             }
1144
1145             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
1146                                     (int64_t)m1 * 60*1000 +
1147                                     (int64_t)s1 * 1000 +
1148                                     (int64_t)c1 * 10 ) * 1000;
1149             p_subtitle->i_stop  = ( (int64_t)h2 * 3600*1000 +
1150                                     (int64_t)m2 * 60*1000 +
1151                                     (int64_t)s2 * 1000 +
1152                                     (int64_t)c2 * 10 ) * 1000;
1153             p_subtitle->psz_text = psz_text;
1154             return VLC_SUCCESS;
1155         }
1156         free( psz_text );
1157
1158         /* All the other stuff we add to the header field */
1159         size_t s_len = strlen( s );
1160         p_sys->psz_header = realloc_or_free( p_sys->psz_header, header_len + s_len + 2 );
1161         if( !p_sys->psz_header )
1162             return VLC_ENOMEM;
1163         snprintf( p_sys->psz_header + header_len, s_len + 2, "%s\n", s );
1164         header_len += s_len + 1;
1165     }
1166 }
1167
1168 /* ParseVplayer
1169  *  Format
1170  *      h:m:s:Line1|Line2|Line3....
1171  *  or
1172  *      h:m:s Line1|Line2|Line3....
1173  */
1174 static int ParseVplayer( demux_t *p_demux, subtitle_t *p_subtitle,
1175                           int i_idx )
1176 {
1177     VLC_UNUSED( i_idx );
1178
1179     demux_sys_t *p_sys = p_demux->p_sys;
1180     text_t      *txt = &p_sys->txt;
1181     char *psz_text;
1182     int i;
1183
1184     for( ;; )
1185     {
1186         const char *s = TextGetLine( txt );
1187         int h1, m1, s1;
1188
1189         if( !s )
1190             return VLC_EGENERIC;
1191
1192         psz_text = malloc( strlen( s ) + 1 );
1193         if( !psz_text )
1194             return VLC_ENOMEM;
1195
1196         if( sscanf( s, "%d:%d:%d%*c%[^\r\n]",
1197                     &h1, &m1, &s1, psz_text ) == 4 )
1198         {
1199             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
1200                                     (int64_t)m1 * 60*1000 +
1201                                     (int64_t)s1 * 1000 ) * 1000;
1202             p_subtitle->i_stop  = -1;
1203             break;
1204         }
1205         free( psz_text );
1206     }
1207
1208     /* replace | by \n */
1209     for( i = 0; psz_text[i] != '\0'; i++ )
1210     {
1211         if( psz_text[i] == '|' )
1212             psz_text[i] = '\n';
1213     }
1214     p_subtitle->psz_text = psz_text;
1215     return VLC_SUCCESS;
1216 }
1217
1218 /* ParseSami
1219  */
1220 static char *ParseSamiSearch( text_t *txt,
1221                               char *psz_start, const char *psz_str )
1222 {
1223     if( psz_start && strcasestr( psz_start, psz_str ) )
1224     {
1225         char *s = strcasestr( psz_start, psz_str );
1226         return &s[strlen( psz_str )];
1227     }
1228
1229     for( ;; )
1230     {
1231         char *p = TextGetLine( txt );
1232         if( !p )
1233             return NULL;
1234
1235         if( strcasestr( p, psz_str ) )
1236         {
1237             char *s = strcasestr( p, psz_str );
1238             return &s[strlen( psz_str )];
1239         }
1240     }
1241 }
1242 static int  ParseSami( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1243 {
1244     VLC_UNUSED( i_idx );
1245     demux_sys_t *p_sys = p_demux->p_sys;
1246     text_t      *txt = &p_sys->txt;
1247
1248     char *s;
1249     int64_t i_start;
1250
1251     unsigned int i_text;
1252     char text[8192]; /* Arbitrary but should be long enough */
1253
1254     /* search "Start=" */
1255     if( !( s = ParseSamiSearch( txt, NULL, "Start=" ) ) )
1256         return VLC_EGENERIC;
1257
1258     /* get start value */
1259     i_start = strtol( s, &s, 0 );
1260
1261     /* search <P */
1262     if( !( s = ParseSamiSearch( txt, s, "<P" ) ) )
1263         return VLC_EGENERIC;
1264
1265     /* search > */
1266     if( !( s = ParseSamiSearch( txt, s, ">" ) ) )
1267         return VLC_EGENERIC;
1268
1269     i_text = 0;
1270     text[0] = '\0';
1271     /* now get all txt until  a "Start=" line */
1272     for( ;; )
1273     {
1274         char c = '\0';
1275         /* Search non empty line */
1276         while( s && *s == '\0' )
1277             s = TextGetLine( txt );
1278         if( !s )
1279             break;
1280
1281         if( *s == '<' )
1282         {
1283             if( !strncasecmp( s, "<br", 3 ) )
1284             {
1285                 c = '\n';
1286             }
1287             else if( strcasestr( s, "Start=" ) )
1288             {
1289                 TextPreviousLine( txt );
1290                 break;
1291             }
1292             s = ParseSamiSearch( txt, s, ">" );
1293         }
1294         else if( !strncmp( s, "&nbsp;", 6 ) )
1295         {
1296             c = ' ';
1297             s += 6;
1298         }
1299         else if( *s == '\t' )
1300         {
1301             c = ' ';
1302             s++;
1303         }
1304         else
1305         {
1306             c = *s;
1307             s++;
1308         }
1309         if( c != '\0' && i_text+1 < sizeof(text) )
1310         {
1311             text[i_text++] = c;
1312             text[i_text] = '\0';
1313         }
1314     }
1315
1316     p_subtitle->i_start = i_start * 1000;
1317     p_subtitle->i_stop  = -1;
1318     p_subtitle->psz_text = strdup( text );
1319
1320     return VLC_SUCCESS;
1321 }
1322
1323 /* ParseDVDSubtitle
1324  *  Format
1325  *      {T h1:m1:s1:c1
1326  *      Line1
1327  *      Line2
1328  *      ...
1329  *      }
1330  * TODO it can have a header
1331  *      { HEAD
1332  *          ...
1333  *          CODEPAGE=...
1334  *          FORMAT=...
1335  *          LANG=English
1336  *      }
1337  *      LANG support would be cool
1338  *      CODEPAGE is probably mandatory FIXME
1339  */
1340 static int ParseDVDSubtitle( demux_t *p_demux, subtitle_t *p_subtitle,
1341                              int i_idx )
1342 {
1343     VLC_UNUSED( i_idx );
1344
1345     demux_sys_t *p_sys = p_demux->p_sys;
1346     text_t      *txt = &p_sys->txt;
1347     char *psz_text;
1348
1349     for( ;; )
1350     {
1351         const char *s = TextGetLine( txt );
1352         int h1, m1, s1, c1;
1353
1354         if( !s )
1355             return VLC_EGENERIC;
1356
1357         if( sscanf( s,
1358                     "{T %d:%d:%d:%d",
1359                     &h1, &m1, &s1, &c1 ) == 4 )
1360         {
1361             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
1362                                     (int64_t)m1 * 60*1000 +
1363                                     (int64_t)s1 * 1000 +
1364                                     (int64_t)c1 * 10) * 1000;
1365             p_subtitle->i_stop = -1;
1366             break;
1367         }
1368     }
1369
1370     /* Now read text until a line containing "}" */
1371     psz_text = strdup("");
1372     if( !psz_text )
1373         return VLC_ENOMEM;
1374     for( ;; )
1375     {
1376         const char *s = TextGetLine( txt );
1377         int i_len;
1378         int i_old;
1379
1380         if( !s )
1381         {
1382             free( psz_text );
1383             return VLC_EGENERIC;
1384         }
1385
1386         i_len = strlen( s );
1387         if( i_len == 1 && s[0] == '}')
1388         {
1389             p_subtitle->psz_text = psz_text;
1390             return VLC_SUCCESS;
1391         }
1392
1393         i_old = strlen( psz_text );
1394         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 + 1 );
1395         if( !psz_text )
1396             return VLC_ENOMEM;
1397         strcat( psz_text, s );
1398         strcat( psz_text, "\n" );
1399     }
1400 }
1401
1402 /* ParseMPL2
1403  *  Format
1404  *     [n1][n2]Line1|Line2|Line3...
1405  *  where n1 and n2 are the video frame number (n2 can be empty)
1406  */
1407 static int ParseMPL2( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1408 {
1409     VLC_UNUSED( i_idx );
1410
1411     demux_sys_t *p_sys = p_demux->p_sys;
1412     text_t      *txt = &p_sys->txt;
1413     char *psz_text;
1414     int i;
1415
1416     for( ;; )
1417     {
1418         const char *s = TextGetLine( txt );
1419         int i_start;
1420         int i_stop;
1421
1422         if( !s )
1423             return VLC_EGENERIC;
1424
1425         psz_text = malloc( strlen(s) + 1 );
1426         if( !psz_text )
1427             return VLC_ENOMEM;
1428
1429         i_start = 0;
1430         i_stop  = -1;
1431         if( sscanf( s, "[%d][] %[^\r\n]", &i_start, psz_text ) == 2 ||
1432             sscanf( s, "[%d][%d] %[^\r\n]", &i_start, &i_stop, psz_text ) == 3)
1433         {
1434             p_subtitle->i_start = (int64_t)i_start * 100000;
1435             p_subtitle->i_stop  = i_stop >= 0 ? ((int64_t)i_stop  * 100000) : -1;
1436             break;
1437         }
1438         free( psz_text );
1439     }
1440
1441     for( i = 0; psz_text[i] != '\0'; )
1442     {
1443         /* replace | by \n */
1444         if( psz_text[i] == '|' )
1445             psz_text[i] = '\n';
1446
1447         /* Remove italic */
1448         if( psz_text[i] == '/' && ( i == 0 || psz_text[i-1] == '\n' ) )
1449             memmove( &psz_text[i], &psz_text[i+1], strlen(&psz_text[i+1])+1 );
1450         else
1451             i++;
1452     }
1453     p_subtitle->psz_text = psz_text;
1454     return VLC_SUCCESS;
1455 }
1456
1457 static int ParseAQT( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1458 {
1459     VLC_UNUSED( i_idx );
1460
1461     demux_sys_t *p_sys = p_demux->p_sys;
1462     text_t      *txt = &p_sys->txt;
1463     char *psz_text = strdup( "" );
1464     int i_old = 0;
1465     int i_firstline = 1;
1466
1467     for( ;; )
1468     {
1469         int t; /* Time */
1470
1471         const char *s = TextGetLine( txt );
1472
1473         if( !s )
1474         {
1475             free( psz_text );
1476             return VLC_EGENERIC;
1477         }
1478
1479         /* Data Lines */
1480         if( sscanf (s, "-->> %d", &t) == 1)
1481         {
1482             p_subtitle->i_start = (int64_t)t; /* * FPS*/
1483             p_subtitle->i_stop  = -1;
1484
1485             /* Starting of a subtitle */
1486             if( i_firstline )
1487             {
1488                 i_firstline = 0;
1489             }
1490             /* We have been too far: end of the subtitle, begin of next */
1491             else
1492             {
1493                 TextPreviousLine( txt );
1494                 break;
1495             }
1496         }
1497         /* Text Lines */
1498         else
1499         {
1500             i_old = strlen( psz_text ) + 1;
1501             psz_text = realloc_or_free( psz_text, i_old + strlen( s ) + 1 );
1502             if( !psz_text )
1503                  return VLC_ENOMEM;
1504             strcat( psz_text, s );
1505             strcat( psz_text, "\n" );
1506             if( txt->i_line == txt->i_line_count )
1507                 break;
1508         }
1509     }
1510     p_subtitle->psz_text = psz_text;
1511     return VLC_SUCCESS;
1512 }
1513
1514 static int ParsePJS( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1515 {
1516     VLC_UNUSED( i_idx );
1517
1518     demux_sys_t *p_sys = p_demux->p_sys;
1519     text_t      *txt = &p_sys->txt;
1520     char *psz_text;
1521     int i;
1522
1523     for( ;; )
1524     {
1525         const char *s = TextGetLine( txt );
1526         int t1, t2;
1527
1528         if( !s )
1529             return VLC_EGENERIC;
1530
1531         psz_text = malloc( strlen(s) + 1 );
1532         if( !psz_text )
1533             return VLC_ENOMEM;
1534
1535         /* Data Lines */
1536         if( sscanf (s, "%d,%d,\"%[^\n\r]", &t1, &t2, psz_text ) == 3 )
1537         {
1538             /* 1/10th of second ? Frame based ? FIXME */
1539             p_subtitle->i_start = 10 * t1;
1540             p_subtitle->i_stop = 10 * t2;
1541             /* Remove latest " */
1542             psz_text[ strlen(psz_text) - 1 ] = '\0';
1543
1544             break;
1545         }
1546         free( psz_text );
1547     }
1548
1549     /* replace | by \n */
1550     for( i = 0; psz_text[i] != '\0'; i++ )
1551     {
1552         if( psz_text[i] == '|' )
1553             psz_text[i] = '\n';
1554     }
1555
1556     p_subtitle->psz_text = psz_text;
1557     msg_Dbg( p_demux, "%s", psz_text );
1558     return VLC_SUCCESS;
1559 }
1560
1561 static int ParseMPSub( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1562 {
1563     VLC_UNUSED( i_idx );
1564
1565     demux_sys_t *p_sys = p_demux->p_sys;
1566     text_t      *txt = &p_sys->txt;
1567     char *psz_text = strdup( "" );
1568
1569     if( !p_sys->mpsub.b_inited )
1570     {
1571         p_sys->mpsub.f_total = 0.0;
1572         p_sys->mpsub.f_factor = 0.0;
1573
1574         p_sys->mpsub.b_inited = true;
1575     }
1576
1577     for( ;; )
1578     {
1579         char p_dummy;
1580         char *psz_temp;
1581
1582         const char *s = TextGetLine( txt );
1583         if( !s )
1584         {
1585             free( psz_text );
1586             return VLC_EGENERIC;
1587         }
1588
1589         if( strstr( s, "FORMAT" ) )
1590         {
1591             if( sscanf (s, "FORMAT=TIM%c", &p_dummy ) == 1 && p_dummy == 'E')
1592             {
1593                 p_sys->mpsub.f_factor = 100.0;
1594                 break;
1595             }
1596
1597             psz_temp = malloc( strlen(s) );
1598             if( !psz_temp )
1599             {
1600                 free( psz_text );
1601                 return VLC_ENOMEM;
1602             }
1603
1604             if( sscanf( s, "FORMAT=%[^\r\n]", psz_temp ) )
1605             {
1606                 float f_fps = us_strtof( psz_temp, NULL );
1607
1608                 if( f_fps > 0.f && var_GetFloat( p_demux, "sub-fps" ) <= 0.f )
1609                     var_SetFloat( p_demux, "sub-fps", f_fps );
1610
1611                 p_sys->mpsub.f_factor = 1.f;
1612                 free( psz_temp );
1613                 break;
1614             }
1615             free( psz_temp );
1616         }
1617
1618         /* Data Lines */
1619         float f1 = us_strtof( s, &psz_temp );
1620         if( *psz_temp )
1621         {
1622             float f2 = us_strtof( psz_temp, NULL );
1623             p_sys->mpsub.f_total += f1 * p_sys->mpsub.f_factor;
1624             p_subtitle->i_start = llroundf(10000.f * p_sys->mpsub.f_total);
1625             p_sys->mpsub.f_total += f2 * p_sys->mpsub.f_factor;
1626             p_subtitle->i_stop = llroundf(10000.f * p_sys->mpsub.f_total);
1627             break;
1628         }
1629     }
1630
1631     for( ;; )
1632     {
1633         const char *s = TextGetLine( txt );
1634
1635         if( !s )
1636         {
1637             free( psz_text );
1638             return VLC_EGENERIC;
1639         }
1640
1641         int i_len = strlen( s );
1642         if( i_len == 0 )
1643             break;
1644
1645         int i_old = strlen( psz_text );
1646
1647         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 + 1 );
1648         if( !psz_text )
1649              return VLC_ENOMEM;
1650
1651         strcat( psz_text, s );
1652         strcat( psz_text, "\n" );
1653     }
1654
1655     p_subtitle->psz_text = psz_text;
1656     return VLC_SUCCESS;
1657 }
1658
1659 static int ParseJSS( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1660 {
1661     VLC_UNUSED( i_idx );
1662
1663     demux_sys_t  *p_sys = p_demux->p_sys;
1664     text_t       *txt = &p_sys->txt;
1665     char         *psz_text, *psz_orig;
1666     char         *psz_text2, *psz_orig2;
1667     int h1, h2, m1, m2, s1, s2, f1, f2;
1668
1669     if( !p_sys->jss.b_inited )
1670     {
1671         p_sys->jss.i_comment = 0;
1672         p_sys->jss.i_time_resolution = 30;
1673         p_sys->jss.i_time_shift = 0;
1674
1675         p_sys->jss.b_inited = true;
1676     }
1677
1678     /* Parse the main lines */
1679     for( ;; )
1680     {
1681         const char *s = TextGetLine( txt );
1682         if( !s )
1683             return VLC_EGENERIC;
1684
1685         psz_orig = malloc( strlen( s ) + 1 );
1686         if( !psz_orig )
1687             return VLC_ENOMEM;
1688         psz_text = psz_orig;
1689
1690         /* Complete time lines */
1691         if( sscanf( s, "%d:%d:%d.%d %d:%d:%d.%d %[^\n\r]",
1692                     &h1, &m1, &s1, &f1, &h2, &m2, &s2, &f2, psz_text ) == 9 )
1693         {
1694             p_subtitle->i_start = ( (int64_t)( h1 *3600 + m1 * 60 + s1 ) +
1695                 (int64_t)( ( f1 +  p_sys->jss.i_time_shift ) /  p_sys->jss.i_time_resolution ) )
1696                 * 1000000;
1697             p_subtitle->i_stop = ( (int64_t)( h2 *3600 + m2 * 60 + s2 ) +
1698                 (int64_t)( ( f2 +  p_sys->jss.i_time_shift ) /  p_sys->jss.i_time_resolution ) )
1699                 * 1000000;
1700             break;
1701         }
1702         /* Short time lines */
1703         else if( sscanf( s, "@%d @%d %[^\n\r]", &f1, &f2, psz_text ) == 3 )
1704         {
1705             p_subtitle->i_start = (int64_t)(
1706                     ( f1 + p_sys->jss.i_time_shift ) / p_sys->jss.i_time_resolution * 1000000.0 );
1707             p_subtitle->i_stop = (int64_t)(
1708                     ( f2 + p_sys->jss.i_time_shift ) / p_sys->jss.i_time_resolution * 1000000.0 );
1709             break;
1710         }
1711         /* General Directive lines */
1712         /* Only TIME and SHIFT are supported so far */
1713         else if( s[0] == '#' )
1714         {
1715             int h = 0, m =0, sec = 1, f = 1;
1716             unsigned shift = 1;
1717             int inv = 1;
1718
1719             strcpy( psz_text, s );
1720
1721             switch( toupper( (unsigned char)psz_text[1] ) )
1722             {
1723             case 'S':
1724                  shift = isalpha( (unsigned char)psz_text[2] ) ? 6 : 2 ;
1725
1726                  if( sscanf( &psz_text[shift], "%d", &h ) )
1727                  {
1728                      /* Negative shifting */
1729                      if( h < 0 )
1730                      {
1731                          h *= -1;
1732                          inv = -1;
1733                      }
1734
1735                      if( sscanf( &psz_text[shift], "%*d:%d", &m ) )
1736                      {
1737                          if( sscanf( &psz_text[shift], "%*d:%*d:%d", &sec ) )
1738                          {
1739                              sscanf( &psz_text[shift], "%*d:%*d:%*d.%d", &f );
1740                          }
1741                          else
1742                          {
1743                              h = 0;
1744                              sscanf( &psz_text[shift], "%d:%d.%d",
1745                                      &m, &sec, &f );
1746                              m *= inv;
1747                          }
1748                      }
1749                      else
1750                      {
1751                          h = m = 0;
1752                          sscanf( &psz_text[shift], "%d.%d", &sec, &f);
1753                          sec *= inv;
1754                      }
1755                      p_sys->jss.i_time_shift = ( ( h * 3600 + m * 60 + sec )
1756                          * p_sys->jss.i_time_resolution + f ) * inv;
1757                  }
1758                  break;
1759
1760             case 'T':
1761                 shift = isalpha( (unsigned char)psz_text[2] ) ? 8 : 2 ;
1762
1763                 sscanf( &psz_text[shift], "%d", &p_sys->jss.i_time_resolution );
1764                 break;
1765             }
1766             free( psz_orig );
1767             continue;
1768         }
1769         else
1770             /* Unkown type line, probably a comment */
1771         {
1772             free( psz_orig );
1773             continue;
1774         }
1775     }
1776
1777     while( psz_text[ strlen( psz_text ) - 1 ] == '\\' )
1778     {
1779         const char *s2 = TextGetLine( txt );
1780
1781         if( !s2 )
1782         {
1783             free( psz_orig );
1784             return VLC_EGENERIC;
1785         }
1786
1787         int i_len = strlen( s2 );
1788         if( i_len == 0 )
1789             break;
1790
1791         int i_old = strlen( psz_text );
1792
1793         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 );
1794         if( !psz_text )
1795              return VLC_ENOMEM;
1796
1797         psz_orig = psz_text;
1798         strcat( psz_text, s2 );
1799     }
1800
1801     /* Skip the blanks */
1802     while( *psz_text == ' ' || *psz_text == '\t' ) psz_text++;
1803
1804     /* Parse the directives */
1805     if( isalpha( (unsigned char)*psz_text ) || *psz_text == '[' )
1806     {
1807         while( *psz_text != ' ' )
1808         { psz_text++ ;};
1809
1810         /* Directives are NOT parsed yet */
1811         /* This has probably a better place in a decoder ? */
1812         /* directive = malloc( strlen( psz_text ) + 1 );
1813            if( sscanf( psz_text, "%s %[^\n\r]", directive, psz_text2 ) == 2 )*/
1814     }
1815
1816     /* Skip the blanks after directives */
1817     while( *psz_text == ' ' || *psz_text == '\t' ) psz_text++;
1818
1819     /* Clean all the lines from inline comments and other stuffs */
1820     psz_orig2 = calloc( strlen( psz_text) + 1, 1 );
1821     psz_text2 = psz_orig2;
1822
1823     for( ; *psz_text != '\0' && *psz_text != '\n' && *psz_text != '\r'; )
1824     {
1825         switch( *psz_text )
1826         {
1827         case '{':
1828             p_sys->jss.i_comment++;
1829             break;
1830         case '}':
1831             if( p_sys->jss.i_comment )
1832             {
1833                 p_sys->jss.i_comment = 0;
1834                 if( (*(psz_text + 1 ) ) == ' ' ) psz_text++;
1835             }
1836             break;
1837         case '~':
1838             if( !p_sys->jss.i_comment )
1839             {
1840                 *psz_text2 = ' ';
1841                 psz_text2++;
1842             }
1843             break;
1844         case ' ':
1845         case '\t':
1846             if( (*(psz_text + 1 ) ) == ' ' || (*(psz_text + 1 ) ) == '\t' )
1847                 break;
1848             if( !p_sys->jss.i_comment )
1849             {
1850                 *psz_text2 = ' ';
1851                 psz_text2++;
1852             }
1853             break;
1854         case '\\':
1855             if( (*(psz_text + 1 ) ) == 'n' )
1856             {
1857                 *psz_text2 = '\n';
1858                 psz_text++;
1859                 psz_text2++;
1860                 break;
1861             }
1862             if( ( toupper((unsigned char)*(psz_text + 1 ) ) == 'C' ) ||
1863                     ( toupper((unsigned char)*(psz_text + 1 ) ) == 'F' ) )
1864             {
1865                 psz_text++; psz_text++;
1866                 break;
1867             }
1868             if( (*(psz_text + 1 ) ) == 'B' || (*(psz_text + 1 ) ) == 'b' ||
1869                 (*(psz_text + 1 ) ) == 'I' || (*(psz_text + 1 ) ) == 'i' ||
1870                 (*(psz_text + 1 ) ) == 'U' || (*(psz_text + 1 ) ) == 'u' ||
1871                 (*(psz_text + 1 ) ) == 'D' || (*(psz_text + 1 ) ) == 'N' )
1872             {
1873                 psz_text++;
1874                 break;
1875             }
1876             if( (*(psz_text + 1 ) ) == '~' || (*(psz_text + 1 ) ) == '{' ||
1877                 (*(psz_text + 1 ) ) == '\\' )
1878                 psz_text++;
1879             else if( *(psz_text + 1 ) == '\r' ||  *(psz_text + 1 ) == '\n' ||
1880                      *(psz_text + 1 ) == '\0' )
1881             {
1882                 psz_text++;
1883             }
1884             break;
1885         default:
1886             if( !p_sys->jss.i_comment )
1887             {
1888                 *psz_text2 = *psz_text;
1889                 psz_text2++;
1890             }
1891         }
1892         psz_text++;
1893     }
1894
1895     p_subtitle->psz_text = psz_orig2;
1896     msg_Dbg( p_demux, "%s", p_subtitle->psz_text );
1897     free( psz_orig );
1898     return VLC_SUCCESS;
1899 }
1900
1901 static int ParsePSB( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1902 {
1903     VLC_UNUSED( i_idx );
1904
1905     demux_sys_t *p_sys = p_demux->p_sys;
1906     text_t      *txt = &p_sys->txt;
1907     char *psz_text;
1908     int i;
1909
1910     for( ;; )
1911     {
1912         int h1, m1, s1;
1913         int h2, m2, s2;
1914         const char *s = TextGetLine( txt );
1915
1916         if( !s )
1917             return VLC_EGENERIC;
1918
1919         psz_text = malloc( strlen( s ) + 1 );
1920         if( !psz_text )
1921             return VLC_ENOMEM;
1922
1923         if( sscanf( s, "{%d:%d:%d}{%d:%d:%d}%[^\r\n]",
1924                     &h1, &m1, &s1, &h2, &m2, &s2, psz_text ) == 7 )
1925         {
1926             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
1927                                     (int64_t)m1 * 60*1000 +
1928                                     (int64_t)s1 * 1000 ) * 1000;
1929             p_subtitle->i_stop  = ( (int64_t)h2 * 3600*1000 +
1930                                     (int64_t)m2 * 60*1000 +
1931                                     (int64_t)s2 * 1000 ) * 1000;
1932             break;
1933         }
1934         free( psz_text );
1935     }
1936
1937     /* replace | by \n */
1938     for( i = 0; psz_text[i] != '\0'; i++ )
1939     {
1940         if( psz_text[i] == '|' )
1941             psz_text[i] = '\n';
1942     }
1943     p_subtitle->psz_text = psz_text;
1944     return VLC_SUCCESS;
1945 }
1946
1947 static int64_t ParseRealTime( char *psz, int *h, int *m, int *s, int *f )
1948 {
1949     if( *psz == '\0' ) return 0;
1950     if( sscanf( psz, "%d:%d:%d.%d", h, m, s, f ) == 4 ||
1951             sscanf( psz, "%d:%d.%d", m, s, f ) == 3 ||
1952             sscanf( psz, "%d.%d", s, f ) == 2 ||
1953             sscanf( psz, "%d:%d", m, s ) == 2 ||
1954             sscanf( psz, "%d", s ) == 1 )
1955     {
1956         return (int64_t)((( *h * 60 + *m ) * 60 ) + *s ) * 1000 * 1000
1957                + (int64_t)*f * 10 * 1000;
1958     }
1959     else return VLC_EGENERIC;
1960 }
1961
1962 static int ParseRealText( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
1963 {
1964     VLC_UNUSED( i_idx );
1965     demux_sys_t *p_sys = p_demux->p_sys;
1966     text_t      *txt = &p_sys->txt;
1967     char *psz_text = NULL;
1968
1969     for( ;; )
1970     {
1971         int h1 = 0, m1 = 0, s1 = 0, f1 = 0;
1972         int h2 = 0, m2 = 0, s2 = 0, f2 = 0;
1973         const char *s = TextGetLine( txt );
1974         free( psz_text );
1975
1976         if( !s )
1977             return VLC_EGENERIC;
1978
1979         psz_text = malloc( strlen( s ) + 1 );
1980         if( !psz_text )
1981             return VLC_ENOMEM;
1982
1983         /* Find the good begining. This removes extra spaces at the beginning
1984            of the line.*/
1985         char *psz_temp = strcasestr( s, "<time");
1986         if( psz_temp != NULL )
1987         {
1988             char psz_end[12], psz_begin[12];
1989             /* Line has begin and end */
1990             if( ( sscanf( psz_temp,
1991                   "<%*[t|T]ime %*[b|B]egin=\"%11[^\"]\" %*[e|E]nd=\"%11[^\"]%*[^>]%[^\n\r]",
1992                             psz_begin, psz_end, psz_text) != 3 ) &&
1993                     /* Line has begin and no end */
1994                     ( sscanf( psz_temp,
1995                               "<%*[t|T]ime %*[b|B]egin=\"%11[^\"]\"%*[^>]%[^\n\r]",
1996                               psz_begin, psz_text ) != 2) )
1997                 /* Line is not recognized */
1998             {
1999                 continue;
2000             }
2001
2002             /* Get the times */
2003             int64_t i_time = ParseRealTime( psz_begin, &h1, &m1, &s1, &f1 );
2004             p_subtitle->i_start = i_time >= 0 ? i_time : 0;
2005
2006             i_time = ParseRealTime( psz_end, &h2, &m2, &s2, &f2 );
2007             p_subtitle->i_stop = i_time >= 0 ? i_time : -1;
2008             break;
2009         }
2010     }
2011
2012     /* Get the following Lines */
2013     for( ;; )
2014     {
2015         const char *s = TextGetLine( txt );
2016
2017         if( !s )
2018         {
2019             free( psz_text );
2020             return VLC_EGENERIC;
2021         }
2022
2023         int i_len = strlen( s );
2024         if( i_len == 0 ) break;
2025
2026         if( strcasestr( s, "<time" ) ||
2027             strcasestr( s, "<clear/") )
2028         {
2029             TextPreviousLine( txt );
2030             break;
2031         }
2032
2033         int i_old = strlen( psz_text );
2034
2035         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 + 1 );
2036         if( !psz_text )
2037             return VLC_ENOMEM;
2038
2039         strcat( psz_text, s );
2040         strcat( psz_text, "\n" );
2041     }
2042
2043     /* Remove the starting ">" that remained after the sscanf */
2044     memmove( &psz_text[0], &psz_text[1], strlen( psz_text ) );
2045
2046     p_subtitle->psz_text = psz_text;
2047
2048     return VLC_SUCCESS;
2049 }
2050
2051 static int ParseDKS( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
2052 {
2053     VLC_UNUSED( i_idx );
2054
2055     demux_sys_t *p_sys = p_demux->p_sys;
2056     text_t      *txt = &p_sys->txt;
2057     char *psz_text;
2058
2059     for( ;; )
2060     {
2061         int h1, m1, s1;
2062         int h2, m2, s2;
2063         char *s = TextGetLine( txt );
2064
2065         if( !s )
2066             return VLC_EGENERIC;
2067
2068         psz_text = malloc( strlen( s ) + 1 );
2069         if( !psz_text )
2070             return VLC_ENOMEM;
2071
2072         if( sscanf( s, "[%d:%d:%d]%[^\r\n]",
2073                     &h1, &m1, &s1, psz_text ) == 4 )
2074         {
2075             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
2076                                     (int64_t)m1 * 60*1000 +
2077                                     (int64_t)s1 * 1000 ) * 1000;
2078
2079             char *s = TextGetLine( txt );
2080             if( !s )
2081             {
2082                 free( psz_text );
2083                 return VLC_EGENERIC;
2084             }
2085
2086             if( sscanf( s, "[%d:%d:%d]", &h2, &m2, &s2 ) == 3 )
2087                 p_subtitle->i_stop  = ( (int64_t)h2 * 3600*1000 +
2088                                         (int64_t)m2 * 60*1000 +
2089                                         (int64_t)s2 * 1000 ) * 1000;
2090             else
2091                 p_subtitle->i_stop  = -1;
2092             break;
2093         }
2094         free( psz_text );
2095     }
2096
2097     /* replace [br] by \n */
2098     char *p;
2099     while( ( p = strstr( psz_text, "[br]" ) ) )
2100     {
2101         *p++ = '\n';
2102         memmove( p, &p[3], strlen(&p[3])+1 );
2103     }
2104
2105     p_subtitle->psz_text = psz_text;
2106     return VLC_SUCCESS;
2107 }
2108
2109 static int ParseSubViewer1( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
2110 {
2111     VLC_UNUSED( i_idx );
2112
2113     demux_sys_t *p_sys = p_demux->p_sys;
2114     text_t      *txt = &p_sys->txt;
2115     char *psz_text;
2116
2117     for( ;; )
2118     {
2119         int h1, m1, s1;
2120         int h2, m2, s2;
2121         char *s = TextGetLine( txt );
2122
2123         if( !s )
2124             return VLC_EGENERIC;
2125
2126         if( sscanf( s, "[%d:%d:%d]", &h1, &m1, &s1 ) == 3 )
2127         {
2128             p_subtitle->i_start = ( (int64_t)h1 * 3600*1000 +
2129                                     (int64_t)m1 * 60*1000 +
2130                                     (int64_t)s1 * 1000 ) * 1000;
2131
2132             char *s = TextGetLine( txt );
2133             if( !s )
2134                 return VLC_EGENERIC;
2135
2136             psz_text = strdup( s );
2137             if( !psz_text )
2138                 return VLC_ENOMEM;
2139
2140             s = TextGetLine( txt );
2141             if( !s )
2142             {
2143                 free( psz_text );
2144                 return VLC_EGENERIC;
2145             }
2146
2147             if( sscanf( s, "[%d:%d:%d]", &h2, &m2, &s2 ) == 3 )
2148                 p_subtitle->i_stop  = ( (int64_t)h2 * 3600*1000 +
2149                                         (int64_t)m2 * 60*1000 +
2150                                         (int64_t)s2 * 1000 ) * 1000;
2151             else
2152                 p_subtitle->i_stop  = -1;
2153
2154             break;
2155         }
2156     }
2157
2158     p_subtitle->psz_text = psz_text;
2159
2160     return VLC_SUCCESS;
2161 }
2162 /*Parsing WebVTT */
2163 static int  ParseVTT( demux_t *p_demux, subtitle_t *p_subtitle, int i_idx )
2164 {
2165     VLC_UNUSED( i_idx );
2166
2167     demux_sys_t *p_sys = p_demux->p_sys;
2168     text_t      *txt = &p_sys->txt;
2169     char        *psz_text;
2170
2171     for( ;; )
2172     {
2173         const char *s = TextGetLine( txt );
2174         int h1 = 0, m1 = 0, s1 = 0, d1 = 0;
2175         int h2 = 0, m2 = 0, s2 = 0, d2 = 0;
2176
2177         if( !s )
2178             return VLC_EGENERIC;
2179
2180         if( sscanf( s,"%d:%d:%d.%d --> %d:%d:%d.%d",
2181                     &h1, &m1, &s1, &d1,
2182                     &h2, &m2, &s2, &d2 ) == 8 ||
2183             sscanf( s,"%d:%d:%d.%d --> %d:%d.%d",
2184                     &h1, &m1, &s1, &d1,
2185                          &m2, &s2, &d2 ) == 7 ||
2186             sscanf( s,"%d:%d.%d --> %d:%d:%d.%d",
2187                          &m1, &s1, &d1,
2188                     &h2, &m2, &s2, &d2 ) == 7 ||
2189             sscanf( s,"%d:%d.%d --> %d:%d.%d",
2190                          &m1, &s1, &d1,
2191                          &m2, &s2, &d2 ) == 6 )
2192         {
2193             p_subtitle->i_start = ( (int64_t)h1 * 3600 * 1000 +
2194                                     (int64_t)m1 * 60 * 1000 +
2195                                     (int64_t)s1 * 1000 +
2196                                     (int64_t)d1 ) * 1000;
2197
2198             p_subtitle->i_stop  = ( (int64_t)h2 * 3600 * 1000 +
2199                                     (int64_t)m2 * 60 * 1000 +
2200                                     (int64_t)s2 * 1000 +
2201                                     (int64_t)d2 ) * 1000;
2202             if( p_subtitle->i_start < p_subtitle->i_stop )
2203                 break;
2204         }
2205     }
2206
2207     /* Now read text until an empty line */
2208     psz_text = strdup("");
2209     if( !psz_text )
2210         return VLC_ENOMEM;
2211
2212     for( ;; )
2213     {
2214         const char *s = TextGetLine( txt );
2215         int i_len;
2216         int i_old;
2217
2218         i_len = s ? strlen( s ) : 0;
2219         if( i_len <= 0 )
2220         {
2221             p_subtitle->psz_text = psz_text;
2222             return VLC_SUCCESS;
2223         }
2224
2225         i_old = strlen( psz_text );
2226         psz_text = realloc_or_free( psz_text, i_old + i_len + 1 + 1 );
2227         if( !psz_text )
2228             return VLC_ENOMEM;
2229
2230         strcat( psz_text, s );
2231         strcat( psz_text, "\n" );
2232     }
2233 }
2234
2235 /* Matches filename.xx.srt */
2236 static char * get_language_from_filename( const char * psz_sub_file )
2237 {
2238     char *psz_ret = NULL;
2239     char *psz_tmp, *psz_language_begin;
2240
2241     if( !psz_sub_file ) return NULL;
2242     char *psz_work = strdup( psz_sub_file );
2243
2244     /* Removing extension, but leaving the dot */
2245     psz_tmp = strrchr( psz_work, '.' );
2246     if( psz_tmp )
2247     {
2248         psz_tmp[0] = '\0';
2249         psz_language_begin = strrchr( psz_work, '.' );
2250         if( psz_language_begin )
2251             psz_ret = strdup(++psz_language_begin);
2252         psz_tmp[0] = '.';
2253     }
2254
2255     free( psz_work );
2256     return psz_ret;
2257 }