[Ada] Fix IPv6 numeric address detection

IPv6 numeric address can't have less than 2 colons. It fixes the error
when Get_Host_By_Name called with hostname composed by only hexadecimal
symbols.

2019-08-12  Dmitriy Anisimkov  <anisimko@adacore.com>

gcc/ada/

	* libgnat/g-socket.adb (Is_IPv6_Address): Check that no less
	then 2 colons in IPv6 numeric address.

From-SVN: r274308
This commit is contained in:
Dmitriy Anisimkov 2019-08-12 09:01:58 +00:00 committed by Pierre-Marie de Rodat
parent 4a2e9be1ac
commit 8467866f26
2 changed files with 6 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2019-08-12 Dmitriy Anisimkov <anisimko@adacore.com>
* libgnat/g-socket.adb (Is_IPv6_Address): Check that no less
then 2 colons in IPv6 numeric address.
2019-08-12 Dmitriy Anisimkov <anisimko@adacore.com>
* libgnat/g-comlin.ads, libgnat/g-comlin.adb (Getopt): Add

View File

@ -1797,7 +1797,7 @@ package body GNAT.Sockets is
end if;
end loop;
return Colons <= 8;
return Colons in 2 .. 8;
end Is_IPv6_Address;
---------------------