home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl501m.zip / lib / OS2 / sys / socket.ph < prev   
Encoding:
Text File  |  1995-01-15  |  3.2 KB  |  94 lines
  1. if (!defined &_SYS_SOCKET_H_) {
  2.     eval 'sub _SYS_SOCKET_H_ {1;}';
  3.     if (defined ( &__cplusplus)) {
  4.     }
  5.     if (!defined &_EMX_TCPIP) {
  6.     eval 'sub _EMX_TCPIP {1;}';
  7.     }
  8.     eval 'sub SOCK_STREAM {1;}';
  9.     eval 'sub SOCK_DGRAM {2;}';
  10.     eval 'sub SOCK_RAW {3;}';
  11.     eval 'sub SOCK_RDM {4;}';
  12.     eval 'sub SOCK_SEQPACKET {5;}';
  13.     eval 'sub SO_DEBUG {0x0001;}';
  14.     eval 'sub SO_ACCEPTCONN {0x0002;}';
  15.     eval 'sub SO_REUSEADDR {0x0004;}';
  16.     eval 'sub SO_KEEPALIVE {0x0008;}';
  17.     eval 'sub SO_DONTROUTE {0x0010;}';
  18.     eval 'sub SO_BROADCAST {0x0020;}';
  19.     eval 'sub SO_USELOOPBACK {0x0040;}';
  20.     eval 'sub SO_LINGER {0x0080;}';
  21.     eval 'sub SO_OOBINLINE {0x0100;}';
  22.     eval 'sub SO_SNDBUF {0x1001;}';
  23.     eval 'sub SO_RCVBUF {0x1002;}';
  24.     eval 'sub SO_SNDLOWAT {0x1003;}';
  25.     eval 'sub SO_RCVLOWAT {0x1004;}';
  26.     eval 'sub SO_SNDTIMEO {0x1005;}';
  27.     eval 'sub SO_RCVTIMEO {0x1006;}';
  28.     eval 'sub SO_ERROR {0x1007;}';
  29.     eval 'sub SO_TYPE {0x1008;}';
  30.     eval 'sub SOL_SOCKET {0xffff;}';
  31.     eval 'sub AF_UNSPEC {0;}';
  32.     eval 'sub AF_UNIX {1;}';
  33.     eval 'sub AF_INET {2;}';
  34.     eval 'sub AF_IMPLINK {3;}';
  35.     eval 'sub AF_PUP {4;}';
  36.     eval 'sub AF_CHAOS {5;}';
  37.     eval 'sub AF_NS {6;}';
  38.     eval 'sub AF_ISO {7;}';
  39.     eval 'sub AF_OSI { &AF_ISO;}';
  40.     eval 'sub AF_ECMA {8;}';
  41.     eval 'sub AF_DATAKIT {9;}';
  42.     eval 'sub AF_CCITT {10;}';
  43.     eval 'sub AF_SNA {11;}';
  44.     eval 'sub AF_DECnet {12;}';
  45.     eval 'sub AF_DLI {13;}';
  46.     eval 'sub AF_LAT {14;}';
  47.     eval 'sub AF_HYLINK {15;}';
  48.     eval 'sub AF_APPLETALK {16;}';
  49.     eval 'sub AF_MAX {17;}';
  50.     eval 'sub PF_UNSPEC { &AF_UNSPEC;}';
  51.     eval 'sub PF_UNIX { &AF_UNIX;}';
  52.     eval 'sub PF_INET { &AF_INET;}';
  53.     eval 'sub PF_IMPLINK { &AF_IMPLINK;}';
  54.     eval 'sub PF_PUP { &AF_PUP;}';
  55.     eval 'sub PF_CHAOS { &AF_CHAOS;}';
  56.     eval 'sub PF_NS { &AF_NS;}';
  57.     eval 'sub PF_ISO { &AF_ISO;}';
  58.     eval 'sub PF_OSI { &AF_ISO;}';
  59.     eval 'sub PF_ECMA { &AF_ECMA;}';
  60.     eval 'sub PF_DATAKIT { &AF_DATAKIT;}';
  61.     eval 'sub PF_CCITT { &AF_CCITT;}';
  62.     eval 'sub PF_SNA { &AF_SNA;}';
  63.     eval 'sub PF_DECnet { &AF_DECnet;}';
  64.     eval 'sub PF_DLI { &AF_DLI;}';
  65.     eval 'sub PF_LAT { &AF_LAT;}';
  66.     eval 'sub PF_HYLINK { &AF_HYLINK;}';
  67.     eval 'sub PF_APPLETALK { &AF_APPLETALK;}';
  68.     eval 'sub PF_MAX { &AF_MAX;}';
  69.     eval 'sub SOMAXCONN {5;}';
  70.     eval 'sub MSG_OOB {0x1;}';
  71.     eval 'sub MSG_PEEK {0x2;}';
  72.     eval 'sub MSG_DONTROUTE {0x4;}';
  73.     eval 'sub MSG_EOR {0x8;}';
  74.     eval 'sub MSG_TRUNC {0x10;}';
  75.     eval 'sub MSG_CTRUNC {0x20;}';
  76.     eval 'sub MSG_WAITALL {0x40;}';
  77.     eval 'sub CMSG_DATA {
  78.         local($cmsg) = @_;
  79.         eval "((($cmsg) + 1))";
  80.     }';
  81.     eval 'sub CMSG_NXTHDR {
  82.         local($mhdr, $cmsg) = @_;
  83.         eval "((( &caddr_t)($cmsg) + ($cmsg)-> &cmsg_len + $sizeof{\'struct cmsghdr\'} > ($mhdr)-> &msg_control + ($mhdr)-> &msg_controllen) ?  &NULL : (( &caddr_t)($cmsg) +  &ALIGN(($cmsg)-> &cmsg_len)))";
  84.     }';
  85.     eval 'sub CMSG_FIRSTHDR {
  86.         local($mhdr) = @_;
  87.         eval "(($mhdr)-> &msg_control)";
  88.     }';
  89.     eval 'sub SCM_RIGHTS {0x01;}';
  90.     if (defined ( &__cplusplus)) {
  91.     }
  92. }
  93. 1;
  94.