phpini/edit_misc.cgi

   1 #!/usr/local/bin/perl
   2 # Show options related to other options
   3
   4 require './phpini-lib.pl';
   5 &ReadParse();
   6 &can_php_config($in{'file'}) || &error($text{'list_ecannot'});
   7 $conf = &get_config($in{'file'});
   8
   9 &ui_print_header("<tt>$in{'file'}</tt>", $text{'misc_title'}, "");
  10
  11 # Build list of timezones
  12 my %tzlist;
  13 &foreign_require("time");
  14 if (defined(&time::list_timezones)) {
  15         foreach $t (&time::list_timezones()) {
  16                 $tzlist{$t->[0]} = { 'comment' => $t->[1] };
  17                 }
  18         }
  19
  20 print &ui_form_start("save_misc.cgi", "post");
  21 print &ui_hidden("file", $in{'file'}),"\n";
  22 print &ui_table_start($text{'misc_header'}, "width=100%", 4);
  23
  24 # Tag styles
  25 print &ui_table_row($text{'misc_short'},
  26                     &onoff_radio("short_open_tag"));
  27 print &ui_table_row($text{'misc_asp'},
  28                     &onoff_radio("asp_tags"));
  29
  30 # Output options
  31 print &ui_table_row($text{'misc_zlib'},
  32                     &onoff_radio("zlib.output_compression"));
  33 print &ui_table_row($text{'misc_flush'},
  34                     &onoff_radio("implicit_flush"));
  35
  36 # URL open options
  37 print &ui_table_row($text{'misc_fopen'},
  38                     &onoff_radio("allow_url_fopen"));
  39
  40 print &ui_table_hr();
  41
  42 # Email sending options
  43 $smtp = &find_value("SMTP", $conf);
  44 print &ui_table_row($text{'misc_smtp'},
  45                     &ui_opt_textbox("smtp", $smtp, 20, $text{'misc_none'}));
  46 $port = &find_value("smtp_port", $conf);
  47 print &ui_table_row($text{'misc_port'},
  48                     &ui_opt_textbox("smtp_port", $port, 5, $text{'default'}));
  49
  50 $sendmail = &find_value("sendmail_path", $conf);
  51 print &ui_table_row($text{'misc_sendmail'},
  52                     &ui_opt_textbox("sendmail_path", $sendmail, 60,
  53                                     $text{'misc_none'}), 3);
  54
  55
  56 print &ui_table_hr();
  57
  58 # Include open options
  59 print &ui_table_row($text{'misc_include'},
  60         &onoff_radio("allow_url_include"));
  61
  62 # CGI Fix Path options
  63 print &ui_table_row($text{'misc_path'},
  64         &onoff_radio("cgi.fix_pathinfo"));
  65
  66 # PHP Timezone Dropdown
  67 $tzlist{''}{'comment'} = $text{'default'} if not exists $tzlist{''};
  68 $curr_timezone = &find_value("date.timezone", $conf);
  69 $tzlist{$curr_timezone}{'comment'} = "Custom timezone" if not exists $tzlist{$curr_timezone};
  70 print &ui_table_row(&hlink($text{'misc_timezone'}, "misc_timezone"),
  71         &ui_select("date.timezone", $curr_timezone,
  72                    [ map { $z = $tzlist{$_};
  73                            [ $_, $_.($z->{'comment'} ?
  74                                      " ($z->{'comment'})" : "")  ] }
  75                          (sort keys %tzlist) ], 1, 0, 0, 0), 3);
  76
  77 print &ui_table_end();
  78 print &ui_form_end([ [ "save", $text{'save'} ] ]);
  79
  80 &ui_print_footer("list_ini.cgi?file=".&urlize($in{'file'}),
  81                  $text{'list_return'});