src/nmemsdup.c

   1 /* This file is part of the YAZ toolkit.
   2  * Copyright (C) 1995-2013 Index Data
   3  * See the file LICENSE for details.
   4  */
   5
   6 /**
   7  * \file nmemsdup.c
   8  * \brief Implements NMEM dup utilities
   9  */
  10
  11 #if HAVE_CONFIG_H
  12 #include <config.h>
  13 #endif
  14
  15 #include <string.h>
  16 #include <yaz/nmem_xml.h>
  17
  18 char *nmem_strdup(NMEM mem, const char *src)
  19 {
  20     char *dst = (char *) nmem_malloc(mem, strlen(src)+1);
  21     strcpy(dst, src);
  22     return dst;
  23 }
  24
  25 char *nmem_strdup_null(NMEM mem, const char *src)
  26 {
  27     if (!src)
  28         return 0;
  29     else
  30         return nmem_strdup(mem, src);
  31 }
  32
  33 char *nmem_strdupn(NMEM mem, const char *src, size_t n)
  34 {
  35     char *dst = (char *) nmem_malloc(mem, n+1);
  36     memcpy(dst, src, n);
  37     dst[n] = '\0';
  38     return dst;
  39 }
  40
  41 nmem_int_t *nmem_intdup(NMEM mem, nmem_int_t v)
  42 {
  43     nmem_int_t *dst = (nmem_int_t*) nmem_malloc(mem, sizeof(*dst));
  44     *dst = v;
  45     return dst;
  46 }
  47
  48 nmem_bool_t *nmem_booldup(NMEM mem, nmem_bool_t v)
  49 {
  50     nmem_bool_t *dst = (nmem_bool_t*) nmem_malloc(mem, sizeof(*dst));
  51     *dst = v;
  52     return dst;
  53 }
  54
  55 void nmem_strsplit_blank(NMEM nmem, const char *dstr, char ***darray, int *num)
  56 {
  57     nmem_strsplit(nmem, " ", dstr, darray, num);
  58 }
  59
  60
  61 void nmem_strsplit(NMEM nmem, const char *delim, const char *dstr,
  62                    char ***darray, int *num)
  63 {
  64     nmem_strsplitx(nmem, delim, dstr, darray, num, 1);
  65 }
  66
  67 void nmem_strsplitx(NMEM nmem, const char *delim, const char *dstr,
  68                     char ***darray, int *num, int collapse)
  69 {
  70     nmem_strsplit_escape(nmem, delim, dstr, darray, num, collapse, 0);
  71 }
  72
  73 void nmem_strsplit_escape(NMEM nmem, const char *delim, const char *dstr,
  74                           char ***darray, int *num, int collapse,
  75                           int escape_char)
  76 {
  77     nmem_strsplit_escape2(nmem, delim, dstr, darray, num, collapse,
  78                           escape_char, 1);
  79 }
  80
  81 void nmem_strsplit_escape2(NMEM nmem, const char *delim, const char *dstr,
  82                            char ***darray, int *num, int collapse,
  83                            int escape_char, int subst_escape)
  84 {
  85     *darray = 0;
  86     /* two passes over the input string.. */
  87     while (1)
  88     {
  89         size_t i = 0;
  90         const char *cp = dstr;
  91         while (1)
  92         {
  93             const char *cp0;
  94             if (collapse)
  95             {
  96                 if (!*cp)
  97                     break;
  98                 while (*cp && strchr(delim, *cp) && *cp != escape_char)
  99                     cp++;
 100                 if (!*cp)
 101                     break;
 102             }
 103
 104             cp0 = cp;
 105             while (*cp && !strchr(delim, *cp))
 106             {
 107                 if (*cp == escape_char)
 108                     cp++;
 109                 cp++;
 110             }
 111             if (*darray)
 112             {
 113                 (*darray)[i] = nmem_strdupn(nmem, cp0, cp - cp0);
 114                 if (subst_escape)
 115                 {
 116                     char *dst = (*darray)[i];
 117                     const char *src = dst;
 118                     while (*src != '\0')
 119                     {
 120                         if (*src == escape_char && src[1])
 121                             src++;
 122                         *dst++ = *src++;
 123                     }
 124                     *dst = '\0';
 125                 }
 126             }
 127             i++;
 128             if (!collapse)
 129             {
 130                 if (!*cp)
 131                     break;
 132                 cp++;
 133             }
 134         }
 135         *num = i;
 136         if (!*num)
 137             break; /* no items, so stop, *darray=0 already */
 138         else if (*darray)
 139             break; /* second pass, stop */
 140         *darray = (char **) nmem_malloc(nmem, *num * sizeof(**darray));
 141     }
 142 }
 143
 144 #if YAZ_HAVE_XML2
 145 char *nmem_text_node_cdata(const xmlNode *ptr_cdata, NMEM nmem)
 146 {
 147     char *cdata;
 148     int len = 0;
 149     const xmlNode *ptr;
 150
 151     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 152         if (ptr->type == XML_TEXT_NODE)
 153             len += xmlStrlen(ptr->content);
 154     cdata = (char *) nmem_malloc(nmem, len+1);
 155     *cdata = '\0';
 156     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 157         if (ptr->type == XML_TEXT_NODE)
 158             strcat(cdata, (const char *) ptr->content);
 159     return cdata;
 160 }
 161 #endif
 162
 163 /*
 164  * Local variables:
 165  * c-basic-offset: 4
 166  * c-file-style: "Stroustrup"
 167  * indent-tabs-mode: nil
 168  * End:
 169  * vim: shiftwidth=4 tabstop=8 expandtab
 170  */
 171