IBM::V7000 - Perl API to IBM V7000 CLI
Version 0.01
IBM::V7000 is a Perl API to IBM V7000 CLI.
my $ibm = IBM::V7000->new( user => 'admin', host => 'my-v7000.company.com', key_path => '/path/to/my/.ssh/private_key' ) or die "Couldn't create object! $!\n";
Constructor - creates a new IBM::V7000 object. This method accepts three mandatory parameters and one optional parameter, the three mandatory parameters are:
The username of the user with which to connect to the device.
The hostname or IP address of the device to which we are connecting.
Either a relative or fully qualified path to the private ssh key valid for the user name and device to which we are connecting. Please note that the executing user must have read permission to this key.
The optional parameter is:
The period in seconds for which retrieved system statistics will be considered fresh, after which they will be re-retrieved. If not set, the default value of this parameter is zero meaning that the statistics are not refreshed unless done explicitly via the refresh method of an IBM:StorageSystem::Statistic object.
Specifies if the authentication service certificate has been set.
True if the auth_service_type is configured and either one of the following is true:
The auth_service_type is LDAP-only (if at least one LDAP server is configured)
The auth_service_type is TIP-only:
The name, password, and URL are established
An SSL certificate is created (if an HTTPS URL is available)
True if auth_service_type is configured.
Specifies if the authentication password has been set.
returns the authentication services type, either; Tivoli Integrated Portal (TIP) or Native Lightweight Directory Access Protocol (LDAP)
Returns the authentication services URL.
Returns the user name used for authentication services.
Returns the bandwidth available on the intersystem link for background copy, in megabytes per second (MBps).
Returns the cluster ISNS IP address.
Returns the cluster configured locale.
Returns the cluster NTP service address.
Returns the cluster code level.
Returns the cluster console IP address.
Returns the clusters email contact information - this value is usually the system name.
Returns the clusters extended email contact information.
Returns the clusters extended alternate email contact information.
Returns the clusters extended primary email contact information.
Returns the clusters email contact alternate information.
Returns the clusters email contact location.
Returns the clusters email contact phone number.
Returns the clusters email reply email.
Returns the clusters email operational state.
Returns the cluster gm inter cluster delay simulation.
Returns the cluster gm intra cluster delay simulation.
Returns the cluster gm link delay tolerance in seconds.
Returns the cluster gm maximum host delay value.
Specifies if the cluster has a NAS key configured.
Returns the cluster ID.
Returns the cluster ID alias.
Returns the cluster inventory mail interval period in days.
Returns the cluster iSCSI authentication method.
Returns the iSCSI CHAP secret.
Returns the cluster layer type; either replication or storage (default). Replication means the system can create partnerships with Storwize StorageSystem Unified. Storage means the system can present storage to Storwize StorageSystem Unified.
Returns the cluster location type, either local or remote.
Returns the cluster name.
Returns the cluster partnership type, either one of; fully_configured, partially_configured_local, partially_configured_local_stopped, not_present, fully_configured_stopped, fully_configured_remote_stopped, fully_configured_local_excluded, fully_configured_remote_excluded or fully_configured_exceeded
Returns the cluster resource buffer size assigned for Metro Mirror or Global Mirrored Copy Services.
Returns the cluster relationship bandwidth limit in megabytes per second (MBps).
Returns the space allocated to VDisks - this may be in a variable notation format.
Returns the space allocated to MDisk groups - this may be in a variable notation format.
Returns the statistics collection frequency interval.
Returns the statistics collection status.
Returns an array containing the supported tier types for the cluster.
Note that this method returns an array of the available tier types and that the ordering of these types is preserved from the CLI output. The ordering of these types can be used to retrieve the tier capacity of each tier type with the tier_capacity command.
Returns the total tier capacity for each tier type in the cluster.
Note that this method returns an array of tier capacity ivalues, the index of which corresponds with the array indexes of tier types as returned by the tier method.
For example, to print each tier type and the corresponding tier capacity for this cluster:
for ( my $i = 0; $i < scalar @{ $ibm->tier } ; $i++ ) { print "Tier: " . $ibm->tier->[$i] . " - Capacity: " . $ibm->tier_capacity->[$i] . "\n" }
Returns the free tier capacity for each tier type in the cluster.
Note that like the tier and tier_capacity methods, this method also returns an array of tier free capacity values, the order of which corresponds with the arrays returned by the aforementioned methods.
Returns the cluster time zone.
Returns the clusters total allocated capacity - this may be in a variable notation format.
Returns the clusters total free space - this may be in a variable notation format.
Returns the clusters total MDisk capacity - this may be in a variable notation format.
Returns the cluster total overallocation limit.
Returns the clusters total used capacity - this may be in a variable notation format.
Returns the clusters total VDisk capacity - this may be in a variable notation format.
Returns the clusters total VDisk copy capacity - this may be in a variable notation format.
Returns an IBM::StorageSystem::Statistic object for allocated CPU capacity utilised for compression.
Returns an IBM::StorageSystem::Statistic object for allocated CPU capacity utilised for the system.
Returns an IBM::StorageSystem::Statistic object the average amount of I/O operations transferred per second for read operations to drives during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average number of megabytes transferred per second for read operations to drives during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of time in milliseconds that the system takes to respond to read requests to drives over the sample period.
Returns an IBM::StorageSystem::Statistic object the average amount of I/O operations transferred per second for write operations to drives during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average number of megabytes transferred per second for write operations to drives during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of time in milliseconds that the system takes to respond to write requests to drives over the sample period.
Returns an IBM::StorageSystem::Statistic object for the total input/output (I/O) operations transferred per seconds for Fibre Channel traffic on the system. This value includes host I/O and any bandwidth that is used for communication within the system.
Returns an IBM::StorageSystem::Statistic object for the total number of megabytes transferred per second for Fibre Channel traffic on the system. This value includes host I/O and any bandwidth that is used for communication within the system.
Returns an IBM::StorageSystem::Statistic object for the total I/O operations transferred per second for iSCSI traffic on the system.
Returns an IBM::StorageSystem::Statistic object for the total number of megabytes transferred per second for iSCSI traffic on the system.
Returns an IBM::StorageSystem::Statistic object for the average amount of I/O operations transferred per second for read operations to MDisks during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average number of megabytes transferred per second for read operations to MDisks during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of time in milliseconds that the system takes to respond to read requests to MDisks over the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of I/O operations transferred per second for write operations to MDisks during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average number of megabytes transferred per second for write operations to MDisks during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of time in milliseconds that the system takes to respond to write requests to MDisks over the sample period.
Returns an IBM::StorageSystem::Statistic object for the total I/O operations transferred per second for SAS traffic on the system. This value includes host I/O and bandwidth that is used for background RAID activity.
Returns an IBM::StorageSystem::Statistic object for the total percentage for both the write and read cache usage for the node.
Returns an IBM::StorageSystem::Statistic object for the average amount of I/O operations transferred per second for read operations to volumes during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average amount of I/O operations transferred per second for read operations to drives during the sample period.
Returns an IBM::StorageSystem::Statistic object for the average number of megabytes transferred per second for read operations to drives during the sample period
Returns an IBM::StorageSystem::Statistic object for the percentage of the write cache usage for the node.
This method refreshes all system statistics with updated values from the system. This method may be handy if instantiate an IBM::StorageSystem object within a long running or non-exiting process and wish to either periodically retrieve updated system statistics.
Note that you can call refresh on individual system statistics which may have a slight performance increase over this method.
This method allows you specify the statistics threshold freshness interval in seconds. This interval is used to determine if the value sreturned by a statistics method are fresh or whether they should be refreshed from the atregt system.
By default this value is zero, meaning that the statistics are never refreshed unless explicitly done so by calling the reefresh method of the statistic object. This may result in a performance increase in situations where statistic methods are frequently used, and may also result in more consistent reporting of the target system state as the statistic values will more closely represent a single point in time overview of the system rather than a series of consecutive snapshots.
In situation where you may want to gather a set of statistical values for the target system over a finite period, you could set the threshold value low, and reset it afterwards. e.g.
# Print the current FC IOPS value every two seconds for a minute $ibm->stats_threshold = 1; for ( 1 .. 30 ) { print $ibm->fc_io_current; sleep 2 } # Disable automatic refreshing $ibm->stats_threshold = 0;
# Print the capacity and RAID level of array 1 in GB my $array = $ibm->array( 1 ); print "Array 1 capacity: " . int ( $array->capacity / ( 1024 ** 3 ) ) . " (" . $array->raid_level . ")\n" # e.g. Array 1 capacity: 5824G (raid10)
Returns an IBM::StorageSystem::Array object representing the array specified by the numerical id parameter.
Note that this is a caching method and that a previously retrieved IBM::StorageSystem::Array object will be returned if one has been cached from previous invocations.
Returns the array specified by the value of the numerical ID argument as an IBM::StorageSystem:Array object.
Note that this method is non-caching and the array information will always be retrieved from the StorageSystem system even if a cached object exists.
# Print the array status of all arrays in our system map { print "Array ", $_->mdisk_id, " status ", $_->status, "\n" } $ibm->get_arrays;
Returns an array of IBM::StorageSystem::Array objects representing all arrays in the target system.
# Get drive ID 2 as an IBM::StorageSystem::Drive object my $drive = $ibm->drive( 2 ); # Print the drive capacity in bytes print $drive->capacity; # Alternately; print $ibm->drive( 2 )->capacity; # Print the drive vendor and product IDs print "Vendor ID: ", $drive->vendor_id, " - Product ID: ", $drive->product_id, "\n";
Returns the drive specified by the value of the integer argument as a IBM::StorageSystem::Drive object.
note that this method implements caching and that a cached object will be retrieved if present.
If you require a non-cached object, then use the get_drive method instead.
Returns the drive specified by the value of the integer argument. This method is non-caching and always retrieves information directly from the target system even if a cached object is present.
# Print the SAS port status and drive status for all drives in a nicely formatted list printf("%-20s%-20s%-20s%-20s\n", 'Drive', 'SAS Port 1 Status', 'SAS Port 2 Status', 'Status'); printf("%-20s%-20s%-20s%-20s\n", '-'x18, '-'x18, '-'x18, '-'x18); map { printf( "%-20s%-20s%-20s%-20s\n", $_->id, $_->port_1_status, $_->port_2_status, $_->status) } $ibm->get_drives; # e.g. # Drive SAS Port 1 Status SAS Port 2 Status Status # ------------------ ------------------ ------------------ ------------------ # 0 online online online # 1 online online online # 2 online online online # 3 online online online # ...
Returns all drives as an array of IBM::StorageSystem::Drive objects.
# Print the status of a specific enclosure print "Enclosure two status is " . $ibm->enclosure(2)->status . "\n"; # Get all PSUs in an enclosure as L<IBM::StorageSystem::Enclosure::PSU> objects. my @psus = $ibm->enclosure(1)->psus;
Returns the enclosure specified by the numerical identifer of the id parameter as an IBM::StorageSystem::Enclosure object.
Note that this is a caching method and that a cached object will be returned if one is present. If you require a non-cached result, then please use the get_enclosure method.
This method is a functionally equivalent non-caching implementation of the enclosure method.
# Print the status of each enclosure in our system. foreach my $enclosure ( $ibm->get_enclosures ) { print "Enclosure ", $enclosure->id, " status: ", $enclosure->status, "\n" }
Returns an array of IBM::StorageSystem::Enclosure objects representing all enclosures present in teh target system.
# Print the host status of the attached host 'sauron' print "Status: " . $ibm->host(sauron)->status . "\n";
Returns the host specified by the value of the named host parameter as an IBM::StorageSystem::Host object.
Note that this is a caching method and a cached object will be returned if one exists. If you require a non-cached object, then please use the get_host method.
This is a functionally equivalent non-caching implementation of the host method.
# Print a list of all configured hosts sorted by hostname, their WWPNs, # port state and login status. foreach $host ( map { $_->[0] } sort { $a->[1] cmp $b->[1] } map { [ $_, $_->name ] } $ibm->get_hosts ) { my $c = 0; foreach $wwpn ( @{ $host->WWPN } ) { print ( $c ? "\t" : ('-'x100)."\n".$host->name ); print "\t\t\t$wwpn\t" . @{ $host->state }[$c] . "\t\t" . ( @{$host->node_logged_in_count }[$c] ? '' : 'not ' ) . "logged in\n"; $c++ } } # Prints something similar to: # ---------------------------------------------------------------------------------------------------- # host-3 2101001B32A3D94C active logged in # 2100001B3283D94C active logged in # ---------------------------------------------------------------------------------------------------- # host-4 2100001B320786E7 active logged in # 2101001B322786E7 active logged in # ---------------------------------------------------------------------------------------------------- # storage-2 210100E08BB40A08 offline not logged in # 210000E08B940A08 offline not logged in # ... etc.
Returns an array of IBM::StorageSystem::Host objects representing all host attached to the target system.
# Get I/O group 0 my $io_group = $ibm->get_iogroup(0); # Print the I/O group maintenance state print $io_group->maintenance_state; # Alternately: print $ibm->iogroup(0)->maintenance_state;
Returns the I/O group identified by the value of the numerical ID parameter as an IBM::StorageSystem::IOGroup object.
Note that this method implements caching and a cached object will be returned shoudl one be present. If you require a non-cached object then please use the get_iogroup method.
This is a functionally equivalent non-caching implementation of the iogroup method.
# Print a formatted listing of all I/O groups by ID and name, along with # their VDisk count, host count, node count and maintenance state. map { printf("%-8s%-20s%-20s%-20s%-20s%-20s\n", $_->id, $_->name, $_->vdisk_count, $_->host_count, $_->node_count, $_->maintenance ) } $ibm->get_iogroups; # Prints something like: # # ID Name VDisk Count Host Count Node Count Maintenance # 0 io_grp0 2 3 2 no # 1 io_grp1 0 3 0 no # 2 io_grp2 0 3 0 no # 3 io_grp3 0 3 0 no # ... etc.
Returns an array of IBM::StorageSystem::IOGroup objects representing all configured I/O groups on the target system.
# Get the VDisk ID 3 and print the VDisk UUID my $vdisk = $ibm->vdisk(3); print $vdisk->vdisk_UUID; # Alternately: print $ibm->vdisk(3)->vdisk_UUID;
Returns an IBM::StorageSystem::VDisk object representing the VDisk identified by the numerical ID parameter.
Note that this method implements caching to improve performance and reduce network overhead, and that a cached object will be returned if one is present. If you require a non-cached object then please use the get_vdisk method.
This is a functionally equivalent non-caching implementation of the vdisk method.
# Print the name, ID, capacity in GB and MDisk group name of all VDisks in a # nicely formatted output printf( "%-20s%-8s%-15s%20s\n", 'Name', 'ID', 'Capacity (GB)', 'MDisk Group Name' ); printf( "%-20s%-8s%-15s%20s\n", '-'x18, '-'x4, '-'x12, '-'x15 ); map { printf( "%-20s%-8s%-15s%20s\n", $_->name, $_->id, (int($_->capacity / (1024**3))), $_->mdisk_grp_name) } grep { $_->status eq 'online' } $ibm->get_vdisks; # Should print something like: # Name ID Capacity (GB) MDisk Group Name # ------------------ ---- ------------ --------------- # file-host-1 0 5823 FILE_POOL # backup-host-2 1 2330 BACKUP_POOL # ... etc.
Returns all configured VDisks in the target system as an array of IBM::StorageSystem::VDisk objects.
Luke Poskitt, <lukep at deakin.edu.au>
<lukep at deakin.edu.au>
Please report any bugs or feature requests to bug-ibm-v7000 at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=IBM-V7000. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
bug-ibm-v7000 at rt.cpan.org
You can find documentation for this module with the perldoc command.
perldoc IBM::V7000
RT: CPAN's request tracker (report bugs here)
http://rt.cpan.org/NoAuth/Bugs.html?Dist=IBM-V7000
AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/IBM-V7000
CPAN Ratings
http://cpanratings.perl.org/d/IBM-V7000
Search CPAN
http://search.cpan.org/dist/IBM-V7000/
Copyright 2013 Luke Poskitt.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.
To install IBM::V7000, copy and paste the appropriate command in to your terminal.
cpanm
cpanm IBM::V7000
CPAN shell
perl -MCPAN -e shell install IBM::V7000
For more information on module installation, please visit the detailed CPAN module installation guide.