diff --git a/Netdisco/lib/App/Netdisco/Web/Plugin/Report/Netbios.pm b/Netdisco/lib/App/Netdisco/Web/Plugin/Report/Netbios.pm index 4363d0bd..3aee2dda 100644 --- a/Netdisco/lib/App/Netdisco/Web/Plugin/Report/Netbios.pm +++ b/Netdisco/lib/App/Netdisco/Web/Plugin/Report/Netbios.pm @@ -3,6 +3,7 @@ package App::Netdisco::Web::Plugin::Report::Netbios; use Dancer ':syntax'; use Dancer::Plugin::DBIC; use Dancer::Plugin::Auth::Extensible; +use App::Netdisco::Util::ExpandParams 'expand_hash'; use App::Netdisco::Web::Plugin; @@ -34,33 +35,64 @@ hook 'before_template' => sub { } }; -get '/ajax/content/report/netbios' => require_login sub { +get '/ajax/content/report/netbios/data' => require_login sub { + send_error( 'Missing parameter', 400 ) + unless ( param('draw') && param('draw') =~ /\d+/ ); my $domain = param('domain'); my $rs = schema('netdisco')->resultset('NodeNbt'); - if ( defined $domain ) { + my $search = $domain eq 'blank' ? '' : $domain; + $rs = $rs->search( { domain => $search } ) + ->order_by( [ { -asc => 'domain' }, { -desc => 'time_last' } ] ); + + my $exp_params = expand_hash( scalar params ); + + my $recordsTotal = $rs->count; + + my @data = $rs->get_datatables_data($exp_params)->hri->all; + + my $recordsFiltered = $rs->get_datatables_filtered_count($exp_params); + + content_type 'application/json'; + return to_json( + { draw => int( param('draw') ), + recordsTotal => int($recordsTotal), + recordsFiltered => int($recordsFiltered), + data => \@data, + } + ); +}; + +get '/ajax/content/report/netbios' => require_login sub { + + my $domain = param('domain'); + + my $rs = schema('netdisco')->resultset('NodeNbt'); + my @results; + + if ( defined $domain && !request->is_ajax ) { my $search = $domain eq 'blank' ? '' : $domain; - $rs + @results = $rs->search( { domain => $search } ) ->order_by( [ { -asc => 'domain' }, { -desc => 'time_last' } ] ) - ->hri; + ->hri->all; + + return unless scalar @results; } - else { - $rs = $rs->search( + elsif ( !defined $domain ) { + @results = $rs->search( {}, { select => [ 'domain', { count => 'domain' } ], as => [qw/ domain count /], group_by => [qw/ domain /] } - )->order_by( { -desc => 'count' } )->hri; + )->order_by( { -desc => 'count' } )->hri->all; + return unless scalar @results; } - my @results = $rs->all; - return unless scalar @results; - if ( request->is_ajax ) { my $json = to_json( \@results ); template 'ajax/report/netbios.tt', diff --git a/Netdisco/share/views/ajax/report/netbios.tt b/Netdisco/share/views/ajax/report/netbios.tt index b1a24cea..544f7bd2 100644 --- a/Netdisco/share/views/ajax/report/netbios.tt +++ b/Netdisco/share/views/ajax/report/netbios.tt @@ -1,3 +1,4 @@ +[% USE url %] [% IF opt %] @@ -25,11 +26,16 @@