From e81696d0f10dbfbd1f93412c1f948b4cfcdb95d2 Mon Sep 17 00:00:00 2001 From: chrivers Date: Sun, 11 Feb 2007 23:51:35 +0000 Subject: [PATCH] + Added TIn6Addr and TSockAddrIn6 to winsock2.pp git-svn-id: trunk@6452 - --- rtl/win/winsock2.pp | 28 +++++++++++++++++++++++++--- 1 file changed, 25 insertions(+), 3 deletions(-) diff --git a/rtl/win/winsock2.pp b/rtl/win/winsock2.pp index a464b41453..d8dfd5bbac 100755 --- a/rtl/win/winsock2.pp +++ b/rtl/win/winsock2.pp @@ -355,8 +355,8 @@ const PF_FIREFOX = AF_FIREFOX; PF_UNKNOWN1 = AF_UNKNOWN1; PF_BAN = AF_BAN; - PF_ATM = AF_ATM; - PF_INET6 = AF_INET6; + PF_ATM = AF_ATM; + PF_INET6 = AF_INET6; PF_MAX = AF_MAX; @@ -376,8 +376,20 @@ type 0: (S_un_b: SunB); 1: (S_un_w: SunW); 2: (S_addr: u_long); - end; + end; in_addr = TInAddr; + + PIn6Addr = ^TIn6Addr; + TIn6Addr = record + case byte of + 0: (u6_addr8 : array[0..15] of byte); + 1: (u6_addr16 : array[0..7] of Word); + 2: (u6_addr32 : array[0..3] of Cardinal); + 3: (s6_addr8 : array[0..15] of shortint); + 4: (s6_addr : array[0..15] of shortint); + 5: (s6_addr16 : array[0..7] of smallint); + 6: (s6_addr32 : array[0..3] of LongInt); + end; PSockAddrIn = ^TSockAddrIn; TSockAddrIn = record @@ -390,6 +402,16 @@ type sa_data: array[0..13] of Char) end; sockaddr_in = TSockAddrIn; + + PSockAddrIn6 = ^TSockAddrIn6; + TSockAddrIn6 = record + sin6_family : u_short; + sin6_port : u_short; + sin6_flowinfo : u_long; + sin6_addr : TIn6Addr; + sin6_scope_id : u_long; + end; + sockaddr_in6 = TSockAddrIn6; { Structure used by kernel to store most addresses. }