ucx/buffer.c

Tue, 17 Oct 2017 15:15:54 +0200

author
Mike Becker <universe@uap-core.de>
date
Tue, 17 Oct 2017 15:15:54 +0200
changeset 250
b7d1317b138e
parent 239
1634c3ea89da
permissions
-rw-r--r--

updates license

universe@103 1 /*
universe@103 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@103 3 *
universe@250 4 * Copyright 2017 Olaf Wintermann. All rights reserved.
universe@103 5 *
universe@103 6 * Redistribution and use in source and binary forms, with or without
universe@103 7 * modification, are permitted provided that the following conditions are met:
universe@103 8 *
universe@103 9 * 1. Redistributions of source code must retain the above copyright
universe@103 10 * notice, this list of conditions and the following disclaimer.
universe@103 11 *
universe@103 12 * 2. Redistributions in binary form must reproduce the above copyright
universe@103 13 * notice, this list of conditions and the following disclaimer in the
universe@103 14 * documentation and/or other materials provided with the distribution.
universe@103 15 *
universe@103 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@103 17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@103 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@103 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@103 20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@103 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@103 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@103 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@103 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@103 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@103 26 * POSSIBILITY OF SUCH DAMAGE.
universe@103 27 */
universe@103 28
universe@60 29 #include "buffer.h"
universe@56 30 #include <stdarg.h>
universe@56 31 #include <stdlib.h>
universe@56 32 #include <string.h>
universe@56 33
universe@169 34 UcxBuffer *ucx_buffer_new(void *space, size_t capacity, int flags) {
universe@60 35 UcxBuffer *buffer = (UcxBuffer*) malloc(sizeof(UcxBuffer));
universe@60 36 if (buffer) {
universe@61 37 buffer->flags = flags;
universe@56 38 if (!space) {
universe@169 39 buffer->space = (char*)malloc(capacity);
universe@60 40 if (!buffer->space) {
universe@60 41 free(buffer);
universe@56 42 return NULL;
universe@56 43 }
universe@169 44 memset(buffer->space, 0, capacity);
universe@61 45 buffer->flags |= UCX_BUFFER_AUTOFREE;
universe@56 46 } else {
olaf@78 47 buffer->space = (char*)space;
universe@56 48 }
universe@169 49 buffer->capacity = capacity;
olaf@76 50 buffer->size = 0;
universe@56 51
universe@60 52 buffer->pos = 0;
universe@56 53 }
universe@56 54
universe@60 55 return buffer;
universe@56 56 }
universe@56 57
universe@60 58 void ucx_buffer_free(UcxBuffer *buffer) {
universe@63 59 if ((buffer->flags & UCX_BUFFER_AUTOFREE) == UCX_BUFFER_AUTOFREE) {
universe@60 60 free(buffer->space);
universe@56 61 }
universe@60 62 free(buffer);
universe@56 63 }
universe@56 64
olaf@76 65 UcxBuffer* ucx_buffer_extract(
olaf@76 66 UcxBuffer *src, size_t start, size_t length, int flags) {
olaf@239 67 if (src->size == 0 || length == 0 ||
olaf@239 68 ((size_t)-1) - start < length || start+length > src->capacity)
olaf@239 69 {
universe@62 70 return NULL;
universe@62 71 }
universe@62 72
olaf@76 73 UcxBuffer *dst = (UcxBuffer*) malloc(sizeof(UcxBuffer));
universe@62 74 if (dst) {
olaf@78 75 dst->space = (char*)malloc(length);
universe@62 76 if (!dst->space) {
universe@62 77 free(dst);
universe@62 78 return NULL;
universe@62 79 }
olaf@76 80 dst->capacity = length;
universe@62 81 dst->size = length;
universe@62 82 dst->flags = flags | UCX_BUFFER_AUTOFREE;
universe@62 83 dst->pos = 0;
olaf@76 84 memcpy(dst->space, src->space+start, length);
universe@62 85 }
universe@62 86 return dst;
universe@62 87 }
universe@62 88
universe@60 89 int ucx_buffer_seek(UcxBuffer *buffer, off_t offset, int whence) {
universe@140 90 size_t npos;
universe@56 91 switch (whence) {
universe@56 92 case SEEK_CUR:
universe@60 93 npos = buffer->pos;
universe@56 94 break;
universe@56 95 case SEEK_END:
olaf@76 96 npos = buffer->size;
universe@56 97 break;
universe@169 98 case SEEK_SET:
universe@169 99 npos = 0;
universe@169 100 break;
universe@140 101 default:
universe@169 102 return -1;
universe@56 103 }
universe@56 104
universe@169 105 size_t opos = npos;
universe@56 106 npos += offset;
olaf@76 107
universe@169 108 if ((offset > 0 && npos < opos) || (offset < 0 && npos > opos)) {
universe@169 109 return -1;
universe@169 110 }
universe@169 111
universe@169 112 if (npos >= buffer->size) {
universe@56 113 return -1;
universe@56 114 } else {
universe@60 115 buffer->pos = npos;
universe@56 116 return 0;
universe@56 117 }
universe@56 118
universe@56 119 }
universe@56 120
universe@60 121 int ucx_buffer_eof(UcxBuffer *buffer) {
universe@62 122 return buffer->pos >= buffer->size;
universe@56 123 }
universe@56 124
olaf@76 125 int ucx_buffer_extend(UcxBuffer *buffer, size_t len) {
olaf@76 126 size_t newcap = buffer->capacity;
universe@169 127
universe@169 128 if (buffer->capacity + len < buffer->capacity) {
universe@169 129 return -1;
universe@169 130 }
universe@169 131
universe@169 132 while (buffer->capacity + len > newcap) {
universe@169 133 newcap <<= 1;
universe@169 134 if (newcap < buffer->capacity) {
universe@169 135 return -1;
universe@169 136 }
universe@169 137 }
olaf@76 138
olaf@78 139 char *newspace = (char*)realloc(buffer->space, newcap);
olaf@76 140 if (newspace) {
olaf@76 141 memset(newspace+buffer->size, 0, newcap-buffer->size);
olaf@76 142 buffer->space = newspace;
olaf@76 143 buffer->capacity = newcap;
olaf@76 144 } else {
olaf@76 145 return -1;
olaf@76 146 }
olaf@76 147
olaf@76 148 return 0;
olaf@76 149 }
olaf@76 150
olaf@76 151 size_t ucx_buffer_write(const void *ptr, size_t size, size_t nitems,
olaf@76 152 UcxBuffer *buffer) {
olaf@76 153 size_t len = size * nitems;
universe@169 154 size_t required = buffer->pos + len;
universe@169 155 if (buffer->pos > required) {
universe@169 156 return 0;
universe@169 157 }
universe@169 158
universe@169 159 if (required > buffer->capacity) {
olaf@76 160 if ((buffer->flags & UCX_BUFFER_AUTOEXTEND) == UCX_BUFFER_AUTOEXTEND) {
universe@169 161 if (ucx_buffer_extend(buffer, required - buffer->capacity)) {
universe@169 162 return 0;
universe@64 163 }
universe@64 164 } else {
olaf@76 165 len = buffer->capacity - buffer->pos;
universe@169 166 if (size > 1) {
universe@169 167 len -= len%size;
universe@169 168 }
universe@64 169 }
universe@56 170 }
olaf@76 171
universe@169 172 if (len == 0) {
universe@64 173 return len;
universe@56 174 }
olaf@76 175
olaf@76 176 memcpy(buffer->space + buffer->pos, ptr, len);
olaf@76 177 buffer->pos += len;
olaf@76 178 if(buffer->pos > buffer->size) {
olaf@76 179 buffer->size = buffer->pos;
olaf@76 180 }
olaf@76 181
olaf@76 182 return len / size;
olaf@76 183 }
universe@56 184
olaf@76 185 size_t ucx_buffer_read(void *ptr, size_t size, size_t nitems,
olaf@76 186 UcxBuffer *buffer) {
olaf@76 187 size_t len = size * nitems;
olaf@76 188 if (buffer->pos + len > buffer->size) {
olaf@76 189 len = buffer->size - buffer->pos;
olaf@76 190 if (size > 1) len -= len%size;
universe@56 191 }
olaf@76 192
olaf@76 193 if (len <= 0) {
olaf@76 194 return len;
olaf@76 195 }
olaf@76 196
olaf@76 197 memcpy(ptr, buffer->space + buffer->pos, len);
olaf@76 198 buffer->pos += len;
olaf@76 199
olaf@76 200 return len / size;
universe@56 201 }
universe@56 202
universe@60 203 int ucx_buffer_putc(UcxBuffer *buffer, int c) {
olaf@76 204 if(buffer->pos >= buffer->capacity) {
olaf@76 205 if ((buffer->flags & UCX_BUFFER_AUTOEXTEND) == UCX_BUFFER_AUTOEXTEND) {
olaf@76 206 if(ucx_buffer_extend(buffer, 1)) {
olaf@76 207 return EOF;
olaf@76 208 }
olaf@76 209 } else {
olaf@76 210 return EOF;
olaf@76 211 }
universe@56 212 }
olaf@76 213
olaf@76 214 c &= 0xFF;
olaf@76 215 buffer->space[buffer->pos] = (char) c;
olaf@76 216 buffer->pos++;
olaf@76 217 if(buffer->pos > buffer->size) {
olaf@76 218 buffer->size = buffer->pos;
olaf@76 219 }
olaf@76 220 return c;
universe@56 221 }
universe@56 222
universe@60 223 int ucx_buffer_getc(UcxBuffer *buffer) {
universe@60 224 if (ucx_buffer_eof(buffer)) {
universe@56 225 return EOF;
universe@56 226 } else {
olaf@76 227 int c = buffer->space[buffer->pos];
universe@60 228 buffer->pos++;
universe@56 229 return c;
universe@56 230 }
universe@56 231 }
olaf@76 232
universe@140 233 size_t ucx_buffer_puts(UcxBuffer *buffer, char *str) {
universe@140 234 return ucx_buffer_write((const void*)str, 1, strlen(str), buffer);
olaf@76 235 }

mercurial