comparison src/http/modules/perl/nginx.xs @ 2049:2a92804f4109

*) back out r2040 *) refactor ngx_palloc() *) introduce ngx_pnalloc() *) additional pool blocks have smaller header
author Igor Sysoev <igor@sysoev.ru>
date Tue, 17 Jun 2008 15:00:30 +0000
parents 9a73235ce453
children b0a1c84725cf
comparison
equal deleted inserted replaced
2048:824615f3b4ec 2049:2a92804f4109
46 "perl sv2str: %08XD \"%V\"", sv->sv_flags, s); 46 "perl sv2str: %08XD \"%V\"", sv->sv_flags, s);
47 47
48 return NGX_OK; 48 return NGX_OK;
49 } 49 }
50 50
51 s->data = ngx_palloc(r->pool, len); 51 s->data = ngx_pnalloc(r->pool, len);
52 if (s->data == NULL) { 52 if (s->data == NULL) {
53 return NGX_ERROR; 53 return NGX_ERROR;
54 } 54 }
55 55
56 ngx_memcpy(s->data, p, len); 56 ngx_memcpy(s->data, p, len);
240 240
241 p = (u_char *) SvPV(key, len); 241 p = (u_char *) SvPV(key, len);
242 242
243 /* look up hashed headers */ 243 /* look up hashed headers */
244 244
245 lowcase_key = ngx_palloc(r->pool, len); 245 lowcase_key = ngx_pnalloc(r->pool, len);
246 if (lowcase_key == NULL) { 246 if (lowcase_key == NULL) {
247 XSRETURN_UNDEF; 247 XSRETURN_UNDEF;
248 } 248 }
249 249
250 hash = 0; 250 hash = 0;
291 291
292 for (i = 0; i < n; i++) { 292 for (i = 0; i < n; i++) {
293 size += ph[i]->value.len + sizeof("; ") - 1; 293 size += ph[i]->value.len + sizeof("; ") - 1;
294 } 294 }
295 295
296 cookie = ngx_palloc(r->pool, size); 296 cookie = ngx_pnalloc(r->pool, size);
297 if (cookie == NULL) { 297 if (cookie == NULL) {
298 XSRETURN_UNDEF; 298 XSRETURN_UNDEF;
299 } 299 }
300 300
301 p = cookie; 301 p = cookie;
767 767
768 text = ST(1); 768 text = ST(1);
769 769
770 src = (u_char *) SvPV(text, len); 770 src = (u_char *) SvPV(text, len);
771 771
772 p = ngx_palloc(r->pool, len + 1); 772 p = ngx_pnalloc(r->pool, len + 1);
773 if (p == NULL) { 773 if (p == NULL) {
774 XSRETURN_UNDEF; 774 XSRETURN_UNDEF;
775 } 775 }
776 776
777 dst = p; 777 dst = p;
824 } 824 }
825 } 825 }
826 826
827 p = (u_char *) SvPV(name, len); 827 p = (u_char *) SvPV(name, len);
828 828
829 lowcase = ngx_palloc(r->pool, len); 829 lowcase = ngx_pnalloc(r->pool, len);
830 if (lowcase == NULL) { 830 if (lowcase == NULL) {
831 XSRETURN_UNDEF; 831 XSRETURN_UNDEF;
832 } 832 }
833 833
834 hash = 0; 834 hash = 0;