summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
d9e9c8e)
Oops, this would be disatrous if we started handling
bigger request bodies or slow clients.
Fixes: c008654229a9 ("avoid IO::File for anonymous temporary files")
sub input_prepare {
my ($self, $env) = @_;
sub input_prepare {
my ($self, $env) = @_;
my $len = $env->{CONTENT_LENGTH};
if ($len) {
if ($len > $MAX_REQUEST_BUFFER) {
my $len = $env->{CONTENT_LENGTH};
if ($len) {
if ($len > $MAX_REQUEST_BUFFER) {
} elsif (env_chunked($env)) {
$len = CHUNK_START;
open($input, '+>', undef);
} elsif (env_chunked($env)) {
$len = CHUNK_START;
open($input, '+>', undef);
+ } else {
+ $input = $null_io;
}
# TODO: expire idle clients on ENFILE / EMFILE
}
# TODO: expire idle clients on ENFILE / EMFILE