home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / tcpipvp2.zip / IBMSO32.PAS < prev    next >
Pascal/Delphi Source File  |  1996-10-10  |  4KB  |  88 lines
  1. unit IBMSO32;
  2.  
  3. {$OrgName+ }
  4.  
  5. interface
  6.  
  7. uses OS2Def;
  8.  
  9. {$CDECL+}
  10.   (****************************************************************************)
  11.   function IBM_accept(SFamily:  ULong;
  12.                       SAddr:    pointer;
  13.                       SAddrL:   pointer): APIRET;
  14.   (****************************************************************************)
  15.   function IBM_bind(SSocket:    ULong;
  16.                     SAddr:      pointer;
  17.                     SAddrLen:   ULong):   APIRET;
  18.   (****************************************************************************)
  19.   function IBM_connect(SSocket: ULong;
  20.                        SAddr:   pointer;
  21.                        SAddrLen:ULong):   APIRET;
  22.   (****************************************************************************)
  23.   function IBM_gethostid: APIRET;
  24.   (****************************************************************************)
  25.   function IBM_getsockname(SSocket: ULong;
  26.                            SName:   pointer;
  27.                            SLength: pointer): APIRET;
  28.   (****************************************************************************)
  29.   function IBM_ioctl(SSocket:  ULong;
  30.                      SRequest: longint;
  31.                      SArgP:    pointer): APIRET;
  32.   (****************************************************************************)
  33.   function IBM_listen(SSocket: ULong;
  34.                       SQueue:  ULong): APIRET;
  35.   (****************************************************************************)
  36.   function IBM_recv(SSocket:   ULong;
  37.                     SBuffer:   pointer;
  38.                     SLength:   ULong;
  39.                     SFlags:    ULong): APIRET;
  40.   (****************************************************************************)
  41.   function IBM_send(SSocket:   ULong;
  42.                     SBuffer:   pointer;
  43.                     SLength:   ULong;
  44.                     SFlags:    ULong): APIRET;
  45.   (****************************************************************************)
  46.   function IBM_socket(SDomain:    ULong;
  47.                      SType:      ULong;
  48.                      SProtocol:  ULong): APIRET;
  49.   (****************************************************************************)
  50.   function IBM_soclose(SProtocol: ULong): APIRET;
  51.   (****************************************************************************)
  52.   function IBM_sock_errno: APIRET;
  53.   (****************************************************************************)
  54.   function IBM_shutdown(SSocket: ULong;
  55.                         SFlags:  ULong): APIRET;
  56.   (****************************************************************************)
  57.   function IBM_sock_init: APIRET;
  58.   (****************************************************************************)
  59. {$CDECL-}
  60.  
  61. implementation
  62.  
  63. const
  64.   Version    = '00.90';
  65.   UseString:  string = '@(#)import interface unit for IBM TCP/IP so32dll.dll'+#0;
  66.   CopyRight1: string = '@(#)ibmso32dll Version '+Version+' - 10.10.96'+#0;
  67.   CopyRight2: string = '@(#)(C) Chr.Hohmann BfS ST2.2 1996'+#0;
  68.  
  69.  
  70. {$CDECL+}
  71.   function IBM_accept;                      external;
  72.   function IBM_bind;                        external;
  73.   function IBM_connect;                     external;
  74.   function IBM_gethostid;                   external;
  75.   function IBM_getsockname;                 external;
  76.   function IBM_ioctl;                       external;
  77.   function IBM_listen;                      external;
  78.   function IBM_recv;                        external;
  79.   function IBM_send;                        external;
  80.   function IBM_socket;                      external;
  81.   function IBM_soclose;                     external;
  82.   function IBM_sock_errno;                  external;
  83.   function IBM_shutdown;                    external;
  84.   function IBM_sock_init;                   external;
  85. {$CDECL-}
  86.  
  87. end.
  88.