135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add csv download option to device addresses

Browse Source
This commit is contained in:
Eric A. Miller
2013-09-18 23:35:28 -04:00
parent 99ada1132c
commit bb1f842d92
3 changed files with 43 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
Netdisco/lib/App/Netdisco/Web/Plugin/Device/Addresses.pm
View File

@@ -7,22 +7,46 @@ use Dancer::Plugin::Auth::Extensible;
use App::Netdisco::Web::Plugin; use App::Netdisco::Web::Plugin;
register_device_tab({ tag => 'addresses', label => 'Addresses' }); register_device_tab( { tag => 'addresses', label => 'Addresses' } );
# device interface addresses # device interface addresses
ajax '/ajax/content/device/addresses' => require_login sub { ajax '/ajax/content/device/addresses' => require_login sub {
my $q = param('q'); my $q = param('q');
my $device = schema('netdisco')->resultset('Device') my $device
->search_for_device($q) or send_error('Bad device', 400); = schema('netdisco')->resultset('Device')->search_for_device($q)
or send_error( 'Bad device', 400 );
my $set = $device->device_ips->search({}, {order_by => 'alias'}); my $set = $device->device_ips->search( {}, { order_by => 'alias' } );
return unless $set->count; return unless $set->count;
content_type('text/html'); content_type('text/html');
template 'ajax/device/addresses.tt', { template 'ajax/device/addresses.tt', { results => $set, },
results => $set, { layout => undef };
}, { layout => undef }; };
get '/device/addresses' => require_login sub {
my $q = param('q');
my $format = param('format');
my $device
= schema('netdisco')->resultset('Device')->search_for_device($q)
or send_error( 'Bad device', 400 );
my $set = $device->device_ips->search( {}, { order_by => 'alias' } );
return unless $set->count;
if ( $format eq 'csv' ) {
header( 'Content-Type' => 'text/comma-separated-values' );
header( 'Content-Disposition' =>
"attachment; filename=\"addresses.csv\"" );
template 'ajax/device/addresses_csv.tt', { results => $set, },
{ layout => undef };
}
else {
return;
}
}; };
true; true;

1
Netdisco/share/views/ajax/device/addresses.tt
View File

@@ -1,3 +1,4 @@
[% INCLUDE "download_as.tt" %]
<table class="table table-bordered table-condensed table-striped nd_floatinghead"> <table class="table table-bordered table-condensed table-striped nd_floatinghead">
<thead> <thead>
<tr> <tr>

11
Netdisco/share/views/ajax/device/addresses_csv.tt Normal file
View File

@@ -0,0 +1,11 @@
[% USE CSV -%]
[% CSV.dump([ 'Address' 'DNS' 'Interface' 'Description' 'Prefix' ]) %]
[% WHILE (row = results.next) %]
[% mylist = [] %]
[% FOREACH col IN [ row.alias row.dns row.port row.device_port.name row.subnet ] %]
[% mylist.push(col) %]
[% END %]
[% CSV.dump(mylist) %]
[% END %]