Darran Shepherd
/
Bonjour
First step: AutoIP compiled in and working
lwip/core/pbuf.c@1:4218cacaf696, 2010-06-18 (annotated)
- Committer:
- darran
- Date:
- Fri Jun 18 15:54:21 2010 +0000
- Revision:
- 1:4218cacaf696
- Parent:
- 0:55a05330f8cc
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
darran | 0:55a05330f8cc | 1 | /** |
darran | 0:55a05330f8cc | 2 | * @file |
darran | 0:55a05330f8cc | 3 | * Packet buffer management |
darran | 0:55a05330f8cc | 4 | * |
darran | 0:55a05330f8cc | 5 | * Packets are built from the pbuf data structure. It supports dynamic |
darran | 0:55a05330f8cc | 6 | * memory allocation for packet contents or can reference externally |
darran | 0:55a05330f8cc | 7 | * managed packet contents both in RAM and ROM. Quick allocation for |
darran | 0:55a05330f8cc | 8 | * incoming packets is provided through pools with fixed sized pbufs. |
darran | 0:55a05330f8cc | 9 | * |
darran | 0:55a05330f8cc | 10 | * A packet may span over multiple pbufs, chained as a singly linked |
darran | 0:55a05330f8cc | 11 | * list. This is called a "pbuf chain". |
darran | 0:55a05330f8cc | 12 | * |
darran | 0:55a05330f8cc | 13 | * Multiple packets may be queued, also using this singly linked list. |
darran | 0:55a05330f8cc | 14 | * This is called a "packet queue". |
darran | 0:55a05330f8cc | 15 | * |
darran | 0:55a05330f8cc | 16 | * So, a packet queue consists of one or more pbuf chains, each of |
darran | 0:55a05330f8cc | 17 | * which consist of one or more pbufs. CURRENTLY, PACKET QUEUES ARE |
darran | 0:55a05330f8cc | 18 | * NOT SUPPORTED!!! Use helper structs to queue multiple packets. |
darran | 0:55a05330f8cc | 19 | * |
darran | 0:55a05330f8cc | 20 | * The differences between a pbuf chain and a packet queue are very |
darran | 0:55a05330f8cc | 21 | * precise but subtle. |
darran | 0:55a05330f8cc | 22 | * |
darran | 0:55a05330f8cc | 23 | * The last pbuf of a packet has a ->tot_len field that equals the |
darran | 0:55a05330f8cc | 24 | * ->len field. It can be found by traversing the list. If the last |
darran | 0:55a05330f8cc | 25 | * pbuf of a packet has a ->next field other than NULL, more packets |
darran | 0:55a05330f8cc | 26 | * are on the queue. |
darran | 0:55a05330f8cc | 27 | * |
darran | 0:55a05330f8cc | 28 | * Therefore, looping through a pbuf of a single packet, has an |
darran | 0:55a05330f8cc | 29 | * loop end condition (tot_len == p->len), NOT (next == NULL). |
darran | 0:55a05330f8cc | 30 | */ |
darran | 0:55a05330f8cc | 31 | |
darran | 0:55a05330f8cc | 32 | /* |
darran | 0:55a05330f8cc | 33 | * Copyright (c) 2001-2004 Swedish Institute of Computer Science. |
darran | 0:55a05330f8cc | 34 | * All rights reserved. |
darran | 0:55a05330f8cc | 35 | * |
darran | 0:55a05330f8cc | 36 | * Redistribution and use in source and binary forms, with or without modification, |
darran | 0:55a05330f8cc | 37 | * are permitted provided that the following conditions are met: |
darran | 0:55a05330f8cc | 38 | * |
darran | 0:55a05330f8cc | 39 | * 1. Redistributions of source code must retain the above copyright notice, |
darran | 0:55a05330f8cc | 40 | * this list of conditions and the following disclaimer. |
darran | 0:55a05330f8cc | 41 | * 2. Redistributions in binary form must reproduce the above copyright notice, |
darran | 0:55a05330f8cc | 42 | * this list of conditions and the following disclaimer in the documentation |
darran | 0:55a05330f8cc | 43 | * and/or other materials provided with the distribution. |
darran | 0:55a05330f8cc | 44 | * 3. The name of the author may not be used to endorse or promote products |
darran | 0:55a05330f8cc | 45 | * derived from this software without specific prior written permission. |
darran | 0:55a05330f8cc | 46 | * |
darran | 0:55a05330f8cc | 47 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED |
darran | 0:55a05330f8cc | 48 | * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF |
darran | 0:55a05330f8cc | 49 | * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT |
darran | 0:55a05330f8cc | 50 | * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
darran | 0:55a05330f8cc | 51 | * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT |
darran | 0:55a05330f8cc | 52 | * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
darran | 0:55a05330f8cc | 53 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
darran | 0:55a05330f8cc | 54 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING |
darran | 0:55a05330f8cc | 55 | * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY |
darran | 0:55a05330f8cc | 56 | * OF SUCH DAMAGE. |
darran | 0:55a05330f8cc | 57 | * |
darran | 0:55a05330f8cc | 58 | * This file is part of the lwIP TCP/IP stack. |
darran | 0:55a05330f8cc | 59 | * |
darran | 0:55a05330f8cc | 60 | * Author: Adam Dunkels <adam@sics.se> |
darran | 0:55a05330f8cc | 61 | * |
darran | 0:55a05330f8cc | 62 | */ |
darran | 0:55a05330f8cc | 63 | |
darran | 0:55a05330f8cc | 64 | #include "lwip/opt.h" |
darran | 0:55a05330f8cc | 65 | |
darran | 0:55a05330f8cc | 66 | #include "lwip/stats.h" |
darran | 0:55a05330f8cc | 67 | #include "lwip/def.h" |
darran | 0:55a05330f8cc | 68 | #include "lwip/mem.h" |
darran | 0:55a05330f8cc | 69 | #include "lwip/memp.h" |
darran | 0:55a05330f8cc | 70 | #include "lwip/pbuf.h" |
darran | 0:55a05330f8cc | 71 | #include "lwip/sys.h" |
darran | 0:55a05330f8cc | 72 | #include "arch/perf.h" |
darran | 0:55a05330f8cc | 73 | #if TCP_QUEUE_OOSEQ |
darran | 0:55a05330f8cc | 74 | #include "lwip/tcp_impl.h" |
darran | 0:55a05330f8cc | 75 | #endif |
darran | 0:55a05330f8cc | 76 | |
darran | 0:55a05330f8cc | 77 | #include <string.h> |
darran | 0:55a05330f8cc | 78 | |
darran | 0:55a05330f8cc | 79 | #define SIZEOF_STRUCT_PBUF LWIP_MEM_ALIGN_SIZE(sizeof(struct pbuf)) |
darran | 0:55a05330f8cc | 80 | /* Since the pool is created in memp, PBUF_POOL_BUFSIZE will be automatically |
darran | 0:55a05330f8cc | 81 | aligned there. Therefore, PBUF_POOL_BUFSIZE_ALIGNED can be used here. */ |
darran | 0:55a05330f8cc | 82 | #define PBUF_POOL_BUFSIZE_ALIGNED LWIP_MEM_ALIGN_SIZE(PBUF_POOL_BUFSIZE) |
darran | 0:55a05330f8cc | 83 | |
darran | 0:55a05330f8cc | 84 | #if !TCP_QUEUE_OOSEQ || NO_SYS |
darran | 0:55a05330f8cc | 85 | #define PBUF_POOL_IS_EMPTY() |
darran | 0:55a05330f8cc | 86 | #else /* !TCP_QUEUE_OOSEQ || NO_SYS */ |
darran | 0:55a05330f8cc | 87 | /** Define this to 0 to prevent freeing ooseq pbufs when the PBUF_POOL is empty */ |
darran | 0:55a05330f8cc | 88 | #ifndef PBUF_POOL_FREE_OOSEQ |
darran | 0:55a05330f8cc | 89 | #define PBUF_POOL_FREE_OOSEQ 1 |
darran | 0:55a05330f8cc | 90 | #endif /* PBUF_POOL_FREE_OOSEQ */ |
darran | 0:55a05330f8cc | 91 | |
darran | 0:55a05330f8cc | 92 | #if PBUF_POOL_FREE_OOSEQ |
darran | 0:55a05330f8cc | 93 | #include "lwip/tcpip.h" |
darran | 0:55a05330f8cc | 94 | #define PBUF_POOL_IS_EMPTY() pbuf_pool_is_empty() |
darran | 0:55a05330f8cc | 95 | static u8_t pbuf_free_ooseq_queued; |
darran | 0:55a05330f8cc | 96 | /** |
darran | 0:55a05330f8cc | 97 | * Attempt to reclaim some memory from queued out-of-sequence TCP segments |
darran | 0:55a05330f8cc | 98 | * if we run out of pool pbufs. It's better to give priority to new packets |
darran | 0:55a05330f8cc | 99 | * if we're running out. |
darran | 0:55a05330f8cc | 100 | * |
darran | 0:55a05330f8cc | 101 | * This must be done in the correct thread context therefore this function |
darran | 0:55a05330f8cc | 102 | * can only be used with NO_SYS=0 and through tcpip_callback. |
darran | 0:55a05330f8cc | 103 | */ |
darran | 0:55a05330f8cc | 104 | static void |
darran | 0:55a05330f8cc | 105 | pbuf_free_ooseq(void* arg) |
darran | 0:55a05330f8cc | 106 | { |
darran | 0:55a05330f8cc | 107 | struct tcp_pcb* pcb; |
darran | 0:55a05330f8cc | 108 | SYS_ARCH_DECL_PROTECT(old_level); |
darran | 0:55a05330f8cc | 109 | LWIP_UNUSED_ARG(arg); |
darran | 0:55a05330f8cc | 110 | |
darran | 0:55a05330f8cc | 111 | SYS_ARCH_PROTECT(old_level); |
darran | 0:55a05330f8cc | 112 | pbuf_free_ooseq_queued = 0; |
darran | 0:55a05330f8cc | 113 | SYS_ARCH_UNPROTECT(old_level); |
darran | 0:55a05330f8cc | 114 | |
darran | 0:55a05330f8cc | 115 | for (pcb = tcp_active_pcbs; NULL != pcb; pcb = pcb->next) { |
darran | 0:55a05330f8cc | 116 | if (NULL != pcb->ooseq) { |
darran | 0:55a05330f8cc | 117 | /** Free the ooseq pbufs of one PCB only */ |
darran | 0:55a05330f8cc | 118 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_free_ooseq: freeing out-of-sequence pbufs\n")); |
darran | 0:55a05330f8cc | 119 | tcp_segs_free(pcb->ooseq); |
darran | 0:55a05330f8cc | 120 | pcb->ooseq = NULL; |
darran | 0:55a05330f8cc | 121 | return; |
darran | 0:55a05330f8cc | 122 | } |
darran | 0:55a05330f8cc | 123 | } |
darran | 0:55a05330f8cc | 124 | } |
darran | 0:55a05330f8cc | 125 | |
darran | 0:55a05330f8cc | 126 | /** Queue a call to pbuf_free_ooseq if not already queued. */ |
darran | 0:55a05330f8cc | 127 | static void |
darran | 0:55a05330f8cc | 128 | pbuf_pool_is_empty(void) |
darran | 0:55a05330f8cc | 129 | { |
darran | 0:55a05330f8cc | 130 | u8_t queued; |
darran | 0:55a05330f8cc | 131 | SYS_ARCH_DECL_PROTECT(old_level); |
darran | 0:55a05330f8cc | 132 | |
darran | 0:55a05330f8cc | 133 | SYS_ARCH_PROTECT(old_level); |
darran | 0:55a05330f8cc | 134 | queued = pbuf_free_ooseq_queued; |
darran | 0:55a05330f8cc | 135 | pbuf_free_ooseq_queued = 1; |
darran | 0:55a05330f8cc | 136 | SYS_ARCH_UNPROTECT(old_level); |
darran | 0:55a05330f8cc | 137 | |
darran | 0:55a05330f8cc | 138 | if(!queued) { |
darran | 0:55a05330f8cc | 139 | /* queue a call to pbuf_free_ooseq if not already queued */ |
darran | 0:55a05330f8cc | 140 | if(tcpip_callback_with_block(pbuf_free_ooseq, NULL, 0) != ERR_OK) { |
darran | 0:55a05330f8cc | 141 | SYS_ARCH_PROTECT(old_level); |
darran | 0:55a05330f8cc | 142 | pbuf_free_ooseq_queued = 0; |
darran | 0:55a05330f8cc | 143 | SYS_ARCH_UNPROTECT(old_level); |
darran | 0:55a05330f8cc | 144 | } |
darran | 0:55a05330f8cc | 145 | } |
darran | 0:55a05330f8cc | 146 | } |
darran | 0:55a05330f8cc | 147 | #endif /* PBUF_POOL_FREE_OOSEQ */ |
darran | 0:55a05330f8cc | 148 | #endif /* !TCP_QUEUE_OOSEQ || NO_SYS */ |
darran | 0:55a05330f8cc | 149 | |
darran | 0:55a05330f8cc | 150 | /** |
darran | 0:55a05330f8cc | 151 | * Allocates a pbuf of the given type (possibly a chain for PBUF_POOL type). |
darran | 0:55a05330f8cc | 152 | * |
darran | 0:55a05330f8cc | 153 | * The actual memory allocated for the pbuf is determined by the |
darran | 0:55a05330f8cc | 154 | * layer at which the pbuf is allocated and the requested size |
darran | 0:55a05330f8cc | 155 | * (from the size parameter). |
darran | 0:55a05330f8cc | 156 | * |
darran | 0:55a05330f8cc | 157 | * @param layer flag to define header size |
darran | 0:55a05330f8cc | 158 | * @param length size of the pbuf's payload |
darran | 0:55a05330f8cc | 159 | * @param type this parameter decides how and where the pbuf |
darran | 0:55a05330f8cc | 160 | * should be allocated as follows: |
darran | 0:55a05330f8cc | 161 | * |
darran | 0:55a05330f8cc | 162 | * - PBUF_RAM: buffer memory for pbuf is allocated as one large |
darran | 0:55a05330f8cc | 163 | * chunk. This includes protocol headers as well. |
darran | 0:55a05330f8cc | 164 | * - PBUF_ROM: no buffer memory is allocated for the pbuf, even for |
darran | 0:55a05330f8cc | 165 | * protocol headers. Additional headers must be prepended |
darran | 0:55a05330f8cc | 166 | * by allocating another pbuf and chain in to the front of |
darran | 0:55a05330f8cc | 167 | * the ROM pbuf. It is assumed that the memory used is really |
darran | 0:55a05330f8cc | 168 | * similar to ROM in that it is immutable and will not be |
darran | 0:55a05330f8cc | 169 | * changed. Memory which is dynamic should generally not |
darran | 0:55a05330f8cc | 170 | * be attached to PBUF_ROM pbufs. Use PBUF_REF instead. |
darran | 0:55a05330f8cc | 171 | * - PBUF_REF: no buffer memory is allocated for the pbuf, even for |
darran | 0:55a05330f8cc | 172 | * protocol headers. It is assumed that the pbuf is only |
darran | 0:55a05330f8cc | 173 | * being used in a single thread. If the pbuf gets queued, |
darran | 0:55a05330f8cc | 174 | * then pbuf_take should be called to copy the buffer. |
darran | 0:55a05330f8cc | 175 | * - PBUF_POOL: the pbuf is allocated as a pbuf chain, with pbufs from |
darran | 0:55a05330f8cc | 176 | * the pbuf pool that is allocated during pbuf_init(). |
darran | 0:55a05330f8cc | 177 | * |
darran | 0:55a05330f8cc | 178 | * @return the allocated pbuf. If multiple pbufs where allocated, this |
darran | 0:55a05330f8cc | 179 | * is the first pbuf of a pbuf chain. |
darran | 0:55a05330f8cc | 180 | */ |
darran | 0:55a05330f8cc | 181 | struct pbuf * |
darran | 0:55a05330f8cc | 182 | pbuf_alloc(pbuf_layer layer, u16_t length, pbuf_type type) |
darran | 0:55a05330f8cc | 183 | { |
darran | 0:55a05330f8cc | 184 | struct pbuf *p, *q, *r; |
darran | 0:55a05330f8cc | 185 | u16_t offset; |
darran | 0:55a05330f8cc | 186 | s32_t rem_len; /* remaining length */ |
darran | 0:55a05330f8cc | 187 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_alloc(length=%"U16_F")\n", length)); |
darran | 0:55a05330f8cc | 188 | |
darran | 0:55a05330f8cc | 189 | /* determine header offset */ |
darran | 0:55a05330f8cc | 190 | offset = 0; |
darran | 0:55a05330f8cc | 191 | switch (layer) { |
darran | 0:55a05330f8cc | 192 | case PBUF_TRANSPORT: |
darran | 0:55a05330f8cc | 193 | /* add room for transport (often TCP) layer header */ |
darran | 0:55a05330f8cc | 194 | offset += PBUF_TRANSPORT_HLEN; |
darran | 0:55a05330f8cc | 195 | /* FALLTHROUGH */ |
darran | 0:55a05330f8cc | 196 | case PBUF_IP: |
darran | 0:55a05330f8cc | 197 | /* add room for IP layer header */ |
darran | 0:55a05330f8cc | 198 | offset += PBUF_IP_HLEN; |
darran | 0:55a05330f8cc | 199 | /* FALLTHROUGH */ |
darran | 0:55a05330f8cc | 200 | case PBUF_LINK: |
darran | 0:55a05330f8cc | 201 | /* add room for link layer header */ |
darran | 0:55a05330f8cc | 202 | offset += PBUF_LINK_HLEN; |
darran | 0:55a05330f8cc | 203 | break; |
darran | 0:55a05330f8cc | 204 | case PBUF_RAW: |
darran | 0:55a05330f8cc | 205 | break; |
darran | 0:55a05330f8cc | 206 | default: |
darran | 0:55a05330f8cc | 207 | LWIP_ASSERT("pbuf_alloc: bad pbuf layer", 0); |
darran | 0:55a05330f8cc | 208 | return NULL; |
darran | 0:55a05330f8cc | 209 | } |
darran | 0:55a05330f8cc | 210 | |
darran | 0:55a05330f8cc | 211 | switch (type) { |
darran | 0:55a05330f8cc | 212 | case PBUF_POOL: |
darran | 0:55a05330f8cc | 213 | /* allocate head of pbuf chain into p */ |
darran | 0:55a05330f8cc | 214 | p = (struct pbuf *)memp_malloc(MEMP_PBUF_POOL); |
darran | 0:55a05330f8cc | 215 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_alloc: allocated pbuf %p\n", (void *)p)); |
darran | 0:55a05330f8cc | 216 | if (p == NULL) { |
darran | 0:55a05330f8cc | 217 | PBUF_POOL_IS_EMPTY(); |
darran | 0:55a05330f8cc | 218 | return NULL; |
darran | 0:55a05330f8cc | 219 | } |
darran | 0:55a05330f8cc | 220 | p->type = type; |
darran | 0:55a05330f8cc | 221 | p->next = NULL; |
darran | 0:55a05330f8cc | 222 | |
darran | 0:55a05330f8cc | 223 | /* make the payload pointer point 'offset' bytes into pbuf data memory */ |
darran | 0:55a05330f8cc | 224 | p->payload = LWIP_MEM_ALIGN((void *)((u8_t *)p + (SIZEOF_STRUCT_PBUF + offset))); |
darran | 0:55a05330f8cc | 225 | LWIP_ASSERT("pbuf_alloc: pbuf p->payload properly aligned", |
darran | 0:55a05330f8cc | 226 | ((mem_ptr_t)p->payload % MEM_ALIGNMENT) == 0); |
darran | 0:55a05330f8cc | 227 | /* the total length of the pbuf chain is the requested size */ |
darran | 0:55a05330f8cc | 228 | p->tot_len = length; |
darran | 0:55a05330f8cc | 229 | /* set the length of the first pbuf in the chain */ |
darran | 0:55a05330f8cc | 230 | p->len = LWIP_MIN(length, PBUF_POOL_BUFSIZE_ALIGNED - LWIP_MEM_ALIGN_SIZE(offset)); |
darran | 0:55a05330f8cc | 231 | LWIP_ASSERT("check p->payload + p->len does not overflow pbuf", |
darran | 0:55a05330f8cc | 232 | ((u8_t*)p->payload + p->len <= |
darran | 0:55a05330f8cc | 233 | (u8_t*)p + SIZEOF_STRUCT_PBUF + PBUF_POOL_BUFSIZE_ALIGNED)); |
darran | 0:55a05330f8cc | 234 | LWIP_ASSERT("PBUF_POOL_BUFSIZE must be bigger than MEM_ALIGNMENT", |
darran | 0:55a05330f8cc | 235 | (PBUF_POOL_BUFSIZE_ALIGNED - LWIP_MEM_ALIGN_SIZE(offset)) > 0 ); |
darran | 0:55a05330f8cc | 236 | /* set reference count (needed here in case we fail) */ |
darran | 0:55a05330f8cc | 237 | p->ref = 1; |
darran | 0:55a05330f8cc | 238 | |
darran | 0:55a05330f8cc | 239 | /* now allocate the tail of the pbuf chain */ |
darran | 0:55a05330f8cc | 240 | |
darran | 0:55a05330f8cc | 241 | /* remember first pbuf for linkage in next iteration */ |
darran | 0:55a05330f8cc | 242 | r = p; |
darran | 0:55a05330f8cc | 243 | /* remaining length to be allocated */ |
darran | 0:55a05330f8cc | 244 | rem_len = length - p->len; |
darran | 0:55a05330f8cc | 245 | /* any remaining pbufs to be allocated? */ |
darran | 0:55a05330f8cc | 246 | while (rem_len > 0) { |
darran | 0:55a05330f8cc | 247 | q = (struct pbuf *)memp_malloc(MEMP_PBUF_POOL); |
darran | 0:55a05330f8cc | 248 | if (q == NULL) { |
darran | 0:55a05330f8cc | 249 | PBUF_POOL_IS_EMPTY(); |
darran | 0:55a05330f8cc | 250 | /* free chain so far allocated */ |
darran | 0:55a05330f8cc | 251 | pbuf_free(p); |
darran | 0:55a05330f8cc | 252 | /* bail out unsuccesfully */ |
darran | 0:55a05330f8cc | 253 | return NULL; |
darran | 0:55a05330f8cc | 254 | } |
darran | 0:55a05330f8cc | 255 | q->type = type; |
darran | 0:55a05330f8cc | 256 | q->flags = 0; |
darran | 0:55a05330f8cc | 257 | q->next = NULL; |
darran | 0:55a05330f8cc | 258 | /* make previous pbuf point to this pbuf */ |
darran | 0:55a05330f8cc | 259 | r->next = q; |
darran | 0:55a05330f8cc | 260 | /* set total length of this pbuf and next in chain */ |
darran | 0:55a05330f8cc | 261 | LWIP_ASSERT("rem_len < max_u16_t", rem_len < 0xffff); |
darran | 0:55a05330f8cc | 262 | q->tot_len = (u16_t)rem_len; |
darran | 0:55a05330f8cc | 263 | /* this pbuf length is pool size, unless smaller sized tail */ |
darran | 0:55a05330f8cc | 264 | q->len = LWIP_MIN((u16_t)rem_len, PBUF_POOL_BUFSIZE_ALIGNED); |
darran | 0:55a05330f8cc | 265 | q->payload = (void *)((u8_t *)q + SIZEOF_STRUCT_PBUF); |
darran | 0:55a05330f8cc | 266 | LWIP_ASSERT("pbuf_alloc: pbuf q->payload properly aligned", |
darran | 0:55a05330f8cc | 267 | ((mem_ptr_t)q->payload % MEM_ALIGNMENT) == 0); |
darran | 0:55a05330f8cc | 268 | LWIP_ASSERT("check p->payload + p->len does not overflow pbuf", |
darran | 0:55a05330f8cc | 269 | ((u8_t*)p->payload + p->len <= |
darran | 0:55a05330f8cc | 270 | (u8_t*)p + SIZEOF_STRUCT_PBUF + PBUF_POOL_BUFSIZE_ALIGNED)); |
darran | 0:55a05330f8cc | 271 | q->ref = 1; |
darran | 0:55a05330f8cc | 272 | /* calculate remaining length to be allocated */ |
darran | 0:55a05330f8cc | 273 | rem_len -= q->len; |
darran | 0:55a05330f8cc | 274 | /* remember this pbuf for linkage in next iteration */ |
darran | 0:55a05330f8cc | 275 | r = q; |
darran | 0:55a05330f8cc | 276 | } |
darran | 0:55a05330f8cc | 277 | /* end of chain */ |
darran | 0:55a05330f8cc | 278 | /*r->next = NULL;*/ |
darran | 0:55a05330f8cc | 279 | |
darran | 0:55a05330f8cc | 280 | break; |
darran | 0:55a05330f8cc | 281 | case PBUF_RAM: |
darran | 0:55a05330f8cc | 282 | /* If pbuf is to be allocated in RAM, allocate memory for it. */ |
darran | 0:55a05330f8cc | 283 | p = (struct pbuf*)mem_malloc(LWIP_MEM_ALIGN_SIZE(SIZEOF_STRUCT_PBUF + offset) + LWIP_MEM_ALIGN_SIZE(length)); |
darran | 0:55a05330f8cc | 284 | if (p == NULL) { |
darran | 0:55a05330f8cc | 285 | return NULL; |
darran | 0:55a05330f8cc | 286 | } |
darran | 0:55a05330f8cc | 287 | /* Set up internal structure of the pbuf. */ |
darran | 0:55a05330f8cc | 288 | p->payload = LWIP_MEM_ALIGN((void *)((u8_t *)p + SIZEOF_STRUCT_PBUF + offset)); |
darran | 0:55a05330f8cc | 289 | p->len = p->tot_len = length; |
darran | 0:55a05330f8cc | 290 | p->next = NULL; |
darran | 0:55a05330f8cc | 291 | p->type = type; |
darran | 0:55a05330f8cc | 292 | |
darran | 0:55a05330f8cc | 293 | LWIP_ASSERT("pbuf_alloc: pbuf->payload properly aligned", |
darran | 0:55a05330f8cc | 294 | ((mem_ptr_t)p->payload % MEM_ALIGNMENT) == 0); |
darran | 0:55a05330f8cc | 295 | break; |
darran | 0:55a05330f8cc | 296 | /* pbuf references existing (non-volatile static constant) ROM payload? */ |
darran | 0:55a05330f8cc | 297 | case PBUF_ROM: |
darran | 0:55a05330f8cc | 298 | /* pbuf references existing (externally allocated) RAM payload? */ |
darran | 0:55a05330f8cc | 299 | case PBUF_REF: |
darran | 0:55a05330f8cc | 300 | /* only allocate memory for the pbuf structure */ |
darran | 0:55a05330f8cc | 301 | p = (struct pbuf *)memp_malloc(MEMP_PBUF); |
darran | 0:55a05330f8cc | 302 | if (p == NULL) { |
darran | 0:55a05330f8cc | 303 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_LEVEL_SERIOUS, |
darran | 0:55a05330f8cc | 304 | ("pbuf_alloc: Could not allocate MEMP_PBUF for PBUF_%s.\n", |
darran | 0:55a05330f8cc | 305 | (type == PBUF_ROM) ? "ROM" : "REF")); |
darran | 0:55a05330f8cc | 306 | return NULL; |
darran | 0:55a05330f8cc | 307 | } |
darran | 0:55a05330f8cc | 308 | /* caller must set this field properly, afterwards */ |
darran | 0:55a05330f8cc | 309 | p->payload = NULL; |
darran | 0:55a05330f8cc | 310 | p->len = p->tot_len = length; |
darran | 0:55a05330f8cc | 311 | p->next = NULL; |
darran | 0:55a05330f8cc | 312 | p->type = type; |
darran | 0:55a05330f8cc | 313 | break; |
darran | 0:55a05330f8cc | 314 | default: |
darran | 0:55a05330f8cc | 315 | LWIP_ASSERT("pbuf_alloc: erroneous type", 0); |
darran | 0:55a05330f8cc | 316 | return NULL; |
darran | 0:55a05330f8cc | 317 | } |
darran | 0:55a05330f8cc | 318 | /* set reference count */ |
darran | 0:55a05330f8cc | 319 | p->ref = 1; |
darran | 0:55a05330f8cc | 320 | /* set flags */ |
darran | 0:55a05330f8cc | 321 | p->flags = 0; |
darran | 0:55a05330f8cc | 322 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_alloc(length=%"U16_F") == %p\n", length, (void *)p)); |
darran | 0:55a05330f8cc | 323 | return p; |
darran | 0:55a05330f8cc | 324 | } |
darran | 0:55a05330f8cc | 325 | |
darran | 0:55a05330f8cc | 326 | |
darran | 0:55a05330f8cc | 327 | /** |
darran | 0:55a05330f8cc | 328 | * Shrink a pbuf chain to a desired length. |
darran | 0:55a05330f8cc | 329 | * |
darran | 0:55a05330f8cc | 330 | * @param p pbuf to shrink. |
darran | 0:55a05330f8cc | 331 | * @param new_len desired new length of pbuf chain |
darran | 0:55a05330f8cc | 332 | * |
darran | 0:55a05330f8cc | 333 | * Depending on the desired length, the first few pbufs in a chain might |
darran | 0:55a05330f8cc | 334 | * be skipped and left unchanged. The new last pbuf in the chain will be |
darran | 0:55a05330f8cc | 335 | * resized, and any remaining pbufs will be freed. |
darran | 0:55a05330f8cc | 336 | * |
darran | 0:55a05330f8cc | 337 | * @note If the pbuf is ROM/REF, only the ->tot_len and ->len fields are adjusted. |
darran | 0:55a05330f8cc | 338 | * @note May not be called on a packet queue. |
darran | 0:55a05330f8cc | 339 | * |
darran | 0:55a05330f8cc | 340 | * @note Despite its name, pbuf_realloc cannot grow the size of a pbuf (chain). |
darran | 0:55a05330f8cc | 341 | */ |
darran | 0:55a05330f8cc | 342 | void |
darran | 0:55a05330f8cc | 343 | pbuf_realloc(struct pbuf *p, u16_t new_len) |
darran | 0:55a05330f8cc | 344 | { |
darran | 0:55a05330f8cc | 345 | struct pbuf *q; |
darran | 0:55a05330f8cc | 346 | u16_t rem_len; /* remaining length */ |
darran | 0:55a05330f8cc | 347 | s32_t grow; |
darran | 0:55a05330f8cc | 348 | |
darran | 0:55a05330f8cc | 349 | LWIP_ASSERT("pbuf_realloc: p != NULL", p != NULL); |
darran | 0:55a05330f8cc | 350 | LWIP_ASSERT("pbuf_realloc: sane p->type", p->type == PBUF_POOL || |
darran | 0:55a05330f8cc | 351 | p->type == PBUF_ROM || |
darran | 0:55a05330f8cc | 352 | p->type == PBUF_RAM || |
darran | 0:55a05330f8cc | 353 | p->type == PBUF_REF); |
darran | 0:55a05330f8cc | 354 | |
darran | 0:55a05330f8cc | 355 | /* desired length larger than current length? */ |
darran | 0:55a05330f8cc | 356 | if (new_len >= p->tot_len) { |
darran | 0:55a05330f8cc | 357 | /* enlarging not yet supported */ |
darran | 0:55a05330f8cc | 358 | return; |
darran | 0:55a05330f8cc | 359 | } |
darran | 0:55a05330f8cc | 360 | |
darran | 0:55a05330f8cc | 361 | /* the pbuf chain grows by (new_len - p->tot_len) bytes |
darran | 0:55a05330f8cc | 362 | * (which may be negative in case of shrinking) */ |
darran | 0:55a05330f8cc | 363 | grow = new_len - p->tot_len; |
darran | 0:55a05330f8cc | 364 | |
darran | 0:55a05330f8cc | 365 | /* first, step over any pbufs that should remain in the chain */ |
darran | 0:55a05330f8cc | 366 | rem_len = new_len; |
darran | 0:55a05330f8cc | 367 | q = p; |
darran | 0:55a05330f8cc | 368 | /* should this pbuf be kept? */ |
darran | 0:55a05330f8cc | 369 | while (rem_len > q->len) { |
darran | 0:55a05330f8cc | 370 | /* decrease remaining length by pbuf length */ |
darran | 0:55a05330f8cc | 371 | rem_len -= q->len; |
darran | 0:55a05330f8cc | 372 | /* decrease total length indicator */ |
darran | 0:55a05330f8cc | 373 | LWIP_ASSERT("grow < max_u16_t", grow < 0xffff); |
darran | 0:55a05330f8cc | 374 | q->tot_len += (u16_t)grow; |
darran | 0:55a05330f8cc | 375 | /* proceed to next pbuf in chain */ |
darran | 0:55a05330f8cc | 376 | q = q->next; |
darran | 0:55a05330f8cc | 377 | LWIP_ASSERT("pbuf_realloc: q != NULL", q != NULL); |
darran | 0:55a05330f8cc | 378 | } |
darran | 0:55a05330f8cc | 379 | /* we have now reached the new last pbuf (in q) */ |
darran | 0:55a05330f8cc | 380 | /* rem_len == desired length for pbuf q */ |
darran | 0:55a05330f8cc | 381 | |
darran | 0:55a05330f8cc | 382 | /* shrink allocated memory for PBUF_RAM */ |
darran | 0:55a05330f8cc | 383 | /* (other types merely adjust their length fields */ |
darran | 0:55a05330f8cc | 384 | if ((q->type == PBUF_RAM) && (rem_len != q->len)) { |
darran | 0:55a05330f8cc | 385 | /* reallocate and adjust the length of the pbuf that will be split */ |
darran | 0:55a05330f8cc | 386 | q = (struct pbuf *)mem_trim(q, (u16_t)((u8_t *)q->payload - (u8_t *)q) + rem_len); |
darran | 0:55a05330f8cc | 387 | LWIP_ASSERT("mem_trim returned q == NULL", q != NULL); |
darran | 0:55a05330f8cc | 388 | } |
darran | 0:55a05330f8cc | 389 | /* adjust length fields for new last pbuf */ |
darran | 0:55a05330f8cc | 390 | q->len = rem_len; |
darran | 0:55a05330f8cc | 391 | q->tot_len = q->len; |
darran | 0:55a05330f8cc | 392 | |
darran | 0:55a05330f8cc | 393 | /* any remaining pbufs in chain? */ |
darran | 0:55a05330f8cc | 394 | if (q->next != NULL) { |
darran | 0:55a05330f8cc | 395 | /* free remaining pbufs in chain */ |
darran | 0:55a05330f8cc | 396 | pbuf_free(q->next); |
darran | 0:55a05330f8cc | 397 | } |
darran | 0:55a05330f8cc | 398 | /* q is last packet in chain */ |
darran | 0:55a05330f8cc | 399 | q->next = NULL; |
darran | 0:55a05330f8cc | 400 | |
darran | 0:55a05330f8cc | 401 | } |
darran | 0:55a05330f8cc | 402 | |
darran | 0:55a05330f8cc | 403 | /** |
darran | 0:55a05330f8cc | 404 | * Adjusts the payload pointer to hide or reveal headers in the payload. |
darran | 0:55a05330f8cc | 405 | * |
darran | 0:55a05330f8cc | 406 | * Adjusts the ->payload pointer so that space for a header |
darran | 0:55a05330f8cc | 407 | * (dis)appears in the pbuf payload. |
darran | 0:55a05330f8cc | 408 | * |
darran | 0:55a05330f8cc | 409 | * The ->payload, ->tot_len and ->len fields are adjusted. |
darran | 0:55a05330f8cc | 410 | * |
darran | 0:55a05330f8cc | 411 | * @param p pbuf to change the header size. |
darran | 0:55a05330f8cc | 412 | * @param header_size_increment Number of bytes to increment header size which |
darran | 0:55a05330f8cc | 413 | * increases the size of the pbuf. New space is on the front. |
darran | 0:55a05330f8cc | 414 | * (Using a negative value decreases the header size.) |
darran | 0:55a05330f8cc | 415 | * If hdr_size_inc is 0, this function does nothing and returns succesful. |
darran | 0:55a05330f8cc | 416 | * |
darran | 0:55a05330f8cc | 417 | * PBUF_ROM and PBUF_REF type buffers cannot have their sizes increased, so |
darran | 0:55a05330f8cc | 418 | * the call will fail. A check is made that the increase in header size does |
darran | 0:55a05330f8cc | 419 | * not move the payload pointer in front of the start of the buffer. |
darran | 0:55a05330f8cc | 420 | * @return non-zero on failure, zero on success. |
darran | 0:55a05330f8cc | 421 | * |
darran | 0:55a05330f8cc | 422 | */ |
darran | 0:55a05330f8cc | 423 | u8_t |
darran | 0:55a05330f8cc | 424 | pbuf_header(struct pbuf *p, s16_t header_size_increment) |
darran | 0:55a05330f8cc | 425 | { |
darran | 0:55a05330f8cc | 426 | u16_t type; |
darran | 0:55a05330f8cc | 427 | void *payload; |
darran | 0:55a05330f8cc | 428 | u16_t increment_magnitude; |
darran | 0:55a05330f8cc | 429 | |
darran | 0:55a05330f8cc | 430 | LWIP_ASSERT("p != NULL", p != NULL); |
darran | 0:55a05330f8cc | 431 | if ((header_size_increment == 0) || (p == NULL)) |
darran | 0:55a05330f8cc | 432 | return 0; |
darran | 0:55a05330f8cc | 433 | |
darran | 0:55a05330f8cc | 434 | if (header_size_increment < 0){ |
darran | 0:55a05330f8cc | 435 | increment_magnitude = -header_size_increment; |
darran | 0:55a05330f8cc | 436 | /* Check that we aren't going to move off the end of the pbuf */ |
darran | 0:55a05330f8cc | 437 | LWIP_ERROR("increment_magnitude <= p->len", (increment_magnitude <= p->len), return 1;); |
darran | 0:55a05330f8cc | 438 | } else { |
darran | 0:55a05330f8cc | 439 | increment_magnitude = header_size_increment; |
darran | 0:55a05330f8cc | 440 | #if 0 |
darran | 0:55a05330f8cc | 441 | /* Can't assert these as some callers speculatively call |
darran | 0:55a05330f8cc | 442 | pbuf_header() to see if it's OK. Will return 1 below instead. */ |
darran | 0:55a05330f8cc | 443 | /* Check that we've got the correct type of pbuf to work with */ |
darran | 0:55a05330f8cc | 444 | LWIP_ASSERT("p->type == PBUF_RAM || p->type == PBUF_POOL", |
darran | 0:55a05330f8cc | 445 | p->type == PBUF_RAM || p->type == PBUF_POOL); |
darran | 0:55a05330f8cc | 446 | /* Check that we aren't going to move off the beginning of the pbuf */ |
darran | 0:55a05330f8cc | 447 | LWIP_ASSERT("p->payload - increment_magnitude >= p + SIZEOF_STRUCT_PBUF", |
darran | 0:55a05330f8cc | 448 | (u8_t *)p->payload - increment_magnitude >= (u8_t *)p + SIZEOF_STRUCT_PBUF); |
darran | 0:55a05330f8cc | 449 | #endif |
darran | 0:55a05330f8cc | 450 | } |
darran | 0:55a05330f8cc | 451 | |
darran | 0:55a05330f8cc | 452 | type = p->type; |
darran | 0:55a05330f8cc | 453 | /* remember current payload pointer */ |
darran | 0:55a05330f8cc | 454 | payload = p->payload; |
darran | 0:55a05330f8cc | 455 | |
darran | 0:55a05330f8cc | 456 | /* pbuf types containing payloads? */ |
darran | 0:55a05330f8cc | 457 | if (type == PBUF_RAM || type == PBUF_POOL) { |
darran | 0:55a05330f8cc | 458 | /* set new payload pointer */ |
darran | 0:55a05330f8cc | 459 | p->payload = (u8_t *)p->payload - header_size_increment; |
darran | 0:55a05330f8cc | 460 | /* boundary check fails? */ |
darran | 0:55a05330f8cc | 461 | if ((u8_t *)p->payload < (u8_t *)p + SIZEOF_STRUCT_PBUF) { |
darran | 0:55a05330f8cc | 462 | LWIP_DEBUGF( PBUF_DEBUG | LWIP_DBG_LEVEL_SERIOUS, |
darran | 0:55a05330f8cc | 463 | ("pbuf_header: failed as %p < %p (not enough space for new header size)\n", |
darran | 0:55a05330f8cc | 464 | (void *)p->payload, (void *)(p + 1))); |
darran | 0:55a05330f8cc | 465 | /* restore old payload pointer */ |
darran | 0:55a05330f8cc | 466 | p->payload = payload; |
darran | 0:55a05330f8cc | 467 | /* bail out unsuccesfully */ |
darran | 0:55a05330f8cc | 468 | return 1; |
darran | 0:55a05330f8cc | 469 | } |
darran | 0:55a05330f8cc | 470 | /* pbuf types refering to external payloads? */ |
darran | 0:55a05330f8cc | 471 | } else if (type == PBUF_REF || type == PBUF_ROM) { |
darran | 0:55a05330f8cc | 472 | /* hide a header in the payload? */ |
darran | 0:55a05330f8cc | 473 | if ((header_size_increment < 0) && (increment_magnitude <= p->len)) { |
darran | 0:55a05330f8cc | 474 | /* increase payload pointer */ |
darran | 0:55a05330f8cc | 475 | p->payload = (u8_t *)p->payload - header_size_increment; |
darran | 0:55a05330f8cc | 476 | } else { |
darran | 0:55a05330f8cc | 477 | /* cannot expand payload to front (yet!) |
darran | 0:55a05330f8cc | 478 | * bail out unsuccesfully */ |
darran | 0:55a05330f8cc | 479 | return 1; |
darran | 0:55a05330f8cc | 480 | } |
darran | 0:55a05330f8cc | 481 | } |
darran | 0:55a05330f8cc | 482 | else { |
darran | 0:55a05330f8cc | 483 | /* Unknown type */ |
darran | 0:55a05330f8cc | 484 | LWIP_ASSERT("bad pbuf type", 0); |
darran | 0:55a05330f8cc | 485 | return 1; |
darran | 0:55a05330f8cc | 486 | } |
darran | 0:55a05330f8cc | 487 | /* modify pbuf length fields */ |
darran | 0:55a05330f8cc | 488 | p->len += header_size_increment; |
darran | 0:55a05330f8cc | 489 | p->tot_len += header_size_increment; |
darran | 0:55a05330f8cc | 490 | |
darran | 0:55a05330f8cc | 491 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_header: old %p new %p (%"S16_F")\n", |
darran | 0:55a05330f8cc | 492 | (void *)payload, (void *)p->payload, header_size_increment)); |
darran | 0:55a05330f8cc | 493 | |
darran | 0:55a05330f8cc | 494 | return 0; |
darran | 0:55a05330f8cc | 495 | } |
darran | 0:55a05330f8cc | 496 | |
darran | 0:55a05330f8cc | 497 | /** |
darran | 0:55a05330f8cc | 498 | * Dereference a pbuf chain or queue and deallocate any no-longer-used |
darran | 0:55a05330f8cc | 499 | * pbufs at the head of this chain or queue. |
darran | 0:55a05330f8cc | 500 | * |
darran | 0:55a05330f8cc | 501 | * Decrements the pbuf reference count. If it reaches zero, the pbuf is |
darran | 0:55a05330f8cc | 502 | * deallocated. |
darran | 0:55a05330f8cc | 503 | * |
darran | 0:55a05330f8cc | 504 | * For a pbuf chain, this is repeated for each pbuf in the chain, |
darran | 0:55a05330f8cc | 505 | * up to the first pbuf which has a non-zero reference count after |
darran | 0:55a05330f8cc | 506 | * decrementing. So, when all reference counts are one, the whole |
darran | 0:55a05330f8cc | 507 | * chain is free'd. |
darran | 0:55a05330f8cc | 508 | * |
darran | 0:55a05330f8cc | 509 | * @param p The pbuf (chain) to be dereferenced. |
darran | 0:55a05330f8cc | 510 | * |
darran | 0:55a05330f8cc | 511 | * @return the number of pbufs that were de-allocated |
darran | 0:55a05330f8cc | 512 | * from the head of the chain. |
darran | 0:55a05330f8cc | 513 | * |
darran | 0:55a05330f8cc | 514 | * @note MUST NOT be called on a packet queue (Not verified to work yet). |
darran | 0:55a05330f8cc | 515 | * @note the reference counter of a pbuf equals the number of pointers |
darran | 0:55a05330f8cc | 516 | * that refer to the pbuf (or into the pbuf). |
darran | 0:55a05330f8cc | 517 | * |
darran | 0:55a05330f8cc | 518 | * @internal examples: |
darran | 0:55a05330f8cc | 519 | * |
darran | 0:55a05330f8cc | 520 | * Assuming existing chains a->b->c with the following reference |
darran | 0:55a05330f8cc | 521 | * counts, calling pbuf_free(a) results in: |
darran | 0:55a05330f8cc | 522 | * |
darran | 0:55a05330f8cc | 523 | * 1->2->3 becomes ...1->3 |
darran | 0:55a05330f8cc | 524 | * 3->3->3 becomes 2->3->3 |
darran | 0:55a05330f8cc | 525 | * 1->1->2 becomes ......1 |
darran | 0:55a05330f8cc | 526 | * 2->1->1 becomes 1->1->1 |
darran | 0:55a05330f8cc | 527 | * 1->1->1 becomes ....... |
darran | 0:55a05330f8cc | 528 | * |
darran | 0:55a05330f8cc | 529 | */ |
darran | 0:55a05330f8cc | 530 | u8_t |
darran | 0:55a05330f8cc | 531 | pbuf_free(struct pbuf *p) |
darran | 0:55a05330f8cc | 532 | { |
darran | 0:55a05330f8cc | 533 | u16_t type; |
darran | 0:55a05330f8cc | 534 | struct pbuf *q; |
darran | 0:55a05330f8cc | 535 | u8_t count; |
darran | 0:55a05330f8cc | 536 | |
darran | 0:55a05330f8cc | 537 | if (p == NULL) { |
darran | 0:55a05330f8cc | 538 | LWIP_ASSERT("p != NULL", p != NULL); |
darran | 0:55a05330f8cc | 539 | /* if assertions are disabled, proceed with debug output */ |
darran | 0:55a05330f8cc | 540 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_LEVEL_SERIOUS, |
darran | 0:55a05330f8cc | 541 | ("pbuf_free(p == NULL) was called.\n")); |
darran | 0:55a05330f8cc | 542 | return 0; |
darran | 0:55a05330f8cc | 543 | } |
darran | 0:55a05330f8cc | 544 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_free(%p)\n", (void *)p)); |
darran | 0:55a05330f8cc | 545 | |
darran | 0:55a05330f8cc | 546 | PERF_START; |
darran | 0:55a05330f8cc | 547 | |
darran | 0:55a05330f8cc | 548 | LWIP_ASSERT("pbuf_free: sane type", |
darran | 0:55a05330f8cc | 549 | p->type == PBUF_RAM || p->type == PBUF_ROM || |
darran | 0:55a05330f8cc | 550 | p->type == PBUF_REF || p->type == PBUF_POOL); |
darran | 0:55a05330f8cc | 551 | |
darran | 0:55a05330f8cc | 552 | count = 0; |
darran | 0:55a05330f8cc | 553 | /* de-allocate all consecutive pbufs from the head of the chain that |
darran | 0:55a05330f8cc | 554 | * obtain a zero reference count after decrementing*/ |
darran | 0:55a05330f8cc | 555 | while (p != NULL) { |
darran | 0:55a05330f8cc | 556 | u16_t ref; |
darran | 0:55a05330f8cc | 557 | SYS_ARCH_DECL_PROTECT(old_level); |
darran | 0:55a05330f8cc | 558 | /* Since decrementing ref cannot be guaranteed to be a single machine operation |
darran | 0:55a05330f8cc | 559 | * we must protect it. We put the new ref into a local variable to prevent |
darran | 0:55a05330f8cc | 560 | * further protection. */ |
darran | 0:55a05330f8cc | 561 | SYS_ARCH_PROTECT(old_level); |
darran | 0:55a05330f8cc | 562 | /* all pbufs in a chain are referenced at least once */ |
darran | 0:55a05330f8cc | 563 | LWIP_ASSERT("pbuf_free: p->ref > 0", p->ref > 0); |
darran | 0:55a05330f8cc | 564 | /* decrease reference count (number of pointers to pbuf) */ |
darran | 0:55a05330f8cc | 565 | ref = --(p->ref); |
darran | 0:55a05330f8cc | 566 | SYS_ARCH_UNPROTECT(old_level); |
darran | 0:55a05330f8cc | 567 | /* this pbuf is no longer referenced to? */ |
darran | 0:55a05330f8cc | 568 | if (ref == 0) { |
darran | 0:55a05330f8cc | 569 | /* remember next pbuf in chain for next iteration */ |
darran | 0:55a05330f8cc | 570 | q = p->next; |
darran | 0:55a05330f8cc | 571 | LWIP_DEBUGF( PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_free: deallocating %p\n", (void *)p)); |
darran | 0:55a05330f8cc | 572 | type = p->type; |
darran | 0:55a05330f8cc | 573 | /* is this a pbuf from the pool? */ |
darran | 0:55a05330f8cc | 574 | if (type == PBUF_POOL) { |
darran | 0:55a05330f8cc | 575 | memp_free(MEMP_PBUF_POOL, p); |
darran | 0:55a05330f8cc | 576 | /* is this a ROM or RAM referencing pbuf? */ |
darran | 0:55a05330f8cc | 577 | } else if (type == PBUF_ROM || type == PBUF_REF) { |
darran | 0:55a05330f8cc | 578 | memp_free(MEMP_PBUF, p); |
darran | 0:55a05330f8cc | 579 | /* type == PBUF_RAM */ |
darran | 0:55a05330f8cc | 580 | } else { |
darran | 0:55a05330f8cc | 581 | mem_free(p); |
darran | 0:55a05330f8cc | 582 | } |
darran | 0:55a05330f8cc | 583 | count++; |
darran | 0:55a05330f8cc | 584 | /* proceed to next pbuf */ |
darran | 0:55a05330f8cc | 585 | p = q; |
darran | 0:55a05330f8cc | 586 | /* p->ref > 0, this pbuf is still referenced to */ |
darran | 0:55a05330f8cc | 587 | /* (and so the remaining pbufs in chain as well) */ |
darran | 0:55a05330f8cc | 588 | } else { |
darran | 0:55a05330f8cc | 589 | LWIP_DEBUGF( PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_free: %p has ref %"U16_F", ending here.\n", (void *)p, ref)); |
darran | 0:55a05330f8cc | 590 | /* stop walking through the chain */ |
darran | 0:55a05330f8cc | 591 | p = NULL; |
darran | 0:55a05330f8cc | 592 | } |
darran | 0:55a05330f8cc | 593 | } |
darran | 0:55a05330f8cc | 594 | PERF_STOP("pbuf_free"); |
darran | 0:55a05330f8cc | 595 | /* return number of de-allocated pbufs */ |
darran | 0:55a05330f8cc | 596 | return count; |
darran | 0:55a05330f8cc | 597 | } |
darran | 0:55a05330f8cc | 598 | |
darran | 0:55a05330f8cc | 599 | /** |
darran | 0:55a05330f8cc | 600 | * Count number of pbufs in a chain |
darran | 0:55a05330f8cc | 601 | * |
darran | 0:55a05330f8cc | 602 | * @param p first pbuf of chain |
darran | 0:55a05330f8cc | 603 | * @return the number of pbufs in a chain |
darran | 0:55a05330f8cc | 604 | */ |
darran | 0:55a05330f8cc | 605 | |
darran | 0:55a05330f8cc | 606 | u8_t |
darran | 0:55a05330f8cc | 607 | pbuf_clen(struct pbuf *p) |
darran | 0:55a05330f8cc | 608 | { |
darran | 0:55a05330f8cc | 609 | u8_t len; |
darran | 0:55a05330f8cc | 610 | |
darran | 0:55a05330f8cc | 611 | len = 0; |
darran | 0:55a05330f8cc | 612 | while (p != NULL) { |
darran | 0:55a05330f8cc | 613 | ++len; |
darran | 0:55a05330f8cc | 614 | p = p->next; |
darran | 0:55a05330f8cc | 615 | } |
darran | 0:55a05330f8cc | 616 | return len; |
darran | 0:55a05330f8cc | 617 | } |
darran | 0:55a05330f8cc | 618 | |
darran | 0:55a05330f8cc | 619 | /** |
darran | 0:55a05330f8cc | 620 | * Increment the reference count of the pbuf. |
darran | 0:55a05330f8cc | 621 | * |
darran | 0:55a05330f8cc | 622 | * @param p pbuf to increase reference counter of |
darran | 0:55a05330f8cc | 623 | * |
darran | 0:55a05330f8cc | 624 | */ |
darran | 0:55a05330f8cc | 625 | void |
darran | 0:55a05330f8cc | 626 | pbuf_ref(struct pbuf *p) |
darran | 0:55a05330f8cc | 627 | { |
darran | 0:55a05330f8cc | 628 | SYS_ARCH_DECL_PROTECT(old_level); |
darran | 0:55a05330f8cc | 629 | /* pbuf given? */ |
darran | 0:55a05330f8cc | 630 | if (p != NULL) { |
darran | 0:55a05330f8cc | 631 | SYS_ARCH_PROTECT(old_level); |
darran | 0:55a05330f8cc | 632 | ++(p->ref); |
darran | 0:55a05330f8cc | 633 | SYS_ARCH_UNPROTECT(old_level); |
darran | 0:55a05330f8cc | 634 | } |
darran | 0:55a05330f8cc | 635 | } |
darran | 0:55a05330f8cc | 636 | |
darran | 0:55a05330f8cc | 637 | /** |
darran | 0:55a05330f8cc | 638 | * Concatenate two pbufs (each may be a pbuf chain) and take over |
darran | 0:55a05330f8cc | 639 | * the caller's reference of the tail pbuf. |
darran | 0:55a05330f8cc | 640 | * |
darran | 0:55a05330f8cc | 641 | * @note The caller MAY NOT reference the tail pbuf afterwards. |
darran | 0:55a05330f8cc | 642 | * Use pbuf_chain() for that purpose. |
darran | 0:55a05330f8cc | 643 | * |
darran | 0:55a05330f8cc | 644 | * @see pbuf_chain() |
darran | 0:55a05330f8cc | 645 | */ |
darran | 0:55a05330f8cc | 646 | |
darran | 0:55a05330f8cc | 647 | void |
darran | 0:55a05330f8cc | 648 | pbuf_cat(struct pbuf *h, struct pbuf *t) |
darran | 0:55a05330f8cc | 649 | { |
darran | 0:55a05330f8cc | 650 | struct pbuf *p; |
darran | 0:55a05330f8cc | 651 | |
darran | 0:55a05330f8cc | 652 | LWIP_ERROR("(h != NULL) && (t != NULL) (programmer violates API)", |
darran | 0:55a05330f8cc | 653 | ((h != NULL) && (t != NULL)), return;); |
darran | 0:55a05330f8cc | 654 | |
darran | 0:55a05330f8cc | 655 | /* proceed to last pbuf of chain */ |
darran | 0:55a05330f8cc | 656 | for (p = h; p->next != NULL; p = p->next) { |
darran | 0:55a05330f8cc | 657 | /* add total length of second chain to all totals of first chain */ |
darran | 0:55a05330f8cc | 658 | p->tot_len += t->tot_len; |
darran | 0:55a05330f8cc | 659 | } |
darran | 0:55a05330f8cc | 660 | /* { p is last pbuf of first h chain, p->next == NULL } */ |
darran | 0:55a05330f8cc | 661 | LWIP_ASSERT("p->tot_len == p->len (of last pbuf in chain)", p->tot_len == p->len); |
darran | 0:55a05330f8cc | 662 | LWIP_ASSERT("p->next == NULL", p->next == NULL); |
darran | 0:55a05330f8cc | 663 | /* add total length of second chain to last pbuf total of first chain */ |
darran | 0:55a05330f8cc | 664 | p->tot_len += t->tot_len; |
darran | 0:55a05330f8cc | 665 | /* chain last pbuf of head (p) with first of tail (t) */ |
darran | 0:55a05330f8cc | 666 | p->next = t; |
darran | 0:55a05330f8cc | 667 | /* p->next now references t, but the caller will drop its reference to t, |
darran | 0:55a05330f8cc | 668 | * so netto there is no change to the reference count of t. |
darran | 0:55a05330f8cc | 669 | */ |
darran | 0:55a05330f8cc | 670 | } |
darran | 0:55a05330f8cc | 671 | |
darran | 0:55a05330f8cc | 672 | /** |
darran | 0:55a05330f8cc | 673 | * Chain two pbufs (or pbuf chains) together. |
darran | 0:55a05330f8cc | 674 | * |
darran | 0:55a05330f8cc | 675 | * The caller MUST call pbuf_free(t) once it has stopped |
darran | 0:55a05330f8cc | 676 | * using it. Use pbuf_cat() instead if you no longer use t. |
darran | 0:55a05330f8cc | 677 | * |
darran | 0:55a05330f8cc | 678 | * @param h head pbuf (chain) |
darran | 0:55a05330f8cc | 679 | * @param t tail pbuf (chain) |
darran | 0:55a05330f8cc | 680 | * @note The pbufs MUST belong to the same packet. |
darran | 0:55a05330f8cc | 681 | * @note MAY NOT be called on a packet queue. |
darran | 0:55a05330f8cc | 682 | * |
darran | 0:55a05330f8cc | 683 | * The ->tot_len fields of all pbufs of the head chain are adjusted. |
darran | 0:55a05330f8cc | 684 | * The ->next field of the last pbuf of the head chain is adjusted. |
darran | 0:55a05330f8cc | 685 | * The ->ref field of the first pbuf of the tail chain is adjusted. |
darran | 0:55a05330f8cc | 686 | * |
darran | 0:55a05330f8cc | 687 | */ |
darran | 0:55a05330f8cc | 688 | void |
darran | 0:55a05330f8cc | 689 | pbuf_chain(struct pbuf *h, struct pbuf *t) |
darran | 0:55a05330f8cc | 690 | { |
darran | 0:55a05330f8cc | 691 | pbuf_cat(h, t); |
darran | 0:55a05330f8cc | 692 | /* t is now referenced by h */ |
darran | 0:55a05330f8cc | 693 | pbuf_ref(t); |
darran | 0:55a05330f8cc | 694 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_chain: %p references %p\n", (void *)h, (void *)t)); |
darran | 0:55a05330f8cc | 695 | } |
darran | 0:55a05330f8cc | 696 | |
darran | 0:55a05330f8cc | 697 | /** |
darran | 0:55a05330f8cc | 698 | * Dechains the first pbuf from its succeeding pbufs in the chain. |
darran | 0:55a05330f8cc | 699 | * |
darran | 0:55a05330f8cc | 700 | * Makes p->tot_len field equal to p->len. |
darran | 0:55a05330f8cc | 701 | * @param p pbuf to dechain |
darran | 0:55a05330f8cc | 702 | * @return remainder of the pbuf chain, or NULL if it was de-allocated. |
darran | 0:55a05330f8cc | 703 | * @note May not be called on a packet queue. |
darran | 0:55a05330f8cc | 704 | */ |
darran | 0:55a05330f8cc | 705 | struct pbuf * |
darran | 0:55a05330f8cc | 706 | pbuf_dechain(struct pbuf *p) |
darran | 0:55a05330f8cc | 707 | { |
darran | 0:55a05330f8cc | 708 | struct pbuf *q; |
darran | 0:55a05330f8cc | 709 | u8_t tail_gone = 1; |
darran | 0:55a05330f8cc | 710 | /* tail */ |
darran | 0:55a05330f8cc | 711 | q = p->next; |
darran | 0:55a05330f8cc | 712 | /* pbuf has successor in chain? */ |
darran | 0:55a05330f8cc | 713 | if (q != NULL) { |
darran | 0:55a05330f8cc | 714 | /* assert tot_len invariant: (p->tot_len == p->len + (p->next? p->next->tot_len: 0) */ |
darran | 0:55a05330f8cc | 715 | LWIP_ASSERT("p->tot_len == p->len + q->tot_len", q->tot_len == p->tot_len - p->len); |
darran | 0:55a05330f8cc | 716 | /* enforce invariant if assertion is disabled */ |
darran | 0:55a05330f8cc | 717 | q->tot_len = p->tot_len - p->len; |
darran | 0:55a05330f8cc | 718 | /* decouple pbuf from remainder */ |
darran | 0:55a05330f8cc | 719 | p->next = NULL; |
darran | 0:55a05330f8cc | 720 | /* total length of pbuf p is its own length only */ |
darran | 0:55a05330f8cc | 721 | p->tot_len = p->len; |
darran | 0:55a05330f8cc | 722 | /* q is no longer referenced by p, free it */ |
darran | 0:55a05330f8cc | 723 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_dechain: unreferencing %p\n", (void *)q)); |
darran | 0:55a05330f8cc | 724 | tail_gone = pbuf_free(q); |
darran | 0:55a05330f8cc | 725 | if (tail_gone > 0) { |
darran | 0:55a05330f8cc | 726 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, |
darran | 0:55a05330f8cc | 727 | ("pbuf_dechain: deallocated %p (as it is no longer referenced)\n", (void *)q)); |
darran | 0:55a05330f8cc | 728 | } |
darran | 0:55a05330f8cc | 729 | /* return remaining tail or NULL if deallocated */ |
darran | 0:55a05330f8cc | 730 | } |
darran | 0:55a05330f8cc | 731 | /* assert tot_len invariant: (p->tot_len == p->len + (p->next? p->next->tot_len: 0) */ |
darran | 0:55a05330f8cc | 732 | LWIP_ASSERT("p->tot_len == p->len", p->tot_len == p->len); |
darran | 0:55a05330f8cc | 733 | return ((tail_gone > 0) ? NULL : q); |
darran | 0:55a05330f8cc | 734 | } |
darran | 0:55a05330f8cc | 735 | |
darran | 0:55a05330f8cc | 736 | /** |
darran | 0:55a05330f8cc | 737 | * |
darran | 0:55a05330f8cc | 738 | * Create PBUF_RAM copies of pbufs. |
darran | 0:55a05330f8cc | 739 | * |
darran | 0:55a05330f8cc | 740 | * Used to queue packets on behalf of the lwIP stack, such as |
darran | 0:55a05330f8cc | 741 | * ARP based queueing. |
darran | 0:55a05330f8cc | 742 | * |
darran | 0:55a05330f8cc | 743 | * @note You MUST explicitly use p = pbuf_take(p); |
darran | 0:55a05330f8cc | 744 | * |
darran | 0:55a05330f8cc | 745 | * @note Only one packet is copied, no packet queue! |
darran | 0:55a05330f8cc | 746 | * |
darran | 0:55a05330f8cc | 747 | * @param p_to pbuf destination of the copy |
darran | 0:55a05330f8cc | 748 | * @param p_from pbuf source of the copy |
darran | 0:55a05330f8cc | 749 | * |
darran | 0:55a05330f8cc | 750 | * @return ERR_OK if pbuf was copied |
darran | 0:55a05330f8cc | 751 | * ERR_ARG if one of the pbufs is NULL or p_to is not big |
darran | 0:55a05330f8cc | 752 | * enough to hold p_from |
darran | 0:55a05330f8cc | 753 | */ |
darran | 0:55a05330f8cc | 754 | err_t |
darran | 0:55a05330f8cc | 755 | pbuf_copy(struct pbuf *p_to, struct pbuf *p_from) |
darran | 0:55a05330f8cc | 756 | { |
darran | 0:55a05330f8cc | 757 | u16_t offset_to=0, offset_from=0, len; |
darran | 0:55a05330f8cc | 758 | |
darran | 0:55a05330f8cc | 759 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_copy(%p, %p)\n", |
darran | 0:55a05330f8cc | 760 | (void*)p_to, (void*)p_from)); |
darran | 0:55a05330f8cc | 761 | |
darran | 0:55a05330f8cc | 762 | /* is the target big enough to hold the source? */ |
darran | 0:55a05330f8cc | 763 | LWIP_ERROR("pbuf_copy: target not big enough to hold source", ((p_to != NULL) && |
darran | 0:55a05330f8cc | 764 | (p_from != NULL) && (p_to->tot_len >= p_from->tot_len)), return ERR_ARG;); |
darran | 0:55a05330f8cc | 765 | |
darran | 0:55a05330f8cc | 766 | /* iterate through pbuf chain */ |
darran | 0:55a05330f8cc | 767 | do |
darran | 0:55a05330f8cc | 768 | { |
darran | 0:55a05330f8cc | 769 | LWIP_ASSERT("p_to != NULL", p_to != NULL); |
darran | 0:55a05330f8cc | 770 | /* copy one part of the original chain */ |
darran | 0:55a05330f8cc | 771 | if ((p_to->len - offset_to) >= (p_from->len - offset_from)) { |
darran | 0:55a05330f8cc | 772 | /* complete current p_from fits into current p_to */ |
darran | 0:55a05330f8cc | 773 | len = p_from->len - offset_from; |
darran | 0:55a05330f8cc | 774 | } else { |
darran | 0:55a05330f8cc | 775 | /* current p_from does not fit into current p_to */ |
darran | 0:55a05330f8cc | 776 | len = p_to->len - offset_to; |
darran | 0:55a05330f8cc | 777 | } |
darran | 0:55a05330f8cc | 778 | MEMCPY((u8_t*)p_to->payload + offset_to, (u8_t*)p_from->payload + offset_from, len); |
darran | 0:55a05330f8cc | 779 | offset_to += len; |
darran | 0:55a05330f8cc | 780 | offset_from += len; |
darran | 0:55a05330f8cc | 781 | LWIP_ASSERT("offset_to <= p_to->len", offset_to <= p_to->len); |
darran | 0:55a05330f8cc | 782 | if (offset_to == p_to->len) { |
darran | 0:55a05330f8cc | 783 | /* on to next p_to (if any) */ |
darran | 0:55a05330f8cc | 784 | offset_to = 0; |
darran | 0:55a05330f8cc | 785 | p_to = p_to->next; |
darran | 0:55a05330f8cc | 786 | } |
darran | 0:55a05330f8cc | 787 | LWIP_ASSERT("offset_from <= p_from->len", offset_from <= p_from->len); |
darran | 0:55a05330f8cc | 788 | if (offset_from >= p_from->len) { |
darran | 0:55a05330f8cc | 789 | /* on to next p_from (if any) */ |
darran | 0:55a05330f8cc | 790 | offset_from = 0; |
darran | 0:55a05330f8cc | 791 | p_from = p_from->next; |
darran | 0:55a05330f8cc | 792 | } |
darran | 0:55a05330f8cc | 793 | |
darran | 0:55a05330f8cc | 794 | if((p_from != NULL) && (p_from->len == p_from->tot_len)) { |
darran | 0:55a05330f8cc | 795 | /* don't copy more than one packet! */ |
darran | 0:55a05330f8cc | 796 | LWIP_ERROR("pbuf_copy() does not allow packet queues!\n", |
darran | 0:55a05330f8cc | 797 | (p_from->next == NULL), return ERR_VAL;); |
darran | 0:55a05330f8cc | 798 | } |
darran | 0:55a05330f8cc | 799 | if((p_to != NULL) && (p_to->len == p_to->tot_len)) { |
darran | 0:55a05330f8cc | 800 | /* don't copy more than one packet! */ |
darran | 0:55a05330f8cc | 801 | LWIP_ERROR("pbuf_copy() does not allow packet queues!\n", |
darran | 0:55a05330f8cc | 802 | (p_to->next == NULL), return ERR_VAL;); |
darran | 0:55a05330f8cc | 803 | } |
darran | 0:55a05330f8cc | 804 | } while (p_from); |
darran | 0:55a05330f8cc | 805 | LWIP_DEBUGF(PBUF_DEBUG | LWIP_DBG_TRACE, ("pbuf_copy: end of chain reached.\n")); |
darran | 0:55a05330f8cc | 806 | return ERR_OK; |
darran | 0:55a05330f8cc | 807 | } |
darran | 0:55a05330f8cc | 808 | |
darran | 0:55a05330f8cc | 809 | /** |
darran | 0:55a05330f8cc | 810 | * Copy (part of) the contents of a packet buffer |
darran | 0:55a05330f8cc | 811 | * to an application supplied buffer. |
darran | 0:55a05330f8cc | 812 | * |
darran | 0:55a05330f8cc | 813 | * @param buf the pbuf from which to copy data |
darran | 0:55a05330f8cc | 814 | * @param dataptr the application supplied buffer |
darran | 0:55a05330f8cc | 815 | * @param len length of data to copy (dataptr must be big enough). No more |
darran | 0:55a05330f8cc | 816 | * than buf->tot_len will be copied, irrespective of len |
darran | 0:55a05330f8cc | 817 | * @param offset offset into the packet buffer from where to begin copying len bytes |
darran | 0:55a05330f8cc | 818 | * @return the number of bytes copied, or 0 on failure |
darran | 0:55a05330f8cc | 819 | */ |
darran | 0:55a05330f8cc | 820 | u16_t |
darran | 0:55a05330f8cc | 821 | pbuf_copy_partial(struct pbuf *buf, void *dataptr, u16_t len, u16_t offset) |
darran | 0:55a05330f8cc | 822 | { |
darran | 0:55a05330f8cc | 823 | struct pbuf *p; |
darran | 0:55a05330f8cc | 824 | u16_t left; |
darran | 0:55a05330f8cc | 825 | u16_t buf_copy_len; |
darran | 0:55a05330f8cc | 826 | u16_t copied_total = 0; |
darran | 0:55a05330f8cc | 827 | |
darran | 0:55a05330f8cc | 828 | LWIP_ERROR("pbuf_copy_partial: invalid buf", (buf != NULL), return 0;); |
darran | 0:55a05330f8cc | 829 | LWIP_ERROR("pbuf_copy_partial: invalid dataptr", (dataptr != NULL), return 0;); |
darran | 0:55a05330f8cc | 830 | |
darran | 0:55a05330f8cc | 831 | left = 0; |
darran | 0:55a05330f8cc | 832 | |
darran | 0:55a05330f8cc | 833 | if((buf == NULL) || (dataptr == NULL)) { |
darran | 0:55a05330f8cc | 834 | return 0; |
darran | 0:55a05330f8cc | 835 | } |
darran | 0:55a05330f8cc | 836 | |
darran | 0:55a05330f8cc | 837 | /* Note some systems use byte copy if dataptr or one of the pbuf payload pointers are unaligned. */ |
darran | 0:55a05330f8cc | 838 | for(p = buf; len != 0 && p != NULL; p = p->next) { |
darran | 0:55a05330f8cc | 839 | if ((offset != 0) && (offset >= p->len)) { |
darran | 0:55a05330f8cc | 840 | /* don't copy from this buffer -> on to the next */ |
darran | 0:55a05330f8cc | 841 | offset -= p->len; |
darran | 0:55a05330f8cc | 842 | } else { |
darran | 0:55a05330f8cc | 843 | /* copy from this buffer. maybe only partially. */ |
darran | 0:55a05330f8cc | 844 | buf_copy_len = p->len - offset; |
darran | 0:55a05330f8cc | 845 | if (buf_copy_len > len) |
darran | 0:55a05330f8cc | 846 | buf_copy_len = len; |
darran | 0:55a05330f8cc | 847 | /* copy the necessary parts of the buffer */ |
darran | 0:55a05330f8cc | 848 | MEMCPY(&((char*)dataptr)[left], &((char*)p->payload)[offset], buf_copy_len); |
darran | 0:55a05330f8cc | 849 | copied_total += buf_copy_len; |
darran | 0:55a05330f8cc | 850 | left += buf_copy_len; |
darran | 0:55a05330f8cc | 851 | len -= buf_copy_len; |
darran | 0:55a05330f8cc | 852 | offset = 0; |
darran | 0:55a05330f8cc | 853 | } |
darran | 0:55a05330f8cc | 854 | } |
darran | 0:55a05330f8cc | 855 | return copied_total; |
darran | 0:55a05330f8cc | 856 | } |
darran | 0:55a05330f8cc | 857 | |
darran | 0:55a05330f8cc | 858 | /** |
darran | 0:55a05330f8cc | 859 | * Copy application supplied data into a pbuf. |
darran | 0:55a05330f8cc | 860 | * This function can only be used to copy the equivalent of buf->tot_len data. |
darran | 0:55a05330f8cc | 861 | * |
darran | 0:55a05330f8cc | 862 | * @param buf pbuf to fill with data |
darran | 0:55a05330f8cc | 863 | * @param dataptr application supplied data buffer |
darran | 0:55a05330f8cc | 864 | * @param len length of the application supplied data buffer |
darran | 0:55a05330f8cc | 865 | * |
darran | 0:55a05330f8cc | 866 | * @return ERR_OK if successful, ERR_MEM if the pbuf is not big enough |
darran | 0:55a05330f8cc | 867 | */ |
darran | 0:55a05330f8cc | 868 | err_t |
darran | 0:55a05330f8cc | 869 | pbuf_take(struct pbuf *buf, const void *dataptr, u16_t len) |
darran | 0:55a05330f8cc | 870 | { |
darran | 0:55a05330f8cc | 871 | struct pbuf *p; |
darran | 0:55a05330f8cc | 872 | u16_t buf_copy_len; |
darran | 0:55a05330f8cc | 873 | u16_t total_copy_len = len; |
darran | 0:55a05330f8cc | 874 | u16_t copied_total = 0; |
darran | 0:55a05330f8cc | 875 | |
darran | 0:55a05330f8cc | 876 | LWIP_ERROR("pbuf_take: invalid buf", (buf != NULL), return 0;); |
darran | 0:55a05330f8cc | 877 | LWIP_ERROR("pbuf_take: invalid dataptr", (dataptr != NULL), return 0;); |
darran | 0:55a05330f8cc | 878 | |
darran | 0:55a05330f8cc | 879 | if ((buf == NULL) || (dataptr == NULL) || (buf->tot_len < len)) { |
darran | 0:55a05330f8cc | 880 | return ERR_ARG; |
darran | 0:55a05330f8cc | 881 | } |
darran | 0:55a05330f8cc | 882 | |
darran | 0:55a05330f8cc | 883 | /* Note some systems use byte copy if dataptr or one of the pbuf payload pointers are unaligned. */ |
darran | 0:55a05330f8cc | 884 | for(p = buf; total_copy_len != 0; p = p->next) { |
darran | 0:55a05330f8cc | 885 | LWIP_ASSERT("pbuf_take: invalid pbuf", p != NULL); |
darran | 0:55a05330f8cc | 886 | buf_copy_len = total_copy_len; |
darran | 0:55a05330f8cc | 887 | if (buf_copy_len > p->len) { |
darran | 0:55a05330f8cc | 888 | /* this pbuf cannot hold all remaining data */ |
darran | 0:55a05330f8cc | 889 | buf_copy_len = p->len; |
darran | 0:55a05330f8cc | 890 | } |
darran | 0:55a05330f8cc | 891 | /* copy the necessary parts of the buffer */ |
darran | 0:55a05330f8cc | 892 | MEMCPY(p->payload, &((char*)dataptr)[copied_total], buf_copy_len); |
darran | 0:55a05330f8cc | 893 | total_copy_len -= buf_copy_len; |
darran | 0:55a05330f8cc | 894 | copied_total += buf_copy_len; |
darran | 0:55a05330f8cc | 895 | } |
darran | 0:55a05330f8cc | 896 | LWIP_ASSERT("did not copy all data", total_copy_len == 0 && copied_total == len); |
darran | 0:55a05330f8cc | 897 | return ERR_OK; |
darran | 0:55a05330f8cc | 898 | } |
darran | 0:55a05330f8cc | 899 | |
darran | 0:55a05330f8cc | 900 | /** |
darran | 0:55a05330f8cc | 901 | * Creates a single pbuf out of a queue of pbufs. |
darran | 0:55a05330f8cc | 902 | * |
darran | 0:55a05330f8cc | 903 | * @remark: The source pbuf 'p' is not freed by this function because that can |
darran | 0:55a05330f8cc | 904 | * be illegal in some places! |
darran | 0:55a05330f8cc | 905 | * |
darran | 0:55a05330f8cc | 906 | * @param p the source pbuf |
darran | 0:55a05330f8cc | 907 | * @param layer pbuf_layer of the new pbuf |
darran | 0:55a05330f8cc | 908 | * |
darran | 0:55a05330f8cc | 909 | * @return a new, single pbuf (p->next is NULL) |
darran | 0:55a05330f8cc | 910 | * or the old pbuf if allocation fails |
darran | 0:55a05330f8cc | 911 | */ |
darran | 0:55a05330f8cc | 912 | struct pbuf* |
darran | 0:55a05330f8cc | 913 | pbuf_coalesce(struct pbuf *p, pbuf_layer layer) |
darran | 0:55a05330f8cc | 914 | { |
darran | 0:55a05330f8cc | 915 | struct pbuf *q; |
darran | 0:55a05330f8cc | 916 | err_t err; |
darran | 0:55a05330f8cc | 917 | if (p->next == NULL) { |
darran | 0:55a05330f8cc | 918 | return p; |
darran | 0:55a05330f8cc | 919 | } |
darran | 0:55a05330f8cc | 920 | q = pbuf_alloc(layer, p->tot_len, PBUF_RAM); |
darran | 0:55a05330f8cc | 921 | if (q == NULL) { |
darran | 0:55a05330f8cc | 922 | /* @todo: what do we do now? */ |
darran | 0:55a05330f8cc | 923 | return p; |
darran | 0:55a05330f8cc | 924 | } |
darran | 0:55a05330f8cc | 925 | err = pbuf_copy(q, p); |
darran | 0:55a05330f8cc | 926 | LWIP_ASSERT("pbuf_copy failed", err == ERR_OK); |
darran | 0:55a05330f8cc | 927 | pbuf_free(p); |
darran | 0:55a05330f8cc | 928 | return q; |
darran | 0:55a05330f8cc | 929 | } |