From 02f3e91c5ddfa1840bf0dd9fa945d06a61ba4150 Mon Sep 17 00:00:00 2001
From: Max Baker <>
Date: Thu, 28 Oct 2004 21:40:11 +0000
Subject: [PATCH] added null string removal in CDP info

---
 Info/CDP.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/Info/CDP.pm b/Info/CDP.pm
index a45272e8..0be4aec8 100644
--- a/Info/CDP.pm
+++ b/Info/CDP.pm
@@ -77,9 +77,21 @@ $INIT = 0;
 
 %MUNGE = (
           'c_capabilities' => \&munge_caps,
+          'c_platform'     => \&munge_null,
+          'c_domain'       => \&munge_null,
+          'c_port'         => \&munge_null,
+          'c_id'           => \&munge_null,
+          'c_ver'          => \&munge_null,
           'c_ip'           => \&SNMP::Info::munge_ip
          );
 
+# munge_null() - removes nulls (\0)
+sub munge_null {
+    my $text = shift || return;
+    
+    $text =~ s/\0//g;
+    return $text;
+}
 
 sub munge_caps {
     my $caps = shift;