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                 cp0 = cp;
  95                 while (*cp && !strchr(delim, *cp))
  96                 {
  97                     if (*cp == escape_char)
  98                         cp++;
  99                     cp++;
 100                 }
 101                 if (*darray)
 102                     (*darray)[i] = nmem_strdupn(nmem, cp0, cp - cp0);
 103                 i++;
 104             }
 105             else
 106             {
 107                 cp0 = cp;
 108                 while (*cp && !strchr(delim, *cp))
 109                 {
 110                     if (*cp == escape_char)
 111                         cp++;
 112                     cp++;
 113                 }
 114                 if (*darray)
 115                     (*darray)[i] = nmem_strdupn(nmem, cp0, cp - cp0);
 116                 i++;
 117                 if (!*cp)
 118                     break;
 119                 cp++;
 120             }
 121         }
 122         *num = i;
 123         if (!*num)
 124             break; /* no items, so stop, *darray=0 already */
 125         else if (*darray)
 126             break; /* second pass, stop */
 127         *darray = (char **) nmem_malloc(nmem, *num * sizeof(**darray));
 128     }
 129 }
 130
 131 #if YAZ_HAVE_XML2
 132 char *nmem_text_node_cdata(const xmlNode *ptr_cdata, NMEM nmem)
 133 {
 134     char *cdata;
 135     int len = 0;
 136     const xmlNode *ptr;
 137
 138     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 139         if (ptr->type == XML_TEXT_NODE)
 140             len += xmlStrlen(ptr->content);
 141     cdata = (char *) nmem_malloc(nmem, len+1);
 142     *cdata = '\0';
 143     for (ptr = ptr_cdata; ptr; ptr = ptr->next)
 144         if (ptr->type == XML_TEXT_NODE)
 145             strcat(cdata, (const char *) ptr->content);
 146     return cdata;
 147 }
 148 #endif
 149
 150 /*
 151  * Local variables:
 152  * c-basic-offset: 4
 153  * c-file-style: "Stroustrup"
 154  * indent-tabs-mode: nil
 155  * End:
 156  * vim: shiftwidth=4 tabstop=8 expandtab
 157  */
 158