| Current File : //var/wcp4/lef/public_html/tmp/templates/compiled/protect_directory.html.compiled |
# This file is a compiled version of a template that can be run much faster
# than reparsing the file, yet accomplishes the same thing. You should not
# attempt to modify this file as any changes you make would be lost as soon as
# the original template file is modified.
# Generated: Tue Aug 19 17:24:13 2003
# Editor: vim:syn=perl
local $^W;
{
parse_date => 1061285053,
deps => [],
parser_version => 2.078,
file_type => 'REL',
code => \>::Template::parsed_template
};
sub GT::Template::parsed_template {
local $^W; # Get rid of warnings. unfortunately, this won't work for Perl 5.6's -W switch
my $self = shift;
my $return = '';
my $escape = $self->{opt}->{escape};
my $strict = $self->{opt}->{strict};
my $tmp;
$return .= q{<script>
function check_passwd() \{
if (!document.frm_protect.username.value || !document.frm_protect.password.value ) \{
alert("Please enter the Username and Password");
return false;
\}
\}
</script>
<form name=frm_protect action='};
$return .= $tmp if defined($tmp = $self->_get_var(q{http_ref}, $escape, $strict));
$return .= q{' method=post>
<link rel="stylesheet" href="};
$return .= $tmp if defined($tmp = $self->_get_var(q{html_url}, $escape, $strict));
$return .= q{/};
$return .= $tmp if defined($tmp = $self->_get_var(q{scheme}, $escape, $strict));
$return .= q{.css">
<body class="background" leftmargin=5 topmargin=5 onload="document.frm_protect.p_username.focus(); };
if ($self->_get_var(q{msg}, 0, 0)) {
$return .= q{alert('};
$return .= $tmp if defined($tmp = $self->_get_var(q{msg}, $escape, $strict));
$return .= q{');};
}
$return .= q{">
<table border='1' cellpadding='0' cellspacing='0' width=100%>
<tr>
<td>
<table border='0' cellpadding='0' cellspacing='0' width=100%>
<tr height=25>
<td width='10%' >};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{<b> Commands:</b></font></td>
<td width='90%'>};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{
};
if ($self->_get_var(q{show_all}, 0, 0)) {
$return .= q{
<a href='javascript:top.js_cmd_edit()'>Edit</a> |
<a href='javascript:top.js_cmd_download()'>Download</a> |
<a href='javascript:top.js_cmd_copy(1)'>Copy</a> |
<a href='javascript:top.js_cmd_delete()'>Delete</a> |
<a href='javascript:top.js_cmd_move(1)'>Move</a> |
<a href='javascript:top.js_cmd_chmod(1)'>Chmod</a> |
<a href='javascript:top.js_cmd_tail(1)'>Tail</a> |
<a href='javascript:top.js_cmd_perl(1)'>Perl</a> |
<a href='javascript:top.js_cmd_diff(1)'>Diff</a> |
<a href='javascript:top.js_cmd_tar(1)'>Tar</a></font>
};
}
else {
$return .= q{
};
if ($self->_get_var(q{cmd_edit}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_edit()'>Edit</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_download}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_download()'>Download</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_copy}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_copy(1)'>Copy</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_delete}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_delete()'>Delete</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_move}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_move(1)'>Move</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_chmod}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_chmod(1)'>Chmod</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_tail}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_tail(1)'>Tail</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_perl}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_perl(1)'>Perl</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_diff}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_diff(1)'>Diff</a> | };
}
$return .= q{
};
if ($self->_get_var(q{cmd_tar}, 0, 0)) {
$return .= q{<a href='javascript:top.js_cmd_tar(1)'>Tar</a>};
}
$return .= q{</font>
};
}
$return .= q{
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border='0' cellpadding='2' cellspacing='0'>
};
unless ($self->_get_var(q{delete_list}, 0, 0)) {
$return .= q{
<tr>
<td height=25>};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{
};
if ($self->_get_var(q{pass_path}, 0, 0)) {
$return .= q{
Password directory is <b>};
$return .= $tmp if defined($tmp = $self->_get_var(q{pass_path}, $escape, $strict));
$return .= q{</b>
};
}
else {
$return .= q{
Protect <b>};
if ($self->_get_var(q{work_path}, 0, 0)) {
$return .= $tmp if defined($tmp = $self->_get_var(q{work_path}, $escape, $strict));
}
else {
$return .= q{Root};
}
$return .= q{</b> directory.
};
}
$return .= q{</font></td>
</tr>
};
}
$return .= q{
<tr>
<td>
<table cellspacing=1 cellpadding=0>
<tr>
<td>};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{User name: <input type=text name=p_username size='10' class='button'></font></td>
<td>};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{Password:</font> <input type=password name=p_password size='10' class='button'></td>
<td><input type=submit name=add value='Add User' class='submit'></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>};
$return .= $tmp if defined($tmp = $self->_get_var(q{font}, $escape, $strict));
$return .= q{
};
if ($self->_get_var(q{delete_list}, 0, 0)) {
$return .= q{User name: };
$return .= $tmp if defined($tmp = $self->_get_var(q{delete_list}, $escape, $strict));
$return .= q{
<input type=submit name=remove value='Remove'" class='submit'>
<input type=submit name=remove_all value='Remove all' class='submit'>
};
if ($self->_get_var(q{pass_path}, 0, 0)) {
$return .= q{
Password directory is <b>};
$return .= $tmp if defined($tmp = $self->_get_var(q{pass_path}, $escape, $strict));
$return .= q{</b>
};
}
else {
$return .= q{
Protect <b>};
if ($self->_get_var(q{work_path}, 0, 0)) {
$return .= $tmp if defined($tmp = $self->_get_var(q{work_path}, $escape, $strict));
}
else {
$return .= q{Root};
}
$return .= q{</b> directory.};
}
$return .= q{</font></td>
};
}
$return .= q{
</tr>
</table>
<input type=hidden name=do value='fileman'>
<input type=hidden name=work_path value='};
$return .= $tmp if defined($tmp = $self->_get_var(q{work_path}, $escape, $strict));
$return .= q{'>
<input type=hidden name=cmd_do value='cmd_passwd'>
};
unless ($self->_get_var(q{user_sessions}, 0, 0)) {
$return .= q{
<!--multi users-->
<input type=hidden name="session_id" value="};
$return .= $tmp if defined($tmp = $self->_get_var(q{session_id}, $escape, $strict));
$return .= q{">
};
}
$return .= q{
};
if ($self->_get_var(q{root_selected}, 0, 0)) {
$return .= q{
<input type=hidden name='root_selected' value="};
$return .= $tmp if defined($tmp = $self->_get_var(q{root_selected}, $escape, $strict));
$return .= q{">
};
}
$return .= q{
</form></body>};
return \$return;
}