src/server/util/strreplace.c

changeset 634
9728d3a2ac97
equal deleted inserted replaced
633:392ec9026b07 634:9728d3a2ac97
1 /*
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
3 *
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are met:
8 *
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 *
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include "strreplace.h"
30
31 #include <string.h>
32 #include <stdlib.h>
33 #include <ctype.h>
34
35 #include <cx/buffer.h>
36
37
38
39 StringTemplate* string_template_compile(const CxAllocator *a, cxstring tpl) {
40 StringTemplateSegment *end = NULL; // segment list end
41 int var = FALSE;
42 int error = FALSE;
43
44 CxBuffer buf; // tmp buffer
45 if(cxBufferInit(&buf, NULL, 128, NULL, CX_BUFFER_AUTO_EXTEND|CX_BUFFER_FREE_CONTENTS)) {
46 return NULL;
47 }
48
49 StringTemplate *t = cxMalloc(a, sizeof(StringTemplate));
50 if(!t) {
51 cxBufferDestroy(&buf);
52 return NULL;
53 }
54 t->a = a ? a : cxDefaultAllocator;
55 t->segments = NULL;
56
57 StringTemplateSegment *seg = NULL;
58
59 for(size_t i=0;i<tpl.length;i++) {
60 char c = tpl.ptr[i];
61 int add_char = FALSE; // add current char to the buffer
62 int finish_seg = FALSE; // copy buffer to segment string and start new segment
63
64 if(!seg) {
65 // start new segment
66 seg = cxMalloc(a, sizeof(StringTemplateSegment));
67 if(seg) {
68 seg->type = var ? STRING_SEGMENT_VAR_PLACEHOLDER : STRING_SEGMENT_STR;
69 seg->str = (cxmutstr){NULL, 0};
70 seg->num = 0;
71 seg->next = NULL;
72 // add segment to segment list
73 if(end) {
74 end->next = seg;
75 } else {
76 t->segments = seg;
77 }
78 end = seg;
79 } else {
80 error = TRUE;
81 break;
82 }
83 }
84
85 if(var) {
86 // current segment is a var
87 if(c == '}') {
88 var = FALSE;
89 finish_seg = TRUE;
90 } else if(c == '{') {
91 // noop
92 } else if(!isalnum(c)) {
93 var = FALSE;
94 finish_seg = TRUE;
95 i--;
96 } else {
97 add_char = TRUE;
98 }
99 } else {
100 if(c == '$') {
101 if(i+1<tpl.length && tpl.ptr[i+1] == '$') {
102 // $$ -> $
103 i++;
104 add_char = TRUE;
105 } else {
106 var = TRUE;
107 if(buf.pos == 0) {
108 // reuse current segment
109 seg->type = STRING_SEGMENT_VAR_PLACEHOLDER;
110 } else {
111 // create new segment
112 finish_seg = TRUE;
113 }
114 }
115 } else {
116 add_char = TRUE;
117 }
118 }
119
120 if(add_char) {
121 if(cxBufferPut(&buf, c) != c) {
122 error = TRUE;
123 break;
124 }
125 } else if(finish_seg) {
126 // copy buffer content
127 cxmutstr seg_str = cx_strdup_a(a, cx_strn(buf.space, buf.pos));
128 if(!seg_str.ptr) {
129 error = TRUE;
130 break;
131 }
132 seg->str = seg_str;
133 if(seg->type == STRING_SEGMENT_VAR_PLACEHOLDER) {
134 // is the var segment an integer reference?
135 if(!cx_strtoi(seg_str, &seg->num, 10)) {
136 seg->type = STRING_SEGMENT_NUM_PLACEHOLDER;
137 }
138 }
139 buf.pos = 0;
140 seg = NULL;
141 }
142 }
143
144 // finish last segment
145 if(seg) {
146 cxmutstr seg_str = cx_strdup_a(a, cx_strn(buf.space, buf.pos));
147 if(!seg_str.ptr) {
148 error = TRUE;
149 } else {
150 seg->str = seg_str;
151 if(seg->type == STRING_SEGMENT_VAR_PLACEHOLDER) {
152 if(!cx_strtoi(seg_str, &seg->num, 10)) {
153 seg->type = STRING_SEGMENT_NUM_PLACEHOLDER;
154 }
155 }
156 }
157 }
158
159 cxBufferDestroy(&buf);
160 if(error) {
161 string_template_free(t);
162 return NULL;
163 }
164
165 return t;
166 }
167
168 void string_template_free(StringTemplate *tpl) {
169 StringTemplateSegment *seg = tpl->segments;
170 while(seg) {
171 StringTemplateSegment *next = seg->next;
172 cxFree(tpl->a, seg->str.ptr);
173 cxFree(tpl->a, seg);
174 seg = next;
175 }
176 cxFree(tpl->a, tpl);
177 }
178
179 ssize_t string_template_write_to(StringTemplate *tpl, const CxAllocator *a, strtpl_var_func varfunc, void *userdata, void *stream, cx_write_func writef) {
180 if(!tpl) {
181 return -1;
182 }
183
184 // write each segment to the stream
185 StringTemplateSegment *seg = tpl->segments;
186 ssize_t w = 0;
187 while(seg) {
188 if(seg->type == STRING_SEGMENT_STR) {
189 // just write the segment string
190 if(seg->str.length > 0) {
191 size_t r = writef(seg->str.ptr, 1, seg->str.length, stream);
192 if(r != seg->str.length) {
193 return -1;
194 }
195 w += r;
196 }
197 } else if(varfunc) {
198 // convert var segment to value
199 WSBool free_str = FALSE;
200 cxmutstr str = varfunc(a, seg, userdata, &free_str);
201 if(str.length > 0) {
202 size_t r = writef(str.ptr, 1, str.length, stream);
203 if(r != str.length) {
204 return -1;
205 }
206 w += r;
207 }
208 if(free_str) {
209 cxFree(a, str.ptr);
210 }
211 }
212 seg = seg->next;
213 }
214 return w;
215 }
216
217 cxmutstr string_template_build_string(StringTemplate *tpl, const CxAllocator *a, strtpl_var_func varfunc, void *userdata) {
218 CxBuffer buf;
219 cxBufferInit(&buf, NULL, 1024, a, CX_BUFFER_AUTO_EXTEND|CX_BUFFER_FREE_CONTENTS);
220
221 ssize_t w = string_template_write_to(tpl, a, varfunc, userdata, &buf, (cx_write_func)cxBufferWrite);
222 if(w < 0 || cxBufferTerminate(&buf)) {
223 cxBufferDestroy(&buf);
224 return (cxmutstr){ NULL, 0 };
225 }
226 return (cxmutstr){ buf.space, buf.size };
227 }

mercurial