1 /* ----------------------------------------------------------------------- *
3 * Copyright 1996-2018 The NASM Authors - All Rights Reserved
4 * See the file AUTHORS included with the NASM distribution for
5 * the specific copyright holders.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following
11 * * Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * * Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
19 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
21 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
30 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 * ----------------------------------------------------------------------- */
35 * nasmlib.c library routines for the Netwide Assembler
45 static no_return
nasm_alloc_failed(void)
47 nasm_fatal(0, "out of memory");
50 static inline void *validate_ptr(void *p
)
57 void *nasm_malloc(size_t size
)
59 return validate_ptr(malloc(size
));
62 void *nasm_calloc(size_t size
, size_t nelem
)
64 return validate_ptr(calloc(size
, nelem
));
67 void *nasm_zalloc(size_t size
)
69 return validate_ptr(calloc(1, size
));
72 void *nasm_realloc(void *q
, size_t size
)
74 return validate_ptr(q
? realloc(q
, size
) : malloc(size
));
77 void nasm_free(void *q
)
83 char *nasm_strdup(const char *s
)
86 size_t size
= strlen(s
) + 1;
88 p
= nasm_malloc(size
);
89 return memcpy(p
, s
, size
);
92 char *nasm_strndup(const char *s
, size_t len
)
96 len
= strnlen(s
, len
);
97 p
= nasm_malloc(len
+1);
99 return memcpy(p
, s
, len
);
102 char *nasm_strcat(const char *one
, const char *two
)
105 size_t l1
= strlen(one
);
106 size_t l2
= strlen(two
);
107 rslt
= nasm_malloc(l1
+ l2
+ 1);
108 memcpy(rslt
, one
, l1
);
109 memcpy(rslt
+ l1
, two
, l2
+1);
113 char *nasm_strcatn(const char *str1
, ...)
116 char *rslt
; /* Output buffer */
117 size_t s
; /* Total buffer size */
118 size_t n
; /* Number of arguments */
119 size_t *ltbl
; /* Table of lengths */
120 size_t l
, *lp
; /* Length for current argument */
121 const char *p
; /* Currently examined argument */
122 char *q
; /* Output pointer */
124 n
= 0; /* No strings encountered yet */
129 p
= va_arg(ap
, const char *);
133 ltbl
= nasm_malloc(n
* sizeof(size_t));
135 s
= 1; /* Space for final NULL */
140 *lp
++ = l
= strlen(p
);
142 p
= va_arg(ap
, const char *);
146 q
= rslt
= nasm_malloc(s
);
155 p
= va_arg(ap
, const char *);