FSStatus
FSCloseFileAsync(FSClient *client, FSCmdBlock *block, FSFileHandle handle, uint32_t flags, FSAsyncData *asyncData)
{
assert(asyncData->callback);
auto result = FSCloseFile(client, block, handle, flags);
FSAsyncCallback cb = static_cast<uint32_t>(asyncData->callback);
cb(client, block, result, asyncData->param);
return result;
}
static int FSDrvClose(struct _reent* r, int fd) {
FSFileHandle* handle = (FSFileHandle*) fd;
FSStatus err = FSCloseFile(fsClient, fsCmdBlock, *handle, FS_RET_ALL_ERROR);
if(err != FS_STATUS_OK) {
FSDrvReportError(r);
return -1;
}
return 0;
}
static int sd_fat_close_r (struct _reent *r, int fd)
{
sd_fat_file_state_t *file = (sd_fat_file_state_t *)fd;
if(!file->dev) {
r->_errno = ENODEV;
return -1;
}
OSLockMutex(file->dev->pMutex);
int result = FSCloseFile(file->dev->pClient, file->dev->pCmd, file->fd, -1);
OSUnlockMutex(file->dev->pMutex);
if(result < 0)
{
r->_errno = result;
return -1;
}
return 0;
}
void ConvertNode(HWND hwnd, AFile* node, const char* fname, WORD tag)
{
FSHandle* file;
HANDLE wavfile;
RIFFHeader riffhdr;
ChunkHeader chunkhdr;
DWORD riffsize,factsize,datasize,written,rate,buffpos,pcmsize,dstsize,sizeToFill,sizeFilled;
DWORD pos_riffsize,pos_factsize,pos_datasize;
WORD channels,bits;
char str[MAX_PATH+100],*pcmBuffer=NULL,*dstBuffer=NULL;
LPWAVEFORMATEX pwfex;
ACMFORMATTAGDETAILS aftd={0};
MMRESULT mmr;
WAVEFORMATEX wfexPCM;
HACMSTREAM hACMStream;
ACMSTREAMHEADER acmshdr;
if ((file=FSOpenForPlayback(hwnd,node,&rate,&channels,&bits))==NULL)
return;
wfexPCM.wFormatTag=WAVE_FORMAT_PCM;
wfexPCM.nChannels=channels;
wfexPCM.nSamplesPerSec=rate;
wfexPCM.wBitsPerSample=bits;
wfexPCM.cbSize=0;
wfexPCM.nBlockAlign=channels*(bits/8);
wfexPCM.nAvgBytesPerSec=rate*wfexPCM.nBlockAlign;
switch (tag)
{
case WAVE_FORMAT_PCM:
pwfex=NULL; // ???
hACMStream=NULL;
dstBuffer=NULL; // ???
pcmBuffer=(char*)GlobalAlloc(GPTR,BUFFERSIZE);
break;
default:
aftd.cbStruct=sizeof(aftd);
aftd.dwFormatTag=tag;
mmr=acmFormatTagDetails(NULL,&aftd,ACM_FORMATTAGDETAILSF_LARGESTSIZE);
if (mmr!=MMSYSERR_NOERROR)
{
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
wsprintf(str,"Failed to get details for wave format tag: 0x%X",tag);
ReportMMError(hwnd,mmr,str);
return;
}
pwfex=(LPWAVEFORMATEX)LocalAlloc(LPTR,aftd.cbFormatSize);
pwfex->wFormatTag=tag;
mmr=acmFormatSuggest(NULL,&wfexPCM,pwfex,aftd.cbFormatSize,ACM_FORMATSUGGESTF_WFORMATTAG);
if (mmr!=MMSYSERR_NOERROR)
{
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
wsprintf(str,"No format suggested for wave format tag: 0x%X",tag);
ReportMMError(hwnd,mmr,str);
return;
}
mmr=acmStreamOpen(&hACMStream,NULL,&wfexPCM,pwfex,NULL,0,0,ACM_STREAMOPENF_NONREALTIME);
if (mmr!=MMSYSERR_NOERROR)
{
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
wsprintf(str,"Failed to open conversion stream for wave format tag: 0x%X",tag);
ReportMMError(hwnd,mmr,str);
return;
}
if (acmStreamSize(hACMStream,BUFFERSIZE,&dstsize,ACM_STREAMSIZEF_SOURCE)!=MMSYSERR_NOERROR)
dstsize=BUFFERSIZE;
pcmBuffer=(char*)GlobalAlloc(GPTR,BUFFERSIZE);
dstBuffer=(char*)GlobalAlloc(GPTR,dstsize);
memset(&acmshdr,0x00,sizeof(acmshdr)); // ???
acmshdr.cbStruct=sizeof(ACMSTREAMHEADER);
acmshdr.fdwStatus=0;
acmshdr.pbSrc=pcmBuffer;
acmshdr.cbSrcLength=BUFFERSIZE;
acmshdr.cbSrcLengthUsed=0;
acmshdr.pbDst=dstBuffer;
acmshdr.cbDstLength=dstsize;
acmshdr.cbDstLengthUsed=0;
mmr=acmStreamPrepareHeader(hACMStream,&acmshdr,0L);
if (mmr!=MMSYSERR_NOERROR)
{
GlobalFree(dstBuffer);
GlobalFree(pcmBuffer);
acmStreamClose(hACMStream,0);
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
ReportMMError(hwnd,mmr,"Failed to prepare conversion stream header.");
return;
}
acmshdr.cbSrcLength=0;
}
if (!EnsureDirPresence(fname))
{
if (hACMStream!=NULL)
{
acmStreamUnprepareHeader(hACMStream,&acmshdr,0L);
acmStreamClose(hACMStream,0);
}
GlobalFree(dstBuffer);
GlobalFree(pcmBuffer);
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
return;
}
wavfile=CreateFile(fname,
GENERIC_WRITE,
FILE_SHARE_READ,
NULL,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL,
NULL
);
if (wavfile==INVALID_HANDLE_VALUE)
{
if (hACMStream!=NULL)
{
acmStreamUnprepareHeader(hACMStream,&acmshdr,0L);
acmStreamClose(hACMStream,0);
}
GlobalFree(dstBuffer);
GlobalFree(pcmBuffer);
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
wsprintf(str,"Cannot open WAV file: %s",fname);
ReportError(hwnd,str,NULL);
return;
}
ShowProgressHeaderMsg(fname);
datasize=0;
factsize=0;
ShowProgressStateMsg("Writing RIFF header...");
SetFilePointer(wavfile,0,NULL,FILE_BEGIN);
lstrcpy(riffhdr.riffid,IDSTR_RIFF);
lstrcpy(riffhdr.rifftype,IDSTR_WAVE);
riffhdr.riffsize=0;
WriteFile(wavfile,&riffhdr,sizeof(RIFFHeader),&written,NULL);
pos_riffsize=SetFilePointer(wavfile,0,NULL,FILE_CURRENT)-sizeof(riffhdr.rifftype)-sizeof(riffhdr.riffsize);
CorrectOddPos(wavfile);
ShowProgressStateMsg("Writing fmt chunk...");
lstrcpy(chunkhdr.id,IDSTR_fmt);
switch (tag)
{
case WAVE_FORMAT_PCM:
chunkhdr.size=sizeof(wfexPCM);
WriteFile(wavfile,&chunkhdr,sizeof(chunkhdr),&written,NULL);
WriteFile(wavfile,&wfexPCM,chunkhdr.size,&written,NULL);
CorrectOddPos(wavfile);
break;
default:
chunkhdr.size=aftd.cbFormatSize;
WriteFile(wavfile,&chunkhdr,sizeof(chunkhdr),&written,NULL);
WriteFile(wavfile,pwfex,chunkhdr.size,&written,NULL);
CorrectOddPos(wavfile);
lstrcpy(chunkhdr.id,IDSTR_fact);
chunkhdr.size=sizeof(factsize);
WriteFile(wavfile,&chunkhdr,sizeof(chunkhdr),&written,NULL);
pos_factsize=SetFilePointer(wavfile,0,NULL,FILE_CURRENT);
WriteFile(wavfile,&factsize,sizeof(factsize),&written,NULL);
CorrectOddPos(wavfile);
}
lstrcpy(chunkhdr.id,IDSTR_data);
chunkhdr.size=datasize;
WriteFile(wavfile,&chunkhdr,sizeof(chunkhdr),&written,NULL);
pos_datasize=SetFilePointer(wavfile,0,NULL,FILE_CURRENT)-sizeof(datasize);
while (1)
{
if (IsCancelled())
break;
switch (tag)
{
case WAVE_FORMAT_PCM:
sizeToFill=BUFFERSIZE;
sizeFilled=0;
break;
default:
if (acmshdr.cbSrcLengthUsed!=0L)
{
memmove(pcmBuffer,pcmBuffer+acmshdr.cbSrcLengthUsed,acmshdr.cbSrcLength-acmshdr.cbSrcLengthUsed);
acmshdr.cbSrcLength-=acmshdr.cbSrcLengthUsed;
}
if (acmshdr.cbSrcLength<BUFFERSIZE)
sizeToFill=BUFFERSIZE-acmshdr.cbSrcLength;
sizeFilled=acmshdr.cbSrcLength;
}
wsprintf(str,"Converting %s data block to PCM...",file->node->afID);
ShowProgressStateMsg(str);
pcmsize=0;
if (sizeToFill>0)
pcmsize=AFPLUGIN(node)->FillPCMBuffer(file,pcmBuffer+sizeFilled,sizeToFill,&buffpos);
if (tag==WAVE_FORMAT_PCM)
{
if (pcmsize==0L)
break;
ShowProgressStateMsg("Writing WAV data block...");
WriteFile(wavfile,pcmBuffer,pcmsize,&written,NULL);
if (written!=pcmsize)
{
ReportError(hwnd,"Failure writing WAV file.",NULL);
SetCancelFlag();
break;
}
datasize+=written;
}
else
{
acmshdr.cbSrcLength+=pcmsize;
if (acmshdr.cbSrcLength==0L)
break;
acmshdr.fdwStatus^=ACMSTREAMHEADER_STATUSF_DONE;
acmshdr.cbSrcLengthUsed=0;
acmshdr.cbDstLength=dstsize;
acmshdr.cbDstLengthUsed=0;
wsprintf(str,"Compressing PCM data block...");
ShowProgressStateMsg(str);
mmr=acmStreamConvert(hACMStream,&acmshdr,ACM_STREAMCONVERTF_BLOCKALIGN);
if (mmr!=MMSYSERR_NOERROR)
{
CloseHandle(wavfile);
DeleteFile(fname);
acmStreamUnprepareHeader(hACMStream,&acmshdr,0L);
acmStreamClose(hACMStream,0);
GlobalFree(dstBuffer);
GlobalFree(pcmBuffer);
LocalFree(pwfex);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
ReportMMError(hwnd,mmr,"Error during compression.");
return;
}
if (acmshdr.cbSrcLengthUsed==0L)
{
acmshdr.fdwStatus^=ACMSTREAMHEADER_STATUSF_DONE;
acmStreamConvert(hACMStream,&acmshdr,0L);
}
factsize+=acmshdr.cbSrcLengthUsed/wfexPCM.nBlockAlign;
ShowProgressStateMsg("Writing WAV data block...");
WriteFile(wavfile,dstBuffer,acmshdr.cbDstLengthUsed,&written,NULL);
if (written!=acmshdr.cbDstLengthUsed)
{
ReportError(hwnd,"Failure writing WAV file.",NULL);
SetCancelFlag();
break;
}
datasize+=written;
}
ShowProgress(FSGetFilePointer(file),FSGetFileSize(file)); // ???
}
if (IsCancelled())
{
ShowProgressStateMsg("Deleting WAV file...");
CloseHandle(wavfile);
DeleteFile(fname);
}
else
{
CorrectOddPos(wavfile);
ShowProgressStateMsg("Rewriting WAV header...");
riffsize=GetFileSize(wavfile,NULL)-8;
SetFilePointer(wavfile,pos_riffsize,NULL,FILE_BEGIN);
WriteFile(wavfile,&riffsize,sizeof(riffsize),&written,NULL);
if (tag!=WAVE_FORMAT_PCM)
{
SetFilePointer(wavfile,pos_factsize,NULL,FILE_BEGIN);
WriteFile(wavfile,&factsize,sizeof(factsize),&written,NULL);
}
SetFilePointer(wavfile,pos_datasize,NULL,FILE_BEGIN);
WriteFile(wavfile,&datasize,sizeof(datasize),&written,NULL);
CloseHandle(wavfile);
}
if (hACMStream!=NULL)
{
ShowProgressStateMsg("Closing conversion stream...");
acmStreamUnprepareHeader(hACMStream,&acmshdr,0L);
acmStreamClose(hACMStream,0);
}
ShowProgressStateMsg("Freeing conversion buffers...");
GlobalFree(dstBuffer);
GlobalFree(pcmBuffer);
LocalFree(pwfex);
wsprintf(str,"Shutting down %s decoder...",file->node->afID);
ShowProgressStateMsg(str);
AFPLUGIN(node)->ShutdownPlayback(file);
FSCloseFile(file);
}
static int sd_fat_open_r (struct _reent *r, void *fileStruct, const char *path, int flags, int mode)
{
sd_fat_private_t *dev = sd_fat_get_device_data(path);
if(!dev) {
r->_errno = ENODEV;
return -1;
}
sd_fat_file_state_t *file = (sd_fat_file_state_t *)fileStruct;
file->dev = dev;
// Determine which mode the file is opened for
file->flags = flags;
const char *mode_str;
if ((flags & 0x03) == O_RDONLY) {
file->read = true;
file->write = false;
file->append = false;
mode_str = "r";
} else if ((flags & 0x03) == O_WRONLY) {
file->read = false;
file->write = true;
file->append = (flags & O_APPEND);
mode_str = file->append ? "a" : "w";
} else if ((flags & 0x03) == O_RDWR) {
file->read = true;
file->write = true;
file->append = (flags & O_APPEND);
mode_str = file->append ? "a+" : "r+";
} else {
r->_errno = EACCES;
return -1;
}
int fd = -1;
OSLockMutex(dev->pMutex);
char *real_path = sd_fat_real_path(path, dev);
if(!path) {
r->_errno = ENOMEM;
OSUnlockMutex(dev->pMutex);
return -1;
}
int result = FSOpenFile(dev->pClient, dev->pCmd, real_path, mode_str, (FSFileHandle*)&fd, -1);
free(real_path);
if(result == 0)
{
FSStat stats;
result = FSGetStatFile(dev->pClient, dev->pCmd, fd, &stats, -1);
if(result != 0) {
FSCloseFile(dev->pClient, dev->pCmd, fd, -1);
r->_errno = result;
OSUnlockMutex(dev->pMutex);
return -1;
}
file->fd = fd;
file->pos = 0;
file->len = stats.size;
OSUnlockMutex(dev->pMutex);
return (int)file;
}
r->_errno = result;
OSUnlockMutex(dev->pMutex);
return -1;
}
/* *****************************************************************************
* Dynamic RPL loading to memory
* ****************************************************************************/
static int LoadRPLToMemory(s_rpx_rpl *rpl_entry)
{
if ((int)bss_ptr != 0x0a000000)
{
char buffer[200];
__os_snprintf(buffer, sizeof(buffer), "CheckAndLoadRPL(%s) found and loading", rpl_entry->name);
log_string(bss.global_sock, buffer, BYTE_LOG_STR);
}
// initialize FS
FSInit();
FSClient *pClient = (FSClient*) MEMAllocFromDefaultHeap(sizeof(FSClient));
if (!pClient)
return 0;
FSCmdBlock *pCmd = (FSCmdBlock*) MEMAllocFromDefaultHeap(sizeof(FSCmdBlock));
if (!pCmd)
{
MEMFreeToDefaultHeap(pClient);
return 0;
}
// calculate path length for SD access of RPL
int path_len = strlen(CAFE_OS_SD_PATH) + strlen(SD_GAMES_PATH) + strlen(GAME_DIR_NAME) + strlen(RPX_RPL_PATH) + strlen(rpl_entry->name) + 3;
char *path_rpl = MEMAllocFromDefaultHeap(path_len);
if(!path_rpl) {
MEMFreeToDefaultHeap(pCmd);
MEMFreeToDefaultHeap(pClient);
return 0;
}
// create path
__os_snprintf(path_rpl, path_len, "%s%s/%s%s/%s", CAFE_OS_SD_PATH, SD_GAMES_PATH, GAME_DIR_NAME, RPX_RPL_PATH, rpl_entry->name);
// malloc mem for read file
unsigned char* dataBuf = (unsigned char*)MEMAllocFromDefaultHeapEx(0x1000, 0x40);
if(!dataBuf) {
MEMFreeToDefaultHeap(pCmd);
MEMFreeToDefaultHeap(pClient);
MEMFreeToDefaultHeap(path_rpl);
return 0;
}
// do more initial FS stuff
FSInitCmdBlock(pCmd);
FSAddClientEx(pClient, 0, FS_RET_NO_ERROR);
// set RPL size to 0 to avoid wrong RPL being loaded when opening file fails
rpl_entry->size = 0;
rpl_entry->offset = 0;
int fd = 0;
if (real_FSOpenFile(pClient, pCmd, path_rpl, "r", &fd, FS_RET_ALL_ERROR) == FS_STATUS_OK)
{
int ret;
int rpl_size = 0;
// Get current memory area
s_mem_area* mem_area = (s_mem_area*)(MEM_AREA_ARRAY);
int mem_area_addr_start = mem_area->address;
int mem_area_addr_end = mem_area->address + mem_area->size;
int mem_area_offset = 0;
// Copy rpl in memory
while ((ret = FSReadFile(pClient, pCmd, dataBuf, 0x1, 0x1000, fd, 0, FS_RET_ALL_ERROR)) > 0)
{
// Copy in memory and save offset
for (int j = 0; j < ret; j++)
{
if ((mem_area_addr_start + mem_area_offset) >= mem_area_addr_end)
{
// Set next memory area
mem_area = mem_area->next;
mem_area_addr_start = mem_area->address;
mem_area_addr_end = mem_area->address + mem_area->size;
mem_area_offset = 0;
}
*(volatile unsigned char*)(mem_area_addr_start + mem_area_offset) = dataBuf[j];
mem_area_offset += 1;
}
rpl_size += ret;
}
// Fill rpl entry
rpl_entry->area = (s_mem_area*)(MEM_AREA_ARRAY);
rpl_entry->offset = 0;
rpl_entry->size = rpl_size;
// flush memory
// DCFlushRange((void*)rpl_entry, sizeof(s_rpx_rpl));
// DCFlushRange((void*)rpl_entry->address, rpl_entry->size);
if ((int)bss_ptr != 0x0a000000)
{
char buffer[200];
__os_snprintf(buffer, sizeof(buffer), "CheckAndLoadRPL(%s) file loaded 0x%08X %i", rpl_entry->name, rpl_entry->area->address, rpl_entry->size);
log_string(bss.global_sock, buffer, BYTE_LOG_STR);
}
FSCloseFile(pClient, pCmd, fd, FS_RET_NO_ERROR);
}
FSDelClient(pClient);
MEMFreeToDefaultHeap(dataBuf);
MEMFreeToDefaultHeap(pCmd);
MEMFreeToDefaultHeap(pClient);
MEMFreeToDefaultHeap(path_rpl);
return 1;
}
