share/plugins/plugin.d/handleTracerouteUdp

   1 #!/usr/bin/perl -w
   2 #
   3 # handleUdpTraceroute
   4 #
   5 # Maximilian Wilhelm <max@rfc2324.org>
   6 #  -- Sun, 16 Jul 2006 19:49:21 +0200
   7 #
   8
   9 use strict;
  10 use Alff::Config;
  11 use Alff::Main;
  12
  13 my $config = Alff::Config->new();
  14 my $alff = Alff::Main->new;
  15
  16 my $allow_traceroute_udp = $config->getOption( "allow_traceroute_udp" );
  17
  18 if ( $allow_traceroute_udp eq "yes" ) {
  19         print " * Allowing udp traceroute...\n";
  20         $alff->write_line("iptables -A FORWARD -p udp --dport 33434:33523 -j ACCEPT");
  21         $alff->write_line("ip6tables -A FORWARD -p udp --dport 33434:33523 -j ACCEPT");
  22 }