blob: 97dcae4378b0c29ba67c2aa129462c307d8ec305 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
const
IP_TOS = 1;
IP_TTL = 2;
IP_HDRINCL = 3;
IP_OPTIONS = 4;
IP_ROUTER_ALERT = 5;
IP_RECVOPTS = 6;
IP_RETOPTS = 7;
IP_PKTINFO = 8;
IP_PKTOPTIONS = 9;
IP_PMTUDISC = 10;
IP_MTU_DISCOVER = 10;
IP_RECVERR = 11;
IP_RECVTTL = 12;
IP_RECVTOS = 13;
IP_MULTICAST_IF = 32;
IP_MULTICAST_TTL = 33;
IP_MULTICAST_LOOP = 34;
IP_ADD_MEMBERSHIP = 35;
IP_DROP_MEMBERSHIP = 36;
IP_RECVRETOPTS = IP_RETOPTS;
IP_PMTUDISC_DONT = 0;
IP_PMTUDISC_WANT = 1;
IP_PMTUDISC_DO = 2;
SOL_IP = 0;
IP_DEFAULT_MULTICAST_TTL = 1;
IP_DEFAULT_MULTICAST_LOOP = 1;
IP_MAX_MEMBERSHIPS = 20;
type
Pip_opts = ^ip_opts;
ip_opts = record
ip_dst : in_addr;
ip_opts : array[0..39] of char;
end;
Pip_mreq = ^ip_mreq;
ip_mreq = record
imr_multiaddr : in_addr;
imr_interface : in_addr;
end;
Pip_mreqn = ^ip_mreqn;
ip_mreqn = record
imr_multiaddr : in_addr;
imr_address : in_addr;
imr_ifindex : longint;
end;
Pin_pktinfo = ^in_pktinfo;
in_pktinfo = record
ipi_ifindex : longint;
ipi_spec_dst : in_addr;
ipi_addr : in_addr;
end;
const
IPV6_ADDRFORM = 1;
IPV6_PKTINFO = 2;
IPV6_HOPOPTS = 3;
IPV6_DSTOPTS = 4;
IPV6_RTHDR = 5;
IPV6_PKTOPTIONS = 6;
IPV6_CHECKSUM = 7;
IPV6_HOPLIMIT = 8;
IPV6_NEXTHOP = 9;
IPV6_AUTHHDR = 10;
IPV6_UNICAST_HOPS = 16;
IPV6_MULTICAST_IF = 17;
IPV6_MULTICAST_HOPS = 18;
IPV6_MULTICAST_LOOP = 19;
IPV6_JOIN_GROUP = 20;
IPV6_LEAVE_GROUP = 21;
IPV6_ROUTER_ALERT = 22;
IPV6_MTU_DISCOVER = 23;
IPV6_MTU = 24;
IPV6_RECVERR = 25;
// SCM_SRCRT = IPV6_RXSRCRT;
IPV6_RXHOPOPTS = IPV6_HOPOPTS;
IPV6_RXDSTOPTS = IPV6_DSTOPTS;
IPV6_ADD_MEMBERSHIP = IPV6_JOIN_GROUP;
IPV6_DROP_MEMBERSHIP = IPV6_LEAVE_GROUP;
IPV6_PMTUDISC_DONT = 0;
IPV6_PMTUDISC_WANT = 1;
IPV6_PMTUDISC_DO = 2;
SOL_IPV6 = 41;
SOL_ICMPV6 = 58;
IPV6_RTHDR_LOOSE = 0;
IPV6_RTHDR_STRICT = 1;
IPV6_RTHDR_TYPE_0 = 0;
{ ---------------------------------------------------------------------
Borland compatibility types
---------------------------------------------------------------------}
// Type
|
