690 lines
		
	
	
		
			17 KiB
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			690 lines
		
	
	
		
			17 KiB
		
	
	
	
		
			Perl
		
	
	
	
	
	
# SNMP::Info::RapidCity
 | 
						|
# $Id$
 | 
						|
#
 | 
						|
# Copyright (c) 2004-6 Eric Miller, Max Baker
 | 
						|
#
 | 
						|
# Redistribution and use in source and binary forms, with or without 
 | 
						|
# modification, are permitted provided that the following conditions are met:
 | 
						|
# 
 | 
						|
#     * Redistributions of source code must retain the above copyright notice,
 | 
						|
#       this list of conditions and the following disclaimer.
 | 
						|
#     * Redistributions in binary form must reproduce the above copyright notice,
 | 
						|
#       this list of conditions and the following disclaimer in the documentation
 | 
						|
#       and/or other materials provided with the distribution.
 | 
						|
#     * Neither the name of the University of California, Santa Cruz nor the 
 | 
						|
#       names of its contributors may be used to endorse or promote products 
 | 
						|
#       derived from this software without specific prior written permission.
 | 
						|
# 
 | 
						|
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
 | 
						|
# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 
 | 
						|
# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 
 | 
						|
# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
 | 
						|
# ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 | 
						|
# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 
 | 
						|
# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
 | 
						|
# ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 
 | 
						|
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 
 | 
						|
# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 | 
						|
 | 
						|
package SNMP::Info::RapidCity;
 | 
						|
$VERSION = 1.0;
 | 
						|
use strict;
 | 
						|
 | 
						|
use Exporter;
 | 
						|
use SNMP::Info;
 | 
						|
use Carp;
 | 
						|
 | 
						|
@SNMP::Info::RapidCity::ISA = qw/SNMP::Info Exporter/;
 | 
						|
@SNMP::Info::RapidCity::EXPORT_OK = qw//;
 | 
						|
 | 
						|
use vars qw/$VERSION $DEBUG %FUNCS %GLOBALS %MIBS %MUNGE $INIT/;
 | 
						|
 | 
						|
%MIBS    = (
 | 
						|
            'RAPID-CITY' => 'rapidCity',
 | 
						|
            );
 | 
						|
 | 
						|
%GLOBALS = (
 | 
						|
            'serial'       => 'rcChasSerialNumber',
 | 
						|
            'chassis'      => 'rcChasType',
 | 
						|
            'slots'        => 'rcChasNumSlots',
 | 
						|
            'tftp_host'    => 'rcTftpHost',
 | 
						|
            'tftp_file'    => 'rcTftpFile',
 | 
						|
            'tftp_action'  => 'rcTftpAction',
 | 
						|
            'tftp_result'  => 'rcTftpResult',
 | 
						|
            'rc_ch_rev'    => 'rcChasHardwareRevision',
 | 
						|
            'rc_base_mac'  => 'rc2kChassisBaseMacAddr',
 | 
						|
            'rc_virt_ip'   => 'rcSysVirtualIpAddr',
 | 
						|
            );
 | 
						|
 | 
						|
%FUNCS  = (
 | 
						|
            # From RAPID-CITY::rcPortTable
 | 
						|
            'rc_index'          => 'rcPortIndex',
 | 
						|
            'rc_duplex'         => 'rcPortOperDuplex',
 | 
						|
            'rc_duplex_admin'   => 'rcPortAdminDuplex',
 | 
						|
            'rc_speed_admin'    => 'rcPortAdminSpeed',
 | 
						|
            'rc_auto'           => 'rcPortAutoNegotiate',
 | 
						|
            'rc_alias'          => 'rcPortName',
 | 
						|
            # From RAPID-CITY::rc2kCpuEthernetPortTable
 | 
						|
            'rc_cpu_ifindex'        => 'rc2kCpuEthernetPortIfIndex',
 | 
						|
            'rc_cpu_admin'         => 'rc2kCpuEthernetPortAdminStatus',
 | 
						|
            'rc_cpu_oper'          => 'rc2kCpuEthernetPortOperStatus',
 | 
						|
            'rc_cpu_ip'            => 'rc2kCpuEthernetPortAddr',
 | 
						|
            'rc_cpu_auto'          => 'rc2kCpuEthernetPortAutoNegotiate',
 | 
						|
            'rc_cpu_duplex_admin'  => 'rc2kCpuEthernetPortAdminDuplex',
 | 
						|
            'rc_cpu_duplex'        => 'rc2kCpuEthernetPortOperDuplex',
 | 
						|
            'rc_cpu_speed_admin'   => 'rc2kCpuEthernetPortAdminSpeed',
 | 
						|
            'rc_cpu_speed_oper'    => 'rc2kCpuEthernetPortOperSpeed',
 | 
						|
            'rc_cpu_mac'           => 'rc2kCpuEthernetPortMgmtMacAddr',
 | 
						|
            # From RAPID-CITY::rcVlanPortTable
 | 
						|
            'rc_i_vlan_if'      => 'rcVlanPortIndex',
 | 
						|
            'rc_i_vlan_num'     => 'rcVlanPortNumVlanIds',
 | 
						|
            'rc_i_vlan'         => 'rcVlanPortVlanIds',
 | 
						|
            'rc_i_vlan_type'    => 'rcVlanPortType',
 | 
						|
            'rc_i_vlan_pvid'    => 'rcVlanPortDefaultVlanId',
 | 
						|
            'rc_i_vlan_tag'     => 'rcVlanPortPerformTagging',
 | 
						|
            # From RAPID-CITY::rcVlanTable
 | 
						|
            'rc_vlan_id'      => 'rcVlanId',
 | 
						|
            'rc_vlan_name'    => 'rcVlanName',
 | 
						|
            'rc_vlan_color'   => 'rcVlanColor',
 | 
						|
            'rc_vlan_if'      => 'rcVlanIfIndex',
 | 
						|
            'rc_vlan_stg'     => 'rcVlanStgId',
 | 
						|
            'rc_vlan_type'    => 'rcVlanType',
 | 
						|
            'rc_vlan_members' => 'rcVlanPortMembers',
 | 
						|
            'rc_vlan_mac'     => 'rcVlanMacAddress',
 | 
						|
            # From RAPID-CITY::rcIpAddrTable
 | 
						|
            'rc_ip_index'  => 'rcIpAdEntIfIndex',
 | 
						|
            'rc_ip_addr'   => 'rcIpAdEntAddr',
 | 
						|
            'rc_ip_type'   => 'rcIpAdEntIfType',
 | 
						|
            # From RAPID-CITY::rcChasFanTable
 | 
						|
            'rc_fan_op'     => 'rcChasFanOperStatus',
 | 
						|
            # From RAPID-CITY::rcChasPowerSupplyTable
 | 
						|
            'rc_ps_op'     => 'rcChasPowerSupplyOperStatus',
 | 
						|
            # From RAPID-CITY::rcChasPowerSupplyDetailTable
 | 
						|
            'rc_ps_type'     => 'rcChasPowerSupplyDetailType',
 | 
						|
            'rc_ps_serial'   => 'rcChasPowerSupplyDetailSerialNumber',
 | 
						|
            'rc_ps_rev'      => 'rcChasPowerSupplyDetailHardwareRevision',
 | 
						|
            'rc_ps_part'     => 'rcChasPowerSupplyDetailPartNumber',
 | 
						|
            'rc_ps_detail'     => 'rcChasPowerSupplyDetailDescription',
 | 
						|
            # From RAPID-CITY::rcCardTable
 | 
						|
            'rc_c_type'     => 'rcCardType',
 | 
						|
            'rc_c_serial'   => 'rcCardSerialNumber',
 | 
						|
            'rc_c_rev'      => 'rcCardHardwareRevision',
 | 
						|
            'rc_c_part'     => 'rcCardPartNumber',
 | 
						|
            # From RAPID-CITY::rc2kCardTable
 | 
						|
            'rc2k_c_ftype'    => 'rc2kCardFrontType',
 | 
						|
            'rc2k_c_fdesc'    => 'rc2kCardFrontDescription',
 | 
						|
            'rc2k_c_fserial'  => 'rc2kCardFrontSerialNum',
 | 
						|
            'rc2k_c_frev'     => 'rc2kCardFrontHwVersion',
 | 
						|
            'rc2k_c_fpart'    => 'rc2kCardFrontPartNumber',
 | 
						|
            'rc2k_c_fdate'    => 'rc2kCardFrontDateCode',
 | 
						|
            'rc2k_c_fdev'     => 'rc2kCardFrontDeviations',
 | 
						|
            'rc2k_c_btype'    => 'rc2kCardBackType',
 | 
						|
            'rc2k_c_bdesc'    => 'rc2kCardBackDescription',
 | 
						|
            'rc2k_c_bserial'  => 'rc2kCardBackSerialNum',
 | 
						|
            'rc2k_c_brev'     => 'rc2kCardBackHwVersion',
 | 
						|
            'rc2k_c_bpart'    => 'rc2kCardBackPartNumber',
 | 
						|
            'rc2k_c_bdate'    => 'rc2kCardBackDateCode',
 | 
						|
            'rc2k_c_bdev'     => 'rc2kCardBackDeviations',
 | 
						|
            # From RAPID-CITY::rc2kMdaCardTable
 | 
						|
            'rc2k_mda_type'    => 'rc2kMdaCardType',
 | 
						|
            'rc2k_mda_desc'    => 'rc2kMdaCardDescription',
 | 
						|
            'rc2k_mda_serial'  => 'rc2kMdaCardSerialNum',
 | 
						|
            'rc2k_mda_rev'     => 'rc2kMdaCardHwVersion',
 | 
						|
            'rc2k_mda_part'    => 'rc2kMdaCardPartNumber',
 | 
						|
            'rc2k_mda_date'    => 'rc2kMdaCardDateCode',
 | 
						|
            'rc2k_mda_dev'     => 'rc2kMdaCardDeviations',
 | 
						|
            );
 | 
						|
 | 
						|
%MUNGE = (
 | 
						|
            'rc_base_mac' => \&SNMP::Info::munge_mac,
 | 
						|
            'rc_vlan_mac' => \&SNMP::Info::munge_mac,
 | 
						|
            'rc_cpu_mac' => \&SNMP::Info::munge_mac,         
 | 
						|
         );
 | 
						|
 | 
						|
 | 
						|
sub i_duplex {
 | 
						|
    my $rapidcity = shift;
 | 
						|
    
 | 
						|
    my $interfaces   = $rapidcity->interfaces();
 | 
						|
    my $rc_index  = $rapidcity->rc_index();
 | 
						|
    my $rc_duplex = $rapidcity->rc_duplex();
 | 
						|
    my $rc_cpu_duplex = $rapidcity->rc_cpu_duplex();
 | 
						|
 | 
						|
    my %i_duplex;
 | 
						|
    foreach my $if (keys %$interfaces){
 | 
						|
        my $duplex = $rc_duplex->{$if};
 | 
						|
        next unless defined $duplex; 
 | 
						|
    
 | 
						|
        $duplex = 'half' if $duplex =~ /half/i;
 | 
						|
        $duplex = 'full' if $duplex =~ /full/i;
 | 
						|
        $i_duplex{$if}=$duplex; 
 | 
						|
    }
 | 
						|
    
 | 
						|
    # Get CPU Ethernet Interfaces for 8600 Series
 | 
						|
    foreach my $iid (keys %$rc_cpu_duplex){
 | 
						|
        my $c_duplex = $rc_cpu_duplex->{$iid};
 | 
						|
        next unless defined $c_duplex;
 | 
						|
 | 
						|
       	$i_duplex{$iid} = $c_duplex;
 | 
						|
    }
 | 
						|
 | 
						|
    return \%i_duplex;
 | 
						|
}
 | 
						|
 | 
						|
sub i_duplex_admin {
 | 
						|
    my $rapidcity = shift;
 | 
						|
 | 
						|
    my $interfaces  = $rapidcity->interfaces();
 | 
						|
    my $rc_index = $rapidcity->rc_index();
 | 
						|
    my $rc_duplex_admin = $rapidcity->rc_duplex_admin();
 | 
						|
    my $rc_auto = $rapidcity->rc_auto();
 | 
						|
    my $rc_cpu_auto = $rapidcity->rc_cpu_auto();
 | 
						|
    my $rc_cpu_duplex_admin = $rapidcity->rc_cpu_duplex_admin();
 | 
						|
 
 | 
						|
    my %i_duplex_admin;
 | 
						|
    foreach my $if (keys %$interfaces){
 | 
						|
        my $duplex = $rc_duplex_admin->{$if};
 | 
						|
        next unless defined $duplex;
 | 
						|
        my $auto = $rc_auto->{$if}||'false';
 | 
						|
        
 | 
						|
        my $string = 'other';
 | 
						|
        $string = 'half' if ($duplex =~ /half/i and $auto =~ /false/i);
 | 
						|
        $string = 'full' if ($duplex =~ /full/i and $auto =~ /false/i);
 | 
						|
        $string = 'auto' if $auto =~ /true/i;    
 | 
						|
 | 
						|
        $i_duplex_admin{$if}=$string; 
 | 
						|
    }
 | 
						|
    
 | 
						|
    # Get CPU Ethernet Interfaces for 8600 Series
 | 
						|
    foreach my $iid (keys %$rc_cpu_duplex_admin){
 | 
						|
        my $c_duplex = $rc_cpu_duplex_admin->{$iid};
 | 
						|
        next unless defined $c_duplex;
 | 
						|
        my $c_auto = $rc_cpu_auto->{$iid};
 | 
						|
 | 
						|
	my $string = 'other';
 | 
						|
        $string = 'half' if ($c_duplex =~ /half/i and $c_auto =~ /false/i);
 | 
						|
        $string = 'full' if ($c_duplex =~ /full/i and $c_auto =~ /false/i);
 | 
						|
        $string = 'auto' if $c_auto =~ /true/i;    
 | 
						|
 | 
						|
       	$i_duplex_admin{$iid} = $string;
 | 
						|
    }
 | 
						|
    
 | 
						|
    return \%i_duplex_admin;
 | 
						|
}
 | 
						|
 | 
						|
sub i_vlan {
 | 
						|
    my $rapidcity = shift;
 | 
						|
 | 
						|
    my $rc_vlans  = $rapidcity->rc_i_vlan();
 | 
						|
    my $rc_vlan_id  = $rapidcity->rc_vlan_id();
 | 
						|
    my $rc_vlan_if  = $rapidcity->rc_vlan_if();
 | 
						|
    
 | 
						|
    my %i_vlan;
 | 
						|
        foreach my $if (keys %$rc_vlans){
 | 
						|
            my $rc_vlanid = $rc_vlans->{$if};
 | 
						|
            next unless defined $rc_vlanid;
 | 
						|
            my @vlanids = map { sprintf "%02x",$_ } unpack('C*',$rc_vlanid);
 | 
						|
 | 
						|
            my @vlans = ();
 | 
						|
 | 
						|
            while($#vlanids > 0) {
 | 
						|
                my $h = join('', splice(@vlanids,0,2));
 | 
						|
                push(@vlans, hex($h));
 | 
						|
            }
 | 
						|
        my $vlans = join (',', @vlans);
 | 
						|
        $i_vlan{$if}=$vlans; 
 | 
						|
    }
 | 
						|
        foreach my $if (keys %$rc_vlan_if){
 | 
						|
            my $vlan_if = $rc_vlan_if->{$if};
 | 
						|
            next unless defined $vlan_if;
 | 
						|
            my $vlan = $rc_vlan_id->{$if};
 | 
						|
 | 
						|
        $i_vlan{$vlan_if}=$vlan; 
 | 
						|
    }
 | 
						|
    return \%i_vlan;
 | 
						|
}
 | 
						|
 | 
						|
1;
 | 
						|
 | 
						|
__END__
 | 
						|
 | 
						|
=head1 NAME
 | 
						|
 | 
						|
SNMP::Info::Layer2::RapidCity - SNMP Interface to the Nortel RapidCity MIB
 | 
						|
 | 
						|
=head1 AUTHOR
 | 
						|
 | 
						|
Eric Miller
 | 
						|
 | 
						|
=head1 SYNOPSIS
 | 
						|
 | 
						|
 # Let SNMP::Info determine the correct subclass for you. 
 | 
						|
 my $rapidcity = new SNMP::Info(
 | 
						|
                          AutoSpecify => 1,
 | 
						|
                          Debug       => 1,
 | 
						|
                          # These arguments are passed directly on to SNMP::Session
 | 
						|
                          DestHost    => 'myswitch',
 | 
						|
                          Community   => 'public',
 | 
						|
                          Version     => 2
 | 
						|
                        ) 
 | 
						|
    or die "Can't connect to DestHost.\n";
 | 
						|
 | 
						|
 my $class      = $rapidcity->class();
 | 
						|
 print "SNMP::Info determined this device to fall under subclass : $class\n";
 | 
						|
 | 
						|
=head1 DESCRIPTION
 | 
						|
 | 
						|
SNMP::Info::RapidCity is a subclass of SNMP::Info that provides an interface
 | 
						|
to the C<RAPID-CITY> MIB.  This MIB is used across the Nortel Ethernet Routing
 | 
						|
Switch and Ethernet Switch product lines (Formerly known as Passport,
 | 
						|
BayStack, and Acclear).
 | 
						|
 | 
						|
Use or create in a subclass of SNMP::Info.  Do not use directly.
 | 
						|
 | 
						|
=head2 Inherited Classes
 | 
						|
 | 
						|
None.
 | 
						|
 | 
						|
=head2 Required MIBs
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item RAPID-CITY
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head1 GLOBAL METHODS
 | 
						|
 | 
						|
These are methods that return scalar values from SNMP
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item  $rapidcity->chassis_base_mac()
 | 
						|
 | 
						|
(B<rc2kChassisBaseMacAddr>)
 | 
						|
 | 
						|
=item  $rapidcity->ch_serial()
 | 
						|
 | 
						|
(B<rcChasSerialNumber>)
 | 
						|
 | 
						|
=item  $rapidcity->rc_ch_rev()
 | 
						|
 | 
						|
(B<rcChasHardwareRevision>)
 | 
						|
 | 
						|
=item  $rapidcity->chassis()
 | 
						|
 | 
						|
(B<rcChasType>)
 | 
						|
 | 
						|
=item  $rapidcity->slots()
 | 
						|
 | 
						|
(B<rcChasNumSlots>)
 | 
						|
 | 
						|
=item  $rapidcity->rc_virt_ip()
 | 
						|
 | 
						|
(B<rcSysVirtualIpAddr>)
 | 
						|
 | 
						|
=item  $rapidcity->tftp_host()
 | 
						|
 | 
						|
(B<rcTftpHost>)
 | 
						|
 | 
						|
=item  $rapidcity->tftp_file()
 | 
						|
 | 
						|
(B<rcTftpFile>)
 | 
						|
 | 
						|
=item  $rapidcity->tftp_action()
 | 
						|
 | 
						|
(B<rcTftpAction>)
 | 
						|
 | 
						|
=item  $rapidcity->tftp_result()
 | 
						|
 | 
						|
(B<rcTftpResult>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head1 TABLE METHODS
 | 
						|
 | 
						|
These are methods that return tables of information in the form of a reference
 | 
						|
to a hash.
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->i_duplex()
 | 
						|
 | 
						|
Returns reference to map of IIDs to current link duplex.
 | 
						|
 | 
						|
=item $rapidcity->i_duplex_admin()
 | 
						|
 | 
						|
Returns reference to hash of IIDs to admin duplex setting.
 | 
						|
 | 
						|
=item $rapidcity->i_vlan()
 | 
						|
 | 
						|
Returns a mapping between ifIndex and the VLAN.
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY Port Table (B<rcPortTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_index()
 | 
						|
 | 
						|
(B<rcPortIndex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_duplex()
 | 
						|
 | 
						|
(B<rcPortOperDuplex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_duplex_admin()
 | 
						|
 | 
						|
(B<rcPortAdminDuplex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_speed_admin()
 | 
						|
 | 
						|
(B<rcPortAdminSpeed>)
 | 
						|
 | 
						|
=item $rapidcity->rc_auto()
 | 
						|
 | 
						|
(B<rcPortAutoNegotiate>)
 | 
						|
 | 
						|
=item $rapidcity->rc_alias()
 | 
						|
 | 
						|
(B<rcPortName>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY CPU Ethernet Port Table (B<rc2kCpuEthernetPortTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_ifindex()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortIfIndex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_admin()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortAdminStatus>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_oper()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortOperStatus>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_ip()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortAddr>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_auto()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortAutoNegotiate>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_duplex_admin()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortAdminDuplex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_duplex()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortOperDuplex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_speed_admin()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortAdminSpeed>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_speed_oper()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortOperSpeed>)
 | 
						|
 | 
						|
=item $rapidcity->rc_cpu_mac()
 | 
						|
 | 
						|
(B<rc2kCpuEthernetPortMgmtMacAddr>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY VLAN Port Table (B<rcVlanPortTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan_if()
 | 
						|
 | 
						|
(B<rcVlanPortIndex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan_num()
 | 
						|
 | 
						|
(B<rcVlanPortNumVlanIds>)
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan()
 | 
						|
 | 
						|
(B<rcVlanPortVlanIds>)
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan_type()
 | 
						|
 | 
						|
(B<rcVlanPortType>)
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan_pvid()
 | 
						|
 | 
						|
(B<rcVlanPortDefaultVlanId>)
 | 
						|
 | 
						|
=item $rapidcity->rc_i_vlan_tag()
 | 
						|
 | 
						|
(B<rcVlanPortPerformTagging>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY VLAN Table (B<rcVlanTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_id()
 | 
						|
 | 
						|
(B<rcVlanId>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_name()
 | 
						|
 | 
						|
(B<rcVlanName>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_color()
 | 
						|
 | 
						|
(B<rcVlanColor>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_if()
 | 
						|
 | 
						|
(B<rcVlanIfIndex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_stg()
 | 
						|
 | 
						|
(B<rcVlanStgId>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_type()
 | 
						|
 | 
						|
(B<rcVlanType>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_members()
 | 
						|
 | 
						|
(B<rcVlanPortMembers>)
 | 
						|
 | 
						|
=item $rapidcity->rc_vlan_mac()
 | 
						|
 | 
						|
(B<rcVlanMacAddress>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY IP Address Table (B<rcIpAddrTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_ip_index()
 | 
						|
 | 
						|
(B<rcIpAdEntIfIndex>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ip_addr()
 | 
						|
 | 
						|
(B<rcIpAdEntAddr>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ip_type()
 | 
						|
 | 
						|
(B<rcIpAdEntIfType>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY Chassis Fan Table (B<rcChasFanTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_fan_op()
 | 
						|
 | 
						|
(B<rcChasFanOperStatus>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY Power Supply Table (B<rcChasPowerSupplyTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_op()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyOperStatus>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY Power Supply Detail Table (B<rcChasPowerSupplyDetailTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_type()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyDetailType>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_serial()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyDetailSerialNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_rev()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyDetailHardwareRevision>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_part()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyDetailPartNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc_ps_detail()
 | 
						|
 | 
						|
(B<rcChasPowerSupplyDetailDescription>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY Card Table (B<rcCardTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc_c_type()
 | 
						|
 | 
						|
(B<rcCardType>)
 | 
						|
 | 
						|
=item $rapidcity->rc_c_serial()
 | 
						|
 | 
						|
(B<rcCardSerialNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc_c_rev()
 | 
						|
 | 
						|
(B<rcCardHardwareRevision>)
 | 
						|
 | 
						|
=item $rapidcity->rc_c_part()
 | 
						|
 | 
						|
(B<rcCardPartNumber>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY 2k Card Table (B<rc2kCardTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_ftype()
 | 
						|
 | 
						|
(B<rc2kCardFrontType>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_fdesc()
 | 
						|
 | 
						|
(B<rc2kCardFrontDescription>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_fserial()
 | 
						|
 | 
						|
(B<rc2kCardFrontSerialNum>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_frev()
 | 
						|
 | 
						|
(B<rc2kCardFrontHwVersion>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_fpart()
 | 
						|
 | 
						|
(B<rc2kCardFrontPartNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_fdate()
 | 
						|
 | 
						|
(B<rc2kCardFrontDateCode>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_fdev()
 | 
						|
 | 
						|
(B<rc2kCardFrontDeviations>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_btype()
 | 
						|
 | 
						|
(B<rc2kCardBackType>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_bdesc()
 | 
						|
 | 
						|
(B<rc2kCardBackDescription>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_bserial()
 | 
						|
 | 
						|
(B<rc2kCardBackSerialNum>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_brev()
 | 
						|
 | 
						|
(B<rc2kCardBackHwVersion>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_bpart()
 | 
						|
 | 
						|
(B<rc2kCardBackPartNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_bdate()
 | 
						|
 | 
						|
(B<rc2kCardBackDateCode>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_c_bdev()
 | 
						|
 | 
						|
(B<rc2kCardBackDeviations>)
 | 
						|
 | 
						|
=back
 | 
						|
 | 
						|
=head2 RAPID-CITY MDA Card Table (B<rc2kMdaCardTable>)
 | 
						|
 | 
						|
=over
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_type()
 | 
						|
 | 
						|
(B<rc2kMdaCardType>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_desc()
 | 
						|
 | 
						|
(B<rc2kMdaCardDescription>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_serial()
 | 
						|
 | 
						|
(B<rc2kMdaCardSerialNum>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_rev()
 | 
						|
 | 
						|
(B<rc2kMdaCardHwVersion>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_part()
 | 
						|
 | 
						|
(B<rc2kMdaCardPartNumber>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_date()
 | 
						|
 | 
						|
(B<rc2kMdaCardDateCode>)
 | 
						|
 | 
						|
=item $rapidcity->rc2k_mda_dev()
 | 
						|
 | 
						|
(B<rc2kMdaCardDeviations>)
 | 
						|
 | 
						|
=cut
 |