+static void
+gotio(struct ev_loop *loop, ev_io *ioev, int events) {
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: waking up curl for io on fd %d\n", (int)ioev->fd);
+ sockwatcher_data *sockwatcher = (void *)ioev->data;
+ stepmulti(sockwatcher->global, ioev->fd);
+}
+
+static size_t
+gotdata(void *data, size_t size, size_t nmemb, void *cglobal) {
+ AsyncIO *IO = (AsyncIO*) cglobal;
+ //evcurl_request_data *D = (evcurl_request_data*) data;
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: gotdata(): calling CurlFillStrBuf_callback()\n");
+
+ if (IO->HttpReq.ReplyData == NULL)
+ {
+ IO->HttpReq.ReplyData = NewStrBufPlain(NULL, SIZ);
+ }
+ return CurlFillStrBuf_callback(data, size, nmemb, IO->HttpReq.ReplyData);
+}
+
+static int
+gotwatchtime(CURLM *multi, long tblock_ms, void *cglobal) {
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: gotwatchtime called %ld ms\n", tblock_ms);
+ evcurl_global_data *global = cglobal;
+ ev_timer_stop(EV_DEFAULT, &global->timeev);
+ if (tblock_ms < 0 || 14000 < tblock_ms)
+ tblock_ms = 14000;
+ ev_timer_set(&global->timeev, 0.5e-3 + 1.0e-3 * tblock_ms, 14.0);
+ ev_timer_start(EV_DEFAULT_UC, &global->timeev);
+ curl_multi_perform(global, CURL_POLL_NONE);
+ return 0;
+}
+
+static int
+gotwatchsock(CURL *easy, curl_socket_t fd, int action, void *cglobal, void *csockwatcher) {
+ evcurl_global_data *global = cglobal;
+ CURLM *mhnd = global->mhnd;
+ sockwatcher_data *sockwatcher = csockwatcher;
+
+ CtdlLogPrintf(CTDL_DEBUG,"EVCURL: gotwatchsock called fd=%d action=%d\n", (int)fd, action);
+
+ if (!sockwatcher) {
+ CtdlLogPrintf(CTDL_ERR,"EVCURL: called first time to register this sockwatcker\n");
+ sockwatcher = malloc(sizeof(sockwatcher_data));
+ sockwatcher->global = global;
+ ev_init(&sockwatcher->ioev, &gotio);
+ sockwatcher->ioev.data = (void *)sockwatcher;
+ curl_multi_assign(mhnd, fd, sockwatcher);
+ }
+ if (CURL_POLL_REMOVE == action) {
+ CtdlLogPrintf(CTDL_ERR,"EVCURL: called last time to unregister this sockwatcher\n");
+ ev_io_stop(event_base, &sockwatcher->ioev);
+ free(sockwatcher);
+ } else {
+ int events = (action & CURL_POLL_IN ? EV_READ : 0) | (action & CURL_POLL_OUT ? EV_WRITE : 0);
+ ev_io_stop(EV_DEFAULT, &sockwatcher->ioev);
+ if (events) {
+ ev_io_set(&sockwatcher->ioev, fd, events);
+ ev_io_start(EV_DEFAULT, &sockwatcher->ioev);
+ }
+ }
+ return 0;
+}
+
+void curl_init_connectionpool(void)
+{
+ CURLM *mhnd ;
+
+ ev_timer_init(&global.timeev, &gottime, 14.0, 14.0);
+ global.timeev.data = (void *)&global;
+ global.nrun = -1;
+ CURLcode sta = curl_global_init(CURL_GLOBAL_ALL);
+
+ if (sta)
+ {
+ CtdlLogPrintf(CTDL_ERR,"EVCURL: error initializing curl library: %s\n", curl_easy_strerror(sta));
+ exit(1);
+ }
+ mhnd = global.mhnd = curl_multi_init();
+ if (!mhnd)
+ {
+ CtdlLogPrintf(CTDL_ERR,"EVCURL: error initializing curl multi handle\n");
+ exit(3);
+ }
+
+ MOPT(SOCKETFUNCTION, &gotwatchsock);
+ MOPT(SOCKETDATA, (void *)&global);
+ MOPT(TIMERFUNCTION, &gotwatchtime);
+ MOPT(TIMERDATA, (void *)&global);
+
+ return;
+}
+
+
+
+
+int evcurl_init(AsyncIO *IO,
+ void *CustomData,
+ const char* Desc,
+ IO_CallBack CallBack)
+{
+ CURLcode sta;
+ CURL *chnd;
+
+ CtdlLogPrintf(CTDL_DEBUG,"EVCURL: evcurl_init called ms\n");
+ IO->HttpReq.attached = 0;
+ IO->SendDone = CallBack;
+ chnd = IO->HttpReq.chnd = curl_easy_init();
+ if (!chnd)
+ {
+ CtdlLogPrintf(CTDL_ERR, "EVCURL: error initializing curl handle\n");
+ return 1;
+ }
+
+ strcpy(IO->HttpReq.errdesc, Desc);
+
+ OPT(VERBOSE, (long)1);
+ /* unset in production */
+ OPT(NOPROGRESS, (long)1);
+ OPT(NOSIGNAL, (long)1);
+ OPT(FAILONERROR, (long)1);
+ OPT(ENCODING, "");
+ OPT(FOLLOWLOCATION, (long)1);
+ OPT(MAXREDIRS, (long)7);
+ OPT(USERAGENT, CITADEL);
+
+ OPT(TIMEOUT, (long)1800);
+ OPT(LOW_SPEED_LIMIT, (long)64);
+ OPT(LOW_SPEED_TIME, (long)600);
+ OPT(CONNECTTIMEOUT, (long)600);
+ OPT(PRIVATE, (void *)IO);
+
+
+ OPT(WRITEFUNCTION, &gotdata);
+ OPT(WRITEDATA, (void *)IO);
+ OPT(ERRORBUFFER, IO->HttpReq.errdesc);
+
+ if (
+ (!IsEmptyStr(config.c_ip_addr))
+ && (strcmp(config.c_ip_addr, "*"))
+ && (strcmp(config.c_ip_addr, "::"))
+ && (strcmp(config.c_ip_addr, "0.0.0.0"))
+ ) {
+ OPT(INTERFACE, config.c_ip_addr);
+ }
+ /* point to a structure that points back to the perl structure and stuff */
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: Loading URL: %s\n", IO->ConnectMe->PlainUrl);
+ OPT(URL, IO->ConnectMe->PlainUrl);
+ if (StrLength(IO->ConnectMe->CurlCreds))
+ {
+ OPT(HTTPAUTH, (long)CURLAUTH_BASIC);
+ OPT(USERPWD, ChrPtr(IO->ConnectMe->CurlCreds));
+ }
+#ifdef CURLOPT_HTTP_CONTENT_DECODING
+ OPT(HTTP_CONTENT_DECODING, 1);
+ OPT(ENCODING, "");
+#endif
+ if (StrLength(IO->HttpReq.PostData) > 0)
+ {
+ OPT(POSTFIELDS, ChrPtr(IO->HttpReq.PostData));
+ OPT(POSTFIELDSIZE, StrLength(IO->HttpReq.PostData));
+
+ }
+ else if ((IO->HttpReq.PlainPostDataLen != 0) && (IO->HttpReq.PlainPostData != NULL))
+ {
+ OPT(POSTFIELDS, IO->HttpReq.PlainPostData);
+ OPT(POSTFIELDSIZE, IO->HttpReq.PlainPostDataLen);
+ }
+
+ if (IO->HttpReq.headers != NULL)
+ OPT(HTTPHEADER, IO->HttpReq.headers);
+
+ return 1;
+}
+
+void
+evcurl_handle_start(AsyncIO *IO)
+{
+ CURLMcode msta;
+
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: attaching to curl multi handle\n");
+ msta = curl_multi_add_handle(global.mhnd, IO->HttpReq.chnd);
+ if (msta)
+ CtdlLogPrintf(CTDL_ERR, "EVCURL: error attaching to curl multi handle: %s\n", curl_multi_strerror(msta));
+ IO->HttpReq.attached = 1;
+ ev_async_send (event_base, &WakeupCurl);
+}
+
+static void WakeupCurlCallback(EV_P_ ev_async *w, int revents)
+{
+ CtdlLogPrintf(CTDL_DEBUG, "EVCURL: waking up curl multi handle\n");
+
+ curl_multi_perform(&global, CURL_POLL_NONE);
+}
+
+static void evcurl_shutdown (void)
+{
+ curl_multi_cleanup(global.mhnd);
+}
+/*****************************************************************************
+ * libevent integration *
+ *****************************************************************************/
+/*
+ * client event queue plus its methods.
+ * this currently is the main loop (which may change in some future?)
+ */
+int evbase_count = 0;
+int event_add_pipe[2] = {-1, -1};