… | |
… | |
393 | use Exporter qw(import); |
393 | use Exporter qw(import); |
394 | |
394 | |
395 | our $VERSION; |
395 | our $VERSION; |
396 | |
396 | |
397 | BEGIN { |
397 | BEGIN { |
398 | $VERSION = 0.8; |
398 | $VERSION = 0.9; |
399 | XSLoader::load __PACKAGE__, $VERSION; |
399 | XSLoader::load __PACKAGE__, $VERSION; |
400 | } |
400 | } |
401 | |
401 | |
402 | our %EXPORT_TAGS = ( |
402 | our %EXPORT_TAGS = ( |
403 | const_index => [qw( |
403 | const_index => [qw( |
… | |
… | |
604 | |
604 | |
605 | $DEFAULT_PROFILE->_set_default; |
605 | $DEFAULT_PROFILE->_set_default; |
606 | |
606 | |
607 | # additional SNMP application types |
607 | # additional SNMP application types |
608 | our $SNMP_PROFILE = new Convert::BER::XS::Profile; |
608 | our $SNMP_PROFILE = new Convert::BER::XS::Profile; |
|
|
609 | |
609 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_IPADDRESS , BER_TYPE_IPADDRESS); |
610 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_IPADDRESS , BER_TYPE_IPADDRESS); |
610 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_COUNTER32 , BER_TYPE_INT); |
611 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_COUNTER32 , BER_TYPE_INT); |
611 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_UNSIGNED32, BER_TYPE_INT); |
612 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_UNSIGNED32, BER_TYPE_INT); |
612 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_TIMETICKS , BER_TYPE_INT); |
613 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_TIMETICKS , BER_TYPE_INT); |
613 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_OPAQUE , BER_TYPE_IPADDRESS); |
614 | $SNMP_PROFILE->set (ASN_APPLICATION, SNMP_OPAQUE , BER_TYPE_IPADDRESS); |