Merge pull request #4539 from Matricom/amcodec
[vuplus_xbmc] / xbmc / filesystem / CurlFile.cpp
1 /*
2  *      Copyright (C) 2005-2013 Team XBMC
3  *      http://xbmc.org
4  *
5  *  This Program is free software; you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation; either version 2, or (at your option)
8  *  any later version.
9  *
10  *  This Program is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  *  GNU General Public License for more details.
14  *
15  *  You should have received a copy of the GNU General Public License
16  *  along with XBMC; see the file COPYING.  If not, see
17  *  <http://www.gnu.org/licenses/>.
18  *
19  */
20
21 #include "CurlFile.h"
22 #include "utils/URIUtils.h"
23 #include "Util.h"
24 #include "URL.h"
25 #include "settings/AdvancedSettings.h"
26 #include "settings/Settings.h"
27 #include "File.h"
28 #include "threads/SystemClock.h"
29
30 #include <vector>
31 #include <climits>
32
33 #ifdef TARGET_POSIX
34 #include <errno.h>
35 #include <inttypes.h>
36 #include "../linux/XFileUtils.h"
37 #include "../linux/XTimeUtils.h"
38 #include "../linux/ConvUtils.h"
39 #endif
40
41 #include "DllLibCurl.h"
42 #include "ShoutcastFile.h"
43 #include "SpecialProtocol.h"
44 #include "utils/CharsetConverter.h"
45 #include "utils/log.h"
46 #include "utils/StringUtils.h"
47
48 using namespace XFILE;
49 using namespace XCURL;
50
51 #define XMIN(a,b) ((a)<(b)?(a):(b))
52 #define FITS_INT(a) (((a) <= INT_MAX) && ((a) >= INT_MIN))
53
54 curl_proxytype proxyType2CUrlProxyType[] = {
55   CURLPROXY_HTTP,
56   CURLPROXY_SOCKS4,
57   CURLPROXY_SOCKS4A,
58   CURLPROXY_SOCKS5,
59   CURLPROXY_SOCKS5_HOSTNAME,
60 };
61
62 // curl calls this routine to debug
63 extern "C" int debug_callback(CURL_HANDLE *handle, curl_infotype info, char *output, size_t size, void *data)
64 {
65   if (info == CURLINFO_DATA_IN || info == CURLINFO_DATA_OUT)
66     return 0;
67
68   if ((g_advancedSettings.m_extraLogLevels & LOGCURL) == 0)
69     return 0;
70
71   CStdString strLine;
72   strLine.append(output, size);
73   std::vector<std::string> vecLines;
74   StringUtils::Tokenize(strLine, vecLines, "\r\n");
75   std::vector<std::string>::const_iterator it = vecLines.begin();
76
77   char *infotype;
78   switch(info)
79   {
80     case CURLINFO_TEXT         : infotype = (char *) "TEXT: "; break;
81     case CURLINFO_HEADER_IN    : infotype = (char *) "HEADER_IN: "; break;
82     case CURLINFO_HEADER_OUT   : infotype = (char *) "HEADER_OUT: "; break;
83     case CURLINFO_SSL_DATA_IN  : infotype = (char *) "SSL_DATA_IN: "; break;
84     case CURLINFO_SSL_DATA_OUT : infotype = (char *) "SSL_DATA_OUT: "; break;
85     case CURLINFO_END          : infotype = (char *) "END: "; break;
86     default                    : infotype = (char *) ""; break;
87   }
88
89   while (it != vecLines.end())
90   {
91     CLog::Log(LOGDEBUG, "Curl::Debug - %s%s", infotype, (*it).c_str());
92     it++;
93   }
94   return 0;
95 }
96
97 /* curl calls this routine to get more data */
98 extern "C" size_t write_callback(char *buffer,
99                size_t size,
100                size_t nitems,
101                void *userp)
102 {
103   if(userp == NULL) return 0;
104
105   CCurlFile::CReadState *state = (CCurlFile::CReadState *)userp;
106   return state->WriteCallback(buffer, size, nitems);
107 }
108
109 extern "C" size_t read_callback(char *buffer,
110                size_t size,
111                size_t nitems,
112                void *userp)
113 {
114   if(userp == NULL) return 0;
115
116   CCurlFile::CReadState *state = (CCurlFile::CReadState *)userp;
117   return state->ReadCallback(buffer, size, nitems);
118 }
119
120 extern "C" size_t header_callback(void *ptr, size_t size, size_t nmemb, void *stream)
121 {
122   CCurlFile::CReadState *state = (CCurlFile::CReadState *)stream;
123   return state->HeaderCallback(ptr, size, nmemb);
124 }
125
126 /* fix for silly behavior of realloc */
127 static inline void* realloc_simple(void *ptr, size_t size)
128 {
129   void *ptr2 = realloc(ptr, size);
130   if(ptr && !ptr2 && size > 0)
131   {
132     free(ptr);
133     return NULL;
134   }
135   else
136     return ptr2;
137 }
138
139 size_t CCurlFile::CReadState::HeaderCallback(void *ptr, size_t size, size_t nmemb)
140 {
141   std::string inString;
142   // libcurl doc says that this info is not always \0 terminated
143   const char* strBuf = (const char*)ptr;
144   const size_t iSize = size * nmemb;
145   if (strBuf[iSize - 1] == 0)
146     inString.assign(strBuf, iSize - 1); // skip last char if it's zero
147   else
148     inString.append(strBuf, iSize);
149
150   m_httpheader.Parse(inString);
151
152   return iSize;
153 }
154
155 size_t CCurlFile::CReadState::ReadCallback(char *buffer, size_t size, size_t nitems)
156 {
157   if (m_fileSize == 0)
158     return 0;
159
160   if (m_filePos >= m_fileSize)
161   {
162     m_isPaused = true;
163     return CURL_READFUNC_PAUSE;
164   }
165
166   int64_t retSize = XMIN(m_fileSize - m_filePos, int64_t(nitems * size));
167   memcpy(buffer, m_readBuffer + m_filePos, retSize);
168   m_filePos += retSize;
169
170   return retSize;
171 }
172
173 size_t CCurlFile::CReadState::WriteCallback(char *buffer, size_t size, size_t nitems)
174 {
175   unsigned int amount = size * nitems;
176 //  CLog::Log(LOGDEBUG, "CCurlFile::WriteCallback (%p) with %i bytes, readsize = %i, writesize = %i", this, amount, m_buffer.getMaxReadSize(), m_buffer.getMaxWriteSize() - m_overflowSize);
177   if (m_overflowSize)
178   {
179     // we have our overflow buffer - first get rid of as much as we can
180     unsigned int maxWriteable = XMIN((unsigned int)m_buffer.getMaxWriteSize(), m_overflowSize);
181     if (maxWriteable)
182     {
183       if (!m_buffer.WriteData(m_overflowBuffer, maxWriteable))
184         CLog::Log(LOGERROR, "CCurlFile::WriteCallback - Unable to write to buffer - what's up?");
185       if (m_overflowSize > maxWriteable)
186       { // still have some more - copy it down
187         memmove(m_overflowBuffer, m_overflowBuffer + maxWriteable, m_overflowSize - maxWriteable);
188       }
189       m_overflowSize -= maxWriteable;
190     }
191   }
192   // ok, now copy the data into our ring buffer
193   unsigned int maxWriteable = XMIN((unsigned int)m_buffer.getMaxWriteSize(), amount);
194   if (maxWriteable)
195   {
196     if (!m_buffer.WriteData(buffer, maxWriteable))
197     {
198       CLog::Log(LOGERROR, "CCurlFile::WriteCallback - Unable to write to buffer with %i bytes - what's up?", maxWriteable);
199     }
200     else
201     {
202       amount -= maxWriteable;
203       buffer += maxWriteable;
204     }
205   }
206   if (amount)
207   {
208 //    CLog::Log(LOGDEBUG, "CCurlFile::WriteCallback(%p) not enough free space for %i bytes", (void*)this,  amount);
209
210     m_overflowBuffer = (char*)realloc_simple(m_overflowBuffer, amount + m_overflowSize);
211     if(m_overflowBuffer == NULL)
212     {
213       CLog::Log(LOGWARNING, "CCurlFile::WriteCallback - Failed to grow overflow buffer from %i bytes to %i bytes", m_overflowSize, amount + m_overflowSize);
214       return 0;
215     }
216     memcpy(m_overflowBuffer + m_overflowSize, buffer, amount);
217     m_overflowSize += amount;
218   }
219   return size * nitems;
220 }
221
222 CCurlFile::CReadState::CReadState()
223 {
224   m_easyHandle = NULL;
225   m_multiHandle = NULL;
226   m_overflowBuffer = NULL;
227   m_overflowSize = 0;
228   m_filePos = 0;
229   m_fileSize = 0;
230   m_bufferSize = 0;
231   m_cancelled = false;
232   m_bFirstLoop = true;
233   m_sendRange = true;
234   m_readBuffer = 0;
235   m_isPaused = false;
236   m_curlHeaderList = NULL;
237   m_curlAliasList = NULL;
238 }
239
240 CCurlFile::CReadState::~CReadState()
241 {
242   Disconnect();
243
244   if(m_easyHandle)
245     g_curlInterface.easy_release(&m_easyHandle, &m_multiHandle);
246 }
247
248 bool CCurlFile::CReadState::Seek(int64_t pos)
249 {
250   if(pos == m_filePos)
251     return true;
252
253   if(FITS_INT(pos - m_filePos) && m_buffer.SkipBytes((int)(pos - m_filePos)))
254   {
255     m_filePos = pos;
256     return true;
257   }
258
259   if(pos > m_filePos && pos < m_filePos + m_bufferSize)
260   {
261     int len = m_buffer.getMaxReadSize();
262     m_filePos += len;
263     m_buffer.SkipBytes(len);
264     if(!FillBuffer(m_bufferSize))
265     {
266       if(!m_buffer.SkipBytes(-len))
267         CLog::Log(LOGERROR, "%s - Failed to restore position after failed fill", __FUNCTION__);
268       else
269         m_filePos -= len;
270       return false;
271     }
272
273     if(!FITS_INT(pos - m_filePos) || !m_buffer.SkipBytes((int)(pos - m_filePos)))
274     {
275       CLog::Log(LOGERROR, "%s - Failed to skip to position after having filled buffer", __FUNCTION__);
276       if(!m_buffer.SkipBytes(-len))
277         CLog::Log(LOGERROR, "%s - Failed to restore position after failed seek", __FUNCTION__);
278       else
279         m_filePos -= len;
280       return false;
281     }
282     m_filePos = pos;
283     return true;
284   }
285   return false;
286 }
287
288 void CCurlFile::CReadState::SetResume(void)
289 {
290   /*
291    * Explicitly set RANGE header when filepos=0 as some http servers require us to always send the range
292    * request header. If we don't the server may provide different content causing seeking to fail.
293    * This only affects HTTP-like items, for FTP it's a null operation.
294    */
295   if (m_sendRange && m_filePos == 0)
296     g_curlInterface.easy_setopt(m_easyHandle, CURLOPT_RANGE, "0-");
297   else
298   {
299     g_curlInterface.easy_setopt(m_easyHandle, CURLOPT_RANGE, NULL);
300     m_sendRange = false;
301   }
302
303   g_curlInterface.easy_setopt(m_easyHandle, CURLOPT_RESUME_FROM_LARGE, m_filePos);
304 }
305
306 long CCurlFile::CReadState::Connect(unsigned int size)
307 {
308   if (m_filePos != 0)
309     CLog::Log(LOGDEBUG,"CurlFile::CReadState::Connect - Resume from position %"PRId64, m_filePos);
310
311   SetResume();
312   g_curlInterface.multi_add_handle(m_multiHandle, m_easyHandle);
313
314   m_bufferSize = size;
315   m_buffer.Destroy();
316   m_buffer.Create(size * 3);
317   m_httpheader.Clear();
318
319   // read some data in to try and obtain the length
320   // maybe there's a better way to get this info??
321   m_stillRunning = 1;
322   if (!FillBuffer(1))
323   {
324     CLog::Log(LOGERROR, "CCurlFile::CReadState::Connect, didn't get any data from stream.");
325     return -1;
326   }
327
328   double length;
329   if (CURLE_OK == g_curlInterface.easy_getinfo(m_easyHandle, CURLINFO_CONTENT_LENGTH_DOWNLOAD, &length))
330   {
331     if (length < 0)
332       length = 0.0;
333     m_fileSize = m_filePos + (int64_t)length;
334   }
335
336   long response;
337   if (CURLE_OK == g_curlInterface.easy_getinfo(m_easyHandle, CURLINFO_RESPONSE_CODE, &response))
338     return response;
339
340   return -1;
341 }
342
343 void CCurlFile::CReadState::Disconnect()
344 {
345   if(m_multiHandle && m_easyHandle)
346     g_curlInterface.multi_remove_handle(m_multiHandle, m_easyHandle);
347
348   m_buffer.Clear();
349   free(m_overflowBuffer);
350   m_overflowBuffer = NULL;
351   m_overflowSize = 0;
352   m_filePos = 0;
353   m_fileSize = 0;
354   m_bufferSize = 0;
355   m_readBuffer = 0;
356
357   /* cleanup */
358   if( m_curlHeaderList )
359     g_curlInterface.slist_free_all(m_curlHeaderList);
360   m_curlHeaderList = NULL;
361
362   if( m_curlAliasList )
363     g_curlInterface.slist_free_all(m_curlAliasList);
364   m_curlAliasList = NULL;
365 }
366
367
368 CCurlFile::~CCurlFile()
369 {
370   Close();
371   delete m_state;
372   delete m_oldState;
373   g_curlInterface.Unload();
374 }
375
376 CCurlFile::CCurlFile()
377 {
378   g_curlInterface.Load(); // loads the curl dll and resolves exports etc.
379   m_opened = false;
380   m_forWrite = false;
381   m_inError = false;
382   m_multisession  = true;
383   m_seekable = true;
384   m_useOldHttpVersion = false;
385   m_connecttimeout = 0;
386   m_lowspeedtime = 0;
387   m_ftpauth = "";
388   m_ftpport = "";
389   m_ftppasvip = false;
390   m_bufferSize = 32768;
391   m_binary = true;
392   m_postdata = "";
393   m_postdataset = false;
394   m_username = "";
395   m_password = "";
396   m_httpauth = "";
397   m_cipherlist = "DEFAULT";
398   m_proxytype = PROXY_HTTP;
399   m_state = new CReadState();
400   m_oldState = NULL;
401   m_skipshout = false;
402   m_httpresponse = -1;
403   m_acceptCharset = "UTF-8,*;q=0.8"; /* prefer UTF-8 if available */
404 }
405
406 //Has to be called before Open()
407 void CCurlFile::SetBufferSize(unsigned int size)
408 {
409   m_bufferSize = size;
410 }
411
412 void CCurlFile::Close()
413 {
414   if (m_opened && m_forWrite && !m_inError)
415       Write(NULL, 0);
416
417   m_state->Disconnect();
418   delete m_oldState;
419   m_oldState = NULL;
420
421   m_url.clear();
422   m_referer.clear();
423   m_cookie.clear();
424
425   m_opened = false;
426   m_forWrite = false;
427   m_inError = false;
428 }
429
430 void CCurlFile::SetCommonOptions(CReadState* state)
431 {
432   CURL_HANDLE* h = state->m_easyHandle;
433
434   g_curlInterface.easy_reset(h);
435
436   g_curlInterface.easy_setopt(h, CURLOPT_DEBUGFUNCTION, debug_callback);
437
438   if( g_advancedSettings.m_logLevel >= LOG_LEVEL_DEBUG )
439     g_curlInterface.easy_setopt(h, CURLOPT_VERBOSE, TRUE);
440   else
441     g_curlInterface.easy_setopt(h, CURLOPT_VERBOSE, FALSE);
442
443   g_curlInterface.easy_setopt(h, CURLOPT_WRITEDATA, state);
444   g_curlInterface.easy_setopt(h, CURLOPT_WRITEFUNCTION, write_callback);
445
446   g_curlInterface.easy_setopt(h, CURLOPT_READDATA, state);
447   g_curlInterface.easy_setopt(h, CURLOPT_READFUNCTION, read_callback);
448
449   // set username and password for current handle
450   if (m_username.length() > 0 && m_password.length() > 0)
451   {
452     CStdString userpwd = m_username + ":" + m_password;
453     g_curlInterface.easy_setopt(h, CURLOPT_USERPWD, userpwd.c_str());
454   }
455
456   // make sure headers are seperated from the data stream
457   g_curlInterface.easy_setopt(h, CURLOPT_WRITEHEADER, state);
458   g_curlInterface.easy_setopt(h, CURLOPT_HEADERFUNCTION, header_callback);
459   g_curlInterface.easy_setopt(h, CURLOPT_HEADER, FALSE);
460
461   g_curlInterface.easy_setopt(h, CURLOPT_FTP_USE_EPSV, 0); // turn off epsv
462
463   // Allow us to follow two redirects
464   g_curlInterface.easy_setopt(h, CURLOPT_FOLLOWLOCATION, TRUE);
465   g_curlInterface.easy_setopt(h, CURLOPT_MAXREDIRS, 5);
466
467   // Enable cookie engine for current handle to re-use them in future requests
468   CStdString strCookieFile;
469   CStdString strTempPath = CSpecialProtocol::TranslatePath(g_advancedSettings.m_cachePath);
470   strCookieFile = URIUtils::AddFileToFolder(strTempPath, "cookies.dat");
471
472   g_curlInterface.easy_setopt(h, CURLOPT_COOKIEFILE, strCookieFile.c_str());
473   g_curlInterface.easy_setopt(h, CURLOPT_COOKIEJAR, strCookieFile.c_str());
474
475   // Set custom cookie if requested
476   if (!m_cookie.empty())
477     g_curlInterface.easy_setopt(h, CURLOPT_COOKIE, m_cookie.c_str());
478
479   g_curlInterface.easy_setopt(h, CURLOPT_COOKIELIST, "FLUSH");
480
481   // When using multiple threads you should set the CURLOPT_NOSIGNAL option to
482   // TRUE for all handles. Everything will work fine except that timeouts are not
483   // honored during the DNS lookup - which you can work around by building libcurl
484   // with c-ares support. c-ares is a library that provides asynchronous name
485   // resolves. Unfortunately, c-ares does not yet support IPv6.
486   g_curlInterface.easy_setopt(h, CURLOPT_NOSIGNAL, TRUE);
487
488   // not interested in failed requests
489   g_curlInterface.easy_setopt(h, CURLOPT_FAILONERROR, 1);
490
491   // enable support for icecast / shoutcast streams
492   if ( NULL == state->m_curlAliasList )
493     // m_curlAliasList is used only by this one place, but SetCommonOptions can
494     // be called multiple times, only append to list if it's empty.
495     state->m_curlAliasList = g_curlInterface.slist_append(state->m_curlAliasList, "ICY 200 OK");
496   g_curlInterface.easy_setopt(h, CURLOPT_HTTP200ALIASES, state->m_curlAliasList);
497
498   // never verify peer, we don't have any certificates to do this
499   g_curlInterface.easy_setopt(h, CURLOPT_SSL_VERIFYPEER, 0);
500   g_curlInterface.easy_setopt(h, CURLOPT_SSL_VERIFYHOST, 0);
501
502   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_URL, m_url.c_str());
503   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_TRANSFERTEXT, FALSE);
504
505   // setup POST data if it is set (and it may be empty)
506   if (m_postdataset)
507   {
508     g_curlInterface.easy_setopt(h, CURLOPT_POST, 1 );
509     g_curlInterface.easy_setopt(h, CURLOPT_POSTFIELDSIZE, m_postdata.length());
510     g_curlInterface.easy_setopt(h, CURLOPT_POSTFIELDS, m_postdata.c_str());
511   }
512
513   // setup Referer header if needed
514   if (!m_referer.empty())
515     g_curlInterface.easy_setopt(h, CURLOPT_REFERER, m_referer.c_str());
516   else
517   {
518     g_curlInterface.easy_setopt(h, CURLOPT_REFERER, NULL);
519     g_curlInterface.easy_setopt(h, CURLOPT_AUTOREFERER, TRUE);
520   }
521
522   // setup any requested authentication
523   if( m_ftpauth.length() > 0 )
524   {
525     g_curlInterface.easy_setopt(h, CURLOPT_FTP_SSL, CURLFTPSSL_TRY);
526     if( m_ftpauth.Equals("any") )
527       g_curlInterface.easy_setopt(h, CURLOPT_FTPSSLAUTH, CURLFTPAUTH_DEFAULT);
528     else if( m_ftpauth.Equals("ssl") )
529       g_curlInterface.easy_setopt(h, CURLOPT_FTPSSLAUTH, CURLFTPAUTH_SSL);
530     else if( m_ftpauth.Equals("tls") )
531       g_curlInterface.easy_setopt(h, CURLOPT_FTPSSLAUTH, CURLFTPAUTH_TLS);
532   }
533
534   // setup requested http authentication method
535   if(m_httpauth.length() > 0)
536   {
537     if( m_httpauth.Equals("any") )
538       g_curlInterface.easy_setopt(h, CURLOPT_HTTPAUTH, CURLAUTH_ANY);
539     else if( m_httpauth.Equals("anysafe") )
540       g_curlInterface.easy_setopt(h, CURLOPT_HTTPAUTH, CURLAUTH_ANYSAFE);
541     else if( m_httpauth.Equals("digest") )
542       g_curlInterface.easy_setopt(h, CURLOPT_HTTPAUTH, CURLAUTH_DIGEST);
543     else if( m_httpauth.Equals("ntlm") )
544       g_curlInterface.easy_setopt(h, CURLOPT_HTTPAUTH, CURLAUTH_NTLM);
545   }
546
547   // allow passive mode for ftp
548   if( m_ftpport.length() > 0 )
549     g_curlInterface.easy_setopt(h, CURLOPT_FTPPORT, m_ftpport.c_str());
550   else
551     g_curlInterface.easy_setopt(h, CURLOPT_FTPPORT, NULL);
552
553   // allow curl to not use the ip address in the returned pasv response
554   if( m_ftppasvip )
555     g_curlInterface.easy_setopt(h, CURLOPT_FTP_SKIP_PASV_IP, 0);
556   else
557     g_curlInterface.easy_setopt(h, CURLOPT_FTP_SKIP_PASV_IP, 1);
558
559   // setup Content-Encoding if requested
560   if( m_contentencoding.length() > 0 )
561     g_curlInterface.easy_setopt(h, CURLOPT_ENCODING, m_contentencoding.c_str());
562
563   if (!m_useOldHttpVersion && !m_acceptCharset.empty())
564     SetRequestHeader("Accept-Charset", m_acceptCharset);
565
566   if (m_userAgent.length() > 0)
567     g_curlInterface.easy_setopt(h, CURLOPT_USERAGENT, m_userAgent.c_str());
568   else /* set some default agent as shoutcast doesn't return proper stuff otherwise */
569     g_curlInterface.easy_setopt(h, CURLOPT_USERAGENT, g_advancedSettings.m_userAgent.c_str());
570
571   if (m_useOldHttpVersion)
572     g_curlInterface.easy_setopt(h, CURLOPT_HTTP_VERSION, CURL_HTTP_VERSION_1_0);
573
574   if (g_advancedSettings.m_curlDisableIPV6)
575     g_curlInterface.easy_setopt(h, CURLOPT_IPRESOLVE, CURL_IPRESOLVE_V4);
576
577   if (m_proxy.length() > 0)
578   {
579     g_curlInterface.easy_setopt(h, CURLOPT_PROXY, m_proxy.c_str());
580     g_curlInterface.easy_setopt(h, CURLOPT_PROXYTYPE, proxyType2CUrlProxyType[m_proxytype]);
581     if (m_proxyuserpass.length() > 0)
582       g_curlInterface.easy_setopt(h, CURLOPT_PROXYUSERPWD, m_proxyuserpass.c_str());
583
584   }
585   if (m_customrequest.length() > 0)
586     g_curlInterface.easy_setopt(h, CURLOPT_CUSTOMREQUEST, m_customrequest.c_str());
587
588   if (m_connecttimeout == 0)
589     m_connecttimeout = g_advancedSettings.m_curlconnecttimeout;
590
591   // set our timeouts, we abort connection after m_timeout, and reads after no data for m_timeout seconds
592   g_curlInterface.easy_setopt(h, CURLOPT_CONNECTTIMEOUT, m_connecttimeout);
593
594   // We abort in case we transfer less than 1byte/second
595   g_curlInterface.easy_setopt(h, CURLOPT_LOW_SPEED_LIMIT, 1);
596
597   if (m_lowspeedtime == 0)
598     m_lowspeedtime = g_advancedSettings.m_curllowspeedtime;
599
600   // Set the lowspeed time very low as it seems Curl takes much longer to detect a lowspeed condition
601   g_curlInterface.easy_setopt(h, CURLOPT_LOW_SPEED_TIME, m_lowspeedtime);
602
603   if (m_skipshout)
604     // For shoutcast file, content-length should not be set, and in libcurl there is a bug, if the
605     // cast file was 302 redirected then getinfo of CURLINFO_CONTENT_LENGTH_DOWNLOAD will return
606     // the 302 response's body length, which cause the next read request failed, so we ignore
607     // content-length for shoutcast file to workaround this.
608     g_curlInterface.easy_setopt(h, CURLOPT_IGNORE_CONTENT_LENGTH, 1);
609
610   // Setup allowed TLS/SSL ciphers. New versions of cURL may deprecate things that are still in use.
611   g_curlInterface.easy_setopt(h, CURLOPT_SSL_CIPHER_LIST, m_cipherlist.c_str());
612 }
613
614 void CCurlFile::SetRequestHeaders(CReadState* state)
615 {
616   if(state->m_curlHeaderList)
617   {
618     g_curlInterface.slist_free_all(state->m_curlHeaderList);
619     state->m_curlHeaderList = NULL;
620   }
621
622   MAPHTTPHEADERS::iterator it;
623   for(it = m_requestheaders.begin(); it != m_requestheaders.end(); it++)
624   {
625     CStdString buffer = it->first + ": " + it->second;
626     state->m_curlHeaderList = g_curlInterface.slist_append(state->m_curlHeaderList, buffer.c_str());
627   }
628
629   // add user defined headers
630   if (state->m_easyHandle)
631     g_curlInterface.easy_setopt(state->m_easyHandle, CURLOPT_HTTPHEADER, state->m_curlHeaderList);
632 }
633
634 void CCurlFile::SetCorrectHeaders(CReadState* state)
635 {
636   CHttpHeader& h = state->m_httpheader;
637   /* workaround for shoutcast server wich doesn't set content type on standard mp3 */
638   if( h.GetMimeType().empty() )
639   {
640     if( !h.GetValue("icy-notice1").empty()
641     || !h.GetValue("icy-name").empty()
642     || !h.GetValue("icy-br").empty() )
643       h.AddParam("Content-Type", "audio/mpeg");
644   }
645
646   /* hack for google video */
647   if (StringUtils::EqualsNoCase(h.GetMimeType(),"text/html")
648   &&  !h.GetValue("Content-Disposition").empty() )
649   {
650     CStdString strValue = h.GetValue("Content-Disposition");
651     if (strValue.find("filename=") != std::string::npos &&
652         strValue.find(".flv") != std::string::npos)
653       h.AddParam("Content-Type", "video/flv");
654   }
655 }
656
657 void CCurlFile::ParseAndCorrectUrl(CURL &url2)
658 {
659   CStdString strProtocol = url2.GetTranslatedProtocol();
660   url2.SetProtocol(strProtocol);
661
662   if( strProtocol.Equals("ftp")
663   ||  strProtocol.Equals("ftps") )
664   {
665     // we was using url optons for urls, keep the old code work and warning
666     if (!url2.GetOptions().empty())
667     {
668       CLog::Log(LOGWARNING, "%s: ftp url option is deprecated, please switch to use protocol option (change '?' to '|'), url: [%s]", __FUNCTION__, url2.GetRedacted().c_str());
669       url2.SetProtocolOptions(url2.GetOptions().substr(1));
670       /* ftp has no options */
671       url2.SetOptions("");
672     }
673
674     /* this is uggly, depending on from where   */
675     /* we get the link it may or may not be     */
676     /* url encoded. if handed from ftpdirectory */
677     /* it won't be so let's handle that case    */
678
679     CStdString filename(url2.GetFileName());
680     std::vector<std::string> array;
681
682     // if server sent us the filename in non-utf8, we need send back with same encoding.
683     if (url2.GetProtocolOption("utf8") == "0")
684       g_charsetConverter.utf8ToStringCharset(filename);
685
686     /* TODO: create a tokenizer that doesn't skip empty's */
687     StringUtils::Tokenize(filename, array, "/");
688     filename.clear();
689     for(std::vector<std::string>::iterator it = array.begin(); it != array.end(); it++)
690     {
691       if(it != array.begin())
692         filename += "/";
693
694       filename += CURL::Encode(*it);
695     }
696
697     /* make sure we keep slashes */
698     if(StringUtils::EndsWith(url2.GetFileName(), "/"))
699       filename += "/";
700
701     url2.SetFileName(filename);
702
703     m_ftpauth = "";
704     if (url2.HasProtocolOption("auth"))
705     {
706       m_ftpauth = url2.GetProtocolOption("auth");
707       if(m_ftpauth.empty())
708         m_ftpauth = "any";
709     }
710     m_ftpport = "";
711     if (url2.HasProtocolOption("active"))
712     {
713       m_ftpport = url2.GetProtocolOption("active");
714       if(m_ftpport.empty())
715         m_ftpport = "-";
716     }
717     m_ftppasvip = url2.HasProtocolOption("pasvip") && url2.GetProtocolOption("pasvip") != "0";
718   }
719   else if( strProtocol.Equals("http")
720        ||  strProtocol.Equals("https"))
721   {
722     if (CSettings::Get().GetBool("network.usehttpproxy")
723         && !CSettings::Get().GetString("network.httpproxyserver").empty()
724         && CSettings::Get().GetInt("network.httpproxyport") > 0
725         && m_proxy.empty())
726     {
727       m_proxy = CSettings::Get().GetString("network.httpproxyserver");
728       m_proxy += StringUtils::Format(":%d", CSettings::Get().GetInt("network.httpproxyport"));
729       if (CSettings::Get().GetString("network.httpproxyusername").length() > 0 && m_proxyuserpass.empty())
730       {
731         m_proxyuserpass = CSettings::Get().GetString("network.httpproxyusername");
732         m_proxyuserpass += ":" + CSettings::Get().GetString("network.httpproxypassword");
733       }
734       m_proxytype = (ProxyType)CSettings::Get().GetInt("network.httpproxytype");
735       CLog::Log(LOGDEBUG, "Using proxy %s, type %d", m_proxy.c_str(), proxyType2CUrlProxyType[m_proxytype]);
736     }
737
738     // get username and password
739     m_username = url2.GetUserName();
740     m_password = url2.GetPassWord();
741
742     // handle any protocol options
743     std::map<CStdString, CStdString> options;
744     url2.GetProtocolOptions(options);
745     if (options.size() > 0)
746     {
747       // clear protocol options
748       url2.SetProtocolOptions("");
749       // set xbmc headers
750       for(std::map<CStdString, CStdString>::const_iterator it = options.begin(); it != options.end(); ++it)
751       {
752         const CStdString &name = it->first;
753         const CStdString &value = it->second;
754
755         if(name.Equals("auth"))
756         {
757           m_httpauth = value;
758           if(m_httpauth.empty())
759             m_httpauth = "any";
760         }
761         else if (name.Equals("Referer"))
762           SetReferer(value);
763         else if (name.Equals("User-Agent"))
764           SetUserAgent(value);
765         else if (name.Equals("Cookie"))
766           SetCookie(value);
767         else if (name.Equals("Encoding"))
768           SetContentEncoding(value);
769         else if (name.Equals("noshout") && value.Equals("true"))
770           m_skipshout = true;
771         else if (name.Equals("seekable") && value.Equals("0"))
772           m_seekable = false;
773         else if (name.Equals("Accept-Charset"))
774           SetAcceptCharset(value);
775         else if (name.Equals("HttpProxy"))
776           SetStreamProxy(value, PROXY_HTTP);
777         else if (name.Equals("SSLCipherList"))
778           m_cipherlist = value;
779         else
780           SetRequestHeader(name, value);
781       }
782     }
783   }
784
785   if (m_username.length() > 0 && m_password.length() > 0)
786     m_url = url2.GetWithoutUserDetails();
787   else
788     m_url = url2.Get();
789 }
790
791 void CCurlFile::SetStreamProxy(const CStdString &proxy, ProxyType type)
792 {
793   CURL url(proxy);
794   m_proxy = url.GetWithoutUserDetails();
795   m_proxyuserpass = url.GetUserName();
796   if (!url.GetPassWord().empty())
797     m_proxyuserpass += ":" + url.GetPassWord();
798   m_proxytype = type;
799   CLog::Log(LOGDEBUG, "Overriding proxy from URL parameter: %s, type %d", m_proxy.c_str(), proxyType2CUrlProxyType[m_proxytype]);
800 }
801
802 bool CCurlFile::Post(const CStdString& strURL, const CStdString& strPostData, CStdString& strHTML)
803 {
804   m_postdata = strPostData;
805   m_postdataset = true;
806   return Service(strURL, strHTML);
807 }
808
809 bool CCurlFile::Get(const CStdString& strURL, CStdString& strHTML)
810 {
811   m_postdata = "";
812   m_postdataset = false;
813   return Service(strURL, strHTML);
814 }
815
816 bool CCurlFile::Service(const CStdString& strURL, CStdString& strHTML)
817 {
818   if (Open(strURL))
819   {
820     if (ReadData(strHTML))
821     {
822       Close();
823       return true;
824     }
825   }
826   Close();
827   return false;
828 }
829
830 bool CCurlFile::ReadData(CStdString& strHTML)
831 {
832   int size_read = 0;
833   int data_size = 0;
834   strHTML = "";
835   char buffer[16384];
836   while( (size_read = Read(buffer, sizeof(buffer)-1) ) > 0 )
837   {
838     buffer[size_read] = 0;
839     strHTML.append(buffer, size_read);
840     data_size += size_read;
841   }
842   if (m_state->m_cancelled)
843     return false;
844   return true;
845 }
846
847 bool CCurlFile::Download(const CStdString& strURL, const CStdString& strFileName, LPDWORD pdwSize)
848 {
849   CLog::Log(LOGINFO, "CCurlFile::Download - %s->%s", strURL.c_str(), strFileName.c_str());
850
851   CStdString strData;
852   if (!Get(strURL, strData))
853     return false;
854
855   XFILE::CFile file;
856   if (!file.OpenForWrite(strFileName, true))
857   {
858     CLog::Log(LOGERROR, "CCurlFile::Download - Unable to open file %s: %u",
859     strFileName.c_str(), GetLastError());
860     return false;
861   }
862   if (strData.size())
863     file.Write(strData.c_str(), strData.size());
864   file.Close();
865
866   if (pdwSize != NULL)
867   {
868     *pdwSize = strData.size();
869   }
870
871   return true;
872 }
873
874 // Detect whether we are "online" or not! Very simple and dirty!
875 bool CCurlFile::IsInternet()
876 {
877   CStdString strURL = "http://www.google.com";
878   bool found = Exists(strURL);
879   Close();
880
881   return found;
882 }
883
884 void CCurlFile::Cancel()
885 {
886   m_state->m_cancelled = true;
887   while (m_opened)
888     Sleep(1);
889 }
890
891 void CCurlFile::Reset()
892 {
893   m_state->m_cancelled = false;
894 }
895
896 bool CCurlFile::Open(const CURL& url)
897 {
898   m_opened = true;
899   m_seekable = true;
900
901   CURL url2(url);
902   ParseAndCorrectUrl(url2);
903
904   std::string redactPath = CURL::GetRedacted(m_url);
905   CLog::Log(LOGDEBUG, "CurlFile::Open(%p) %s", (void*)this, redactPath.c_str());
906
907   ASSERT(!(!m_state->m_easyHandle ^ !m_state->m_multiHandle));
908   if( m_state->m_easyHandle == NULL )
909     g_curlInterface.easy_aquire(url2.GetProtocol(), url2.GetHostName(), &m_state->m_easyHandle, &m_state->m_multiHandle );
910
911   // setup common curl options
912   SetCommonOptions(m_state);
913   SetRequestHeaders(m_state);
914   m_state->m_sendRange = m_seekable;
915
916   m_httpresponse = m_state->Connect(m_bufferSize);
917   if( m_httpresponse < 0 || m_httpresponse >= 400)
918     return false;
919
920   SetCorrectHeaders(m_state);
921
922   // since we can't know the stream size up front if we're gzipped/deflated
923   // flag the stream with an unknown file size rather than the compressed
924   // file size.
925   if (m_contentencoding.size() > 0)
926     m_state->m_fileSize = 0;
927
928   // check if this stream is a shoutcast stream. sometimes checking the protocol line is not enough so examine other headers as well.
929   // shoutcast streams should be handled by FileShoutcast.
930   if ((m_state->m_httpheader.GetProtoLine().substr(0, 3) == "ICY" || !m_state->m_httpheader.GetValue("icy-notice1").empty()
931      || !m_state->m_httpheader.GetValue("icy-name").empty()
932      || !m_state->m_httpheader.GetValue("icy-br").empty()) && !m_skipshout)
933   {
934     CLog::Log(LOGDEBUG,"CCurlFile::Open - File <%s> is a shoutcast stream. Re-opening", redactPath.c_str());
935     throw new CRedirectException(new CShoutcastFile);
936   }
937
938   m_multisession = false;
939   if(url2.GetProtocol().Equals("http") || url2.GetProtocol().Equals("https"))
940   {
941     m_multisession = true;
942     if(m_state->m_httpheader.GetValue("Server").find("Portable SDK for UPnP devices") != std::string::npos)
943     {
944       CLog::Log(LOGWARNING, "CCurlFile::Open - Disabling multi session due to broken libupnp server");
945       m_multisession = false;
946     }
947   }
948
949   if(StringUtils::EqualsNoCase(m_state->m_httpheader.GetValue("Transfer-Encoding"), "chunked"))
950     m_state->m_fileSize = 0;
951
952   if(m_state->m_fileSize <= 0)
953     m_seekable = false;
954   if (m_seekable)
955   {
956     if(url2.GetProtocol().Equals("http")
957     || url2.GetProtocol().Equals("https"))
958     {
959       // if server says explicitly it can't seek, respect that
960       if(StringUtils::EqualsNoCase(m_state->m_httpheader.GetValue("Accept-Ranges"),"none"))
961         m_seekable = false;
962     }
963   }
964
965   char* efurl;
966   if (CURLE_OK == g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_EFFECTIVE_URL,&efurl) && efurl)
967     m_url = efurl;
968
969   return true;
970 }
971
972 bool CCurlFile::OpenForWrite(const CURL& url, bool bOverWrite)
973 {
974   if(m_opened)
975     return false;
976
977   if (Exists(url) && !bOverWrite)
978     return false;
979
980   CURL url2(url);
981   ParseAndCorrectUrl(url2);
982
983   CLog::Log(LOGDEBUG, "CCurlFile::OpenForWrite(%p) %s", (void*)this, CURL::GetRedacted(m_url).c_str());
984
985   ASSERT(m_state->m_easyHandle == NULL);
986   g_curlInterface.easy_aquire(url2.GetProtocol(), url2.GetHostName(), &m_state->m_easyHandle, &m_state->m_multiHandle);
987
988     // setup common curl options
989   SetCommonOptions(m_state);
990   SetRequestHeaders(m_state);
991
992   char* efurl;
993   if (CURLE_OK == g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_EFFECTIVE_URL,&efurl) && efurl)
994     m_url = efurl;
995
996   m_opened = true;
997   m_forWrite = true;
998   m_inError = false;
999   m_writeOffset = 0;
1000
1001   ASSERT(m_state->m_multiHandle);
1002
1003   SetCommonOptions(m_state); 
1004   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_UPLOAD, 1);
1005
1006   g_curlInterface.multi_add_handle(m_state->m_multiHandle, m_state->m_easyHandle);
1007
1008   m_state->SetReadBuffer(NULL, 0);
1009
1010   return true;
1011 }
1012
1013 int CCurlFile::Write(const void* lpBuf, int64_t uiBufSize)
1014 {
1015   if (!(m_opened && m_forWrite) || m_inError)
1016     return -1;
1017
1018   ASSERT(m_state->m_multiHandle);
1019
1020   m_state->SetReadBuffer(lpBuf, uiBufSize);
1021   m_state->m_isPaused = false;
1022   g_curlInterface.easy_pause(m_state->m_easyHandle, CURLPAUSE_CONT);
1023
1024   CURLMcode result = CURLM_OK;
1025
1026   m_stillRunning = 1;
1027   while (m_stillRunning && !m_state->m_isPaused)
1028   {
1029     while ((result = g_curlInterface.multi_perform(m_state->m_multiHandle, &m_stillRunning)) == CURLM_CALL_MULTI_PERFORM);
1030
1031     if (!m_stillRunning)
1032       break;
1033
1034     if (result != CURLM_OK)
1035     {
1036       long code;
1037       if(g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_RESPONSE_CODE, &code) == CURLE_OK )
1038         CLog::Log(LOGERROR, "%s - Unable to write curl resource (%s) - %ld", __FUNCTION__, CURL::GetRedacted(m_url).c_str(), code);
1039       m_inError = true;
1040       return -1;
1041     }
1042   }
1043
1044   m_writeOffset += m_state->m_filePos;
1045   return m_state->m_filePos;
1046 }
1047
1048 bool CCurlFile::CReadState::ReadString(char *szLine, int iLineLength)
1049 {
1050   unsigned int want = (unsigned int)iLineLength;
1051
1052   if((m_fileSize == 0 || m_filePos < m_fileSize) && !FillBuffer(want))
1053     return false;
1054
1055   // ensure only available data is considered
1056   want = XMIN((unsigned int)m_buffer.getMaxReadSize(), want);
1057
1058   /* check if we finished prematurely */
1059   if (!m_stillRunning && (m_fileSize == 0 || m_filePos != m_fileSize) && !want)
1060   {
1061     if (m_fileSize != 0)
1062       CLog::Log(LOGWARNING, "%s - Transfer ended before entire file was retrieved pos %"PRId64", size %"PRId64, __FUNCTION__, m_filePos, m_fileSize);
1063
1064     return false;
1065   }
1066
1067   char* pLine = szLine;
1068   do
1069   {
1070     if (!m_buffer.ReadData(pLine, 1))
1071       break;
1072
1073     pLine++;
1074   } while (((pLine - 1)[0] != '\n') && ((unsigned int)(pLine - szLine) < want));
1075   pLine[0] = 0;
1076   m_filePos += (pLine - szLine);
1077   return (bool)((pLine - szLine) > 0);
1078 }
1079
1080 bool CCurlFile::Exists(const CURL& url)
1081 {
1082   // if file is already running, get info from it
1083   if( m_opened )
1084   {
1085     CLog::Log(LOGWARNING, "CCurlFile::Exists - Exist called on open file %s", url.GetRedacted().c_str());
1086     return true;
1087   }
1088
1089   CURL url2(url);
1090   ParseAndCorrectUrl(url2);
1091
1092   ASSERT(m_state->m_easyHandle == NULL);
1093   g_curlInterface.easy_aquire(url2.GetProtocol(), url2.GetHostName(), &m_state->m_easyHandle, NULL);
1094
1095   SetCommonOptions(m_state);
1096   SetRequestHeaders(m_state);
1097   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_TIMEOUT, 5);
1098   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_NOBODY, 1);
1099   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_WRITEDATA, NULL); /* will cause write failure*/
1100
1101   if(url2.GetProtocol() == "ftp")
1102   {
1103     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FILETIME, 1);
1104     // nocwd is less standard, will return empty list for non-existed remote dir on some ftp server, avoid it.
1105     if (StringUtils::EndsWith(url2.GetFileName(), "/"))
1106       g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FTP_FILEMETHOD, CURLFTPMETHOD_SINGLECWD);
1107     else
1108       g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FTP_FILEMETHOD, CURLFTPMETHOD_NOCWD);
1109   }
1110
1111   CURLcode result = g_curlInterface.easy_perform(m_state->m_easyHandle);
1112   g_curlInterface.easy_release(&m_state->m_easyHandle, NULL);
1113
1114   if (result == CURLE_WRITE_ERROR || result == CURLE_OK)
1115     return true;
1116
1117   if (result == CURLE_HTTP_RETURNED_ERROR)
1118   {
1119     long code;
1120     if(g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_RESPONSE_CODE, &code) == CURLE_OK && code != 404 )
1121       CLog::Log(LOGERROR, "CCurlFile::Exists - Failed: HTTP returned error %ld for %s", code, url.GetRedacted().c_str());
1122   }
1123   else if (result != CURLE_REMOTE_FILE_NOT_FOUND && result != CURLE_FTP_COULDNT_RETR_FILE)
1124   {
1125     CLog::Log(LOGERROR, "CCurlFile::Exists - Failed: %s(%d) for %s", g_curlInterface.easy_strerror(result), result, url.GetRedacted().c_str());
1126   }
1127
1128   errno = ENOENT;
1129   return false;
1130 }
1131
1132 int64_t CCurlFile::Seek(int64_t iFilePosition, int iWhence)
1133 {
1134   int64_t nextPos = m_state->m_filePos;
1135   
1136   if(!m_seekable)
1137     return -1;
1138
1139   switch(iWhence)
1140   {
1141     case SEEK_SET:
1142       nextPos = iFilePosition;
1143       break;
1144     case SEEK_CUR:
1145       nextPos += iFilePosition;
1146       break;
1147     case SEEK_END:
1148       if (m_state->m_fileSize)
1149         nextPos = m_state->m_fileSize + iFilePosition;
1150       else
1151         return -1;
1152       break;
1153     default:
1154       return -1;
1155   }
1156
1157   // We can't seek beyond EOF
1158   if (m_state->m_fileSize && nextPos > m_state->m_fileSize) return -1;
1159
1160   if(m_state->Seek(nextPos))
1161     return nextPos;
1162
1163   if (m_multisession)
1164   {
1165     if (!m_oldState)
1166     {
1167       CURL url(m_url);
1168       m_oldState          = m_state;
1169       m_state             = new CReadState();
1170       m_state->m_fileSize = m_oldState->m_fileSize;
1171       g_curlInterface.easy_aquire(url.GetProtocol(),
1172                                   url.GetHostName(),
1173                                   &m_state->m_easyHandle,
1174                                   &m_state->m_multiHandle );
1175     }
1176     else
1177     {
1178       CReadState *tmp;
1179       tmp         = m_state;
1180       m_state     = m_oldState;
1181       m_oldState  = tmp;
1182
1183       if (m_state->Seek(nextPos))
1184         return nextPos;
1185       
1186       m_state->Disconnect();
1187     }
1188   }
1189   else
1190     m_state->Disconnect();
1191
1192   // re-setup common curl options
1193   SetCommonOptions(m_state);
1194
1195   /* caller might have changed some headers (needed for daap)*/
1196   SetRequestHeaders(m_state);
1197
1198   m_state->m_filePos = nextPos;
1199   m_state->m_sendRange = true;
1200
1201   long response = m_state->Connect(m_bufferSize);
1202   if(response < 0 && (m_state->m_fileSize == 0 || m_state->m_fileSize != m_state->m_filePos))
1203   {
1204     if(m_multisession)
1205     {
1206       if (m_oldState)
1207       {
1208         delete m_state;
1209         m_state     = m_oldState;
1210         m_oldState  = NULL;
1211       }
1212       // Retry without mutlisession
1213       m_multisession = false;
1214       return Seek(iFilePosition, iWhence);
1215     }
1216     else
1217     {
1218       m_seekable = false;
1219       return -1;
1220     } 
1221   }
1222
1223   SetCorrectHeaders(m_state);
1224
1225   return m_state->m_filePos;
1226 }
1227
1228 int64_t CCurlFile::GetLength()
1229 {
1230   if (!m_opened) return 0;
1231   return m_state->m_fileSize;
1232 }
1233
1234 int64_t CCurlFile::GetPosition()
1235 {
1236   if (!m_opened) return 0;
1237   return m_state->m_filePos;
1238 }
1239
1240 int CCurlFile::Stat(const CURL& url, struct __stat64* buffer)
1241 {
1242   // if file is already running, get info from it
1243   if( m_opened )
1244   {
1245     CLog::Log(LOGWARNING, "CCurlFile::Stat - Stat called on open file %s", url.GetRedacted().c_str());
1246     if (buffer)
1247     {
1248       memset(buffer, 0, sizeof(struct __stat64));
1249       buffer->st_size = GetLength();
1250       buffer->st_mode = _S_IFREG;
1251     }
1252     return 0;
1253   }
1254
1255   CURL url2(url);
1256   ParseAndCorrectUrl(url2);
1257
1258   ASSERT(m_state->m_easyHandle == NULL);
1259   g_curlInterface.easy_aquire(url2.GetProtocol(), url2.GetHostName(), &m_state->m_easyHandle, NULL);
1260
1261   SetCommonOptions(m_state);
1262   SetRequestHeaders(m_state);
1263   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_TIMEOUT, g_advancedSettings.m_curlconnecttimeout);
1264   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_NOBODY, 1);
1265   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_WRITEDATA, NULL); /* will cause write failure*/
1266   g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FILETIME , 1); 
1267
1268   if(url2.GetProtocol() == "ftp")
1269   {
1270     // nocwd is less standard, will return empty list for non-existed remote dir on some ftp server, avoid it.
1271     if (StringUtils::EndsWith(url2.GetFileName(), "/"))
1272       g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FTP_FILEMETHOD, CURLFTPMETHOD_SINGLECWD);
1273     else
1274       g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FTP_FILEMETHOD, CURLFTPMETHOD_NOCWD);
1275   }
1276
1277   CURLcode result = g_curlInterface.easy_perform(m_state->m_easyHandle);
1278
1279   if(result == CURLE_HTTP_RETURNED_ERROR)
1280   {
1281     long code;
1282     if(g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_RESPONSE_CODE, &code) == CURLE_OK && code == 404 )
1283       return -1;
1284   }
1285
1286   if(result == CURLE_GOT_NOTHING 
1287   || result == CURLE_HTTP_RETURNED_ERROR 
1288   || result == CURLE_RECV_ERROR /* some silly shoutcast servers */ )
1289   {
1290     /* some http servers and shoutcast servers don't give us any data on a head request */
1291     /* request normal and just fail out, it's their loss */
1292     /* somehow curl doesn't reset CURLOPT_NOBODY properly so reset everything */
1293     SetCommonOptions(m_state);
1294     SetRequestHeaders(m_state);
1295     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_TIMEOUT, g_advancedSettings.m_curlconnecttimeout);
1296     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_RANGE, "0-0");
1297     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_WRITEDATA, NULL); /* will cause write failure*/
1298     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_FILETIME, 1); 
1299     result = g_curlInterface.easy_perform(m_state->m_easyHandle);
1300   }
1301
1302   if( result == CURLE_HTTP_RANGE_ERROR )
1303   {
1304     /* crap can't use the range option, disable it and try again */
1305     g_curlInterface.easy_setopt(m_state->m_easyHandle, CURLOPT_RANGE, NULL);
1306     result = g_curlInterface.easy_perform(m_state->m_easyHandle);
1307   }
1308
1309   if( result != CURLE_WRITE_ERROR && result != CURLE_OK )
1310   {
1311     g_curlInterface.easy_release(&m_state->m_easyHandle, NULL);
1312     errno = ENOENT;
1313     CLog::Log(LOGERROR, "CCurlFile::Stat - Failed: %s(%d) for %s", g_curlInterface.easy_strerror(result), result, url.GetRedacted().c_str());
1314     return -1;
1315   }
1316
1317   double length;
1318   result = g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_CONTENT_LENGTH_DOWNLOAD, &length);
1319   if (result != CURLE_OK || length < 0.0)
1320   {
1321     if (url.GetProtocol() == "ftp")
1322     {
1323       g_curlInterface.easy_release(&m_state->m_easyHandle, NULL);
1324       CLog::Log(LOGNOTICE, "CCurlFile::Stat - Content length failed: %s(%d) for %s", g_curlInterface.easy_strerror(result), result, url.GetRedacted().c_str());
1325       errno = ENOENT;
1326       return -1;
1327     }
1328     else
1329       length = 0.0;
1330   }
1331
1332   SetCorrectHeaders(m_state);
1333
1334   if(buffer)
1335   {
1336     char *content;
1337     result = g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_CONTENT_TYPE, &content);
1338     if (result != CURLE_OK)
1339     {
1340       CLog::Log(LOGNOTICE, "CCurlFile::Stat - Content type failed: %s(%d) for %s", g_curlInterface.easy_strerror(result), result, url.GetRedacted().c_str());
1341       g_curlInterface.easy_release(&m_state->m_easyHandle, NULL);
1342       errno = ENOENT;
1343       return -1;
1344     }
1345     else
1346     {
1347       memset(buffer, 0, sizeof(struct __stat64));
1348       buffer->st_size = (int64_t)length;
1349       if(content && strstr(content, "text/html")) //consider html files directories
1350         buffer->st_mode = _S_IFDIR;
1351       else
1352         buffer->st_mode = _S_IFREG;
1353     }
1354     long filetime;
1355     result = g_curlInterface.easy_getinfo(m_state->m_easyHandle, CURLINFO_FILETIME, &filetime);
1356     if (result != CURLE_OK)
1357     {
1358       CLog::Log(LOGNOTICE, "CCurlFile::Stat - Filetime failed: %s(%d) for %s", g_curlInterface.easy_strerror(result), result, url.GetRedacted().c_str());
1359     }
1360     else
1361     {
1362       if (filetime != -1)
1363         buffer->st_mtime = filetime;
1364     }
1365   }
1366   g_curlInterface.easy_release(&m_state->m_easyHandle, NULL);
1367   return 0;
1368 }
1369
1370 unsigned int CCurlFile::CReadState::Read(void* lpBuf, int64_t uiBufSize)
1371 {
1372   /* only request 1 byte, for truncated reads (only if not eof) */
1373   if((m_fileSize == 0 || m_filePos < m_fileSize) && !FillBuffer(1))
1374     return 0;
1375
1376   /* ensure only available data is considered */
1377   unsigned int want = (unsigned int)XMIN(m_buffer.getMaxReadSize(), uiBufSize);
1378
1379   /* xfer data to caller */
1380   if (m_buffer.ReadData((char *)lpBuf, want))
1381   {
1382     m_filePos += want;
1383     return want;
1384   }
1385
1386   /* check if we finished prematurely */
1387   if (!m_stillRunning && (m_fileSize == 0 || m_filePos != m_fileSize))
1388   {
1389     CLog::Log(LOGWARNING, "%s - Transfer ended before entire file was retrieved pos %"PRId64", size %"PRId64, __FUNCTION__, m_filePos, m_fileSize);
1390     return 0;
1391   }
1392
1393   return 0;
1394 }
1395
1396 /* use to attempt to fill the read buffer up to requested number of bytes */
1397 bool CCurlFile::CReadState::FillBuffer(unsigned int want)
1398 {
1399   int retry = 0;
1400   fd_set fdread;
1401   fd_set fdwrite;
1402   fd_set fdexcep;
1403
1404   // only attempt to fill buffer if transactions still running and buffer
1405   // doesnt exceed required size already
1406   while ((unsigned int)m_buffer.getMaxReadSize() < want && m_buffer.getMaxWriteSize() > 0 )
1407   {
1408     if (m_cancelled)
1409       return false;
1410
1411     /* if there is data in overflow buffer, try to use that first */
1412     if (m_overflowSize)
1413     {
1414       unsigned amount = XMIN((unsigned int)m_buffer.getMaxWriteSize(), m_overflowSize);
1415       m_buffer.WriteData(m_overflowBuffer, amount);
1416
1417       if (amount < m_overflowSize)
1418         memcpy(m_overflowBuffer, m_overflowBuffer+amount,m_overflowSize-amount);
1419
1420       m_overflowSize -= amount;
1421       m_overflowBuffer = (char*)realloc_simple(m_overflowBuffer, m_overflowSize);
1422       continue;
1423     }
1424
1425     CURLMcode result = g_curlInterface.multi_perform(m_multiHandle, &m_stillRunning);
1426     if (!m_stillRunning)
1427     {
1428       if (result == CURLM_OK)
1429       {
1430         /* if we still have stuff in buffer, we are fine */
1431         if (m_buffer.getMaxReadSize())
1432           return true;
1433
1434         /* verify that we are actually okey */
1435         int msgs;
1436         CURLcode CURLresult = CURLE_OK;
1437         CURLMsg* msg;
1438         while ((msg = g_curlInterface.multi_info_read(m_multiHandle, &msgs)))
1439         {
1440           if (msg->msg == CURLMSG_DONE)
1441           {
1442             if (msg->data.result == CURLE_OK)
1443               return true;
1444
1445             CLog::Log(LOGERROR, "CCurlFile::FillBuffer - Failed: %s(%d)", g_curlInterface.easy_strerror(msg->data.result), msg->data.result);
1446
1447             // We need to check the result here as we don't want to retry on every error
1448             if ( (msg->data.result == CURLE_OPERATION_TIMEDOUT ||
1449                   msg->data.result == CURLE_PARTIAL_FILE       ||
1450                   msg->data.result == CURLE_COULDNT_CONNECT    ||
1451                   msg->data.result == CURLE_RECV_ERROR)        &&
1452                   !m_bFirstLoop)
1453               CURLresult = msg->data.result;
1454             else if ( (msg->data.result == CURLE_HTTP_RANGE_ERROR     ||
1455                        msg->data.result == CURLE_HTTP_RETURNED_ERROR) &&
1456                        m_bFirstLoop                                   &&
1457                        m_filePos == 0                                 &&
1458                        m_sendRange)
1459             {
1460               // If server returns a range or http error, retry with range disabled
1461               CURLresult = msg->data.result;
1462               m_sendRange = false;
1463             }
1464             else
1465               return false;
1466           }
1467         }
1468
1469         // Don't retry when we didn't "see" any error
1470         if (CURLresult == CURLE_OK)
1471           return false;
1472
1473         // Close handle
1474         if (m_multiHandle && m_easyHandle)
1475           g_curlInterface.multi_remove_handle(m_multiHandle, m_easyHandle);
1476
1477         // Reset all the stuff like we would in Disconnect()
1478         m_buffer.Clear();
1479         free(m_overflowBuffer);
1480         m_overflowBuffer = NULL;
1481         m_overflowSize = 0;
1482
1483         // If we got here something is wrong
1484         if (++retry > g_advancedSettings.m_curlretries)
1485         {
1486           CLog::Log(LOGERROR, "CCurlFile::FillBuffer - Reconnect failed!");
1487           // Reset the rest of the variables like we would in Disconnect()
1488           m_filePos = 0;
1489           m_fileSize = 0;
1490           m_bufferSize = 0;
1491
1492           return false;
1493         }
1494
1495         CLog::Log(LOGNOTICE, "CCurlFile::FillBuffer - Reconnect, (re)try %i", retry);
1496
1497         // Connect + seek to current position (again)
1498         SetResume();
1499         g_curlInterface.multi_add_handle(m_multiHandle, m_easyHandle);
1500
1501         // Return to the beginning of the loop:
1502         continue;
1503       }
1504       return false;
1505     }
1506
1507     // We've finished out first loop
1508     if(m_bFirstLoop && m_buffer.getMaxReadSize() > 0)
1509       m_bFirstLoop = false;
1510
1511     switch (result)
1512     {
1513       case CURLM_OK:
1514       {
1515         int maxfd = -1;
1516         FD_ZERO(&fdread);
1517         FD_ZERO(&fdwrite);
1518         FD_ZERO(&fdexcep);
1519
1520         // get file descriptors from the transfers
1521         g_curlInterface.multi_fdset(m_multiHandle, &fdread, &fdwrite, &fdexcep, &maxfd);
1522
1523         long timeout = 0;
1524         if (CURLM_OK != g_curlInterface.multi_timeout(m_multiHandle, &timeout) || timeout == -1)
1525           timeout = 200;
1526
1527         XbmcThreads::EndTime endTime(timeout);
1528         int rc;
1529
1530         do
1531         {
1532           unsigned int time_left = endTime.MillisLeft();
1533           struct timeval t = { time_left / 1000, (time_left % 1000) * 1000 };
1534
1535           // Wait until data is available or a timeout occurs.
1536           rc = select(maxfd + 1, &fdread, &fdwrite, &fdexcep, &t);
1537 #ifdef TARGET_WINDOWS
1538         } while(rc == SOCKET_ERROR && WSAGetLastError() == WSAEINTR);
1539 #else
1540         } while(rc == SOCKET_ERROR && errno == EINTR);
1541 #endif
1542
1543         if(rc == SOCKET_ERROR)
1544         {
1545 #ifdef TARGET_WINDOWS
1546           char buf[256];
1547           strerror_s(buf, 256, WSAGetLastError());
1548           CLog::Log(LOGERROR, "CCurlFile::FillBuffer - Failed with socket error:%s", buf);
1549 #else
1550           char const * str = strerror(errno);
1551           CLog::Log(LOGERROR, "CCurlFile::FillBuffer - Failed with socket error:%s", str);
1552 #endif
1553
1554           return false;
1555         }
1556       }
1557       break;
1558       case CURLM_CALL_MULTI_PERFORM:
1559       {
1560         // we don't keep calling here as that can easily overwrite our buffer which we want to avoid
1561         // docs says we should call it soon after, but aslong as we are reading data somewhere
1562         // this aught to be soon enough. should stay in socket otherwise
1563         continue;
1564       }
1565       break;
1566       default:
1567       {
1568         CLog::Log(LOGERROR, "CCurlFile::FillBuffer - Multi perform failed with code %d, aborting", result);
1569         return false;
1570       }
1571       break;
1572     }
1573   }
1574   return true;
1575 }
1576
1577 void CCurlFile::CReadState::SetReadBuffer(const void* lpBuf, int64_t uiBufSize)
1578 {
1579   m_readBuffer = (char*)lpBuf;
1580   m_fileSize = uiBufSize;
1581   m_filePos = 0;
1582 }
1583
1584 void CCurlFile::ClearRequestHeaders()
1585 {
1586   m_requestheaders.clear();
1587 }
1588
1589 void CCurlFile::SetRequestHeader(CStdString header, CStdString value)
1590 {
1591   m_requestheaders[header] = value;
1592 }
1593
1594 void CCurlFile::SetRequestHeader(CStdString header, long value)
1595 {
1596   m_requestheaders[header] = StringUtils::Format("%ld", value);
1597 }
1598
1599 std::string CCurlFile::GetServerReportedCharset(void)
1600 {
1601   if (!m_state)
1602     return "";
1603
1604   return m_state->m_httpheader.GetCharset();
1605 }
1606
1607 /* STATIC FUNCTIONS */
1608 bool CCurlFile::GetHttpHeader(const CURL &url, CHttpHeader &headers)
1609 {
1610   try
1611   {
1612     CCurlFile file;
1613     if(file.Stat(url, NULL) == 0)
1614     {
1615       headers = file.GetHttpHeader();
1616       return true;
1617     }
1618     return false;
1619   }
1620   catch(...)
1621   {
1622     CLog::Log(LOGERROR, "%s - Exception thrown while trying to retrieve header url: %s", __FUNCTION__, url.GetRedacted().c_str());
1623     return false;
1624   }
1625 }
1626
1627 bool CCurlFile::GetMimeType(const CURL &url, CStdString &content, CStdString useragent)
1628 {
1629   CCurlFile file;
1630   if (!useragent.empty())
1631     file.SetUserAgent(useragent);
1632
1633   struct __stat64 buffer;
1634   std::string redactUrl = url.GetRedacted();
1635   if( file.Stat(url, &buffer) == 0 )
1636   {
1637     if (buffer.st_mode == _S_IFDIR)
1638       content = "x-directory/normal";
1639     else
1640       content = file.GetMimeType();
1641     CLog::Log(LOGDEBUG, "CCurlFile::GetMimeType - %s -> %s", redactUrl.c_str(), content.c_str());
1642     return true;
1643   }
1644   CLog::Log(LOGDEBUG, "CCurlFile::GetMimeType - %s -> failed", redactUrl.c_str());
1645   content = "";
1646   return false;
1647 }
1648
1649 bool CCurlFile::GetCookies(const CURL &url, std::string &cookies)
1650 {
1651   std::string cookiesStr;
1652   struct curl_slist*     curlCookies;
1653   XCURL::CURL_HANDLE*    easyHandle;
1654   XCURL::CURLM*          multiHandle;
1655
1656   // get the cookies list
1657   g_curlInterface.easy_aquire(url.GetProtocol(), url.GetHostName(), &easyHandle, &multiHandle);
1658   if (CURLE_OK == g_curlInterface.easy_getinfo(easyHandle, CURLINFO_COOKIELIST, &curlCookies))
1659   {
1660     // iterate over each cookie and format it into an RFC 2109 formatted Set-Cookie string
1661     struct curl_slist* curlCookieIter = curlCookies;
1662     while(curlCookieIter)
1663     {
1664       // tokenize the CURL cookie string
1665       std::vector<std::string> valuesVec;
1666       StringUtils::Tokenize(curlCookieIter->data, valuesVec, "\t");
1667
1668       // ensure the length is valid
1669       if (valuesVec.size() < 7)
1670       {
1671         CLog::Log(LOGERROR, "CCurlFile::GetCookies - invalid cookie: '%s'", curlCookieIter->data);
1672         curlCookieIter = curlCookieIter->next;
1673         continue;
1674       }
1675
1676       // create a http-header formatted cookie string
1677       std::string cookieStr = valuesVec[5] + "=" + valuesVec[6] +
1678                               "; path=" + valuesVec[2] +
1679                               "; domain=" + valuesVec[0];
1680
1681       // append this cookie to the string containing all cookies
1682       if (!cookiesStr.empty())
1683         cookiesStr += "\n";
1684       cookiesStr += cookieStr;
1685
1686       // move on to the next cookie
1687       curlCookieIter = curlCookieIter->next;
1688     }
1689
1690     // free the curl cookies
1691     g_curlInterface.slist_free_all(curlCookies);
1692
1693     // release our handles
1694     g_curlInterface.easy_release(&easyHandle, &multiHandle);
1695
1696     // if we have a non-empty cookie string, return it
1697     if (!cookiesStr.empty())
1698     {
1699       cookies = cookiesStr;
1700       return true;
1701     }
1702   }
1703
1704   // no cookies to return
1705   return false;
1706 }
1707
1708 int CCurlFile::IoControl(EIoControl request, void* param)
1709 {
1710   if(request == IOCTRL_SEEK_POSSIBLE)
1711     return m_seekable ? 1 : 0;
1712
1713   return -1;
1714 }