Still living in the 90's? Do you treat modern storage technologies like deduplication and compression with Amish-like suspicion, bitterness and disdain? Then EMC's VMAX AF line is the choice for you--For the rest of us here in the present, we have to find ways of keeping this thing propped up on life support. One of the more irritating aspects of EMC's VMAX line is the fact that, amazingly there is no single CLI command to display a simple table relating volume names to WWNs. Rather than wait for EMC to provide this functionality (or, preferably, sunset the VMAX line alltogether) I've written a simple wrapper in Perl that provides this functionality. 
#!/usr/bin/perl
##
## Volume label to WWN/NAA manifest generator for VMAX arrays written 
+060717:1523 by Bowie J. Poag
##

$DEBUG=1;
$SID=$ARGV[0];

if ($SID eq "")
{
   print "Manifest: No array specified. Exiting..\n\n";
}

@dump=`symdev -sid $SID list -identifier device_name`;

foreach $item (@dump)
{
   chomp($item);
   $item=~s/\s+/ /g;
   @temp=split(" ",$item);

   $symDev=$temp[0];
   $canonicalName=$temp[2];

   if ($canonicalName=~/ACLX/) ## Special exception for gatekeeper LUN
+s..
   {
      $canonicalName=$temp[3];
   }

   if (length($symDev)==5 && $symDev=~/[0-9a-fA-F]/ && $canonicalName 
+ne "")
   {
      $deviceHash{$symDev}{canonicalName}=$canonicalName;
   }
}

@dump=`symdev -sid $SID list -wwn`;

foreach $item (@dump)
{

   chomp($item);
   $item=~s/\s+/ /g;
   @temp=split(" ",$item);

   $symDev=$temp[0];
   $WWN=$temp[4];

   if (length($symDev)==5 && $symDev=~/[0-9a-fA-F]/  && length($WWN) >
+ 10)
   {
         $deviceHash{$symDev}{WWN}=$WWN;
         $suffix=substr $WWN,length($WWN)-4,4;
         $deviceHash{$symDev}{suffix}=$suffix;
   }

}

foreach $x (sort keys %deviceHash)
{
   print "SID: [$SID] SymDev: [$x] Full WWN: [$deviceHash{$x}{WWN}] WW
+N/NAA Suffix: [$deviceHash{$x}{suffix}] Name: [$deviceHash{$x}{canoni
+calName}]\n";
}

[download]

In reply to Manifest - A tool for matching EMC Symmetrix/VMAX Volumes to WWNs by bpoag

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.