3

私のインターンシップでは、ネットワーク スーパーバイザーをコーディングする必要があります。スイッチのインターフェイス名からすべての情報 (速度、MAC アドレス、デュプレックスなど) を見つけるための perl スクリプトを作成しています。このモジュールには関数「ifPhysAddress」がありますが、接続されているデバイスの MAC アドレスではなく、スイッチ インターフェイスの MAC アドレスを返します。どうすればMACアドレスを見つけることができますか? ありがとう

ここで私が始めたこと：

#!/usr/bin/perl
use strict;
use warnings;
use Getopt::Long;
use SnmpTable;
use Net::MAC;
use Net::SNMP;
use Net::SNMP::Interfaces;

my $ifname;
my $hostname;
my $community;
my $version = 1;

GetOptions( "ifname=s"      => \$ifname,
            "host=s"        => \$hostname,
            "community=s"   => \$community,
            "protocol:s"    => \$version);

my $interfaces = Net::SNMP::Interfaces->new(Hostname => $hostname, Community => $community);
my $inter = $interfaces->interface($ifname);

#On récupere l'identifiant de l'interface $ifname
my $ifindex = $inter->index();
#Vitesse
my $vitesse = $inter->ifHighSpeed();
#Alias
my $ifalias = $inter->ifAlias();


#Recherche des VLANs
my $numeroportbridge;
my $vlan_trouve;

my $oid_cisco_vlans = "1.3.6.1.4.1.9.9.46.1.3.1.1.2.1";
my $vlans = SnmpTable->new($hostname, $oid_cisco_vlans, $community);
$vlans->connexion();
my %vl = $vlans->requete();
my @tab = keys(%vl);

foreach my $i (@tab) {
    if ($i<1000) {
        my $comvlan = $community."@".$i;
        print $comvlan."\n";
    }
}
printf "Nom de l'interface : %s --> ifindex = %s, Vitesse = %s, Alias = %s\n", $ifname, $ifindex, $vitesse, $ifalias;
4

2 に答える 2

1

わかりました、誰かがそれをする必要があるならば、私はそれをする方法を見つけました...

#We get the index of $ifname
my $ifindex = $inter->index();
#Speed
my $vitesse = $inter->ifHighSpeed();
#Alias
my $ifalias = $inter->ifAlias();
#Finding VLANs
my $vlan_trouve;

#Listing all VLANs on the switch
my $vmVlan = "1.3.6.1.4.1.9.9.68.1.2.2.1.2";
my $vlans = SnmpTable->new($hostname, $vmVlan, $community);
$vlans->connexion();
my %vl = $vlans->requete();

#Getting the good VLAN
$vlan_trouve = $vl{$ifindex};

#Listing ports of VLAN <-> @mac
my $dot1dTpFdbAddress = "1.3.6.1.2.1.17.4.3.1.1";
my $dot = SnmpTable->new($hostname, $dot1dTpFdbAddress, $community."@".$vlan_trouve);
$dot->connexion();
my %dot1address = $dot->requete();

#Listing numPortBridge <-> ports of VLAN
my $dot1dTpFdbPort = "1.3.6.1.2.1.17.4.3.1.2";
my $dot2 = SnmpTable->new($hostname, $dot1dTpFdbPort, $community."@".$vlan_trouve);
$dot2->connexion();
my %portdot = reverse($dot2->requete());

#Listing num Port bridge <-> ID port switch
my $dot1dBasePortIfIndex = "1.3.6.1.2.1.17.1.4.1.2";
my $dot3 = SnmpTable->new($hostname, $dot1dBasePortIfIndex, $community."@".$vlan_trouve);
$dot3->connexion();
my %dotindex = reverse($dot3->requete());

my $numportbridge = $dotindex{$ifindex};
if (!defined($numportbridge)) {
    print "Erreur : $ifindex non trouvé dans la liste : num Port bridge <-> ID port switch\n";
    exit 2;
}
my $portVlan = $portdot{$numportbridge};
if (!defined($portVlan)) {
    print "Erreur : $numportbridge non trouvé dans la liste : numPortBridge <-> ports du VLAN\n";
    exit 3;
}
my $add = $dot1address{$portVlan};
if (!defined($add)) {
    print "Erreur : $portVlan non trouvé dans la liste : ports du VLAN <-> \@mac\n";
    exit 4;
}
$add =~ s/0x//g;
printf "Interface : $ifname sur $hostname <=> ifindex : $ifindex sur VLAN : $vlan_trouve <=> \@mac : $add\nVitesse=$vitesse, Alias=$ifalias, Duplex=--\n";

Net :: SNMPを使用してクラスSnmpTable.pmを作成しました。これは、
$ session-> get_table（-baseoid => $ this-> {oid}）
を実行し、ハッシュで返します。

それで全部です。さよなら。

于 2011-04-14T12:32:53.170 に答える
1

特定のネットワーク トポロジ アルゴリズムに従う必要があります。

ホスト マシンとスイッチ/ルーター間の接続を見つけるには、最初にホスト マシンからサブネット情報を取得する必要があります。次に、どのスイッチからサブネットが作成されているかを調べます。スイッチがそのサブネットで見つかった場合、ホストはそのスイッチに接続されています。

  1. ifTableを使用してインターフェイスのifIndexを見つけます。 --> 53
  2. ipRouteTableを使用してipRouteDestを取得します。いくつかの IP アドレスを取得します。テーブルの主キーです。 -->10.0.0.1、192.168.1.1、8.8.8.1
  3. ここで、ipRouteIfIndex +「ステップ 2 で見つかった ip」を使用して、各ホップのifIndexを見つけます。各ホップの if インデックスを取得します。 -->1.3.6.1.2.1.4.21.1.2( ipRouteIfIndex )+10.0.0.1 = 1.3.6.1.2.1.4.21.1.2.10.0.0.1 --> ステップ 3 のクエリの応答で、if インデックスを取得しますそのIP。ステップ 1 の inIndex に一致します。対応する IP は、そのインターフェイスの IP になります。その IP を直接クエリすることで、MAC を取得できます。

ありがとう。

于 2011-04-13T10:05:03.327 に答える