ref: 9fca319758c1194a953ad582a9c55e0a0f873ee4
dir: /src/pt2_diskop.c/
// for finding memory leaks in debug mode with Visual Studio
#if defined _DEBUG && defined _MSC_VER
#include <crtdbg.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include <stdbool.h>
#include <math.h>
#include <ctype.h> // tolower()
#ifdef _WIN32
#include <direct.h>
#include <io.h>
#define WIN32_MEAN_AND_LEAN
#include <windows.h>
#include <shlobj.h> // SHGetFolderPathW()
#else
#include <unistd.h>
#include <dirent.h>
#endif
#include <fcntl.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <time.h>
#include <limits.h>
#include "pt2_header.h"
#include "pt2_textout.h"
#include "pt2_diskop.h"
#include "pt2_tables.h"
#include "pt2_palette.h"
#include "pt2_modloader.h"
#include "pt2_audio.h"
#include "pt2_sampler.h"
#include "pt2_config.h"
#include "pt2_helpers.h"
#include "pt2_keyboard.h"
#include "pt2_visuals.h"
#include "pt2_sampleloader.h"
typedef struct fileEntry_t
{
UNICHAR *nameU;
char firstAnsiChar; // for handleEntryJumping();
char dateChanged[6 + 1];
bool isDir;
int32_t filesize;
} fileEntry_t;
// "look for file" flags
enum
{
LFF_DONE = 0,
LFF_SKIP = 1,
LFF_OK = 2
};
#ifdef _WIN32
#define PARENT_DIR_STR L".."
static HANDLE hFind;
#else
#define PARENT_DIR_STR ".."
static DIR *hFind;
#endif
static char fileNameBuffer[PATH_MAX + 1];
static uint32_t oldFileEntryRow;
static UNICHAR pathTmp[PATH_MAX + 2];
static fileEntry_t *diskOpEntry;
static fileEntry_t *bufferCreateEmptyDir(void) // special case: creates a dir entry with a ".." directory
{
fileEntry_t *dirEntry;
dirEntry = (fileEntry_t *)malloc(sizeof (fileEntry_t));
if (dirEntry == NULL)
return NULL;
dirEntry->nameU = UNICHAR_STRDUP(PARENT_DIR_STR);
if (dirEntry->nameU == NULL)
{
free(dirEntry);
return NULL;
}
dirEntry->isDir = true;
dirEntry->filesize = 0;
return dirEntry;
}
// deciding whether to load this entry into the buffer or not
static bool listEntry(fileEntry_t *f)
{
int32_t entryName = (int32_t)UNICHAR_STRLEN(f->nameU);
#ifdef _WIN32
if (f->isDir && entryName == 2 && !UNICHAR_STRNICMP(f->nameU, "..", 2))
return true; // always show ".." directory
#else
if (f->isDir && entryName == 2 && !UNICHAR_STRNICMP(f->nameU, "..", 2) && !(editor.currPath[0] == '/' && editor.currPath[1] == '\0'))
return true; // always show ".." directory (unless in root dir)
#endif
if (!UNICHAR_STRNICMP(f->nameU, ".", 1))
return false; // skip ".name" entries
if (f->isDir || editor.diskop.mode == DISKOP_MODE_SMP)
return true; // list all entries
if (entryName >= 4)
{
if (!UNICHAR_STRNICMP(f->nameU, "MOD.", 4) || !UNICHAR_STRNICMP(&f->nameU[entryName - 4], ".MOD", 4) ||
!UNICHAR_STRNICMP(f->nameU, "STK.", 4) || !UNICHAR_STRNICMP(&f->nameU[entryName - 4], ".STK", 4) ||
!UNICHAR_STRNICMP(f->nameU, "M15.", 4) || !UNICHAR_STRNICMP(&f->nameU[entryName - 4], ".M15", 4) ||
!UNICHAR_STRNICMP(f->nameU, "NST.", 4) || !UNICHAR_STRNICMP(&f->nameU[entryName - 4], ".NST", 4) ||
!UNICHAR_STRNICMP(f->nameU, "UST.", 4) || !UNICHAR_STRNICMP(&f->nameU[entryName - 4], ".UST", 4) ||
!UNICHAR_STRNICMP(f->nameU, "PP.", 3) || !UNICHAR_STRNICMP(&f->nameU[entryName - 3], ".PP", 3) ||
!UNICHAR_STRNICMP(f->nameU, "NT.", 3) || !UNICHAR_STRNICMP(&f->nameU[entryName - 3], ".NT", 3))
{
return true;
}
}
return false;
}
static int8_t findFirst(fileEntry_t *searchRec)
{
#ifdef _WIN32
WIN32_FIND_DATAW fData;
SYSTEMTIME sysTime;
#else
struct dirent *fData;
struct stat st;
int64_t fSize;
#endif
searchRec->nameU = NULL; // this one must be initialized
#ifdef _WIN32
hFind = FindFirstFileW(L"*", &fData);
if (hFind == NULL || hFind == INVALID_HANDLE_VALUE)
return LFF_DONE;
searchRec->nameU = UNICHAR_STRDUP(fData.cFileName);
if (searchRec->nameU == NULL)
return LFF_SKIP;
searchRec->filesize = (fData.nFileSizeHigh > 0) ? -1 : fData.nFileSizeLow;
searchRec->isDir = (fData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? true : false;
#else
hFind = opendir(".");
if (hFind == NULL)
return LFF_DONE;
fData = readdir(hFind);
if (fData == NULL)
return LFF_DONE;
searchRec->nameU = UNICHAR_STRDUP(fData->d_name);
if (searchRec->nameU == NULL)
return LFF_SKIP;
searchRec->filesize = 0;
searchRec->isDir = (fData->d_type == DT_DIR) ? true : false;
if (fData->d_type == DT_UNKNOWN || fData->d_type == DT_LNK)
{
if (stat(fData->d_name, &st) == 0)
{
fSize = (int64_t)st.st_size;
searchRec->filesize = (fSize > INT32_MAX) ? -1 : (fSize & 0xFFFFFFFF);
if ((st.st_mode & S_IFMT) == S_IFDIR)
searchRec->isDir = true;
}
}
else if (!searchRec->isDir)
{
if (stat(fData->d_name, &st) == 0)
{
fSize = (int64_t)st.st_size;
searchRec->filesize = (fSize > INT32_MAX) ? -1 : (fSize & 0xFFFFFFFF);
}
}
#endif
if (!listEntry(searchRec))
{
// skip entry
free(searchRec->nameU);
searchRec->nameU = NULL;
return LFF_SKIP;
}
#ifdef _WIN32
FileTimeToSystemTime(&fData.ftLastWriteTime, &sysTime);
snprintf(searchRec->dateChanged, 7, "%02d%02d%02d", sysTime.wDay, sysTime.wMonth, sysTime.wYear % 100);
unicharToAnsi(&searchRec->firstAnsiChar, searchRec->nameU, 1);
#else
strftime(searchRec->dateChanged, 7, "%d%m%y", localtime(&st.st_mtime));
searchRec->firstAnsiChar = (char)searchRec->nameU[0];
#endif
return LFF_OK;
}
static int8_t findNext(fileEntry_t *searchRec)
{
#ifdef _WIN32
WIN32_FIND_DATAW fData;
SYSTEMTIME sysTime;
#else
struct dirent *fData;
struct stat st;
int64_t fSize;
#endif
searchRec->nameU = NULL; // important
#ifdef _WIN32
if (hFind == NULL || FindNextFileW(hFind, &fData) == 0)
return LFF_DONE;
searchRec->nameU = UNICHAR_STRDUP(fData.cFileName);
if (searchRec->nameU == NULL)
return LFF_SKIP;
searchRec->filesize = (fData.nFileSizeHigh > 0) ? -1 : fData.nFileSizeLow;
searchRec->isDir = (fData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? true : false;
FileTimeToSystemTime(&fData.ftLastWriteTime, &sysTime);
#else
if (hFind == NULL || (fData = readdir(hFind)) == NULL)
return LFF_DONE;
searchRec->nameU = UNICHAR_STRDUP(fData->d_name);
if (searchRec->nameU == NULL)
return LFF_SKIP;
searchRec->filesize = 0;
searchRec->isDir = (fData->d_type == DT_DIR) ? true : false;
if (fData->d_type == DT_UNKNOWN || fData->d_type == DT_LNK)
{
if (stat(fData->d_name, &st) == 0)
{
fSize = (int64_t)st.st_size;
searchRec->filesize = (fSize > INT32_MAX) ? -1 : (fSize & 0xFFFFFFFF);
if ((st.st_mode & S_IFMT) == S_IFDIR)
searchRec->isDir = true;
}
}
else if (!searchRec->isDir)
{
if (stat(fData->d_name, &st) == 0)
{
fSize = (int64_t)st.st_size;
searchRec->filesize = (fSize > INT32_MAX) ? -1 : (fSize & 0xFFFFFFFF);
}
}
#endif
if (!listEntry(searchRec))
{
// skip entry
free(searchRec->nameU);
searchRec->nameU = NULL;
return LFF_SKIP;
}
#ifdef _WIN32
FileTimeToSystemTime(&fData.ftLastWriteTime, &sysTime);
snprintf(searchRec->dateChanged, 7, "%02d%02d%02d", sysTime.wDay, sysTime.wMonth, sysTime.wYear % 100);
unicharToAnsi(&searchRec->firstAnsiChar, searchRec->nameU, 1);
#else
strftime(searchRec->dateChanged, 7, "%d%m%y", localtime(&st.st_mtime));
searchRec->firstAnsiChar = (char)searchRec->nameU[0];
#endif
return LFF_OK;
}
static void findClose(void)
{
if (hFind != NULL)
{
#ifdef _WIN32
FindClose(hFind);
#else
closedir(hFind);
#endif
hFind = NULL;
}
}
void diskOpShowSelectText(void)
{
if (!editor.ui.diskOpScreenShown || editor.ui.pointerMode == POINTER_MODE_MSG1 || editor.errorMsgActive)
return;
if (editor.diskop.mode == DISKOP_MODE_MOD)
setStatusMessage("SELECT MODULE", NO_CARRY);
else
setStatusMessage("SELECT SAMPLE", NO_CARRY);
}
void handleEntryJumping(char jumpToChar) // SHIFT+character
{
int32_t i;
if (diskOpEntry != NULL)
{
for (i = 0; i < editor.diskop.numEntries; i++)
{
if (jumpToChar == diskOpEntry[i].firstAnsiChar)
{
// fix visual overrun
if (editor.diskop.numEntries > DISKOP_LINES && i > editor.diskop.numEntries-DISKOP_LINES)
i = editor.diskop.numEntries - DISKOP_LINES;
editor.diskop.scrollOffset = i;
editor.ui.updateDiskOpFileList = true;
return;
}
}
}
// character not found in file list, show red mouse pointer (error)!
editor.errorMsgActive = true;
editor.errorMsgBlock = true;
editor.errorMsgCounter = 0;
setErrPointer();
}
bool diskOpEntryIsEmpty(int32_t fileIndex)
{
if (editor.diskop.scrollOffset+fileIndex >= editor.diskop.numEntries)
return true;
return false;
}
bool diskOpEntryIsDir(int32_t fileIndex)
{
if (diskOpEntry != NULL)
{
if (!diskOpEntryIsEmpty(fileIndex))
return diskOpEntry[editor.diskop.scrollOffset+fileIndex].isDir;
}
return false; // couldn't look up entry
}
char *diskOpGetAnsiEntry(int32_t fileIndex)
{
UNICHAR *filenameU;
if (diskOpEntry != NULL && !diskOpEntryIsEmpty(fileIndex))
{
filenameU = diskOpEntry[editor.diskop.scrollOffset+fileIndex].nameU;
if (filenameU != NULL)
{
unicharToAnsi(fileNameBuffer, filenameU, PATH_MAX);
return fileNameBuffer;
}
}
return NULL;
}
UNICHAR *diskOpGetUnicodeEntry(int32_t fileIndex)
{
if (diskOpEntry != NULL && !diskOpEntryIsEmpty(fileIndex))
return diskOpEntry[editor.diskop.scrollOffset+fileIndex].nameU;
return NULL;
}
static void setVisualPathToCwd(void)
{
memset(editor.currPath, 0, PATH_MAX + 10);
memset(editor.currPathU, 0, (PATH_MAX + 2) * sizeof (UNICHAR));
UNICHAR_GETCWD(editor.currPathU, PATH_MAX);
if (editor.diskop.mode == DISKOP_MODE_MOD)
UNICHAR_STRCPY(editor.modulesPathU, editor.currPathU);
else
UNICHAR_STRCPY(editor.samplesPathU, editor.currPathU);
unicharToAnsi(editor.currPath, editor.currPathU, PATH_MAX);
editor.ui.updateDiskOpPathText = true;
}
bool changePathToHome(void)
{
#ifdef _WIN32
UNICHAR pathU[PATH_MAX + 2];
if (SHGetFolderPathW(NULL, CSIDL_PROFILE, NULL, 0, pathU) >= 0)
{
if (UNICHAR_CHDIR(pathU) == 0)
return true;
}
return false;
#else
char *homePath;
homePath = getenv("HOME");
if (homePath != NULL && chdir(homePath) == 0)
return true;
return false;
#endif
}
void setPathFromDiskOpMode(void)
{
UNICHAR_CHDIR((editor.diskop.mode == DISKOP_MODE_MOD) ? editor.modulesPathU : editor.samplesPathU);
setVisualPathToCwd();
}
bool diskOpSetPath(UNICHAR *path, bool cache)
{
if (path != NULL && UNICHAR_CHDIR(path) == 0)
{
setVisualPathToCwd();
if (cache)
editor.diskop.cached = false;
if (editor.ui.diskOpScreenShown)
editor.ui.updateDiskOpFileList = true;
editor.diskop.scrollOffset = 0;
return true;
}
else
{
setVisualPathToCwd();
displayErrorMsg("CAN'T OPEN DIR !");
return false;
}
}
void diskOpSetInitPath(void)
{
// default module path
if (config.defModulesDir[0] != '\0')
{
#ifdef _WIN32
MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, config.defModulesDir, -1, pathTmp, PATH_MAX);
#else
strcpy(pathTmp, config.defModulesDir);
#endif
UNICHAR_STRCPY(editor.modulesPathU, pathTmp);
}
else
{
// no path set in config, set to current working directory
UNICHAR_GETCWD(editor.modulesPathU, PATH_MAX);
}
// default sample path
if (config.defSamplesDir[0] != '\0')
{
#ifdef _WIN32
MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, config.defSamplesDir, -1, pathTmp, PATH_MAX);
#else
strcpy(pathTmp, config.defSamplesDir);
#endif
UNICHAR_STRCPY(editor.samplesPathU, pathTmp);
}
else
{
// no path set in config, set to current working directory
UNICHAR_GETCWD(editor.samplesPathU, PATH_MAX);
}
setPathFromDiskOpMode();
}
bool allocDiskOpVars(void)
{
editor.fileNameTmpU = (UNICHAR *)calloc(PATH_MAX + 2, sizeof (UNICHAR));
editor.entryNameTmp = (char *)calloc(PATH_MAX + 10, sizeof (char));
editor.currPath = (char *)calloc(PATH_MAX + 10, sizeof (char));
editor.currPathU = (UNICHAR *)calloc(PATH_MAX + 2, sizeof (UNICHAR));
editor.modulesPathU = (UNICHAR *)calloc(PATH_MAX + 2, sizeof (UNICHAR));
editor.samplesPathU = (UNICHAR *)calloc(PATH_MAX + 2, sizeof (UNICHAR));
if (editor.fileNameTmpU == NULL || editor.entryNameTmp == NULL ||
editor.currPath == NULL || editor.currPathU == NULL ||
editor.modulesPathU == NULL || editor.samplesPathU == NULL)
{
// allocated leftovers are free'd lateron
return false;
}
return true;
}
void freeDiskOpMem(void)
{
if (editor.fileNameTmpU != NULL) free(editor.fileNameTmpU);
if (editor.entryNameTmp != NULL) free(editor.entryNameTmp);
if (editor.currPath != NULL) free(editor.currPath);
if (editor.currPathU != NULL) free(editor.currPathU);
if (editor.modulesPathU != NULL) free(editor.modulesPathU);
if (editor.samplesPathU != NULL) free(editor.samplesPathU);
}
void freeDiskOpEntryMem(void)
{
if (diskOpEntry != NULL)
{
for (int32_t i = 0; i < editor.diskop.numEntries; i++)
{
if (diskOpEntry[i].nameU != NULL)
free(diskOpEntry[i].nameU);
}
free(diskOpEntry);
diskOpEntry = NULL;
}
editor.diskop.numEntries = 0;
}
static bool swapEntries(int32_t a, int32_t b)
{
fileEntry_t tmpBuffer;
if (a >= editor.diskop.numEntries || b >= editor.diskop.numEntries)
return false;
tmpBuffer = diskOpEntry[a];
diskOpEntry[a] = diskOpEntry[b];
diskOpEntry[b] = tmpBuffer;
return true;
}
static char *getSortEntry(int32_t entry)
{
char *p;
int32_t nameLen;
fileEntry_t *dirEntry;
dirEntry = &diskOpEntry[entry];
unicharToAnsi(fileNameBuffer, dirEntry->nameU, PATH_MAX);
nameLen = (int32_t)strlen(fileNameBuffer);
if (nameLen == 0)
return NULL;
p = (char *)malloc(nameLen + 2);
if (p == NULL)
return NULL;
if (dirEntry->isDir)
{
if (nameLen == 2 && fileNameBuffer[0] == '.' && fileNameBuffer[1] == '.')
p[0] = 0x01; // make ".." directory first priority
else
p[0] = 0x02; // make second priority
strcpy(&p[1], fileNameBuffer);
}
else
{
strcpy(p, fileNameBuffer);
}
return p;
}
static void sortEntries(void)
{
bool didSwap;
char *p1, *p2;
uint32_t offset, limit, i;
if (editor.diskop.numEntries < 2)
return; // no need to sort
offset = editor.diskop.numEntries / 2;
while (offset > 0)
{
limit = editor.diskop.numEntries - offset;
do
{
didSwap = false;
for (i = 0; i < limit; i++)
{
p1 = getSortEntry(i);
p2 = getSortEntry(offset + i);
if (p1 == NULL || p2 == NULL)
{
if (p1 != NULL) free(p1);
if (p2 != NULL) free(p2);
statusOutOfMemory();
return;
}
if (_stricmp(p1, p2) > 0)
{
if (!swapEntries(i , offset + i))
{
free(p1);
free(p2);
return;
}
didSwap = true;
}
free(p1);
free(p2);
}
}
while (didSwap);
offset /= 2;
}
}
static bool diskOpFillBuffer(void)
{
uint8_t lastFindFileFlag;
fileEntry_t tmpBuffer, *newPtr;
editor.diskop.scrollOffset = 0;
// do we have a path set?
if (editor.currPathU[0] == '\0')
setVisualPathToCwd();
freeDiskOpEntryMem();
// fill disk op. buffer (type, size, path, file name, date changed)
// read first file
lastFindFileFlag = findFirst(&tmpBuffer);
if (lastFindFileFlag != LFF_DONE && lastFindFileFlag != LFF_SKIP)
{
diskOpEntry = (fileEntry_t *)malloc(sizeof (fileEntry_t) * (editor.diskop.numEntries + 1));
if (diskOpEntry == NULL)
{
findClose();
freeDiskOpEntryMem();
statusOutOfMemory();
return false;
}
memcpy(&diskOpEntry[editor.diskop.numEntries], &tmpBuffer, sizeof (fileEntry_t));
editor.diskop.numEntries++;
}
// read remaining files
while (lastFindFileFlag != LFF_DONE)
{
lastFindFileFlag = findNext(&tmpBuffer);
if (lastFindFileFlag != LFF_DONE && lastFindFileFlag != LFF_SKIP)
{
newPtr = (fileEntry_t *)realloc(diskOpEntry, sizeof (fileEntry_t) * (editor.diskop.numEntries + 1));
if (newPtr == NULL)
{
findClose();
freeDiskOpEntryMem();
statusOutOfMemory();
return false;
}
diskOpEntry = newPtr;
memcpy(&diskOpEntry[editor.diskop.numEntries], &tmpBuffer, sizeof (fileEntry_t));
editor.diskop.numEntries++;
}
}
findClose();
if (editor.diskop.numEntries > 0)
{
sortEntries();
}
else
{
// access denied or out of memory - create parent directory link
diskOpEntry = bufferCreateEmptyDir();
if (diskOpEntry != NULL)
editor.diskop.numEntries = 1;
else
statusOutOfMemory();
}
return true;
}
static int32_t SDLCALL diskOpFillThreadFunc(void *ptr)
{
(void)ptr;
editor.diskop.isFilling = true;
diskOpFillBuffer();
editor.diskop.isFilling = false;
editor.ui.updateDiskOpFileList = true;
return true;
}
static void printFileSize(fileEntry_t *entry, uint16_t x, uint16_t y)
{
char tmpStr[7];
uint32_t fileSize, j;
if (entry->filesize == -1) // -1 means that the original filesize is above 2GB in our directory reader
{
textOut(x, y, " >2GB", video.palette[PAL_QADSCP]);
return;
}
fileSize = (uint32_t)entry->filesize;
if (fileSize <= 999999)
{
// bytes
snprintf(tmpStr, 7, "%06d", fileSize);
}
else if (fileSize <= 9999999)
{
// kilobytes
fileSize /= 1000;
snprintf(tmpStr, 7, "%04dKB", fileSize);
}
else
{
// megabytes
fileSize /= 1000000;
snprintf(tmpStr, 7, "%04dMB", fileSize);
}
// turn zeroes on the left side into spaces
for (j = 0; j < 7; j++)
{
if (tmpStr[j] != '0')
break;
tmpStr[j] = ' ';
}
textOut(x, y, tmpStr, video.palette[PAL_QADSCP]);
}
static void printEntryName(char *entryName, int32_t entryLength, int32_t maxLength, uint16_t x, uint16_t y)
{
if (entryLength > maxLength)
{
// shorten name and add ".." to end
for (int32_t j = 0; j < maxLength-2; j++)
charOut(x + (j * FONT_CHAR_W), y, entryName[j], video.palette[PAL_QADSCP]);
textOut(x + ((maxLength - 2) * FONT_CHAR_W), y, "..", video.palette[PAL_QADSCP]);
}
else
{
// print whole name
textOut(x, y, entryName, video.palette[PAL_QADSCP]);
}
}
void diskOpRenderFileList(void)
{
char *entryName;
uint8_t maxFilenameChars, maxDirNameChars;
uint16_t textXStart, x, y;
int32_t i, entryLength;
uint32_t *dstPtr;
fileEntry_t *entry;
if (config.hideDiskOpDates)
{
textXStart = 8;
maxFilenameChars = 30;
maxDirNameChars = 31;
}
else
{
textXStart = 64;
maxFilenameChars = 23;
maxDirNameChars = 24;
}
diskOpShowSelectText();
if (editor.diskop.forceStopReading)
return;
// if needed, update the file list and add entries
if (!editor.diskop.cached)
{
editor.diskop.fillThread = SDL_CreateThread(diskOpFillThreadFunc, NULL, NULL);
if (editor.diskop.fillThread != NULL)
SDL_DetachThread(editor.diskop.fillThread);
editor.diskop.cached = true;
return;
}
// clear list
dstPtr = &video.frameBuffer[(35 * SCREEN_W) + 8];
for (y = 0; y < 59; y++)
{
for (x = 0; x < 295; x++)
dstPtr[x] = video.palette[PAL_BACKGRD];
dstPtr += SCREEN_W;
}
if (editor.diskop.isFilling || diskOpEntry == NULL)
return;
// list entries
for (i = 0; i < DISKOP_LINES; i++)
{
if (editor.diskop.scrollOffset+i >= editor.diskop.numEntries)
break;
entry = &diskOpEntry[editor.diskop.scrollOffset+i];
entryName = diskOpGetAnsiEntry(i);
entryLength = (int32_t)strlen(entryName);
x = textXStart;
y = (uint8_t)(35 + (i * (FONT_CHAR_H + 1)));
if (!entry->isDir)
{
printEntryName(entryName, entryLength, maxFilenameChars, x, y);
// print modification date
if (!config.hideDiskOpDates)
textOut(8, y, entry->dateChanged, video.palette[PAL_QADSCP]);
// print file size
printFileSize(entry, 256, y);
}
else
{
printEntryName(entryName, entryLength, maxDirNameChars, x, y);
textOut(264, y, "(DIR)", video.palette[PAL_QADSCP]);
}
}
}
void diskOpLoadFile(uint32_t fileEntryRow, bool songModifiedCheck)
{
uint8_t oldMode, oldPlayMode;
UNICHAR *filePath;
module_t *tempMod;
// if we clicked on an empty space, return...
if (diskOpEntryIsEmpty(fileEntryRow))
return;
if (diskOpEntryIsDir(fileEntryRow))
{
diskOpSetPath(diskOpGetUnicodeEntry(fileEntryRow), DISKOP_CACHE);
}
else
{
filePath = diskOpGetUnicodeEntry(fileEntryRow);
if (filePath != NULL)
{
if (editor.diskop.mode == DISKOP_MODE_MOD)
{
if (songModifiedCheck && modEntry->modified)
{
oldFileEntryRow = fileEntryRow;
showSongUnsavedAskBox(ASK_DISCARD_SONG);
return;
}
tempMod = modLoad(filePath);
if (tempMod != NULL)
{
oldMode = editor.currMode;
oldPlayMode = editor.playMode;
modStop();
modFree();
modEntry = tempMod;
setupNewMod();
modEntry->moduleLoaded = true;
statusAllRight();
if (config.autoCloseDiskOp)
editor.ui.diskOpScreenShown = false;
if (config.rememberPlayMode)
{
if (oldMode == MODE_PLAY || oldMode == MODE_RECORD)
{
editor.playMode = oldPlayMode;
if (oldPlayMode == PLAY_MODE_PATTERN || oldMode == MODE_RECORD)
modPlay(0, 0, 0);
else
modPlay(DONT_SET_PATTERN, 0, 0);
if (oldMode == MODE_RECORD)
pointerSetMode(POINTER_MODE_RECORD, DO_CARRY);
else
pointerSetMode(POINTER_MODE_PLAY, DO_CARRY);
editor.currMode = oldMode;
}
}
else
{
editor.currMode = MODE_IDLE;
editor.playMode = PLAY_MODE_NORMAL;
editor.songPlaying = false;
pointerSetMode(POINTER_MODE_IDLE, DO_CARRY);
}
displayMainScreen();
}
else
{
editor.errorMsgActive = true;
editor.errorMsgBlock = true;
editor.errorMsgCounter = 0;
// status/error message is set in the mod loader
setErrPointer();
}
}
else if (editor.diskop.mode == DISKOP_MODE_SMP)
{
loadSample(filePath, diskOpGetAnsiEntry(fileEntryRow));
}
}
}
}
void diskOpLoadFile2(void)
{
diskOpLoadFile(oldFileEntryRow, false);
}