modules/demux/flac.c

   1 /*****************************************************************************
   2  * flac.c : FLAC demux module for vlc
   3  *****************************************************************************
   4  * Copyright (C) 2001-2008 VLC authors and VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Gildas Bazin <gbazin@netcourrier.com>
   8  *          Laurent Aimar <fenrir@via.ecp.fr>
   9  *
  10  * This program is free software; you can redistribute it and/or modify it
  11  * under the terms of the GNU Lesser General Public License as published by
  12  * the Free Software Foundation; either version 2.1 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  18  * GNU Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public License
  21  * along with this program; if not, write to the Free Software Foundation,
  22  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24
  25 /*****************************************************************************
  26  * Preamble
  27  *****************************************************************************/
  28 #ifdef HAVE_CONFIG_H
  29 # include "config.h"
  30 #endif
  31
  32 #include <vlc_common.h>
  33 #include <vlc_plugin.h>
  34 #include <vlc_demux.h>
  35 #include <vlc_meta.h>                 /* vlc_meta_* */
  36 #include <vlc_input.h>                /* vlc_input_attachment, vlc_seekpoint */
  37 #include <vlc_codec.h>                /* decoder_t */
  38 #include <vlc_charset.h>              /* EnsureUTF8 */
  39
  40 #include <assert.h>
  41 #include "xiph_metadata.h"            /* vorbis comments */
  42 #include "../packetizer/flac.h"
  43
  44 /*****************************************************************************
  45  * Module descriptor
  46  *****************************************************************************/
  47 static int  Open  ( vlc_object_t * );
  48 static void Close ( vlc_object_t * );
  49
  50 vlc_module_begin ()
  51     set_description( N_("FLAC demuxer") )
  52     set_capability( "demux", 155 )
  53     set_category( CAT_INPUT )
  54     set_subcategory( SUBCAT_INPUT_DEMUX )
  55     set_callbacks( Open, Close )
  56     add_shortcut( "flac" )
  57 vlc_module_end ()
  58
  59 /*****************************************************************************
  60  * Local prototypes
  61  *****************************************************************************/
  62 static int Demux  ( demux_t * );
  63 static int Control( demux_t *, int, va_list );
  64
  65 static int  ParseHeaders( demux_t *, es_format_t * );
  66
  67 typedef struct
  68 {
  69     vlc_tick_t  i_time_offset;
  70     uint64_t i_byte_offset;
  71 } flac_seekpoint_t;
  72
  73 typedef struct
  74 {
  75     bool  b_start;
  76     int   i_next_block_flags;
  77     es_out_id_t *p_es;
  78     block_t *p_current_block;
  79
  80     /* Packetizer */
  81     decoder_t *p_packetizer;
  82
  83     vlc_meta_t *p_meta;
  84
  85     vlc_tick_t i_pts;
  86     struct flac_stream_info stream_info;
  87     bool b_stream_info;
  88
  89     int64_t i_length; /* Length from stream info */
  90     uint64_t i_data_pos;
  91
  92     /* */
  93     int         i_seekpoint;
  94     flac_seekpoint_t **seekpoint;
  95
  96     /* title/chapters seekpoints */
  97     int           i_title_seekpoints;
  98     seekpoint_t **pp_title_seekpoints;
  99
 100     /* */
 101     int                i_attachments;
 102     input_attachment_t **attachments;
 103     int                i_cover_idx;
 104     int                i_cover_score;
 105 } demux_sys_t;
 106
 107 #define FLAC_PACKET_SIZE 16384
 108 #define FLAC_MAX_PREROLL      VLC_TICK_FROM_SEC(4)
 109 #define FLAC_MAX_SLOW_PREROLL VLC_TICK_FROM_SEC(45)
 110
 111 /*****************************************************************************
 112  * Open: initializes ES structures
 113  *****************************************************************************/
 114 static int Open( vlc_object_t * p_this )
 115 {
 116     demux_t     *p_demux = (demux_t*)p_this;
 117     demux_sys_t *p_sys;
 118     const uint8_t *p_peek;
 119     es_format_t fmt;
 120
 121     /* Have a peep at the show. */
 122     if( vlc_stream_Peek( p_demux->s, &p_peek, 4 ) < 4 ) return VLC_EGENERIC;
 123
 124     if( p_peek[0]!='f' || p_peek[1]!='L' || p_peek[2]!='a' || p_peek[3]!='C' )
 125     {
 126         if( !p_demux->obj.force
 127          && !demux_IsContentType( p_demux, "audio/flac" ) )
 128             return VLC_EGENERIC;
 129
 130         /* User forced */
 131         msg_Err( p_demux, "this doesn't look like a flac stream, "
 132                  "continuing anyway" );
 133     }
 134
 135     p_sys = malloc( sizeof( demux_sys_t ) );
 136     if( unlikely(p_sys == NULL) )
 137         return VLC_ENOMEM;
 138
 139     p_demux->pf_demux   = Demux;
 140     p_demux->pf_control = Control;
 141     p_demux->p_sys      = p_sys;
 142     p_sys->b_start = true;
 143     p_sys->i_next_block_flags = 0;
 144     p_sys->p_packetizer = NULL;
 145     p_sys->p_meta = NULL;
 146     p_sys->i_length = 0;
 147     p_sys->i_pts = VLC_TICK_INVALID;
 148     p_sys->b_stream_info = false;
 149     p_sys->p_es = NULL;
 150     p_sys->p_current_block = NULL;
 151     TAB_INIT( p_sys->i_seekpoint, p_sys->seekpoint );
 152     TAB_INIT( p_sys->i_attachments, p_sys->attachments);
 153     TAB_INIT( p_sys->i_title_seekpoints, p_sys->pp_title_seekpoints );
 154     p_sys->i_cover_idx = 0;
 155     p_sys->i_cover_score = 0;
 156
 157     es_format_Init( &fmt, AUDIO_ES, VLC_CODEC_FLAC );
 158
 159     /* We need to read and store the STREAMINFO metadata into fmt extra */
 160     if( ParseHeaders( p_demux, &fmt ) )
 161         goto error;
 162
 163     /* Load the FLAC packetizer */
 164     p_sys->p_packetizer = demux_PacketizerNew( p_demux, &fmt, "flac" );
 165     if( !p_sys->p_packetizer )
 166         goto error;
 167
 168     if( p_sys->i_cover_idx < p_sys->i_attachments )
 169     {
 170         char psz_url[128];
 171         if( !p_sys->p_meta )
 172             p_sys->p_meta = vlc_meta_New();
 173         snprintf( psz_url, sizeof(psz_url), "attachment://%s",
 174                   p_sys->attachments[p_sys->i_cover_idx]->psz_name );
 175         vlc_meta_Set( p_sys->p_meta, vlc_meta_ArtworkURL, psz_url );
 176     }
 177
 178     p_sys->p_es = es_out_Add( p_demux->out, &p_sys->p_packetizer->fmt_in );
 179     if( !p_sys->p_es )
 180         goto error;
 181
 182     return VLC_SUCCESS;
 183 error:
 184     Close( p_this );
 185     return VLC_EGENERIC;
 186 }
 187
 188 /*****************************************************************************
 189  * Close: frees unused data
 190  *****************************************************************************/
 191 static void Close( vlc_object_t * p_this )
 192 {
 193     demux_t     *p_demux = (demux_t*)p_this;
 194     demux_sys_t *p_sys = p_demux->p_sys;
 195
 196     if( p_sys->p_current_block )
 197         block_Release( p_sys->p_current_block );
 198
 199     for( int i = 0; i < p_sys->i_seekpoint; i++ )
 200         free(p_sys->seekpoint[i]);
 201     TAB_CLEAN( p_sys->i_seekpoint, p_sys->seekpoint );
 202
 203     for( int i = 0; i < p_sys->i_attachments; i++ )
 204         vlc_input_attachment_Delete( p_sys->attachments[i] );
 205     TAB_CLEAN( p_sys->i_attachments, p_sys->attachments);
 206
 207     for( int i = 0; i < p_sys->i_title_seekpoints; i++ )
 208         vlc_seekpoint_Delete( p_sys->pp_title_seekpoints[i] );
 209     TAB_CLEAN( p_sys->i_title_seekpoints, p_sys->pp_title_seekpoints );
 210
 211     /* Delete the decoder */
 212     if( p_sys->p_packetizer )
 213         demux_PacketizerDestroy( p_sys->p_packetizer );
 214
 215     if( p_sys->p_meta )
 216         vlc_meta_Delete( p_sys->p_meta );
 217     free( p_sys );
 218 }
 219
 220 static block_t *GetPacketizedBlock( decoder_t *p_packetizer,
 221                                     const struct flac_stream_info *streaminfo,
 222                                     block_t **pp_current_block )
 223 {
 224     block_t *p_block = p_packetizer->pf_packetize( p_packetizer, pp_current_block );
 225     if( p_block )
 226     {
 227         if( p_block->i_buffer >= FLAC_HEADER_SIZE_MAX )
 228         {
 229             struct flac_header_info headerinfo;
 230             int i_ret = FLAC_ParseSyncInfo( p_block->p_buffer, streaminfo, NULL, &headerinfo );
 231             assert( i_ret != 0 ); /* Same as packetizer */
 232             /* Use Frame PTS, not the interpolated one */
 233             p_block->i_dts = p_block->i_pts = headerinfo.i_pts;
 234         }
 235     }
 236     return p_block;
 237 }
 238
 239 static void FlushPacketizer( decoder_t *p_packetizer )
 240 {
 241     if( p_packetizer->pf_flush )
 242         p_packetizer->pf_flush( p_packetizer );
 243     else
 244     {
 245         block_t *p_block_out;
 246         while( (p_block_out = p_packetizer->pf_packetize( p_packetizer, NULL )) )
 247             block_Release( p_block_out );
 248     }
 249 }
 250
 251 static void Reset( demux_sys_t *p_sys )
 252 {
 253     p_sys->i_pts = VLC_TICK_INVALID;
 254
 255     FlushPacketizer( p_sys->p_packetizer );
 256     if( p_sys->p_current_block )
 257     {
 258         block_Release( p_sys->p_current_block );
 259         p_sys->p_current_block = NULL;
 260     }
 261 }
 262
 263 static int RefineSeek( demux_t *p_demux, vlc_tick_t i_time, double i_bytemicrorate,
 264                        uint64_t i_lowpos, uint64_t i_highpos )
 265 {
 266     demux_sys_t *p_sys = p_demux->p_sys;
 267     bool b_found = false;
 268     block_t *p_block_out;
 269     block_t *p_block_in;
 270
 271     unsigned i_frame_size = FLAC_FRAME_SIZE_MIN;
 272
 273     bool b_canfastseek = false;
 274     (int) vlc_stream_Control( p_demux->s, STREAM_CAN_FASTSEEK, &b_canfastseek );
 275
 276     uint64_t i_start_pos = vlc_stream_Tell( p_demux->s );
 277
 278     while( !b_found )
 279     {
 280         FlushPacketizer( p_sys->p_packetizer );
 281
 282         p_block_out = NULL;
 283         p_block_in = NULL;
 284
 285         while( !p_block_out )
 286         {
 287             if( !p_block_in )
 288             {
 289                 if( !(p_block_in = vlc_stream_Block( p_demux->s, i_frame_size )) )
 290                     break;
 291             }
 292
 293             p_block_out = GetPacketizedBlock( p_sys->p_packetizer,
 294                                               p_sys->b_stream_info ? &p_sys->stream_info : NULL,
 295                                              &p_block_in );
 296         }
 297
 298         if( !p_block_out )
 299         {
 300             if( p_block_in )
 301                 block_Release( p_block_in );
 302             break;
 303         }
 304
 305         if( p_block_out->i_buffer > i_frame_size )
 306             i_frame_size = p_block_out->i_buffer;
 307
 308         /* If we are further than wanted block */
 309         if( p_block_out->i_dts >= i_time )
 310         {
 311             vlc_tick_t i_diff = p_block_out->i_dts - i_time;
 312             /* Not in acceptable approximation range */
 313             if( i_diff > VLC_TICK_FROM_MS(100) && i_diff / i_bytemicrorate > i_frame_size )
 314             {
 315                 i_highpos = i_start_pos;
 316                 i_start_pos -= ( i_diff / i_bytemicrorate );
 317                 i_start_pos = __MAX(i_start_pos, i_lowpos + i_frame_size);
 318             }
 319             else b_found = true;
 320         }
 321         else if( p_block_out->i_dts < i_time )
 322         {
 323             vlc_tick_t i_diff = i_time - p_block_out->i_dts;
 324             /* Not in acceptable NEXT_TIME demux range */
 325             if( i_diff >= ((b_canfastseek) ? FLAC_MAX_PREROLL : FLAC_MAX_SLOW_PREROLL) &&
 326                 i_diff / i_bytemicrorate > i_frame_size )
 327             {
 328                 i_lowpos = i_start_pos;
 329                 i_start_pos += ( i_diff / i_bytemicrorate );
 330                 i_start_pos = __MIN(i_start_pos, i_highpos - i_frame_size);
 331             }
 332             else b_found = true;
 333         }
 334
 335         if( p_block_out )
 336             block_Release( p_block_out );
 337         if( p_block_in )
 338             block_Release( p_block_in );
 339
 340         if( !b_found )
 341         {
 342             if( i_highpos < i_lowpos || i_highpos - i_lowpos < i_frame_size )
 343                 break;
 344
 345             if( VLC_SUCCESS != vlc_stream_Seek( p_demux->s, i_start_pos ) )
 346                 break;
 347         }
 348     }
 349
 350     return b_found ? VLC_SUCCESS : VLC_EGENERIC;
 351 }
 352
 353 /*****************************************************************************
 354  * Demux: reads and demuxes data packets
 355  *****************************************************************************
 356  * Returns -1 in case of error, 0 in case of EOF, 1 otherwise
 357  *****************************************************************************/
 358 static int Demux( demux_t *p_demux )
 359 {
 360     demux_sys_t *p_sys = p_demux->p_sys;
 361     block_t *p_block_out;
 362
 363     bool b_eof = false;
 364     if( p_sys->p_current_block == NULL )
 365     {
 366         p_sys->p_current_block = vlc_stream_Block( p_demux->s, FLAC_PACKET_SIZE );
 367         b_eof = (p_sys->p_current_block == NULL);
 368     }
 369
 370     if ( p_sys->p_current_block )
 371     {
 372         p_sys->p_current_block->i_flags = p_sys->i_next_block_flags;
 373         p_sys->i_next_block_flags = 0;
 374         p_sys->p_current_block->i_pts =
 375         p_sys->p_current_block->i_dts = p_sys->b_start ? VLC_TICK_0 : VLC_TICK_INVALID;
 376     }
 377
 378     while( (p_block_out = GetPacketizedBlock( p_sys->p_packetizer,
 379                             p_sys->b_stream_info ? &p_sys->stream_info : NULL,
 380                             p_sys->p_current_block ? &p_sys->p_current_block : NULL ) ) )
 381     {
 382         /* Only clear on output when packet is accepted as sync #17111 */
 383         p_sys->b_start = false;
 384         while( p_block_out )
 385         {
 386             block_t *p_next = p_block_out->p_next;
 387
 388             p_block_out->p_next = NULL;
 389
 390             /* set PCR */
 391             if( unlikely(p_sys->i_pts == VLC_TICK_INVALID) )
 392                 es_out_SetPCR( p_demux->out, __MAX(p_block_out->i_dts - 1, VLC_TICK_0) );
 393
 394             p_sys->i_pts = p_block_out->i_dts;
 395
 396             es_out_Send( p_demux->out, p_sys->p_es, p_block_out );
 397
 398             es_out_SetPCR( p_demux->out, p_sys->i_pts );
 399
 400             p_block_out = p_next;
 401         }
 402         break;
 403     }
 404
 405     return b_eof ? VLC_DEMUXER_EOF : VLC_DEMUXER_SUCCESS;
 406 }
 407
 408 /*****************************************************************************
 409  * Control:
 410  *****************************************************************************/
 411 static int64_t ControlGetLength( demux_t *p_demux )
 412 {
 413     demux_sys_t *p_sys = p_demux->p_sys;
 414     const uint64_t i_size = stream_Size(p_demux->s) - p_sys->i_data_pos;
 415     int64_t i_length = p_sys->i_length;
 416     int i;
 417
 418     /* Try to fix length using seekpoint and current size for truncated file */
 419     for( i = p_sys->i_seekpoint-1; i >= 0; i-- )
 420     {
 421         flac_seekpoint_t *s = p_sys->seekpoint[i];
 422         if( s->i_byte_offset <= i_size )
 423         {
 424             if( i+1 < p_sys->i_seekpoint )
 425             {
 426                 /* Broken file */
 427                 flac_seekpoint_t *n = p_sys->seekpoint[i+1];
 428                 assert( n->i_byte_offset != s->i_byte_offset); /* Should be ensured by ParseSeekTable */
 429                 i_length = s->i_time_offset + (n->i_time_offset-s->i_time_offset) * (i_size-s->i_byte_offset) / (n->i_byte_offset-s->i_byte_offset);
 430             }
 431             break;
 432         }
 433     }
 434     return i_length;
 435 }
 436
 437 static int64_t ControlGetTime( demux_t *p_demux )
 438 {
 439     demux_sys_t *p_sys = p_demux->p_sys;
 440     return p_sys->i_pts;
 441 }
 442
 443 static int ControlSetTime( demux_t *p_demux, int64_t i_time )
 444 {
 445     demux_sys_t *p_sys = p_demux->p_sys;
 446     bool b_seekable;
 447     int i;
 448
 449     /* */
 450     vlc_stream_Control( p_demux->s, STREAM_CAN_SEEK, &b_seekable );
 451     if( !b_seekable )
 452         return VLC_EGENERIC;
 453
 454     const vlc_tick_t i_length = ControlGetLength( p_demux );
 455     if( i_length <= 0 )
 456         return VLC_EGENERIC;
 457
 458     const uint64_t i_stream_size = stream_Size( p_demux->s );
 459     if( i_stream_size <= p_sys->i_data_pos )
 460         return VLC_EGENERIC;
 461
 462     const double i_bytemicrorate = (double) i_length / (i_stream_size - p_sys->i_data_pos);
 463     if( i_bytemicrorate == 0 )
 464         return VLC_EGENERIC;
 465
 466     uint64_t i_lower = p_sys->i_data_pos;
 467     uint64_t i_upper = i_stream_size;
 468     uint64_t i_start_pos;
 469
 470     assert( p_sys->i_seekpoint > 0 );   /* ReadMeta ensure at least (0,0) */
 471     if( p_sys->i_seekpoint > 1 )
 472     {
 473         /* lookup base offset */
 474         for( i = p_sys->i_seekpoint-1; i >= 0; i-- )
 475         {
 476             if( p_sys->seekpoint[i]->i_time_offset <= i_time )
 477                 break;
 478         }
 479
 480         i_lower = p_sys->seekpoint[0]->i_byte_offset + p_sys->i_data_pos;
 481         if( i+1 < p_sys->i_seekpoint )
 482             i_upper = p_sys->seekpoint[i+1]->i_byte_offset + p_sys->i_data_pos;
 483
 484         i_start_pos = i_lower;
 485     }
 486     else
 487     {
 488         i_start_pos = i_time / i_bytemicrorate;
 489     }
 490
 491     if( VLC_SUCCESS != vlc_stream_Seek( p_demux->s, i_start_pos ) )
 492         return VLC_EGENERIC;
 493
 494     int i_ret = RefineSeek( p_demux, i_time, i_bytemicrorate, i_lower, i_upper );
 495     if( i_ret == VLC_SUCCESS )
 496     {
 497         p_sys->i_next_block_flags |= BLOCK_FLAG_DISCONTINUITY;
 498         Reset( p_sys );
 499         es_out_Control( p_demux->out, ES_OUT_SET_NEXT_DISPLAY_TIME, i_time );
 500     }
 501
 502     return i_ret;
 503 }
 504
 505 static int Control( demux_t *p_demux, int i_query, va_list args )
 506 {
 507     demux_sys_t *p_sys = p_demux->p_sys;
 508
 509     if( i_query == DEMUX_GET_META )
 510     {
 511         vlc_meta_t *p_meta = va_arg( args, vlc_meta_t * );
 512         if( p_sys->p_meta )
 513             vlc_meta_Merge( p_meta, p_sys->p_meta );
 514         return VLC_SUCCESS;
 515     }
 516     else if( i_query == DEMUX_HAS_UNSUPPORTED_META )
 517     {
 518         bool *pb_bool = va_arg( args, bool* );
 519         *pb_bool = true;
 520         return VLC_SUCCESS;
 521     }
 522     else if( i_query == DEMUX_GET_LENGTH )
 523     {
 524         int64_t *pi64 = va_arg( args, int64_t * );
 525         *pi64 = ControlGetLength( p_demux );
 526         return VLC_SUCCESS;
 527     }
 528     else if( i_query == DEMUX_SET_TIME )
 529     {
 530         int64_t i_time = va_arg( args, int64_t );
 531         return ControlSetTime( p_demux, i_time );
 532     }
 533     else if( i_query == DEMUX_SET_POSITION )
 534     {
 535         const double f = va_arg( args, double );
 536         int64_t i_length = ControlGetLength( p_demux );
 537         int i_ret;
 538         if( i_length > 0 )
 539         {
 540             i_ret = ControlSetTime( p_demux, i_length * f );
 541             if( i_ret == VLC_SUCCESS )
 542                 return i_ret;
 543         }
 544         /* just byte pos seek */
 545         i_ret = vlc_stream_Seek( p_demux->s, (int64_t) (f * stream_Size( p_demux->s )) );
 546         if( i_ret == VLC_SUCCESS )
 547         {
 548             p_sys->i_next_block_flags |= BLOCK_FLAG_DISCONTINUITY;
 549             Reset( p_sys );
 550         }
 551         return i_ret;
 552     }
 553     else if( i_query == DEMUX_GET_TIME )
 554     {
 555         int64_t *pi64 = va_arg( args, int64_t * );
 556         *pi64 = ControlGetTime( p_demux );
 557         return VLC_SUCCESS;
 558     }
 559     else if( i_query == DEMUX_GET_POSITION )
 560     {
 561         const int64_t i_length = ControlGetLength(p_demux);
 562         if( i_length > 0 )
 563         {
 564             double current = ControlGetTime(p_demux);
 565             if( current <= i_length )
 566             {
 567                 *(va_arg( args, double * )) = current / (double)i_length;
 568                 return VLC_SUCCESS;
 569             }
 570         }
 571         /* Else fallback on byte position */
 572     }
 573     else if( i_query == DEMUX_GET_ATTACHMENTS )
 574     {
 575         input_attachment_t ***ppp_attach =
 576             va_arg( args, input_attachment_t *** );
 577         int *pi_int = va_arg( args, int * );
 578
 579         if( p_sys->i_attachments <= 0 )
 580             return VLC_EGENERIC;
 581
 582         *ppp_attach = vlc_alloc( p_sys->i_attachments, sizeof(input_attachment_t*) );
 583         if( !*ppp_attach )
 584             return VLC_EGENERIC;
 585         *pi_int = p_sys->i_attachments;
 586         for( int i = 0; i < p_sys->i_attachments; i++ )
 587             (*ppp_attach)[i] = vlc_input_attachment_Duplicate( p_sys->attachments[i] );
 588         return VLC_SUCCESS;
 589     }
 590     else if( i_query == DEMUX_GET_TITLE_INFO )
 591     {
 592         input_title_t ***ppp_title = va_arg( args, input_title_t *** );
 593         int *pi_int = va_arg( args, int * );
 594         int *pi_title_offset = va_arg( args, int * );
 595         int *pi_seekpoint_offset = va_arg( args, int * );
 596
 597         if( !p_sys->i_title_seekpoints )
 598             return VLC_EGENERIC;
 599
 600         *pi_int = 1;
 601         *ppp_title = malloc( sizeof(input_title_t*) );
 602         if(!*ppp_title)
 603             return VLC_EGENERIC;
 604
 605         input_title_t *p_title = (*ppp_title)[0] = vlc_input_title_New();
 606         if(!p_title)
 607         {
 608             free(*ppp_title);
 609             return VLC_EGENERIC;
 610         }
 611
 612         p_title->seekpoint = vlc_alloc( p_sys->i_title_seekpoints, sizeof(seekpoint_t*) );
 613         if(!p_title->seekpoint)
 614         {
 615             vlc_input_title_Delete(p_title);
 616             free(*ppp_title);
 617             return VLC_EGENERIC;
 618         }
 619
 620         p_title->i_seekpoint = p_sys->i_title_seekpoints;
 621         for( int i = 0; i < p_title->i_seekpoint; i++ )
 622             p_title->seekpoint[i] = vlc_seekpoint_Duplicate( p_sys->pp_title_seekpoints[i] );
 623
 624         *pi_title_offset = 0;
 625         *pi_seekpoint_offset = 0;
 626
 627         return VLC_SUCCESS;
 628     }
 629     else if( i_query == DEMUX_SET_TITLE )
 630     {
 631         const int i_title = va_arg( args, int );
 632         if( i_title != 0 )
 633             return VLC_EGENERIC;
 634         return VLC_SUCCESS;
 635     }
 636     else if( i_query == DEMUX_SET_SEEKPOINT )
 637     {
 638         const int i_seekpoint = va_arg( args, int );
 639         if( !p_sys->i_title_seekpoints || i_seekpoint >= p_sys->i_title_seekpoints )
 640             return VLC_EGENERIC;
 641         return ControlSetTime( p_demux, p_sys->pp_title_seekpoints[i_seekpoint]->i_time_offset );
 642     }
 643
 644     return demux_vaControlHelper( p_demux->s, p_sys->i_data_pos, -1,
 645                                    8*0, 1, i_query, args );
 646 }
 647
 648 enum
 649 {
 650     META_STREAMINFO = 0,
 651     META_SEEKTABLE = 3,
 652     META_COMMENT = 4,
 653     META_PICTURE = 6,
 654 };
 655
 656 static inline int Get24bBE( const uint8_t *p )
 657 {
 658     return (p[0] << 16)|(p[1] << 8)|(p[2]);
 659 }
 660
 661 static void ParseSeekTable( demux_t *p_demux, const uint8_t *p_data, size_t i_data,
 662                             unsigned i_sample_rate );
 663 static void ParseComment( demux_t *, const uint8_t *p_data, size_t i_data );
 664 static void ParsePicture( demux_t *, const uint8_t *p_data, size_t i_data );
 665
 666 static int  ParseHeaders( demux_t *p_demux, es_format_t *p_fmt )
 667 {
 668     demux_sys_t *p_sys = p_demux->p_sys;
 669     ssize_t i_peek;
 670     const uint8_t *p_peek;
 671     bool b_last;
 672
 673     /* Be sure we have seekpoint 0 */
 674     flac_seekpoint_t *s = xmalloc( sizeof (*s) );
 675     s->i_time_offset = 0;
 676     s->i_byte_offset = 0;
 677     TAB_APPEND( p_sys->i_seekpoint, p_sys->seekpoint, s );
 678
 679     uint8_t header[4];
 680     if( vlc_stream_Read( p_demux->s, header, 4) < 4)
 681         return VLC_EGENERIC;
 682
 683     if (memcmp(header, "fLaC", 4))
 684         return VLC_EGENERIC;
 685
 686     b_last = 0;
 687     while( !b_last )
 688     {
 689         int i_len;
 690         int i_type;
 691
 692         i_peek = vlc_stream_Peek( p_demux->s, &p_peek, 4 );
 693         if( i_peek < 4 )
 694             break;
 695         b_last = p_peek[0]&0x80;
 696         i_type = p_peek[0]&0x7f;
 697         i_len  = Get24bBE( &p_peek[1] );
 698
 699         if( i_type == META_STREAMINFO && p_fmt->p_extra == NULL )
 700         {
 701             if( i_len != FLAC_STREAMINFO_SIZE ) {
 702                 msg_Err( p_demux, "invalid size %d for a STREAMINFO metadata block", i_len );
 703                 return VLC_EGENERIC;
 704             }
 705
 706             p_fmt->p_extra = malloc( FLAC_STREAMINFO_SIZE );
 707             if( p_fmt->p_extra == NULL )
 708                 return VLC_EGENERIC;
 709
 710             if( vlc_stream_Read( p_demux->s, NULL, 4) < 4)
 711             {
 712                 FREENULL( p_fmt->p_extra );
 713                 return VLC_EGENERIC;
 714             }
 715             if( vlc_stream_Read( p_demux->s, p_fmt->p_extra,
 716                                  FLAC_STREAMINFO_SIZE ) != FLAC_STREAMINFO_SIZE )
 717             {
 718                 msg_Err( p_demux, "failed to read STREAMINFO metadata block" );
 719                 FREENULL( p_fmt->p_extra );
 720                 return VLC_EGENERIC;
 721             }
 722             p_fmt->i_extra = FLAC_STREAMINFO_SIZE;
 723
 724             /* */
 725             p_sys->b_stream_info = true;
 726             FLAC_ParseStreamInfo( (uint8_t *) p_fmt->p_extra, &p_sys->stream_info );
 727
 728             p_fmt->audio.i_rate = p_sys->stream_info.sample_rate;
 729             p_fmt->audio.i_channels = p_sys->stream_info.channels;
 730             p_fmt->audio.i_bitspersample = p_sys->stream_info.bits_per_sample;
 731             if( p_sys->stream_info.sample_rate > 0 )
 732                 p_sys->i_length = p_sys->stream_info.total_samples * CLOCK_FREQ
 733                                 / p_sys->stream_info.sample_rate;
 734
 735             continue;
 736         }
 737         else if( i_type == META_SEEKTABLE )
 738         {
 739             i_peek = vlc_stream_Peek( p_demux->s, &p_peek, 4+i_len );
 740             if( i_peek == 4+i_len )
 741                 ParseSeekTable( p_demux, p_peek, i_peek, p_fmt->audio.i_rate );
 742         }
 743         else if( i_type == META_COMMENT )
 744         {
 745             i_peek = vlc_stream_Peek( p_demux->s, &p_peek, 4+i_len );
 746             if( i_peek == 4+i_len )
 747                 ParseComment( p_demux, p_peek, i_peek );
 748         }
 749         else if( i_type == META_PICTURE )
 750         {
 751             i_peek = vlc_stream_Peek( p_demux->s, &p_peek, 4+i_len );
 752             if( i_peek == 4+i_len )
 753                 ParsePicture( p_demux, p_peek, i_peek );
 754         }
 755
 756         if( vlc_stream_Read( p_demux->s, NULL, 4+i_len ) < 4+i_len )
 757             break;
 758     }
 759
 760     /* */
 761     p_sys->i_data_pos = vlc_stream_Tell( p_demux->s );
 762
 763     if ( p_fmt->p_extra == NULL )
 764         return VLC_EGENERIC;
 765
 766     return VLC_SUCCESS;
 767 }
 768
 769 static void ParseSeekTable( demux_t *p_demux, const uint8_t *p_data, size_t i_data,
 770                             unsigned i_sample_rate )
 771 {
 772     demux_sys_t *p_sys = p_demux->p_sys;
 773     flac_seekpoint_t *s;
 774     size_t i;
 775
 776     if( i_sample_rate == 0 )
 777         return;
 778
 779     /* */
 780     for( i = 0; i < (i_data-4)/18; i++ )
 781     {
 782         const int64_t i_sample = GetQWBE( &p_data[4+18*i+0] );
 783         int j;
 784
 785         if( i_sample < 0 || i_sample >= INT64_MAX ||
 786             GetQWBE( &p_data[4+18*i+8] ) < FLAC_STREAMINFO_SIZE )
 787             break;
 788
 789         s = xmalloc( sizeof (*s) );
 790         s->i_time_offset = i_sample * CLOCK_FREQ / i_sample_rate;
 791         s->i_byte_offset = GetQWBE( &p_data[4+18*i+8] );
 792
 793         /* Check for duplicate entry */
 794         for( j = 0; j < p_sys->i_seekpoint; j++ )
 795         {
 796             if( p_sys->seekpoint[j]->i_time_offset == s->i_time_offset ||
 797                 p_sys->seekpoint[j]->i_byte_offset == s->i_byte_offset )
 798             {
 799                 free( s );
 800                 s = NULL;
 801                 break;
 802             }
 803         }
 804         if( s )
 805         {
 806             TAB_APPEND( p_sys->i_seekpoint, p_sys->seekpoint, s );
 807         }
 808     }
 809     /* TODO sort it by size and remove wrong seek entry (time not increasing) */
 810 }
 811
 812 static void ParseComment( demux_t *p_demux, const uint8_t *p_data, size_t i_data )
 813 {
 814     demux_sys_t *p_sys = p_demux->p_sys;
 815
 816     if( i_data < 4 )
 817         return;
 818
 819     vorbis_ParseComment( NULL, &p_sys->p_meta, &p_data[4], i_data - 4,
 820         &p_sys->i_attachments, &p_sys->attachments,
 821         &p_sys->i_cover_score, &p_sys->i_cover_idx,
 822         &p_sys->i_title_seekpoints, &p_sys->pp_title_seekpoints, NULL, NULL );
 823 }
 824
 825 static void ParsePicture( demux_t *p_demux, const uint8_t *p_data, size_t i_data )
 826 {
 827     demux_sys_t *p_sys = p_demux->p_sys;
 828
 829     i_data -= 4; p_data += 4;
 830
 831     input_attachment_t *p_attachment = ParseFlacPicture( p_data, i_data,
 832         p_sys->i_attachments, &p_sys->i_cover_score, &p_sys->i_cover_idx );
 833     if( p_attachment == NULL )
 834         return;
 835
 836     TAB_APPEND( p_sys->i_attachments, p_sys->attachments, p_attachment );
 837 }
 838