2 * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
5 * Redistribution and use in source and binary forms, with or without modification,
6 * are permitted provided that the following conditions are met:
8 * 1. Redistributions of source code must retain the above copyright notice,
9 * this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright notice,
11 * this list of conditions and the following disclaimer in the documentation
12 * and/or other materials provided with the distribution.
13 * 3. The name of the author may not be used to endorse or promote products
14 * derived from this software without specific prior written permission.
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
17 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
18 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
19 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
21 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
22 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
24 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
27 * This file is part of the lwIP TCP/IP stack.
29 * Author: Adam Dunkels <adam@sics.se>
34 #include "lwip/arch.h"
35 #include "lwip/api_msg.h"
36 #include "lwip/memp.h"
38 #include "lwip/tcpip.h"
42 recv_raw(void *arg, struct raw_pcb *pcb, struct pbuf *p,
51 if (conn->recvmbox != SYS_MBOX_NULL) {
52 if (!(buf = memp_malloc(MEMP_NETBUF))) {
59 buf->fromport = pcb->protocol;
61 conn->recv_avail += p->tot_len;
62 /* Register event with callback */
64 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, p->tot_len);
65 sys_mbox_post(conn->recvmbox, buf);
68 return 0; /* do not eat the packet */
73 recv_udp(void *arg, struct udp_pcb *pcb, struct pbuf *p,
74 struct ip_addr *addr, u16_t port)
85 if (conn->recvmbox != SYS_MBOX_NULL) {
86 buf = memp_malloc(MEMP_NETBUF);
97 conn->recv_avail += p->tot_len;
98 /* Register event with callback */
100 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, p->tot_len);
101 sys_mbox_post(conn->recvmbox, buf);
104 #endif /* LWIP_UDP */
108 recv_tcp(void *arg, struct tcp_pcb *pcb, struct pbuf *p, err_t err)
110 struct netconn *conn;
120 if (conn->recvmbox != SYS_MBOX_NULL) {
125 conn->recv_avail += len;
129 /* Register event with callback */
131 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, len);
132 sys_mbox_post(conn->recvmbox, p);
139 poll_tcp(void *arg, struct tcp_pcb *pcb)
141 struct netconn *conn;
145 (conn->state == NETCONN_WRITE || conn->state == NETCONN_CLOSE) &&
146 conn->sem != SYS_SEM_NULL) {
147 sys_sem_signal(conn->sem);
153 sent_tcp(void *arg, struct tcp_pcb *pcb, u16_t len)
155 struct netconn *conn;
158 if (conn != NULL && conn->sem != SYS_SEM_NULL) {
159 sys_sem_signal(conn->sem);
162 if (conn && conn->callback)
163 if (tcp_sndbuf(conn->pcb.tcp) > TCP_SNDLOWAT)
164 (*conn->callback)(conn, NETCONN_EVT_SENDPLUS, len);
170 err_tcp(void *arg, err_t err)
172 struct netconn *conn;
176 conn->pcb.tcp = NULL;
180 if (conn->recvmbox != SYS_MBOX_NULL) {
181 /* Register event with callback */
183 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, 0);
184 sys_mbox_post(conn->recvmbox, NULL);
186 if (conn->mbox != SYS_MBOX_NULL) {
187 sys_mbox_post(conn->mbox, NULL);
189 if (conn->acceptmbox != SYS_MBOX_NULL) {
190 /* Register event with callback */
192 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, 0);
193 sys_mbox_post(conn->acceptmbox, NULL);
195 if (conn->sem != SYS_SEM_NULL) {
196 sys_sem_signal(conn->sem);
201 setup_tcp(struct netconn *conn)
207 tcp_recv(pcb, recv_tcp);
208 tcp_sent(pcb, sent_tcp);
209 tcp_poll(pcb, poll_tcp, 4);
210 tcp_err(pcb, err_tcp);
214 accept_function(void *arg, struct tcp_pcb *newpcb, err_t err)
217 struct netconn *newconn;
218 struct netconn *conn;
222 tcp_debug_print_state(newpcb->state);
223 #endif /* TCP_DEBUG */
224 #endif /* API_MSG_DEBUG */
225 conn = (struct netconn *)arg;
226 mbox = conn->acceptmbox;
227 newconn = memp_malloc(MEMP_NETCONN);
228 if (newconn == NULL) {
231 newconn->type = NETCONN_TCP;
232 newconn->pcb.tcp = newpcb;
234 newconn->recvmbox = sys_mbox_new();
235 if (newconn->recvmbox == SYS_MBOX_NULL) {
236 memp_free(MEMP_NETCONN, newconn);
239 newconn->mbox = sys_mbox_new();
240 if (newconn->mbox == SYS_MBOX_NULL) {
241 sys_mbox_free(newconn->recvmbox);
242 memp_free(MEMP_NETCONN, newconn);
245 newconn->sem = sys_sem_new(0);
246 if (newconn->sem == SYS_SEM_NULL) {
247 sys_mbox_free(newconn->recvmbox);
248 sys_mbox_free(newconn->mbox);
249 memp_free(MEMP_NETCONN, newconn);
252 newconn->acceptmbox = SYS_MBOX_NULL;
254 /* Register event with callback */
257 (*conn->callback)(conn, NETCONN_EVT_RCVPLUS, 0);
258 /* We have to set the callback here even though
259 * the new socket is unknown. Mark the socket as -1. */
260 newconn->callback = conn->callback;
261 newconn->socket = -1;
264 sys_mbox_post(mbox, newconn);
267 #endif /* LWIP_TCP */
270 do_newconn(struct api_msg_msg *msg)
272 if(msg->conn->pcb.tcp != NULL) {
273 /* This "new" connection already has a PCB allocated. */
274 /* Is this an error condition? Should it be deleted?
275 We currently just are happy and return. */
276 sys_mbox_post(msg->conn->mbox, NULL);
280 msg->conn->err = ERR_OK;
282 /* Allocate a PCB for this connection */
283 switch(msg->conn->type) {
286 msg->conn->pcb.raw = raw_new(msg->msg.bc.port); /* misusing the port field */
287 raw_recv(msg->conn->pcb.raw, recv_raw, msg->conn);
291 case NETCONN_UDPLITE:
292 msg->conn->pcb.udp = udp_new();
293 if(msg->conn->pcb.udp == NULL) {
294 msg->conn->err = ERR_MEM;
297 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_UDPLITE);
298 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
300 case NETCONN_UDPNOCHKSUM:
301 msg->conn->pcb.udp = udp_new();
302 if(msg->conn->pcb.udp == NULL) {
303 msg->conn->err = ERR_MEM;
306 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_NOCHKSUM);
307 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
310 msg->conn->pcb.udp = udp_new();
311 if(msg->conn->pcb.udp == NULL) {
312 msg->conn->err = ERR_MEM;
315 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
317 #endif /* LWIP_UDP */
320 msg->conn->pcb.tcp = tcp_new();
321 if(msg->conn->pcb.tcp == NULL) {
322 msg->conn->err = ERR_MEM;
325 setup_tcp(msg->conn);
331 sys_mbox_post(msg->conn->mbox, NULL);
336 do_delconn(struct api_msg_msg *msg)
338 if (msg->conn->pcb.tcp != NULL) {
339 switch (msg->conn->type) {
342 raw_remove(msg->conn->pcb.raw);
346 case NETCONN_UDPLITE:
348 case NETCONN_UDPNOCHKSUM:
351 msg->conn->pcb.udp->recv_arg = NULL;
352 udp_remove(msg->conn->pcb.udp);
354 #endif /* LWIP_UDP */
357 if (msg->conn->pcb.tcp->state == LISTEN) {
358 tcp_arg(msg->conn->pcb.tcp, NULL);
359 tcp_accept(msg->conn->pcb.tcp, NULL);
360 tcp_close(msg->conn->pcb.tcp);
362 tcp_arg(msg->conn->pcb.tcp, NULL);
363 tcp_sent(msg->conn->pcb.tcp, NULL);
364 tcp_recv(msg->conn->pcb.tcp, NULL);
365 tcp_poll(msg->conn->pcb.tcp, NULL, 0);
366 tcp_err(msg->conn->pcb.tcp, NULL);
367 if (tcp_close(msg->conn->pcb.tcp) != ERR_OK) {
368 tcp_abort(msg->conn->pcb.tcp);
376 /* Trigger select() in socket layer */
377 if (msg->conn->callback)
379 (*msg->conn->callback)(msg->conn, NETCONN_EVT_RCVPLUS, 0);
380 (*msg->conn->callback)(msg->conn, NETCONN_EVT_SENDPLUS, 0);
383 if (msg->conn->mbox != SYS_MBOX_NULL) {
384 sys_mbox_post(msg->conn->mbox, NULL);
389 do_bind(struct api_msg_msg *msg)
391 if (msg->conn->pcb.tcp == NULL) {
392 switch (msg->conn->type) {
395 msg->conn->pcb.raw = raw_new(msg->msg.bc.port); /* misusing the port field as protocol */
396 raw_recv(msg->conn->pcb.raw, recv_raw, msg->conn);
400 case NETCONN_UDPLITE:
401 msg->conn->pcb.udp = udp_new();
402 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_UDPLITE);
403 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
405 case NETCONN_UDPNOCHKSUM:
406 msg->conn->pcb.udp = udp_new();
407 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_NOCHKSUM);
408 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
411 msg->conn->pcb.udp = udp_new();
412 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
414 #endif /* LWIP_UDP */
417 msg->conn->pcb.tcp = tcp_new();
418 setup_tcp(msg->conn);
419 #endif /* LWIP_TCP */
424 switch (msg->conn->type) {
427 msg->conn->err = raw_bind(msg->conn->pcb.raw,msg->msg.bc.ipaddr);
431 case NETCONN_UDPLITE:
433 case NETCONN_UDPNOCHKSUM:
436 msg->conn->err = udp_bind(msg->conn->pcb.udp, msg->msg.bc.ipaddr, msg->msg.bc.port);
438 #endif /* LWIP_UDP */
441 msg->conn->err = tcp_bind(msg->conn->pcb.tcp,
442 msg->msg.bc.ipaddr, msg->msg.bc.port);
443 #endif /* LWIP_TCP */
447 sys_mbox_post(msg->conn->mbox, NULL);
452 do_connected(void *arg, struct tcp_pcb *pcb, err_t err)
454 struct netconn *conn;
463 if (conn->type == NETCONN_TCP && err == ERR_OK) {
466 sys_mbox_post(conn->mbox, NULL);
472 do_connect(struct api_msg_msg *msg)
474 if (msg->conn->pcb.tcp == NULL) {
475 switch (msg->conn->type) {
478 msg->conn->pcb.raw = raw_new(msg->msg.bc.port); /* misusing the port field as protocol */
479 raw_recv(msg->conn->pcb.raw, recv_raw, msg->conn);
483 case NETCONN_UDPLITE:
484 msg->conn->pcb.udp = udp_new();
485 if (msg->conn->pcb.udp == NULL) {
486 msg->conn->err = ERR_MEM;
487 sys_mbox_post(msg->conn->mbox, NULL);
490 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_UDPLITE);
491 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
493 case NETCONN_UDPNOCHKSUM:
494 msg->conn->pcb.udp = udp_new();
495 if (msg->conn->pcb.udp == NULL) {
496 msg->conn->err = ERR_MEM;
497 sys_mbox_post(msg->conn->mbox, NULL);
500 udp_setflags(msg->conn->pcb.udp, UDP_FLAGS_NOCHKSUM);
501 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
504 msg->conn->pcb.udp = udp_new();
505 if (msg->conn->pcb.udp == NULL) {
506 msg->conn->err = ERR_MEM;
507 sys_mbox_post(msg->conn->mbox, NULL);
510 udp_recv(msg->conn->pcb.udp, recv_udp, msg->conn);
512 #endif /* LWIP_UDP */
515 msg->conn->pcb.tcp = tcp_new();
516 if (msg->conn->pcb.tcp == NULL) {
517 msg->conn->err = ERR_MEM;
518 sys_mbox_post(msg->conn->mbox, NULL);
526 switch (msg->conn->type) {
529 raw_connect(msg->conn->pcb.raw, msg->msg.bc.ipaddr);
530 sys_mbox_post(msg->conn->mbox, NULL);
534 case NETCONN_UDPLITE:
536 case NETCONN_UDPNOCHKSUM:
539 udp_connect(msg->conn->pcb.udp, msg->msg.bc.ipaddr, msg->msg.bc.port);
540 sys_mbox_post(msg->conn->mbox, NULL);
545 /* tcp_arg(msg->conn->pcb.tcp, msg->conn);*/
546 setup_tcp(msg->conn);
547 tcp_connect(msg->conn->pcb.tcp, msg->msg.bc.ipaddr, msg->msg.bc.port,
549 /*tcp_output(msg->conn->pcb.tcp);*/
558 do_disconnect(struct api_msg_msg *msg)
561 switch (msg->conn->type) {
564 /* Do nothing as connecting is only a helper for upper lwip layers */
568 case NETCONN_UDPLITE:
570 case NETCONN_UDPNOCHKSUM:
573 udp_disconnect(msg->conn->pcb.udp);
579 sys_mbox_post(msg->conn->mbox, NULL);
584 do_listen(struct api_msg_msg *msg)
586 if (msg->conn->pcb.tcp != NULL) {
587 switch (msg->conn->type) {
590 LWIP_DEBUGF(API_MSG_DEBUG, ("api_msg: listen RAW: cannot listen for RAW.\n"));
594 case NETCONN_UDPLITE:
596 case NETCONN_UDPNOCHKSUM:
599 LWIP_DEBUGF(API_MSG_DEBUG, ("api_msg: listen UDP: cannot listen for UDP.\n"));
601 #endif /* LWIP_UDP */
604 msg->conn->pcb.tcp = tcp_listen(msg->conn->pcb.tcp);
605 if (msg->conn->pcb.tcp == NULL) {
606 msg->conn->err = ERR_MEM;
608 if (msg->conn->acceptmbox == SYS_MBOX_NULL) {
609 msg->conn->acceptmbox = sys_mbox_new();
610 if (msg->conn->acceptmbox == SYS_MBOX_NULL) {
611 msg->conn->err = ERR_MEM;
615 tcp_arg(msg->conn->pcb.tcp, msg->conn);
616 tcp_accept(msg->conn->pcb.tcp, accept_function);
623 sys_mbox_post(msg->conn->mbox, NULL);
627 do_accept(struct api_msg_msg *msg)
629 if (msg->conn->pcb.tcp != NULL) {
630 switch (msg->conn->type) {
633 LWIP_DEBUGF(API_MSG_DEBUG, ("api_msg: accept RAW: cannot accept for RAW.\n"));
637 case NETCONN_UDPLITE:
639 case NETCONN_UDPNOCHKSUM:
642 LWIP_DEBUGF(API_MSG_DEBUG, ("api_msg: accept UDP: cannot accept for UDP.\n"));
644 #endif /* LWIP_UDP */
652 do_send(struct api_msg_msg *msg)
654 if (msg->conn->pcb.tcp != NULL) {
655 switch (msg->conn->type) {
658 raw_send(msg->conn->pcb.raw, msg->msg.p);
662 case NETCONN_UDPLITE:
664 case NETCONN_UDPNOCHKSUM:
667 udp_send(msg->conn->pcb.udp, msg->msg.p);
669 #endif /* LWIP_UDP */
674 sys_mbox_post(msg->conn->mbox, NULL);
678 do_recv(struct api_msg_msg *msg)
681 if (msg->conn->pcb.tcp != NULL) {
682 if (msg->conn->type == NETCONN_TCP) {
683 tcp_recved(msg->conn->pcb.tcp, msg->msg.len);
687 sys_mbox_post(msg->conn->mbox, NULL);
691 do_write(struct api_msg_msg *msg)
696 if (msg->conn->pcb.tcp != NULL) {
697 switch (msg->conn->type) {
700 msg->conn->err = ERR_VAL;
704 case NETCONN_UDPLITE:
706 case NETCONN_UDPNOCHKSUM:
709 msg->conn->err = ERR_VAL;
711 #endif /* LWIP_UDP */
714 err = tcp_write(msg->conn->pcb.tcp, msg->msg.w.dataptr,
715 msg->msg.w.len, msg->msg.w.copy);
716 /* This is the Nagle algorithm: inhibit the sending of new TCP
717 segments when new outgoing data arrives from the user if any
718 previously transmitted data on the connection remains
720 if(err == ERR_OK && (msg->conn->pcb.tcp->unacked == NULL || (msg->conn->pcb.tcp->flags & TF_NODELAY)) ) {
721 tcp_output(msg->conn->pcb.tcp);
723 msg->conn->err = err;
724 if (msg->conn->callback)
727 if (tcp_sndbuf(msg->conn->pcb.tcp) <= TCP_SNDLOWAT)
728 (*msg->conn->callback)(msg->conn, NETCONN_EVT_SENDMINUS, msg->msg.w.len);
735 sys_mbox_post(msg->conn->mbox, NULL);
739 do_close(struct api_msg_msg *msg)
745 if (msg->conn->pcb.tcp != NULL) {
746 switch (msg->conn->type) {
752 case NETCONN_UDPLITE:
754 case NETCONN_UDPNOCHKSUM:
758 #endif /* LWIP_UDP */
761 if (msg->conn->pcb.tcp->state == LISTEN) {
762 err = tcp_close(msg->conn->pcb.tcp);
764 msg->conn->err = err;
770 sys_mbox_post(msg->conn->mbox, NULL);
773 typedef void (* api_msg_decode)(struct api_msg_msg *msg);
774 static api_msg_decode decode[API_MSG_MAX] = {
788 api_msg_input(struct api_msg *msg)
790 decode[msg->type](&(msg->msg));
794 api_msg_post(struct api_msg *msg)