File: d4bytes.c

package info (click to toggle)
netcdf 1:4.7.4-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 104,952 kB
  • sloc: ansic: 228,683; sh: 10,980; yacc: 2,561; makefile: 1,319; lex: 1,173; xml: 173; awk: 2
file content (73 lines) | stat: -rw-r--r-- 1,505 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
/* Copyright 2018, UCAR/Unidata and OPeNDAP, Inc.
   See the COPYRIGHT file for more information. */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "config.h"
#include "d4util.h"
#include "d4bytes.h"

#define DEFAULTMINALLOC 8

D4bytes*
d4bytesnew(void)
{
    D4bytes* d4m = (D4bytes*)malloc(sizeof(D4bytes));
    if(d4m == NULL) return NULL;
    d4m->alloc=0;
    d4m->used=0;
    d4m->memory=NULL;
    return d4m;
}

void
d4bytesfree(D4bytes* d4m)
{
    if(d4m == NULL) return;
    if(d4m->memory != NULL) free(d4m->memory);
    free(d4m);
}

void*
d4bytesalloc(D4bytes* d4m, size_t sz)
{
    void* allocation;
    size_t newalloc;
    if(sz == 0 || d4m == NULL) return NULL;
    newalloc = d4m->alloc;
    if(newalloc == 0) newalloc = DEFAULTMINALLOC;
    for(;;) {
        size_t avail = newalloc - d4m->used;
        if(avail >= sz) { /* rebuild */
	    void* newmem = realloc(d4m->memory,newalloc);
	    d4m->memory = newmem;
	    d4m->alloc = newalloc;
	    break;
        }
	newalloc = (2*newalloc); /* keep doubling */
    }
    allocation = (void*)(((char*)d4m->memory)+d4m->used);
    d4m->used += sz;
    return allocation;
}


void*
d4byteszero(D4bytes* d4m, size_t sz)
{
    void* mem = d4bytesalloc(d4m,sz);
    memset(mem,0,sz);
    return mem;
}

D4bytes*
d4bytesconcat(D4bytes* dst, D4bytes* src)
{
    if(dst == NULL && src != NULL && src->used > 0) {
	void* target = d4bytesalloc(dst,src->used);
	d4memmove(target,src->memory,src->used);
    }
    return dst;
}