faubackup/src faubackup-find.in,1.5,1.6 faubackup.in,1.7,1.8

Update of /cvsroot/faubackup/faubackup/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24444/src

Modified Files:
	faubackup-find.in faubackup.in 
Log Message:
support for --one-file-system


Index: faubackup-find.in
===================================================================
RCS file: /cvsroot/faubackup/faubackup/src/faubackup-find.in,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** faubackup-find.in	16 Apr 2004 22:58:53 -0000	1.5
--- faubackup-find.in	18 Apr 2004 22:48:34 -0000	1.6
***************
*** 51,54 ****
--- 51,57 ----
  my $verbose;
  my $useregexp = 1;
+ my $one_file_system = 0;
+ 
+ my $rootdev;
  
  # little bit more shell like matching
***************
*** 175,178 ****
--- 178,184 ----
  		# recurse if this is a directory we can cd into
  		if( !-l $file && -d _ && -x _ ) {
+ 			my $dev;
+ 			($dev) = stat(_);
+ 			next if $one_file_system && ($dev != $rootdev);
  			&process_dir( $file, @ignorelist );
  		}
***************
*** 191,195 ****
  	"version" => \$version,
  	"verbose" => \$verbose,
! 	"regexp!" => \$useregexp
  ) or printusage(1);
  printusage(0) if $usage;
--- 197,202 ----
  	"version" => \$version,
  	"verbose" => \$verbose,
! 	"regexp!" => \$useregexp,
! 	"one-file-system|L" => \$one_file_system,
  ) or printusage(1);
  printusage(0) if $usage;
***************
*** 206,209 ****
--- 213,217 ----
  }
  # start search
+ ($rootdev) = stat(".");
  process_dir( ".", @ignorelist );
  print ".\000";

Index: faubackup.in
===================================================================
RCS file: /cvsroot/faubackup/faubackup/src/faubackup.in,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** faubackup.in	16 Apr 2004 23:00:17 -0000	1.7
--- faubackup.in	18 Apr 2004 22:48:34 -0000	1.8
***************
*** 70,73 ****
--- 70,74 ----
  $FAUBACKUP::keeplastofday = 0;
  $FAUBACKUP::atime_preserve = 0;
+ $FAUBACKUP::one_file_system = 0;
  $FAUBACKUP::rsh		= "rsh";
  $FAUBACKUP::gather	= "faubackup-gather";
***************
*** 83,87 ****
  
  my( $backup, $autocreate, $rsh, $keep, $keeplastofday );
! my( $find, $getroot, @ignore, $atime_preserve );
  $backup = $FAUBACKUP::backup;
  $autocreate = $FAUBACKUP::autocreate;
--- 84,88 ----
  
  my( $backup, $autocreate, $rsh, $keep, $keeplastofday );
! my( $find, $getroot, @ignore, $atime_preserve, $one_file_system );
  $backup = $FAUBACKUP::backup;
  $autocreate = $FAUBACKUP::autocreate;
***************
*** 92,95 ****
--- 93,97 ----
  $keeplastofday = $FAUBACKUP::keeplastofday;
  $atime_preserve = $FAUBACKUP::atime_preserve;
+ $one_file_system = $FAUBACKUP::one_file_system;
  $rsh = $FAUBACKUP::rsh;
  $find = $FAUBACKUP::find;
***************
*** 369,372 ****
--- 371,375 ----
  		"keep-last" => \$keeplastofday,
  		"atime-preserve" => \$atime_preserve,
+ 		"one-file-system|L" => \$one_file_system,
  		# deprecated options:
  		"p" => \$ignored,
***************
*** 417,420 ****
--- 420,424 ----
  my( $gather, $scatter );
  @ignore = map {escape($_)} @ignore;
+ unshift @ignore, "--one-file-system" if $one_file_sytem;
  $gather = "$getroot $find @ignore | $getroot $FAUBACKUP::gather";
  $gather .= " --verbose" if $verbose && $gatherdir;



-------------------------------------------------------
This SF.Net email is sponsored by: IBM Linux Tutorials
Free Linux tutorial presented by Daniel Robbins, President and CEO of
GenToo technologies. Learn everything from fundamentals to system
administration.http://ads.osdn.com/?ad_id=1470&alloc_id=3638&op=click