nuclear@0: /******************************************************************** nuclear@0: * * nuclear@0: * THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE. * nuclear@0: * USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS * nuclear@0: * GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE * nuclear@0: * IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. * nuclear@0: * * nuclear@0: * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2009 * nuclear@0: * by the Xiph.Org Foundation http://www.xiph.org/ * nuclear@0: * * nuclear@0: ******************************************************************** nuclear@0: nuclear@0: function: stdio-based convenience library for opening/seeking/decoding nuclear@0: last mod: $Id: vorbisfile.c 17573 2010-10-27 14:53:59Z xiphmont $ nuclear@0: nuclear@0: ********************************************************************/ nuclear@0: nuclear@0: #include nuclear@0: #include nuclear@0: #include nuclear@0: #include nuclear@0: #include nuclear@0: nuclear@0: #include "vorbis/codec.h" nuclear@0: nuclear@0: /* we don't need or want the static callback symbols here */ nuclear@0: #define OV_EXCLUDE_STATIC_CALLBACKS nuclear@0: #include "vorbis/vorbisfile.h" nuclear@0: nuclear@0: #include "os.h" nuclear@0: #include "misc.h" nuclear@0: nuclear@0: /* A 'chained bitstream' is a Vorbis bitstream that contains more than nuclear@0: one logical bitstream arranged end to end (the only form of Ogg nuclear@0: multiplexing allowed in a Vorbis bitstream; grouping [parallel nuclear@0: multiplexing] is not allowed in Vorbis) */ nuclear@0: nuclear@0: /* A Vorbis file can be played beginning to end (streamed) without nuclear@0: worrying ahead of time about chaining (see decoder_example.c). If nuclear@0: we have the whole file, however, and want random access nuclear@0: (seeking/scrubbing) or desire to know the total length/time of a nuclear@0: file, we need to account for the possibility of chaining. */ nuclear@0: nuclear@0: /* We can handle things a number of ways; we can determine the entire nuclear@0: bitstream structure right off the bat, or find pieces on demand. nuclear@0: This example determines and caches structure for the entire nuclear@0: bitstream, but builds a virtual decoder on the fly when moving nuclear@0: between links in the chain. */ nuclear@0: nuclear@0: /* There are also different ways to implement seeking. Enough nuclear@0: information exists in an Ogg bitstream to seek to nuclear@0: sample-granularity positions in the output. Or, one can seek by nuclear@0: picking some portion of the stream roughly in the desired area if nuclear@0: we only want coarse navigation through the stream. */ nuclear@0: nuclear@0: /************************************************************************* nuclear@0: * Many, many internal helpers. The intention is not to be confusing; nuclear@0: * rampant duplication and monolithic function implementation would be nuclear@0: * harder to understand anyway. The high level functions are last. Begin nuclear@0: * grokking near the end of the file */ nuclear@0: nuclear@0: /* read a little more data from the file/pipe into the ogg_sync framer nuclear@0: */ nuclear@0: #define CHUNKSIZE 65536 /* greater-than-page-size granularity seeking */ nuclear@0: #define READSIZE 2048 /* a smaller read size is needed for low-rate streaming. */ nuclear@0: nuclear@0: static long _get_data(OggVorbis_File *vf){ nuclear@0: errno=0; nuclear@0: if(!(vf->callbacks.read_func))return(-1); nuclear@0: if(vf->datasource){ nuclear@0: char *buffer=ogg_sync_buffer(&vf->oy,READSIZE); nuclear@0: long bytes=(vf->callbacks.read_func)(buffer,1,READSIZE,vf->datasource); nuclear@0: if(bytes>0)ogg_sync_wrote(&vf->oy,bytes); nuclear@0: if(bytes==0 && errno)return(-1); nuclear@0: return(bytes); nuclear@0: }else nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: /* save a tiny smidge of verbosity to make the code more readable */ nuclear@0: static int _seek_helper(OggVorbis_File *vf,ogg_int64_t offset){ nuclear@0: if(vf->datasource){ nuclear@0: if(!(vf->callbacks.seek_func)|| nuclear@0: (vf->callbacks.seek_func)(vf->datasource, offset, SEEK_SET) == -1) nuclear@0: return OV_EREAD; nuclear@0: vf->offset=offset; nuclear@0: ogg_sync_reset(&vf->oy); nuclear@0: }else{ nuclear@0: /* shouldn't happen unless someone writes a broken callback */ nuclear@0: return OV_EFAULT; nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: /* The read/seek functions track absolute position within the stream */ nuclear@0: nuclear@0: /* from the head of the stream, get the next page. boundary specifies nuclear@0: if the function is allowed to fetch more data from the stream (and nuclear@0: how much) or only use internally buffered data. nuclear@0: nuclear@0: boundary: -1) unbounded search nuclear@0: 0) read no additional data; use cached only nuclear@0: n) search for a new page beginning for n bytes nuclear@0: nuclear@0: return: <0) did not find a page (OV_FALSE, OV_EOF, OV_EREAD) nuclear@0: n) found a page at absolute offset n */ nuclear@0: nuclear@0: static ogg_int64_t _get_next_page(OggVorbis_File *vf,ogg_page *og, nuclear@0: ogg_int64_t boundary){ nuclear@0: if(boundary>0)boundary+=vf->offset; nuclear@0: while(1){ nuclear@0: long more; nuclear@0: nuclear@0: if(boundary>0 && vf->offset>=boundary)return(OV_FALSE); nuclear@0: more=ogg_sync_pageseek(&vf->oy,og); nuclear@0: nuclear@0: if(more<0){ nuclear@0: /* skipped n bytes */ nuclear@0: vf->offset-=more; nuclear@0: }else{ nuclear@0: if(more==0){ nuclear@0: /* send more paramedics */ nuclear@0: if(!boundary)return(OV_FALSE); nuclear@0: { nuclear@0: long ret=_get_data(vf); nuclear@0: if(ret==0)return(OV_EOF); nuclear@0: if(ret<0)return(OV_EREAD); nuclear@0: } nuclear@0: }else{ nuclear@0: /* got a page. Return the offset at the page beginning, nuclear@0: advance the internal offset past the page end */ nuclear@0: ogg_int64_t ret=vf->offset; nuclear@0: vf->offset+=more; nuclear@0: return(ret); nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* find the latest page beginning before the current stream cursor nuclear@0: position. Much dirtier than the above as Ogg doesn't have any nuclear@0: backward search linkage. no 'readp' as it will certainly have to nuclear@0: read. */ nuclear@0: /* returns offset or OV_EREAD, OV_FAULT */ nuclear@0: static ogg_int64_t _get_prev_page(OggVorbis_File *vf,ogg_page *og){ nuclear@0: ogg_int64_t begin=vf->offset; nuclear@0: ogg_int64_t end=begin; nuclear@0: ogg_int64_t ret; nuclear@0: ogg_int64_t offset=-1; nuclear@0: nuclear@0: while(offset==-1){ nuclear@0: begin-=CHUNKSIZE; nuclear@0: if(begin<0) nuclear@0: begin=0; nuclear@0: nuclear@0: ret=_seek_helper(vf,begin); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: while(vf->offsetoffset); nuclear@0: if(ret==OV_EREAD)return(OV_EREAD); nuclear@0: if(ret<0){ nuclear@0: break; nuclear@0: }else{ nuclear@0: offset=ret; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* In a fully compliant, non-multiplexed stream, we'll still be nuclear@0: holding the last page. In multiplexed (or noncompliant streams), nuclear@0: we will probably have to re-read the last page we saw */ nuclear@0: if(og->header_len==0){ nuclear@0: ret=_seek_helper(vf,offset); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: ret=_get_next_page(vf,og,CHUNKSIZE); nuclear@0: if(ret<0) nuclear@0: /* this shouldn't be possible */ nuclear@0: return(OV_EFAULT); nuclear@0: } nuclear@0: nuclear@0: return(offset); nuclear@0: } nuclear@0: nuclear@0: static void _add_serialno(ogg_page *og,long **serialno_list, int *n){ nuclear@0: long s = ogg_page_serialno(og); nuclear@0: (*n)++; nuclear@0: nuclear@0: if(*serialno_list){ nuclear@0: *serialno_list = _ogg_realloc(*serialno_list, sizeof(**serialno_list)*(*n)); nuclear@0: }else{ nuclear@0: *serialno_list = _ogg_malloc(sizeof(**serialno_list)); nuclear@0: } nuclear@0: nuclear@0: (*serialno_list)[(*n)-1] = s; nuclear@0: } nuclear@0: nuclear@0: /* returns nonzero if found */ nuclear@0: static int _lookup_serialno(long s, long *serialno_list, int n){ nuclear@0: if(serialno_list){ nuclear@0: while(n--){ nuclear@0: if(*serialno_list == s) return 1; nuclear@0: serialno_list++; nuclear@0: } nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: static int _lookup_page_serialno(ogg_page *og, long *serialno_list, int n){ nuclear@0: long s = ogg_page_serialno(og); nuclear@0: return _lookup_serialno(s,serialno_list,n); nuclear@0: } nuclear@0: nuclear@0: /* performs the same search as _get_prev_page, but prefers pages of nuclear@0: the specified serial number. If a page of the specified serialno is nuclear@0: spotted during the seek-back-and-read-forward, it will return the nuclear@0: info of last page of the matching serial number instead of the very nuclear@0: last page. If no page of the specified serialno is seen, it will nuclear@0: return the info of last page and alter *serialno. */ nuclear@0: static ogg_int64_t _get_prev_page_serial(OggVorbis_File *vf, nuclear@0: long *serial_list, int serial_n, nuclear@0: int *serialno, ogg_int64_t *granpos){ nuclear@0: ogg_page og; nuclear@0: ogg_int64_t begin=vf->offset; nuclear@0: ogg_int64_t end=begin; nuclear@0: ogg_int64_t ret; nuclear@0: nuclear@0: ogg_int64_t prefoffset=-1; nuclear@0: ogg_int64_t offset=-1; nuclear@0: ogg_int64_t ret_serialno=-1; nuclear@0: ogg_int64_t ret_gran=-1; nuclear@0: nuclear@0: while(offset==-1){ nuclear@0: begin-=CHUNKSIZE; nuclear@0: if(begin<0) nuclear@0: begin=0; nuclear@0: nuclear@0: ret=_seek_helper(vf,begin); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: while(vf->offsetoffset); nuclear@0: if(ret==OV_EREAD)return(OV_EREAD); nuclear@0: if(ret<0){ nuclear@0: break; nuclear@0: }else{ nuclear@0: ret_serialno=ogg_page_serialno(&og); nuclear@0: ret_gran=ogg_page_granulepos(&og); nuclear@0: offset=ret; nuclear@0: nuclear@0: if(ret_serialno == *serialno){ nuclear@0: prefoffset=ret; nuclear@0: *granpos=ret_gran; nuclear@0: } nuclear@0: nuclear@0: if(!_lookup_serialno(ret_serialno,serial_list,serial_n)){ nuclear@0: /* we fell off the end of the link, which means we seeked nuclear@0: back too far and shouldn't have been looking in that link nuclear@0: to begin with. If we found the preferred serial number, nuclear@0: forget that we saw it. */ nuclear@0: prefoffset=-1; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* we're not interested in the page... just the serialno and granpos. */ nuclear@0: if(prefoffset>=0)return(prefoffset); nuclear@0: nuclear@0: *serialno = ret_serialno; nuclear@0: *granpos = ret_gran; nuclear@0: return(offset); nuclear@0: nuclear@0: } nuclear@0: nuclear@0: /* uses the local ogg_stream storage in vf; this is important for nuclear@0: non-streaming input sources */ nuclear@0: static int _fetch_headers(OggVorbis_File *vf,vorbis_info *vi,vorbis_comment *vc, nuclear@0: long **serialno_list, int *serialno_n, nuclear@0: ogg_page *og_ptr){ nuclear@0: ogg_page og; nuclear@0: ogg_packet op; nuclear@0: int i,ret; nuclear@0: int allbos=0; nuclear@0: nuclear@0: if(!og_ptr){ nuclear@0: ogg_int64_t llret=_get_next_page(vf,&og,CHUNKSIZE); nuclear@0: if(llret==OV_EREAD)return(OV_EREAD); nuclear@0: if(llret<0)return(OV_ENOTVORBIS); nuclear@0: og_ptr=&og; nuclear@0: } nuclear@0: nuclear@0: vorbis_info_init(vi); nuclear@0: vorbis_comment_init(vc); nuclear@0: vf->ready_state=OPENED; nuclear@0: nuclear@0: /* extract the serialnos of all BOS pages + the first set of vorbis nuclear@0: headers we see in the link */ nuclear@0: nuclear@0: while(ogg_page_bos(og_ptr)){ nuclear@0: if(serialno_list){ nuclear@0: if(_lookup_page_serialno(og_ptr,*serialno_list,*serialno_n)){ nuclear@0: /* a dupe serialnumber in an initial header packet set == invalid stream */ nuclear@0: if(*serialno_list)_ogg_free(*serialno_list); nuclear@0: *serialno_list=0; nuclear@0: *serialno_n=0; nuclear@0: ret=OV_EBADHEADER; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: nuclear@0: _add_serialno(og_ptr,serialno_list,serialno_n); nuclear@0: } nuclear@0: nuclear@0: if(vf->ready_stateos,ogg_page_serialno(og_ptr)); nuclear@0: ogg_stream_pagein(&vf->os,og_ptr); nuclear@0: nuclear@0: if(ogg_stream_packetout(&vf->os,&op) > 0 && nuclear@0: vorbis_synthesis_idheader(&op)){ nuclear@0: /* vorbis header; continue setup */ nuclear@0: vf->ready_state=STREAMSET; nuclear@0: if((ret=vorbis_synthesis_headerin(vi,vc,&op))){ nuclear@0: ret=OV_EBADHEADER; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* get next page */ nuclear@0: { nuclear@0: ogg_int64_t llret=_get_next_page(vf,og_ptr,CHUNKSIZE); nuclear@0: if(llret==OV_EREAD){ nuclear@0: ret=OV_EREAD; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: if(llret<0){ nuclear@0: ret=OV_ENOTVORBIS; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: nuclear@0: /* if this page also belongs to our vorbis stream, submit it and break */ nuclear@0: if(vf->ready_state==STREAMSET && nuclear@0: vf->os.serialno == ogg_page_serialno(og_ptr)){ nuclear@0: ogg_stream_pagein(&vf->os,og_ptr); nuclear@0: break; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(vf->ready_state!=STREAMSET){ nuclear@0: ret = OV_ENOTVORBIS; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: nuclear@0: while(1){ nuclear@0: nuclear@0: i=0; nuclear@0: while(i<2){ /* get a page loop */ nuclear@0: nuclear@0: while(i<2){ /* get a packet loop */ nuclear@0: nuclear@0: int result=ogg_stream_packetout(&vf->os,&op); nuclear@0: if(result==0)break; nuclear@0: if(result==-1){ nuclear@0: ret=OV_EBADHEADER; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: nuclear@0: if((ret=vorbis_synthesis_headerin(vi,vc,&op))) nuclear@0: goto bail_header; nuclear@0: nuclear@0: i++; nuclear@0: } nuclear@0: nuclear@0: while(i<2){ nuclear@0: if(_get_next_page(vf,og_ptr,CHUNKSIZE)<0){ nuclear@0: ret=OV_EBADHEADER; nuclear@0: goto bail_header; nuclear@0: } nuclear@0: nuclear@0: /* if this page belongs to the correct stream, go parse it */ nuclear@0: if(vf->os.serialno == ogg_page_serialno(og_ptr)){ nuclear@0: ogg_stream_pagein(&vf->os,og_ptr); nuclear@0: break; nuclear@0: } nuclear@0: nuclear@0: /* if we never see the final vorbis headers before the link nuclear@0: ends, abort */ nuclear@0: if(ogg_page_bos(og_ptr)){ nuclear@0: if(allbos){ nuclear@0: ret = OV_EBADHEADER; nuclear@0: goto bail_header; nuclear@0: }else nuclear@0: allbos=1; nuclear@0: } nuclear@0: nuclear@0: /* otherwise, keep looking */ nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: bail_header: nuclear@0: vorbis_info_clear(vi); nuclear@0: vorbis_comment_clear(vc); nuclear@0: vf->ready_state=OPENED; nuclear@0: nuclear@0: return ret; nuclear@0: } nuclear@0: nuclear@0: /* Starting from current cursor position, get initial PCM offset of nuclear@0: next page. Consumes the page in the process without decoding nuclear@0: audio, however this is only called during stream parsing upon nuclear@0: seekable open. */ nuclear@0: static ogg_int64_t _initial_pcmoffset(OggVorbis_File *vf, vorbis_info *vi){ nuclear@0: ogg_page og; nuclear@0: ogg_int64_t accumulated=0; nuclear@0: long lastblock=-1; nuclear@0: int result; nuclear@0: int serialno = vf->os.serialno; nuclear@0: nuclear@0: while(1){ nuclear@0: ogg_packet op; nuclear@0: if(_get_next_page(vf,&og,-1)<0) nuclear@0: break; /* should not be possible unless the file is truncated/mangled */ nuclear@0: nuclear@0: if(ogg_page_bos(&og)) break; nuclear@0: if(ogg_page_serialno(&og)!=serialno) continue; nuclear@0: nuclear@0: /* count blocksizes of all frames in the page */ nuclear@0: ogg_stream_pagein(&vf->os,&og); nuclear@0: while((result=ogg_stream_packetout(&vf->os,&op))){ nuclear@0: if(result>0){ /* ignore holes */ nuclear@0: long thisblock=vorbis_packet_blocksize(vi,&op); nuclear@0: if(lastblock!=-1) nuclear@0: accumulated+=(lastblock+thisblock)>>2; nuclear@0: lastblock=thisblock; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(ogg_page_granulepos(&og)!=-1){ nuclear@0: /* pcm offset of last packet on the first audio page */ nuclear@0: accumulated= ogg_page_granulepos(&og)-accumulated; nuclear@0: break; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* less than zero? Either a corrupt file or a stream with samples nuclear@0: trimmed off the beginning, a normal occurrence; in both cases set nuclear@0: the offset to zero */ nuclear@0: if(accumulated<0)accumulated=0; nuclear@0: nuclear@0: return accumulated; nuclear@0: } nuclear@0: nuclear@0: /* finds each bitstream link one at a time using a bisection search nuclear@0: (has to begin by knowing the offset of the lb's initial page). nuclear@0: Recurses for each link so it can alloc the link storage after nuclear@0: finding them all, then unroll and fill the cache at the same time */ nuclear@0: static int _bisect_forward_serialno(OggVorbis_File *vf, nuclear@0: ogg_int64_t begin, nuclear@0: ogg_int64_t searched, nuclear@0: ogg_int64_t end, nuclear@0: ogg_int64_t endgran, nuclear@0: int endserial, nuclear@0: long *currentno_list, nuclear@0: int currentnos, nuclear@0: long m){ nuclear@0: ogg_int64_t pcmoffset; nuclear@0: ogg_int64_t dataoffset=searched; nuclear@0: ogg_int64_t endsearched=end; nuclear@0: ogg_int64_t next=end; nuclear@0: ogg_int64_t searchgran=-1; nuclear@0: ogg_page og; nuclear@0: ogg_int64_t ret,last; nuclear@0: int serialno = vf->os.serialno; nuclear@0: nuclear@0: /* invariants: nuclear@0: we have the headers and serialnos for the link beginning at 'begin' nuclear@0: we have the offset and granpos of the last page in the file (potentially nuclear@0: not a page we care about) nuclear@0: */ nuclear@0: nuclear@0: /* Is the last page in our list of current serialnumbers? */ nuclear@0: if(_lookup_serialno(endserial,currentno_list,currentnos)){ nuclear@0: nuclear@0: /* last page is in the starting serialno list, so we've bisected nuclear@0: down to (or just started with) a single link. Now we need to nuclear@0: find the last vorbis page belonging to the first vorbis stream nuclear@0: for this link. */ nuclear@0: nuclear@0: while(endserial != serialno){ nuclear@0: endserial = serialno; nuclear@0: vf->offset=_get_prev_page_serial(vf,currentno_list,currentnos,&endserial,&endgran); nuclear@0: } nuclear@0: nuclear@0: vf->links=m+1; nuclear@0: if(vf->offsets)_ogg_free(vf->offsets); nuclear@0: if(vf->serialnos)_ogg_free(vf->serialnos); nuclear@0: if(vf->dataoffsets)_ogg_free(vf->dataoffsets); nuclear@0: nuclear@0: vf->offsets=_ogg_malloc((vf->links+1)*sizeof(*vf->offsets)); nuclear@0: vf->vi=_ogg_realloc(vf->vi,vf->links*sizeof(*vf->vi)); nuclear@0: vf->vc=_ogg_realloc(vf->vc,vf->links*sizeof(*vf->vc)); nuclear@0: vf->serialnos=_ogg_malloc(vf->links*sizeof(*vf->serialnos)); nuclear@0: vf->dataoffsets=_ogg_malloc(vf->links*sizeof(*vf->dataoffsets)); nuclear@0: vf->pcmlengths=_ogg_malloc(vf->links*2*sizeof(*vf->pcmlengths)); nuclear@0: nuclear@0: vf->offsets[m+1]=end; nuclear@0: vf->offsets[m]=begin; nuclear@0: vf->pcmlengths[m*2+1]=(endgran<0?0:endgran); nuclear@0: nuclear@0: }else{ nuclear@0: nuclear@0: long *next_serialno_list=NULL; nuclear@0: int next_serialnos=0; nuclear@0: vorbis_info vi; nuclear@0: vorbis_comment vc; nuclear@0: nuclear@0: /* the below guards against garbage seperating the last and nuclear@0: first pages of two links. */ nuclear@0: while(searchedoffset){ nuclear@0: ret=_seek_helper(vf,bisect); nuclear@0: if(ret)return(ret); nuclear@0: } nuclear@0: nuclear@0: last=_get_next_page(vf,&og,-1); nuclear@0: if(last==OV_EREAD)return(OV_EREAD); nuclear@0: if(last<0 || !_lookup_page_serialno(&og,currentno_list,currentnos)){ nuclear@0: endsearched=bisect; nuclear@0: if(last>=0)next=last; nuclear@0: }else{ nuclear@0: searched=vf->offset; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* Bisection point found */ nuclear@0: nuclear@0: /* for the time being, fetch end PCM offset the simple way */ nuclear@0: { nuclear@0: int testserial = serialno+1; nuclear@0: vf->offset = next; nuclear@0: while(testserial != serialno){ nuclear@0: testserial = serialno; nuclear@0: vf->offset=_get_prev_page_serial(vf,currentno_list,currentnos,&testserial,&searchgran); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(vf->offset!=next){ nuclear@0: ret=_seek_helper(vf,next); nuclear@0: if(ret)return(ret); nuclear@0: } nuclear@0: nuclear@0: ret=_fetch_headers(vf,&vi,&vc,&next_serialno_list,&next_serialnos,NULL); nuclear@0: if(ret)return(ret); nuclear@0: serialno = vf->os.serialno; nuclear@0: dataoffset = vf->offset; nuclear@0: nuclear@0: /* this will consume a page, however the next bistection always nuclear@0: starts with a raw seek */ nuclear@0: pcmoffset = _initial_pcmoffset(vf,&vi); nuclear@0: nuclear@0: ret=_bisect_forward_serialno(vf,next,vf->offset,end,endgran,endserial, nuclear@0: next_serialno_list,next_serialnos,m+1); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: if(next_serialno_list)_ogg_free(next_serialno_list); nuclear@0: nuclear@0: vf->offsets[m+1]=next; nuclear@0: vf->serialnos[m+1]=serialno; nuclear@0: vf->dataoffsets[m+1]=dataoffset; nuclear@0: nuclear@0: vf->vi[m+1]=vi; nuclear@0: vf->vc[m+1]=vc; nuclear@0: nuclear@0: vf->pcmlengths[m*2+1]=searchgran; nuclear@0: vf->pcmlengths[m*2+2]=pcmoffset; nuclear@0: vf->pcmlengths[m*2+3]-=pcmoffset; nuclear@0: if(vf->pcmlengths[m*2+3]<0)vf->pcmlengths[m*2+3]=0; nuclear@0: } nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: static int _make_decode_ready(OggVorbis_File *vf){ nuclear@0: if(vf->ready_state>STREAMSET)return 0; nuclear@0: if(vf->ready_stateseekable){ nuclear@0: if(vorbis_synthesis_init(&vf->vd,vf->vi+vf->current_link)) nuclear@0: return OV_EBADLINK; nuclear@0: }else{ nuclear@0: if(vorbis_synthesis_init(&vf->vd,vf->vi)) nuclear@0: return OV_EBADLINK; nuclear@0: } nuclear@0: vorbis_block_init(&vf->vd,&vf->vb); nuclear@0: vf->ready_state=INITSET; nuclear@0: vf->bittrack=0.f; nuclear@0: vf->samptrack=0.f; nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: static int _open_seekable2(OggVorbis_File *vf){ nuclear@0: ogg_int64_t dataoffset=vf->dataoffsets[0],end,endgran=-1; nuclear@0: int endserial=vf->os.serialno; nuclear@0: int serialno=vf->os.serialno; nuclear@0: nuclear@0: /* we're partially open and have a first link header state in nuclear@0: storage in vf */ nuclear@0: nuclear@0: /* fetch initial PCM offset */ nuclear@0: ogg_int64_t pcmoffset = _initial_pcmoffset(vf,vf->vi); nuclear@0: nuclear@0: /* we can seek, so set out learning all about this file */ nuclear@0: if(vf->callbacks.seek_func && vf->callbacks.tell_func){ nuclear@0: (vf->callbacks.seek_func)(vf->datasource,0,SEEK_END); nuclear@0: vf->offset=vf->end=(vf->callbacks.tell_func)(vf->datasource); nuclear@0: }else{ nuclear@0: vf->offset=vf->end=-1; nuclear@0: } nuclear@0: nuclear@0: /* If seek_func is implemented, tell_func must also be implemented */ nuclear@0: if(vf->end==-1) return(OV_EINVAL); nuclear@0: nuclear@0: /* Get the offset of the last page of the physical bitstream, or, if nuclear@0: we're lucky the last vorbis page of this link as most OggVorbis nuclear@0: files will contain a single logical bitstream */ nuclear@0: end=_get_prev_page_serial(vf,vf->serialnos+2,vf->serialnos[1],&endserial,&endgran); nuclear@0: if(end<0)return(end); nuclear@0: nuclear@0: /* now determine bitstream structure recursively */ nuclear@0: if(_bisect_forward_serialno(vf,0,dataoffset,vf->offset,endgran,endserial, nuclear@0: vf->serialnos+2,vf->serialnos[1],0)<0)return(OV_EREAD); nuclear@0: nuclear@0: vf->offsets[0]=0; nuclear@0: vf->serialnos[0]=serialno; nuclear@0: vf->dataoffsets[0]=dataoffset; nuclear@0: vf->pcmlengths[0]=pcmoffset; nuclear@0: vf->pcmlengths[1]-=pcmoffset; nuclear@0: if(vf->pcmlengths[1]<0)vf->pcmlengths[1]=0; nuclear@0: nuclear@0: return(ov_raw_seek(vf,dataoffset)); nuclear@0: } nuclear@0: nuclear@0: /* clear out the current logical bitstream decoder */ nuclear@0: static void _decode_clear(OggVorbis_File *vf){ nuclear@0: vorbis_dsp_clear(&vf->vd); nuclear@0: vorbis_block_clear(&vf->vb); nuclear@0: vf->ready_state=OPENED; nuclear@0: } nuclear@0: nuclear@0: /* fetch and process a packet. Handles the case where we're at a nuclear@0: bitstream boundary and dumps the decoding machine. If the decoding nuclear@0: machine is unloaded, it loads it. It also keeps pcm_offset up to nuclear@0: date (seek and read both use this. seek uses a special hack with nuclear@0: readp). nuclear@0: nuclear@0: return: <0) error, OV_HOLE (lost packet) or OV_EOF nuclear@0: 0) need more data (only if readp==0) nuclear@0: 1) got a packet nuclear@0: */ nuclear@0: nuclear@0: static int _fetch_and_process_packet(OggVorbis_File *vf, nuclear@0: ogg_packet *op_in, nuclear@0: int readp, nuclear@0: int spanp){ nuclear@0: ogg_page og; nuclear@0: nuclear@0: /* handle one packet. Try to fetch it from current stream state */ nuclear@0: /* extract packets from page */ nuclear@0: while(1){ nuclear@0: nuclear@0: if(vf->ready_state==STREAMSET){ nuclear@0: int ret=_make_decode_ready(vf); nuclear@0: if(ret<0)return ret; nuclear@0: } nuclear@0: nuclear@0: /* process a packet if we can. */ nuclear@0: nuclear@0: if(vf->ready_state==INITSET){ nuclear@0: int hs=vorbis_synthesis_halfrate_p(vf->vi); nuclear@0: nuclear@0: while(1) { nuclear@0: ogg_packet op; nuclear@0: ogg_packet *op_ptr=(op_in?op_in:&op); nuclear@0: int result=ogg_stream_packetout(&vf->os,op_ptr); nuclear@0: ogg_int64_t granulepos; nuclear@0: nuclear@0: op_in=NULL; nuclear@0: if(result==-1)return(OV_HOLE); /* hole in the data. */ nuclear@0: if(result>0){ nuclear@0: /* got a packet. process it */ nuclear@0: granulepos=op_ptr->granulepos; nuclear@0: if(!vorbis_synthesis(&vf->vb,op_ptr)){ /* lazy check for lazy nuclear@0: header handling. The nuclear@0: header packets aren't nuclear@0: audio, so if/when we nuclear@0: submit them, nuclear@0: vorbis_synthesis will nuclear@0: reject them */ nuclear@0: nuclear@0: /* suck in the synthesis data and track bitrate */ nuclear@0: { nuclear@0: int oldsamples=vorbis_synthesis_pcmout(&vf->vd,NULL); nuclear@0: /* for proper use of libvorbis within libvorbisfile, nuclear@0: oldsamples will always be zero. */ nuclear@0: if(oldsamples)return(OV_EFAULT); nuclear@0: nuclear@0: vorbis_synthesis_blockin(&vf->vd,&vf->vb); nuclear@0: vf->samptrack+=(vorbis_synthesis_pcmout(&vf->vd,NULL)<bittrack+=op_ptr->bytes*8; nuclear@0: } nuclear@0: nuclear@0: /* update the pcm offset. */ nuclear@0: if(granulepos!=-1 && !op_ptr->e_o_s){ nuclear@0: int link=(vf->seekable?vf->current_link:0); nuclear@0: int i,samples; nuclear@0: nuclear@0: /* this packet has a pcm_offset on it (the last packet nuclear@0: completed on a page carries the offset) After processing nuclear@0: (above), we know the pcm position of the *last* sample nuclear@0: ready to be returned. Find the offset of the *first* nuclear@0: nuclear@0: As an aside, this trick is inaccurate if we begin nuclear@0: reading anew right at the last page; the end-of-stream nuclear@0: granulepos declares the last frame in the stream, and the nuclear@0: last packet of the last page may be a partial frame. nuclear@0: So, we need a previous granulepos from an in-sequence page nuclear@0: to have a reference point. Thus the !op_ptr->e_o_s clause nuclear@0: above */ nuclear@0: nuclear@0: if(vf->seekable && link>0) nuclear@0: granulepos-=vf->pcmlengths[link*2]; nuclear@0: if(granulepos<0)granulepos=0; /* actually, this nuclear@0: shouldn't be possible nuclear@0: here unless the stream nuclear@0: is very broken */ nuclear@0: nuclear@0: samples=(vorbis_synthesis_pcmout(&vf->vd,NULL)<pcmlengths[i*2+1]; nuclear@0: vf->pcm_offset=granulepos; nuclear@0: } nuclear@0: return(1); nuclear@0: } nuclear@0: } nuclear@0: else nuclear@0: break; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(vf->ready_state>=OPENED){ nuclear@0: ogg_int64_t ret; nuclear@0: nuclear@0: while(1){ nuclear@0: /* the loop is not strictly necessary, but there's no sense in nuclear@0: doing the extra checks of the larger loop for the common nuclear@0: case in a multiplexed bistream where the page is simply nuclear@0: part of a different logical bitstream; keep reading until nuclear@0: we get one with the correct serialno */ nuclear@0: nuclear@0: if(!readp)return(0); nuclear@0: if((ret=_get_next_page(vf,&og,-1))<0){ nuclear@0: return(OV_EOF); /* eof. leave unitialized */ nuclear@0: } nuclear@0: nuclear@0: /* bitrate tracking; add the header's bytes here, the body bytes nuclear@0: are done by packet above */ nuclear@0: vf->bittrack+=og.header_len*8; nuclear@0: nuclear@0: if(vf->ready_state==INITSET){ nuclear@0: if(vf->current_serialno!=ogg_page_serialno(&og)){ nuclear@0: nuclear@0: /* two possibilities: nuclear@0: 1) our decoding just traversed a bitstream boundary nuclear@0: 2) another stream is multiplexed into this logical section */ nuclear@0: nuclear@0: if(ogg_page_bos(&og)){ nuclear@0: /* boundary case */ nuclear@0: if(!spanp) nuclear@0: return(OV_EOF); nuclear@0: nuclear@0: _decode_clear(vf); nuclear@0: nuclear@0: if(!vf->seekable){ nuclear@0: vorbis_info_clear(vf->vi); nuclear@0: vorbis_comment_clear(vf->vc); nuclear@0: } nuclear@0: break; nuclear@0: nuclear@0: }else nuclear@0: continue; /* possibility #2 */ nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: break; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* Do we need to load a new machine before submitting the page? */ nuclear@0: /* This is different in the seekable and non-seekable cases. nuclear@0: nuclear@0: In the seekable case, we already have all the header nuclear@0: information loaded and cached; we just initialize the machine nuclear@0: with it and continue on our merry way. nuclear@0: nuclear@0: In the non-seekable (streaming) case, we'll only be at a nuclear@0: boundary if we just left the previous logical bitstream and nuclear@0: we're now nominally at the header of the next bitstream nuclear@0: */ nuclear@0: nuclear@0: if(vf->ready_state!=INITSET){ nuclear@0: int link; nuclear@0: nuclear@0: if(vf->ready_stateseekable){ nuclear@0: long serialno = ogg_page_serialno(&og); nuclear@0: nuclear@0: /* match the serialno to bitstream section. We use this rather than nuclear@0: offset positions to avoid problems near logical bitstream nuclear@0: boundaries */ nuclear@0: nuclear@0: for(link=0;linklinks;link++) nuclear@0: if(vf->serialnos[link]==serialno)break; nuclear@0: nuclear@0: if(link==vf->links) continue; /* not the desired Vorbis nuclear@0: bitstream section; keep nuclear@0: trying */ nuclear@0: nuclear@0: vf->current_serialno=serialno; nuclear@0: vf->current_link=link; nuclear@0: nuclear@0: ogg_stream_reset_serialno(&vf->os,vf->current_serialno); nuclear@0: vf->ready_state=STREAMSET; nuclear@0: nuclear@0: }else{ nuclear@0: /* we're streaming */ nuclear@0: /* fetch the three header packets, build the info struct */ nuclear@0: nuclear@0: int ret=_fetch_headers(vf,vf->vi,vf->vc,NULL,NULL,&og); nuclear@0: if(ret)return(ret); nuclear@0: vf->current_serialno=vf->os.serialno; nuclear@0: vf->current_link++; nuclear@0: link=0; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* the buffered page is the data we want, and we're ready for it; nuclear@0: add it to the stream state */ nuclear@0: ogg_stream_pagein(&vf->os,&og); nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* if, eg, 64 bit stdio is configured by default, this will build with nuclear@0: fseek64 */ nuclear@0: static int _fseek64_wrap(FILE *f,ogg_int64_t off,int whence){ nuclear@0: if(f==NULL)return(-1); nuclear@0: return fseek(f,off,whence); nuclear@0: } nuclear@0: nuclear@0: static int _ov_open1(void *f,OggVorbis_File *vf,const char *initial, nuclear@0: long ibytes, ov_callbacks callbacks){ nuclear@0: int offsettest=((f && callbacks.seek_func)?callbacks.seek_func(f,0,SEEK_CUR):-1); nuclear@0: long *serialno_list=NULL; nuclear@0: int serialno_list_size=0; nuclear@0: int ret; nuclear@0: nuclear@0: memset(vf,0,sizeof(*vf)); nuclear@0: vf->datasource=f; nuclear@0: vf->callbacks = callbacks; nuclear@0: nuclear@0: /* init the framing state */ nuclear@0: ogg_sync_init(&vf->oy); nuclear@0: nuclear@0: /* perhaps some data was previously read into a buffer for testing nuclear@0: against other stream types. Allow initialization from this nuclear@0: previously read data (especially as we may be reading from a nuclear@0: non-seekable stream) */ nuclear@0: if(initial){ nuclear@0: char *buffer=ogg_sync_buffer(&vf->oy,ibytes); nuclear@0: memcpy(buffer,initial,ibytes); nuclear@0: ogg_sync_wrote(&vf->oy,ibytes); nuclear@0: } nuclear@0: nuclear@0: /* can we seek? Stevens suggests the seek test was portable */ nuclear@0: if(offsettest!=-1)vf->seekable=1; nuclear@0: nuclear@0: /* No seeking yet; Set up a 'single' (current) logical bitstream nuclear@0: entry for partial open */ nuclear@0: vf->links=1; nuclear@0: vf->vi=_ogg_calloc(vf->links,sizeof(*vf->vi)); nuclear@0: vf->vc=_ogg_calloc(vf->links,sizeof(*vf->vc)); nuclear@0: ogg_stream_init(&vf->os,-1); /* fill in the serialno later */ nuclear@0: nuclear@0: /* Fetch all BOS pages, store the vorbis header and all seen serial nuclear@0: numbers, load subsequent vorbis setup headers */ nuclear@0: if((ret=_fetch_headers(vf,vf->vi,vf->vc,&serialno_list,&serialno_list_size,NULL))<0){ nuclear@0: vf->datasource=NULL; nuclear@0: ov_clear(vf); nuclear@0: }else{ nuclear@0: /* serial number list for first link needs to be held somewhere nuclear@0: for second stage of seekable stream open; this saves having to nuclear@0: seek/reread first link's serialnumber data then. */ nuclear@0: vf->serialnos=_ogg_calloc(serialno_list_size+2,sizeof(*vf->serialnos)); nuclear@0: vf->serialnos[0]=vf->current_serialno=vf->os.serialno; nuclear@0: vf->serialnos[1]=serialno_list_size; nuclear@0: memcpy(vf->serialnos+2,serialno_list,serialno_list_size*sizeof(*vf->serialnos)); nuclear@0: nuclear@0: vf->offsets=_ogg_calloc(1,sizeof(*vf->offsets)); nuclear@0: vf->dataoffsets=_ogg_calloc(1,sizeof(*vf->dataoffsets)); nuclear@0: vf->offsets[0]=0; nuclear@0: vf->dataoffsets[0]=vf->offset; nuclear@0: nuclear@0: vf->ready_state=PARTOPEN; nuclear@0: } nuclear@0: if(serialno_list)_ogg_free(serialno_list); nuclear@0: return(ret); nuclear@0: } nuclear@0: nuclear@0: static int _ov_open2(OggVorbis_File *vf){ nuclear@0: if(vf->ready_state != PARTOPEN) return OV_EINVAL; nuclear@0: vf->ready_state=OPENED; nuclear@0: if(vf->seekable){ nuclear@0: int ret=_open_seekable2(vf); nuclear@0: if(ret){ nuclear@0: vf->datasource=NULL; nuclear@0: ov_clear(vf); nuclear@0: } nuclear@0: return(ret); nuclear@0: }else nuclear@0: vf->ready_state=STREAMSET; nuclear@0: nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: nuclear@0: /* clear out the OggVorbis_File struct */ nuclear@0: int ov_clear(OggVorbis_File *vf){ nuclear@0: if(vf){ nuclear@0: vorbis_block_clear(&vf->vb); nuclear@0: vorbis_dsp_clear(&vf->vd); nuclear@0: ogg_stream_clear(&vf->os); nuclear@0: nuclear@0: if(vf->vi && vf->links){ nuclear@0: int i; nuclear@0: for(i=0;ilinks;i++){ nuclear@0: vorbis_info_clear(vf->vi+i); nuclear@0: vorbis_comment_clear(vf->vc+i); nuclear@0: } nuclear@0: _ogg_free(vf->vi); nuclear@0: _ogg_free(vf->vc); nuclear@0: } nuclear@0: if(vf->dataoffsets)_ogg_free(vf->dataoffsets); nuclear@0: if(vf->pcmlengths)_ogg_free(vf->pcmlengths); nuclear@0: if(vf->serialnos)_ogg_free(vf->serialnos); nuclear@0: if(vf->offsets)_ogg_free(vf->offsets); nuclear@0: ogg_sync_clear(&vf->oy); nuclear@0: if(vf->datasource && vf->callbacks.close_func) nuclear@0: (vf->callbacks.close_func)(vf->datasource); nuclear@0: memset(vf,0,sizeof(*vf)); nuclear@0: } nuclear@0: #ifdef DEBUG_LEAKS nuclear@0: _VDBG_dump(); nuclear@0: #endif nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: /* inspects the OggVorbis file and finds/documents all the logical nuclear@0: bitstreams contained in it. Tries to be tolerant of logical nuclear@0: bitstream sections that are truncated/woogie. nuclear@0: nuclear@0: return: -1) error nuclear@0: 0) OK nuclear@0: */ nuclear@0: nuclear@0: int ov_open_callbacks(void *f,OggVorbis_File *vf, nuclear@0: const char *initial,long ibytes,ov_callbacks callbacks){ nuclear@0: int ret=_ov_open1(f,vf,initial,ibytes,callbacks); nuclear@0: if(ret)return ret; nuclear@0: return _ov_open2(vf); nuclear@0: } nuclear@0: nuclear@0: int ov_open(FILE *f,OggVorbis_File *vf,const char *initial,long ibytes){ nuclear@0: ov_callbacks callbacks = { nuclear@0: (size_t (*)(void *, size_t, size_t, void *)) fread, nuclear@0: (int (*)(void *, ogg_int64_t, int)) _fseek64_wrap, nuclear@0: (int (*)(void *)) fclose, nuclear@0: (long (*)(void *)) ftell nuclear@0: }; nuclear@0: nuclear@0: return ov_open_callbacks((void *)f, vf, initial, ibytes, callbacks); nuclear@0: } nuclear@0: nuclear@0: int ov_fopen(const char *path,OggVorbis_File *vf){ nuclear@0: int ret; nuclear@0: FILE *f = fopen(path,"rb"); nuclear@0: if(!f) return -1; nuclear@0: nuclear@0: ret = ov_open(f,vf,NULL,0); nuclear@0: if(ret) fclose(f); nuclear@0: return ret; nuclear@0: } nuclear@0: nuclear@0: nuclear@0: /* cheap hack for game usage where downsampling is desirable; there's nuclear@0: no need for SRC as we can just do it cheaply in libvorbis. */ nuclear@0: nuclear@0: int ov_halfrate(OggVorbis_File *vf,int flag){ nuclear@0: int i; nuclear@0: if(vf->vi==NULL)return OV_EINVAL; nuclear@0: if(vf->ready_state>STREAMSET){ nuclear@0: /* clear out stream state; dumping the decode machine is needed to nuclear@0: reinit the MDCT lookups. */ nuclear@0: vorbis_dsp_clear(&vf->vd); nuclear@0: vorbis_block_clear(&vf->vb); nuclear@0: vf->ready_state=STREAMSET; nuclear@0: if(vf->pcm_offset>=0){ nuclear@0: ogg_int64_t pos=vf->pcm_offset; nuclear@0: vf->pcm_offset=-1; /* make sure the pos is dumped if unseekable */ nuclear@0: ov_pcm_seek(vf,pos); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: for(i=0;ilinks;i++){ nuclear@0: if(vorbis_synthesis_halfrate(vf->vi+i,flag)){ nuclear@0: if(flag) ov_halfrate(vf,0); nuclear@0: return OV_EINVAL; nuclear@0: } nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: int ov_halfrate_p(OggVorbis_File *vf){ nuclear@0: if(vf->vi==NULL)return OV_EINVAL; nuclear@0: return vorbis_synthesis_halfrate_p(vf->vi); nuclear@0: } nuclear@0: nuclear@0: /* Only partially open the vorbis file; test for Vorbisness, and load nuclear@0: the headers for the first chain. Do not seek (although test for nuclear@0: seekability). Use ov_test_open to finish opening the file, else nuclear@0: ov_clear to close/free it. Same return codes as open. */ nuclear@0: nuclear@0: int ov_test_callbacks(void *f,OggVorbis_File *vf, nuclear@0: const char *initial,long ibytes,ov_callbacks callbacks) nuclear@0: { nuclear@0: return _ov_open1(f,vf,initial,ibytes,callbacks); nuclear@0: } nuclear@0: nuclear@0: int ov_test(FILE *f,OggVorbis_File *vf,const char *initial,long ibytes){ nuclear@0: ov_callbacks callbacks = { nuclear@0: (size_t (*)(void *, size_t, size_t, void *)) fread, nuclear@0: (int (*)(void *, ogg_int64_t, int)) _fseek64_wrap, nuclear@0: (int (*)(void *)) fclose, nuclear@0: (long (*)(void *)) ftell nuclear@0: }; nuclear@0: nuclear@0: return ov_test_callbacks((void *)f, vf, initial, ibytes, callbacks); nuclear@0: } nuclear@0: nuclear@0: int ov_test_open(OggVorbis_File *vf){ nuclear@0: if(vf->ready_state!=PARTOPEN)return(OV_EINVAL); nuclear@0: return _ov_open2(vf); nuclear@0: } nuclear@0: nuclear@0: /* How many logical bitstreams in this physical bitstream? */ nuclear@0: long ov_streams(OggVorbis_File *vf){ nuclear@0: return vf->links; nuclear@0: } nuclear@0: nuclear@0: /* Is the FILE * associated with vf seekable? */ nuclear@0: long ov_seekable(OggVorbis_File *vf){ nuclear@0: return vf->seekable; nuclear@0: } nuclear@0: nuclear@0: /* returns the bitrate for a given logical bitstream or the entire nuclear@0: physical bitstream. If the file is open for random access, it will nuclear@0: find the *actual* average bitrate. If the file is streaming, it nuclear@0: returns the nominal bitrate (if set) else the average of the nuclear@0: upper/lower bounds (if set) else -1 (unset). nuclear@0: nuclear@0: If you want the actual bitrate field settings, get them from the nuclear@0: vorbis_info structs */ nuclear@0: nuclear@0: long ov_bitrate(OggVorbis_File *vf,int i){ nuclear@0: if(vf->ready_state=vf->links)return(OV_EINVAL); nuclear@0: if(!vf->seekable && i!=0)return(ov_bitrate(vf,0)); nuclear@0: if(i<0){ nuclear@0: ogg_int64_t bits=0; nuclear@0: int i; nuclear@0: float br; nuclear@0: for(i=0;ilinks;i++) nuclear@0: bits+=(vf->offsets[i+1]-vf->dataoffsets[i])*8; nuclear@0: /* This once read: return(rint(bits/ov_time_total(vf,-1))); nuclear@0: * gcc 3.x on x86 miscompiled this at optimisation level 2 and above, nuclear@0: * so this is slightly transformed to make it work. nuclear@0: */ nuclear@0: br = bits/ov_time_total(vf,-1); nuclear@0: return(rint(br)); nuclear@0: }else{ nuclear@0: if(vf->seekable){ nuclear@0: /* return the actual bitrate */ nuclear@0: return(rint((vf->offsets[i+1]-vf->dataoffsets[i])*8/ov_time_total(vf,i))); nuclear@0: }else{ nuclear@0: /* return nominal if set */ nuclear@0: if(vf->vi[i].bitrate_nominal>0){ nuclear@0: return vf->vi[i].bitrate_nominal; nuclear@0: }else{ nuclear@0: if(vf->vi[i].bitrate_upper>0){ nuclear@0: if(vf->vi[i].bitrate_lower>0){ nuclear@0: return (vf->vi[i].bitrate_upper+vf->vi[i].bitrate_lower)/2; nuclear@0: }else{ nuclear@0: return vf->vi[i].bitrate_upper; nuclear@0: } nuclear@0: } nuclear@0: return(OV_FALSE); nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* returns the actual bitrate since last call. returns -1 if no nuclear@0: additional data to offer since last call (or at beginning of stream), nuclear@0: EINVAL if stream is only partially open nuclear@0: */ nuclear@0: long ov_bitrate_instant(OggVorbis_File *vf){ nuclear@0: int link=(vf->seekable?vf->current_link:0); nuclear@0: long ret; nuclear@0: if(vf->ready_statesamptrack==0)return(OV_FALSE); nuclear@0: ret=vf->bittrack/vf->samptrack*vf->vi[link].rate+.5; nuclear@0: vf->bittrack=0.f; nuclear@0: vf->samptrack=0.f; nuclear@0: return(ret); nuclear@0: } nuclear@0: nuclear@0: /* Guess */ nuclear@0: long ov_serialnumber(OggVorbis_File *vf,int i){ nuclear@0: if(i>=vf->links)return(ov_serialnumber(vf,vf->links-1)); nuclear@0: if(!vf->seekable && i>=0)return(ov_serialnumber(vf,-1)); nuclear@0: if(i<0){ nuclear@0: return(vf->current_serialno); nuclear@0: }else{ nuclear@0: return(vf->serialnos[i]); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* returns: total raw (compressed) length of content if i==-1 nuclear@0: raw (compressed) length of that logical bitstream for i==0 to n nuclear@0: OV_EINVAL if the stream is not seekable (we can't know the length) nuclear@0: or if stream is only partially open nuclear@0: */ nuclear@0: ogg_int64_t ov_raw_total(OggVorbis_File *vf,int i){ nuclear@0: if(vf->ready_stateseekable || i>=vf->links)return(OV_EINVAL); nuclear@0: if(i<0){ nuclear@0: ogg_int64_t acc=0; nuclear@0: int i; nuclear@0: for(i=0;ilinks;i++) nuclear@0: acc+=ov_raw_total(vf,i); nuclear@0: return(acc); nuclear@0: }else{ nuclear@0: return(vf->offsets[i+1]-vf->offsets[i]); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* returns: total PCM length (samples) of content if i==-1 PCM length nuclear@0: (samples) of that logical bitstream for i==0 to n nuclear@0: OV_EINVAL if the stream is not seekable (we can't know the nuclear@0: length) or only partially open nuclear@0: */ nuclear@0: ogg_int64_t ov_pcm_total(OggVorbis_File *vf,int i){ nuclear@0: if(vf->ready_stateseekable || i>=vf->links)return(OV_EINVAL); nuclear@0: if(i<0){ nuclear@0: ogg_int64_t acc=0; nuclear@0: int i; nuclear@0: for(i=0;ilinks;i++) nuclear@0: acc+=ov_pcm_total(vf,i); nuclear@0: return(acc); nuclear@0: }else{ nuclear@0: return(vf->pcmlengths[i*2+1]); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* returns: total seconds of content if i==-1 nuclear@0: seconds in that logical bitstream for i==0 to n nuclear@0: OV_EINVAL if the stream is not seekable (we can't know the nuclear@0: length) or only partially open nuclear@0: */ nuclear@0: double ov_time_total(OggVorbis_File *vf,int i){ nuclear@0: if(vf->ready_stateseekable || i>=vf->links)return(OV_EINVAL); nuclear@0: if(i<0){ nuclear@0: double acc=0; nuclear@0: int i; nuclear@0: for(i=0;ilinks;i++) nuclear@0: acc+=ov_time_total(vf,i); nuclear@0: return(acc); nuclear@0: }else{ nuclear@0: return((double)(vf->pcmlengths[i*2+1])/vf->vi[i].rate); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* seek to an offset relative to the *compressed* data. This also nuclear@0: scans packets to update the PCM cursor. It will cross a logical nuclear@0: bitstream boundary, but only if it can't get any packets out of the nuclear@0: tail of the bitstream we seek to (so no surprises). nuclear@0: nuclear@0: returns zero on success, nonzero on failure */ nuclear@0: nuclear@0: int ov_raw_seek(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: ogg_stream_state work_os; nuclear@0: int ret; nuclear@0: nuclear@0: if(vf->ready_stateseekable) nuclear@0: return(OV_ENOSEEK); /* don't dump machine if we can't seek */ nuclear@0: nuclear@0: if(pos<0 || pos>vf->end)return(OV_EINVAL); nuclear@0: nuclear@0: /* is the seek position outside our current link [if any]? */ nuclear@0: if(vf->ready_state>=STREAMSET){ nuclear@0: if(posoffsets[vf->current_link] || pos>=vf->offsets[vf->current_link+1]) nuclear@0: _decode_clear(vf); /* clear out stream state */ nuclear@0: } nuclear@0: nuclear@0: /* don't yet clear out decoding machine (if it's initialized), in nuclear@0: the case we're in the same link. Restart the decode lapping, and nuclear@0: let _fetch_and_process_packet deal with a potential bitstream nuclear@0: boundary */ nuclear@0: vf->pcm_offset=-1; nuclear@0: ogg_stream_reset_serialno(&vf->os, nuclear@0: vf->current_serialno); /* must set serialno */ nuclear@0: vorbis_synthesis_restart(&vf->vd); nuclear@0: nuclear@0: ret=_seek_helper(vf,pos); nuclear@0: if(ret)goto seek_error; nuclear@0: nuclear@0: /* we need to make sure the pcm_offset is set, but we don't want to nuclear@0: advance the raw cursor past good packets just to get to the first nuclear@0: with a granulepos. That's not equivalent behavior to beginning nuclear@0: decoding as immediately after the seek position as possible. nuclear@0: nuclear@0: So, a hack. We use two stream states; a local scratch state and nuclear@0: the shared vf->os stream state. We use the local state to nuclear@0: scan, and the shared state as a buffer for later decode. nuclear@0: nuclear@0: Unfortuantely, on the last page we still advance to last packet nuclear@0: because the granulepos on the last page is not necessarily on a nuclear@0: packet boundary, and we need to make sure the granpos is nuclear@0: correct. nuclear@0: */ nuclear@0: nuclear@0: { nuclear@0: ogg_page og; nuclear@0: ogg_packet op; nuclear@0: int lastblock=0; nuclear@0: int accblock=0; nuclear@0: int thisblock=0; nuclear@0: int lastflag=0; nuclear@0: int firstflag=0; nuclear@0: ogg_int64_t pagepos=-1; nuclear@0: nuclear@0: ogg_stream_init(&work_os,vf->current_serialno); /* get the memory ready */ nuclear@0: ogg_stream_reset(&work_os); /* eliminate the spurious OV_HOLE nuclear@0: return from not necessarily nuclear@0: starting from the beginning */ nuclear@0: nuclear@0: while(1){ nuclear@0: if(vf->ready_state>=STREAMSET){ nuclear@0: /* snarf/scan a packet if we can */ nuclear@0: int result=ogg_stream_packetout(&work_os,&op); nuclear@0: nuclear@0: if(result>0){ nuclear@0: nuclear@0: if(vf->vi[vf->current_link].codec_setup){ nuclear@0: thisblock=vorbis_packet_blocksize(vf->vi+vf->current_link,&op); nuclear@0: if(thisblock<0){ nuclear@0: ogg_stream_packetout(&vf->os,NULL); nuclear@0: thisblock=0; nuclear@0: }else{ nuclear@0: nuclear@0: /* We can't get a guaranteed correct pcm position out of the nuclear@0: last page in a stream because it might have a 'short' nuclear@0: granpos, which can only be detected in the presence of a nuclear@0: preceding page. However, if the last page is also the first nuclear@0: page, the granpos rules of a first page take precedence. Not nuclear@0: only that, but for first==last, the EOS page must be treated nuclear@0: as if its a normal first page for the stream to open/play. */ nuclear@0: if(lastflag && !firstflag) nuclear@0: ogg_stream_packetout(&vf->os,NULL); nuclear@0: else nuclear@0: if(lastblock)accblock+=(lastblock+thisblock)>>2; nuclear@0: } nuclear@0: nuclear@0: if(op.granulepos!=-1){ nuclear@0: int i,link=vf->current_link; nuclear@0: ogg_int64_t granulepos=op.granulepos-vf->pcmlengths[link*2]; nuclear@0: if(granulepos<0)granulepos=0; nuclear@0: nuclear@0: for(i=0;ipcmlengths[i*2+1]; nuclear@0: vf->pcm_offset=granulepos-accblock; nuclear@0: if(vf->pcm_offset<0)vf->pcm_offset=0; nuclear@0: break; nuclear@0: } nuclear@0: lastblock=thisblock; nuclear@0: continue; nuclear@0: }else nuclear@0: ogg_stream_packetout(&vf->os,NULL); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(!lastblock){ nuclear@0: pagepos=_get_next_page(vf,&og,-1); nuclear@0: if(pagepos<0){ nuclear@0: vf->pcm_offset=ov_pcm_total(vf,-1); nuclear@0: break; nuclear@0: } nuclear@0: }else{ nuclear@0: /* huh? Bogus stream with packets but no granulepos */ nuclear@0: vf->pcm_offset=-1; nuclear@0: break; nuclear@0: } nuclear@0: nuclear@0: /* has our decoding just traversed a bitstream boundary? */ nuclear@0: if(vf->ready_state>=STREAMSET){ nuclear@0: if(vf->current_serialno!=ogg_page_serialno(&og)){ nuclear@0: nuclear@0: /* two possibilities: nuclear@0: 1) our decoding just traversed a bitstream boundary nuclear@0: 2) another stream is multiplexed into this logical section? */ nuclear@0: nuclear@0: if(ogg_page_bos(&og)){ nuclear@0: /* we traversed */ nuclear@0: _decode_clear(vf); /* clear out stream state */ nuclear@0: ogg_stream_clear(&work_os); nuclear@0: } /* else, do nothing; next loop will scoop another page */ nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: if(vf->ready_statelinks;link++) nuclear@0: if(vf->serialnos[link]==serialno)break; nuclear@0: nuclear@0: if(link==vf->links) continue; /* not the desired Vorbis nuclear@0: bitstream section; keep nuclear@0: trying */ nuclear@0: vf->current_link=link; nuclear@0: vf->current_serialno=serialno; nuclear@0: ogg_stream_reset_serialno(&vf->os,serialno); nuclear@0: ogg_stream_reset_serialno(&work_os,serialno); nuclear@0: vf->ready_state=STREAMSET; nuclear@0: firstflag=(pagepos<=vf->dataoffsets[link]); nuclear@0: } nuclear@0: nuclear@0: ogg_stream_pagein(&vf->os,&og); nuclear@0: ogg_stream_pagein(&work_os,&og); nuclear@0: lastflag=ogg_page_eos(&og); nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: ogg_stream_clear(&work_os); nuclear@0: vf->bittrack=0.f; nuclear@0: vf->samptrack=0.f; nuclear@0: return(0); nuclear@0: nuclear@0: seek_error: nuclear@0: /* dump the machine so we're in a known state */ nuclear@0: vf->pcm_offset=-1; nuclear@0: ogg_stream_clear(&work_os); nuclear@0: _decode_clear(vf); nuclear@0: return OV_EBADLINK; nuclear@0: } nuclear@0: nuclear@0: /* Page granularity seek (faster than sample granularity because we nuclear@0: don't do the last bit of decode to find a specific sample). nuclear@0: nuclear@0: Seek to the last [granule marked] page preceding the specified pos nuclear@0: location, such that decoding past the returned point will quickly nuclear@0: arrive at the requested position. */ nuclear@0: int ov_pcm_seek_page(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: int link=-1; nuclear@0: ogg_int64_t result=0; nuclear@0: ogg_int64_t total=ov_pcm_total(vf,-1); nuclear@0: nuclear@0: if(vf->ready_stateseekable)return(OV_ENOSEEK); nuclear@0: nuclear@0: if(pos<0 || pos>total)return(OV_EINVAL); nuclear@0: nuclear@0: /* which bitstream section does this pcm offset occur in? */ nuclear@0: for(link=vf->links-1;link>=0;link--){ nuclear@0: total-=vf->pcmlengths[link*2+1]; nuclear@0: if(pos>=total)break; nuclear@0: } nuclear@0: nuclear@0: /* search within the logical bitstream for the page with the highest nuclear@0: pcm_pos preceding (or equal to) pos. There is a danger here; nuclear@0: missing pages or incorrect frame number information in the nuclear@0: bitstream could make our task impossible. Account for that (it nuclear@0: would be an error condition) */ nuclear@0: nuclear@0: /* new search algorithm by HB (Nicholas Vinen) */ nuclear@0: { nuclear@0: ogg_int64_t end=vf->offsets[link+1]; nuclear@0: ogg_int64_t begin=vf->offsets[link]; nuclear@0: ogg_int64_t begintime = vf->pcmlengths[link*2]; nuclear@0: ogg_int64_t endtime = vf->pcmlengths[link*2+1]+begintime; nuclear@0: ogg_int64_t target=pos-total+begintime; nuclear@0: ogg_int64_t best=begin; nuclear@0: nuclear@0: ogg_page og; nuclear@0: while(beginoffset){ nuclear@0: result=_seek_helper(vf,bisect); nuclear@0: if(result) goto seek_error; nuclear@0: } nuclear@0: nuclear@0: while(beginoffset); nuclear@0: if(result==OV_EREAD) goto seek_error; nuclear@0: if(result<0){ nuclear@0: if(bisect<=begin+1) nuclear@0: end=begin; /* found it */ nuclear@0: else{ nuclear@0: if(bisect==0) goto seek_error; nuclear@0: bisect-=CHUNKSIZE; nuclear@0: if(bisect<=begin)bisect=begin+1; nuclear@0: result=_seek_helper(vf,bisect); nuclear@0: if(result) goto seek_error; nuclear@0: } nuclear@0: }else{ nuclear@0: ogg_int64_t granulepos; nuclear@0: nuclear@0: if(ogg_page_serialno(&og)!=vf->serialnos[link]) nuclear@0: continue; nuclear@0: nuclear@0: granulepos=ogg_page_granulepos(&og); nuclear@0: if(granulepos==-1)continue; nuclear@0: nuclear@0: if(granuleposoffset; /* raw offset of next page */ nuclear@0: begintime=granulepos; nuclear@0: nuclear@0: if(target-begintime>44100)break; nuclear@0: bisect=begin; /* *not* begin + 1 */ nuclear@0: }else{ nuclear@0: if(bisect<=begin+1) nuclear@0: end=begin; /* found it */ nuclear@0: else{ nuclear@0: if(end==vf->offset){ /* we're pretty close - we'd be stuck in */ nuclear@0: end=result; nuclear@0: bisect-=CHUNKSIZE; /* an endless loop otherwise. */ nuclear@0: if(bisect<=begin)bisect=begin+1; nuclear@0: result=_seek_helper(vf,bisect); nuclear@0: if(result) goto seek_error; nuclear@0: }else{ nuclear@0: end=bisect; nuclear@0: endtime=granulepos; nuclear@0: break; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* found our page. seek to it, update pcm offset. Easier case than nuclear@0: raw_seek, don't keep packets preceding granulepos. */ nuclear@0: { nuclear@0: ogg_page og; nuclear@0: ogg_packet op; nuclear@0: nuclear@0: /* seek */ nuclear@0: result=_seek_helper(vf,best); nuclear@0: vf->pcm_offset=-1; nuclear@0: if(result) goto seek_error; nuclear@0: result=_get_next_page(vf,&og,-1); nuclear@0: if(result<0) goto seek_error; nuclear@0: nuclear@0: if(link!=vf->current_link){ nuclear@0: /* Different link; dump entire decode machine */ nuclear@0: _decode_clear(vf); nuclear@0: nuclear@0: vf->current_link=link; nuclear@0: vf->current_serialno=vf->serialnos[link]; nuclear@0: vf->ready_state=STREAMSET; nuclear@0: nuclear@0: }else{ nuclear@0: vorbis_synthesis_restart(&vf->vd); nuclear@0: } nuclear@0: nuclear@0: ogg_stream_reset_serialno(&vf->os,vf->current_serialno); nuclear@0: ogg_stream_pagein(&vf->os,&og); nuclear@0: nuclear@0: /* pull out all but last packet; the one with granulepos */ nuclear@0: while(1){ nuclear@0: result=ogg_stream_packetpeek(&vf->os,&op); nuclear@0: if(result==0){ nuclear@0: /* !!! the packet finishing this page originated on a nuclear@0: preceding page. Keep fetching previous pages until we nuclear@0: get one with a granulepos or without the 'continued' flag nuclear@0: set. Then just use raw_seek for simplicity. */ nuclear@0: nuclear@0: result=_seek_helper(vf,best); nuclear@0: if(result<0) goto seek_error; nuclear@0: nuclear@0: while(1){ nuclear@0: result=_get_prev_page(vf,&og); nuclear@0: if(result<0) goto seek_error; nuclear@0: if(ogg_page_serialno(&og)==vf->current_serialno && nuclear@0: (ogg_page_granulepos(&og)>-1 || nuclear@0: !ogg_page_continued(&og))){ nuclear@0: return ov_raw_seek(vf,result); nuclear@0: } nuclear@0: vf->offset=result; nuclear@0: } nuclear@0: } nuclear@0: if(result<0){ nuclear@0: result = OV_EBADPACKET; nuclear@0: goto seek_error; nuclear@0: } nuclear@0: if(op.granulepos!=-1){ nuclear@0: vf->pcm_offset=op.granulepos-vf->pcmlengths[vf->current_link*2]; nuclear@0: if(vf->pcm_offset<0)vf->pcm_offset=0; nuclear@0: vf->pcm_offset+=total; nuclear@0: break; nuclear@0: }else nuclear@0: result=ogg_stream_packetout(&vf->os,NULL); nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* verify result */ nuclear@0: if(vf->pcm_offset>pos || pos>ov_pcm_total(vf,-1)){ nuclear@0: result=OV_EFAULT; nuclear@0: goto seek_error; nuclear@0: } nuclear@0: vf->bittrack=0.f; nuclear@0: vf->samptrack=0.f; nuclear@0: return(0); nuclear@0: nuclear@0: seek_error: nuclear@0: /* dump machine so we're in a known state */ nuclear@0: vf->pcm_offset=-1; nuclear@0: _decode_clear(vf); nuclear@0: return (int)result; nuclear@0: } nuclear@0: nuclear@0: /* seek to a sample offset relative to the decompressed pcm stream nuclear@0: returns zero on success, nonzero on failure */ nuclear@0: nuclear@0: int ov_pcm_seek(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: int thisblock,lastblock=0; nuclear@0: int ret=ov_pcm_seek_page(vf,pos); nuclear@0: if(ret<0)return(ret); nuclear@0: if((ret=_make_decode_ready(vf)))return ret; nuclear@0: nuclear@0: /* discard leading packets we don't need for the lapping of the nuclear@0: position we want; don't decode them */ nuclear@0: nuclear@0: while(1){ nuclear@0: ogg_packet op; nuclear@0: ogg_page og; nuclear@0: nuclear@0: int ret=ogg_stream_packetpeek(&vf->os,&op); nuclear@0: if(ret>0){ nuclear@0: thisblock=vorbis_packet_blocksize(vf->vi+vf->current_link,&op); nuclear@0: if(thisblock<0){ nuclear@0: ogg_stream_packetout(&vf->os,NULL); nuclear@0: continue; /* non audio packet */ nuclear@0: } nuclear@0: if(lastblock)vf->pcm_offset+=(lastblock+thisblock)>>2; nuclear@0: nuclear@0: if(vf->pcm_offset+((thisblock+ nuclear@0: vorbis_info_blocksize(vf->vi,1))>>2)>=pos)break; nuclear@0: nuclear@0: /* remove the packet from packet queue and track its granulepos */ nuclear@0: ogg_stream_packetout(&vf->os,NULL); nuclear@0: vorbis_synthesis_trackonly(&vf->vb,&op); /* set up a vb with nuclear@0: only tracking, no nuclear@0: pcm_decode */ nuclear@0: vorbis_synthesis_blockin(&vf->vd,&vf->vb); nuclear@0: nuclear@0: /* end of logical stream case is hard, especially with exact nuclear@0: length positioning. */ nuclear@0: nuclear@0: if(op.granulepos>-1){ nuclear@0: int i; nuclear@0: /* always believe the stream markers */ nuclear@0: vf->pcm_offset=op.granulepos-vf->pcmlengths[vf->current_link*2]; nuclear@0: if(vf->pcm_offset<0)vf->pcm_offset=0; nuclear@0: for(i=0;icurrent_link;i++) nuclear@0: vf->pcm_offset+=vf->pcmlengths[i*2+1]; nuclear@0: } nuclear@0: nuclear@0: lastblock=thisblock; nuclear@0: nuclear@0: }else{ nuclear@0: if(ret<0 && ret!=OV_HOLE)break; nuclear@0: nuclear@0: /* suck in a new page */ nuclear@0: if(_get_next_page(vf,&og,-1)<0)break; nuclear@0: if(ogg_page_bos(&og))_decode_clear(vf); nuclear@0: nuclear@0: if(vf->ready_statelinks;link++) nuclear@0: if(vf->serialnos[link]==serialno)break; nuclear@0: if(link==vf->links) continue; nuclear@0: vf->current_link=link; nuclear@0: nuclear@0: vf->ready_state=STREAMSET; nuclear@0: vf->current_serialno=ogg_page_serialno(&og); nuclear@0: ogg_stream_reset_serialno(&vf->os,serialno); nuclear@0: ret=_make_decode_ready(vf); nuclear@0: if(ret)return ret; nuclear@0: lastblock=0; nuclear@0: } nuclear@0: nuclear@0: ogg_stream_pagein(&vf->os,&og); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: vf->bittrack=0.f; nuclear@0: vf->samptrack=0.f; nuclear@0: /* discard samples until we reach the desired position. Crossing a nuclear@0: logical bitstream boundary with abandon is OK. */ nuclear@0: { nuclear@0: /* note that halfrate could be set differently in each link, but nuclear@0: vorbisfile encoforces all links are set or unset */ nuclear@0: int hs=vorbis_synthesis_halfrate_p(vf->vi); nuclear@0: while(vf->pcm_offset<((pos>>hs)<pcm_offset)>>hs; nuclear@0: long samples=vorbis_synthesis_pcmout(&vf->vd,NULL); nuclear@0: nuclear@0: if(samples>target)samples=target; nuclear@0: vorbis_synthesis_read(&vf->vd,samples); nuclear@0: vf->pcm_offset+=samples<pcm_offset=ov_pcm_total(vf,-1); /* eof */ nuclear@0: } nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: /* seek to a playback time relative to the decompressed pcm stream nuclear@0: returns zero on success, nonzero on failure */ nuclear@0: int ov_time_seek(OggVorbis_File *vf,double seconds){ nuclear@0: /* translate time to PCM position and call ov_pcm_seek */ nuclear@0: nuclear@0: int link=-1; nuclear@0: ogg_int64_t pcm_total=0; nuclear@0: double time_total=0.; nuclear@0: nuclear@0: if(vf->ready_stateseekable)return(OV_ENOSEEK); nuclear@0: if(seconds<0)return(OV_EINVAL); nuclear@0: nuclear@0: /* which bitstream section does this time offset occur in? */ nuclear@0: for(link=0;linklinks;link++){ nuclear@0: double addsec = ov_time_total(vf,link); nuclear@0: if(secondspcmlengths[link*2+1]; nuclear@0: } nuclear@0: nuclear@0: if(link==vf->links)return(OV_EINVAL); nuclear@0: nuclear@0: /* enough information to convert time offset to pcm offset */ nuclear@0: { nuclear@0: ogg_int64_t target=pcm_total+(seconds-time_total)*vf->vi[link].rate; nuclear@0: return(ov_pcm_seek(vf,target)); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* page-granularity version of ov_time_seek nuclear@0: returns zero on success, nonzero on failure */ nuclear@0: int ov_time_seek_page(OggVorbis_File *vf,double seconds){ nuclear@0: /* translate time to PCM position and call ov_pcm_seek */ nuclear@0: nuclear@0: int link=-1; nuclear@0: ogg_int64_t pcm_total=0; nuclear@0: double time_total=0.; nuclear@0: nuclear@0: if(vf->ready_stateseekable)return(OV_ENOSEEK); nuclear@0: if(seconds<0)return(OV_EINVAL); nuclear@0: nuclear@0: /* which bitstream section does this time offset occur in? */ nuclear@0: for(link=0;linklinks;link++){ nuclear@0: double addsec = ov_time_total(vf,link); nuclear@0: if(secondspcmlengths[link*2+1]; nuclear@0: } nuclear@0: nuclear@0: if(link==vf->links)return(OV_EINVAL); nuclear@0: nuclear@0: /* enough information to convert time offset to pcm offset */ nuclear@0: { nuclear@0: ogg_int64_t target=pcm_total+(seconds-time_total)*vf->vi[link].rate; nuclear@0: return(ov_pcm_seek_page(vf,target)); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* tell the current stream offset cursor. Note that seek followed by nuclear@0: tell will likely not give the set offset due to caching */ nuclear@0: ogg_int64_t ov_raw_tell(OggVorbis_File *vf){ nuclear@0: if(vf->ready_stateoffset); nuclear@0: } nuclear@0: nuclear@0: /* return PCM offset (sample) of next PCM sample to be read */ nuclear@0: ogg_int64_t ov_pcm_tell(OggVorbis_File *vf){ nuclear@0: if(vf->ready_statepcm_offset); nuclear@0: } nuclear@0: nuclear@0: /* return time offset (seconds) of next PCM sample to be read */ nuclear@0: double ov_time_tell(OggVorbis_File *vf){ nuclear@0: int link=0; nuclear@0: ogg_int64_t pcm_total=0; nuclear@0: double time_total=0.f; nuclear@0: nuclear@0: if(vf->ready_stateseekable){ nuclear@0: pcm_total=ov_pcm_total(vf,-1); nuclear@0: time_total=ov_time_total(vf,-1); nuclear@0: nuclear@0: /* which bitstream section does this time offset occur in? */ nuclear@0: for(link=vf->links-1;link>=0;link--){ nuclear@0: pcm_total-=vf->pcmlengths[link*2+1]; nuclear@0: time_total-=ov_time_total(vf,link); nuclear@0: if(vf->pcm_offset>=pcm_total)break; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: return((double)time_total+(double)(vf->pcm_offset-pcm_total)/vf->vi[link].rate); nuclear@0: } nuclear@0: nuclear@0: /* link: -1) return the vorbis_info struct for the bitstream section nuclear@0: currently being decoded nuclear@0: 0-n) to request information for a specific bitstream section nuclear@0: nuclear@0: In the case of a non-seekable bitstream, any call returns the nuclear@0: current bitstream. NULL in the case that the machine is not nuclear@0: initialized */ nuclear@0: nuclear@0: vorbis_info *ov_info(OggVorbis_File *vf,int link){ nuclear@0: if(vf->seekable){ nuclear@0: if(link<0) nuclear@0: if(vf->ready_state>=STREAMSET) nuclear@0: return vf->vi+vf->current_link; nuclear@0: else nuclear@0: return vf->vi; nuclear@0: else nuclear@0: if(link>=vf->links) nuclear@0: return NULL; nuclear@0: else nuclear@0: return vf->vi+link; nuclear@0: }else{ nuclear@0: return vf->vi; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* grr, strong typing, grr, no templates/inheritence, grr */ nuclear@0: vorbis_comment *ov_comment(OggVorbis_File *vf,int link){ nuclear@0: if(vf->seekable){ nuclear@0: if(link<0) nuclear@0: if(vf->ready_state>=STREAMSET) nuclear@0: return vf->vc+vf->current_link; nuclear@0: else nuclear@0: return vf->vc; nuclear@0: else nuclear@0: if(link>=vf->links) nuclear@0: return NULL; nuclear@0: else nuclear@0: return vf->vc+link; nuclear@0: }else{ nuclear@0: return vf->vc; nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: static int host_is_big_endian() { nuclear@0: ogg_int32_t pattern = 0xfeedface; /* deadbeef */ nuclear@0: unsigned char *bytewise = (unsigned char *)&pattern; nuclear@0: if (bytewise[0] == 0xfe) return 1; nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: /* up to this point, everything could more or less hide the multiple nuclear@0: logical bitstream nature of chaining from the toplevel application nuclear@0: if the toplevel application didn't particularly care. However, at nuclear@0: the point that we actually read audio back, the multiple-section nuclear@0: nature must surface: Multiple bitstream sections do not necessarily nuclear@0: have to have the same number of channels or sampling rate. nuclear@0: nuclear@0: ov_read returns the sequential logical bitstream number currently nuclear@0: being decoded along with the PCM data in order that the toplevel nuclear@0: application can take action on channel/sample rate changes. This nuclear@0: number will be incremented even for streamed (non-seekable) streams nuclear@0: (for seekable streams, it represents the actual logical bitstream nuclear@0: index within the physical bitstream. Note that the accessor nuclear@0: functions above are aware of this dichotomy). nuclear@0: nuclear@0: ov_read_filter is exactly the same as ov_read except that it processes nuclear@0: the decoded audio data through a filter before packing it into the nuclear@0: requested format. This gives greater accuracy than applying a filter nuclear@0: after the audio has been converted into integral PCM. nuclear@0: nuclear@0: input values: buffer) a buffer to hold packed PCM data for return nuclear@0: length) the byte length requested to be placed into buffer nuclear@0: bigendianp) should the data be packed LSB first (0) or nuclear@0: MSB first (1) nuclear@0: word) word size for output. currently 1 (byte) or nuclear@0: 2 (16 bit short) nuclear@0: nuclear@0: return values: <0) error/hole in data (OV_HOLE), partial open (OV_EINVAL) nuclear@0: 0) EOF nuclear@0: n) number of bytes of PCM actually returned. The nuclear@0: below works on a packet-by-packet basis, so the nuclear@0: return length is not related to the 'length' passed nuclear@0: in, just guaranteed to fit. nuclear@0: nuclear@0: *section) set to the logical bitstream number */ nuclear@0: nuclear@0: long ov_read_filter(OggVorbis_File *vf,char *buffer,int length, nuclear@0: int bigendianp,int word,int sgned,int *bitstream, nuclear@0: void (*filter)(float **pcm,long channels,long samples,void *filter_param),void *filter_param){ nuclear@0: int i,j; nuclear@0: int host_endian = host_is_big_endian(); nuclear@0: int hs; nuclear@0: nuclear@0: float **pcm; nuclear@0: long samples; nuclear@0: nuclear@0: if(vf->ready_stateready_state==INITSET){ nuclear@0: samples=vorbis_synthesis_pcmout(&vf->vd,&pcm); nuclear@0: if(samples)break; nuclear@0: } nuclear@0: nuclear@0: /* suck in another packet */ nuclear@0: { nuclear@0: int ret=_fetch_and_process_packet(vf,NULL,1,1); nuclear@0: if(ret==OV_EOF) nuclear@0: return(0); nuclear@0: if(ret<=0) nuclear@0: return(ret); nuclear@0: } nuclear@0: nuclear@0: } nuclear@0: nuclear@0: if(samples>0){ nuclear@0: nuclear@0: /* yay! proceed to pack data into the byte buffer */ nuclear@0: nuclear@0: long channels=ov_info(vf,-1)->channels; nuclear@0: long bytespersample=word * channels; nuclear@0: vorbis_fpu_control fpu; nuclear@0: if(samples>length/bytespersample)samples=length/bytespersample; nuclear@0: nuclear@0: if(samples <= 0) nuclear@0: return OV_EINVAL; nuclear@0: nuclear@0: /* Here. */ nuclear@0: if(filter) nuclear@0: filter(pcm,channels,samples,filter_param); nuclear@0: nuclear@0: /* a tight loop to pack each size */ nuclear@0: { nuclear@0: int val; nuclear@0: if(word==1){ nuclear@0: int off=(sgned?0:128); nuclear@0: vorbis_fpu_setround(&fpu); nuclear@0: for(j=0;j127)val=127; nuclear@0: else if(val<-128)val=-128; nuclear@0: *buffer++=val+off; nuclear@0: } nuclear@0: vorbis_fpu_restore(fpu); nuclear@0: }else{ nuclear@0: int off=(sgned?0:32768); nuclear@0: nuclear@0: if(host_endian==bigendianp){ nuclear@0: if(sgned){ nuclear@0: nuclear@0: vorbis_fpu_setround(&fpu); nuclear@0: for(i=0;i32767)val=32767; nuclear@0: else if(val<-32768)val=-32768; nuclear@0: *dest=val; nuclear@0: dest+=channels; nuclear@0: } nuclear@0: } nuclear@0: vorbis_fpu_restore(fpu); nuclear@0: nuclear@0: }else{ nuclear@0: nuclear@0: vorbis_fpu_setround(&fpu); nuclear@0: for(i=0;i32767)val=32767; nuclear@0: else if(val<-32768)val=-32768; nuclear@0: *dest=val+off; nuclear@0: dest+=channels; nuclear@0: } nuclear@0: } nuclear@0: vorbis_fpu_restore(fpu); nuclear@0: nuclear@0: } nuclear@0: }else if(bigendianp){ nuclear@0: nuclear@0: vorbis_fpu_setround(&fpu); nuclear@0: for(j=0;j32767)val=32767; nuclear@0: else if(val<-32768)val=-32768; nuclear@0: val+=off; nuclear@0: *buffer++=(val>>8); nuclear@0: *buffer++=(val&0xff); nuclear@0: } nuclear@0: vorbis_fpu_restore(fpu); nuclear@0: nuclear@0: }else{ nuclear@0: int val; nuclear@0: vorbis_fpu_setround(&fpu); nuclear@0: for(j=0;j32767)val=32767; nuclear@0: else if(val<-32768)val=-32768; nuclear@0: val+=off; nuclear@0: *buffer++=(val&0xff); nuclear@0: *buffer++=(val>>8); nuclear@0: } nuclear@0: vorbis_fpu_restore(fpu); nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: vorbis_synthesis_read(&vf->vd,samples); nuclear@0: hs=vorbis_synthesis_halfrate_p(vf->vi); nuclear@0: vf->pcm_offset+=(samples<current_link; nuclear@0: return(samples*bytespersample); nuclear@0: }else{ nuclear@0: return(samples); nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: long ov_read(OggVorbis_File *vf,char *buffer,int length, nuclear@0: int bigendianp,int word,int sgned,int *bitstream){ nuclear@0: return ov_read_filter(vf, buffer, length, bigendianp, word, sgned, bitstream, NULL, NULL); nuclear@0: } nuclear@0: nuclear@0: /* input values: pcm_channels) a float vector per channel of output nuclear@0: length) the sample length being read by the app nuclear@0: nuclear@0: return values: <0) error/hole in data (OV_HOLE), partial open (OV_EINVAL) nuclear@0: 0) EOF nuclear@0: n) number of samples of PCM actually returned. The nuclear@0: below works on a packet-by-packet basis, so the nuclear@0: return length is not related to the 'length' passed nuclear@0: in, just guaranteed to fit. nuclear@0: nuclear@0: *section) set to the logical bitstream number */ nuclear@0: nuclear@0: nuclear@0: nuclear@0: long ov_read_float(OggVorbis_File *vf,float ***pcm_channels,int length, nuclear@0: int *bitstream){ nuclear@0: nuclear@0: if(vf->ready_stateready_state==INITSET){ nuclear@0: float **pcm; nuclear@0: long samples=vorbis_synthesis_pcmout(&vf->vd,&pcm); nuclear@0: if(samples){ nuclear@0: int hs=vorbis_synthesis_halfrate_p(vf->vi); nuclear@0: if(pcm_channels)*pcm_channels=pcm; nuclear@0: if(samples>length)samples=length; nuclear@0: vorbis_synthesis_read(&vf->vd,samples); nuclear@0: vf->pcm_offset+=samples<current_link; nuclear@0: return samples; nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* suck in another packet */ nuclear@0: { nuclear@0: int ret=_fetch_and_process_packet(vf,NULL,1,1); nuclear@0: if(ret==OV_EOF)return(0); nuclear@0: if(ret<=0)return(ret); nuclear@0: } nuclear@0: nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: extern float *vorbis_window(vorbis_dsp_state *v,int W); nuclear@0: nuclear@0: static void _ov_splice(float **pcm,float **lappcm, nuclear@0: int n1, int n2, nuclear@0: int ch1, int ch2, nuclear@0: float *w1, float *w2){ nuclear@0: int i,j; nuclear@0: float *w=w1; nuclear@0: int n=n1; nuclear@0: nuclear@0: if(n1>n2){ nuclear@0: n=n2; nuclear@0: w=w2; nuclear@0: } nuclear@0: nuclear@0: /* splice */ nuclear@0: for(j=0;jready_state==INITSET)break; nuclear@0: /* suck in another packet */ nuclear@0: { nuclear@0: int ret=_fetch_and_process_packet(vf,NULL,1,0); nuclear@0: if(ret<0 && ret!=OV_HOLE)return(ret); nuclear@0: } nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: /* make sure vf is INITSET and that we have a primed buffer; if nuclear@0: we're crosslapping at a stream section boundary, this also makes nuclear@0: sure we're sanity checking against the right stream information */ nuclear@0: static int _ov_initprime(OggVorbis_File *vf){ nuclear@0: vorbis_dsp_state *vd=&vf->vd; nuclear@0: while(1){ nuclear@0: if(vf->ready_state==INITSET) nuclear@0: if(vorbis_synthesis_pcmout(vd,NULL))break; nuclear@0: nuclear@0: /* suck in another packet */ nuclear@0: { nuclear@0: int ret=_fetch_and_process_packet(vf,NULL,1,0); nuclear@0: if(ret<0 && ret!=OV_HOLE)return(ret); nuclear@0: } nuclear@0: } nuclear@0: return 0; nuclear@0: } nuclear@0: nuclear@0: /* grab enough data for lapping from vf; this may be in the form of nuclear@0: unreturned, already-decoded pcm, remaining PCM we will need to nuclear@0: decode, or synthetic postextrapolation from last packets. */ nuclear@0: static void _ov_getlap(OggVorbis_File *vf,vorbis_info *vi,vorbis_dsp_state *vd, nuclear@0: float **lappcm,int lapsize){ nuclear@0: int lapcount=0,i; nuclear@0: float **pcm; nuclear@0: nuclear@0: /* try first to decode the lapping data */ nuclear@0: while(lapcountlapsize-lapcount)samples=lapsize-lapcount; nuclear@0: for(i=0;ichannels;i++) nuclear@0: memcpy(lappcm[i]+lapcount,pcm[i],sizeof(**pcm)*samples); nuclear@0: lapcount+=samples; nuclear@0: vorbis_synthesis_read(vd,samples); nuclear@0: }else{ nuclear@0: /* suck in another packet */ nuclear@0: int ret=_fetch_and_process_packet(vf,NULL,1,0); /* do *not* span */ nuclear@0: if(ret==OV_EOF)break; nuclear@0: } nuclear@0: } nuclear@0: if(lapcountvd,&pcm); nuclear@0: if(samples==0){ nuclear@0: for(i=0;ichannels;i++) nuclear@0: memset(lappcm[i]+lapcount,0,sizeof(**pcm)*lapsize-lapcount); nuclear@0: lapcount=lapsize; nuclear@0: }else{ nuclear@0: if(samples>lapsize-lapcount)samples=lapsize-lapcount; nuclear@0: for(i=0;ichannels;i++) nuclear@0: memcpy(lappcm[i]+lapcount,pcm[i],sizeof(**pcm)*samples); nuclear@0: lapcount+=samples; nuclear@0: } nuclear@0: } nuclear@0: } nuclear@0: nuclear@0: /* this sets up crosslapping of a sample by using trailing data from nuclear@0: sample 1 and lapping it into the windowing buffer of sample 2 */ nuclear@0: int ov_crosslap(OggVorbis_File *vf1, OggVorbis_File *vf2){ nuclear@0: vorbis_info *vi1,*vi2; nuclear@0: float **lappcm; nuclear@0: float **pcm; nuclear@0: float *w1,*w2; nuclear@0: int n1,n2,i,ret,hs1,hs2; nuclear@0: nuclear@0: if(vf1==vf2)return(0); /* degenerate case */ nuclear@0: if(vf1->ready_stateready_statechannels); nuclear@0: n1=vorbis_info_blocksize(vi1,0)>>(1+hs1); nuclear@0: n2=vorbis_info_blocksize(vi2,0)>>(1+hs2); nuclear@0: w1=vorbis_window(&vf1->vd,0); nuclear@0: w2=vorbis_window(&vf2->vd,0); nuclear@0: nuclear@0: for(i=0;ichannels;i++) nuclear@0: lappcm[i]=alloca(sizeof(**lappcm)*n1); nuclear@0: nuclear@0: _ov_getlap(vf1,vi1,&vf1->vd,lappcm,n1); nuclear@0: nuclear@0: /* have a lapping buffer from vf1; now to splice it into the lapping nuclear@0: buffer of vf2 */ nuclear@0: /* consolidate and expose the buffer. */ nuclear@0: vorbis_synthesis_lapout(&vf2->vd,&pcm); nuclear@0: nuclear@0: #if 0 nuclear@0: _analysis_output_always("pcmL",0,pcm[0],n1*2,0,0,0); nuclear@0: _analysis_output_always("pcmR",0,pcm[1],n1*2,0,0,0); nuclear@0: #endif nuclear@0: nuclear@0: /* splice */ nuclear@0: _ov_splice(pcm,lappcm,n1,n2,vi1->channels,vi2->channels,w1,w2); nuclear@0: nuclear@0: /* done */ nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: static int _ov_64_seek_lap(OggVorbis_File *vf,ogg_int64_t pos, nuclear@0: int (*localseek)(OggVorbis_File *,ogg_int64_t)){ nuclear@0: vorbis_info *vi; nuclear@0: float **lappcm; nuclear@0: float **pcm; nuclear@0: float *w1,*w2; nuclear@0: int n1,n2,ch1,ch2,hs; nuclear@0: int i,ret; nuclear@0: nuclear@0: if(vf->ready_statechannels; nuclear@0: n1=vorbis_info_blocksize(vi,0)>>(1+hs); nuclear@0: w1=vorbis_window(&vf->vd,0); /* window arrays from libvorbis are nuclear@0: persistent; even if the decode state nuclear@0: from this link gets dumped, this nuclear@0: window array continues to exist */ nuclear@0: nuclear@0: lappcm=alloca(sizeof(*lappcm)*ch1); nuclear@0: for(i=0;ivd,lappcm,n1); nuclear@0: nuclear@0: /* have lapping data; seek and prime the buffer */ nuclear@0: ret=localseek(vf,pos); nuclear@0: if(ret)return ret; nuclear@0: ret=_ov_initprime(vf); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: /* Guard against cross-link changes; they're perfectly legal */ nuclear@0: vi=ov_info(vf,-1); nuclear@0: ch2=vi->channels; nuclear@0: n2=vorbis_info_blocksize(vi,0)>>(1+hs); nuclear@0: w2=vorbis_window(&vf->vd,0); nuclear@0: nuclear@0: /* consolidate and expose the buffer. */ nuclear@0: vorbis_synthesis_lapout(&vf->vd,&pcm); nuclear@0: nuclear@0: /* splice */ nuclear@0: _ov_splice(pcm,lappcm,n1,n2,ch1,ch2,w1,w2); nuclear@0: nuclear@0: /* done */ nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: int ov_raw_seek_lap(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: return _ov_64_seek_lap(vf,pos,ov_raw_seek); nuclear@0: } nuclear@0: nuclear@0: int ov_pcm_seek_lap(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: return _ov_64_seek_lap(vf,pos,ov_pcm_seek); nuclear@0: } nuclear@0: nuclear@0: int ov_pcm_seek_page_lap(OggVorbis_File *vf,ogg_int64_t pos){ nuclear@0: return _ov_64_seek_lap(vf,pos,ov_pcm_seek_page); nuclear@0: } nuclear@0: nuclear@0: static int _ov_d_seek_lap(OggVorbis_File *vf,double pos, nuclear@0: int (*localseek)(OggVorbis_File *,double)){ nuclear@0: vorbis_info *vi; nuclear@0: float **lappcm; nuclear@0: float **pcm; nuclear@0: float *w1,*w2; nuclear@0: int n1,n2,ch1,ch2,hs; nuclear@0: int i,ret; nuclear@0: nuclear@0: if(vf->ready_statechannels; nuclear@0: n1=vorbis_info_blocksize(vi,0)>>(1+hs); nuclear@0: w1=vorbis_window(&vf->vd,0); /* window arrays from libvorbis are nuclear@0: persistent; even if the decode state nuclear@0: from this link gets dumped, this nuclear@0: window array continues to exist */ nuclear@0: nuclear@0: lappcm=alloca(sizeof(*lappcm)*ch1); nuclear@0: for(i=0;ivd,lappcm,n1); nuclear@0: nuclear@0: /* have lapping data; seek and prime the buffer */ nuclear@0: ret=localseek(vf,pos); nuclear@0: if(ret)return ret; nuclear@0: ret=_ov_initprime(vf); nuclear@0: if(ret)return(ret); nuclear@0: nuclear@0: /* Guard against cross-link changes; they're perfectly legal */ nuclear@0: vi=ov_info(vf,-1); nuclear@0: ch2=vi->channels; nuclear@0: n2=vorbis_info_blocksize(vi,0)>>(1+hs); nuclear@0: w2=vorbis_window(&vf->vd,0); nuclear@0: nuclear@0: /* consolidate and expose the buffer. */ nuclear@0: vorbis_synthesis_lapout(&vf->vd,&pcm); nuclear@0: nuclear@0: /* splice */ nuclear@0: _ov_splice(pcm,lappcm,n1,n2,ch1,ch2,w1,w2); nuclear@0: nuclear@0: /* done */ nuclear@0: return(0); nuclear@0: } nuclear@0: nuclear@0: int ov_time_seek_lap(OggVorbis_File *vf,double pos){ nuclear@0: return _ov_d_seek_lap(vf,pos,ov_time_seek); nuclear@0: } nuclear@0: nuclear@0: int ov_time_seek_page_lap(OggVorbis_File *vf,double pos){ nuclear@0: return _ov_d_seek_lap(vf,pos,ov_time_seek_page); nuclear@0: }