Socket addrinfo structure

[Alex Cones]

Hello!

I`m learning a sockets for now, and trying to do something with them. But I can`t find a addinfo structure in winsock module.

I`m using this mans for learning:

Creating a Socket for the Server
addrinfo structure

Help, please.

[felipemdc]

Then just convert yourself the structure:

uses ctypes;

{$packrecords c}

type
  addrinfo = record
    ai_flags: cint;
    ai_family: cint;
    ai_socktype: cint;
    ai_protocol: cint;
    ai_addrlen: csize_t;
    ai_canonname: PChar;
    ai_addr: Psockaddr;
    ai_next: Paddrinfo;
  end;
  Paddrinfo = ^addrinfo;
  ADDRINFOA = addrinfo;
  PADDRINFOA = Paddrinfo;

and similarly for whatever else you need. You might also want to make a patch for this unit so that this gets included in future fpc releases. Note that there is also a unit winsock2, not sure if this type should go to both.

[Alex Cones]

Ok. After all, where I need to place my "patch"?

[felipemdc]

In the bug tracker.

[Alex Cones]

Ok.

But I can`t define the addrinfo structure:

Code: [Select]

Type

  TAddrInfo = Record
   ai_flags      : Integer;
   ai_family     : Integer;
   ai_socktype   : Integer;
   ai_protocol   : Integer;
   ai_addrlen    : Size_t;
   ai_canonname  : PChar;
   ai_addr       : PSockAddr;
   ai_next       : PAddrInfo;
  End;

  PAddrInfo : ^AddrInfo;

UNTNetTypes.pas(21,29) Error: Identifier not found "PAddrInfo"
UNTNetTypes.pas(21,29) Error: Error in type definition
UNTNetTypes.pas(26,1) Error: Forward type not resolved "AddrInfo"
UNTNetTypes.pas(26,1) Fatal: There were 3 errors compiling module, stopping

[Leledumbo]

PAddrInfo = ^TAddrInfo;

and put it before TAddrInfo definition

[marcov]

(1) these are for winsock2 not unit winsock
(2) these are XP+
(3) Try unit jwaws2tcpip, it has some newer header translations.