]> Git Repo - J-u-boot.git/blame - net/tftp.c
net: tftp: use correct printf codes
[J-u-boot.git] / net / tftp.c
CommitLineData
fe8c2806 1/*
2f09413f
LC
2 * Copyright 1994, 1995, 2000 Neil Russell.
3 * (See License)
4 * Copyright 2000, 2001 DENX Software Engineering, Wolfgang Denk, [email protected]
e59e3562
LC
5 * Copyright 2011 Comelit Group SpA,
6 * Luca Ceresoli <[email protected]>
fe8c2806
WD
7 */
8
9#include <common.h>
10#include <command.h>
0efe1bcf 11#include <efi_loader.h>
7b51b576 12#include <env.h>
8e8ccfe1 13#include <image.h>
55d5fd9a 14#include <mapmem.h>
fe8c2806 15#include <net.h>
34696958 16#include <net/tftp.h>
fe8c2806 17#include "bootp.h"
13dfe943
JH
18#ifdef CONFIG_SYS_DIRECT_FLASH_TFTP
19#include <flash.h>
20#endif
fe8c2806 21
a156c47e
SG
22DECLARE_GLOBAL_DATA_PTR;
23
2f09413f
LC
24/* Well known TFTP port # */
25#define WELL_KNOWN_PORT 69
26/* Millisecs to timeout for lost pkt */
af2ca59e 27#define TIMEOUT 5000UL
fe8c2806 28#ifndef CONFIG_NET_RETRY_COUNT
2f09413f 29/* # of timeouts before giving up */
af2ca59e 30# define TIMEOUT_COUNT 10
fe8c2806
WD
31#else
32# define TIMEOUT_COUNT (CONFIG_NET_RETRY_COUNT * 2)
33#endif
2f09413f
LC
34/* Number of "loading" hashes per line (for checking the image size) */
35#define HASHES_PER_LINE 65
fe8c2806
WD
36
37/*
38 * TFTP operations.
39 */
40#define TFTP_RRQ 1
41#define TFTP_WRQ 2
42#define TFTP_DATA 3
43#define TFTP_ACK 4
44#define TFTP_ERROR 5
fbe4b5cb 45#define TFTP_OACK 6
fe8c2806 46
8885c5fe
JH
47static ulong timeout_ms = TIMEOUT;
48static int timeout_count_max = TIMEOUT_COUNT;
85b19802 49static ulong time_start; /* Record time we started tftp */
e83cc063
BS
50
51/*
52 * These globals govern the timeout behavior when attempting a connection to a
8885c5fe 53 * TFTP server. tftp_timeout_ms specifies the number of milliseconds to
e83cc063 54 * wait for the server to respond to initial connection. Second global,
8885c5fe
JH
55 * tftp_timeout_count_max, gives the number of such connection retries.
56 * tftp_timeout_count_max must be non-negative and tftp_timeout_ms must be
e83cc063
BS
57 * positive. The globals are meant to be set (and restored) by code needing
58 * non-standard timeout behavior when initiating a TFTP transfer.
59 */
8885c5fe
JH
60ulong tftp_timeout_ms = TIMEOUT;
61int tftp_timeout_count_max = TIMEOUT_COUNT;
e83cc063 62
aafda38f
RB
63enum {
64 TFTP_ERR_UNDEFINED = 0,
65 TFTP_ERR_FILE_NOT_FOUND = 1,
66 TFTP_ERR_ACCESS_DENIED = 2,
67 TFTP_ERR_DISK_FULL = 3,
68 TFTP_ERR_UNEXPECTED_OPCODE = 4,
69 TFTP_ERR_UNKNOWN_TRANSFER_ID = 5,
70 TFTP_ERR_FILE_ALREADY_EXISTS = 6,
71};
72
049a95a7 73static struct in_addr tftp_remote_ip;
2f09413f 74/* The UDP port at their end */
8885c5fe 75static int tftp_remote_port;
2f09413f 76/* The UDP port at our end */
8885c5fe
JH
77static int tftp_our_port;
78static int timeout_count;
2f09413f 79/* packet sequence number */
8885c5fe 80static ulong tftp_cur_block;
2f09413f 81/* last packet sequence number received */
8885c5fe 82static ulong tftp_prev_block;
2f09413f 83/* count of sequence number wraparounds */
8885c5fe 84static ulong tftp_block_wrap;
2f09413f 85/* memory offset due to wrapping */
8885c5fe
JH
86static ulong tftp_block_wrap_offset;
87static int tftp_state;
a156c47e
SG
88static ulong tftp_load_addr;
89#ifdef CONFIG_LMB
90static ulong tftp_load_size;
91#endif
4fccb818 92#ifdef CONFIG_TFTP_TSIZE
2f09413f 93/* The file size reported by the server */
8885c5fe 94static int tftp_tsize;
2f09413f 95/* The number of hashes we printed */
8885c5fe 96static short tftp_tsize_num_hash;
4fccb818 97#endif
1fb7cd49 98#ifdef CONFIG_CMD_TFTPPUT
8885c5fe
JH
99/* 1 if writing, else 0 */
100static int tftp_put_active;
101/* 1 if we have sent the last block */
102static int tftp_put_final_block_sent;
1fb7cd49 103#else
8885c5fe 104#define tftp_put_active 0
1fb7cd49 105#endif
3f85ce27 106
e3fb0abe 107#define STATE_SEND_RRQ 1
fe8c2806
WD
108#define STATE_DATA 2
109#define STATE_TOO_LARGE 3
110#define STATE_BAD_MAGIC 4
fbe4b5cb 111#define STATE_OACK 5
e59e3562 112#define STATE_RECV_WRQ 6
1fb7cd49 113#define STATE_SEND_WRQ 7
fe8c2806 114
2f09413f
LC
115/* default TFTP block size */
116#define TFTP_BLOCK_SIZE 512
117/* sequence number is 16 bit */
118#define TFTP_SEQUENCE_SIZE ((ulong)(1<<16))
3f85ce27 119
fe8c2806
WD
120#define DEFAULT_NAME_LEN (8 + 4 + 1)
121static char default_filename[DEFAULT_NAME_LEN];
a93907c4
JCPV
122
123#ifndef CONFIG_TFTP_FILE_NAME_MAX_LEN
124#define MAX_LEN 128
125#else
126#define MAX_LEN CONFIG_TFTP_FILE_NAME_MAX_LEN
127#endif
128
129static char tftp_filename[MAX_LEN];
fe8c2806 130
85eb5caf
WD
131/* 512 is poor choice for ethernet, MTU is typically 1500.
132 * Minus eth.hdrs thats 1468. Can get 2x better throughput with
53a5c424 133 * almost-MTU block sizes. At least try... fall back to 512 if need be.
89ba81d1 134 * (but those using CONFIG_IP_DEFRAG may want to set a larger block in cfg file)
53a5c424 135 */
89ba81d1
AR
136#ifdef CONFIG_TFTP_BLOCKSIZE
137#define TFTP_MTU_BLOCKSIZE CONFIG_TFTP_BLOCKSIZE
138#else
53a5c424 139#define TFTP_MTU_BLOCKSIZE 1468
89ba81d1
AR
140#endif
141
8885c5fe
JH
142static unsigned short tftp_block_size = TFTP_BLOCK_SIZE;
143static unsigned short tftp_block_size_option = TFTP_MTU_BLOCKSIZE;
53a5c424 144
a156c47e 145static inline int store_block(int block, uchar *src, unsigned int len)
fe8c2806 146{
8885c5fe 147 ulong offset = block * tftp_block_size + tftp_block_wrap_offset;
3f85ce27 148 ulong newsize = offset + len;
a156c47e 149 ulong store_addr = tftp_load_addr + offset;
6d0f6bcf 150#ifdef CONFIG_SYS_DIRECT_FLASH_TFTP
fe8c2806
WD
151 int i, rc = 0;
152
c718b143 153 for (i = 0; i < CONFIG_SYS_MAX_FLASH_BANKS; i++) {
fe8c2806 154 /* start address in flash? */
be1b0d27
JF
155 if (flash_info[i].flash_id == FLASH_UNKNOWN)
156 continue;
a156c47e 157 if (store_addr >= flash_info[i].start[0]) {
fe8c2806
WD
158 rc = 1;
159 break;
160 }
161 }
162
163 if (rc) { /* Flash is destination for this packet */
a156c47e 164 rc = flash_write((char *)src, store_addr, len);
fe8c2806 165 if (rc) {
c718b143 166 flash_perror(rc);
a156c47e 167 return rc;
fe8c2806 168 }
13dfe943 169 } else
6d0f6bcf 170#endif /* CONFIG_SYS_DIRECT_FLASH_TFTP */
fe8c2806 171 {
a156c47e
SG
172 void *ptr;
173
174#ifdef CONFIG_LMB
ca48cb40
BM
175 ulong end_addr = tftp_load_addr + tftp_load_size;
176
177 if (!end_addr)
178 end_addr = ULONG_MAX;
179
a156c47e 180 if (store_addr < tftp_load_addr ||
ca48cb40 181 store_addr + len > end_addr) {
a156c47e
SG
182 puts("\nTFTP error: ");
183 puts("trying to overwrite reserved memory...\n");
184 return -1;
185 }
186#endif
187 ptr = map_sysmem(store_addr, len);
55d5fd9a
JH
188 memcpy(ptr, src, len);
189 unmap_sysmem(ptr);
fe8c2806
WD
190 }
191
1411157d
JH
192 if (net_boot_file_size < newsize)
193 net_boot_file_size = newsize;
a156c47e
SG
194
195 return 0;
fe8c2806
WD
196}
197
e4cde2f7 198/* Clear our state ready for a new transfer */
165099e7 199static void new_transfer(void)
e4cde2f7 200{
8885c5fe
JH
201 tftp_prev_block = 0;
202 tftp_block_wrap = 0;
203 tftp_block_wrap_offset = 0;
e4cde2f7 204#ifdef CONFIG_CMD_TFTPPUT
8885c5fe 205 tftp_put_final_block_sent = 0;
e4cde2f7
SG
206#endif
207}
208
1fb7cd49
SG
209#ifdef CONFIG_CMD_TFTPPUT
210/**
211 * Load the next block from memory to be sent over tftp.
212 *
213 * @param block Block number to send
214 * @param dst Destination buffer for data
215 * @param len Number of bytes in block (this one and every other)
216 * @return number of bytes loaded
217 */
218static int load_block(unsigned block, uchar *dst, unsigned len)
219{
220 /* We may want to get the final block from the previous set */
8885c5fe 221 ulong offset = ((int)block - 1) * len + tftp_block_wrap_offset;
1fb7cd49
SG
222 ulong tosend = len;
223
1411157d 224 tosend = min(net_boot_file_size - offset, tosend);
bb872dd9 225 (void)memcpy(dst, (void *)(image_save_addr + offset), tosend);
2bcc43b3 226 debug("%s: block=%u, offset=%lu, len=%u, tosend=%lu\n", __func__,
8885c5fe 227 block, offset, len, tosend);
1fb7cd49
SG
228 return tosend;
229}
230#endif
231
8885c5fe
JH
232static void tftp_send(void);
233static void tftp_timeout_handler(void);
fe8c2806
WD
234
235/**********************************************************************/
236
f5329bbc
SG
237static void show_block_marker(void)
238{
239#ifdef CONFIG_TFTP_TSIZE
8885c5fe
JH
240 if (tftp_tsize) {
241 ulong pos = tftp_cur_block * tftp_block_size +
242 tftp_block_wrap_offset;
7628afeb
MK
243 if (pos > tftp_tsize)
244 pos = tftp_tsize;
f5329bbc 245
8885c5fe 246 while (tftp_tsize_num_hash < pos * 50 / tftp_tsize) {
f5329bbc 247 putc('#');
8885c5fe 248 tftp_tsize_num_hash++;
f5329bbc 249 }
1fb7cd49 250 } else
f5329bbc 251#endif
1fb7cd49 252 {
8885c5fe 253 if (((tftp_cur_block - 1) % 10) == 0)
f5329bbc 254 putc('#');
8885c5fe 255 else if ((tftp_cur_block % (10 * HASHES_PER_LINE)) == 0)
f5329bbc
SG
256 puts("\n\t ");
257 }
258}
259
e4cde2f7
SG
260/**
261 * restart the current transfer due to an error
262 *
263 * @param msg Message to print for user
264 */
265static void restart(const char *msg)
266{
267 printf("\n%s; starting again\n", msg);
bc0571fc 268 net_start_again();
e4cde2f7
SG
269}
270
271/*
272 * Check if the block number has wrapped, and update progress
273 *
274 * TODO: The egregious use of global variables in this file should be tidied.
275 */
276static void update_block_number(void)
277{
278 /*
279 * RFC1350 specifies that the first data packet will
280 * have sequence number 1. If we receive a sequence
281 * number of 0 this means that there was a wrap
282 * around of the (16 bit) counter.
283 */
8885c5fe
JH
284 if (tftp_cur_block == 0 && tftp_prev_block != 0) {
285 tftp_block_wrap++;
286 tftp_block_wrap_offset += tftp_block_size * TFTP_SEQUENCE_SIZE;
287 timeout_count = 0; /* we've done well, reset the timeout */
e4cde2f7
SG
288 } else {
289 show_block_marker();
290 }
291}
292
f5329bbc
SG
293/* The TFTP get or put is complete */
294static void tftp_complete(void)
295{
296#ifdef CONFIG_TFTP_TSIZE
297 /* Print hash marks for the last packet received */
8885c5fe 298 while (tftp_tsize && tftp_tsize_num_hash < 49) {
f5329bbc 299 putc('#');
8885c5fe 300 tftp_tsize_num_hash++;
f5329bbc 301 }
8104f546 302 puts(" ");
8885c5fe 303 print_size(tftp_tsize, "");
f5329bbc 304#endif
85b19802
SG
305 time_start = get_timer(time_start);
306 if (time_start > 0) {
307 puts("\n\t "); /* Line up with "Loading: " */
1411157d 308 print_size(net_boot_file_size /
85b19802
SG
309 time_start * 1000, "/s");
310 }
f5329bbc 311 puts("\ndone\n");
22f6e99d 312 net_set_state(NETLOOP_SUCCESS);
f5329bbc
SG
313}
314
8885c5fe 315static void tftp_send(void)
fe8c2806 316{
1fb7cd49 317 uchar *pkt;
db288a96
JH
318 uchar *xp;
319 int len = 0;
320 ushort *s;
fe8c2806
WD
321
322 /*
323 * We will always be sending some sort of packet, so
324 * cobble together the packet headers now.
325 */
1203fcce 326 pkt = net_tx_packet + net_eth_hdr_size() + IP_UDP_HDR_SIZE;
fe8c2806 327
8885c5fe 328 switch (tftp_state) {
e3fb0abe 329 case STATE_SEND_RRQ:
1fb7cd49 330 case STATE_SEND_WRQ:
fe8c2806 331 xp = pkt;
7bc5ee07 332 s = (ushort *)pkt;
8c6914f1 333#ifdef CONFIG_CMD_TFTPPUT
8885c5fe 334 *s++ = htons(tftp_state == STATE_SEND_RRQ ? TFTP_RRQ :
1fb7cd49 335 TFTP_WRQ);
8c6914f1
SG
336#else
337 *s++ = htons(TFTP_RRQ);
338#endif
7bc5ee07 339 pkt = (uchar *)s;
c718b143 340 strcpy((char *)pkt, tftp_filename);
fe8c2806 341 pkt += strlen(tftp_filename) + 1;
c718b143 342 strcpy((char *)pkt, "octet");
fe8c2806 343 pkt += 5 /*strlen("octet")*/ + 1;
c718b143 344 strcpy((char *)pkt, "timeout");
fbe4b5cb 345 pkt += 7 /*strlen("timeout")*/ + 1;
8885c5fe 346 sprintf((char *)pkt, "%lu", timeout_ms / 1000);
0ebf04c6 347 debug("send option \"timeout %s\"\n", (char *)pkt);
fbe4b5cb 348 pkt += strlen((char *)pkt) + 1;
4fccb818 349#ifdef CONFIG_TFTP_TSIZE
1411157d
JH
350 pkt += sprintf((char *)pkt, "tsize%c%u%c",
351 0, net_boot_file_size, 0);
4fccb818 352#endif
53a5c424 353 /* try for more effic. blk size */
c718b143 354 pkt += sprintf((char *)pkt, "blksize%c%d%c",
8885c5fe 355 0, tftp_block_size_option, 0);
fe8c2806
WD
356 len = pkt - xp;
357 break;
358
fbe4b5cb 359 case STATE_OACK:
e59e3562
LC
360
361 case STATE_RECV_WRQ:
53a5c424 362 case STATE_DATA:
fe8c2806 363 xp = pkt;
7bc5ee07 364 s = (ushort *)pkt;
1fb7cd49 365 s[0] = htons(TFTP_ACK);
8885c5fe 366 s[1] = htons(tftp_cur_block);
1fb7cd49
SG
367 pkt = (uchar *)(s + 2);
368#ifdef CONFIG_CMD_TFTPPUT
8885c5fe
JH
369 if (tftp_put_active) {
370 int toload = tftp_block_size;
371 int loaded = load_block(tftp_cur_block, pkt, toload);
1fb7cd49
SG
372
373 s[0] = htons(TFTP_DATA);
374 pkt += loaded;
8885c5fe 375 tftp_put_final_block_sent = (loaded < toload);
1fb7cd49
SG
376 }
377#endif
fe8c2806
WD
378 len = pkt - xp;
379 break;
380
381 case STATE_TOO_LARGE:
382 xp = pkt;
7bc5ee07
WD
383 s = (ushort *)pkt;
384 *s++ = htons(TFTP_ERROR);
1fb7cd49
SG
385 *s++ = htons(3);
386
7bc5ee07 387 pkt = (uchar *)s;
c718b143 388 strcpy((char *)pkt, "File too large");
fe8c2806
WD
389 pkt += 14 /*strlen("File too large")*/ + 1;
390 len = pkt - xp;
391 break;
392
393 case STATE_BAD_MAGIC:
394 xp = pkt;
7bc5ee07
WD
395 s = (ushort *)pkt;
396 *s++ = htons(TFTP_ERROR);
397 *s++ = htons(2);
398 pkt = (uchar *)s;
c718b143 399 strcpy((char *)pkt, "File has bad magic");
fe8c2806
WD
400 pkt += 18 /*strlen("File has bad magic")*/ + 1;
401 len = pkt - xp;
402 break;
403 }
404
8885c5fe
JH
405 net_send_udp_packet(net_server_ethaddr, tftp_remote_ip,
406 tftp_remote_port, tftp_our_port, len);
fe8c2806
WD
407}
408
39bccd21 409#ifdef CONFIG_CMD_TFTPPUT
1fb7cd49 410static void icmp_handler(unsigned type, unsigned code, unsigned dest,
049a95a7
JH
411 struct in_addr sip, unsigned src, uchar *pkt,
412 unsigned len)
1fb7cd49
SG
413{
414 if (type == ICMP_NOT_REACH && code == ICMP_NOT_REACH_PORT) {
415 /* Oh dear the other end has gone away */
416 restart("TFTP server died");
417 }
418}
39bccd21 419#endif
1fb7cd49 420
049a95a7
JH
421static void tftp_handler(uchar *pkt, unsigned dest, struct in_addr sip,
422 unsigned src, unsigned len)
fe8c2806 423{
61fdd4f7
KP
424 __be16 proto;
425 __be16 *s;
ff13ac8c 426 int i;
fe8c2806 427
8885c5fe 428 if (dest != tftp_our_port) {
0bdd8acc 429 return;
fe8c2806 430 }
8885c5fe
JH
431 if (tftp_state != STATE_SEND_RRQ && src != tftp_remote_port &&
432 tftp_state != STATE_RECV_WRQ && tftp_state != STATE_SEND_WRQ)
fe8c2806 433 return;
fe8c2806 434
7bc325a1 435 if (len < 2)
fe8c2806 436 return;
fe8c2806
WD
437 len -= 2;
438 /* warning: don't use increment (++) in ntohs() macros!! */
61fdd4f7 439 s = (__be16 *)pkt;
7bc5ee07
WD
440 proto = *s++;
441 pkt = (uchar *)s;
fe8c2806 442 switch (ntohs(proto)) {
fe8c2806 443 case TFTP_RRQ:
1fb7cd49
SG
444 break;
445
fe8c2806 446 case TFTP_ACK:
1fb7cd49 447#ifdef CONFIG_CMD_TFTPPUT
8885c5fe
JH
448 if (tftp_put_active) {
449 if (tftp_put_final_block_sent) {
1fb7cd49
SG
450 tftp_complete();
451 } else {
452 /*
453 * Move to the next block. We want our block
454 * count to wrap just like the other end!
455 */
456 int block = ntohs(*s);
8885c5fe 457 int ack_ok = (tftp_cur_block == block);
1fb7cd49 458
8885c5fe 459 tftp_cur_block = (unsigned short)(block + 1);
1fb7cd49
SG
460 update_block_number();
461 if (ack_ok)
8885c5fe 462 tftp_send(); /* Send next data block */
1fb7cd49
SG
463 }
464 }
465#endif
fe8c2806 466 break;
1fb7cd49 467
fe8c2806
WD
468 default:
469 break;
470
e59e3562
LC
471#ifdef CONFIG_CMD_TFTPSRV
472 case TFTP_WRQ:
473 debug("Got WRQ\n");
049a95a7 474 tftp_remote_ip = sip;
8885c5fe
JH
475 tftp_remote_port = src;
476 tftp_our_port = 1024 + (get_timer(0) % 3072);
e4cde2f7 477 new_transfer();
8885c5fe 478 tftp_send(); /* Send ACK(0) */
e59e3562
LC
479 break;
480#endif
481
fbe4b5cb 482 case TFTP_OACK:
d371708a 483 debug("Got OACK: %s %s\n",
8885c5fe
JH
484 pkt, pkt + strlen((char *)pkt) + 1);
485 tftp_state = STATE_OACK;
486 tftp_remote_port = src;
60174746
WD
487 /*
488 * Check for 'blksize' option.
489 * Careful: "i" is signed, "len" is unsigned, thus
490 * something like "len-8" may give a *huge* number
491 */
c718b143 492 for (i = 0; i+8 < len; i++) {
8885c5fe
JH
493 if (strcmp((char *)pkt + i, "blksize") == 0) {
494 tftp_block_size = (unsigned short)
495 simple_strtoul((char *)pkt + i + 8,
496 NULL, 10);
0ebf04c6 497 debug("Blocksize ack: %s, %d\n",
8885c5fe 498 (char *)pkt + i + 8, tftp_block_size);
ff13ac8c 499 }
4fccb818 500#ifdef CONFIG_TFTP_TSIZE
2e320257 501 if (strcmp((char *)pkt+i, "tsize") == 0) {
8885c5fe 502 tftp_tsize = simple_strtoul((char *)pkt + i + 6,
2f09413f 503 NULL, 10);
4fccb818 504 debug("size = %s, %d\n",
8885c5fe 505 (char *)pkt + i + 6, tftp_tsize);
4fccb818
RG
506 }
507#endif
53a5c424 508 }
1fb7cd49 509#ifdef CONFIG_CMD_TFTPPUT
8885c5fe 510 if (tftp_put_active) {
1fb7cd49 511 /* Get ready to send the first block */
8885c5fe
JH
512 tftp_state = STATE_DATA;
513 tftp_cur_block++;
1fb7cd49
SG
514 }
515#endif
8885c5fe 516 tftp_send(); /* Send ACK or first data block */
fbe4b5cb 517 break;
fe8c2806
WD
518 case TFTP_DATA:
519 if (len < 2)
520 return;
521 len -= 2;
8885c5fe 522 tftp_cur_block = ntohs(*(__be16 *)pkt);
3f85ce27 523
e4cde2f7 524 update_block_number();
fe8c2806 525
8885c5fe 526 if (tftp_state == STATE_SEND_RRQ)
0ebf04c6 527 debug("Server did not acknowledge timeout option!\n");
fbe4b5cb 528
8885c5fe
JH
529 if (tftp_state == STATE_SEND_RRQ || tftp_state == STATE_OACK ||
530 tftp_state == STATE_RECV_WRQ) {
3f85ce27 531 /* first block received */
8885c5fe
JH
532 tftp_state = STATE_DATA;
533 tftp_remote_port = src;
e4cde2f7 534 new_transfer();
fe8c2806 535
8885c5fe
JH
536 if (tftp_cur_block != 1) { /* Assertion */
537 puts("\nTFTP error: ");
538 printf("First block is not block 1 (%ld)\n",
539 tftp_cur_block);
540 puts("Starting again\n\n");
bc0571fc 541 net_start_again();
fe8c2806
WD
542 break;
543 }
544 }
545
8885c5fe
JH
546 if (tftp_cur_block == tftp_prev_block) {
547 /* Same block again; ignore it. */
fe8c2806
WD
548 break;
549 }
550
8885c5fe 551 tftp_prev_block = tftp_cur_block;
f5fb7346 552 timeout_count_max = tftp_timeout_count_max;
bc0571fc 553 net_set_timeout_handler(timeout_ms, tftp_timeout_handler);
fe8c2806 554
a156c47e
SG
555 if (store_block(tftp_cur_block - 1, pkt + 2, len)) {
556 eth_halt();
557 net_set_state(NETLOOP_FAIL);
558 break;
559 }
fe8c2806
WD
560
561 /*
4d69e98c 562 * Acknowledge the block just received, which will prompt
20478cea 563 * the remote for the next one.
fe8c2806 564 */
8885c5fe 565 tftp_send();
fe8c2806 566
8885c5fe 567 if (len < tftp_block_size)
f5329bbc 568 tftp_complete();
fe8c2806
WD
569 break;
570
571 case TFTP_ERROR:
c718b143 572 printf("\nTFTP error: '%s' (%d)\n",
61fdd4f7 573 pkt + 2, ntohs(*(__be16 *)pkt));
aafda38f 574
61fdd4f7 575 switch (ntohs(*(__be16 *)pkt)) {
aafda38f
RB
576 case TFTP_ERR_FILE_NOT_FOUND:
577 case TFTP_ERR_ACCESS_DENIED:
578 puts("Not retrying...\n");
579 eth_halt();
22f6e99d 580 net_set_state(NETLOOP_FAIL);
aafda38f
RB
581 break;
582 case TFTP_ERR_UNDEFINED:
583 case TFTP_ERR_DISK_FULL:
584 case TFTP_ERR_UNEXPECTED_OPCODE:
585 case TFTP_ERR_UNKNOWN_TRANSFER_ID:
586 case TFTP_ERR_FILE_ALREADY_EXISTS:
587 default:
588 puts("Starting again\n\n");
bc0571fc 589 net_start_again();
aafda38f
RB
590 break;
591 }
fe8c2806
WD
592 break;
593 }
594}
595
596
8885c5fe 597static void tftp_timeout_handler(void)
fe8c2806 598{
8885c5fe 599 if (++timeout_count > timeout_count_max) {
e4cde2f7 600 restart("Retry count exceeded");
fe8c2806 601 } else {
c718b143 602 puts("T ");
bc0571fc 603 net_set_timeout_handler(timeout_ms, tftp_timeout_handler);
8885c5fe
JH
604 if (tftp_state != STATE_RECV_WRQ)
605 tftp_send();
fe8c2806
WD
606 }
607}
608
bb872dd9 609/* Initialize tftp_load_addr and tftp_load_size from image_load_addr and lmb */
a156c47e
SG
610static int tftp_init_load_addr(void)
611{
612#ifdef CONFIG_LMB
613 struct lmb lmb;
614 phys_size_t max_size;
615
9cc2323f 616 lmb_init_and_reserve(&lmb, gd->bd, (void *)gd->fdt_blob);
a156c47e 617
bb872dd9 618 max_size = lmb_get_free_size(&lmb, image_load_addr);
a156c47e
SG
619 if (!max_size)
620 return -1;
621
622 tftp_load_size = max_size;
623#endif
bb872dd9 624 tftp_load_addr = image_load_addr;
a156c47e
SG
625 return 0;
626}
fe8c2806 627
8885c5fe 628void tftp_start(enum proto_t protocol)
fe8c2806 629{
f5fb7346 630#if CONFIG_NET_TFTP_VARS
ecb0ccd9 631 char *ep; /* Environment pointer */
89ba81d1 632
c96f86ee
WD
633 /*
634 * Allow the user to choose TFTP blocksize and timeout.
635 * TFTP protocol has a minimal timeout of 1 second.
636 */
f5fb7346 637
00caae6d 638 ep = env_get("tftpblocksize");
2cb53608 639 if (ep != NULL)
8885c5fe 640 tftp_block_size_option = simple_strtol(ep, NULL, 10);
c96f86ee 641
00caae6d 642 ep = env_get("tftptimeout");
2cb53608 643 if (ep != NULL)
8885c5fe 644 timeout_ms = simple_strtol(ep, NULL, 10);
c96f86ee 645
af2ca59e
BM
646 if (timeout_ms < 1000) {
647 printf("TFTP timeout (%ld ms) too low, set min = 1000 ms\n",
8885c5fe 648 timeout_ms);
af2ca59e 649 timeout_ms = 1000;
c96f86ee
WD
650 }
651
00caae6d 652 ep = env_get("tftptimeoutcountmax");
f5fb7346
AA
653 if (ep != NULL)
654 tftp_timeout_count_max = simple_strtol(ep, NULL, 10);
655
656 if (tftp_timeout_count_max < 0) {
657 printf("TFTP timeout count max (%d ms) negative, set to 0\n",
658 tftp_timeout_count_max);
659 tftp_timeout_count_max = 0;
660 }
661#endif
662
c96f86ee 663 debug("TFTP blocksize = %i, timeout = %ld ms\n",
8885c5fe 664 tftp_block_size_option, timeout_ms);
ecb0ccd9 665
049a95a7 666 tftp_remote_ip = net_server_ip;
6ab12830 667 if (!net_parse_bootfile(&tftp_remote_ip, tftp_filename, MAX_LEN)) {
ea45cb0a 668 sprintf(default_filename, "%02X%02X%02X%02X.img",
049a95a7
JH
669 net_ip.s_addr & 0xFF,
670 (net_ip.s_addr >> 8) & 0xFF,
671 (net_ip.s_addr >> 16) & 0xFF,
672 (net_ip.s_addr >> 24) & 0xFF);
a93907c4 673
0c17b1b7
VZ
674 strncpy(tftp_filename, default_filename, DEFAULT_NAME_LEN);
675 tftp_filename[DEFAULT_NAME_LEN - 1] = 0;
fe8c2806 676
c718b143 677 printf("*** Warning: no boot file name; using '%s'\n",
8885c5fe 678 tftp_filename);
fe8c2806
WD
679 }
680
c718b143 681 printf("Using %s device\n", eth_get_name());
1fb7cd49 682 printf("TFTP %s server %pI4; our IP address is %pI4",
8c6914f1
SG
683#ifdef CONFIG_CMD_TFTPPUT
684 protocol == TFTPPUT ? "to" : "from",
685#else
8885c5fe 686 "from",
8c6914f1 687#endif
8885c5fe 688 &tftp_remote_ip, &net_ip);
fe8c2806
WD
689
690 /* Check if we need to send across this subnet */
049a95a7
JH
691 if (net_gateway.s_addr && net_netmask.s_addr) {
692 struct in_addr our_net;
693 struct in_addr remote_net;
694
695 our_net.s_addr = net_ip.s_addr & net_netmask.s_addr;
696 remote_net.s_addr = tftp_remote_ip.s_addr & net_netmask.s_addr;
697 if (our_net.s_addr != remote_net.s_addr)
698 printf("; sending through gateway %pI4", &net_gateway);
fe8c2806 699 }
c718b143 700 putc('\n');
fe8c2806 701
c718b143 702 printf("Filename '%s'.", tftp_filename);
fe8c2806 703
1411157d
JH
704 if (net_boot_file_expected_size_in_blocks) {
705 printf(" Size is 0x%x Bytes = ",
706 net_boot_file_expected_size_in_blocks << 9);
707 print_size(net_boot_file_expected_size_in_blocks << 9, "");
fe8c2806
WD
708 }
709
c718b143 710 putc('\n');
1fb7cd49 711#ifdef CONFIG_CMD_TFTPPUT
8885c5fe
JH
712 tftp_put_active = (protocol == TFTPPUT);
713 if (tftp_put_active) {
bb872dd9
SG
714 printf("Save address: 0x%lx\n", image_save_addr);
715 printf("Save size: 0x%lx\n", image_save_size);
716 net_boot_file_size = image_save_size;
1fb7cd49 717 puts("Saving: *\b");
8885c5fe 718 tftp_state = STATE_SEND_WRQ;
1fb7cd49
SG
719 new_transfer();
720 } else
721#endif
722 {
a156c47e
SG
723 if (tftp_init_load_addr()) {
724 eth_halt();
725 net_set_state(NETLOOP_FAIL);
726 puts("\nTFTP error: ");
727 puts("trying to overwrite reserved memory...\n");
728 return;
729 }
730 printf("Load address: 0x%lx\n", tftp_load_addr);
1fb7cd49 731 puts("Loading: *\b");
8885c5fe 732 tftp_state = STATE_SEND_RRQ;
64b8d7a6 733#ifdef CONFIG_CMD_BOOTEFI
0efe1bcf 734 efi_set_bootdev("Net", "", tftp_filename);
64b8d7a6 735#endif
1fb7cd49 736 }
fe8c2806 737
85b19802 738 time_start = get_timer(0);
8885c5fe 739 timeout_count_max = tftp_timeout_count_max;
e83cc063 740
bc0571fc 741 net_set_timeout_handler(timeout_ms, tftp_timeout_handler);
049a95a7 742 net_set_udp_handler(tftp_handler);
39bccd21 743#ifdef CONFIG_CMD_TFTPPUT
1fb7cd49 744 net_set_icmp_handler(icmp_handler);
39bccd21 745#endif
8885c5fe
JH
746 tftp_remote_port = WELL_KNOWN_PORT;
747 timeout_count = 0;
ecb0ccd9 748 /* Use a pseudo-random port unless a specific port is set */
8885c5fe 749 tftp_our_port = 1024 + (get_timer(0) % 3072);
53a5c424 750
ecb0ccd9 751#ifdef CONFIG_TFTP_PORT
00caae6d 752 ep = env_get("tftpdstp");
7bc325a1 753 if (ep != NULL)
8885c5fe 754 tftp_remote_port = simple_strtol(ep, NULL, 10);
00caae6d 755 ep = env_get("tftpsrcp");
7bc325a1 756 if (ep != NULL)
8885c5fe 757 tftp_our_port = simple_strtol(ep, NULL, 10);
ecb0ccd9 758#endif
8885c5fe 759 tftp_cur_block = 0;
fe8c2806 760
73a8b27c 761 /* zero out server ether in case the server ip has changed */
0adb5b76 762 memset(net_server_ethaddr, 0, 6);
8885c5fe
JH
763 /* Revert tftp_block_size to dflt */
764 tftp_block_size = TFTP_BLOCK_SIZE;
4fccb818 765#ifdef CONFIG_TFTP_TSIZE
8885c5fe
JH
766 tftp_tsize = 0;
767 tftp_tsize_num_hash = 0;
4fccb818 768#endif
73a8b27c 769
8885c5fe 770 tftp_send();
fe8c2806
WD
771}
772
e59e3562 773#ifdef CONFIG_CMD_TFTPSRV
8885c5fe 774void tftp_start_server(void)
e59e3562
LC
775{
776 tftp_filename[0] = 0;
777
a156c47e
SG
778 if (tftp_init_load_addr()) {
779 eth_halt();
780 net_set_state(NETLOOP_FAIL);
781 puts("\nTFTP error: trying to overwrite reserved memory...\n");
782 return;
783 }
e59e3562 784 printf("Using %s device\n", eth_get_name());
049a95a7 785 printf("Listening for TFTP transfer on %pI4\n", &net_ip);
a156c47e 786 printf("Load address: 0x%lx\n", tftp_load_addr);
e59e3562
LC
787
788 puts("Loading: *\b");
789
f5fb7346 790 timeout_count_max = tftp_timeout_count_max;
8885c5fe
JH
791 timeout_count = 0;
792 timeout_ms = TIMEOUT;
bc0571fc 793 net_set_timeout_handler(timeout_ms, tftp_timeout_handler);
e59e3562 794
8885c5fe
JH
795 /* Revert tftp_block_size to dflt */
796 tftp_block_size = TFTP_BLOCK_SIZE;
797 tftp_cur_block = 0;
798 tftp_our_port = WELL_KNOWN_PORT;
e59e3562
LC
799
800#ifdef CONFIG_TFTP_TSIZE
8885c5fe
JH
801 tftp_tsize = 0;
802 tftp_tsize_num_hash = 0;
e59e3562
LC
803#endif
804
8885c5fe 805 tftp_state = STATE_RECV_WRQ;
049a95a7 806 net_set_udp_handler(tftp_handler);
8e52533d
AR
807
808 /* zero out server ether in case the server ip has changed */
0adb5b76 809 memset(net_server_ethaddr, 0, 6);
e59e3562
LC
810}
811#endif /* CONFIG_CMD_TFTPSRV */
812
This page took 0.654995 seconds and 4 git commands to generate.