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.73 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	1.59 KB	-rwxr-xr-x	2026-07-17 21:17
backup_config.pl	686 B	-rwxr-xr-x	2026-07-17 21:17
cgi_args.pl	325 B	-rwxr-xr-x	2026-07-17 21:17
config-cobalt-linux	132 B	-rw-r--r--	2026-07-17 21:17
config-coherent-linux	186 B	-rw-r--r--	2026-07-17 21:17
config-corel-linux	160 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	206 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	172 B	-rw-r--r--	2026-07-17 21:17
config-generic-linux	133 B	-rw-r--r--	2026-07-17 21:17
config-gentoo-linux	169 B	-rw-r--r--	2026-07-17 21:17
config-hpux	172 B	-rw-r--r--	2026-07-17 21:17
config-lfs-linux	154 B	-rw-r--r--	2026-07-17 21:17
config-macos	150 B	-rw-r--r--	2026-07-17 21:17
config-mandrake-linux	186 B	-rw-r--r--	2026-07-17 21:17
config-msc-linux	186 B	-rw-r--r--	2026-07-17 21:17
config-netbsd	172 B	-rw-r--r--	2026-07-17 21:17
config-open-linux	158 B	-rw-r--r--	2026-07-17 21:17
config-open-linux-3.1e	177 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	162 B	-rw-r--r--	2026-07-17 21:17
config-openbsd	172 B	-rw-r--r--	2026-07-17 21:17
config-openmamba-linux	162 B	-rw-r--r--	2026-07-17 21:17
config-osf1	230 B	-rw-r--r--	2026-07-17 21:17
config-pardus-linux	133 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	162 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-5.0-6.0	191 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-6.1-ALL	186 B	-rw-r--r--	2026-07-17 21:17
config-slackware-linux	133 B	-rw-r--r--	2026-07-17 21:17
config-sol-linux	292 B	-rw-r--r--	2026-07-17 21:17
config-solaris	205 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	162 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	133 B	-rw-r--r--	2026-07-17 21:17
config-trustix-linux	186 B	-rw-r--r--	2026-07-17 21:17
config-turbo-linux	191 B	-rw-r--r--	2026-07-17 21:17
config-turbo-linux-4.0	191 B	-rw-r--r--	2026-07-17 21:17
config-united-linux	162 B	-rw-r--r--	2026-07-17 21:17
config.info	800 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	1 KB	-rw-r--r--	2026-07-17 21:17
config.info.cs	747 B	-rw-r--r--	2026-07-17 21:17
config.info.de	959 B	-rw-r--r--	2026-07-17 21:17
config.info.es	431 B	-rw-r--r--	2026-07-17 21:17
config.info.fa	1010 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	400 B	-rw-r--r--	2026-07-17 21:17
config.info.ja	760 B	-rw-r--r--	2026-07-17 21:17
config.info.ko	565 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	654 B	-rw-r--r--	2026-07-17 21:17
config.info.no	668 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	475 B	-rw-r--r--	2026-07-17 21:17
config.info.pt_BR	701 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	736 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	369 B	-rw-r--r--	2026-07-17 21:17
config.info.tr	579 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	741 B	-rw-r--r--	2026-07-17 21:17
config.info.zh	347 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	403 B	-rw-r--r--	2026-07-17 21:17
create_swap.cgi	466 B	-rwxr-xr-x	2026-07-17 21:22
defaultacl	60 B	-rw-r--r--	2026-07-17 21:17
edit_mount.cgi	4.11 KB	-rwxr-xr-x	2026-07-17 21:22
freebsd-lib.pl	33.64 KB	-rwxr-xr-x	2026-07-17 21:17
hpux-lib.pl	36 KB	-rwxr-xr-x	2026-07-17 21:17
index.cgi	4.31 KB	-rwxr-xr-x	2026-07-17 21:22
linux-lib.pl	72.79 KB	-rwxr-xr-x	2026-07-17 21:17
log_parser.pl	626 B	-rwxr-xr-x	2026-07-17 21:17
macos-lib.pl	5 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	292 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	190 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	28 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	281 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	161 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	25 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	48 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	142 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	162 B	-rw-r--r--	2026-07-17 21:17
module.info.de	162 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	28 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	322 B	-rw-r--r--	2026-07-17 21:17
module.info.es	43 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	151 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	169 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	203 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	191 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	37 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	161 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	192 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	35 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	139 B	-rw-r--r--	2026-07-17 21:17
module.info.it	22 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	126 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	75 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	202 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	51 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	170 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	144 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	24 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	41 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	129 B	-rw-r--r--	2026-07-17 21:17
module.info.no	39 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	44 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	131 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	45 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	143 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	47 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	149 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	40 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	211 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	207 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	43 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	124 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	146 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	291 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	36 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	126 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	39 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	132 B	-rw-r--r--	2026-07-17 21:17
mount-lib.pl	11.17 KB	-rwxr-xr-x	2026-07-17 21:17
mount.cgi	465 B	-rwxr-xr-x	2026-07-17 21:22
netbsd-lib.pl	24.79 KB	-rwxr-xr-x	2026-07-17 21:17
netbsd-mounts-2.c	1.04 KB	-rw-r--r--	2026-07-17 21:17
netbsd-mounts-3.c	1.09 KB	-rw-r--r--	2026-07-17 21:17
netbsd-mounts.c	1.08 KB	-rw-r--r--	2026-07-17 21:17
nfs_export.cgi	1.13 KB	-rwxr-xr-x	2026-07-17 21:22
nfs_server.cgi	1.79 KB	-rwxr-xr-x	2026-07-17 21:22
openbsd-lib.pl	24.52 KB	-rwxr-xr-x	2026-07-17 21:17
osf1-lib.pl	11.41 KB	-rwxr-xr-x	2026-07-17 21:17
prefs.info	49 B	-rw-r--r--	2026-07-17 21:17
rbac-mapping	135 B	-rw-r--r--	2026-07-17 21:17
save_mount.cgi	13.23 KB	-rwxr-xr-x	2026-07-17 21:22
smb_server.cgi	1.94 KB	-rwxr-xr-x	2026-07-17 21:22
smb_share.cgi	1.33 KB	-rwxr-xr-x	2026-07-17 21:22
solaris-lib.pl	56.81 KB	-rwxr-xr-x	2026-07-17 21:17
system_info.pl	3.61 KB	-rw-r--r--	2026-07-17 21:17
unmount.cgi	503 B	-rwxr-xr-x	2026-07-17 21:22

Rename

# macos-lib.pl
# Mount table functions for OSX
# Only options for currently mounted filesystems are supported at the moment.

use POSIX;

# list_mounted()
# Return a list of all the currently mounted filesystems and swap files.
# The list is in the form:
#  directory device type options
# Under FreeBSD, there seems to be no way to get additional mount options
# used by filesystems like NFS etc. Even getting the full details of mounted
# filesystems requires C code! So we have to call a specially-written external
# program to get the mount list
sub list_mounted
{
# get the list of mounted filesystems
local(@rv, $_);
local $arch = &backquote_command("uname -m");
local $cmd;
if ($arch =~ /arm64|x86_64/) {
	my $expand_flags = sub {
		my ($flags_str) = @_;
		my @flags;
		push(@flags, "ro")       if ($flags_str =~ /\bread-only\b/);
		push(@flags, "noexec")   if ($flags_str =~ /\bnoexec\b/);
		push(@flags, "nosuid")   if ($flags_str =~ /\bnosuid\b/);
		push(@flags, "nodev")    if ($flags_str =~ /\bnodev\b/);
		push(@flags, "sync")     if ($flags_str =~ /\bsynchronous\b/);
		push(@flags, "async")    if ($flags_str =~ /\basynchronous\b/);
		push(@flags, "quota")    if ($flags_str =~ /\bquota\b/);
		push(@flags, "union")    if ($flags_str =~ /\bunion\b/);
		return @flags ? join(",", @flags) : "-";
		};
	open(CMD, "mount |") || return @rv;
	while (<CMD>) {
		chomp;
		# Parse the mount line output
		if ($_ =~ /^(.+?) on (.+?) $(.+?)$$/) {
			my ($device, $mount_point, $type_and_flags) =
				($1, $2, $3);
			my ($fstype, $flags_str) =
				split(/, /, $type_and_flags, 2);
			my $flags = $expand_flags->($flags_str);
			push(@rv, [$mount_point, $device, $fstype,
				   "$flags, $flags_str"]);
			}
		}
	close(CMD);
	return @rv;
	}
elsif ($arch =~ /power/) {
	$cmd = "macos-mounts";
	&compile_program($cmd, '.*power.*');
	}
else {
	$cmd = "macos-mounts-intel";
	&compile_program($cmd, 'i386');
	}
open(CMD, "$module_config_directory/$cmd |");
while(<CMD>) {
	local @p = split(/\t/, $_);
	if ($p[2] eq "procfs" || $p[1] eq "procfs") { $p[1] = $p[2] = "proc"; }
	push(@rv, \@p);
	}
close(CMD);
return @rv;
}

# mount_dir(directory, device, type, options)
# Mount a new directory from some device, with some options. Returns 0 if ok,
# or an error string if failed
sub mount_dir
{
local($out, $opts, $shar, %options, %smbopts);

$opts = $_[3] eq "-" ? "" : "-o \"$_[3]\"";
$opts = join(',', grep { !/quota/ } split(/,/, $opts));
$out = &backquote_logged("mount -t $_[2] $opts $_[1] $_[0] 2>&1");
if ($?) { return "<pre>$out</pre>"; }

return 0;
}

# unmount_dir(directory, device, type)
# Unmount a directory that is currently mounted. Returns 0 if ok,
# or an error string if failed
sub unmount_dir
{
local($out, %smbopts, $dir);
$out = &backquote_logged("umount $_[0] 2>&1");
if ($?) { return "<pre>$out</pre>"; }
return 0;
}

sub list_mounts
{
return ( );
}

# mount_modes(type)
# Given a filesystem type, returns 4 numbers that determine how the file
# system can be mounted, and whether it can be fsck'd
# The first is:
#  0 - cannot be permanently recorded
#	(smbfs under linux)
#  1 - can be permanently recorded, and is always mounted at boot
#	(swap under linux)
#  2 - can be permanently recorded, and may or may not be mounted at boot
#	(most normal filesystems)
# The second is:
#  0 - mount is always permanent => mounted when saved
#	(swap under linux)
#  1 - doesn't have to be permanent
#	(normal fs types)
# The third is:
#  0 - cannot be fsck'd at boot time
#  1 - can be be fsck'd at boot
# The fourth is:
#  0 - can be unmounted
#  1 - cannot be unmounted
sub mount_modes
{
if ($_[0] eq "swap")
	{ return (2, 1, 0, 1); }
elsif ($_[0] eq "ufs")
	{ return (2, 1, 1, 0); }
else
	{ return (2, 1, 0, 0); }
}

# disk_space(type, directory)
# Returns the amount of total and free space for some filesystem, or an
# empty array if not appropriate.
sub disk_space
{
if (&get_mounted($_[1], "*") < 0) { return (); }
if ($_[0] eq "proc" || $_[0] eq "swap") { return (); }
my $out = &backquote_command("df -k ".quotemeta($_[1]), 1);
if ($out =~ /Mounted on\n\S+\s+(?<total>\S+)\s+(?<used>\S+)\s+(?<free>\S+)\s+(?<percent>\d+)/) {
	return ("$+{total}", "$+{free}", "$+{used}", "$+{percent}");
	}
return ( );
}

# list_fstypes()
# Returns an array of all the supported filesystem types. If a filesystem is
# found that is not one of the supported types, generate_location() and
# generate_options() will not be called for it.
sub list_fstypes
{
local @rv = ("ufs", "nfs", "cd9660", "msdos", "swap");
push(@rv, "ext2fs") if (&has_command("mount_ext2fs"));
push(@rv, "ntfs") if (&has_command("mount_ntfs"));
return @rv;
}

# fstype_name(type)
# Given a short filesystem type, return a human-readable name for it
sub fstype_name
{
local(%fsmap);
%fsmap = ("ufs", "FreeBSD Unix Filesystem",
	  "nfs","Network Filesystem",
	  "hfs","Macintosh Filesystem",
	  "msdos","MS-DOS Filesystem",
	  "volfs","Volumes Filesystem",
	  "swap","Virtual Memory");
return $config{long_fstypes} && $fsmap{$_[0]} ? $fsmap{$_[0]} : uc($_[0]);
}

sub device_name
{
return $_[0];
}

sub files_to_lock
{
return ( );
}