1SNMP::Info::AMAP(3) User Contributed Perl Documentation SNMP::Info::AMAP(3)
2
3
4
6 SNMP::Info::AMAP - SNMP Interface to Alcatel Mapping Adjacency Protocol
7 (AMAP)
8
10 Eric Miller
11
13 my $amap = new SNMP::Info (
14 AutoSpecify => 1,
15 Debug => 1,
16 DestHost => 'router',
17 Community => 'public',
18 Version => 2
19 );
20
21 my $class = $amap->class();
22 print " Using device sub class : $class\n";
23
24 $hasamap = $amap->hasAMAP() ? 'yes' : 'no';
25
26 # Print out a map of device ports with AMAP neighbors:
27 my $interfaces = $amap->interfaces();
28 my $amap_if = $amap->amap_if();
29 my $amap_ip = $amap->amap_ip();
30 my $amap_port = $amap->amap_port();
31
32 foreach my $amap_key (keys %$amap_ip){
33 my $iid = $amap_if->{$amap_key};
34 my $port = $interfaces->{$iid};
35 my $neighbor = $amap_ip->{$amap_key};
36 my $neighbor_port = $amap_port->{$amap_key};
37 print "Port : $port connected to $neighbor / $neighbor_port\n";
38 }
39
41 SNMP::Info::AMAP is a subclass of SNMP::Info that provides an object
42 oriented interface to Alcatel Mapping Adjacency Protocol (AMAP)
43 information through SNMP.
44
45 AMAP is a Layer 2 protocol that allows a network device to advertise
46 its identity and capabilities on the local network providing topology
47 information.
48
49 Create or use a device subclass that inherits this class. Do not use
50 directly.
51
52 Inherited Classes
53 None.
54
55 Required MIBs
56 ALCATEL-IND1-INTERSWITCH-PROTOCOL-MIB
57
59 These are methods that return scalar values from SNMP
60
61 $amap->hasAMAP()
62 Is AMAP is active in this device?
63
65 These are methods that return tables of information in the form of a
66 reference to a hash.
67
68 $amap->amap_id()
69 Returns the string value used to identify the remote system.
70
71 $amap->amap_if()
72 Returns the mapping to the SNMP Interface Table.
73
74 $amap->amap_ip()
75 Returns remote IPv4 addresses. Note: AMAP returns all IP addresses
76 associated with the remote device. It would be preferable to
77 include only one address since they should all originate from the
78 same device, but amap_ip() can not determine if all addresses are
79 reachable from the network management application therefore all
80 addresses are returned and the calling application must determine
81 which address to use and if they are in fact from the same device.
82
83 $amap->amap_port()
84 Returns remote port ID
85
86 $amap->amap_platform()
87 Returns remote platform ID
88
89
90
91perl v5.32.0 2020-07-28 SNMP::Info::AMAP(3)