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
ulang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	1.42 KB	-rw-r--r--	2026-07-19 16:26
backup_db.cgi	8.07 KB	-rwxr-xr-x	2026-07-19 16:28
backup_form.cgi	6.84 KB	-rwxr-xr-x	2026-07-19 16:28
config	522 B	-rw-r--r--	2026-07-19 16:26
config-AlmaLinux-7.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-Amazon-Linux-2-ALL	403 B	-rw-r--r--	2026-07-19 16:26
config-CentOS-Linux-7.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-CentOS-Stream-Linux-8.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-CloudLinux-8.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-Oracle-Linux-8.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-Redhat-Enterprise-Linux-7.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-Rocky-Linux-7.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-Scientific-Linux-7.0-ALL	403 B	-rw-r--r--	2026-07-19 16:26
config-Ubuntu-Linux-16.04-17.99	453 B	-rw-r--r--	2026-07-19 16:26
config-aix	479 B	-rw-r--r--	2026-07-19 16:26
config-cobalt-linux	417 B	-rw-r--r--	2026-07-19 16:26
config-coherent-linux	419 B	-rw-r--r--	2026-07-19 16:26
config-debian-linux	416 B	-rw-r--r--	2026-07-19 16:26
config-debian-linux-10.0-12.0	420 B	-rw-r--r--	2026-07-19 16:26
config-debian-linux-13.0-ALL	437 B	-rw-r--r--	2026-07-19 16:26
config-debian-linux-2.2-9.0	436 B	-rw-r--r--	2026-07-19 16:26
config-freebsd	479 B	-rw-r--r--	2026-07-19 16:26
config-freebsd-8-ALL	516 B	-rw-r--r--	2026-07-19 16:26
config-gentoo-linux	413 B	-rw-r--r--	2026-07-19 16:26
config-mandrake-linux	399 B	-rw-r--r--	2026-07-19 16:26
config-mandrake-linux-10.1-ALL	401 B	-rw-r--r--	2026-07-19 16:26
config-msc-linux	421 B	-rw-r--r--	2026-07-19 16:26
config-netbsd	431 B	-rw-r--r--	2026-07-19 16:26
config-open-linux	417 B	-rw-r--r--	2026-07-19 16:26
config-openSUSE-Linux-15.0-ALL	403 B	-rw-r--r--	2026-07-19 16:26
config-pardus-linux	346 B	-rw-r--r--	2026-07-19 16:26
config-qnx	333 B	-rw-r--r--	2026-07-19 16:26
config-redhat-linux	417 B	-rw-r--r--	2026-07-19 16:26
config-redhat-linux-24.0	421 B	-rw-r--r--	2026-07-19 16:26
config-redhat-linux-25.0-ALL	418 B	-rw-r--r--	2026-07-19 16:26
config-redhat-linux-7.0-23.0	419 B	-rw-r--r--	2026-07-19 16:26
config-slackware-linux-8.0-ALL	449 B	-rw-r--r--	2026-07-19 16:26
config-sol-linux	455 B	-rw-r--r--	2026-07-19 16:26
config-solaris-10	440 B	-rw-r--r--	2026-07-19 16:26
config-solaris-11-ALL	490 B	-rw-r--r--	2026-07-19 16:26
config-solaris-9	498 B	-rw-r--r--	2026-07-19 16:26
config-suse-linux	409 B	-rw-r--r--	2026-07-19 16:26
config-suse-linux-7.1-ALL	407 B	-rw-r--r--	2026-07-19 16:26
config-syno-linux	528 B	-rwxr-xr-x	2026-07-19 16:26
config-trustix-linux	407 B	-rw-r--r--	2026-07-19 16:26
config-turbo-linux	417 B	-rw-r--r--	2026-07-19 16:26
config-united-linux	407 B	-rw-r--r--	2026-07-19 16:26
config.info	589 B	-rw-r--r--	2026-07-19 16:26
config.info.ca	714 B	-rwxr-xr-x	2026-07-19 16:26
config.info.nl	664 B	-rwxr-xr-x	2026-07-19 16:26
config.info.no	635 B	-rw-r--r--	2026-07-19 16:26
create_table.cgi	1.02 KB	-rwxr-xr-x	2026-07-19 16:28
csv.cgi	2.26 KB	-rwxr-xr-x	2026-07-19 16:28
csv_form.cgi	1.67 KB	-rwxr-xr-x	2026-07-19 16:28
defaultuconfig	53 B	-rw-r--r--	2026-07-19 16:26
delete_fields.cgi	665 B	-rwxr-xr-x	2026-07-19 16:28
download.cgi	1.07 KB	-rwxr-xr-x	2026-07-19 16:28
drop_table.cgi	1.27 KB	-rwxr-xr-x	2026-07-19 16:28
drop_tables.cgi	1.75 KB	-rwxr-xr-x	2026-07-19 16:28
edit_dbase.cgi	6.91 KB	-rwxr-xr-x	2026-07-19 16:28
edit_field.cgi	4.99 KB	-rwxr-xr-x	2026-07-19 16:28
edit_index.cgi	1.83 KB	-rwxr-xr-x	2026-07-19 16:28
edit_table.cgi	2.85 KB	-rwxr-xr-x	2026-07-19 16:28
edit_view.cgi	2.17 KB	-rwxr-xr-x	2026-07-19 16:28
exec.cgi	7.59 KB	-rwxr-xr-x	2026-07-19 16:28
exec_file.cgi	3.01 KB	-rwxr-xr-x	2026-07-19 16:28
exec_form.cgi	3.88 KB	-rwxr-xr-x	2026-07-19 16:28
import.cgi	2.25 KB	-rwxr-xr-x	2026-07-19 16:28
index.cgi	2.85 KB	-rwxr-xr-x	2026-07-19 16:28
login.cgi	514 B	-rwxr-xr-x	2026-07-19 16:28
module.info	192 B	-rw-r--r--	2026-07-19 16:26
module.info.ar	0 B	-rw-r--r--	2026-07-19 16:26
module.info.ar.auto	234 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	222 B	-rw-r--r--	2026-07-19 16:26
module.info.ca	28 B	-rw-r--r--	2026-07-19 16:26
module.info.ca.auto	147 B	-rw-r--r--	2026-07-19 16:26
module.info.cs	24 B	-rw-r--r--	2026-07-19 16:26
module.info.cs.auto	129 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	157 B	-rw-r--r--	2026-07-19 16:26
module.info.de	127 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	277 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	172 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	160 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	200 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	170 B	-rw-r--r--	2026-07-19 16:26
module.info.fr	43 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	158 B	-rw-r--r--	2026-07-19 16:26
module.info.hu	35 B	-rw-r--r--	2026-07-19 16:26
module.info.hu.auto	153 B	-rw-r--r--	2026-07-19 16:26
module.info.it	0 B	-rw-r--r--	2026-07-19 16:26
module.info.it.auto	149 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	210 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	192 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	158 B	-rw-r--r--	2026-07-19 16:26
module.info.nl	30 B	-rw-r--r--	2026-07-19 16:26
module.info.no	23 B	-rw-r--r--	2026-07-19 16:26
module.info.no.auto	134 B	-rw-r--r--	2026-07-19 16:26
module.info.pl	0 B	-rw-r--r--	2026-07-19 16:26
module.info.pl.auto	160 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	166 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	175 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	224 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	155 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	153 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	170 B	-rw-r--r--	2026-07-19 16:26
module.info.uk	0 B	-rw-r--r--	2026-07-19 16:26
module.info.uk.auto	228 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	135 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	144 B	-rw-r--r--	2026-07-19 16:26
mysql-lib.pl	62.1 KB	-rwxr-xr-x	2026-07-19 16:26
save_field.cgi	4.72 KB	-rwxr-xr-x	2026-07-19 16:28
save_index.cgi	1.39 KB	-rwxr-xr-x	2026-07-19 16:28
save_view.cgi	1.84 KB	-rwxr-xr-x	2026-07-19 16:28
search_form.cgi	1.38 KB	-rwxr-xr-x	2026-07-19 16:28
table_form.cgi	1.95 KB	-rwxr-xr-x	2026-07-19 16:28
uconfig.info	373 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.ca	114 B	-rwxr-xr-x	2026-07-19 16:26
uconfig.info.cs	432 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.de	432 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.nl	413 B	-rw-r--r--	2026-07-19 16:26
uconfig.info.no	388 B	-rw-r--r--	2026-07-19 16:26
view-lib.pl	3.56 KB	-rwxr-xr-x	2026-07-19 16:26
view_table.cgi	15.16 KB	-rwxr-xr-x	2026-07-19 16:28

Rename

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

require './mysql-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{'buser'} || &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(",", map { &quote_table($_) } @cols).
       " from ".&quotestr($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;
	}
elsif ($access{'buser'} eq 'root') {
	# Open target file directly
	&open_tempfile(OUT, ">$in{'file'}");
	$fh = OUT;
	}
else {
	# Run through cat command
	$cmd = &command_as_user($access{'buser'}, 0,
				"cat >".&quote_path($in{'file'}));
	&open_execute_command(OUT, $cmd, 0);
	$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(
	   "@{[&get_webprefix()]}/$module_name/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;
}