From: Pierre Joye <pajoye@php.net>
Date: Fri, 25 Nov 2011 21:18:40 +0000 (+0000)
Subject: - implement FR #60390, SERVER_PORT missing
X-Git-Tag: php-5.5.0alpha1~810
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=31eaf9043dbb31c580b27dc50c638acdb6b94f38;p=php

- implement FR #60390, SERVER_PORT missing
---

diff --git a/sapi/cli/php_cli_server.c b/sapi/cli/php_cli_server.c
index 9d3c8191ae..de4f4b65b5 100644
--- a/sapi/cli/php_cli_server.c
+++ b/sapi/cli/php_cli_server.c
@@ -577,6 +577,12 @@ static void sapi_cli_server_register_variables(zval *track_vars_array TSRMLS_DC)
 		sapi_cli_server_register_variable(track_vars_array, "SERVER_PROTOCOL", tmp TSRMLS_CC);
 		efree(tmp);
 	}
+	{
+		char *tmp;
+		spprintf(&tmp, 0, "%i",  client->server->port);
+		sapi_cli_server_register_variable(track_vars_array, "SERVER_PORT", tmp TSRMLS_CC);
+	}
+
 	sapi_cli_server_register_variable(track_vars_array, "REQUEST_URI", client->request.request_uri TSRMLS_CC);
 	sapi_cli_server_register_variable(track_vars_array, "REQUEST_METHOD", SG(request_info).request_method TSRMLS_CC);
 	sapi_cli_server_register_variable(track_vars_array, "SCRIPT_NAME", client->request.vpath TSRMLS_CC);