#!/opt/vdops/bin/perl

# This script walks the network, gathering Nessus vulnerabilities using 
# all plugins, and inserting the results into Soma

# Load modules
use strict;
use warnings;
use Perl6::Say;

use lib '/home/soma/lib';
use FHCRC::VDOPS::Foundation;
use FHCRC::VDOPS::NetworkTools;
use FHCRC::VDOPS::ScanTools;
use FHCRC::VDOPS::SomaCrud;
use FHCRC::VDOPS::SomaData;
use FHCRC::VDOPS::Utilities;

# Declare variables
my $prefs = { safe_checks => "no" };

# Threads and debugs
$debug = 0;
$thrMode = 0; 

# Notify operator
log_it("Beginning $0\n");
say "Beginning $0\n" if $job eq 'interactive';

# Construct a foundation
foundation();

# Walk network and insert into Soma
override_nessus_prefs($prefs);
walk_route_table(\&gather_nessus_vuln_route, "gather_nessus_vuln_route", $processNessusTimeout, \%nessusExcludeRoute);

# Notify operator
log_it("Ending $0");
say "Ending $0" if $job eq 'interactive';