1 // #define NEWBUFFERING
4 /* 1 frame = 4608 byte PCM */
6 #define LOCAL static inline
22 #include "libavutil/common.h"
24 #include "cpudetect.h"
25 //#include "liba52/mm_accel.h"
28 #include "libvo/fastmemcpy.h"
31 // 3DNow! and 3DNow!Ext routines don't compile under AMD64
36 //static FILE* mp3_file=NULL;
42 int MP3_fpos
=0; // current file position
43 int MP3_framesize
=0; // current framesize
44 int MP3_bitrate
=0; // current bitrate
45 int MP3_samplerate
=0; // current samplerate
50 static long outscale
= 32768;
54 int mplayer_audio_read(char *buf
,int size
);
56 LOCAL
int mp3_read(char *buf
,int size
){
57 // int len=fread(buf,1,size,mp3_file);
58 int len
=mplayer_audio_read(buf
,size
);
59 if(len
>0) MP3_fpos
+=len
;
60 // if(len!=size) MP3_eof=1;
64 int mp3_read(char *buf
,int size
);
67 * Modified for use with MPlayer, for details see the changelog at
68 * http://svn.mplayerhq.hu/mplayer/trunk/
73 //void mp3_seek(int pos){
74 // fseek(mp3_file,pos,SEEK_SET);
75 // return (MP3_fpos=ftell(mp3_file));
80 #define MAXFRAMESIZE 1280
81 #define MAXFRAMESIZE2 (512+MAXFRAMESIZE)
83 static int fsizeold
=0,ssize
=0;
84 static unsigned char bsspace
[2][MAXFRAMESIZE2
]; /* !!!!! */
85 static unsigned char *bsbufold
=bsspace
[0]+512;
86 static unsigned char *bsbuf
=bsspace
[1]+512;
90 static unsigned char *wordpointer
;
93 static unsigned char *pcm_sample
; /* outbuffer address */
94 static int pcm_point
= 0; /* outbuffer offset */
96 static struct frame fr
;
98 static int tabsel_123
[2][3][16] = {
99 { {0,32,64,96,128,160,192,224,256,288,320,352,384,416,448,},
100 {0,32,48,56, 64, 80, 96,112,128,160,192,224,256,320,384,},
101 {0,32,40,48, 56, 64, 80, 96,112,128,160,192,224,256,320,} },
103 { {0,32,48,56,64,80,96,112,128,144,160,176,192,224,256,},
104 {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,},
105 {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,} }
108 static int freqs
[9] = { 44100, 48000, 32000, 22050, 24000, 16000 , 11025 , 12000 , 8000 };
110 LOCAL
unsigned int getbits(short number_of_bits
)
113 // if(MP3_frames>=7741) printf("getbits: bits=%d bitsleft=%d wordptr=%x\n",number_of_bits,bitsleft,wordpointer);
114 if((bitsleft
-=number_of_bits
)<0) return 0;
115 if(!number_of_bits
) return 0;
116 rval
= wordpointer
[0];
118 rval
|= wordpointer
[1];
120 rval
|= wordpointer
[2];
123 bitindex
+= number_of_bits
;
124 rval
>>= (24-number_of_bits
);
125 wordpointer
+= (bitindex
>>3);
131 LOCAL
unsigned int getbits_fast(short number_of_bits
)
134 // if(MP3_frames>=7741) printf("getbits_fast: bits=%d bitsleft=%d wordptr=%x\n",number_of_bits,bitsleft,wordpointer);
135 if((bitsleft
-=number_of_bits
)<0) return 0;
136 if(!number_of_bits
) return 0;
138 rval
= bswap_16(*((uint16_t *)wordpointer
));
141 * we may not be able to address unaligned 16-bit data on non-x86 cpus.
142 * Fall back to some portable code.
144 rval
= wordpointer
[0] << 8 | wordpointer
[1];
148 bitindex
+= number_of_bits
;
149 rval
>>= (16-number_of_bits
);
150 wordpointer
+= (bitindex
>>3);
155 LOCAL
unsigned int get1bit(void)
158 // if(MP3_frames>=7741) printf("get1bit: bitsleft=%d wordptr=%x\n",bitsleft,wordpointer);
159 if((--bitsleft
)<0) return 0;
160 rval
= *wordpointer
<< bitindex
;
162 wordpointer
+= (bitindex
>>3);
164 return ((rval
>>7)&1);
167 LOCAL
void set_pointer(int backstep
)
169 // if(backstep!=512 && backstep>fsizeold)
170 // printf("\rWarning! backstep (%d>%d) \n",backstep,fsizeold);
171 wordpointer
= bsbuf
+ ssize
- backstep
;
172 if (backstep
) fast_memcpy(wordpointer
,bsbufold
+fsizeold
-backstep
,backstep
);
174 bitsleft
+=8*backstep
;
175 // printf("Backstep %d (bitsleft=%d)\n",backstep,bitsleft);
178 LOCAL
int stream_head_read(unsigned char *hbuf
,uint32_t *newhead
){
179 if(mp3_read(hbuf
,4) != 4) return FALSE
;
181 *newhead
= bswap_32(*((uint32_t*)hbuf
));
184 * we may not be able to address unaligned 32-bit data on non-x86 cpus.
185 * Fall back to some portable code.
196 LOCAL
int stream_head_shift(unsigned char *hbuf
,uint32_t *head
){
197 *((uint32_t*)hbuf
) >>= 8;
198 if(mp3_read(hbuf
+3,1) != 1) return 0;
205 * decode a header and write the information
206 * into the frame structure
208 LOCAL
int decode_header(struct frame
*fr
,uint32_t newhead
){
211 if( (newhead
& 0xffe00000) != 0xffe00000 ||
212 (newhead
& 0x0000fc00) == 0x0000fc00) return FALSE
;
214 fr
->lay
= 4-((newhead
>>17)&3);
215 // if(fr->lay!=3) return FALSE;
217 if( newhead
& (1<<20) ) {
218 fr
->lsf
= (newhead
& (1<<19)) ? 0x0 : 0x1;
226 fr
->sampling_frequency
= 6 + ((newhead
>>10)&0x3);
228 fr
->sampling_frequency
= ((newhead
>>10)&0x3) + (fr
->lsf
*3);
230 if(fr
->sampling_frequency
>8) return FALSE
; // valid: 0..8
232 fr
->error_protection
= ((newhead
>>16)&0x1)^0x1;
233 fr
->bitrate_index
= ((newhead
>>12)&0xf);
234 fr
->padding
= ((newhead
>>9)&0x1);
235 fr
->extension
= ((newhead
>>8)&0x1);
236 fr
->mode
= ((newhead
>>6)&0x3);
237 fr
->mode_ext
= ((newhead
>>4)&0x3);
238 fr
->copyright
= ((newhead
>>3)&0x1);
239 fr
->original
= ((newhead
>>2)&0x1);
240 fr
->emphasis
= newhead
& 0x3;
242 MP3_channels
= fr
->stereo
= (fr
->mode
== MPG_MD_MONO
) ? 1 : 2;
244 if(!fr
->bitrate_index
){
245 // fprintf(stderr,"Free format not supported.\n");
251 MP3_bitrate
=tabsel_123
[fr
->lsf
][1][fr
->bitrate_index
];
252 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
253 fr
->framesize
= MP3_bitrate
* 144000;
254 fr
->framesize
/= MP3_samplerate
;
255 MP3_framesize
=fr
->framesize
;
256 fr
->framesize
+= fr
->padding
- 4;
260 ssize
= (fr
->stereo
== 1) ? 9 : 17;
262 ssize
= (fr
->stereo
== 1) ? 17 : 32;
263 if(fr
->error_protection
) ssize
+= 2;
265 MP3_bitrate
=tabsel_123
[fr
->lsf
][2][fr
->bitrate_index
];
266 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
267 fr
->framesize
= MP3_bitrate
* 144000;
268 fr
->framesize
/= MP3_samplerate
<<(fr
->lsf
);
269 MP3_framesize
=fr
->framesize
;
270 fr
->framesize
+= fr
->padding
- 4;
273 // fr->jsbound = (fr->mode == MPG_MD_JOINT_STEREO) ? (fr->mode_ext<<2)+4 : 32;
274 MP3_bitrate
=tabsel_123
[fr
->lsf
][0][fr
->bitrate_index
];
275 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
276 fr
->framesize
= MP3_bitrate
* 12000;
277 fr
->framesize
/= MP3_samplerate
;
278 MP3_framesize
= ((fr
->framesize
+fr
->padding
)<<2);
279 fr
->framesize
= MP3_framesize
-4;
280 // printf("framesize=%d\n",fr->framesize);
283 MP3_framesize
=fr
->framesize
=0;
284 // fprintf(stderr,"Sorry, unsupported layer type.\n");
287 if(fr
->framesize
<=0 || fr
->framesize
>MAXFRAMESIZE
) return FALSE
;
293 LOCAL
int stream_read_frame_body(int size
){
295 /* flip/init buffer for Layer 3 */
297 bsbuf
= bsspace
[bsnum
]+512;
298 bsnum
= (bsnum
+ 1) & 1;
300 if( mp3_read(bsbuf
,size
) != size
) return 0; // broken frame
303 wordpointer
= (unsigned char *) bsbuf
;
310 /*****************************************************************
311 * read next frame return number of frames read.
313 LOCAL
int read_frame(struct frame
*fr
){
316 unsigned char buf
[8];
317 unsigned long dummy
; // for alignment
319 int skipped
,resyncpos
;
327 fsizeold
=fr
->framesize
; /* for Layer3 */
328 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
329 if(!decode_header(fr
,newhead
)){
330 // invalid header! try to resync stream!
332 printf("ReSync: searching for a valid header... (pos=%X)\n",MP3_fpos
);
335 while(!decode_header(fr
,newhead
)){
336 if(!stream_head_shift(hbuf
.buf
,&newhead
)) return 0;
338 resyncpos
=MP3_fpos
-4;
339 // found valid header
341 printf("ReSync: found valid hdr at %X fsize=%ld ",resyncpos
,fr
->framesize
);
343 if(!stream_read_frame_body(fr
->framesize
)) return 0; // read body
345 fsizeold
=fr
->framesize
; /* for Layer3 */
346 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
347 if(!decode_header(fr
,newhead
)){
348 // invalid hdr! go back...
352 // mp3_seek(resyncpos+1);
353 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
362 skipped
=resyncpos
-skipped
;
363 // if(skipped && !MP3_resync) printf("\r%d bad bytes skipped (resync at 0x%X) \n",skipped,resyncpos);
365 // printf("%8X [%08X] %d %d (%d)%s%s\n",MP3_fpos-4,newhead,fr->framesize,fr->mode,fr->mode_ext,fr->error_protection?" CRC":"",fr->padding?" PAD":"");
367 /* read main data into memory */
368 if(!stream_read_frame_body(fr
->framesize
)){
369 printf("\nBroken frame at 0x%X \n",resyncpos
);
376 if(frames
==1) goto resync
;
382 static int _has_mmx
= 0; // used by layer2.c, layer3.c to pre-scale coeffs
384 /******************************************************************************/
385 /* PUBLIC FUNCTIONS */
386 /******************************************************************************/
388 /* It's hidden from gcc in assembler */
389 void dct64_MMX(short *, short *, real
*);
390 void dct64_MMX_3dnow(short *, short *, real
*);
391 void dct64_MMX_3dnowex(short *, short *, real
*);
392 void dct64_sse(short *, short *, real
*);
393 void dct64_altivec(real
*, real
*, real
*);
394 void (*dct64_MMX_func
)(short *, short *, real
*);
400 #include "cpudetect.h"
402 // Init decoder tables. Call first, once!
403 #ifdef CONFIG_FAKE_MONO
404 void MP3_Init(int fakemono
){
409 //gCpuCaps.hasMMX=gCpuCaps.hasMMX2=gCpuCaps.hasSSE=0; // for testing!
414 make_decode_tables(outscale
);
420 synth_func
= synth_1to1_MMX
;
425 if (gCpuCaps
.has3DNowExt
)
427 dct36_func
=dct36_3dnowex
;
428 dct64_MMX_func
= dct64_MMX_3dnowex
;
429 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using 3DNow!Ex optimized decore!\n");
434 if (gCpuCaps
.has3DNow
)
436 dct36_func
= dct36_3dnow
;
437 dct64_MMX_func
= dct64_MMX_3dnow
;
438 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using 3DNow! optimized decore!\n");
445 dct64_MMX_func
= dct64_sse
;
446 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using SSE optimized decore!\n");
454 dct64_MMX_func
= dct64_MMX
;
455 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using MMX optimized decore!\n");
459 if (gCpuCaps
.cpuType
>= CPUTYPE_I586
)
461 synth_func
= synth_1to1_pent
;
462 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using Pentium optimized decore!\n");
465 #endif /* ARCH_X86_32 */
467 if (gCpuCaps
.hasAltiVec
)
469 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using AltiVec optimized decore!\n");
474 synth_func
= NULL
; /* use default c version */
475 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using generic C decore!\n");
478 #ifdef CONFIG_FAKE_MONO
480 fr
.synth
=synth_1to1_l
;
481 else if (fakemono
== 2)
482 fr
.synth
=synth_1to1_r
;
488 fr
.synth_mono
=synth_1to1_mono2stereo
;
490 fr
.down_sample_sblimit
= SBLIMIT
>>(fr
.down_sample
);
493 init_layer3(fr
.down_sample_sblimit
);
494 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"MP3lib: init layer2&3 finished, tables done\n");
501 if(mp3_file
) fclose(mp3_file
);
505 // Open a file, init buffers. Call once per file!
506 int MP3_Open(char *filename
,int buffsize
){
507 MP3_eof
=1; // lock decoding
508 MP3_pause
=1; // lock playing
509 if(mp3_file
) MP3_Close(); // close prev. file
512 mp3_file
=fopen(filename
,"rb");
513 // printf("MP3_Open: file='%s'",filename);
514 // if(!mp3_file){ printf(" not found!\n"); return 0;} else printf("Ok!\n");
515 if(!mp3_file
) return 0;
517 MP3_filesize
=MP3_PrintTAG();
518 fseek(mp3_file
,0,SEEK_SET
);
520 MP3_InitBuffers(buffsize
);
521 if(!tables_done_flag
) MP3_Init();
522 MP3_eof
=0; // allow decoding
523 MP3_pause
=0; // allow playing
529 // Read & decode a single frame. Called by sound driver.
530 int MP3_DecodeFrame(unsigned char *hova
,short single
){
533 if(!read_frame(&fr
))return(0);
534 if(single
==-2){ set_pointer(512); return(1); }
535 if(fr
.error_protection
) getbits(16); /* skip crc */
538 case 2: do_layer2(&fr
,single
);break;
539 case 3: do_layer3(&fr
,single
);break;
540 case 1: do_layer1(&fr
,single
);break;
542 return 0; // unsupported
545 return(pcm_point
?pcm_point
:2);
548 // Prints last frame header in ascii.
549 void MP3_PrintHeader(void){
550 static char *modes
[4] = { "Stereo", "Joint-Stereo", "Dual-Channel", "Single-Channel" };
551 static char *layers
[4] = { "???" , "I", "II", "III" };
553 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"\rMPEG %s, Layer %s, %d Hz %d kbit %s, BPF: %d\n",
554 fr
.mpeg25
? "2.5" : (fr
.lsf
? "2.0" : "1.0"),
555 layers
[fr
.lay
],freqs
[fr
.sampling_frequency
],
556 tabsel_123
[fr
.lsf
][fr
.lay
-1][fr
.bitrate_index
],
557 modes
[fr
.mode
],fr
.framesize
+4);
558 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"Channels: %d, copyright: %s, original: %s, CRC: %s, emphasis: %d\n",
559 fr
.stereo
,fr
.copyright
?"Yes":"No",
560 fr
.original
?"Yes":"No",fr
.error_protection
?"Yes":"No",
567 // Read & print ID3 TAG. Do not call when playing!!! returns filesize.
580 char artist
[31]={0,};
583 char comment
[31]={0,};
588 fseek(mp3_file
,0,SEEK_END
);
589 fsize
=ftell(mp3_file
);
590 if(fseek(mp3_file
,-128,SEEK_END
)) return fsize
;
591 ret
=fread(&tag
,128,1,mp3_file
);
592 if(ret
!=1 || tag
.tag
[0]!='T' || tag
.tag
[1]!='A' || tag
.tag
[2]!='G') return fsize
;
594 strncpy(title
,tag
.title
,30);
595 strncpy(artist
,tag
.artist
,30);
596 strncpy(album
,tag
.album
,30);
597 strncpy(year
,tag
.year
,4);
598 strncpy(comment
,tag
.comment
,30);
600 if ( tag
.genre
<= sizeof(genre_table
)/sizeof(*genre_table
) ) {
601 strncpy(genre
, genre_table
[tag
.genre
], 30);
603 strncpy(genre
,"Unknown",30);
607 printf("Title : %30s Artist: %s\n",title
,artist
);
608 printf("Album : %30s Year : %4s\n",album
,year
);
609 printf("Comment: %30s Genre : %s\n",comment
,genre
);