//****************************************
// MP3ファイルを浩栏
// fn: 妒戎规
// clst: 遍琳倡幌クラスタ。==0 の眷圭は呵介から
// remainsec: 浩栏デ〖タ荒りセクタ眶
//****************************************
char play_music(uint fn, uint clst, long remainsec){
ulong sec;
uint remain;
uint cn;
uint i;
if (fn != search_MP3(fn)){
return -1;
}
MusicSize = (ulong)DataBuff[28] + ((ulong)DataBuff[29]<<8)
+ ((ulong)DataBuff[30]<<16) + ((ulong)DataBuff[31]<<24);
if (clst){
// 庞面から浩栏
Cluster = clst;
RemainSec = remainsec;
remain = MusicSize - (remainsec * 512);
} else {
// 呵介から浩栏
Cluster = (uint)DataBuff[26] + ((uint)DataBuff[27] << 8);
RemainSec = MusicSize / 512;
remain = MusicSize % 512;
}
if ((Cluster == 0xFFFF)||(Cluster < 2)){
return -2; // クラスタ佰撅
}
// 肌のクラスタを拇べておく
NextCluster = next_cluster(Cluster, 0, 0);
StopSw = 0;
RewSw = 0;
FfSw = 0;
cn = SectorsPerCluster;
sec = (((ulong)Cluster - 2) * (ulong)SectorsPerCluster + DataStart) * 512;
MP3_init();
Timer = 100; // READYタイマ〖セット
while (RemainSec > 0){
uchar data;
char bit;
if (SPI_read_open(sec)) return -2;
cli(); // 充哈み敦贿
SPI_out(0xFF); // 1byte誊のクロック流叫 & WAIT
for (i = 0; i < 512; i++){
while (!(inp(PIND)&(1<<MP3_DREQ))){ // VS1001 BUSYチェック
WDR; // ウォッチドッグタイマ〖リセット
Timer = 100; // READYタイマセット
if (NextCluster == 0){
// 肌のクラスタを拇べる
NextCluster = next_cluster(Cluster, sec, i);
} else {
sei(); // 充り哈み钓材
SLEEP;
cli(); // 充哈み敦贿
}
}
data = inp(SPDR);
outp(0xFF, SPDR); // SD/MMCカ〖ドへ肌のデ〖タリクエスト
if (data & 0x80){
sbi(PORTD, MP3_SI);
} else {
cbi(PORTD, MP3_SI);
}
sbi(PORTD, MP3_BSYNC); // BSYNC = H
sbi(PORTD, MP3_DCLK);
data <<= 1;
cbi(PORTD, MP3_DCLK);
cbi(PORTD, MP3_BSYNC); // BSYNC = L
for (bit = 0; bit < 7; bit++){
if (data & 0x80){
sbi(PORTD, MP3_SI);
} else {
cbi(PORTD, MP3_SI);
}
sbi(PORTD, MP3_DCLK);
data <<= 1;
cbi(PORTD, MP3_DCLK);
}
}
sei(); // 充り哈み钓材
SPI_read_close();
--RemainSec;
if (--cn > 0){
sec += 512; // 肌のセクタ
if (Debug && (cn == 1)){
uint n;
n = BattVolt;
WriteHex(n>>8);
WriteHex(n);
WriteCom(' ');
WriteHex(Cluster>>8);
WriteHex(Cluster);
WriteCom('\n');
}
} else {
// 肌のクラスタ
if (NextCluster == 0){
Cluster = next_cluster(Cluster, 0, 0);
} else {
Cluster = NextCluster;
NextCluster = 0;
}
if ((Cluster == 0xFFFF)||(Cluster < 2)){
// 佰撅クラスタが浮叫されたので动扩姜位
remain = 0;
break;
}
sec = (((ulong)Cluster - 2) * (ulong)SectorsPerCluster
+ DataStart) * 512;
cn = SectorsPerCluster;
}
check_batt(); // バッテリ〖チェック
if (Timer == 0){ // READYタイムアウトしたら
if (NoBusyRetry > 0){ // リトライしてもダメなら
beep(1, BEEP_LOW); // 你不ビ〖プ１搀
NoBusyRetry = 0;
FfSw = 0;
return 2; // FF胺いで姜位 ⅹ 肌の妒へ
} else {
NoBusyRetry = 1;
RewSw = 0;
return 3; // REW胺いで姜位 ⅹ その妒の呵介からリトライ
}
}
// STOP, FFボタンチェック
if (StopSw > 2){
beep(1, BEEP_HIGH);
NoBusyRetry = 0;
return 1;
} else if (FfSw > 2){
beep(1, BEEP_HIGH);
NoBusyRetry = 0;
return 2;
} else if (RewSw > 2){
beep(1, BEEP_HIGH);
NoBusyRetry = 0;
return 3;
}
}
NoBusyRetry = 0;
// １セクタ(512bytes)踏塔の尸を浩栏
if ((remain > 0)&&(remain < 512)){
uchar data;
char bit;
if (SPI_read_open(sec)) return -2;
cli(); // 充哈み敦贿
SPI_out(0xFF); // 1byte誊のクロック流叫□WAIT
for (i = 0; i < 512; i++){
data = inp(SPDR);
outp(0xFF, SPDR);
if (remain-- > 0){
while (!(inp(PIND)&(1<<MP3_DREQ))){
// VS1001 BUSY
WDR; // ウォッチドッグタイマクリア
sei(); // 充り哈み钓材
SLEEP;
cli(); // 充哈み敦贿
}
sbi(PORTD, MP3_BSYNC); // BSYNC = H
for (bit=0; bit<8; bit++){
if (data & 0x80){
sbi(PORTD, MP3_SI);
} else {
cbi(PORTD, MP3_SI);
}
sbi(PORTD, MP3_DCLK);
data <<= 1;
cbi(PORTD, MP3_DCLK);
cbi(PORTD, MP3_BSYNC); // BSYNC = L
}
}
}
sei(); // 充り哈み钓材
SPI_read_close();
}
return 0;
}
//****************************************
// 肌のクラスタを滇める
//****************************************
uint next_cluster(uint c, ulong sec, uint remain){
ulong addr;
uint data;
ulong fatadr;
uint i;
if (FATtype == 0){
// FAT12
addr = (ulong)FATstart * 512 + (ulong)c + (c >> 1);
if ((addr & 511) == 511){
if (sec != 0){
// 粕み哈みオ〖プン面なら粕み嘉て
for (i = remain; i < 512; i++) SPI_in();
SPI_read_close();
data = read_word(addr) & 0x00FF;
data |= ((read_word(addr+1) & 0x00FF) << 8);
// 浩刨オ〖プン、笆涟の疤弥まで粕み嘉て
if (SPI_read_open(sec)) return 0;
SPI_in();
for (i = 0; i < remain; i++) SPI_in();
} else {
// セクタをまたぐ
data = read_word(addr) & 0x00FF;
data |= ((read_word(addr+1) & 0x00FF) << 8);
}
} else {
fatadr = addr & 0xFFFFFE00;
if ((sec != 0)&&(fatadr != FatCacheAddr)){
// 粕み哈みオ〖プン面で FATバッファ痰跟なら粕み嘉て
for (i = remain; i < 512; i++) SPI_in();
SPI_read_close();
data = read_word(addr);
// 浩刨オ〖プン、笆涟の疤弥まで粕み嘉て
if (SPI_read_open(sec)) return 0xFFFF;
SPI_in();
for (i = 0; i < remain; i++) SPI_in();
} else {
data = read_word(addr);
}
}
if (c & 1){
c = data >> 4;
} else {
c = data & 0x0fff;
}
if (c >= 0x0ff8) c = 0xFFFF;
} else {
// FAT16
addr = (ulong)FATstart * 512 + (ulong)c * 2;
fatadr = addr & 0xFFFFFE00;
if ((sec != 0)&&(fatadr != FatCacheAddr)){
// 粕み哈みオ〖プン面で FATバッファ痰跟なら粕み嘉て
for (i = remain; i < 512; i++) SPI_in();
SPI_read_close();
c = read_word(addr);
// 浩刨オ〖プン、笆涟の疤弥まで粕み嘉て
if (SPI_read_open(sec)) return 0;
SPI_in();
for (i = 0; i < remain; i++) SPI_in();
} else {
c = read_word(addr);
}
if (c >= 0xFFF8) c = 0xFFFF;
}
return c;
}
//****************************************
// MMC/SDカ〖ドから 2byteを粕む
// セクタ董肠のアクセスはできないので
// 惧疤供镍で雇胃すること
//****************************************
uint read_word(ulong addr){
uint w;
uint b;
uchar *p;
b = addr & 511;
addr &= 0xFFFFFE00;
if (addr != FatCacheAddr){
if (SPI_read_open(addr)) return 0;
for (p = FatCache; p < (FatCache + 512); ){
*p++ = SPI_in();
}
SPI_read_close();
FatCacheAddr = addr;
}
w = (uint)FatCache[b++];
w |= ((uint)FatCache << 8);
return w;
}
//*******************************************************
// バッテリ〖排暗を拇べ、你すぎればシャットダウンする
//*******************************************************
int check_batt(void){
if (BattVolt < BATT_SHUTDOWN){
sbi(PORTB, SPI_CS); // SPI CS=H
beep(4, BEEP_LOW);
cli(); // 充哈み敦贿
if (RunningTimeH){
write_eeprom(EEPROM_RUNNING_TIME_OLD_M, RunningTimeM);
write_eeprom(EEPROM_RUNNING_TIME_OLD_H, RunningTimeH);
RunningTimeM = 0;
RunningTimeH = 0;
}
shutdown(0); // シャットダウン
}
return BattVolt;
}
//*********************************************************
// シャットダウン
// flag != 0 の眷圭は EEPROM今き哈みを乖わずに排富を磊る
//*********************************************************
void shutdown(char flag){
cli(); // 充哈み敦贿
sbi(PORTB, SPI_CS); // SPI CS=H
cbi(PORTB, MUTE); // 不兰ミュ〖ト
MP3_command(0, 0x0010); // VS1001k powerdown
if (!flag){
write_eeprom(EEPROM_VOLUME, Volume);
write_eeprom(EEPROM_MUSIC, PlayMusic);
write_eeprom(EEPROM_CLUSTER_L, Cluster);
write_eeprom(EEPROM_CLUSTER_H, Cluster>>8);
write_eeprom(EEPROM_REMAIN1, RemainSec);
write_eeprom(EEPROM_REMAIN2, RemainSec>>8);
write_eeprom(EEPROM_REMAIN3, RemainSec>>16);
write_eeprom(EEPROM_SIZE1, MusicSize);
write_eeprom(EEPROM_SIZE2, MusicSize>>8);
write_eeprom(EEPROM_SIZE3, MusicSize>>16);
write_eeprom(EEPROM_SIZE4, MusicSize>>24);
write_eeprom(EEPROM_RUNNING_TIME_M, RunningTimeM);
write_eeprom(EEPROM_RUNNING_TIME_H, RunningTimeH);
}
for(;;){ // 痰嘎ル〖プ
cbi(PORTC, POWER); // Power down
WDR;
SLEEP;
}
}
//*******************************************************
// EEPROM 今き哈み
//*******************************************************
void write_eeprom(uchar adrs, uchar data){
// 票じ柒推なら今き哈み瓢侯を乖わない
if (read_eeprom(adrs) != data){
while(inp(EECR) & (1<<EEWE));
outp(adrs >> 8, EEARH);
outp(adrs, EEARL);
outp(data, EEDR);
sbi(EECR, EEMWE);
sbi(EECR, EEWE);
}
}
//*******************************************************
// EEPROM 粕み哈み
//*******************************************************
uchar read_eeprom(uchar adrs){
while(inp(EECR) & (1<<EEWE));
outp(adrs >> 8, EEARH);
outp(adrs, EEARL);
sbi(EECR, EERE);
return inp(EEDR);
}
//****************************************
// BEEP
// 苞眶¨ n 棠瓢搀眶
// err != 0 ならエラ〖不(你い不)
// 充り哈み钓材にすることに庙罢
//****************************************
void beep(uchar n, char err){
char i;
cli(); // MP3_init()借妄面に不翁拇泪されたら氦るので充哈み敦贿
MP3_init();
sei(); // 充り哈み钓材
for (; n > 0; --n){
if (err){
MP3_sin(ErrorBeep);
} else {
MP3_sin(BeepData);
}
// 箕粗略ち。この粗が BEEPの不の墓さになる
for (i=0; i < 10*2; i++){ // 腆100ms
SLEEP;
}
MP3_sin(BeepStop);
// BEEPの不粗
for (i=0; i < 3*2; i++){ // 腆30ms
SLEEP;
}
}
MP3_sin(BeepStop); // 箕」贿まらないことがあるのでもう办搀
}
//****************************************
// EasyMP3 介袋步
//****************************************
void MP3_init(void){
MP3_command(0, 0x0004); // Soft Reset
InitWait();
MP3_command(0, 0x0000);
while(!(inp(PIND)&(1<<MP3_DREQ)));
MP3_command(11, ((uint)Volume << 8)|((uint)Volume)); // 不翁肋年
MP3_command(3, 0x8000 + (uint)((VS1001_CLOCK)/2000)); // Clock
InitWait();
}
//****************************************
// EasyMP3 テスト脱赖腹侨叫蜗
//****************************************
void MP3_sin(PGM_VOID_P data){
uchar i;
uchar bit;
uchar c;
for (i=0; i < 8; i++){
c = (uchar)PRG_RDB(data++);
sbi(PORTD, MP3_BSYNC);
for (bit=0; bit<8; bit++){
if (c & 0x80){
sbi(PORTD, MP3_SI);
} else {
cbi(PORTD, MP3_SI);
}
sbi(PORTD, MP3_DCLK);
c <<= 1;
cbi(PORTD, MP3_DCLK);
cbi(PORTD, MP3_BSYNC);
}
sbi(PORTD, MP3_SI);
}
}
//****************************************
// EasyMP3 コマンド叫蜗
//****************************************
void MP3_command(uchar addr, uint arg){
cbi(PORTD, MP3_CS);
MP3_com_write(2);
MP3_com_write(addr);
MP3_com_write(arg >> 8);
MP3_com_write(arg);
sbi(PORTD, MP3_CS);
}
//****************************************
// EasyMP3 コマンド掐蜗 踏蝗脱
//****************************************
/*
uint MP3_command_read(uchar addr){
char i;
uint r = 0;
cbi(PORTD, MP3_CS);
MP3_com_write(3);
MP3_com_write(addr);
for(i=0; i<16; i++){
sbi(PORTD, MP3_SCLK);
r <<= 1;
if (inp(PINB) & (1<<MP3_SO)){
r |= 1;
}
cbi(PORTD, MP3_SCLK);
}
sbi(PORTD, MP3_CS);
return r;
}
*/
//****************************************
// EasyMP3 コマンド 1byte叫蜗
//****************************************
void MP3_com_write(uchar data){
char i;
for (i=0; i<8; i++){
if (data & 0x80){
sbi(PORTD, MP3_SI);
} else {
cbi(PORTD, MP3_SI);
}
sbi(PORTD, MP3_SCLK);
data <<= 1;
cbi(PORTD, MP3_SCLK);
}
sbi(PORTD, MP3_SI);
}
//****************************************
// MMC/SDカ〖ドから 32byteを粕んで DataBuffに呈羌
//****************************************
void read_32(ulong addr){
uint i, b;
if (SPI_read_open(addr & 0xFFFFFE00)) return;
b = (uint)addr & 0x01FF;
for (i=0; i < 512; i++){
if (i == b){
int n;
for (n = 0; n < 32; n++){
DataBuff[n] = SPI_in();
i++;
}
} else {
SPI_in();
}
}
SPI_read_close();
}
//****************************************
// 介袋步箕のクロックウエイト
//****************************************
void InitWait(void){
uchar i;
for(i=0; i< 255; i++){
NOP;
}
}
//****************************************
// MMC/SDカ〖ド粕み哈みオ〖プン
//****************************************
uchar SPI_read_open(ulong adrs){
uint i;
uchar r;
uchar retry;
// カ〖ドによってはリトライが涩妥のようだ
for (retry = 0; retry < 100; retry++){
cbi(PORTB, SPI_CS); // SPI CS=L
r = SPI_command(17, adrs);
if (r == 0){
for (i = 0; i < 2000; i++){ // ものすごく略つ眷圭がある
r = SPI_in();
if (r == 0xFE){
return 0; // 啪流倡幌マ〖ク
}
}
} else if (r == 0xFE){
return 0; // 赖撅オ〖プン
}
sbi(PORTB, SPI_CS); // SPI CS=H
if (Debug){
WriteHex(r);
WriteCom(' ');
}
// InitWait();
}
return 1; // オ〖プンできなかった
}
//****************************************
// MMC/SDカ〖ド粕み哈みクロ〖ズ
// 1byteのずれがあっても丹にしない
//****************************************
void SPI_read_close(void){
uint i;
SPI_in(); // CRC
SPI_in(); // CRC
// BUSYチェック
for (i = 0; i < 1000; i++){
if (SPI_in() == 0xFF) break;
}
sbi(PORTB, SPI_CS); // SPI CS=H
}
//****************************************
// MMC/SD SPIコマンド叫蜗
//****************************************
uchar SPI_command(uchar com, ulong arg){
uint i;
uchar r;
// BUSYチェック 丝家のカ〖ドでは涩寇みたい
for (i = 0; i < 1000; i++){
r = SPI_in();
if (r == 0xFF) break;
}
if (r != 0xFF) return 1;
SPI_out(com|0x40);
SPI_out(arg >> 24);
SPI_out(arg >> 16);
SPI_out(arg >> 8);
SPI_out(arg);
SPI_out(0x95); // 介袋步コマンドのCRC
for(i = 0; i < 1000; i++){
r = SPI_in();
if (r == 0xFE) break;
if (!(r & 0x80)) break;
}
return r;
}
//****************************************
// MMC/SD SPIデ〖タ叫蜗
//****************************************
void SPI_out(uchar data){
outp(data, SPDR);
while(!(inp(SPSR) & 0x80));
}
//****************************************
// MMC/SD SPIデ〖タ掐蜗
//****************************************
uchar SPI_in(void){
outp(0xFF, SPDR);
while(!(inp(SPSR) & 0x80));
return inp(SPDR);
}
//****************************************
// MMC/SD SPIクロック姜位略ち
// SPDRをアクセスしてない眷圭は
// SPIF=0になって痰嘎ル〖プする眷圭があることに庙罢
//****************************************
void SPI_wait(void){
while(!(inp(SPSR) & 0x80));
}
//****************************************
// 1セクタ〖粕み哈んで山绩する
//****************************************
void print_sector(ulong sec){
uchar r;
int i;
sec *= 512;
r = SPI_read_open(sec);
WriteHex(r);
WriteCom('\n');
for (i=0; i<512; i++){
r = SPI_in();
WriteHex(r);
if ((i & 31) == 31){
WriteCom('\n');
} else if (i & 1){
WriteCom(' ');
}
}
SPI_read_close();
}
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
