C NETWORK.DEF C Define Socket Structure Structure /Socket_IN_Def/ Integer *2 SIN_Family Integer *2 SIN_Port Integer *4 SIN_Address Byte SIN_Fill(8) End Structure ! Socket_IN_Def C DECnet IOSB structure (vnews 1.4) Structure /DecIOSB/ Integer *2 errcode Integer *2 bytcnt Byte icmpcode Byte flags Integer *2 unused End Structure ! DecIOSB C TCP/IP Services C Integer Connect C External Connect C Integer HtoNS C External HtoNS C Integer Recv C External Recv C Integer Send C External Send C Integer Socket C External Socket C Network Constants C Added hostent for gethostbyname(). vnews 1.4 Parameter AF_INet = 2 Parameter Sock_Stream = 1 Parameter Sock_DGram = 2 Parameter Hostent__H_ADDR = 16 C Type of network transport used for NNTP Parameter Unknown_Transport = 1 Parameter DECNET_Transport = 2 Parameter TCPIP_Transport = 3 Parameter Multinet_Transport = 4 Parameter WIN_Transport = 5 Parameter CMU_Transport = 6 Parameter UCX_Transport = 7 C TCP/IP Common Definitions Integer *4 Channel Character *512 Recv_Buf Integer *4 Recv_BufE Integer *4 Recv_BufS Common /Server/ Channel, Recv_Buf, Recv_BufS, Recv_BufE C NNTP Server Name and DECnet task Byte Server_IP_Number(64) Character*64 DECNET_Number C Allow access to the Server_IP_Number in CHAR form as well. Equivalence (DECNET_Number(1:1),Server_IP_Number(1)) Character *80 DECnet_Task Integer *2 NNTP_Transport ! what kind of network? Common /Server_Name/ 1 Server_IP_Number, DECnet_Task, 2 NNTP_Transport