Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
apply.cgi	219 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	630 B	-rwxr-xr-x	2026-07-17 21:17
config	479 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	415 B	-rw-r--r--	2026-07-17 21:17
config-generic-linux	322 B	-rw-r--r--	2026-07-17 21:17
config-slackware-linux	322 B	-rw-r--r--	2026-07-17 21:17
config-solaris	235 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	219 B	-rw-r--r--	2026-07-17 21:17
config.info	726 B	-rw-r--r--	2026-07-17 21:17
config.info.bg	1.28 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	846 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	676 B	-rw-r--r--	2026-07-17 21:17
config.info.de	862 B	-rw-r--r--	2026-07-17 21:17
config.info.es	524 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	483 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	798 B	-rw-r--r--	2026-07-17 21:17
config.info.no	760 B	-rw-r--r--	2026-07-17 21:17
edit_auth.cgi	944 B	-rwxr-xr-x	2026-07-17 21:22
edit_conf.cgi	6.68 KB	-rwxr-xr-x	2026-07-17 21:22
edit_node.cgi	2.96 KB	-rwxr-xr-x	2026-07-17 21:22
edit_res.cgi	2.26 KB	-rwxr-xr-x	2026-07-17 21:22
feedback_files.pl	110 B	-rwxr-xr-x	2026-07-17 21:17
heartbeat-lib.pl	4.79 KB	-rwxr-xr-x	2026-07-17 21:17
index.cgi	3.3 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	564 B	-rwxr-xr-x	2026-07-17 21:17
module.info	200 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	178 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	248 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	135 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	22 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	26 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	138 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	124 B	-rw-r--r--	2026-07-17 21:17
module.info.de	129 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	19 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	260 B	-rw-r--r--	2026-07-17 21:17
module.info.es	26 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	143 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	181 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	140 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	168 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	147 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	159 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	151 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	190 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	169 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	121 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	18 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	25 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	112 B	-rw-r--r--	2026-07-17 21:17
module.info.no	29 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	147 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	166 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	175 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	237 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	141 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	134 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	159 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	220 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	118 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	127 B	-rw-r--r--	2026-07-17 21:17
save_auth.cgi	469 B	-rwxr-xr-x	2026-07-17 21:22
save_conf.cgi	3.56 KB	-rwxr-xr-x	2026-07-17 21:22
save_node.cgi	1.27 KB	-rwxr-xr-x	2026-07-17 21:22
start.cgi	246 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# index.cgi
# Display heartbeat option categories

require './heartbeat-lib.pl';

# Try to work out the version number
$heartbeat_version = undef;
if ($config{'version'}) {
	$heartbeat_version = $config{'version'};
	}
elsif (&backquote_command("($config{'heartbeat'} -V) </dev/null 2>&1") =~
       /(\S+)/) {
	$heartbeat_version = $1;
	}
elsif (&foreign_check("software")) {
	&foreign_require("software", "software-lib.pl");
	local @pinfo = &software::package_info("heartbeat");
	if (@pinfo) {
		$heartbeat_version = $pinfo[4];
		$heartbeat_version =~ s/-.*$//;
		}
	}
&open_tempfile(VERSION, ">$module_config_directory/version");
&print_tempfile(VERSION, $heartbeat_version,"\n");
&close_tempfile(VERSION);

&ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0,
	&help_search_link("heartbeat", "man", "doc"),
	undef, undef, $heartbeat_version ? &text('index_version',
						 $heartbeat_version) : undef);

# Check if heartbeat is installed
if (!-d $config{'ha_dir'}) {
	print &text('index_edir', "<tt>$config{'ha_dir'}</tt>",
		  "@{[&get_webprefix()]}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}

# Check if the config files exist, or if they can be copied
if (!-r $ha_cf && -r $config{'alt_ha_cf'}) {
	system("cp '$config{'alt_ha_cf'}' $ha_cf");
	}
if (!-r $ha_cf) {
	print &text('index_eha_cf', "<tt>$ha_cf</tt>",
		  "@{[&get_webprefix()]}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}

if (!-r $haresources && -r $config{'alt_haresources'}) {
	system("cp '$config{'alt_haresources'}' '$haresources'");
	}
if (!-r $haresources) {
	print &text('index_eharesources', "<tt>$haresources</tt>",
		  "@{[&get_webprefix()]}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}

if (!-r $authkeys && -r $config{'alt_authkeys'}) {
	system("cp '$config{'alt_authkeys'}' '$authkeys'");
	}
if (!-r $authkeys) {
	print &text('index_eauthkeys', "<tt>$authkeys</tt>",
		  "@{[&get_webprefix()]}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}
if (!-r $config{'req_resource_cmd'}) {
	print &text('index_ereq_resource_cmd', "<tt>$config{'req_resource_cmd'}</tt>",
		  "@{[&get_webprefix()]}/config.cgi?$module_name"),"<p>\n";
	&ui_print_footer("/", $text{'index'});
	exit;
	}

@opts = ( 'conf', 'res','auth' );
@links = map { "edit_${_}.cgi" } @opts;
@titles = map { $text{"${_}_title"} } @opts;
@icons = map { "images/${_}.gif" } @opts;
&icons_table(\@links, \@titles, \@icons);

print &ui_hr();
print "<table width=100%><tr>\n";

# Show status
$status = `($config{'heartbeat'} -s) </dev/null 2>&1`;
print "<tr> <td><b>$text{'index_status'}</b></td>\n";
print "<td><tt>$status</tt></td> </tr>\n";

# Show start/stop button
if (&check_pid_file($config{'pid_file'})) {
	print "<form action=apply.cgi>\n";
	print "<td><input type=submit value='$text{'index_apply'}'></td>\n";
	print "<td>$text{'index_applymsg'}</td>\n";
	print "</form>\n";
	}
else {
	print "<form action=start.cgi>\n";
	print "<td><input type=submit value='$text{'index_start'}'></td>\n";
	print "<td>$text{'index_startmsg'}</td>\n";
	print "</form>\n";
	}

print "</tr></table>\n";

if (!$heartbeat_version) {
	print "<center><b>",&text('index_noversion', "../config.cgi?$module_name"),"</b></center>\n";
	}

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