1 /***************************************************************************
3 * Project ___| | | | _ \| |
5 * | (__| |_| | _ <| |___
6 * \___|\___/|_| \_\_____|
8 * Copyright (C) 1998 - 2010, 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 #ifndef CURL_DISABLE_TFTP
26 /* -- WIN32 approved -- */
36 #ifdef HAVE_SYS_SOCKET_H
37 #include <sys/socket.h>
39 #include <netinet/in.h>
40 #ifdef HAVE_SYS_TIME_H
47 #ifdef HAVE_ARPA_INET_H
48 #include <arpa/inet.h>
53 #ifdef HAVE_SYS_IOCTL_H
54 #include <sys/ioctl.h>
57 #ifdef HAVE_SYS_PARAM_H
58 #include <sys/param.h>
64 #include <curl/curl.h>
71 #include "sockaddr.h" /* required for Curl_sockaddr_storage */
76 #define _MPRINTF_REPLACE /* use our functions only */
77 #include <curl/mprintf.h>
79 #include "curl_memory.h"
82 /* The last #include file should be: */
85 /* RFC2348 allows the block size to be negotiated */
86 #define TFTP_BLKSIZE_DEFAULT 512
87 #define TFTP_BLKSIZE_MIN 8
88 #define TFTP_BLKSIZE_MAX 65464
89 #define TFTP_OPTION_BLKSIZE "blksize"
92 #define TFTP_OPTION_TSIZE "tsize"
93 #define TFTP_OPTION_INTERVAL "timeout"
108 TFTP_EVENT_NONE = -1,
114 TFTP_EVENT_ERROR = 5,
127 TFTP_ERR_NOSUCHUSER, /* This will never be triggered by this code */
129 /* The remaining error codes are internal to curl */
130 TFTP_ERR_NONE = -100,
135 typedef struct tftp_packet {
139 typedef struct tftp_state_data {
144 struct connectdata *conn;
145 curl_socket_t sockfd;
152 unsigned short block;
153 struct Curl_sockaddr_storage local_addr;
154 struct Curl_sockaddr_storage remote_addr;
155 curl_socklen_t remote_addrlen;
159 int requested_blksize;
160 tftp_packet_t rpacket;
161 tftp_packet_t spacket;
165 /* Forward declarations */
166 static CURLcode tftp_rx(tftp_state_data_t *state, tftp_event_t event) ;
167 static CURLcode tftp_tx(tftp_state_data_t *state, tftp_event_t event) ;
168 static CURLcode tftp_connect(struct connectdata *conn, bool *done);
169 static CURLcode tftp_disconnect(struct connectdata *conn);
170 static CURLcode tftp_do(struct connectdata *conn, bool *done);
171 static CURLcode tftp_done(struct connectdata *conn,
172 CURLcode, bool premature);
173 static CURLcode tftp_setup_connection(struct connectdata * conn);
174 static CURLcode tftp_multi_statemach(struct connectdata *conn, bool *done);
175 static CURLcode tftp_doing(struct connectdata *conn, bool *dophase_done);
176 static int tftp_getsock(struct connectdata *conn, curl_socket_t *socks,
178 static CURLcode tftp_translate_code(tftp_error_t error);
182 * TFTP protocol handler.
185 const struct Curl_handler Curl_handler_tftp = {
187 tftp_setup_connection, /* setup_connection */
189 tftp_done, /* done */
190 ZERO_NULL, /* do_more */
191 tftp_connect, /* connect_it */
192 tftp_multi_statemach, /* connecting */
193 tftp_doing, /* doing */
194 tftp_getsock, /* proto_getsock */
195 tftp_getsock, /* doing_getsock */
196 ZERO_NULL, /* perform_getsock */
197 tftp_disconnect, /* disconnect */
198 PORT_TFTP, /* defport */
199 PROT_TFTP /* protocol */
202 /**********************************************************
204 * tftp_set_timeouts -
206 * Set timeouts based on state machine state.
207 * Use user provided connect timeouts until DATA or ACK
208 * packet is received, then use user-provided transfer timeouts
211 **********************************************************/
212 static CURLcode tftp_set_timeouts(tftp_state_data_t *state)
214 time_t maxtime, timeout;
216 bool start = (bool)(state->state == TFTP_STATE_START);
218 time(&state->start_time);
220 /* Compute drop-dead time */
221 timeout_ms = Curl_timeleft(state->conn, NULL, start);
224 /* time-out, bail out, go home */
225 failf(state->conn->data, "Connection time-out");
226 return CURLE_OPERATION_TIMEDOUT;
231 maxtime = (time_t)(timeout_ms + 500) / 1000;
232 state->max_time = state->start_time+maxtime;
234 /* Set per-block timeout to total */
237 /* Average restart after 5 seconds */
238 state->retry_max = (int)timeout/5;
240 if(state->retry_max < 1)
241 /* avoid division by zero below */
242 state->retry_max = 1;
244 /* Compute the re-start interval to suit the timeout */
245 state->retry_time = (int)timeout/state->retry_max;
246 if(state->retry_time<1)
252 maxtime = (time_t)(timeout_ms + 500) / 1000;
256 state->max_time = state->start_time+maxtime;
258 /* Set per-block timeout to 10% of total */
259 timeout = maxtime/10 ;
261 /* Average reposting an ACK after 15 seconds */
262 state->retry_max = (int)timeout/15;
264 /* But bound the total number */
265 if(state->retry_max<3)
268 if(state->retry_max>50)
271 /* Compute the re-ACK interval to suit the timeout */
272 state->retry_time = (int)(timeout/state->retry_max);
273 if(state->retry_time<1)
276 infof(state->conn->data,
277 "set timeouts for state %d; Total %ld, retry %d maxtry %d\n",
278 (int)state->state, (long)(state->max_time-state->start_time),
279 state->retry_time, state->retry_max);
282 time(&state->rx_time);
287 /**********************************************************
289 * tftp_set_send_first
291 * Event handler for the START state
293 **********************************************************/
295 static void setpacketevent(tftp_packet_t *packet, unsigned short num)
297 packet->data[0] = (unsigned char)(num >> 8);
298 packet->data[1] = (unsigned char)(num & 0xff);
302 static void setpacketblock(tftp_packet_t *packet, unsigned short num)
304 packet->data[2] = (unsigned char)(num >> 8);
305 packet->data[3] = (unsigned char)(num & 0xff);
308 static unsigned short getrpacketevent(const tftp_packet_t *packet)
310 return (unsigned short)((packet->data[0] << 8) | packet->data[1]);
313 static unsigned short getrpacketblock(const tftp_packet_t *packet)
315 return (unsigned short)((packet->data[2] << 8) | packet->data[3]);
318 static size_t Curl_strnlen(const char *string, size_t maxlen)
320 const char *end = memchr (string, '\0', maxlen);
321 return end ? (size_t) (end - string) : maxlen;
324 static const char *tftp_option_get(const char *buf, size_t len,
325 const char **option, const char **value)
329 loc = Curl_strnlen( buf, len );
330 loc++; /* NULL term */
336 loc += Curl_strnlen( buf+loc, len-loc );
337 loc++; /* NULL term */
341 *value = &buf[strlen(*option) + 1];
346 static CURLcode tftp_parse_option_ack(tftp_state_data_t *state,
347 const char *ptr, int len)
349 const char *tmp = ptr;
350 struct SessionHandle *data = state->conn->data;
352 /* if OACK doesn't contain blksize option, the default (512) must be used */
353 state->blksize = TFTP_BLKSIZE_DEFAULT;
355 while (tmp < ptr + len) {
356 const char *option, *value;
358 tmp = tftp_option_get(tmp, ptr + len - tmp, &option, &value);
360 failf(data, "Malformed ACK packet, rejecting");
361 return CURLE_TFTP_ILLEGAL;
364 infof(data, "got option=(%s) value=(%s)\n", option, value);
366 if(checkprefix(option, TFTP_OPTION_BLKSIZE)) {
369 blksize = strtol( value, NULL, 10 );
372 failf(data, "invalid blocksize value in OACK packet");
373 return CURLE_TFTP_ILLEGAL;
375 else if(blksize > TFTP_BLKSIZE_MAX) {
376 failf(data, "%s (%d)", "blksize is larger than max supported",
378 return CURLE_TFTP_ILLEGAL;
380 else if(blksize < TFTP_BLKSIZE_MIN) {
381 failf(data, "%s (%d)", "blksize is smaller than min supported",
383 return CURLE_TFTP_ILLEGAL;
385 else if (blksize > state->requested_blksize) {
386 /* could realloc pkt buffers here, but the spec doesn't call out
387 * support for the server requesting a bigger blksize than the client
389 failf(data, "%s (%ld)",
390 "server requested blksize larger than allocated", blksize);
391 return CURLE_TFTP_ILLEGAL;
394 state->blksize = (int)blksize;
395 infof(data, "%s (%d) %s (%d)\n", "blksize parsed from OACK",
396 state->blksize, "requested", state->requested_blksize);
398 else if(checkprefix(option, TFTP_OPTION_TSIZE)) {
401 tsize = strtol( value, NULL, 10 );
402 infof(data, "%s (%ld)\n", "tsize parsed from OACK", tsize);
404 /* tsize should be ignored on upload: Who cares about the size of the
406 if (!data->set.upload) {
408 failf(data, "invalid tsize -:%s:- value in OACK packet", value);
409 return CURLE_TFTP_ILLEGAL;
411 Curl_pgrsSetDownloadSize(data, tsize);
419 static size_t tftp_option_add(tftp_state_data_t *state, size_t csize,
420 char *buf, const char *option)
422 if( ( strlen(option) + csize + 1 ) > (size_t)state->blksize )
425 return( strlen(option) + 1 );
428 static CURLcode tftp_connect_for_tx(tftp_state_data_t *state,
432 #ifndef CURL_DISABLE_VERBOSE_STRINGS
433 struct SessionHandle *data = state->conn->data;
435 infof(data, "%s\n", "Connected for transmit");
437 state->state = TFTP_STATE_TX;
438 res = tftp_set_timeouts(state);
441 return tftp_tx(state, event);
444 static CURLcode tftp_connect_for_rx(tftp_state_data_t *state,
448 #ifndef CURL_DISABLE_VERBOSE_STRINGS
449 struct SessionHandle *data = state->conn->data;
451 infof(data, "%s\n", "Connected for receive");
453 state->state = TFTP_STATE_RX;
454 res = tftp_set_timeouts(state);
457 return tftp_rx(state, event);
460 static CURLcode tftp_send_first(tftp_state_data_t *state, tftp_event_t event)
464 const char *mode = "octet";
467 struct SessionHandle *data = state->conn->data;
468 CURLcode res = CURLE_OK;
470 /* Set ascii mode if -B flag was used */
471 if(data->set.prefer_ascii)
476 case TFTP_EVENT_INIT: /* Send the first packet out */
477 case TFTP_EVENT_TIMEOUT: /* Resend the first packet out */
478 /* Increment the retry counter, quit if over the limit */
480 if(state->retries>state->retry_max) {
481 state->error = TFTP_ERR_NORESPONSE;
482 state->state = TFTP_STATE_FIN;
486 if(data->set.upload) {
487 /* If we are uploading, send an WRQ */
488 setpacketevent(&state->spacket, TFTP_EVENT_WRQ);
489 state->conn->data->req.upload_fromhere =
490 (char *)state->spacket.data+4;
491 if(data->set.infilesize != -1)
492 Curl_pgrsSetUploadSize(data, data->set.infilesize);
495 /* If we are downloading, send an RRQ */
496 setpacketevent(&state->spacket, TFTP_EVENT_RRQ);
498 /* As RFC3617 describes the separator slash is not actually part of the
499 file name so we skip the always-present first letter of the path
501 filename = curl_easy_unescape(data, &state->conn->data->state.path[1], 0,
504 return CURLE_OUT_OF_MEMORY;
506 snprintf((char *)state->spacket.data+2,
508 "%s%c%s%c", filename, '\0', mode, '\0');
509 sbytes = 4 + strlen(filename) + strlen(mode);
511 /* add tsize option */
512 if(data->set.upload && (data->set.infilesize != -1))
513 snprintf( buf, sizeof(buf), "%" FORMAT_OFF_T, data->set.infilesize );
515 strcpy(buf, "0"); /* the destination is large enough */
517 sbytes += tftp_option_add(state, sbytes,
518 (char *)state->spacket.data+sbytes,
520 sbytes += tftp_option_add(state, sbytes,
521 (char *)state->spacket.data+sbytes, buf);
522 /* add blksize option */
523 snprintf( buf, sizeof(buf), "%d", state->requested_blksize );
524 sbytes += tftp_option_add(state, sbytes,
525 (char *)state->spacket.data+sbytes,
526 TFTP_OPTION_BLKSIZE);
527 sbytes += tftp_option_add(state, sbytes,
528 (char *)state->spacket.data+sbytes, buf );
529 /* add timeout option, this is the max time the session may live */
530 snprintf( buf, sizeof(buf), "%d", state->retry_time*state->retry_max );
531 sbytes += tftp_option_add(state, sbytes,
532 (char *)state->spacket.data+sbytes,
533 TFTP_OPTION_INTERVAL);
534 sbytes += tftp_option_add(state, sbytes,
535 (char *)state->spacket.data+sbytes, buf );
537 senddata = sendto(state->sockfd, (void *)state->spacket.data,
539 state->conn->ip_addr->ai_addr,
540 state->conn->ip_addr->ai_addrlen);
541 if(senddata != (ssize_t)sbytes) {
542 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
544 Curl_safefree(filename);
547 case TFTP_EVENT_OACK:
548 if(data->set.upload) {
549 res = tftp_connect_for_tx(state, event);
552 res = tftp_connect_for_rx(state, event);
556 case TFTP_EVENT_ACK: /* Connected for transmit */
557 res = tftp_connect_for_tx(state, event);
560 case TFTP_EVENT_DATA: /* Connected for receive */
561 res = tftp_connect_for_rx(state, event);
564 case TFTP_EVENT_ERROR:
565 state->state = TFTP_STATE_FIN;
569 failf(state->conn->data, "tftp_send_first: internal error");
575 /**********************************************************
579 * Event handler for the RX state
581 **********************************************************/
582 static CURLcode tftp_rx(tftp_state_data_t *state, tftp_event_t event)
586 struct SessionHandle *data = state->conn->data;
590 case TFTP_EVENT_DATA:
591 /* Is this the block we expect? */
592 rblock = getrpacketblock(&state->rpacket);
593 if((state->block+1) != rblock) {
594 /* No, log it, up the retry count and fail if over the limit */
596 "Received unexpected DATA packet block %d\n", rblock);
598 if(state->retries>state->retry_max) {
599 failf(data, "tftp_rx: giving up waiting for block %d",
601 return CURLE_TFTP_ILLEGAL;
604 /* This is the expected block. Reset counters and ACK it. */
605 state->block = (unsigned short)rblock;
607 setpacketevent(&state->spacket, TFTP_EVENT_ACK);
608 setpacketblock(&state->spacket, state->block);
609 sbytes = sendto(state->sockfd, (void *)state->spacket.data,
611 (struct sockaddr *)&state->remote_addr,
612 state->remote_addrlen);
614 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
615 return CURLE_SEND_ERROR;
618 /* Check if completed (That is, a less than full packet is received) */
619 if(state->rbytes < (ssize_t)state->blksize+4){
620 state->state = TFTP_STATE_FIN;
623 state->state = TFTP_STATE_RX;
625 time(&state->rx_time);
628 case TFTP_EVENT_OACK:
629 /* ACK option acknowledgement so we can move on to data */
632 setpacketevent(&state->spacket, TFTP_EVENT_ACK);
633 setpacketblock(&state->spacket, state->block);
634 sbytes = sendto(state->sockfd, (void *)state->spacket.data,
636 (struct sockaddr *)&state->remote_addr,
637 state->remote_addrlen);
639 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
640 return CURLE_SEND_ERROR;
643 /* we're ready to RX data */
644 state->state = TFTP_STATE_RX;
645 time(&state->rx_time);
648 case TFTP_EVENT_TIMEOUT:
649 /* Increment the retry count and fail if over the limit */
652 "Timeout waiting for block %d ACK. Retries = %d\n",
653 state->block+1, state->retries);
654 if(state->retries > state->retry_max) {
655 state->error = TFTP_ERR_TIMEOUT;
656 state->state = TFTP_STATE_FIN;
659 /* Resend the previous ACK */
660 sbytes = sendto(state->sockfd, (void *)state->spacket.data,
662 (struct sockaddr *)&state->remote_addr,
663 state->remote_addrlen);
665 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
666 return CURLE_SEND_ERROR;
671 case TFTP_EVENT_ERROR:
672 setpacketevent(&state->spacket, TFTP_EVENT_ERROR);
673 setpacketblock(&state->spacket, state->block);
674 (void)sendto(state->sockfd, (void *)state->spacket.data,
676 (struct sockaddr *)&state->remote_addr,
677 state->remote_addrlen);
678 /* don't bother with the return code, but if the socket is still up we
679 * should be a good TFTP client and let the server know we're done */
680 state->state = TFTP_STATE_FIN;
684 failf(data, "%s", "tftp_rx: internal error");
685 return CURLE_TFTP_ILLEGAL; /* not really the perfect return code for
691 /**********************************************************
695 * Event handler for the TX state
697 **********************************************************/
698 static CURLcode tftp_tx(tftp_state_data_t *state, tftp_event_t event)
700 struct SessionHandle *data = state->conn->data;
703 CURLcode res = CURLE_OK;
704 struct SingleRequest *k = &data->req;
709 case TFTP_EVENT_OACK:
710 if (event == TFTP_EVENT_ACK) {
712 rblock = getrpacketblock(&state->rpacket);
714 if(rblock != state->block) {
715 /* This isn't the expected block. Log it and up the retry counter */
716 infof(data, "Received ACK for block %d, expecting %d\n",
717 rblock, state->block);
719 /* Bail out if over the maximum */
720 if(state->retries>state->retry_max) {
721 failf(data, "tftp_tx: giving up waiting for block %d ack",
723 res = CURLE_SEND_ERROR;
726 /* Re-send the data packet */
727 sbytes = sendto(state->sockfd, (void *)&state->spacket,
728 4+state->sbytes, SEND_4TH_ARG,
729 (struct sockaddr *)&state->remote_addr,
730 state->remote_addrlen);
731 /* Check all sbytes were sent */
733 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
734 res = CURLE_SEND_ERROR;
739 /* This is the expected packet. Reset the counters and send the next
741 time(&state->rx_time);
745 state->block = 1; /* first data block is 1 when using OACK */
748 setpacketevent(&state->spacket, TFTP_EVENT_DATA);
749 setpacketblock(&state->spacket, state->block);
750 if(state->block > 1 && state->sbytes < (int)state->blksize) {
751 state->state = TFTP_STATE_FIN;
754 res = Curl_fillreadbuffer(state->conn, (size_t)state->blksize,
758 sbytes = sendto(state->sockfd, (void *)state->spacket.data,
759 4+state->sbytes, SEND_4TH_ARG,
760 (struct sockaddr *)&state->remote_addr,
761 state->remote_addrlen);
762 /* Check all sbytes were sent */
764 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
765 return CURLE_SEND_ERROR;
767 /* Update the progress meter */
768 k->writebytecount += state->sbytes;
769 Curl_pgrsSetUploadCounter(data, k->writebytecount);
772 case TFTP_EVENT_TIMEOUT:
773 /* Increment the retry counter and log the timeout */
775 infof(data, "Timeout waiting for block %d ACK. "
776 " Retries = %d\n", state->block+1, state->retries);
777 /* Decide if we've had enough */
778 if(state->retries > state->retry_max) {
779 state->error = TFTP_ERR_TIMEOUT;
780 state->state = TFTP_STATE_FIN;
783 /* Re-send the data packet */
784 sbytes = sendto(state->sockfd, (void *)state->spacket.data,
785 4+state->sbytes, SEND_4TH_ARG,
786 (struct sockaddr *)&state->remote_addr,
787 state->remote_addrlen);
788 /* Check all sbytes were sent */
790 failf(data, "%s", Curl_strerror(state->conn, SOCKERRNO));
791 return CURLE_SEND_ERROR;
793 /* since this was a re-send, we remain at the still byte position */
794 Curl_pgrsSetUploadCounter(data, k->writebytecount);
798 case TFTP_EVENT_ERROR:
799 state->state = TFTP_STATE_FIN;
800 setpacketevent(&state->spacket, TFTP_EVENT_ERROR);
801 setpacketblock(&state->spacket, state->block);
802 (void)sendto(state->sockfd, (void *)state->spacket.data, 4, SEND_4TH_ARG,
803 (struct sockaddr *)&state->remote_addr,
804 state->remote_addrlen);
805 /* don't bother with the return code, but if the socket is still up we
806 * should be a good TFTP client and let the server know we're done */
807 state->state = TFTP_STATE_FIN;
811 failf(data, "tftp_tx: internal error, event: %i", (int)(event));
818 /**********************************************************
820 * tftp_translate_code
822 * Translate internal error codes to CURL error codes
824 **********************************************************/
825 static CURLcode tftp_translate_code(tftp_error_t error)
827 CURLcode code = CURLE_OK;
829 if(error != TFTP_ERR_NONE) {
831 case TFTP_ERR_NOTFOUND:
832 code = CURLE_TFTP_NOTFOUND;
835 code = CURLE_TFTP_PERM;
837 case TFTP_ERR_DISKFULL:
838 code = CURLE_REMOTE_DISK_FULL;
841 case TFTP_ERR_ILLEGAL:
842 code = CURLE_TFTP_ILLEGAL;
844 case TFTP_ERR_UNKNOWNID:
845 code = CURLE_TFTP_UNKNOWNID;
847 case TFTP_ERR_EXISTS:
848 code = CURLE_REMOTE_FILE_EXISTS;
850 case TFTP_ERR_NOSUCHUSER:
851 code = CURLE_TFTP_NOSUCHUSER;
853 case TFTP_ERR_TIMEOUT:
854 code = CURLE_OPERATION_TIMEDOUT;
856 case TFTP_ERR_NORESPONSE:
857 code = CURLE_COULDNT_CONNECT;
860 code= CURLE_ABORTED_BY_CALLBACK;
871 /**********************************************************
875 * The tftp state machine event dispatcher
877 **********************************************************/
878 static CURLcode tftp_state_machine(tftp_state_data_t *state,
881 CURLcode res = CURLE_OK;
882 struct SessionHandle *data = state->conn->data;
883 switch(state->state) {
884 case TFTP_STATE_START:
885 DEBUGF(infof(data, "TFTP_STATE_START\n"));
886 res = tftp_send_first(state, event);
889 DEBUGF(infof(data, "TFTP_STATE_RX\n"));
890 res = tftp_rx(state, event);
893 DEBUGF(infof(data, "TFTP_STATE_TX\n"));
894 res = tftp_tx(state, event);
897 infof(data, "%s\n", "TFTP finished");
900 DEBUGF(infof(data, "STATE: %d\n", state->state));
901 failf(data, "%s", "Internal state machine error");
902 res = CURLE_TFTP_ILLEGAL;
908 /**********************************************************
912 * The disconnect callback
914 **********************************************************/
915 static CURLcode tftp_disconnect(struct connectdata *conn)
917 tftp_state_data_t *state = conn->proto.tftpc;
919 /* done, free dynamically allocated pkt buffers */
921 Curl_safefree(state->rpacket.data);
922 Curl_safefree(state->spacket.data);
929 /**********************************************************
933 * The connect callback
935 **********************************************************/
936 static CURLcode tftp_connect(struct connectdata *conn, bool *done)
939 tftp_state_data_t *state;
942 blksize = TFTP_BLKSIZE_DEFAULT;
944 /* If there already is a protocol-specific struct allocated for this
945 sessionhandle, deal with it */
946 Curl_reset_reqproto(conn);
948 state = conn->proto.tftpc = calloc(1, sizeof(tftp_state_data_t));
950 return CURLE_OUT_OF_MEMORY;
952 /* alloc pkt buffers based on specified blksize */
953 if(conn->data->set.tftp_blksize) {
954 blksize = (int)conn->data->set.tftp_blksize;
955 if(blksize > TFTP_BLKSIZE_MAX || blksize < TFTP_BLKSIZE_MIN )
956 return CURLE_TFTP_ILLEGAL;
959 if(!state->rpacket.data) {
960 state->rpacket.data = calloc(1, blksize + 2 + 2);
962 if(!state->rpacket.data)
963 return CURLE_OUT_OF_MEMORY;
966 if(!state->spacket.data) {
967 state->spacket.data = calloc(1, blksize + 2 + 2);
969 if(!state->spacket.data)
970 return CURLE_OUT_OF_MEMORY;
973 conn->bits.close = TRUE; /* we don't keep TFTP connections up bascially
974 because there's none or very little gain for UDP
978 state->sockfd = state->conn->sock[FIRSTSOCKET];
979 state->state = TFTP_STATE_START;
980 state->error = TFTP_ERR_NONE;
981 state->blksize = TFTP_BLKSIZE_DEFAULT;
982 state->requested_blksize = blksize;
984 ((struct sockaddr *)&state->local_addr)->sa_family =
985 (unsigned short)(conn->ip_addr->ai_family);
987 tftp_set_timeouts(state);
989 if(!conn->bits.bound) {
990 /* If not already bound, bind to any interface, random UDP port. If it is
991 * reused or a custom local port was desired, this has already been done!
993 * We once used the size of the local_addr struct as the third argument
994 * for bind() to better work with IPv6 or whatever size the struct could
995 * have, but we learned that at least Tru64, AIX and IRIX *requires* the
996 * size of that argument to match the exact size of a 'sockaddr_in' struct
997 * when running IPv4-only.
999 * Therefore we use the size from the address we connected to, which we
1000 * assume uses the same IP version and thus hopefully this works for both
1003 rc = bind(state->sockfd, (struct sockaddr *)&state->local_addr,
1004 conn->ip_addr->ai_addrlen);
1006 failf(conn->data, "bind() failed; %s",
1007 Curl_strerror(conn, SOCKERRNO));
1008 return CURLE_COULDNT_CONNECT;
1010 conn->bits.bound = TRUE;
1013 Curl_pgrsStartNow(conn->data);
1020 /**********************************************************
1026 **********************************************************/
1027 static CURLcode tftp_done(struct connectdata *conn, CURLcode status,
1030 CURLcode code = CURLE_OK;
1031 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1033 (void)status; /* unused */
1034 (void)premature; /* not used */
1036 Curl_pgrsDone(conn);
1038 /* If we have encountered an error */
1039 code = tftp_translate_code(state->error);
1044 /**********************************************************
1048 * The getsock callback
1050 **********************************************************/
1051 static int tftp_getsock(struct connectdata *conn, curl_socket_t *socks,
1055 return GETSOCK_BLANK;
1057 socks[0] = conn->sock[FIRSTSOCKET];
1059 return GETSOCK_READSOCK(0);
1062 /**********************************************************
1064 * tftp_receive_packet
1066 * Called once select fires and data is ready on the socket
1068 **********************************************************/
1069 static CURLcode tftp_receive_packet(struct connectdata *conn)
1071 struct Curl_sockaddr_storage fromaddr;
1072 curl_socklen_t fromlen;
1073 CURLcode result = CURLE_OK;
1074 struct SessionHandle *data = conn->data;
1075 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1076 struct SingleRequest *k = &data->req;
1078 /* Receive the packet */
1079 fromlen = sizeof(fromaddr);
1080 state->rbytes = (int)recvfrom(state->sockfd,
1081 (void *)state->rpacket.data,
1084 (struct sockaddr *)&fromaddr,
1086 if(state->remote_addrlen==0) {
1087 memcpy(&state->remote_addr, &fromaddr, fromlen);
1088 state->remote_addrlen = fromlen;
1091 /* Sanity check packet length */
1092 if(state->rbytes < 4) {
1093 failf(data, "Received too short packet");
1094 /* Not a timeout, but how best to handle it? */
1095 state->event = TFTP_EVENT_TIMEOUT;
1098 /* The event is given by the TFTP packet time */
1099 state->event = (tftp_event_t)getrpacketevent(&state->rpacket);
1101 switch(state->event) {
1102 case TFTP_EVENT_DATA:
1103 /* Don't pass to the client empty or retransmitted packets */
1104 if(state->rbytes > 4 &&
1105 ((state->block+1) == getrpacketblock(&state->rpacket))) {
1106 result = Curl_client_write(conn, CLIENTWRITE_BODY,
1107 (char *)state->rpacket.data+4,
1110 tftp_state_machine(state, TFTP_EVENT_ERROR);
1113 k->bytecount += state->rbytes-4;
1114 Curl_pgrsSetDownloadCounter(data, (curl_off_t) k->bytecount);
1117 case TFTP_EVENT_ERROR:
1118 state->error = (tftp_error_t)getrpacketblock(&state->rpacket);
1119 infof(data, "%s\n", (const char *)state->rpacket.data+4);
1121 case TFTP_EVENT_ACK:
1123 case TFTP_EVENT_OACK:
1124 result = tftp_parse_option_ack(state,
1125 (const char *)state->rpacket.data+2,
1130 case TFTP_EVENT_RRQ:
1131 case TFTP_EVENT_WRQ:
1133 failf(data, "%s", "Internal error: Unexpected packet");
1137 /* Update the progress meter */
1138 if(Curl_pgrsUpdate(conn)) {
1139 tftp_state_machine(state, TFTP_EVENT_ERROR);
1140 return CURLE_ABORTED_BY_CALLBACK;
1146 /**********************************************************
1148 * tftp_state_timeout
1150 * Check if timeouts have been reached
1152 **********************************************************/
1153 static long tftp_state_timeout(struct connectdata *conn, tftp_event_t *event)
1156 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1159 *event = TFTP_EVENT_NONE;
1162 if(current > state->max_time) {
1163 DEBUGF(infof(conn->data, "timeout: %ld > %ld\n",
1164 (long)current, (long)state->max_time));
1165 state->error = TFTP_ERR_TIMEOUT;
1166 state->state = TFTP_STATE_FIN;
1169 else if (current > state->rx_time+state->retry_time) {
1171 *event = TFTP_EVENT_TIMEOUT;
1172 time(&state->rx_time); /* update even though we received nothing */
1173 return(state->max_time-current);
1176 return(state->max_time-current);
1181 /**********************************************************
1183 * tftp_easy_statemach
1185 * Handle easy request until completion
1187 **********************************************************/
1188 static CURLcode tftp_easy_statemach(struct connectdata *conn)
1192 CURLcode result = CURLE_OK;
1193 struct SessionHandle *data = conn->data;
1194 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1197 struct SingleRequest *k = &data->req;
1198 struct timeval transaction_start = Curl_tvnow();
1200 k->start = transaction_start;
1201 k->now = transaction_start;
1203 /* Run the TFTP State Machine */
1204 for(; (state->state != TFTP_STATE_FIN) && (result == CURLE_OK); ) {
1206 timeout_ms = state->retry_time * 1000;
1208 if (data->set.upload) {
1209 if (data->set.max_send_speed &&
1210 (data->progress.ulspeed > data->set.max_send_speed)) {
1211 fd_read = CURL_SOCKET_BAD;
1212 timeout_ms = Curl_sleep_time(data->set.max_send_speed,
1213 data->progress.ulspeed, state->blksize);
1216 fd_read = state->sockfd;
1220 if (data->set.max_recv_speed &&
1221 (data->progress.dlspeed > data->set.max_recv_speed)) {
1222 fd_read = CURL_SOCKET_BAD;
1223 timeout_ms = Curl_sleep_time(data->set.max_recv_speed,
1224 data->progress.dlspeed, state->blksize);
1227 fd_read = state->sockfd;
1231 if(data->set.timeout) {
1232 timeout_ms = data->set.timeout - Curl_tvdiff(k->now, k->start);
1233 if (timeout_ms > state->retry_time * 1000)
1234 timeout_ms = state->retry_time * 1000;
1235 else if(timeout_ms < 0)
1240 /* Wait until ready to read or timeout occurs */
1241 rc = Curl_socket_ready(fd_read, CURL_SOCKET_BAD, (int)(timeout_ms));
1243 k->now = Curl_tvnow();
1245 /* Force a progress callback if it's been too long */
1246 if (Curl_tvdiff(k->now, k->start) >= data->set.timeout) {
1247 if(Curl_pgrsUpdate(conn)) {
1248 tftp_state_machine(state, TFTP_EVENT_ERROR);
1249 return CURLE_ABORTED_BY_CALLBACK;
1256 int error = SOCKERRNO;
1257 failf(data, "%s", Curl_strerror(conn, error));
1258 state->event = TFTP_EVENT_ERROR;
1263 /* A timeout occured, but our timeout is variable, so maybe
1265 long rtms = state->retry_time * 1000;
1266 if (Curl_tvdiff(k->now, transaction_start) > rtms) {
1267 state->event = TFTP_EVENT_TIMEOUT;
1268 /* Force a look at transfer timeouts */
1272 continue; /* skip state machine */
1276 result = tftp_receive_packet(conn);
1277 if (result == CURLE_OK)
1278 transaction_start = Curl_tvnow();
1281 *k->bytecountp = k->bytecount; /* read count */
1282 if(k->writebytecountp)
1283 *k->writebytecountp = k->writebytecount; /* write count */
1288 tftp_state_timeout(conn, NULL);
1295 result = tftp_state_machine(state, state->event);
1298 /* Tell curl we're done */
1299 Curl_setup_transfer(conn, -1, -1, FALSE, NULL, -1, NULL);
1304 /**********************************************************
1306 * tftp_multi_statemach
1308 * Handle single RX socket event and return
1310 **********************************************************/
1311 static CURLcode tftp_multi_statemach(struct connectdata *conn, bool *done)
1315 CURLcode result = CURLE_OK;
1316 struct SessionHandle *data = conn->data;
1317 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1318 long timeout_ms = tftp_state_timeout(conn, &event);
1322 if(timeout_ms <= 0) {
1323 failf(data, "TFTP response timeout");
1324 return CURLE_OPERATION_TIMEDOUT;
1326 else if (event != TFTP_EVENT_NONE) {
1327 result = tftp_state_machine(state, event);
1328 if(result != CURLE_OK)
1330 *done = (bool)(state->state == TFTP_STATE_FIN);
1332 /* Tell curl we're done */
1333 Curl_setup_transfer(conn, -1, -1, FALSE, NULL, -1, NULL);
1336 /* no timeouts to handle, check our socket */
1337 rc = Curl_socket_ready(state->sockfd, CURL_SOCKET_BAD, 0);
1341 int error = SOCKERRNO;
1342 failf(data, "%s", Curl_strerror(conn, error));
1343 state->event = TFTP_EVENT_ERROR;
1346 result = tftp_receive_packet(conn);
1347 if(result != CURLE_OK)
1349 result = tftp_state_machine(state, state->event);
1350 if(result != CURLE_OK)
1352 *done = (bool)(state->state == TFTP_STATE_FIN);
1354 /* Tell curl we're done */
1355 Curl_setup_transfer(conn, -1, -1, FALSE, NULL, -1, NULL);
1357 /* if rc == 0, then select() timed out */
1363 /**********************************************************
1367 * Called from multi.c while DOing
1369 **********************************************************/
1370 static CURLcode tftp_doing(struct connectdata *conn, bool *dophase_done)
1373 result = tftp_multi_statemach(conn, dophase_done);
1376 DEBUGF(infof(conn->data, "DO phase is complete\n"));
1381 /**********************************************************
1385 * Entry point for transfer from tftp_do, sarts state mach
1387 **********************************************************/
1388 static CURLcode tftp_perform(struct connectdata *conn, bool *dophase_done)
1390 CURLcode result = CURLE_OK;
1391 tftp_state_data_t *state = (tftp_state_data_t *)conn->proto.tftpc;
1393 *dophase_done = FALSE;
1395 result = tftp_state_machine(state, TFTP_EVENT_INIT);
1397 if(state->state == TFTP_STATE_FIN || result != CURLE_OK)
1400 if(conn->data->state.used_interface == Curl_if_multi)
1401 tftp_multi_statemach(conn, dophase_done);
1403 result = tftp_easy_statemach(conn);
1404 *dophase_done = TRUE; /* with the easy interface we are done here */
1408 DEBUGF(infof(conn->data, "DO phase is complete\n"));
1414 /**********************************************************
1420 * This callback initiates the TFTP transfer
1422 **********************************************************/
1424 static CURLcode tftp_do(struct connectdata *conn, bool *done)
1426 tftp_state_data_t *state;
1432 Since connections can be re-used between SessionHandles, this might be a
1433 connection already existing but on a fresh SessionHandle struct so we must
1434 make sure we have a good 'struct TFTP' to play with. For new connections,
1435 the struct TFTP is allocated and setup in the tftp_connect() function.
1437 Curl_reset_reqproto(conn);
1439 if(!conn->proto.tftpc) {
1440 code = tftp_connect(conn, done);
1444 state = (tftp_state_data_t *)conn->proto.tftpc;
1446 code = tftp_perform(conn, done);
1448 /* If tftp_perform() returned an error, use that for return code. If it
1449 was OK, see if tftp_translate_code() has an error. */
1450 if (code == CURLE_OK)
1451 /* If we have encountered an internal tftp error, translate it. */
1452 code = tftp_translate_code(state->error);
1457 static CURLcode tftp_setup_connection(struct connectdata * conn)
1459 struct SessionHandle *data = conn->data;
1463 conn->socktype = SOCK_DGRAM; /* UDP datagram based */
1465 /* TFTP URLs support an extension like ";mode=<typecode>" that
1466 * we'll try to get now! */
1467 type = strstr(data->state.path, ";mode=");
1470 type = strstr(conn->host.rawalloc, ";mode=");
1473 *type = 0; /* it was in the middle of the hostname */
1474 command = Curl_raw_toupper(type[6]);
1477 case 'A': /* ASCII mode */
1478 case 'N': /* NETASCII mode */
1479 data->set.prefer_ascii = TRUE;
1482 case 'O': /* octet mode */
1483 case 'I': /* binary mode */
1485 /* switch off ASCII */
1486 data->set.prefer_ascii = FALSE;