Date:  Mon, 16 Mar 2009 09:25:01 -0700 (PDT)
From:  Herb Rubin <herbr (at mark) pfinders.com>
Subject:  [coba-e:15341] Re: raqbackup.sh broken after install Archive::Tar
To:  coba-e (at mark) bluequartz.org
Message-Id:  <14858053.31237220701281.JavaMail.root (at mark) z01.pfinders.com>
In-Reply-To:  <6.2.5.6.2.20090315130329.02ca69e8 (at mark) zookerman.net>
X-Mail-Count: 15341

Bob,

You will have to patch /usr/cmu/perl/Archive/Tar.pm

--- Tar.pm.orig        2008-08-17 22:39:17.000000000 +0900
+++ Tar.pm        2008-12-21 22:06:27.000000000 +0900
@@ -28,15 +28,15 @@
  my $compression = eval {
      local $SIG{__DIE__};
      require Compress::Zlib;
-    sub Compress::Zlib::gzFile::gzseek {
-        my $tmp;
-
-        $_[0]->gzread ($tmp, 4096), $_[1] -= 4096
-            while ($_[1] > 4096);
-
-        $_[0]->gzread ($tmp, $_[1])
-          if $_[1];
-    }
+#    sub Compress::Zlib::gzFile::gzseek {
+#        my $tmp;
+#
+#        $_[0]->gzread ($tmp, 4096), $_[1] -= 4096
+#            while ($_[1] > 4096);
+#
+#        $_[0]->gzread ($tmp, $_[1])
+#          if $_[1];
+#    }
      1;
  };
  carp "Compression not available"
@@ -245,10 +245,10 @@
          $mode = $#_ ? (int($_[1]) > 1 ?
                            "wb".int($_[1]) : "wb") : "rb";

-#        $fh = Compress::Zlib::gzopen ($_[0], $mode)
-#            or &_drat;
-        $fh = Compress::Zlib::gzdopen_ ($fh, $mode, 0)
+        $fh = Compress::Zlib::gzopen ($_[0], $mode)
              or &_drat;
+#        $fh = Compress::Zlib::gzdopen_ ($fh, $mode, 0)
+#            or &_drat;
      }
      else {
          $flags = fcntl ($_[0], F_GETFL, 0) & (O_RDONLY | O_WRONLY | O_RDWR);

Worked for me.

Herb

----- Original Message -----
From: "Bob Harrison" <bob (at mark) zookerman.net>
To: coba-e (at mark) bluequartz.org
Sent: Sunday, March 15, 2009 2:09:04 PM GMT -08:00 US/Canada Pacific
Subject: [coba-e:15317] raqbackup.sh broken after install Archive::Tar

I installed Archive::Tar from CPAN on a BQ machine and now I am 
getting the following error from raqbackup.sh

02:15:04 > Deleting old logfiles... ok
02:15:04 > Deleting last backup... ok
02:15:05 > Deleting cmu.log to have a fresh one... ok
02:15:05 > Starting cmuExport... ok
02:15:13 > Finished!
02:15:13 > Starting to tar xml-files... not ok
********************************* ERROR ********************************
tar: /home/nuonce/backup/system_backup/data/*.xml: Cannot stat: No 
such file or directory
tar: Error exit delayed from previous errors
************************************************************************

Anyone else seeing this or can anyone suggest any fixes??

TIA



-- 
Herb Rubin
Pathfinders Software
http://www.pfinders.com