1 /***************************************************************************
3 * Project ___| | | | _ \| |
5 * | (__| |_| | _ <| |___
6 * \___|\___/|_| \_\_____|
8 * Copyright (C) 1998 - 2011, Daniel Stenberg, <daniel@haxx.se>, et al.
10 * This software is licensed as described in the file COPYING, which
11 * you should have received as part of this distribution. The terms
12 * are also available at http://curl.haxx.se/docs/copyright.html.
14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell
15 * copies of the Software, and permit persons to whom the Software is
16 * furnished to do so, under the terms of the COPYING file.
18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19 * KIND, either express or implied.
21 ***************************************************************************/
25 /* -- WIN32 approved -- */
33 #include "strtoofft.h"
41 #ifdef HAVE_SYS_SOCKET_H
42 #include <sys/socket.h>
44 #ifdef HAVE_NETINET_IN_H
45 #include <netinet/in.h>
47 #ifdef HAVE_SYS_TIME_H
56 #ifdef HAVE_ARPA_INET_H
57 #include <arpa/inet.h>
62 #ifdef HAVE_SYS_IOCTL_H
63 #include <sys/ioctl.h>
69 #ifdef HAVE_SYS_PARAM_H
70 #include <sys/param.h>
73 #ifdef HAVE_SYS_SELECT_H
74 #include <sys/select.h>
78 #error "We can't compile without socket() support!"
84 #include <curl/curl.h>
87 #include "content_encoding.h"
91 #include "speedcheck.h"
97 #include "http_digest.h"
98 #include "http_ntlm.h"
99 #include "http_negotiate.h"
101 #include "curl_memory.h"
105 #include "non-ascii.h"
107 #define _MPRINTF_REPLACE /* use our functions only */
108 #include <curl/mprintf.h>
110 /* The last #include file should be: */
111 #include "memdebug.h"
113 #define CURL_TIMEOUT_EXPECT_100 1000 /* counting ms here */
116 * This function will call the read callback to fill our buffer with data
119 CURLcode Curl_fillreadbuffer(struct connectdata *conn, int bytes, int *nreadp)
121 struct SessionHandle *data = conn->data;
122 size_t buffersize = (size_t)bytes;
124 #ifdef CURL_DOES_CONVERSIONS
125 bool sending_http_headers = FALSE;
127 if((conn->handler->protocol&(CURLPROTO_HTTP|CURLPROTO_RTSP)) &&
128 (data->state.proto.http->sending == HTTPSEND_REQUEST)) {
129 /* We're sending the HTTP request headers, not the data.
130 Remember that so we don't re-translate them into garbage. */
131 sending_http_headers = TRUE;
135 if(data->req.upload_chunky) {
136 /* if chunked Transfer-Encoding */
137 buffersize -= (8 + 2 + 2); /* 32bit hex + CRLF + CRLF */
138 data->req.upload_fromhere += (8 + 2); /* 32bit hex + CRLF */
141 /* this function returns a size_t, so we typecast to int to prevent warnings
142 with picky compilers */
143 nread = (int)conn->fread_func(data->req.upload_fromhere, 1,
144 buffersize, conn->fread_in);
146 if(nread == CURL_READFUNC_ABORT) {
147 failf(data, "operation aborted by callback");
149 return CURLE_ABORTED_BY_CALLBACK;
151 else if(nread == CURL_READFUNC_PAUSE) {
152 struct SingleRequest *k = &data->req;
153 /* CURL_READFUNC_PAUSE pauses read callbacks that feed socket writes */
154 k->keepon |= KEEP_SEND_PAUSE; /* mark socket send as paused */
155 if(data->req.upload_chunky) {
156 /* Back out the preallocation done above */
157 data->req.upload_fromhere -= (8 + 2);
160 return CURLE_OK; /* nothing was read */
162 else if((size_t)nread > buffersize) {
163 /* the read function returned a too large value */
165 failf(data, "read function returned funny value");
166 return CURLE_READ_ERROR;
169 if(!data->req.forbidchunk && data->req.upload_chunky) {
170 /* if chunked Transfer-Encoding
176 /* On non-ASCII platforms the <DATA> may or may not be
177 translated based on set.prefer_ascii while the protocol
178 portion must always be translated to the network encoding.
179 To further complicate matters, line end conversion might be
180 done later on, so we need to prevent CRLFs from becoming
181 CRCRLFs if that's the case. To do this we use bare LFs
182 here, knowing they'll become CRLFs later on.
186 const char *endofline_native;
187 const char *endofline_network;
189 #ifdef CURL_DO_LINEEND_CONV
190 if((data->set.crlf) || (data->set.prefer_ascii)) {
193 #endif /* CURL_DO_LINEEND_CONV */
194 /* \n will become \r\n later on */
195 endofline_native = "\n";
196 endofline_network = "\x0a";
199 endofline_native = "\r\n";
200 endofline_network = "\x0d\x0a";
202 hexlen = snprintf(hexbuffer, sizeof(hexbuffer),
203 "%x%s", nread, endofline_native);
205 /* move buffer pointer */
206 data->req.upload_fromhere -= hexlen;
209 /* copy the prefix to the buffer, leaving out the NUL */
210 memcpy(data->req.upload_fromhere, hexbuffer, hexlen);
212 /* always append ASCII CRLF to the data */
213 memcpy(data->req.upload_fromhere + nread,
215 strlen(endofline_network));
217 #ifdef CURL_DOES_CONVERSIONS
220 if(data->set.prefer_ascii) {
221 /* translate the protocol and data */
225 /* just translate the protocol portion */
226 length = strlen(hexbuffer);
228 res = Curl_convert_to_network(data, data->req.upload_fromhere, length);
229 /* Curl_convert_to_network calls failf if unsuccessful */
232 #endif /* CURL_DOES_CONVERSIONS */
234 if((nread - hexlen) == 0)
235 /* mark this as done once this chunk is transferred */
236 data->req.upload_done = TRUE;
238 nread+=(int)strlen(endofline_native); /* for the added end of line */
240 #ifdef CURL_DOES_CONVERSIONS
241 else if((data->set.prefer_ascii) && (!sending_http_headers)) {
243 res = Curl_convert_to_network(data, data->req.upload_fromhere, nread);
244 /* Curl_convert_to_network calls failf if unsuccessful */
248 #endif /* CURL_DOES_CONVERSIONS */
257 * Curl_readrewind() rewinds the read stream. This is typically used for HTTP
258 * POST/PUT with multi-pass authentication when a sending was denied and a
259 * resend is necessary.
261 CURLcode Curl_readrewind(struct connectdata *conn)
263 struct SessionHandle *data = conn->data;
265 conn->bits.rewindaftersend = FALSE; /* we rewind now */
267 /* explicitly switch off sending data on this connection now since we are
268 about to restart a new transfer and thus we want to avoid inadvertently
269 sending more data on the existing connection until the next transfer
271 data->req.keepon &= ~KEEP_SEND;
273 /* We have sent away data. If not using CURLOPT_POSTFIELDS or
274 CURLOPT_HTTPPOST, call app to rewind
276 if(data->set.postfields ||
277 (data->set.httpreq == HTTPREQ_POST_FORM))
280 if(data->set.seek_func) {
283 err = (data->set.seek_func)(data->set.seek_client, 0, SEEK_SET);
285 failf(data, "seek callback returned error %d", (int)err);
286 return CURLE_SEND_FAIL_REWIND;
289 else if(data->set.ioctl_func) {
292 err = (data->set.ioctl_func)(data, CURLIOCMD_RESTARTREAD,
293 data->set.ioctl_client);
294 infof(data, "the ioctl callback returned %d\n", (int)err);
297 /* FIXME: convert to a human readable error message */
298 failf(data, "ioctl callback returned error %d", (int)err);
299 return CURLE_SEND_FAIL_REWIND;
303 /* If no CURLOPT_READFUNCTION is used, we know that we operate on a
304 given FILE * stream and we can actually attempt to rewind that
305 ourself with fseek() */
306 if(data->set.fread_func == (curl_read_callback)fread) {
307 if(-1 != fseek(data->set.in, 0, SEEK_SET))
308 /* successful rewind */
312 /* no callback set or failure above, makes us fail at once */
313 failf(data, "necessary data rewind wasn't possible");
314 return CURLE_SEND_FAIL_REWIND;
320 static int data_pending(const struct connectdata *conn)
322 /* in the case of libssh2, we can never be really sure that we have emptied
323 its internal buffers so we MUST always try until we get EAGAIN back */
324 return conn->handler->protocol&(CURLPROTO_SCP|CURLPROTO_SFTP) ||
325 Curl_ssl_data_pending(conn, FIRSTSOCKET);
328 static void read_rewind(struct connectdata *conn,
331 DEBUGASSERT(conn->read_pos >= thismuch);
333 conn->read_pos -= thismuch;
334 conn->bits.stream_was_rewound = TRUE;
341 show = CURLMIN(conn->buf_len - conn->read_pos, sizeof(buf)-1);
342 if(conn->master_buffer) {
343 memcpy(buf, conn->master_buffer + conn->read_pos, show);
350 DEBUGF(infof(conn->data,
351 "Buffer after stream rewind (read_pos = %zu): [%s]",
352 conn->read_pos, buf));
358 * Check to see if CURLOPT_TIMECONDITION was met by comparing the time of the
359 * remote document with the time provided by CURLOPT_TIMEVAL
361 bool Curl_meets_timecondition(struct SessionHandle *data, time_t timeofdoc)
363 if((timeofdoc == 0) || (data->set.timevalue == 0))
366 switch(data->set.timecondition) {
367 case CURL_TIMECOND_IFMODSINCE:
369 if(timeofdoc <= data->set.timevalue) {
371 "The requested document is not new enough\n");
372 data->info.timecond = TRUE;
376 case CURL_TIMECOND_IFUNMODSINCE:
377 if(timeofdoc >= data->set.timevalue) {
379 "The requested document is not old enough\n");
380 data->info.timecond = TRUE;
390 * Go ahead and do a read if we have a readable socket or if
391 * the stream was rewound (in which case we have data in a
394 static CURLcode readwrite_data(struct SessionHandle *data,
395 struct connectdata *conn,
396 struct SingleRequest *k,
397 int *didwhat, bool *done)
399 CURLcode result = CURLE_OK;
400 ssize_t nread; /* number of bytes read */
401 size_t excess = 0; /* excess bytes read */
402 bool is_empty_data = FALSE;
403 bool readmore = FALSE; /* used by RTP to signal for more data */
407 /* This is where we loop until we have read everything there is to
408 read or we get a CURLE_AGAIN */
410 size_t buffersize = data->set.buffer_size?
411 data->set.buffer_size : BUFSIZE;
412 size_t bytestoread = buffersize;
414 if(k->size != -1 && !k->header) {
415 /* make sure we don't read "too much" if we can help it since we
416 might be pipelining and then someone else might want to read what
418 curl_off_t totalleft = k->size - k->bytecount;
419 if(totalleft < (curl_off_t)bytestoread)
420 bytestoread = (size_t)totalleft;
424 /* receive data from the network! */
425 result = Curl_read(conn, conn->sockfd, k->buf, bytestoread, &nread);
427 /* read would've blocked */
428 if(CURLE_AGAIN == result)
429 break; /* get out of loop */
435 /* read nothing but since we wanted nothing we consider this an OK
436 situation to proceed from */
440 if((k->bytecount == 0) && (k->writebytecount == 0)) {
441 Curl_pgrsTime(data, TIMER_STARTTRANSFER);
442 if(k->exp100 > EXP100_SEND_DATA)
443 /* set time stamp to compare with when waiting for the 100 */
444 k->start100 = Curl_tvnow();
447 *didwhat |= KEEP_RECV;
448 /* indicates data of zero size, i.e. empty file */
449 is_empty_data = (bool)((nread == 0) && (k->bodywrites == 0));
451 /* NUL terminate, allowing string ops to be used */
452 if(0 < nread || is_empty_data) {
455 else if(0 >= nread) {
456 /* if we receive 0 or less here, the server closed the connection
457 and we bail out from this! */
458 DEBUGF(infof(data, "nread <= 0, server closed connection, bailing\n"));
459 k->keepon &= ~KEEP_RECV;
463 /* Default buffer to use when we write the buffer, it may be changed
464 in the flow below before the actual storing is done. */
467 if(conn->handler->readwrite) {
468 result = conn->handler->readwrite(data, conn, &nread, &readmore);
475 #ifndef CURL_DISABLE_HTTP
476 /* Since this is a two-state thing, we check if we are parsing
477 headers at the moment or not. */
479 /* we are in parse-the-header-mode */
480 bool stop_reading = FALSE;
481 result = Curl_http_readwrite_headers(data, conn, &nread, &stop_reading);
485 if(conn->handler->readwrite &&
486 (k->maxdownload <= 0 && nread > 0)) {
487 result = conn->handler->readwrite(data, conn, &nread, &readmore);
495 /* We've stopped dealing with input, get out of the do-while loop */
498 if(conn->data->multi && Curl_multi_canPipeline(conn->data->multi)) {
500 "Rewinding stream by : %zd"
501 " bytes on url %s (zero-length body)\n",
502 nread, data->state.path);
503 read_rewind(conn, (size_t)nread);
507 "Excess found in a non pipelined read:"
509 " url = %s (zero-length body)\n",
510 nread, data->state.path);
517 #endif /* CURL_DISABLE_HTTP */
520 /* This is not an 'else if' since it may be a rest from the header
521 parsing, where the beginning of the buffer is headers and the end
523 if(k->str && !k->header && (nread > 0 || is_empty_data)) {
526 #ifndef CURL_DISABLE_HTTP
527 if(0 == k->bodywrites && !is_empty_data) {
528 /* These checks are only made the first time we are about to
529 write a piece of the body */
530 if(conn->handler->protocol&(CURLPROTO_HTTP|CURLPROTO_RTSP)) {
531 /* HTTP-only checks */
533 if(data->req.newurl) {
534 if(conn->bits.close) {
535 /* Abort after the headers if "follow Location" is set
536 and we're set to close anyway. */
537 k->keepon &= ~KEEP_RECV;
541 /* We have a new url to load, but since we want to be able
542 to re-use this connection properly, we read the full
543 response in "ignore more" */
544 k->ignorebody = TRUE;
545 infof(data, "Ignoring the response-body\n");
547 if(data->state.resume_from && !k->content_range &&
548 (data->set.httpreq==HTTPREQ_GET) &&
550 /* we wanted to resume a download, although the server doesn't
551 * seem to support this and we did this with a GET (if it
552 * wasn't a GET we did a POST or PUT resume) */
553 failf(data, "HTTP server doesn't seem to support "
554 "byte ranges. Cannot resume.");
555 return CURLE_RANGE_ERROR;
558 if(data->set.timecondition && !data->state.range) {
559 /* A time condition has been set AND no ranges have been
560 requested. This seems to be what chapter 13.3.4 of
561 RFC 2616 defines to be the correct action for a
564 if(!Curl_meets_timecondition(data, k->timeofdoc)) {
568 } /* we have a time condition */
571 } /* this is the first time we write a body part */
572 #endif /* CURL_DISABLE_HTTP */
575 /* pass data to the debug function before it gets "dechunked" */
576 if(data->set.verbose) {
578 Curl_debug(data, CURLINFO_DATA_IN, data->state.headerbuff,
579 (size_t)k->hbuflen, conn);
580 if(k->badheader == HEADER_PARTHEADER)
581 Curl_debug(data, CURLINFO_DATA_IN,
582 k->str, (size_t)nread, conn);
585 Curl_debug(data, CURLINFO_DATA_IN,
586 k->str, (size_t)nread, conn);
589 #ifndef CURL_DISABLE_HTTP
592 * Here comes a chunked transfer flying and we need to decode this
593 * properly. While the name says read, this function both reads
594 * and writes away the data. The returned 'nread' holds the number
595 * of actual data it wrote to the client.
599 Curl_httpchunk_read(conn, k->str, nread, &nread);
601 if(CHUNKE_OK < res) {
602 if(CHUNKE_WRITE_ERROR == res) {
603 failf(data, "Failed writing data");
604 return CURLE_WRITE_ERROR;
606 failf(data, "Received problem %d in the chunky parser", (int)res);
607 return CURLE_RECV_ERROR;
609 else if(CHUNKE_STOP == res) {
611 /* we're done reading chunks! */
612 k->keepon &= ~KEEP_RECV; /* read no more */
614 /* There are now possibly N number of bytes at the end of the
615 str buffer that weren't written to the client.
617 We DO care about this data if we are pipelining.
618 Push it back to be read on the next pass. */
620 dataleft = conn->chunk.dataleft;
622 infof(conn->data, "Leftovers after chunking: %zu bytes", dataleft);
623 if(conn->data->multi &&
624 Curl_multi_canPipeline(conn->data->multi)) {
625 /* only attempt the rewind if we truly are pipelining */
626 infof(conn->data, "Rewinding %zu bytes\n",dataleft);
627 read_rewind(conn, dataleft);
631 /* If it returned OK, we just keep going */
633 #endif /* CURL_DISABLE_HTTP */
635 /* Account for body content stored in the header buffer */
636 if(k->badheader && !k->ignorebody) {
637 DEBUGF(infof(data, "Increasing bytecount by %zu from hbuflen\n",
639 k->bytecount += k->hbuflen;
642 if((-1 != k->maxdownload) &&
643 (k->bytecount + nread >= k->maxdownload)) {
645 excess = (size_t)(k->bytecount + nread - k->maxdownload);
646 if(excess > 0 && !k->ignorebody) {
647 if(conn->data->multi && Curl_multi_canPipeline(conn->data->multi)) {
648 /* The 'excess' amount below can't be more than BUFSIZE which
649 always will fit in a size_t */
651 "Rewinding stream by : %zu"
652 " bytes on url %s (size = %" FORMAT_OFF_T
653 ", maxdownload = %" FORMAT_OFF_T
654 ", bytecount = %" FORMAT_OFF_T ", nread = %zd)\n",
655 excess, data->state.path,
656 k->size, k->maxdownload, k->bytecount, nread);
657 read_rewind(conn, excess);
661 "Excess found in a non pipelined read:"
663 ", size = %" FORMAT_OFF_T
664 ", maxdownload = %" FORMAT_OFF_T
665 ", bytecount = %" FORMAT_OFF_T "\n",
666 excess, k->size, k->maxdownload, k->bytecount);
670 nread = (ssize_t) (k->maxdownload - k->bytecount);
671 if(nread < 0 ) /* this should be unusual */
674 k->keepon &= ~KEEP_RECV; /* we're done reading */
677 k->bytecount += nread;
679 Curl_pgrsSetDownloadCounter(data, k->bytecount);
681 if(!k->chunk && (nread || k->badheader || is_empty_data)) {
682 /* If this is chunky transfer, it was already written */
684 if(k->badheader && !k->ignorebody) {
685 /* we parsed a piece of data wrongly assuming it was a header
686 and now we output it as body instead */
688 /* Don't let excess data pollute body writes */
689 if(k->maxdownload == -1 || (curl_off_t)k->hbuflen <= k->maxdownload)
690 result = Curl_client_write(conn, CLIENTWRITE_BODY,
691 data->state.headerbuff,
694 result = Curl_client_write(conn, CLIENTWRITE_BODY,
695 data->state.headerbuff,
696 (size_t)k->maxdownload);
701 if(k->badheader < HEADER_ALLBAD) {
702 /* This switch handles various content encodings. If there's an
703 error here, be sure to check over the almost identical code
705 Make sure that ALL_CONTENT_ENCODINGS contains all the
706 encodings handled here. */
708 switch (conn->data->set.http_ce_skip ?
709 IDENTITY : k->auto_decoding) {
712 /* This is the default when the server sends no
713 Content-Encoding header. See Curl_readwrite_init; the
714 memset() call initializes k->auto_decoding to zero. */
717 #ifndef CURL_DISABLE_POP3
718 if(conn->handler->protocol&CURLPROTO_POP3)
719 result = Curl_pop3_write(conn, k->str, nread);
721 #endif /* CURL_DISABLE_POP3 */
723 result = Curl_client_write(conn, CLIENTWRITE_BODY, k->str,
730 /* Assume CLIENTWRITE_BODY; headers are not encoded. */
732 result = Curl_unencode_deflate_write(conn, k, nread);
736 /* Assume CLIENTWRITE_BODY; headers are not encoded. */
738 result = Curl_unencode_gzip_write(conn, k, nread);
743 failf (data, "Unrecognized content encoding type. "
744 "libcurl understands `identity', `deflate' and `gzip' "
745 "content encodings.");
746 result = CURLE_BAD_CONTENT_ENCODING;
751 k->badheader = HEADER_NORMAL; /* taken care of now */
757 } /* if(! header and data to read ) */
759 if(conn->handler->readwrite &&
760 (excess > 0 && !conn->bits.stream_was_rewound)) {
761 /* Parse the excess data */
763 nread = (ssize_t)excess;
765 result = conn->handler->readwrite(data, conn, &nread, &readmore);
770 k->keepon |= KEEP_RECV; /* we're not done reading */
775 /* if we received nothing, the server closed the connection and we
777 k->keepon &= ~KEEP_RECV;
780 } while(data_pending(conn));
782 if(((k->keepon & (KEEP_RECV|KEEP_SEND)) == KEEP_SEND) &&
784 /* When we've read the entire thing and the close bit is set, the server
785 may now close the connection. If there's now any kind of sending going
786 on from our side, we need to stop that immediately. */
787 infof(data, "we are done reading and this is set to close, stop send\n");
788 k->keepon &= ~KEEP_SEND; /* no writing anymore either */
795 * Send data to upload to the server, when the socket is writable.
797 static CURLcode readwrite_upload(struct SessionHandle *data,
798 struct connectdata *conn,
799 struct SingleRequest *k,
803 ssize_t bytes_written;
805 ssize_t nread; /* number of bytes read */
806 bool sending_http_headers = FALSE;
808 if((k->bytecount == 0) && (k->writebytecount == 0))
809 Curl_pgrsTime(data, TIMER_STARTTRANSFER);
811 *didwhat |= KEEP_SEND;
814 * We loop here to do the READ and SEND loop until we run out of
815 * data to send or until we get EWOULDBLOCK back
819 /* only read more data if there's no upload data already
820 present in the upload buffer */
821 if(0 == data->req.upload_present) {
822 /* init the "upload from here" pointer */
823 data->req.upload_fromhere = k->uploadbuf;
825 if(!k->upload_done) {
826 /* HTTP pollution, this should be written nicer to become more
827 protocol agnostic. */
830 if((k->exp100 == EXP100_SENDING_REQUEST) &&
831 (data->state.proto.http->sending == HTTPSEND_BODY)) {
832 /* If this call is to send body data, we must take some action:
833 We have sent off the full HTTP 1.1 request, and we shall now
834 go into the Expect: 100 state and await such a header */
835 k->exp100 = EXP100_AWAITING_CONTINUE; /* wait for the header */
836 k->keepon &= ~KEEP_SEND; /* disable writing */
837 k->start100 = Curl_tvnow(); /* timeout count starts now */
838 *didwhat &= ~KEEP_SEND; /* we didn't write anything actually */
840 /* set a timeout for the multi interface */
841 Curl_expire(data, CURL_TIMEOUT_EXPECT_100);
845 if(conn->handler->protocol&(CURLPROTO_HTTP|CURLPROTO_RTSP)) {
846 if(data->state.proto.http->sending == HTTPSEND_REQUEST)
847 /* We're sending the HTTP request headers, not the data.
848 Remember that so we don't change the line endings. */
849 sending_http_headers = TRUE;
851 sending_http_headers = FALSE;
854 result = Curl_fillreadbuffer(conn, BUFSIZE, &fillcount);
858 nread = (ssize_t)fillcount;
861 nread = 0; /* we're done uploading/reading */
863 if(!nread && (k->keepon & KEEP_SEND_PAUSE)) {
864 /* this is a paused transfer */
869 k->keepon &= ~KEEP_SEND; /* we're done writing */
871 if(conn->bits.rewindaftersend) {
872 result = Curl_readrewind(conn);
879 /* store number of bytes available for upload */
880 data->req.upload_present = nread;
882 #ifndef CURL_DISABLE_SMTP
883 if(conn->handler->protocol & CURLPROTO_SMTP) {
884 result = Curl_smtp_escape_eob(conn, nread);
889 #endif /* CURL_DISABLE_SMTP */
891 /* convert LF to CRLF if so asked */
892 if((!sending_http_headers) &&
893 #ifdef CURL_DO_LINEEND_CONV
894 /* always convert if we're FTPing in ASCII mode */
895 ((data->set.crlf) || (data->set.prefer_ascii))) {
899 if(data->state.scratch == NULL)
900 data->state.scratch = malloc(2*BUFSIZE);
901 if(data->state.scratch == NULL) {
902 failf (data, "Failed to alloc scratch buffer!");
903 return CURLE_OUT_OF_MEMORY;
906 * ASCII/EBCDIC Note: This is presumably a text (not binary)
907 * transfer so the data should already be in ASCII.
908 * That means the hex values for ASCII CR (0x0d) & LF (0x0a)
909 * must be used instead of the escape sequences \r & \n.
911 for(i = 0, si = 0; i < nread; i++, si++) {
912 if(data->req.upload_fromhere[i] == 0x0a) {
913 data->state.scratch[si++] = 0x0d;
914 data->state.scratch[si] = 0x0a;
915 if(!data->set.crlf) {
916 /* we're here only because FTP is in ASCII mode...
917 bump infilesize for the LF we just added */
918 data->set.infilesize++;
922 data->state.scratch[si] = data->req.upload_fromhere[i];
925 /* only perform the special operation if we really did replace
929 /* upload from the new (replaced) buffer instead */
930 data->req.upload_fromhere = data->state.scratch;
932 /* set the new amount too */
933 data->req.upload_present = nread;
936 } /* if 0 == data->req.upload_present */
938 /* We have a partial buffer left from a previous "round". Use
939 that instead of reading more data */
942 /* write to socket (send away data) */
943 result = Curl_write(conn,
944 conn->writesockfd, /* socket to send to */
945 data->req.upload_fromhere, /* buffer pointer */
946 data->req.upload_present, /* buffer size */
947 &bytes_written); /* actually sent */
952 if(data->set.verbose)
953 /* show the data before we change the pointer upload_fromhere */
954 Curl_debug(data, CURLINFO_DATA_OUT, data->req.upload_fromhere,
955 (size_t)bytes_written, conn);
957 k->writebytecount += bytes_written;
959 if(k->writebytecount == data->set.infilesize) {
960 /* we have sent all data we were supposed to */
961 k->upload_done = TRUE;
962 infof(data, "We are completely uploaded and fine\n");
965 if(data->req.upload_present != bytes_written) {
966 /* we only wrote a part of the buffer (if anything), deal with it! */
968 /* store the amount of bytes left in the buffer to write */
969 data->req.upload_present -= bytes_written;
971 /* advance the pointer where to find the buffer when the next send
973 data->req.upload_fromhere += bytes_written;
976 /* we've uploaded that buffer now */
977 data->req.upload_fromhere = k->uploadbuf;
978 data->req.upload_present = 0; /* no more bytes left */
981 /* switch off writing, we're done! */
982 k->keepon &= ~KEEP_SEND; /* we're done writing */
986 Curl_pgrsSetUploadCounter(data, k->writebytecount);
988 } while(0); /* just to break out from! */
994 * Curl_readwrite() is the low-level function to be called when data is to
995 * be read and written to/from the connection.
997 CURLcode Curl_readwrite(struct connectdata *conn,
1000 struct SessionHandle *data = conn->data;
1001 struct SingleRequest *k = &data->req;
1005 curl_socket_t fd_read;
1006 curl_socket_t fd_write;
1007 int select_res = conn->cselect_bits;
1009 conn->cselect_bits = 0;
1011 /* only use the proper socket if the *_HOLD bit is not set simultaneously as
1012 then we are in rate limiting state in that transfer direction */
1014 if((k->keepon & KEEP_RECVBITS) == KEEP_RECV)
1015 fd_read = conn->sockfd;
1017 fd_read = CURL_SOCKET_BAD;
1019 if((k->keepon & KEEP_SENDBITS) == KEEP_SEND)
1020 fd_write = conn->writesockfd;
1022 fd_write = CURL_SOCKET_BAD;
1024 if(!select_res) /* Call for select()/poll() only, if read/write/error
1025 status is not known. */
1026 select_res = Curl_socket_ready(fd_read, fd_write, 0);
1028 if(select_res == CURL_CSELECT_ERR) {
1029 failf(data, "select/poll returned error");
1030 return CURLE_SEND_ERROR;
1033 /* We go ahead and do a read if we have a readable socket or if
1034 the stream was rewound (in which case we have data in a
1036 if((k->keepon & KEEP_RECV) &&
1037 ((select_res & CURL_CSELECT_IN) || conn->bits.stream_was_rewound)) {
1039 result = readwrite_data(data, conn, k, &didwhat, done);
1044 /* If we still have writing to do, we check if we have a writable socket. */
1045 if((k->keepon & KEEP_SEND) && (select_res & CURL_CSELECT_OUT)) {
1048 result = readwrite_upload(data, conn, k, &didwhat);
1053 k->now = Curl_tvnow();
1055 /* Update read/write counters */
1057 *k->bytecountp = k->bytecount; /* read count */
1058 if(k->writebytecountp)
1059 *k->writebytecountp = k->writebytecount; /* write count */
1062 /* no read no write, this is a timeout? */
1063 if(k->exp100 == EXP100_AWAITING_CONTINUE) {
1064 /* This should allow some time for the header to arrive, but only a
1065 very short time as otherwise it'll be too much wasted time too
1068 /* Quoting RFC2616, section "8.2.3 Use of the 100 (Continue) Status":
1070 Therefore, when a client sends this header field to an origin server
1071 (possibly via a proxy) from which it has never seen a 100 (Continue)
1072 status, the client SHOULD NOT wait for an indefinite period before
1073 sending the request body.
1077 long ms = Curl_tvdiff(k->now, k->start100);
1078 if(ms > CURL_TIMEOUT_EXPECT_100) {
1079 /* we've waited long enough, continue anyway */
1080 k->exp100 = EXP100_SEND_DATA;
1081 k->keepon |= KEEP_SEND;
1082 infof(data, "Done waiting for 100-continue\n");
1087 if(Curl_pgrsUpdate(conn))
1088 result = CURLE_ABORTED_BY_CALLBACK;
1090 result = Curl_speedcheck(data, k->now);
1095 if(0 > Curl_timeleft(data, &k->now, FALSE)) {
1097 failf(data, "Operation timed out after %ld milliseconds with %"
1098 FORMAT_OFF_T " out of %" FORMAT_OFF_T " bytes received",
1099 Curl_tvdiff(k->now, data->progress.t_startsingle), k->bytecount,
1103 failf(data, "Operation timed out after %ld milliseconds with %"
1104 FORMAT_OFF_T " bytes received",
1105 Curl_tvdiff(k->now, data->progress.t_startsingle), k->bytecount);
1107 return CURLE_OPERATION_TIMEDOUT;
1112 * The transfer has been performed. Just make some general checks before
1116 if(!(data->set.opt_no_body) && (k->size != -1) &&
1117 (k->bytecount != k->size) &&
1118 #ifdef CURL_DO_LINEEND_CONV
1119 /* Most FTP servers don't adjust their file SIZE response for CRLFs,
1120 so we'll check to see if the discrepancy can be explained
1121 by the number of CRLFs we've changed to LFs.
1123 (k->bytecount != (k->size + data->state.crlf_conversions)) &&
1124 #endif /* CURL_DO_LINEEND_CONV */
1125 !data->req.newurl) {
1126 failf(data, "transfer closed with %" FORMAT_OFF_T
1127 " bytes remaining to read",
1128 k->size - k->bytecount);
1129 return CURLE_PARTIAL_FILE;
1131 else if(!(data->set.opt_no_body) &&
1133 (conn->chunk.state != CHUNK_STOP)) {
1135 * In chunked mode, return an error if the connection is closed prior to
1136 * the empty (terminiating) chunk is read.
1138 * The condition above used to check for
1139 * conn->proto.http->chunk.datasize != 0 which is true after reading
1140 * *any* chunk, not just the empty chunk.
1143 failf(data, "transfer closed with outstanding read data remaining");
1144 return CURLE_PARTIAL_FILE;
1146 if(Curl_pgrsUpdate(conn))
1147 return CURLE_ABORTED_BY_CALLBACK;
1150 /* Now update the "done" boolean we return */
1151 *done = (bool)(0 == (k->keepon&(KEEP_RECV|KEEP_SEND|
1152 KEEP_RECV_PAUSE|KEEP_SEND_PAUSE)));
1158 * Curl_single_getsock() gets called by the multi interface code when the app
1159 * has requested to get the sockets for the current connection. This function
1160 * will then be called once for every connection that the multi interface
1161 * keeps track of. This function will only be called for connections that are
1162 * in the proper state to have this information available.
1164 int Curl_single_getsock(const struct connectdata *conn,
1165 curl_socket_t *sock, /* points to numsocks number
1169 const struct SessionHandle *data = conn->data;
1170 int bitmap = GETSOCK_BLANK;
1171 unsigned sockindex = 0;
1173 if(conn->handler->perform_getsock)
1174 return conn->handler->perform_getsock(conn, sock, numsocks);
1177 /* simple check but we might need two slots */
1178 return GETSOCK_BLANK;
1180 /* don't include HOLD and PAUSE connections */
1181 if((data->req.keepon & KEEP_RECVBITS) == KEEP_RECV) {
1183 DEBUGASSERT(conn->sockfd != CURL_SOCKET_BAD);
1185 bitmap |= GETSOCK_READSOCK(sockindex);
1186 sock[sockindex] = conn->sockfd;
1189 /* don't include HOLD and PAUSE connections */
1190 if((data->req.keepon & KEEP_SENDBITS) == KEEP_SEND) {
1192 if((conn->sockfd != conn->writesockfd) ||
1193 !(data->req.keepon & KEEP_RECV)) {
1194 /* only if they are not the same socket or we didn't have a readable
1195 one, we increase index */
1196 if(data->req.keepon & KEEP_RECV)
1197 sockindex++; /* increase index if we need two entries */
1199 DEBUGASSERT(conn->writesockfd != CURL_SOCKET_BAD);
1201 sock[sockindex] = conn->writesockfd;
1204 bitmap |= GETSOCK_WRITESOCK(sockindex);
1211 * Determine optimum sleep time based on configured rate, current rate,
1213 * Returns value in mili-seconds.
1215 * The basic idea is to adjust the desired rate up/down in this method
1216 * based on whether we are running too slow or too fast. Then, calculate
1217 * how many miliseconds to wait for the next packet to achieve this new
1220 long Curl_sleep_time(curl_off_t rate_bps, curl_off_t cur_rate_bps,
1223 curl_off_t min_sleep = 0;
1229 /* If running faster than about .1% of the desired speed, slow
1230 * us down a bit. Use shift instead of division as the 0.1%
1231 * cutoff is arbitrary anyway.
1233 if(cur_rate_bps > (rate_bps + (rate_bps >> 10))) {
1234 /* running too fast, decrease target rate by 1/64th of rate */
1235 rate_bps -= rate_bps >> 6;
1238 else if(cur_rate_bps < (rate_bps - (rate_bps >> 10))) {
1239 /* running too slow, increase target rate by 1/64th of rate */
1240 rate_bps += rate_bps >> 6;
1243 /* Determine number of miliseconds to wait until we do
1244 * the next packet at the adjusted rate. We should wait
1245 * longer when using larger packets, for instance.
1247 rv = ((curl_off_t)((pkt_size * 8) * 1000) / rate_bps);
1249 /* Catch rounding errors and always slow down at least 1ms if
1250 * we are running too fast.
1255 /* Bound value to fit in 'long' on 32-bit platform. That's
1256 * plenty long enough anyway!
1268 * This function is what performs the actual transfer. It is capable of doing
1269 * both ways simultaneously. The transfer must already have been setup by a
1270 * call to Curl_setup_transfer().
1272 * Note that headers are created in a preallocated buffer of a default size.
1273 * That buffer can be enlarged on demand, but it is never shrunken again.
1278 Transfer(struct connectdata *conn)
1281 struct SessionHandle *data = conn->data;
1282 struct SingleRequest *k = &data->req;
1289 if((conn->sockfd == CURL_SOCKET_BAD) &&
1290 (conn->writesockfd == CURL_SOCKET_BAD))
1291 /* nothing to read, nothing to write, we're already OK! */
1294 /* we want header and/or body, if neither then don't do this! */
1295 if(!k->getheader && data->set.opt_no_body)
1299 curl_socket_t fd_read = conn->sockfd;
1300 curl_socket_t fd_write = conn->writesockfd;
1301 int keepon = k->keepon;
1305 /* if waitfor is set, get the RECV and SEND bits from that but keep the
1307 keepon &= ~ (KEEP_RECV|KEEP_SEND);
1308 keepon |= conn->waitfor & (KEEP_RECV|KEEP_SEND);
1311 /* limit-rate logic: if speed exceeds threshold, then do not include fd in
1312 select set. The current speed is recalculated in each Curl_readwrite()
1314 if((keepon & KEEP_SEND) &&
1315 (!data->set.max_send_speed ||
1316 (data->progress.ulspeed < data->set.max_send_speed) )) {
1317 k->keepon &= ~KEEP_SEND_HOLD;
1320 if(data->set.upload && data->set.max_send_speed &&
1321 (data->progress.ulspeed > data->set.max_send_speed) ) {
1322 /* calculate upload rate-limitation timeout. */
1323 buffersize = (int)(data->set.buffer_size ?
1324 data->set.buffer_size : BUFSIZE);
1325 totmp = (int)Curl_sleep_time(data->set.max_send_speed,
1326 data->progress.ulspeed, buffersize);
1327 if(totmp < timeout_ms)
1330 fd_write = CURL_SOCKET_BAD;
1331 if(keepon & KEEP_SEND)
1332 k->keepon |= KEEP_SEND_HOLD; /* hold it */
1335 if((keepon & KEEP_RECV) &&
1336 (!data->set.max_recv_speed ||
1337 (data->progress.dlspeed < data->set.max_recv_speed)) ) {
1338 k->keepon &= ~KEEP_RECV_HOLD;
1341 if((!data->set.upload) && data->set.max_recv_speed &&
1342 (data->progress.dlspeed > data->set.max_recv_speed)) {
1343 /* Calculate download rate-limitation timeout. */
1344 buffersize = (int)(data->set.buffer_size ?
1345 data->set.buffer_size : BUFSIZE);
1346 totmp = (int)Curl_sleep_time(data->set.max_recv_speed,
1347 data->progress.dlspeed, buffersize);
1348 if(totmp < timeout_ms)
1351 fd_read = CURL_SOCKET_BAD;
1352 if(keepon & KEEP_RECV)
1353 k->keepon |= KEEP_RECV_HOLD; /* hold it */
1356 /* pause logic. Don't check descriptors for paused connections */
1357 if(k->keepon & KEEP_RECV_PAUSE)
1358 fd_read = CURL_SOCKET_BAD;
1359 if(k->keepon & KEEP_SEND_PAUSE)
1360 fd_write = CURL_SOCKET_BAD;
1362 /* The *_HOLD and *_PAUSE logic is necessary since even though there might
1363 be no traffic during the select interval, we still call
1364 Curl_readwrite() for the timeout case and if we limit transfer speed we
1365 must make sure that this function doesn't transfer anything while in
1368 The no timeout for the first round is for the protocols for which data
1369 has already been slurped off the socket and thus waiting for action
1370 won't work since it'll wait even though there is already data present
1373 ((fd_read != CURL_SOCKET_BAD) || (fd_write != CURL_SOCKET_BAD)))
1374 /* if this is the first lap and one of the file descriptors is fine
1375 to work with, skip the timeout */
1378 totmp = Curl_timeleft(data, &k->now, FALSE);
1380 return CURLE_OPERATION_TIMEDOUT;
1384 if(totmp < timeout_ms)
1388 switch (Curl_socket_ready(fd_read, fd_write, timeout_ms)) {
1389 case -1: /* select() error, stop reading */
1391 /* The EINTR is not serious, and it seems you might get this more
1392 often when using the lib in a multi-threaded environment! */
1393 if(SOCKERRNO == EINTR)
1396 return CURLE_RECV_ERROR; /* indicate a network problem */
1397 case 0: /* timeout */
1398 default: /* readable descriptors */
1400 result = Curl_readwrite(conn, &done);
1401 /* "done" signals to us if the transfer(s) are ready */
1407 first = FALSE; /* not the first lap anymore */
1413 static CURLcode loadhostpairs(struct SessionHandle *data)
1415 struct curl_slist *hostp;
1420 for(hostp = data->change.resolve; hostp; hostp = hostp->next ) {
1423 if(hostp->data[0] == '-') {
1424 /* TODO: mark an entry for removal */
1426 else if(3 == sscanf(hostp->data, "%255[^:]:%d:%255s", hostname, &port,
1428 struct Curl_dns_entry *dns;
1429 Curl_addrinfo *addr;
1431 addr = Curl_str2addr(address, port);
1433 infof(data, "Resolve %s found illegal!\n", hostp->data);
1436 infof(data, "Added %s:%d:%s to DNS cache\n",
1437 hostname, port, address);
1440 Curl_share_lock(data, CURL_LOCK_DATA_DNS, CURL_LOCK_ACCESS_SINGLE);
1442 /* put this host in the cache */
1443 dns = Curl_cache_addr(data, addr, hostname, port);
1446 Curl_share_unlock(data, CURL_LOCK_DATA_DNS);
1449 return CURLE_OUT_OF_MEMORY;
1452 data->change.resolve = NULL; /* dealt with now */
1459 * Curl_pretransfer() is called immediately before a transfer starts.
1461 CURLcode Curl_pretransfer(struct SessionHandle *data)
1464 if(!data->change.url) {
1465 /* we can't do anything without URL */
1466 failf(data, "No URL set!");
1467 return CURLE_URL_MALFORMAT;
1470 /* Init the SSL session ID cache here. We do it here since we want to do it
1471 after the *_setopt() calls (that could change the size of the cache) but
1472 before any transfer takes place. */
1473 res = Curl_ssl_initsessions(data, data->set.ssl.numsessions);
1477 data->set.followlocation=0; /* reset the location-follow counter */
1478 data->state.this_is_a_follow = FALSE; /* reset this */
1479 data->state.errorbuf = FALSE; /* no error has occurred */
1480 data->state.httpversion = 0; /* don't assume any particular server version */
1482 data->state.ssl_connect_retry = FALSE;
1484 data->state.authproblem = FALSE;
1485 data->state.authhost.want = data->set.httpauth;
1486 data->state.authproxy.want = data->set.proxyauth;
1487 Curl_safefree(data->info.wouldredirect);
1488 data->info.wouldredirect = NULL;
1490 /* If there is a list of cookie files to read, do it now! */
1491 if(data->change.cookielist)
1492 Curl_cookie_loadfiles(data);
1494 /* If there is a list of host pairs to deal with */
1495 if(data->change.resolve)
1496 res = loadhostpairs(data);
1499 /* Allow data->set.use_port to set which port to use. This needs to be
1500 * disabled for example when we follow Location: headers to URLs using
1501 * different ports! */
1502 data->state.allow_port = TRUE;
1504 #if defined(HAVE_SIGNAL) && defined(SIGPIPE) && !defined(HAVE_MSG_NOSIGNAL)
1505 /*************************************************************
1506 * Tell signal handler to ignore SIGPIPE
1507 *************************************************************/
1508 if(!data->set.no_signal)
1509 data->state.prev_signal = signal(SIGPIPE, SIG_IGN);
1512 Curl_initinfo(data); /* reset session-specific information "variables" */
1513 Curl_pgrsStartNow(data);
1515 if(data->set.timeout)
1516 Curl_expire(data, data->set.timeout);
1518 if(data->set.connecttimeout)
1519 Curl_expire(data, data->set.connecttimeout);
1526 * Curl_posttransfer() is called immediately after a transfer ends
1528 CURLcode Curl_posttransfer(struct SessionHandle *data)
1530 #if defined(HAVE_SIGNAL) && defined(SIGPIPE) && !defined(HAVE_MSG_NOSIGNAL)
1531 /* restore the signal handler for SIGPIPE before we get back */
1532 if(!data->set.no_signal)
1533 signal(SIGPIPE, data->state.prev_signal);
1535 (void)data; /* unused parameter */
1541 #ifndef CURL_DISABLE_HTTP
1543 * strlen_url() returns the length of the given URL if the spaces within the
1544 * URL were properly URL encoded.
1546 static size_t strlen_url(const char *url)
1550 bool left=TRUE; /* left side of the ? */
1552 for(ptr=url; *ptr; ptr++) {
1571 /* strcpy_url() copies a url to a output buffer and URL-encodes the spaces in
1572 * the source URL accordingly.
1574 static void strcpy_url(char *output, const char *url)
1576 /* we must add this with whitespace-replacing */
1579 char *optr = output;
1580 for(iptr = url; /* read from here */
1581 *iptr; /* until zero byte */
1592 *optr++='%'; /* add a '%' */
1593 *optr++='2'; /* add a '2' */
1594 *optr++='0'; /* add a '0' */
1597 *optr++='+'; /* add a '+' here */
1601 *optr=0; /* zero terminate output buffer */
1606 * Returns true if the given URL is absolute (as opposed to relative)
1608 static bool is_absolute_url(const char *url)
1610 char prot[16]; /* URL protocol string storage */
1611 char letter; /* used for a silly sscanf */
1613 return (bool)(2 == sscanf(url, "%15[^?&/:]://%c", prot, &letter));
1617 * Concatenate a relative URL to a base URL making it absolute.
1618 * URL-encodes any spaces.
1619 * The returned pointer must be freed by the caller unless NULL
1620 * (returns NULL on out of memory).
1622 static char *concat_url(const char *base, const char *relurl)
1625 TRY to append this new path to the old URL
1626 to the right of the host part. Oh crap, this is doomed to cause
1627 problems in the future...
1634 const char *useurl = relurl;
1637 /* we must make our own copy of the URL to play with, as it may
1638 point to read-only data */
1639 char *url_clone=strdup(base);
1642 return NULL; /* skip out of this NOW */
1644 /* protsep points to the start of the host name */
1645 protsep=strstr(url_clone, "//");
1649 protsep+=2; /* pass the slashes */
1651 if('/' != relurl[0]) {
1654 /* First we need to find out if there's a ?-letter in the URL,
1655 and cut it and the right-side of that off */
1656 pathsep = strchr(protsep, '?');
1660 /* we have a relative path to append to the last slash if there's one
1661 available, or if the new URL is just a query string (starts with a
1662 '?') we append the new one at the end of the entire currently worked
1664 if(useurl[0] != '?') {
1665 pathsep = strrchr(protsep, '/');
1670 /* Check if there's any slash after the host name, and if so, remember
1671 that position instead */
1672 pathsep = strchr(protsep, '/');
1674 protsep = pathsep+1;
1678 /* now deal with one "./" or any amount of "../" in the newurl
1679 and act accordingly */
1681 if((useurl[0] == '.') && (useurl[1] == '/'))
1682 useurl+=2; /* just skip the "./" */
1684 while((useurl[0] == '.') &&
1685 (useurl[1] == '.') &&
1686 (useurl[2] == '/')) {
1688 useurl+=3; /* pass the "../" */
1693 /* cut off one more level from the right of the original URL */
1694 pathsep = strrchr(protsep, '/');
1705 /* We got a new absolute path for this server, cut off from the
1707 pathsep = strchr(protsep, '/');
1709 /* When people use badly formatted URLs, such as
1710 "http://www.url.com?dir=/home/daniel" we must not use the first
1711 slash, if there's a ?-letter before it! */
1712 char *sep = strchr(protsep, '?');
1713 if(sep && (sep < pathsep))
1718 /* There was no slash. Now, since we might be operating on a badly
1719 formatted URL, such as "http://www.url.com?id=2380" which doesn't
1720 use a slash separator as it is supposed to, we need to check for a
1721 ?-letter as well! */
1722 pathsep = strchr(protsep, '?');
1728 /* If the new part contains a space, this is a mighty stupid redirect
1729 but we still make an effort to do "right". To the left of a '?'
1730 letter we replace each space with %20 while it is replaced with '+'
1731 on the right side of the '?' letter.
1733 newlen = strlen_url(useurl);
1735 urllen = strlen(url_clone);
1737 newest = malloc( urllen + 1 + /* possible slash */
1738 newlen + 1 /* zero byte */);
1741 free(url_clone); /* don't leak this */
1745 /* copy over the root url part */
1746 memcpy(newest, url_clone, urllen);
1748 /* check if we need to append a slash */
1749 if(('/' == useurl[0]) || (protsep && !*protsep) || ('?' == useurl[0]))
1752 newest[urllen++]='/';
1754 /* then append the new piece on the right side */
1755 strcpy_url(&newest[urllen], useurl);
1761 #endif /* CURL_DISABLE_HTTP */
1764 * Curl_follow() handles the URL redirect magic. Pass in the 'newurl' string
1765 * as given by the remote server and set up the new URL to request.
1767 CURLcode Curl_follow(struct SessionHandle *data,
1768 char *newurl, /* this 'newurl' is the Location: string,
1769 and it must be malloc()ed before passed
1771 followtype type) /* see transfer.h */
1773 #ifdef CURL_DISABLE_HTTP
1777 /* Location: following will not happen when HTTP is disabled */
1778 return CURLE_TOO_MANY_REDIRECTS;
1781 /* Location: redirect */
1782 bool disallowport = FALSE;
1784 if(type == FOLLOW_REDIR) {
1785 if((data->set.maxredirs != -1) &&
1786 (data->set.followlocation >= data->set.maxredirs)) {
1787 failf(data,"Maximum (%ld) redirects followed", data->set.maxredirs);
1788 return CURLE_TOO_MANY_REDIRECTS;
1791 /* mark the next request as a followed location: */
1792 data->state.this_is_a_follow = TRUE;
1794 data->set.followlocation++; /* count location-followers */
1796 if(data->set.http_auto_referer) {
1797 /* We are asked to automatically set the previous URL as the referer
1798 when we get the next URL. We pick the ->url field, which may or may
1799 not be 100% correct */
1801 if(data->change.referer_alloc)
1802 /* If we already have an allocated referer, free this first */
1803 free(data->change.referer);
1805 data->change.referer = strdup(data->change.url);
1806 if(!data->change.referer) {
1807 data->change.referer_alloc = FALSE;
1808 return CURLE_OUT_OF_MEMORY;
1810 data->change.referer_alloc = TRUE; /* yes, free this later */
1814 if(!is_absolute_url(newurl)) {
1816 *DANG* this is an RFC 2068 violation. The URL is supposed
1817 to be absolute and this doesn't seem to be that!
1819 char *absolute = concat_url(data->change.url, newurl);
1821 return CURLE_OUT_OF_MEMORY;
1826 /* This is an absolute URL, don't allow the custom port number */
1827 disallowport = TRUE;
1829 if(strchr(newurl, ' ')) {
1830 /* This new URL contains at least one space, this is a mighty stupid
1831 redirect but we still make an effort to do "right". */
1833 size_t newlen = strlen_url(newurl);
1835 newest = malloc(newlen+1); /* get memory for this */
1837 return CURLE_OUT_OF_MEMORY;
1838 strcpy_url(newest, newurl); /* create a space-free URL */
1840 free(newurl); /* that was no good */
1841 newurl = newest; /* use this instead now */
1846 if(type == FOLLOW_FAKE) {
1847 /* we're only figuring out the new url if we would've followed locations
1848 but now we're done so we can get out! */
1849 data->info.wouldredirect = newurl;
1854 data->state.allow_port = FALSE;
1856 if(data->change.url_alloc)
1857 free(data->change.url);
1859 data->change.url_alloc = TRUE; /* the URL is allocated */
1861 data->change.url = newurl;
1862 newurl = NULL; /* don't free! */
1864 infof(data, "Issue another request to this URL: '%s'\n", data->change.url);
1867 * We get here when the HTTP code is 300-399 (and 401). We need to perform
1868 * differently based on exactly what return code there was.
1870 * News from 7.10.6: we can also get here on a 401 or 407, in case we act on
1871 * a HTTP (proxy-) authentication scheme other than Basic.
1873 switch(data->info.httpcode) {
1874 /* 401 - Act on a WWW-Authenticate, we keep on moving and do the
1875 Authorization: XXXX header in the HTTP request code snippet */
1876 /* 407 - Act on a Proxy-Authenticate, we keep on moving and do the
1877 Proxy-Authorization: XXXX header in the HTTP request code snippet */
1878 /* 300 - Multiple Choices */
1879 /* 306 - Not used */
1880 /* 307 - Temporary Redirect */
1881 default: /* for all above (and the unknown ones) */
1882 /* Some codes are explicitly mentioned since I've checked RFC2616 and they
1883 * seem to be OK to POST to.
1886 case 301: /* Moved Permanently */
1887 /* (quote from RFC2616, section 10.3.2):
1889 * Note: When automatically redirecting a POST request after receiving a
1890 * 301 status code, some existing HTTP/1.0 user agents will erroneously
1891 * change it into a GET request.
1895 * Warning: Because most of importants user agents do this obvious RFC2616
1896 * violation, many webservers expect this misbehavior. So these servers
1897 * often answers to a POST request with an error page. To be sure that
1898 * libcurl gets the page that most user agents would get, libcurl has to
1901 * This behaviour can be overridden with CURLOPT_POSTREDIR.
1903 if((data->set.httpreq == HTTPREQ_POST
1904 || data->set.httpreq == HTTPREQ_POST_FORM)
1905 && !data->set.post301) {
1907 "Violate RFC 2616/10.3.2 and switch from POST to GET\n");
1908 data->set.httpreq = HTTPREQ_GET;
1911 case 302: /* Found */
1914 Note: RFC 1945 and RFC 2068 specify that the client is not allowed
1915 to change the method on the redirected request. However, most
1916 existing user agent implementations treat 302 as if it were a 303
1917 response, performing a GET on the Location field-value regardless
1918 of the original request method. The status codes 303 and 307 have
1919 been added for servers that wish to make unambiguously clear which
1920 kind of reaction is expected of the client.
1924 Note: Many pre-HTTP/1.1 user agents do not understand the 303
1925 status. When interoperability with such clients is a concern, the
1926 302 status code may be used instead, since most user agents react
1927 to a 302 response as described here for 303.
1929 This behaviour can be overriden with CURLOPT_POSTREDIR
1931 if((data->set.httpreq == HTTPREQ_POST
1932 || data->set.httpreq == HTTPREQ_POST_FORM)
1933 && !data->set.post302) {
1935 "Violate RFC 2616/10.3.3 and switch from POST to GET\n");
1936 data->set.httpreq = HTTPREQ_GET;
1940 case 303: /* See Other */
1941 /* Disable both types of POSTs, since doing a second POST when
1942 * following isn't what anyone would want! */
1943 if(data->set.httpreq != HTTPREQ_GET) {
1944 data->set.httpreq = HTTPREQ_GET; /* enforce GET request */
1945 infof(data, "Disables POST, goes with %s\n",
1946 data->set.opt_no_body?"HEAD":"GET");
1949 case 304: /* Not Modified */
1950 /* 304 means we did a conditional request and it was "Not modified".
1951 * We shouldn't get any Location: header in this response!
1954 case 305: /* Use Proxy */
1955 /* (quote from RFC2616, section 10.3.6):
1956 * "The requested resource MUST be accessed through the proxy given
1957 * by the Location field. The Location field gives the URI of the
1958 * proxy. The recipient is expected to repeat this single request
1959 * via the proxy. 305 responses MUST only be generated by origin
1964 Curl_pgrsTime(data, TIMER_REDIRECT);
1965 Curl_pgrsResetTimes(data);
1968 #endif /* CURL_DISABLE_HTTP */
1972 connect_host(struct SessionHandle *data,
1973 struct connectdata **conn)
1975 CURLcode res = CURLE_OK;
1978 bool protocol_done=TRUE; /* will be TRUE always since this is only used
1979 within the easy interface */
1980 Curl_pgrsTime(data, TIMER_STARTSINGLE);
1981 res = Curl_connect(data, conn, &async, &protocol_done);
1983 if((CURLE_OK == res) && async) {
1984 /* Now, if async is TRUE here, we need to wait for the name
1986 res = Curl_resolver_wait_resolv(*conn, NULL);
1988 /* Resolved, continue with the connection */
1989 res = Curl_async_resolved(*conn, &protocol_done);
1991 /* if we can't resolve, we kill this "connection" now */
1992 (void)Curl_disconnect(*conn, /* dead_connection */ FALSE);
1999 Curl_reconnect_request(struct connectdata **connp)
2001 CURLcode result = CURLE_OK;
2002 struct connectdata *conn = *connp;
2003 struct SessionHandle *data = conn->data;
2005 /* This was a re-use of a connection and we got a write error in the
2006 * DO-phase. Then we DISCONNECT this connection and have another attempt to
2007 * CONNECT and then DO again! The retry cannot possibly find another
2008 * connection to re-use, since we only keep one possible connection for
2011 infof(data, "Re-used connection seems dead, get a new one\n");
2013 conn->bits.close = TRUE; /* enforce close of this connection */
2014 result = Curl_done(&conn, result, FALSE); /* we are so done with this */
2016 /* conn may no longer be a good pointer */
2019 * According to bug report #1330310. We need to check for CURLE_SEND_ERROR
2020 * here as well. I figure this could happen when the request failed on a FTP
2021 * connection and thus Curl_done() itself tried to use the connection
2022 * (again). Slight Lack of feedback in the report, but I don't think this
2023 * extra check can do much harm.
2025 if((CURLE_OK == result) || (CURLE_SEND_ERROR == result)) {
2027 bool protocol_done = TRUE;
2029 /* Now, redo the connect and get a new connection */
2030 result = Curl_connect(data, connp, &async, &protocol_done);
2031 if(CURLE_OK == result) {
2032 /* We have connected or sent away a name resolve query fine */
2034 conn = *connp; /* setup conn to again point to something nice */
2036 /* Now, if async is TRUE here, we need to wait for the name
2038 result = Curl_resolver_wait_resolv(conn, NULL);
2042 /* Resolved, continue with the connection */
2043 result = Curl_async_resolved(conn, &protocol_done);
2053 /* Returns CURLE_OK *and* sets '*url' if a request retry is wanted.
2055 NOTE: that the *url is malloc()ed. */
2056 CURLcode Curl_retry_request(struct connectdata *conn,
2059 struct SessionHandle *data = conn->data;
2063 /* if we're talking upload, we can't do the checks below, unless the protocol
2064 is HTTP as when uploading over HTTP we will still get a response */
2065 if(data->set.upload &&
2066 !(conn->handler->protocol&(CURLPROTO_HTTP|CURLPROTO_RTSP)))
2069 if(/* workaround for broken TLS servers */ data->state.ssl_connect_retry ||
2070 ((data->req.bytecount +
2071 data->req.headerbytecount == 0) &&
2073 !data->set.opt_no_body &&
2074 data->set.rtspreq != RTSPREQ_RECEIVE)) {
2075 /* We got no data, we attempted to re-use a connection and yet we want a
2076 "body". This might happen if the connection was left alive when we were
2077 done using it before, but that was closed when we wanted to read from
2078 it again. Bad luck. Retry the same request on a fresh connect! */
2079 infof(conn->data, "Connection died, retrying a fresh connect\n");
2080 *url = strdup(conn->data->change.url);
2082 return CURLE_OUT_OF_MEMORY;
2084 conn->bits.close = TRUE; /* close this connection */
2085 conn->bits.retry = TRUE; /* mark this as a connection we're about
2086 to retry. Marking it this way should
2087 prevent i.e HTTP transfers to return
2088 error just because nothing has been
2091 if(data->state.proto.http->writebytecount)
2092 Curl_readrewind(conn);
2097 static CURLcode Curl_do_perform(struct SessionHandle *data)
2101 struct connectdata *conn=NULL;
2102 char *newurl = NULL; /* possibly a new URL to follow to! */
2103 followtype follow = FOLLOW_NONE;
2105 data->state.used_interface = Curl_if_easy;
2107 res = Curl_pretransfer(data);
2112 * It is important that there is NO 'return' from this function at any other
2113 * place than falling down to the end of the function! This is because we
2114 * have cleanup stuff that must be done before we get back, and that is only
2115 * performed after this do-while loop.
2119 res = connect_host(data, &conn); /* primary connection */
2121 if(res == CURLE_OK) {
2123 if(data->set.connect_only) {
2124 /* keep connection open for application to use the socket */
2125 conn->bits.close = FALSE;
2126 res = Curl_done(&conn, CURLE_OK, FALSE);
2129 res = Curl_do(&conn, &do_done);
2131 if(res == CURLE_OK) {
2132 if(conn->data->set.wildcardmatch) {
2133 if(conn->data->wildcard.state == CURLWC_DONE ||
2134 conn->data->wildcard.state == CURLWC_SKIP) {
2135 /* keep connection open for application to use the socket */
2136 conn->bits.close = FALSE;
2137 res = Curl_done(&conn, CURLE_OK, FALSE);
2141 res = Transfer(conn); /* now fetch that URL please */
2142 if((res == CURLE_OK) || (res == CURLE_RECV_ERROR)) {
2144 CURLcode rc = Curl_retry_request(conn, &newurl);
2148 retry = (newurl?TRUE:FALSE);
2151 /* we know (newurl != NULL) at this point */
2153 follow = FOLLOW_RETRY;
2155 else if(res == CURLE_OK) {
2157 * We must duplicate the new URL here as the connection data may
2158 * be free()ed in the Curl_done() function. We prefer the newurl
2159 * one since that's used for redirects or just further requests
2160 * for retries or multi-stage HTTP auth methods etc.
2162 if(data->req.newurl) {
2163 follow = FOLLOW_REDIR;
2164 newurl = strdup(data->req.newurl);
2166 res = CURLE_OUT_OF_MEMORY;
2168 else if(data->req.location) {
2169 follow = FOLLOW_FAKE;
2170 newurl = strdup(data->req.location);
2172 res = CURLE_OUT_OF_MEMORY;
2176 /* in the above cases where 'newurl' gets assigned, we have a fresh
2177 * allocated memory pointed to */
2179 if(res != CURLE_OK) {
2180 /* The transfer phase returned error, we mark the connection to get
2181 * closed to prevent being re-used. This is because we can't
2182 * possibly know if the connection is in a good shape or not now. */
2183 conn->bits.close = TRUE;
2185 if(CURL_SOCKET_BAD != conn->sock[SECONDARYSOCKET]) {
2186 /* if we failed anywhere, we must clean up the secondary socket if
2188 Curl_closesocket(conn, conn->sock[SECONDARYSOCKET]);
2189 conn->sock[SECONDARYSOCKET] = CURL_SOCKET_BAD;
2193 /* Always run Curl_done(), even if some of the previous calls
2194 failed, but return the previous (original) error code */
2195 res2 = Curl_done(&conn, res, FALSE);
2201 /* Curl_do() failed, clean up left-overs in the done-call, but note
2202 that at some cases the conn pointer is NULL when Curl_do() failed
2203 and the connection cache is very small so only call Curl_done() if
2204 conn is still "alive". */
2205 /* ignore return code since we already have an error to return */
2206 (void)Curl_done(&conn, res, FALSE);
2209 * Important: 'conn' cannot be used here, since it may have been closed
2210 * in 'Curl_done' or other functions.
2213 if((res == CURLE_OK) && follow) {
2214 res = Curl_follow(data, newurl, follow);
2215 if(CURLE_OK == res) {
2216 /* if things went fine, Curl_follow() freed or otherwise took
2217 responsibility for the newurl pointer */
2219 if(follow >= FOLLOW_RETRY) {
2220 follow = FOLLOW_NONE;
2223 /* else we break out of the loop below */
2227 break; /* it only reaches here when this shouldn't loop */
2229 } /* loop if Location: */
2234 if(res && !data->state.errorbuf) {
2236 * As an extra precaution: if no error string has been set and there was
2237 * an error, use the strerror() string or if things are so bad that not
2238 * even that is good, set a bad string that mentions the error code.
2240 const char *str = curl_easy_strerror(res);
2242 failf(data, "unspecified error %d", (int)res);
2244 failf(data, "%s", str);
2247 /* run post-transfer unconditionally, but don't clobber the return code if
2248 we already have an error code recorder */
2249 res2 = Curl_posttransfer(data);
2257 * Curl_perform() is the internal high-level function that gets called by the
2258 * external curl_easy_perform() function. It inits, performs and cleans up a
2259 * single file transfer.
2261 CURLcode Curl_perform(struct SessionHandle *data)
2264 if(!data->set.wildcardmatch)
2265 return Curl_do_perform(data);
2267 /* init main wildcard structures */
2268 res = Curl_wildcard_init(&data->wildcard);
2272 res = Curl_do_perform(data);
2274 Curl_wildcard_dtor(&data->wildcard);
2279 while(!res && data->wildcard.state != CURLWC_DONE)
2280 res = Curl_do_perform(data);
2282 Curl_wildcard_dtor(&data->wildcard);
2284 /* wildcard download finished or failed */
2285 data->wildcard.state = CURLWC_INIT;
2290 * Curl_setup_transfer() is called to setup some basic properties for the
2291 * upcoming transfer.
2294 Curl_setup_transfer(
2295 struct connectdata *conn, /* connection data */
2296 int sockindex, /* socket index to read from or -1 */
2297 curl_off_t size, /* -1 if unknown at this point */
2298 bool getheader, /* TRUE if header parsing is wanted */
2299 curl_off_t *bytecountp, /* return number of bytes read or NULL */
2300 int writesockindex, /* socket index to write to, it may very well be
2301 the same we read from. -1 disables */
2302 curl_off_t *writecountp /* return number of bytes written or NULL */
2305 struct SessionHandle *data;
2306 struct SingleRequest *k;
2308 DEBUGASSERT(conn != NULL);
2313 DEBUGASSERT((sockindex <= 1) && (sockindex >= -1));
2315 /* now copy all input parameters */
2316 conn->sockfd = sockindex == -1 ?
2317 CURL_SOCKET_BAD : conn->sock[sockindex];
2318 conn->writesockfd = writesockindex == -1 ?
2319 CURL_SOCKET_BAD:conn->sock[writesockindex];
2320 k->getheader = getheader;
2323 k->bytecountp = bytecountp;
2324 k->writebytecountp = writecountp;
2326 /* The code sequence below is placed in this function just because all
2327 necessary input is not always known in do_complete() as this function may
2328 be called after that */
2333 Curl_pgrsSetDownloadSize(data, size);
2335 /* we want header and/or body, if neither then don't do this! */
2336 if(k->getheader || !data->set.opt_no_body) {
2338 if(conn->sockfd != CURL_SOCKET_BAD)
2339 k->keepon |= KEEP_RECV;
2341 if(conn->writesockfd != CURL_SOCKET_BAD) {
2344 Even if we require a 100-return code before uploading data, we might
2345 need to write data before that since the REQUEST may not have been
2346 finished sent off just yet.
2348 Thus, we must check if the request has been sent before we set the
2349 state info where we wait for the 100-return code
2351 if((data->state.expect100header) &&
2352 (data->state.proto.http->sending == HTTPSEND_BODY)) {
2353 /* wait with write until we either got 100-continue or a timeout */
2354 k->exp100 = EXP100_AWAITING_CONTINUE;
2355 k->start100 = k->start;
2357 /* set a timeout for the multi interface */
2358 Curl_expire(data, CURL_TIMEOUT_EXPECT_100);
2361 if(data->state.expect100header)
2362 /* when we've sent off the rest of the headers, we must await a
2363 100-continue but first finish sending the request */
2364 k->exp100 = EXP100_SENDING_REQUEST;
2366 /* enable the write bit when we're not waiting for continue */
2367 k->keepon |= KEEP_SEND;
2369 } /* if(conn->writesockfd != CURL_SOCKET_BAD) */
2370 } /* if(k->getheader || !data->set.opt_no_body) */