void vfu_browse_archive_file()
{
VString tmpdir = vfu_temp();
if(mkdir( tmpdir, S_IRUSR|S_IWUSR|S_IXUSR /*|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH*/ ))
{
say1( "error: cannot create temp directory" );
say2( tmpdir );
return;
}
chdir( tmpdir );
VString fn = files_list[FLI]->full_name();
VString s;
s = "rx_auto x \"";
s += work_path;
s += archive_name;
s += "\" \"";
s += fn;
s += "\" 2> /dev/null";
vfu_shell( s, "" );
chdir( tmpdir ); /* FIXME: a little hack -- vfu_shell() changes current path */
vfu_browse( fn );
chdir( work_path );
__vfu_dir_erase( tmpdir );
say1( "" );
};
void vfu_edit_conf_file()
{
if (opt.internal_editor)
{
opt.seo.cs = cINFO;
SeeEditor editor( &opt.seo );
if( editor.open( filename_conf ) == 0 )
{
int r = 1;
while ( r )
{
editor.run();
r = editor.request_quit();
}
}
else
say1( "Error loading file..." );
editor.close();
}
else
{
VString line = shell_editor;
str_replace( line, "%f", filename_conf );
str_replace( line, "%F", filename_conf );
vfu_shell( line.data(), 0 );
}
vfu_settings_save();
vfu_settings_load();
do_draw = 2;
say1("");
say2("");
}
void tree_save()
{
if( dir_tree.fsave( filename_tree ) )
say1( "DirTree save error." );
else
{
say1( "DirTree saved ok." );
dir_tree_changed = 0;
}
};
void tree_load()
{
if( dir_tree.fload( filename_tree ) )
say1( "DirTree load error." );
else
{
say1( "DirTree loaded ok." );
dir_tree_changed = 0;
}
};
void vfu_options()
{
say1("press SPACE to toggle, ENTER or ESC to exit");
say2("");
vfu_toggle_box( 30, 5, "Options/Toggles (scroll down, SPACE selects)", Toggles );
vfu_settings_save();
vfu_settings_load();
vfu_drop_all_views();
vfu_redraw();
vfu_redraw_status();
say1("");
say2("");
}
void tree_draw_pos( ScrollPos &scroll, int opos )
{
int z = scroll.pos() - scroll.page();
if ( opos != -1 ) tree_draw_item( scroll.page(), opos );
tree_draw_item( scroll.page(), z, 1 );
VString str;
str = dir_tree[scroll.pos()];
str_tr( str,"\\", "/" );
VString sz;
sz.fi( size_cache_get( str ) );
str_comma( sz );
str_pad( sz, 14 );
str = sz + " " + str;
str = str_dot_reduce( str, con_max_x()-1 );
say1( str, cINFO );
say2( " Help: R Rebuild, S Incremental search, Z Recalc directory size", cINFO );
show_pos( scroll.pos()+1, scroll.max()+1 );
}
void tree_rebuild()
{
#ifdef _TARGET_GO32_
// we do need only files sizes -- so the other stuff under dos is unneeded :)
_djstat_flags = _STAT_INODE | _STAT_EXEC_EXT | _STAT_EXEC_MAGIC |
_STAT_EXEC_MAGIC | _STAT_DIRSIZE | _STAT_ROOT_TIME |
_STAT_WRITEBIT;
// _djstat_flags = 0;
#endif
dir_tree.undef();
size_cache.undef();
say1( "Rebuilding tree..." );
__tree_rebuild_process( "/" );
tree_fix();
#ifdef _TARGET_GO32_
_djstat_flags = 0;
#endif
dir_tree_changed = 1;
tree_save();
};
void vfu_extract_files( int one )
{
if ( sel_count == 0 && one == 0 ) one = 1;
char t[MAX_PATH];
VString target;
if ( one == 0 )
sprintf( t, "EXTRACT SELECTION to: " );
else
sprintf( t, "EXTRACT `%s' to:", files_list[FLI]->full_name() );
target = opt.last_copy_path[ CM_COPY ];
if ( !vfu_get_dir_name( t, target ) ) return;
strcpy( opt.last_copy_path[ CM_COPY ], target );
VArray va;
int z;
for( z = 0; z < files_count; z++ )
if ((files_list[z]->sel && one == 0) || (z == FLI && one != 0))
va.push( files_list[z]->full_name() );
if (chdir(target))
{
sprintf( t, "Cannot chdir to: %s", target.data() );
say1( t );
say2errno();
return;
}
VString tmpfile = vfu_temp();
if (va.fsave( tmpfile ))
{
sprintf( t, "Error writing list file: %s", tmpfile.data() );
say1( t );
return;
}
chmod( tmpfile, S_IRUSR|S_IWUSR );
VString s;
s = "rx_auto x \"";
s += work_path;
s += archive_name;
s += "\" @";
s += tmpfile;
s += " 2> /dev/null";
vfu_shell( s, "" );
if (unlink( tmpfile ))
{
/*
sprintf( t, "Cannot unlink/erase temp file: %s", tmpfile );
say2( t );
*/
}
if (chdir(work_path))
{
sprintf( t, "Cannot chdir back to to: %s", work_path.data() );
say1( t );
say2errno();
return;
}
say1( "EXTRACT ok." );
};
void tree_view()
{
VString str;
if (dir_tree.count() == 0)
{
tree_load();
if (dir_tree.count() == 0)
tree_rebuild();
}
say1( " " );
int new_pos = tree_index( work_path );
if ( new_pos == -1 )
new_pos = 0;
BSet set; /* used for searching */
set.set_range1( 'a', 'z' );
set.set_range1( 'A', 'Z' );
set.set_range1( '0', '9' );
set.set_str1( "._-~" );
set.set_str1( "?*>[]" );
ScrollPos scroll;
scroll.set_min_max( 0, dir_tree.count()-1 );
scroll.set_pagesize( PS+2 );
scroll.go( new_pos );
int key = 0;
int opos = -1;
int opage = -1;
while( key != 27 && key != 13 && key != '-' &&
toupper( key ) != 'Q' && toupper( key ) != 'X' && key != KEY_ALT_X )
{
if ( key >= 'A' && key <= 'Z' ) key = tolower( key );
if ( key == 's' )
{
str = "";
say1( "Enter search pattern: ( use TAB to advance )" );
key = con_getch();
while( set.in( key ) || key == 8 || key == KEY_BACKSPACE || key == 9 )
{
if ( key == 8 || key == KEY_BACKSPACE )
str_trim_right( str, 1 );
else
if ( key != 9 )
str_add_ch( str, key );
say2( str );
if ( dir_tree.count() == 0 ) { key = con_getch(); continue; }
int z;
if ( key == 9 )
{
z = scroll.pos() + 1;
if (z > scroll.max() ) z = scroll.min();
}
else
z = scroll.pos();
int direction = 1;
int found = 0;
int loops = 0;
VString s_mask = str;
vfu_expand_mask( s_mask );
while(1)
{
if ( z > scroll.max() ) z = scroll.min();
if ( z < scroll.min() ) z = scroll.max();
VString str1 = dir_tree[z];
str_trim_right( str1, 1 );
int j = str_rfind(str1,'/');
if (j < 0)
str1 = "";
else
str_trim_left( str1, j+1 );
found = ( FNMATCH( s_mask, str1 ) == 0 );
if ( found ) break;
z += direction;
if ( loops++ > dir_tree.count() ) break;
}
if (found)
{
scroll.go(z);
tree_draw_page( scroll );
tree_draw_pos( scroll, opos );
}
key = con_getch();
}
say1( "" );
say2( "" );
}
else
switch( key )
{
case KEY_UP : scroll.up(); break;
case KEY_DOWN : scroll.down(); break;
case KEY_PPAGE : scroll.ppage(); break;
case KEY_NPAGE : scroll.npage(); break;
case KEY_HOME : scroll.home(); break;
case KEY_END : scroll.end(); break;
case 'r' : tree_rebuild();
scroll.set_min_max( 0, dir_tree.count()-1 );
scroll.home();
say1( "Rebuild done." );
break;
case 'w' : tree_save(); break;
case 'l' : tree_load();
scroll.set_min_max( 0, dir_tree.count()-1 );
scroll.home();
break;
case 'z' :
case KEY_CTRL_Z :
str = dir_tree[scroll.pos()];
str_tr( str, "\\", "/" );
size_cache_set( str, vfu_dir_size( str ) );
tree_draw_page( scroll );
tree_draw_pos( scroll, opos );
say1( "Done." );
break;
}
if (opage != scroll.page())
tree_draw_page( scroll );
if (opos != scroll.pos() - scroll.page() || opage != scroll.page())
tree_draw_pos( scroll, opos );
opos = scroll.pos() - scroll.page();
opage = scroll.page();
key = con_getch();
}
if ( key == 13 )
{
str = dir_tree[scroll.pos()];
str_tr( str, "\\", "/" );
vfu_chdir( str );
}
do_draw = 2;
};
int vfu_get_dir_name( const char *prompt, VString &target, int should_exist )
{
int res = -1;
/*
#ifdef _TARGET_UNIX_
leaveok(stdscr, FALSE);
#endif
*/
VArray dir_list;
say1(prompt);
say2("");
int pos = 0;
int page = 0;
int ch = 0;
int insert = 1;
int firsthit = 1;
pos = str_len( target );
//------------------------------------------------------------------
con_cshow();
say2( target, firsthit ? cINPUT2 : cINPUT );
while(1)
{
int mx = con_max_x() - 1;
VString target_out = target;
if ( (pos < page) || (pos+1 > page + mx) || (page > 0 && pos == page) )
page = pos - mx / 2;
if ( page < 0 ) page = 0;
str_trim_left( target_out, page );
str_sleft( target_out, mx );
str_pad( target_out, -mx );
if ( page > 0 )
str_set_ch( target_out, 0, '<' );
if ( str_len( target ) - page > mx )
str_set_ch( target_out, mx-1, '>' );
say2( target_out, firsthit ? cINPUT2 : cINPUT );
con_xy( pos-page+1, con_max_y() );
if (ch == 0) ch = con_getch();
if (ch == '\\') ch = '/'; /* dos hack :)) */
if ( ch == '/' && str_find( target, '/' ) == -1 && target[0] == '~' )
{
target = tilde_expand( target );
str_fix_path( target );
pos = str_len( target );
ch = 0;
}
if ((ch == 8 || ch == KEY_BACKSPACE) && pos > 0)
{
pos--;
str_del( target, pos, 1 );
}
else
if (ch == KEY_CTRL_A && str_len( target ) > 0)
{
int z = str_len( target )-1;
if ( str_get_ch(target, z) == '/' ) z--;
while ( z > 0 && str_get_ch(target,z) != '/' ) z--;
z++;
str_sleft(target,z);
pos = z;
}
else
if ( ch == 9 && str_len( target ) > 0)
{
int z;
dir_list.undef();
VString dmain; /* main/base path */
VString dtail; /* item that should be expanded/glob */
dmain = str_file_path( target );
dtail = str_file_name_ext( target );
/*
int lastslash = str_rfind(target, '/');
if ( lastslash == -1 )
{
dmain = "";
dtail = target;
}
else
{
dmain = target;
dtail = target;
str_sleft( dmain, lastslash+1 );
str_trim_left( dtail, lastslash+1 );
}
*/
__glob_gdn( dmain, dtail, dir_list );
z = dir_list.count()-1;
if (dir_list.count())
{
if ( dir_list.count() > 1)
{
int mc = 0; /* match count */
int mi = 0; /* match letter index */
while(4)
{
mc = 0;
int li; /* counter */
for ( li = 0; li < dir_list.count(); li++ )
{
if ( str_get_ch( dir_list[ 0], mi ) ==
str_get_ch( dir_list[li], mi ) )
mc++;
}
if ( mc != dir_list.count() )
break;
mi++;
}
target.setn( dmain + dir_list[0], str_len( dmain ) + mi );
pos = str_len( target );
say2( target, cINPUT );
con_xy( pos+1, con_max_y() );
vfu_beep();
ch = con_getch();
if ( ch != 9 ) { dir_list.undef(); continue; }
dir_list.sort();
con_chide();
z = vfu_menu_box( 10, 5, "Complete...", &dir_list );
con_cshow();
ch = 0;
}
else
ch = 0;
if ( z != -1 )
{
while( str_len( target ) > 0 && target[-1] != '/' )
str_chop( target );
target += dir_list[z];
}
pos = str_len( target );
dir_list.undef();
if (ch != 0) continue;
}
else
{ /* no match found -- cannot complete */
vfu_beep();
}
}
else
if (ch == 13)
{
res = 1;
break;
}
else
if (ch == 27)
{
target = "";
res = 0;
break;
}
if (ch == KEY_CTRL_U)
{
target = "";
pos = 0;
}
else
if (ch == KEY_CTRL_X)
{
char t[MAX_PATH];
if ( target[0] == '~' )
target = tilde_expand( target );
expand_path( target, t );
str_fix_path( t );
target = t;
pos = str_len( target );
}
else
if (ch >= 32 && ch <= 255 ) // && pos < 70)
{
if (firsthit)
{
target = "";
pos = 0;
}
if (!insert) str_del( target, pos, 1 );
str_ins_ch( target, pos, ch );
pos++;
} else
if( ch == KEY_LEFT )
{
if (pos > 0)
pos--;
} else
if( ch == KEY_RIGHT )
{
if (pos < str_len( target ))
pos++;
} else
if ( ch == KEY_IC ) insert = !insert; else
if ( ch == KEY_HOME ) pos = 0; else
if ( ch == KEY_END ) pos = str_len(target); else
if ( ch == KEY_DC && pos < str_len(target) )
str_del( target, pos, 1 ); else
if ( ch == KEY_NPAGE || ch == KEY_PPAGE )
{
con_chide();
int zz = vfu_hist_menu( 5, 5, ( ch == KEY_PPAGE ) ? "Dir Entry History" : "ChDir History",
( ch == KEY_PPAGE ) ? HID_GETDIR : HID_CHDIR );
con_cshow();
if (zz != -1)
{
const char* pc = vfu_hist_get( ( ch == KEY_PPAGE ) ? HID_GETDIR : HID_CHDIR, zz );
if ( pc )
{
target = pc;
pos = str_len( target );
}
}
}
ch = 0;
firsthit = 0;
}
con_chide();
//------------------------------------------------------------------
str_cut_spc( target );
if ( res == 1 && target[0] == '~' )
{
target = tilde_expand( target );
str_fix_path( target );
}
/*
if ( target.len() > 0 )
{
// well this tmp is kind of s... ama k'vo da pravi chovek :)
// FIXME: dos version?
if ( __ExpandGetDirName && target[0] != '/'
#ifdef _TARGET_GO32_
&& !( target[1] == ':' && target[2] == '/' )
#endif
)
target = CPath + target;
StrFixPath( target ); // add trailing slash if not exist
}
*/
/*
#ifdef _TARGET_UNIX_
leaveok(stdscr, TRUE);
#endif
*/
if ( res == 1 && str_len( target ) > 0 && should_exist && !dir_exist( target ))
{
vfu_beep();
int ch = tolower( vfu_ask( "Directory does not exist! Create? "
"( ENTER=Yes, ESC=cancel )",
"\033\rcC" ));
if ( ch == 27 )
{
res = 0;
target = "";
}
else
if ( ch == 13 )
if (make_path( target ))
{
if(tolower(
vfu_ask( "Cannot create path! ( ESC=cancel, C=continue-anyway )",
"\033Cc" )) == 27)
{
res = 0;
target = "";
}
}
}
say1(" ");
say2(" ");
if ( str_len( target ) > 0)
{
str_fix_path( target );
vfu_hist_add( HID_GETDIR, target );
}
str_cut_spc( target );
ASSERT( res == 0 || res == 1 );
return res;
}
void vfu_chdir( const char *a_new_dir )
{
char t[MAX_PATH];
VString target;
if ( a_new_dir && a_new_dir[0] )
{
target = a_new_dir;
str_fix_path( target );
}
else
{
target = vfu_hist_get( HID_CHDIR, 0 );
if (!vfu_get_dir_name( "ChDir to? (TAB, PageUp, PageDown, ^X, ^A)",
target, 0 ))
return; /* get_dir_name canceled */
}
/* get_dir_name confirmed */
/*
if ( work_path[0] != target[0] && DirTreeChanged && opt.AutoTree ) SaveTree();
*/
if ( work_mode == WM_ARCHIVE )
{
archive_name = "";
archive_path = "";
}
vfu_hist_add( HID_CHDIR, work_path );
char ch = work_path[0];
if (opt.tree_cd)
if (!dir_exist( target ))
{
int z = 0;
if ( dir_tree.count() == 0 ) tree_load();
mb.undef();
z = tree_find( target, &mb );
if (z > 1)
{
z = vfu_menu_box( 10, 5, "Change dir to..." );
if (z > -1)
target = mb.get(z);
else
return;
}
else
if (z == 1)
target = mb.get(0);
}
VString str = target;
str_cut_spc( str );
#ifdef _TARGET_GO32_
if ( str[0] == '/' )
{
str_ins_ch( str, 0, ':' );
str_ins_ch( str, 0, work_path[0] );
} else
if ( str[1] == ':' && str[2] == 0 ) /* c: d: e: */
{
expand_path( str, t );
str = t;
}
if ( str[1] == ':' && str[2] == '/' )
#else /* _TARGET_GO32_ -> i.e. _TARGET_UNIX_ here*/
if (str[0] == '/')
#endif /* _TARGET_GO32_ */
{ /* root directory */
target = str;
}
else
{
str = work_path + str;
str_fix_path( str );
target = str_reduce_path( str );
}
if (chdir( target ) != 0)
{
sprintf( t, "chdir: %s", target.data() );
say1( t );
say2errno();
return;
}
else
{
work_path = target;
if ( work_mode == WM_ARCHIVE )
work_mode = WM_NORMAL;
}
if ( ch != work_path[0] ) tree_drop(); /* drop tree--it is for another drive*/
vfu_read_files();
}
void vfu_settings_load()
{
VString str;
user_externals.undef();
history.undef();
see_filters.undef();
panelizers.undef();
archive_extensions.undef();
path_bookmarks.undef();
/***** LOAD DEFAULTS *******/
memset( &opt, 0, sizeof( opt ) );
opt.svo.reset();
opt.seo.reset();
opt.seo.handle_tab = 1;
opt.sort_order = 'N';
opt.sort_direction = 'A';
opt.sort_top_dirs = 1;
opt.f_size = 1;
opt.f_time = 1;
opt.f_mode = 1;
opt.f_group = 1;
opt.f_owner = 1;
opt.f_type = 1;
opt.f_time_type = 1;
opt.long_name_view = 0;
opt.tree_compact = 0;
opt.tree_cd = 1;
opt.show_hidden_files = 1;
opt.allow_beep = 1;
opt.use_colors = 1;
opt.use_dir_colors = 1;
opt.lower_case_ext_config = 1;
opt.copy_free_space_check = 1;
opt.copy_calc_totals = 1;
opt.copy_keep_mode = 1;
opt.tag_mark_type = 0;
opt.internal_browser = 1;
opt.internal_editor = 1;
opt.mask_auto_expand = 1;
opt.shell_cls = 1;
opt.zap_ro = 0;
opt.show_user_free = 1;
opt.menu_borders = 0;
opt.lynx_navigation = 0;
opt.auto_mount = 1;
opt.keep_selection = 1;
opt.bytes_freed = 1;
opt.use_si_sizes = 0;
opt.smart_home_end = 1;
/***** LOAD DEFAULTS END ***/
FILE *fsett;
Options tmp_opt;
memset( &tmp_opt, 0, sizeof( tmp_opt ) );
if ( file_load_crc32( filename_opt, &tmp_opt, sizeof( tmp_opt ) ) == 0 )
memcpy( &opt, &tmp_opt, sizeof(Options) );
else
say1( "warning: bad vfu.options file, loading defaults..." );
history.fload( filename_history );
if (getenv("EDITOR"))
{
shell_editor = getenv("EDITOR");
shell_editor += " %f";
}
if (getenv("PAGER") )
{
shell_browser = getenv("PAGER");
shell_browser += " %f";
} else
if (getenv("BROWSER") )
{
shell_browser = getenv("BROWSER");
shell_browser += " %f";
} else
if (getenv("VIEWER") )
{
shell_browser = getenv("VIEWER");
shell_browser += " %f";
}
VRegexp re_ux("^\\s*u?x\\s*=\\s*([^,]*)[ \011]*,\\s*([^, \011]*)\\s*,\\s*([^, \011]*)\\s*,(.*)$", "i");
VRegexp re_see( "^\\s*see\\s*=\\s*([^, \011]*)\\s*,(.*)$", "i" );
VRegexp re_pan( "^\\s*panelize\\s*=\\s*([^,]*)\\s*,(.*)$", "i" );
char line[1024];
if ( (fsett = fopen( filename_conf, "r")) )
{
while(fgets(line, 1024, fsett))
{
if ( line[0] == '#' ) continue;
if ( line[0] == ';' ) continue;
str_cut( line, "\n\r" );
if ( strlen( line ) == 0 ) continue;
if(set_str( line, "browser", shell_browser))continue;
if(set_str( line, "pager", shell_browser))continue;
if(set_str( line, "viewer", shell_browser))continue;
if(set_arr( line, "archive", archive_extensions))continue;
if(set_str( line, "editor", shell_editor))continue;
if(set_str( line, "diff", shell_diff))continue;
if(set_arr( line, "bookmark", path_bookmarks))continue;
// follow 10 are deprecated
/*
if(set_arr( line, "bookmark1", path_bookmarks))continue;
if(set_arr( line, "bookmark2", path_bookmarks))continue;
if(set_arr( line, "bookmark3", path_bookmarks))continue;
if(set_arr( line, "bookmark4", path_bookmarks))continue;
if(set_arr( line, "bookmark5", path_bookmarks))continue;
if(set_arr( line, "bookmark6", path_bookmarks))continue;
if(set_arr( line, "bookmark7", path_bookmarks))continue;
if(set_arr( line, "bookmark8", path_bookmarks))continue;
if(set_arr( line, "bookmark9", path_bookmarks))continue;
*/
/* if(set_str( line, "cblack" , ext_colors[0]); */
if(set_str( line, "cgreen" , ext_colors[cGREEN]))continue;
if(set_str( line, "cred" , ext_colors[cRED]))continue;
if(set_str( line, "ccyan" , ext_colors[cCYAN]))continue;
if(set_str( line, "cwhite" , ext_colors[cWHITE]))continue;
if(set_str( line, "cmagenta" , ext_colors[cMAGENTA]))continue;
if(set_str( line, "cblue" , ext_colors[cBLUE]))continue;
if(set_str( line, "cyellow" , ext_colors[cYELLOW]))continue;
if(set_str( line, "chblack" , ext_colors[chBLACK]))continue;
if(set_str( line, "chgreen" , ext_colors[chGREEN]))continue;
if(set_str( line, "chred" , ext_colors[chRED]))continue;
if(set_str( line, "chcyan" , ext_colors[chCYAN]))continue;
if(set_str( line, "chwhite" , ext_colors[chWHITE]))continue;
if(set_str( line, "chmagenta", ext_colors[chMAGENTA]))continue;
if(set_str( line, "chblue" , ext_colors[chBLUE]))continue;
if(set_str( line, "chyellow" , ext_colors[chYELLOW]))continue;
if(set_splitter( line, "trimtree", trim_tree ))continue;
/* following code is used to clean input data */
if( re_ux.m( line ) )
{
str = "";
str = str + re_ux[1] + ","; /* get description */
str = str + re_ux[2] + ","; /* get key name */
VString t = re_ux[3]; /* get extensions */
if ( t != "*" && t[-1] != '.' ) t += ".";
str = str + t + ",";
str += re_ux[4]; /* get shell line */
user_externals.push( str );
continue;
} else
if( re_see.m( line ) )
{
str = "";
see_filters.push( str + re_see[1] + "," + re_see[2] );
continue;
} else
if( re_pan.m( line ) )
{
str = "";
panelizers.push( str + re_see[1] + "," + re_see[2] );
continue;
}
}
fclose(fsett);
}
#ifdef _TARGET_GO32_
int z;
for ( z = 0; z < 16; z++ ) str_low( ext_colors[z] );
#endif
if (opt.use_dir_colors) vfu_load_dir_colors();
// if (file_load_crc32( filename_size_cache, &size_cache, sizeof(size_cache)))
// memset( &size_cache, 0, sizeof(size_cache) );
size_cache.undef();
size_cache.fload( filename_size_cache );
}
