[libnet-snmp-perl] 01/06: 04_oid_whitespace: Strip trailing whitespace from OIDs (Closes: #321787).

[Roland Rosenfeld]

This is an automated email from the git hooks/post-receive script.

roland pushed a commit to branch master
in repository libnet-snmp-perl.

commit ecd1f35c275ed3109305069b3a7bc72948c3b25a
Author: Roland Rosenfeld <roland at debian.org>
Date:   Tue Aug 22 20:38:18 2017 +0200

    04_oid_whitespace: Strip trailing whitespace from OIDs (Closes: #321787).
---
 debian/changelog                       |  3 +-
 debian/patches/04_oid_whitespace.patch | 70 ++++++++++++++++++++++++++++++++++
 debian/patches/series                  |  1 +
 3 files changed, 73 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index 5b8942c..dbe9aea 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -15,8 +15,9 @@ libnet-snmp-perl (6.0.1-3) UNRELEASED; urgency=medium
   * Update debian/copyright to DEP5 format.
   * Change charset of changelog to UTF-8.
   * Fix VCS URLs.
+  * 04_oid_whitespace: Strip trailing whitespace from OIDs (Closes: #321787).
 
- -- Roland Rosenfeld <roland at debian.org>  Mon, 21 Aug 2017 22:48:18 +0200
+ -- Roland Rosenfeld <roland at debian.org>  Tue, 22 Aug 2017 20:38:05 +0200
 
 libnet-snmp-perl (6.0.1-2) unstable; urgency=low
 
diff --git a/debian/patches/04_oid_whitespace.patch b/debian/patches/04_oid_whitespace.patch
new file mode 100644
index 0000000..e4aad6e
--- /dev/null
+++ b/debian/patches/04_oid_whitespace.patch
@@ -0,0 +1,70 @@
+Author: Roland Rosenfeld <roland at debian.org>
+Description: Strip trailing whitespace from OIDs (Closes: #321787)
+Bug-Debian: https://bugs.debian.org/321787
+
+--- a/examples/snmpget.pl
++++ b/examples/snmpget.pl
+@@ -69,8 +69,10 @@ if (!defined $s->get_request(@args)) {
+ 
+ # Print the results.
+ for ($s->var_bind_names()) {
++   my $oid = $_;
++   $oid =~ s/ +//;
+    printf "%s = %s: %s\n",
+-          $_,
++          $oid,
+           snmp_type_ntop($s->var_bind_types()->{$_}),
+           $s->var_bind_list()->{$_};
+ }
+--- a/examples/snmpgetbulk.pl
++++ b/examples/snmpgetbulk.pl
+@@ -71,8 +71,10 @@ if (!defined $s->get_bulk_request(@args)
+ 
+ # Print the results.
+ for ($s->var_bind_names()) {
++   my $oid = $_;
++   $oid =~ s/ +//;
+    printf "%s = %s: %s\n",
+-          $_,
++          $oid,
+           snmp_type_ntop($s->var_bind_types()->{$_}),
+           $s->var_bind_list()->{$_};
+ }
+--- a/examples/snmpgetnext.pl
++++ b/examples/snmpgetnext.pl
+@@ -69,8 +69,10 @@ if (!defined $s->get_next_request(@args)
+ 
+ # Print the results.
+ for ($s->var_bind_names()) {
++   my $oid = $_;
++   $oid =~ s/ +//;
+    printf "%s = %s: %s\n",
+-          $_,
++          $oid,
+           snmp_type_ntop($s->var_bind_types()->{$_}),
+           $s->var_bind_list()->{$_};
+ }
+--- a/examples/table.pl
++++ b/examples/table.pl
+@@ -40,7 +40,9 @@ my $result;
+ 
+ if (defined ($result = $session->get_table(-baseoid => $OID_ifTable))) {
+    for ($session->var_bind_names()) {
+-      printf "%s => %s\n", $_, $result->{$_};
++      my $oid = $_;
++      $oid =~ s/ +//;
++      printf "%s => %s\n", $oid, $result->{$_};
+    }
+    print "\n";
+ } else {
+@@ -99,7 +101,9 @@ sub print_results_cb
+       printf "ERROR: %s.\n", $session->error();
+    } else {
+       for ($session->var_bind_names()) {
+-         printf "%s => %s\n", $_, $session->var_bind_list()->{$_};
++         my $oid = $_;
++         $oid =~ s/ +//;
++         printf "%s => %s\n", $oid, $session->var_bind_list()->{$_};
+       }
+    }
+ 
diff --git a/debian/patches/series b/debian/patches/series
index c70764c..8e33583 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1,3 @@
 01_replace_digest_sha1.patch
 03_spelling.patch
+04_oid_whitespace.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-snmp-perl.git