/**
* Request host: [string] listen: [string] pid: [string] callback: [block].
*
* Sets up Storm Server.
* Storm Server is an SCGI server. Both the Request Object Plugin and Storm Server
* are based on S. Losen's CCGI library (http://libccgi.sourceforge.net/doc.html)
* licensed LGPL.
*
* To set up a Storm Server, specify host (i.e. 'localhost'),
* a port to listen to (i.e. 9000) a pid file '/var/run/mypid.pid' and a
* callback block.
*
* Usage:
*
* Request host:'localhost' listen:4000 pid:'/var/run/storm.pid' callback: {
* Pen write: 'Content-type: text/html\n\n'.
* var fname := Command env: 'DOCUMENT_URI'.
* var script := File new: '/var/www/webapp'+fname.
* script include.
* }.
*
* Here we set up a server listening to port 4000. The callback prints out
* the content type header. Then, we extract the DOCUMENT URI, i.e. '/hello.ctr'
* and map this to a path '/var/www/webapp/hello.ctr'
*
* By default there is no output buffering, either create another callback or
* simply override the '<' or 'Pen' object to buffer instead of outputting
* directly.
*/
ctr_object* ctr_request_serve(ctr_object* myself, ctr_argument* argumentList) {
char* host;
char* pid;
int port;
int minidle = 8;
int maxidle = 8;
int maxreq = 1000;
int maxproc = 100;
ctr_object* val;
openlog("stormserver", 0, LOG_DAEMON);
val = ctr_request_internal_option(myself, "minidle");
if (val!=NULL) minidle = (int) ctr_internal_cast2number(val)->value.nvalue;
val = ctr_request_internal_option(myself, "maxidle");
if (val!=NULL) maxidle = (int) ctr_internal_cast2number(val)->value.nvalue;
val = ctr_request_internal_option(myself, "maxproc");
if (val!=NULL) maxproc = (int) ctr_internal_cast2number(val)->value.nvalue;
val = ctr_request_internal_option(myself, "maxreq");
if (val!=NULL) maxreq = (int) ctr_internal_cast2number(val)->value.nvalue;
host = ctr_heap_allocate_cstring( ctr_internal_cast2string( argumentList->object ) );
pid = ctr_heap_allocate_cstring( ctr_internal_cast2string( argumentList->next->next->object ) );
port = (int) round(ctr_internal_cast2number(argumentList->next->object)->value.nvalue);
ctr_heap_free( host );
ctr_heap_free( pid );
CtrStdSCGICB = argumentList->next->next->next->object;
CGI_prefork_server(host, port, pid,
/* maxproc */ maxproc,
/* minidle */ minidle,
/* maxidle */ maxidle,
/* maxreq */ maxreq, ctr_request_serve_callback);
return myself;
}
/**
* @internal
*
* Returns an array from the request, either for GET, POST or COOKIE.
*/
ctr_object* ctr_request_array(ctr_object* myself, ctr_argument* argumentList, CGI_varlist* varlist) {
ctr_object* cgiVarObject;
ctr_object* list;
char* cgiVar;
const CGI_value* value;
char* val;
ctr_argument* arg;
int i = 0;
list = ctr_array_new(CtrStdArray, NULL);
cgiVarObject = ctr_internal_cast2string(argumentList->object);
cgiVar = ctr_heap_allocate_cstring( cgiVarObject );
value = CGI_lookup_all(varlist, (const char*)cgiVar);
ctr_heap_free( cgiVar );
if (value == NULL) {
return list;
}
for (i = 0; value[i] != 0; i++) {
arg = (ctr_argument*) ctr_heap_allocate( sizeof( ctr_argument ) );
val = (char*) value[i];
arg->object = ctr_build_string_from_cstring(val);
ctr_array_push(list, arg);
ctr_heap_free( arg );
}
return list;
}
/**
* @internal
*
* Returns a string from the request, either for GET, POST or COOKIE.
*/
ctr_object* ctr_request_string(ctr_object* myself, ctr_argument* argumentList, CGI_varlist* varlist) {
ctr_object* cgiVarObject;
char* cgiVar;
char* value;
cgiVarObject = ctr_internal_cast2string(argumentList->object);
cgiVar = ctr_heap_allocate_cstring( cgiVarObject );
value = (char*) CGI_lookup(varlist, (const char*)cgiVar);
ctr_heap_free( cgiVar );
if (value == NULL) return CtrStdNil;
return ctr_build_string_from_cstring(value);
}
/**
* [File] writeBytes: [String].
*
* Takes a string and writes the bytes in the string to the file
* object. Returns the number of bytes actually written.
*
* Usage:
*
* f := File new: '/path/to/file.txt'.
* f open: 'r+'.
* n := f writeBytes: 'Hello World'.
* f close.
*
* The example above writes 'Hello World' to the specified file as bytes.
* The number of bytes written is returned in variable n.
*/
ctr_object* ctr_file_write_bytes(ctr_object* myself, ctr_argument* argumentList) {
int bytes, written;
ctr_object* string2write;
char* buffer;
if (myself->value.rvalue == NULL) return myself;
if (myself->value.rvalue->type != 1) return myself;
string2write = ctr_internal_cast2string(argumentList->object);
buffer = ctr_heap_allocate_cstring( string2write );
bytes = string2write->value.svalue->vlen;
written = fwrite(buffer, sizeof(char), (int)bytes, (FILE*)myself->value.rvalue->ptr);
ctr_heap_free( buffer );
return ctr_build_number_from_float((double_t) written);
}
/**
* [File] open: [string]
*
* Open a file with using the specified mode.
*
* Usage:
*
* f := File new: '/path/to/file'.
* f open: 'r+'. #opens file for reading and writing
*
* The example above opens the file in f for reading and writing.
*/
ctr_object* ctr_file_open(ctr_object* myself, ctr_argument* argumentList) {
ctr_object* pathObj = ctr_internal_object_find_property(myself, ctr_build_string_from_cstring( "path" ), 0);
char* mode;
char* path;
FILE* handle;
ctr_resource* rs = ctr_heap_allocate(sizeof(ctr_resource));
ctr_object* modeStrObj = ctr_internal_cast2string( argumentList->object );
if ( myself->value.rvalue != NULL ) {
ctr_heap_free( rs );
CtrStdFlow = ctr_build_string_from_cstring( "File has already been opened." );
CtrStdFlow->info.sticky = 1;
return myself;
}
if ( pathObj == NULL ) return myself;
path = ctr_heap_allocate_cstring( pathObj );
mode = ctr_heap_allocate_cstring( modeStrObj );
handle = fopen(path,mode);
ctr_heap_free( path );
ctr_heap_free( mode );
rs->type = 1;
rs->ptr = handle;
myself->value.rvalue = rs;
return myself;
}
/**
* [Curl] respondTo: [string] with: [Object]
*
* Default response sets Curl option
*
**/
ctr_object* ctr_curl_respondto(ctr_object* myself, ctr_argument* argumentList) {
ctr_object* msgObj = ctr_internal_cast2string(argumentList->object);
char* msg = ctr_heap_allocate_cstring(msgObj);
msg[strlen(msg)-1] = 0;
ctr_object *argObj = argumentList->next->object;
void* val = NULL;
char msg_and_args[200];
CURLoption opt;
unsigned int cancel = 0;
unsigned int ctrstr = 0;
switch (argObj->info.type) {
case CTR_OBJECT_TYPE_OTNIL:
val = NULL;
break;
case CTR_OBJECT_TYPE_OTBOOL:
val = &argObj->value.bvalue;
break;
case CTR_OBJECT_TYPE_OTNUMBER:
val = &argObj->value.nvalue;
break;
case CTR_OBJECT_TYPE_OTSTRING:
val = ctr_heap_allocate_cstring(argObj);
ctrstr = 1;
break;
case CTR_OBJECT_TYPE_OTNATFUNC:
case CTR_OBJECT_TYPE_OTBLOCK:
argumentList->next->object = ctr_block_run(argObj, NULL, myself);
ctr_curl_respondto(myself, argumentList);
break;
case CTR_OBJECT_TYPE_OTOBJECT:
case CTR_OBJECT_TYPE_OTARRAY:
case CTR_OBJECT_TYPE_OTMISC:
case CTR_OBJECT_TYPE_OTEX:
CtrStdFlow = ctr_build_string_from_cstring("Invalid argument type.");
return myself;
}
if (val == NULL) { cancel = 1; }
#ifdef CTRPLUGIN_CURL_CURLOPT_URL
else if (strcasecmp(msg, "url") == 0) { opt = CURLOPT_URL; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PATH_AS_IS
else if (strcasecmp(msg, "path_as_is") == 0) { opt = CURLOPT_PATH_AS_IS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY
else if (strcasecmp(msg, "proxy") == 0) { opt = CURLOPT_PROXY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PRE_PROXY
else if (strcasecmp(msg, "pre_proxy") == 0) { opt = CURLOPT_PRE_PROXY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYPORT
else if (strcasecmp(msg, "proxyport") == 0) { opt = CURLOPT_PROXYPORT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYTYPE
else if (strcasecmp(msg, "proxytype") == 0) { opt = CURLOPT_PROXYTYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NOPROXY
else if (strcasecmp(msg, "noproxy") == 0) { opt = CURLOPT_NOPROXY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTPPROXYTUNNEL
else if (strcasecmp(msg, "httpproxytunnel") == 0) { opt = CURLOPT_HTTPPROXYTUNNEL; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CONNECT_TO
else if (strcasecmp(msg, "connect_to") == 0) { opt = CURLOPT_CONNECT_TO; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SOCKS5_GSSAPI_SERVICE
else if (strcasecmp(msg, "socks5_gssapi_service") == 0) { opt = CURLOPT_SOCKS5_GSSAPI_SERVICE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SOCKS5_GSSAPI_NEC
else if (strcasecmp(msg, "socks5_gssapi_nec") == 0) { opt = CURLOPT_SOCKS5_GSSAPI_NEC; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SERVICE_NAME
else if (strcasecmp(msg, "proxy_service_name") == 0) { opt = CURLOPT_PROXY_SERVICE_NAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SERVICE_NAME
else if (strcasecmp(msg, "service_name") == 0) { opt = CURLOPT_SERVICE_NAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_INTERFACE
else if (strcasecmp(msg, "interface") == 0) { opt = CURLOPT_INTERFACE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_LOCALPORT
else if (strcasecmp(msg, "localport") == 0) { opt = CURLOPT_LOCALPORT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_LOCALPORTRANGE
else if (strcasecmp(msg, "localportrange") == 0) { opt = CURLOPT_LOCALPORTRANGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_CACHE_TIMEOUT
else if (strcasecmp(msg, "dns_cache_timeout") == 0) { opt = CURLOPT_DNS_CACHE_TIMEOUT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_USE_GLOBAL_CACHE
else if (strcasecmp(msg, "dns_use_global_cache") == 0) { opt = CURLOPT_DNS_USE_GLOBAL_CACHE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_BUFFERSIZE
else if (strcasecmp(msg, "buffersize") == 0) { opt = CURLOPT_BUFFERSIZE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PORT
else if (strcasecmp(msg, "port") == 0) { opt = CURLOPT_PORT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TCP_FASTOPEN
else if (strcasecmp(msg, "tcp_fastopen") == 0) { opt = CURLOPT_TCP_FASTOPEN; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TCP_NODELAY
else if (strcasecmp(msg, "tcp_nodelay") == 0) { opt = CURLOPT_TCP_NODELAY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_ADDRESS_SCOPE
else if (strcasecmp(msg, "address_scope") == 0) { opt = CURLOPT_ADDRESS_SCOPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TCP_KEEPALIVE
else if (strcasecmp(msg, "tcp_keepalive") == 0) { opt = CURLOPT_TCP_KEEPALIVE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TCP_KEEPIDLE
else if (strcasecmp(msg, "tcp_keepidle") == 0) { opt = CURLOPT_TCP_KEEPIDLE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TCP_KEEPINTVL
else if (strcasecmp(msg, "tcp_keepintvl") == 0) { opt = CURLOPT_TCP_KEEPINTVL; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_UNIX_SOCKET_PATH
else if (strcasecmp(msg, "unix_socket_path") == 0) { opt = CURLOPT_UNIX_SOCKET_PATH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_ABSTRACT_UNIX_SOCKET
else if (strcasecmp(msg, "abstract_unix_socket") == 0) { opt = CURLOPT_ABSTRACT_UNIX_SOCKET; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NETRC
else if (strcasecmp(msg, "netrc") == 0) { opt = CURLOPT_NETRC; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NETRC_FILE
else if (strcasecmp(msg, "netrc_file") == 0) { opt = CURLOPT_NETRC_FILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_USERPWD
else if (strcasecmp(msg, "userpwd") == 0) { opt = CURLOPT_USERPWD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYUSERPWD
else if (strcasecmp(msg, "proxyuserpwd") == 0) { opt = CURLOPT_PROXYUSERPWD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_USERNAME
else if (strcasecmp(msg, "username") == 0) { opt = CURLOPT_USERNAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PASSWORD
else if (strcasecmp(msg, "password") == 0) { opt = CURLOPT_PASSWORD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_LOGIN_OPTIONS
else if (strcasecmp(msg, "login_options") == 0) { opt = CURLOPT_LOGIN_OPTIONS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYUSERNAME
else if (strcasecmp(msg, "proxyusername") == 0) { opt = CURLOPT_PROXYUSERNAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYPASSWORD
else if (strcasecmp(msg, "proxypassword") == 0) { opt = CURLOPT_PROXYPASSWORD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTPAUTH
else if (strcasecmp(msg, "httpauth") == 0) { opt = CURLOPT_HTTPAUTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TLSAUTH_USERNAME
else if (strcasecmp(msg, "tlsauth_username") == 0) { opt = CURLOPT_TLSAUTH_USERNAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_TLSAUTH_USERNAME
else if (strcasecmp(msg, "proxy_tlsauth_username") == 0) { opt = CURLOPT_PROXY_TLSAUTH_USERNAME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TLSAUTH_PASSWORD
else if (strcasecmp(msg, "tlsauth_password") == 0) { opt = CURLOPT_TLSAUTH_PASSWORD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_TLSAUTH_PASSWORD
else if (strcasecmp(msg, "proxy_tlsauth_password") == 0) { opt = CURLOPT_PROXY_TLSAUTH_PASSWORD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TLSAUTH_TYPE
else if (strcasecmp(msg, "tlsauth_type") == 0) { opt = CURLOPT_TLSAUTH_TYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_TLSAUTH_TYPE
else if (strcasecmp(msg, "proxy_tlsauth_type") == 0) { opt = CURLOPT_PROXY_TLSAUTH_TYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYAUTH
else if (strcasecmp(msg, "proxyauth") == 0) { opt = CURLOPT_PROXYAUTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SASL_IR
else if (strcasecmp(msg, "sasl_ir") == 0) { opt = CURLOPT_SASL_IR; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_XOAUTH2_BEARER
else if (strcasecmp(msg, "xoauth2_bearer") == 0) { opt = CURLOPT_XOAUTH2_BEARER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_AUTOREFERER
else if (strcasecmp(msg, "autoreferer") == 0) { opt = CURLOPT_AUTOREFERER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_ACCEPT_ENCODING
else if (strcasecmp(msg, "accept_encoding") == 0) { opt = CURLOPT_ACCEPT_ENCODING; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TRANSFER_ENCODING
else if (strcasecmp(msg, "transfer_encoding") == 0) { opt = CURLOPT_TRANSFER_ENCODING; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FOLLOWLOCATION
else if (strcasecmp(msg, "followlocation") == 0) { opt = CURLOPT_FOLLOWLOCATION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_UNRESTRICTED_AUTH
else if (strcasecmp(msg, "unrestricted_auth") == 0) { opt = CURLOPT_UNRESTRICTED_AUTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAXREDIRS
else if (strcasecmp(msg, "maxredirs") == 0) { opt = CURLOPT_MAXREDIRS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POSTREDIR
else if (strcasecmp(msg, "postredir") == 0) { opt = CURLOPT_POSTREDIR; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PUT
else if (strcasecmp(msg, "put") == 0) { opt = CURLOPT_PUT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POST
else if (strcasecmp(msg, "post") == 0) { opt = CURLOPT_POST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POSTFIELDS
else if (strcasecmp(msg, "postfields") == 0) { opt = CURLOPT_POSTFIELDS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POSTFIELDSIZE
else if (strcasecmp(msg, "postfieldsize") == 0) { opt = CURLOPT_POSTFIELDSIZE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POSTFIELDSIZE_LARGE
else if (strcasecmp(msg, "postfieldsize_large") == 0) { opt = CURLOPT_POSTFIELDSIZE_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COPYPOSTFIELDS
else if (strcasecmp(msg, "copypostfields") == 0) { opt = CURLOPT_COPYPOSTFIELDS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTPPOST
else if (strcasecmp(msg, "httppost") == 0) { opt = CURLOPT_HTTPPOST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_REFERER
else if (strcasecmp(msg, "referer") == 0) { opt = CURLOPT_REFERER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_USERAGENT
else if (strcasecmp(msg, "useragent") == 0) { opt = CURLOPT_USERAGENT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTPHEADER
else if (strcasecmp(msg, "httpheader") == 0) { opt = CURLOPT_HTTPHEADER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HEADEROPT
else if (strcasecmp(msg, "headeropt") == 0) { opt = CURLOPT_HEADEROPT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXYHEADER
else if (strcasecmp(msg, "proxyheader") == 0) { opt = CURLOPT_PROXYHEADER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTP200ALIASES
else if (strcasecmp(msg, "http200aliases") == 0) { opt = CURLOPT_HTTP200ALIASES; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COOKIE
else if (strcasecmp(msg, "cookie") == 0) { opt = CURLOPT_COOKIE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COOKIEFILE
else if (strcasecmp(msg, "cookiefile") == 0) { opt = CURLOPT_COOKIEFILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COOKIEJAR
else if (strcasecmp(msg, "cookiejar") == 0) { opt = CURLOPT_COOKIEJAR; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COOKIESESSION
else if (strcasecmp(msg, "cookiesession") == 0) { opt = CURLOPT_COOKIESESSION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_COOKIELIST
else if (strcasecmp(msg, "cookielist") == 0) { opt = CURLOPT_COOKIELIST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTPGET
else if (strcasecmp(msg, "httpget") == 0) { opt = CURLOPT_HTTPGET; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTP_VERSION
else if (strcasecmp(msg, "http_version") == 0) { opt = CURLOPT_HTTP_VERSION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_IGNORE_CONTENT_LENGTH
else if (strcasecmp(msg, "ignore_content_length") == 0) { opt = CURLOPT_IGNORE_CONTENT_LENGTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTP_CONTENT_DECODING
else if (strcasecmp(msg, "http_content_decoding") == 0) { opt = CURLOPT_HTTP_CONTENT_DECODING; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_HTTP_TRANSFER_DECODING
else if (strcasecmp(msg, "http_transfer_decoding") == 0) { opt = CURLOPT_HTTP_TRANSFER_DECODING; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_EXPECT_100_TIMEOUT_MS
else if (strcasecmp(msg, "expect_100_timeout_ms") == 0) { opt = CURLOPT_EXPECT_100_TIMEOUT_MS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PIPEWAIT
else if (strcasecmp(msg, "pipewait") == 0) { opt = CURLOPT_PIPEWAIT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_STREAM_DEPENDS
else if (strcasecmp(msg, "stream_depends") == 0) { opt = CURLOPT_STREAM_DEPENDS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_STREAM_DEPENDS_E
else if (strcasecmp(msg, "stream_depends_e") == 0) { opt = CURLOPT_STREAM_DEPENDS_E; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_STREAM_WEIGHT
else if (strcasecmp(msg, "stream_weight") == 0) { opt = CURLOPT_STREAM_WEIGHT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAIL_FROM
else if (strcasecmp(msg, "mail_from") == 0) { opt = CURLOPT_MAIL_FROM; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAIL_RCPT
else if (strcasecmp(msg, "mail_rcpt") == 0) { opt = CURLOPT_MAIL_RCPT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAIL_AUTH
else if (strcasecmp(msg, "mail_auth") == 0) { opt = CURLOPT_MAIL_AUTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TFTP_BLKSIZE
else if (strcasecmp(msg, "tftp_blksize") == 0) { opt = CURLOPT_TFTP_BLKSIZE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TFTP_NO_OPTIONS
else if (strcasecmp(msg, "tftp_no_options") == 0) { opt = CURLOPT_TFTP_NO_OPTIONS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTPPORT
else if (strcasecmp(msg, "ftpport") == 0) { opt = CURLOPT_FTPPORT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_QUOTE
else if (strcasecmp(msg, "quote") == 0) { opt = CURLOPT_QUOTE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_POSTQUOTE
else if (strcasecmp(msg, "postquote") == 0) { opt = CURLOPT_POSTQUOTE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PREQUOTE
else if (strcasecmp(msg, "prequote") == 0) { opt = CURLOPT_PREQUOTE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_APPEND
else if (strcasecmp(msg, "append") == 0) { opt = CURLOPT_APPEND; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_USE_EPRT
else if (strcasecmp(msg, "ftp_use_eprt") == 0) { opt = CURLOPT_FTP_USE_EPRT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_USE_EPSV
else if (strcasecmp(msg, "ftp_use_epsv") == 0) { opt = CURLOPT_FTP_USE_EPSV; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_USE_PRET
else if (strcasecmp(msg, "ftp_use_pret") == 0) { opt = CURLOPT_FTP_USE_PRET; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_CREATE_MISSING_DIRS
else if (strcasecmp(msg, "ftp_create_missing_dirs") == 0) { opt = CURLOPT_FTP_CREATE_MISSING_DIRS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_RESPONSE_TIMEOUT
else if (strcasecmp(msg, "ftp_response_timeout") == 0) { opt = CURLOPT_FTP_RESPONSE_TIMEOUT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_ALTERNATIVE_TO_USER
else if (strcasecmp(msg, "ftp_alternative_to_user") == 0) { opt = CURLOPT_FTP_ALTERNATIVE_TO_USER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_SKIP_PASV_IP
else if (strcasecmp(msg, "ftp_skip_pasv_ip") == 0) { opt = CURLOPT_FTP_SKIP_PASV_IP; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTPSSLAUTH
else if (strcasecmp(msg, "ftpsslauth") == 0) { opt = CURLOPT_FTPSSLAUTH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_SSL_CCC
else if (strcasecmp(msg, "ftp_ssl_ccc") == 0) { opt = CURLOPT_FTP_SSL_CCC; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_ACCOUNT
else if (strcasecmp(msg, "ftp_account") == 0) { opt = CURLOPT_FTP_ACCOUNT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FTP_FILEMETHOD
else if (strcasecmp(msg, "ftp_filemethod") == 0) { opt = CURLOPT_FTP_FILEMETHOD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_REQUEST
else if (strcasecmp(msg, "rtsp_request") == 0) { opt = CURLOPT_RTSP_REQUEST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_SESSION_ID
else if (strcasecmp(msg, "rtsp_session_id") == 0) { opt = CURLOPT_RTSP_SESSION_ID; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_STREAM_URI
else if (strcasecmp(msg, "rtsp_stream_uri") == 0) { opt = CURLOPT_RTSP_STREAM_URI; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_TRANSPORT
else if (strcasecmp(msg, "rtsp_transport") == 0) { opt = CURLOPT_RTSP_TRANSPORT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_CLIENT_CSEQ
else if (strcasecmp(msg, "rtsp_client_cseq") == 0) { opt = CURLOPT_RTSP_CLIENT_CSEQ; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RTSP_SERVER_CSEQ
else if (strcasecmp(msg, "rtsp_server_cseq") == 0) { opt = CURLOPT_RTSP_SERVER_CSEQ; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TRANSFERTEXT
else if (strcasecmp(msg, "transfertext") == 0) { opt = CURLOPT_TRANSFERTEXT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_TRANSFER_MODE
else if (strcasecmp(msg, "proxy_transfer_mode") == 0) { opt = CURLOPT_PROXY_TRANSFER_MODE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CRLF
else if (strcasecmp(msg, "crlf") == 0) { opt = CURLOPT_CRLF; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RANGE
else if (strcasecmp(msg, "range") == 0) { opt = CURLOPT_RANGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RESUME_FROM
else if (strcasecmp(msg, "resume_from") == 0) { opt = CURLOPT_RESUME_FROM; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RESUME_FROM_LARGE
else if (strcasecmp(msg, "resume_from_large") == 0) { opt = CURLOPT_RESUME_FROM_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CUSTOMREQUEST
else if (strcasecmp(msg, "customrequest") == 0) { opt = CURLOPT_CUSTOMREQUEST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FILETIME
else if (strcasecmp(msg, "filetime") == 0) { opt = CURLOPT_FILETIME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DIRLISTONLY
else if (strcasecmp(msg, "dirlistonly") == 0) { opt = CURLOPT_DIRLISTONLY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NOBODY
else if (strcasecmp(msg, "nobody") == 0) { opt = CURLOPT_NOBODY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_INFILESIZE
else if (strcasecmp(msg, "infilesize") == 0) { opt = CURLOPT_INFILESIZE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_INFILESIZE_LARGE
else if (strcasecmp(msg, "infilesize_large") == 0) { opt = CURLOPT_INFILESIZE_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_UPLOAD
else if (strcasecmp(msg, "upload") == 0) { opt = CURLOPT_UPLOAD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAXFILESIZE
else if (strcasecmp(msg, "maxfilesize") == 0) { opt = CURLOPT_MAXFILESIZE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAXFILESIZE_LARGE
else if (strcasecmp(msg, "maxfilesize_large") == 0) { opt = CURLOPT_MAXFILESIZE_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TIMECONDITION
else if (strcasecmp(msg, "timecondition") == 0) { opt = CURLOPT_TIMECONDITION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TIMEVALUE
else if (strcasecmp(msg, "timevalue") == 0) { opt = CURLOPT_TIMEVALUE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TIMEOUT
else if (strcasecmp(msg, "timeout") == 0) { opt = CURLOPT_TIMEOUT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TIMEOUT_MS
else if (strcasecmp(msg, "timeout_ms") == 0) { opt = CURLOPT_TIMEOUT_MS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_LOW_SPEED_LIMIT
else if (strcasecmp(msg, "low_speed_limit") == 0) { opt = CURLOPT_LOW_SPEED_LIMIT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_LOW_SPEED_TIME
else if (strcasecmp(msg, "low_speed_time") == 0) { opt = CURLOPT_LOW_SPEED_TIME; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAX_SEND_SPEED_LARGE
else if (strcasecmp(msg, "max_send_speed_large") == 0) { opt = CURLOPT_MAX_SEND_SPEED_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAX_RECV_SPEED_LARGE
else if (strcasecmp(msg, "max_recv_speed_large") == 0) { opt = CURLOPT_MAX_RECV_SPEED_LARGE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_MAXCONNECTS
else if (strcasecmp(msg, "maxconnects") == 0) { opt = CURLOPT_MAXCONNECTS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FRESH_CONNECT
else if (strcasecmp(msg, "fresh_connect") == 0) { opt = CURLOPT_FRESH_CONNECT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_FORBID_REUSE
else if (strcasecmp(msg, "forbid_reuse") == 0) { opt = CURLOPT_FORBID_REUSE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CONNECTTIMEOUT
else if (strcasecmp(msg, "connecttimeout") == 0) { opt = CURLOPT_CONNECTTIMEOUT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CONNECTTIMEOUT_MS
else if (strcasecmp(msg, "connecttimeout_ms") == 0) { opt = CURLOPT_CONNECTTIMEOUT_MS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_IPRESOLVE
else if (strcasecmp(msg, "ipresolve") == 0) { opt = CURLOPT_IPRESOLVE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CONNECT_ONLY
else if (strcasecmp(msg, "connect_only") == 0) { opt = CURLOPT_CONNECT_ONLY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_USE_SSL
else if (strcasecmp(msg, "use_ssl") == 0) { opt = CURLOPT_USE_SSL; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RESOLVE
else if (strcasecmp(msg, "resolve") == 0) { opt = CURLOPT_RESOLVE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_INTERFACE
else if (strcasecmp(msg, "dns_interface") == 0) { opt = CURLOPT_DNS_INTERFACE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_LOCAL_IP4
else if (strcasecmp(msg, "dns_local_ip4") == 0) { opt = CURLOPT_DNS_LOCAL_IP4; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_LOCAL_IP6
else if (strcasecmp(msg, "dns_local_ip6") == 0) { opt = CURLOPT_DNS_LOCAL_IP6; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_DNS_SERVERS
else if (strcasecmp(msg, "dns_servers") == 0) { opt = CURLOPT_DNS_SERVERS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_ACCEPTTIMEOUT_MS
else if (strcasecmp(msg, "accepttimeout_ms") == 0) { opt = CURLOPT_ACCEPTTIMEOUT_MS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLCERT
else if (strcasecmp(msg, "sslcert") == 0) { opt = CURLOPT_SSLCERT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSLCERT
else if (strcasecmp(msg, "proxy_sslcert") == 0) { opt = CURLOPT_PROXY_SSLCERT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLCERTTYPE
else if (strcasecmp(msg, "sslcerttype") == 0) { opt = CURLOPT_SSLCERTTYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSLCERTTYPE
else if (strcasecmp(msg, "proxy_sslcerttype") == 0) { opt = CURLOPT_PROXY_SSLCERTTYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLKEY
else if (strcasecmp(msg, "sslkey") == 0) { opt = CURLOPT_SSLKEY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSLKEY
else if (strcasecmp(msg, "proxy_sslkey") == 0) { opt = CURLOPT_PROXY_SSLKEY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLKEYTYPE
else if (strcasecmp(msg, "sslkeytype") == 0) { opt = CURLOPT_SSLKEYTYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSLKEYTYPE
else if (strcasecmp(msg, "proxy_sslkeytype") == 0) { opt = CURLOPT_PROXY_SSLKEYTYPE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_KEYPASSWD
else if (strcasecmp(msg, "keypasswd") == 0) { opt = CURLOPT_KEYPASSWD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_KEYPASSWD
else if (strcasecmp(msg, "proxy_keypasswd") == 0) { opt = CURLOPT_PROXY_KEYPASSWD; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_ENABLE_ALPN
else if (strcasecmp(msg, "ssl_enable_alpn") == 0) { opt = CURLOPT_SSL_ENABLE_ALPN; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_ENABLE_NPN
else if (strcasecmp(msg, "ssl_enable_npn") == 0) { opt = CURLOPT_SSL_ENABLE_NPN; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLENGINE
else if (strcasecmp(msg, "sslengine") == 0) { opt = CURLOPT_SSLENGINE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLENGINE_DEFAULT
else if (strcasecmp(msg, "sslengine_default") == 0) { opt = CURLOPT_SSLENGINE_DEFAULT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_FALSESTART
else if (strcasecmp(msg, "ssl_falsestart") == 0) { opt = CURLOPT_SSL_FALSESTART; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSLVERSION
else if (strcasecmp(msg, "sslversion") == 0) { opt = CURLOPT_SSLVERSION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSLVERSION
else if (strcasecmp(msg, "proxy_sslversion") == 0) { opt = CURLOPT_PROXY_SSLVERSION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_VERIFYHOST
else if (strcasecmp(msg, "ssl_verifyhost") == 0) { opt = CURLOPT_SSL_VERIFYHOST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSL_VERIFYHOST
else if (strcasecmp(msg, "proxy_ssl_verifyhost") == 0) { opt = CURLOPT_PROXY_SSL_VERIFYHOST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_VERIFYPEER
else if (strcasecmp(msg, "ssl_verifypeer") == 0) { opt = CURLOPT_SSL_VERIFYPEER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSL_VERIFYPEER
else if (strcasecmp(msg, "proxy_ssl_verifypeer") == 0) { opt = CURLOPT_PROXY_SSL_VERIFYPEER; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_VERIFYSTATUS
else if (strcasecmp(msg, "ssl_verifystatus") == 0) { opt = CURLOPT_SSL_VERIFYSTATUS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CAINFO
else if (strcasecmp(msg, "cainfo") == 0) { opt = CURLOPT_CAINFO; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_CAINFO
else if (strcasecmp(msg, "proxy_cainfo") == 0) { opt = CURLOPT_PROXY_CAINFO; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_ISSUERCERT
else if (strcasecmp(msg, "issuercert") == 0) { opt = CURLOPT_ISSUERCERT; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CAPATH
else if (strcasecmp(msg, "capath") == 0) { opt = CURLOPT_CAPATH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_CAPATH
else if (strcasecmp(msg, "proxy_capath") == 0) { opt = CURLOPT_PROXY_CAPATH; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CRLFILE
else if (strcasecmp(msg, "crlfile") == 0) { opt = CURLOPT_CRLFILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_CRLFILE
else if (strcasecmp(msg, "proxy_crlfile") == 0) { opt = CURLOPT_PROXY_CRLFILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_CERTINFO
else if (strcasecmp(msg, "certinfo") == 0) { opt = CURLOPT_CERTINFO; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PINNEDPUBLICKEY
else if (strcasecmp(msg, "pinnedpublickey") == 0) { opt = CURLOPT_PINNEDPUBLICKEY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_PINNEDPUBLICKEY
else if (strcasecmp(msg, "proxy_pinnedpublickey") == 0) { opt = CURLOPT_PROXY_PINNEDPUBLICKEY; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_RANDOM_FILE
else if (strcasecmp(msg, "random_file") == 0) { opt = CURLOPT_RANDOM_FILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_EGDSOCKET
else if (strcasecmp(msg, "egdsocket") == 0) { opt = CURLOPT_EGDSOCKET; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_CIPHER_LIST
else if (strcasecmp(msg, "ssl_cipher_list") == 0) { opt = CURLOPT_SSL_CIPHER_LIST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSL_CIPHER_LIST
else if (strcasecmp(msg, "proxy_ssl_cipher_list") == 0) { opt = CURLOPT_PROXY_SSL_CIPHER_LIST; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_SESSIONID_CACHE
else if (strcasecmp(msg, "ssl_sessionid_cache") == 0) { opt = CURLOPT_SSL_SESSIONID_CACHE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSL_OPTIONS
else if (strcasecmp(msg, "ssl_options") == 0) { opt = CURLOPT_SSL_OPTIONS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PROXY_SSL_OPTIONS
else if (strcasecmp(msg, "proxy_ssl_options") == 0) { opt = CURLOPT_PROXY_SSL_OPTIONS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_KRBLEVEL
else if (strcasecmp(msg, "krblevel") == 0) { opt = CURLOPT_KRBLEVEL; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_GSSAPI_DELEGATION
else if (strcasecmp(msg, "gssapi_delegation") == 0) { opt = CURLOPT_GSSAPI_DELEGATION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_AUTH_TYPES
else if (strcasecmp(msg, "ssh_auth_types") == 0) { opt = CURLOPT_SSH_AUTH_TYPES; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_HOST_PUBLIC_KEY_MD5
else if (strcasecmp(msg, "ssh_host_public_key_md5") == 0) { opt = CURLOPT_SSH_HOST_PUBLIC_KEY_MD5; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_PUBLIC_KEYFILE
else if (strcasecmp(msg, "ssh_public_keyfile") == 0) { opt = CURLOPT_SSH_PUBLIC_KEYFILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_PRIVATE_KEYFILE
else if (strcasecmp(msg, "ssh_private_keyfile") == 0) { opt = CURLOPT_SSH_PRIVATE_KEYFILE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_KNOWNHOSTS
else if (strcasecmp(msg, "ssh_knownhosts") == 0) { opt = CURLOPT_SSH_KNOWNHOSTS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_KEYFUNCTION
else if (strcasecmp(msg, "ssh_keyfunction") == 0) { opt = CURLOPT_SSH_KEYFUNCTION; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SSH_KEYDATA
else if (strcasecmp(msg, "ssh_keydata") == 0) { opt = CURLOPT_SSH_KEYDATA; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_PRIVATE
else if (strcasecmp(msg, "private") == 0) { opt = CURLOPT_PRIVATE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_SHARE
else if (strcasecmp(msg, "share") == 0) { opt = CURLOPT_SHARE; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NEW_FILE_PERMS
else if (strcasecmp(msg, "new_file_perms") == 0) { opt = CURLOPT_NEW_FILE_PERMS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_NEW_DIRECTORY_PERMS
else if (strcasecmp(msg, "new_directory_perms") == 0) { opt = CURLOPT_NEW_DIRECTORY_PERMS; }
#endif
#ifdef CTRPLUGIN_CURL_CURLOPT_TELNETOPTIONS
else if (strcasecmp(msg, "telnetoptions") == 0) { opt = CURLOPT_TELNETOPTIONS; }
#endif
else {
CtrStdFlow = ctr_build_string_from_cstring("Invalid option.");
cancel = 1;
}
if (!cancel) {
CURLcode res = curl_easy_setopt(myself->value.rvalue->ptr, opt, val);
if (res != CURLE_OK) {
char* args = ctr_heap_allocate_cstring(ctr_internal_cast2string(argObj));
snprintf(msg_and_args, 200, "Curl %s `%s` : %s", msg, args, (char *)curl_easy_strerror(res));
CtrStdFlow = ctr_build_string_from_cstring(msg_and_args);
ctr_heap_free(args);
}
}
ctr_heap_free(msg);
if (ctrstr) ctr_heap_free(val);
return myself;
}
