mirror of
https://github.com/moparisthebest/curl
synced 2024-12-21 23:58:49 -05:00
Marty Kuhrt's VMS updates
This commit is contained in:
Daniel Stenberg
parent
67fca4cb01
commit
20b76e09e3
Binary file not shown.
@ -32,8 +32,15 @@ $! 29-JAN-2004, MSK, moved logical defines into defines.com
|
||||
$! 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")
|
||||
@ -48,10 +55,15 @@ $ vo_l = "write sys$output"
|
||||
$ vo_o = "!"
|
||||
$!
|
||||
$ defines = thisdir + "defines.com"
|
||||
$ if f$search( defines) .eqs. ""
|
||||
$ then
|
||||
$ write sys$output "%CURL-F-DEFFNF, cannot find defines.com procedure"
|
||||
$ exit %X18290 ! FNF
|
||||
$ 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:"
|
||||
@ -83,41 +95,30 @@ $!
|
||||
$ 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"
|
||||
@ -148,7 +149,7 @@ $! the directory passed in via P1 and put it in the object library named
|
||||
$! 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
|
||||
@ -168,7 +169,7 @@ $ then
|
||||
$ 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"
|
||||
@ -176,12 +177,13 @@ $ endif
|
||||
$ 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
|
||||
$!
|
||||
@ -189,7 +191,7 @@ $! Based on the file TYPE, do the right compile command.
|
||||
$! 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
|
||||
@ -199,8 +201,27 @@ $ cmd_msg = "MESSAGE "+msg_qual
|
||||
$ 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
|
||||
|
||||
Binary file not shown.
Binary file not shown.
92
packages/vms/curlmsg.h
Normal file
92
packages/vms/curlmsg.h
Normal file
@ -0,0 +1,92 @@
|
||||
/********************************************************************************************************************************/
|
||||
/* 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
|
||||
87
packages/vms/curlmsg.msg
Normal file
87
packages/vms/curlmsg.msg
Normal file
@ -0,0 +1,87 @@
|
||||
!
|
||||
! 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
|
||||
!
|
||||
.TITLE CURLMSG Message files
|
||||
.FACILITY CURL,1793 /PREFIX=CURL_
|
||||
.BASE 1
|
||||
.SEVERITY SUCCESS
|
||||
OK <normal successful completion>
|
||||
|
||||
.SEVERITY ERROR
|
||||
UNSUPPORTED_PROTOCOL <unsupported protocol>
|
||||
FAILED_INIT <failed init>
|
||||
URL_MALFORMAT <URL malformat>
|
||||
URL_MALFORMAT_USER <URL malformat user>
|
||||
COULDNT_RESOLVE_PROXY <could not resolve proxy>
|
||||
COULDNT_RESOLVE_HOST <could not resolve host>
|
||||
COULDNT_CONNECT <could not connect>
|
||||
FTP_WEIRD_SERVER_REPLY <FTP weird server reply>
|
||||
FTP_ACCESS_DENIED <FTP access denied>
|
||||
FTP_USER_PWD_INCORRECT <FTP user password incorrect>
|
||||
FTP_WEIRD_PASS_REPLY <FTP weird PASS reply>
|
||||
FTP_WEIRD_USER_REPLY <FTP weird USER reply>
|
||||
FTP_WEIRD_PASV_REPLY <FTP weird PASV reply>
|
||||
FTP_WEIRD_227_FORMAT <FTP weird 227 format>
|
||||
FTP_CANT_GET_HOST <FTP can not get host>
|
||||
FTP_CANT_RECONNECT <FTP can not reconnect>
|
||||
FTP_COULDNT_SET_BINARY <FTP could not set binary>
|
||||
PARTIAL_FILE <partial file>
|
||||
FTP_COULDNT_RETR_FILE <FTP could not RETR file>
|
||||
FTP_WRITE_ERROR <FTP write error>
|
||||
FTP_QUOTE_ERROR <FTP quote error>
|
||||
HTTP_RETURNED_ERROR <HTTP returned error>
|
||||
WRITE_ERROR <write error>
|
||||
MALFORMAT_USER <user name is illegally specified>
|
||||
FTP_COULDNT_STOR_FILE <FTP could not STOR file>
|
||||
READ_ERROR <read error, could not open/read file>
|
||||
OUT_OF_MEMORY <out of memory>
|
||||
OPERATION_TIMEOUTED <operation timed out, timeout time was reached>
|
||||
FTP_COULDNT_SET_ASCII <FTP could not set ASCII, TYPE A failed>
|
||||
FTP_PORT_FAILED <FTP PORT operation failed>
|
||||
FTP_COULDNT_USE_REST <FTP REST command failed>
|
||||
FTP_COULDNT_GET_SIZE <FTP SIZE command failed>
|
||||
HTTP_RANGE_ERROR <HTTP RANGE error>
|
||||
HTTP_POST_ERROR <HTTP POST error>
|
||||
SSL_CONNECT_ERROR <SSL connect error>
|
||||
BAD_DOWNLOAD_RESUME <bad download resume>
|
||||
FILE_COULDNT_READ_FILE <FILE could not read file>
|
||||
LDAP_CANNOT_BIND <LDAP cannot bind>
|
||||
LDAP_SEARCH_FAILED <LDAP search failed>
|
||||
LIBRARY_NOT_FOUND <library not found>
|
||||
FUNCTION_NOT_FOUND <function not found>
|
||||
ABORTED_BY_CALLBACK <aborted by callback>
|
||||
BAD_FUNCTION_ARGUMENT <bad function argument>
|
||||
BAD_CALLING_ORDER <bad calling order>
|
||||
HTTP_PORT_FAILED <HTTP port failed>
|
||||
BAD_PASSWORD_ENTERED <bad password entered, my_getpass() returns fail>
|
||||
TOO_MANY_REDIRECTS <too many redirects>
|
||||
UNKNOWN_TELNET_OPTION <unknown TELNET option>
|
||||
TELNET_OPTION_SYNTAX <malformed TELNET option syntax>
|
||||
OBSOLETE <obsolete, removed after 7.7.3>
|
||||
SSL_PEER_CERTIFICATE <SSL peer certificate was not OK>
|
||||
GOT_NOTHING <got nothing>
|
||||
SSL_ENGINE_NOTFOUND <SSL crypto engine not found>
|
||||
SSL_ENGINE_SETFAILED <SSL can not set SSL crypto engine as default>
|
||||
SEND_ERROR <SEND error, failure sending network data>
|
||||
RECV_ERROR <RECV error, failure receiving network data>
|
||||
SHARE_IN_USE <share is in use>
|
||||
SSL_CERTPROBLEM <SSL problem with the local certificate>
|
||||
SSL_CIPHER <SSL CIPHER, could not use specified cipher>
|
||||
SSL_CACERT <SSL CACERT, problem with the CA cert (path?)>
|
||||
BAD_CONTENT_ENCODING <unrecognized transfer encoding>
|
||||
LDAP_INVALID_URL <LDAP invalid url>
|
||||
FILESIZE_EXCEEDED <maximum file size exceeded>
|
||||
FTP_SSL_FAILED <requested FTP SSL level failed>
|
||||
CURL_LAST <CURLMSG.MSG is out of sync with the source code>
|
||||
|
||||
.END
|
||||
90
packages/vms/curlmsg.sdl
Normal file
90
packages/vms/curlmsg.sdl
Normal file
@ -0,0 +1,90 @@
|
||||
|
||||
|
||||
MODULE $CURDEF;
|
||||
|
||||
/*
|
||||
/* 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
|
||||
/*
|
||||
CONSTANT
|
||||
"FACILITY" EQUALS 3841 PREFIX "CURL" TAG ""
|
||||
,"OK" EQUALS %X0F018009 PREFIX "CURL" TAG ""
|
||||
,"UNSUPPORTED_PROTOCOL" EQUALS %X0F018012 PREFIX "CURL" TAG ""
|
||||
,"FAILED_INIT" EQUALS %X0F01801A PREFIX "CURL" TAG ""
|
||||
,"URL_MALFORMAT" EQUALS %X0F018022 PREFIX "CURL" TAG ""
|
||||
,"URL_MALFORMAT_USER" EQUALS %X0F01802A PREFIX "CURL" TAG ""
|
||||
,"COULDNT_RESOLVE_PROXY" EQUALS %X0F018032 PREFIX "CURL" TAG ""
|
||||
,"COULDNT_RESOLVE_HOST" EQUALS %X0F01803A PREFIX "CURL" TAG ""
|
||||
,"COULDNT_CONNECT" EQUALS %X0F018042 PREFIX "CURL" TAG ""
|
||||
,"FTP_WEIRD_SERVER_REPLY" EQUALS %X0F01804A PREFIX "CURL" TAG ""
|
||||
,"FTP_ACCESS_DENIED" EQUALS %X0F018052 PREFIX "CURL" TAG ""
|
||||
,"FTP_USER_PWD_INCORRECT" EQUALS %X0F01805A PREFIX "CURL" TAG ""
|
||||
,"FTP_WEIRD_PASS_REPLY" EQUALS %X0F018062 PREFIX "CURL" TAG ""
|
||||
,"FTP_WEIRD_USER_REPLY" EQUALS %X0F01806A PREFIX "CURL" TAG ""
|
||||
,"FTP_WEIRD_PASV_REPLY" EQUALS %X0F018072 PREFIX "CURL" TAG ""
|
||||
,"FTP_WEIRD_227_FORMAT" EQUALS %X0F01807A PREFIX "CURL" TAG ""
|
||||
,"FTP_CANT_GET_HOST" EQUALS %X0F018082 PREFIX "CURL" TAG ""
|
||||
,"FTP_CANT_RECONNECT" EQUALS %X0F01808A PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_SET_BINARY" EQUALS %X0F018092 PREFIX "CURL" TAG ""
|
||||
,"PARTIAL_FILE" EQUALS %X0F01809A PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_RETR_FILE" EQUALS %X0F0180A2 PREFIX "CURL" TAG ""
|
||||
,"FTP_WRITE_ERROR" EQUALS %X0F0180AA PREFIX "CURL" TAG ""
|
||||
,"FTP_QUOTE_ERROR" EQUALS %X0F0180B2 PREFIX "CURL" TAG ""
|
||||
,"HTTP_RETURNED_ERROR" EQUALS %X0F0180BA PREFIX "CURL" TAG ""
|
||||
,"WRITE_ERROR" EQUALS %X0F0180C2 PREFIX "CURL" TAG ""
|
||||
,"MALFORMAT_USER" EQUALS %X0F0180CA PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_STOR_FILE" EQUALS %X0F0180D2 PREFIX "CURL" TAG ""
|
||||
,"READ_ERROR" EQUALS %X0F0180DA PREFIX "CURL" TAG ""
|
||||
,"OUT_OF_MEMORY" EQUALS %X0F0180E2 PREFIX "CURL" TAG ""
|
||||
,"OPERATION_TIMEOUTED" EQUALS %X0F0180EA PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_SET_ASCII" EQUALS %X0F0180F2 PREFIX "CURL" TAG ""
|
||||
,"FTP_PORT_FAILED" EQUALS %X0F0180FA PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_USE_REST" EQUALS %X0F018102 PREFIX "CURL" TAG ""
|
||||
,"FTP_COULDNT_GET_SIZE" EQUALS %X0F01810A PREFIX "CURL" TAG ""
|
||||
,"HTTP_RANGE_ERROR" EQUALS %X0F018112 PREFIX "CURL" TAG ""
|
||||
,"HTTP_POST_ERROR" EQUALS %X0F01811A PREFIX "CURL" TAG ""
|
||||
,"SSL_CONNECT_ERROR" EQUALS %X0F018122 PREFIX "CURL" TAG ""
|
||||
,"BAD_DOWNLOAD_RESUME" EQUALS %X0F01812A PREFIX "CURL" TAG ""
|
||||
,"FILE_COULDNT_READ_FILE" EQUALS %X0F018132 PREFIX "CURL" TAG ""
|
||||
,"LDAP_CANNOT_BIND" EQUALS %X0F01813A PREFIX "CURL" TAG ""
|
||||
,"LDAP_SEARCH_FAILED" EQUALS %X0F018142 PREFIX "CURL" TAG ""
|
||||
,"LIBRARY_NOT_FOUND" EQUALS %X0F01814A PREFIX "CURL" TAG ""
|
||||
,"FUNCTION_NOT_FOUND" EQUALS %X0F018152 PREFIX "CURL" TAG ""
|
||||
,"ABORTED_BY_CALLBACK" EQUALS %X0F01815A PREFIX "CURL" TAG ""
|
||||
,"BAD_FUNCTION_ARGUMENT" EQUALS %X0F018162 PREFIX "CURL" TAG ""
|
||||
,"BAD_CALLING_ORDER" EQUALS %X0F01816A PREFIX "CURL" TAG ""
|
||||
,"HTTP_PORT_FAILED" EQUALS %X0F018172 PREFIX "CURL" TAG ""
|
||||
,"BAD_PASSWORD_ENTERED" EQUALS %X0F01817A PREFIX "CURL" TAG ""
|
||||
,"TOO_MANY_REDIRECTS" EQUALS %X0F018182 PREFIX "CURL" TAG ""
|
||||
,"UNKNOWN_TELNET_OPTION" EQUALS %X0F01818A PREFIX "CURL" TAG ""
|
||||
,"TELNET_OPTION_SYNTAX" EQUALS %X0F018192 PREFIX "CURL" TAG ""
|
||||
,"OBSOLETE" EQUALS %X0F01819A PREFIX "CURL" TAG ""
|
||||
,"SSL_PEER_CERTIFICATE" EQUALS %X0F0181A2 PREFIX "CURL" TAG ""
|
||||
,"GOT_NOTHING" EQUALS %X0F0181AA PREFIX "CURL" TAG ""
|
||||
,"SSL_ENGINE_NOTFOUND" EQUALS %X0F0181B2 PREFIX "CURL" TAG ""
|
||||
,"SSL_ENGINE_SETFAILED" EQUALS %X0F0181BA PREFIX "CURL" TAG ""
|
||||
,"SEND_ERROR" EQUALS %X0F0181C2 PREFIX "CURL" TAG ""
|
||||
,"RECV_ERROR" EQUALS %X0F0181CA PREFIX "CURL" TAG ""
|
||||
,"SHARE_IN_USE" EQUALS %X0F0181D2 PREFIX "CURL" TAG ""
|
||||
,"SSL_CERTPROBLEM" EQUALS %X0F0181DA PREFIX "CURL" TAG ""
|
||||
,"SSL_CIPHER" EQUALS %X0F0181E2 PREFIX "CURL" TAG ""
|
||||
,"SSL_CACERT" EQUALS %X0F0181EA PREFIX "CURL" TAG ""
|
||||
,"BAD_CONTENT_ENCODING" EQUALS %X0F0181F2 PREFIX "CURL" TAG ""
|
||||
,"LDAP_INVALID_URL" EQUALS %X0F0181FA PREFIX "CURL" TAG ""
|
||||
,"FILESIZE_EXCEEDED" EQUALS %X0F018202 PREFIX "CURL" TAG ""
|
||||
,"FTP_SSL_FAILED" EQUALS %X0F01820A PREFIX "CURL" TAG ""
|
||||
,"CURL_LAST" EQUALS %X0F018212 PREFIX "CURL" TAG ""
|
||||
;
|
||||
END_MODULE;
|
||||
91
packages/vms/curlmsg_vms.h
Normal file
91
packages/vms/curlmsg_vms.h
Normal file
@ -0,0 +1,91 @@
|
||||
/* CURLMSG_VMS.H */
|
||||
/* This defines the necessary bits to change CURLE_* error codes to VMS */
|
||||
/* style error codes. CURLMSG.H is built from CURLMSG.SDL which is built */
|
||||
/* from CURLMSG.MSG. The vms_cond array is used to return VMS errors by */
|
||||
/* putting the VMS error codes into the array offset based on CURLE_* code. */
|
||||
/* */
|
||||
#include "curlmsg.h"
|
||||
int vms_show = 0;
|
||||
/*
|
||||
#define FAC_CURL 0xC01
|
||||
#define FAC_SYSTEM 0
|
||||
#define MSG_NORMAL 0
|
||||
*/
|
||||
#define VMS_STS(c,f,e,s) (((c&0xF)<<28)|((f&0xFFF)<<16)|((e&0x1FFF)<3)|(s&7))
|
||||
#define VMSSTS_HIDE VMS_STS(1,0,0,0)
|
||||
/*
|
||||
#define SEV_WARNING 0
|
||||
#define SEV_SUCCESS 1
|
||||
#define SEV_ERROR 2
|
||||
#define SEV_INFO 3
|
||||
#define SEV_FATAL 4
|
||||
*/
|
||||
long vms_cond[] =
|
||||
{
|
||||
CURL_OK,
|
||||
CURL_UNSUPPORTED_PROTOCOL,
|
||||
CURL_FAILED_INIT,
|
||||
CURL_URL_MALFORMAT,
|
||||
CURL_URL_MALFORMAT_USER,
|
||||
CURL_COULDNT_RESOLVE_PROXY,
|
||||
CURL_COULDNT_RESOLVE_HOST,
|
||||
CURL_COULDNT_CONNECT,
|
||||
CURL_FTP_WEIRD_SERVER_REPLY,
|
||||
CURL_FTP_ACCESS_DENIED,
|
||||
CURL_FTP_USER_PWD_INCORRECT,
|
||||
CURL_FTP_WEIRD_PASS_REPLY,
|
||||
CURL_FTP_WEIRD_USER_REPLY,
|
||||
CURL_FTP_WEIRD_PASV_REPLY,
|
||||
CURL_FTP_WEIRD_227_FORMAT,
|
||||
CURL_FTP_CANT_GET_HOST,
|
||||
CURL_FTP_CANT_RECONNECT,
|
||||
CURL_FTP_COULDNT_SET_BINARY,
|
||||
CURL_PARTIAL_FILE,
|
||||
CURL_FTP_COULDNT_RETR_FILE,
|
||||
CURL_FTP_WRITE_ERROR,
|
||||
CURL_FTP_QUOTE_ERROR,
|
||||
CURL_HTTP_RETURNED_ERROR,
|
||||
CURL_WRITE_ERROR,
|
||||
CURL_MALFORMAT_USER,
|
||||
CURL_FTP_COULDNT_STOR_FILE,
|
||||
CURL_READ_ERROR,
|
||||
CURL_OUT_OF_MEMORY,
|
||||
CURL_OPERATION_TIMEOUTED,
|
||||
CURL_FTP_COULDNT_SET_ASCII,
|
||||
CURL_FTP_PORT_FAILED,
|
||||
CURL_FTP_COULDNT_USE_REST,
|
||||
CURL_FTP_COULDNT_GET_SIZE,
|
||||
CURL_HTTP_RANGE_ERROR,
|
||||
CURL_HTTP_POST_ERROR,
|
||||
CURL_SSL_CONNECT_ERROR,
|
||||
CURL_BAD_DOWNLOAD_RESUME,
|
||||
CURL_FILE_COULDNT_READ_FILE,
|
||||
CURL_LDAP_CANNOT_BIND,
|
||||
CURL_LDAP_SEARCH_FAILED,
|
||||
CURL_LIBRARY_NOT_FOUND,
|
||||
CURL_FUNCTION_NOT_FOUND,
|
||||
CURL_ABORTED_BY_CALLBACK,
|
||||
CURL_BAD_FUNCTION_ARGUMENT,
|
||||
CURL_BAD_CALLING_ORDER,
|
||||
CURL_HTTP_PORT_FAILED,
|
||||
CURL_BAD_PASSWORD_ENTERED,
|
||||
CURL_TOO_MANY_REDIRECTS,
|
||||
CURL_UNKNOWN_TELNET_OPTION,
|
||||
CURL_TELNET_OPTION_SYNTAX,
|
||||
CURL_OBSOLETE,
|
||||
CURL_SSL_PEER_CERTIFICATE,
|
||||
CURL_GOT_NOTHING,
|
||||
CURL_SSL_ENGINE_NOTFOUND,
|
||||
CURL_SSL_ENGINE_SETFAILED,
|
||||
CURL_SEND_ERROR,
|
||||
CURL_RECV_ERROR,
|
||||
CURL_SHARE_IN_USE,
|
||||
CURL_SSL_CERTPROBLEM,
|
||||
CURL_SSL_CIPHER,
|
||||
CURL_SSL_CACERT,
|
||||
CURL_BAD_CONTENT_ENCODING,
|
||||
CURL_LDAP_INVALID_URL,
|
||||
CURL_FILESIZE_EXCEEDED,
|
||||
CURL_FTP_SSL_FAILED,
|
||||
CURL_CURL_LAST
|
||||
};
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Loading…
Reference in New Issue
Block a user