Marty Kuhrt's VMS updates

$!  6-FEB-2004, MSK, put in various SSL support bits

$!  9-MAR-2004, MSK, the config-vms.h* files are now copied to the lib and

$!                   src directories as config.h.

$! 15-MAR-2004, MSK, All of the curlmsg*.* files have also been moved to 

$!                   this build directory.  They will be copied to the src 

$!                   directory before build.  The .msg file will be compiled 

$!                   to get the .obj for messages, but the .h and .sdl files 

$!                   are not automatically created since they partly rely on 

$!                   the freeware SDL tool.

$!

$ on control_y then goto Common_Exit

$ ctrl_y  = 1556 

$ origdir = f$environment("DEFAULT")

$ proc    = f$environment("PROCEDURE")

$ thisdir = f$parse( proc,,,"DEVICE") + f$parse( proc,,,"DIRECTORY")

$ vo_o = "!"

$!

$ defines = thisdir + "defines.com"

$ if f$trnlnm( "curl_defines_done") .eqs. "" 

$ then 

$    if f$search( defines) .eqs. "" 

$    then

$       write sys$output "%CURL-F-DEFFNF, cannot find defines.com procedure"

$       exit %X18290 ! FNF

$    else

$       @'defines'

$    endif

$ endif

$ set def 'thisdir'

$ cc_qual = "/define=HAVE_CONFIG_H=1/OBJ=OBJDIR:"

$ if ( openssl .eq. 1) .or. ( hpssl .eq. 1)

$ then

$    'vo_c' "%CURL-I-BLDSSL, building with SSL support"

$    source_h = "CONFIG-VMS.H_WITH_SSL"

$    config_h = "CONFIG-VMS.H_WITH_SSL"

$ else

$    'vo_c' "%CURL-I-BLDNOSSL, building without SSL support"

$    source_h = "CONFIG-VMS.H_WITHOUT_SSL"

$    config_h = "CONFIG-VMS.H_WITHOUT_SSL"

$ endif

$!

$! Only do the copy if the source and destination files are different.

$! Put this block into Set NoOn mode so that if the diff command triggers

$! an error while error message reporting is turned off, then it won't 

$! just exit the command procedure mysteriously.

$!

$ set noon

$ set message/nof/noi/nos/not

$ diff/out=nla0: 'source_h' [--.SRC]CONFIG.H

$ status = $status

$ set message/f/i/s/t

$ if ( status .ne. %X006C8009) ! if status is not "no diff"

$ then

$    copy 'source_h' [--.SRC]CONFIG.H

$    purge/nolog [--.SRC]CONFIG.H

$ endif

$ set message/nof/noi/nos/not

$ diff/out=nla0: 'source_h' [--.LIB]CONFIG.H

$ status = $status

$ set message/f/i/s/t

$ if ( status .ne. %X006C8009) ! if status is not "no diff"

$ then

$    copy 'source_h' [--.LIB]CONFIG.H

$    purge/nolog [--.LIB]CONFIG.H

$ endif

$ call MoveIfDiff 'config_h' "[--.LIB]CONFIG.H"

$ call MoveIfDiff 'config_h' "[--.SRC]CONFIG.H"

$! call MoveIfDiff "SETUP.H" "[--.LIB]"

$! call MoveIfDiff "SETUP.H" "[--.SRC]"

$ call MoveIfDiff "CURLMSG.H" "[--.SRC]"

$ call MoveIfDiff "CURLMSG.MSG" "[--.SRC]"

$ call MoveIfDiff "CURLMSG.SDL" "[--.SRC]"

$ call MoveIfDiff "CURLMSG_VMS.H" "[--.SRC]"

$ on control_y then goto Common_Exit

$!

$ call build "[--.lib]" "*.c" "objdir:curllib.olb"

$ if ($status .eq. ctrl_y) then goto Common_Exit

$ call build "[--.src]" "*.c" "objdir:curlsrc.olb"

$ if ($status .eq. ctrl_y) then goto Common_Exit

$ call build "[--.src]" "*.msg" "objdir:curlsrc.olb"

$ if ($status .eq. ctrl_y) then goto Common_Exit

$ if ( openssl .eq. 1) .and. ( hpssl .eq. 0)

$ then

$    'vo_l' "%CURL-I-LINK_OSSL, linking with OpenSSL"

$! via P3

$!

$build:   subroutine

$ on control_y then exit 2

$ on control_y then return ctrl_y ! SS$_CONTROLY

$ set noon

$   set default 'p1'

$   search = p2

$         if (f$cvtime(f$file(file,"rdt")) .gts. f$cvtime(f$file(obj,"rdt")))

$         then

$            call compile 'file'

$            if .not. $status then exit $status

$            if .not. $status then return $status

$            lib/object 'p3' 'objfile'

$         else

$            'vo_o' "%CURL-I-OBJUTD, ", objfile, " is up to date"

$      else

$         'vo_o' "%CURL-I-OBJDNE, ", file, " does not exist"

$         call compile 'file'

$         if .not. $status then exit $status

$         if .not. $status then return $status

$         lib/object 'p3' 'objfile'

$      endif

$   goto Loop

$EndLoop:

$   !purge

$   on control_y then return ctrl_y ! SS$_CONTROLY

$   set def 'origdir'

$   endsubroutine   ! Build

$!

$! Only C and MSG supported.

$!

$compile:   subroutine

$   on control_y then exit 2

$   on control_y then return ctrl_y ! SS$_CONTROLY

$   set noon

$   file = p1

$   qual = p2+p3+p4+p5+p6+p7+p8

$   x = cmd_'typ'

$   'vo_c' x," ",file

$   'x' 'file'

$   on control_y then return ctrl_y ! SS$_CONTROLY

$   ENDSUBROUTINE   ! Compile

$!

$! Do a diff of the file specified in P1 with that in P2.  If different

$! copy P1 to P2.  This also covers if P2 doesn't exist, but not if P2

$! is an invalid filespec.

$!

$MoveIfDiff:  subroutine

$   set NoOn

$   set message/nof/noi/nos/not

$   diff/out=nla0: 'p1' 'p2'

$   status = $status

$   set message/f/i/s/t

$   if ( status .ne. %X006C8009) ! if status is not "no diff"

$   then

$      copy 'p1' 'p2'

$      purge/nolog 'p2'

$   endif

$   on control_y then return ctrl_y ! SS$_CONTROLY

$   ENDSUBROUTINE   ! MoveIfDiff

$!

$Common_Exit:

$   set default 'origdir'

$   exit

/********************************************************************************************************************************/

/* Created:  9-MAR-2004 14:07:55 by OpenVMS SDL EV1-60     */

/* Source:   9-MAR-2004 14:07:27 SYS$SYSDEVICE:[MARTY.CURL.CURL-7_11_1-PRE1.SRC] */

/********************************************************************************************************************************/

/*** MODULE $CURDEF ***/

#pragma __member_alignment __save

#pragma __nomember_alignment

/*                                                                          */

/* This SDL File Generated by VAX-11 Message V04-00 on  9-MAR-2004 14:07:27.56 */

/*                                                                          */

/*                                                                          */

/* THESE VMS ERROR CODES ARE GENERATED BY TAKING APART THE CURL.H           */

/* FILE AND PUTTING ALL THE CURLE_* ENUM STUFF INTO THIS FILE,              */

/* CURLMSG.MSG.  AN .SDL FILE IS CREATED FROM THIS FILE WITH                */

/* MESSAGE/SDL.  THE .H FILE IS CREATED USING THE FREEWARE SDL TOOL         */

/* AGAINST THE .SDL FILE.                                                   */

/*                                                                          */

/* WITH THE EXCEPTION OF CURLE_OK, ALL OF THE MESSAGES ARE AT               */

/* THE ERROR SEVERITY LEVEL.  WITH THE EXCEPTION OF                         */

/* FTP_USER_PWD_INCORRECT, WHICH IS A SHORTENED FORM OF                     */

/* FTP_USER_PASSWORD_INCORRECT, THESE ARE THE SAME NAMES AS THE             */

/* CURLE_ ONES IN INCLUDE/CURL.H                                            */

/*                                                                          */

#define CURL_FACILITY 3841

#define CURL_OK 251756553

#define CURL_UNSUPPORTED_PROTOCOL 251756562

#define CURL_FAILED_INIT 251756570

#define CURL_URL_MALFORMAT 251756578

#define CURL_URL_MALFORMAT_USER 251756586

#define CURL_COULDNT_RESOLVE_PROXY 251756594

#define CURL_COULDNT_RESOLVE_HOST 251756602

#define CURL_COULDNT_CONNECT 251756610

#define CURL_FTP_WEIRD_SERVER_REPLY 251756618

#define CURL_FTP_ACCESS_DENIED 251756626

#define CURL_FTP_USER_PWD_INCORRECT 251756634

#define CURL_FTP_WEIRD_PASS_REPLY 251756642

#define CURL_FTP_WEIRD_USER_REPLY 251756650

#define CURL_FTP_WEIRD_PASV_REPLY 251756658

#define CURL_FTP_WEIRD_227_FORMAT 251756666

#define CURL_FTP_CANT_GET_HOST 251756674

#define CURL_FTP_CANT_RECONNECT 251756682

#define CURL_FTP_COULDNT_SET_BINARY 251756690

#define CURL_PARTIAL_FILE 251756698

#define CURL_FTP_COULDNT_RETR_FILE 251756706

#define CURL_FTP_WRITE_ERROR 251756714

#define CURL_FTP_QUOTE_ERROR 251756722

#define CURL_HTTP_RETURNED_ERROR 251756730

#define CURL_WRITE_ERROR 251756738

#define CURL_MALFORMAT_USER 251756746

#define CURL_FTP_COULDNT_STOR_FILE 251756754

#define CURL_READ_ERROR 251756762

#define CURL_OUT_OF_MEMORY 251756770

#define CURL_OPERATION_TIMEOUTED 251756778

#define CURL_FTP_COULDNT_SET_ASCII 251756786

#define CURL_FTP_PORT_FAILED 251756794

#define CURL_FTP_COULDNT_USE_REST 251756802

#define CURL_FTP_COULDNT_GET_SIZE 251756810

#define CURL_HTTP_RANGE_ERROR 251756818

#define CURL_HTTP_POST_ERROR 251756826

#define CURL_SSL_CONNECT_ERROR 251756834

#define CURL_BAD_DOWNLOAD_RESUME 251756842

#define CURL_FILE_COULDNT_READ_FILE 251756850

#define CURL_LDAP_CANNOT_BIND 251756858

#define CURL_LDAP_SEARCH_FAILED 251756866

#define CURL_LIBRARY_NOT_FOUND 251756874

#define CURL_FUNCTION_NOT_FOUND 251756882

#define CURL_ABORTED_BY_CALLBACK 251756890

#define CURL_BAD_FUNCTION_ARGUMENT 251756898

#define CURL_BAD_CALLING_ORDER 251756906

#define CURL_HTTP_PORT_FAILED 251756914

#define CURL_BAD_PASSWORD_ENTERED 251756922

#define CURL_TOO_MANY_REDIRECTS 251756930

#define CURL_UNKNOWN_TELNET_OPTION 251756938

#define CURL_TELNET_OPTION_SYNTAX 251756946

#define CURL_OBSOLETE 251756954

#define CURL_SSL_PEER_CERTIFICATE 251756962

#define CURL_GOT_NOTHING 251756970

#define CURL_SSL_ENGINE_NOTFOUND 251756978

#define CURL_SSL_ENGINE_SETFAILED 251756986

#define CURL_SEND_ERROR 251756994

#define CURL_RECV_ERROR 251757002

#define CURL_SHARE_IN_USE 251757010

#define CURL_SSL_CERTPROBLEM 251757018

#define CURL_SSL_CIPHER 251757026

#define CURL_SSL_CACERT 251757034

#define CURL_BAD_CONTENT_ENCODING 251757042

#define CURL_LDAP_INVALID_URL 251757050

#define CURL_FILESIZE_EXCEEDED 251757058

#define CURL_FTP_SSL_FAILED 251757066

#define CURL_CURL_LAST 251757074

#pragma __member_alignment __restore