2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
28 int file_sort_func(char **e0, char **e1)
30 return stricmp(*e0, *e1);
34 char **file_getdirlist(int *NumDirs, char *dir)
37 char **list = PHYSFS_enumerateFiles(dir);
47 strncat(path, "/", PATH_MAX - strlen(dir));
49 test_filename = path + strlen(path);
50 test_max = PATH_MAX - (test_filename - path);
52 for (i = list; *i; i++)
54 if (strlen(*i) >= test_max)
57 strcpy(test_filename, *i);
58 if (PHYSFS_isDirectory(path))
66 qsort(list, *NumDirs, sizeof(char *), (int (*)( const void *, const void * ))file_sort_func);
70 // Put the 'go to parent directory' sequence '..' first
72 list = realloc(list, sizeof(char *)*(*NumDirs + 1));
73 list[*NumDirs] = NULL; // terminate
74 for (i = list + *NumDirs - 1; i != list; i--)
76 list[0] = strdup("..");
82 char **file_getfilelist(int *NumFiles, char *filespec, char *dir)
84 char **list = PHYSFS_enumerateFiles(dir);
85 char **i, **j = list, *ext;
93 for (i = list; *i; i++)
95 ext = strrchr(*i, '.');
96 if (ext && (!stricmp(ext, filespec)))
104 *NumFiles = j - list;
105 qsort(list, *NumFiles, sizeof(char *), (int (*)( const void *, const void * ))file_sort_func);
110 int ui_get_filename( char * filename, char * Filespec, char * message )
112 char ViewDir[PATH_MAX];
113 char InputText[PATH_MAX];
115 PHYSFS_file *TempFile;
116 int NumFiles, NumDirs,i;
117 char **filename_list;
118 char **directory_list;
121 UI_GADGET_BUTTON *Button1, *Button2, *HelpButton;
122 UI_GADGET_LISTBOX *ListBox1;
123 UI_GADGET_LISTBOX *ListBox2;
124 UI_GADGET_INPUTBOX *UserFile;
127 if ((p = strrchr(filename, '/')))
130 strcpy(ViewDir, filename);
131 strcpy(InputText, p);
136 strcpy(InputText, filename);
139 filename_list = file_getfilelist(&NumFiles, Filespec, ViewDir);
140 directory_list = file_getdirlist(&NumDirs, ViewDir);
142 // Running out of memory may become likely in the future
143 if (!filename_list && !directory_list)
148 PHYSFS_freeList(directory_list);
154 PHYSFS_freeList(filename_list);
158 //MessageBox( -2,-2, 1,"DEBUG:0", "Ok" );
163 wnd = ui_open_window( 200, 100, 400, 370, WIN_DIALOG );
165 ui_wprintf_at( wnd, 10, 5, message );
167 ui_wprintf_at( wnd, 20, 32,"N&ame" );
168 UserFile = ui_add_gadget_inputbox( wnd, 60, 30, PATH_MAX, 40, InputText );
170 ui_wprintf_at( wnd, 20, 86,"&Files" );
171 ui_wprintf_at( wnd, 210, 86,"&Dirs" );
173 ListBox1 = ui_add_gadget_listbox(wnd, 20, 110, 125, 200, NumFiles, filename_list);
174 ListBox2 = ui_add_gadget_listbox(wnd, 210, 110, 100, 200, NumDirs, directory_list);
176 Button1 = ui_add_gadget_button( wnd, 20, 330, 60, 25, "Ok", NULL );
177 Button2 = ui_add_gadget_button( wnd, 100, 330, 60, 25, "Cancel", NULL );
178 HelpButton = ui_add_gadget_button( wnd, 180, 330, 60, 25, "Help", NULL );
180 wnd->keyboard_focus_gadget = (UI_GADGET *)UserFile;
182 Button1->hotkey = KEY_CTRLED + KEY_ENTER;
183 Button2->hotkey = KEY_ESC;
184 HelpButton->hotkey = KEY_F1;
185 ListBox1->hotkey = KEY_ALTED + KEY_F;
186 ListBox2->hotkey = KEY_ALTED + KEY_D;
187 UserFile->hotkey = KEY_ALTED + KEY_A;
189 ui_gadget_calc_keys(wnd);
191 ui_wprintf_at( wnd, 20, 60, "%s", Spaces );
192 ui_wprintf_at( wnd, 20, 60, "%s", ViewDir );
199 ui_window_do_gadgets(wnd);
201 if ( Button2->pressed )
203 PHYSFS_freeList(filename_list);
204 PHYSFS_freeList(directory_list);
205 ui_close_window(wnd);
209 if ( HelpButton->pressed )
210 MessageBox( -1, -1, 1, "Sorry, no help is available!", "Ok" );
212 if (ListBox1->moved || new_listboxes)
214 if (ListBox1->current_item >= 0 )
215 ui_inputbox_set_text(UserFile, filename_list[ListBox1->current_item]);
218 if (ListBox2->moved || new_listboxes)
220 if (ListBox2->current_item >= 0 )
221 ui_inputbox_set_text(UserFile, directory_list[ListBox2->current_item]);
225 if (Button1->pressed || UserFile->pressed || (ListBox1->selected_item > -1 ) || (ListBox2->selected_item > -1 ))
229 if (ListBox2->selected_item > -1 )
230 strcpy(UserFile->text, directory_list[ListBox2->selected_item]);
232 strncpy(filename, ViewDir, PATH_MAX);
235 while (!strncmp(p, "..", 2)) // shorten the path manually
237 char *sep = strrchr(filename, '/');
241 *filename = 0; // look directly in search paths
249 strncat(filename, "/", PATH_MAX - strlen(filename));
250 strncat(filename, p, PATH_MAX - strlen(filename));
252 if (!PHYSFS_isDirectory(filename))
254 TempFile = PHYSFS_openRead(filename);
257 // Looks like a valid filename that already exists!
258 PHYSFS_close(TempFile);
262 // File doesn't exist, but can we create it?
263 TempFile = PHYSFS_openWrite(filename);
266 // Looks like a valid filename!
267 PHYSFS_close(TempFile);
268 PHYSFS_delete(filename);
274 if (filename[strlen(filename) - 1] == '/') // user typed a separator on the end
275 filename[strlen(filename) - 1] = 0;
277 strcpy(ViewDir, filename);
279 //mprintf( 0, "----------------------------\n" );
280 //mprintf( 0, "Full dir: '%s'\n", ViewDir );
282 PHYSFS_freeList(filename_list);
283 filename_list = file_getfilelist(&NumFiles, Filespec, ViewDir);
286 PHYSFS_freeList(directory_list);
290 ui_inputbox_set_text(UserFile, Filespec);
292 PHYSFS_freeList(directory_list);
293 directory_list = file_getdirlist(&NumDirs, ViewDir);
296 PHYSFS_freeList(filename_list);
300 ui_listbox_change(wnd, ListBox1, NumFiles, filename_list);
301 ui_listbox_change(wnd, ListBox2, NumDirs, directory_list);
304 ui_wprintf_at( wnd, 20, 60, "%s", Spaces );
305 ui_wprintf_at( wnd, 20, 60, "%s", ViewDir );
308 //while ( TICKER < i+2 );
321 ui_close_window(wnd);
323 PHYSFS_freeList(filename_list);
325 PHYSFS_freeList(directory_list);
332 int ui_get_file( char * filename, char * Filespec )
335 char **list = file_getfilelist(&NumFiles, Filespec, "");
339 x = MenuX(-1, -1, NumFiles, list);
342 strcpy(filename, list[x - 1]);
344 PHYSFS_freeList(list);