ucx/string.c

Wed, 08 Feb 2012 23:43:02 +0100

author
Mike Becker <universe@uap-core.de>
date
Wed, 08 Feb 2012 23:43:02 +0100
changeset 24
e04822101291
parent 20
db7d9860dbbd
child 30
23bb65cbf7a4
permissions
-rw-r--r--

changed make clean + added dlist_clone with copy test + added va_end statements to string.c

     1 /*
     2  * File:   sstring.c
     3  * Author: olaf
     4  *
     5  * Created on 17. Juni 2010, 13:27
     6  */
     8 #include <stdlib.h>
     9 #include <string.h>
    10 #include <stdarg.h>
    12 #include "string.h"
    14 sstr_t sstr (char *s) {
    15     sstr_t string;
    16     string.ptr = s;
    17     string.length = strlen(s);
    18     return string;
    19 }
    21 sstr_t sstrn (char *s, size_t n) {
    22     sstr_t string;
    23     string.ptr = s;
    24     string.length = n;
    25     return string;
    26 }
    28 size_t sstrnlen (size_t n, sstr_t s, ...) {
    29     va_list ap;
    30     size_t size = s.length;
    31     va_start(ap, s);
    33     for (int i=0;i<n-1;i++) {
    34         sstr_t str = va_arg(ap, sstr_t);
    35         size += str.length;
    36     }
    37     va_end(ap);
    39     return size;
    40 }
    42 sstr_t sstrcat (sstr_t s, ...) {
    43     va_list ap;
    44     va_start(ap, s);
    45     s.ptr[0] = 0;
    47     sstr_t str = va_arg (ap, sstr_t);
    48     while (str.ptr != NULL) {
    49         s.ptr = strncat (s.ptr, str.ptr, s.length);
    50         str = va_arg (ap, sstr_t);
    51     }
    52     va_end(ap);
    54     return s;
    55 }
    57 sstr_t sstrncat (size_t n, sstr_t s, sstr_t c1, ...) {
    58     va_list ap;
    59     va_start(ap, c1);
    60     s.ptr[0] = 0;
    62     s.ptr = strncat (s.ptr, c1.ptr, s.length);
    63     for (int i=0;i<n-1;i++) {
    64         sstr_t str = va_arg (ap, sstr_t);
    65         s.ptr = strncat (s.ptr, str.ptr, s.length);
    66     }
    67     va_end(ap);
    69     return s;
    70 }
    72 sstr_t sstrsubs (sstr_t s, size_t start) {
    73     return sstrsubsl (s, start, s.length-start);
    74 }
    76 sstr_t sstrsubsl (sstr_t s, size_t start, size_t length) {
    77     sstr_t new_sstr;
    78     if (start < 0 || start >= s.length || length < 0) {
    79         return s;
    80     }
    81     if (length > s.length-start) {
    82         length = s.length-start;
    83     }
    84     new_sstr.ptr = &s.ptr[start];
    85     new_sstr.length = length;
    86     return new_sstr;
    87 }
    89 int sstrcmp(sstr_t s1, sstr_t s2) {
    90     return strncmp(s1.ptr, s2.ptr, s1.length>s2.length ? s2.length: s1.length);
    91 }
    93 sstr_t sstrdub(sstr_t s) {
    94     sstr_t newstring;
    95     newstring.ptr = (char*) malloc(s.length + 1);
    96     if (newstring.ptr != NULL) {
    97         newstring.length = s.length;
    98         newstring.ptr[newstring.length] = 0;
   100         memcpy(newstring.ptr, s.ptr, s.length);
   101     }
   103     return newstring;
   104 }

mercurial