Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
help	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
acl_security.pl	1.1 KB	-rw-r--r--	2026-07-17 21:17
backup_config.pl	195 B	-rw-r--r--	2026-07-17 21:17
config	647 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	647 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	658 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	658 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	658 B	-rw-r--r--	2026-07-17 21:17
config.info	1.04 KB	-rw-r--r--	2026-07-17 21:17
custom_action.cgi	1.81 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	71 B	-rw-r--r--	2026-07-17 21:17
edit_custom.cgi	1.69 KB	-rwxr-xr-x	2026-07-17 21:22
edit_defaults.cgi	5.06 KB	-rwxr-xr-x	2026-07-17 21:22
edit_install.cgi	3.49 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	1.35 KB	-rwxr-xr-x	2026-07-17 21:22
edit_security.cgi	2.36 KB	-rwxr-xr-x	2026-07-17 21:22
edit_theme.cgi	6.16 KB	-rwxr-xr-x	2026-07-17 21:22
generate.cgi	3.89 KB	-rwxr-xr-x	2026-07-17 21:22
grub2-lib.pl	98.28 KB	-rw-r--r--	2026-07-17 21:17
index.cgi	13.28 KB	-rwxr-xr-x	2026-07-17 21:22
install.cgi	4.21 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	393 B	-rw-r--r--	2026-07-17 21:17
log_parser.pl	1.66 KB	-rw-r--r--	2026-07-17 21:17
module.info	289 B	-rw-r--r--	2026-07-17 21:17
reboot_once.cgi	734 B	-rwxr-xr-x	2026-07-17 21:22
save_custom.cgi	1.04 KB	-rwxr-xr-x	2026-07-17 21:22
save_defaults.cgi	7.16 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	803 B	-rwxr-xr-x	2026-07-17 21:22
save_security.cgi	1.18 KB	-rwxr-xr-x	2026-07-17 21:22
save_theme.cgi	4.09 KB	-rwxr-xr-x	2026-07-17 21:22
set_default.cgi	742 B	-rwxr-xr-x	2026-07-17 21:22
status.cgi	8.67 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Show a form for editing GRUB 2 password protection.

use strict;
use warnings;
require './grub2-lib.pl';    ## no critic

our (%text);

&ReadParse();
&error_setup($text{'security_err'});
my %access = &get_module_acl();
&error("$text{'eacl_np'} $text{'eacl_psecurity'}") if (!$access{'security'});

my $state = &grub2_read_security_config();

&ui_print_header(undef, $text{'security_title'}, "", "security_current");

# Refuse to edit administrator-owned password scripts we cannot safely merge.
if ($state->{'exists'} && !$state->{'managed'}) {
	print &ui_alert($text{'security_unmanaged'}, 'warning');
	&ui_print_footer("index.cgi", $text{'index_return'});
	exit;
	}

print &ui_form_start("save_security.cgi", "post");
print &ui_table_start($text{'security_header'}, "width=100%", 2);
print &ui_table_row(
	$text{'security_current_state'},
	$state->{'enabled'} ?
		&text('security_current_enabled',
		      &html_escape($state->{'user'} || 'root')) :
		$text{'security_current_disabled'}
);
print &ui_table_row(
	$text{'security_current_hash'},
	$state->{'hash'} ? $text{'security_current_hash_set'} :
			    $text{'security_current_hash_missing'}
);
print &ui_table_hr();
print &ui_table_row(
	&hlink($text{'security_enable'}, "security_enable"),
	&ui_yesno_radio("enabled", $state->{'enabled'} ? 1 : 0)
);
print &ui_table_row(
	&hlink($text{'security_user'}, "security_user"),
	&ui_textbox("user", $state->{'user'} || "root", 30)
);
print &ui_table_hr();
print &ui_table_row(
	$text{'security_password_status'},
	$state->{'enabled'} && $state->{'hash'} ?
		$text{'security_password_keep'} :
		$text{'security_password_required'}
);
# Password fields are optional when keeping the existing PBKDF2 hash.
print &ui_table_row(
	&hlink($text{'security_newpass'}, "security_password"),
	&ui_password("password", "", 30)
);
print &ui_table_row(
	&hlink($text{'security_newpass2'}, "security_password"),
	&ui_password("password2", "", 30)
);
print &ui_table_hr();
# Existing hashes are shown because GRUB stores hashes, not clear text.
print &ui_table_row(
	&hlink($text{'security_hash'}, "security_hash"),
	&ui_textbox("hash", $state->{'hash'} || "", 30, undef, undef, undef,
		    "w-100").
	&ui_tag('div', &ui_note($text{'security_hash_note'}, 0)),
2, undef, undef, 1);
print &ui_table_end();
print &ui_form_end([ [ undef, $text{'save'} ] ]);

&ui_print_footer("index.cgi", $text{'index_return'});