2 # Show a list of log sources
4 require './syslog-ng-lib.pl';
5 &ui_print_header(undef, $text{'sources_title'}, "", "sources");
8 @sources = &find("source", $conf);
9 @links = ( &select_all_link("d"),
10 &select_invert_link("d"),
11 "<a href='edit_source.cgi?new=1'>$text{'sources_add'}</a>" );
14 print &ui_form_start("delete_sources.cgi", "post");
15 print &ui_links_row(\@links);
16 print &ui_columns_start([ "",
17 $text{'sources_source'},
18 $text{'sources_desc'},
20 foreach $f (@sources) {
21 $desc = &nice_source_desc($f);
22 print &ui_checked_columns_row([
23 "<a href='edit_source.cgi?name=$f->{'value'}'>$f->{'value'}</a>",
24 $desc || "<i>$text{'sources_none2'}</i>",
25 ], \@tds, "d", $f->{'value'});
27 print &ui_columns_end();
28 print &ui_links_row(\@links);
29 print &ui_form_end([ [ "delete", $text{'sources_delete'} ] ]);
32 print "<b>$text{'sources_none'}</b><p>\n";
33 print &ui_links_row([ $links[2] ]);
36 &ui_print_footer("", $text{'index_return'});