src/nmemsdup.c

   1 /* This file is part of the YAZ toolkit.
   2  * Copyright (C) 1995-2011 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     *darray = 0;
  78     /* two passes over the input string.. */
  79     while (1)
  80     {
  81         size_t i = 0;
  82         const char *cp = dstr;
  83         while (1)
  84         {
  85             const char *cp0;
  86             if (collapse)
  87             {
  88                 if (!*cp)
  89                     break;
  90                 while (*cp && strchr(delim, *cp) && *cp != escape_char)
  91                     cp++;
  92                 if (!*cp)
  93                     break;
  94             }
  95
  96             cp0 = cp;
  97             while (*cp && !strchr(delim, *cp))
  98             {
  99                 if (*cp == escape_char)
 100                     cp++;
 101                 cp++;
 102             }
 103             if (*darray)
 104             {
 105                 char *dst, *src;
 106                 (*darray)[i] = nmem_strdupn(nmem, cp0, cp - cp0);
 107                 dst = src = (*darray)[i];
 108                 while (*src != '\0')
 109                 {
 110                     if (*src == escape_char && src[1])
 111                         src++;
 112                     *dst++ = *src++;
 113                 }
 114                 *dst = '\0';
 115             }
 116             i++;
 117             if (!collapse)
 118             {
 119                 if (!*cp)
 120                     break;
 121                 cp++;
 122             }
 123         }
 124         *num = i;
 125         if (!*num)
 126             break; /* no items, so stop, *darray=0 already */
 127         else if (*darray)
 128             break; /* second pass, stop */
 129         *darray = (char **) nmem_malloc(nmem, *num * sizeof(**darray));
 130     }
 131 }
 132
 133 #if YAZ_HAVE_XML2
 134 char *nmem_text_node_cdata(const xmlNode *ptr_cdata, NMEM nmem)
 135 {
 136     char *cdata;
 137     int len = 0;
 138     const xmlNode *ptr;
 139
 140     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 141         if (ptr->type == XML_TEXT_NODE)
 142             len += xmlStrlen(ptr->content);
 143     cdata = (char *) nmem_malloc(nmem, len+1);
 144     *cdata = '\0';
 145     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 146         if (ptr->type == XML_TEXT_NODE)
 147             strcat(cdata, (const char *) ptr->content);
 148     return cdata;
 149 }
 150 #endif
 151
 152 /*
 153  * Local variables:
 154  * c-basic-offset: 4
 155  * c-file-style: "Stroustrup"
 156  * indent-tabs-mode: nil
 157  * End:
 158  * vim: shiftwidth=4 tabstop=8 expandtab
 159  */
 160