For now, hard code the SSL settings.
[shibboleth/xmltooling.git] / 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/util/CurlURLInputStream.hpp>
45
46 using namespace xmltooling;
47
48
49 CurlURLInputStream::CurlURLInputStream(const XMLURL& urlSource, const XMLNetHTTPInfo* httpInfo/*=0*/)
50       : fMulti(0)
51       , fEasy(0)
52       , fMemoryManager(urlSource.getMemoryManager())
53       , fURLSource(urlSource)
54       , fURL(0)
55       , fTotalBytesRead(0)
56       , fWritePtr(0)
57       , fBytesRead(0)
58       , fBytesToRead(0)
59       , fDataAvailable(false)
60       , fBufferHeadPtr(fBuffer)
61       , fBufferTailPtr(fBuffer)
62 {
63         // Allocate the curl multi handle
64         fMulti = curl_multi_init();
65         
66         // Allocate the curl easy handle
67         fEasy = curl_easy_init();
68         
69         // Get the text of the URL we're going to use
70         fURL.reset(XMLString::transcode(fURLSource.getURLText(), fMemoryManager), fMemoryManager);
71
72         //printf("Curl trying to fetch %s\n", fURL.get());
73
74         // Set URL option
75         curl_easy_setopt(fEasy, CURLOPT_URL, fURL.get());
76         curl_easy_setopt(fEasy, CURLOPT_WRITEDATA, this);                                               // Pass this pointer to write function
77         curl_easy_setopt(fEasy, CURLOPT_WRITEFUNCTION, staticWriteCallback);    // Our static write function
78     curl_easy_setopt(fEasy, CURLOPT_CONNECTTIMEOUT, 15);
79     curl_easy_setopt(fEasy, CURLOPT_TIMEOUT, 30);
80     curl_easy_setopt(fEasy, CURLOPT_SSLVERSION, CURL_SSLVERSION_SSLv3);
81     curl_easy_setopt(fEasy, CURLOPT_SSL_VERIFYHOST, 0);
82     curl_easy_setopt(fEasy, CURLOPT_SSL_VERIFYPEER, 0);
83     curl_easy_setopt(fEasy, CURLOPT_NOPROGRESS, 1);
84     curl_easy_setopt(fEasy, CURLOPT_NOSIGNAL, 1);
85     curl_easy_setopt(fEasy, CURLOPT_FAILONERROR, 1);
86         
87         // Add easy handle to the multi stack
88         curl_multi_add_handle(fMulti, fEasy);
89 }
90
91
92 CurlURLInputStream::~CurlURLInputStream()
93 {
94         // Remove the easy handle from the multi stack
95         curl_multi_remove_handle(fMulti, fEasy);
96         
97         // Cleanup the easy handle
98         curl_easy_cleanup(fEasy);
99         
100         // Cleanup the multi handle
101         curl_multi_cleanup(fMulti);
102 }
103
104
105 size_t
106 CurlURLInputStream::staticWriteCallback(char *buffer,
107                                       size_t size,
108                                       size_t nitems,
109                                       void *outstream)
110 {
111         return ((CurlURLInputStream*)outstream)->writeCallback(buffer, size, nitems);
112 }
113
114
115
116 size_t
117 CurlURLInputStream::writeCallback(char *buffer,
118                                       size_t size,
119                                       size_t nitems)
120 {
121         size_t cnt = size * nitems;
122         size_t totalConsumed = 0;
123                 
124         // Consume as many bytes as possible immediately into the buffer
125         size_t consume = (cnt > fBytesToRead) ? fBytesToRead : cnt;
126         memcpy(fWritePtr, buffer, consume);
127         fWritePtr               += consume;
128         fBytesRead              += consume;
129         fTotalBytesRead += consume;
130         fBytesToRead    -= consume;
131
132         //printf("write callback consuming %d bytes\n", consume);
133
134         // If bytes remain, rebuffer as many as possible into our holding buffer
135         buffer                  += consume;
136         totalConsumed   += consume;
137         cnt                             -= consume;
138         if (cnt > 0)
139         {
140                 size_t bufAvail = sizeof(fBuffer) - (fBufferHeadPtr - fBuffer);
141                 consume = (cnt > bufAvail) ? bufAvail : cnt;
142                 memcpy(fBufferHeadPtr, buffer, consume);
143                 fBufferHeadPtr  += consume;
144                 buffer                  += consume;
145                 totalConsumed   += consume;
146                 //printf("write callback rebuffering %d bytes\n", consume);
147         }
148         
149         // Return the total amount we've consumed. If we don't consume all the bytes
150         // then an error will be generated. Since our buffer size is equal to the
151         // maximum size that curl will write, this should never happen unless there
152         // is a logic error somewhere here.
153         return totalConsumed;
154 }
155
156
157 unsigned int
158 CurlURLInputStream::readBytes(XMLByte* const          toFill
159                                      , const unsigned int maxToRead)
160 {
161         fBytesRead = 0;
162         fBytesToRead = maxToRead;
163         fWritePtr = toFill;
164         
165         for (bool tryAgain = true; fBytesToRead > 0 && (tryAgain || fBytesRead == 0); )
166         {
167                 // First, any buffered data we have available
168                 size_t bufCnt = fBufferHeadPtr - fBufferTailPtr;
169                 bufCnt = (bufCnt > fBytesToRead) ? fBytesToRead : bufCnt;
170                 if (bufCnt > 0)
171                 {
172                         memcpy(fWritePtr, fBufferTailPtr, bufCnt);
173                         fWritePtr               += bufCnt;
174                         fBytesRead              += bufCnt;
175                         fTotalBytesRead += bufCnt;
176                         fBytesToRead    -= bufCnt;
177                         
178                         fBufferTailPtr  += bufCnt;
179                         if (fBufferTailPtr == fBufferHeadPtr)
180                                 fBufferHeadPtr = fBufferTailPtr = fBuffer;
181                                 
182                         //printf("consuming %d buffered bytes\n", bufCnt);
183
184                         tryAgain = true;
185                         continue;
186                 }
187         
188                 // Ask the curl to do some work
189                 int runningHandles = 0;
190                 CURLMcode curlResult = curl_multi_perform(fMulti, &runningHandles);
191                 tryAgain = (curlResult == CURLM_CALL_MULTI_PERFORM);
192                 
193                 // Process messages from curl
194                 int msgsInQueue = 0;
195                 for (CURLMsg* msg = NULL; (msg = curl_multi_info_read(fMulti, &msgsInQueue)) != NULL; )
196                 {
197                         //printf("msg %d, %d from curl\n", msg->msg, msg->data.result);
198
199                         if (msg->msg != CURLMSG_DONE)
200                                 continue;
201                                 
202                         switch (msg->data.result)
203                         {
204                         case CURLE_OK:
205                                 // We completed successfully. runningHandles should have dropped to zero, so we'll bail out below...
206                                 break;
207                                 
208                         case CURLE_UNSUPPORTED_PROTOCOL:
209                 ThrowXMLwithMemMgr(MalformedURLException, XMLExcepts::URL_UnsupportedProto, fMemoryManager);
210                 break;
211
212             case CURLE_COULDNT_RESOLVE_HOST:
213             case CURLE_COULDNT_RESOLVE_PROXY:
214                 ThrowXMLwithMemMgr1(NetAccessorException,  XMLExcepts::NetAcc_TargetResolution, fURLSource.getHost(), fMemoryManager);
215                 break;
216                 
217             case CURLE_COULDNT_CONNECT:
218                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_ConnSocket, fURLSource.getURLText(), fMemoryManager);
219                 
220             case CURLE_RECV_ERROR:
221                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_ReadSocket, fURLSource.getURLText(), fMemoryManager);
222                 break;
223
224             default:
225                 ThrowXMLwithMemMgr1(NetAccessorException, XMLExcepts::NetAcc_InternalError, fURLSource.getURLText(), fMemoryManager);
226                                 break;
227                         }
228                 }
229                 
230                 // If nothing is running any longer, bail out
231                 if (runningHandles == 0)
232                         break;
233                 
234                 // If there is no further data to read, and we haven't
235                 // read any yet on this invocation, call select to wait for data
236                 if (!tryAgain && fBytesRead == 0)
237                 {
238                         fd_set readSet;
239                         fd_set writeSet;
240                         fd_set exceptSet;
241                         int fdcnt=0;
242                         
243                         // Ask curl for the file descriptors to wait on
244             FD_ZERO(&readSet);
245             FD_ZERO(&writeSet);
246             FD_ZERO(&exceptSet);
247                         (void) curl_multi_fdset(fMulti, &readSet, &writeSet, &exceptSet, &fdcnt);
248                         
249                         // Wait on the file descriptors
250                         timeval tv;
251                         tv.tv_sec  = 2;
252                         tv.tv_usec = 0;
253                         (void) select(fdcnt, &readSet, &writeSet, &exceptSet, &tv);
254                 }
255         }
256         
257         return fBytesRead;
258 }
259