Mercurial > hg > nginx-quic
diff src/http/modules/perl/nginx.xs @ 941:97489c43e755
fix segfault
author | Igor Sysoev <igor@sysoev.ru> |
---|---|
date | Fri, 22 Dec 2006 13:05:07 +0000 |
parents | 28aa941811e6 |
children | 82b9e57993ec |
line wrap: on
line diff
--- a/src/http/modules/perl/nginx.xs +++ b/src/http/modules/perl/nginx.xs @@ -387,7 +387,10 @@ request_body(r) ngx_http_perl_set_request(r); - if (r->request_body->temp_file || r->request_body->bufs == NULL) { + if (r->request_body == NULL + || r->request_body->temp_file + || r->request_body->bufs == NULL) + { XSRETURN_UNDEF; } @@ -411,7 +414,7 @@ request_body_file(r) ngx_http_perl_set_request(r); - if (r->request_body->temp_file == NULL) { + if (r->request_body == NULL || r->request_body->temp_file == NULL) { XSRETURN_UNDEF; }