1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) 1995-2011 Index Data
3 * See the file LICENSE for details.
7 * \brief Implements ODR memory management
15 #include <yaz/xmalloc.h>
17 /* ------------------------ NIBBLE MEMORY ---------------------- */
20 * Extract the memory control block from o.
22 NMEM odr_extract_mem(ODR o)
26 o->mem = nmem_create();
30 void *odr_malloc(ODR o, size_t size)
32 return nmem_malloc(o->mem, size);
35 char *odr_strdup(ODR o, const char *str)
37 return nmem_strdup(o->mem, str);
40 char *odr_strdup_null(ODR o, const char *str)
42 return nmem_strdup_null(o->mem, str);
45 char *odr_strdupn(ODR o, const char *str, size_t n)
47 return nmem_strdupn(o->mem, str, n);
50 Odr_int *odr_intdup(ODR o, Odr_int v)
52 return nmem_intdup(o->mem, v);
55 Odr_bool *odr_booldup(ODR o, Odr_bool v)
57 return nmem_booldup(o->mem, v);
60 size_t odr_total(ODR o)
62 return nmem_total(o->mem);
65 Odr_oct *odr_create_Odr_oct(ODR o, const unsigned char *buf, int sz)
67 Odr_oct *p = (Odr_oct *) odr_malloc(o, sizeof(Odr_oct));
68 p->buf = (unsigned char *) odr_malloc(o, sz);
69 memcpy(p->buf, buf, sz);
75 /* ---------- memory management for data encoding ----------*/
78 int odr_grow_block(ODR b, int min_bytes)
88 if (togrow < min_bytes)
90 if (b->size && !(b->buf =
91 (unsigned char *) xrealloc(b->buf, b->size += togrow)))
93 else if (!b->size && !(b->buf = (unsigned char *)
94 xmalloc(b->size = togrow)))
99 int odr_write(ODR o, unsigned char *buf, int bytes)
101 if (o->pos + bytes >= o->size && odr_grow_block(o, bytes))
103 odr_seterror(o, OSPACE, 40);
106 memcpy(o->buf + o->pos, buf, bytes);
113 int odr_seek(ODR o, int whence, int offset)
115 if (whence == ODR_S_CUR)
117 else if (whence == ODR_S_END)
119 if (offset > o->size && odr_grow_block(o, offset - o->size))
121 odr_seterror(o, OSPACE, 41);
128 Odr_int odr_strtol(const char *nptr, char **endptr, int base)
132 return _strtoui64(nptr, endptr, base);
134 return strtoll(nptr, endptr, base);
138 return strtol(nptr, endptr, base);
142 Odr_int odr_atoi(const char *s)
145 return odr_strtol(s, &endptr, 10);
151 * c-file-style: "Stroustrup"
152 * indent-tabs-mode: nil
154 * vim: shiftwidth=4 tabstop=8 expandtab