package App::Netdisco::Web::Plugin::Report::PortBlocking; use Dancer ':syntax'; use Dancer::Plugin::DBIC; use Dancer::Plugin::Auth::Extensible; use App::Netdisco::Web::Plugin; register_report( { category => 'Port', tag => 'portblocking', label => 'Blocked - Spanning Tree', provides_csv => 1, api_endpoint => 1, } ); get '/ajax/content/report/portblocking' => require_login sub { my @results = schema(vars->{'tenant'})->resultset('Device')->search( { 'stp' => [ 'blocking', 'broken' ], 'up' => { '!=', 'down' } }, { select => [ 'ip', 'dns', 'name' ], join => ['ports'], '+columns' => [ { 'port' => 'ports.port' }, { 'description' => 'ports.name' }, { 'stp' => 'ports.stp' }, ] } )->hri->all; return unless scalar @results; if ( request->is_ajax ) { my $json = to_json (\@results); template 'ajax/report/portblocking.tt', { results => $json }, { layout => 'noop' }; } else { header( 'Content-Type' => 'text/comma-separated-values' ); template 'ajax/report/portblocking_csv.tt', { results => \@results, }, { layout => 'noop' }; } }; 1;