/**
* Handle creation of a the "new blank disk image".
* return true if disk created, false otherwise.
*/
static bool DlgNewDisk_CreateDisk(const char *path)
{
int nSectors, nSides;
/* (potentially non-existing) filename? */
if (File_DirExists(path))
{
Log_AlertDlg(LOG_ERROR, "ERROR: '%s' isn't a file!", path);
return false;
}
/* Get number of sectors */
if (newdiskdlg[DLGNEWDISK_SECTORS36].state & SG_SELECTED)
nSectors = 36;
else if (newdiskdlg[DLGNEWDISK_SECTORS18].state & SG_SELECTED)
nSectors = 18;
else if (newdiskdlg[DLGNEWDISK_SECTORS11].state & SG_SELECTED)
nSectors = 11;
else if (newdiskdlg[DLGNEWDISK_SECTORS10].state & SG_SELECTED)
nSectors = 10;
else
nSectors = 9;
/* Get number of sides */
if (newdiskdlg[DLGNEWDISK_SIDES1].state & SG_SELECTED)
nSides = 1;
else
nSides = 2;
return CreateBlankImage_CreateFile(path, nTracks, nSectors, nSides, dlgLabel);
}
/**
* Initialize the users home directory string
* and Hatari's home directory (~/.hatari)
*/
static void Paths_InitHomeDirs(void)
{
char *psHome;
psHome = getenv("HOME");
if (psHome)
strncpy(sUserHomeDir, psHome, FILENAME_MAX);
#if defined(WIN32)
else
{
char *psDrive;
int len = 0;
/* Windows home path? */
psHome = getenv("HOMEPATH");
psDrive = getenv("HOMEDRIVE");
if (psDrive)
{
len = strlen(psDrive);
len = len < FILENAME_MAX ? len : FILENAME_MAX;
strncpy(sUserHomeDir, psDrive, len);
}
if (psHome)
strncpy(sUserHomeDir+len, psHome, FILENAME_MAX-len);
}
#endif
if (!psHome)
{
/* $HOME not set, so let's use current working dir as home */
strcpy(sUserHomeDir, sWorkingDir);
strcpy(sHatariHomeDir, sWorkingDir);
}
else
{
sUserHomeDir[FILENAME_MAX-1] = 0;
/* Try to use a .hatari directory in the users home directory */
snprintf(sHatariHomeDir, FILENAME_MAX, "%s%c%s", sUserHomeDir,
PATHSEP, HATARI_HOME_DIR);
if (!File_DirExists(sHatariHomeDir))
{
/* Hatari home directory does not exists yet...
* ...so let's try to create it: */
if (mkdir(sHatariHomeDir, 0755) != 0)
{
/* Failed to create, so use user's home dir instead */
strcpy(sHatariHomeDir, sUserHomeDir);
}
}
}
}
/**
* Initialise Printer
*/
void Printer_Init(void)
{
char *separator;
Dprintf((stderr, "Printer_Init()\n"));
/* disabled from config/command line? */
if (!ConfigureParams.Printer.szPrintToFileName[0])
return;
/* printer name without path? */
separator = strrchr(ConfigureParams.Printer.szPrintToFileName, PATHSEP);
if (!separator)
return;
*separator = '\0';
if (!File_DirExists(ConfigureParams.Printer.szPrintToFileName)) {
Log_AlertDlg(LOG_ERROR, "Printer output file directory inaccessible. Printing disabled.");
ConfigureParams.Printer.bEnablePrinting = false;
}
*separator = PATHSEP;
Dprintf((stderr, "Filename for printing: %s \n", ConfigureParams.Printer.szPrintToFileName));
}
/**
* Initialize the users home directory string
* and Previous's home directory (~/.previous)
*/
static void Paths_InitHomeDirs(void)
{
char *psHome;
psHome = getenv("HOME");
if (!psHome)
{
/* Windows home path? */
psHome = getenv("HOMEPATH");
}
if (!psHome)
{
/* $HOME not set, so let's use current working dir as home */
strcpy(sUserHomeDir, sWorkingDir);
strcpy(sPreviousHomeDir, sWorkingDir);
}
else
{
strncpy(sUserHomeDir, psHome, FILENAME_MAX);
sUserHomeDir[FILENAME_MAX-1] = 0;
/* Try to use a .previous directory in the users home directory */
snprintf(sPreviousHomeDir, FILENAME_MAX, "%s%c.previous",
sUserHomeDir, PATHSEP);
if (!File_DirExists(sPreviousHomeDir))
{
/* Previous home directory does not exists yet...
* ...so let's try to create it: */
if (mkdir(sPreviousHomeDir, 0755) != 0)
{
/* Failed to create, so use user's home dir instead */
strcpy(sPreviousHomeDir, sUserHomeDir);
}
}
}
}
/**
* Show and process a file selection dialog.
* Returns path/name user selected or NULL if user canceled
* input: zip_path = pointer's pointer to buffer to contain file path
* within a selected zip file, or NULL if browsing zip files is disallowed.
* bAllowNew: true if the user is allowed to insert new file names.
*/
char* SDLGui_FileSelect(const char *path_and_name, char **zip_path, bool bAllowNew)
{
struct dirent **files = NULL;
char *pStringMem;
char *retpath = NULL;
const char *home;
char *path, *fname; /* The actual file and path names */
bool reloaddir = true; /* Do we have to reload the directory file list? */
int retbut;
bool bOldMouseVisibility;
int selection; /* The selection index */
char *zipfilename; /* Filename in zip file */
char *zipdir;
bool browsingzip = false; /* Are we browsing an archive? */
zip_dir *zipfiles = NULL;
SDL_Event sdlEvent;
int yScrolbar_size; /* Size of the vertical scrollbar */
ypos = 0;
scrollbar_Ypos = 0.0;
refreshentries = true;
entries = 0;
/* Allocate memory for the file and path name strings: */
pStringMem = malloc(4 * FILENAME_MAX);
path = pStringMem;
fname = pStringMem + FILENAME_MAX;
zipdir = pStringMem + 2 * FILENAME_MAX;
zipfilename = pStringMem + 3 * FILENAME_MAX;
zipfilename[0] = 0;
fname[0] = 0;
path[0] = 0;
/* Save mouse state and enable cursor */
bOldMouseVisibility = SDL_ShowCursor(SDL_QUERY);
SDL_ShowCursor(SDL_ENABLE);
SDLGui_CenterDlg(fsdlg);
if (bAllowNew)
{
fsdlg[SGFSDLG_FILENAME].type = SGEDITFIELD;
fsdlg[SGFSDLG_FILENAME].flags |= SG_EXIT;
}
else
{
fsdlg[SGFSDLG_FILENAME].type = SGTEXT;
fsdlg[SGFSDLG_FILENAME].flags &= ~SG_EXIT;
}
/* Prepare the path and filename variables */
if (path_and_name && path_and_name[0])
{
strncpy(path, path_and_name, FILENAME_MAX);
path[FILENAME_MAX-1] = '\0';
}
if (!File_DirExists(path))
{
File_SplitPath(path, path, fname, NULL);
if (!(File_DirExists(path) || getcwd(path, FILENAME_MAX)))
{
perror("SDLGui_FileSelect: non-existing path and CWD failed");
goto clean_exit;
}
}
File_MakeAbsoluteName(path);
File_MakeValidPathName(path);
File_ShrinkName(dlgpath, path, DLGPATH_SIZE);
File_ShrinkName(dlgfname, fname, DLGFNAME_SIZE);
do
{
if (reloaddir)
{
files = files_free(files);
if (browsingzip)
{
files = ZIP_GetFilesDir(zipfiles, zipdir, &entries);
if(!files)
{
fprintf(stderr, "SDLGui_FileSelect: ZIP_GetFilesDir error!\n");
goto clean_exit;
}
}
else
{
/* Load directory entries: */
entries = scandir(path, &files, 0, alphasort);
}
/* Remove hidden files from the list if necessary: */
if (!(fsdlg[SGFSDLG_SHOWHIDDEN].state & SG_SELECTED))
{
DlgFileSelect_RemoveHiddenFiles(files);
}
if (entries < 0)
{
fprintf(stderr, "SDLGui_FileSelect: Path not found.\n");
goto clean_exit;
}
/* reload always implies refresh */
reloaddir = false;
refreshentries = true;
}/* reloaddir */
/* Refresh scrollbar size */
if (entries <= SGFS_NUMENTRIES)
yScrolbar_size = (SGFS_NUMENTRIES-2) * sdlgui_fontheight;
else
yScrolbar_size = (int)((SGFS_NUMENTRIES-2) / ((float)entries/(float)SGFS_NUMENTRIES) * sdlgui_fontheight);
fsdlg[SGFSDLG_SCROLLBAR].w = yScrolbar_size;
/* Refresh scrolbar pos */
fsdlg[SGFSDLG_SCROLLBAR].h = (int) (scrollbar_Ypos * sdlgui_fontheight);
ypos = (int) (scrollbar_Ypos * ((float)entries/(float)(SGFS_NUMENTRIES-2)) + 0.5);
/* Update the file name strings in the dialog? */
if (refreshentries)
{
if (!DlgFileSelect_RefreshEntries(files, path, browsingzip))
{
goto clean_exit;
}
refreshentries = false;
}
/* Show dialog: */
retbut = SDLGui_DoDialog(fsdlg, &sdlEvent);
/* Has the user clicked on a file or folder? */
if (retbut>=SGFSDLG_ENTRYFIRST && retbut<=SGFSDLG_ENTRYLAST && retbut-SGFSDLG_ENTRYFIRST+ypos<entries)
{
char *tempstr;
tempstr = malloc(FILENAME_MAX);
if (!tempstr)
{
perror("Error while allocating temporary memory in SDLGui_FileSelect()");
goto clean_exit;
}
if (browsingzip == true)
{
if (!strcat_maxlen(tempstr, FILENAME_MAX,
zipdir, files[retbut-SGFSDLG_ENTRYFIRST+ypos]->d_name))
{
fprintf(stderr, "SDLGui_FileSelect: Path name too long!\n");
goto clean_exit;
}
/* directory? */
if (File_DoesFileNameEndWithSlash(tempstr))
{
/* handle the ../ directory */
if (strcmp(files[retbut-SGFSDLG_ENTRYFIRST+ypos]->d_name, "../") == 0)
{
/* close the zip file */
if (strcmp(tempstr, "../") == 0)
{
/* free zip file entries */
ZIP_FreeZipDir(zipfiles);
zipfiles = NULL;
/* Copy the path name to the dialog */
File_ShrinkName(dlgpath, path, DLGPATH_SIZE);
browsingzip = false;
}
else
{
/* remove "../" and previous dir from path */
File_PathShorten(tempstr, 2);
correct_zip_root(tempstr);
strcpy(zipdir, tempstr);
File_ShrinkName(dlgpath, zipdir, DLGPATH_SIZE);
}
}
else /* not the "../" directory */
{
strcpy(zipdir, tempstr);
File_ShrinkName(dlgpath, zipdir, DLGPATH_SIZE);
}
reloaddir = true;
/* Copy the path name to the dialog */
zipfilename[0] = '\0';
dlgfname[0] = 0;
ypos = 0;
scrollbar_Ypos = 0.0;
}
else
{
/* not dir, select a file in the zip */
selection = retbut-SGFSDLG_ENTRYFIRST+ypos;
strcpy(zipfilename, files[selection]->d_name);
File_ShrinkName(dlgfname, zipfilename, DLGFNAME_SIZE);
}
}
else /* not browsingzip */
{
if (!strcat_maxlen(tempstr, FILENAME_MAX,
path, files[retbut-SGFSDLG_ENTRYFIRST+ypos]->d_name))
{
fprintf(stderr, "SDLGui_FileSelect: Path name too long!\n");
goto clean_exit;
}
if (File_DirExists(tempstr))
{
File_HandleDotDirs(tempstr);
File_AddSlashToEndFileName(tempstr);
/* Copy the path name to the dialog */
File_ShrinkName(dlgpath, tempstr, DLGPATH_SIZE);
strcpy(path, tempstr);
reloaddir = true;
dlgfname[0] = 0;
ypos = 0;
scrollbar_Ypos = 0.0;
}
else if (ZIP_FileNameIsZIP(tempstr) && zip_path != NULL)
{
/* open a zip file */
zipfiles = ZIP_GetFiles(tempstr);
if (zipfiles != NULL && browsingzip == false)
{
selection = retbut-SGFSDLG_ENTRYFIRST+ypos;
strcpy(fname, files[selection]->d_name);
File_ShrinkName(dlgfname, fname, DLGFNAME_SIZE);
browsingzip = true;
zipdir[0] = '\0'; /* zip root */
File_ShrinkName(dlgpath, zipdir, DLGPATH_SIZE);
reloaddir = true;
ypos = 0;
scrollbar_Ypos = 0.0;
}
}
else
{
/* Select a file */
selection = retbut-SGFSDLG_ENTRYFIRST+ypos;
strcpy(fname, files[selection]->d_name);
File_ShrinkName(dlgfname, fname, DLGFNAME_SIZE);
}
} /* not browsingzip */
free(tempstr);
}
else /* Has the user clicked on another button? */
{
switch(retbut)
{
case SGFSDLG_UPDIR: /* Change path to parent directory */
if (browsingzip)
{
/* close the zip file? */
if (!zipdir[0])
{
/* free zip file entries */
ZIP_FreeZipDir(zipfiles);
browsingzip = false;
zipfiles = NULL;
File_ShrinkName(dlgpath, path, DLGPATH_SIZE);
}
else
{
/* remove last dir from zipdir path */
File_PathShorten(zipdir, 1);
correct_zip_root(zipdir);
File_ShrinkName(dlgpath, zipdir, DLGPATH_SIZE);
zipfilename[0] = '\0';
}
} /* not a zip file: */
else
{
File_PathShorten(path, 1);
File_ShrinkName(dlgpath, path, DLGPATH_SIZE);
}
reloaddir = true;
break;
case SGFSDLG_HOMEDIR: /* Change to home directory */
home = Paths_GetUserHome();
if (home == NULL || !*home)
break;
if (browsingzip)
{
/* free zip file entries */
ZIP_FreeZipDir(zipfiles);
zipfiles = NULL;
browsingzip = false;
}
strcpy(path, home);
File_AddSlashToEndFileName(path);
File_ShrinkName(dlgpath, path, DLGPATH_SIZE);
reloaddir = true;
break;
case SGFSDLG_ROOTDIR: /* Change to root directory */
if (browsingzip)
{
/* free zip file entries */
ZIP_FreeZipDir(zipfiles);
zipfiles = NULL;
browsingzip = false;
}
path[0] = PATHSEP; path[1] = '\0';
strcpy(dlgpath, path);
reloaddir = true;
break;
case SGFSDLG_UP: /* Scroll up */
DlgFileSelect_ScrollUp();
SDL_Delay(10);
break;
case SGFSDLG_DOWN: /* Scroll down */
DlgFileSelect_ScrollDown();
SDL_Delay(10);
break;
case SGFSDLG_SCROLLBAR: /* Scrollbar selected */
DlgFileSelect_ManageScrollbar();
SDL_Delay(10);
break;
case SGFSDLG_FILENAME: /* User entered new filename */
strcpy(fname, dlgfname);
break;
case SGFSDLG_SHOWHIDDEN: /* Show/hide hidden files */
reloaddir = true;
ypos = 0;
scrollbar_Ypos = 0.0;
break;
case SDLGUI_UNKNOWNEVENT:
DlgFileSelect_HandleSdlEvents(&sdlEvent);
break;
} /* switch */
if (reloaddir)
{
/* Remove old selection */
fname[0] = 0;
dlgfname[0] = 0;
ypos = 0;
scrollbar_Ypos = 0.0;
}
} /* other button code */
} /* do */
while (retbut!=SGFSDLG_OKAY && retbut!=SGFSDLG_CANCEL
&& retbut!=SDLGUI_QUIT && retbut != SDLGUI_ERROR && !bQuitProgram);
files_free(files);
if (browsingzip)
{
/* free zip file entries */
ZIP_FreeZipDir(zipfiles);
zipfiles = NULL;
}
if (retbut == SGFSDLG_OKAY)
{
if (zip_path)
*zip_path = zip_get_path(zipdir, zipfilename, browsingzip);
retpath = File_MakePath(path, fname, NULL);
}
else
retpath = NULL;
clean_exit:
SDL_ShowCursor(bOldMouseVisibility);
free(pStringMem);
return retpath;
}
/**
* Handle last (non-option) argument. It can be a path or filename.
* Filename can be a disk image or Atari program.
* Return false if it's none of these.
*/
static bool Opt_HandleArgument(const char *path)
{
char *dir = NULL;
Uint8 test[2];
FILE *fp;
/* Atari program? */
if (File_Exists(path) && (fp = fopen(path, "rb"))) {
/* file starts with GEMDOS magic? */
if (fread(test, 1, 2, fp) == 2 &&
test[0] == 0x60 && test[1] == 0x1A) {
const char *prgname = strrchr(path, PATHSEP);
if (prgname) {
dir = strdup(path);
dir[prgname-path] = '\0';
prgname++;
} else {
dir = strdup(Paths_GetWorkingDir());
prgname = path;
}
/* after above, dir should point to valid dir,
* then make sure that given program from that
* dir will be started.
*/
TOS_AutoStart(prgname);
}
fclose(fp);
}
if (dir) {
path = dir;
}
/* GEMDOS HDD directory (as argument, or for the Atari program)? */
if (File_DirExists(path)) {
if (Opt_StrCpy(OPT_HARDDRIVE, false, ConfigureParams.HardDisk.szHardDiskDirectories[0],
path, sizeof(ConfigureParams.HardDisk.szHardDiskDirectories[0]),
&ConfigureParams.HardDisk.bUseHardDiskDirectories)
&& ConfigureParams.HardDisk.bUseHardDiskDirectories)
{
ConfigureParams.HardDisk.bBootFromHardDisk = true;
}
bLoadAutoSave = false;
if (dir) {
free(dir);
}
return true;
} else {
if (dir) {
/* if dir is set, it should be valid... */
Log_Printf(LOG_ERROR, "Given atari program path '%s' doesn't exist (anymore?)!\n", dir);
free(dir);
exit(1);
}
}
/* disk image? */
if (Floppy_SetDiskFileName(0, path, NULL))
{
ConfigureParams.HardDisk.bBootFromHardDisk = false;
bLoadAutoSave = false;
return true;
}
return Opt_ShowError(OPT_ERROR, path, "Not a disk image, Atari program or directory");
}
