2 * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
\r
3 * All rights reserved.
\r
5 * Redistribution and use in source and binary forms, with or without modification,
\r
6 * are permitted provided that the following conditions are met:
\r
8 * 1. Redistributions of source code must retain the above copyright notice,
\r
9 * this list of conditions and the following disclaimer.
\r
10 * 2. Redistributions in binary form must reproduce the above copyright notice,
\r
11 * this list of conditions and the following disclaimer in the documentation
\r
12 * and/or other materials provided with the distribution.
\r
13 * 3. The name of the author may not be used to endorse or promote products
\r
14 * derived from this software without specific prior written permission.
\r
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
\r
17 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
\r
18 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
\r
19 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
\r
20 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
\r
21 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
\r
22 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
\r
23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
\r
24 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
\r
27 * This file is part of the lwIP TCP/IP stack.
\r
29 * Author: Adam Dunkels <adam@sics.se>
\r
33 /* This is the part of the API that is linked with
\r
36 #include "lwip/opt.h"
\r
37 #include "lwip/api.h"
\r
38 #include "lwip/api_msg.h"
\r
39 #include "lwip/memp.h"
\r
43 netbuf *netbuf_new(void)
\r
47 buf = memp_malloc(MEMP_NETBUF);
\r
58 netbuf_delete(struct netbuf *buf)
\r
61 if (buf->p != NULL) {
\r
63 buf->p = buf->ptr = NULL;
\r
65 memp_free(MEMP_NETBUF, buf);
\r
70 netbuf_alloc(struct netbuf *buf, u16_t size)
\r
72 /* Deallocate any previously allocated memory. */
\r
73 if (buf->p != NULL) {
\r
76 buf->p = pbuf_alloc(PBUF_TRANSPORT, size, PBUF_RAM);
\r
77 if (buf->p == NULL) {
\r
81 return buf->p->payload;
\r
85 netbuf_free(struct netbuf *buf)
\r
87 if (buf->p != NULL) {
\r
90 buf->p = buf->ptr = NULL;
\r
94 netbuf_ref(struct netbuf *buf, void *dataptr, u16_t size)
\r
96 if (buf->p != NULL) {
\r
99 buf->p = pbuf_alloc(PBUF_TRANSPORT, 0, PBUF_REF);
\r
100 buf->p->payload = dataptr;
\r
101 buf->p->len = buf->p->tot_len = size;
\r
106 netbuf_chain(struct netbuf *head, struct netbuf *tail)
\r
108 pbuf_chain(head->p, tail->p);
\r
109 head->ptr = head->p;
\r
110 memp_free(MEMP_NETBUF, tail);
\r
114 netbuf_len(struct netbuf *buf)
\r
116 return buf->p->tot_len;
\r
120 netbuf_data(struct netbuf *buf, void **dataptr, u16_t *len)
\r
122 if (buf->ptr == NULL) {
\r
125 *dataptr = buf->ptr->payload;
\r
126 *len = buf->ptr->len;
\r
131 netbuf_next(struct netbuf *buf)
\r
133 if (buf->ptr->next == NULL) {
\r
136 buf->ptr = buf->ptr->next;
\r
137 if (buf->ptr->next == NULL) {
\r
144 netbuf_first(struct netbuf *buf)
\r
150 netbuf_copy_partial(struct netbuf *buf, void *dataptr, u16_t len, u16_t offset)
\r
157 if(buf == NULL || dataptr == NULL) {
\r
161 /* This implementation is bad. It should use bcopy
\r
163 for(p = buf->p; left < len && p != NULL; p = p->next) {
\r
164 if (offset != 0 && offset >= p->len) {
\r
167 for(i = offset; i < p->len; ++i) {
\r
168 ((char *)dataptr)[left] = ((char *)p->payload)[i];
\r
169 if (++left >= len) {
\r
179 netbuf_copy(struct netbuf *buf, void *dataptr, u16_t len)
\r
181 netbuf_copy_partial(buf, dataptr, len, 0);
\r
185 netbuf_fromaddr(struct netbuf *buf)
\r
187 return buf->fromaddr;
\r
191 netbuf_fromport(struct netbuf *buf)
\r
193 return buf->fromport;
\r
197 netconn *netconn_new_with_proto_and_callback(enum netconn_type t, u16_t proto,
\r
198 void (*callback)(struct netconn *, enum netconn_evt, u16_t len))
\r
200 struct netconn *conn;
\r
201 struct api_msg *msg;
\r
203 conn = memp_malloc(MEMP_NETCONN);
\r
204 if (conn == NULL) {
\r
208 conn->err = ERR_OK;
\r
210 conn->pcb.tcp = NULL;
\r
212 if ((conn->mbox = sys_mbox_new()) == SYS_MBOX_NULL) {
\r
213 memp_free(MEMP_NETCONN, conn);
\r
216 conn->recvmbox = SYS_MBOX_NULL;
\r
217 conn->acceptmbox = SYS_MBOX_NULL;
\r
218 conn->sem = SYS_SEM_NULL;
\r
219 conn->state = NETCONN_NONE;
\r
221 conn->callback = callback;
\r
222 conn->recv_avail = 0;
\r
224 if((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
225 memp_free(MEMP_NETCONN, conn);
\r
229 msg->type = API_MSG_NEWCONN;
\r
230 msg->msg.msg.bc.port = proto; /* misusing the port field */
\r
231 msg->msg.conn = conn;
\r
232 api_msg_post(msg);
\r
233 sys_mbox_fetch(conn->mbox, NULL);
\r
234 memp_free(MEMP_API_MSG, msg);
\r
236 if ( conn->err != ERR_OK ) {
\r
237 memp_free(MEMP_NETCONN, conn);
\r
246 netconn *netconn_new(enum netconn_type t)
\r
248 return netconn_new_with_proto_and_callback(t,0,NULL);
\r
252 netconn *netconn_new_with_callback(enum netconn_type t,
\r
253 void (*callback)(struct netconn *, enum netconn_evt, u16_t len))
\r
255 return netconn_new_with_proto_and_callback(t,0,callback);
\r
260 netconn_delete(struct netconn *conn)
\r
262 struct api_msg *msg;
\r
265 if (conn == NULL) {
\r
269 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
273 msg->type = API_MSG_DELCONN;
\r
274 msg->msg.conn = conn;
\r
275 api_msg_post(msg);
\r
276 sys_mbox_fetch(conn->mbox, NULL);
\r
277 memp_free(MEMP_API_MSG, msg);
\r
279 /* Drain the recvmbox. */
\r
280 if (conn->recvmbox != SYS_MBOX_NULL) {
\r
281 while (sys_arch_mbox_fetch(conn->recvmbox, &mem, 1) != SYS_ARCH_TIMEOUT) {
\r
282 if (conn->type == NETCONN_TCP) {
\r
284 pbuf_free((struct pbuf *)mem);
\r
286 netbuf_delete((struct netbuf *)mem);
\r
289 sys_mbox_free(conn->recvmbox);
\r
290 conn->recvmbox = SYS_MBOX_NULL;
\r
294 /* Drain the acceptmbox. */
\r
295 if (conn->acceptmbox != SYS_MBOX_NULL) {
\r
296 while (sys_arch_mbox_fetch(conn->acceptmbox, &mem, 1) != SYS_ARCH_TIMEOUT) {
\r
297 netconn_delete((struct netconn *)mem);
\r
300 sys_mbox_free(conn->acceptmbox);
\r
301 conn->acceptmbox = SYS_MBOX_NULL;
\r
304 sys_mbox_free(conn->mbox);
\r
305 conn->mbox = SYS_MBOX_NULL;
\r
306 if (conn->sem != SYS_SEM_NULL) {
\r
307 sys_sem_free(conn->sem);
\r
309 /* conn->sem = SYS_SEM_NULL;*/
\r
310 memp_free(MEMP_NETCONN, conn);
\r
315 netconn_type(struct netconn *conn)
\r
321 netconn_peer(struct netconn *conn, struct ip_addr *addr,
\r
324 switch (conn->type) {
\r
326 /* return an error as connecting is only a helper for upper layers */
\r
328 case NETCONN_UDPLITE:
\r
329 case NETCONN_UDPNOCHKSUM:
\r
331 if (conn->pcb.udp == NULL ||
\r
332 ((conn->pcb.udp->flags & UDP_FLAGS_CONNECTED) == 0))
\r
334 *addr = (conn->pcb.udp->remote_ip);
\r
335 *port = conn->pcb.udp->remote_port;
\r
338 if (conn->pcb.tcp == NULL)
\r
340 *addr = (conn->pcb.tcp->remote_ip);
\r
341 *port = conn->pcb.tcp->remote_port;
\r
344 return (conn->err = ERR_OK);
\r
348 netconn_addr(struct netconn *conn, struct ip_addr **addr,
\r
351 switch (conn->type) {
\r
353 *addr = &(conn->pcb.raw->local_ip);
\r
354 *port = conn->pcb.raw->protocol;
\r
356 case NETCONN_UDPLITE:
\r
357 case NETCONN_UDPNOCHKSUM:
\r
359 *addr = &(conn->pcb.udp->local_ip);
\r
360 *port = conn->pcb.udp->local_port;
\r
363 *addr = &(conn->pcb.tcp->local_ip);
\r
364 *port = conn->pcb.tcp->local_port;
\r
367 return (conn->err = ERR_OK);
\r
371 netconn_bind(struct netconn *conn, struct ip_addr *addr,
\r
374 struct api_msg *msg;
\r
376 if (conn == NULL) {
\r
380 if (conn->type != NETCONN_TCP &&
\r
381 conn->recvmbox == SYS_MBOX_NULL) {
\r
382 if ((conn->recvmbox = sys_mbox_new()) == SYS_MBOX_NULL) {
\r
387 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
388 return (conn->err = ERR_MEM);
\r
390 msg->type = API_MSG_BIND;
\r
391 msg->msg.conn = conn;
\r
392 msg->msg.msg.bc.ipaddr = addr;
\r
393 msg->msg.msg.bc.port = port;
\r
395 sys_mbox_fetch(conn->mbox, NULL);
\r
396 memp_free(MEMP_API_MSG, msg);
\r
402 netconn_connect(struct netconn *conn, struct ip_addr *addr,
\r
405 struct api_msg *msg;
\r
407 if (conn == NULL) {
\r
412 if (conn->recvmbox == SYS_MBOX_NULL) {
\r
413 if ((conn->recvmbox = sys_mbox_new()) == SYS_MBOX_NULL) {
\r
418 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
421 msg->type = API_MSG_CONNECT;
\r
422 msg->msg.conn = conn;
\r
423 msg->msg.msg.bc.ipaddr = addr;
\r
424 msg->msg.msg.bc.port = port;
\r
426 sys_mbox_fetch(conn->mbox, NULL);
\r
427 memp_free(MEMP_API_MSG, msg);
\r
432 netconn_disconnect(struct netconn *conn)
\r
434 struct api_msg *msg;
\r
436 if (conn == NULL) {
\r
440 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
443 msg->type = API_MSG_DISCONNECT;
\r
444 msg->msg.conn = conn;
\r
446 sys_mbox_fetch(conn->mbox, NULL);
\r
447 memp_free(MEMP_API_MSG, msg);
\r
453 netconn_listen(struct netconn *conn)
\r
455 struct api_msg *msg;
\r
457 if (conn == NULL) {
\r
461 if (conn->acceptmbox == SYS_MBOX_NULL) {
\r
462 conn->acceptmbox = sys_mbox_new();
\r
463 if (conn->acceptmbox == SYS_MBOX_NULL) {
\r
468 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
469 return (conn->err = ERR_MEM);
\r
471 msg->type = API_MSG_LISTEN;
\r
472 msg->msg.conn = conn;
\r
474 sys_mbox_fetch(conn->mbox, NULL);
\r
475 memp_free(MEMP_API_MSG, msg);
\r
480 netconn_accept(struct netconn *conn)
\r
482 struct netconn *newconn;
\r
484 if (conn == NULL) {
\r
488 sys_mbox_fetch(conn->acceptmbox, (void **)&newconn);
\r
489 /* Register event with callback */
\r
490 if (conn->callback)
\r
491 (*conn->callback)(conn, NETCONN_EVT_RCVMINUS, 0);
\r
497 netconn_recv(struct netconn *conn)
\r
499 struct api_msg *msg;
\r
500 struct netbuf *buf;
\r
504 if (conn == NULL) {
\r
508 if (conn->recvmbox == SYS_MBOX_NULL) {
\r
509 conn->err = ERR_CONN;
\r
513 if (conn->err != ERR_OK) {
\r
517 if (conn->type == NETCONN_TCP) {
\r
518 if (conn->pcb.tcp->state == LISTEN) {
\r
519 conn->err = ERR_CONN;
\r
524 buf = memp_malloc(MEMP_NETBUF);
\r
527 conn->err = ERR_MEM;
\r
531 sys_mbox_fetch(conn->recvmbox, (void **)&p);
\r
536 conn->recv_avail -= len;
\r
541 /* Register event with callback */
\r
542 if (conn->callback)
\r
543 (*conn->callback)(conn, NETCONN_EVT_RCVMINUS, len);
\r
545 /* If we are closed, we indicate that we no longer wish to receive
\r
546 data by setting conn->recvmbox to SYS_MBOX_NULL. */
\r
548 memp_free(MEMP_NETBUF, buf);
\r
549 sys_mbox_free(conn->recvmbox);
\r
550 conn->recvmbox = SYS_MBOX_NULL;
\r
557 buf->fromaddr = NULL;
\r
559 /* Let the stack know that we have taken the data. */
\r
560 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
561 conn->err = ERR_MEM;
\r
564 msg->type = API_MSG_RECV;
\r
565 msg->msg.conn = conn;
\r
567 msg->msg.msg.len = buf->p->tot_len;
\r
569 msg->msg.msg.len = 1;
\r
573 sys_mbox_fetch(conn->mbox, NULL);
\r
574 memp_free(MEMP_API_MSG, msg);
\r
576 sys_mbox_fetch(conn->recvmbox, (void **)&buf);
\r
577 conn->recv_avail -= buf->p->tot_len;
\r
578 /* Register event with callback */
\r
579 if (conn->callback)
\r
580 (*conn->callback)(conn, NETCONN_EVT_RCVMINUS, buf->p->tot_len);
\r
586 LWIP_DEBUGF(API_LIB_DEBUG, ("netconn_recv: received %p (err %d)\n", (void *)buf, conn->err));
\r
593 netconn_send(struct netconn *conn, struct netbuf *buf)
\r
595 struct api_msg *msg;
\r
597 if (conn == NULL) {
\r
601 if (conn->err != ERR_OK) {
\r
605 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
606 return (conn->err = ERR_MEM);
\r
609 LWIP_DEBUGF(API_LIB_DEBUG, ("netconn_send: sending %d bytes\n", buf->p->tot_len));
\r
610 msg->type = API_MSG_SEND;
\r
611 msg->msg.conn = conn;
\r
612 msg->msg.msg.p = buf->p;
\r
615 sys_mbox_fetch(conn->mbox, NULL);
\r
616 memp_free(MEMP_API_MSG, msg);
\r
621 netconn_write(struct netconn *conn, void *dataptr, u16_t size, u8_t copy)
\r
623 struct api_msg *msg;
\r
626 if (conn == NULL) {
\r
630 if (conn->err != ERR_OK) {
\r
634 if (conn->sem == SYS_SEM_NULL) {
\r
635 conn->sem = sys_sem_new(0);
\r
636 if (conn->sem == SYS_SEM_NULL) {
\r
641 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
642 return (conn->err = ERR_MEM);
\r
644 msg->type = API_MSG_WRITE;
\r
645 msg->msg.conn = conn;
\r
648 conn->state = NETCONN_WRITE;
\r
649 while (conn->err == ERR_OK && size > 0) {
\r
650 msg->msg.msg.w.dataptr = dataptr;
\r
651 msg->msg.msg.w.copy = copy;
\r
653 if (conn->type == NETCONN_TCP) {
\r
654 if (tcp_sndbuf(conn->pcb.tcp) == 0) {
\r
655 sys_sem_wait(conn->sem);
\r
656 if (conn->err != ERR_OK) {
\r
660 if (size > tcp_sndbuf(conn->pcb.tcp)) {
\r
661 /* We cannot send more than one send buffer's worth of data at a
\r
663 len = tcp_sndbuf(conn->pcb.tcp);
\r
671 LWIP_DEBUGF(API_LIB_DEBUG, ("netconn_write: writing %d bytes (%d)\n", len, copy));
\r
672 msg->msg.msg.w.len = len;
\r
674 sys_mbox_fetch(conn->mbox, NULL);
\r
675 if (conn->err == ERR_OK) {
\r
676 dataptr = (void *)((char *)dataptr + len);
\r
678 } else if (conn->err == ERR_MEM) {
\r
679 conn->err = ERR_OK;
\r
680 sys_sem_wait(conn->sem);
\r
686 memp_free(MEMP_API_MSG, msg);
\r
687 conn->state = NETCONN_NONE;
\r
688 if (conn->sem != SYS_SEM_NULL) {
\r
689 sys_sem_free(conn->sem);
\r
690 conn->sem = SYS_SEM_NULL;
\r
697 netconn_close(struct netconn *conn)
\r
699 struct api_msg *msg;
\r
701 if (conn == NULL) {
\r
704 if ((msg = memp_malloc(MEMP_API_MSG)) == NULL) {
\r
705 return (conn->err = ERR_MEM);
\r
708 conn->state = NETCONN_CLOSE;
\r
710 msg->type = API_MSG_CLOSE;
\r
711 msg->msg.conn = conn;
\r
713 sys_mbox_fetch(conn->mbox, NULL);
\r
714 if (conn->err == ERR_MEM &&
\r
715 conn->sem != SYS_SEM_NULL) {
\r
716 sys_sem_wait(conn->sem);
\r
719 conn->state = NETCONN_NONE;
\r
720 memp_free(MEMP_API_MSG, msg);
\r
725 netconn_err(struct netconn *conn)
\r