Mercurial > hg > nginx

changeset 941:97489c43e755

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix segfault
author Igor Sysoev <igor@sysoev.ru>
date Fri, 22 Dec 2006 13:05:07 +0000
parents ca9fe5ae412b
children 7ddc5345fb4f
files src/http/modules/perl/nginx.xs
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
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;
     }