nv-l
[Top] [All Lists]

RE: [nv-l] Importing Smarset Definitions

To: "'nv-l@lists.us.ibm.com'" <nv-l@lists.us.ibm.com>
Subject: RE: [nv-l] Importing Smarset Definitions
From: "Bursik, Scott {PBSG}" <Scott.Bursik@pbsg.com>
Date: Thu, 13 Nov 2003 14:07:37 -0600
Delivery-date: Thu, 13 Nov 2003 20:14:44 +0000
Envelope-to: nv-l-archive@lists.skills-1st.co.uk
Reply-to: nv-l@lists.us.ibm.com
Sender: owner-nv-l@lists.us.ibm.com
I found the scripts. Here they are:

++++++++++++++++++++++++++++++++++++++++++++++++++++

smartsetbackup.pl 
#!/usr/local/bin/perl -w

@ListSmartsets = `/usr/OV/bin/nvUtil L`;

foreach $smartset (@ListSmartsets)
 {
   chomp($smartset);
   `/usr/OV/bin/nvUtil g $smartset > ./cfg/$smartset`;
 }








smartsetrestore.pl 

#!/usr/local/bin/perl -w

if (defined($ARGV[0]))
  { 
    $cnt = 0;
    foreach $smartset (@ARGV)
      {
       $ListSmartsets[$cnt] = './cfg/' . $smartset . "\n";
       $cnt++;
      }
  }
 else
  { @ListSmartsets = `ls ./cfg/*` }

foreach $item (@ListSmartsets)
 {
  chomp($item);
  @Config = `cat $item`;
  foreach $cfg (@Config)
   {
    chomp($cfg);
    $pos = index($cfg, 'SmartSet:');
    if ($pos != -1)
      {
        $name = substr($cfg, $pos+10);
      }
    $pos = index($cfg, 'Description:');
    if ($pos != -1)
      {
        $descr = substr($cfg, $pos+13);
      }
    $pos = index($cfg, 'Rule:');
    if ($pos != -1)
      {
        $rule =  substr($cfg, $pos+6);
      }
   }
  `/usr/OV/bin/nvUtil a \"$name\" \"$descr\" \"$rule\"`;


++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Scott Bursik
PepsiCo Business Solutions Group
Enterprise Systems Management
scott.bursik@pbsg.com
(972) 963-1400
 
________________________________________
From: Meyos Yemveng [mailto:yemveng@yahoo.ca] 
Sent: Thursday, November 13, 2003 1:47 PM
To: netview Tivoli
Subject: [nv-l] Importing Smarset Definitions

Hi Folks,
I am setting up a new NV server (NV7.1.3 SOLARIS) and would like to import
my defined smartsets from the old box to th enew one ...
 
Q: How do I do this?
 
 


Thank You,
Meyos 
"ALLEZ LES LIONS INDOMPTABLES"

________________________________________
Post your free ad now! Yahoo! Canada Personals


<Prev in Thread] Current Thread [Next in Thread>

Archive operated by Skills 1st Ltd

See also: The NetView Web