1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) 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
nmem_strdup(NMEM mem,const char * src)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
nmem_strdup_null(NMEM mem,const char * src)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
nmem_strdupn(NMEM mem,const char * src,size_t n)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
nmem_intdup(NMEM mem,nmem_int_t v)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
nmem_booldup(NMEM mem,nmem_bool_t v)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
nmem_strsplit_blank(NMEM nmem,const char * dstr,char *** darray,int * num)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
nmem_strsplit(NMEM nmem,const char * delim,const char * dstr,char *** darray,int * num)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
nmem_strsplitx(NMEM nmem,const char * delim,const char * dstr,char *** darray,int * num,int collapse)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
nmem_strsplit_escape(NMEM nmem,const char * delim,const char * dstr,char *** darray,int * num,int collapse,int escape_char)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
nmem_strsplit_escape2(NMEM nmem,const char * delim,const char * dstr,char *** darray,int * num,int collapse,int escape_char,int subst_escape)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
nmem_text_node_cdata(const xmlNode * ptr_cdata,NMEM nmem)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
172