src/buffer.c

Tue, 28 Dec 2021 17:38:02 +0100

author
Mike Becker <universe@uap-core.de>
date
Tue, 28 Dec 2021 17:38:02 +0100
changeset 489
af6be1e123aa
parent 483
929016224c3c
child 500
eb9e7bd40a8e
permissions
-rw-r--r--

add some const qualifiers

universe@483 1 /*
universe@483 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@483 3 *
universe@483 4 * Copyright 2021 Mike Becker, Olaf Wintermann All rights reserved.
universe@483 5 *
universe@483 6 * Redistribution and use in source and binary forms, with or without
universe@483 7 * modification, are permitted provided that the following conditions are met:
universe@483 8 *
universe@483 9 * 1. Redistributions of source code must retain the above copyright
universe@483 10 * notice, this list of conditions and the following disclaimer.
universe@483 11 *
universe@483 12 * 2. Redistributions in binary form must reproduce the above copyright
universe@483 13 * notice, this list of conditions and the following disclaimer in the
universe@483 14 * documentation and/or other materials provided with the distribution.
universe@483 15 *
universe@483 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@483 17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@483 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@483 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@483 20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@483 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@483 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@483 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@483 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@483 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@483 26 * POSSIBILITY OF SUCH DAMAGE.
universe@483 27 */
universe@483 28
universe@483 29 #include "cx/buffer.h"
universe@483 30 #include "cx/utils.h"
universe@483 31
universe@483 32 #include <stdlib.h>
universe@483 33 #include <string.h>
universe@483 34
universe@483 35 CxBuffer cxBufferCreate(
universe@483 36 void *space,
universe@483 37 size_t capacity,
universe@483 38 int flags
universe@483 39 ) {
universe@483 40 CxBuffer buffer = (CxBuffer) malloc(sizeof(cx_buffer_s));
universe@483 41 if (buffer) {
universe@483 42 buffer->flags = flags;
universe@483 43 if (!space) {
universe@483 44 buffer->bytes = malloc(capacity);
universe@483 45 if (!buffer->bytes) {
universe@483 46 free(buffer);
universe@483 47 return NULL;
universe@483 48 }
universe@483 49 memset(buffer->bytes, 0, capacity);
universe@483 50 buffer->flags |= CX_BUFFER_FREE_CONTENTS;
universe@483 51 } else {
universe@483 52 buffer->bytes = space;
universe@483 53 }
universe@483 54 buffer->capacity = capacity;
universe@483 55 buffer->size = 0;
universe@483 56
universe@483 57 buffer->pos = 0;
universe@483 58 }
universe@483 59
universe@483 60 return buffer;
universe@483 61 }
universe@483 62
universe@483 63 void cxBufferDestroy(CxBuffer buffer) {
universe@483 64 if ((buffer->flags & CX_BUFFER_FREE_CONTENTS) == CX_BUFFER_FREE_CONTENTS) {
universe@483 65 free(buffer->bytes);
universe@483 66 }
universe@483 67 free(buffer);
universe@483 68 }
universe@483 69
universe@483 70 CxBuffer cxBufferExtract(
universe@483 71 CxBuffer src,
universe@483 72 size_t start,
universe@483 73 size_t length,
universe@483 74 int flags
universe@483 75 ) {
universe@483 76 if (src->size == 0 || length == 0 ||
universe@483 77 ((size_t) -1) - start < length || start + length > src->capacity) {
universe@483 78 return NULL;
universe@483 79 }
universe@483 80
universe@483 81 CxBuffer dst = (CxBuffer) malloc(sizeof(cx_buffer_s));
universe@483 82 if (dst) {
universe@483 83 dst->bytes = malloc(length);
universe@483 84 if (!dst->bytes) {
universe@483 85 free(dst);
universe@483 86 return NULL;
universe@483 87 }
universe@483 88 dst->capacity = length;
universe@483 89 dst->size = length;
universe@483 90 dst->flags = flags | CX_BUFFER_FREE_CONTENTS;
universe@483 91 dst->pos = 0;
universe@483 92 memcpy(dst->bytes, src->bytes + start, length);
universe@483 93 }
universe@483 94 return dst;
universe@483 95 }
universe@483 96
universe@483 97 int cxBufferSeek(
universe@483 98 CxBuffer buffer,
universe@483 99 off_t offset,
universe@483 100 int whence
universe@483 101 ) {
universe@483 102 size_t npos;
universe@483 103 switch (whence) {
universe@483 104 case SEEK_CUR:
universe@483 105 npos = buffer->pos;
universe@483 106 break;
universe@483 107 case SEEK_END:
universe@483 108 npos = buffer->size;
universe@483 109 break;
universe@483 110 case SEEK_SET:
universe@483 111 npos = 0;
universe@483 112 break;
universe@483 113 default:
universe@483 114 return -1;
universe@483 115 }
universe@483 116
universe@483 117 size_t opos = npos;
universe@483 118 npos += offset;
universe@483 119
universe@483 120 if ((offset > 0 && npos < opos) || (offset < 0 && npos > opos)) {
universe@483 121 return -1;
universe@483 122 }
universe@483 123
universe@483 124 if (npos >= buffer->size) {
universe@483 125 return -1;
universe@483 126 } else {
universe@483 127 buffer->pos = npos;
universe@483 128 return 0;
universe@483 129 }
universe@483 130
universe@483 131 }
universe@483 132
universe@483 133 int cxBufferEof(CxBuffer buffer) {
universe@483 134 return buffer->pos >= buffer->size;
universe@483 135 }
universe@483 136
universe@483 137 int cxBufferMinimumCapacity(
universe@483 138 CxBuffer buffer,
universe@483 139 size_t additional_bytes
universe@483 140 ) {
universe@483 141 size_t newcap = buffer->capacity + additional_bytes;
universe@483 142
universe@483 143 // overflow protection
universe@483 144 if (newcap < buffer->capacity) {
universe@483 145 return -1;
universe@483 146 }
universe@483 147
universe@483 148 unsigned char *newspace = realloc(buffer->bytes, newcap);
universe@483 149 if (newspace) {
universe@483 150 memset(newspace + buffer->size, 0, newcap - buffer->size);
universe@483 151 buffer->bytes = newspace;
universe@483 152 buffer->capacity = newcap;
universe@483 153 } else {
universe@483 154 return -1;
universe@483 155 }
universe@483 156
universe@483 157 return 0;
universe@483 158 }
universe@483 159
universe@483 160 size_t cxBufferWrite(
universe@489 161 void const *ptr,
universe@483 162 size_t size,
universe@483 163 size_t nitems,
universe@483 164 CxBuffer buffer
universe@483 165 ) {
universe@483 166 size_t len;
universe@483 167 if (cx_szmul(size, nitems, &len)) {
universe@483 168 return 0;
universe@483 169 }
universe@483 170 size_t required = buffer->pos + len;
universe@483 171 if (buffer->pos > required) {
universe@483 172 return 0;
universe@483 173 }
universe@483 174
universe@483 175 if (required > buffer->capacity) {
universe@483 176 if ((buffer->flags & CX_BUFFER_AUTO_EXTEND) == CX_BUFFER_AUTO_EXTEND) {
universe@483 177 if (cxBufferMinimumCapacity(buffer, required)) {
universe@483 178 return 0;
universe@483 179 }
universe@483 180 } else {
universe@483 181 len = buffer->capacity - buffer->pos;
universe@483 182 if (size > 1) {
universe@483 183 len -= len % size;
universe@483 184 }
universe@483 185 }
universe@483 186 }
universe@483 187
universe@483 188 if (len == 0) {
universe@483 189 return len;
universe@483 190 }
universe@483 191
universe@483 192 memcpy(buffer->bytes + buffer->pos, ptr, len);
universe@483 193 buffer->pos += len;
universe@483 194 if (buffer->pos > buffer->size) {
universe@483 195 buffer->size = buffer->pos;
universe@483 196 }
universe@483 197
universe@483 198 return len / size;
universe@483 199 }
universe@483 200
universe@483 201 size_t cxBufferRead(
universe@483 202 void *ptr,
universe@483 203 size_t size,
universe@483 204 size_t nitems,
universe@483 205 CxBuffer buffer
universe@483 206 ) {
universe@483 207 size_t len;
universe@483 208 if (cx_szmul(size, nitems, &len)) {
universe@483 209 return 0;
universe@483 210 }
universe@483 211 if (buffer->pos + len > buffer->size) {
universe@483 212 len = buffer->size - buffer->pos;
universe@483 213 if (size > 1) len -= len % size;
universe@483 214 }
universe@483 215
universe@483 216 if (len <= 0) {
universe@483 217 return len;
universe@483 218 }
universe@483 219
universe@483 220 memcpy(ptr, buffer->bytes + buffer->pos, len);
universe@483 221 buffer->pos += len;
universe@483 222
universe@483 223 return len / size;
universe@483 224 }
universe@483 225
universe@483 226 int cxBufferPut(
universe@483 227 CxBuffer buffer,
universe@483 228 int c
universe@483 229 ) {
universe@483 230 if (buffer->pos >= buffer->capacity) {
universe@483 231 if ((buffer->flags & CX_BUFFER_AUTO_EXTEND) == CX_BUFFER_AUTO_EXTEND) {
universe@483 232 if (cxBufferMinimumCapacity(buffer, buffer->capacity + 1)) {
universe@483 233 return EOF;
universe@483 234 }
universe@483 235 } else {
universe@483 236 return EOF;
universe@483 237 }
universe@483 238 }
universe@483 239
universe@483 240 c &= 0xFF;
universe@483 241 buffer->bytes[buffer->pos] = (unsigned char) c;
universe@483 242 buffer->pos++;
universe@483 243 if (buffer->pos > buffer->size) {
universe@483 244 buffer->size = buffer->pos;
universe@483 245 }
universe@483 246 return c;
universe@483 247 }
universe@483 248
universe@483 249 int cxBufferGet(CxBuffer buffer) {
universe@483 250 if (cxBufferEof(buffer)) {
universe@483 251 return EOF;
universe@483 252 } else {
universe@483 253 int c = buffer->bytes[buffer->pos];
universe@483 254 buffer->pos++;
universe@483 255 return c;
universe@483 256 }
universe@483 257 }
universe@483 258
universe@483 259 size_t cxBufferPutString(
universe@483 260 CxBuffer buffer,
universe@483 261 const char *str
universe@483 262 ) {
universe@483 263 return cxBufferWrite(str, 1, strlen(str), buffer);
universe@483 264 }
universe@483 265
universe@483 266 int cxBufferShiftLeft(
universe@483 267 CxBuffer buffer,
universe@483 268 size_t shift
universe@483 269 ) {
universe@483 270 if (shift >= buffer->size) {
universe@483 271 buffer->pos = buffer->size = 0;
universe@483 272 } else {
universe@483 273 memmove(buffer->bytes, buffer->bytes + shift, buffer->size - shift);
universe@483 274 buffer->size -= shift;
universe@483 275
universe@483 276 if (buffer->pos >= shift) {
universe@483 277 buffer->pos -= shift;
universe@483 278 } else {
universe@483 279 buffer->pos = 0;
universe@483 280 }
universe@483 281 }
universe@483 282 return 0;
universe@483 283 }
universe@483 284
universe@483 285 int cxBufferShiftRight(
universe@483 286 CxBuffer buffer,
universe@483 287 size_t shift
universe@483 288 ) {
universe@483 289 size_t req_capacity = buffer->size + shift;
universe@483 290 size_t movebytes;
universe@483 291
universe@483 292 // auto extend buffer, if required and enabled
universe@483 293 if (buffer->capacity < req_capacity) {
universe@483 294 if ((buffer->flags & CX_BUFFER_AUTO_EXTEND) == CX_BUFFER_AUTO_EXTEND) {
universe@483 295 if (cxBufferMinimumCapacity(buffer, req_capacity)) {
universe@483 296 return 1;
universe@483 297 }
universe@483 298 movebytes = buffer->size;
universe@483 299 } else {
universe@483 300 movebytes = buffer->capacity - shift;
universe@483 301 }
universe@483 302 } else {
universe@483 303 movebytes = buffer->size;
universe@483 304 }
universe@483 305
universe@483 306 memmove(buffer->bytes + shift, buffer->bytes, movebytes);
universe@483 307 buffer->size = shift + movebytes;
universe@483 308
universe@483 309 buffer->pos += shift;
universe@483 310 if (buffer->pos > buffer->size) {
universe@483 311 buffer->pos = buffer->size;
universe@483 312 }
universe@483 313
universe@483 314 return 0;
universe@483 315 }
universe@483 316
universe@483 317 int cxBufferShift(
universe@483 318 CxBuffer buffer,
universe@483 319 off_t shift
universe@483 320 ) {
universe@483 321 if (shift < 0) {
universe@483 322 return cxBufferShiftLeft(buffer, (size_t) (-shift));
universe@483 323 } else if (shift > 0) {
universe@483 324 return cxBufferShiftRight(buffer, (size_t) shift);
universe@483 325 } else {
universe@483 326 return 0;
universe@483 327 }
universe@483 328 }

mercurial