extra/unix/bsd/bsd.factor

   1 ! Copyright (C) 2005, 2006 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 IN: unix
   4 USING: alien.syntax ;
   5
   6 ! FreeBSD
   7
   8 : O_RDONLY  HEX: 0000 ; inline
   9 : O_WRONLY  HEX: 0001 ; inline
  10 : O_RDWR    HEX: 0002 ; inline
  11 : O_APPEND  HEX: 0008 ; inline
  12 : O_CREAT   HEX: 0200 ; inline
  13 : O_TRUNC   HEX: 0400 ; inline
  14 : O_EXCL    HEX: 0800 ; inline
  15
  16 : FD_SETSIZE 1024 ; inline
  17
  18 : SOL_SOCKET HEX: ffff ; inline
  19 : SO_REUSEADDR HEX: 4 ; inline
  20 : SO_OOBINLINE HEX: 100 ; inline
  21 : SO_SNDTIMEO HEX: 1005 ; inline
  22 : SO_RCVTIMEO HEX: 1006 ; inline
  23
  24 : F_SETFL 4 ; inline
  25 : O_NONBLOCK 4 ; inline
  26
  27 C-STRUCT: addrinfo
  28     { "int" "flags" }
  29     { "int" "family" }
  30     { "int" "socktype" }
  31     { "int" "protocol" }
  32     { "socklen_t" "addrlen" }
  33     { "char*" "canonname" }
  34     { "void*" "addr" }
  35     { "addrinfo*" "next" } ;
  36
  37 C-STRUCT: sockaddr-in
  38     { "uchar" "len" }
  39     { "uchar" "family" }
  40     { "ushort" "port" }
  41     { "in_addr_t" "addr" }
  42     { "longlong" "unused" } ;
  43
  44 C-STRUCT: sockaddr-in6
  45     { "uchar" "len" }
  46     { "uchar" "family" }
  47     { "ushort" "port" }
  48     { "uint" "flowinfo" }
  49     { { "uchar" 16 } "addr" }
  50     { "uint" "scopeid" } ;
  51
  52 C-STRUCT: sockaddr-un
  53     { "uchar" "len" }
  54     { "uchar" "family" }
  55     { { "char" 104 } "path" } ;
  56
  57 : max-un-path 104 ; inline
  58
  59 : EINTR HEX: 4 ; inline
  60 : EAGAIN HEX: 23 ; inline
  61 : EINPROGRESS HEX: 24 ; inline
  62
  63 : SOCK_STREAM 1 ; inline
  64 : SOCK_DGRAM 2 ; inline
  65
  66 : AF_UNSPEC 0 ; inline
  67 : AF_UNIX 1 ; inline
  68 : AF_INET 2 ; inline
  69 : AF_INET6 30 ; inline
  70
  71 : PF_UNSPEC AF_UNSPEC ; inline
  72 : PF_UNIX AF_UNIX ; inline
  73 : PF_INET AF_INET ; inline
  74 : PF_INET6 AF_INET6 ; inline
  75
  76 : IPPROTO_TCP 6 ; inline
  77 : IPPROTO_UDP 17 ; inline
  78
  79 : AI_PASSIVE 1 ; inline
  80
  81 : SEEK_SET 0 ; inline
  82 : SEEK_CUR 1 ; inline
  83 : SEEK_END 2 ; inline