common/catdup.c

   1 /* -*- Mode: C ; c-basic-offset: 2 -*- */
   2 /*
   3  * LADI Session Handler (ladish)
   4  *
   5  * Copyright (C) 2009,2010 Nedko Arnaudov <nedko@arnaudov.name>
   6  *
   7  **************************************************************************
   8  * This file contains implementation of the catdup() function
   9  **************************************************************************
  10  *
  11  * LADI Session Handler is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * LADI Session Handler is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with LADI Session Handler. If not, see <http://www.gnu.org/licenses/>
  23  * or write to the Free Software Foundation, Inc.,
  24  * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  25  */
  26
  27 #include "../common.h"
  28
  29 #include <stdarg.h>
  30
  31 #include "catdup.h"
  32
  33 char * catdup(const char * s1, const char * s2)
  34 {
  35   char * buffer;
  36   size_t s1_len, s2_len;
  37
  38   ASSERT(s1 != NULL && s2 != NULL);
  39
  40   s1_len = strlen(s1);
  41   s2_len = strlen(s2);
  42
  43   buffer = malloc(s1_len + s2_len + 1);
  44   if (buffer == NULL)
  45   {
  46     log_error("malloc() failed.");
  47     return NULL;
  48   }
  49
  50   memcpy(buffer, s1, s1_len);
  51   memcpy(buffer + s1_len, s2, s2_len);
  52   buffer[s1_len + s2_len] = 0;
  53
  54   return buffer;
  55 }
  56
  57 char * catdup3(const char * s1, const char * s2, const char * s3)
  58 {
  59   char * buffer;
  60   size_t s1_len, s2_len, s3_len;
  61
  62   ASSERT(s1 != NULL && s2 != NULL && s3 != NULL);
  63
  64   s1_len = strlen(s1);
  65   s2_len = strlen(s2);
  66   s3_len = strlen(s3);
  67
  68   buffer = malloc(s1_len + s2_len + s3_len + 1);
  69   if (buffer == NULL)
  70   {
  71     log_error("malloc() failed.");
  72     return NULL;
  73   }
  74
  75   memcpy(buffer, s1, s1_len);
  76   memcpy(buffer + s1_len, s2, s2_len);
  77   memcpy(buffer + s1_len + s2_len, s3, s3_len);
  78   buffer[s1_len + s2_len + s3_len] = 0;
  79
  80   return buffer;
  81 }
  82
  83 char * catdup4(const char * s1, const char * s2, const char * s3, const char * s4)
  84 {
  85   char * buffer;
  86   size_t s1_len, s2_len, s3_len, s4_len;
  87
  88   ASSERT(s1 != NULL && s2 != NULL && s3 != NULL && s4 != NULL);
  89
  90   s1_len = strlen(s1);
  91   s2_len = strlen(s2);
  92   s3_len = strlen(s3);
  93   s4_len = strlen(s4);
  94
  95   buffer = malloc(s1_len + s2_len + s3_len + s4_len + 1);
  96   if (buffer == NULL)
  97   {
  98     log_error("malloc() failed.");
  99     return NULL;
 100   }
 101
 102   memcpy(buffer, s1, s1_len);
 103   memcpy(buffer + s1_len, s2, s2_len);
 104   memcpy(buffer + s1_len + s2_len, s3, s3_len);
 105   memcpy(buffer + s1_len + s2_len + s3_len, s4, s4_len);
 106   buffer[s1_len + s2_len + s3_len + s4_len] = 0;
 107
 108   return buffer;
 109 }
 110
 111 char * catdupv(const char * s1, const char * s2, ...)
 112 {
 113   va_list ap;
 114   const char * str;
 115   size_t len;
 116   char * buffer;
 117   char * p;
 118
 119   len = strlen(s1) + strlen(s2);
 120   va_start(ap, s2);
 121   while ((str = va_arg(ap, const char *)) != NULL)
 122   {
 123     len += strlen(str);
 124   }
 125   va_end(ap);
 126   len++;
 127
 128   buffer = malloc(len);
 129   if (buffer == NULL)
 130   {
 131     log_error("malloc(%zu) failed.", len);
 132     return NULL;
 133   }
 134
 135   len = strlen(s1);
 136   memcpy(buffer, s1, len);
 137   p = buffer + len;
 138
 139   len = strlen(s2);
 140   memcpy(p, s2, len);
 141   p += len;
 142
 143   va_start(ap, s2);
 144   while ((str = va_arg(ap, const char *)) != NULL)
 145   {
 146     len = strlen(str);
 147     memcpy(p, str, len);
 148     p += len;
 149   }
 150   va_end(ap);
 151
 152   *p = 0;
 153
 154   return buffer;
 155 }