commands/zoneinfo/ialloc.c

   1 #
   2
   3 /*LINTLIBRARY*/
   4
   5 #include <string.h>
   6 #include <stdlib.h>
   7
   8 #include "stdio.h"
   9
  10 #ifndef lint
  11 #ifndef NOID
  12 static char     sccsid[] = "@(#)ialloc.c        7.14";
  13 #endif /* !NOID */
  14 #endif /* !lint */
  15
  16 #ifndef alloc_t
  17 #define alloc_t unsigned
  18 #endif /* !alloc_t */
  19
  20 #ifdef MAL
  21 #define NULLMAL(x)      ((x) == NULL || (x) == MAL)
  22 #else /* !MAL */
  23 #define NULLMAL(x)      ((x) == NULL)
  24 #endif /* !MAL */
  25
  26 #if 0
  27 extern char *   calloc();
  28 extern char *   malloc();
  29 extern char *   realloc();
  30 extern char *   strcpy();
  31 #endif
  32
  33 char *
  34 imalloc(int n)
  35 {
  36 #ifdef MAL
  37         register char * result;
  38
  39         if (n == 0)
  40                 n = 1;
  41         result = malloc((alloc_t) n);
  42         return (result == MAL) ? NULL : result;
  43 #else /* !MAL */
  44         if (n == 0)
  45                 n = 1;
  46         return malloc((alloc_t) n);
  47 #endif /* !MAL */
  48 }
  49
  50 char *
  51 icalloc(int nelem, int elsize)
  52 {
  53         if (nelem == 0 || elsize == 0)
  54                 nelem = elsize = 1;
  55         return calloc((alloc_t) nelem, (alloc_t) elsize);
  56 }
  57
  58 char *
  59 irealloc(char *pointer, int size)
  60 {
  61         if (NULLMAL(pointer))
  62                 return imalloc(size);
  63         if (size == 0)
  64                 size = 1;
  65         return realloc(pointer, (alloc_t) size);
  66 }
  67
  68 char *
  69 icatalloc(char *old, char *new)
  70 {
  71         register char * result;
  72         register        oldsize, newsize;
  73
  74         oldsize = NULLMAL(old) ? 0 : strlen(old);
  75         newsize = NULLMAL(new) ? 0 : strlen(new);
  76         if ((result = irealloc(old, oldsize + newsize + 1)) != NULL)
  77                 if (!NULLMAL(new))
  78                         (void) strcpy(result + oldsize, new);
  79         return result;
  80 }
  81
  82 char *
  83 icpyalloc(char *string)
  84 {
  85         return icatalloc((char *) NULL, string);
  86 }
  87
  88 ifree(char *p)
  89 {
  90         if (!NULLMAL(p))
  91                 free(p);
  92 }
  93
  94 icfree(char *p)
  95 {
  96         if (!NULLMAL(p))
  97                 free(p);
  98 }