http: Fix HLS playback on some servers

RPi-Distro/vlc#101

The issue is that the server doesn't like the port number on the end of
the Host line. This is a server fault, but it is legitimate to omit the
port number if it is the default so remove it if that is the case.

modules/access/http/message.c

@@ -306,11 +306,17 @@ char *vlc_http_msg_format(const struct vlc_http_msg *m, size_t *restrict lenp,
 
  if (m->status < 0)
  {
+ int hlen = (int)strlen(m->authority);
+ if (hlen > 4 && strcmp(m->scheme, "https") == 0 && strcmp(m->authority + hlen - 4, ":443") == 0)
+ hlen -= 4;
+ else if (hlen > 3 && strcmp(m->scheme, "http") == 0 && strcmp(m->authority + hlen - 3, ":80") == 0)
+ hlen -= 3;
+
  vlc_memstream_printf(&stream, "%s ", m->method);
  if (proxied)
  vlc_memstream_printf(&stream, "%s://%s", m->scheme, m->authority);
- vlc_memstream_printf(&stream, "%s HTTP/1.1\r\nHost: %s\r\n",
- m->path ? m->path : m->authority, m->authority);
+ vlc_memstream_printf(&stream, "%s HTTP/1.1\r\nHost: %.*s\r\n",
+ m->path ? m->path : m->authority, hlen, m->authority);
  }
  else
  vlc_memstream_printf(&stream, "HTTP/1.1 %03hd .\r\n", m->status);