net_lwip2.c 54 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715
  1. #include "platform_def.h"
  2. #include "luat_base.h"
  3. #include "luat_timer.h"
  4. #include "luat_mcu.h"
  5. #include "luat_rtos.h"
  6. #include "dns_def.h"
  7. #include "luat_network_adapter.h"
  8. #include "lwip/init.h"
  9. #include "lwip/tcpip.h"
  10. #include "lwip/udp.h"
  11. #include "lwip/sockets.h"
  12. #include "net_lwip2.h"
  13. #include "luat_crypto.h"
  14. #include "luat_msgbus.h"
  15. #include "luat_malloc.h"
  16. #define LUAT_LOG_TAG "net"
  17. #include "luat_log.h"
  18. #define NET_DBG LLOGD
  19. #define NET_ERR LLOGE
  20. #ifndef SOCKET_BUF_LEN
  21. #define SOCKET_BUF_LEN (3 * TCP_MSS)
  22. #endif
  23. extern void luat_netdrv_etharp_tmr(void);
  24. static int net_lwip2_set_dns_server(uint8_t server_index, luat_ip_addr_t *ip, void *user_data);
  25. enum
  26. {
  27. EV_LWIP_EVENT_START = USER_EVENT_ID_START + 0x2000000,
  28. EV_LWIP_SOCKET_TX,
  29. EV_LWIP_NETIF_INPUT,
  30. EV_LWIP_TCP_TIMER,
  31. EV_LWIP_DNS_TIMER,
  32. EV_LWIP_SOCKET_RX_DONE,
  33. EV_LWIP_SOCKET_CREATE,
  34. EV_LWIP_SOCKET_CONNECT,
  35. EV_LWIP_SOCKET_DNS,
  36. EV_LWIP_SOCKET_DNS_IPV6,
  37. EV_LWIP_SOCKET_LISTEN,
  38. EV_LWIP_SOCKET_ACCPET,
  39. EV_LWIP_SOCKET_CLOSE,
  40. EV_LWIP_NETIF_LINK_STATE,
  41. EV_LWIP_DHCP_TIMER,
  42. EV_LWIP_FAST_TIMER,
  43. EV_LWIP_NETIF_SET_IP,
  44. EV_LWIP_NETIF_IPV6_BY_MAC,
  45. EV_LWIP_ARP_TIMER,
  46. };
  47. #define SOCKET_LOCK(ID) platform_lock_mutex(prvlwip.socket[ID].mutex)
  48. #define SOCKET_UNLOCK(ID) platform_unlock_mutex(prvlwip.socket[ID].mutex)
  49. #undef platform_send_event
  50. // static net_lwip2_ctrl_struct* lwip_ctrls[NW_ADAPTER_INDEX_LWIP_NETIF_QTY];
  51. static net_lwip2_ctrl_struct prvlwip;
  52. static void net_lwip2_check_network_ready(uint8_t adapter_index);
  53. static void net_lwip2_task(void *param);
  54. static void net_lwip2_create_socket_now(uint8_t adapter_index, uint8_t socket_id);
  55. static void platform_send_event(void *p, uint32_t id, uint32_t param1, uint32_t param2, uint32_t param3);
  56. static ip_addr_t *net_lwip2_get_ip6(uint8_t adapter_index);
  57. static err_t net_lwip2_dns_recv_cb(void *arg, struct udp_pcb *pcb, struct pbuf *p, const ip_addr_t *addr, u16_t port);
  58. static int net_lwip2_check_ack(uint8_t adapter_index, int socket_id);
  59. static uint32_t register_statue;
  60. static uint8_t prvlwip_inited = 0;
  61. static LUAT_RT_RET_TYPE net_lwip2_timer_cb(LUAT_RT_CB_PARAM)
  62. {
  63. platform_send_event(NULL, (uint32_t)EV_LWIP_DNS_TIMER, 0, 0, (uint32_t)param);
  64. return LUAT_RT_RET;
  65. }
  66. #ifdef LUAT_USE_NETDRV_LWIP_ARP
  67. static LUAT_RT_RET_TYPE net_lwip_arp_timer_cb(LUAT_RT_CB_PARAM)
  68. {
  69. platform_send_event(NULL, (uint32_t)EV_LWIP_ARP_TIMER, 0, 0, (uint32_t)param);
  70. return LUAT_RT_RET;
  71. }
  72. #endif
  73. void net_lwip2_init(uint8_t adapter_index)
  74. {
  75. uint8_t i;
  76. for(i = 0; i < MAX_SOCK_NUM; i++)
  77. {
  78. INIT_LLIST_HEAD(&prvlwip.socket[i].wait_ack_head);
  79. INIT_LLIST_HEAD(&prvlwip.socket[i].tx_head);
  80. INIT_LLIST_HEAD(&prvlwip.socket[i].rx_head);
  81. prvlwip.socket[i].mutex = platform_create_mutex();
  82. }
  83. }
  84. void net_lwip2_set_netif(uint8_t adapter_index, struct netif *netif) {
  85. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) {
  86. return; // 超范围了
  87. }
  88. if (0 == prvlwip_inited) {
  89. prvlwip_inited = 1;
  90. net_lwip2_init(adapter_index);
  91. #ifdef LUAT_USE_NETDRV_LWIP_ARP
  92. prvlwip.arp_timer = platform_create_timer(net_lwip_arp_timer_cb, (void *)NULL, NULL);
  93. platform_start_timer(prvlwip.arp_timer, 1000, 1);
  94. #endif
  95. }
  96. if (NULL == prvlwip.dns_client[adapter_index]) {
  97. prvlwip.dns_client[adapter_index] = luat_heap_zalloc(sizeof(dns_client_t));
  98. // memset(prvlwip.dns_client[adapter_index], 0, sizeof(dns_client_t));
  99. dns_init_client(prvlwip.dns_client[adapter_index]);
  100. }
  101. if (NULL == prvlwip.dns_udp[adapter_index]) {
  102. prvlwip.dns_udp[adapter_index] = udp_new();
  103. prvlwip.dns_udp[adapter_index]->recv = net_lwip2_dns_recv_cb;
  104. prvlwip.dns_udp[adapter_index]->recv_arg = adapter_index;
  105. #if LWIP_VERSION_MAJOR == 2 && LWIP_VERSION_MINOR >= 1
  106. //udp_bind_netif(prvlwip.dns_udp[adapter_index], netif);
  107. #endif
  108. int tmp = adapter_index;
  109. prvlwip.dns_timer[adapter_index] = platform_create_timer(net_lwip2_timer_cb, (void *)tmp, NULL);
  110. }
  111. prvlwip.lwip_netif[adapter_index] = netif;
  112. }
  113. static int net_lwip2_del_data_cache(void *p, void *u)
  114. {
  115. socket_data_t *pdata = (socket_data_t *)p;
  116. luat_heap_free(pdata->data);
  117. return LIST_DEL;
  118. }
  119. static int net_lwip2_next_data_cache(void *p, void *u)
  120. {
  121. socket_ctrl_t *socket = (socket_ctrl_t *)u;
  122. socket_data_t *pdata = (socket_data_t *)p;
  123. if (socket->tag != pdata->tag)
  124. {
  125. NET_DBG("tag error");
  126. luat_heap_free(pdata->data);
  127. return LIST_DEL;
  128. }
  129. return LIST_FIND;
  130. }
  131. static socket_data_t * net_lwip2_create_data_node(uint8_t socket_id, uint8_t *data, uint32_t len, luat_ip_addr_t *remote_ip, uint16_t remote_port)
  132. {
  133. socket_data_t *p = (socket_data_t *)luat_heap_zalloc(sizeof(socket_data_t));
  134. if (p)
  135. {
  136. memset(p, 0, sizeof(socket_data_t));
  137. p->len = len;
  138. p->port = remote_port;
  139. if (remote_ip)
  140. {
  141. p->ip = *remote_ip;
  142. }
  143. else
  144. {
  145. ip_addr_set_zero(&p->ip);
  146. }
  147. p->tag = prvlwip.socket[socket_id].tag;
  148. if (data && len)
  149. {
  150. p->data = luat_heap_zalloc(len);
  151. if (p->data)
  152. {
  153. memcpy(p->data, data, len);
  154. }
  155. else
  156. {
  157. luat_heap_free(p);
  158. return NULL;
  159. }
  160. }
  161. }
  162. return p;
  163. }
  164. static void net_lwip2_callback_to_nw_task(uint8_t adapter_index, uint32_t event_id, uint32_t param1, uint32_t param2, uint32_t param3)
  165. {
  166. luat_network_cb_param_t param = {.tag = 0, .param = prvlwip.user_data};
  167. OS_EVENT event = { .ID = event_id, .Param1 = param1, .Param2 = param2, .Param3 = param3};
  168. if ((event_id > EV_NW_DNS_RESULT))
  169. {
  170. if (event_id != EV_NW_SOCKET_CLOSE_OK)
  171. {
  172. event.Param3 = prvlwip.socket[param1].param;
  173. param.tag = prvlwip.socket[param1].tag;
  174. }
  175. else
  176. {
  177. event.Param3 = ((luat_network_cb_param_t *)param3)->param;
  178. param.tag = ((luat_network_cb_param_t *)param3)->tag;
  179. }
  180. }
  181. switch(event_id)
  182. {
  183. case EV_NW_SOCKET_CLOSE_OK:
  184. case EV_NW_SOCKET_CONNECT_OK:
  185. case EV_NW_SOCKET_ERROR:
  186. prvlwip.socket_busy &= ~(1 << param1);
  187. break;
  188. }
  189. prvlwip.socket_cb(&event, &param);
  190. }
  191. static void net_lwip2_tcp_error(uint8_t adapter_index, int socket_id)
  192. {
  193. prvlwip.socket[socket_id].remote_close = 1;
  194. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  195. }
  196. static err_t net_lwip2_tcp_connected_cb(void *arg, struct tcp_pcb *tpcb, err_t err)
  197. {
  198. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  199. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  200. prvlwip.socket_connect &= ~(1 << socket_id);
  201. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_CONNECT_OK, socket_id, 0, 0);
  202. return ERR_OK;
  203. }
  204. static int net_lwip2_rx_data(int socket_id, struct pbuf *p, const ip_addr_t *addr, u16_t port)
  205. {
  206. int is_mem_err = 0;
  207. SOCKET_LOCK(socket_id);
  208. socket_data_t *data_p = net_lwip2_create_data_node(socket_id, NULL, 0, addr, port);
  209. if (data_p)
  210. {
  211. data_p->data = luat_heap_zalloc(p->tot_len);
  212. if (data_p->data)
  213. {
  214. data_p->len = pbuf_copy_partial(p, data_p->data, p->tot_len, 0);
  215. // NET_DBG("new data %ubyte", p->tot_len);
  216. llist_add_tail(&data_p->node, &prvlwip.socket[socket_id].rx_head);
  217. prvlwip.socket[socket_id].rx_wait_size += p->tot_len;
  218. }
  219. else
  220. {
  221. luat_heap_free(data_p);
  222. is_mem_err = 1;
  223. }
  224. }
  225. else
  226. {
  227. is_mem_err = 1;
  228. }
  229. SOCKET_UNLOCK(socket_id);
  230. return is_mem_err;
  231. }
  232. static void net_lwip2_tcp_close_done(uint8_t adapter_index, int socket_id, uint8_t notify)
  233. {
  234. luat_network_cb_param_t cb_param;
  235. // LLOGD("net_lwip2_tcp_close_done 1");
  236. // OS_LOCK;
  237. // LLOGD("net_lwip2_tcp_close_done 2");
  238. SOCKET_LOCK(socket_id);
  239. // LLOGD("net_lwip2_tcp_close_done 3");
  240. cb_param.param = prvlwip.socket[socket_id].param;
  241. cb_param.tag = prvlwip.socket[socket_id].tag;
  242. prvlwip.socket[socket_id].pcb.ip = NULL;
  243. prvlwip.socket[socket_id].listen_tcp = NULL;
  244. prvlwip.socket[socket_id].remote_close = 0;
  245. prvlwip.socket[socket_id].state = 0;
  246. prvlwip.socket[socket_id].in_use = 0;
  247. prvlwip.socket[socket_id].param = NULL;
  248. prvlwip.socket[socket_id].rx_wait_size = 0;
  249. prvlwip.socket[socket_id].tx_wait_size = 0;
  250. llist_traversal(&prvlwip.socket[socket_id].wait_ack_head, net_lwip2_del_data_cache, NULL);
  251. llist_traversal(&prvlwip.socket[socket_id].tx_head, net_lwip2_del_data_cache, NULL);
  252. llist_traversal(&prvlwip.socket[socket_id].rx_head, net_lwip2_del_data_cache, NULL);
  253. prvlwip.socket_busy &= ~(1 << socket_id);
  254. prvlwip.socket_connect &= ~(1 << socket_id);
  255. // OS_UNLOCK;
  256. SOCKET_UNLOCK(socket_id);
  257. if (notify)
  258. {
  259. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_CLOSE_OK, socket_id, 0, &cb_param);
  260. }
  261. }
  262. static err_t net_lwip2_tcp_recv_cb(void *arg, struct tcp_pcb *tpcb,
  263. struct pbuf *p, err_t err)
  264. {
  265. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  266. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  267. uint16_t len;
  268. if (p)
  269. {
  270. // tcp_recved(tpcb, p->tot_len);
  271. len = p->tot_len;
  272. if (net_lwip2_rx_data(socket_id, p, NULL, 0))
  273. {
  274. NET_DBG("no memory!");
  275. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  276. }
  277. else
  278. {
  279. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_RX_NEW, socket_id, len, 0);
  280. }
  281. pbuf_free(p);
  282. }
  283. else if (err == ERR_OK)
  284. {
  285. {
  286. prvlwip.socket[socket_id].remote_close = 1;
  287. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_REMOTE_CLOSE, socket_id, 0, 0);
  288. }
  289. }
  290. else
  291. {
  292. net_lwip2_tcp_error(adapter_index, socket_id);
  293. }
  294. return ERR_OK;
  295. }
  296. static err_t net_lwip2_tcp_sent_cb(void *arg, struct tcp_pcb *tpcb,
  297. u16_t len)
  298. {
  299. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  300. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  301. volatile uint16_t check_len = 0;
  302. volatile uint32_t rest_len;
  303. socket_data_t *p;
  304. SOCKET_LOCK(socket_id);
  305. while(check_len < len)
  306. {
  307. if (llist_empty(&prvlwip.socket[socket_id].wait_ack_head))
  308. {
  309. NET_DBG("!");
  310. goto SOCEKT_ERROR;
  311. }
  312. p = (socket_data_t *)prvlwip.socket[socket_id].wait_ack_head.next;
  313. rest_len = p->len - p->read_pos;
  314. if ((len - check_len) >= rest_len)
  315. {
  316. // NET_DBG("adapter %d socket %d, %ubytes ack", adapter_index, socket_id, p->len);
  317. llist_del(&p->node);
  318. luat_heap_free(p->data);
  319. luat_heap_free(p);
  320. check_len += rest_len;
  321. }
  322. else
  323. {
  324. p->read_pos += (len - check_len);
  325. check_len = len;
  326. // NET_DBG("adapter %d socket %d, all %ubytes ack %ubytes ", adapter_index, socket_id, p->len, p->read_pos);
  327. }
  328. }
  329. while (!llist_empty(&prvlwip.socket[socket_id].tx_head))
  330. {
  331. p = llist_traversal(&prvlwip.socket[socket_id].tx_head, net_lwip2_next_data_cache, &prvlwip.socket[socket_id]);
  332. if (p)
  333. {
  334. #if ENABLE_PSIF
  335. #if defined(CHIP_EC618)
  336. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, TCP_WRITE_FLAG_COPY, 0, 0, 0))
  337. #else
  338. sockdataflag_t dataflag={0};
  339. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, 0, dataflag, 0))
  340. #endif
  341. #else
  342. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, 0))
  343. #endif
  344. {
  345. llist_del(&p->node);
  346. llist_add_tail(&p->node, &prvlwip.socket[socket_id].wait_ack_head);
  347. }
  348. else
  349. {
  350. // NET_DBG("tcp buf is full, wait ack and send again");
  351. break;
  352. }
  353. }
  354. }
  355. SOCKET_UNLOCK(socket_id);
  356. tcp_output(tpcb);
  357. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_TX_OK, socket_id, len, 0);
  358. return ERR_OK;
  359. SOCEKT_ERROR:
  360. SOCKET_UNLOCK(socket_id);
  361. net_lwip2_tcp_error(adapter_index, socket_id);
  362. return ERR_OK;
  363. }
  364. static err_t net_lwip2_tcp_err_cb(void *arg, err_t err)
  365. {
  366. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  367. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  368. if (prvlwip.socket[socket_id].is_tcp)
  369. {
  370. if (prvlwip.socket[socket_id].pcb.tcp)
  371. {
  372. prvlwip.socket[socket_id].pcb.tcp = NULL;
  373. }
  374. }
  375. if (!prvlwip.socket[socket_id].state && !prvlwip.socket[socket_id].remote_close)
  376. {
  377. NET_DBG("adapter %d socket %d not closing, but error %d", adapter_index, socket_id, err);
  378. net_lwip2_tcp_error(adapter_index, socket_id);
  379. }
  380. return 0;
  381. }
  382. static err_t net_lwip2_tcp_fast_accept_cb(void *arg, struct tcp_pcb *newpcb, err_t err)
  383. {
  384. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  385. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  386. if (err || !newpcb)
  387. {
  388. net_lwip2_tcp_error(adapter_index, socket_id);
  389. return 0;
  390. }
  391. prvlwip.socket[socket_id].pcb.tcp = newpcb;
  392. // prvlwip.socket[socket_id].pcb.tcp->sockid = socket_id;
  393. prvlwip.socket[socket_id].rx_wait_size = 0;
  394. prvlwip.socket[socket_id].tx_wait_size = 0;
  395. prvlwip.socket[socket_id].pcb.tcp->callback_arg = arg;
  396. prvlwip.socket[socket_id].pcb.tcp->recv = net_lwip2_tcp_recv_cb;
  397. prvlwip.socket[socket_id].pcb.tcp->sent = net_lwip2_tcp_sent_cb;
  398. prvlwip.socket[socket_id].pcb.tcp->errf = net_lwip2_tcp_err_cb;
  399. prvlwip.socket[socket_id].pcb.tcp->so_options |= SOF_KEEPALIVE|SOF_REUSEADDR;
  400. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_CONNECT_OK, socket_id, 0, 0);
  401. return ERR_OK;
  402. }
  403. static err_t net_lwip2_tcp_accept_cb(void *arg, struct tcp_pcb *newpcb, err_t err)
  404. {
  405. // int socket_id = ((uint32_t)arg) & 0x0000ffff;
  406. // uint8_t adapter_index = ((uint32_t)arg) >> 16;
  407. return ERR_OK;
  408. }
  409. static err_t net_lwip2_udp_recv_cb(void *arg, struct udp_pcb *pcb, struct pbuf *p,
  410. const ip_addr_t *addr, u16_t port)
  411. {
  412. int socket_id = ((uint32_t)arg) & 0x0000ffff;
  413. uint8_t adapter_index = ((uint32_t)arg) >> 16;
  414. uint16_t len = 0;
  415. // LLOGD("net_lwip2_udp_recv_cb %d %d", socket_id, adapter_index);
  416. if (p)
  417. {
  418. len = p->tot_len;
  419. if (net_lwip2_rx_data(socket_id, p, addr, port))
  420. {
  421. NET_DBG("no memory!");
  422. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  423. }
  424. else
  425. {
  426. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_RX_NEW, socket_id, len, 0);
  427. }
  428. pbuf_free(p);
  429. }
  430. return ERR_OK;
  431. }
  432. static int32_t net_lwip2_dns_check_result(void *data, void *param)
  433. {
  434. luat_dns_require_t *require = (luat_dns_require_t *)data;
  435. if (require->result != 0)
  436. {
  437. luat_heap_free(require->uri.Data);
  438. require->uri.Data = NULL;
  439. if (require->result > 0)
  440. {
  441. luat_dns_ip_result *ip_result = zalloc(sizeof(luat_dns_ip_result) * require->result);
  442. int i;
  443. for(i = 0; i < require->result; i++)
  444. {
  445. ip_result[i] = require->ip_result[i];
  446. }
  447. net_lwip2_callback_to_nw_task(require->adapter_index, EV_NW_DNS_RESULT, require->result, ip_result, require->param);
  448. }
  449. else
  450. {
  451. net_lwip2_callback_to_nw_task(require->adapter_index, EV_NW_DNS_RESULT, 0, 0, require->param);
  452. }
  453. return LIST_DEL;
  454. }
  455. else
  456. {
  457. return LIST_PASS;
  458. }
  459. }
  460. static err_t net_lwip2_dns_recv_cb(void *arg, struct udp_pcb *pcb, struct pbuf *p, const ip_addr_t *addr, u16_t port)
  461. {
  462. Buffer_Struct msg_buf = {0};
  463. Buffer_Struct tx_msg_buf = {0,0,0};
  464. struct pbuf *out_p = NULL;
  465. int i = 0;
  466. int ret = 0;
  467. char ip_string[64] = {0};
  468. char ipstr2[64] = {0};
  469. uint8_t adapter_index = (uint32_t)arg;
  470. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY || prvlwip.lwip_netif[adapter_index] == NULL) {
  471. return ERR_OK;
  472. }
  473. //LLOGD("%s:%d", __FILE__, __LINE__);
  474. if (p)
  475. {
  476. OS_InitBuffer(&msg_buf, p->tot_len);
  477. pbuf_copy_partial(p, msg_buf.Data, p->tot_len, 0);
  478. pbuf_free(p);
  479. p = NULL;
  480. dns_run(prvlwip.dns_client[adapter_index], &msg_buf, NULL, &i);
  481. OS_DeInitBuffer(&msg_buf);
  482. llist_traversal(&prvlwip.dns_client[adapter_index]->require_head, net_lwip2_dns_check_result, NULL);
  483. {
  484. dns_run(prvlwip.dns_client[adapter_index], NULL, &tx_msg_buf, &i);
  485. if (tx_msg_buf.Pos && NULL != tx_msg_buf.Data)
  486. {
  487. out_p = pbuf_alloc(PBUF_TRANSPORT, tx_msg_buf.Pos, PBUF_RAM);
  488. if (out_p && NULL != tx_msg_buf.Data)
  489. {
  490. pbuf_take(out_p, tx_msg_buf.Data, tx_msg_buf.Pos);
  491. memcpy(&prvlwip.dns_udp[adapter_index]->local_ip, &prvlwip.lwip_netif[adapter_index]->ip_addr, sizeof(ip_addr_t));
  492. ipaddr_ntoa_r(&prvlwip.dns_client[adapter_index]->dns_server[i], ip_string, sizeof(ip_string));
  493. ipaddr_ntoa_r(&prvlwip.dns_udp[adapter_index]->local_ip, ipstr2, sizeof(ipstr2));
  494. LLOGD("dns udp sendto %s:%d from %s", ip_string, DNS_SERVER_PORT, ipstr2);
  495. ret = udp_sendto_if(prvlwip.dns_udp[adapter_index], out_p, &prvlwip.dns_client[adapter_index]->dns_server[i], DNS_SERVER_PORT, prvlwip.lwip_netif[adapter_index]);
  496. if (ret) {
  497. LLOGE("dns udp sendto %s:%d ret %d", ip_string, DNS_SERVER_PORT, ret);
  498. }
  499. }
  500. if (out_p) {
  501. pbuf_free(out_p);
  502. }
  503. OS_DeInitBuffer(&tx_msg_buf);
  504. llist_traversal(&prvlwip.dns_client[adapter_index]->require_head, net_lwip2_dns_check_result, NULL);
  505. }
  506. }
  507. }
  508. if (!prvlwip.dns_client[adapter_index]->is_run && prvlwip.dns_timer[adapter_index])
  509. {
  510. platform_stop_timer(prvlwip.dns_timer[adapter_index]);
  511. }
  512. return ERR_OK;
  513. }
  514. static void net_lwip2_dns_tx_next(uint8_t adapter_index, Buffer_Struct *tx_msg_buf)
  515. {
  516. int i = 0;
  517. err_t err = 0;
  518. struct pbuf *p = NULL;
  519. char ipstr[64] = {0};
  520. char ipstr2[64] = {0};
  521. dns_run(prvlwip.dns_client[adapter_index], NULL, tx_msg_buf, &i);
  522. char ip_string[64] = {0};
  523. // LLOGI("net_lwip2_dns_tx_next %d %p", adapter_index, prvlwip.dns_client[adapter_index]);
  524. ipaddr_ntoa_r(&prvlwip.dns_client[adapter_index]->dns_server[i], ip_string, sizeof(ip_string));
  525. LLOGD("adatper %d dns server %s", adapter_index, ip_string);
  526. if (tx_msg_buf->Pos && NULL != tx_msg_buf->Data) {
  527. p = pbuf_alloc(PBUF_TRANSPORT, tx_msg_buf->Pos, PBUF_RAM);
  528. if (p == NULL) {
  529. LLOGE("dns upd pbuf alloc fail!!!");
  530. }
  531. else {
  532. pbuf_take(p, tx_msg_buf->Data, tx_msg_buf->Pos);
  533. memcpy(&prvlwip.dns_udp[adapter_index]->local_ip, &prvlwip.lwip_netif[adapter_index]->ip_addr, sizeof(ip_addr_t));
  534. ipaddr_ntoa_r(&prvlwip.dns_udp[adapter_index]->local_ip, ipstr2, sizeof(ipstr2));
  535. ipaddr_ntoa_r(&prvlwip.dns_client[adapter_index]->dns_server[i], ipstr, sizeof(ipstr));
  536. LLOGD("dns udp sendto %s:%d from %s", ipstr, DNS_SERVER_PORT, ipstr2);
  537. err = udp_sendto_if(prvlwip.dns_udp[adapter_index], p, &prvlwip.dns_client[adapter_index]->dns_server[i], DNS_SERVER_PORT, prvlwip.lwip_netif[adapter_index]);
  538. pbuf_free(p);
  539. if (err) {
  540. LLOGE("dns udp sendto %s:%d from %s ret %d", ipstr, DNS_SERVER_PORT, ipstr2, err);
  541. }
  542. }
  543. }
  544. OS_DeInitBuffer(tx_msg_buf);
  545. if (prvlwip.dns_client[adapter_index]->new_result)
  546. {
  547. llist_traversal(&prvlwip.dns_client[adapter_index]->require_head, net_lwip2_dns_check_result, NULL);
  548. prvlwip.dns_client[adapter_index]->new_result = 0;
  549. }
  550. }
  551. // uint32_t net_lwip2_rand()
  552. // {
  553. // PV_Union uPV;
  554. // luat_crypto_trng(uPV.u8, 4);
  555. // return uPV.u32;
  556. // }
  557. // void net_lwip2_set_local_ip6(ip6_addr_t *ip)
  558. // {
  559. // prvlwip.ec618_ipv6.u_addr.ip6 = *ip;
  560. // prvlwip.ec618_ipv6.type = IPADDR_TYPE_V6;
  561. // }
  562. static void net_lwip2_close_tcp(int socket_id)
  563. {
  564. prvlwip.socket[socket_id].pcb.tcp->sent = NULL;
  565. prvlwip.socket[socket_id].pcb.tcp->errf = NULL;
  566. prvlwip.socket[socket_id].pcb.tcp->recv = tcp_recv_null;
  567. prvlwip.socket[socket_id].pcb.tcp->callback_arg = 0;
  568. prvlwip.socket[socket_id].pcb.tcp->pollinterval = 2;
  569. if (tcp_close(prvlwip.socket[socket_id].pcb.tcp))
  570. {
  571. tcp_abort(prvlwip.socket[socket_id].pcb.tcp);
  572. }
  573. prvlwip.socket[socket_id].pcb.tcp = NULL;
  574. }
  575. static void net_lwip2_task(void *param)
  576. {
  577. // luat_network_cb_param_t cb_param;
  578. OS_EVENT event = *((OS_EVENT *)param);
  579. luat_heap_free(param);
  580. Buffer_Struct tx_msg_buf = {0,0,0};
  581. // HANDLE cur_task = luat_get_current_task();
  582. socket_data_t *p = NULL;
  583. ip_addr_t *p_ip, *local_ip;
  584. struct pbuf *out_p = NULL;
  585. int error = 0;
  586. // uint8_t active_flag;
  587. uint8_t socket_id = 0;
  588. uint8_t adapter_index = 0;
  589. socket_id = event.Param1;
  590. adapter_index = event.Param3;
  591. char ip_string[64] = {0};
  592. ip_addr_t* ips;
  593. uint32_t is_ipv6;
  594. switch(event.ID)
  595. {
  596. case EV_LWIP_SOCKET_TX:
  597. SOCKET_LOCK(socket_id);
  598. if (prvlwip.socket[socket_id].in_use && prvlwip.socket[socket_id].pcb.ip)
  599. {
  600. // if (!prvlwip.socket[socket_id].pcb.tcp->unsent && !prvlwip.socket[socket_id].pcb.tcp->unacked)
  601. // {
  602. // active_flag = 0;
  603. // }
  604. // else
  605. // {
  606. // active_flag = 1;
  607. // }
  608. if (prvlwip.socket[socket_id].is_tcp)
  609. {
  610. while (!llist_empty(&prvlwip.socket[socket_id].tx_head))
  611. {
  612. p = llist_traversal(&prvlwip.socket[socket_id].tx_head, net_lwip2_next_data_cache, &prvlwip.socket[socket_id]);
  613. if (p->len <= tcp_sndbuf(prvlwip.socket[socket_id].pcb.tcp))
  614. {
  615. #if ENABLE_PSIF
  616. #if defined(CHIP_EC618)
  617. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, TCP_WRITE_FLAG_COPY, 0, 0, 0))
  618. #else
  619. sockdataflag_t dataflag={0};
  620. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, 0, dataflag, 0))
  621. #endif
  622. #else
  623. if (ERR_OK == tcp_write(prvlwip.socket[socket_id].pcb.tcp, p->data, p->len, TCP_WRITE_FLAG_COPY))
  624. #endif
  625. {
  626. llist_del(&p->node);
  627. llist_add_tail(&p->node, &prvlwip.socket[socket_id].wait_ack_head);
  628. }
  629. else
  630. {
  631. // NET_DBG("tcp buf is full, wait ack and send again");
  632. break;
  633. }
  634. }
  635. else
  636. {
  637. // NET_DBG("tcp buf is full, wait ack and send again");
  638. break;
  639. }
  640. }
  641. SOCKET_UNLOCK(socket_id);
  642. tcp_output(prvlwip.socket[socket_id].pcb.tcp);
  643. prvlwip.socket_busy |= (1 << socket_id);
  644. }
  645. else
  646. {
  647. p = llist_traversal(&prvlwip.socket[socket_id].tx_head, net_lwip2_next_data_cache, &prvlwip.socket[socket_id]);
  648. if (p)
  649. {
  650. llist_del(&p->node);
  651. }
  652. SOCKET_UNLOCK(socket_id);
  653. if (p)
  654. {
  655. uint32_t len = p->len;
  656. out_p = pbuf_alloc(PBUF_TRANSPORT, p->len, PBUF_RAM);
  657. if (out_p)
  658. {
  659. pbuf_take(out_p, p->data, p->len);
  660. error = udp_sendto_if(prvlwip.socket[socket_id].pcb.udp, out_p, &p->ip, p->port, prvlwip.lwip_netif[adapter_index]);
  661. if (error) {
  662. ipaddr_ntoa_r(&p->ip, ip_string, sizeof(ip_string));
  663. LLOGI("udp_sendto_if err %d %s:%d", error, ip_string, p->port);
  664. }
  665. pbuf_free(out_p);
  666. }
  667. else
  668. {
  669. NET_DBG("mem err send fail");
  670. }
  671. luat_heap_free(p->data);
  672. luat_heap_free(p);
  673. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_TX_OK, socket_id, len, 0);
  674. }
  675. }
  676. }
  677. else
  678. {
  679. NET_DBG("adapter %d socket %d no in use! %x", adapter_index, socket_id, prvlwip.socket[socket_id].pcb.ip);
  680. SOCKET_UNLOCK(socket_id);
  681. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  682. }
  683. break;
  684. case EV_LWIP_DNS_TIMER:
  685. #ifdef LUAT_USE_DNS
  686. net_lwip2_dns_tx_next(adapter_index, &tx_msg_buf);
  687. if (!prvlwip.dns_client[adapter_index]->is_run && prvlwip.dns_timer[adapter_index])
  688. {
  689. platform_stop_timer(prvlwip.dns_timer[adapter_index]);
  690. }
  691. #endif
  692. break;
  693. case EV_LWIP_SOCKET_RX_DONE:
  694. if (!prvlwip.socket[socket_id].in_use || !prvlwip.socket[socket_id].pcb.ip || !prvlwip.socket[socket_id].is_tcp)
  695. {
  696. NET_DBG("error socket %d state %d,%x,%d", socket_id, prvlwip.socket[socket_id].in_use, prvlwip.socket[socket_id].pcb.ip, prvlwip.socket[socket_id].is_tcp);
  697. break;
  698. }
  699. // NET_DBG("socket %d rx ack %dbytes", socket_id, event.Param2);
  700. tcp_recved(prvlwip.socket[socket_id].pcb.tcp, event.Param2);
  701. break;
  702. case EV_LWIP_SOCKET_CREATE:
  703. net_lwip2_create_socket_now(adapter_index, socket_id);
  704. break;
  705. case EV_LWIP_SOCKET_CONNECT:
  706. if (!prvlwip.socket[socket_id].in_use || !prvlwip.socket[socket_id].pcb.ip)
  707. {
  708. NET_DBG("adapter %d socket %d cannot use! %d,%x", adapter_index, socket_id, prvlwip.socket[socket_id].in_use, prvlwip.socket[socket_id].pcb.ip);
  709. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  710. break;
  711. }
  712. p_ip = (ip_addr_t *)event.Param2;
  713. ipaddr_ntoa_r(p_ip, ip_string, 64);
  714. LLOGD("adapter %d connect %s:%d %s", adapter_index, ip_string, prvlwip.socket[socket_id].remote_port, prvlwip.socket[socket_id].is_tcp ? "TCP" : "UDP");
  715. local_ip = NULL;
  716. #if LWIP_IPV6
  717. if (p_ip->type == IPADDR_TYPE_V4)
  718. {
  719. #endif
  720. local_ip = &prvlwip.lwip_netif[adapter_index]->ip_addr;
  721. // char ip_string[64];
  722. // ipaddr_ntoa_r(&prvlwip.lwip_netif->ip_addr, ip_string, 64);
  723. // LLOGD("EV_LWIP_SOCKET_CONNECT local_ip %s", ip_string);
  724. #if LWIP_IPV6
  725. }
  726. else
  727. {
  728. local_ip = net_lwip2_get_ip6(adapter_index);
  729. }
  730. #endif
  731. if (!local_ip && prvlwip.socket[socket_id].is_tcp)
  732. {
  733. NET_DBG("netif no ip !!!!!!");
  734. net_lwip2_tcp_error(adapter_index, socket_id);
  735. break;
  736. }
  737. if (prvlwip.socket[socket_id].is_tcp)
  738. {
  739. error = tcp_bind(prvlwip.socket[socket_id].pcb.tcp, local_ip, 0);
  740. if (error) {
  741. NET_DBG("adapter %d socket %d tcp bind error %d", adapter_index, socket_id, error);
  742. net_lwip2_tcp_error(adapter_index, socket_id);
  743. return;
  744. }
  745. error = tcp_connect(prvlwip.socket[socket_id].pcb.tcp, p_ip, prvlwip.socket[socket_id].remote_port, net_lwip2_tcp_connected_cb);
  746. if (error)
  747. {
  748. NET_DBG("adapter %d socket %d connect error %d", adapter_index, socket_id, error);
  749. net_lwip2_tcp_error(adapter_index, socket_id);
  750. }
  751. else
  752. {
  753. prvlwip.socket_connect |= (1 << socket_id);
  754. }
  755. }
  756. else
  757. {
  758. // NET_DBG("udp bind %d", prvlwip.socket[socket_id].local_port);
  759. error = udp_bind(prvlwip.socket[socket_id].pcb.udp, local_ip, prvlwip.socket[socket_id].local_port);
  760. if (error) {
  761. NET_DBG("udp bind ret %d port %d", error, prvlwip.socket[socket_id].local_port);
  762. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  763. return;
  764. }
  765. error = udp_connect(prvlwip.socket[socket_id].pcb.udp, p_ip, prvlwip.socket[socket_id].remote_port);
  766. if (error)
  767. {
  768. NET_DBG("adapter %d socket %d connect error %d", adapter_index, socket_id, error);
  769. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  770. }
  771. else
  772. {
  773. if (!prvlwip.socket[socket_id].remote_port)
  774. {
  775. prvlwip.socket[socket_id].pcb.udp->flags &= ~UDP_FLAGS_CONNECTED;
  776. }
  777. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_CONNECT_OK, socket_id, 0, 0);
  778. }
  779. }
  780. break;
  781. case EV_LWIP_SOCKET_DNS:
  782. case EV_LWIP_SOCKET_DNS_IPV6:
  783. // LLOGD("event dns query");
  784. if (!prvlwip.dns_client[adapter_index]->is_run && prvlwip.dns_timer[adapter_index])
  785. {
  786. platform_start_timer(prvlwip.dns_timer[adapter_index], 1000, 1);
  787. }
  788. dns_require_ipv6(prvlwip.dns_client[adapter_index], event.Param1, event.Param2, event.Param3, (event.ID - EV_LWIP_SOCKET_DNS));
  789. // LLOGD("event dns query 2");
  790. net_lwip2_dns_tx_next(adapter_index, &tx_msg_buf);
  791. // LLOGD("event dns query 3");
  792. break;
  793. case EV_LWIP_SOCKET_LISTEN:
  794. if (!prvlwip.socket[socket_id].in_use || !prvlwip.socket[socket_id].pcb.ip)
  795. {
  796. NET_DBG("adapter %d socket %d cannot use! %d,%x", adapter_index, socket_id, prvlwip.socket[socket_id].in_use, prvlwip.socket[socket_id].pcb.ip);
  797. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_ERROR, socket_id, 0, 0);
  798. break;
  799. }
  800. error = tcp_bind(prvlwip.socket[socket_id].pcb.tcp, NULL, prvlwip.socket[socket_id].local_port);
  801. if (error) {
  802. LLOGE("tcp listen port %d ret %d", prvlwip.socket[socket_id].local_port, error);
  803. net_lwip2_tcp_error(adapter_index, socket_id);
  804. }
  805. IP_SET_TYPE_VAL(prvlwip.socket[socket_id].pcb.tcp->local_ip, IPADDR_TYPE_ANY);
  806. IP_SET_TYPE_VAL(prvlwip.socket[socket_id].pcb.tcp->remote_ip, IPADDR_TYPE_ANY);
  807. // prvlwip.socket[socket_id].pcb.tcp->sockid = -1;
  808. prvlwip.socket[socket_id].listen_tcp = tcp_listen_with_backlog(prvlwip.socket[socket_id].pcb.tcp, 1);
  809. if (!prvlwip.socket[socket_id].listen_tcp) {
  810. NET_DBG("socket %d listen failed");
  811. net_lwip2_tcp_error(adapter_index, socket_id);
  812. } else {
  813. PV_Union uPV;
  814. uPV.u16[0] = socket_id;
  815. uPV.u16[1] = adapter_index;
  816. prvlwip.socket[socket_id].listen_tcp->callback_arg = uPV.u32;
  817. prvlwip.socket[socket_id].listen_tcp->accept = net_lwip2_tcp_fast_accept_cb;
  818. prvlwip.socket[socket_id].pcb.tcp = NULL;
  819. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_SOCKET_LISTEN, socket_id, 0, 0);
  820. }
  821. break;
  822. // case EV_LWIP_SOCKET_ACCPET:
  823. //
  824. // break;
  825. case EV_LWIP_SOCKET_CLOSE:
  826. // LLOGD("event EV_LWIP_SOCKET_CLOSE 1");
  827. if (!prvlwip.socket[socket_id].in_use)
  828. {
  829. NET_DBG("socket %d no in use!,%x", socket_id);
  830. break;
  831. }
  832. // LLOGD("event EV_LWIP_SOCKET_CLOSE 2");
  833. if (prvlwip.socket[socket_id].listen_tcp)
  834. {
  835. tcp_close(prvlwip.socket[socket_id].listen_tcp);
  836. prvlwip.socket[socket_id].listen_tcp = NULL;
  837. if (prvlwip.socket[socket_id].pcb.tcp)
  838. {
  839. net_lwip2_close_tcp(socket_id);
  840. }
  841. net_lwip2_tcp_close_done(adapter_index, socket_id, event.Param2);
  842. break;
  843. }
  844. // LLOGD("event EV_LWIP_SOCKET_CLOSE 3");
  845. if (prvlwip.socket[socket_id].pcb.ip)
  846. {
  847. if (prvlwip.socket[socket_id].is_tcp)
  848. {
  849. net_lwip2_close_tcp(socket_id);
  850. }
  851. else
  852. {
  853. // LLOGD("event EV_LWIP_SOCKET_CLOSE 31");
  854. udp_remove(prvlwip.socket[socket_id].pcb.udp);
  855. // LLOGD("event EV_LWIP_SOCKET_CLOSE 32");
  856. }
  857. net_lwip2_tcp_close_done(adapter_index, socket_id, event.Param2);
  858. break;
  859. }
  860. // LLOGD("event EV_LWIP_SOCKET_CLOSE 4");
  861. if (prvlwip.socket[socket_id].remote_close)
  862. {
  863. net_lwip2_tcp_close_done(adapter_index, socket_id, event.Param2);
  864. break;
  865. }
  866. // LLOGD("event EV_LWIP_SOCKET_CLOSE DONE");
  867. break;
  868. case EV_LWIP_NETIF_LINK_STATE:
  869. net_lwip2_check_network_ready(event.Param3);
  870. break;
  871. case EV_LWIP_NETIF_SET_IP:
  872. ips = (ip_addr_t*)event.Param1;
  873. is_ipv6 = (uint32_t)event.Param2;
  874. if (is_ipv6) {
  875. LLOGE("当前不支持设置ipv6地址");
  876. luat_heap_free(ips);
  877. break;
  878. }
  879. ip4_addr_t ip4 = {.addr=ip_addr_get_ip4_u32(&ips[0])};
  880. ip4_addr_t netmask4 = {.addr=ip_addr_get_ip4_u32(&ips[1])};
  881. ip4_addr_t gw4 = {.addr=ip_addr_get_ip4_u32(&ips[2])};
  882. netif_set_addr(prvlwip.lwip_netif[adapter_index], &ip4, &netmask4, &gw4);
  883. luat_heap_free(ips);
  884. net_lwip2_check_network_ready(adapter_index);
  885. break;
  886. #ifdef LUAT_USE_NETDRV_LWIP_ARP
  887. case EV_LWIP_ARP_TIMER:
  888. luat_netdrv_etharp_tmr();
  889. break;
  890. #endif
  891. default:
  892. NET_DBG("unknow event %x,%x", event.ID, event.Param1);
  893. break;
  894. }
  895. // LLOGD("End of lwip task");
  896. }
  897. static void platform_send_event(void *p, uint32_t id, uint32_t param1, uint32_t param2, uint32_t param3)
  898. {
  899. OS_EVENT *event = luat_heap_zalloc(sizeof(OS_EVENT));
  900. event->ID = id;
  901. event->Param1 = param1;
  902. event->Param2 = param2;
  903. event->Param3 = param3;
  904. #if NO_SYS
  905. net_lwip2_task(event);
  906. #else
  907. tcpip_callback_with_block(net_lwip2_task, event, 1);
  908. #endif
  909. }
  910. static void net_lwip2_check_network_ready(uint8_t adapter_index)
  911. {
  912. // ip_addr_t addr = {0};
  913. dns_client_t *dns_client = prvlwip.dns_client[adapter_index];
  914. dhcp_client_info_t* dhcpc = prvlwip.dhcpc[adapter_index];
  915. // char ip_string[64] = {0};
  916. if (prvlwip.lwip_netif[adapter_index] == NULL) {
  917. return;
  918. }
  919. uint8_t active_flag = !ip_addr_isany(&prvlwip.lwip_netif[adapter_index]->ip_addr)
  920. && netif_is_link_up(prvlwip.lwip_netif[adapter_index])
  921. && netif_is_up(prvlwip.lwip_netif[adapter_index]);
  922. if (prvlwip.netif_network_ready[adapter_index] == active_flag) {
  923. // LLOGD("网络[%d]状态没有变化, 跳过检查", adapter_index);
  924. return;
  925. }
  926. prvlwip.netif_network_ready[adapter_index] = active_flag;
  927. if (!active_flag)
  928. {
  929. // TODO 如果没有活跃的netif了, 应该关闭dns客户端
  930. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_STATE, 0, 0, adapter_index);
  931. }
  932. else
  933. {
  934. NET_DBG("network ready %d, setup dns server", adapter_index);
  935. uint8_t dns0_set = 0;
  936. uint8_t dns1_set = 0;
  937. // LLOGD("开始设置DNS服务器 %d static? %d %d %d %d", adapter_index, dns_client->is_static_dns[0], dns_client->is_static_dns[1], prvlwip.dhcpc[adapter_index] ? prvlwip.dhcpc[adapter_index]->dns_server[0] : 0, prvlwip.dhcpc[adapter_index] ? prvlwip.dhcpc[adapter_index]->dns_server[1] : 0);
  938. if (dns_client->is_static_dns[0] == 0) {
  939. if (dhcpc && dhcpc->dns_server[0]) {
  940. network_set_ip_ipv4(&dns_client->dns_server[0], dhcpc->dns_server[0]);
  941. dns0_set = 1;
  942. // ipaddr_ntoa_r(&dns_client->dns_server[0], ip_string, sizeof(ip_string));
  943. // LLOGD("使用DHCP分配的DNS服务器作为首选DNS服务器 %d %s", adapter_index, ip_string);
  944. }
  945. }
  946. else {
  947. dns0_set = 1; // 静态DNS服务器, 就不更新了
  948. }
  949. if (dns_client->is_static_dns[1] == 0) {
  950. if (dhcpc && dhcpc->dns_server[1]) {
  951. network_set_ip_ipv4(&dns_client->dns_server[1], dhcpc->dns_server[1]);
  952. dns1_set = 1;
  953. // ipaddr_ntoa_r(&dns_client->dns_server[1], ip_string, sizeof(ip_string));
  954. // LLOGD("使用DHCP分配的DNS服务器作为次选DNS服务器 %d %s", adapter_index, ip_string);
  955. }
  956. }
  957. else {
  958. dns1_set = 1; // 静态DNS服务器, 就不更新了
  959. }
  960. if (dns0_set == 0) {
  961. if (ip_addr_isany(&prvlwip.lwip_netif[adapter_index]->gw)) {
  962. // 如果网关地址是0.0.0.0, 就不设置DNS服务器
  963. }
  964. else {
  965. memcpy(&dns_client->dns_server[0], &prvlwip.lwip_netif[adapter_index]->gw, sizeof(luat_ip_addr_t));
  966. // ipaddr_ntoa_r(&dns_client->dns_server[0], ip_string, sizeof(ip_string));
  967. // LLOGD("使用网关作为首选DNS服务器 %d %s", adapter_index, ip_string);
  968. }
  969. }
  970. else {
  971. // ipaddr_ntoa_r(&dns_client->dns_server[0], ip_string, sizeof(ip_string));
  972. // LLOGI("首选DNS服务器 %d %s", adapter_index, ip_string);
  973. }
  974. if (dns1_set == 0) {
  975. network_set_ip_ipv4(&dns_client->dns_server[1], (114 << 24) | (114 << 16) | (114 << 8) | 114); // 默认DNS服务器
  976. // ipaddr_ntoa_r(&dns_client->dns_server[1], ip_string, sizeof(ip_string));
  977. // LLOGD("使用默认DNS服务器 %d %s", adapter_index, ip_string);
  978. }
  979. net_lwip2_callback_to_nw_task(adapter_index, EV_NW_STATE, 0, 1, adapter_index);
  980. }
  981. }
  982. static int net_lwip2_check_socket(void *user_data, int socket_id, uint64_t tag)
  983. {
  984. if ((uint32_t)user_data >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  985. if (socket_id >= MAX_SOCK_NUM) return -1;
  986. if (prvlwip.socket[socket_id].tag != tag) return -1;
  987. if (!prvlwip.socket[socket_id].in_use || prvlwip.socket[socket_id].state) return -1;
  988. return 0;
  989. }
  990. static int net_lwip2_socket_check(int socket_id, uint64_t tag, void *user_data)
  991. {
  992. return net_lwip2_check_socket(user_data, socket_id, tag);
  993. }
  994. static uint8_t net_lwip2_check_ready(void *user_data)
  995. {
  996. uint8_t adapter_index = (uint32_t)user_data;
  997. if ((uint32_t)user_data >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return 0;
  998. // LLOGD("lwip2查询网络就绪情况 %d", prvlwip.netif_network_ready[adapter_index]);
  999. if (prvlwip.lwip_netif[adapter_index] == NULL) {
  1000. LLOGD("lwip netif is null %d", adapter_index);
  1001. return 0;
  1002. }
  1003. if (!netif_is_up(prvlwip.lwip_netif[adapter_index])) {
  1004. // LLOGD("netif is not up %d", adapter_index);
  1005. return 0;
  1006. }
  1007. if (!netif_is_link_up(prvlwip.lwip_netif[adapter_index])) {
  1008. // LLOGD("netif is not link up %d", adapter_index);
  1009. return 0;
  1010. }
  1011. if (ip_addr_isany(&prvlwip.lwip_netif[adapter_index]->ip_addr)) {
  1012. // LLOGD("netif addr is 0.0.0.0 %d", adapter_index);
  1013. return 0;
  1014. }
  1015. return 1;
  1016. }
  1017. static void net_lwip2_create_socket_now(uint8_t adapter_index, uint8_t socket_id)
  1018. {
  1019. PV_Union uPV;
  1020. uPV.u16[0] = socket_id;
  1021. uPV.u16[1] = adapter_index;
  1022. if (socket_id >= MAX_SOCK_NUM)
  1023. return;
  1024. if (prvlwip.socket[socket_id].is_tcp)
  1025. {
  1026. prvlwip.socket[socket_id].pcb.tcp = tcp_new();
  1027. if (!prvlwip.socket[socket_id].pcb.tcp)
  1028. {
  1029. NET_DBG("try to abort fin wait 1 tcp");
  1030. struct tcp_pcb *pcb, *dpcb;
  1031. uint32_t low_time = (uint32_t)(luat_mcu_tick64_ms() / 1000);
  1032. dpcb = NULL;
  1033. for (pcb = tcp_active_pcbs; pcb != NULL; pcb = pcb->next)
  1034. {
  1035. if (FIN_WAIT_1 == pcb->state)
  1036. {
  1037. if (((uint32_t)pcb->callback_arg) < low_time)
  1038. {
  1039. dpcb = pcb;
  1040. low_time = (uint32_t)pcb->callback_arg;
  1041. }
  1042. }
  1043. }
  1044. if (dpcb)
  1045. {
  1046. tcp_abort(dpcb);
  1047. }
  1048. prvlwip.socket[socket_id].pcb.tcp = tcp_new();
  1049. }
  1050. if (prvlwip.socket[socket_id].pcb.tcp)
  1051. {
  1052. // prvlwip.socket[socket_id].pcb.tcp->sockid = socket_id;
  1053. #if defined(CHIP_EC618) || defined(CHIP_EC718)|| defined(CHIP_EC716)
  1054. #else
  1055. tcp_bind_netif(prvlwip.socket[socket_id].pcb.tcp, prvlwip.lwip_netif[adapter_index]);
  1056. #endif
  1057. prvlwip.socket[socket_id].rx_wait_size = 0;
  1058. prvlwip.socket[socket_id].tx_wait_size = 0;
  1059. prvlwip.socket[socket_id].pcb.tcp->callback_arg = uPV.p;
  1060. prvlwip.socket[socket_id].pcb.tcp->recv = net_lwip2_tcp_recv_cb;
  1061. prvlwip.socket[socket_id].pcb.tcp->sent = net_lwip2_tcp_sent_cb;
  1062. prvlwip.socket[socket_id].pcb.tcp->errf = net_lwip2_tcp_err_cb;
  1063. prvlwip.socket[socket_id].pcb.tcp->so_options |= SOF_KEEPALIVE|SOF_REUSEADDR;
  1064. // tcp_set_flags(prvlwip.socket[socket_id].pcb.tcp, TCP_NODELAY);
  1065. #if LWIP_TCP_KEEPALIVE
  1066. if (adapter_index == NW_ADAPTER_INDEX_LWIP_WIFI_STA ||
  1067. adapter_index == NW_ADAPTER_INDEX_LWIP_WIFI_AP ||
  1068. adapter_index == NW_ADAPTER_INDEX_LWIP_ETH) {
  1069. prvlwip.socket[socket_id].pcb.tcp->keep_intvl = 5*1000;
  1070. prvlwip.socket[socket_id].pcb.tcp->keep_idle = 45*1000;
  1071. prvlwip.socket[socket_id].pcb.tcp->keep_cnt = 2;
  1072. }
  1073. #endif
  1074. }
  1075. else
  1076. {
  1077. NET_DBG("tcp pcb full!");
  1078. net_lwip2_tcp_error(adapter_index, socket_id);
  1079. }
  1080. }
  1081. else
  1082. {
  1083. // LLOGE("udp new in net_lwip2");
  1084. prvlwip.socket[socket_id].pcb.udp = udp_new();
  1085. if (prvlwip.socket[socket_id].pcb.udp)
  1086. {
  1087. prvlwip.socket[socket_id].pcb.udp->recv_arg = uPV.p;
  1088. prvlwip.socket[socket_id].pcb.udp->recv = net_lwip2_udp_recv_cb;
  1089. prvlwip.socket[socket_id].pcb.udp->so_options |= SOF_BROADCAST|SOF_REUSEADDR;
  1090. }
  1091. else
  1092. {
  1093. NET_DBG("udp pcb full!");
  1094. net_lwip2_tcp_error(adapter_index, socket_id);
  1095. }
  1096. }
  1097. }
  1098. static int net_lwip2_create_socket(uint8_t is_tcp, uint64_t *tag, void *param, uint8_t is_ipv6, void *user_data)
  1099. {
  1100. // uint8_t index = (uint32_t)user_data;
  1101. uint8_t adapter_index = (uint32_t)user_data;
  1102. if ((uint32_t)adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return 0;
  1103. int i, socket_id;
  1104. socket_id = -1;
  1105. // OS_LOCK;
  1106. if (!prvlwip.socket[prvlwip.next_socket_index].in_use)
  1107. {
  1108. socket_id = prvlwip.next_socket_index;
  1109. prvlwip.next_socket_index++;
  1110. }
  1111. else
  1112. {
  1113. for (i = 0; i < MAX_SOCK_NUM; i++)
  1114. {
  1115. if (!prvlwip.socket[i].in_use)
  1116. {
  1117. socket_id = i;
  1118. prvlwip.next_socket_index = i + 1;
  1119. break;
  1120. }
  1121. }
  1122. }
  1123. if (prvlwip.next_socket_index >= MAX_SOCK_NUM)
  1124. {
  1125. prvlwip.next_socket_index = 0;
  1126. }
  1127. if (socket_id >= 0)
  1128. {
  1129. LWIP_ASSERT("socket must free before create", !prvlwip.socket[socket_id].pcb.ip);
  1130. prvlwip.socket_busy &= ~(1 << socket_id);
  1131. prvlwip.socket_connect &= ~(1 << socket_id);
  1132. prvlwip.socket_tag++;
  1133. *tag = prvlwip.socket_tag;
  1134. prvlwip.socket[socket_id].in_use = 1;
  1135. prvlwip.socket[socket_id].tag = *tag;
  1136. prvlwip.socket[socket_id].param = param;
  1137. prvlwip.socket[socket_id].is_tcp = is_tcp;
  1138. llist_traversal(&prvlwip.socket[socket_id].wait_ack_head, net_lwip2_del_data_cache, NULL);
  1139. llist_traversal(&prvlwip.socket[socket_id].tx_head, net_lwip2_del_data_cache, NULL);
  1140. llist_traversal(&prvlwip.socket[socket_id].rx_head, net_lwip2_del_data_cache, NULL);
  1141. // OS_UNLOCK;
  1142. // if (platform_get_current_task() == prvlwip.task_handle)
  1143. // {
  1144. // net_lwip2_create_socket_now(index, socket_id);
  1145. // return socket_id;
  1146. // }
  1147. platform_send_event(NULL, EV_LWIP_SOCKET_CREATE, socket_id, 0, user_data);
  1148. }
  1149. else
  1150. {
  1151. // OS_UNLOCK;
  1152. }
  1153. return socket_id;
  1154. }
  1155. //作为client绑定一个port,并连接remote_ip和remote_port对应的server
  1156. static int net_lwip2_socket_connect(int socket_id, uint64_t tag, uint16_t local_port, luat_ip_addr_t *remote_ip, uint16_t remote_port, void *user_data)
  1157. {
  1158. uint8_t adapter_index = (uint32_t)user_data;
  1159. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1160. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1161. if (result) return result;
  1162. prvlwip.socket[socket_id].local_port = local_port;
  1163. prvlwip.socket[socket_id].remote_port = remote_port;
  1164. platform_send_event(NULL, EV_LWIP_SOCKET_CONNECT, socket_id, remote_ip, user_data);
  1165. return 0;
  1166. }
  1167. //作为server绑定一个port,开始监听
  1168. static int net_lwip2_socket_listen(int socket_id, uint64_t tag, uint16_t local_port, void *user_data)
  1169. {
  1170. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1171. if (result) return result;
  1172. uint8_t adapter_index = (uint32_t)user_data;
  1173. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1174. prvlwip.socket[socket_id].local_port = local_port;
  1175. platform_send_event(NULL, EV_LWIP_SOCKET_LISTEN, socket_id, local_port, user_data);
  1176. return 0;
  1177. }
  1178. //作为server接受一个client
  1179. static int net_lwip2_socket_accept(int socket_id, uint64_t tag, luat_ip_addr_t *remote_ip, uint16_t *remote_port, void *user_data)
  1180. {
  1181. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1182. if (result) return result;
  1183. uint8_t adapter_index = (uint32_t)user_data;
  1184. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1185. *remote_ip = prvlwip.socket[socket_id].pcb.tcp->remote_ip;
  1186. *remote_port = prvlwip.socket[socket_id].pcb.tcp->remote_port;
  1187. return 0;
  1188. }
  1189. //主动断开一个tcp连接,需要走完整个tcp流程,用户需要接收到close ok回调才能确认彻底断开
  1190. static int net_lwip2_socket_disconnect(int socket_id, uint64_t tag, void *user_data)
  1191. {
  1192. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1193. if (result) return result;
  1194. uint8_t adapter_index = (uint32_t)user_data;
  1195. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1196. prvlwip.socket[socket_id].state = 1;
  1197. platform_send_event(NULL, EV_LWIP_SOCKET_CLOSE, socket_id, 1, user_data);
  1198. return 0;
  1199. }
  1200. static int net_lwip2_socket_force_close(int socket_id, void *user_data)
  1201. {
  1202. if (socket_id >= MAX_SOCK_NUM) return -1;
  1203. uint8_t adapter_index = (uint32_t)user_data;
  1204. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1205. if (prvlwip.socket[socket_id].in_use && !prvlwip.socket[socket_id].state)
  1206. {
  1207. prvlwip.socket[socket_id].state = 1;
  1208. platform_send_event(NULL, EV_LWIP_SOCKET_CLOSE, socket_id, 0, user_data);
  1209. }
  1210. return 0;
  1211. }
  1212. static int net_lwip2_socket_close(int socket_id, uint64_t tag, void *user_data)
  1213. {
  1214. if (socket_id >= MAX_SOCK_NUM) return -1;
  1215. uint8_t adapter_index = (uint32_t)user_data;
  1216. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1217. if (prvlwip.socket[socket_id].tag != tag)
  1218. {
  1219. NET_DBG("socket %d used by other!", socket_id);
  1220. return -1;
  1221. }
  1222. if (!prvlwip.socket[socket_id].in_use) return 0;
  1223. net_lwip2_socket_force_close(socket_id, user_data);
  1224. return 0;
  1225. }
  1226. static uint32_t net_lwip2_socket_read_data(int socket_id, uint8_t *buf, uint32_t *read_len, uint32_t len, socket_data_t *p)
  1227. {
  1228. uint32_t dummy_len;
  1229. dummy_len = ((p->len - p->read_pos) > (len - *read_len))?(len - *read_len):(p->len - p->read_pos);
  1230. memcpy(buf, p->data + p->read_pos, dummy_len);
  1231. p->read_pos += dummy_len;
  1232. if (p->read_pos >= p->len)
  1233. {
  1234. if (prvlwip.socket[socket_id].is_tcp)
  1235. {
  1236. platform_send_event(NULL, EV_LWIP_SOCKET_RX_DONE, socket_id, p->len, 0);
  1237. }
  1238. llist_del(&p->node);
  1239. luat_heap_free(p->data);
  1240. luat_heap_free(p);
  1241. }
  1242. *read_len += dummy_len;
  1243. return dummy_len;
  1244. }
  1245. static int net_lwip2_socket_receive(int socket_id, uint64_t tag, uint8_t *buf, uint32_t len, int flags, luat_ip_addr_t *remote_ip, uint16_t *remote_port, void *user_data)
  1246. {
  1247. if (socket_id >= MAX_SOCK_NUM) return -1;
  1248. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1249. if (result) return result;
  1250. uint8_t adapter_index = (uint32_t)user_data;
  1251. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1252. uint32_t read_len = 0;
  1253. if (buf)
  1254. {
  1255. SOCKET_LOCK(socket_id);
  1256. socket_data_t *p = (socket_data_t *)llist_traversal(&prvlwip.socket[socket_id].rx_head, net_lwip2_next_data_cache, &prvlwip.socket[socket_id]);
  1257. if (prvlwip.socket[socket_id].is_tcp)
  1258. {
  1259. while((read_len < len) && p)
  1260. {
  1261. prvlwip.socket[socket_id].rx_wait_size -= net_lwip2_socket_read_data(socket_id, buf + read_len, &read_len, len, p);
  1262. p = (socket_data_t *)llist_traversal(&prvlwip.socket[socket_id].rx_head, net_lwip2_next_data_cache, &prvlwip.socket[socket_id]);
  1263. }
  1264. }
  1265. else
  1266. {
  1267. if (p)
  1268. {
  1269. if (remote_ip)
  1270. {
  1271. *remote_ip = p->ip;
  1272. }
  1273. if (remote_port)
  1274. {
  1275. *remote_port = p->port;
  1276. }
  1277. prvlwip.socket[socket_id].rx_wait_size -= net_lwip2_socket_read_data(socket_id, buf + read_len, &read_len, len, p);
  1278. }
  1279. }
  1280. if (llist_empty(&prvlwip.socket[socket_id].rx_head))
  1281. {
  1282. prvlwip.socket[socket_id].rx_wait_size = 0;
  1283. }
  1284. SOCKET_UNLOCK(socket_id);
  1285. }
  1286. else
  1287. {
  1288. read_len = prvlwip.socket[socket_id].rx_wait_size;
  1289. }
  1290. return read_len;
  1291. }
  1292. static int net_lwip2_socket_send(int socket_id, uint64_t tag, const uint8_t *buf, uint32_t len, int flags, luat_ip_addr_t *remote_ip, uint16_t remote_port, void *user_data)
  1293. {
  1294. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1295. if (result) return result;
  1296. uint8_t adapter_index = (uint32_t)user_data;
  1297. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1298. SOCKET_LOCK(socket_id);
  1299. uint32_t save_len = 0;
  1300. uint32_t dummy_len = 0;
  1301. socket_data_t *p;
  1302. if (prvlwip.socket[socket_id].is_tcp)
  1303. {
  1304. while(save_len < len)
  1305. {
  1306. dummy_len = ((len - save_len) > SOCKET_BUF_LEN)?SOCKET_BUF_LEN:(len - save_len);
  1307. p = net_lwip2_create_data_node(socket_id, &buf[save_len], dummy_len, remote_ip, remote_port);
  1308. if (p)
  1309. {
  1310. llist_add_tail(&p->node, &prvlwip.socket[socket_id].tx_head);
  1311. }
  1312. else
  1313. {
  1314. SOCKET_UNLOCK(socket_id);
  1315. return -1;
  1316. }
  1317. save_len += dummy_len;
  1318. }
  1319. }
  1320. else
  1321. {
  1322. p = net_lwip2_create_data_node(socket_id, buf, len, remote_ip, remote_port);
  1323. if (p)
  1324. {
  1325. llist_add_tail(&p->node, &prvlwip.socket[socket_id].tx_head);
  1326. }
  1327. else
  1328. {
  1329. SOCKET_UNLOCK(socket_id);
  1330. return -1;
  1331. }
  1332. }
  1333. SOCKET_UNLOCK(socket_id);
  1334. platform_send_event(NULL, EV_LWIP_SOCKET_TX, socket_id, 0, user_data);
  1335. result = len;
  1336. return result;
  1337. }
  1338. void net_lwip2_socket_clean(int *vaild_socket_list, uint32_t num, void *user_data)
  1339. {
  1340. uint8_t adapter_index = (uint32_t)user_data;
  1341. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return;
  1342. int socket_list[MAX_SOCK_NUM];
  1343. memset(socket_list, 0, sizeof(socket_list));
  1344. uint32_t i;
  1345. for(i = 0; i < num; i++)
  1346. {
  1347. if ( (vaild_socket_list[i] > 0) && (vaild_socket_list[i] < MAX_SOCK_NUM) )
  1348. {
  1349. socket_list[vaild_socket_list[i]] = 1;
  1350. }
  1351. NET_DBG("%d,%d",i,vaild_socket_list[i]);
  1352. }
  1353. for(i = 0; i < MAX_SOCK_NUM; i++)
  1354. {
  1355. NET_DBG("%d,%d",i,socket_list[i]);
  1356. if ( !socket_list[i] )
  1357. {
  1358. net_lwip2_socket_force_close(i, user_data);
  1359. }
  1360. }
  1361. }
  1362. static int net_lwip2_get_local_ip_info(luat_ip_addr_t *ip, luat_ip_addr_t *submask, luat_ip_addr_t *gateway, void *user_data)
  1363. {
  1364. uint8_t adapter_index = (uint32_t)user_data;
  1365. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1366. if (!prvlwip.lwip_netif[adapter_index]) return -1;
  1367. *ip = prvlwip.lwip_netif[adapter_index]->ip_addr;
  1368. *submask = prvlwip.lwip_netif[adapter_index]->netmask;
  1369. *gateway = prvlwip.lwip_netif[adapter_index]->gw;
  1370. return 0;
  1371. }
  1372. static int net_lwip2_get_full_ip_info(luat_ip_addr_t *ip, luat_ip_addr_t *submask, luat_ip_addr_t *gateway, luat_ip_addr_t *ipv6, void *user_data)
  1373. {
  1374. uint8_t adapter_index = (uint32_t)user_data;
  1375. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1376. if (!prvlwip.lwip_netif[adapter_index]) return -1;
  1377. *ip = prvlwip.lwip_netif[adapter_index]->ip_addr;
  1378. *submask = prvlwip.lwip_netif[adapter_index]->netmask;
  1379. *gateway = prvlwip.lwip_netif[adapter_index]->gw;
  1380. #if LWIP_IPV6
  1381. luat_ip_addr_t *local_ip = net_lwip2_get_ip6(adapter_index);
  1382. if (local_ip)
  1383. {
  1384. *ipv6 = *local_ip;
  1385. }
  1386. else
  1387. {
  1388. ipv6->type = 0xff;
  1389. }
  1390. #endif
  1391. return 0;
  1392. }
  1393. static int net_lwip2_user_cmd(int socket_id, uint64_t tag, uint32_t cmd, uint32_t value, void *user_data)
  1394. {
  1395. return 0;
  1396. }
  1397. static int net_lwip2_dns(const char *domain_name, uint32_t len, void *param, void *user_data)
  1398. {
  1399. if ((uint32_t)user_data >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1400. uint8_t adapter_index = (uint32_t)user_data;
  1401. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1402. char *prv_domain_name = (char *)zalloc(len + 1);
  1403. memcpy(prv_domain_name, domain_name, len);
  1404. platform_send_event(NULL, EV_LWIP_SOCKET_DNS, prv_domain_name, param, user_data);
  1405. return 0;
  1406. }
  1407. static int net_lwip2_dns_ipv6(const char *domain_name, uint32_t len, void *param, void *user_data)
  1408. {
  1409. if ((uint32_t)user_data >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1410. uint8_t adapter_index = (uint32_t)user_data;
  1411. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1412. char *prv_domain_name = (char *)zalloc(len + 1);
  1413. memcpy(prv_domain_name, domain_name, len);
  1414. // platform_send_event(prvlwip.task_handle, (prvlwip.ec618_ipv6.type != IPADDR_TYPE_V6)?EV_LWIP_SOCKET_DNS:EV_LWIP_SOCKET_DNS_IPV6, prv_domain_name, param, user_data);
  1415. platform_send_event(NULL, EV_LWIP_SOCKET_DNS_IPV6, prv_domain_name, param, user_data);
  1416. return 0;
  1417. }
  1418. static int net_lwip2_set_dns_server(uint8_t server_index, luat_ip_addr_t *ip, void *user_data)
  1419. {
  1420. uint8_t adapter_index = (uint32_t)user_data;
  1421. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1422. if (server_index >= MAX_DNS_SERVER) return -1;
  1423. if (prvlwip.dns_client[adapter_index] == NULL) return -1;
  1424. memcpy(&prvlwip.dns_client[adapter_index]->dns_server[server_index], ip, sizeof(luat_ip_addr_t));
  1425. prvlwip.dns_client[adapter_index]->is_static_dns[server_index] = 1;
  1426. char buff[64] = {0};
  1427. ipaddr_ntoa_r(ip, buff, 64);
  1428. NET_DBG("设置DNS服务器 id %d index %d ip %s", adapter_index, server_index, buff);
  1429. return 0;
  1430. }
  1431. static int net_lwip2_set_mac(uint8_t *mac, void *user_data)
  1432. {
  1433. // uint8_t index = (uint32_t)user_data;
  1434. // if (index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1435. // if (!prvlwip.lwip_netif) return -1;
  1436. // memcpy(prvlwip.lwip_netif->hwaddr, mac, 6);
  1437. return -1;
  1438. }
  1439. static int net_lwip2_set_static_ip(luat_ip_addr_t *ip, luat_ip_addr_t *submask, luat_ip_addr_t *gateway, luat_ip_addr_t *ipv6, void *user_data)
  1440. {
  1441. uint8_t index = (uint32_t)user_data;
  1442. if (index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return -1;
  1443. if (!prvlwip.lwip_netif[index]) return -1;
  1444. luat_ip_addr_t *p_ip = luat_heap_zalloc(sizeof(luat_ip_addr_t) * 4);
  1445. if (p_ip == NULL) {
  1446. NET_ERR("net_lwip2_set_static_ip malloc fail");
  1447. return -1;
  1448. }
  1449. memset(p_ip, 0, sizeof(luat_ip_addr_t) * 4);
  1450. if (ip) {
  1451. memcpy(&p_ip[0], ip, sizeof(luat_ip_addr_t));
  1452. }
  1453. if (submask) {
  1454. memcpy(&p_ip[1], submask, sizeof(luat_ip_addr_t));
  1455. }
  1456. if (gateway) {
  1457. memcpy(&p_ip[2], gateway, sizeof(luat_ip_addr_t));
  1458. }
  1459. if (ipv6) {
  1460. memcpy(&p_ip[3], ipv6, sizeof(luat_ip_addr_t));
  1461. }
  1462. platform_send_event(prvlwip.task_handle, EV_LWIP_NETIF_SET_IP, p_ip, ipv6 != NULL, user_data);
  1463. return 0;
  1464. }
  1465. static int32_t net_lwip2_dummy_callback(void *pData, void *pParam)
  1466. {
  1467. return 0;
  1468. }
  1469. static void net_lwip2_socket_set_callback(CBFuncEx_t cb_fun, void *param, void *user_data)
  1470. {
  1471. uint8_t adapter_index = (uint32_t)user_data;
  1472. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) return;
  1473. prvlwip.socket_cb = cb_fun?cb_fun:net_lwip2_dummy_callback;
  1474. prvlwip.user_data = param;
  1475. }
  1476. int net_lwip2_getsockopt2(int socket_id, uint64_t tag, int level, int optname, void *optval, uint32_t *optlen, void *user_data) {
  1477. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1478. if (result) return result;
  1479. #if LWIP_SOCKET
  1480. return lwip_getsockopt(socket_id, level, optname, optval, optlen);
  1481. #else
  1482. return 0;
  1483. #endif
  1484. }
  1485. int net_lwip2_setsockopt2(int socket_id, uint64_t tag, int level, int optname, const void *optval, uint32_t optlen, void *user_data) {
  1486. int result = net_lwip2_check_socket(user_data, socket_id, tag);
  1487. if (result) return result;
  1488. #if LWIP_SOCKET
  1489. // return lwip_setsockopt(socket_id, level, optname, optval, optlen);
  1490. return 0;
  1491. #else
  1492. return 0;
  1493. #endif
  1494. }
  1495. static const network_adapter_info prv_net_lwip2_adapter =
  1496. {
  1497. .check_ready = net_lwip2_check_ready,
  1498. .create_soceket = net_lwip2_create_socket,
  1499. .socket_connect = net_lwip2_socket_connect,
  1500. .socket_listen = net_lwip2_socket_listen,
  1501. .socket_accept = net_lwip2_socket_accept,
  1502. .socket_disconnect = net_lwip2_socket_disconnect,
  1503. .socket_close = net_lwip2_socket_close,
  1504. .socket_force_close = net_lwip2_socket_force_close,
  1505. .socket_receive = net_lwip2_socket_receive,
  1506. .socket_send = net_lwip2_socket_send,
  1507. .socket_check = net_lwip2_socket_check,
  1508. .socket_clean = net_lwip2_socket_clean,
  1509. .getsockopt = net_lwip2_getsockopt2,
  1510. .setsockopt = net_lwip2_setsockopt2,
  1511. .user_cmd = net_lwip2_user_cmd,
  1512. .dns = net_lwip2_dns,
  1513. .set_dns_server = net_lwip2_set_dns_server,
  1514. // .dns = net_lwip2_dns,
  1515. .dns_ipv6 = net_lwip2_dns_ipv6,
  1516. .set_mac = net_lwip2_set_mac,
  1517. .set_static_ip = net_lwip2_set_static_ip,
  1518. .get_local_ip_info = net_lwip2_get_local_ip_info,
  1519. .get_full_ip_info = net_lwip2_get_full_ip_info,
  1520. .socket_set_callback = net_lwip2_socket_set_callback,
  1521. .name = "lwip",
  1522. .max_socket_num = MAX_SOCK_NUM,
  1523. .no_accept = 1,
  1524. .is_posix = 1,
  1525. .check_ack = net_lwip2_check_ack
  1526. };
  1527. void net_lwip2_register_adapter(uint8_t adapter_index)
  1528. {
  1529. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) {
  1530. return; // 超范围了
  1531. }
  1532. if ( (1 << adapter_index) & register_statue) {
  1533. return; // 注册过了
  1534. }
  1535. network_register_adapter(adapter_index, &prv_net_lwip2_adapter, adapter_index);
  1536. register_statue |= (1 << adapter_index);
  1537. }
  1538. static int net_lwip2_check_ack(uint8_t adapter_index, int socket_id) {
  1539. if (prvlwip.socket[socket_id].pcb.tcp == NULL)
  1540. return 0;
  1541. if (!llist_empty(&prvlwip.socket[socket_id].wait_ack_head))
  1542. {
  1543. NET_ERR("socekt %d not all ack", socket_id);
  1544. prvlwip.socket_busy |= (1 << socket_id);
  1545. return -1;
  1546. }
  1547. if (!llist_empty(&prvlwip.socket[socket_id].tx_head))
  1548. {
  1549. NET_ERR("socekt %d not all send", socket_id);
  1550. prvlwip.socket_busy |= (1 << socket_id);
  1551. return -1;
  1552. }
  1553. if (prvlwip.socket[socket_id].pcb.tcp->snd_buf != TCP_SND_BUF)
  1554. {
  1555. NET_ERR("socket %d send buf %ubytes, need %u",socket_id, prvlwip.socket[socket_id].pcb.tcp->snd_buf, TCP_SND_BUF);
  1556. prvlwip.socket_busy |= (1 << socket_id);
  1557. }
  1558. else
  1559. {
  1560. prvlwip.socket_busy &= ~(1 << socket_id);
  1561. }
  1562. return 0;
  1563. }
  1564. #if !defined(CHIP_EC718) && !defined(CHIP_EC618) && !defined(CHIP_EC716) && !defined(CONFIG_SOC_8910)
  1565. int net_lwip_check_all_ack(int socket_id)
  1566. {
  1567. return net_lwip2_check_ack(0, socket_id);
  1568. }
  1569. #endif
  1570. void net_lwip2_set_link_state(uint8_t adapter_index, uint8_t updown)
  1571. {
  1572. // LLOGD("net_lwip2_set_link_state %d %d", adapter_index, updown);
  1573. platform_send_event(NULL, EV_LWIP_NETIF_LINK_STATE, updown, 0, adapter_index);
  1574. }
  1575. struct netif * net_lwip2_get_netif(uint8_t adapter_index)
  1576. {
  1577. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY)
  1578. return NULL;
  1579. return prvlwip.lwip_netif[adapter_index];
  1580. }
  1581. static ip_addr_t *net_lwip2_get_ip6(uint8_t adapter_index)
  1582. {
  1583. #if LWIP_IPV6
  1584. int i;
  1585. for(i = 0; i < LWIP_IPV6_NUM_ADDRESSES; i++)
  1586. {
  1587. if (IP6_ADDR_PREFERRED == (prvlwip.lwip_netif[adapter_index]->ip6_addr_state[i] & IP6_ADDR_PREFERRED))
  1588. {
  1589. return &prvlwip.lwip_netif[adapter_index]->ip6_addr[i];
  1590. }
  1591. }
  1592. for(i = 0; i < LWIP_IPV6_NUM_ADDRESSES; i++)
  1593. {
  1594. if (prvlwip.lwip_netif[adapter_index]->ip6_addr_state[i] & IP6_ADDR_VALID)
  1595. {
  1596. return &prvlwip.lwip_netif[adapter_index]->ip6_addr[i];
  1597. }
  1598. }
  1599. #endif
  1600. return NULL;
  1601. }
  1602. void net_lwip2_set_dhcp_client(uint8_t adapter_index, dhcp_client_info_t *dhcp_client) {
  1603. if (adapter_index >= NW_ADAPTER_INDEX_LWIP_NETIF_QTY) {
  1604. return; // 超范围了
  1605. }
  1606. if (prvlwip.dhcpc[adapter_index]) {
  1607. return;
  1608. }
  1609. prvlwip.dhcpc[adapter_index] = dhcp_client;
  1610. }