1 // #define NEWBUFFERING
4 /* 1 frame = 4608 byte PCM */
6 #define LOCAL static inline
22 #include "libavutil/common.h"
23 #include "libavutil/internal.h"
25 #include "cpudetect.h"
26 //#include "liba52/mm_accel.h"
29 #include "libvo/fastmemcpy.h"
35 // 3DNow! and 3DNow!Ext routines don't compile under AMD64
37 #undef HAVE_AMD3DNOWEXT
38 #define HAVE_AMD3DNOW 0
39 #define HAVE_AMD3DNOWEXT 0
42 //static FILE* mp3_file=NULL;
48 int MP3_fpos
=0; // current file position
49 int MP3_framesize
=0; // current framesize
50 int MP3_bitrate
=0; // current bitrate
51 int MP3_samplerate
=0; // current samplerate
56 static long outscale
= 32768;
60 int mplayer_audio_read(char *buf
,int size
);
62 LOCAL
int mp3_read(char *buf
,int size
){
63 // int len=fread(buf,1,size,mp3_file);
64 int len
=mplayer_audio_read(buf
,size
);
65 if(len
>0) MP3_fpos
+=len
;
66 // if(len!=size) MP3_eof=1;
70 int mp3_read(char *buf
,int size
);
73 * Modified for use with MPlayer, for details see the changelog at
74 * http://svn.mplayerhq.hu/mplayer/trunk/
79 //void mp3_seek(int pos){
80 // fseek(mp3_file,pos,SEEK_SET);
81 // return (MP3_fpos=ftell(mp3_file));
86 #define MAXFRAMESIZE 1280
87 #define MAXFRAMESIZE2 (512+MAXFRAMESIZE)
89 static int fsizeold
=0,ssize
=0;
90 static unsigned char bsspace
[2][MAXFRAMESIZE2
]; /* !!!!! */
91 static unsigned char *bsbufold
=bsspace
[0]+512;
92 static unsigned char *bsbuf
=bsspace
[1]+512;
96 static unsigned char *wordpointer
;
99 static unsigned char *pcm_sample
; /* outbuffer address */
100 static int pcm_point
= 0; /* outbuffer offset */
102 static struct frame fr
;
104 static int tabsel_123
[2][3][16] = {
105 { {0,32,64,96,128,160,192,224,256,288,320,352,384,416,448,},
106 {0,32,48,56, 64, 80, 96,112,128,160,192,224,256,320,384,},
107 {0,32,40,48, 56, 64, 80, 96,112,128,160,192,224,256,320,} },
109 { {0,32,48,56,64,80,96,112,128,144,160,176,192,224,256,},
110 {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,},
111 {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,} }
114 static int freqs
[9] = { 44100, 48000, 32000, 22050, 24000, 16000 , 11025 , 12000 , 8000 };
116 LOCAL
unsigned int getbits(short number_of_bits
)
119 // if(MP3_frames>=7741) printf("getbits: bits=%d bitsleft=%d wordptr=%x\n",number_of_bits,bitsleft,wordpointer);
120 if((bitsleft
-=number_of_bits
)<0) return 0;
121 if(!number_of_bits
) return 0;
122 rval
= wordpointer
[0];
124 rval
|= wordpointer
[1];
126 rval
|= wordpointer
[2];
129 bitindex
+= number_of_bits
;
130 rval
>>= (24-number_of_bits
);
131 wordpointer
+= (bitindex
>>3);
137 LOCAL
unsigned int getbits_fast(short number_of_bits
)
140 // if(MP3_frames>=7741) printf("getbits_fast: bits=%d bitsleft=%d wordptr=%x\n",number_of_bits,bitsleft,wordpointer);
141 if((bitsleft
-=number_of_bits
)<0) return 0;
142 if(!number_of_bits
) return 0;
144 rval
= bswap_16(*((uint16_t *)wordpointer
));
147 * we may not be able to address unaligned 16-bit data on non-x86 cpus.
148 * Fall back to some portable code.
150 rval
= wordpointer
[0] << 8 | wordpointer
[1];
154 bitindex
+= number_of_bits
;
155 rval
>>= (16-number_of_bits
);
156 wordpointer
+= (bitindex
>>3);
161 LOCAL
unsigned int get1bit(void)
164 // if(MP3_frames>=7741) printf("get1bit: bitsleft=%d wordptr=%x\n",bitsleft,wordpointer);
165 if((--bitsleft
)<0) return 0;
166 rval
= *wordpointer
<< bitindex
;
168 wordpointer
+= (bitindex
>>3);
170 return ((rval
>>7)&1);
173 LOCAL
void set_pointer(int backstep
)
175 // if(backstep!=512 && backstep>fsizeold)
176 // printf("\rWarning! backstep (%d>%d) \n",backstep,fsizeold);
177 wordpointer
= bsbuf
+ ssize
- backstep
;
178 if (backstep
) fast_memcpy(wordpointer
,bsbufold
+fsizeold
-backstep
,backstep
);
180 bitsleft
+=8*backstep
;
181 // printf("Backstep %d (bitsleft=%d)\n",backstep,bitsleft);
184 LOCAL
int stream_head_read(unsigned char *hbuf
,uint32_t *newhead
){
185 if(mp3_read(hbuf
,4) != 4) return FALSE
;
187 *newhead
= bswap_32(*((uint32_t*)hbuf
));
190 * we may not be able to address unaligned 32-bit data on non-x86 cpus.
191 * Fall back to some portable code.
202 LOCAL
int stream_head_shift(unsigned char *hbuf
,uint32_t *head
){
203 *((uint32_t*)hbuf
) >>= 8;
204 if(mp3_read(hbuf
+3,1) != 1) return 0;
211 * decode a header and write the information
212 * into the frame structure
214 LOCAL
int decode_header(struct frame
*fr
,uint32_t newhead
){
217 if( (newhead
& 0xffe00000) != 0xffe00000 ||
218 (newhead
& 0x0000fc00) == 0x0000fc00) return FALSE
;
220 fr
->lay
= 4-((newhead
>>17)&3);
221 // if(fr->lay!=3) return FALSE;
223 if( newhead
& (1<<20) ) {
224 fr
->lsf
= (newhead
& (1<<19)) ? 0x0 : 0x1;
232 fr
->sampling_frequency
= 6 + ((newhead
>>10)&0x3);
234 fr
->sampling_frequency
= ((newhead
>>10)&0x3) + (fr
->lsf
*3);
236 if(fr
->sampling_frequency
>8) return FALSE
; // valid: 0..8
238 fr
->error_protection
= ((newhead
>>16)&0x1)^0x1;
239 fr
->bitrate_index
= ((newhead
>>12)&0xf);
240 fr
->padding
= ((newhead
>>9)&0x1);
241 fr
->extension
= ((newhead
>>8)&0x1);
242 fr
->mode
= ((newhead
>>6)&0x3);
243 fr
->mode_ext
= ((newhead
>>4)&0x3);
244 fr
->copyright
= ((newhead
>>3)&0x1);
245 fr
->original
= ((newhead
>>2)&0x1);
246 fr
->emphasis
= newhead
& 0x3;
248 MP3_channels
= fr
->stereo
= (fr
->mode
== MPG_MD_MONO
) ? 1 : 2;
250 if(!fr
->bitrate_index
){
251 // fprintf(stderr,"Free format not supported.\n");
257 MP3_bitrate
=tabsel_123
[fr
->lsf
][1][fr
->bitrate_index
];
258 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
259 fr
->framesize
= MP3_bitrate
* 144000;
260 fr
->framesize
/= MP3_samplerate
;
261 MP3_framesize
=fr
->framesize
;
262 fr
->framesize
+= fr
->padding
- 4;
266 ssize
= (fr
->stereo
== 1) ? 9 : 17;
268 ssize
= (fr
->stereo
== 1) ? 17 : 32;
269 if(fr
->error_protection
) ssize
+= 2;
271 MP3_bitrate
=tabsel_123
[fr
->lsf
][2][fr
->bitrate_index
];
272 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
273 fr
->framesize
= MP3_bitrate
* 144000;
274 fr
->framesize
/= MP3_samplerate
<<(fr
->lsf
);
275 MP3_framesize
=fr
->framesize
;
276 fr
->framesize
+= fr
->padding
- 4;
279 // fr->jsbound = (fr->mode == MPG_MD_JOINT_STEREO) ? (fr->mode_ext<<2)+4 : 32;
280 MP3_bitrate
=tabsel_123
[fr
->lsf
][0][fr
->bitrate_index
];
281 MP3_samplerate
=freqs
[fr
->sampling_frequency
];
282 fr
->framesize
= MP3_bitrate
* 12000;
283 fr
->framesize
/= MP3_samplerate
;
284 MP3_framesize
= ((fr
->framesize
+fr
->padding
)<<2);
285 fr
->framesize
= MP3_framesize
-4;
286 // printf("framesize=%d\n",fr->framesize);
289 MP3_framesize
=fr
->framesize
=0;
290 // fprintf(stderr,"Sorry, unsupported layer type.\n");
293 if(fr
->framesize
<=0 || fr
->framesize
>MAXFRAMESIZE
) return FALSE
;
299 LOCAL
int stream_read_frame_body(int size
){
301 /* flip/init buffer for Layer 3 */
303 bsbuf
= bsspace
[bsnum
]+512;
304 bsnum
= (bsnum
+ 1) & 1;
306 if( mp3_read(bsbuf
,size
) != size
) return 0; // broken frame
309 wordpointer
= (unsigned char *) bsbuf
;
316 /*****************************************************************
317 * read next frame return number of frames read.
319 LOCAL
int read_frame(struct frame
*fr
){
322 unsigned char buf
[8];
323 unsigned long dummy
; // for alignment
325 int skipped
,resyncpos
;
333 fsizeold
=fr
->framesize
; /* for Layer3 */
334 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
335 if(!decode_header(fr
,newhead
)){
336 // invalid header! try to resync stream!
338 printf("ReSync: searching for a valid header... (pos=%X)\n",MP3_fpos
);
341 while(!decode_header(fr
,newhead
)){
342 if(!stream_head_shift(hbuf
.buf
,&newhead
)) return 0;
344 resyncpos
=MP3_fpos
-4;
345 // found valid header
347 printf("ReSync: found valid hdr at %X fsize=%ld ",resyncpos
,fr
->framesize
);
349 if(!stream_read_frame_body(fr
->framesize
)) return 0; // read body
351 fsizeold
=fr
->framesize
; /* for Layer3 */
352 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
353 if(!decode_header(fr
,newhead
)){
354 // invalid hdr! go back...
358 // mp3_seek(resyncpos+1);
359 if(!stream_head_read(hbuf
.buf
,&newhead
)) return 0;
368 skipped
=resyncpos
-skipped
;
369 // if(skipped && !MP3_resync) printf("\r%d bad bytes skipped (resync at 0x%X) \n",skipped,resyncpos);
371 // 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":"");
373 /* read main data into memory */
374 if(!stream_read_frame_body(fr
->framesize
)){
375 printf("\nBroken frame at 0x%X \n",resyncpos
);
382 if(frames
==1) goto resync
;
388 static int _has_mmx
= 0; // used by layer2.c, layer3.c to pre-scale coeffs
390 /******************************************************************************/
391 /* PUBLIC FUNCTIONS */
392 /******************************************************************************/
394 /* It's hidden from gcc in assembler */
395 void dct64_MMX(short *, short *, real
*);
396 void dct64_MMX_3dnow(short *, short *, real
*);
397 void dct64_MMX_3dnowex(short *, short *, real
*);
398 void dct64_sse(short *, short *, real
*);
399 void dct64_altivec(real
*, real
*, real
*);
400 void (*dct64_MMX_func
)(short *, short *, real
*);
406 #include "cpudetect.h"
408 // Init decoder tables. Call first, once!
409 #ifdef CONFIG_FAKE_MONO
410 void MP3_Init(int fakemono
){
415 //gCpuCaps.hasMMX=gCpuCaps.hasMMX2=gCpuCaps.hasSSE=0; // for testing!
420 make_decode_tables(outscale
);
426 synth_func
= synth_1to1_MMX
;
431 if (gCpuCaps
.has3DNowExt
)
433 dct36_func
=dct36_3dnowex
;
434 dct64_MMX_func
= dct64_MMX_3dnowex
;
435 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using 3DNow!Ex optimized decore!\n");
440 if (gCpuCaps
.has3DNow
)
442 dct36_func
= dct36_3dnow
;
443 dct64_MMX_func
= dct64_MMX_3dnow
;
444 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using 3DNow! optimized decore!\n");
451 dct64_MMX_func
= dct64_sse
;
452 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using SSE optimized decore!\n");
460 dct64_MMX_func
= dct64_MMX
;
461 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using MMX optimized decore!\n");
465 if (gCpuCaps
.cpuType
>= CPUTYPE_I586
)
467 synth_func
= synth_1to1_pent
;
468 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using Pentium optimized decore!\n");
471 #endif /* ARCH_X86_32 */
473 if (gCpuCaps
.hasAltiVec
)
475 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using AltiVec optimized decore!\n");
480 synth_func
= NULL
; /* use default c version */
481 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"mp3lib: using generic C decore!\n");
484 #ifdef CONFIG_FAKE_MONO
486 fr
.synth
=synth_1to1_l
;
487 else if (fakemono
== 2)
488 fr
.synth
=synth_1to1_r
;
494 fr
.synth_mono
=synth_1to1_mono2stereo
;
496 fr
.down_sample_sblimit
= SBLIMIT
>>(fr
.down_sample
);
499 init_layer3(fr
.down_sample_sblimit
);
500 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"MP3lib: init layer2&3 finished, tables done\n");
505 void MP3_Close(void){
507 if(mp3_file
) fclose(mp3_file
);
511 // Open a file, init buffers. Call once per file!
512 int MP3_Open(char *filename
,int buffsize
){
513 MP3_eof
=1; // lock decoding
514 MP3_pause
=1; // lock playing
515 if(mp3_file
) MP3_Close(); // close prev. file
518 mp3_file
=fopen(filename
,"rb");
519 // printf("MP3_Open: file='%s'",filename);
520 // if(!mp3_file){ printf(" not found!\n"); return 0;} else printf("Ok!\n");
521 if(!mp3_file
) return 0;
523 MP3_filesize
=MP3_PrintTAG();
524 fseek(mp3_file
,0,SEEK_SET
);
526 MP3_InitBuffers(buffsize
);
527 if(!tables_done_flag
) MP3_Init();
528 MP3_eof
=0; // allow decoding
529 MP3_pause
=0; // allow playing
535 // Read & decode a single frame. Called by sound driver.
536 int MP3_DecodeFrame(unsigned char *hova
,short single
){
539 if(!read_frame(&fr
))return(0);
540 if(single
==-2){ set_pointer(512); return(1); }
541 if(fr
.error_protection
) getbits(16); /* skip crc */
544 case 2: do_layer2(&fr
,single
);break;
545 case 3: do_layer3(&fr
,single
);break;
546 case 1: do_layer1(&fr
,single
);break;
548 return 0; // unsupported
551 return(pcm_point
?pcm_point
:2);
554 // Prints last frame header in ascii.
555 void MP3_PrintHeader(void){
556 static char *modes
[4] = { "Stereo", "Joint-Stereo", "Dual-Channel", "Single-Channel" };
557 static char *layers
[4] = { "???" , "I", "II", "III" };
559 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"\rMPEG %s, Layer %s, %d Hz %d kbit %s, BPF: %d\n",
560 fr
.mpeg25
? "2.5" : (fr
.lsf
? "2.0" : "1.0"),
561 layers
[fr
.lay
],freqs
[fr
.sampling_frequency
],
562 tabsel_123
[fr
.lsf
][fr
.lay
-1][fr
.bitrate_index
],
563 modes
[fr
.mode
],fr
.framesize
+4);
564 mp_msg(MSGT_DECAUDIO
,MSGL_V
,"Channels: %d, copyright: %s, original: %s, CRC: %s, emphasis: %d\n",
565 fr
.stereo
,fr
.copyright
?"Yes":"No",
566 fr
.original
?"Yes":"No",fr
.error_protection
?"Yes":"No",
573 // Read & print ID3 TAG. Do not call when playing!!! returns filesize.
574 int MP3_PrintTAG(void){
586 char artist
[31]={0,};
589 char comment
[31]={0,};
594 fseek(mp3_file
,0,SEEK_END
);
595 fsize
=ftell(mp3_file
);
596 if(fseek(mp3_file
,-128,SEEK_END
)) return fsize
;
597 ret
=fread(&tag
,128,1,mp3_file
);
598 if(ret
!=1 || tag
.tag
[0]!='T' || tag
.tag
[1]!='A' || tag
.tag
[2]!='G') return fsize
;
600 strncpy(title
,tag
.title
,30);
601 strncpy(artist
,tag
.artist
,30);
602 strncpy(album
,tag
.album
,30);
603 strncpy(year
,tag
.year
,4);
604 strncpy(comment
,tag
.comment
,30);
606 if ( tag
.genre
<= sizeof(genre_table
)/sizeof(*genre_table
) ) {
607 strncpy(genre
, genre_table
[tag
.genre
], 30);
609 strncpy(genre
,"Unknown",30);
613 printf("Title : %30s Artist: %s\n",title
,artist
);
614 printf("Album : %30s Year : %4s\n",album
,year
);
615 printf("Comment: %30s Genre : %s\n",comment
,genre
);