webmin/edit_debug.cgi

   1 #!/usr/local/bin/perl
   2 # Display debugging mode options
   3
   4 require './webmin-lib.pl';
   5 &ui_print_header(undef, $text{'debug_title'}, "");
   6
   7 print &ui_form_start("change_debug.cgi", "post");
   8 print &ui_table_start($text{'debug_header'}, undef, 2);
   9
  10 # Debugging mode enabled
  11 print &ui_table_row($text{'debug_enabled'},
  12         &ui_yesno_radio("debug_enabled", $gconfig{'debug_enabled'}));
  13
  14 # What to log
  15 print &ui_table_row($text{'debug_what'},
  16         join("<br>\n",
  17              map { &ui_checkbox('debug_what_'.$_, 1, $text{'debug_what_'.$_},
  18                                 $gconfig{'debug_what_'.$_}) }
  19                  @debug_what_events));
  20
  21 # Log to where
  22 print &ui_table_row($text{'debug_file'},
  23         &ui_opt_textbox("debug_file", $gconfig{'debug_file'},
  24                         50, $text{'default'}.
  25                             " (<tt>$main::default_debug_log_file</tt>)"));
  26
  27 # Maximum size
  28 print &ui_table_row($text{'debug_size'},
  29         &ui_radio("debug_size_def", $gconfig{'debug_size'} ? 0 : 1,
  30                   [ [ 1, $text{'default'}.
  31                          " (".&nice_size($main::default_debug_log_size).")" ],
  32                     [ 0, &ui_bytesbox("debug_size", $gconfig{'debug_size'}) ] ]
  33                  ));
  34
  35 # Debug background processes?
  36 print &ui_table_row($text{'debug_procs'},
  37         &ui_checkbox("debug_web", 1, $text{'debug_web'},
  38                      !$gconfig{'debug_noweb'})."\n".
  39         &ui_checkbox("debug_cmd", 1, $text{'debug_cmd'},
  40                      !$gconfig{'debug_nocmd'})."\n".
  41         &ui_checkbox("debug_cron", 1, $text{'debug_cron'},
  42                      !$gconfig{'debug_nocron'}));
  43
  44 # Modules to debug
  45 # Modules to log in
  46 print &ui_table_row($text{'debug_inmods'},
  47         &ui_radio("mall", $gconfig{'debug_modules'} ? 0 : 1,
  48                   [ [ 1, $text{'log_mall'} ], [ 0, $text{'log_modules'} ] ]).
  49         "<br>\n".
  50         &ui_select("modules", [ split(/\s+/, $gconfig{'debug_modules'}) ],
  51                    [ map { [ $_->{'dir'}, $_->{'desc'} ] }
  52                          sort { $a->{'desc'} cmp $b->{'desc'} }
  53                               &get_all_module_infos() ], 5, 1));
  54
  55 print &ui_table_end();
  56 print &ui_form_end([ [ "save", $text{'save'} ] ]);
  57
  58 &ui_print_footer("", $text{'index_return'});
  59