phpini/edit_dirs.cgi

   1 #!/usr/local/bin/perl
   2 # Show options for program directories and directory limits
   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{'dirs_title'}, "");
  10
  11 print &ui_form_start("save_dirs.cgi", "post");
  12 print &ui_hidden("file", $in{'file'}),"\n";
  13 print &ui_table_start($text{'dirs_header'}, "width=100%", 2);
  14
  15 # Include files directories
  16 $include = &find_value("include_path", $conf);
  17 print &ui_table_row($text{'dirs_include'},
  18         &ui_radio("include_def", $include ? 0 : 1,
  19                   [ [ 1, $text{'default'} ], [ 0, $text{'dirs_below'} ] ]).
  20         "<br>\n".
  21         &ui_textarea("include", join("\n", split(/:/, $include)), 3, 60)." ".
  22         &file_chooser_button("include", 1, undef, undef, 1));
  23
  24 # Extensions directory
  25 print &ui_table_row($text{'dirs_ext'},
  26         &ui_opt_textbox("ext", &find_value("extension_dir", $conf),
  27                         60, $text{'default'})." ".
  28         &file_chooser_button("ext", 1));
  29
  30 # Can accept uploads?
  31 print &ui_table_row($text{'dirs_upload'},
  32         &onoff_radio("file_uploads"));
  33
  34 # Upload temp files directory
  35 print &ui_table_row($text{'dirs_utmp'},
  36         &ui_opt_textbox("utmp", &find_value("upload_tmp_dir", $conf),
  37                         60, $text{'default'})." ".
  38         &file_chooser_button("utmp", 1));
  39
  40 print &ui_table_end();
  41 print &ui_form_end([ [ "save", $text{'save'} ] ]);
  42
  43 &ui_print_footer("list_ini.cgi?file=".&urlize($in{'file'}),
  44                  $text{'list_return'});