Hello,
I translated the following struct
struct iphdr {
#if defined(__LITTLE_ENDIAN_BITFIELD)
__u8 ihl:4,
version:4;
#elif defined (__BIG_ENDIAN_BITFIELD)
__u8 version:4,
ihl:4;
#else
#error "Please fix <asm/byteorder.h>"
#endif
__u8 tos;
__be16 tot_len;
__be16 id;
__be16 frag_off;
__u8 ttl;
__u8 protocol;
__sum16 check;
__be32 saddr;
__be32 daddr;
/*The options start here. */
};
to the following Pascal record:
iphdr = record
{$IFDEF ENDIAN_LITTLE}
jhl : Cardinal; // __u8 ihl:4,
version : Cardinal; // version:4
{$ELSE}
version : Cardinal; // __u8 version:4,
jhl : Cardinal; // version:4
{$ENDIF}
tos : cuint8;
tot_len : cint16;
id : cint16;
frag_off : cint16;
ttl : cint8;
protocol : cint8;
check : cuint16;
saddr : cint32;
daddr : cint32;
end;
The problem is, that I get weird data in the fields, so I think I did
not translate it properly, but can't figure out what have I missed.
Thanks,
Ido
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
