使用Perl从Cisco Call Manager获取IP地址列表

时间:2015-04-21 15:35:58

标签: perl snmp cisco-axl cucm

我需要从Cisco Unified Call Manager中检索手机的IP地址列表,并且我希望尽可能使用Perl和标准模块来实现。

我可以使用snmpwalk获取地址(我们使用的是SNMP v3)但由于某种原因,当我使用现有代码尝试通过SNMP或Net :: SNMP执行相同的操作时,我得到的最多的是一个IP地址。我似乎无法让任何一个给我完整的清单。

这是我的snmpwalk命令:

snmpwalk -v3 -u <user> -A <password> -l authNoPriv -a SHA <ip address> 1.3.6.1.4.1.9.9.156.1.2.1.1.6

我还获取了电话描述字段(156.1.2.1.1.4)并将这两个字段合并为一个文本文件,以便我可以使用它们使用LWP查询电话本身。

能够将这两个功能组合到一个脚本中以获取IP地址并查询手机的具体细节将会很棒。

有没有人有代码可以做到这一点?

修改

snmpwalk返回(其中一大堆):

SNMPv2-SMI::enterprises.9.9.156.1.2.1.1.6.100 = IpAddress: xxx.xxx.xxx.xxx

我的Perl代码返回一个IP地址(我必须重新键入它,因为它在没有Internet访问权限的封闭网络上):

use SNMP;

my $ccmip = "xxx.xxx.xxx.xxx";
my $user = "<username>";
my $pass = "<password>";

$sess = new SNMP::Session(DestHost => $ccmip, SecName => $user, SecLevel => 'authnoPriv', AuthPass => $pass, AuthProto => 'SHA', PrivProto => 'AES', PrivPass => $pass, Version => 3);

my $vars = new SNMP::VarList(['1.3.6.1.4.1.9.9.156.1.2.1.1.6']);
my @values = $sess->getnext($vars);

my @table = ();
while ((!$sess->{ErrorStr})) {
   push(@table, $values[0]);
   @values = $sess->getnext($vars);
}

1 个答案:

答案 0 :(得分:0)

您可以使用curl执行此操作并发送XML以查询risdb,因为只有已注册的手机才会拥有IP地址:

curl -s -k -u axluser:${AXLPASSWORD} -H 'Content-type: text/xml;' -H 'SOAPAction: "CUCM:DB ver=8.0"' -d @ris_reg.xml https://x.x.x.x:8443/realtimeservice/services/RisPort | xmllint --format - > ris_reg_8.log

请参阅:

ris_reg.xml:<?xml version="1.0" encoding="utf-8"?> <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"  xmlns:xsd="http://www.w3.org/2001/XMLSchema"  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">   <soapenv:Body>
    <ns1:SelectCmDevice soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"  xmlns:ns1="http://schemas.cisco.com/ast/soap/">
      <StateInfo xsi:type="xsd:string"/>
      <CmSelectionCriteria href="#id0"/>
    </ns1:SelectCmDevice>
    <multiRef id="id0" soapenc:root="0"  soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"  xsi:type="ns2:CmSelectionCriteria"  xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"  xmlns:ns2="http://schemas.cisco.com/ast/soap/">
      <MaxReturnedDevices xsi:type="xsd:unsignedInt">0</MaxReturnedDevices>
      <Class xsi:type="xsd:string">Phone</Class>
      <Model xsi:type="xsd:unsignedInt">503</Model>
      <Status xsi:type="xsd:string">Registered</Status>
      <NodeName xsi:type="xsd:string" xsi:nil="true"/>
      <SelectBy xsi:type="xsd:string">Name</SelectBy>
      <SelectItems soapenc:arrayType="ns2:SelectItem[1]" xsi:type="soapenc:Array">
        <item href="#id1"/>
      </SelectItems>
    </multiRef>
    <multiRef id="id1" soapenc:root="0"  soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"  xsi:type="ns3:SelectItem" xmlns:ns3="http://schemas.cisco.com/ast/soap/"  xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
      <Item xsi:type="xsd:string">*</Item>
    </multiRef>   </soapenv:Body> </soapenv:Envelope>