File Browser: Various fixes and enhancements to 'autoscroll to item' feature.
[blender.git] / source / blender / editors / space_file / file_ops.c
1 /*
2  * This program is free software; you can redistribute it and/or
3  * modify it under the terms of the GNU General Public License
4  * as published by the Free Software Foundation; either version 2
5  * of the License, or (at your option) any later version.
6  *
7  * This program is distributed in the hope that it will be useful,
8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10  * GNU General Public License for more details.
11  *
12  * You should have received a copy of the GNU General Public License
13  * along with this program; if not, write to the Free Software Foundation,
14  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
15  *
16  * The Original Code is Copyright (C) 2008 Blender Foundation.
17  * All rights reserved.
18  */
19
20 /** \file
21  * \ingroup spfile
22  */
23
24 #include "BLI_utildefines.h"
25
26 #include "BLI_blenlib.h"
27 #include "BLI_linklist.h"
28 #include "BLI_math.h"
29
30 #include "BLO_readfile.h"
31
32 #include "BKE_appdir.h"
33 #include "BKE_context.h"
34 #include "BKE_global.h"
35 #include "BKE_main.h"
36 #include "BKE_report.h"
37 #include "BKE_screen.h"
38
39 #ifdef WIN32
40 #  include "BLI_winstuff.h"
41 #endif
42
43 #include "ED_screen.h"
44 #include "ED_fileselect.h"
45 #include "ED_select_utils.h"
46
47 #include "UI_interface.h"
48
49 #include "MEM_guardedalloc.h"
50
51 #include "RNA_access.h"
52 #include "RNA_define.h"
53
54 #include "UI_view2d.h"
55
56 #include "WM_api.h"
57 #include "WM_types.h"
58
59 #include "file_intern.h"
60 #include "filelist.h"
61 #include "fsmenu.h"
62
63 #include <stdlib.h>
64 #include <string.h>
65 #include <stdio.h>
66 #include <ctype.h>
67 #include <errno.h>
68
69 /* ---------- FILE SELECTION ------------ */
70 static FileSelection find_file_mouse_rect(SpaceFile *sfile, ARegion *ar, const rcti *rect_region)
71 {
72   FileSelection sel;
73
74   View2D *v2d = &ar->v2d;
75   rcti rect_view;
76   rctf rect_view_fl;
77   rctf rect_region_fl;
78
79   BLI_rctf_rcti_copy(&rect_region_fl, rect_region);
80
81   UI_view2d_region_to_view_rctf(v2d, &rect_region_fl, &rect_view_fl);
82
83   BLI_rcti_init(&rect_view,
84                 (int)(v2d->tot.xmin + rect_view_fl.xmin),
85                 (int)(v2d->tot.xmin + rect_view_fl.xmax),
86                 (int)(v2d->tot.ymax - rect_view_fl.ymin),
87                 (int)(v2d->tot.ymax - rect_view_fl.ymax));
88
89   sel = ED_fileselect_layout_offset_rect(sfile->layout, &rect_view);
90
91   return sel;
92 }
93
94 static void file_deselect_all(SpaceFile *sfile, unsigned int flag)
95 {
96   FileSelection sel;
97   sel.first = 0;
98   sel.last = filelist_files_ensure(sfile->files) - 1;
99
100   filelist_entries_select_index_range_set(sfile->files, &sel, FILE_SEL_REMOVE, flag, CHECK_ALL);
101 }
102
103 typedef enum FileSelect {
104   FILE_SELECT_NOTHING = 0,
105   FILE_SELECT_DIR = 1,
106   FILE_SELECT_FILE = 2,
107 } FileSelect;
108
109 static void clamp_to_filelist(int numfiles, FileSelection *sel)
110 {
111   /* box select before the first file */
112   if ((sel->first < 0) && (sel->last >= 0)) {
113     sel->first = 0;
114   }
115   /* don't select if everything is outside filelist */
116   if ((sel->first >= numfiles) && ((sel->last < 0) || (sel->last >= numfiles))) {
117     sel->first = -1;
118     sel->last = -1;
119   }
120
121   /* fix if last file invalid */
122   if ((sel->first > 0) && (sel->last < 0)) {
123     sel->last = numfiles - 1;
124   }
125
126   /* clamp */
127   if ((sel->first >= numfiles)) {
128     sel->first = numfiles - 1;
129   }
130   if ((sel->last >= numfiles)) {
131     sel->last = numfiles - 1;
132   }
133 }
134
135 static FileSelection file_selection_get(bContext *C, const rcti *rect, bool fill)
136 {
137   ARegion *ar = CTX_wm_region(C);
138   SpaceFile *sfile = CTX_wm_space_file(C);
139   int numfiles = filelist_files_ensure(sfile->files);
140   FileSelection sel;
141
142   sel = find_file_mouse_rect(sfile, ar, rect);
143   if (!((sel.first == -1) && (sel.last == -1))) {
144     clamp_to_filelist(numfiles, &sel);
145   }
146
147   /* if desired, fill the selection up from the last selected file to the current one */
148   if (fill && (sel.last >= 0) && (sel.last < numfiles)) {
149     int f;
150     /* Try to find a smaller-index selected item. */
151     for (f = sel.last; f >= 0; f--) {
152       if (filelist_entry_select_index_get(sfile->files, f, CHECK_ALL)) {
153         break;
154       }
155     }
156     if (f >= 0) {
157       sel.first = f + 1;
158     }
159     /* If none found, try to find a higher-index selected item. */
160     else {
161       for (f = sel.first; f < numfiles; f++) {
162         if (filelist_entry_select_index_get(sfile->files, f, CHECK_ALL)) {
163           break;
164         }
165       }
166       if (f < numfiles) {
167         sel.last = f - 1;
168       }
169     }
170   }
171   return sel;
172 }
173
174 static FileSelect file_select_do(bContext *C, int selected_idx, bool do_diropen)
175 {
176   Main *bmain = CTX_data_main(C);
177   FileSelect retval = FILE_SELECT_NOTHING;
178   SpaceFile *sfile = CTX_wm_space_file(C);
179   FileSelectParams *params = ED_fileselect_get_params(sfile);
180   int numfiles = filelist_files_ensure(sfile->files);
181   const FileDirEntry *file;
182
183   /* make the selected file active */
184   if ((selected_idx >= 0) && (selected_idx < numfiles) &&
185       (file = filelist_file(sfile->files, selected_idx))) {
186     params->highlight_file = selected_idx;
187     params->active_file = selected_idx;
188
189     if (file->typeflag & FILE_TYPE_DIR) {
190       const bool is_parent_dir = FILENAME_IS_PARENT(file->relpath);
191
192       if (do_diropen == false) {
193         params->file[0] = '\0';
194         retval = FILE_SELECT_DIR;
195       }
196       /* the path is too long and we are not going up! */
197       else if (!is_parent_dir && strlen(params->dir) + strlen(file->relpath) >= FILE_MAX) {
198         // XXX error("Path too long, cannot enter this directory");
199       }
200       else {
201         if (is_parent_dir) {
202           /* avoids /../../ */
203           BLI_parent_dir(params->dir);
204
205           if (params->recursion_level > 1) {
206             /* Disable 'dirtree' recursion when going up in tree. */
207             params->recursion_level = 0;
208             filelist_setrecursion(sfile->files, params->recursion_level);
209           }
210         }
211         else {
212           BLI_cleanup_dir(BKE_main_blendfile_path(bmain), params->dir);
213           strcat(params->dir, file->relpath);
214           BLI_add_slash(params->dir);
215         }
216
217         ED_file_change_dir(C);
218         retval = FILE_SELECT_DIR;
219       }
220     }
221     else {
222       retval = FILE_SELECT_FILE;
223     }
224     fileselect_file_set(sfile, selected_idx);
225   }
226   return retval;
227 }
228
229 /**
230  * \warning: loops over all files so better use cautiously
231  */
232 static bool file_is_any_selected(struct FileList *files)
233 {
234   const int numfiles = filelist_files_ensure(files);
235   int i;
236
237   /* Is any file selected ? */
238   for (i = 0; i < numfiles; ++i) {
239     if (filelist_entry_select_index_get(files, i, CHECK_ALL)) {
240       return true;
241     }
242   }
243
244   return false;
245 }
246
247 /**
248  * If \a file is outside viewbounds, this adjusts view to make sure it's inside
249  */
250 static void file_ensure_inside_viewbounds(ARegion *ar, SpaceFile *sfile, const int file)
251 {
252   FileLayout *layout = ED_fileselect_get_layout(sfile, ar);
253   rctf *cur = &ar->v2d.cur;
254   rcti rect;
255   bool changed = true;
256
257   file_tile_boundbox(ar, layout, file, &rect);
258
259   /* down - also use if tile is higher than viewbounds so view is aligned to file name */
260   if (cur->ymin > rect.ymin || layout->tile_h > ar->winy) {
261     cur->ymin = rect.ymin - (2 * layout->tile_border_y);
262     cur->ymax = cur->ymin + ar->winy;
263   }
264   /* up */
265   else if (cur->ymax < rect.ymax) {
266     cur->ymax = rect.ymax + layout->tile_border_y;
267     cur->ymin = cur->ymax - ar->winy;
268   }
269   /* left - also use if tile is wider than viewbounds so view is aligned to file name */
270   else if (cur->xmin > rect.xmin || layout->tile_w > ar->winx) {
271     cur->xmin = rect.xmin - layout->tile_border_x;
272     cur->xmax = cur->xmin + ar->winx;
273   }
274   /* right */
275   else if (cur->xmax < rect.xmax) {
276     cur->xmax = rect.xmax + (2 * layout->tile_border_x);
277     cur->xmin = cur->xmax - ar->winx;
278   }
279   else {
280     BLI_assert(cur->xmin <= rect.xmin && cur->xmax >= rect.xmax && cur->ymin <= rect.ymin &&
281                cur->ymax >= rect.ymax);
282     changed = false;
283   }
284
285   if (changed) {
286     UI_view2d_curRect_validate(&ar->v2d);
287   }
288 }
289
290 static FileSelect file_select(
291     bContext *C, const rcti *rect, FileSelType select, bool fill, bool do_diropen)
292 {
293   SpaceFile *sfile = CTX_wm_space_file(C);
294   FileSelect retval = FILE_SELECT_NOTHING;
295   FileSelection sel = file_selection_get(C, rect, fill); /* get the selection */
296   const FileCheckType check_type = (sfile->params->flag & FILE_DIRSEL_ONLY) ? CHECK_DIRS :
297                                                                               CHECK_ALL;
298
299   /* flag the files as selected in the filelist */
300   filelist_entries_select_index_range_set(
301       sfile->files, &sel, select, FILE_SEL_SELECTED, check_type);
302
303   /* Don't act on multiple selected files */
304   if (sel.first != sel.last) {
305     select = 0;
306   }
307
308   /* Do we have a valid selection and are we actually selecting */
309   if ((sel.last >= 0) && (select != FILE_SEL_REMOVE)) {
310     /* Check last selection, if selected, act on the file or dir */
311     if (filelist_entry_select_index_get(sfile->files, sel.last, check_type)) {
312       retval = file_select_do(C, sel.last, do_diropen);
313     }
314   }
315
316   if (select != FILE_SEL_ADD && !file_is_any_selected(sfile->files)) {
317     sfile->params->active_file = -1;
318   }
319   else {
320     ARegion *ar = CTX_wm_region(C);
321     const FileLayout *layout = ED_fileselect_get_layout(sfile, ar);
322
323     /* Adjust view to display selection. Doing iterations for first and last
324      * selected item makes view showing as much of the selection possible.
325      * Not really useful if tiles are (almost) bigger than viewbounds though. */
326     if (((layout->flag & FILE_LAYOUT_HOR) && ar->winx > (1.2f * layout->tile_w)) ||
327         ((layout->flag & FILE_LAYOUT_VER) && ar->winy > (2.0f * layout->tile_h))) {
328       file_ensure_inside_viewbounds(ar, sfile, sel.last);
329       file_ensure_inside_viewbounds(ar, sfile, sel.first);
330     }
331   }
332
333   /* update operator for name change event */
334   file_draw_check(C);
335
336   return retval;
337 }
338
339 static int file_box_select_find_last_selected(SpaceFile *sfile,
340                                               ARegion *ar,
341                                               const FileSelection *sel,
342                                               const int mouse_xy[2])
343 {
344   FileLayout *layout = ED_fileselect_get_layout(sfile, ar);
345   rcti bounds_first, bounds_last;
346   int dist_first, dist_last;
347   float mouseco_view[2];
348
349   UI_view2d_region_to_view(&ar->v2d, UNPACK2(mouse_xy), &mouseco_view[0], &mouseco_view[1]);
350
351   file_tile_boundbox(ar, layout, sel->first, &bounds_first);
352   file_tile_boundbox(ar, layout, sel->last, &bounds_last);
353
354   /* are first and last in the same column (horizontal layout)/row (vertical layout)? */
355   if ((layout->flag & FILE_LAYOUT_HOR && bounds_first.xmin == bounds_last.xmin) ||
356       (layout->flag & FILE_LAYOUT_VER && bounds_first.ymin != bounds_last.ymin)) {
357     /* use vertical distance */
358     const int my_loc = (int)mouseco_view[1];
359     dist_first = BLI_rcti_length_y(&bounds_first, my_loc);
360     dist_last = BLI_rcti_length_y(&bounds_last, my_loc);
361   }
362   else {
363     /* use horizontal distance */
364     const int mx_loc = (int)mouseco_view[0];
365     dist_first = BLI_rcti_length_x(&bounds_first, mx_loc);
366     dist_last = BLI_rcti_length_x(&bounds_last, mx_loc);
367   }
368
369   return (dist_first < dist_last) ? sel->first : sel->last;
370 }
371
372 static int file_box_select_modal(bContext *C, wmOperator *op, const wmEvent *event)
373 {
374   ARegion *ar = CTX_wm_region(C);
375   SpaceFile *sfile = CTX_wm_space_file(C);
376   FileSelectParams *params = ED_fileselect_get_params(sfile);
377   FileSelection sel;
378   rcti rect;
379
380   int result;
381
382   result = WM_gesture_box_modal(C, op, event);
383
384   if (result == OPERATOR_RUNNING_MODAL) {
385     WM_operator_properties_border_to_rcti(op, &rect);
386
387     BLI_rcti_isect(&(ar->v2d.mask), &rect, &rect);
388
389     sel = file_selection_get(C, &rect, 0);
390     if ((sel.first != params->sel_first) || (sel.last != params->sel_last)) {
391       int idx;
392
393       file_deselect_all(sfile, FILE_SEL_HIGHLIGHTED);
394       filelist_entries_select_index_range_set(
395           sfile->files, &sel, FILE_SEL_ADD, FILE_SEL_HIGHLIGHTED, CHECK_ALL);
396       WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
397
398       for (idx = sel.last; idx >= 0; idx--) {
399         const FileDirEntry *file = filelist_file(sfile->files, idx);
400
401         /* dont highlight readonly file (".." or ".") on box select */
402         if (FILENAME_IS_CURRPAR(file->relpath)) {
403           filelist_entry_select_set(
404               sfile->files, file, FILE_SEL_REMOVE, FILE_SEL_HIGHLIGHTED, CHECK_ALL);
405         }
406
407         /* make sure highlight_file is no readonly file */
408         if (sel.last == idx) {
409           params->highlight_file = idx;
410         }
411       }
412     }
413     params->sel_first = sel.first;
414     params->sel_last = sel.last;
415     params->active_file = file_box_select_find_last_selected(sfile, ar, &sel, event->mval);
416   }
417   else {
418     params->highlight_file = -1;
419     params->sel_first = params->sel_last = -1;
420     fileselect_file_set(sfile, params->active_file);
421     file_deselect_all(sfile, FILE_SEL_HIGHLIGHTED);
422     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
423   }
424
425   return result;
426 }
427
428 static int file_box_select_exec(bContext *C, wmOperator *op)
429 {
430   ARegion *ar = CTX_wm_region(C);
431   SpaceFile *sfile = CTX_wm_space_file(C);
432   rcti rect;
433   FileSelect ret;
434
435   WM_operator_properties_border_to_rcti(op, &rect);
436
437   const eSelectOp sel_op = RNA_enum_get(op->ptr, "mode");
438   const bool select = (sel_op != SEL_OP_SUB);
439   if (SEL_OP_USE_PRE_DESELECT(sel_op)) {
440     file_deselect_all(sfile, FILE_SEL_SELECTED);
441   }
442
443   BLI_rcti_isect(&(ar->v2d.mask), &rect, &rect);
444
445   ret = file_select(C, &rect, select ? FILE_SEL_ADD : FILE_SEL_REMOVE, false, false);
446
447   /* unselect '..' parent entry - it's not supposed to be selected if more than
448    * one file is selected */
449   filelist_entry_select_index_set(sfile->files, 0, FILE_SEL_REMOVE, FILE_SEL_SELECTED, CHECK_ALL);
450
451   if (FILE_SELECT_DIR == ret) {
452     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
453   }
454   else if (FILE_SELECT_FILE == ret) {
455     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
456   }
457   return OPERATOR_FINISHED;
458 }
459
460 void FILE_OT_select_box(wmOperatorType *ot)
461 {
462   /* identifiers */
463   ot->name = "Box Select";
464   ot->description = "Activate/select the file(s) contained in the border";
465   ot->idname = "FILE_OT_select_box";
466
467   /* api callbacks */
468   ot->invoke = WM_gesture_box_invoke;
469   ot->exec = file_box_select_exec;
470   ot->modal = file_box_select_modal;
471   ot->poll = ED_operator_file_active;
472   ot->cancel = WM_gesture_box_cancel;
473
474   /* properties */
475   WM_operator_properties_gesture_box(ot);
476   WM_operator_properties_select_operation_simple(ot);
477 }
478
479 static int file_select_invoke(bContext *C, wmOperator *op, const wmEvent *event)
480 {
481   ARegion *ar = CTX_wm_region(C);
482   SpaceFile *sfile = CTX_wm_space_file(C);
483   FileSelect ret;
484   rcti rect;
485   const bool extend = RNA_boolean_get(op->ptr, "extend");
486   const bool fill = RNA_boolean_get(op->ptr, "fill");
487   const bool do_diropen = RNA_boolean_get(op->ptr, "open");
488
489   if (ar->regiontype != RGN_TYPE_WINDOW) {
490     return OPERATOR_CANCELLED;
491   }
492
493   rect.xmin = rect.xmax = event->mval[0];
494   rect.ymin = rect.ymax = event->mval[1];
495
496   if (!BLI_rcti_isect_pt(&ar->v2d.mask, rect.xmin, rect.ymin)) {
497     return OPERATOR_CANCELLED;
498   }
499
500   if (sfile && sfile->params) {
501     int idx = sfile->params->highlight_file;
502     int numfiles = filelist_files_ensure(sfile->files);
503
504     if ((idx >= 0) && (idx < numfiles)) {
505       /* single select, deselect all selected first */
506       if (!extend) {
507         file_deselect_all(sfile, FILE_SEL_SELECTED);
508       }
509     }
510   }
511
512   ret = file_select(C, &rect, extend ? FILE_SEL_TOGGLE : FILE_SEL_ADD, fill, do_diropen);
513
514   if (extend) {
515     /* unselect '..' parent entry - it's not supposed to be selected if more
516      * than one file is selected */
517     filelist_entry_select_index_set(
518         sfile->files, 0, FILE_SEL_REMOVE, FILE_SEL_SELECTED, CHECK_ALL);
519   }
520
521   if (FILE_SELECT_DIR == ret) {
522     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
523   }
524   else if (FILE_SELECT_FILE == ret) {
525     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
526   }
527
528   WM_event_add_mousemove(C); /* for directory changes */
529   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
530
531   return OPERATOR_FINISHED;
532 }
533
534 void FILE_OT_select(wmOperatorType *ot)
535 {
536   PropertyRNA *prop;
537
538   /* identifiers */
539   ot->name = "Select";
540   ot->description = "Activate/select file";
541   ot->idname = "FILE_OT_select";
542
543   /* api callbacks */
544   ot->invoke = file_select_invoke;
545   ot->poll = ED_operator_file_active;
546
547   /* properties */
548   prop = RNA_def_boolean(ot->srna,
549                          "extend",
550                          false,
551                          "Extend",
552                          "Extend selection instead of deselecting everything first");
553   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
554   prop = RNA_def_boolean(
555       ot->srna, "fill", false, "Fill", "Select everything beginning with the last selection");
556   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
557   prop = RNA_def_boolean(ot->srna, "open", true, "Open", "Open a directory when selecting it");
558   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
559 }
560
561 /**
562  * \returns true if selection has changed
563  */
564 static bool file_walk_select_selection_set(bContext *C,
565                                            SpaceFile *sfile,
566                                            const int direction,
567                                            const int numfiles,
568                                            const int active_old,
569                                            const int active_new,
570                                            const int other_site,
571                                            const bool has_selection,
572                                            const bool extend,
573                                            const bool fill)
574 {
575   FileSelectParams *params = sfile->params;
576   struct FileList *files = sfile->files;
577   const int last_sel = params->active_file; /* store old value */
578   int active = active_old; /* could use active_old instead, just for readability */
579   bool deselect = false;
580
581   BLI_assert(params);
582
583   if (has_selection) {
584     if (extend && filelist_entry_select_index_get(files, active_old, CHECK_ALL) &&
585         filelist_entry_select_index_get(files, active_new, CHECK_ALL)) {
586       /* conditions for deselecting: initial file is selected, new file is
587        * selected and either other_side isn't selected/found or we use fill */
588       deselect = (fill || other_site == -1 ||
589                   !filelist_entry_select_index_get(files, other_site, CHECK_ALL));
590
591       /* don't change highlight_file here since we either want to deselect active or we want
592        * to walk through a block of selected files without selecting/deselecting anything */
593       params->active_file = active_new;
594       /* but we want to change active if we use fill
595        * (needed to get correct selection bounds) */
596       if (deselect && fill) {
597         active = active_new;
598       }
599     }
600     else {
601       /* regular selection change */
602       params->active_file = active = active_new;
603     }
604   }
605   else {
606     /* select last file */
607     if (ELEM(direction, FILE_SELECT_WALK_UP, FILE_SELECT_WALK_LEFT)) {
608       params->active_file = active = numfiles - 1;
609     }
610     /* select first file */
611     else if (ELEM(direction, FILE_SELECT_WALK_DOWN, FILE_SELECT_WALK_RIGHT)) {
612       params->active_file = active = extend ? 1 : 0;
613     }
614     else {
615       BLI_assert(0);
616     }
617   }
618
619   if (active < 0) {
620     return false;
621   }
622
623   if (extend) {
624     /* highlight the active walker file for extended selection for better visual feedback */
625     params->highlight_file = params->active_file;
626
627     /* unselect '..' parent entry - it's not supposed to be selected if more
628      * than one file is selected */
629     filelist_entry_select_index_set(files, 0, FILE_SEL_REMOVE, FILE_SEL_SELECTED, CHECK_ALL);
630   }
631   else {
632     /* deselect all first */
633     file_deselect_all(sfile, FILE_SEL_SELECTED);
634
635     /* highlight file under mouse pos */
636     params->highlight_file = -1;
637     WM_event_add_mousemove(C);
638   }
639
640   /* do the actual selection */
641   if (fill) {
642     FileSelection sel = {MIN2(active, last_sel), MAX2(active, last_sel)};
643
644     /* clamping selection to not include '..' parent entry */
645     if (sel.first == 0) {
646       sel.first = 1;
647     }
648
649     /* fill selection between last and first selected file */
650     filelist_entries_select_index_range_set(
651         files, &sel, deselect ? FILE_SEL_REMOVE : FILE_SEL_ADD, FILE_SEL_SELECTED, CHECK_ALL);
652     /* entire sel is cleared here, so select active again */
653     if (deselect) {
654       filelist_entry_select_index_set(files, active, FILE_SEL_ADD, FILE_SEL_SELECTED, CHECK_ALL);
655     }
656   }
657   else {
658     filelist_entry_select_index_set(
659         files, active, deselect ? FILE_SEL_REMOVE : FILE_SEL_ADD, FILE_SEL_SELECTED, CHECK_ALL);
660   }
661
662   BLI_assert(IN_RANGE(active, -1, numfiles));
663   fileselect_file_set(sfile, params->active_file);
664
665   /* ensure newly selected file is inside viewbounds */
666   file_ensure_inside_viewbounds(CTX_wm_region(C), sfile, params->active_file);
667
668   /* selection changed */
669   return true;
670 }
671
672 /**
673  * \returns true if selection has changed
674  */
675 static bool file_walk_select_do(bContext *C,
676                                 SpaceFile *sfile,
677                                 FileSelectParams *params,
678                                 const int direction,
679                                 const bool extend,
680                                 const bool fill)
681 {
682   struct FileList *files = sfile->files;
683   const int numfiles = filelist_files_ensure(files);
684   const bool has_selection = file_is_any_selected(files);
685   const int active_old = params->active_file;
686   int active_new = -1;
687   int other_site = -1; /* file on the other site of active_old */
688
689   /* *** get all needed files for handling selection *** */
690
691   if (has_selection) {
692     ARegion *ar = CTX_wm_region(C);
693     FileLayout *layout = ED_fileselect_get_layout(sfile, ar);
694     const int idx_shift = (layout->flag & FILE_LAYOUT_HOR) ? layout->rows : layout->columns;
695
696     if ((layout->flag & FILE_LAYOUT_HOR && direction == FILE_SELECT_WALK_UP) ||
697         (layout->flag & FILE_LAYOUT_VER && direction == FILE_SELECT_WALK_LEFT)) {
698       active_new = active_old - 1;
699       other_site = active_old + 1;
700     }
701     else if ((layout->flag & FILE_LAYOUT_HOR && direction == FILE_SELECT_WALK_DOWN) ||
702              (layout->flag & FILE_LAYOUT_VER && direction == FILE_SELECT_WALK_RIGHT)) {
703       active_new = active_old + 1;
704       other_site = active_old - 1;
705     }
706     else if ((layout->flag & FILE_LAYOUT_HOR && direction == FILE_SELECT_WALK_LEFT) ||
707              (layout->flag & FILE_LAYOUT_VER && direction == FILE_SELECT_WALK_UP)) {
708       active_new = active_old - idx_shift;
709       other_site = active_old + idx_shift;
710     }
711     else if ((layout->flag & FILE_LAYOUT_HOR && direction == FILE_SELECT_WALK_RIGHT) ||
712              (layout->flag & FILE_LAYOUT_VER && direction == FILE_SELECT_WALK_DOWN)) {
713
714       active_new = active_old + idx_shift;
715       other_site = active_old - idx_shift;
716     }
717     else {
718       BLI_assert(0);
719     }
720
721     if (!IN_RANGE(active_new, 0, numfiles)) {
722       if (extend) {
723         /* extend to invalid file -> abort */
724         return false;
725       }
726       /* if we don't extend, selecting '..' (index == 0) is allowed so
727        * using key selection to go to parent directory is possible */
728       else if (active_new != 0) {
729         /* select initial file */
730         active_new = active_old;
731       }
732     }
733     if (!IN_RANGE(other_site, 0, numfiles)) {
734       other_site = -1;
735     }
736   }
737
738   return file_walk_select_selection_set(C,
739                                         sfile,
740                                         direction,
741                                         numfiles,
742                                         active_old,
743                                         active_new,
744                                         other_site,
745                                         has_selection,
746                                         extend,
747                                         fill);
748 }
749
750 static int file_walk_select_invoke(bContext *C, wmOperator *op, const wmEvent *UNUSED(event))
751 {
752   SpaceFile *sfile = (SpaceFile *)CTX_wm_space_data(C);
753   FileSelectParams *params = sfile->params;
754   const int direction = RNA_enum_get(op->ptr, "direction");
755   const bool extend = RNA_boolean_get(op->ptr, "extend");
756   const bool fill = RNA_boolean_get(op->ptr, "fill");
757
758   if (file_walk_select_do(C, sfile, params, direction, extend, fill)) {
759     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
760     return OPERATOR_FINISHED;
761   }
762
763   return OPERATOR_CANCELLED;
764 }
765
766 void FILE_OT_select_walk(wmOperatorType *ot)
767 {
768   static const EnumPropertyItem direction_items[] = {
769       {FILE_SELECT_WALK_UP, "UP", 0, "Prev", ""},
770       {FILE_SELECT_WALK_DOWN, "DOWN", 0, "Next", ""},
771       {FILE_SELECT_WALK_LEFT, "LEFT", 0, "Left", ""},
772       {FILE_SELECT_WALK_RIGHT, "RIGHT", 0, "Right", ""},
773       {0, NULL, 0, NULL, NULL},
774   };
775   PropertyRNA *prop;
776
777   /* identifiers */
778   ot->name = "Walk Select/Deselect File";
779   ot->description = "Select/Deselect files by walking through them";
780   ot->idname = "FILE_OT_select_walk";
781
782   /* api callbacks */
783   ot->invoke = file_walk_select_invoke;
784   ot->poll = ED_operator_file_active;
785
786   /* properties */
787   prop = RNA_def_enum(ot->srna,
788                       "direction",
789                       direction_items,
790                       0,
791                       "Walk Direction",
792                       "Select/Deselect file in this direction");
793   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
794   prop = RNA_def_boolean(ot->srna,
795                          "extend",
796                          false,
797                          "Extend",
798                          "Extend selection instead of deselecting everything first");
799   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
800   prop = RNA_def_boolean(
801       ot->srna, "fill", false, "Fill", "Select everything beginning with the last selection");
802   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
803 }
804
805 static int file_select_all_exec(bContext *C, wmOperator *UNUSED(op))
806 {
807   ScrArea *sa = CTX_wm_area(C);
808   SpaceFile *sfile = CTX_wm_space_file(C);
809   FileSelection sel;
810   const int numfiles = filelist_files_ensure(sfile->files);
811   const bool has_selection = file_is_any_selected(sfile->files);
812
813   sel.first = 0;
814   sel.last = numfiles - 1;
815
816   /* select all only if previously no file was selected */
817   if (has_selection) {
818     filelist_entries_select_index_range_set(
819         sfile->files, &sel, FILE_SEL_REMOVE, FILE_SEL_SELECTED, CHECK_ALL);
820     sfile->params->active_file = -1;
821   }
822   else {
823     const FileCheckType check_type = (sfile->params->flag & FILE_DIRSEL_ONLY) ? CHECK_DIRS :
824                                                                                 CHECK_FILES;
825     int i;
826
827     filelist_entries_select_index_range_set(
828         sfile->files, &sel, FILE_SEL_ADD, FILE_SEL_SELECTED, check_type);
829
830     /* set active_file to first selected */
831     for (i = 0; i < numfiles; i++) {
832       if (filelist_entry_select_index_get(sfile->files, i, check_type)) {
833         sfile->params->active_file = i;
834         break;
835       }
836     }
837   }
838
839   file_draw_check(C);
840   WM_event_add_mousemove(C);
841   ED_area_tag_redraw(sa);
842
843   return OPERATOR_FINISHED;
844 }
845
846 void FILE_OT_select_all(wmOperatorType *ot)
847 {
848   /* identifiers */
849   ot->name = "(De)select All Files";
850   ot->description = "Select or deselect all files";
851   ot->idname = "FILE_OT_select_all";
852
853   /* api callbacks */
854   ot->exec = file_select_all_exec;
855   ot->poll = ED_operator_file_active;
856
857   /* properties */
858 }
859
860 /* ---------- BOOKMARKS ----------- */
861
862 /* Note we could get rid of this one, but it's used by some addon so...
863  * Does not hurt keeping it around for now. */
864 static int bookmark_select_exec(bContext *C, wmOperator *op)
865 {
866   Main *bmain = CTX_data_main(C);
867   SpaceFile *sfile = CTX_wm_space_file(C);
868   PropertyRNA *prop;
869
870   if ((prop = RNA_struct_find_property(op->ptr, "dir"))) {
871     char entry[256];
872     FileSelectParams *params = sfile->params;
873
874     RNA_property_string_get(op->ptr, prop, entry);
875     BLI_strncpy(params->dir, entry, sizeof(params->dir));
876     BLI_cleanup_dir(BKE_main_blendfile_path(bmain), params->dir);
877     ED_file_change_dir(C);
878
879     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
880   }
881
882   return OPERATOR_FINISHED;
883 }
884
885 void FILE_OT_select_bookmark(wmOperatorType *ot)
886 {
887   PropertyRNA *prop;
888
889   /* identifiers */
890   ot->name = "Select Directory";
891   ot->description = "Select a bookmarked directory";
892   ot->idname = "FILE_OT_select_bookmark";
893
894   /* api callbacks */
895   ot->exec = bookmark_select_exec;
896   ot->poll = ED_operator_file_active;
897
898   /* properties */
899   prop = RNA_def_string(ot->srna, "dir", NULL, FILE_MAXDIR, "Dir", "");
900   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
901 }
902
903 static int bookmark_add_exec(bContext *C, wmOperator *UNUSED(op))
904 {
905   ScrArea *sa = CTX_wm_area(C);
906   SpaceFile *sfile = CTX_wm_space_file(C);
907   struct FSMenu *fsmenu = ED_fsmenu_get();
908   struct FileSelectParams *params = ED_fileselect_get_params(sfile);
909
910   if (params->dir[0] != '\0') {
911     char name[FILE_MAX];
912
913     fsmenu_insert_entry(fsmenu, FS_CATEGORY_BOOKMARKS, params->dir, NULL, FS_INSERT_SAVE);
914     BLI_make_file_string(
915         "/", name, BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL), BLENDER_BOOKMARK_FILE);
916     fsmenu_write_file(fsmenu, name);
917   }
918
919   ED_area_tag_refresh(sa);
920   ED_area_tag_redraw(sa);
921   return OPERATOR_FINISHED;
922 }
923
924 void FILE_OT_bookmark_add(wmOperatorType *ot)
925 {
926   /* identifiers */
927   ot->name = "Add Bookmark";
928   ot->description = "Add a bookmark for the selected/active directory";
929   ot->idname = "FILE_OT_bookmark_add";
930
931   /* api callbacks */
932   ot->exec = bookmark_add_exec;
933   ot->poll = ED_operator_file_active;
934 }
935
936 static int bookmark_delete_exec(bContext *C, wmOperator *op)
937 {
938   ScrArea *sa = CTX_wm_area(C);
939   SpaceFile *sfile = CTX_wm_space_file(C);
940   struct FSMenu *fsmenu = ED_fsmenu_get();
941   int nentries = ED_fsmenu_get_nentries(fsmenu, FS_CATEGORY_BOOKMARKS);
942
943   PropertyRNA *prop = RNA_struct_find_property(op->ptr, "index");
944
945   if (prop) {
946     int index;
947     if (RNA_property_is_set(op->ptr, prop)) {
948       index = RNA_property_int_get(op->ptr, prop);
949     }
950     else { /* if index unset, use active bookmark... */
951       index = sfile->bookmarknr;
952     }
953     if ((index > -1) && (index < nentries)) {
954       char name[FILE_MAX];
955
956       fsmenu_remove_entry(fsmenu, FS_CATEGORY_BOOKMARKS, index);
957       BLI_make_file_string("/",
958                            name,
959                            BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL),
960                            BLENDER_BOOKMARK_FILE);
961       fsmenu_write_file(fsmenu, name);
962       ED_area_tag_refresh(sa);
963       ED_area_tag_redraw(sa);
964     }
965   }
966
967   return OPERATOR_FINISHED;
968 }
969
970 void FILE_OT_bookmark_delete(wmOperatorType *ot)
971 {
972   PropertyRNA *prop;
973
974   /* identifiers */
975   ot->name = "Delete Bookmark";
976   ot->description = "Delete selected bookmark";
977   ot->idname = "FILE_OT_bookmark_delete";
978
979   /* api callbacks */
980   ot->exec = bookmark_delete_exec;
981   ot->poll = ED_operator_file_active;
982
983   /* properties */
984   prop = RNA_def_int(ot->srna, "index", -1, -1, 20000, "Index", "", -1, 20000);
985   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
986 }
987
988 static int bookmark_cleanup_exec(bContext *C, wmOperator *UNUSED(op))
989 {
990   ScrArea *sa = CTX_wm_area(C);
991   struct FSMenu *fsmenu = ED_fsmenu_get();
992   struct FSMenuEntry *fsme_next, *fsme = ED_fsmenu_get_category(fsmenu, FS_CATEGORY_BOOKMARKS);
993   int index;
994   bool changed = false;
995
996   for (index = 0; fsme; fsme = fsme_next) {
997     fsme_next = fsme->next;
998
999     if (!BLI_is_dir(fsme->path)) {
1000       fsmenu_remove_entry(fsmenu, FS_CATEGORY_BOOKMARKS, index);
1001       changed = true;
1002     }
1003     else {
1004       index++;
1005     }
1006   }
1007
1008   if (changed) {
1009     char name[FILE_MAX];
1010
1011     BLI_make_file_string(
1012         "/", name, BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL), BLENDER_BOOKMARK_FILE);
1013     fsmenu_write_file(fsmenu, name);
1014     fsmenu_refresh_bookmarks_status(CTX_wm_manager(C), fsmenu);
1015     ED_area_tag_refresh(sa);
1016     ED_area_tag_redraw(sa);
1017   }
1018
1019   return OPERATOR_FINISHED;
1020 }
1021
1022 void FILE_OT_bookmark_cleanup(wmOperatorType *ot)
1023 {
1024   /* identifiers */
1025   ot->name = "Cleanup Bookmarks";
1026   ot->description = "Delete all invalid bookmarks";
1027   ot->idname = "FILE_OT_bookmark_cleanup";
1028
1029   /* api callbacks */
1030   ot->exec = bookmark_cleanup_exec;
1031   ot->poll = ED_operator_file_active;
1032
1033   /* properties */
1034 }
1035
1036 enum {
1037   FILE_BOOKMARK_MOVE_TOP = -2,
1038   FILE_BOOKMARK_MOVE_UP = -1,
1039   FILE_BOOKMARK_MOVE_DOWN = 1,
1040   FILE_BOOKMARK_MOVE_BOTTOM = 2,
1041 };
1042
1043 static int bookmark_move_exec(bContext *C, wmOperator *op)
1044 {
1045   ScrArea *sa = CTX_wm_area(C);
1046   SpaceFile *sfile = CTX_wm_space_file(C);
1047   struct FSMenu *fsmenu = ED_fsmenu_get();
1048   struct FSMenuEntry *fsmentry = ED_fsmenu_get_category(fsmenu, FS_CATEGORY_BOOKMARKS);
1049   const struct FSMenuEntry *fsmentry_org = fsmentry;
1050
1051   char fname[FILE_MAX];
1052
1053   const int direction = RNA_enum_get(op->ptr, "direction");
1054   const int totitems = ED_fsmenu_get_nentries(fsmenu, FS_CATEGORY_BOOKMARKS);
1055   const int act_index = sfile->bookmarknr;
1056   int new_index;
1057
1058   if (totitems < 2) {
1059     return OPERATOR_CANCELLED;
1060   }
1061
1062   switch (direction) {
1063     case FILE_BOOKMARK_MOVE_TOP:
1064       new_index = 0;
1065       break;
1066     case FILE_BOOKMARK_MOVE_BOTTOM:
1067       new_index = totitems - 1;
1068       break;
1069     case FILE_BOOKMARK_MOVE_UP:
1070     case FILE_BOOKMARK_MOVE_DOWN:
1071     default:
1072       new_index = (totitems + act_index + direction) % totitems;
1073       break;
1074   }
1075
1076   if (new_index == act_index) {
1077     return OPERATOR_CANCELLED;
1078   }
1079
1080   BLI_linklist_move_item((LinkNode **)&fsmentry, act_index, new_index);
1081   if (fsmentry != fsmentry_org) {
1082     ED_fsmenu_set_category(fsmenu, FS_CATEGORY_BOOKMARKS, fsmentry);
1083   }
1084
1085   /* Need to update active bookmark number. */
1086   sfile->bookmarknr = new_index;
1087
1088   BLI_make_file_string(
1089       "/", fname, BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL), BLENDER_BOOKMARK_FILE);
1090   fsmenu_write_file(fsmenu, fname);
1091
1092   ED_area_tag_redraw(sa);
1093   return OPERATOR_FINISHED;
1094 }
1095
1096 void FILE_OT_bookmark_move(wmOperatorType *ot)
1097 {
1098   static const EnumPropertyItem slot_move[] = {
1099       {FILE_BOOKMARK_MOVE_TOP, "TOP", 0, "Top", "Top of the list"},
1100       {FILE_BOOKMARK_MOVE_UP, "UP", 0, "Up", ""},
1101       {FILE_BOOKMARK_MOVE_DOWN, "DOWN", 0, "Down", ""},
1102       {FILE_BOOKMARK_MOVE_BOTTOM, "BOTTOM", 0, "Bottom", "Bottom of the list"},
1103       {0, NULL, 0, NULL, NULL}};
1104
1105   /* identifiers */
1106   ot->name = "Move Bookmark";
1107   ot->idname = "FILE_OT_bookmark_move";
1108   ot->description = "Move the active bookmark up/down in the list";
1109
1110   /* api callbacks */
1111   ot->poll = ED_operator_file_active;
1112   ot->exec = bookmark_move_exec;
1113
1114   /* flags */
1115   ot->flag = OPTYPE_REGISTER; /* No undo! */
1116
1117   RNA_def_enum(ot->srna,
1118                "direction",
1119                slot_move,
1120                0,
1121                "Direction",
1122                "Direction to move the active bookmark towards");
1123 }
1124
1125 static int reset_recent_exec(bContext *C, wmOperator *UNUSED(op))
1126 {
1127   ScrArea *sa = CTX_wm_area(C);
1128   char name[FILE_MAX];
1129   struct FSMenu *fsmenu = ED_fsmenu_get();
1130
1131   while (ED_fsmenu_get_entry(fsmenu, FS_CATEGORY_RECENT, 0) != NULL) {
1132     fsmenu_remove_entry(fsmenu, FS_CATEGORY_RECENT, 0);
1133   }
1134   BLI_make_file_string(
1135       "/", name, BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL), BLENDER_BOOKMARK_FILE);
1136   fsmenu_write_file(fsmenu, name);
1137   ED_area_tag_redraw(sa);
1138
1139   return OPERATOR_FINISHED;
1140 }
1141
1142 void FILE_OT_reset_recent(wmOperatorType *ot)
1143 {
1144   /* identifiers */
1145   ot->name = "Reset Recent";
1146   ot->description = "Reset Recent files";
1147   ot->idname = "FILE_OT_reset_recent";
1148
1149   /* api callbacks */
1150   ot->exec = reset_recent_exec;
1151   ot->poll = ED_operator_file_active;
1152 }
1153
1154 int file_highlight_set(SpaceFile *sfile, ARegion *ar, int mx, int my)
1155 {
1156   View2D *v2d = &ar->v2d;
1157   FileSelectParams *params;
1158   int numfiles, origfile;
1159
1160   if (sfile == NULL || sfile->files == NULL) {
1161     return 0;
1162   }
1163
1164   numfiles = filelist_files_ensure(sfile->files);
1165   params = ED_fileselect_get_params(sfile);
1166
1167   origfile = params->highlight_file;
1168
1169   mx -= ar->winrct.xmin;
1170   my -= ar->winrct.ymin;
1171
1172   if (BLI_rcti_isect_pt(&ar->v2d.mask, mx, my)) {
1173     float fx, fy;
1174     int highlight_file;
1175
1176     UI_view2d_region_to_view(v2d, mx, my, &fx, &fy);
1177
1178     highlight_file = ED_fileselect_layout_offset(
1179         sfile->layout, (int)(v2d->tot.xmin + fx), (int)(v2d->tot.ymax - fy));
1180
1181     if ((highlight_file >= 0) && (highlight_file < numfiles)) {
1182       params->highlight_file = highlight_file;
1183     }
1184     else {
1185       params->highlight_file = -1;
1186     }
1187   }
1188   else {
1189     params->highlight_file = -1;
1190   }
1191
1192   return (params->highlight_file != origfile);
1193 }
1194
1195 static int file_highlight_invoke(bContext *C, wmOperator *UNUSED(op), const wmEvent *event)
1196 {
1197   ARegion *ar = CTX_wm_region(C);
1198   SpaceFile *sfile = CTX_wm_space_file(C);
1199
1200   if (!file_highlight_set(sfile, ar, event->x, event->y)) {
1201     return OPERATOR_PASS_THROUGH;
1202   }
1203
1204   ED_area_tag_redraw(CTX_wm_area(C));
1205
1206   return OPERATOR_PASS_THROUGH;
1207 }
1208
1209 void FILE_OT_highlight(struct wmOperatorType *ot)
1210 {
1211   /* identifiers */
1212   ot->name = "Highlight File";
1213   ot->description = "Highlight selected file(s)";
1214   ot->idname = "FILE_OT_highlight";
1215
1216   /* api callbacks */
1217   ot->invoke = file_highlight_invoke;
1218   ot->poll = ED_operator_file_active;
1219 }
1220
1221 int file_cancel_exec(bContext *C, wmOperator *UNUSED(unused))
1222 {
1223   wmWindowManager *wm = CTX_wm_manager(C);
1224   SpaceFile *sfile = CTX_wm_space_file(C);
1225   wmOperator *op = sfile->op;
1226
1227   sfile->op = NULL;
1228
1229   WM_event_fileselect_event(wm, op, EVT_FILESELECT_CANCEL);
1230
1231   return OPERATOR_FINISHED;
1232 }
1233
1234 static bool file_operator_poll(bContext *C)
1235 {
1236   bool poll = ED_operator_file_active(C);
1237   SpaceFile *sfile = CTX_wm_space_file(C);
1238
1239   if (!sfile || !sfile->op) {
1240     poll = 0;
1241   }
1242
1243   return poll;
1244 }
1245
1246 void FILE_OT_cancel(struct wmOperatorType *ot)
1247 {
1248   /* identifiers */
1249   ot->name = "Cancel File Load";
1250   ot->description = "Cancel loading of selected file";
1251   ot->idname = "FILE_OT_cancel";
1252
1253   /* api callbacks */
1254   ot->exec = file_cancel_exec;
1255   ot->poll = file_operator_poll;
1256 }
1257
1258 void file_sfile_to_operator_ex(bContext *C, wmOperator *op, SpaceFile *sfile, char *filepath)
1259 {
1260   Main *bmain = CTX_data_main(C);
1261   PropertyRNA *prop;
1262
1263   /* XXX, not real length */
1264   BLI_join_dirfile(filepath, FILE_MAX, sfile->params->dir, sfile->params->file);
1265
1266   if ((prop = RNA_struct_find_property(op->ptr, "relative_path"))) {
1267     if (RNA_property_boolean_get(op->ptr, prop)) {
1268       BLI_path_rel(filepath, BKE_main_blendfile_path(bmain));
1269     }
1270   }
1271
1272   if ((prop = RNA_struct_find_property(op->ptr, "filename"))) {
1273     RNA_property_string_set(op->ptr, prop, sfile->params->file);
1274   }
1275   if ((prop = RNA_struct_find_property(op->ptr, "directory"))) {
1276     RNA_property_string_set(op->ptr, prop, sfile->params->dir);
1277   }
1278   if ((prop = RNA_struct_find_property(op->ptr, "filepath"))) {
1279     RNA_property_string_set(op->ptr, prop, filepath);
1280   }
1281
1282   /* some ops have multiple files to select */
1283   /* this is called on operators check() so clear collections first since
1284    * they may be already set. */
1285   {
1286     int i, numfiles = filelist_files_ensure(sfile->files);
1287
1288     if ((prop = RNA_struct_find_property(op->ptr, "files"))) {
1289       PointerRNA itemptr;
1290       int num_files = 0;
1291       RNA_property_collection_clear(op->ptr, prop);
1292       for (i = 0; i < numfiles; i++) {
1293         if (filelist_entry_select_index_get(sfile->files, i, CHECK_FILES)) {
1294           FileDirEntry *file = filelist_file(sfile->files, i);
1295           RNA_property_collection_add(op->ptr, prop, &itemptr);
1296           RNA_string_set(&itemptr, "name", file->relpath);
1297           num_files++;
1298         }
1299       }
1300       /* make sure the file specified in the filename button is added even if no
1301        * files selected */
1302       if (0 == num_files) {
1303         RNA_property_collection_add(op->ptr, prop, &itemptr);
1304         RNA_string_set(&itemptr, "name", sfile->params->file);
1305       }
1306     }
1307
1308     if ((prop = RNA_struct_find_property(op->ptr, "dirs"))) {
1309       PointerRNA itemptr;
1310       int num_dirs = 0;
1311       RNA_property_collection_clear(op->ptr, prop);
1312       for (i = 0; i < numfiles; i++) {
1313         if (filelist_entry_select_index_get(sfile->files, i, CHECK_DIRS)) {
1314           FileDirEntry *file = filelist_file(sfile->files, i);
1315           RNA_property_collection_add(op->ptr, prop, &itemptr);
1316           RNA_string_set(&itemptr, "name", file->relpath);
1317           num_dirs++;
1318         }
1319       }
1320
1321       /* make sure the directory specified in the button is added even if no
1322        * directory selected */
1323       if (0 == num_dirs) {
1324         RNA_property_collection_add(op->ptr, prop, &itemptr);
1325         RNA_string_set(&itemptr, "name", sfile->params->dir);
1326       }
1327     }
1328   }
1329 }
1330 void file_sfile_to_operator(bContext *C, wmOperator *op, SpaceFile *sfile)
1331 {
1332   char filepath[FILE_MAX];
1333
1334   file_sfile_to_operator_ex(C, op, sfile, filepath);
1335 }
1336
1337 void file_operator_to_sfile(bContext *C, SpaceFile *sfile, wmOperator *op)
1338 {
1339   Main *bmain = CTX_data_main(C);
1340   PropertyRNA *prop;
1341
1342   /* If neither of the above are set, split the filepath back */
1343   if ((prop = RNA_struct_find_property(op->ptr, "filepath"))) {
1344     char filepath[FILE_MAX];
1345     RNA_property_string_get(op->ptr, prop, filepath);
1346     BLI_split_dirfile(filepath,
1347                       sfile->params->dir,
1348                       sfile->params->file,
1349                       sizeof(sfile->params->dir),
1350                       sizeof(sfile->params->file));
1351   }
1352   else {
1353     if ((prop = RNA_struct_find_property(op->ptr, "filename"))) {
1354       RNA_property_string_get(op->ptr, prop, sfile->params->file);
1355     }
1356     if ((prop = RNA_struct_find_property(op->ptr, "directory"))) {
1357       RNA_property_string_get(op->ptr, prop, sfile->params->dir);
1358     }
1359   }
1360
1361   /* we could check for relative_path property which is used when converting
1362    * in the other direction but doesn't hurt to do this every time */
1363   BLI_path_abs(sfile->params->dir, BKE_main_blendfile_path(bmain));
1364
1365   /* XXX, files and dirs updates missing, not really so important though */
1366 }
1367
1368 /**
1369  * Use to set the file selector path from some arbitrary source.
1370  */
1371 void file_sfile_filepath_set(SpaceFile *sfile, const char *filepath)
1372 {
1373   BLI_assert(BLI_exists(filepath));
1374
1375   if (BLI_is_dir(filepath)) {
1376     BLI_strncpy(sfile->params->dir, filepath, sizeof(sfile->params->dir));
1377   }
1378   else {
1379     if ((sfile->params->flag & FILE_DIRSEL_ONLY) == 0) {
1380       BLI_split_dirfile(filepath,
1381                         sfile->params->dir,
1382                         sfile->params->file,
1383                         sizeof(sfile->params->dir),
1384                         sizeof(sfile->params->file));
1385     }
1386     else {
1387       BLI_split_dir_part(filepath, sfile->params->dir, sizeof(sfile->params->dir));
1388     }
1389   }
1390 }
1391
1392 void file_draw_check(bContext *C)
1393 {
1394   SpaceFile *sfile = CTX_wm_space_file(C);
1395   wmOperator *op = sfile->op;
1396   if (op) { /* fail on reload */
1397     if (op->type->check) {
1398       file_sfile_to_operator(C, op, sfile);
1399
1400       /* redraw */
1401       if (op->type->check(C, op)) {
1402         file_operator_to_sfile(C, sfile, op);
1403
1404         /* redraw, else the changed settings wont get updated */
1405         ED_area_tag_redraw(CTX_wm_area(C));
1406       }
1407     }
1408   }
1409 }
1410
1411 /* for use with; UI_block_func_set */
1412 void file_draw_check_cb(bContext *C, void *UNUSED(arg1), void *UNUSED(arg2))
1413 {
1414   file_draw_check(C);
1415 }
1416
1417 bool file_draw_check_exists(SpaceFile *sfile)
1418 {
1419   if (sfile->op) { /* fails on reload */
1420     PropertyRNA *prop;
1421     if ((prop = RNA_struct_find_property(sfile->op->ptr, "check_existing"))) {
1422       if (RNA_property_boolean_get(sfile->op->ptr, prop)) {
1423         char filepath[FILE_MAX];
1424         BLI_join_dirfile(filepath, sizeof(filepath), sfile->params->dir, sfile->params->file);
1425         if (BLI_is_file(filepath)) {
1426           return true;
1427         }
1428       }
1429     }
1430   }
1431
1432   return false;
1433 }
1434
1435 int file_exec(bContext *C, wmOperator *exec_op)
1436 {
1437   Main *bmain = CTX_data_main(C);
1438   wmWindowManager *wm = CTX_wm_manager(C);
1439   SpaceFile *sfile = CTX_wm_space_file(C);
1440   const struct FileDirEntry *file = filelist_file(sfile->files, sfile->params->active_file);
1441   char filepath[FILE_MAX];
1442
1443   /* directory change */
1444   if (file && (file->typeflag & FILE_TYPE_DIR)) {
1445     if (!file->relpath) {
1446       return OPERATOR_CANCELLED;
1447     }
1448
1449     if (FILENAME_IS_PARENT(file->relpath)) {
1450       BLI_parent_dir(sfile->params->dir);
1451     }
1452     else {
1453       BLI_cleanup_path(BKE_main_blendfile_path(bmain), sfile->params->dir);
1454       BLI_path_append(sfile->params->dir, sizeof(sfile->params->dir) - 1, file->relpath);
1455       BLI_add_slash(sfile->params->dir);
1456     }
1457
1458     ED_file_change_dir(C);
1459   }
1460   /* opening file - sends events now, so things get handled on windowqueue level */
1461   else if (sfile->op) {
1462     wmOperator *op = sfile->op;
1463
1464     /* When used as a macro, for double-click, to prevent closing when double-clicking on item. */
1465     if (RNA_boolean_get(exec_op->ptr, "need_active")) {
1466       const int numfiles = filelist_files_ensure(sfile->files);
1467       int i, active = 0;
1468
1469       for (i = 0; i < numfiles; i++) {
1470         if (filelist_entry_select_index_get(sfile->files, i, CHECK_ALL)) {
1471           active = 1;
1472           break;
1473         }
1474       }
1475       if (active == 0) {
1476         return OPERATOR_CANCELLED;
1477       }
1478     }
1479
1480     sfile->op = NULL;
1481
1482     file_sfile_to_operator_ex(C, op, sfile, filepath);
1483
1484     if (BLI_exists(sfile->params->dir)) {
1485       fsmenu_insert_entry(ED_fsmenu_get(),
1486                           FS_CATEGORY_RECENT,
1487                           sfile->params->dir,
1488                           NULL,
1489                           FS_INSERT_SAVE | FS_INSERT_FIRST);
1490     }
1491
1492     BLI_make_file_string(BKE_main_blendfile_path(bmain),
1493                          filepath,
1494                          BKE_appdir_folder_id_create(BLENDER_USER_CONFIG, NULL),
1495                          BLENDER_BOOKMARK_FILE);
1496     fsmenu_write_file(ED_fsmenu_get(), filepath);
1497     WM_event_fileselect_event(wm, op, EVT_FILESELECT_EXEC);
1498   }
1499
1500   return OPERATOR_FINISHED;
1501 }
1502
1503 void FILE_OT_execute(struct wmOperatorType *ot)
1504 {
1505   PropertyRNA *prop;
1506
1507   /* identifiers */
1508   ot->name = "Execute File Window";
1509   ot->description = "Execute selected file";
1510   ot->idname = "FILE_OT_execute";
1511
1512   /* api callbacks */
1513   ot->exec = file_exec;
1514   ot->poll = file_operator_poll;
1515
1516   /* properties */
1517   prop = RNA_def_boolean(ot->srna,
1518                          "need_active",
1519                          0,
1520                          "Need Active",
1521                          "Only execute if there's an active selected file in the file list");
1522   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
1523 }
1524
1525 int file_parent_exec(bContext *C, wmOperator *UNUSED(unused))
1526 {
1527   Main *bmain = CTX_data_main(C);
1528   SpaceFile *sfile = CTX_wm_space_file(C);
1529
1530   if (sfile->params) {
1531     if (BLI_parent_dir(sfile->params->dir)) {
1532       BLI_cleanup_dir(BKE_main_blendfile_path(bmain), sfile->params->dir);
1533       ED_file_change_dir(C);
1534       if (sfile->params->recursion_level > 1) {
1535         /* Disable 'dirtree' recursion when going up in tree. */
1536         sfile->params->recursion_level = 0;
1537         filelist_setrecursion(sfile->files, sfile->params->recursion_level);
1538       }
1539       WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
1540     }
1541   }
1542
1543   return OPERATOR_FINISHED;
1544 }
1545
1546 void FILE_OT_parent(struct wmOperatorType *ot)
1547 {
1548   /* identifiers */
1549   ot->name = "Parent File";
1550   ot->description = "Move to parent directory";
1551   ot->idname = "FILE_OT_parent";
1552
1553   /* api callbacks */
1554   ot->exec = file_parent_exec;
1555   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
1556 }
1557
1558 static int file_refresh_exec(bContext *C, wmOperator *UNUSED(unused))
1559 {
1560   wmWindowManager *wm = CTX_wm_manager(C);
1561   SpaceFile *sfile = CTX_wm_space_file(C);
1562   ScrArea *sa = CTX_wm_area(C);
1563   struct FSMenu *fsmenu = ED_fsmenu_get();
1564
1565   ED_fileselect_clear(wm, sa, sfile);
1566
1567   /* refresh system directory menu */
1568   fsmenu_refresh_system_category(fsmenu);
1569
1570   /* Update bookmarks 'valid' state. */
1571   fsmenu_refresh_bookmarks_status(wm, fsmenu);
1572
1573   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
1574
1575   return OPERATOR_FINISHED;
1576 }
1577
1578 void FILE_OT_previous(struct wmOperatorType *ot)
1579 {
1580   /* identifiers */
1581   ot->name = "Previous Folder";
1582   ot->description = "Move to previous folder";
1583   ot->idname = "FILE_OT_previous";
1584
1585   /* api callbacks */
1586   ot->exec = file_previous_exec;
1587   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
1588 }
1589
1590 int file_previous_exec(bContext *C, wmOperator *UNUSED(unused))
1591 {
1592   SpaceFile *sfile = CTX_wm_space_file(C);
1593
1594   if (sfile->params) {
1595     if (!sfile->folders_next) {
1596       sfile->folders_next = folderlist_new();
1597     }
1598
1599     folderlist_pushdir(sfile->folders_next, sfile->params->dir);
1600     folderlist_popdir(sfile->folders_prev, sfile->params->dir);
1601     folderlist_pushdir(sfile->folders_next, sfile->params->dir);
1602
1603     ED_file_change_dir(C);
1604   }
1605   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
1606
1607   return OPERATOR_FINISHED;
1608 }
1609
1610 void FILE_OT_next(struct wmOperatorType *ot)
1611 {
1612   /* identifiers */
1613   ot->name = "Next Folder";
1614   ot->description = "Move to next folder";
1615   ot->idname = "FILE_OT_next";
1616
1617   /* api callbacks */
1618   ot->exec = file_next_exec;
1619   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
1620 }
1621
1622 int file_next_exec(bContext *C, wmOperator *UNUSED(unused))
1623 {
1624   SpaceFile *sfile = CTX_wm_space_file(C);
1625   if (sfile->params) {
1626     if (!sfile->folders_next) {
1627       sfile->folders_next = folderlist_new();
1628     }
1629
1630     folderlist_pushdir(sfile->folders_prev, sfile->params->dir);
1631     folderlist_popdir(sfile->folders_next, sfile->params->dir);
1632
1633     // update folders_prev so we can check for it in folderlist_clear_next()
1634     folderlist_pushdir(sfile->folders_prev, sfile->params->dir);
1635
1636     ED_file_change_dir(C);
1637   }
1638   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
1639
1640   return OPERATOR_FINISHED;
1641 }
1642
1643 /* only meant for timer usage */
1644 static int file_smoothscroll_invoke(bContext *C, wmOperator *UNUSED(op), const wmEvent *event)
1645 {
1646   ScrArea *sa = CTX_wm_area(C);
1647   SpaceFile *sfile = CTX_wm_space_file(C);
1648   ARegion *ar, *oldar = CTX_wm_region(C);
1649   const bool is_horizontal = (sfile->layout->flag & FILE_LAYOUT_HOR) != 0;
1650   int i;
1651
1652   /* escape if not our timer */
1653   if (sfile->smoothscroll_timer == NULL || sfile->smoothscroll_timer != event->customdata) {
1654     return OPERATOR_PASS_THROUGH;
1655   }
1656
1657   const int numfiles = filelist_files_ensure(sfile->files);
1658
1659   /* Due to async nature of file listing, we may execute this code before `file_refresh()`
1660    * editing entry is available in our listing,
1661    * so we also have to handle switching to rename mode here. */
1662   FileSelectParams *params = ED_fileselect_get_params(sfile);
1663   if ((params->rename_flag &
1664        (FILE_PARAMS_RENAME_PENDING | FILE_PARAMS_RENAME_POSTSCROLL_PENDING)) != 0) {
1665     file_params_renamefile_activate(sfile, params);
1666   }
1667
1668   /* check if we are editing a name */
1669   int edit_idx = -1;
1670   for (i = 0; i < numfiles; ++i) {
1671     if (filelist_entry_select_index_get(sfile->files, i, CHECK_ALL) &
1672         (FILE_SEL_EDITING | FILE_SEL_HIGHLIGHTED)) {
1673       edit_idx = i;
1674       break;
1675     }
1676   }
1677
1678   /* if we are not editing, we are done */
1679   if (edit_idx == -1) {
1680     /* Do not invalidate timer if filerename is still pending,
1681      * we might still be building the filelist and yet have to find edited entry. */
1682     if (params->rename_flag == 0) {
1683       WM_event_remove_timer(CTX_wm_manager(C), CTX_wm_window(C), sfile->smoothscroll_timer);
1684       sfile->smoothscroll_timer = NULL;
1685     }
1686     return OPERATOR_PASS_THROUGH;
1687   }
1688
1689   /* we need the correct area for scrolling */
1690   ar = BKE_area_find_region_type(sa, RGN_TYPE_WINDOW);
1691   if (!ar || ar->regiontype != RGN_TYPE_WINDOW) {
1692     WM_event_remove_timer(CTX_wm_manager(C), CTX_wm_window(C), sfile->smoothscroll_timer);
1693     sfile->smoothscroll_timer = NULL;
1694     return OPERATOR_PASS_THROUGH;
1695   }
1696
1697   /* Number of items in a block (i.e. lines in a column in horizontal layout, or columns in a line
1698    * in vertical layout).
1699    */
1700   const int items_block_size = is_horizontal ? sfile->layout->rows : sfile->layout->columns;
1701
1702   /* Scroll offset is the first file in the row/column we are editing in. */
1703   if (sfile->scroll_offset == 0) {
1704     sfile->scroll_offset = (edit_idx / items_block_size) * items_block_size;
1705   }
1706
1707   const int numfiles_layout = ED_fileselect_layout_numfiles(sfile->layout, ar);
1708   const int first_visible_item = ED_fileselect_layout_offset(
1709       sfile->layout, (int)ar->v2d.cur.xmin, (int)-ar->v2d.cur.ymax);
1710   const int last_visible_item = first_visible_item + numfiles_layout + 1;
1711
1712   /* Note: the special case for vertical layout is because filename is at the bottom of items then,
1713    * so we artificially move current row back one step, to ensure we show bottom of
1714    * active item rather than its top (important in case visible height is low). */
1715   const int middle_offset = max_ii(
1716       0, (first_visible_item + last_visible_item) / 2 - (is_horizontal ? 0 : items_block_size));
1717
1718   const int min_middle_offset = numfiles_layout / 2;
1719   const int max_middle_offset = ((numfiles / items_block_size) * items_block_size +
1720                                  ((numfiles % items_block_size) != 0 ? items_block_size : 0)) -
1721                                 (numfiles_layout / 2);
1722   /* Actual (physical) scrolling info, in pixels, used to detect whether we are fully at the
1723    * begining/end of the view. */
1724   /* Note that there is a weird glitch, that sometimes tot rctf is smaller than cur rctf...
1725    * that is why we still need to keep the min/max_middle_offset checks too. :( */
1726   const float min_tot_scroll = is_horizontal ? ar->v2d.tot.xmin : -ar->v2d.tot.ymax;
1727   const float max_tot_scroll = is_horizontal ? ar->v2d.tot.xmax : -ar->v2d.tot.ymin;
1728   const float min_curr_scroll = is_horizontal ? ar->v2d.cur.xmin : -ar->v2d.cur.ymax;
1729   const float max_curr_scroll = is_horizontal ? ar->v2d.cur.xmax : -ar->v2d.cur.ymin;
1730
1731   /* Check if we have reached our final scroll position. */
1732   /* Filelist has to be ready, otherwise it makes no sense to stop scrolling yet. */
1733   const bool is_ready = filelist_is_ready(sfile->files);
1734   /* Edited item must be in the 'middle' of shown area (kind of approximative).
1735    * Note that we have to do the check in 'block space', not in 'item space' here. */
1736   const bool is_centered = (abs(middle_offset / items_block_size -
1737                                 sfile->scroll_offset / items_block_size) == 0);
1738   /* OR edited item must be towards the begining, and we are scrolled fully to the start. */
1739   const bool is_full_start = ((sfile->scroll_offset < min_middle_offset) &&
1740                               (min_curr_scroll - min_tot_scroll < 1.0f) &&
1741                               (middle_offset - min_middle_offset < items_block_size));
1742   /* OR edited item must be towards the end, and we are scrolled fully to the end.
1743    * This one is crucial (unlike the one for the begining), because without it we won't scroll
1744    * fully to the end, and last column or row wil end up only partially drawn. */
1745   const bool is_full_end = ((sfile->scroll_offset > max_middle_offset) &&
1746                             (max_tot_scroll - max_curr_scroll < 1.0f) &&
1747                             (max_middle_offset - middle_offset < items_block_size));
1748
1749   if (is_ready && (is_centered || is_full_start || is_full_end)) {
1750     WM_event_remove_timer(CTX_wm_manager(C), CTX_wm_window(C), sfile->smoothscroll_timer);
1751     sfile->smoothscroll_timer = NULL;
1752     /* Post-scroll (after rename has been validated by user) is done,
1753      * rename process is totally finished, cleanup. */
1754     if ((params->rename_flag & FILE_PARAMS_RENAME_POSTSCROLL_ACTIVE) != 0) {
1755       params->renamefile[0] = '\0';
1756       params->rename_flag = 0;
1757     }
1758     return OPERATOR_FINISHED;
1759   }
1760
1761   /* Temporarily set context to the main window region,
1762    * so that the pan operator works. */
1763   CTX_wm_region_set(C, ar);
1764
1765   /* scroll one step in the desired direction */
1766   PointerRNA op_ptr;
1767   int deltax = 0;
1768   int deltay = 0;
1769
1770   /* We adjust speed of scrolling to avoid tens of seconds of it in e.g. directories with tens of
1771    * thousands of folders... See T65782. */
1772   /* This will slow down scrolling when approaching final goal, also avoids going too far and
1773    * having to bounce back... */
1774
1775   /* Number of blocks (columns in horizontal layout, rows otherwise) between current middle of
1776    * screen, and final goal position. */
1777   const int diff_offset = sfile->scroll_offset / items_block_size -
1778                           middle_offset / items_block_size;
1779   /* convert diff_offset into pixels. */
1780   const int diff_offset_delta = abs(diff_offset) *
1781                                 (is_horizontal ?
1782                                      sfile->layout->tile_w + 2 * sfile->layout->tile_border_x :
1783                                      sfile->layout->tile_h + 2 * sfile->layout->tile_border_y);
1784   const int scroll_delta = max_ii(2, diff_offset_delta / 15);
1785
1786   if (diff_offset < 0) {
1787     if (is_horizontal) {
1788       deltax = -scroll_delta;
1789     }
1790     else {
1791       deltay = scroll_delta;
1792     }
1793   }
1794   else {
1795     if (is_horizontal) {
1796       deltax = scroll_delta;
1797     }
1798     else {
1799       deltay = -scroll_delta;
1800     }
1801   }
1802   WM_operator_properties_create(&op_ptr, "VIEW2D_OT_pan");
1803   RNA_int_set(&op_ptr, "deltax", deltax);
1804   RNA_int_set(&op_ptr, "deltay", deltay);
1805
1806   WM_operator_name_call(C, "VIEW2D_OT_pan", WM_OP_EXEC_DEFAULT, &op_ptr);
1807   WM_operator_properties_free(&op_ptr);
1808
1809   ED_region_tag_redraw(ar);
1810
1811   /* and restore context */
1812   CTX_wm_region_set(C, oldar);
1813
1814   return OPERATOR_FINISHED;
1815 }
1816
1817 void FILE_OT_smoothscroll(wmOperatorType *ot)
1818 {
1819   /* identifiers */
1820   ot->name = "Smooth Scroll";
1821   ot->idname = "FILE_OT_smoothscroll";
1822   ot->description = "Smooth scroll to make editable file visible";
1823
1824   /* api callbacks */
1825   ot->invoke = file_smoothscroll_invoke;
1826
1827   ot->poll = ED_operator_file_active;
1828 }
1829
1830 static int filepath_drop_exec(bContext *C, wmOperator *op)
1831 {
1832   SpaceFile *sfile = CTX_wm_space_file(C);
1833
1834   if (sfile) {
1835     char filepath[FILE_MAX];
1836
1837     RNA_string_get(op->ptr, "filepath", filepath);
1838     if (!BLI_exists(filepath)) {
1839       BKE_report(op->reports, RPT_ERROR, "File does not exist");
1840       return OPERATOR_CANCELLED;
1841     }
1842
1843     file_sfile_filepath_set(sfile, filepath);
1844
1845     if (sfile->op) {
1846       file_sfile_to_operator(C, sfile->op, sfile);
1847       file_draw_check(C);
1848     }
1849
1850     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
1851     return OPERATOR_FINISHED;
1852   }
1853
1854   return OPERATOR_CANCELLED;
1855 }
1856
1857 void FILE_OT_filepath_drop(wmOperatorType *ot)
1858 {
1859   ot->name = "File Selector Drop";
1860   ot->idname = "FILE_OT_filepath_drop";
1861
1862   ot->exec = filepath_drop_exec;
1863   ot->poll = WM_operator_winactive;
1864
1865   RNA_def_string_file_path(ot->srna, "filepath", "Path", FILE_MAX, "", "");
1866 }
1867
1868 /**
1869  * Create a new, non-existing folder name, returns 1 if successful, 0 if name couldn't be created.
1870  * The actual name is returned in 'name', 'folder' contains the complete path,
1871  * including the new folder name.
1872  */
1873 static int new_folder_path(const char *parent, char *folder, char *name)
1874 {
1875   int i = 1;
1876   int len = 0;
1877
1878   BLI_strncpy(name, "New Folder", FILE_MAXFILE);
1879   BLI_join_dirfile(folder, FILE_MAX, parent, name); /* XXX, not real length */
1880   /* check whether folder with the name already exists, in this case
1881    * add number to the name. Check length of generated name to avoid
1882    * crazy case of huge number of folders each named 'New Folder (x)' */
1883   while (BLI_exists(folder) && (len < FILE_MAXFILE)) {
1884     len = BLI_snprintf(name, FILE_MAXFILE, "New Folder(%d)", i);
1885     BLI_join_dirfile(folder, FILE_MAX, parent, name); /* XXX, not real length */
1886     i++;
1887   }
1888
1889   return (len < FILE_MAXFILE);
1890 }
1891
1892 int file_directory_new_exec(bContext *C, wmOperator *op)
1893 {
1894   char name[FILE_MAXFILE];
1895   char path[FILE_MAX];
1896   bool generate_name = true;
1897   PropertyRNA *prop;
1898
1899   wmWindowManager *wm = CTX_wm_manager(C);
1900   SpaceFile *sfile = CTX_wm_space_file(C);
1901   ScrArea *sa = CTX_wm_area(C);
1902
1903   if (!sfile->params) {
1904     BKE_report(op->reports, RPT_WARNING, "No parent directory given");
1905     return OPERATOR_CANCELLED;
1906   }
1907
1908   path[0] = '\0';
1909
1910   if ((prop = RNA_struct_find_property(op->ptr, "directory"))) {
1911     RNA_property_string_get(op->ptr, prop, path);
1912     if (path[0] != '\0') {
1913       generate_name = false;
1914     }
1915   }
1916
1917   if (generate_name) {
1918     /* create a new, non-existing folder name */
1919     if (!new_folder_path(sfile->params->dir, path, name)) {
1920       BKE_report(op->reports, RPT_ERROR, "Could not create new folder name");
1921       return OPERATOR_CANCELLED;
1922     }
1923   }
1924   else { /* We assume we are able to generate a valid name! */
1925     char org_path[FILE_MAX];
1926
1927     BLI_strncpy(org_path, path, sizeof(org_path));
1928     if (BLI_path_make_safe(path)) {
1929       BKE_reportf(op->reports,
1930                   RPT_WARNING,
1931                   "'%s' given path is OS-invalid, creating '%s' path instead",
1932                   org_path,
1933                   path);
1934     }
1935   }
1936
1937   /* create the file */
1938   errno = 0;
1939   if (!BLI_dir_create_recursive(path) ||
1940       /* Should no more be needed,
1941        * now that BLI_dir_create_recursive returns a success state - but kept just in case. */
1942       !BLI_exists(path)) {
1943     BKE_reportf(op->reports,
1944                 RPT_ERROR,
1945                 "Could not create new folder: %s",
1946                 errno ? strerror(errno) : "unknown error");
1947     return OPERATOR_CANCELLED;
1948   }
1949
1950   /* now remember file to jump into editing */
1951   BLI_strncpy(sfile->params->renamefile, name, FILE_MAXFILE);
1952   sfile->params->rename_flag = FILE_PARAMS_RENAME_PENDING;
1953
1954   /* set timer to smoothly view newly generated file */
1955   /* max 30 frs/sec */
1956   if (sfile->smoothscroll_timer != NULL) {
1957     WM_event_remove_timer(CTX_wm_manager(C), CTX_wm_window(C), sfile->smoothscroll_timer);
1958   }
1959   sfile->smoothscroll_timer = WM_event_add_timer(wm, CTX_wm_window(C), TIMER1, 1.0 / 1000.0);
1960   sfile->scroll_offset = 0;
1961
1962   /* reload dir to make sure we're seeing what's in the directory */
1963   ED_fileselect_clear(wm, sa, sfile);
1964
1965   if (RNA_boolean_get(op->ptr, "open")) {
1966     BLI_strncpy(sfile->params->dir, path, sizeof(sfile->params->dir));
1967     ED_file_change_dir(C);
1968   }
1969
1970   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
1971
1972   return OPERATOR_FINISHED;
1973 }
1974
1975 void FILE_OT_directory_new(struct wmOperatorType *ot)
1976 {
1977   PropertyRNA *prop;
1978
1979   /* identifiers */
1980   ot->name = "Create New Directory";
1981   ot->description = "Create a new directory";
1982   ot->idname = "FILE_OT_directory_new";
1983
1984   /* api callbacks */
1985   ot->invoke = WM_operator_confirm;
1986   ot->exec = file_directory_new_exec;
1987   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
1988
1989   prop = RNA_def_string_dir_path(
1990       ot->srna, "directory", NULL, FILE_MAX, "Directory", "Name of new directory");
1991   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
1992   prop = RNA_def_boolean(ot->srna, "open", false, "Open", "Open new directory");
1993   RNA_def_property_flag(prop, PROP_SKIP_SAVE);
1994 }
1995
1996 /* TODO This should go to BLI_path_utils. */
1997 static void file_expand_directory(bContext *C)
1998 {
1999   Main *bmain = CTX_data_main(C);
2000   SpaceFile *sfile = CTX_wm_space_file(C);
2001
2002   if (sfile->params) {
2003     if (BLI_path_is_rel(sfile->params->dir)) {
2004       /* Use of 'default' folder here is just to avoid an error message on '//' prefix. */
2005       BLI_path_abs(sfile->params->dir,
2006                    G.relbase_valid ? BKE_main_blendfile_path(bmain) : BKE_appdir_folder_default());
2007     }
2008     else if (sfile->params->dir[0] == '~') {
2009       char tmpstr[sizeof(sfile->params->dir) - 1];
2010       BLI_strncpy(tmpstr, sfile->params->dir + 1, sizeof(tmpstr));
2011       BLI_join_dirfile(
2012           sfile->params->dir, sizeof(sfile->params->dir), BKE_appdir_folder_default(), tmpstr);
2013     }
2014
2015     else if (sfile->params->dir[0] == '\0')
2016 #ifndef WIN32
2017     {
2018       sfile->params->dir[0] = '/';
2019       sfile->params->dir[1] = '\0';
2020     }
2021 #else
2022     {
2023       get_default_root(sfile->params->dir);
2024     }
2025     /* change "C:" --> "C:\", [#28102] */
2026     else if ((isalpha(sfile->params->dir[0]) && (sfile->params->dir[1] == ':')) &&
2027              (sfile->params->dir[2] == '\0')) {
2028       sfile->params->dir[2] = '\\';
2029       sfile->params->dir[3] = '\0';
2030     }
2031     else if (BLI_path_is_unc(sfile->params->dir)) {
2032       BLI_cleanup_unc(sfile->params->dir, FILE_MAX_LIBEXTRA);
2033     }
2034 #endif
2035   }
2036 }
2037
2038 /* TODO check we still need this, it's annoying to have OS-specific code here... :/ */
2039 #if defined(WIN32)
2040 static bool can_create_dir(const char *dir)
2041 {
2042   /* for UNC paths we need to check whether the parent of the new
2043    * directory is a proper directory itself and not a share or the
2044    * UNC root (server name) itself. Calling BLI_is_dir does this
2045    */
2046   if (BLI_path_is_unc(dir)) {
2047     char parent[PATH_MAX];
2048     BLI_strncpy(parent, dir, PATH_MAX);
2049     BLI_parent_dir(parent);
2050     return BLI_is_dir(parent);
2051   }
2052   return true;
2053 }
2054 #endif
2055
2056 void file_directory_enter_handle(bContext *C, void *UNUSED(arg_unused), void *UNUSED(arg_but))
2057 {
2058   Main *bmain = CTX_data_main(C);
2059   SpaceFile *sfile = CTX_wm_space_file(C);
2060
2061   if (sfile->params) {
2062     file_expand_directory(C);
2063
2064     /* special case, user may have pasted a filepath into the directory */
2065     if (!filelist_is_dir(sfile->files, sfile->params->dir)) {
2066       char tdir[FILE_MAX_LIBEXTRA];
2067       char *group, *name;
2068
2069       if (BLI_is_file(sfile->params->dir)) {
2070         char path[sizeof(sfile->params->dir)];
2071         BLI_strncpy(path, sfile->params->dir, sizeof(path));
2072         BLI_split_dirfile(path,
2073                           sfile->params->dir,
2074                           sfile->params->file,
2075                           sizeof(sfile->params->dir),
2076                           sizeof(sfile->params->file));
2077       }
2078       else if (BLO_library_path_explode(sfile->params->dir, tdir, &group, &name)) {
2079         if (group) {
2080           BLI_path_append(tdir, sizeof(tdir), group);
2081         }
2082         BLI_strncpy(sfile->params->dir, tdir, sizeof(sfile->params->dir));
2083         if (name) {
2084           BLI_strncpy(sfile->params->file, name, sizeof(sfile->params->file));
2085         }
2086         else {
2087           sfile->params->file[0] = '\0';
2088         }
2089       }
2090     }
2091
2092     BLI_cleanup_dir(BKE_main_blendfile_path(bmain), sfile->params->dir);
2093
2094     if (filelist_is_dir(sfile->files, sfile->params->dir)) {
2095       /* if directory exists, enter it immediately */
2096       ED_file_change_dir(C);
2097
2098       /* don't do for now because it selects entire text instead of
2099        * placing cursor at the end */
2100       /* UI_textbutton_activate_but(C, but); */
2101     }
2102 #if defined(WIN32)
2103     else if (!can_create_dir(sfile->params->dir)) {
2104       const char *lastdir = folderlist_peeklastdir(sfile->folders_prev);
2105       if (lastdir) {
2106         BLI_strncpy(sfile->params->dir, lastdir, sizeof(sfile->params->dir));
2107       }
2108     }
2109 #endif
2110     else {
2111       const char *lastdir = folderlist_peeklastdir(sfile->folders_prev);
2112       char tdir[FILE_MAX_LIBEXTRA];
2113
2114       /* If we are 'inside' a blend library, we cannot do anything... */
2115       if (lastdir && BLO_library_path_explode(lastdir, tdir, NULL, NULL)) {
2116         BLI_strncpy(sfile->params->dir, lastdir, sizeof(sfile->params->dir));
2117       }
2118       else {
2119         /* if not, ask to create it and enter if confirmed */
2120         wmOperatorType *ot = WM_operatortype_find("FILE_OT_directory_new", false);
2121         PointerRNA ptr;
2122         WM_operator_properties_create_ptr(&ptr, ot);
2123         RNA_string_set(&ptr, "directory", sfile->params->dir);
2124         RNA_boolean_set(&ptr, "open", true);
2125
2126         if (lastdir) {
2127           BLI_strncpy(sfile->params->dir, lastdir, sizeof(sfile->params->dir));
2128         }
2129
2130         WM_operator_name_call_ptr(C, ot, WM_OP_INVOKE_DEFAULT, &ptr);
2131         WM_operator_properties_free(&ptr);
2132       }
2133     }
2134
2135     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
2136   }
2137 }
2138
2139 void file_filename_enter_handle(bContext *C, void *UNUSED(arg_unused), void *arg_but)
2140 {
2141   Main *bmain = CTX_data_main(C);
2142   SpaceFile *sfile = CTX_wm_space_file(C);
2143   uiBut *but = arg_but;
2144   char matched_file[FILE_MAX];
2145   char filepath[sizeof(sfile->params->dir)];
2146
2147   if (sfile->params) {
2148     int matches;
2149     matched_file[0] = '\0';
2150     filepath[0] = '\0';
2151
2152     file_expand_directory(C);
2153
2154     matches = file_select_match(sfile, sfile->params->file, matched_file);
2155
2156     /* *After* file_select_match! */
2157     BLI_filename_make_safe(sfile->params->file);
2158
2159     if (matches) {
2160       /* replace the pattern (or filename that the user typed in,
2161        * with the first selected file of the match */
2162       BLI_strncpy(sfile->params->file, matched_file, sizeof(sfile->params->file));
2163
2164       WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
2165     }
2166
2167     if (matches == 1) {
2168       BLI_join_dirfile(
2169           filepath, sizeof(sfile->params->dir), sfile->params->dir, sfile->params->file);
2170
2171       /* if directory, open it and empty filename field */
2172       if (filelist_is_dir(sfile->files, filepath)) {
2173         BLI_cleanup_dir(BKE_main_blendfile_path(bmain), filepath);
2174         BLI_strncpy(sfile->params->dir, filepath, sizeof(sfile->params->dir));
2175         sfile->params->file[0] = '\0';
2176         ED_file_change_dir(C);
2177         UI_textbutton_activate_but(C, but);
2178         WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_PARAMS, NULL);
2179       }
2180     }
2181     else if (matches > 1) {
2182       file_draw_check(C);
2183     }
2184   }
2185 }
2186
2187 void FILE_OT_refresh(struct wmOperatorType *ot)
2188 {
2189   /* identifiers */
2190   ot->name = "Refresh Filelist";
2191   ot->description = "Refresh the file list";
2192   ot->idname = "FILE_OT_refresh";
2193
2194   /* api callbacks */
2195   ot->exec = file_refresh_exec;
2196   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
2197 }
2198
2199 static int file_hidedot_exec(bContext *C, wmOperator *UNUSED(unused))
2200 {
2201   wmWindowManager *wm = CTX_wm_manager(C);
2202   SpaceFile *sfile = CTX_wm_space_file(C);
2203   ScrArea *sa = CTX_wm_area(C);
2204
2205   if (sfile->params) {
2206     sfile->params->flag ^= FILE_HIDE_DOT;
2207     ED_fileselect_clear(wm, sa, sfile);
2208     WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
2209   }
2210
2211   return OPERATOR_FINISHED;
2212 }
2213
2214 void FILE_OT_hidedot(struct wmOperatorType *ot)
2215 {
2216   /* identifiers */
2217   ot->name = "Toggle Hide Dot Files";
2218   ot->description = "Toggle hide hidden dot files";
2219   ot->idname = "FILE_OT_hidedot";
2220
2221   /* api callbacks */
2222   ot->exec = file_hidedot_exec;
2223   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
2224 }
2225
2226 ARegion *file_tools_region(ScrArea *sa)
2227 {
2228   ARegion *ar, *arnew;
2229
2230   if ((ar = BKE_area_find_region_type(sa, RGN_TYPE_TOOLS)) != NULL) {
2231     return ar;
2232   }
2233
2234   /* add subdiv level; after header */
2235   ar = BKE_area_find_region_type(sa, RGN_TYPE_HEADER);
2236
2237   /* is error! */
2238   if (ar == NULL) {
2239     return NULL;
2240   }
2241
2242   arnew = MEM_callocN(sizeof(ARegion), "tools for file");
2243   BLI_insertlinkafter(&sa->regionbase, ar, arnew);
2244   arnew->regiontype = RGN_TYPE_TOOLS;
2245   arnew->alignment = RGN_ALIGN_LEFT;
2246
2247   ar = MEM_callocN(sizeof(ARegion), "tool props for file");
2248   BLI_insertlinkafter(&sa->regionbase, arnew, ar);
2249   ar->regiontype = RGN_TYPE_TOOL_PROPS;
2250   ar->alignment = RGN_ALIGN_BOTTOM | RGN_SPLIT_PREV;
2251
2252   return arnew;
2253 }
2254
2255 static int file_bookmark_toggle_exec(bContext *C, wmOperator *UNUSED(unused))
2256 {
2257   ScrArea *sa = CTX_wm_area(C);
2258   ARegion *ar = file_tools_region(sa);
2259
2260   if (ar) {
2261     ED_region_toggle_hidden(C, ar);
2262   }
2263
2264   return OPERATOR_FINISHED;
2265 }
2266
2267 void FILE_OT_bookmark_toggle(struct wmOperatorType *ot)
2268 {
2269   /* identifiers */
2270   ot->name = "Toggle Bookmarks";
2271   ot->description = "Toggle bookmarks display";
2272   ot->idname = "FILE_OT_bookmark_toggle";
2273
2274   /* api callbacks */
2275   ot->exec = file_bookmark_toggle_exec;
2276   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
2277 }
2278
2279 /**
2280  * Looks for a string of digits within name (using BLI_stringdec) and adjusts it by add.
2281  */
2282 static void filenum_newname(char *name, size_t name_size, int add)
2283 {
2284   char head[FILE_MAXFILE], tail[FILE_MAXFILE];
2285   char name_temp[FILE_MAXFILE];
2286   int pic;
2287   unsigned short digits;
2288
2289   pic = BLI_stringdec(name, head, tail, &digits);
2290
2291   /* are we going from 100 -> 99 or from 10 -> 9 */
2292   if (add < 0 && digits > 0) {
2293     int i, exp;
2294     exp = 1;
2295     for (i = digits; i > 1; i--) {
2296       exp *= 10;
2297     }
2298     if (pic >= exp && (pic + add) < exp) {
2299       digits--;
2300     }
2301   }
2302
2303   pic += add;
2304   if (pic < 0) {
2305     pic = 0;
2306   }
2307   BLI_stringenc(name_temp, head, tail, digits, pic);
2308   BLI_strncpy(name, name_temp, name_size);
2309 }
2310
2311 static int file_filenum_exec(bContext *C, wmOperator *op)
2312 {
2313   SpaceFile *sfile = CTX_wm_space_file(C);
2314   ScrArea *sa = CTX_wm_area(C);
2315
2316   int inc = RNA_int_get(op->ptr, "increment");
2317   if (sfile->params && (inc != 0)) {
2318     filenum_newname(sfile->params->file, sizeof(sfile->params->file), inc);
2319     ED_area_tag_redraw(sa);
2320     file_draw_check(C);
2321     // WM_event_add_notifier(C, NC_WINDOW, NULL);
2322   }
2323
2324   return OPERATOR_FINISHED;
2325 }
2326
2327 void FILE_OT_filenum(struct wmOperatorType *ot)
2328 {
2329   /* identifiers */
2330   ot->name = "Increment Number in Filename";
2331   ot->description = "Increment number in filename";
2332   ot->idname = "FILE_OT_filenum";
2333
2334   /* api callbacks */
2335   ot->exec = file_filenum_exec;
2336   ot->poll = ED_operator_file_active; /* <- important, handler is on window level */
2337
2338   /* props */
2339   RNA_def_int(ot->srna, "increment", 1, -100, 100, "Increment", "", -100, 100);
2340 }
2341
2342 static int file_rename_exec(bContext *C, wmOperator *UNUSED(op))
2343 {
2344   ScrArea *sa = CTX_wm_area(C);
2345   SpaceFile *sfile = (SpaceFile *)CTX_wm_space_data(C);
2346
2347   if (sfile->params) {
2348     int idx = sfile->params->highlight_file;
2349     int numfiles = filelist_files_ensure(sfile->files);
2350     if ((0 <= idx) && (idx < numfiles)) {
2351       FileDirEntry *file = filelist_file(sfile->files, idx);
2352       filelist_entry_select_index_set(
2353           sfile->files, idx, FILE_SEL_ADD, FILE_SEL_EDITING, CHECK_ALL);
2354       BLI_strncpy(sfile->params->renamefile, file->relpath, FILE_MAXFILE);
2355       /* We can skip the pending state,
2356        * as we can directly set FILE_SEL_EDITING on the expected entry here. */
2357       sfile->params->rename_flag = FILE_PARAMS_RENAME_ACTIVE;
2358     }
2359     ED_area_tag_redraw(sa);
2360   }
2361
2362   return OPERATOR_FINISHED;
2363 }
2364
2365 static bool file_rename_poll(bContext *C)
2366 {
2367   bool poll = ED_operator_file_active(C);
2368   SpaceFile *sfile = CTX_wm_space_file(C);
2369
2370   if (sfile && sfile->params) {
2371     int idx = sfile->params->highlight_file;
2372     int numfiles = filelist_files_ensure(sfile->files);
2373
2374     if ((0 <= idx) && (idx < numfiles)) {
2375       FileDirEntry *file = filelist_file(sfile->files, idx);
2376       if (FILENAME_IS_CURRPAR(file->relpath)) {
2377         poll = false;
2378       }
2379     }
2380
2381     if (sfile->params->highlight_file < 0) {
2382       poll = false;
2383     }
2384     else {
2385       char dir[FILE_MAX_LIBEXTRA];
2386       if (filelist_islibrary(sfile->files, dir, NULL)) {
2387         poll = false;
2388       }
2389     }
2390   }
2391   else {
2392     poll = false;
2393   }
2394
2395   return poll;
2396 }
2397
2398 void FILE_OT_rename(struct wmOperatorType *ot)
2399 {
2400   /* identifiers */
2401   ot->name = "Rename File or Directory";
2402   ot->description = "Rename file or file directory";
2403   ot->idname = "FILE_OT_rename";
2404
2405   /* api callbacks */
2406   ot->exec = file_rename_exec;
2407   ot->poll = file_rename_poll;
2408 }
2409
2410 static bool file_delete_poll(bContext *C)
2411 {
2412   bool poll = ED_operator_file_active(C);
2413   SpaceFile *sfile = CTX_wm_space_file(C);
2414
2415   if (sfile && sfile->params) {
2416     char dir[FILE_MAX_LIBEXTRA];
2417     int numfiles = filelist_files_ensure(sfile->files);
2418     int i;
2419     int num_selected = 0;
2420
2421     if (filelist_islibrary(sfile->files, dir, NULL)) {
2422       poll = 0;
2423     }
2424     for (i = 0; i < numfiles; i++) {
2425       if (filelist_entry_select_index_get(sfile->files, i, CHECK_FILES)) {
2426         num_selected++;
2427       }
2428     }
2429     if (num_selected <= 0) {
2430       poll = 0;
2431     }
2432   }
2433   else {
2434     poll = 0;
2435   }
2436
2437   return poll;
2438 }
2439
2440 int file_delete_exec(bContext *C, wmOperator *op)
2441 {
2442   char str[FILE_MAX];
2443   Main *bmain = CTX_data_main(C);
2444   wmWindowManager *wm = CTX_wm_manager(C);
2445   SpaceFile *sfile = CTX_wm_space_file(C);
2446   ScrArea *sa = CTX_wm_area(C);
2447   FileDirEntry *file;
2448   int numfiles = filelist_files_ensure(sfile->files);
2449   int i;
2450
2451   bool report_error = false;
2452   errno = 0;
2453   for (i = 0; i < numfiles; i++) {
2454     if (filelist_entry_select_index_get(sfile->files, i, CHECK_FILES)) {
2455       file = filelist_file(sfile->files, i);
2456       BLI_make_file_string(BKE_main_blendfile_path(bmain), str, sfile->params->dir, file->relpath);
2457       if (BLI_delete(str, false, false) != 0 || BLI_exists(str)) {
2458         report_error = true;
2459       }
2460     }
2461   }
2462
2463   if (report_error) {
2464     BKE_reportf(op->reports,
2465                 RPT_ERROR,
2466                 "Could not delete file: %s",
2467                 errno ? strerror(errno) : "unknown error");
2468   }
2469
2470   ED_fileselect_clear(wm, sa, sfile);
2471   WM_event_add_notifier(C, NC_SPACE | ND_SPACE_FILE_LIST, NULL);
2472
2473   return OPERATOR_FINISHED;
2474 }
2475
2476 void FILE_OT_delete(struct wmOperatorType *ot)
2477 {
2478   /* identifiers */
2479   ot->name = "Delete Selected Files";
2480   ot->description = "Delete selected files";
2481   ot->idname = "FILE_OT_delete";
2482
2483   /* api callbacks */
2484   ot->invoke = WM_operator_confirm;
2485   ot->exec = file_delete_exec;
2486   ot->poll = file_delete_poll; /* <- important, handler is on window level */
2487 }
2488
2489 void ED_operatormacros_file(void)
2490 {
2491   //  wmOperatorType *ot;
2492   //  wmOperatorTypeMacro *otmacro;
2493
2494   /* future macros */
2495 }