]>
Commit | Line | Data |
---|---|---|
cbd8a35c WD |
1 | /* |
2 | * NFS support driver - based on etherboot and U-BOOT's tftp.c | |
3 | * | |
4 | * Masami Komiya <mkomiya@sonare.it> 2004 | |
5 | * | |
6 | */ | |
7 | ||
8 | /* NOTE: the NFS code is heavily inspired by the NetBSD netboot code (read: | |
9 | * large portions are copied verbatim) as distributed in OSKit 0.97. A few | |
10 | * changes were necessary to adapt the code to Etherboot and to fix several | |
11 | * inconsistencies. Also the RPC message preparation is done "by hand" to | |
12 | * avoid adding netsprintf() which I find hard to understand and use. */ | |
13 | ||
14 | /* NOTE 2: Etherboot does not care about things beyond the kernel image, so | |
15 | * it loads the kernel image off the boot server (ARP_SERVER) and does not | |
16 | * access the client root disk (root-path in dhcpd.conf), which would use | |
17 | * ARP_ROOTSERVER. The root disk is something the operating system we are | |
18 | * about to load needs to use. This is different from the OSKit 0.97 logic. */ | |
19 | ||
20 | /* NOTE 3: Symlink handling introduced by Anselm M Hoffmeister, 2003-July-14 | |
21 | * If a symlink is encountered, it is followed as far as possible (recursion | |
22 | * possible, maximum 16 steps). There is no clearing of ".."'s inside the | |
23 | * path, so please DON'T DO THAT. thx. */ | |
24 | ||
25 | #include <common.h> | |
26 | #include <command.h> | |
27 | #include <net.h> | |
28 | #include <malloc.h> | |
29 | #include "nfs.h" | |
30 | #include "bootp.h" | |
31 | ||
32 | /*#define NFS_DEBUG*/ | |
33 | ||
3865b1fb | 34 | #if defined(CONFIG_CMD_NET) && defined(CONFIG_CMD_NFS) |
cbd8a35c WD |
35 | |
36 | #define HASHES_PER_LINE 65 /* Number of "loading" hashes per line */ | |
079c2c4f | 37 | #define NFS_TIMEOUT 60UL |
cbd8a35c WD |
38 | |
39 | static int fs_mounted = 0; | |
c3f9d493 | 40 | static unsigned long rpc_id = 0; |
cbd8a35c WD |
41 | static int nfs_offset = -1; |
42 | static int nfs_len; | |
43 | ||
44 | static char dirfh[NFS_FHSIZE]; /* file handle of directory */ | |
45 | static char filefh[NFS_FHSIZE]; /* file handle of kernel image */ | |
46 | ||
23a7a32d | 47 | static int NfsDownloadState; |
cbd8a35c WD |
48 | static IPaddr_t NfsServerIP; |
49 | static int NfsSrvMountPort; | |
50 | static int NfsSrvNfsPort; | |
51 | static int NfsOurPort; | |
52 | static int NfsTimeoutCount; | |
53 | static int NfsState; | |
54 | #define STATE_PRCLOOKUP_PROG_MOUNT_REQ 1 | |
55 | #define STATE_PRCLOOKUP_PROG_NFS_REQ 2 | |
56 | #define STATE_MOUNT_REQ 3 | |
57 | #define STATE_UMOUNT_REQ 4 | |
58 | #define STATE_LOOKUP_REQ 5 | |
59 | #define STATE_READ_REQ 6 | |
60 | #define STATE_READLINK_REQ 7 | |
61 | ||
62 | static char default_filename[64]; | |
63 | static char *nfs_filename; | |
64 | static char *nfs_path; | |
65 | static char nfs_path_buff[2048]; | |
66 | ||
23a7a32d | 67 | static __inline__ int |
cbd8a35c WD |
68 | store_block (uchar * src, unsigned offset, unsigned len) |
69 | { | |
a084f7da | 70 | ulong newsize = offset + len; |
cbd8a35c WD |
71 | #ifdef CFG_DIRECT_FLASH_NFS |
72 | int i, rc = 0; | |
73 | ||
74 | for (i=0; i<CFG_MAX_FLASH_BANKS; i++) { | |
75 | /* start address in flash? */ | |
76 | if (load_addr + offset >= flash_info[i].start[0]) { | |
77 | rc = 1; | |
78 | break; | |
79 | } | |
80 | } | |
81 | ||
82 | if (rc) { /* Flash is destination for this packet */ | |
83 | rc = flash_write ((uchar *)src, (ulong)(load_addr+offset), len); | |
84 | if (rc) { | |
85 | flash_perror (rc); | |
23a7a32d | 86 | return -1; |
cbd8a35c WD |
87 | } |
88 | } else | |
89 | #endif /* CFG_DIRECT_FLASH_NFS */ | |
cbd8a35c WD |
90 | { |
91 | (void)memcpy ((void *)(load_addr + offset), src, len); | |
92 | } | |
a084f7da WD |
93 | |
94 | if (NetBootFileXferSize < (offset+len)) | |
95 | NetBootFileXferSize = newsize; | |
23a7a32d | 96 | return 0; |
cbd8a35c WD |
97 | } |
98 | ||
99 | static char* | |
100 | basename (char *path) | |
101 | { | |
102 | char *fname; | |
103 | ||
104 | fname = path + strlen(path) - 1; | |
105 | while (fname >= path) { | |
106 | if (*fname == '/') { | |
107 | fname++; | |
108 | break; | |
109 | } | |
110 | fname--; | |
111 | } | |
112 | return fname; | |
113 | } | |
114 | ||
115 | static char* | |
116 | dirname (char *path) | |
117 | { | |
118 | char *fname; | |
119 | ||
120 | fname = basename (path); | |
121 | --fname; | |
122 | *fname = '\0'; | |
123 | return path; | |
124 | } | |
125 | ||
cbd8a35c WD |
126 | /************************************************************************** |
127 | RPC_ADD_CREDENTIALS - Add RPC authentication/verifier entries | |
128 | **************************************************************************/ | |
129 | static long *rpc_add_credentials (long *p) | |
130 | { | |
131 | int hl; | |
132 | int hostnamelen; | |
133 | char hostname[256]; | |
134 | ||
135 | strcpy (hostname, ""); | |
136 | hostnamelen=strlen (hostname); | |
137 | ||
138 | /* Here's the executive summary on authentication requirements of the | |
139 | * various NFS server implementations: Linux accepts both AUTH_NONE | |
140 | * and AUTH_UNIX authentication (also accepts an empty hostname field | |
141 | * in the AUTH_UNIX scheme). *BSD refuses AUTH_NONE, but accepts | |
142 | * AUTH_UNIX (also accepts an empty hostname field in the AUTH_UNIX | |
143 | * scheme). To be safe, use AUTH_UNIX and pass the hostname if we have | |
144 | * it (if the BOOTP/DHCP reply didn't give one, just use an empty | |
145 | * hostname). */ | |
146 | ||
147 | hl = (hostnamelen + 3) & ~3; | |
148 | ||
149 | /* Provide an AUTH_UNIX credential. */ | |
150 | *p++ = htonl(1); /* AUTH_UNIX */ | |
151 | *p++ = htonl(hl+20); /* auth length */ | |
152 | *p++ = htonl(0); /* stamp */ | |
153 | *p++ = htonl(hostnamelen); /* hostname string */ | |
154 | if (hostnamelen & 3) { | |
155 | *(p + hostnamelen / 4) = 0; /* add zero padding */ | |
156 | } | |
157 | memcpy (p, hostname, hostnamelen); | |
158 | p += hl / 4; | |
159 | *p++ = 0; /* uid */ | |
160 | *p++ = 0; /* gid */ | |
161 | *p++ = 0; /* auxiliary gid list */ | |
162 | ||
163 | /* Provide an AUTH_NONE verifier. */ | |
164 | *p++ = 0; /* AUTH_NONE */ | |
165 | *p++ = 0; /* auth length */ | |
166 | ||
167 | return p; | |
168 | } | |
169 | ||
170 | /************************************************************************** | |
171 | RPC_LOOKUP - Lookup RPC Port numbers | |
172 | **************************************************************************/ | |
173 | static void | |
174 | rpc_req (int rpc_prog, int rpc_proc, uint32_t *data, int datalen) | |
175 | { | |
176 | struct rpc_t pkt; | |
177 | unsigned long id; | |
178 | uint32_t *p; | |
179 | int pktlen; | |
180 | int sport; | |
181 | ||
c3f9d493 | 182 | id = ++rpc_id; |
cbd8a35c WD |
183 | pkt.u.call.id = htonl(id); |
184 | pkt.u.call.type = htonl(MSG_CALL); | |
185 | pkt.u.call.rpcvers = htonl(2); /* use RPC version 2 */ | |
186 | pkt.u.call.prog = htonl(rpc_prog); | |
187 | pkt.u.call.vers = htonl(2); /* portmapper is version 2 */ | |
188 | pkt.u.call.proc = htonl(rpc_proc); | |
189 | p = (uint32_t *)&(pkt.u.call.data); | |
190 | ||
191 | if (datalen) | |
192 | memcpy ((char *)p, (char *)data, datalen*sizeof(uint32_t)); | |
193 | ||
194 | pktlen = (char *)p + datalen*sizeof(uint32_t) - (char *)&pkt; | |
195 | ||
a3d991bd | 196 | memcpy ((char *)NetTxPacket + NetEthHdrSize() + IP_HDR_SIZE, (char *)&pkt, pktlen); |
cbd8a35c WD |
197 | |
198 | if (rpc_prog == PROG_PORTMAP) | |
199 | sport = SUNRPC_PORT; | |
200 | else if (rpc_prog == PROG_MOUNT) | |
201 | sport = NfsSrvMountPort; | |
202 | else | |
203 | sport = NfsSrvNfsPort; | |
204 | ||
205 | NetSendUDPPacket (NetServerEther, NfsServerIP, sport, NfsOurPort, pktlen); | |
206 | } | |
207 | ||
208 | /************************************************************************** | |
209 | RPC_LOOKUP - Lookup RPC Port numbers | |
210 | **************************************************************************/ | |
211 | static void | |
212 | rpc_lookup_req (int prog, int ver) | |
213 | { | |
214 | uint32_t data[16]; | |
215 | ||
216 | data[0] = 0; data[1] = 0; /* auth credential */ | |
217 | data[2] = 0; data[3] = 0; /* auth verifier */ | |
218 | data[4] = htonl(prog); | |
219 | data[5] = htonl(ver); | |
220 | data[6] = htonl(17); /* IP_UDP */ | |
221 | data[7] = 0; | |
222 | ||
223 | rpc_req (PROG_PORTMAP, PORTMAP_GETPORT, data, 8); | |
224 | } | |
225 | ||
226 | /************************************************************************** | |
227 | NFS_MOUNT - Mount an NFS Filesystem | |
228 | **************************************************************************/ | |
229 | static void | |
230 | nfs_mount_req (char *path) | |
231 | { | |
232 | uint32_t data[1024]; | |
233 | uint32_t *p; | |
234 | int len; | |
235 | int pathlen; | |
236 | ||
237 | pathlen = strlen (path); | |
238 | ||
239 | p = &(data[0]); | |
240 | p = (uint32_t *)rpc_add_credentials((long *)p); | |
241 | ||
242 | *p++ = htonl(pathlen); | |
243 | if (pathlen & 3) *(p + pathlen / 4) = 0; | |
244 | memcpy (p, path, pathlen); | |
245 | p += (pathlen + 3) / 4; | |
246 | ||
247 | len = (uint32_t *)p - (uint32_t *)&(data[0]); | |
248 | ||
249 | rpc_req (PROG_MOUNT, MOUNT_ADDENTRY, data, len); | |
250 | } | |
251 | ||
252 | /************************************************************************** | |
253 | NFS_UMOUNTALL - Unmount all our NFS Filesystems on the Server | |
254 | **************************************************************************/ | |
255 | static void | |
256 | nfs_umountall_req (void) | |
257 | { | |
258 | uint32_t data[1024]; | |
259 | uint32_t *p; | |
260 | int len; | |
261 | ||
262 | if ((NfsSrvMountPort == -1) || (!fs_mounted)) { | |
263 | /* Nothing mounted, nothing to umount */ | |
264 | return; | |
265 | } | |
266 | ||
267 | p = &(data[0]); | |
268 | p = (uint32_t *)rpc_add_credentials ((long *)p); | |
269 | ||
270 | len = (uint32_t *)p - (uint32_t *)&(data[0]); | |
271 | ||
272 | rpc_req (PROG_MOUNT, MOUNT_UMOUNTALL, data, len); | |
273 | } | |
274 | ||
275 | /*************************************************************************** | |
276 | * NFS_READLINK (AH 2003-07-14) | |
277 | * This procedure is called when read of the first block fails - | |
278 | * this probably happens when it's a directory or a symlink | |
279 | * In case of successful readlink(), the dirname is manipulated, | |
280 | * so that inside the nfs() function a recursion can be done. | |
281 | **************************************************************************/ | |
282 | static void | |
283 | nfs_readlink_req (void) | |
284 | { | |
285 | uint32_t data[1024]; | |
286 | uint32_t *p; | |
287 | int len; | |
288 | ||
289 | p = &(data[0]); | |
290 | p = (uint32_t *)rpc_add_credentials ((long *)p); | |
291 | ||
292 | memcpy (p, filefh, NFS_FHSIZE); | |
293 | p += (NFS_FHSIZE / 4); | |
294 | ||
295 | len = (uint32_t *)p - (uint32_t *)&(data[0]); | |
296 | ||
297 | rpc_req (PROG_NFS, NFS_READLINK, data, len); | |
298 | } | |
299 | ||
300 | /************************************************************************** | |
301 | NFS_LOOKUP - Lookup Pathname | |
302 | **************************************************************************/ | |
303 | static void | |
304 | nfs_lookup_req (char *fname) | |
305 | { | |
306 | uint32_t data[1024]; | |
307 | uint32_t *p; | |
308 | int len; | |
309 | int fnamelen; | |
310 | ||
311 | fnamelen = strlen (fname); | |
312 | ||
313 | p = &(data[0]); | |
314 | p = (uint32_t *)rpc_add_credentials ((long *)p); | |
315 | ||
316 | memcpy (p, dirfh, NFS_FHSIZE); | |
317 | p += (NFS_FHSIZE / 4); | |
318 | *p++ = htonl(fnamelen); | |
319 | if (fnamelen & 3) *(p + fnamelen / 4) = 0; | |
320 | memcpy (p, fname, fnamelen); | |
321 | p += (fnamelen + 3) / 4; | |
322 | ||
323 | len = (uint32_t *)p - (uint32_t *)&(data[0]); | |
324 | ||
325 | rpc_req (PROG_NFS, NFS_LOOKUP, data, len); | |
326 | } | |
327 | ||
328 | /************************************************************************** | |
329 | NFS_READ - Read File on NFS Server | |
330 | **************************************************************************/ | |
331 | static void | |
332 | nfs_read_req (int offset, int readlen) | |
333 | { | |
334 | uint32_t data[1024]; | |
335 | uint32_t *p; | |
336 | int len; | |
337 | ||
338 | p = &(data[0]); | |
339 | p = (uint32_t *)rpc_add_credentials ((long *)p); | |
340 | ||
341 | memcpy (p, filefh, NFS_FHSIZE); | |
342 | p += (NFS_FHSIZE / 4); | |
343 | *p++ = htonl(offset); | |
344 | *p++ = htonl(readlen); | |
345 | *p++ = 0; | |
346 | ||
347 | len = (uint32_t *)p - (uint32_t *)&(data[0]); | |
348 | ||
349 | rpc_req (PROG_NFS, NFS_READ, data, len); | |
350 | } | |
351 | ||
352 | /************************************************************************** | |
353 | RPC request dispatcher | |
354 | **************************************************************************/ | |
355 | ||
356 | static void | |
357 | NfsSend (void) | |
358 | { | |
359 | #ifdef NFS_DEBUG | |
360 | printf ("%s\n", __FUNCTION__); | |
361 | #endif | |
362 | ||
363 | switch (NfsState) { | |
364 | case STATE_PRCLOOKUP_PROG_MOUNT_REQ: | |
365 | rpc_lookup_req (PROG_MOUNT, 1); | |
366 | break; | |
367 | case STATE_PRCLOOKUP_PROG_NFS_REQ: | |
368 | rpc_lookup_req (PROG_NFS, 2); | |
369 | break; | |
370 | case STATE_MOUNT_REQ: | |
371 | nfs_mount_req (nfs_path); | |
372 | break; | |
373 | case STATE_UMOUNT_REQ: | |
374 | nfs_umountall_req (); | |
375 | break; | |
376 | case STATE_LOOKUP_REQ: | |
377 | nfs_lookup_req (nfs_filename); | |
378 | break; | |
379 | case STATE_READ_REQ: | |
380 | nfs_read_req (nfs_offset, nfs_len); | |
381 | break; | |
382 | case STATE_READLINK_REQ: | |
383 | nfs_readlink_req (); | |
384 | break; | |
385 | } | |
386 | } | |
387 | ||
388 | /************************************************************************** | |
389 | Handlers for the reply from server | |
390 | **************************************************************************/ | |
391 | ||
392 | static int | |
393 | rpc_lookup_reply (int prog, uchar *pkt, unsigned len) | |
394 | { | |
395 | struct rpc_t rpc_pkt; | |
396 | ||
397 | memcpy ((unsigned char *)&rpc_pkt, pkt, len); | |
398 | ||
399 | #ifdef NFS_DEBUG | |
400 | printf ("%s\n", __FUNCTION__); | |
401 | #endif | |
402 | ||
c3f9d493 WD |
403 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
404 | return -1; | |
405 | ||
cbd8a35c WD |
406 | if (rpc_pkt.u.reply.rstatus || |
407 | rpc_pkt.u.reply.verifier || | |
cbd8a35c | 408 | rpc_pkt.u.reply.astatus) { |
c3f9d493 | 409 | return -1; |
cbd8a35c WD |
410 | } |
411 | ||
412 | switch (prog) { | |
413 | case PROG_MOUNT: | |
414 | NfsSrvMountPort = ntohl(rpc_pkt.u.reply.data[0]); | |
415 | break; | |
416 | case PROG_NFS: | |
417 | NfsSrvNfsPort = ntohl(rpc_pkt.u.reply.data[0]); | |
418 | break; | |
419 | } | |
420 | ||
421 | return 0; | |
422 | } | |
423 | ||
424 | static int | |
425 | nfs_mount_reply (uchar *pkt, unsigned len) | |
426 | { | |
427 | struct rpc_t rpc_pkt; | |
428 | ||
429 | #ifdef NFS_DEBUG | |
430 | printf ("%s\n", __FUNCTION__); | |
431 | #endif | |
432 | ||
433 | memcpy ((unsigned char *)&rpc_pkt, pkt, len); | |
434 | ||
c3f9d493 WD |
435 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
436 | return -1; | |
437 | ||
cbd8a35c WD |
438 | if (rpc_pkt.u.reply.rstatus || |
439 | rpc_pkt.u.reply.verifier || | |
440 | rpc_pkt.u.reply.astatus || | |
441 | rpc_pkt.u.reply.data[0]) { | |
442 | return -1; | |
443 | } | |
444 | ||
445 | fs_mounted = 1; | |
446 | memcpy (dirfh, rpc_pkt.u.reply.data + 1, NFS_FHSIZE); | |
447 | ||
448 | return 0; | |
449 | } | |
450 | ||
451 | static int | |
452 | nfs_umountall_reply (uchar *pkt, unsigned len) | |
453 | { | |
454 | struct rpc_t rpc_pkt; | |
455 | ||
456 | #ifdef NFS_DEBUG | |
457 | printf ("%s\n", __FUNCTION__); | |
458 | #endif | |
459 | ||
460 | memcpy ((unsigned char *)&rpc_pkt, pkt, len); | |
461 | ||
c3f9d493 WD |
462 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
463 | return -1; | |
464 | ||
cbd8a35c WD |
465 | if (rpc_pkt.u.reply.rstatus || |
466 | rpc_pkt.u.reply.verifier || | |
467 | rpc_pkt.u.reply.astatus) { | |
468 | return -1; | |
469 | } | |
470 | ||
471 | fs_mounted = 0; | |
472 | memset (dirfh, 0, sizeof(dirfh)); | |
473 | ||
474 | return 0; | |
475 | } | |
476 | ||
477 | static int | |
478 | nfs_lookup_reply (uchar *pkt, unsigned len) | |
479 | { | |
480 | struct rpc_t rpc_pkt; | |
481 | ||
482 | #ifdef NFS_DEBUG | |
483 | printf ("%s\n", __FUNCTION__); | |
484 | #endif | |
485 | ||
486 | memcpy ((unsigned char *)&rpc_pkt, pkt, len); | |
487 | ||
c3f9d493 WD |
488 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
489 | return -1; | |
490 | ||
cbd8a35c WD |
491 | if (rpc_pkt.u.reply.rstatus || |
492 | rpc_pkt.u.reply.verifier || | |
493 | rpc_pkt.u.reply.astatus || | |
494 | rpc_pkt.u.reply.data[0]) { | |
495 | return -1; | |
496 | } | |
497 | ||
498 | memcpy (filefh, rpc_pkt.u.reply.data + 1, NFS_FHSIZE); | |
499 | ||
500 | return 0; | |
501 | } | |
502 | ||
503 | static int | |
504 | nfs_readlink_reply (uchar *pkt, unsigned len) | |
505 | { | |
506 | struct rpc_t rpc_pkt; | |
507 | int rlen; | |
508 | ||
509 | #ifdef NFS_DEBUG | |
510 | printf ("%s\n", __FUNCTION__); | |
511 | #endif | |
512 | ||
513 | memcpy ((unsigned char *)&rpc_pkt, pkt, len); | |
514 | ||
c3f9d493 WD |
515 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
516 | return -1; | |
517 | ||
cbd8a35c WD |
518 | if (rpc_pkt.u.reply.rstatus || |
519 | rpc_pkt.u.reply.verifier || | |
520 | rpc_pkt.u.reply.astatus || | |
521 | rpc_pkt.u.reply.data[0]) { | |
522 | return -1; | |
523 | } | |
524 | ||
525 | rlen = ntohl (rpc_pkt.u.reply.data[1]); /* new path length */ | |
526 | ||
527 | if (*((char *)&(rpc_pkt.u.reply.data[2])) != '/') { | |
528 | int pathlen; | |
529 | strcat (nfs_path, "/"); | |
530 | pathlen = strlen(nfs_path); | |
531 | memcpy (nfs_path+pathlen, (uchar *)&(rpc_pkt.u.reply.data[2]), rlen); | |
532 | nfs_path[pathlen+rlen+1] = 0; | |
533 | } else { | |
534 | memcpy (nfs_path, (uchar *)&(rpc_pkt.u.reply.data[2]), rlen); | |
535 | nfs_path[rlen] = 0; | |
536 | } | |
537 | return 0; | |
538 | } | |
539 | ||
540 | static int | |
541 | nfs_read_reply (uchar *pkt, unsigned len) | |
542 | { | |
543 | struct rpc_t rpc_pkt; | |
544 | int rlen; | |
545 | ||
546 | #ifdef NFS_DEBUG_nop | |
547 | printf ("%s\n", __FUNCTION__); | |
548 | #endif | |
549 | ||
11dadd54 | 550 | memcpy ((uchar *)&rpc_pkt, pkt, sizeof(rpc_pkt.u.reply)); |
cbd8a35c | 551 | |
c3f9d493 WD |
552 | if (ntohl(rpc_pkt.u.reply.id) != rpc_id) |
553 | return -1; | |
554 | ||
cbd8a35c WD |
555 | if (rpc_pkt.u.reply.rstatus || |
556 | rpc_pkt.u.reply.verifier || | |
557 | rpc_pkt.u.reply.astatus || | |
558 | rpc_pkt.u.reply.data[0]) { | |
559 | if (rpc_pkt.u.reply.rstatus) { | |
560 | return -9999; | |
561 | } | |
562 | if (rpc_pkt.u.reply.astatus) { | |
563 | return -9999; | |
564 | } | |
565 | return -ntohl(rpc_pkt.u.reply.data[0]);; | |
566 | } | |
567 | ||
568 | if ((nfs_offset!=0) && !((nfs_offset) % (NFS_READ_SIZE/2*10*HASHES_PER_LINE))) { | |
569 | puts ("\n\t "); | |
570 | } | |
571 | if (!(nfs_offset % ((NFS_READ_SIZE/2)*10))) { | |
572 | putc ('#'); | |
573 | } | |
574 | ||
575 | rlen = ntohl(rpc_pkt.u.reply.data[18]); | |
23a7a32d WD |
576 | if ( store_block ((uchar *)pkt+sizeof(rpc_pkt.u.reply), nfs_offset, rlen) ) |
577 | return -9999; | |
cbd8a35c WD |
578 | |
579 | return rlen; | |
580 | } | |
581 | ||
582 | /************************************************************************** | |
583 | Interfaces of U-BOOT | |
584 | **************************************************************************/ | |
585 | ||
a5725fab WD |
586 | static void |
587 | NfsTimeout (void) | |
588 | { | |
589 | puts ("Timeout\n"); | |
590 | NetState = NETLOOP_FAIL; | |
591 | return; | |
592 | } | |
593 | ||
cbd8a35c WD |
594 | static void |
595 | NfsHandler (uchar *pkt, unsigned dest, unsigned src, unsigned len) | |
596 | { | |
597 | int rlen; | |
598 | ||
599 | #ifdef NFS_DEBUG | |
600 | printf ("%s\n", __FUNCTION__); | |
601 | #endif | |
602 | ||
603 | if (dest != NfsOurPort) return; | |
604 | ||
605 | switch (NfsState) { | |
606 | case STATE_PRCLOOKUP_PROG_MOUNT_REQ: | |
607 | rpc_lookup_reply (PROG_MOUNT, pkt, len); | |
608 | NfsState = STATE_PRCLOOKUP_PROG_NFS_REQ; | |
609 | NfsSend (); | |
610 | break; | |
611 | ||
612 | case STATE_PRCLOOKUP_PROG_NFS_REQ: | |
613 | rpc_lookup_reply (PROG_NFS, pkt, len); | |
614 | NfsState = STATE_MOUNT_REQ; | |
615 | NfsSend (); | |
616 | break; | |
617 | ||
618 | case STATE_MOUNT_REQ: | |
619 | if (nfs_mount_reply(pkt, len)) { | |
620 | puts ("*** ERROR: Cannot mount\n"); | |
621 | /* just to be sure... */ | |
622 | NfsState = STATE_UMOUNT_REQ; | |
623 | NfsSend (); | |
624 | } else { | |
625 | NfsState = STATE_LOOKUP_REQ; | |
626 | NfsSend (); | |
627 | } | |
628 | break; | |
629 | ||
630 | case STATE_UMOUNT_REQ: | |
631 | if (nfs_umountall_reply(pkt, len)) { | |
632 | puts ("*** ERROR: Cannot umount\n"); | |
633 | NetState = NETLOOP_FAIL; | |
634 | } else { | |
a084f7da | 635 | puts ("\ndone\n"); |
23a7a32d | 636 | NetState = NfsDownloadState; |
cbd8a35c WD |
637 | } |
638 | break; | |
639 | ||
640 | case STATE_LOOKUP_REQ: | |
641 | if (nfs_lookup_reply(pkt, len)) { | |
642 | puts ("*** ERROR: File lookup fail\n"); | |
643 | NfsState = STATE_UMOUNT_REQ; | |
644 | NfsSend (); | |
645 | } else { | |
646 | NfsState = STATE_READ_REQ; | |
647 | nfs_offset = 0; | |
648 | nfs_len = NFS_READ_SIZE; | |
649 | NfsSend (); | |
650 | } | |
651 | break; | |
652 | ||
653 | case STATE_READLINK_REQ: | |
654 | if (nfs_readlink_reply(pkt, len)) { | |
655 | puts ("*** ERROR: Symlink fail\n"); | |
656 | NfsState = STATE_UMOUNT_REQ; | |
657 | NfsSend (); | |
658 | } else { | |
659 | #ifdef NFS_DEBUG | |
660 | printf ("Symlink --> %s\n", nfs_path); | |
661 | #endif | |
662 | nfs_filename = basename (nfs_path); | |
663 | nfs_path = dirname (nfs_path); | |
664 | ||
665 | NfsState = STATE_MOUNT_REQ; | |
666 | NfsSend (); | |
667 | } | |
668 | break; | |
669 | ||
670 | case STATE_READ_REQ: | |
671 | rlen = nfs_read_reply (pkt, len); | |
a5725fab | 672 | NetSetTimeout (NFS_TIMEOUT * CFG_HZ, NfsTimeout); |
cbd8a35c WD |
673 | if (rlen > 0) { |
674 | nfs_offset += rlen; | |
675 | NfsSend (); | |
676 | } | |
677 | else if ((rlen == -NFSERR_ISDIR)||(rlen == -NFSERR_INVAL)) { | |
678 | /* symbolic link */ | |
679 | NfsState = STATE_READLINK_REQ; | |
680 | NfsSend (); | |
681 | } else { | |
23a7a32d | 682 | if ( ! rlen ) NfsDownloadState = NETLOOP_SUCCESS; |
cbd8a35c WD |
683 | NfsState = STATE_UMOUNT_REQ; |
684 | NfsSend (); | |
685 | } | |
686 | break; | |
687 | } | |
688 | } | |
689 | ||
cbd8a35c WD |
690 | |
691 | void | |
692 | NfsStart (void) | |
693 | { | |
694 | #ifdef NFS_DEBUG | |
695 | printf ("%s\n", __FUNCTION__); | |
696 | #endif | |
23a7a32d | 697 | NfsDownloadState = NETLOOP_FAIL; |
cbd8a35c WD |
698 | |
699 | NfsServerIP = NetServerIP; | |
700 | nfs_path = (char *)nfs_path_buff; | |
701 | ||
702 | if (nfs_path == NULL) { | |
703 | NetState = NETLOOP_FAIL; | |
704 | puts ("*** ERROR: Fail allocate memory\n"); | |
705 | return; | |
706 | } | |
707 | ||
708 | if (BootFile[0] == '\0') { | |
cbd8a35c | 709 | sprintf (default_filename, "/nfsroot/%02lX%02lX%02lX%02lX.img", |
c43352cc WD |
710 | NetOurIP & 0xFF, |
711 | (NetOurIP >> 8) & 0xFF, | |
712 | (NetOurIP >> 16) & 0xFF, | |
713 | (NetOurIP >> 24) & 0xFF ); | |
cbd8a35c WD |
714 | strcpy (nfs_path, default_filename); |
715 | ||
716 | printf ("*** Warning: no boot file name; using '%s'\n", | |
717 | nfs_path); | |
718 | } else { | |
719 | char *p=BootFile; | |
720 | ||
721 | p = strchr (p, ':'); | |
722 | ||
723 | if (p != NULL) { | |
724 | NfsServerIP = string_to_ip (BootFile); | |
725 | ++p; | |
726 | strcpy (nfs_path, p); | |
727 | } else { | |
728 | strcpy (nfs_path, BootFile); | |
729 | } | |
730 | } | |
731 | ||
732 | nfs_filename = basename (nfs_path); | |
733 | nfs_path = dirname (nfs_path); | |
734 | ||
735 | #if defined(CONFIG_NET_MULTI) | |
736 | printf ("Using %s device\n", eth_get_name()); | |
737 | #endif | |
738 | ||
739 | puts ("File transfer via NFS from server "); print_IPaddr (NfsServerIP); | |
740 | puts ("; our IP address is "); print_IPaddr (NetOurIP); | |
741 | ||
742 | /* Check if we need to send across this subnet */ | |
743 | if (NetOurGatewayIP && NetOurSubnetMask) { | |
744 | IPaddr_t OurNet = NetOurIP & NetOurSubnetMask; | |
745 | IPaddr_t ServerNet = NetServerIP & NetOurSubnetMask; | |
746 | ||
747 | if (OurNet != ServerNet) { | |
748 | puts ("; sending through gateway "); | |
749 | print_IPaddr (NetOurGatewayIP) ; | |
750 | } | |
751 | } | |
4b9206ed | 752 | printf ("\nFilename '%s/%s'.", nfs_path, nfs_filename); |
cbd8a35c WD |
753 | |
754 | if (NetBootFileSize) { | |
755 | printf (" Size is 0x%x Bytes = ", NetBootFileSize<<9); | |
756 | print_size (NetBootFileSize<<9, ""); | |
757 | } | |
4b9206ed WD |
758 | printf ("\nLoad address: 0x%lx\n" |
759 | "Loading: *\b", load_addr); | |
cbd8a35c WD |
760 | |
761 | NetSetTimeout (NFS_TIMEOUT * CFG_HZ, NfsTimeout); | |
762 | NetSetHandler (NfsHandler); | |
763 | ||
cbd8a35c WD |
764 | NfsTimeoutCount = 0; |
765 | NfsState = STATE_PRCLOOKUP_PROG_MOUNT_REQ; | |
766 | ||
767 | /*NfsOurPort = 4096 + (get_ticks() % 3072);*/ | |
768 | /*FIX ME !!!*/ | |
769 | NfsOurPort = 1000; | |
770 | ||
771 | /* zero out server ether in case the server ip has changed */ | |
772 | memset (NetServerEther, 0, 6); | |
773 | ||
774 | NfsSend (); | |
775 | } | |
776 | ||
643d1ab2 | 777 | #endif |