While we wait for legato to fix this, I have 'made' this script to delete
ssid/cloneid and then mark the empty volumes as recyc. I'm not a perl
programmer, but have found what I need in other public scripts and adjusted
to my needs, my tests indicate it works as it's supposed too, although I am
a bit unsure about the recyc of volumes part.
I'm sure it can be streamlined more.

Thanks to the people who made the scripts that made this possible....



#!d:/perl/bin/perl.exe

$MMINFO='c:/progra~1/nsr/bin/mminfo';
$NSRMM='c:/progra~1/nsr/bin/nsrmm';
$NSRJB='c:/progra~1/nsr/bin/nsrjb';
$MMLOCATE='c:/progra~1/nsr/bin/mmlocate';
$tape_age='tomorrow'; # see man nsr_getdate
$tape_pool='testclone';
$var1   ='/';

open (MM, "${MMINFO} -q \"savetime<$tape_age,pool
=$tape_pool,volrecycle=false\" -r ssid,cloneid  |") ||
   die "Cannot get mminfo report\n";
@bsinfo = <MM>;
foreach (@bsinfo) {
($ssid, $cloneid) = split;
if ($ssid eq "ssid") {next;}
$ret = system("$NSRMM \-y \-d \-S $ssid$var1$cloneid\n");
       if ($ret != 0) { die "Shit.  I tried to delete SSID/CLONEID
$ssid$kel$cloneid and failed.  Go fix it.\n"};
}; # end of foreach


open(F, "${MMINFO} -sldap2.steria.dk -q \"pool
=$tape_pool,volretent<today,volrecycle=false\" -r volume|")
        or die "Couldn't run mminfo, bailing out\n";
while(<F>) {
                chomp;
                $oldenough{$_}++;
        }
close(F);

foreach $i (keys(%oldenough)) {
        next if $tooyoung{$i};
        $ret = system("${NSRMM} -sldap2.steria.dk -y -o recyclable $i");
        if ($ret != 0) {
                die "Shit.  I tried to mark volume $i as recyclable and
failed.  Go fix it.\n";
        }
}

**************************************************
regards
Kenneth Larsen
Steria
Tonsbakken 16-18
2740 Skovlunde
kel AT steria DOT dk - 44506261 - 26306261
**************************************************


|---------+----------------------------------->
|         |           Tom Webster             |
|         |           <webster AT SSDPDC.LGB DOT CAL.|
|         |           BOEING.COM>             |
|         |           Sent by: Legato         |
|         |           NetWorker discussion    |
|         |           <NETWORKER AT LISTMAIL DOT TEMP|
|         |           LE.EDU>                 |
|         |                                   |
|         |                                   |
|         |           10-01-2003 18:56        |
|         |           Please respond to Legato|
|         |           NetWorker discussion;   |
|         |           Please respond to Tom   |
|         |           Webster                 |
|---------+----------------------------------->
  
>--------------------------------------------------------------------------------------------------------------|
  |                                                                             
                                 |
  |       To:       NETWORKER AT LISTMAIL.TEMPLE DOT EDU                        
                                        |
  |       cc:                                                                   
                                 |
  |       Subject:  Re: [Networker] Usefulness of clones (WAS: Problemwith the 
recycling         of clones)      |
  
>--------------------------------------------------------------------------------------------------------------|




Kenneth,

* Kenneth Larsen (Kenneth.Larsen AT STERIA DOT DK) [030110 07:30]:
> Ofcause we're interested, at least if u can get a status on your request.
> It's not likely we'll ever hear from legato, but theres always a chance.
>
> How do u guys handle the situation today ? keep the clones and originals
> until they expire ? handle it manually ?
>
> Does veritas have this functionality, that sounds interesting as I am
about
> to get a copy I can test vs legato.

It's been a while since I worked with Veritas at all, so I may be off on
some of the details, but: Yes, it has the ability to tee the backup
stream and write duplicate tapes at the same time the backups are going.
I have no idea how well or poorly it handles problems with media while
it's doing this.  As I recall, and maybe incorrectly, it got around the
label/barcode issue by dumping the duplicated tapes right into the
I/O port of the library when the tape was done.

As far as working with Legato's clones: scripts.  A series of scripts to
try to get the cloning to work somewhat in parallel (a modification of
some of the scripts that have been posted on this list) and a script to
handle the generation of the paper forms that we need to send tapes off
site for disaster retention and handle some of the tape recycling.

The scripts are very much a work in progress.

Tom
--
+-----------------------------------+---------------------------------+
| Tom Webster                       |  "Funny, I've never seen it     |
| SysAdmin MDA-SSD ISS-IS-HB-S&O    |   do THAT before...."           |
| webster AT ssdpdc.lgb.cal.boeing DOT com |   - Any user support person     |
+-----------------------------------+---------------------------------+
|      Unless clearly stated otherwise, all opinions are my own.      |
+---------------------------------------------------------------------+

--
Note: To sign off this list, send a "signoff networker" command via email
to listserv AT listmail.temple DOT edu or visit the list's Web site at
http://listmail.temple.edu/archives/networker.html where you can
also view and post messages to the list.
 =*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=

--
Note: To sign off this list, send a "signoff networker" command via email
to listserv AT listmail.temple DOT edu or visit the list's Web site at
http://listmail.temple.edu/archives/networker.html where you can
also view and post messages to the list.
=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=