Networker

Re: [Networker] Locating last full backup

2005-12-22 11:29:09
Subject: Re: [Networker] Locating last full backup
From: Davina Treiber <DavinaTreiber AT PEEVRO.CO DOT UK>
To: NETWORKER AT LISTSERV.TEMPLE DOT EDU
Date: Thu, 22 Dec 2005 16:24:35 +0000
Matt Temple wrote:

         I was looking for a script that would likst out the last full
backup of all filesystems on all clients.   I looked through the
archives in ways that made sense to me, but didn't see what I was
looking for.    Has anyone written a script to do this that he or
she would like to share?


#!/usr/bin/perl

open MMINFO, "mminfo -q \"!incomplete,level=full\" -r \"nsavetime,savetime,client,totalsize(9),name\" |";
while (<MMINFO>) {
        next if /^  save time /;
        ($nsavetime, $savetimeraw, $client, $size, $mult, @name) = split;
        $name = join " ", @name;
        $_ = $savetimeraw;
        ($mm, $dd, $yy) = split /\//;
        $savetime = "$yy/$mm/$dd";
        if (defined $latestnsavetime{$client}{$name}) {
                $l_nsavetime = $latestnsavetime{$client}{$name};
                if ($nsavetime gt $l_nsavetime) {
                        $latestnsavetime{$client}{$name} = $nsavetime;
                        $latestsavetime{$client}{$name} = $savetime;
                        $latestsize{$client}{$name} = "$size $mult";
                }
                else {
                };
        }
        else {
                $latestnsavetime{$client}{$name} = $nsavetime;
                $latestsavetime{$client}{$name} = $savetime;
                $latestsize{$client}{$name} = "$size $mult";
        };
};

for $client (sort keys %latestnsavetime) {
        for $name (sort keys %{ $latestnsavetime{$client} } ) {
printf "%10s %-15s%-40s%-10s%8s\n", $latestnsavetime{$client}{$name}, $client, $name, $latestsavetime{$client}{$name}, $latestsize{$client}{$name};
        };
};

To sign off this list, send email to listserv AT listserv.temple DOT edu and type 
"signoff networker" in the
body of the email. Please write to networker-request AT listserv.temple DOT edu 
if you have any problems
wit this list. You can access the archives at 
http://listserv.temple.edu/archives/networker.html or
via RSS at http://listserv.temple.edu/cgi-bin/wa?RSS&L=NETWORKER