]>
Commit | Line | Data |
---|---|---|
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 |
22 | DECLARE_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 |
47 | static ulong timeout_ms = TIMEOUT; |
48 | static int timeout_count_max = TIMEOUT_COUNT; | |
85b19802 | 49 | static 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 |
60 | ulong tftp_timeout_ms = TIMEOUT; |
61 | int tftp_timeout_count_max = TIMEOUT_COUNT; | |
e83cc063 | 62 | |
aafda38f RB |
63 | enum { |
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 | 73 | static struct in_addr tftp_remote_ip; |
2f09413f | 74 | /* The UDP port at their end */ |
8885c5fe | 75 | static int tftp_remote_port; |
2f09413f | 76 | /* The UDP port at our end */ |
8885c5fe JH |
77 | static int tftp_our_port; |
78 | static int timeout_count; | |
2f09413f | 79 | /* packet sequence number */ |
8885c5fe | 80 | static ulong tftp_cur_block; |
2f09413f | 81 | /* last packet sequence number received */ |
8885c5fe | 82 | static ulong tftp_prev_block; |
2f09413f | 83 | /* count of sequence number wraparounds */ |
8885c5fe | 84 | static ulong tftp_block_wrap; |
2f09413f | 85 | /* memory offset due to wrapping */ |
8885c5fe JH |
86 | static ulong tftp_block_wrap_offset; |
87 | static int tftp_state; | |
a156c47e SG |
88 | static ulong tftp_load_addr; |
89 | #ifdef CONFIG_LMB | |
90 | static ulong tftp_load_size; | |
91 | #endif | |
4fccb818 | 92 | #ifdef CONFIG_TFTP_TSIZE |
2f09413f | 93 | /* The file size reported by the server */ |
8885c5fe | 94 | static int tftp_tsize; |
2f09413f | 95 | /* The number of hashes we printed */ |
8885c5fe | 96 | static short tftp_tsize_num_hash; |
4fccb818 | 97 | #endif |
1fb7cd49 | 98 | #ifdef CONFIG_CMD_TFTPPUT |
8885c5fe JH |
99 | /* 1 if writing, else 0 */ |
100 | static int tftp_put_active; | |
101 | /* 1 if we have sent the last block */ | |
102 | static 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) |
121 | static 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 | ||
129 | static 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 |
142 | static unsigned short tftp_block_size = TFTP_BLOCK_SIZE; |
143 | static unsigned short tftp_block_size_option = TFTP_MTU_BLOCKSIZE; | |
53a5c424 | 144 | |
a156c47e | 145 | static 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 | 199 | static 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 | */ | |
218 | static 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 |
232 | static void tftp_send(void); |
233 | static void tftp_timeout_handler(void); | |
fe8c2806 WD |
234 | |
235 | /**********************************************************************/ | |
236 | ||
f5329bbc SG |
237 | static 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 | */ | |
265 | static 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 | */ | |
276 | static 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 */ |
294 | static 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 | 315 | static 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 | 410 | static 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 |
421 | static 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 | 597 | static 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 |
610 | static 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 | 628 | void 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 | 774 | void 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 |