36 lines
1.2 KiB
Perl
Executable File
36 lines
1.2 KiB
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Show options related to PHP variables
|
|
|
|
require './phpini-lib.pl';
|
|
&ReadParse();
|
|
&can_php_config($in{'file'}) || &error($text{'list_ecannot'});
|
|
$conf = &get_config_as_user($in{'file'});
|
|
|
|
&ui_print_header("<tt>$in{'file'}</tt>", $text{'vars_title'}, "");
|
|
|
|
print &ui_form_start("save_vars.cgi", "post");
|
|
print &ui_hidden("file", $in{'file'}),"\n";
|
|
print &ui_table_start($text{'vars_header'}, "width=100%", 4);
|
|
if (php_version_test_maximum('7.4')) {
|
|
print &ui_table_row(&opt_help($text{'vars_magic'}, 'magic_quotes_gpc'),
|
|
&onoff_radio("magic_quotes_gpc"));
|
|
print &ui_table_row(&opt_help($text{'vars_runtime'}, 'magic_quotes_runtime'),
|
|
&onoff_radio("magic_quotes_runtime"));
|
|
}
|
|
|
|
if (php_version_test_maximum('5.6')) {
|
|
print &ui_table_row(&opt_help($text{'vars_register'}, 'register_globals'),
|
|
&onoff_radio("register_globals"));
|
|
print &ui_table_row(&opt_help($text{'vars_long'}, 'register_long_arrays'),
|
|
&onoff_radio("register_long_arrays"));
|
|
}
|
|
|
|
print &ui_table_row(&opt_help($text{'vars_args'}, 'register_argc_argv'),
|
|
&onoff_radio("register_argc_argv"));
|
|
|
|
print &ui_table_end();
|
|
print &ui_form_end([ [ "save", $text{'save'} ] ]);
|
|
|
|
&ui_print_footer("list_ini.cgi?file=".&urlize($in{'file'}),
|
|
$text{'list_return'});
|