Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Tree: 90744753b9
Branches Tags
freepascal.comp...
/
packages
/
base
/
libc
/
ssocketh.inc

ssocketh.inc 4.6 KB
History Raw

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051 
  1. 

  2. Const
    3. 

  3.   SHUT_RD = 0;
    4. 

  4.   SHUT_WR = 1;
    5. 

  5.   SHUT_RDWR = 2;
    6. 

  6. 

  7. function socket(__domain:longint; __type:longint; __protocol:longint):longint;cdecl;external clib name 'socket';
    8. 

  8. function socketpair(__domain:longint; __type:longint; __protocol:longint; __fds: plongint):longint;cdecl;external clib name 'socketpair';
    9. 

  9. function bind(__fd:longint; __addr:Psockaddr; __len:socklen_t):longint;cdecl;external clib name 'bind';
    10. 

  10. function getsockname(__fd:longint; __addr:Psockaddr; __len:Psocklen_t):longint;cdecl;external clib name 'getsockname';
    11. 

  11. function connect(__fd:longint; __addr:Psockaddr; __len:socklen_t):longint;cdecl;external clib name 'connect';
    12. 

  12. function getpeername(__fd:longint; __addr:Psockaddr; __len:Psocklen_t):longint;cdecl;external clib name 'getpeername';
    13. 

  13. function send(__fd:longint; __buf:pointer; __n:size_t; __flags:longint):ssize_t;cdecl;external clib name 'send';
    14. 

  14. function recv(__fd:longint; __buf:pointer; __n:size_t; __flags:longint):ssize_t;cdecl;external clib name 'recv';
    15. 

  15. function sendto(__fd:longint; __buf:pointer; __n:size_t; __flags:longint; __addr:Psockaddr;  __addr_len:socklen_t):ssize_t;cdecl;external clib name 'sendto';
    16. 

  16. function recvfrom(__fd:longint; __buf:pointer; __n:size_t; __flags:longint; __addr:Psockaddr;   __addr_len:Psocklen_t):ssize_t;cdecl;external clib name 'recvfrom';
    17. 

  17. function sendmsg(__fd:longint; __message:Pmsghdr; __flags:longint):ssize_t;cdecl;external clib name 'sendmsg';
    18. 

  18. function recvmsg(__fd:longint; __message:Pmsghdr; __flags:longint):ssize_t;cdecl;external clib name 'recvmsg';
    19. 

  19. function getsockopt(__fd:longint; __level:longint; __optname:longint; __optval:pointer; __optlen:Psocklen_t):longint;cdecl;external clib name 'getsockopt';
    20. 

  20. function setsockopt(__fd:longint; __level:longint; __optname:longint; __optval:pointer; __optlen:socklen_t):longint;cdecl;external clib name 'setsockopt';
    21. 

  21. function listen(__fd:longint; __n:longint):longint;cdecl;external clib name 'listen';
    22. 

  22. function accept(__fd:longint; __addr:Psockaddr; __addr_len:Psocklen_t):longint;cdecl;external clib name 'accept';
    23. 

  23. function shutdown(__fd:longint; __how:longint):longint;cdecl;external clib name 'shutdown';
    24. 

  24. function isfdtype(__fd:longint; __fdtype:longint):longint;cdecl;external clib name 'isfdtype';
    25. 

  25. 

  26. 

  27. { ---------------------------------------------------------------------
    28. 

  28.     Borland compatibility types
    29. 

  29.   ---------------------------------------------------------------------}
    30. 

  30. 

  31. type
    32. 

  32.   TSocketPair = packed array[0..1] of TSocket;
    33. 

  33. 

  34. function socket(__domain: Integer; __type: __socket_type; __protocol: Integer): TSocket; cdecl;external clib name 'socket';
    35. 

  35. function socketpair(__domain, __type, __protocol: Integer; var __fds: TSocketPair): Integer; cdecl;external clib name 'socketpair';
    36. 

  36. function socketpair(__domain: Integer; __type: __socket_type; __protocol: Integer; var __fds: TSocketPair): Integer; cdecl;external clib name 'socketpair';
    37. 

  37. 

  38. function bind(__fd:longint; var __addr: sockaddr; __len:socklen_t):longint;cdecl;external clib name 'bind';
    39. 

  39. function getsockname(__fd:longint; var __addr: sockaddr; var __len: socklen_t):longint;cdecl;external clib name 'getsockname';
    40. 

  40. function connect(__fd:longint; const __addr: sockaddr; __len:socklen_t):longint;cdecl;external clib name 'connect';
    41. 

  41. function getpeername(__fd:longint; var __addr: sockaddr; var __len: socklen_t):longint;cdecl;external clib name 'getpeername';
    42. 

  42. function sendto(__fd:longint; __buf:pointer; __n:size_t; __flags:longint; var __addr: sockaddr;  __addr_len:socklen_t):ssize_t;cdecl;external clib name 'sendto';
    43. 

  43. function recvfrom(__fd:longint; __buf:pointer; __n:size_t; __flags:longint; var __addr: sockaddr;   __addr_len:Psocklen_t):ssize_t;cdecl;external clib name 'recvfrom';
    44. 

  44. function sendmsg(__fd:longint; const __message: msghdr; __flags:longint):ssize_t;cdecl;external clib name 'sendmsg';
    45. 

  45. function recvmsg(__fd:longint; var __message: msghdr; __flags:longint):ssize_t;cdecl;external clib name 'recvmsg';
    46. 

  46. function getsockopt(__fd:longint; __level:longint; __optname:longint; __optval:pointer; var __optlen: socklen_t):longint;cdecl;external clib name 'getsockopt';
    47. 

  47. function accept(__fd:longint; var __addr: sockaddr; var __addr_len:socklen_t):longint;cdecl;external clib name 'accept';
    48. 

  48. function send(__fd:longint; const __buf; __n:size_t; __flags:longint):ssize_t;cdecl;external clib name 'send';
    49. 

  49. function recv(__fd:longint; var __buf; __n:size_t; __flags:longint):ssize_t;cdecl;external clib name 'recv';
    50. 

  50. function sendto(__fd:longint; const __buf; __n:size_t; __flags:longint; __addr:Psockaddr;  __addr_len:socklen_t):ssize_t;cdecl;external clib name 'sendto';
    51. 

  51. function recvfrom(__fd:longint; var __buf; __n:size_t; __flags:longint; __addr:Psockaddr;   __addr_len:Psocklen_t):ssize_t;cdecl;external clib name 'recvfrom';
    52.