1 /******************************************************************** 2 * * 3 * THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE. * 4 * USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS * 5 * GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE * 6 * IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. * 7 * * 8 * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2007 * 9 * by the Xiph.Org Foundation http://www.xiph.org/ * 10 * * 11 ******************************************************************** 12 13 function: illustrate seeking, and test it too 14 last mod: $Id: seeking_example.c 16329 2009-07-24 01:53:20Z xiphmont $ 15 16 ********************************************************************/ 17 18 #include <stdlib.h> 19 #include <stdio.h> 20 #include "vorbis/codec.h" 21 #include "vorbis/vorbisfile.h" 22 23 #ifdef _WIN32 /* We need the following two to set stdin/stdout to binary */ 24 # include <io.h> 25 # include <fcntl.h> 26 #endif 27 28 void _verify(OggVorbis_File *ov, 29 ogg_int64_t val,ogg_int64_t pcmval,double timeval, 30 ogg_int64_t pcmlength, 31 char *bigassbuffer){ 32 int j; 33 long bread; 34 char buffer[4096]; 35 int dummy; 36 ogg_int64_t pos; 37 38 /* verify the raw position, the pcm position and position decode */ 39 if(val!=-1 && ov_raw_tell(ov)<val){ 40 fprintf(stderr,"raw position out of tolerance: requested %ld, got %ld\n", 41 (long)val,(long)ov_raw_tell(ov)); 42 exit(1); 43 } 44 if(pcmval!=-1 && ov_pcm_tell(ov)>pcmval){ 45 fprintf(stderr,"pcm position out of tolerance: requested %ld, got %ld\n", 46 (long)pcmval,(long)ov_pcm_tell(ov)); 47 exit(1); 48 } 49 if(timeval!=-1 && ov_time_tell(ov)>timeval){ 50 fprintf(stderr,"time position out of tolerance: requested %f, got %f\n", 51 timeval,ov_time_tell(ov)); 52 exit(1); 53 } 54 pos=ov_pcm_tell(ov); 55 if(pos<0 || pos>pcmlength){ 56 fprintf(stderr,"pcm position out of bounds: got %ld\n",(long)pos); 57 exit(1); 58 } 59 bread=ov_read(ov,buffer,4096,1,1,1,&dummy); 60 for(j=0;j<bread;j++){ 61 if(buffer[j]!=bigassbuffer[j+pos*2]){ 62 fprintf(stderr,"data position after seek doesn't match pcm position\n"); 63 64 { 65 FILE *f=fopen("a.m","w"); 66 for(j=0;j<bread;j++)fprintf(f,"%d\n",(int)buffer[j]); 67 fclose(f); 68 f=fopen("b.m","w"); 69 for(j=0;j<bread;j++)fprintf(f,"%d\n",(int)bigassbuffer[j+pos*2]); 70 fclose(f); 71 } 72 73 exit(1); 74 } 75 } 76 } 77 78 int main(){ 79 OggVorbis_File ov; 80 int i,ret; 81 ogg_int64_t pcmlength; 82 double timelength; 83 char *bigassbuffer; 84 int dummy; 85 86 #ifdef _WIN32 /* We need to set stdin/stdout to binary mode. Damn windows. */ 87 _setmode( _fileno( stdin ), _O_BINARY ); 88 #endif 89 90 91 /* open the file/pipe on stdin */ 92 if(ov_open_callbacks(stdin,&ov,NULL,-1,OV_CALLBACKS_NOCLOSE)<0){ 93 fprintf(stderr,"Could not open input as an OggVorbis file.\n\n"); 94 exit(1); 95 } 96 97 if(ov_seekable(&ov)){ 98 99 /* to simplify our own lives, we want to assume the whole file is 100 stereo. Verify this to avoid potentially mystifying users 101 (pissing them off is OK, just don't confuse them) */ 102 for(i=0;i<ov.links;i++){ 103 vorbis_info *vi=ov_info(&ov,i); 104 if(vi->channels!=2){ 105 fprintf(stderr,"Sorry; right now seeking_test can only use Vorbis files\n" 106 "that are entirely stereo.\n\n"); 107 exit(1); 108 } 109 } 110 111 /* because we want to do sample-level verification that the seek 112 does what it claimed, decode the entire file into memory */ 113 pcmlength=ov_pcm_total(&ov,-1); 114 timelength=ov_time_total(&ov,-1); 115 bigassbuffer=malloc(pcmlength*2); /* w00t */ 116 i=0; 117 while(i<pcmlength*2){ 118 int ret=ov_read(&ov,bigassbuffer+i,pcmlength*2-i,1,1,1,&dummy); 119 if(ret<0){ 120 fprintf(stderr,"Error reading file.\n"); 121 exit(1); 122 } 123 if(ret){ 124 i+=ret; 125 }else{ 126 pcmlength=i/2; 127 } 128 fprintf(stderr,"\rloading.... [%ld left] ", 129 (long)(pcmlength*2-i)); 130 } 131 132 { 133 ogg_int64_t length=ov.end; 134 fprintf(stderr,"\rtesting raw seeking to random places in %ld bytes....\n", 135 (long)length); 136 137 for(i=0;i<1000;i++){ 138 ogg_int64_t val=(double)rand()/RAND_MAX*length; 139 fprintf(stderr,"\r\t%d [raw position %ld]... ",i,(long)val); 140 ret=ov_raw_seek(&ov,val); 141 if(ret<0){ 142 fprintf(stderr,"seek failed: %d\n",ret); 143 exit(1); 144 } 145 146 _verify(&ov,val,-1,-1.,pcmlength,bigassbuffer); 147 148 } 149 } 150 151 fprintf(stderr,"\r"); 152 { 153 fprintf(stderr,"testing pcm page seeking to random places in %ld samples....\n", 154 (long)pcmlength); 155 156 for(i=0;i<1000;i++){ 157 ogg_int64_t val=(double)rand()/RAND_MAX*pcmlength; 158 fprintf(stderr,"\r\t%d [pcm position %ld]... ",i,(long)val); 159 ret=ov_pcm_seek_page(&ov,val); 160 if(ret<0){ 161 fprintf(stderr,"seek failed: %d\n",ret); 162 exit(1); 163 } 164 165 _verify(&ov,-1,val,-1.,pcmlength,bigassbuffer); 166 167 } 168 } 169 170 fprintf(stderr,"\r"); 171 { 172 fprintf(stderr,"testing pcm exact seeking to random places in %ld samples....\n", 173 (long)pcmlength); 174 175 for(i=0;i<1000;i++){ 176 ogg_int64_t val=(double)rand()/RAND_MAX*pcmlength; 177 fprintf(stderr,"\r\t%d [pcm position %ld]... ",i,(long)val); 178 ret=ov_pcm_seek(&ov,val); 179 if(ret<0){ 180 fprintf(stderr,"seek failed: %d\n",ret); 181 exit(1); 182 } 183 if(ov_pcm_tell(&ov)!=val){ 184 fprintf(stderr,"Declared position didn't perfectly match request: %ld != %ld\n", 185 (long)val,(long)ov_pcm_tell(&ov)); 186 exit(1); 187 } 188 189 _verify(&ov,-1,val,-1.,pcmlength,bigassbuffer); 190 191 } 192 } 193 194 fprintf(stderr,"\r"); 195 { 196 fprintf(stderr,"testing time page seeking to random places in %f seconds....\n", 197 timelength); 198 199 for(i=0;i<1000;i++){ 200 double val=(double)rand()/RAND_MAX*timelength; 201 fprintf(stderr,"\r\t%d [time position %f]... ",i,val); 202 ret=ov_time_seek_page(&ov,val); 203 if(ret<0){ 204 fprintf(stderr,"seek failed: %d\n",ret); 205 exit(1); 206 } 207 208 _verify(&ov,-1,-1,val,pcmlength,bigassbuffer); 209 210 } 211 } 212 213 fprintf(stderr,"\r"); 214 { 215 fprintf(stderr,"testing time exact seeking to random places in %f seconds....\n", 216 timelength); 217 218 for(i=0;i<1000;i++){ 219 double val=(double)rand()/RAND_MAX*timelength; 220 fprintf(stderr,"\r\t%d [time position %f]... ",i,val); 221 ret=ov_time_seek(&ov,val); 222 if(ret<0){ 223 fprintf(stderr,"seek failed: %d\n",ret); 224 exit(1); 225 } 226 if(ov_time_tell(&ov)<val-1 || ov_time_tell(&ov)>val+1){ 227 fprintf(stderr,"Declared position didn't perfectly match request: %f != %f\n", 228 val,ov_time_tell(&ov)); 229 exit(1); 230 } 231 232 _verify(&ov,-1,-1,val,pcmlength,bigassbuffer); 233 234 } 235 } 236 237 fprintf(stderr,"\r \nOK.\n\n"); 238 239 240 }else{ 241 fprintf(stderr,"Standard input was not seekable.\n"); 242 } 243 244 ov_clear(&ov); 245 return 0; 246 } 247 248 249 250 251 252 253 254 255 256 257 258 259 260
