xmltooling/util/CurlURLInputStream.cpp

   1 /*
   2  * Licensed to the Apache Software Foundation (ASF) under one or more
   3  * contributor license agreements.  See the NOTICE file distributed with
   4  * this work for additional information regarding copyright ownership.
   5  * The ASF licenses this file to You under the Apache License, Version 2.0
   6  * (the "License"); you may not use this file except in compliance with
   7  * the License.  You may obtain a copy of the License at
   8  *
   9  *      http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17
  18 /*
  19  * $Id$
  20  */
  21
  22 #include "internal.h"
  23
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <errno.h>
  28 #ifdef HAVE_UNISTD_H
  29 # include <unistd.h>
  30 #endif
  31 //#include <sys/types.h>
  32 //#include <sys/time.h>
  33
  34 #include <xercesc/util/XercesDefs.hpp>
  35 #include <xercesc/util/XMLNetAccessor.hpp>
  36 #include <xercesc/util/XMLString.hpp>
  37 #include <xercesc/util/XMLExceptMsgs.hpp>
  38 #include <xercesc/util/Janitor.hpp>
  39 #include <xercesc/util/XMLUniDefs.hpp>
  40 #include <xercesc/util/TransService.hpp>
  41 #include <xercesc/util/TranscodingException.hpp>
  42 #include <xercesc/util/PlatformUtils.hpp>
  43
  44 #include <xmltooling/logging.h>
  45 #include <xmltooling/util/CurlURLInputStream.hpp>
  46
  47 using namespace xmltooling;
  48
  49
  50 CurlURLInputStream::CurlURLInputStream(const XMLURL& urlSource, const XMLNetHTTPInfo* httpInfo/*=0*/)
  51       : fMulti(0)
  52       , fEasy(0)
  53       , fMemoryManager(urlSource.getMemoryManager())
  54       , fURLSource(urlSource)
  55       , fURL(0)
  56       , fTotalBytesRead(0)
  57       , fWritePtr(0)
  58       , fBytesRead(0)
  59       , fBytesToRead(0)
  60       , fDataAvailable(false)
  61       , fBufferHeadPtr(fBuffer)
  62       , fBufferTailPtr(fBuffer)
  63 {
  64         // Allocate the curl multi handle
  65         fMulti = curl_multi_init();
  66
  67         // Allocate the curl easy handle
  68         fEasy = curl_easy_init();
  69
  70         // Get the text of the URL we're going to use
  71         fURL.reset(XMLString::transcode(fURLSource.getURLText(), fMemoryManager), fMemoryManager);
  72
  73         //printf("Curl trying to fetch %s\n", fURL.get());
  74
  75         // Set URL option
  76         curl_easy_setopt(fEasy, CURLOPT_URL, fURL.get());
  77         curl_easy_setopt(fEasy, CURLOPT_WRITEDATA, this);                                               // Pass this pointer to write function
  78         curl_easy_setopt(fEasy, CURLOPT_WRITEFUNCTION, staticWriteCallback);    // Our static write function
  79     curl_easy_setopt(fEasy, CURLOPT_CONNECTTIMEOUT, 15);
  80     curl_easy_setopt(fEasy, CURLOPT_TIMEOUT, 30);
  81     curl_easy_setopt(fEasy, CURLOPT_SSLVERSION, CURL_SSLVERSION_SSLv3);
  82     curl_easy_setopt(fEasy, CURLOPT_SSL_VERIFYHOST, 0);
  83     curl_easy_setopt(fEasy, CURLOPT_SSL_VERIFYPEER, 0);
  84     curl_easy_setopt(fEasy, CURLOPT_NOPROGRESS, 1);
  85     curl_easy_setopt(fEasy, CURLOPT_NOSIGNAL, 1);
  86     curl_easy_setopt(fEasy, CURLOPT_FAILONERROR, 1);
  87
  88         // Add easy handle to the multi stack
  89         curl_multi_add_handle(fMulti, fEasy);
  90 }
  91
  92
  93 CurlURLInputStream::~CurlURLInputStream()
  94 {
  95         // Remove the easy handle from the multi stack
  96         curl_multi_remove_handle(fMulti, fEasy);
  97
  98         // Cleanup the easy handle
  99         curl_easy_cleanup(fEasy);
 100
 101         // Cleanup the multi handle
 102         curl_multi_cleanup(fMulti);
 103 }
 104
 105
 106 size_t
 107 CurlURLInputStream::staticWriteCallback(char *buffer,
 108                                       size_t size,
 109                                       size_t nitems,
 110                                       void *outstream)
 111 {
 112         return ((CurlURLInputStream*)outstream)->writeCallback(buffer, size, nitems);
 113 }
 114
 115
 116
 117 size_t
 118 CurlURLInputStream::writeCallback(char *buffer,
 119                                       size_t size,
 120                                       size_t nitems)
 121 {
 122         size_t cnt = size * nitems;
 123         size_t totalConsumed = 0;
 124
 125         // Consume as many bytes as possible immediately into the buffer
 126         size_t consume = (cnt > fBytesToRead) ? fBytesToRead : cnt;
 127         memcpy(fWritePtr, buffer, consume);
 128         fWritePtr               += consume;
 129         fBytesRead              += consume;
 130         fTotalBytesRead += consume;
 131         fBytesToRead    -= consume;
 132
 133         //printf("write callback consuming %d bytes\n", consume);
 134
 135         // If bytes remain, rebuffer as many as possible into our holding buffer
 136         buffer                  += consume;
 137         totalConsumed   += consume;
 138         cnt                             -= consume;
 139         if (cnt > 0)
 140         {
 141                 size_t bufAvail = sizeof(fBuffer) - (fBufferHeadPtr - fBuffer);
 142                 consume = (cnt > bufAvail) ? bufAvail : cnt;
 143                 memcpy(fBufferHeadPtr, buffer, consume);
 144                 fBufferHeadPtr  += consume;
 145                 buffer                  += consume;
 146                 totalConsumed   += consume;
 147                 //printf("write callback rebuffering %d bytes\n", consume);
 148         }
 149
 150         // Return the total amount we've consumed. If we don't consume all the bytes
 151         // then an error will be generated. Since our buffer size is equal to the
 152         // maximum size that curl will write, this should never happen unless there
 153         // is a logic error somewhere here.
 154         return totalConsumed;
 155 }
 156
 157
 158 unsigned int
 159 CurlURLInputStream::readBytes(XMLByte* const          toFill
 160                                      , const unsigned int maxToRead)
 161 {
 162         fBytesRead = 0;
 163         fBytesToRead = maxToRead;
 164         fWritePtr = toFill;
 165
 166         for (bool tryAgain = true; fBytesToRead > 0 && (tryAgain || fBytesRead == 0); )
 167         {
 168                 // First, any buffered data we have available
 169                 size_t bufCnt = fBufferHeadPtr - fBufferTailPtr;
 170                 bufCnt = (bufCnt > fBytesToRead) ? fBytesToRead : bufCnt;
 171                 if (bufCnt > 0)
 172                 {
 173                         memcpy(fWritePtr, fBufferTailPtr, bufCnt);
 174                         fWritePtr               += bufCnt;
 175                         fBytesRead              += bufCnt;
 176                         fTotalBytesRead += bufCnt;
 177                         fBytesToRead    -= bufCnt;
 178
 179                         fBufferTailPtr  += bufCnt;
 180                         if (fBufferTailPtr == fBufferHeadPtr)
 181                                 fBufferHeadPtr = fBufferTailPtr = fBuffer;
 182
 183                         //printf("consuming %d buffered bytes\n", bufCnt);
 184
 185                         tryAgain = true;
 186                         continue;
 187                 }
 188
 189                 // Ask the curl to do some work
 190                 int runningHandles = 0;
 191                 CURLMcode curlResult = curl_multi_perform(fMulti, &runningHandles);
 192                 tryAgain = (curlResult == CURLM_CALL_MULTI_PERFORM);
 193
 194                 // Process messages from curl
 195                 int msgsInQueue = 0;
 196                 for (CURLMsg* msg = NULL; (msg = curl_multi_info_read(fMulti, &msgsInQueue)) != NULL; )
 197                 {
 198                         //printf("msg %d, %d from curl\n", msg->msg, msg->data.result);
 199
 200                         if (msg->msg != CURLMSG_DONE)
 201                                 continue;
 202
 203                         switch (msg->data.result)
 204                         {
 205                         case CURLE_OK:
 206                                 // We completed successfully. runningHandles should have dropped to zero, so we'll bail out below...
 207                                 break;
 208
 209                         case CURLE_UNSUPPORTED_PROTOCOL:
 210                 ThrowXMLwithMemMgr(MalformedURLException, XMLExcepts::URL_UnsupportedProto, fMemoryManager);
 211                 break;
 212
 213             case CURLE_COULDNT_RESOLVE_HOST:
 214             case CURLE_COULDNT_RESOLVE_PROXY:
 215                 ThrowXMLwithMemMgr1(NetAccessorException,  XMLExcepts::NetAcc_TargetResolution, fURLSource.getHost(), fMemoryManager);
 216                 break;
 217
 218             case CURLE_COULDNT_CONNECT:
 219                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_ConnSocket, fURLSource.getURLText(), fMemoryManager);
 220
 221             case CURLE_RECV_ERROR:
 222                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_ReadSocket, fURLSource.getURLText(), fMemoryManager);
 223                 break;
 224
 225             default:
 226                 logging::Category::getInstance(XMLTOOLING_LOGCAT"libcurl.NetAccessor").error(
 227                     "curl NetAccessor encountered error from libcurl (%d)", msg->data.result
 228                     );
 229                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_InternalError, fURLSource.getURLText(), fMemoryManager);
 230                                 break;
 231                         }
 232                 }
 233
 234                 // If nothing is running any longer, bail out
 235                 if (runningHandles == 0)
 236                         break;
 237
 238                 // If there is no further data to read, and we haven't
 239                 // read any yet on this invocation, call select to wait for data
 240                 if (!tryAgain && fBytesRead == 0)
 241                 {
 242                         fd_set readSet;
 243                         fd_set writeSet;
 244                         fd_set exceptSet;
 245                         int fdcnt=0;
 246
 247                         // Ask curl for the file descriptors to wait on
 248             FD_ZERO(&readSet);
 249             FD_ZERO(&writeSet);
 250             FD_ZERO(&exceptSet);
 251                         (void) curl_multi_fdset(fMulti, &readSet, &writeSet, &exceptSet, &fdcnt);
 252
 253                         // Wait on the file descriptors
 254                         timeval tv;
 255                         tv.tv_sec  = 2;
 256                         tv.tv_usec = 0;
 257                         (void) select(fdcnt+1, &readSet, &writeSet, &exceptSet, &tv);
 258                 }
 259         }
 260
 261         return fBytesRead;
 262 }
 263