1$! ======================================================================== 2$! Copyright 1988-2006 University of Washington 3$! 4$! Licensed under the Apache License, Version 2.0 (the "License"); 5$! you may not use this file except in compliance with the License. 6$! You may obtain a copy of the License at 7$! 8$! http://www.apache.org/licenses/LICENSE-2.0 9$! 10$! 11$! ======================================================================== 12$! 13$! Program: Portable c-client build for VMS 14$! 15$! Author: Mark Crispin 16$! Networks and Distributed Computing 17$! Computing & Communications 18$! University of Washington 19$! Administration Building, AG-44 20$! Seattle, WA 98195 21$! Internet: MRC@CAC.Washington.EDU 22$! 23$! Date: 2 August 1994 24$! Last Edited: 30 August 2006 25$! 26$! Change this to your local timezone. This value is the number of minutes 27$! east of UTC (formerly known as GMT). Sample values: -300 (US east coast), 28$! -480 (US west coast), 540 (Japan), 60 (western Europe). 29$! VAX C's HELP information says that you should be able to use gmtime(), but 30$! it returns 0 for the struct. ftime(), you ask? It, too, returns 0 for a 31$! timezone. Nothing sucks like a VAX! 32$! 33$ CC_TIMEZONE=-480 34$! 35$! CC options 36$! 37$ CC_PREF = "/OPTIMIZE/INCLUDE=[]" 38$ CC_PREF = CC_PREF + "/DEFINE=net_getbuffer=NET_GETBUF" 39$ CC_PREF = CC_PREF + "/DEFINE=LOCALTIMEZONE='CC_TIMEZONE'" 40$! 41$! Determine TCP type 42$! 43$ TCP_TYPE = "VMSN" ! default to none 44$ IF F$LOCATE("MULTINET", P1) .LT. F$LENGTH(P1) 45$ THEN 46$ DEFINE SYS MULTINET_ROOT:[MULTINET.INCLUDE.SYS],sys$library 47$ DEFINE NETINET MULTINET_ROOT:[MULTINET.INCLUDE.NETINET] 48$ DEFINE ARPA MULTINET_ROOT:[MULTINET.INCLUDE.ARPA] 49$ TCP_TYPE = "VMSM" ! Multinet 50$ LINK_OPT = ",LINK_MNT/OPTION" 51$ ENDIF 52$ IF F$LOCATE("NETLIB", P1) .LT. F$LENGTH(P1) 53$ THEN 54$ DEFINE SYS SYS$LIBRARY: ! normal .H location 55$ DEFINE NETINET SYS$LIBRARY: 56$ DEFINE ARPA SYS$LIBRARY: 57$ LINK_OPT = ",LINK_NLB/OPTION" 58$ TCP_TYPE = "VMSL" ! NETLIB 59$ ENDIF 60$ IF TCP_TYPE .EQS. "VMSN" 61$ THEN 62$ DEFINE SYS SYS$LIBRARY: ! normal .H location 63$ DEFINE NETINET SYS$LIBRARY: 64$ DEFINE ARPA SYS$LIBRARY: 65$ LINK_OPT = "" 66$ ENDIF 67$! 68$ COPY TCP_'TCP_TYPE'.C TCP_VMS.C; 69$! 70$ COPY OS_VMS.H OSDEP.H; 71$ SET VERIFY 72$ CC'CC_PREF' MAIL 73$ CC'CC_PREF' IMAP4R1 74$ CC'CC_PREF' SMTP 75$ CC'CC_PREF' NNTP 76$ CC'CC_PREF' POP3 77$ CC'CC_PREF' DUMMYVMS 78$ CC'CC_PREF' RFC822 79$ CC'CC_PREF' MISC 80$ CC'CC_PREF' OS_VMS 81$ CC'CC_PREF' SMANAGER 82$ CC'CC_PREF' FLSTRING 83$ CC'CC_PREF' NEWSRC 84$ CC'CC_PREF' NETMSG 85$ CC'CC_PREF' UTF8 86$ CC'CC_PREF' UTF8AUX 87$ CC'CC_PREF' MTEST 88$ CC'CC_PREF' MAILUTIL 89$! 90$ LINK MTEST,OS_VMS,MAIL,IMAP4R1,SMTP,NNTP,POP3,DUMMYVMS,RFC822,MISC,UTF8,- 91 UTF8AUX,SMANAGER,FLSTRING,NEWSRC,NETMSG,- 92 SYS$INPUT:/OPTION'LINK_OPT',LINK/OPTION 93PSECT=_CTYPE_,NOWRT 94$ LINK MAILUTIL,OS_VMS,MAIL,IMAP4R1,SMTP,NNTP,POP3,DUMMYVMS,RFC822,MISC,UTF8,- 95 UTF8AUX,SMANAGER,FLSTRING,NEWSRC,NETMSG,- 96 SYS$INPUT:/OPTION'LINK_OPT',LINK/OPTION 97PSECT=_CTYPE_,NOWRT 98$ SET NOVERIFY 99$ EXIT 100