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
CHANGELOG	1.92 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	958 B	-rwxr-xr-x	2026-07-17 21:17
apply_hdparm.cgi	1.22 KB	-rwxr-xr-x	2026-07-17 21:22
blink.cgi	384 B	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	483 B	-rwxr-xr-x	2026-07-17 21:17
config	13 B	-rw-r--r--	2026-07-17 21:17
config.info	144 B	-rw-r--r--	2026-07-17 21:17
config.info.bg	235 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	167 B	-rw-r--r--	2026-07-17 21:17
config.info.de	148 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	167 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	138 B	-rw-r--r--	2026-07-17 21:17
config.info.no	151 B	-rw-r--r--	2026-07-17 21:17
defaultacl	26 B	-rw-r--r--	2026-07-17 21:17
edit_disk.cgi	4.9 KB	-rwxr-xr-x	2026-07-17 21:22
edit_hdparm.cgi	4.44 KB	-rwxr-xr-x	2026-07-17 21:22
edit_part.cgi	8.26 KB	-rwxr-xr-x	2026-07-17 21:22
edit_relabel.cgi	1.32 KB	-rwxr-xr-x	2026-07-17 21:22
fdisk-lib.pl	49.08 KB	-rwxr-xr-x	2026-07-17 21:17
feedback_files.pl	115 B	-rwxr-xr-x	2026-07-17 21:17
fsck.cgi	604 B	-rwxr-xr-x	2026-07-17 21:22
fsck_form.cgi	700 B	-rwxr-xr-x	2026-07-17 21:22
index.cgi	2.41 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	1.53 KB	-rwxr-xr-x	2026-07-17 21:17
make_tags.pl	210 B	-rwxr-xr-x	2026-07-17 21:22
mkfs.cgi	820 B	-rwxr-xr-x	2026-07-17 21:22
mkfs_form.cgi	832 B	-rwxr-xr-x	2026-07-17 21:22
module.info	238 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	209 B	-rw-r--r--	2026-07-17 21:17
module.info.bg	0 B	-rw-r--r--	2026-07-17 21:17
module.info.bg.auto	236 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	119 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	29 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	40 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	130 B	-rw-r--r--	2026-07-17 21:17
module.info.da	0 B	-rw-r--r--	2026-07-17 21:17
module.info.da.auto	149 B	-rw-r--r--	2026-07-17 21:17
module.info.de	131 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	26 B	-rw-r--r--	2026-07-17 21:17
module.info.el	0 B	-rw-r--r--	2026-07-17 21:17
module.info.el.auto	299 B	-rw-r--r--	2026-07-17 21:17
module.info.es	38 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	112 B	-rw-r--r--	2026-07-17 21:17
module.info.eu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.eu.auto	146 B	-rw-r--r--	2026-07-17 21:17
module.info.fa	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fa.auto	233 B	-rw-r--r--	2026-07-17 21:17
module.info.fi	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fi.auto	149 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	35 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	133 B	-rw-r--r--	2026-07-17 21:17
module.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hr.auto	160 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	79 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	26 B	-rw-r--r--	2026-07-17 21:17
module.info.it	0 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	152 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	58 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	179 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	36 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	137 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	120 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	23 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	39 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	111 B	-rw-r--r--	2026-07-17 21:17
module.info.no	38 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	112 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	38 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	37 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	116 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	162 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	60 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	185 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	166 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	28 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	116 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	34 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	123 B	-rw-r--r--	2026-07-17 21:17
module.info.uk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.uk.auto	245 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	27 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	104 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	33 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	110 B	-rw-r--r--	2026-07-17 21:17
range.js	4.7 KB	-rw-r--r--	2026-07-17 21:17
reboot.cgi	261 B	-rwxr-xr-x	2026-07-17 21:22
relabel.cgi	417 B	-rwxr-xr-x	2026-07-17 21:22
save_part.cgi	3.75 KB	-rwxr-xr-x	2026-07-17 21:22
slider.js	14.48 KB	-rw-r--r--	2026-07-17 21:17
timer.js	2.86 KB	-rw-r--r--	2026-07-17 21:17
tunefs.cgi	689 B	-rwxr-xr-x	2026-07-17 21:22
tunefs_form.cgi	722 B	-rwxr-xr-x	2026-07-17 21:22
winclassic.css	1.72 KB	-rw-r--r--	2026-07-17 21:17

Rename

#!/usr/bin/perl
# edit_hdparm.cgi
# Edit an IDE parameters for some disk

require './fdisk-lib.pl';
&ReadParse();
@dlist = &list_disks_partitions();
$d = $dlist[$in{'disk'}];
&can_edit_disk($d->{'device'}) ||
	&error($text{'edit_ecannot'});

&ui_print_header($d->{'desc'}, $text{'hdparm_title'}, "");
if ( ! &has_command( "hdparm" ) ) {
	print "<p>$text{ 'edit_ehdparm' }<p>\n";
	&ui_print_footer( "", $text{ 'index_return' } );
	exit;
	}

%hdparm = ( 'A', "1", 'K', "0", 'P', "0", 'X', "0", 'W', "0", 'S', "0" );
@yesno = ( "1", $text{ 'hdparm_on' }, "0", $text{ 'hdparm_off' } );
local $qdevice = quotemeta($d->{'device'});

foreach $argument ( 'a', 'd', 'r', 'k', 'u', 'm', 'c' )
{
    local $qargument = quotemeta($argument);
    $out = `hdparm -$qargument $qdevice`;
    if ($out =~ /\s+=\s+(\S+)/) {
	$hdparm{ $argument } = $1;
	}
    #( $_, $line ) = split( /=/, `hdparm -$argument $d->{'device'}` );
    #$line =~ s/ {1,}//;
    #( $hdparm{ $argument } ) = split( / /, $line );
}

# Javascript for slider
print(
"<script type=\"text/javascript\" src=\"range.js\"></script>
<script type=\"text/javascript\" src=\"timer.js\"></script>
<script type=\"text/javascript\" src=\"slider.js\"></script>
<link type=\"text/css\" rel=\"StyleSheet\" href=\"winclassic.css\" />");

# Form header
print &ui_form_start("apply_hdparm.cgi");
print &ui_hidden("drive", $d->{'device'});
print &ui_table_start($text{'hdparm_label'}, "width=100%", 4);

# Transfer mode
print &ui_table_row(&hlink($text{'hdparm_conf_X'}, 'X'),
	&ui_select("X", $hdparm{'X'},
		[ [ "0", $text{ 'hdparm_conf_X_defaut' } ], [ "1", $text{ 'hdparm_conf_X_disable' } ], [ "9", "PIO mode 1", ], [ "10", "PIO mode 2" ], [ "11", "PIO mode 3" ], [ "12", "PIO mode 4" ], [ "32", "Multimode DMA 0" ], [ "33", "Multimode DMA 1" ], [ "34", "Multimode DMA 2" ], [ "64", "Ultra DMA 0" ], [ "65", "Ultra DMA 1" ], [ "66", "Ultra DMA 2" ] ], 1, 0, 1));

# Sector count
print &ui_table_row(&hlink($text{'hdparm_conf_a'}, 'sector_count'),
	&ui_textbox("a", $hdparm{'a'}, 2));

# Other yes/no options
foreach $o ('d', 'A', 'W', 'u', 'k', 'K', 'r', 'P') {
	if ($o eq 'k') {
		print &ui_table_row(&hlink($text{'hdparm_conf_'.$o}, 'keep_settings'),
			&ui_yesno_radio($o, $hdparm{$o}));
		}
	else {
		print &ui_table_row(&hlink($text{'hdparm_conf_'.$o}, $o),
			&ui_yesno_radio($o, $hdparm{$o}));
		}
	}

# Standby timeout (slider)
print &ui_table_row(&hlink($text{'hdparm_conf_S'}, 'S'),
	&p_slider( "S", 0, 251, 0), 3);

# 32-bit I/O support
print &ui_table_row(&hlink($text{'hdparm_conf_c'}, 'c'),
	&ui_radio('c', $hdparm{'c'},
		  [ [ 0, $text{'hdparm_disable'} ],
		    [ 1, $text{'hdparm_enable'} ],
		    [ 3, $text{'hdparm_enable_special'} ] ]), 3);

# Sector count for multiple sector I/O
print &ui_table_row(&hlink($text{'hdparm_conf_m'}, 'm'),
	&ui_radio('m', $hdparm{'m'},
		  [ [ 0, $text{'hdparm_disable'} ],
		    [ 2 ], [ 4 ], [ 8 ], [ 16 ], [ 32 ] ]), 3);

print &ui_table_end();
print &ui_form_end([ [ 'action', $text{'hdparm_apply'} ],
		     [ 'action', $text{'hdparm_speed'} ] ]);

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

# Javascript for slider
print "<script type=\"text/javascript\">

var sliderEl = document.getElementById ?
                  document.getElementById(\"S-slider\") : null;
var inputEl = document.forms[0][\"S\"];

var s = new Slider(sliderEl, inputEl);

s.onchange = function () {
	var flag = s.getValue();
	var t_sec = 0;
	if (flag < 241) {
		t_sec = flag * 5;
	} else {
		t_sec = (flag -240) * 30 * 60;
	}

if (t_sec == 0) {
		document.getElementById(\"S-text-id\").value = \"always on\";
	} else {
		document.getElementById(\"S-text-id\").value = format_time(t_sec);
	}
};

s.setValue(0);
s.setMinimum(0);
s.setMaximum(251);

</script>";

# Returns a slider
sub p_slider
{
   my ( $name, $min, $max, $default ) = @_;
   local $out;

$out .= "<div class=\"slider\" id=\"". $name ."-slider\" tabIndex=\"1\">";
   $out .= "<input class=\"slider-input\" id=\"".$name."-slider-input\"";
   $out .= " name=\"".$name."\"/></div>";
   $out .= "<input type=text name=\"".$name."-text\" id=\"".$name."-text-id\" readonly value=\"This field is not used\" >";

return $out;
}