getutxent implementation for Linux/s390-32.
[glibc/history.git] / timezone / ialloc.c
blob1fc2035f45292b2e8ea101bb681b49bded5ca0c0
1 /*
2 ** This file is in the public domain, so clarified as of
3 ** 2006-07-17 by Arthur David Olson.
4 */
6 #ifndef lint
7 #ifndef NOID
8 static char elsieid[] = "@(#)ialloc.c 8.30";
9 #endif /* !defined NOID */
10 #endif /* !defined lint */
12 /*LINTLIBRARY*/
14 #include "private.h"
16 #define nonzero(n) (((n) == 0) ? 1 : (n))
18 char *
19 imalloc(n)
20 const int n;
22 return malloc((size_t) nonzero(n));
25 char *
26 icalloc(nelem, elsize)
27 int nelem;
28 int elsize;
30 if (nelem == 0 || elsize == 0)
31 nelem = elsize = 1;
32 return calloc((size_t) nelem, (size_t) elsize);
35 void *
36 irealloc(pointer, size)
37 void * const pointer;
38 const int size;
40 if (pointer == NULL)
41 return imalloc(size);
42 return realloc((void *) pointer, (size_t) nonzero(size));
45 char *
46 icatalloc(old, new)
47 char * const old;
48 const char * const new;
50 register char * result;
51 register int oldsize, newsize;
53 newsize = (new == NULL) ? 0 : strlen(new);
54 if (old == NULL)
55 oldsize = 0;
56 else if (newsize == 0)
57 return old;
58 else oldsize = strlen(old);
59 if ((result = irealloc(old, oldsize + newsize + 1)) != NULL)
60 if (new != NULL)
61 (void) strcpy(result + oldsize, new);
62 return result;
65 char *
66 icpyalloc(string)
67 const char * const string;
69 return icatalloc((char *) NULL, string);
72 void
73 ifree(p)
74 char * const p;
76 if (p != NULL)
77 (void) free(p);
80 void
81 icfree(p)
82 char * const p;
84 if (p != NULL)
85 (void) free(p);