Home | History | Annotate | Line # | Download | only in detail 
      1 /*
      2  * Automated Testing Framework (atf)
      3  *
      4  * Copyright (c) 2008 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     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 NETBSD FOUNDATION, INC. AND
     17  * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
     18  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
     19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     20  * IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY
     21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
     23  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
     25  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
     26  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
     27  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     28  */
     29 
     30 #include <errno.h>
     31 #include <limits.h>
     32 #include <string.h>
     33 #include <stdlib.h>
     34 
     35 #include "atf-c/error.h"
     36 
     37 #include "dynstr.h"
     38 #include "sanity.h"
     39 #include "text.h"
     40 
     41 atf_error_t
     42 atf_text_for_each_word(const char *instr, const char *sep,
     43                        atf_error_t (*func)(const char *, void *),
     44                        void *data)
     45 {
     46     atf_error_t err;
     47     char *str, *str2, *last;
     48 
     49     str = strdup(instr);
     50     if (str == NULL) {
     51         err = atf_no_memory_error();
     52         goto out;
     53     }
     54 
     55     err = atf_no_error();
     56     str2 = strtok_r(str, sep, &last);
     57     while (str2 != NULL && !atf_is_error(err)) {
     58         err = func(str2, data);
     59         str2 = strtok_r(NULL, sep, &last);
     60     }
     61 
     62     free(str);
     63 out:
     64     return err;
     65 }
     66 
     67 atf_error_t
     68 atf_text_format(char **dest, const char *fmt, ...)
     69 {
     70     atf_error_t err;
     71     va_list ap;
     72 
     73     va_start(ap, fmt);
     74     err = atf_text_format_ap(dest, fmt, ap);
     75     va_end(ap);
     76 
     77     return err;
     78 }
     79 
     80 atf_error_t
     81 atf_text_format_ap(char **dest, const char *fmt, va_list ap)
     82 {
     83     atf_error_t err;
     84     atf_dynstr_t tmp;
     85     va_list ap2;
     86 
     87     va_copy(ap2, ap);
     88     err = atf_dynstr_init_ap(&tmp, fmt, ap2);
     89     va_end(ap2);
     90     if (!atf_is_error(err))
     91         *dest = atf_dynstr_fini_disown(&tmp);
     92 
     93     return err;
     94 }
     95 
     96 atf_error_t
     97 atf_text_split(const char *str, const char *delim, atf_list_t *words)
     98 {
     99     atf_error_t err;
    100     const char *end;
    101     const char *iter;
    102 
    103     err = atf_list_init(words);
    104     if (atf_is_error(err))
    105         goto err;
    106 
    107     end = str + strlen(str);
    108     INV(*end == '\0');
    109     iter = str;
    110     while (iter < end) {
    111         const char *ptr;
    112 
    113         INV(iter != NULL);
    114         ptr = strstr(iter, delim);
    115         if (ptr == NULL)
    116             ptr = end;
    117 
    118         INV(ptr >= iter);
    119         if (ptr > iter) {
    120             atf_dynstr_t word;
    121 
    122             err = atf_dynstr_init_raw(&word, iter, ptr - iter);
    123             if (atf_is_error(err))
    124                 goto err_list;
    125 
    126             err = atf_list_append(words, atf_dynstr_fini_disown(&word), true);
    127             if (atf_is_error(err))
    128                 goto err_list;
    129         }
    130 
    131         iter = ptr + strlen(delim);
    132     }
    133 
    134     INV(!atf_is_error(err));
    135     return err;
    136 
    137 err_list:
    138     atf_list_fini(words);
    139 err:
    140     return err;
    141 }
    142 
    143 atf_error_t
    144 atf_text_to_bool(const char *str, bool *b)
    145 {
    146     atf_error_t err;
    147 
    148     if (strcasecmp(str, "yes") == 0 ||
    149         strcasecmp(str, "true") == 0) {
    150         *b = true;
    151         err = atf_no_error();
    152     } else if (strcasecmp(str, "no") == 0 ||
    153                strcasecmp(str, "false") == 0) {
    154         *b = false;
    155         err = atf_no_error();
    156     } else {
    157         /* XXX Not really a libc error. */
    158         err = atf_libc_error(EINVAL, "Cannot convert string '%s' "
    159                              "to boolean", str);
    160     }
    161 
    162     return err;
    163 }
    164 
    165 atf_error_t
    166 atf_text_to_long(const char *str, long *l)
    167 {
    168     atf_error_t err;
    169     char *endptr;
    170     long tmp;
    171 
    172     errno = 0;
    173     tmp = strtol(str, &endptr, 10);
    174     if (str[0] == '\0' || *endptr != '\0')
    175         err = atf_libc_error(EINVAL, "'%s' is not a number", str);
    176     else if (errno == ERANGE || (tmp == LONG_MAX || tmp == LONG_MIN))
    177         err = atf_libc_error(ERANGE, "'%s' is out of range", str);
    178     else {
    179         *l = tmp;
    180         err = atf_no_error();
    181     }
    182 
    183     return err;
    184 }
    185