* GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
* IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
* *
- * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2001 *
- * by the XIPHOPHORUS Company http://www.xiph.org/ *
+ * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2007 *
+ * by the Xiph.Org Foundation https://xiph.org/ *
* *
********************************************************************
function: illustrate seeking, and test it too
- last mod: $Id: seeking_example.c,v 1.12 2001/12/20 01:00:24 segher Exp $
********************************************************************/
# include <fcntl.h>
#endif
-void _verify(OggVorbis_File *ov,ogg_int64_t pos,
- ogg_int64_t val,ogg_int64_t pcmval,
- ogg_int64_t pcmlength,
- char *bigassbuffer){
+void _verify(OggVorbis_File *ov,
+ ogg_int64_t val,ogg_int64_t pcmval,double timeval,
+ ogg_int64_t pcmlength,
+ char *bigassbuffer){
+ off_t i;
int j;
long bread;
char buffer[4096];
int dummy;
+ ogg_int64_t pos;
+ int hs = ov_halfrate_p(ov);
/* verify the raw position, the pcm position and position decode */
if(val!=-1 && ov_raw_tell(ov)<val){
- printf("raw position out of tolerance: requested %ld, got %ld\n",
- (long)val,(long)ov_raw_tell(ov));
+ fprintf(stderr,"raw position out of tolerance: requested %ld, got %ld\n",
+ (long)val,(long)ov_raw_tell(ov));
exit(1);
}
if(pcmval!=-1 && ov_pcm_tell(ov)>pcmval){
- printf("pcm position out of tolerance: requested %ld, got %ld\n",
- (long)pcmval,(long)ov_pcm_tell(ov));
+ fprintf(stderr,"pcm position out of tolerance: requested %ld, got %ld\n",
+ (long)pcmval,(long)ov_pcm_tell(ov));
+ exit(1);
+ }
+ if(timeval!=-1 && ov_time_tell(ov)>timeval){
+ fprintf(stderr,"time position out of tolerance: requested %f, got %f\n",
+ timeval,ov_time_tell(ov));
exit(1);
}
pos=ov_pcm_tell(ov);
if(pos<0 || pos>pcmlength){
- printf("pcm position out of bounds: got %ld\n",(long)pos);
+ fprintf(stderr,"pcm position out of bounds: got %ld\n",(long)pos);
exit(1);
}
bread=ov_read(ov,buffer,4096,1,1,1,&dummy);
for(j=0;j<bread;j++){
- if(buffer[j]!=bigassbuffer[j+pos*2]){
- printf("data position after seek doesn't match pcm position\n");
+ if(buffer[j]!=bigassbuffer[j+((pos>>hs)*2)]){
+ fprintf(stderr,"data after seek doesn't match declared pcm position %ld\n",(long)pos);
+
+ for(i=0;i<(pcmlength>>hs)*2-bread;i++){
+ for(j=0;j<bread;j++)
+ if(buffer[j] != bigassbuffer[i+j])break;
+ if(j==bread){
+ fprintf(stderr,"data after seek appears to match position %ld\n",(long)((i/2)<<hs));
+ }
+ }
+ {
+ FILE *f=fopen("a.m","w");
+ for(j=0;j<bread;j++)fprintf(f,"%d %d\n",j,(int)buffer[j]);
+ fclose(f);
+ f=fopen("b.m","w");
+ for(j=-4096;j<bread+4096;j++)
+ if(j+((pos*2)>>hs)>=0 && (j+((pos*2)>>hs))<(pcmlength>>hs)*2)
+ fprintf(f,"%d %d\n",j,(int)bigassbuffer[j+((pos*2)>>hs)]);
+ fclose(f);
+ }
+
exit(1);
}
}
OggVorbis_File ov;
int i,ret;
ogg_int64_t pcmlength;
+ double timelength;
char *bigassbuffer;
int dummy;
+ int hs=0;
#ifdef _WIN32 /* We need to set stdin/stdout to binary mode. Damn windows. */
_setmode( _fileno( stdin ), _O_BINARY );
- _setmode( _fileno( stdout ), _O_BINARY );
#endif
/* open the file/pipe on stdin */
- if(ov_open(stdin,&ov,NULL,-1)<0){
- printf("Could not open input as an OggVorbis file.\n\n");
+ if(ov_open_callbacks(stdin,&ov,NULL,-1,OV_CALLBACKS_NOCLOSE)<0){
+ fprintf(stderr,"Could not open input as an OggVorbis file.\n\n");
exit(1);
}
+#if 0 /*enable this code to test seeking with halfrate decode */
+ if(ov_halfrate(&ov,1)){
+ fprintf(stderr,"Sorry; unable to set half-rate decode.\n\n");
+ exit(1);
+ }else
+ hs=1;
+#endif
+
if(ov_seekable(&ov)){
/* to simplify our own lives, we want to assume the whole file is
for(i=0;i<ov.links;i++){
vorbis_info *vi=ov_info(&ov,i);
if(vi->channels!=2){
- printf("Sorry; right now seeking_test can only use Vorbis files\n"
- "that are entirely stereo.\n\n");
- exit(1);
+ fprintf(stderr,"Sorry; right now seeking_test can only use Vorbis files\n"
+ "that are entirely stereo.\n\n");
+ exit(1);
}
}
-
+
/* because we want to do sample-level verification that the seek
does what it claimed, decode the entire file into memory */
- printf("loading....\n");
- fflush(stdout);
pcmlength=ov_pcm_total(&ov,-1);
- bigassbuffer=malloc(pcmlength*2); /* w00t */
+ timelength=ov_time_total(&ov,-1);
+ bigassbuffer=malloc((pcmlength>>hs)*2); /* w00t */
i=0;
- while(i<pcmlength*2){
- int ret=ov_read(&ov,bigassbuffer+i,pcmlength*2-i,1,1,1,&dummy);
- if(ret<0)continue;
+ while(i<(pcmlength>>hs)*2){
+ int ret=ov_read(&ov,bigassbuffer+i,((pcmlength>>hs)*2)-i,1,1,1,&dummy);
+ if(ret<0){
+ fprintf(stderr,"Error reading file.\n");
+ exit(1);
+ }
if(ret){
- i+=ret;
+ i+=ret;
}else{
- pcmlength=i/2;
+ pcmlength=(i/2)<<hs;
}
+ fprintf(stderr,"\rloading.... [%ld left] ",
+ (long)((pcmlength>>hs)*2-i));
}
-
- /* Exercise all the real seeking cases; ov_raw_seek,
- ov_pcm_seek_page and ov_pcm_seek. time seek is just a wrapper
- on pcm_seek */
+
{
ogg_int64_t length=ov.end;
- printf("testing raw seeking to random places in %ld bytes....\n",
- (long)length);
-
+ fprintf(stderr,"\rtesting raw seeking to random places in %ld bytes....\n",
+ (long)length);
+
for(i=0;i<1000;i++){
- ogg_int64_t val=(double)rand()/RAND_MAX*length;
- ogg_int64_t pos;
- printf("\r\t%d [raw position %ld]... ",i,(long)val);
- fflush(stdout);
- ret=ov_raw_seek(&ov,val);
- if(ret<0){
- printf("seek failed: %d\n",ret);
- exit(1);
- }
-
- _verify(&ov,pos,val,-1,pcmlength,bigassbuffer);
+ ogg_int64_t val=(double)rand()/RAND_MAX*length;
+ fprintf(stderr,"\r\t%d [raw position %ld]... ",i,(long)val);
+ ret=ov_raw_seek(&ov,val);
+ if(ret<0){
+ fprintf(stderr,"seek failed: %d\n",ret);
+ exit(1);
+ }
+
+ _verify(&ov,val,-1,-1.,pcmlength,bigassbuffer);
}
}
- printf("\r");
+ fprintf(stderr,"\r");
{
- ogg_int64_t length=ov.end;
- printf("testing pcm page seeking to random places in %ld samples....\n",
- (long)pcmlength);
-
+ fprintf(stderr,"testing pcm page seeking to random places in %ld samples....\n",
+ (long)pcmlength);
+
+ for(i=0;i<1000;i++){
+ ogg_int64_t val= i==0?(ogg_int64_t)0:(double)rand()/RAND_MAX*pcmlength;
+ fprintf(stderr,"\r\t%d [pcm position %ld]... ",i,(long)val);
+ ret=ov_pcm_seek_page(&ov,val);
+ if(ret<0){
+ fprintf(stderr,"seek failed: %d\n",ret);
+ exit(1);
+ }
+
+ _verify(&ov,-1,val,-1.,pcmlength,bigassbuffer);
+
+ }
+ }
+
+ fprintf(stderr,"\r");
+ {
+ fprintf(stderr,"testing pcm exact seeking to random places in %f seconds....\n",
+ timelength);
for(i=0;i<1000;i++){
- ogg_int64_t val=(double)rand()/RAND_MAX*pcmlength;
- ogg_int64_t pos;
- printf("\r\t%d [pcm position %ld]... ",i,(long)val);
- fflush(stdout);
- ret=ov_pcm_seek_page(&ov,val);
- if(ret<0){
- printf("seek failed: %d\n",ret);
- exit(1);
- }
-
- _verify(&ov,pos,-1,val,pcmlength,bigassbuffer);
+ ogg_int64_t val= i==0?(ogg_int64_t)0:(double)rand()/RAND_MAX*pcmlength;
+ fprintf(stderr,"\r\t%d [pcm position %ld]... ",i,(long)val);
+ ret=ov_pcm_seek(&ov,val);
+ if(ret<0){
+ fprintf(stderr,"seek failed: %d\n",ret);
+ exit(1);
+ }
+ if(ov_pcm_tell(&ov)!=((val>>hs)<<hs)){
+ fprintf(stderr,"Declared position didn't perfectly match request: %ld != %ld\n",
+ (long)val,(long)ov_pcm_tell(&ov));
+ exit(1);
+ }
+
+ _verify(&ov,-1,val,-1.,pcmlength,bigassbuffer);
}
}
-
- printf("\r");
+
+ fprintf(stderr,"\r");
{
- ogg_int64_t length=ov.end;
- printf("testing pcm exact seeking to random places in %ld samples....\n",
- (long)pcmlength);
-
+ fprintf(stderr,"testing time page seeking to random places in %f seconds....\n",
+ timelength);
+
for(i=0;i<1000;i++){
- ogg_int64_t val=(double)rand()/RAND_MAX*pcmlength;
- ogg_int64_t pos;
- printf("\r\t%d [pcm position %ld]... ",i,(long)val);
- fflush(stdout);
- ret=ov_pcm_seek(&ov,val);
- if(ret<0){
- printf("seek failed: %d\n",ret);
- exit(1);
- }
- if(ov_pcm_tell(&ov)!=val){
- printf("Decalred position didn't perfectly match request: %ld != %ld\n",
- (long)val,(long)ov_pcm_tell(&ov));
- exit(1);
- }
-
- _verify(&ov,pos,-1,val,pcmlength,bigassbuffer);
+ double val=(double)rand()/RAND_MAX*timelength;
+ fprintf(stderr,"\r\t%d [time position %f]... ",i,val);
+ ret=ov_time_seek_page(&ov,val);
+ if(ret<0){
+ fprintf(stderr,"seek failed: %d\n",ret);
+ exit(1);
+ }
+
+ _verify(&ov,-1,-1,val,pcmlength,bigassbuffer);
}
}
-
- printf("\r \nOK.\n\n");
+
+ fprintf(stderr,"\r");
+ {
+ fprintf(stderr,"testing time exact seeking to random places in %f seconds....\n",
+ timelength);
+
+ for(i=0;i<1000;i++){
+ double val=(double)rand()/RAND_MAX*timelength;
+ fprintf(stderr,"\r\t%d [time position %f]... ",i,val);
+ ret=ov_time_seek(&ov,val);
+ if(ret<0){
+ fprintf(stderr,"seek failed: %d\n",ret);
+ exit(1);
+ }
+ if(ov_time_tell(&ov)<val-1 || ov_time_tell(&ov)>val+1){
+ fprintf(stderr,"Declared position didn't perfectly match request: %f != %f\n",
+ val,ov_time_tell(&ov));
+ exit(1);
+ }
+
+ _verify(&ov,-1,-1,val,pcmlength,bigassbuffer);
+
+ }
+ }
+
+ fprintf(stderr,"\r \nOK.\n\n");
}else{
- printf("Standard input was not seekable.\n");
+ fprintf(stderr,"Standard input was not seekable.\n");
}
ov_clear(&ov);