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 adding or editing a custom GRUB 2 menu entry.

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

our (%in, %text);

&ReadParse();
&error_setup($text{'custom_err'});
my %access = &get_module_acl();
&error("$text{'eacl_np'} $text{'eacl_pmanual'}") if (!$access{'manual'});

my $is_new = !defined($in{'idx'}) || $in{'idx'} eq '';
my ($title, $id, $body) =
	("", "", "echo 'Custom entry not configured'\ntrue\n");
# Existing entries are looked up by parsed custom-entry index, not line number.
if (!$is_new) {
	$in{'idx'} =~ /^\d+\z/ || &error($text{'custom_eentry'});
	my $entry = &grub2_custom_entry_by_index($in{'idx'});
	&error($text{'custom_eentry'}) if (!$entry);
	$title = $entry->{'title'} || "";
	$id = $entry->{'id'} || "";
	$body = &grub2_custom_entry_body($entry);
	}

&ui_print_header(undef, $is_new ? $text{'custom_title_new'} :
		 $text{'custom_title_edit'}, "");

print &ui_form_start("save_custom.cgi", "post");
print &ui_hidden("idx", $in{'idx'}) if (!$is_new);
print &ui_table_start($text{'custom_header'}, "width=100%", 2);
print &ui_table_row(&hlink($text{'custom_entry_title'}, "custom_title"),
		    &ui_textbox("title", $title, 60));
print &ui_table_row(&hlink($text{'custom_entry_id'}, "custom_id"),
		    &ui_textbox("id", $id, 60).
		    &ui_tag('div', &ui_note($text{'custom_id_note'}, 0)));
print &ui_table_hr();
# The body is stored as GRUB script text inside a generated menuentry wrapper.
print &ui_table_row(&hlink($text{'custom_entry_body'}, "custom_body"),
		    &ui_textarea("body", $body, 16, 100), 2);
print &ui_table_end();
print &ui_form_end([ [ undef, $text{'save'} ] ]);

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