int ui_get_filename( char * filename, char * Filespec, char * message )
{
char ViewDir[PATH_MAX];
char InputText[PATH_MAX];
char *p;
PHYSFS_file *TempFile;
int NumFiles, NumDirs,i;
char **filename_list;
char **directory_list;
char Spaces[35];
UI_WINDOW *wnd;
UI_GADGET_BUTTON *Button1, *Button2, *HelpButton;
UI_GADGET_LISTBOX *ListBox1;
UI_GADGET_LISTBOX *ListBox2;
UI_GADGET_INPUTBOX *UserFile;
int new_listboxes;
if ((p = strrchr(filename, '/')))
{
*p++ = 0;
strcpy(ViewDir, filename);
strcpy(InputText, p);
}
else
{
strcpy(ViewDir, "");
strcpy(InputText, filename);
}
filename_list = file_getfilelist(&NumFiles, Filespec, ViewDir);
directory_list = file_getdirlist(&NumDirs, ViewDir);
// Running out of memory may become likely in the future
if (!filename_list && !directory_list)
return 0;
if (!filename_list)
{
PHYSFS_freeList(directory_list);
return 0;
}
if (!directory_list)
{
PHYSFS_freeList(filename_list);
return 0;
}
//ui_messagebox( -2,-2, 1,"DEBUG:0", "Ok" );
for (i=0; i<35; i++)
Spaces[i] = ' ';
Spaces[34] = 0;
wnd = ui_open_window( 200, 100, 400, 370, WIN_DIALOG );
ui_wprintf_at( wnd, 10, 5, message );
ui_wprintf_at( wnd, 20, 32,"N&ame" );
UserFile = ui_add_gadget_inputbox( wnd, 60, 30, PATH_MAX, 40, InputText );
ui_wprintf_at( wnd, 20, 86,"&Files" );
ui_wprintf_at( wnd, 210, 86,"&Dirs" );
ListBox1 = ui_add_gadget_listbox(wnd, 20, 110, 125, 200, NumFiles, filename_list);
ListBox2 = ui_add_gadget_listbox(wnd, 210, 110, 100, 200, NumDirs, directory_list);
Button1 = ui_add_gadget_button( wnd, 20, 330, 60, 25, "Ok", NULL );
Button2 = ui_add_gadget_button( wnd, 100, 330, 60, 25, "Cancel", NULL );
HelpButton = ui_add_gadget_button( wnd, 180, 330, 60, 25, "Help", NULL );
wnd->keyboard_focus_gadget = (UI_GADGET *)UserFile;
Button1->hotkey = KEY_CTRLED + KEY_ENTER;
Button2->hotkey = KEY_ESC;
HelpButton->hotkey = KEY_F1;
ListBox1->hotkey = KEY_ALTED + KEY_F;
ListBox2->hotkey = KEY_ALTED + KEY_D;
UserFile->hotkey = KEY_ALTED + KEY_A;
ui_gadget_calc_keys(wnd);
ui_wprintf_at( wnd, 20, 60, "%s", Spaces );
ui_wprintf_at( wnd, 20, 60, "%s", ViewDir );
new_listboxes = 0;
while( 1 )
{
ui_mega_process();
ui_window_do_gadgets(wnd);
if ( Button2->pressed )
{
PHYSFS_freeList(filename_list);
PHYSFS_freeList(directory_list);
ui_close_window(wnd);
return 0;
}
if ( HelpButton->pressed )
ui_messagebox( -1, -1, 1, "Sorry, no help is available!", "Ok" );
if (ListBox1->moved || new_listboxes)
{
if (ListBox1->current_item >= 0 )
ui_inputbox_set_text(UserFile, filename_list[ListBox1->current_item]);
}
if (ListBox2->moved || new_listboxes)
{
if (ListBox2->current_item >= 0 )
ui_inputbox_set_text(UserFile, directory_list[ListBox2->current_item]);
}
new_listboxes = 0;
if (Button1->pressed || UserFile->pressed || (ListBox1->selected_item > -1 ) || (ListBox2->selected_item > -1 ))
{
ui_mouse_hide();
if (ListBox2->selected_item > -1 )
strcpy(UserFile->text, directory_list[ListBox2->selected_item]);
strncpy(filename, ViewDir, PATH_MAX);
p = UserFile->text;
while (!strncmp(p, "..", 2)) // shorten the path manually
{
char *sep = strrchr(filename, '/');
if (sep)
*sep = 0;
else
*filename = 0; // look directly in search paths
p += 2;
if (*p == '/')
p++;
}
if (*filename && *p)
strncat(filename, "/", PATH_MAX - strlen(filename));
strncat(filename, p, PATH_MAX - strlen(filename));
if (!PHYSFS_isDirectory(filename))
{
TempFile = PHYSFS_openRead(filename);
if (TempFile)
{
// Looks like a valid filename that already exists!
PHYSFS_close(TempFile);
break;
}
// File doesn't exist, but can we create it?
TempFile = PHYSFS_openWrite(filename);
if (TempFile)
{
// Looks like a valid filename!
PHYSFS_close(TempFile);
PHYSFS_delete(filename);
break;
}
}
else
{
if (filename[strlen(filename) - 1] == '/') // user typed a separator on the end
filename[strlen(filename) - 1] = 0;
strcpy(ViewDir, filename);
//mprintf( 0, "----------------------------\n" );
//mprintf( 0, "Full dir: '%s'\n", ViewDir );
PHYSFS_freeList(filename_list);
filename_list = file_getfilelist(&NumFiles, Filespec, ViewDir);
if (!filename_list)
{
PHYSFS_freeList(directory_list);
return 0;
}
ui_inputbox_set_text(UserFile, Filespec);
PHYSFS_freeList(directory_list);
directory_list = file_getdirlist(&NumDirs, ViewDir);
if (!directory_list)
{
PHYSFS_freeList(filename_list);
return 0;
}
ui_listbox_change(wnd, ListBox1, NumFiles, filename_list);
ui_listbox_change(wnd, ListBox2, NumDirs, directory_list);
new_listboxes = 0;
ui_wprintf_at( wnd, 20, 60, "%s", Spaces );
ui_wprintf_at( wnd, 20, 60, "%s", ViewDir );
//i = TICKER;
//while ( TICKER < i+2 );
}
ui_mouse_show();
}
vid_update();
}
//key_flush();
ui_close_window(wnd);
if (filename_list)
PHYSFS_freeList(filename_list);
if (directory_list)
PHYSFS_freeList(directory_list);
return 1;
}
static int browser_handler(UI_DIALOG *dlg, d_event *event, file_browser *b)
{
int rval = 0;
if (event->type == EVENT_UI_DIALOG_DRAW)
{
ui_dprintf_at( dlg, 10, 5, "%s", b->message );
ui_dprintf_at( dlg, 20, 32,"N&ame" );
ui_dprintf_at( dlg, 20, 86,"&Files" );
ui_dprintf_at( dlg, 210, 86,"&Dirs" );
ui_dprintf_at( dlg, 20, 60, "%s", b->spaces );
ui_dprintf_at( dlg, 20, 60, "%s", b->view_dir );
return 1;
}
if (GADGET_PRESSED(b->button2))
{
PHYSFS_freeList(b->filename_list);
b->filename_list = NULL;
PHYSFS_freeList(b->directory_list);
b->directory_list = NULL;
ui_close_dialog(dlg);
return 1;
}
if (GADGET_PRESSED(b->help_button))
{
ui_messagebox( -1, -1, 1, "Sorry, no help is available!", "Ok" );
rval = 1;
}
if (event->type == EVENT_UI_LISTBOX_MOVED)
{
if ((ui_event_get_gadget(event) == (UI_GADGET *)b->listbox1) && (b->listbox1->current_item >= 0) && b->filename_list[b->listbox1->current_item])
ui_inputbox_set_text(b->user_file, b->filename_list[b->listbox1->current_item]);
if ((ui_event_get_gadget(event) == (UI_GADGET *)b->listbox2) && (b->listbox2->current_item >= 0) && b->directory_list[b->listbox2->current_item])
ui_inputbox_set_text(b->user_file, b->directory_list[b->listbox2->current_item]);
rval = 1;
}
if (GADGET_PRESSED(b->button1) || GADGET_PRESSED(b->user_file) || (event->type == EVENT_UI_LISTBOX_SELECTED))
{
char *p;
if (ui_event_get_gadget(event) == (UI_GADGET *)b->listbox2)
strcpy(b->user_file->text, b->directory_list[b->listbox2->current_item]);
strncpy(b->filename, b->view_dir, PATH_MAX);
p = b->user_file->text;
while (!strncmp(p, "..", 2)) // shorten the path manually
{
char *sep = strrchr(b->filename, '/');
if (sep)
*sep = 0;
else
*b->filename = 0; // look directly in search paths
p += 2;
if (*p == '/')
p++;
}
if (*b->filename && *p)
strncat(b->filename, "/", PATH_MAX - strlen(b->filename));
strncat(b->filename, p, PATH_MAX - strlen(b->filename));
if (!PHYSFS_isDirectory(b->filename))
{
PHYSFS_file *TempFile;
TempFile = PHYSFS_openRead(b->filename);
if (TempFile)
{
// Looks like a valid filename that already exists!
PHYSFS_close(TempFile);
ui_close_dialog(dlg);
return 1;
}
// File doesn't exist, but can we create it?
TempFile = PHYSFS_openWrite(b->filename);
if (TempFile)
{
// Looks like a valid filename!
PHYSFS_close(TempFile);
PHYSFS_delete(b->filename);
ui_close_dialog(dlg);
return 1;
}
}
else
{
if (b->filename[strlen(b->filename) - 1] == '/') // user typed a separator on the end
b->filename[strlen(b->filename) - 1] = 0;
strcpy(b->view_dir, b->filename);
PHYSFS_freeList(b->filename_list);
b->filename_list = file_getfilelist(&b->num_files, b->filespec, b->view_dir);
if (!b->filename_list)
{
PHYSFS_freeList(b->directory_list);
b->directory_list = NULL;
ui_close_dialog(dlg);
return 1;
}
ui_inputbox_set_text(b->user_file, b->filespec);
PHYSFS_freeList(b->directory_list);
b->directory_list = file_getdirlist(&b->num_dirs, b->view_dir);
if (!b->directory_list)
{
PHYSFS_freeList(b->filename_list);
b->filename_list = NULL;
ui_close_dialog(dlg);
return 1;
}
ui_listbox_change(dlg, b->listbox1, b->num_files, b->filename_list);
ui_listbox_change(dlg, b->listbox2, b->num_dirs, b->directory_list);
//i = TICKER;
//while ( TICKER < i+2 );
}
rval = 1;
}
return rval;
}
static window_event_result browser_handler(UI_DIALOG *const dlg, const d_event &event, ui_file_browser *const b)
{
window_event_result rval = window_event_result::ignored;
if (event.type == EVENT_UI_DIALOG_DRAW)
{
ui_dputs_at( dlg, 10, 5, b->message );
ui_dprintf_at( dlg, 20, 32,"N&ame" );
ui_dprintf_at( dlg, 20, 86,"&Files" );
ui_dprintf_at( dlg, 210, 86,"&Dirs" );
ui_dputs_at(dlg, 20, 60, b->spaces.data());
ui_dputs_at( dlg, 20, 60, b->view_dir );
return window_event_result::handled;
}
if (GADGET_PRESSED(b->button2.get()))
{
b->filename_list.reset();
b->directory_list.reset();
return window_event_result::close;
}
if (GADGET_PRESSED(b->help_button.get()))
{
ui_messagebox( -1, -1, 1, "Sorry, no help is available!", "Ok" );
rval = window_event_result::handled;
}
if (event.type == EVENT_UI_LISTBOX_MOVED)
{
if ((ui_event_get_gadget(event) == b->listbox1.get()) && (b->listbox1->current_item >= 0) && b->filename_list[b->listbox1->current_item])
ui_inputbox_set_text(b->user_file.get(), b->filename_list[b->listbox1->current_item]);
if ((ui_event_get_gadget(event) == b->listbox2.get()) && (b->listbox2->current_item >= 0) && b->directory_list[b->listbox2->current_item])
ui_inputbox_set_text(b->user_file.get(), b->directory_list[b->listbox2->current_item]);
rval = window_event_result::handled;
}
if (GADGET_PRESSED(b->button1.get()) || GADGET_PRESSED(b->user_file.get()) || event.type == EVENT_UI_LISTBOX_SELECTED)
{
char *p;
if (ui_event_get_gadget(event) == b->listbox2.get())
strcpy(b->user_file->text.get(), b->directory_list[b->listbox2->current_item]);
strncpy(b->filename, b->view_dir, PATH_MAX);
p = b->user_file->text.get();
while (!strncmp(p, "..", 2)) // shorten the path manually
{
char *sep = strrchr(b->filename, '/');
if (sep)
*sep = 0;
else
*b->filename = 0; // look directly in search paths
p += 2;
if (*p == '/')
p++;
}
if (*b->filename && *p)
strncat(b->filename, "/", PATH_MAX - strlen(b->filename));
strncat(b->filename, p, PATH_MAX - strlen(b->filename));
if (!PHYSFS_isDirectory(b->filename))
{
if (RAIIPHYSFS_File{PHYSFS_openRead(b->filename)})
{
// Looks like a valid filename that already exists!
return window_event_result::close;
}
// File doesn't exist, but can we create it?
if (RAIIPHYSFS_File TempFile{PHYSFS_openWrite(b->filename)})
{
TempFile.reset();
// Looks like a valid filename!
PHYSFS_delete(b->filename);
return window_event_result::close;
}
}
else
{
if (b->filename[strlen(b->filename) - 1] == '/') // user typed a separator on the end
b->filename[strlen(b->filename) - 1] = 0;
strcpy(b->view_dir, b->filename);
b->filename_list = file_getfilelist(b->filespec, b->view_dir);
if (!b->filename_list)
{
b->directory_list.reset();
return window_event_result::close;
}
ui_inputbox_set_text(b->user_file.get(), b->filespec);
b->directory_list = file_getdirlist(b->view_dir);
if (!b->directory_list)
{
b->filename_list.reset();
return window_event_result::close;
}
ui_listbox_change(dlg, b->listbox1.get(), b->filename_list.get_count(), b->filename_list.get());
ui_listbox_change(dlg, b->listbox2.get(), b->directory_list.get_count(), b->directory_list.get());
//i = TICKER;
//while ( TICKER < i+2 );
}
rval = window_event_result::handled;
}
return rval;
}
