netconsole.c 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335
  1. /*
  2. * (C) Copyright 2004
  3. * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
  4. *
  5. * SPDX-License-Identifier: GPL-2.0+
  6. */
  7. #include <common.h>
  8. #include <command.h>
  9. #include <stdio_dev.h>
  10. #include <net.h>
  11. DECLARE_GLOBAL_DATA_PTR;
  12. #ifndef CONFIG_NETCONSOLE_BUFFER_SIZE
  13. #define CONFIG_NETCONSOLE_BUFFER_SIZE 512
  14. #endif
  15. static char input_buffer[CONFIG_NETCONSOLE_BUFFER_SIZE];
  16. static int input_size; /* char count in input buffer */
  17. static int input_offset; /* offset to valid chars in input buffer */
  18. static int input_recursion;
  19. static int output_recursion;
  20. static int net_timeout;
  21. static uchar nc_ether[6]; /* server enet address */
  22. static struct in_addr nc_ip; /* server ip */
  23. static short nc_out_port; /* target output port */
  24. static short nc_in_port; /* source input port */
  25. static const char *output_packet; /* used by first send udp */
  26. static int output_packet_len;
  27. /*
  28. * Start with a default last protocol.
  29. * We are only interested in NETCONS or not.
  30. */
  31. enum proto_t net_loop_last_protocol = BOOTP;
  32. static void nc_wait_arp_handler(uchar *pkt, unsigned dest,
  33. struct in_addr sip, unsigned src,
  34. unsigned len)
  35. {
  36. net_set_state(NETLOOP_SUCCESS); /* got arp reply - quit net loop */
  37. }
  38. static void nc_handler(uchar *pkt, unsigned dest, struct in_addr sip,
  39. unsigned src, unsigned len)
  40. {
  41. if (input_size)
  42. net_set_state(NETLOOP_SUCCESS); /* got input - quit net loop */
  43. }
  44. static void nc_timeout_handler(void)
  45. {
  46. net_set_state(NETLOOP_SUCCESS);
  47. }
  48. static int is_broadcast(struct in_addr ip)
  49. {
  50. static struct in_addr netmask;
  51. static struct in_addr our_ip;
  52. static int env_changed_id;
  53. int env_id = get_env_id();
  54. /* update only when the environment has changed */
  55. if (env_changed_id != env_id) {
  56. netmask = getenv_ip("netmask");
  57. our_ip = getenv_ip("ipaddr");
  58. env_changed_id = env_id;
  59. }
  60. return (ip.s_addr == ~0 || /* 255.255.255.255 (global bcast) */
  61. ((netmask.s_addr & our_ip.s_addr) ==
  62. (netmask.s_addr & ip.s_addr) && /* on the same net and */
  63. (netmask.s_addr | ip.s_addr) == ~0)); /* bcast to our net */
  64. }
  65. static int refresh_settings_from_env(void)
  66. {
  67. const char *p;
  68. static int env_changed_id;
  69. int env_id = get_env_id();
  70. /* update only when the environment has changed */
  71. if (env_changed_id != env_id) {
  72. if (getenv("ncip")) {
  73. nc_ip = getenv_ip("ncip");
  74. if (!nc_ip.s_addr)
  75. return -1; /* ncip is 0.0.0.0 */
  76. p = strchr(getenv("ncip"), ':');
  77. if (p != NULL) {
  78. nc_out_port = simple_strtoul(p + 1, NULL, 10);
  79. nc_in_port = nc_out_port;
  80. }
  81. } else {
  82. nc_ip.s_addr = ~0; /* ncip is not set, so broadcast */
  83. }
  84. p = getenv("ncoutport");
  85. if (p != NULL)
  86. nc_out_port = simple_strtoul(p, NULL, 10);
  87. p = getenv("ncinport");
  88. if (p != NULL)
  89. nc_in_port = simple_strtoul(p, NULL, 10);
  90. if (is_broadcast(nc_ip))
  91. /* broadcast MAC address */
  92. memset(nc_ether, 0xff, sizeof(nc_ether));
  93. else
  94. /* force arp request */
  95. memset(nc_ether, 0, sizeof(nc_ether));
  96. }
  97. return 0;
  98. }
  99. /**
  100. * Called from net_loop in net/net.c before each packet
  101. */
  102. void nc_start(void)
  103. {
  104. refresh_settings_from_env();
  105. if (!output_packet_len || memcmp(nc_ether, net_null_ethaddr, 6)) {
  106. /* going to check for input packet */
  107. net_set_udp_handler(nc_handler);
  108. net_set_timeout_handler(net_timeout, nc_timeout_handler);
  109. } else {
  110. /* send arp request */
  111. uchar *pkt;
  112. net_set_arp_handler(nc_wait_arp_handler);
  113. pkt = (uchar *)net_tx_packet + net_eth_hdr_size() +
  114. IP_UDP_HDR_SIZE;
  115. memcpy(pkt, output_packet, output_packet_len);
  116. net_send_udp_packet(nc_ether, nc_ip, nc_out_port, nc_in_port,
  117. output_packet_len);
  118. }
  119. }
  120. int nc_input_packet(uchar *pkt, struct in_addr src_ip, unsigned dest_port,
  121. unsigned src_port, unsigned len)
  122. {
  123. int end, chunk;
  124. if (dest_port != nc_in_port || !len)
  125. return 0; /* not for us */
  126. if (src_ip.s_addr != nc_ip.s_addr && !is_broadcast(nc_ip))
  127. return 0; /* not from our client */
  128. debug_cond(DEBUG_DEV_PKT, "input: \"%*.*s\"\n", len, len, pkt);
  129. if (input_size == sizeof(input_buffer))
  130. return 1; /* no space */
  131. if (len > sizeof(input_buffer) - input_size)
  132. len = sizeof(input_buffer) - input_size;
  133. end = input_offset + input_size;
  134. if (end > sizeof(input_buffer))
  135. end -= sizeof(input_buffer);
  136. chunk = len;
  137. if (end + len > sizeof(input_buffer)) {
  138. chunk = sizeof(input_buffer) - end;
  139. memcpy(input_buffer, pkt + chunk, len - chunk);
  140. }
  141. memcpy(input_buffer + end, pkt, chunk);
  142. input_size += len;
  143. return 1;
  144. }
  145. static void nc_send_packet(const char *buf, int len)
  146. {
  147. struct eth_device *eth;
  148. int inited = 0;
  149. uchar *pkt;
  150. uchar *ether;
  151. struct in_addr ip;
  152. debug_cond(DEBUG_DEV_PKT, "output: \"%*.*s\"\n", len, len, buf);
  153. eth = eth_get_dev();
  154. if (eth == NULL)
  155. return;
  156. if (!memcmp(nc_ether, net_null_ethaddr, 6)) {
  157. if (eth->state == ETH_STATE_ACTIVE)
  158. return; /* inside net loop */
  159. output_packet = buf;
  160. output_packet_len = len;
  161. input_recursion = 1;
  162. net_loop(NETCONS); /* wait for arp reply and send packet */
  163. input_recursion = 0;
  164. output_packet_len = 0;
  165. return;
  166. }
  167. if (eth->state != ETH_STATE_ACTIVE) {
  168. if (eth_is_on_demand_init()) {
  169. if (eth_init() < 0)
  170. return;
  171. eth_set_last_protocol(NETCONS);
  172. } else {
  173. eth_init_state_only();
  174. }
  175. inited = 1;
  176. }
  177. pkt = (uchar *)net_tx_packet + net_eth_hdr_size() + IP_UDP_HDR_SIZE;
  178. memcpy(pkt, buf, len);
  179. ether = nc_ether;
  180. ip = nc_ip;
  181. net_send_udp_packet(ether, ip, nc_out_port, nc_in_port, len);
  182. if (inited) {
  183. if (eth_is_on_demand_init())
  184. eth_halt();
  185. else
  186. eth_halt_state_only();
  187. }
  188. }
  189. static int nc_stdio_start(struct stdio_dev *dev)
  190. {
  191. int retval;
  192. nc_out_port = 6666; /* default port */
  193. nc_in_port = nc_out_port;
  194. retval = refresh_settings_from_env();
  195. if (retval != 0)
  196. return retval;
  197. /*
  198. * Initialize the static IP settings and buffer pointers
  199. * incase we call net_send_udp_packet before net_loop
  200. */
  201. net_init();
  202. return 0;
  203. }
  204. static void nc_stdio_putc(struct stdio_dev *dev, char c)
  205. {
  206. if (output_recursion)
  207. return;
  208. output_recursion = 1;
  209. nc_send_packet(&c, 1);
  210. output_recursion = 0;
  211. }
  212. static void nc_stdio_puts(struct stdio_dev *dev, const char *s)
  213. {
  214. int len;
  215. if (output_recursion)
  216. return;
  217. output_recursion = 1;
  218. len = strlen(s);
  219. while (len) {
  220. int send_len = min(len, (int)sizeof(input_buffer));
  221. nc_send_packet(s, send_len);
  222. len -= send_len;
  223. s += send_len;
  224. }
  225. output_recursion = 0;
  226. }
  227. static int nc_stdio_getc(struct stdio_dev *dev)
  228. {
  229. uchar c;
  230. input_recursion = 1;
  231. net_timeout = 0; /* no timeout */
  232. while (!input_size)
  233. net_loop(NETCONS);
  234. input_recursion = 0;
  235. c = input_buffer[input_offset++];
  236. if (input_offset >= sizeof(input_buffer))
  237. input_offset -= sizeof(input_buffer);
  238. input_size--;
  239. return c;
  240. }
  241. static int nc_stdio_tstc(struct stdio_dev *dev)
  242. {
  243. struct eth_device *eth;
  244. if (input_recursion)
  245. return 0;
  246. if (input_size)
  247. return 1;
  248. eth = eth_get_dev();
  249. if (eth && eth->state == ETH_STATE_ACTIVE)
  250. return 0; /* inside net loop */
  251. input_recursion = 1;
  252. net_timeout = 1;
  253. net_loop(NETCONS); /* kind of poll */
  254. input_recursion = 0;
  255. return input_size != 0;
  256. }
  257. int drv_nc_init(void)
  258. {
  259. struct stdio_dev dev;
  260. int rc;
  261. memset(&dev, 0, sizeof(dev));
  262. strcpy(dev.name, "nc");
  263. dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
  264. dev.start = nc_stdio_start;
  265. dev.putc = nc_stdio_putc;
  266. dev.puts = nc_stdio_puts;
  267. dev.getc = nc_stdio_getc;
  268. dev.tstc = nc_stdio_tstc;
  269. rc = stdio_register(&dev);
  270. return (rc == 0) ? 1 : rc;
  271. }