new¶

    Apache2::Request->new($r, %args)

Creates a new Apache2::Request object.

    my $req = Apache2::Request->new($r, POST_MAX => "1M");

With mod_perl2, the environment object $r must be an Apache2::RequestRec object. In that case, all methods from Apache2::RequestRec are inherited. In the (default) CGI environment, $r must be an APR::Pool object.

The following args are optional:

• "POST_MAX", "MAX_BODY"

  Limit the size of POST data (in bytes).

• "DISABLE_UPLOADS"

  Disable file uploads.

• "TEMP_DIR"

  Sets the directory where upload files are spooled. On a *nix-like that supports link(2), the TEMP_DIR should be located on the same file system as the final destination file:

   use Apache2::Upload;
   my $req = Apache2::Request->new($r, TEMP_DIR => "/home/httpd/tmp");
   my $upload = $req->upload('file');
   $upload->link("/home/user/myfile");
      

  For more details on "link", see Apache2::Upload.

• "HOOK_DATA"

  Extra configuration info passed as the fourth argument to an upload hook. See the description for the next item, "UPLOAD_HOOK".

• "UPLOAD_HOOK"

  Sets up a callback to run whenever file upload data is read. This can be used to provide an upload progress meter during file uploads. Apache will automatically continue writing the original data to $upload->fh after the hook exits.

    my $transparent_hook = sub {
      my ($upload, $data, $data_len, $hook_data) = @_;
      warn "$hook_data: got $data_len bytes for " . $upload->name;
    };
    my $req = Apache2::Request->new($r,
                                    HOOK_DATA => "Note",
                                    UPLOAD_HOOK => $transparent_hook,
                                   );
      

instance¶

    Apache2::Request->instance($r)

The default (and only) behavior of Apache2::Request is to intelligently cache POST data for the duration of the request. Thus there is no longer the need for a separate instance() method as existed in Apache2::Request for Apache 1.3 - all POST data is always available from each and every Apache2::Request object created during the request's lifetime.

However an instance() method is aliased to new() in this release to ease the pain of porting from 1.X to 2.X.

param¶

    $req->param()
    $req->param($name)

Get the request parameters (using case-insensitive keys) by mimicking the OO interface of "CGI::param".

    # similar to CGI.pm
    my $foo_value   = $req->param('foo');
    my @foo_values  = $req->param('foo');
    my @param_names = $req->param;
    # the following differ slightly from CGI.pm
    # returns ref to APR::Request::Param::Table object representing
    # all (args + body) params
    my $table = $req->param;
    @table_keys = keys %$table;

In list context, or when invoked with no arguments as "$req->param()", "param" induces libapreq2 to read and parse all remaining data in the request body. However, "scalar $req->param("foo")" is lazy: libapreq2 will only read and parse more data if

    1) no "foo" param appears in the query string arguments, AND
    2) no "foo" param appears in the previously parsed POST data.

In this circumstance libapreq2 will read and parse additional blocks of the incoming request body until either

    1) it has found the the "foo" param, or
    2) parsing is completed.

Observe that "scalar $req->param("foo")" will not raise an exception if it can locate "foo" in the existing body or args tables, even if the query-string parser or the body parser has failed. In all other circumstances "param" will throw an Apache2::Request::Error object into $@ should either parser fail.

    $req->args_status(1); # set error state for query-string parser
    ok $req->param_status == 1;
    $foo = $req->param("foo");
    ok $foo == 1;
    eval { @foo = $req->param("foo") };
    ok $@->isa("Apache2::Request::Error");
    undef $@;
    eval { my $not_found = $req->param("non-existent-param") };
    ok $@->isa("Apache2::Request::Error");
    $req->args_status(0); # reset query-string parser state to "success"

Note: modifications to the "scalar $req->param()" table only affect the returned table object (the underlying C apr_table_t is generated from the parse data by apreq_params()). Modifications do not affect the actual request data, and will not be seen by other libapreq2 applications.

parms, params¶

The functionality of these functions is assumed by "param", so they are no longer necessary. Aliases to "param" are provided in this release for backwards compatibility, however they are deprecated and may be removed from a future release.

body¶

    $req->body()
    $req->body($name)

Returns an APR::Request::Param::Table object containing the POST data parameters of the Apache2::Request object.

    my $body = $req->body;

An optional name parameter can be passed to return the POST data parameter associated with the given name:

    my $foo_body = $req->body("foo");

More generally, body() follows the same pattern as param() with respect to its return values and argument list. The main difference is that modifications to the "scalar $req->body()" table affect the underlying apr_table_t attribute in apreq_request_t, so their impact will be noticed by all libapreq2 applications during this request.

upload¶

    $req->upload()
    $req->upload($name)

Requires "Apache2::Upload". With no arguments, this method returns an APR::Request::Param::Table object in scalar context, or the names of all Apache2::Upload objects in list context.

An optional name parameter can be passed to return the Apache2::Upload object associated with the given name:

    my $upload = $req->upload($name);

More generally, upload() follows the same pattern as param() with respect to its return values and argument list. The main difference is that its returned values are Apache2::Upload object refs, not simple scalars.

Note: modifications to the "scalar $req->upload()" table only affect the returned table object (the underlying C apr_table_t is generated by apreq_uploads()). They do not affect the actual request data, and will not be seen by other libapreq2 applications.

args_status¶

    $req->args_status()

Get the APR status code of the query-string parser. APR_SUCCESS on success, error otherwise.

body_status¶

    $req->body_status()

Get the current APR status code of the parsed POST data. APR_SUCCESS when parser has completed, APR_INCOMPLETE if parser has more data to parse, APR_EINIT if no post data has been parsed, error otherwise.

param_status¶

    $req->param_status()

In scalar context, this returns "args_status" if there was an error during the query-string parse, otherwise this returns "body_status", ie

    $req->args_status || $req->body_status

In list context "param_status" returns the list "(args_status, body_status)".

parse¶

    $req->parse()

Forces the request to be parsed immediately. In void context, this will throw an APR::Request::Error should the either the query-string or body parser fail. In all other contexts it will return the two parsers' combined APR status code

    $req->body_status || $req->args_status

However "parse" should be avoided in most normal situations. For example, in a mod_perl content handler it is more efficient to write

    sub handler {
        my $r = shift;
        my $req = Apache2::Request->new($r);
        $r->discard_request_body;   # efficiently parses the request body
        my $parser_status = $req->body_status;
        #...
    }

Calling "$r->discard_request_body" outside the content handler is generally a mistake, so use "$req->parse" there, but only as a last resort. The Apache2::Request API is designed around a lazy-parsing scheme, so calling "parse" should not affect the behavior of any other methods.