#include "recorder.h"
#include "delay.h"
#include "usart.h"
#include "key.h"
#include "led.h"
//#include "lcd.h"
#include "vs10xx.h"
#include "malloc.h"
#include "ff.h"
#include "exfuns.h"
#include "text.h"     //VS1053的WAV录音有bug,这个plugin可以修正这个问题
const u16 wav_plugin[40]=/* Compressed plugin */
{
0x0007, 0x0001, 0x8010, 0x0006, 0x001c, 0x3e12, 0xb817, 0x3e14, /* 0 */
0xf812, 0x3e01, 0xb811, 0x0007, 0x9717, 0x0020, 0xffd2, 0x0030, /* 8 */
0x11d1, 0x3111, 0x8024, 0x3704, 0xc024, 0x3b81, 0x8024, 0x3101, /* 10 */
0x8024, 0x3b81, 0x8024, 0x3f04, 0xc024, 0x2808, 0x4800, 0x36f1, /* 18 */
0x9811, 0x0007, 0x0001, 0x8028, 0x0006, 0x0002, 0x2a00, 0x040e,
};
//激活PCM 录音模式
//agc:0,自动增益.1024相当于1倍,512相当于0.5倍,最大值65535=64倍
void recoder_enter_rec_mode(u16 agc)
{//如果是IMA ADPCM,采样率计算公式如下://采样率=CLKI/256*d;    //假设d=0,并2倍频,外部晶振为12.288M.那么Fc=(2*12288000)/256*6=16Khz//如果是线性PCM,采样率直接就写采样值 VS_WR_Cmd(SPI_BASS,0x0000);    VS_WR_Cmd(SPI_AICTRL0,8000); //设置采样率,设置为8KhzVS_WR_Cmd(SPI_AICTRL1,agc);      //设置增益,0,自动增益.1024相当于1倍,512相当于0.5倍,最大值65535=64倍    VS_WR_Cmd(SPI_AICTRL2,0);       //设置增益最大值,0,代表最大值65536=64XVS_WR_Cmd(SPI_AICTRL3,6);        //左通道(MIC单声道输入)VS_WR_Cmd(SPI_CLOCKF,0X2000);    //设置VS10XX的时钟,MULT:2倍频;ADD:不允许;CLK:12.288MhzVS_WR_Cmd(SPI_MODE,0x1804);     //MIC,录音激活    delay_ms(5);                  //等待至少1.35ms VS_Load_Patch((u16*)wav_plugin,40);//VS1053的WAV录音需要patch
}//初始化WAV头.
void recoder_wav_init(__WaveHeader* wavhead) //初始化WAV头
{wavhead->riff.ChunkID=0X46464952;  //"RIFF"wavhead->riff.ChunkSize=0;            //还未确定,最后需要计算wavhead->riff.Format=0X45564157;   //"WAVE"wavhead->fmt.ChunkID=0X20746D66;  //"fmt "wavhead->fmt.ChunkSize=16;            //大小为16个字节wavhead->fmt.AudioFormat=0X01;        //0X01,表示PCM;0X01,表示IMA ADPCMwavhead->fmt.NumOfChannels=1;      //单声道wavhead->fmt.SampleRate=8000;      //8Khz采样率 采样速率wavhead->fmt.ByteRate=wavhead->fmt.SampleRate*2;//16位,即2个字节wavhead->fmt.BlockAlign=2;          //块大小,2个字节为一个块wavhead->fmt.BitsPerSample=16;        //16位PCMwavhead->data.ChunkID=0X61746164;   //"data"wavhead->data.ChunkSize=0;            //数据大小,还需要计算
}//显示录音时长
//x,y:地址
//tsec:秒钟数.
void recoder_show_time(u32 tsec)
{   //显示录音时间             printf("TIME:");       printf("%d",tsec/60);   //分钟printf(":");printf("%d\r\n",tsec%60);   //秒钟
}
//通过时间获取文件名
//仅限在SD卡保存,不支持FLASH DISK保存
//组合成:形如"0:RECORDER/REC20120321210633.wav"的文件名
void recoder_new_pathname(u8 *pname)
{    u8 res;                     u16 index=0;while(index<0XFFFF){sprintf((char*)pname,"0:RECORDER/REC%05d.wav",index);res=f_open(ftemp,(const TCHAR*)pname,FA_READ);//尝试打开这个文件if(res==FR_NO_FILE)break;        //该文件名不存在=正是我们需要的.index++;}
}
//显示AGC大小
//x,y:坐标
//agc:增益值 1~15,表示1~15倍;0,表示自动增益
void recoder_show_agc(u8 agc)
{  printf("AGC:    ");        //显示名称,同时清楚上次的显示      if(agc==0)printf("AUTO\r\n"); //自动agc       else printf("%d\r\n",agc);          //显示AGC值
} //播放pname这个wav文件（也可以是MP3等）
u8 rec_play_wav(u8 *pname)
{    FIL* fmp3;u16 br;u8 res,rval=0;     u8 *databuf;             u16 i=0;              fmp3=(FIL*)mymalloc(sizeof(FIL));//申请内存databuf=(u8*)mymalloc(512);      //开辟512字节的内存区域if(databuf==NULL||fmp3==NULL)rval=0XFF ;//内存申请失败.if(rval==0){    VS_HD_Reset();            //硬复位VS_Soft_Reset();       //软复位 VS_Set_Vol(220);      //设置音量               VS_Reset_DecodeTime(); //复位解码时间         res=f_open(fmp3,(const TCHAR*)pname,FA_READ);//打开文件    if(res==0)//打开成功.{ VS_SPI_SpeedHigh();   //高速                           while(rval==0){res=f_read(fmp3,databuf,512,(UINT*)&br);//读出4096个字节  i=0;do//主播放循环{   if(VS_Send_MusicData(databuf+i)==0)i+=32;//给VS10XX发送音频数据else recoder_show_time(VS_Get_DecodeTime());//显示播放时间           }while(i<512);//循环发送4096个字节 if(br!=512||res!=0){rval=0;break;//读完了.         }                              }f_close(fmp3);}else rval=0XFF;//出现错误       } myfree(fmp3);myfree(databuf);return rval;
}
//录音机
//所有录音文件,均保存在SD卡RECORDER文件夹内.
u8 recoder_play(void)
{u8 res;u8 key;u8 rval=0;__WaveHeader *wavhead=0;u32 sectorsize=0;FIL* f_rec=0;                 //文件            DIR recdir;                     //目录u8 *recbuf;                     //数据内存   u16 w;u16 idx=0;      u8 rec_sta=0;                  //录音状态//[7]:0,没有录音;1,有录音;//[6:1]:保留//[0]:0,正在录音;1,暂停录音;u8 *pname=0;u8 timecnt=0;                  //计时器   u32 recsec=0;                  //录音时间u8 recagc=4;                 //默认增益为4 u8 playFlag=0;                    //播放标志while(f_opendir(&recdir,"0:/RECORDER"))//打开录音文件夹{    printf("RECORDER文件夹错误!\r\n");delay_ms(200);                            f_mkdir("0:/RECORDER");             //创建该目录   } f_rec=(FIL *)mymalloc(sizeof(FIL));    //开辟FIL字节的内存区域 if(f_rec==NULL)rval=1;    //申请失败wavhead=(__WaveHeader*)mymalloc(sizeof(__WaveHeader));//开辟__WaveHeader字节的内存区域if(wavhead==NULL)rval=1; recbuf=mymalloc(512);  if(recbuf==NULL)rval=1;             pname=mymalloc(30);                 //申请30个字节内存,类似"0:RECORDER/REC00001.wav"if(pname==NULL)rval=1;if(rval==0)                                 //内存申请OK{      recoder_enter_rec_mode(1024*recagc);             while(VS_RD_Reg(SPI_HDAT1)>>8);           //等到buf 较为空闲再开始  recoder_show_time(recsec);             //显示时间recoder_show_agc(recagc);             //显示agcpname[0]=0;                             //pname没有任何文件名       while(rval==0){key=KEY_Scan(0);switch(key){     case KEY0_PRES: //STOP&SAVEprintf("key0 is down\r\n");if(rec_sta&0X80)//有录音{wavhead->riff.ChunkSize=sectorsize*512+36;   //整个文件的大小-8;wavhead->data.ChunkSize=sectorsize*512;     //数据大小f_lseek(f_rec,0);                         //偏移到文件头.f_write(f_rec,(const void*)wavhead,sizeof(__WaveHeader),&bw);//写入头数据f_close(f_rec);sectorsize=0;}rec_sta=0;recsec=0;LED1=1;                            //关闭DS1      recoder_show_time(recsec);     //显示时间break;     case KEY1_PRES:    //REC/PAUSEprintf("key1 is down\r\n");if(rec_sta&0X01)//原来是暂停,继续录音{rec_sta&=0XFE;//取消暂停}else if(rec_sta&0X80)//已经在录音了,暂停{rec_sta|=0X01; //暂停}else               //还没开始录音 {rec_sta|=0X80;   //开始录音       recoder_new_pathname(pname);           //得到新的名字printf("%s\r\n",pname+11);   //显示当前录音文件名字recoder_wav_init(wavhead);              //初始化wav数据  res=f_open(f_rec,(const TCHAR*)pname, FA_CREATE_ALWAYS | FA_WRITE); if(res)            //文件创建失败{rec_sta=0;    //创建文件失败,不能录音rval=0XFE;    //提示是否存在SD卡}else res=f_write(f_rec,(const void*)wavhead,sizeof(__WaveHeader),&bw);//写入头数据} break;case WKUP_PRES://播放录音（仅在非录音状态下有效）printf("wk_up is down\r\n");if(rec_sta==0)playFlag=1;break;}
///
//读取数据            if(rec_sta==0X80)//已经在录音了{w=VS_RD_Reg(SPI_HDAT1);  if((w>=256)&&(w<896)){idx=0;                     while(idx<512)  //一次读取512字节{     w=VS_RD_Reg(SPI_HDAT0);                       recbuf[idx++]=w&0XFF;recbuf[idx++]=w>>8;}            res=f_write(f_rec,recbuf,512,&bw);//写入文件if(res){printf("err:%d\r\n",res);printf("bw:%d\r\n",bw);break;//写入出错.   }sectorsize++;//扇区数增加1,约为32ms    }          }else//没有开始录音，按KEY0播放音频{                               if(playFlag&&pname[0])//如果wk_up按键被按下,且pname不为空{                printf("播放:");          printf("%s\r\n",pname+11);    //显示当播放的文件名字   rec_play_wav(pname);                     //播放pnamerecoder_enter_rec_mode(1024*recagc);       //重新进入录音模式      while(VS_RD_Reg(SPI_HDAT1)>>8);               //等到buf 较为空闲再开始  recoder_show_time(recsec);                 //显示时间recoder_show_agc(recagc);                 //显示agc playFlag = 0;}delay_ms(5);timecnt++;if((timecnt%20)==0)LED1=!LED1;//DS1闪烁 }
/if(recsec!=(sectorsize*4/125))//录音时间显示{      LED1=!LED1;//DS0闪烁 recsec=sectorsize*4/125;recoder_show_time(recsec);//显示时间}}                     }                                myfree(wavhead);myfree(recbuf);   myfree(f_rec);     myfree(pname);return rval;
}