char *archdep_default_sysfile_pathlist(const char *emu_id)
{
static char *default_path;
#if defined(MINIXVMD) || defined(MINIX_SUPPORT)
static char *default_path_temp;
#endif
if (default_path == NULL) {
const char *boot_path;
const char *home_path;
boot_path = archdep_boot_path();
home_path = archdep_home_path();
/* First search in the `LIBDIR' then the $HOME/.vice/ dir (home_path)
and then in the `boot_path'. */
#if defined(MINIXVMD) || defined(MINIX_SUPPORT)
default_path_temp = util_concat(LIBDIR, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/", emu_id,NULL);
default_path = util_concat(default_path_temp, ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
LIBDIR, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
LIBDIR, "/PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/PRINTER", NULL);
lib_free(default_path_temp);
#else
#if defined(MACOSX_BUNDLE)
/* Mac OS X Bundles keep their ROMS in Resources/bin/../ROM */
#if defined(MACOSX_COCOA)
#define MACOSX_ROMDIR "/../Resources/ROM/"
#else
#define MACOSX_ROMDIR "/../ROM/"
#endif
default_path = util_concat(boot_path, MACOSX_ROMDIR, emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, MACOSX_ROMDIR, "DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, MACOSX_ROMDIR, "PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/PRINTER", NULL);
#else
default_path = util_concat(LIBDIR, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/", emu_id, ARCHDEP_FINDPATH_SEPARATOR_STRING,
LIBDIR, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/DRIVES", ARCHDEP_FINDPATH_SEPARATOR_STRING,
LIBDIR, "/PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
home_path, "/", VICEUSERDIR, "/PRINTER", ARCHDEP_FINDPATH_SEPARATOR_STRING,
boot_path, "/PRINTER", NULL);
#endif
#endif
}
return default_path;
}
MRESULT EXPENTRY ViceFileDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
switch (msg) {
case WM_INITDLG:
{
FILEDLG *fdlg = (FILEDLG*)WinQueryWindowPtr(hwnd, QWL_USER);
int i;
char *szpath;
const int action = fdlg->ulUser;
const int nact = (action >> 8) & 0xff;
const int nsact = (action) & 0xff;
FillABox(hwnd, action ? nact - 1 : 0);
FillSBox(hwnd, action ? nsact - 1 : 0);
FillFBox(hwnd);
NewFilter(hwnd);
for (i = 0; i < numfonts; i++) {
WinDlgLboxInsertItem(hwnd, DID_FONTNAME_LB, fnames[i]);
}
WinDlgLboxSelectItem(hwnd, DID_FONTNAME_LB, 0);
if (action) {
WinEnableControl(hwnd, DID_ACTION_CB, FALSE);
WinEnableControl(hwnd, DID_SUBACTION_CB, FALSE);
}
if (action || fdlg->fl & FDS_SAVEAS_DIALOG) {
WinEnableControl(hwnd, DID_AUTOSTART_PB, FALSE);
}
szpath = util_concat(fdlg->pszIDrive, fdlg->szFullFile, NULL);
*(strrchr(szpath, '\\') + 1) = '\0';
WinSetDlgItemText(hwnd, DID_DIR_SELECTED, szpath);
lib_free(szpath);
szpath = util_concat(archdep_boot_path(), "\\vice2.dll", NULL);
if (!GpiLoadFonts(WinQueryAnchorBlock(hwnd), szpath)) {
log_debug("dlg-fileio.c: GpiLoadFonts('%s') failed.", szpath);
WinEnableControl(hwnd, DID_FONTNAME_LB, FALSE);
}
lib_free(szpath);
}
return FALSE;
case WM_DESTROY:
{
char *szpath = util_concat(archdep_boot_path(), "\\vice2.dll", NULL);
LboxFreeContents(WinWindowFromID(hwnd, DID_CONTENTS_LB));
if (!GpiUnloadFonts(WinQueryAnchorBlock(hwnd), szpath)) {
log_debug("dlg-fileio.c: GpiUnloadFonts('%s') failed.", szpath);
}
lib_free (szpath);
}
break;
case WM_CONTROL:
switch (SHORT1FROMMP(mp1)) {
case DID_ACTION_CB:
if (SHORT2FROMMP(mp1) == CBN_ENTER) {
FillSBox(hwnd, 0);
}
case DID_SUBACTION_CB:
if (SHORT2FROMMP(mp1) == CBN_ENTER) {
FillFBox(hwnd);
}
case DID_FFILTER_CB:
if (SHORT2FROMMP(mp1) == CBN_ENTER) {
NewFilter(hwnd);
}
return FALSE;
case DID_DIRECTORY_LB:
WinDefFileDlgProc(hwnd, msg, mp1, mp2);
if (SHORT2FROMMP(mp1) == LN_SELECT || SHORT2FROMMP(mp1) == LN_ENTER) {
char szpath[CCHMAXPATH];
const int nr = WinQueryLboxSelectedItem((HWND)mp2);
if (nr < 0) {
return FALSE;
}
if (SHORT2FROMMP(mp1) == LN_SELECT && WinQueryFocus(HWND_DESKTOP) == (HWND)mp2) {
return FALSE;
}
if (!GetLboxPath((HWND)mp2, nr, szpath)) {
return FALSE;
}
WinSetDlgItemText(hwnd, DID_DIR_SELECTED, szpath);
}
return FALSE;
case DID_FILENAME_ED:
if (WinQueryButtonCheckstate(hwnd, DID_CONTENTS_CB) && SHORT2FROMMP(mp1) == EN_CHANGE) {
char szpath[CCHMAXPATH];
if (GetFullFile(hwnd, szpath)) {
ShowContents(hwnd, szpath);
}
}
break;
case DID_CONTENTS_CB:
{
const int state = WinQueryButtonCheckstate(hwnd, DID_CONTENTS_CB);
WinEnableControl(hwnd, DID_CONTENTS_LB, state);
WinEnableControl(hwnd, DID_FONTNAME_LB, state);
if (state) {
ContentsUpdate(hwnd);
} else {
LboxFreeContents(WinWindowFromID(hwnd, DID_CONTENTS_LB));
}
}
return FALSE;
case DID_FONTNAME_LB:
if (SHORT2FROMMP(mp1) != CBN_ENTER) {
break;
}
ContentsUpdate(hwnd);
return FALSE;
}
break;
case WM_COMMAND:
switch (SHORT1FROMMP(mp1)) {
case DID_DIRUP:
{
const HWND name = WinWindowFromID(hwnd, DID_FILENAME_ED);
const int pos = WinDlgLboxSelectedItem(hwnd, DID_DIRECTORY_LB);
char szpath[CCHMAXPATH];
char *cpos;
int len;
if (!pos) {
return FALSE;
}
WinQueryDlgItemText(hwnd, DID_DIR_SELECTED, CCHMAXPATH - 1, szpath);
if (strlen(szpath) < 4) {
return FALSE;
}
*strrchr(szpath, '\\') = '\0';
cpos = strrchr(szpath,'\\') + 1;
len = cpos - szpath + 2;
if (len == CCHMAXPATH - 1) {
return FALSE;
}
WinQueryDlgItemText(hwnd, DID_FILENAME_ED, CCHMAXPATH - len - 1, cpos);
WinSetWindowText(name, szpath);
*cpos = '\0';
WinSetDlgItemText(hwnd, DID_DIR_SELECTED, szpath);
//
// set focus to entry field and simulate an Apply
//
WinSetFocus(HWND_DESKTOP, name);
WinDefFileDlgProc(hwnd, WM_COMMAND, (MPARAM)DID_OK, MPFROM2SHORT(CMDSRC_PUSHBUTTON, TRUE));
}
return FALSE;
case DID_AUTOSTART_PB:
{
const int pos = WinDlgLboxSelectedItem(hwnd, DID_CONTENTS_LB);
FILEDLG *fdlg = (FILEDLG*)WinQueryWindowPtr(hwnd, QWL_USER);
size_t length;
char szpath[CCHMAXPATH];
if (!GetFullFile(hwnd, szpath)) {
return FALSE;
}
if (autostart_autodetect(szpath, NULL, pos < 0 ? 0 : pos, AUTOSTART_MODE_RUN)) {
return FALSE;
}
length = strrchr(szpath, '\\') - szpath;
fdlg->lReturn = DID_OK;
if (length > 0) {
fdlg->szFullFile[length] = 0;
}
}
break;
}
break;
case WM_MEASUREITEM:
if (SHORT1FROMMP(mp1) == DID_CONTENTS_LB) {
return MRFROM2SHORT(9, 9);
}
break;
case WM_DRAWITEM:
if (SHORT1FROMMP(mp1) == DID_CONTENTS_LB) {
OWNERITEM *item = (OWNERITEM*)mp2;
RECTL *rcl = &(item->rclItem);
if (rcl->yTop-rcl->yBottom == 9) {
image_contents_screencode_t *line = (image_contents_screencode_t *)WinLboxItemHandle(item->hwnd, item->idItem);
if (line) {
LboxDrawLine(hwnd, item, rcl, line);
}
item->fsState = item->fsStateOld = 0;
}
return (MRESULT)TRUE;
}
break;
case FDM_VALIDATE:
// mp1 = PSZ pszPathName
// mp2 = USHORT Field name id
// mr = TRUE -> Valid name
{
const int sact = WinDlgLboxSelectedItem(hwnd, DID_SUBACTION_CB);
const int act = WinDlgLboxSelectedItem(hwnd, DID_ACTION_CB);
const FILEDLG *fdlg = (FILEDLG*)WinQueryWindowPtr(hwnd, QWL_USER);
char *szpath = (char*)mp1;
int rc;
char *slash;
if (fdlg->fl & FDS_OPEN_DIALOG) {
rc = FdmDoLoadAction(hwnd, szpath, act, sact);
} else {
rc = FdmDoSaveAction(hwnd, szpath, act, sact);
}
if (rc < 0) {
const action_t *action = fdlg->fl & FDS_OPEN_DIALOG ? LoadAction : SaveAction;
char *txt = util_concat("The following action couldn't be performed:\n", action[act].type, " ", action[act].subact[sact].action, NULL);
HPOINTER hpt = WinLoadPointer(HWND_DESKTOP, NULLHANDLE, 0x101);
#ifdef WATCOM_COMPILE
struct _MB2D mbtemp;
struct _MB2INFO mb;
mb.cb = sizeof(MB2INFO);
mb.hIcon = hpt;
mb.cButtons = 1;
mb.flStyle = MB_CUSTOMICON|WS_VISIBLE;
mb.hwndNotify = NULLHANDLE;
sprintf(mbtemp.achText," OK ");
mbtemp.idButton = 0;
mbtemp.flStyle = BS_DEFAULT;
mb.mb2d[0] = mbtemp;
#else
MB2INFO mb = {
sizeof(MB2INFO),
hpt,
1,
MB_CUSTOMICON | WS_VISIBLE,
NULLHANDLE,
" OK ",
0,
BS_DEFAULT};
#endif
WinMessageBox2(HWND_DESKTOP, hwnd, txt, "VICE/2 Error", 0, &mb);
lib_free(txt);
return FALSE;
}
//
// FIXME! Better solution?
//
slash = strrchr(szpath, '\\');
if (slash) {
*slash = '\0';
}
chdir(szpath);
}
return (MRESULT)TRUE;
}
return WinDefFileDlgProc(hwnd, msg, mp1, mp2);
}
char *archdep_default_joymap_file_name(void)
{
return util_concat(archdep_boot_path(), "\\sdl-joymap-", machine_get_name(), ".vjm", NULL);
}
char *archdep_default_hotkey_file_name(void)
{
return util_concat(archdep_boot_path(), "\\sdl-hotkey-", machine_get_name(), ".vkm", NULL);
}
char *archdep_default_autostart_disk_image_file_name(void)
{
return util_concat(archdep_boot_path(), "\\autostart-", machine_get_name(), ".d64", NULL);
}
char *archdep_default_fliplist_file_name(void)
{
return util_concat(archdep_boot_path(), "\\fliplist-", machine_get_name(), ".vfl", NULL);
}
char *archdep_default_resource_file_name(void)
{
return util_concat(archdep_boot_path(), "\\sdl-vice.ini", NULL);
}
