blob: b865cda7002a18916479799ff300c1048d325dd2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
Function RT_ADDRCLASS(flags: u_int32_t): u_int32_t;
begin
Result:=flags shr 23;
end;
Function RT_TOS(tos: Integer): Integer;
begin
Result:=tos and IPTOS_TOS_MASK;
end;
Function RT_LOCALADDR(flags: u_int32_t): Boolean;
begin
Result:=(flags and RTF_ADDRCLASSMASK)=(RTF_LOCAL or RTF_INTERFACE);
end;
|
