开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 其他游戏 > 查看源码
src1.c
资源名称：wow-313-source.rar　[点击查看]
上传用户：yisoukefu
上传日期：2020-08-09
资源大小：39506k
文件大小：14k
源码类别：

其他游戏

开发平台：

Visual C++

src1.c：源码内容
  2. #include <windows.h>
  3. #include <math.h>
  5. #define ARCH_X86
  6. typedef UINT uint32_t;
  7. typedef WORD uint16_t;
  8. #define real float
  9. #include "mpg123.h"
  10. #define fast_memcpy memcpy
  11. static _inline uint16_t bswap_16(uint16_t x)
  12. {
  13. __asm mov ax, x
  14. __asm bswap eax; 
  15. __asm shr eax, 16
  16. }
  18. static _inline uint32_t bswap_32(uint32_t x)
  19. {
  20. __asm mov eax, x
  21. __asm bswap eax; 
  22. }
  25. #define DECLARE_ALIGNED(n,t,v)      __declspec(align(n)) t v
  26. #define LOCAL static _inline
  29. #include        <stdlib.h>
  30. #include        <stdio.h>
  31. #include        <string.h>
  32. #include        <signal.h>
  33. #include        <math.h>
  36. #include "mpg123.h"
  37. #include "huffman.h"
  38. //#include "mp_msg.h"
  41. int MP3_frames=0;
  42. int MP3_eof=0;
  43. int MP3_pause=0;
  44. int MP3_filesize=0;
  45. int MP3_fpos=0;      // current file position
  46. int MP3_framesize=0; // current framesize
  47. int MP3_bitrate=0;   // current bitrate
  48. int MP3_samplerate=0;  // current samplerate
  49. int MP3_resync=0;
  50. int MP3_channels=0;
  51. int MP3_bps=2;
  53. static long outscale = 32768;
  54. #include "tabinit.c"
  56. #if 1
  57. extern int mplayer_audio_read(char *buf,int size);
  59. LOCAL int mp3_read(char *buf,int size){
  60. //  int len=fread(buf,1,size,mp3_file);
  61.   int len=mplayer_audio_read(buf,size);
  62.   if(len>0) MP3_fpos+=len;
  63. //  if(len!=size) MP3_eof=1;
  64.   return len;
  65. }
  66. #else
  67. extern int mp3_read(char *buf,int size);
  68. #endif
  69. /*
  70.  * Modified for use with MPlayer, for details see the changelog at
  71.  * http://svn.mplayerhq.hu/mplayer/trunk/
  72.  * $Id: sr1.c 23515 2007-06-08 14:38:25Z zuxy $
  73.  */
  76. //void mp3_seek(int pos){
  77. //  fseek(mp3_file,pos,SEEK_SET);
  78. //  return (MP3_fpos=ftell(mp3_file));
  79. //}
  81. /*       Frame reader           */
  83. #define MAXFRAMESIZE 1280
  84. #define MAXFRAMESIZE2 (512+MAXFRAMESIZE)
  86. static int fsizeold=0,ssize=0;
  87. static unsigned char bsspace[2][MAXFRAMESIZE2]; /* !!!!! */
  88. static unsigned char *bsbufold=bsspace[0]+512;
  89. static unsigned char *bsbuf=bsspace[1]+512;
  90. static int bsnum=0;
  92. static int bitindex;
  93. static unsigned char *wordpointer;
  94. static int bitsleft;
  96. static unsigned char *pcm_sample;   /* outbuffer address */
  97. static int pcm_point = 0;           /* outbuffer offset */
  99. static struct frame fr;
  101. static int tabsel_123[2][3][16] = {
  102.    { {0,32,64,96,128,160,192,224,256,288,320,352,384,416,448,},
  103.      {0,32,48,56, 64, 80, 96,112,128,160,192,224,256,320,384,},
  104.      {0,32,40,48, 56, 64, 80, 96,112,128,160,192,224,256,320,} },
  106.    { {0,32,48,56,64,80,96,112,128,144,160,176,192,224,256,},
  107.      {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,},
  108.      {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,} }
  109. };
  111. static int freqs[9] = { 44100, 48000, 32000, 22050, 24000, 16000 , 11025 , 12000 , 8000 };
  113. LOCAL unsigned int getbits(short number_of_bits)
  114. {
  115.   unsigned rval;
  116. //  if(MP3_frames>=7741) printf("getbits: bits=%d  bitsleft=%d  wordptr=%xn",number_of_bits,bitsleft,wordpointer);
  117.   if((bitsleft-=number_of_bits)<0) return 0;
  118.   if(!number_of_bits) return 0;
  119.          rval = wordpointer[0];
  120.          rval <<= 8;
  121.          rval |= wordpointer[1];
  122.          rval <<= 8;
  123.          rval |= wordpointer[2];
  124.          rval <<= bitindex;
  125.          rval &= 0xffffff;
  126.          bitindex += number_of_bits;
  127.          rval >>= (24-number_of_bits);
  128.          wordpointer += (bitindex>>3);
  129.          bitindex &= 7;
  130.   return rval;
  131. }
  134. LOCAL unsigned int getbits_fast(short number_of_bits)
  135. {
  136.   unsigned rval;
  137. //  if(MP3_frames>=7741) printf("getbits_fast: bits=%d  bitsleft=%d  wordptr=%xn",number_of_bits,bitsleft,wordpointer);
  138.   if((bitsleft-=number_of_bits)<0) return 0;
  139.   if(!number_of_bits) return 0;
  140. #ifdef ARCH_X86
  141.   rval = bswap_16(*((uint16_t *)wordpointer));
  142. #else
  143.   /*
  144.    * we may not be able to address unaligned 16-bit data on non-x86 cpus.
  145.    * Fall back to some portable code.
  146.    */
  147.   rval = wordpointer[0] << 8 | wordpointer[1];
  148. #endif
  149.          rval <<= bitindex;
  150.          rval &= 0xffff;
  151.          bitindex += number_of_bits;
  152.          rval >>= (16-number_of_bits);
  153.          wordpointer += (bitindex>>3);
  154.          bitindex &= 7;
  155.   return rval;
  156. }
  158. LOCAL unsigned int get1bit(void)
  159. {
  160.   unsigned char rval;
  161. //  if(MP3_frames>=7741) printf("get1bit: bitsleft=%d  wordptr=%xn",bitsleft,wordpointer);
  162.   if((--bitsleft)<0) return 0;
  163.   rval = *wordpointer << bitindex;
  164.   bitindex++;
  165.   wordpointer += (bitindex>>3);
  166.   bitindex &= 7;
  167.   return ((rval>>7)&1);
  168. }
  170. LOCAL void set_pointer(int backstep)
  171. {
  172. //  if(backstep!=512 && backstep>fsizeold)
  173. //    printf("rWarning! backstep (%d>%d)                                         n",backstep,fsizeold);
  174.   wordpointer = bsbuf + ssize - backstep;
  175.   if (backstep) fast_memcpy(wordpointer,bsbufold+fsizeold-backstep,backstep);
  176.   bitindex = 0;
  177.   bitsleft+=8*backstep;
  178. //  printf("Backstep %d  (bitsleft=%d)n",backstep,bitsleft);
  179. }
  181. LOCAL int stream_head_read(unsigned char *hbuf,uint32_t *newhead){
  182.   if(mp3_read(hbuf,4) != 4) return FALSE;
  183. #ifdef ARCH_X86
  184.   *newhead = bswap_32(*((uint32_t*)hbuf));
  185. #else
  186.   /*
  187.    * we may not be able to address unaligned 32-bit data on non-x86 cpus.
  188.    * Fall back to some portable code.
  189.    */
  190.   *newhead = 
  191.       hbuf[0] << 24 |
  192.       hbuf[1] << 16 |
  193.       hbuf[2] <<  8 |
  194.       hbuf[3];
  195. #endif
  196.   return TRUE;
  197. }
  199. LOCAL int stream_head_shift(unsigned char *hbuf,uint32_t *head){
  200.   *((uint32_t*)hbuf) >>= 8;
  201.   if(mp3_read(hbuf+3,1) != 1) return 0;
  202.   *head <<= 8;
  203.   *head |= hbuf[3];
  204.   return 1;
  205. }
  207. /*
  208.  * decode a header and write the information
  209.  * into the frame structure
  210.  */
  211. LOCAL int decode_header(struct frame *fr,uint32_t newhead){
  213.     // head_check:
  214.     if( (newhead & 0xffe00000) != 0xffe00000 ||  
  215.         (newhead & 0x0000fc00) == 0x0000fc00) return FALSE;
  217.     fr->lay = 4-((newhead>>17)&3);
  218. //    if(fr->lay!=3) return FALSE;
  220.     if( newhead & (1<<20) ) {
  221.       fr->lsf = (newhead & (1<<19)) ? 0x0 : 0x1;
  222.       fr->mpeg25 = 0;
  223.     } else {
  224.       fr->lsf = 1;
  225.       fr->mpeg25 = 1;
  226.     }
  228.     if(fr->mpeg25)
  229.       fr->sampling_frequency = 6 + ((newhead>>10)&0x3);
  230.     else
  231.       fr->sampling_frequency = ((newhead>>10)&0x3) + (fr->lsf*3);
  233.     if(fr->sampling_frequency>8) return FALSE;  // valid: 0..8
  235.     fr->error_protection = ((newhead>>16)&0x1)^0x1;
  236.     fr->bitrate_index = ((newhead>>12)&0xf);
  237.     fr->padding   = ((newhead>>9)&0x1);
  238.     fr->extension = ((newhead>>8)&0x1);
  239.     fr->mode      = ((newhead>>6)&0x3);
  240.     fr->mode_ext  = ((newhead>>4)&0x3);
  241.     fr->copyright = ((newhead>>3)&0x1);
  242.     fr->original  = ((newhead>>2)&0x1);
  243.     fr->emphasis  = newhead & 0x3;
  245.     MP3_channels = fr->stereo    = (fr->mode == MPG_MD_MONO) ? 1 : 2;
  247.     if(!fr->bitrate_index){
  248. //      fprintf(stderr,"Free format not supported.n");
  249.       return FALSE;
  250.     }
  252. switch(fr->lay){
  253.   case 2:
  254.     MP3_bitrate=tabsel_123[fr->lsf][1][fr->bitrate_index];
  255.     MP3_samplerate=freqs[fr->sampling_frequency];
  256.     fr->framesize = MP3_bitrate * 144000;
  257.     fr->framesize /= MP3_samplerate;
  258.     MP3_framesize=fr->framesize;
  259.     fr->framesize += fr->padding - 4;
  260.     break;
  261.   case 3:
  262.     if(fr->lsf)
  263.       ssize = (fr->stereo == 1) ? 9 : 17;
  264.     else
  265.       ssize = (fr->stereo == 1) ? 17 : 32;
  266.     if(fr->error_protection) ssize += 2;
  268.     MP3_bitrate=tabsel_123[fr->lsf][2][fr->bitrate_index];
  269.     MP3_samplerate=freqs[fr->sampling_frequency];
  270.     fr->framesize  = MP3_bitrate * 144000;
  271.     fr->framesize /= MP3_samplerate<<(fr->lsf);
  272.     MP3_framesize=fr->framesize;
  273.     fr->framesize += fr->padding - 4;
  274.     break;
  275.   case 1:
  276. //    fr->jsbound = (fr->mode == MPG_MD_JOINT_STEREO) ? (fr->mode_ext<<2)+4 : 32;
  277.     MP3_bitrate=tabsel_123[fr->lsf][0][fr->bitrate_index];
  278.     MP3_samplerate=freqs[fr->sampling_frequency];
  279.     fr->framesize  = MP3_bitrate * 12000;
  280.     fr->framesize /= MP3_samplerate;
  281.     MP3_framesize  = ((fr->framesize+fr->padding)<<2);
  282.     fr->framesize  = MP3_framesize-4;
  283. //    printf("framesize=%dn",fr->framesize);
  284.     break;
  285.   default:
  286.     MP3_framesize=fr->framesize=0;
  287. //    fprintf(stderr,"Sorry, unsupported layer type.n");
  288.     return 0;
  289. }
  290.     if(fr->framesize<=0 || fr->framesize>MAXFRAMESIZE) return FALSE;
  292.     return 1;
  293. }
  296. LOCAL int stream_read_frame_body(int size){
  298.   /* flip/init buffer for Layer 3 */
  299.   bsbufold = bsbuf;
  300.   bsbuf = bsspace[bsnum]+512;
  301.   bsnum = (bsnum + 1) & 1;
  303.   if( mp3_read(bsbuf,size) != size) return 0; // broken frame
  305.   bitindex = 0;
  306.   wordpointer = (unsigned char *) bsbuf;
  307.   bitsleft=8*size;
  309.   return 1;
  310. }
  313. /*****************************************************************
  314.  * read next frame     return number of frames read.
  315.  */
  316. LOCAL int read_frame(struct frame *fr){
  317.   uint32_t newhead;
  318.   union {
  319.     unsigned char buf[8];
  320.     unsigned long dummy; // for alignment
  321.   } hbuf;
  322.   int skipped,resyncpos;
  323.   int frames=0;
  325. resync:
  326.   skipped=MP3_fpos;
  327.   resyncpos=MP3_fpos;
  329.   set_pointer(512);
  330.   fsizeold=fr->framesize;       /* for Layer3 */
  331.   if(!stream_head_read(hbuf.buf,&newhead)) return 0;
  332.   if(!decode_header(fr,newhead)){
  333.     // invalid header! try to resync stream!
  334. #ifdef DEBUG_RESYNC
  335.     printf("ReSync: searching for a valid header...  (pos=%X)n",MP3_fpos);
  336. #endif
  337. retry1:
  338.     while(!decode_header(fr,newhead)){
  339.       if(!stream_head_shift(hbuf.buf,&newhead)) return 0;
  340.     }
  341.     resyncpos=MP3_fpos-4;
  342.     // found valid header
  343. #ifdef DEBUG_RESYNC
  344.     printf("ReSync: found valid hdr at %X  fsize=%ld  ",resyncpos,fr->framesize);
  345. #endif
  346.     if(!stream_read_frame_body(fr->framesize)) return 0; // read body
  347.     set_pointer(512);
  348.     fsizeold=fr->framesize;       /* for Layer3 */
  349.     if(!stream_head_read(hbuf.buf,&newhead)) return 0;
  350.     if(!decode_header(fr,newhead)){
  351.       // invalid hdr! go back...
  352. #ifdef DEBUG_RESYNC
  353.       printf("INVALIDn");
  354. #endif
  355. //      mp3_seek(resyncpos+1);
  356.       if(!stream_head_read(hbuf.buf,&newhead)) return 0;
  357.       goto retry1;
  358.     }
  359. #ifdef DEBUG_RESYNC
  360.     printf("OK!n");
  361.     ++frames;
  362. #endif
  363.   }
  365.   skipped=resyncpos-skipped;
  366. //  if(skipped && !MP3_resync) printf("r%d bad bytes skipped  (resync at 0x%X)                          n",skipped,resyncpos);
  368. //  printf("%8X [%08X] %d %d (%d)%s%sn",MP3_fpos-4,newhead,fr->framesize,fr->mode,fr->mode_ext,fr->error_protection?" CRC":"",fr->padding?" PAD":"");
  370.   /* read main data into memory */
  371.   if(!stream_read_frame_body(fr->framesize)){
  372.     printf("nBroken frame at 0x%X                                                  n",resyncpos);
  373.     return 0;
  374.   }
  375.   ++frames;
  377.   if(MP3_resync){
  378.     MP3_resync=0;
  379.     if(frames==1) goto resync;
  380.   }
  382.   return frames;
  383. }
  385. static int _has_mmx = 0;  // used by layer2.c, layer3.c to pre-scale coeffs
  387. #include "layer2.c"
  388. #include "layer3.c"
  389. #include "layer1.c"
  391. /******************************************************************************/
  392. /*           PUBLIC FUNCTIONS                  */
  393. /******************************************************************************/
  395. /* It's hidden from gcc in assembler */
  396. extern void dct64_MMX(short *, short *, real *);
  397. extern void dct64_MMX_3dnow(short *, short *, real *);
  398. extern void dct64_MMX_3dnowex(short *, short *, real *);
  399. extern void dct64_sse(short *, short *, real *);
  400. void (*dct64_MMX_func)(short *, short *, real *);
  402. #include "cpudetect.h"
  404. // Init decoder tables.  Call first, once!
  405. #ifdef USE_FAKE_MONO
  406. void MP3_Init(int fakemono){
  407. #else
  408. void MP3_Init(){
  409. #endif
  411. //gCpuCaps.hasMMX=gCpuCaps.hasMMX2=gCpuCaps.hasSSE=0; // for testing!
  413.     _has_mmx = 0;
  414.     dct36_func = dct36;
  416.     make_decode_tables(outscale);
  418. #ifdef HAVE_MMX
  419.     if (gCpuCaps.hasMMX)
  420.     {
  421. _has_mmx = 1;
  422. synth_func = synth_1to1_MMX;
  423.     }
  424. #endif
  426. #ifdef HAVE_3DNOWEX
  427.     if (gCpuCaps.has3DNowExt)
  428.     {
  429. dct36_func=dct36_3dnowex;
  430. dct64_MMX_func= dct64_MMX_3dnowex;
  431. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using 3DNow!Ex optimized decore!n");
  432.     }
  433.     else
  434. #endif
  435. #ifdef HAVE_3DNOW
  436.     if (gCpuCaps.has3DNow)
  437.     {
  438. dct36_func = dct36_3dnow;
  439. dct64_MMX_func = dct64_MMX_3dnow;
  440. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using 3DNow! optimized decore!n");
  441.     }
  442.     else
  443. #endif
  444. #ifdef HAVE_SSE
  445.     if (gCpuCaps.hasSSE)
  446.     {
  447. dct64_MMX_func = dct64_sse;
  448. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using SSE optimized decore!n");
  449.     }
  450.     else
  451. #endif
  452. #ifdef ARCH_X86_32
  453. #ifdef HAVE_MMX
  454.     if (gCpuCaps.hasMMX)
  455.     {
  456. dct64_MMX_func = dct64_MMX;
  457. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using MMX optimized decore!n");
  458.     }
  459.     else
  460. #endif
  461.     if (gCpuCaps.cpuType >= CPUTYPE_I586)
  462.     {
  463. synth_func = synth_1to1_pent;
  464. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using Pentium optimized decore!n");
  465.     }
  466.     else
  467. #endif /* ARCH_X86_32 */
  468. #ifdef HAVE_ALTIVEC
  469.     if (gCpuCaps.hasAltiVec)
  470.     {
  471. mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using AltiVec optimized decore!n");
  472.     }
  473.     else
  474. #endif
  475.     {
  476. synth_func = NULL; /* use default c version */
  477. /// mp_msg(MSGT_DECAUDIO,MSGL_V,"mp3lib: using generic C decore!n");
  478.     }
  480. #ifdef USE_FAKE_MONO
  481.     if (fakemono == 1)
  482.         fr.synth=synth_1to1_l;
  483.     else if (fakemono == 2)
  484.         fr.synth=synth_1to1_r;
  485.     else
  486.         fr.synth=synth_1to1;
  487. #else
  488.     fr.synth=synth_1to1;
  489. #endif
  490.     fr.synth_mono=synth_1to1_mono2stereo;
  491.     fr.down_sample=0;
  492.     fr.down_sample_sblimit = SBLIMIT>>(fr.down_sample);
  494.     init_layer2();
  495.     init_layer3(fr.down_sample_sblimit);
  496. ///    mp_msg(MSGT_DECAUDIO,MSGL_V,"MP3lib: init layer2&3 finished, tables donen");
  497. }
  500. // Read & decode a single frame. Called by sound driver.
  501. int MP3_DecodeFrame(unsigned char *hova,short single){
  502.    pcm_sample = hova;
  503.    pcm_point = 0;
  504.    if(!read_frame(&fr))return(0);
  505.    if(single==-2){ set_pointer(512); return(1); }
  506.    if(fr.error_protection) getbits(16); /* skip crc */
  507.    fr.single=single;
  508.    switch(fr.lay){
  509.      case 2: do_layer2(&fr,single);break;
  510.      case 3: do_layer3(&fr,single);break;
  511.      case 1: do_layer1(&fr,single);break;
  512.      default:
  513.          return 0; // unsupported
  514.    }
  515. //   ++MP3_frames;
  516.    return(pcm_point?pcm_point:2);
  517. }