135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

update oneaccess (#310)

Browse Source 
* update oneaccess, regretfully it seems oneos version6 is a step back when it comes to snmp support.
changes:
 * start using oneaccess mibs, not much useable data there yet however
 * return the device model
 * show os version for version 6 too. not many elegeant ways to handle all the version syntaxes used,
     so just dump what resembles a version string & be done with it
 * updated documentation

tested on:
 one420 - os V5.2R1C12
 one521 - os 6.1.rc1patch06
 one521 - os 6.1.3

some comments in the code as what works & what doesn't.

* typo

* bump required netdisco-mibs version to 4.014 (not released yet) but needed for oneaccess mibs. might as well fail at the start of the build instead of the end

* 2 tests fixed for oneaccess, 1 more to go

* last test fixed

* a few more changes

but mostly need to have a file change so i can trigger a travis build :)
This commit is contained in:
nick n
2019-02-24 15:57:21 +01:00
committed by Oliver Gorwits
parent 3b604723bd
commit 4ba91f9df8
4 changed files with 82 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
xt/lib/Test/SNMP/Info/Layer3/OneAccess.pm
View File

@@ -50,6 +50,7 @@ sub setup : Tests(setup) {
'_layers' => 79,
'_description' => 'ONEOS5-VOIP_H323-V4.3R4E18',
'_id' => '.1.3.6.1.4.1.13191.1.1.30',
'_oa_model' => 'ONE420',
'store' => {},
};
$test->{info}->cache($cache_data);
@@ -62,11 +63,14 @@ sub os : Tests(2) {
is($test->{info}->os(), 'oneos', q(OS returns 'oneos'));
}
sub os_ver : Tests(3) {
sub os_ver : Tests(4) {
my $test = shift;
can_ok($test->{info}, 'os_ver');
is($test->{info}->os_ver(), '4.3R4E18', q(OS version has expected value));
is($test->{info}->os_ver(), 'V4.3R4E18', q(OS version 4 has expected value));
$test->{info}{_description} = 'OneOS-pCPE-ARM_pi1-6.1.3';
is($test->{info}->os_ver(), '6.1.3', q(OS version 6 has expected value));
$test->{info}->clear_cache();
is($test->{info}->os_ver(), undef,
@@ -77,14 +81,14 @@ sub vendor : Tests(2) {
my $test = shift;
can_ok($test->{info}, 'vendor');
is($test->{info}->vendor(), 'OneAccess', q(Vendor returns 'OneAccess'));
is($test->{info}->vendor(), 'oneaccess', q(Vendor returns 'oneaccess'));
}
sub model : Tests(2) {
my $test = shift;
can_ok($test->{info}, 'model');
is($test->{info}->model(), 'One300', q(Model has expected value));
is($test->{info}->model(), 'ONE420', q(Model has expected value));
}
1;