From: Maxim Dounin <mdounin@mdounin.ru>
Date: Mon, 30 May 2022 18:25:36 +0000 (+0300)
Subject: Perl: all known input headers are handled identically.
X-Git-Url: http://www.kaiwu.me/postgresql/commit/static/gitweb.js?a=commitdiff_plain;h=dab1b086ef6702811196f317b39623ad81eac505;p=nginx.git

Perl: all known input headers are handled identically.

As all known input headers are now linked lists, these are now handled
identically.  In particular, this makes it possible to access properly
combined values of headers not specifically handled previously, such
as "Via" or "Connection".
---

diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index e2180e6cf..9e8a6a5ce 100644
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -304,29 +304,11 @@ header_in(r, key)
 
         if (hh->offset == offsetof(ngx_http_headers_in_t, cookie)) {
             sep = ';';
-            goto multi;
-        }
-#if (NGX_HTTP_X_FORWARDED_FOR)
-        if (hh->offset == offsetof(ngx_http_headers_in_t, x_forwarded_for)) {
-            sep = ',';
-            goto multi;
-        }
-#endif
-
-        ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset);
-
-        if (*ph) {
-            ngx_http_perl_set_targ((*ph)->value.data, (*ph)->value.len);
 
-            goto done;
+        } else {
+            sep = ',';
         }
 
-        XSRETURN_UNDEF;
-
-    multi:
-
-        /* Cookie, X-Forwarded-For */
-
         ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset);
 
         if (*ph == NULL) {