#!/usr/local/bin/perl # edit_cfd.cgi # Display options for the cfengine daemon on this host require './cfengine-lib.pl'; &ui_print_header(undef, $text{'cfd_title'}, "", "cfd"); if (!&has_command($config{'cfd'})) { print &text('cfd_ecmd', "$config{'cfd'}", "$gconfig{'webprefix'}/config.cgi?$module_name"),"

\n"; &ui_print_footer("/", $text{'index'}); exit; } # Display table of daemon options $conf = &get_cfd_config(); @secs = grep { $_->{'type'} eq 'section' } @$conf; &show_classes_table(\@secs, 1); # Allow starting or stopping of cfd ($pid) = &find_byname("cfd"); print &ui_hr(); print "\n"; if ($pid) { print "\n"; print "\n"; print "\n"; print "\n"; } else { print "\n"; print "\n"; print "\n"; print "\n"; } print "
$text{'cfd_stopdesc'}
$text{'cfd_startdesc'}
\n"; &ui_print_footer("", $text{'index_return'});