From 0aab9a23aedaf3d68f7e59aa1a20727de2471291 Mon Sep 17 00:00:00 2001
From: Cerdic <cedric@yterium.com>
Date: Tue, 4 Dec 2018 17:13:46 +0000
Subject: [PATCH] Quand on fait une requete http/https sur un port non standard
 il faut suffixer le host envoye dans l'entete tcp, sinon le $[SERVER_PORT]
 n'est pas renseigne a l'arrivee (fix le fait qu'on avait un resultat
 different entre un curl http://localhost:8888/ et un recuperer_url() sur la
 meme url)

---
 ecrire/inc/distant.php | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/ecrire/inc/distant.php b/ecrire/inc/distant.php
index 2803c55067..6d91efb502 100644
--- a/ecrire/inc/distant.php
+++ b/ecrire/inc/distant.php
@@ -1484,8 +1484,12 @@ function lance_requete(
 
 	$site = isset($GLOBALS['meta']['adresse_site']) ? $GLOBALS['meta']['adresse_site'] : '';
 
+	$host_port = $host;
+	if ($port != (in_array($scheme , array('tls','ssl')) ? 443 : 80)) {
+		$host_port .= ":$port";
+	}
 	$req = "$method $path $vers\r\n"
-		. "Host: $host\r\n"
+		. "Host: $host_port\r\n"
 		. 'User-Agent: ' . _INC_DISTANT_USER_AGENT . "\r\n"
 		. ($refuse_gz ? '' : ('Accept-Encoding: ' . _INC_DISTANT_CONTENT_ENCODING . "\r\n"))
 		. (!$site ? '' : "Referer: $site/$referer\r\n")
-- 
GitLab