From df68d675e74633c1980838e8174e939dd4078f85 Mon Sep 17 00:00:00 2001 From: Joachim Tingvold Date: Thu, 16 Apr 2015 21:12:29 +0200 Subject: Added config used at TG15. --- tools/sql-strip.pl | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) create mode 100644 tools/sql-strip.pl (limited to 'tools') diff --git a/tools/sql-strip.pl b/tools/sql-strip.pl new file mode 100644 index 0000000..0e2fec6 --- /dev/null +++ b/tools/sql-strip.pl @@ -0,0 +1,35 @@ +#!/usr/bin/perl +use warnings; +use strict; + +my $ignore = "((([0-9a-f]{2}[:]){5}[0-9a-f]{2})|"; +$ignore .= "([0-9]{4}\-[0-9]{2}\-[0-9]{2} [0-9]{2}\:[0-9]{2}\:[0-9]{2})"; +$ignore .= ").*"; + +my $community = ""; +my $snmpv3 = 'SHA//AES/'; + +my $skip = 0; + +open (SQL, $ARGV[0]) or die "Unable to open SQL-file"; +while () { + unless (/^$ignore$/){ + + if (/COPY (linknet_ping|ping|mbd_log|squeue|temppoll|ap_poll|polls)/){ + $skip = 1; + print; + } + + if (/\\\./){ + $skip = 0; + } + + unless ($skip){ + s/$community//g; # community + s/PASSWORD '.+'/PASSWORD ''/g; # password for SQL-users + s/public$//; # public-community -- assuming last column + #s/$snmpv3/SHA\/\/AES\//g; # snmpv3 + print; + } + } +} -- cgit v1.2.3