2 This file is part of catta.
4 catta is free software; you can redistribute it and/or modify it
5 under the terms of the GNU Lesser General Public License as
6 published by the Free Software Foundation; either version 2.1 of the
7 License, or (at your option) any later version.
9 catta is distributed in the hope that it will be useful, but WITHOUT
10 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
12 Public License for more details.
14 You should have received a copy of the GNU Lesser General Public
15 License along with catta; if not, write to the Free Software
16 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
30 #include <catta/strlst.h>
31 #include <catta/malloc.h>
32 #include <catta/defs.h>
34 CattaStringList*catta_string_list_add_anonymous(CattaStringList *l, size_t size) {
37 if (!(n = catta_malloc(sizeof(CattaStringList) + size)))
43 /* NUL terminate strings, just to make sure */
49 CattaStringList *catta_string_list_add_arbitrary(CattaStringList *l, const uint8_t*text, size_t size) {
52 assert(size == 0 || text);
54 if (!(n = catta_string_list_add_anonymous(l, size)))
58 memcpy(n->text, text, size);
63 CattaStringList *catta_string_list_add(CattaStringList *l, const char *text) {
66 return catta_string_list_add_arbitrary(l, (const uint8_t*) text, strlen(text));
69 int catta_string_list_parse(const void* data, size_t size, CattaStringList **ret) {
71 CattaStringList *r = NULL;
84 goto fail; /* Overflow */
86 if (k > 0) { /* Ignore empty strings */
89 if (!(n = catta_string_list_add_arbitrary(r, c, k)))
104 catta_string_list_free(r);
108 void catta_string_list_free(CattaStringList *l) {
118 CattaStringList* catta_string_list_reverse(CattaStringList *l) {
119 CattaStringList *r = NULL, *n;
131 char* catta_string_list_to_string(CattaStringList *l) {
136 for (n = l; n; n = n->next) {
143 if (!(t = e = catta_new(char, s+1)))
146 l = catta_string_list_reverse(l);
148 for (n = l; n; n = n->next) {
153 strncpy(e, (char*) n->text, n->size);
161 l = catta_string_list_reverse(l);
168 size_t catta_string_list_serialize(CattaStringList *l, void *data, size_t size) {
175 l = catta_string_list_reverse(l);
178 for (n = l; size > 1 && n; n = n->next) {
181 if ((k = n->size) == 0)
182 /* Skip empty strings */
186 /* Truncate strings at 255 characters */
190 /* Make sure this string fits in */
193 *(c++) = (uint8_t) k;
194 memcpy(c, n->text, k);
201 l = catta_string_list_reverse(l);
203 if (used == 0 && size > 0) {
205 /* Empty lists are treated specially. To comply with
206 * section 6.1 of the DNS-SD spec, we return a single
207 * empty string (i.e. a NUL byte)*/
209 *(uint8_t*) data = 0;
216 for (n = l; n; n = n->next) {
219 if ((k = n->size) == 0)
235 int catta_string_list_equal(const CattaStringList *a, const CattaStringList *b) {
244 if (a->size != b->size)
247 if (a->size != 0 && memcmp(a->text, b->text, a->size) != 0)
255 CattaStringList *catta_string_list_add_many(CattaStringList *r, ...) {
259 r = catta_string_list_add_many_va(r, va);
265 CattaStringList *catta_string_list_add_many_va(CattaStringList *r, va_list va) {
268 while ((txt = va_arg(va, const char*)))
269 r = catta_string_list_add(r, txt);
274 CattaStringList *catta_string_list_new(const char *txt, ...) {
276 CattaStringList *r = NULL;
279 r = catta_string_list_add(r, txt);
282 r = catta_string_list_add_many_va(r, va);
289 CattaStringList *catta_string_list_new_va(va_list va) {
290 return catta_string_list_add_many_va(NULL, va);
293 CattaStringList *catta_string_list_copy(const CattaStringList *l) {
294 CattaStringList *r = NULL;
296 for (; l; l = l->next)
297 if (!(r = catta_string_list_add_arbitrary(r, l->text, l->size))) {
298 catta_string_list_free(r);
302 return catta_string_list_reverse(r);
305 CattaStringList *catta_string_list_new_from_array(const char *array[], int length) {
306 CattaStringList *r = NULL;
311 for (i = 0; length >= 0 ? i < length : !!array[i]; i++)
312 r = catta_string_list_add(r, array[i]);
317 unsigned catta_string_list_length(const CattaStringList *l) {
320 for (; l; l = l->next)
326 CattaStringList *catta_string_list_add_vprintf(CattaStringList *l, const char *format, va_list va) {
332 if (!(r = catta_malloc(sizeof(CattaStringList) + len)))
341 n = vsnprintf((char*) r->text, len, format, va2);
344 if (n >= 0 && n < (int) len)
352 if (!(nr = catta_realloc(r, sizeof(CattaStringList) + len))) {
361 r->size = strlen((char*) r->text);
366 CattaStringList *catta_string_list_add_printf(CattaStringList *l, const char *format, ...) {
371 va_start(va, format);
372 l = catta_string_list_add_vprintf(l, format, va);
378 CattaStringList *catta_string_list_find(CattaStringList *l, const char *key) {
384 for (; l; l = l->next) {
385 if (strcasecmp((char*) l->text, key) == 0)
388 if (strncasecmp((char*) l->text, key, n) == 0 && l->text[n] == '=')
395 CattaStringList *catta_string_list_add_pair(CattaStringList *l, const char *key, const char *value) {
399 return catta_string_list_add_printf(l, "%s=%s", key, value);
401 return catta_string_list_add(l, key);
404 CattaStringList *catta_string_list_add_pair_arbitrary(CattaStringList *l, const char *key, const uint8_t *value, size_t size) {
409 return catta_string_list_add(l, key);
413 if (!(l = catta_string_list_add_anonymous(l, n + 1 + size)))
416 memcpy(l->text, key, n);
418 memcpy(l->text + n + 1, value, size);
423 int catta_string_list_get_pair(CattaStringList *l, char **key, char **value, size_t *size) {
428 if (!(e = memchr(l->text, '=', l->size))) {
431 if (!(*key = catta_strdup((char*) l->text)))
444 if (!(*key = catta_strndup((char*) l->text, e - (char *) l->text)))
447 e++; /* Advance after '=' */
449 n = l->size - (e - (char*) l->text);
453 if (!(*value = catta_memdup(e, n+1))) {
469 CattaStringList *catta_string_list_get_next(CattaStringList *l) {
474 uint8_t *catta_string_list_get_text(CattaStringList *l) {
479 size_t catta_string_list_get_size(CattaStringList *l) {
484 uint32_t catta_string_list_get_service_cookie(CattaStringList *l) {
486 char *value = NULL, *end = NULL;
489 if (!(f = catta_string_list_find(l, CATTA_SERVICE_COOKIE)))
490 return CATTA_SERVICE_COOKIE_INVALID;
492 if (catta_string_list_get_pair(f, NULL, &value, NULL) < 0 || !value)
493 return CATTA_SERVICE_COOKIE_INVALID;
495 ret = (uint32_t) strtoll(value, &end, 0);
497 if (*value && end && *end != 0) {
499 return CATTA_SERVICE_COOKIE_INVALID;