Annotation of embedaddon/ntp/lib/isc/string.c, revision 1.1.1.1

1.1       misho       1: /*
                      2:  * Copyright (C) 2004-2007  Internet Systems Consortium, Inc. ("ISC")
                      3:  * Copyright (C) 1999-2001, 2003  Internet Software Consortium.
                      4:  *
                      5:  * Permission to use, copy, modify, and/or distribute this software for any
                      6:  * purpose with or without fee is hereby granted, provided that the above
                      7:  * copyright notice and this permission notice appear in all copies.
                      8:  *
                      9:  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
                     10:  * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
                     11:  * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
                     12:  * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
                     13:  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
                     14:  * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
                     15:  * PERFORMANCE OF THIS SOFTWARE.
                     16:  */
                     17: 
                     18: /* $Id: string.c,v 1.20 2007/06/19 23:47:17 tbox Exp $ */
                     19: 
                     20: /*! \file */
                     21: 
                     22: #include <config.h>
                     23: 
                     24: #include <ctype.h>
                     25: 
                     26: #include <isc/mem.h>
                     27: #include <isc/print.h>
                     28: #include <isc/region.h>
                     29: #include <isc/string.h>
                     30: #include <isc/util.h>
                     31: 
                     32: static char digits[] = "0123456789abcdefghijklmnoprstuvwxyz";
                     33: 
                     34: isc_uint64_t
                     35: isc_string_touint64(char *source, char **end, int base) {
                     36:        isc_uint64_t tmp;
                     37:        isc_uint64_t overflow;
                     38:        char *s = source;
                     39:        char *o;
                     40:        char c;
                     41: 
                     42:        if ((base < 0) || (base == 1) || (base > 36)) {
                     43:                *end = source;
                     44:                return (0);
                     45:        }
                     46: 
                     47:        while (*s != 0 && isascii(*s&0xff) && isspace(*s&0xff))
                     48:                s++;
                     49:        if (*s == '+' /* || *s == '-' */)
                     50:                s++;
                     51:        if (base == 0) {
                     52:                if (*s == '0' && (*(s+1) == 'X' || *(s+1) == 'x')) {
                     53:                        s += 2;
                     54:                        base = 16;
                     55:                } else if (*s == '0')
                     56:                        base = 8;
                     57:                else
                     58:                        base = 10;
                     59:        }
                     60:        if (*s == 0) {
                     61:                *end = source;
                     62:                return (0);
                     63:        }
                     64:        overflow = ~0;
                     65:        overflow /= base;
                     66:        tmp = 0;
                     67: 
                     68:        while ((c = *s) != 0) {
                     69:                c = tolower(c&0xff);
                     70:                /* end ? */
                     71:                if ((o = strchr(digits, c)) == NULL) {
                     72:                        *end = s;
                     73:                        return (tmp);
                     74:                }
                     75:                /* end ? */
                     76:                if ((o - digits) >= base) {
                     77:                        *end = s;
                     78:                        return (tmp);
                     79:                }
                     80:                /* overflow ? */
                     81:                if (tmp > overflow) {
                     82:                        *end = source;
                     83:                        return (0);
                     84:                }
                     85:                tmp *= base;
                     86:                /* overflow ? */
                     87:                if ((tmp + (o - digits)) < tmp) {
                     88:                        *end = source;
                     89:                        return (0);
                     90:                }
                     91:                tmp += o - digits;
                     92:                s++;
                     93:        }
                     94:        *end = s;
                     95:        return (tmp);
                     96: }
                     97: 
                     98: isc_result_t
                     99: isc_string_copy(char *target, size_t size, const char *source) {
                    100:        REQUIRE(size > 0U);
                    101: 
                    102:        if (strlcpy(target, source, size) >= size) {
                    103:                memset(target, ISC_STRING_MAGIC, size);
                    104:                return (ISC_R_NOSPACE);
                    105:        }
                    106: 
                    107:        ENSURE(strlen(target) < size);
                    108: 
                    109:        return (ISC_R_SUCCESS);
                    110: }
                    111: 
                    112: void
                    113: isc_string_copy_truncate(char *target, size_t size, const char *source) {
                    114:        REQUIRE(size > 0U);
                    115: 
                    116:        strlcpy(target, source, size);
                    117: 
                    118:        ENSURE(strlen(target) < size);
                    119: }
                    120: 
                    121: isc_result_t
                    122: isc_string_append(char *target, size_t size, const char *source) {
                    123:        REQUIRE(size > 0U);
                    124:        REQUIRE(strlen(target) < size);
                    125: 
                    126:        if (strlcat(target, source, size) >= size) {
                    127:                memset(target, ISC_STRING_MAGIC, size);
                    128:                return (ISC_R_NOSPACE);
                    129:        }
                    130: 
                    131:        ENSURE(strlen(target) < size);
                    132: 
                    133:        return (ISC_R_SUCCESS);
                    134: }
                    135: 
                    136: void
                    137: isc_string_append_truncate(char *target, size_t size, const char *source) {
                    138:        REQUIRE(size > 0U);
                    139:        REQUIRE(strlen(target) < size);
                    140: 
                    141:        strlcat(target, source, size);
                    142: 
                    143:        ENSURE(strlen(target) < size);
                    144: }
                    145: 
                    146: isc_result_t
                    147: isc_string_printf(char *target, size_t size, const char *format, ...) {
                    148:        va_list args;
                    149:        size_t n;
                    150: 
                    151:        REQUIRE(size > 0U);
                    152: 
                    153:        va_start(args, format);
                    154:        n = vsnprintf(target, size, format, args);
                    155:        va_end(args);
                    156: 
                    157:        if (n >= size) {
                    158:                memset(target, ISC_STRING_MAGIC, size);
                    159:                return (ISC_R_NOSPACE);
                    160:        }
                    161: 
                    162:        ENSURE(strlen(target) < size);
                    163: 
                    164:        return (ISC_R_SUCCESS);
                    165: }
                    166: 
                    167: void
                    168: isc_string_printf_truncate(char *target, size_t size, const char *format, ...) {
                    169:        va_list args;
                    170:        size_t n;
                    171: 
                    172:        REQUIRE(size > 0U);
                    173: 
                    174:        va_start(args, format);
                    175:        n = vsnprintf(target, size, format, args);
                    176:        va_end(args);
                    177: 
                    178:        ENSURE(strlen(target) < size);
                    179: }
                    180: 
                    181: char *
                    182: isc_string_regiondup(isc_mem_t *mctx, const isc_region_t *source) {
                    183:        char *target;
                    184: 
                    185:        REQUIRE(mctx != NULL);
                    186:        REQUIRE(source != NULL);
                    187: 
                    188:        target = (char *) isc_mem_allocate(mctx, source->length + 1);
                    189:        if (target != NULL) {
                    190:                memcpy(source->base, target, source->length);
                    191:                target[source->length] = '\0';
                    192:        }
                    193: 
                    194:        return (target);
                    195: }
                    196: 
                    197: char *
                    198: isc_string_separate(char **stringp, const char *delim) {
                    199:        char *string = *stringp;
                    200:        char *s;
                    201:        const char *d;
                    202:        char sc, dc;
                    203: 
                    204:        if (string == NULL)
                    205:                return (NULL);
                    206: 
                    207:        for (s = string; (sc = *s) != '\0'; s++)
                    208:                for (d = delim; (dc = *d) != '\0'; d++)
                    209:                        if (sc == dc) {
                    210:                                *s++ = '\0';
                    211:                                *stringp = s;
                    212:                                return (string);
                    213:                        }
                    214:        *stringp = NULL;
                    215:        return (string);
                    216: }
                    217: 
                    218: size_t
                    219: isc_string_strlcpy(char *dst, const char *src, size_t size)
                    220: {
                    221:        char *d = dst;
                    222:        const char *s = src;
                    223:        size_t n = size;
                    224: 
                    225:        /* Copy as many bytes as will fit */
                    226:        if (n != 0U && --n != 0U) {
                    227:                do {
                    228:                        if ((*d++ = *s++) == 0)
                    229:                                break;
                    230:                } while (--n != 0U);
                    231:        }
                    232: 
                    233:        /* Not enough room in dst, add NUL and traverse rest of src */
                    234:        if (n == 0U) {
                    235:                if (size != 0U)
                    236:                        *d = '\0';              /* NUL-terminate dst */
                    237:                while (*s++)
                    238:                        ;
                    239:        }
                    240: 
                    241:        return(s - src - 1);    /* count does not include NUL */
                    242: }
                    243: 
                    244: size_t
                    245: isc_string_strlcat(char *dst, const char *src, size_t size)
                    246: {
                    247:        char *d = dst;
                    248:        const char *s = src;
                    249:        size_t n = size;
                    250:        size_t dlen;
                    251: 
                    252:        /* Find the end of dst and adjust bytes left but don't go past end */
                    253:        while (n-- != 0U && *d != '\0')
                    254:                d++;
                    255:        dlen = d - dst;
                    256:        n = size - dlen;
                    257: 
                    258:        if (n == 0U)
                    259:                return(dlen + strlen(s));
                    260:        while (*s != '\0') {
                    261:                if (n != 1U) {
                    262:                        *d++ = *s;
                    263:                        n--;
                    264:                }
                    265:                s++;
                    266:        }
                    267:        *d = '\0';
                    268: 
                    269:        return(dlen + (s - src));       /* count does not include NUL */
                    270: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>