Gecko [ 122.154.134.11 ]

Name	Size	Permission
help	[ DIR ]	drwxr-xr-x
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
config-solaris	20 B	-rw-r--r--
config.info	73 B	-rw-r--r--
config.info.ca	78 B	-rw-r--r--
config.info.ca.UTF-8	80 B	-rw-r--r--
config.info.de	98 B	-rw-r--r--
config.info.de.UTF-8	98 B	-rw-r--r--
config.info.nl	88 B	-rw-r--r--
config.info.nl.UTF-8	88 B	-rw-r--r--
dep_viewer.cgi	3.22 KB	-rwxr-xr-x
dependency_template.xml	140 B	-rw-r--r--
dependent_template.xml	138 B	-rw-r--r--
exec_template.xml	143 B	-rw-r--r--
index.cgi	4.91 KB	-rwxr-xr-x
instance_template.xml	60 B	-rw-r--r--
instance_template_end.xml	12 B	-rw-r--r--
instance_viewer.cgi	1.13 KB	-rwxr-xr-x
log_viewer.cgi	1.27 KB	-rwxr-xr-x
manpage_template.xml	88 B	-rw-r--r--
module.info	201 B	-rw-r--r--
module.info.ca	143 B	-rw-r--r--
module.info.ca.UTF-8	158 B	-rw-r--r--
module.info.nl	51 B	-rw-r--r--
module.info.nl.UTF-8	57 B	-rw-r--r--
path_chooser.cgi	3.27 KB	-rwxr-xr-x
property_editor.cgi	4.42 KB	-rwxr-xr-x
property_group_editor.cgi	3.74 KB	-rwxr-xr-x
property_group_template.xml	74 B	-rw-r--r--
property_group_template_end.xm...	18 B	-rw-r--r--
property_template.xml	67 B	-rw-r--r--
restarter_template.xml	41 B	-rw-r--r--
search_instance.cgi	1.45 KB	-rwxr-xr-x
service_template.xml	225 B	-rw-r--r--
service_template_end.xml	29 B	-rw-r--r--
smf-lib.pl	27.21 KB	-rwxr-xr-x
smfwizard_dependency.cgi	2 KB	-rwxr-xr-x
smfwizard_dependent.cgi	1.97 KB	-rwxr-xr-x
smfwizard_exec.cgi	1.55 KB	-rwxr-xr-x
smfwizard_instance.cgi	764 B	-rwxr-xr-x
smfwizard_manpage.cgi	897 B	-rwxr-xr-x
smfwizard_process_submit.cgi	359 B	-rwxr-xr-x
smfwizard_property.cgi	1.46 KB	-rwxr-xr-x
smfwizard_property_group.cgi	1020 B	-rwxr-xr-x
smfwizard_restarter.cgi	601 B	-rwxr-xr-x
smfwizard_service.cgi	852 B	-rwxr-xr-x
smfwizard_template.cgi	790 B	-rwxr-xr-x
svc_chooser.cgi	4.41 KB	-rwxr-xr-x
svc_chooser_test.cgi	759 B	-rwxr-xr-x
template_template.xml	187 B	-rw-r--r--
template_template_end.xml	28 B	-rw-r--r--
wizard.pl	20.11 KB	-rwxr-xr-x
wizardtest.cgi	767 B	-rwxr-xr-x

Code Editor : path_chooser.cgi

#!/usr/bin/perl
# chooser.cgi
# Outputs HTML for a frame-based path chooser

require './smf-lib.pl';

&init_config();
&ReadParse();

if (defined($in{'path'})) {
	$path = $in{'path'};
	# +'s get converted to spaces, convert back
	$path =~ s/\s/+/g;
	if ($path =~ /^(\/.*)$/) {
		# path entered is valid
		$path=$1;
		}
} else {
	$path="/";
	}
$add = int($in{'add'});

$frame = $in{'frame'};
if ($frame eq "" ) {
	$frame = 0;
}

if ($in{'frame'} == 0) {
	# base frame
	&PrintHeader();
	print "<title>$text{'path_chooser_title'}</title>\n";
	print "<frameset rows='*,50'>\n";
	print "<frame marginwidth=10 marginheight=10 name=topframe ",
	    "src=\"path_chooser.cgi?frame=1&path=$path&add=$add\">\n";
	print "<frame marginwidth=10 marginheight=10 name=bottomframe ",
	    "src=\"path_chooser.cgi?frame=2&add=$add&path=$path\"",
	    "scrolling=no>\n";
	print "</frameset>\n";
	}
elsif ($in{'frame'} == 1) {
	# List of svcs
	&header();
	print <<EOF;
<script>
function pathclick(path, expand)
{
top.bottomframe.document.forms[0].path.value = path;
if (expand == 1) {
	location ="path_chooser.cgi?frame=1&add=$add&path="+path;
	}
}

</script>
EOF
	print "<b>", &text('path_chooser_path', $path),"</b>\n";
	print "<table>\n";
	# get file/dir list
	if (opendir(CURRDIR, $path)) {
		# remove extra trailing "/" if there.
		$fixed_filepath = $path;
		$fixed_filepath =~ s/(.*)\/$/$1/;
		foreach $f (readdir(CURRDIR)) {
			if ($f eq ".") {
				# skip
			} elsif ($f eq "..") {
				$uplevel = "$fixed_filepath";
				if ($uplevel =~ /^((\/[^\/]*)*)\/[^\/]*$/) {
					$uplevel = $1;
					}
				if ($uplevel eq "") {
					$uplevel = "/";
					}
				$uplevel = &urlize($uplevel);
				push(@pathlist,
"<td><a href='javascript:pathclick(\"$uplevel\",1)'><img border=0 width=30 height=30 src=\"images/uplevel.gif\"></a></td><td><a href='javascript:pathclick(\"$uplevel\",1)'>..</a></td>");
			} else {
				$expand = 0;
				$img = "images/file.gif";
				# is this a file or a dir?
				if (opendir(DISCARD, "$fixed_filepath/$f")) {
					close(DISCARD);
					$expand = 1;
					$img = "images/dir.gif";
					}
				$newpath = &urlize("$fixed_filepath/$f");
				push(@pathlist,
"<td><a href='javascript:pathclick(\"$newpath\",$expand)'><img border=0 width=30 height=30 src=$img></a></td><td><a href='javascript:pathclick(\"$newpath\",$expand)'>$f</a></td>");
				}
			}
		closedir(CURRDIR);
		}
	foreach $p (@pathlist) {
		print "<tr>\n";
		print "$p";
		print "</tr>\n";
		}
	print "</table>\n";
	&footer();
	}
elsif ($in{'frame'} == 2) {
	# Current path and OK/cancel buttons
	&header();
	print <<EOF;
<script>
function pathchosen()
{
if ($add == 0) {
	top.opener.ifield.value =
	 "file://localhost"+document.forms[0].path.value;
	}
else {
	if (top.opener.ifield.value != "") {
		top.opener.ifield.value += " ";
		}
	top.opener.ifield.value +=
	 "file://localhost"+document.forms[0].path.value;
	}
top.close();
}
</script>
EOF
	print "<table width=100%><tr><td>\n";
	print "<form onSubmit='pathchosen(); return false'>\n";
	print
	 "<input name=path size=45 value=\"\">\n";
	print
	 "<input type=\"submit\" value=\"$text{'path_chooser_ok'}\">\n";
	print "</form>\n";
	print "</td><td>\n";
	print "<form>";
	print
"<input type=\"button\" onClick='top.close()' value=\"$text{'path_chooser_cancel'}\">";
	print "</form>";
	print "</td></tr></table></form>\n";
	&footer();
	}

${this.title}

Code Editor : path_chooser.cgi