aboutsummaryrefslogtreecommitdiff
path: root/packages/OS400
diff options
context:
space:
mode:
authorPatrick Monnerat <patrick@monnerat.net>2018-05-30 00:38:37 +0200
committerPatrick Monnerat <patrick@monnerat.net>2018-05-30 00:38:37 +0200
commitc2dc7d9c6cce8881d5e5458c5b75f694bce0335d (patch)
treec6cb7984bd875dfe9768b56cf8ce9a1454ede6ff /packages/OS400
parent050c93c46f5bc880897152419200e60da56b46e0 (diff)
os400: implement mime api EBCDIC wrappers
Also sync ILE/RPG binding to define the new functions.
Diffstat (limited to 'packages/OS400')
-rw-r--r--packages/OS400/ccsidcurl.c77
-rw-r--r--packages/OS400/ccsidcurl.h20
-rw-r--r--packages/OS400/curl.inc.in114
3 files changed, 210 insertions, 1 deletions
diff --git a/packages/OS400/ccsidcurl.c b/packages/OS400/ccsidcurl.c
index 0ca6d6866..f442efa5a 100644
--- a/packages/OS400/ccsidcurl.c
+++ b/packages/OS400/ccsidcurl.c
@@ -1345,3 +1345,80 @@ curl_pushheader_byname_ccsid(struct curl_pushheaders *h, const char *header,
return d;
}
+
+static CURLcode
+mime_string_call(curl_mimepart *part, const char *string, unsigned int ccsid,
+ CURLcode (*mimefunc)(curl_mimepart *part, const char *string))
+
+{
+ char *s = (char *) NULL;
+ CURLcode result;
+
+ if(!string)
+ return mimefunc(part, string);
+ s = dynconvert(ASCII_CCSID, string, -1, ccsid);
+ if(!s)
+ return CURLE_OUT_OF_MEMORY;
+
+ result = mimefunc(part, s);
+ free(s);
+ return result;
+}
+
+CURLcode
+curl_mime_name_ccsid(curl_mimepart *part, const char *name, unsigned int ccsid)
+
+{
+ return mime_string_call(part, name, ccsid, curl_mime_name);
+}
+
+CURLcode
+curl_mime_filename_ccsid(curl_mimepart *part,
+ const char *filename, unsigned int ccsid)
+
+{
+ return mime_string_call(part, filename, ccsid, curl_mime_filename);
+}
+
+CURLcode
+curl_mime_type_ccsid(curl_mimepart *part,
+ const char *mimetype, unsigned int ccsid)
+
+{
+ return mime_string_call(part, mimetype, ccsid, curl_mime_type);
+}
+
+CURLcode
+curl_mime_encoder_ccsid(curl_mimepart *part,
+ const char *encoding, unsigned int ccsid)
+
+{
+ return mime_string_call(part, encoding, ccsid, curl_mime_encoder);
+}
+
+CURLcode
+curl_mime_filedata_ccsid(curl_mimepart *part,
+ const char *filename, unsigned int ccsid)
+
+{
+ return mime_string_call(part, filename, ccsid, curl_mime_filedata);
+}
+
+CURLcode
+curl_mime_data_ccsid(curl_mimepart *part,
+ const char *data, size_t datasize, unsigned int ccsid)
+
+{
+ char *s = (char *) NULL;
+ CURLcode result;
+
+ if(!data)
+ return curl_mime_data(part, data, datasize);
+ s = dynconvert(ASCII_CCSID, data, datasize, ccsid);
+ if(!s)
+ return CURLE_OUT_OF_MEMORY;
+
+ result = curl_mime_data(part, s, datasize);
+ free(s);
+ return result;
+}
diff --git a/packages/OS400/ccsidcurl.h b/packages/OS400/ccsidcurl.h
index 5bd24cf36..a65dfbc2a 100644
--- a/packages/OS400/ccsidcurl.h
+++ b/packages/OS400/ccsidcurl.h
@@ -5,7 +5,7 @@
* | (__| |_| | _ <| |___
* \___|\___/|_| \_\_____|
*
- * Copyright (C) 1998 - 2013, Daniel Stenberg, <daniel@haxx.se>, et al.
+ * Copyright (C) 1998 - 2018, Daniel Stenberg, <daniel@haxx.se>, et al.
*
* This software is licensed as described in the file COPYING, which
* you should have received as part of this distribution. The terms
@@ -67,5 +67,23 @@ CURL_EXTERN char *curl_pushheader_byname_ccsid(struct curl_pushheaders *h,
const char *header,
unsigned int ccsidin,
unsigned int ccsidout);
+CURL_EXTERN CURLcode curl_mime_name_ccsid(curl_mimepart *part,
+ const char *name,
+ unsigned int ccsid);
+CURL_EXTERN CURLcode curl_mime_filename_ccsid(curl_mimepart *part,
+ const char *filename,
+ unsigned int ccsid);
+CURL_EXTERN CURLcode curl_mime_type_ccsid(curl_mimepart *part,
+ const char *mimetype,
+ unsigned int ccsid);
+CURL_EXTERN CURLcode curl_mime_encoder_ccsid(curl_mimepart *part,
+ const char *encoding,
+ unsigned int ccsid);
+CURL_EXTERN CURLcode curl_mime_filedata_ccsid(curl_mimepart *part,
+ const char *filename,
+ unsigned int ccsid);
+CURL_EXTERN CURLcode curl_mime_data_ccsid(curl_mimepart *part,
+ const char *data, size_t datasize,
+ unsigned int ccsid);
#endif
diff --git a/packages/OS400/curl.inc.in b/packages/OS400/curl.inc.in
index 915fef7c4..1a06eca5d 100644
--- a/packages/OS400/curl.inc.in
+++ b/packages/OS400/curl.inc.in
@@ -291,6 +291,9 @@
d CURL_REDIR_POST_ALL...
d c 7
*
+ d CURL_ZERO_TERMINATED...
+ d c -1
+ *
d CURL_POLL_NONE c 0
d CURL_POLL_IN c 1
d CURL_POLL_OUT c 2
@@ -1981,6 +1984,74 @@
* Prototypes
**************************************************************************
*
+ d curl_mime_init pr * extproc('curl_mime_init') curl_mime *
+ d easy * value CURL *
+ *
+ d curl_mime_free pr extproc('curl_mime_free')
+ d mime * value curl_mime *
+ *
+ d curl_mime_addpart...
+ d pr * extproc('curl_mime_addpart') curl_mimepart *
+ d mime * value curl_mime *
+ *
+ d curl_mime_name pr extproc('curl_mime_name')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d name * value options(*string)
+ *
+ d curl_mime_filename...
+ d pr extproc('curl_mime_filename')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d filename * value options(*string)
+ *
+ d curl_mime_type pr extproc('curl_mime_type')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d mimetype * value options(*string)
+ *
+ d curl_mime_encoder...
+ d pr extproc('curl_mime_encoder')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d encoding * value options(*string)
+ *
+ d curl_mime_data pr extproc('curl_mime_data')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d data * value options(*string)
+ d datasize 10u 0 size_t
+ *
+ d curl_mime_filedata...
+ d pr extproc('curl_mime_filedata')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d filename * value options(*string)
+ *
+ d curl_mime_data_cb...
+ d pr extproc('curl_mime_data_cb')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d datasize value like(curl_off_t)
+ d readfunc value like(curl_read_callback)
+ d seekfunc value like(curl_seek_callback)
+ d freefunc value like(curl_free_callback)
+ d arg * value void *
+ *
+ d curl_mime_subparts...
+ d pr extproc('curl_mime_subparts')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d subparts * value curl_mime *
+ *
+ d curl_mime_headers...
+ d pr extproc('curl_mime_headers')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d headers * value curl_slist *
+ d take_ownership...
+ d 10i 0 value
+ *
* This procedure as a variable parameter list.
* This prototype allows use of an option array, or a single "object"
* option. Other argument lists may be implemented by alias procedure
@@ -2466,4 +2537,47 @@
d ccsidin 10u 0 value
d ccsidout 10u 0 value
*
+ d curl_mime_name_ccsid...
+ d pr extproc('curl_mime_name_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d name * value options(*string)
+ d ccsid 10u 0 value
+ *
+ d curl_mime_filename_ccsid...
+ d pr extproc('curl_mime_filename_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d filename * value options(*string)
+ d ccsid 10u 0 value
+ *
+ d curl_mime_type_ccsid...
+ d pr extproc('curl_mime_type_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d mimetype * value options(*string)
+ d ccsid 10u 0 value
+ *
+ d curl_mime_encoder_ccsid...
+ d pr extproc('curl_mime_encoder_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d encoding * value options(*string)
+ d ccsid 10u 0 value
+ *
+ d curl_mime_data_ccsid...
+ d pr extproc('curl_mime_data_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d data * value options(*string)
+ d datasize 10u 0 size_t
+ d ccsid 10u 0 value
+ *
+ d curl_mime_filedata_ccsid...
+ d pr extproc('curl_mime_filedata_ccsid')
+ d like(CURLcode)
+ d part * value curl_mimepart *
+ d filename * value options(*string)
+ d ccsid 10u 0 value
+ *
/endif