Hi,
If a numeric domain name > integer (i.e. 9999999999.com) is input into
WSocketIsDottedIP function (all versions) then Numval will overflow.
I suggest replacing the following:-
[OverbyteIcsWSocket]
else if AnsiChar(S[I]) in ['0'..'9'] then
NumVal := NumVal * 10 + Ord(S[I]) - Ord('0')
[WSocket]
else if S[I] in ['0'..'9'] then
NumVal := NumVal * 10 + Ord(S[I]) - Ord('0')
with
[OverbyteIcsWSocket]
else if AnsiChar(S[I]) in ['0'..'9'] then
begin
NumVal := NumVal * 10 + Ord(S[I]) - Ord('0');
if NumVal>255 then
exit;
end
[WSocket]
else if S[I] in ['0'..'9'] then
begin
NumVal := NumVal * 10 + Ord(S[I]) - Ord('0');
if NumVal>255 then
exit;
end
hth
JohnW
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
