1 /* Licensed under BSD-MIT - see LICENSE file for details */
13 #include <ccan/str/str.h>
14 #include <ccan/tal/tal.h>
15 #include <ccan/take/take.h>
17 char *tal_strdup(const tal_t *ctx, const char *p)
19 /* We have to let through NULL for take(). */
20 return tal_dup_(ctx, p, 1, p ? strlen(p) + 1: 1, 0, false,
21 TAL_LABEL(char, "[]"));
24 char *tal_strndup(const tal_t *ctx, const char *p, size_t n)
29 /* We have to let through NULL for take(). */
37 ret = tal_dup_(ctx, p, 1, len, 1, false, TAL_LABEL(char, "[]"));
43 char *tal_asprintf(const tal_t *ctx, const char *fmt, ...)
49 ret = tal_vasprintf(ctx, fmt, ap);
55 char *tal_vasprintf(const tal_t *ctx, const char *fmt, va_list ap)
61 if (!fmt && taken(fmt))
64 /* A decent guess to start. */
65 max = strlen(fmt) * 2;
66 buf = tal_arr(ctx, char, max);
71 ret = vsnprintf(buf, max, fmt, ap2);
76 if (!tal_resize(&buf, max *= 2))
84 char **tal_strsplit(const tal_t *ctx,
85 const char *string, const char *delims, enum strsplit flags)
88 size_t max = 64, num = 0;
90 parts = tal_arr(ctx, char *, max + 1);
91 if (unlikely(!parts)) {
98 str = tal_strdup(parts, string);
101 if (unlikely(!delims) && is_taken(delims))
104 if (flags == STR_NO_EMPTY)
105 str += strspn(str, delims);
107 while (*str != '\0') {
108 size_t len = strcspn(str, delims), dlen;
111 dlen = strspn(str + len, delims);
112 parts[num][len] = '\0';
113 if (flags == STR_EMPTY_OK && dlen)
116 if (++num == max && !tal_resize(&parts, max*=2 + 1))
121 /* Ensure that tal_count() is correct. */
122 if (unlikely(!tal_resize(&parts, num+1)))
136 char *tal_strjoin(const tal_t *ctx,
137 char *strings[], const char *delim, enum strjoin flags)
141 size_t totlen = 0, dlen;
143 if (unlikely(!strings) && is_taken(strings))
146 if (unlikely(!delim) && is_taken(delim))
149 dlen = strlen(delim);
150 ret = tal_arr(ctx, char, dlen*2+1);
155 for (i = 0; strings[i]; i++) {
156 size_t len = strlen(strings[i]);
158 if (flags == STR_NO_TRAIL && !strings[i+1])
160 if (!tal_resize(&ret, totlen + len + dlen + 1))
162 memcpy(ret + totlen, strings[i], len);
164 memcpy(ret + totlen, delim, dlen);
179 bool tal_strreg(const tal_t *ctx, const char *string, const char *regex, ...)
181 size_t nmatch = 1 + strcount(regex, "(");
182 regmatch_t matches[nmatch];
188 if (unlikely(!regex) && is_taken(regex))
191 if (regcomp(&r, regex, REG_EXTENDED) != 0)
194 if (unlikely(!string) && is_taken(string))
197 if (regexec(&r, string, nmatch, matches, 0) != 0)
202 for (i = 1; i < nmatch; i++) {
203 char **arg = va_arg(ap, char **);
205 /* eg. ([a-z])? can give "no match". */
206 if (matches[i].rm_so == -1)
209 *arg = tal_strndup(ctx,
210 string + matches[i].rm_so,
213 /* FIXME: If we fail, we set some and leak! */