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
unauthenticated	[ DIR ]	drwxr-xr-x	2025-02-07 09:25
CHANGELOG	9.22 KB	-rw-r--r--	2026-07-19 16:26
acl_security.pl	2.61 KB	-rw-r--r--	2026-07-19 16:26
bookmark.cgi	325 B	-rwxr-xr-x	2026-07-19 16:28
chattr.cgi	833 B	-rwxr-xr-x	2026-07-19 16:28
chcon.cgi	749 B	-rwxr-xr-x	2026-07-19 16:28
chmod.cgi	2.57 KB	-rwxr-xr-x	2026-07-19 16:28
chown.cgi	1.13 KB	-rwxr-xr-x	2026-07-19 16:28
compress.cgi	1.56 KB	-rwxr-xr-x	2026-07-19 16:28
config	20 B	-rw-r--r--	2026-07-19 16:26
config.cgi	2.68 KB	-rwxr-xr-x	2026-07-19 16:28
config.info	260 B	-rw-r--r--	2026-07-19 16:26
config.info.ar	97 B	-rw-r--r--	2026-07-19 16:26
config.info.ca	52 B	-rw-r--r--	2026-07-19 16:26
config.info.de	61 B	-rw-r--r--	2026-07-19 16:26
config.info.fr	60 B	-rw-r--r--	2026-07-19 16:26
config.info.it	199 B	-rw-r--r--	2026-07-19 16:26
config.info.uk	260 B	-rw-r--r--	2026-07-19 16:26
copy.cgi	442 B	-rwxr-xr-x	2026-07-19 16:28
create_file.cgi	592 B	-rwxr-xr-x	2026-07-19 16:28
create_folder.cgi	582 B	-rwxr-xr-x	2026-07-19 16:28
cut.cgi	441 B	-rwxr-xr-x	2026-07-19 16:28
defaultacl	398 B	-rw-r--r--	2026-07-19 16:26
defaultuconf	180 B	-rw-r--r--	2026-07-19 16:26
delete.cgi	466 B	-rwxr-xr-x	2026-07-19 16:28
download.cgi	801 B	-rwxr-xr-x	2026-07-19 16:28
edit_file.cgi	1.74 KB	-rwxr-xr-x	2026-07-19 16:28
extract.cgi	1.49 KB	-rwxr-xr-x	2026-07-19 16:28
filemin-lib.pl	29.34 KB	-rw-r--r--	2026-07-19 16:26
http_download.cgi	1.84 KB	-rwxr-xr-x	2026-07-19 16:28
index.cgi	3.33 KB	-rwxr-xr-x	2026-07-19 16:28
module.info	137 B	-rw-r--r--	2026-07-19 16:26
module.info.ar	116 B	-rw-r--r--	2026-07-19 16:26
module.info.ar.auto	32 B	-rw-r--r--	2026-07-19 16:26
module.info.bg	0 B	-rw-r--r--	2026-07-19 16:26
module.info.bg.auto	164 B	-rw-r--r--	2026-07-19 16:26
module.info.ca	89 B	-rw-r--r--	2026-07-19 16:26
module.info.ca.auto	24 B	-rw-r--r--	2026-07-19 16:26
module.info.cs	0 B	-rw-r--r--	2026-07-19 16:26
module.info.cs.auto	115 B	-rw-r--r--	2026-07-19 16:26
module.info.da	0 B	-rw-r--r--	2026-07-19 16:26
module.info.da.auto	101 B	-rw-r--r--	2026-07-19 16:26
module.info.de	88 B	-rw-r--r--	2026-07-19 16:26
module.info.de.auto	21 B	-rw-r--r--	2026-07-19 16:26
module.info.el	0 B	-rw-r--r--	2026-07-19 16:26
module.info.el.auto	209 B	-rw-r--r--	2026-07-19 16:26
module.info.es	0 B	-rw-r--r--	2026-07-19 16:26
module.info.es.auto	140 B	-rw-r--r--	2026-07-19 16:26
module.info.eu	0 B	-rw-r--r--	2026-07-19 16:26
module.info.eu.auto	131 B	-rw-r--r--	2026-07-19 16:26
module.info.fa	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fa.auto	137 B	-rw-r--r--	2026-07-19 16:26
module.info.fi	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fi.auto	110 B	-rw-r--r--	2026-07-19 16:26
module.info.fr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.fr.auto	136 B	-rw-r--r--	2026-07-19 16:26
module.info.hr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.hr.auto	118 B	-rw-r--r--	2026-07-19 16:26
module.info.hu	0 B	-rw-r--r--	2026-07-19 16:26
module.info.hu.auto	109 B	-rw-r--r--	2026-07-19 16:26
module.info.it	104 B	-rw-r--r--	2026-07-19 16:26
module.info.ja	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ja.auto	137 B	-rw-r--r--	2026-07-19 16:26
module.info.ko	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ko.auto	118 B	-rw-r--r--	2026-07-19 16:26
module.info.ms	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ms.auto	113 B	-rw-r--r--	2026-07-19 16:26
module.info.nl	0 B	-rw-r--r--	2026-07-19 16:26
module.info.nl.auto	108 B	-rw-r--r--	2026-07-19 16:26
module.info.no	22 B	-rw-r--r--	2026-07-19 16:26
module.info.no.auto	75 B	-rw-r--r--	2026-07-19 16:26
module.info.pl	96 B	-rw-r--r--	2026-07-19 16:26
module.info.pl.auto	115 B	-rw-r--r--	2026-07-19 16:26
module.info.pt	0 B	-rw-r--r--	2026-07-19 16:26
module.info.pt.auto	133 B	-rw-r--r--	2026-07-19 16:26
module.info.pt_BR	0 B	-rw-r--r--	2026-07-19 16:26
module.info.pt_BR.auto	142 B	-rw-r--r--	2026-07-19 16:26
module.info.ru	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ru.auto	194 B	-rw-r--r--	2026-07-19 16:26
module.info.sk	0 B	-rw-r--r--	2026-07-19 16:26
module.info.sk.auto	126 B	-rw-r--r--	2026-07-19 16:26
module.info.sv	0 B	-rw-r--r--	2026-07-19 16:26
module.info.sv.auto	99 B	-rw-r--r--	2026-07-19 16:26
module.info.tr	0 B	-rw-r--r--	2026-07-19 16:26
module.info.tr.auto	121 B	-rw-r--r--	2026-07-19 16:26
module.info.uk	367 B	-rw-r--r--	2026-07-19 16:26
module.info.uk.auto	188 B	-rw-r--r--	2026-07-19 16:26
module.info.zh	0 B	-rw-r--r--	2026-07-19 16:26
module.info.zh.auto	101 B	-rw-r--r--	2026-07-19 16:26
module.info.zh_TW	0 B	-rw-r--r--	2026-07-19 16:26
module.info.zh_TW.auto	110 B	-rw-r--r--	2026-07-19 16:26
paste.cgi	1.57 KB	-rwxr-xr-x	2026-07-19 16:28
prefs.info	10 B	-rw-r--r--	2026-07-19 16:26
rename.cgi	742 B	-rwxr-xr-x	2026-07-19 16:28
safeacl	50 B	-rw-r--r--	2026-07-19 16:26
save_config.cgi	1.02 KB	-rwxr-xr-x	2026-07-19 16:28
save_file.cgi	802 B	-rwxr-xr-x	2026-07-19 16:28
search.cgi	567 B	-rwxr-xr-x	2026-07-19 16:28
setfacl.cgi	1.57 KB	-rwxr-xr-x	2026-07-19 16:28
upload.cgi	5.54 KB	-rwxr-xr-x	2026-07-19 16:28

Rename

#!/usr/bin/perl

require './filemin-lib.pl';

&ReadParse();
my %download_access = &get_module_acl(undef, "");
get_paths();

if (!$in{'link'}) {
	&redirect("index.cgi?path=".&urlize($path));
	return;
	}

my $mode;
my @errors;

my ($host, $port, $page, $ssl) =
	&parse_http_url($in{'link'});
if (!$host) {
	# Not an HTTP or FTP URL
	push(@errors, $text{'error_invalid_uri'});
	}
else {
	# Looks like a valid URL
	my $file = $page;
	$file =~ s/^.*\///;
	$file ||= "index.html";
	my $full = &validate_filename_path($file);

if (-e $full) {
		push @errors,
			"$file " .
			"$text{'file_already_exists'} " .
			"$path";
		}
	else {
		&ui_print_header(
			undef,
			$text{'http_downloading'}, "");

$progress_callback_url = $in{'link'};
		my @st = stat($cwd);
		my $address_checker = &get_download_address_callback(
			$download_access{'download_address_mode'},
			$download_access{'download_allowed_addresses'});
		my $download_callback = sub {
			if ($_[0] == 7 && defined($_[1]) && $address_checker) {
				my $address_error = &$address_checker(
					$host, [ $_[1] ]);
				&error(&html_escape($address_error)) if ($address_error);
				}
			&progress_callback(@_);
			};
		if ($ssl == 0 || $ssl == 1) {
			# HTTP or HTTPS download
			&http_download(
				$host, $port, $page,
				$full, undef,
				$download_callback,
				$ssl, $in{'username'},
				$in{'password'});
			}
		else {
			# Actually an FTP download
			&ftp_download(
				$host, $page, $full,
				undef,
				$download_callback,
				$in{'username'},
				$in{'password'}, $port);
			}
		&set_ownership_permissions(
			$st[4], $st[5], undef, $full);
		@st = stat($cwd);
		print &text('http_done',
			&nice_size($st[7]),
			"<tt>".&html_escape($full).
			"</tt>"),"\n";
		&ui_print_footer(
			"index.cgi?path=".&urlize($path),
			$text{'previous_page'});
		}
	}

if (scalar(@errors) > 0) {
	print_errors(@errors);
	}