Skip site navigation (1)Skip section navigation (2)
Date:      Tue, 26 Aug 2014 14:42:38 +0000 (UTC)
From:      William Grzybowski <wg@FreeBSD.org>
To:        ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org
Subject:   svn commit: r366218 - head/sysutils/backuppc/files
Message-ID:  <201408261442.s7QEgcWQ027461@svn.freebsd.org>

next in thread | raw e-mail | index | archive | help
Author: wg
Date: Tue Aug 26 14:42:38 2014
New Revision: 366218
URL: http://svnweb.freebsd.org/changeset/ports/366218
QAT: https://qat.redports.org/buildarchive/r366218/

Log:
  sysutils/backuppc: add missing patches in last update
  
  PR:		192403

Added:
  head/sysutils/backuppc/files/patch-update.pl   (contents, props changed)
  head/sysutils/backuppc/files/update.sh.in   (contents, props changed)

Added: head/sysutils/backuppc/files/patch-update.pl
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/sysutils/backuppc/files/patch-update.pl	Tue Aug 26 14:42:38 2014	(r366218)
@@ -0,0 +1,235 @@
+--- ./update.pl.orig	2014-08-19 15:02:15.000000000 +0400
++++ ./update.pl	2014-08-19 15:03:11.000000000 +0400
+@@ -204,7 +204,7 @@
+ if ( $ConfigPath ne "" && -r $ConfigPath ) {
+     (my $confDir = $ConfigPath) =~ s{/[^/]+$}{};
+     die("BackupPC::Lib->new failed\n")
+-            if ( !($bpc = BackupPC::Lib->new(".", ".", $confDir, 1)) );
++            if ( !($bpc = BackupPC::Lib->new(".", $opts{"install-dir"}, $confDir, 1)) );
+     %Conf = $bpc->Conf();
+     %OrigConf = %Conf;
+     if ( !$opts{fhs} ) {
+@@ -507,198 +507,14 @@
+ 
+ print <<EOF;
+ 
+-Ok, we're about to:
+-
+-  - install the binaries, lib and docs in $Conf{InstallDir},
+-  - create the data directory $Conf{TopDir},
+-  - create/update the config.pl file $Conf{ConfDir}/config.pl,
+-  - optionally install the cgi-bin interface.
++Ok, we're about to create/update the config.pl file $Conf{ConfDir}/config.pl.
+ 
+ EOF
+ 
+ exit unless prompt("--> Do you want to continue?", "y") =~ /y/i;
+ 
+-#
+-# Create install directories
+-#
+-foreach my $dir ( qw(bin doc
+-		     lib/BackupPC/CGI
+-		     lib/BackupPC/Config
+-		     lib/BackupPC/Lang
+-		     lib/BackupPC/Storage
+-		     lib/BackupPC/Xfer
+-		     lib/BackupPC/Zip
+-                     lib/Net/FTP
+-		 ) ) {
+-    next if ( -d "$DestDir$Conf{InstallDir}/$dir" );
+-    mkpath("$DestDir$Conf{InstallDir}/$dir", 0, 0755);
+-    if ( !-d "$DestDir$Conf{InstallDir}/$dir"
+-            || !my_chown($Uid, $Gid, "$DestDir$Conf{InstallDir}/$dir") ) {
+-        die("Failed to create or chown $DestDir$Conf{InstallDir}/$dir\n");
+-    } else {
+-        print("Created $DestDir$Conf{InstallDir}/$dir\n");
+-    }
+-}
+-
+-#
+-# Create CGI image directory
+-#
+-foreach my $dir ( ($Conf{CgiImageDir}) ) {
+-    next if ( $dir eq "" || -d "$DestDir$dir" );
+-    mkpath("$DestDir$dir", 0, 0755);
+-    if ( !-d "$DestDir$dir" || !my_chown($Uid, $Gid, "$DestDir$dir") ) {
+-        die("Failed to create or chown $DestDir$dir");
+-    } else {
+-        print("Created $DestDir$dir\n");
+-    }
+-}
+-
+-#
+-# Create other directories
+-#
+-foreach my $dir ( (
+-            "$Conf{TopDir}",
+-            "$Conf{TopDir}/pool",
+-            "$Conf{TopDir}/cpool",
+-            "$Conf{TopDir}/pc",
+-            "$Conf{TopDir}/trash",
+-            "$Conf{ConfDir}",
+-            "$Conf{LogDir}",
+-        ) ) {
+-    mkpath("$DestDir$dir", 0, 0750) if ( !-d "$DestDir$dir" );
+-    if ( !-d "$DestDir$dir"
+-            || !my_chown($Uid, $Gid, "$DestDir$dir") ) {
+-        die("Failed to create or chown $DestDir$dir\n");
+-    } else {
+-        print("Created $DestDir$dir\n");
+-    }
+-}
+-
+-printf("Installing binaries in $DestDir$Conf{InstallDir}/bin\n");
+-foreach my $prog ( qw(
+-        bin/BackupPC
+-        bin/BackupPC_archive
+-        bin/BackupPC_archiveHost
+-        bin/BackupPC_archiveStart
+-        bin/BackupPC_attribPrint
+-        bin/BackupPC_dump
+-        bin/BackupPC_fixupBackupSummary
+-        bin/BackupPC_link
+-        bin/BackupPC_nightly
+-        bin/BackupPC_restore
+-        bin/BackupPC_sendEmail
+-        bin/BackupPC_serverMesg
+-        bin/BackupPC_trashClean
+-        bin/BackupPC_tarExtract
+-        bin/BackupPC_tarCreate
+-        bin/BackupPC_tarPCCopy
+-        bin/BackupPC_zipCreate
+-        bin/BackupPC_zcat
+-    ) ) {
+-    InstallFile($prog, "$DestDir$Conf{InstallDir}/$prog", 0555);
+-}
+-
+-printf("Installing library in $DestDir$Conf{InstallDir}/lib\n");
+-foreach my $lib ( qw(
+-        lib/BackupPC/Attrib.pm
+-        lib/BackupPC/Config.pm
+-        lib/BackupPC/FileZIO.pm
+-        lib/BackupPC/Lib.pm
+-        lib/BackupPC/PoolWrite.pm
+-        lib/BackupPC/Storage.pm
+-        lib/BackupPC/View.pm
+-        lib/BackupPC/CGI/AdminOptions.pm
+-        lib/BackupPC/CGI/Archive.pm
+-        lib/BackupPC/CGI/ArchiveInfo.pm
+-        lib/BackupPC/CGI/Browse.pm
+-        lib/BackupPC/CGI/DirHistory.pm
+-        lib/BackupPC/CGI/EditConfig.pm
+-        lib/BackupPC/CGI/EmailSummary.pm
+-        lib/BackupPC/CGI/GeneralInfo.pm
+-        lib/BackupPC/CGI/HostInfo.pm
+-        lib/BackupPC/CGI/Lib.pm
+-        lib/BackupPC/CGI/LOGlist.pm
+-        lib/BackupPC/CGI/Queue.pm
+-        lib/BackupPC/CGI/ReloadServer.pm
+-        lib/BackupPC/CGI/RestoreFile.pm
+-        lib/BackupPC/CGI/RestoreInfo.pm
+-        lib/BackupPC/CGI/Restore.pm
+-        lib/BackupPC/CGI/RSS.pm
+-        lib/BackupPC/CGI/StartServer.pm
+-        lib/BackupPC/CGI/StartStopBackup.pm
+-        lib/BackupPC/CGI/StopServer.pm
+-        lib/BackupPC/CGI/Summary.pm
+-        lib/BackupPC/CGI/View.pm
+-        lib/BackupPC/Config/Meta.pm
+-        lib/BackupPC/Lang/cz.pm
+-        lib/BackupPC/Lang/de.pm
+-        lib/BackupPC/Lang/en.pm
+-        lib/BackupPC/Lang/es.pm
+-        lib/BackupPC/Lang/fr.pm
+-        lib/BackupPC/Lang/it.pm
+-        lib/BackupPC/Lang/ja.pm
+-        lib/BackupPC/Lang/nl.pm
+-        lib/BackupPC/Lang/pl.pm
+-        lib/BackupPC/Lang/pt_br.pm
+-        lib/BackupPC/Lang/ru.pm
+-        lib/BackupPC/Lang/uk.pm
+-        lib/BackupPC/Lang/zh_CN.pm
+-        lib/BackupPC/Storage/Text.pm
+-        lib/BackupPC/Xfer.pm
+-        lib/BackupPC/Xfer/Archive.pm
+-        lib/BackupPC/Xfer/Ftp.pm
+-        lib/BackupPC/Xfer/Protocol.pm
+-        lib/BackupPC/Xfer/Rsync.pm
+-        lib/BackupPC/Xfer/RsyncDigest.pm
+-        lib/BackupPC/Xfer/RsyncFileIO.pm
+-        lib/BackupPC/Xfer/Smb.pm
+-        lib/BackupPC/Xfer/Tar.pm
+-        lib/BackupPC/Zip/FileMember.pm
+-        lib/Net/FTP/AutoReconnect.pm
+-        lib/Net/FTP/RetrHandle.pm
+-    ) ) {
+-    InstallFile($lib, "$DestDir$Conf{InstallDir}/$lib", 0444);
+-}
+-
+-if ( $Conf{CgiImageDir} ne "" ) {
+-    printf("Installing images in $DestDir$Conf{CgiImageDir}\n");
+-    foreach my $img ( <images/*> ) {
+-	(my $destImg = $img) =~ s{^images/}{};
+-	InstallFile($img, "$DestDir$Conf{CgiImageDir}/$destImg", 0444, 1);
+-    }
+-
+-    #
+-    # Install new CSS file, making a backup copy if necessary
+-    #
+-    my $cssBackup = "$DestDir$Conf{CgiImageDir}/BackupPC_stnd.css.pre-3.3.0";
+-    if ( -f "$DestDir$Conf{CgiImageDir}/BackupPC_stnd.css" && !-f $cssBackup ) {
+-	rename("$DestDir$Conf{CgiImageDir}/BackupPC_stnd.css", $cssBackup);
+-    }
+-    InstallFile("conf/BackupPC_stnd.css",
+-	        "$DestDir$Conf{CgiImageDir}/BackupPC_stnd.css", 0444, 0);
+-    InstallFile("conf/BackupPC_stnd_orig.css",
+-	        "$DestDir$Conf{CgiImageDir}/BackupPC_stnd_orig.css", 0444, 0);
+-    InstallFile("conf/sorttable.js",
+-                "$DestDir$Conf{CgiImageDir}/sorttable.js", 0444, 0);
+-}
+-
+-printf("Making init.d scripts\n");
+-foreach my $init ( qw(gentoo-backuppc gentoo-backuppc.conf linux-backuppc
+-		      solaris-backuppc debian-backuppc freebsd-backuppc
+-                      freebsd-backuppc2 suse-backuppc slackware-backuppc ) ) {
+-    InstallFile("init.d/src/$init", "init.d/$init", 0444);
+-}
+-
+-printf("Making Apache configuration file for suid-perl\n");
+-InstallFile("httpd/src/BackupPC.conf", "httpd/BackupPC.conf", 0644);
+-
+-printf("Installing docs in $DestDir$Conf{InstallDir}/doc\n");
+-foreach my $doc ( qw(BackupPC.pod BackupPC.html) ) {
+-    InstallFile("doc/$doc", "$DestDir$Conf{InstallDir}/doc/$doc", 0444);
+-}
+-
+ printf("Installing config.pl and hosts in $DestDir$Conf{ConfDir}\n");
+-InstallFile("conf/hosts", "$DestDir$Conf{ConfDir}/hosts", 0644)
++InstallFile("$DestDir$Conf{ConfDir}/hosts.sample", "$DestDir$Conf{ConfDir}/hosts", 0644)
+                     if ( !-f "$DestDir$Conf{ConfDir}/hosts" );
+ 
+ #
+@@ -707,7 +523,7 @@
+ # parameters and deleting ones that are no longer needed.
+ #
+ my $dest = "$DestDir$Conf{ConfDir}/config.pl";
+-my ($distConf, $distVars) = ConfigParse("conf/config.pl");
++my ($distConf, $distVars) = ConfigParse("$DestDir$Conf{ConfDir}/config.pl.sample");
+ my ($oldConf, $oldVars);
+ my ($newConf, $newVars) = ($distConf, $distVars);
+ if ( -f $dest ) {
+@@ -928,13 +744,6 @@
+     die("can't chown $Uid, $Gid $dest\n") unless my_chown($Uid, $Gid, $dest);
+ }
+ 
+-if ( $Conf{CgiDir} ne "" ) {
+-    printf("Installing cgi script BackupPC_Admin in $DestDir$Conf{CgiDir}\n");
+-    mkpath("$DestDir$Conf{CgiDir}", 0, 0755);
+-    InstallFile("cgi-bin/BackupPC_Admin", "$DestDir$Conf{CgiDir}/BackupPC_Admin",
+-                04554);
+-}
+-
+ print <<EOF;
+ 
+ Ok, it looks like we are finished.  There are several more things you

Added: head/sysutils/backuppc/files/update.sh.in
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/sysutils/backuppc/files/update.sh.in	Tue Aug 26 14:42:38 2014	(r366218)
@@ -0,0 +1,11 @@
+#!/bin/sh
+
+perl %%PREFIX%%/libexec/backuppc/update.pl \
+    --config-dir %%ETCDIR%% \
+    --cgi-dir %%CGIDIR%% \
+    --data-dir /var/db/BackupPC \
+    --fhs \
+    --html-dir %%WWWDIR%% \
+    --html-dir-url /backuppc \
+    --install-dir %%PREFIX%% \
+    --log-dir /var/log/BackupPC



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201408261442.s7QEgcWQ027461>