Ok, I ran the page. First I just loaded the page and then I tried
submitting. The first access is at 11:00:52 and the submit is at
11:00:55. This run is with AxDebugLevel 10 and the
Apache::AxKit::Plugins::QueryStringCache plugin loaded(same results
without it, though).
Matt Sergeant wrote:
> On Fri, 15 Feb 2002, Andrew Parker wrote:
>
>
>>I some warns around the if statement in the PerForm code:
>>
>>warn("---------------------------------\n");
>>warn("Submitting: ".(defined(\$cgi->param('__submitting'))?"1":"0")."\n");
>>warn("CGI parms: ".(join( " ", \$cgi->param))."\n");
>>if (\$cgi->param('__submitting')) {
>>warn("got it\n");
>>
>>Then I watched the output. It seems that AxKit will run the XSP *once*
>>and then won't run it again until I make a change in the XSP(or some of
>>the other code) or restart Apache. So the XSP gets run once to generate
>>the first page, but doesn't get run again for the submit. I haven't
>>given AxKit a cache dir and I turned on AxNoCache. Of course I get the
>>same result when the cache is on.
>>
>>So I guess I was wrong in my first post. It isn't that __submitting
>>isn't defined. It is that the XSP simply isn't being run for the submit.
>>
>
> OK, time to crank up debugging. AxDebugLevel 10, and send the output for
> both a successful and a failing request.
>
>
[Fri Feb 15 11:00:50 2002] [notice] Apache/1.3.22 (Unix) (Red-Hat/Linux) AxKit/1.5
mod_pubcookie/a5release11 mod_jk mod_perl/1.26 mod_ssl/2.8.5 OpenSSL/0.9.6 configured
-- resuming normal operations
[Fri Feb 15 11:00:50 2002] [notice] suEXEC mechanism enabled (wrapper:
/usr/sbin/suexec)
[Fri Feb 15 11:00:50 2002] [notice] Accept mutex: sysvsem (Default: sysvsem)
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] handler called for
/cgi-bin/xsp/tisch/logon.xsp
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] Running plugin:
Apache::AxKit::Plugins::QueryStringCache
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] Running plugin:
Apache::AxKit::Plugins::QueryStringCache
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] checking if we
process this resource
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] media: screen,
preferred style: #default
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
1b7a1e0ccd67fe4a24b141c0396a8035
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] getting styles and
external entities from the XML
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] styles not cached -
calling $provider->get_styles()
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] using XS get_styles
(libxml2)
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] calling
xs_get_styles_fh()
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] calling
xs_get_styles_str()
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] xs_get_styles
returned: , , {http://apache.org/xsp/core/v1}page
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] Calling
GetMatchingProcessors with (screen, , , , {http://apache.org/xsp/core/v1}page)
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] get_styles: loading
style modules
[Fri Feb 15 11:00:51 2002] [warn] [client 128.95.122.232] [AxKit] get_styles: looking
for mapping for style type: 'application/x-xsp'
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] get_styles: looking
for mapping for style type: 'application/x-xsp'
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] get_styles: looking
for mapping for style type: 'text/xsl'
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] cache doesn't exist
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] some condition
failed. recreating output
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::XSP(.)
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::XSP(.)
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::LibXSLT(/cgi-bin/xsp/tisch/style/basic.xsl)
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri .
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::XSP::handler
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] XSP: parsing fh
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Recompiling XSP
script
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] package
Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp;
@Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp::ISA
= ('Apache::AxKit::Language::XSP::Page');
#line 2 /usr/local/cgi-bin/xsp/tisch/logon.xsp
use Apache;
use XML::LibXML;#initialize xsp namespace
#initialize xsp namespace
sub load_username {
my ($ctxt, $value) = @_;
return "Hello";
}
sub validate_username {
my ($ctxt, $value) = @_;
}
sub validate_password {
my ($ctxt, $value) = @_;
system("echo 'hi' > /tmp/test");
}
sub submit_save {
my ($ctxt, $value) = @_;
return "/";
}
sub handler {
my ($r, $cgi) = @_;
my $document = XML::LibXML::Document->createDocument("1.0", "UTF-8");
my ($parent);
{ my $elem = $document->createElement(q(page));$document->setDocumentElement($elem);
$parent = $elem; }
$parent->setAttribute(q(title), q(Tisch Login));
{ my $elem = $document->createElement(q(form));$parent->appendChild($elem); $parent =
$elem; }
$parent->setAttribute(q(name), q(login));
$parent->setAttribute(q(action), q(/cgi-bin/xsp/tisch/logon.xsp));
$parent->setAttribute(q(method), q(POST));
$parent->setAttribute(q(enctype), q(multipart/form-data));
{ my $elem = $document->createElement(q(hidden));$parent->appendChild($elem); $parent
= $elem; }
$parent->setAttribute(q(name), q(__submitting));
$parent->setAttribute(q(value), q(1));
$parent = $parent->getParentNode;
{
use vars qw($_form_ctxt @_submit_buttons %_submit_goto @_cancel_buttons %_cancel_goto);
local $_form_ctxt = { Form => $cgi->parms, Apache => $r };
local @_submit_buttons;
local @_cancel_buttons;
local %_submit_goto;
local %_cancel_goto;
start_form_login($_form_ctxt, $cgi->param('__submitting'))
if defined &start_form_login;
{ my $text = $document->createTextNode(q|
Username1: |);$parent->appendChild($text); }
{
my $text = $document->createTextNode("".do {
{ my %_args = (); $_args{maxlength} = q|50|;
$_args{width} = q|30|;
$_args{name} = q|username|;
; die 'Required arg "name" for tag textfield is missing' if not defined $_args{name};
Apache::AxKit::Language::XSP::TaglibHelper::handle_result('textfield($name;$default,$width,$maxlength)',
undef(), 0, $document, $parent,
AxKit::XSP::PerForm::textfield($_args{name},$_args{default},$_args{width},$_args{maxlength},));}
}); # non xsp tag
$parent->appendChild($text);
}
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $text = $document->createTextNode(q|
Password: |);$parent->appendChild($text); }
{
my $text = $document->createTextNode("".do {
{ my %_args = (); $_args{maxlength} = q|50|;
$_args{width} = q|30|;
$_args{name} = q|password|;
; die 'Required arg "name" for tag password is missing' if not defined $_args{name};
Apache::AxKit::Language::XSP::TaglibHelper::handle_result('password($name;$default,$width,$maxlength)',
undef(), 0, $document, $parent,
AxKit::XSP::PerForm::password($_args{name},$_args{default},$_args{width},$_args{maxlength},));}
}); # non xsp tag
$parent->appendChild($text);
}
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{
my $text = $document->createTextNode("".do {
{ my %_args = (); $_args{value} = q|Login|;
$_args{name} = q|save|;
; die 'Required arg "name" for tag submit is missing' if not defined $_args{name};
Apache::AxKit::Language::XSP::TaglibHelper::handle_result('submit($name;$value,$image,$alt,$border,$align,$goto)',
undef(), 0, $document, $parent,
AxKit::XSP::PerForm::submit($_args{name},$_args{value},$_args{image},$_args{alt},$_args{border},$_args{align},$_args{goto},));}
}); # non xsp tag
$parent->appendChild($text);
}
$parent = $parent->getParentNode;
end_form_login($_form_ctxt, $cgi->param('__submitting'))
if defined &end_form_login;
warn("---------------------------------
");
warn("Submitting: ".(defined($cgi->param('__submitting'))?"1":"0")."
");
warn("CGI parms: ".(join( " ", $cgi->param))."
");
if ($cgi->param('__submitting')) {
warn("got it
");
foreach my $cancel (@_cancel_buttons) {
if ($cgi->param($cancel)) {
no strict 'refs';
my $redirect;
$redirect = $_cancel_goto{$cancel};
$redirect = "cancel_${cancel}"->($_form_ctxt)
if defined &{"cancel_${cancel}"};
if ($redirect) {
AxKit::XSP::WebUtils::redirect($redirect);
}
}
}
}
if ($cgi->param('__submitting') && !$_form_ctxt->{_Failed}) {
foreach my $submit (@_submit_buttons) {
if ($cgi->param($submit)) {
no strict 'refs';
my $redirect;
$redirect = $_submit_goto{$submit};
$redirect = "submit_${submit}"->($_form_ctxt)
if defined &{"submit_${submit}"};
if ($redirect) {
AxKit::XSP::WebUtils::redirect($redirect);
}
}
}
}
}
$parent = $parent->getParentNode;
return $document
}
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] XSP Compilation
finished
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Turning off cache!
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
4821a309f9a9be7ee8ae29758dcf3d60
---------------------------------
Submitting: 0
CGI parms: username password
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [Cache] writing
cache file /tmp/axkit/48/21/a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::XSP::handler finished
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri .
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::XSP::handler
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] XSP: parsing dom_tree
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Recompiling XSP
script
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] package
Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp;
@Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp::ISA
= ('Apache::AxKit::Language::XSP::Page');
#line 2 /usr/local/cgi-bin/xsp/tisch/logon.xsp
use Apache;
use XML::LibXML;#initialize xsp namespace
#initialize xsp namespace
sub handler {
my ($r, $cgi) = @_;
my $document = XML::LibXML::Document->createDocument("1.0", "UTF-8");
my ($parent);
{ my $elem = $document->createElement(q(page));$document->setDocumentElement($elem);
$parent = $elem; }
$parent->setAttribute(q(title), q(Tisch Login));
{ my $elem = $document->createElement(q(form));$parent->appendChild($elem); $parent =
$elem; }
$parent->setAttribute(q(name), q(login));
$parent->setAttribute(q(action), q(/cgi-bin/xsp/tisch/logon.xsp));
$parent->setAttribute(q(method), q(POST));
$parent->setAttribute(q(enctype), q(multipart/form-data));
{ my $elem = $document->createElement(q(hidden));$parent->appendChild($elem); $parent
= $elem; }
$parent->setAttribute(q(name), q(__submitting));
$parent->setAttribute(q(value), q(1));
$parent = $parent->getParentNode;
{ my $text = $document->createTextNode(q|
Username1:
|);$parent->appendChild($text); }
{ my $elem = $document->createElement(q(textfield));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(maxlength));$parent->appendChild($elem);
$parent = $elem; }
{ my $text = $document->createTextNode(q|50|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(width));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|30|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|Hello|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|username|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $text = $document->createTextNode(q|
Password:
|);$parent->appendChild($text); }
{ my $elem = $document->createElement(q(password));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(maxlength));$parent->appendChild($elem);
$parent = $elem; }
{ my $text = $document->createTextNode(q|50|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(width));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|30|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|password|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(submit_button));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|Login|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|save|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
return $document
}
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] XSP Compilation
finished
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Turning off cache!
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
4821a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [Cache] writing
cache file /tmp/axkit/48/21/a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::XSP::handler finished
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri /cgi-bin/xsp/tisch/style/basic.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch/style/basic.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::LibXSLT::handler
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] getting
the XML
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] parsing
stylesheet
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] parsing
stylesheet /cgi-bin/xsp/tisch/style/basic.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] LibXSLT match_uri:
style/forms.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri style/forms.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch/style/forms.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] LibXSLT match_uri:
style/html.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri style/html.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch/style/html.xsl
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] performing
transformation
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::LibXSLT::handler finished
[Fri Feb 15 11:00:52 2002] [warn] [client 128.95.122.232] [AxKit] writing xml string
to browser
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] handler called for
/cgi-bin/xsp/tisch/logon.xsp
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Running plugin:
Apache::AxKit::Plugins::QueryStringCache
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Running plugin:
Apache::AxKit::Plugins::QueryStringCache
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] checking if we
process this resource
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] media: screen,
preferred style: #default
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
1b7a1e0ccd67fe4a24b141c0396a8035
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] getting styles and
external entities from the XML
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] styles cached
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] cache doesn't exist
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] some condition
failed. recreating output
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::XSP(.)
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::XSP(.)
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] styles:
Apache::AxKit::Language::LibXSLT(/cgi-bin/xsp/tisch/style/basic.xsl)
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri .
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::XSP::handler
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] XSP: xsp script
cached
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Turning off cache!
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
4821a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [Cache] writing
cache file /tmp/axkit/48/21/a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::XSP::handler finished
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri .
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::XSP::handler
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] XSP: parsing dom_tree
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Recompiling XSP
script
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] package
Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp;
@Apache::AxKit::Language::XSP::ROOT::usr::local::cgi_2dbin::xsp::tisch::logon_2exsp::ISA
= ('Apache::AxKit::Language::XSP::Page');
#line 2 /usr/local/cgi-bin/xsp/tisch/logon.xsp
use Apache;
use XML::LibXML;#initialize xsp namespace
#initialize xsp namespace
sub handler {
my ($r, $cgi) = @_;
my $document = XML::LibXML::Document->createDocument("1.0", "UTF-8");
my ($parent);
{ my $elem = $document->createElement(q(page));$document->setDocumentElement($elem);
$parent = $elem; }
$parent->setAttribute(q(title), q(Tisch Login));
{ my $elem = $document->createElement(q(form));$parent->appendChild($elem); $parent =
$elem; }
$parent->setAttribute(q(name), q(login));
$parent->setAttribute(q(action), q(/cgi-bin/xsp/tisch/logon.xsp));
$parent->setAttribute(q(method), q(POST));
$parent->setAttribute(q(enctype), q(multipart/form-data));
{ my $elem = $document->createElement(q(hidden));$parent->appendChild($elem); $parent
= $elem; }
$parent->setAttribute(q(name), q(__submitting));
$parent->setAttribute(q(value), q(1));
$parent = $parent->getParentNode;
{ my $text = $document->createTextNode(q|
Username1:
|);$parent->appendChild($text); }
{ my $elem = $document->createElement(q(textfield));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(maxlength));$parent->appendChild($elem);
$parent = $elem; }
{ my $text = $document->createTextNode(q|50|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(width));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|30|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|Hello|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|username|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $text = $document->createTextNode(q|
Password:
|);$parent->appendChild($text); }
{ my $elem = $document->createElement(q(password));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(maxlength));$parent->appendChild($elem);
$parent = $elem; }
{ my $text = $document->createTextNode(q|50|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(width));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|30|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|password|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(br));$parent->appendChild($elem); $parent =
$elem; }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(submit_button));$parent->appendChild($elem);
$parent = $elem; }
{ my $elem = $document->createElement(q(value));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|Login|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
{ my $elem = $document->createElement(q(name));$parent->appendChild($elem); $parent =
$elem; }
{ my $text = $document->createTextNode(q|save|);$parent->appendChild($text); }
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
$parent = $parent->getParentNode;
return $document
}
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] XSP Compilation
finished
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Turning off cache!
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] Cache: key =
4821a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [Cache] writing
cache file /tmp/axkit/48/21/a309f9a9be7ee8ae29758dcf3d60
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::XSP::handler finished
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
looking up uri /cgi-bin/xsp/tisch/style/basic.xsl
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [uri] File Provider
set filename to /usr/local/cgi-bin/xsp/tisch/style/basic.xsl
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] about to execute:
Apache::AxKit::Language::LibXSLT::handler
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] getting
the XML
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] parsing
stylesheet
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] stylesheet
cached
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] [LibXSLT] performing
transformation
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] execution of:
Apache::AxKit::Language::LibXSLT::handler finished
[Fri Feb 15 11:00:55 2002] [warn] [client 128.95.122.232] [AxKit] writing xml string
to browser
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]