mirror/nginx
1
0
Fork 0
mirror of https://github.com/nginx/nginx.git synced 2025-07-25 06:37:58 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Perl: combining unknown headers during $r->header_in() lookup.

Browse Source
This commit is contained in:
Maxim Dounin 2022-05-30 21:25:38 +03:00
parent dab1b086ef
commit 1d22d0f56b
1 changed files with 44 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

84
src/http/modules/perl/nginx.xs
View File

@ -272,7 +272,7 @@ header_in(r, key)
ngx_uint_t i, n, hash; ngx_uint_t i, n, hash;
ngx_array_t *a; ngx_array_t *a;
ngx_list_part_t *part; ngx_list_part_t *part;
ngx_table_elt_t *h, **ph; ngx_table_elt_t *h, *header, **ph;
ngx_http_header_t *hh; ngx_http_header_t *hh;
ngx_http_core_main_conf_t *cmcf; ngx_http_core_main_conf_t *cmcf;
@ -311,47 +311,14 @@ header_in(r, key)
ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset); ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset);
if (*ph == NULL) { goto found;
XSRETURN_UNDEF;
}
if ((*ph)->next == NULL) {
ngx_http_perl_set_targ((*ph)->value.data, (*ph)->value.len);
goto done;
}
size = - (ssize_t) (sizeof("; ") - 1);
for (h = *ph; h; h = h->next) {
size += h->value.len + sizeof("; ") - 1;
}
value = ngx_pnalloc(r->pool, size);
if (value == NULL) {
ctx->error = 1;
croak("ngx_pnalloc() failed");
}
p = value;
for (h = *ph; h; h = h->next) {
p = ngx_copy(p, h->value.data, h->value.len);
if (h->next == NULL) {
break;
}
*p++ = sep; *p++ = ' ';
}
ngx_http_perl_set_targ(value, size);
goto done;
} }
/* iterate over all headers */ /* iterate over all headers */
sep = ',';
ph = &header;
part = &r->headers_in.headers.part; part = &r->headers_in.headers.part;
h = part->elts; h = part->elts;
@ -373,12 +340,49 @@ header_in(r, key)
continue; continue;
} }
ngx_http_perl_set_targ(h[i].value.data, h[i].value.len); *ph = &h[i];
ph = &h[i].next;
}
*ph = NULL;
ph = &header;
found:
if (*ph == NULL) {
XSRETURN_UNDEF;
}
if ((*ph)->next == NULL) {
ngx_http_perl_set_targ((*ph)->value.data, (*ph)->value.len);
goto done; goto done;
} }
XSRETURN_UNDEF; size = - (ssize_t) (sizeof("; ") - 1);
for (h = *ph; h; h = h->next) {
size += h->value.len + sizeof("; ") - 1;
}
value = ngx_pnalloc(r->pool, size);
if (value == NULL) {
ctx->error = 1;
croak("ngx_pnalloc() failed");
}
p = value;
for (h = *ph; h; h = h->next) {
p = ngx_copy(p, h->value.data, h->value.len);
if (h->next == NULL) {
break;
}
*p++ = sep; *p++ = ' ';
}
ngx_http_perl_set_targ(value, size);
done: done: