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 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("");
}
fsize_t __dir_size_process( const char* path )
{
if ( vfu_break_op() )
return -1;
DIR* dir;
dirent* de;
struct stat st;
fsize_t size = 0;
char new_name[MAX_PATH];
dir = opendir( path );
if ( !dir ) return 0;
while( (de = readdir(dir)) )
{
if ( strcmp( de->d_name, "." ) == 0 ||
strcmp( de->d_name, ".." ) == 0 ) continue;
sprintf(new_name, "%s%s", path, de->d_name);
lstat(new_name, &st);
int is_link = int(S_ISLNK(st.st_mode));
memset( &st, 0, sizeof(st) );
#ifdef _TARGET_GO32_
dosstat(dir, &st);
#else
stat(new_name, &st);
#endif
int is_dir = int(S_ISDIR(st.st_mode));
if ( is_link ) continue; /* skip links */
if ( is_dir )
{
strcat( new_name, "/" );
fsize_t dir_size = __dir_size_process( new_name );
if ( dir_size == -1 )
{
closedir(dir);
return -1;
}
else
{
size += dir_size;
size_cache_append( new_name, dir_size );
}
}
else
size += file_st_size( &st );
}
closedir(dir);
/* show some progress :) */
say2( str_dot_reduce( path, con_max_x()-1 ) );
return size;
}
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 vfu_read_archive_files( int a_recursive )
{
char line[2048] = "";
struct stat st;
memset( &st, 0, sizeof(st));
if ( a_recursive )
archive_path = ""; /* cannot have path when recursing archive */
VString s;
s = "rx_auto ";
s += ( a_recursive ) ? "v \"" : "l \"";
s += archive_name;
s += "\" \"";
s += archive_path;
s += "\" 2> /dev/null";
/* NOTE: calling rx_* should be safe and result should be proper
all bugs must be traced outside VFU ...
*/
FILE *f = popen( s, "r" );
s = "";
if ( !f )
{
say2( "Archive cannot be recognized or cannot be read" );
} else
while( fgets(line, 2048-1, f) )
{
str_cut( line, "\n\r" );
if ( strncmp( line, "NAME:", 5 ) == 0 )
{
s = line+5;
if ( str_get_ch( s, -1 ) == '/' ) /* i.e. last char */
{
str_trim_right( s, 1 );
st.st_mode |= S_IFDIR;
}
/* FIXME: my man page for stat() says S_IFDIR is not POSIX?! */
} else
if ( strncmp( line, "SIZE:", 5 ) == 0 )
{
st.st_size = atoi( line+5 );
} else
if ( strncmp( line, "TIME:", 5 ) == 0 )
{
struct tm t;
memset( &t, 0, sizeof(t) );
VRegexp r( "^(....)(..)(..)(..)(..)(..)?" );
r.m( line + 5 );
t.tm_year = atoi( r[1] ) - 1900; //r[0] is whole
t.tm_mon = atoi( r[2] ) - 1;
t.tm_mday = atoi( r[3] );
t.tm_hour = atoi( r[4] );
t.tm_min = atoi( r[5] );
t.tm_sec = atoi( r[6] );
//for (int x=0;x<7; x++) printf( "%s ", (const char *)r[x]);
st.st_mtime = st.st_ctime = st.st_atime = mktime( &t );
//printf( "%d \n", st.st_atime);
} else
if ( line[0] == 0 )
{
if ( str_len( s ) > 0 )
vfu_add_file( s, &st, 0 ); /* FIXME: there's no links for now */
s = "";
memset( &st, 0, sizeof(st) );
}
}
pclose( f );
};
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;
}
fsize_t __tree_rebuild_process( const char* path )
{
if ( vfu_break_op() ) return -1;
DIR* dir;
dirent* de;
struct stat st;
fsize_t size = 0;
char new_name[MAX_PATH];
dir = opendir( path );
if ( !dir ) return 0;
while( (de = readdir(dir)) )
{
if ( strcmp( de->d_name, "." ) == 0 ||
strcmp( de->d_name, ".." ) == 0 ) continue;
sprintf(new_name, "%s%s", path, de->d_name);
lstat(new_name, &st);
int is_link = int(S_ISLNK(st.st_mode));
if (is_link) continue;
#ifdef _TARGET_GO32_
dosstat(dir, &st);
#else
stat(new_name, &st);
#endif
int is_dir = S_ISDIR(st.st_mode);
if ( is_dir )
{ /* directory */
strcat( new_name, "/" );
int z;
int trim = 0;
for ( z = 0; z < trim_tree.count(); z++ )
{
VString trim_temp = trim_tree[z];
str_fix_path( trim_temp );
if ( pathcmp(trim_temp, new_name) == 0 )
{ /* trim_tree item found */
trim = 1;
break;
}
}
if (trim)
continue; /* cut this branch */
int pos = dir_tree.count();
fsize_t dir_size = __tree_rebuild_process( new_name );
if ( dir_size < 0 )
{ /* canceled */
closedir(dir);
return -1;
}
dir_tree.ins( pos, new_name );
size_cache_set( new_name, dir_size );
size += dir_size;
}
else
{ /* file */
size += file_st_size( &st );
}
}
closedir(dir);
/* show some progress :) */
say2( str_dot_reduce( path, con_max_x()-1 ) );
return size;
}
