bootp.c 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928
  1. /*
  2. * Based on LiMon - BOOTP.
  3. *
  4. * Copyright 1994, 1995, 2000 Neil Russell.
  5. * (See License)
  6. * Copyright 2000 Roland Borde
  7. * Copyright 2000 Paolo Scaffardi
  8. * Copyright 2000-2004 Wolfgang Denk, wd@denx.de
  9. */
  10. #if 0
  11. #define DEBUG 1 /* general debug */
  12. #define DEBUG_BOOTP_EXT 1 /* Debug received vendor fields */
  13. #endif
  14. #ifdef DEBUG_BOOTP_EXT
  15. #define debug_ext(fmt,args...) printf (fmt ,##args)
  16. #else
  17. #define debug_ext(fmt,args...)
  18. #endif
  19. #include <common.h>
  20. #include <command.h>
  21. #include <net.h>
  22. #include "bootp.h"
  23. #include "tftp.h"
  24. #include "nfs.h"
  25. #ifdef CONFIG_STATUS_LED
  26. #include <status_led.h>
  27. #endif
  28. #define BOOTP_VENDOR_MAGIC 0x63825363 /* RFC1048 Magic Cookie */
  29. #if (CONFIG_COMMANDS & CFG_CMD_NET)
  30. #define TIMEOUT 5 /* Seconds before trying BOOTP again */
  31. #ifndef CONFIG_NET_RETRY_COUNT
  32. # define TIMEOUT_COUNT 5 /* # of timeouts before giving up */
  33. #else
  34. # define TIMEOUT_COUNT (CONFIG_NET_RETRY_COUNT)
  35. #endif
  36. #define PORT_BOOTPS 67 /* BOOTP server UDP port */
  37. #define PORT_BOOTPC 68 /* BOOTP client UDP port */
  38. #ifndef CONFIG_DHCP_MIN_EXT_LEN /* minimal length of extension list */
  39. #define CONFIG_DHCP_MIN_EXT_LEN 64
  40. #endif
  41. ulong BootpID;
  42. int BootpTry;
  43. #ifdef CONFIG_BOOTP_RANDOM_DELAY
  44. ulong seed1, seed2;
  45. #endif
  46. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  47. dhcp_state_t dhcp_state = INIT;
  48. unsigned long dhcp_leasetime = 0;
  49. IPaddr_t NetDHCPServerIP = 0;
  50. static void DhcpHandler(uchar * pkt, unsigned dest, unsigned src, unsigned len);
  51. /* For Debug */
  52. #if 0
  53. static char *dhcpmsg2str(int type)
  54. {
  55. switch (type) {
  56. case 1: return "DHCPDISCOVER"; break;
  57. case 2: return "DHCPOFFER"; break;
  58. case 3: return "DHCPREQUEST"; break;
  59. case 4: return "DHCPDECLINE"; break;
  60. case 5: return "DHCPACK"; break;
  61. case 6: return "DHCPNACK"; break;
  62. case 7: return "DHCPRELEASE"; break;
  63. default: return "UNKNOWN/INVALID MSG TYPE"; break;
  64. }
  65. }
  66. #endif
  67. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_VENDOREX)
  68. extern u8 *dhcp_vendorex_prep (u8 *e); /*rtn new e after add own opts. */
  69. extern u8 *dhcp_vendorex_proc (u8 *e); /*rtn next e if mine,else NULL */
  70. #endif
  71. #endif /* CFG_CMD_DHCP */
  72. static int BootpCheckPkt(uchar *pkt, unsigned dest, unsigned src, unsigned len)
  73. {
  74. Bootp_t *bp = (Bootp_t *) pkt;
  75. int retval = 0;
  76. if (dest != PORT_BOOTPC || src != PORT_BOOTPS)
  77. retval = -1;
  78. else if (len < sizeof (Bootp_t) - OPT_SIZE)
  79. retval = -2;
  80. else if (bp->bp_op != OP_BOOTREQUEST &&
  81. bp->bp_op != OP_BOOTREPLY &&
  82. bp->bp_op != DHCP_OFFER &&
  83. bp->bp_op != DHCP_ACK &&
  84. bp->bp_op != DHCP_NAK ) {
  85. retval = -3;
  86. }
  87. else if (bp->bp_htype != HWT_ETHER)
  88. retval = -4;
  89. else if (bp->bp_hlen != HWL_ETHER)
  90. retval = -5;
  91. else if (NetReadLong((ulong*)&bp->bp_id) != BootpID) {
  92. retval = -6;
  93. }
  94. debug ("Filtering pkt = %d\n", retval);
  95. return retval;
  96. }
  97. /*
  98. * Copy parameters of interest from BOOTP_REPLY/DHCP_OFFER packet
  99. */
  100. static void BootpCopyNetParams(Bootp_t *bp)
  101. {
  102. IPaddr_t tmp_ip;
  103. NetCopyIP(&NetOurIP, &bp->bp_yiaddr);
  104. NetCopyIP(&tmp_ip, &bp->bp_siaddr);
  105. if (tmp_ip != 0)
  106. NetCopyIP(&NetServerIP, &bp->bp_siaddr);
  107. memcpy (NetServerEther, ((Ethernet_t *)NetRxPkt)->et_src, 6);
  108. if (strlen(bp->bp_file) > 0)
  109. copy_filename (BootFile, bp->bp_file, sizeof(BootFile));
  110. debug ("Bootfile: %s\n", BootFile);
  111. /* Propagate to environment:
  112. * don't delete exising entry when BOOTP / DHCP reply does
  113. * not contain a new value
  114. */
  115. if (*BootFile) {
  116. setenv ("bootfile", BootFile);
  117. }
  118. }
  119. static int truncate_sz (const char *name, int maxlen, int curlen)
  120. {
  121. if (curlen >= maxlen) {
  122. printf("*** WARNING: %s is too long (%d - max: %d) - truncated\n",
  123. name, curlen, maxlen);
  124. curlen = maxlen - 1;
  125. }
  126. return (curlen);
  127. }
  128. #if !(CONFIG_COMMANDS & CFG_CMD_DHCP)
  129. static void BootpVendorFieldProcess (u8 * ext)
  130. {
  131. int size = *(ext + 1);
  132. debug_ext ("[BOOTP] Processing extension %d... (%d bytes)\n", *ext,
  133. *(ext + 1));
  134. NetBootFileSize = 0;
  135. switch (*ext) {
  136. /* Fixed length fields */
  137. case 1: /* Subnet mask */
  138. if (NetOurSubnetMask == 0)
  139. NetCopyIP (&NetOurSubnetMask, (IPaddr_t *) (ext + 2));
  140. break;
  141. case 2: /* Time offset - Not yet supported */
  142. break;
  143. /* Variable length fields */
  144. case 3: /* Gateways list */
  145. if (NetOurGatewayIP == 0) {
  146. NetCopyIP (&NetOurGatewayIP, (IPaddr_t *) (ext + 2));
  147. }
  148. break;
  149. case 4: /* Time server - Not yet supported */
  150. break;
  151. case 5: /* IEN-116 name server - Not yet supported */
  152. break;
  153. case 6:
  154. if (NetOurDNSIP == 0) {
  155. NetCopyIP (&NetOurDNSIP, (IPaddr_t *) (ext + 2));
  156. }
  157. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_DNS2)
  158. if ((NetOurDNS2IP == 0) && (size > 4)) {
  159. NetCopyIP (&NetOurDNS2IP, (IPaddr_t *) (ext + 2 + 4));
  160. }
  161. #endif
  162. break;
  163. case 7: /* Log server - Not yet supported */
  164. break;
  165. case 8: /* Cookie/Quote server - Not yet supported */
  166. break;
  167. case 9: /* LPR server - Not yet supported */
  168. break;
  169. case 10: /* Impress server - Not yet supported */
  170. break;
  171. case 11: /* RPL server - Not yet supported */
  172. break;
  173. case 12: /* Host name */
  174. if (NetOurHostName[0] == 0) {
  175. size = truncate_sz ("Host Name", sizeof (NetOurHostName), size);
  176. memcpy (&NetOurHostName, ext + 2, size);
  177. NetOurHostName[size] = 0;
  178. }
  179. break;
  180. case 13: /* Boot file size */
  181. if (size == 2)
  182. NetBootFileSize = ntohs (*(ushort *) (ext + 2));
  183. else if (size == 4)
  184. NetBootFileSize = ntohl (*(ulong *) (ext + 2));
  185. break;
  186. case 14: /* Merit dump file - Not yet supported */
  187. break;
  188. case 15: /* Domain name - Not yet supported */
  189. break;
  190. case 16: /* Swap server - Not yet supported */
  191. break;
  192. case 17: /* Root path */
  193. if (NetOurRootPath[0] == 0) {
  194. size = truncate_sz ("Root Path", sizeof (NetOurRootPath), size);
  195. memcpy (&NetOurRootPath, ext + 2, size);
  196. NetOurRootPath[size] = 0;
  197. }
  198. break;
  199. case 18: /* Extension path - Not yet supported */
  200. /*
  201. * This can be used to send the information of the
  202. * vendor area in another file that the client can
  203. * access via TFTP.
  204. */
  205. break;
  206. /* IP host layer fields */
  207. case 40: /* NIS Domain name */
  208. if (NetOurNISDomain[0] == 0) {
  209. size = truncate_sz ("NIS Domain Name", sizeof (NetOurNISDomain), size);
  210. memcpy (&NetOurNISDomain, ext + 2, size);
  211. NetOurNISDomain[size] = 0;
  212. }
  213. break;
  214. /* Application layer fields */
  215. case 43: /* Vendor specific info - Not yet supported */
  216. /*
  217. * Binary information to exchange specific
  218. * product information.
  219. */
  220. break;
  221. /* Reserved (custom) fields (128..254) */
  222. }
  223. }
  224. static void BootpVendorProcess (u8 * ext, int size)
  225. {
  226. u8 *end = ext + size;
  227. debug_ext ("[BOOTP] Checking extension (%d bytes)...\n", size);
  228. while ((ext < end) && (*ext != 0xff)) {
  229. if (*ext == 0) {
  230. ext++;
  231. } else {
  232. u8 *opt = ext;
  233. ext += ext[1] + 2;
  234. if (ext <= end)
  235. BootpVendorFieldProcess (opt);
  236. }
  237. }
  238. #ifdef DEBUG_BOOTP_EXT
  239. puts ("[BOOTP] Received fields: \n");
  240. if (NetOurSubnetMask) {
  241. puts ("NetOurSubnetMask : ");
  242. print_IPaddr (NetOurSubnetMask);
  243. putc ('\n');
  244. }
  245. if (NetOurGatewayIP) {
  246. puts ("NetOurGatewayIP : ");
  247. print_IPaddr (NetOurGatewayIP);
  248. putc ('\n');
  249. }
  250. if (NetBootFileSize) {
  251. printf ("NetBootFileSize : %d\n", NetBootFileSize);
  252. }
  253. if (NetOurHostName[0]) {
  254. printf ("NetOurHostName : %s\n", NetOurHostName);
  255. }
  256. if (NetOurRootPath[0]) {
  257. printf ("NetOurRootPath : %s\n", NetOurRootPath);
  258. }
  259. if (NetOurNISDomain[0]) {
  260. printf ("NetOurNISDomain : %s\n", NetOurNISDomain);
  261. }
  262. if (NetBootFileSize) {
  263. printf ("NetBootFileSize: %d\n", NetBootFileSize);
  264. }
  265. #endif /* DEBUG_BOOTP_EXT */
  266. }
  267. /*
  268. * Handle a BOOTP received packet.
  269. */
  270. static void
  271. BootpHandler(uchar * pkt, unsigned dest, unsigned src, unsigned len)
  272. {
  273. Bootp_t *bp;
  274. char *s;
  275. debug ("got BOOTP packet (src=%d, dst=%d, len=%d want_len=%d)\n",
  276. src, dest, len, sizeof (Bootp_t));
  277. bp = (Bootp_t *)pkt;
  278. if (BootpCheckPkt(pkt, dest, src, len)) /* Filter out pkts we don't want */
  279. return;
  280. /*
  281. * Got a good BOOTP reply. Copy the data into our variables.
  282. */
  283. #ifdef CONFIG_STATUS_LED
  284. status_led_set (STATUS_LED_BOOT, STATUS_LED_OFF);
  285. #endif
  286. BootpCopyNetParams(bp); /* Store net parameters from reply */
  287. /* Retrieve extended information (we must parse the vendor area) */
  288. if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
  289. BootpVendorProcess(&bp->bp_vend[4], len);
  290. NetSetTimeout(0, (thand_f *)0);
  291. debug ("Got good BOOTP\n");
  292. if ((s = getenv("autoload")) != NULL) {
  293. if (*s == 'n') {
  294. /*
  295. * Just use BOOTP to configure system;
  296. * Do not use TFTP to load the bootfile.
  297. */
  298. NetState = NETLOOP_SUCCESS;
  299. return;
  300. #if (CONFIG_COMMANDS & CFG_CMD_NFS)
  301. } else if (strcmp(s, "NFS") == 0) {
  302. /*
  303. * Use NFS to load the bootfile.
  304. */
  305. NfsStart();
  306. return;
  307. #endif
  308. }
  309. }
  310. TftpStart();
  311. }
  312. #endif /* !CFG_CMD_DHCP */
  313. /*
  314. * Timeout on BOOTP/DHCP request.
  315. */
  316. static void
  317. BootpTimeout(void)
  318. {
  319. if (BootpTry >= TIMEOUT_COUNT) {
  320. puts ("\nRetry count exceeded; starting again\n");
  321. NetStartAgain ();
  322. } else {
  323. NetSetTimeout (TIMEOUT * CFG_HZ, BootpTimeout);
  324. BootpRequest ();
  325. }
  326. }
  327. /*
  328. * Initialize BOOTP extension fields in the request.
  329. */
  330. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  331. static int DhcpExtended (u8 * e, int message_type, IPaddr_t ServerID, IPaddr_t RequestedIP)
  332. {
  333. u8 *start = e;
  334. u8 *cnt;
  335. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_VENDOREX)
  336. u8 *x;
  337. #endif
  338. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_SEND_HOSTNAME)
  339. uchar *hostname;
  340. #endif
  341. *e++ = 99; /* RFC1048 Magic Cookie */
  342. *e++ = 130;
  343. *e++ = 83;
  344. *e++ = 99;
  345. *e++ = 53; /* DHCP Message Type */
  346. *e++ = 1;
  347. *e++ = message_type;
  348. *e++ = 57; /* Maximum DHCP Message Size */
  349. *e++ = 2;
  350. *e++ = (576 - 312 + OPT_SIZE) >> 8;
  351. *e++ = (576 - 312 + OPT_SIZE) & 0xff;
  352. if (ServerID) {
  353. int tmp = ntohl (ServerID);
  354. *e++ = 54; /* ServerID */
  355. *e++ = 4;
  356. *e++ = tmp >> 24;
  357. *e++ = tmp >> 16;
  358. *e++ = tmp >> 8;
  359. *e++ = tmp & 0xff;
  360. }
  361. if (RequestedIP) {
  362. int tmp = ntohl (RequestedIP);
  363. *e++ = 50; /* Requested IP */
  364. *e++ = 4;
  365. *e++ = tmp >> 24;
  366. *e++ = tmp >> 16;
  367. *e++ = tmp >> 8;
  368. *e++ = tmp & 0xff;
  369. }
  370. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_SEND_HOSTNAME)
  371. if ((hostname = getenv ("hostname"))) {
  372. int hostnamelen = strlen (hostname);
  373. *e++ = 12; /* Hostname */
  374. *e++ = hostnamelen;
  375. memcpy (e, hostname, hostnamelen);
  376. e += hostnamelen;
  377. }
  378. #endif
  379. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_VENDOREX)
  380. if ((x = dhcp_vendorex_prep (e)))
  381. return x - start;
  382. #endif
  383. *e++ = 55; /* Parameter Request List */
  384. cnt = e++; /* Pointer to count of requested items */
  385. *cnt = 0;
  386. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_SUBNETMASK)
  387. *e++ = 1; /* Subnet Mask */
  388. *cnt += 1;
  389. #endif
  390. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_GATEWAY)
  391. *e++ = 3; /* Router Option */
  392. *cnt += 1;
  393. #endif
  394. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_DNS)
  395. *e++ = 6; /* DNS Server(s) */
  396. *cnt += 1;
  397. #endif
  398. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_HOSTNAME)
  399. *e++ = 12; /* Hostname */
  400. *cnt += 1;
  401. #endif
  402. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_BOOTFILESIZE)
  403. *e++ = 13; /* Boot File Size */
  404. *cnt += 1;
  405. #endif
  406. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_BOOTPATH)
  407. *e++ = 17; /* Boot path */
  408. *cnt += 1;
  409. #endif
  410. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_NISDOMAIN)
  411. *e++ = 40; /* NIS Domain name request */
  412. *cnt += 1;
  413. #endif
  414. *e++ = 255; /* End of the list */
  415. /* Pad to minimal length */
  416. #ifdef CONFIG_DHCP_MIN_EXT_LEN
  417. while ((e - start) <= CONFIG_DHCP_MIN_EXT_LEN)
  418. *e++ = 0;
  419. #endif
  420. return e - start;
  421. }
  422. #else /* CFG_CMD_DHCP */
  423. /*
  424. * Warning: no field size check - change CONFIG_BOOTP_MASK at your own risk!
  425. */
  426. static int BootpExtended (u8 * e)
  427. {
  428. u8 *start = e;
  429. *e++ = 99; /* RFC1048 Magic Cookie */
  430. *e++ = 130;
  431. *e++ = 83;
  432. *e++ = 99;
  433. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  434. *e++ = 53; /* DHCP Message Type */
  435. *e++ = 1;
  436. *e++ = DHCP_DISCOVER;
  437. *e++ = 57; /* Maximum DHCP Message Size */
  438. *e++ = 2;
  439. *e++ = (576 - 312 + OPT_SIZE) >> 16;
  440. *e++ = (576 - 312 + OPT_SIZE) & 0xff;
  441. #endif /* CFG_CMD_DHCP */
  442. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_SUBNETMASK)
  443. *e++ = 1; /* Subnet mask request */
  444. *e++ = 4;
  445. e += 4;
  446. #endif
  447. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_GATEWAY)
  448. *e++ = 3; /* Default gateway request */
  449. *e++ = 4;
  450. e += 4;
  451. #endif
  452. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_DNS)
  453. *e++ = 6; /* Domain Name Server */
  454. *e++ = 4;
  455. e += 4;
  456. #endif
  457. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_HOSTNAME)
  458. *e++ = 12; /* Host name request */
  459. *e++ = 32;
  460. e += 32;
  461. #endif
  462. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_BOOTFILESIZE)
  463. *e++ = 13; /* Boot file size */
  464. *e++ = 2;
  465. e += 2;
  466. #endif
  467. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_BOOTPATH)
  468. *e++ = 17; /* Boot path */
  469. *e++ = 32;
  470. e += 32;
  471. #endif
  472. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_NISDOMAIN)
  473. *e++ = 40; /* NIS Domain name request */
  474. *e++ = 32;
  475. e += 32;
  476. #endif
  477. *e++ = 255; /* End of the list */
  478. return e - start;
  479. }
  480. #endif /* CFG_CMD_DHCP */
  481. void
  482. BootpRequest (void)
  483. {
  484. volatile uchar *pkt, *iphdr;
  485. Bootp_t *bp;
  486. int ext_len, pktlen, iplen;
  487. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  488. dhcp_state = INIT;
  489. #endif
  490. #ifdef CONFIG_BOOTP_RANDOM_DELAY /* Random BOOTP delay */
  491. unsigned char bi_enetaddr[6];
  492. int reg;
  493. char *e,*s;
  494. uchar tmp[64];
  495. ulong tst1, tst2, sum, m_mask, m_value = 0;
  496. if (BootpTry ==0) {
  497. /* get our mac */
  498. reg = getenv_r ("ethaddr", tmp, sizeof(tmp));
  499. s = (reg > 0) ? tmp : NULL;
  500. for (reg=0; reg<6; ++reg) {
  501. bi_enetaddr[reg] = s ? simple_strtoul(s, &e, 16) : 0;
  502. if (s) {
  503. s = (*e) ? e+1 : e;
  504. }
  505. }
  506. #ifdef DEBUG
  507. puts ("BootpRequest => Our Mac: ");
  508. for (reg=0; reg<6; reg++) {
  509. printf ("%x%c",
  510. bi_enetaddr[reg],
  511. reg==5 ? '\n' : ':');
  512. }
  513. #endif /* DEBUG */
  514. /* Mac-Manipulation 2 get seed1 */
  515. tst1=0;
  516. tst2=0;
  517. for (reg=2; reg<6; reg++) {
  518. tst1 = tst1 << 8;
  519. tst1 = tst1 | bi_enetaddr[reg];
  520. }
  521. for (reg=0; reg<2; reg++) {
  522. tst2 = tst2 | bi_enetaddr[reg];
  523. tst2 = tst2 << 8;
  524. }
  525. seed1 = tst1^tst2;
  526. /* Mirror seed1*/
  527. m_mask=0x1;
  528. for (reg=1;reg<=32;reg++) {
  529. m_value |= (m_mask & seed1);
  530. seed1 = seed1 >> 1;
  531. m_value = m_value << 1;
  532. }
  533. seed1 = m_value;
  534. seed2 = 0xB78D0945;
  535. }
  536. /* Random Number Generator */
  537. for (reg=0;reg<=0;reg++) {
  538. sum = seed1 + seed2;
  539. if (sum < seed1 || sum < seed2)
  540. sum++;
  541. seed2 = seed1;
  542. seed1 = sum;
  543. if (BootpTry<=2) { /* Start with max 1024 * 1ms */
  544. sum = sum >> (22-BootpTry);
  545. } else { /*After 3rd BOOTP request max 8192 * 1ms */
  546. sum = sum >> 19;
  547. }
  548. }
  549. printf ("Random delay: %ld ms...\n", sum);
  550. for (reg=0; reg <sum; reg++) {
  551. udelay(1000); /*Wait 1ms*/
  552. }
  553. #endif /* CONFIG_BOOTP_RANDOM_DELAY */
  554. printf("BOOTP broadcast %d\n", ++BootpTry);
  555. pkt = NetTxPacket;
  556. memset ((void*)pkt, 0, PKTSIZE);
  557. pkt += NetSetEther(pkt, NetBcastAddr, PROT_IP);
  558. /*
  559. * Next line results in incorrect packet size being transmitted, resulting
  560. * in errors in some DHCP servers, reporting missing bytes. Size must be
  561. * set in packet header after extension length has been determined.
  562. * C. Hallinan, DS4.COM, Inc.
  563. */
  564. /* NetSetIP(pkt, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, sizeof (Bootp_t)); */
  565. iphdr = pkt; /* We need this later for NetSetIP() */
  566. pkt += IP_HDR_SIZE;
  567. bp = (Bootp_t *)pkt;
  568. bp->bp_op = OP_BOOTREQUEST;
  569. bp->bp_htype = HWT_ETHER;
  570. bp->bp_hlen = HWL_ETHER;
  571. bp->bp_hops = 0;
  572. bp->bp_secs = htons(get_timer(0) / CFG_HZ);
  573. NetWriteIP(&bp->bp_ciaddr, 0);
  574. NetWriteIP(&bp->bp_yiaddr, 0);
  575. NetWriteIP(&bp->bp_siaddr, 0);
  576. NetWriteIP(&bp->bp_giaddr, 0);
  577. memcpy (bp->bp_chaddr, NetOurEther, 6);
  578. copy_filename (bp->bp_file, BootFile, sizeof(bp->bp_file));
  579. /* Request additional information from the BOOTP/DHCP server */
  580. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  581. ext_len = DhcpExtended(bp->bp_vend, DHCP_DISCOVER, 0, 0);
  582. #else
  583. ext_len = BootpExtended(bp->bp_vend);
  584. #endif /* CFG_CMD_DHCP */
  585. /*
  586. * Bootp ID is the lower 4 bytes of our ethernet address
  587. * plus the current time in HZ.
  588. */
  589. BootpID = ((ulong)NetOurEther[2] << 24)
  590. | ((ulong)NetOurEther[3] << 16)
  591. | ((ulong)NetOurEther[4] << 8)
  592. | (ulong)NetOurEther[5];
  593. BootpID += get_timer(0);
  594. BootpID = htonl(BootpID);
  595. NetCopyLong(&bp->bp_id, &BootpID);
  596. /*
  597. * Calculate proper packet lengths taking into account the
  598. * variable size of the options field
  599. */
  600. pktlen = BOOTP_SIZE - sizeof(bp->bp_vend) + ext_len;
  601. iplen = BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + ext_len;
  602. NetSetIP(iphdr, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, iplen);
  603. NetSetTimeout(SELECT_TIMEOUT * CFG_HZ, BootpTimeout);
  604. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  605. dhcp_state = SELECTING;
  606. NetSetHandler(DhcpHandler);
  607. #else
  608. NetSetHandler(BootpHandler);
  609. #endif /* CFG_CMD_DHCP */
  610. NetSendPacket(NetTxPacket, pktlen);
  611. }
  612. #if (CONFIG_COMMANDS & CFG_CMD_DHCP)
  613. static void DhcpOptionsProcess (uchar * popt)
  614. {
  615. uchar *end = popt + BOOTP_HDR_SIZE;
  616. int oplen, size;
  617. while (popt < end && *popt != 0xff) {
  618. oplen = *(popt + 1);
  619. switch (*popt) {
  620. case 1:
  621. NetCopyIP (&NetOurSubnetMask, (popt + 2));
  622. break;
  623. case 3:
  624. NetCopyIP (&NetOurGatewayIP, (popt + 2));
  625. break;
  626. case 6:
  627. NetCopyIP (&NetOurDNSIP, (popt + 2));
  628. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_DNS2)
  629. if (*(popt + 1) > 4) {
  630. NetCopyIP (&NetOurDNS2IP, (popt + 2 + 4));
  631. }
  632. #endif
  633. break;
  634. case 12:
  635. size = truncate_sz ("Host Name", sizeof (NetOurHostName), oplen);
  636. memcpy (&NetOurHostName, popt + 2, size);
  637. NetOurHostName[size] = 0;
  638. break;
  639. case 15: /* Ignore Domain Name Option */
  640. break;
  641. case 17:
  642. size = truncate_sz ("Root Path", sizeof (NetOurRootPath), oplen);
  643. memcpy (&NetOurRootPath, popt + 2, size);
  644. NetOurRootPath[size] = 0;
  645. break;
  646. case 51:
  647. NetCopyLong (&dhcp_leasetime, (ulong *) (popt + 2));
  648. break;
  649. case 53: /* Ignore Message Type Option */
  650. break;
  651. case 54:
  652. NetCopyIP (&NetDHCPServerIP, (popt + 2));
  653. break;
  654. case 58: /* Ignore Renewal Time Option */
  655. break;
  656. case 59: /* Ignore Rebinding Time Option */
  657. break;
  658. default:
  659. #if (CONFIG_BOOTP_MASK & CONFIG_BOOTP_VENDOREX)
  660. if (dhcp_vendorex_proc (popt))
  661. break;
  662. #endif
  663. printf ("*** Unhandled DHCP Option in OFFER/ACK: %d\n", *popt);
  664. break;
  665. }
  666. popt += oplen + 2; /* Process next option */
  667. }
  668. }
  669. static int DhcpMessageType(unsigned char *popt)
  670. {
  671. if (NetReadLong((ulong*)popt) != htonl(BOOTP_VENDOR_MAGIC))
  672. return -1;
  673. popt += 4;
  674. while ( *popt != 0xff ) {
  675. if ( *popt == 53 ) /* DHCP Message Type */
  676. return *(popt + 2);
  677. popt += *(popt + 1) + 2; /* Scan through all options */
  678. }
  679. return -1;
  680. }
  681. static void DhcpSendRequestPkt(Bootp_t *bp_offer)
  682. {
  683. volatile uchar *pkt, *iphdr;
  684. Bootp_t *bp;
  685. int pktlen, iplen, extlen;
  686. IPaddr_t OfferedIP;
  687. debug ("DhcpSendRequestPkt: Sending DHCPREQUEST\n");
  688. pkt = NetTxPacket;
  689. memset ((void*)pkt, 0, PKTSIZE);
  690. pkt += NetSetEther(pkt, NetBcastAddr, PROT_IP);
  691. iphdr = pkt; /* We'll need this later to set proper pkt size */
  692. pkt += IP_HDR_SIZE;
  693. bp = (Bootp_t *)pkt;
  694. bp->bp_op = OP_BOOTREQUEST;
  695. bp->bp_htype = HWT_ETHER;
  696. bp->bp_hlen = HWL_ETHER;
  697. bp->bp_hops = 0;
  698. bp->bp_secs = htons(get_timer(0) / CFG_HZ);
  699. NetCopyIP(&bp->bp_ciaddr, &bp_offer->bp_ciaddr); /* both in network byte order */
  700. NetCopyIP(&bp->bp_yiaddr, &bp_offer->bp_yiaddr);
  701. NetCopyIP(&bp->bp_siaddr, &bp_offer->bp_siaddr);
  702. NetCopyIP(&bp->bp_giaddr, &bp_offer->bp_giaddr);
  703. memcpy (bp->bp_chaddr, NetOurEther, 6);
  704. /*
  705. * ID is the id of the OFFER packet
  706. */
  707. NetCopyLong(&bp->bp_id, &bp_offer->bp_id);
  708. /*
  709. * Copy options from OFFER packet if present
  710. */
  711. NetCopyIP(&OfferedIP, &bp->bp_yiaddr);
  712. extlen = DhcpExtended(bp->bp_vend, DHCP_REQUEST, NetDHCPServerIP, OfferedIP);
  713. pktlen = BOOTP_SIZE - sizeof(bp->bp_vend) + extlen;
  714. iplen = BOOTP_HDR_SIZE - sizeof(bp->bp_vend) + extlen;
  715. NetSetIP(iphdr, 0xFFFFFFFFL, PORT_BOOTPS, PORT_BOOTPC, iplen);
  716. debug ("Transmitting DHCPREQUEST packet: len = %d\n", pktlen);
  717. NetSendPacket(NetTxPacket, pktlen);
  718. }
  719. /*
  720. * Handle DHCP received packets.
  721. */
  722. static void
  723. DhcpHandler(uchar * pkt, unsigned dest, unsigned src, unsigned len)
  724. {
  725. Bootp_t *bp = (Bootp_t *)pkt;
  726. debug ("DHCPHandler: got packet: (src=%d, dst=%d, len=%d) state: %d\n",
  727. src, dest, len, dhcp_state);
  728. if (BootpCheckPkt(pkt, dest, src, len)) /* Filter out pkts we don't want */
  729. return;
  730. debug ("DHCPHandler: got DHCP packet: (src=%d, dst=%d, len=%d) state: %d\n",
  731. src, dest, len, dhcp_state);
  732. switch (dhcp_state) {
  733. case SELECTING:
  734. /*
  735. * Wait an appropriate time for any potential DHCPOFFER packets
  736. * to arrive. Then select one, and generate DHCPREQUEST response.
  737. * If filename is in format we recognize, assume it is a valid
  738. * OFFER from a server we want.
  739. */
  740. debug ("DHCP: state=SELECTING bp_file: \"%s\"\n", bp->bp_file);
  741. #ifdef CFG_BOOTFILE_PREFIX
  742. if (strncmp(bp->bp_file,
  743. CFG_BOOTFILE_PREFIX,
  744. strlen(CFG_BOOTFILE_PREFIX)) == 0 ) {
  745. #endif /* CFG_BOOTFILE_PREFIX */
  746. debug ("TRANSITIONING TO REQUESTING STATE\n");
  747. dhcp_state = REQUESTING;
  748. if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
  749. DhcpOptionsProcess(&bp->bp_vend[4]);
  750. BootpCopyNetParams(bp); /* Store net params from reply */
  751. NetSetTimeout(TIMEOUT * CFG_HZ, BootpTimeout);
  752. DhcpSendRequestPkt(bp);
  753. #ifdef CFG_BOOTFILE_PREFIX
  754. }
  755. #endif /* CFG_BOOTFILE_PREFIX */
  756. return;
  757. break;
  758. case REQUESTING:
  759. debug ("DHCP State: REQUESTING\n");
  760. if ( DhcpMessageType(bp->bp_vend) == DHCP_ACK ) {
  761. char *s;
  762. if (NetReadLong((ulong*)&bp->bp_vend[0]) == htonl(BOOTP_VENDOR_MAGIC))
  763. DhcpOptionsProcess(&bp->bp_vend[4]);
  764. BootpCopyNetParams(bp); /* Store net params from reply */
  765. dhcp_state = BOUND;
  766. puts ("DHCP client bound to address ");
  767. print_IPaddr(NetOurIP);
  768. putc ('\n');
  769. /* Obey the 'autoload' setting */
  770. if ((s = getenv("autoload")) != NULL) {
  771. if (*s == 'n') {
  772. /*
  773. * Just use BOOTP to configure system;
  774. * Do not use TFTP to load the bootfile.
  775. */
  776. NetState = NETLOOP_SUCCESS;
  777. return;
  778. #if (CONFIG_COMMANDS & CFG_CMD_NFS)
  779. } else if (strcmp(s, "NFS") == 0) {
  780. /*
  781. * Use NFS to load the bootfile.
  782. */
  783. NfsStart();
  784. return;
  785. #endif
  786. }
  787. }
  788. TftpStart();
  789. return;
  790. }
  791. break;
  792. default:
  793. puts ("DHCP: INVALID STATE\n");
  794. break;
  795. }
  796. }
  797. void DhcpRequest(void)
  798. {
  799. BootpRequest();
  800. }
  801. #endif /* CFG_CMD_DHCP */
  802. #endif /* CFG_CMD_NET */