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
old	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	5.45 KB	-rw-r--r--	2026-07-17 21:17
acl_security.pl	2.82 KB	-rwxr-xr-x	2026-07-17 21:17
backup.cgi	5.2 KB	-rwxr-xr-x	2026-07-17 21:22
backup.pl	1.95 KB	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	643 B	-rwxr-xr-x	2026-07-17 21:17
backup_form.cgi	4.74 KB	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	993 B	-rwxr-xr-x	2026-07-17 21:17
config	501 B	-rw-r--r--	2026-07-17 21:17
config-AlmaLinux-7.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-Amazon-Linux-2-ALL	484 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Linux-7.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Stream-Linux-8.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-CloudLinux-8.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-Oracle-Linux-8.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-Redhat-Enterprise-Linux-7.0-ALL	484 B	-rw-r--r--	2026-07-17 21:17
config-Rocky-Linux-7.0-ALL	530 B	-rw-r--r--	2026-07-17 21:17
config-Scientific-Linux-7.0-ALL	484 B	-rw-r--r--	2026-07-17 21:17
config-cobalt-linux	435 B	-rw-r--r--	2026-07-17 21:17
config-coherent-linux	507 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	416 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-10.0-ALL	417 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-4.0-9.0	425 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	588 B	-rw-r--r--	2026-07-17 21:17
config-freebsd-8-ALL	580 B	-rw-r--r--	2026-07-17 21:17
config-gentoo-linux	429 B	-rw-r--r--	2026-07-17 21:17
config-mandrake-linux	435 B	-rw-r--r--	2026-07-17 21:17
config-msc-linux	441 B	-rw-r--r--	2026-07-17 21:17
config-netbsd	454 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	453 B	-rw-r--r--	2026-07-17 21:17
config-openmamba-linux	444 B	-rw-r--r--	2026-07-17 21:17
config-pardus-linux	431 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	444 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-10.0-23.0	772 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-24.0-ALL	500 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-7.0-7.2	493 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-7.3	507 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-7.4-9.0	507 B	-rw-r--r--	2026-07-17 21:17
config-sol-linux	462 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	448 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux-7.0	457 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux-7.1-9.0	459 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux-9.1-ALL	459 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	454 B	-rw-r--r--	2026-07-17 21:17
config-trustix-linux	619 B	-rw-r--r--	2026-07-17 21:17
config-united-linux	459 B	-rw-r--r--	2026-07-17 21:17
config-windows	510 B	-rw-r--r--	2026-07-17 21:17
config.info	1.68 KB	-rw-r--r--	2026-07-17 21:17
config.info.bg	2.69 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	1.68 KB	-rw-r--r--	2026-07-17 21:17
config.info.cs	729 B	-rw-r--r--	2026-07-17 21:17
config.info.de	1.62 KB	-rw-r--r--	2026-07-17 21:17
config.info.es	559 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	1.85 KB	-rw-r--r--	2026-07-17 21:17
config.info.ja	1.68 KB	-rw-r--r--	2026-07-17 21:17
config.info.ko	1.42 KB	-rw-r--r--	2026-07-17 21:17
config.info.nl	1.6 KB	-rw-r--r--	2026-07-17 21:17
config.info.no	1.56 KB	-rw-r--r--	2026-07-17 21:17
config.info.pl	521 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	950 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	459 B	-rw-r--r--	2026-07-17 21:17
config.info.tr	1.31 KB	-rw-r--r--	2026-07-17 21:17
config.info.uk	980 B	-rw-r--r--	2026-07-17 21:17
config.info.zh	328 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	426 B	-rw-r--r--	2026-07-17 21:17
cpan_modules.pl	86 B	-rwxr-xr-x	2026-07-17 21:17
create_table.cgi	1.18 KB	-rwxr-xr-x	2026-07-17 21:22
csv.cgi	2 KB	-rwxr-xr-x	2026-07-17 21:22
csv_form.cgi	1.68 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	99 B	-rw-r--r--	2026-07-17 21:17
delete_fields.cgi	629 B	-rwxr-xr-x	2026-07-17 21:22
delete_grants.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
delete_groups.cgi	548 B	-rwxr-xr-x	2026-07-17 21:22
delete_hosts.cgi	478 B	-rwxr-xr-x	2026-07-17 21:22
delete_users.cgi	442 B	-rwxr-xr-x	2026-07-17 21:22
down.cgi	602 B	-rwxr-xr-x	2026-07-17 21:22
download.cgi	1.07 KB	-rwxr-xr-x	2026-07-17 21:22
drop_dbase.cgi	1.19 KB	-rwxr-xr-x	2026-07-17 21:22
drop_dbases.cgi	1.25 KB	-rwxr-xr-x	2026-07-17 21:22
drop_table.cgi	1.1 KB	-rwxr-xr-x	2026-07-17 21:22
drop_tables.cgi	1.72 KB	-rwxr-xr-x	2026-07-17 21:22
edit_dbase.cgi	7.63 KB	-rwxr-xr-x	2026-07-17 21:22
edit_field.cgi	2.42 KB	-rwxr-xr-x	2026-07-17 21:22
edit_grant.cgi	2.72 KB	-rwxr-xr-x	2026-07-17 21:22
edit_group.cgi	1.84 KB	-rwxr-xr-x	2026-07-17 21:22
edit_host.cgi	4.04 KB	-rwxr-xr-x	2026-07-17 21:22
edit_index.cgi	2 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	541 B	-rwxr-xr-x	2026-07-17 21:22
edit_seq.cgi	2.1 KB	-rwxr-xr-x	2026-07-17 21:22
edit_table.cgi	2.71 KB	-rwxr-xr-x	2026-07-17 21:22
edit_user.cgi	2.58 KB	-rwxr-xr-x	2026-07-17 21:22
edit_view.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
exec.cgi	1.51 KB	-rwxr-xr-x	2026-07-17 21:22
exec_file.cgi	2.05 KB	-rwxr-xr-x	2026-07-17 21:22
exec_form.cgi	3.15 KB	-rwxr-xr-x	2026-07-17 21:22
import.cgi	2.46 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	9.81 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	477 B	-rwxr-xr-x	2026-07-17 21:17
list_grants.cgi	3.41 KB	-rwxr-xr-x	2026-07-17 21:22
list_groups.cgi	1.36 KB	-rwxr-xr-x	2026-07-17 21:22
list_hosts.cgi	2.47 KB	-rwxr-xr-x	2026-07-17 21:22
list_users.cgi	1.96 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	2.41 KB	-rwxr-xr-x	2026-07-17 21:17
login.cgi	829 B	-rwxr-xr-x	2026-07-17 21:22
module.info	269 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	224 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	243 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	19 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	0 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	156 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	143 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	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	235 B	-rw-r--r--	2026-07-17 21:17
module.info.es	45 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	121 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	161 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	222 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	156 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	48 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	143 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	180 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	41 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	135 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	141 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	48 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	144 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	45 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	141 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	19 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	35 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	105 B	-rw-r--r--	2026-07-17 21:17
module.info.no	34 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	107 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	39 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	119 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	169 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	178 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	52 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	193 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	161 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	33 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	109 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	168 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	228 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	38 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	102 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	40 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	108 B	-rw-r--r--	2026-07-17 21:17
newdb.cgi	1.19 KB	-rwxr-xr-x	2026-07-17 21:22
newdb_form.cgi	1.36 KB	-rwxr-xr-x	2026-07-17 21:22
postgresql-lib.pl	35.88 KB	-rwxr-xr-x	2026-07-17 21:17
prefs.info	69 B	-rw-r--r--	2026-07-17 21:17
restore.cgi	1.99 KB	-rwxr-xr-x	2026-07-17 21:22
restore_form.cgi	1.42 KB	-rwxr-xr-x	2026-07-17 21:22
save_field.cgi	1.05 KB	-rwxr-xr-x	2026-07-17 21:22
save_grant.cgi	1.65 KB	-rwxr-xr-x	2026-07-17 21:22
save_group.cgi	3.54 KB	-rwxr-xr-x	2026-07-17 21:22
save_host.cgi	3.4 KB	-rwxr-xr-x	2026-07-17 21:22
save_index.cgi	1.45 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	330 B	-rwxr-xr-x	2026-07-17 21:22
save_seq.cgi	2.57 KB	-rwxr-xr-x	2026-07-17 21:22
save_sync.cgi	335 B	-rwxr-xr-x	2026-07-17 21:22
save_user.cgi	1.83 KB	-rwxr-xr-x	2026-07-17 21:22
save_view.cgi	1.37 KB	-rwxr-xr-x	2026-07-17 21:22
search_form.cgi	1.38 KB	-rwxr-xr-x	2026-07-17 21:22
setup.cgi	292 B	-rwxr-xr-x	2026-07-17 21:22
start.cgi	284 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	278 B	-rwxr-xr-x	2026-07-17 21:22
table_form.cgi	1.9 KB	-rwxr-xr-x	2026-07-17 21:22
up.cgi	598 B	-rwxr-xr-x	2026-07-17 21:22
useradmin_update.pl	2.1 KB	-rwxr-xr-x	2026-07-17 21:17
view-lib.pl	3.56 KB	-rwxr-xr-x	2026-07-17 21:17
view_table.cgi	15.16 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Export the CSV

require './postgresql-lib.pl';
&ReadParse();
&error_setup($text{'csv_err'});
&can_edit_db($in{'db'}) || &error($text{'dbase_ecannot'});
$access{'edonly'} && &error($text{'dbase_ecannot'});

# Validate inputs
if ($in{'dest'}) {
	$in{'file'} =~ /^([a-z]:)?\/\S/ || &error($text{'csv_efile'});
	$access{'backup'} || &error($text{'cvs_ebuser'});
	}
if (!$in{'where_def'}) {
	$in{'where'} =~ /\S/ || &error($text{'csv_ewhere'});
	}

# Execute the SQL
@cols = split(/\0/, $in{'cols'});
@cols || &error($text{'csv_ecols'});
$cmd = "select ".join(",", @cols)." from ".&quote_table($in{'table'});
if (!$in{'where_def'}) {
	$cmd .= " where ".$in{'where'};
	}
$rv = &execute_sql($in{'db'}, $cmd);

# Open the destination
if (!$in{'dest'}) {
	print "Content-type: text/plain\n\n";
	$fh = STDOUT;
	}
else {
	# Open target file directly
	&open_tempfile(OUT, ">$in{'file'}");
	$fh = OUT;
	}

# Send the data
if ($in{'headers'}) {
	unshift(@{$rv->{'data'}}, $rv->{'titles'});
	}
foreach $r (@{$rv->{'data'}}) {
	if ($in{'format'} == 0) {
		print $fh join(",", map { "\"".&quote_csv($_, "\"\n")."\"" } @$r);
		}
	elsif ($in{'format'} == 1) {
		print $fh join(",", map { &quote_csv($_, ",\n") } @$r);
		}
	elsif ($in{'format'} == 2) {
		print $fh join("\t", map { &quote_csv($_, "\t\n") } @$r);
		}
	print $fh "\n";
	}

# All done .. tell the user
if ($in{'dest'}) {
	&close_tempfile(OUT);
	$desc = &text('table_header', "<tt>$in{'table'}</tt>", "<tt>$in{'db'}</tt>");
	&ui_print_header($desc, $text{'csv_title'}, "", "csv");

@st = stat($in{'file'});
	print &text('csv_done', "<tt>$in{'file'}</tt>",
				&nice_size($st[7])),"<p>\n";

&ui_print_footer("edit_dbase.cgi?db=$in{'db'}", $text{'dbase_return'},
		&get_databases_return_link($in{'db'}), $text{'index_return'});
	}

sub quote_csv
{
local ($str, $q) = @_;
$str =~ s/\r//g;
foreach my $c (split(//, $q)) {
	local $qc = $c eq "\"" ? "\\\"" :
		    $c eq "\n" ? "\\n" :
		    $c eq "," ? "\\," :
		    $c eq "\t" ? "\\t" : $c;
	$str =~ s/\Q$c\E/$qc/g;
	}
return $str;
}