Re: [BackupPC-users] Limiting restore operation to a share or sub directory

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 454-5900

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
  <meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
<br>
<blockquote cite="mid:aut...@at..." type="cite">
  <pre wrap="">
Without modifying the code you can't do that.

You could create two virtual hosts, one that can be direct
restored and the other that can't.

Craig
  </pre>
</blockquote>
<br>
i was trying to change this file to add this:<br>
<br>
/usr/local/BackupPC/lib/BackupPC/Xfer/Rsync.pm<br>
<br>
in the sub start after :<br>
<br>
<blockquote>sub start<br>
{<br>
&nbsp;&nbsp;&nbsp; my($t) = @_;<br>
&nbsp;&nbsp;&nbsp; my $bpc = $t-&gt;{bpc};<br>
&nbsp;&nbsp;&nbsp; my $conf = $t-&gt;{conf};<br>
&nbsp;&nbsp;&nbsp; my(@fileList, $rsyncClientCmd, $rsyncArgs, $logMsg,<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; $incrDate, $argList, $fioArgs);<br>
  <br>
&nbsp;&nbsp;&nbsp; #<br>
&nbsp;&nbsp;&nbsp; # We add a slash to the share name we pass to rsync<br>
&nbsp;&nbsp;&nbsp; #<br>
&nbsp;&nbsp;&nbsp; ($t-&gt;{shareNameSlash} = "$t-&gt;{shareName}/") =~ s{//+$}{/};<br>
  <br>
&nbsp;&nbsp;&nbsp; if ( $t-&gt;{type} eq "restore" ) {<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; $rsyncClientCmd = $conf-&gt;{RsyncClientRestoreCmd};<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; $rsyncArgs = $conf-&gt;{RsyncRestoreArgs};<br>
</blockquote>
<br>
i added this:<br>
<br>
<blockquote>
  <blockquote><tt>&nbsp;&nbsp;&nbsp; my $remoteDir =
"$t-&gt;{shareName}/$t-&gt;{pathHdrDest}";</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; $remoteDir&nbsp;&nbsp;&nbsp; =~ s#/\.\.#/#g;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; $remoteDir&nbsp;&nbsp;&nbsp; =~ s{//+}{/}g;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; </tt><br>
    <tt>&nbsp;&nbsp;&nbsp; if( defined @rsyncRestoreLimitToShare ){</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; my $aqflag =0;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; foreach $aqshare ( @rsyncRestoreLimitToShare ){</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; if ( $remoteDir&nbsp; =~ /^$aqshare.*/ ) {</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; $aqflag = 1;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; }</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; }</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; if( $aqflag == 0 ){</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; my $str = "Erreur vous devez restorer dans&nbsp;
$rsyncRestoreLimitToShare uniquement ". ":$conf-&gt;{RsyncdClientPort}:
$err\n";</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; $t-&gt;{XferLOG}-&gt;write(\$str);</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; $t-&gt;{hostError} = $err;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; return;</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; }</tt><br>
    <tt>&nbsp;&nbsp;&nbsp; }</tt><br>
  </blockquote>
</blockquote>
<br>
<br>
but the code just fail and prevent the restoring in any case. Of course
i am not a dev so my perl is an 'cut and paste from how-to' type :(<br>
<br>
Anyone would like to help ?<br>
<br>
the goal is to verify that the restoredir start by one of the share we
want to limit to. The idea is to have in the config file:<br>
<br>
<tt> $rsyncRestoreLimitToShare = [ '/var','/etc'];&nbsp; so backuppc does
not allow to restore anywere else.<br>
<br>
Anyone interested to help ?<br>
</tt><br>
<div class="moz-signature">-- <br>
Cordialement,<br>
Ghislain</div>
</body>
</html>