test/ctestfile.c

changeset 65
7dd4fd1e7071
parent 64
60decfc9ad13
child 67
5da2cb5aea6b
     1.1 --- a/test/ctestfile.c	Mon Oct 03 12:27:10 2022 +0200
     1.2 +++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.3 @@ -1,391 +0,0 @@
     1.4 -/*
     1.5 - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
     1.6 - *
     1.7 - * Copyright 2015 Olaf Wintermann. All rights reserved.
     1.8 - *
     1.9 - * Redistribution and use in source and binary forms, with or without
    1.10 - * modification, are permitted provided that the following conditions are met:
    1.11 - *
    1.12 - *   1. Redistributions of source code must retain the above copyright
    1.13 - *      notice, this list of conditions and the following disclaimer.
    1.14 - *
    1.15 - *   2. Redistributions in binary form must reproduce the above copyright
    1.16 - *      notice, this list of conditions and the following disclaimer in the
    1.17 - *      documentation and/or other materials provided with the distribution.
    1.18 - *
    1.19 - * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
    1.20 - * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    1.21 - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    1.22 - * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
    1.23 - * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
    1.24 - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
    1.25 - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
    1.26 - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
    1.27 - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
    1.28 - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    1.29 - * POSSIBILITY OF SUCH DAMAGE.
    1.30 - */
    1.31 -
    1.32 -#include <time.h>
    1.33 -#include <stdio.h>
    1.34 -#include <stdlib.h>
    1.35 -#include <string.h>
    1.36 -#include <ucx/string.h>
    1.37 -#include <ucx/buffer.h>
    1.38 -#include <ucx/utils.h>
    1.39 -#include <libxml/tree.h>
    1.40 -#include <curl/curl.h>
    1.41 -
    1.42 -#include <openssl/sha.h>
    1.43 -#include <openssl/hmac.h>
    1.44 -#include <openssl/evp.h>
    1.45 -#include <openssl/bio.h>
    1.46 -#include <openssl/buffer.h>
    1.47 -#include <openssl/rand.h>
    1.48 -
    1.49 -#include "utils.h"
    1.50 -#include "crypto.h"
    1.51 -#include "webdav.h"
    1.52 -
    1.53 -#define MACRO1337 1337L
    1.54 -
    1.55 -/* -------------------- This is a testing file. -------------------------- */
    1.56 -/*
    1.57 -time_t util_parse_creationdate(char *str) {
    1.58 -    // example: 2012-11-29T21:35:35Z
    1.59 -    if(!str) {
    1.60 -        return 0;
    1.61 -    }
    1.62 -    // TODO
    1.63 -    return 0;
    1.64 -}
    1.65 -*/
    1.66 -time_t util_parse_lastmodified(char *str) {
    1.67 -    // example: Thu, 29 Nov 2012 21:35:35 GMT
    1.68 -    if(!str) {
    1.69 -        return 0;
    1.70 -    } else {
    1.71 -        return curl_getdate(str, NULL);
    1.72 -    }
    1.73 -}
    1.74 -
    1.75 -int util_getboolean(char *v) {
    1.76 -    if(v[0] == 'T' || v[0] == 't') {
    1.77 -        return 1;
    1.78 -    }
    1.79 -    return 0;
    1.80 -}
    1.81 -
    1.82 -int util_strtoint(char *str, int64_t *value) {
    1.83 -    char *end;
    1.84 -    int64_t val = strtoll(str, &end, 0);
    1.85 -    if(strlen(end) == 0) {
    1.86 -        *value = val;
    1.87 -        return 1;
    1.88 -    } else {
    1.89 -        return 0;
    1.90 -    }
    1.91 -}
    1.92 -
    1.93 -char* util_url_path(char *url) { 
    1.94 -    char *path = NULL;
    1.95 -    size_t len = strlen(url);
    1.96 -    int slashcount = 0;
    1.97 -    int slmax;
    1.98 -    if(len > 7 && !strncasecmp(url, "http://", 7)) {
    1.99 -        slmax = 3;
   1.100 -    } else if(len > 8 && !strncasecmp(url, "https://", 8)) {
   1.101 -        slmax = 3;
   1.102 -    } else {
   1.103 -        slmax = 1;
   1.104 -    }
   1.105 -    char c;
   1.106 -    for(int i=0;i<len;i++) {
   1.107 -        c = url[i];
   1.108 -        if(c == '/') {
   1.109 -            slashcount++;
   1.110 -            if(slashcount == slmax) {
   1.111 -                path = url + i;
   1.112 -                break;
   1.113 -            }
   1.114 -        }
   1.115 -    } 
   1.116 -    return path;
   1.117 -}
   1.118 -
   1.119 -char* util_url_decode(DavSession *sn, char *url) {
   1.120 -    char *unesc = curl_easy_unescape(sn->handle, url, strlen(url), NULL);
   1.121 -    char *ret = strdup(unesc);
   1.122 -    curl_free(unesc);
   1.123 -    return ret;
   1.124 -}
   1.125 -
   1.126 -char* util_resource_name(char *url) {
   1.127 -    int si = 0;
   1.128 -    int osi = 0;
   1.129 -    int i = 0;
   1.130 -    int p = 0;
   1.131 -    char c;
   1.132 -    while((c = url[i]) != 0) {
   1.133 -        if(c == '/') {
   1.134 -            osi = si;
   1.135 -            si = i;
   1.136 -            p = 1;
   1.137 -        }
   1.138 -        i++;
   1.139 -    }
   1.140 -    
   1.141 -    char *name = url + si + p;
   1.142 -    if(name[0] == 0) {
   1.143 -        name = url + osi + p;
   1.144 -        if(name[0] == 0) {
   1.145 -            return url;
   1.146 -        }
   1.147 -    }
   1.148 -    
   1.149 -    return name;
   1.150 -}
   1.151 -
   1.152 -int util_mkdir(char *path, mode_t mode) {
   1.153 -#ifdef _WIN32
   1.154 -    return mkdir(path);
   1.155 -#else
   1.156 -    return mkdir(path, mode);
   1.157 -#endif
   1.158 -}
   1.159 -
   1.160 -char* util_concat_path(char *url_base, char *p) {
   1.161 -    sstr_t base = sstr(url_base);
   1.162 -    sstr_t path;
   1.163 -    if(p) {
   1.164 -        path = sstr(p);
   1.165 -    } else {
   1.166 -        path = sstrn("", 0);
   1.167 -    }
   1.168 -    
   1.169 -    int add_separator = 0;
   1.170 -    if(base.ptr[base.length-1] == '/') {
   1.171 -        if(path.ptr[0] == '/') {
   1.172 -            base.length--;
   1.173 -        }
   1.174 -    } else {
   1.175 -        if(path.length == 0 || path.ptr[0] != '/') {
   1.176 -            add_separator = 1;
   1.177 -        }
   1.178 -    }
   1.179 -    
   1.180 -    sstr_t url;
   1.181 -    if(add_separator) {
   1.182 -        url = sstrcat(3, base, sstr("/"), path);
   1.183 -    } else {
   1.184 -        url = sstrcat(2, base, path);
   1.185 -    }
   1.186 -    
   1.187 -    return url.ptr;
   1.188 -}
   1.189 -
   1.190 -void util_set_url(DavSession *sn, char *href) {
   1.191 -    sstr_t base = sstr(sn->base_url);
   1.192 -    sstr_t href_str = sstr(href);
   1.193 -    
   1.194 -    char *base_path = util_url_path(sn->base_url);
   1.195 -    base.length -= strlen(base_path);
   1.196 -    
   1.197 -    sstr_t url = sstrcat(2, base, href_str);
   1.198 -    
   1.199 -    curl_easy_setopt(sn->handle, CURLOPT_URL, url.ptr);
   1.200 -    free(url.ptr);
   1.201 -}
   1.202 -
   1.203 -char* util_path_to_url(DavSession *sn, char *path) {
   1.204 -    char *space = malloc(256);
   1.205 -    UcxBuffer *url = ucx_buffer_new(space, 256, UCX_BUFFER_AUTOEXTEND);
   1.206 -    
   1.207 -    // add base url
   1.208 -    ucx_buffer_write(sn->base_url, 1, strlen(sn->base_url), url);
   1.209 -    // remove trailing slash
   1.210 -    ucx_buffer_seek(url, -1, SEEK_CUR);
   1.211 -    
   1.212 -    sstr_t p = sstr(path);
   1.213 -    ssize_t ntk = 0;
   1.214 -    sstr_t *tks = sstrsplit(p, S("/"), &ntk);
   1.215 -    
   1.216 -    for(int i=0;i<ntk;i++) {
   1.217 -        sstr_t node = tks[i];
   1.218 -        if(node.length > 0) {
   1.219 -            char *esc = curl_easy_escape(sn->handle, node.ptr, node.length);
   1.220 -            ucx_buffer_putc(url, '/');
   1.221 -            ucx_buffer_write(esc, 1, strlen(esc), url);
   1.222 -            curl_free(esc);
   1.223 -        }
   1.224 -        free(node.ptr);
   1.225 -    }
   1.226 -    free(tks);
   1.227 -    if(path[p.length-1] == '/') {
   1.228 -        ucx_buffer_putc(url, '/');
   1.229 -    }
   1.230 -    ucx_buffer_putc(url, 0);
   1.231 -    
   1.232 -    space = url->space;
   1.233 -    ucx_buffer_free(url);
   1.234 -    
   1.235 -    return space;
   1.236 -}
   1.237 -
   1.238 -char* util_parent_path(char *path) {
   1.239 -    char *name = util_resource_name(path);
   1.240 -    size_t namelen = strlen(name);
   1.241 -    size_t pathlen = strlen(path);
   1.242 -    size_t parentlen = pathlen - namelen;
   1.243 -    char *parent = malloc(parentlen + 1);
   1.244 -    memcpy(parent, path, parentlen);
   1.245 -    parent[parentlen] = '\0';
   1.246 -    return parent;
   1.247 -}
   1.248 -
   1.249 -
   1.250 -char* util_xml_get_text(xmlNode *elm) {
   1.251 -    xmlNode *node = elm->children;
   1.252 -    while(node) {
   1.253 -        if(node->type == XML_TEXT_NODE) {
   1.254 -            return (char*)node->content;
   1.255 -        }
   1.256 -        node = node->next;
   1.257 -    }
   1.258 -    return NULL;
   1.259 -}
   1.260 -
   1.261 -
   1.262 -char* util_base64decode(char *in) {
   1.263 -    int len = 0;
   1.264 -    return util_base64decode_len(in, &len);
   1.265 -}
   1.266 -
   1.267 -char* util_base64decode_len(char* in, int *outlen) {
   1.268 -    size_t len = strlen(in);
   1.269 -    char *out = calloc(1, len);
   1.270 -    
   1.271 -    BIO* b = BIO_new_mem_buf(in, len);
   1.272 -    BIO *d = BIO_new(BIO_f_base64());
   1.273 -    BIO_set_flags(d, BIO_FLAGS_BASE64_NO_NL);
   1.274 -    b = BIO_push(d, b);
   1.275 -
   1.276 -    *outlen = BIO_read(b, out, len);
   1.277 -    BIO_free_all(b);
   1.278 -    
   1.279 -    return out;
   1.280 -}
   1.281 -
   1.282 -char* util_base64encode(char *in, size_t len) { 
   1.283 -    BIO *b;
   1.284 -    BIO *e;
   1.285 -    BUF_MEM *mem;
   1.286 -
   1.287 -    e = BIO_new(BIO_f_base64());
   1.288 -    b = BIO_new(BIO_s_mem());
   1.289 -    
   1.290 -    e = BIO_push(e, b);
   1.291 -    BIO_write(e, in, len);
   1.292 -    BIO_flush(e);
   1.293 -    
   1.294 -    BIO_get_mem_ptr(e, &mem);
   1.295 -    char *out = malloc(mem->length);
   1.296 -    memcpy(out, mem->data, mem->length -1);
   1.297 -    out[mem->length - 1] = '\0';
   1.298 -
   1.299 -    BIO_free_all(e);
   1.300 -
   1.301 -    return out;
   1.302 -}
   1.303 -
   1.304 -char* util_encrypt_str(DavSession *sn, char *str, char *key) {
   1.305 -    DavKey *k = dav_context_get_key(sn->context, key);
   1.306 -    if(!k) {
   1.307 -        // TODO: session error
   1.308 -        return NULL;
   1.309 -    }
   1.310 -    
   1.311 -    char *enc_str = aes_encrypt(str, k);
   1.312 -    char *ret_str = dav_session_strdup(sn, enc_str);
   1.313 -    free(enc_str);
   1.314 -    return ret_str;
   1.315 -}
   1.316 -
   1.317 -/* commented out for testing reasons */
   1.318 -/*
   1.319 -char* util_decrypt_str(DavSession *sn, char *str, char *key) {
   1.320 -    DavKey *k = dav_context_get_key(sn->context, key);
   1.321 -    if(!k) {
   1.322 -        // TODO: session error
   1.323 -        return NULL;
   1.324 -    }
   1.325 -    
   1.326 -    char *dec_str = aes_decrypt(str, k);
   1.327 -    char *ret_str = dav_session_strdup(sn, dec_str);
   1.328 -    free(dec_str);
   1.329 -    return ret_str;
   1.330 -}
   1.331 -*/
   1.332 -char* util_random_str() {
   1.333 -    unsigned char *str = malloc(25);
   1.334 -    str[24] = '\0';
   1.335 -    
   1.336 -    sstr_t t = S(
   1.337 -            "01234567890"
   1.338 -            "abcdefghijklmnopqrstuvwxyz"
   1.339 -            "ABCDEFGHIJKLMNOPQRSTUVWXYZ");
   1.340 -    const unsigned char *table = (const unsigned char*)t.ptr;
   1.341 -    
   1.342 -    RAND_pseudo_bytes(str, 24);
   1.343 -    for(int i=0;i<24;i++) {
   1.344 -        int c = str[i] % t.length;
   1.345 -        str[i] = table[c];
   1.346 -    }
   1.347 -    
   1.348 -    return (char*)str;
   1.349 -}
   1.350 -
   1.351 -/*
   1.352 - * gets a substring from 0 to the appearance of the token
   1.353 - * tokens are separated by space
   1.354 - * sets sub to the substring and returns the remaining string
   1.355 - */
   1.356 -sstr_t util_getsubstr_until_token(sstr_t str, sstr_t token, sstr_t *sub) {  
   1.357 -    int i;
   1.358 -    int token_start = -1;
   1.359 -    int token_end = -1;
   1.360 -    for(i=0;i<=str.length;i++) {
   1.361 -        int c;
   1.362 -        if(i == str.length) {
   1.363 -            c = ' ';
   1.364 -        } else {
   1.365 -            c = str.ptr[i];
   1.366 -        }
   1.367 -        if(c < 33) {
   1.368 -            if(token_start != -1) {
   1.369 -                token_end = i;
   1.370 -                size_t len = token_end - token_start;
   1.371 -                sstr_t tk = sstrsubsl(str, token_start, len);
   1.372 -                //printf("token: {%.*s}\n", token.length, token.ptr);
   1.373 -                if(!sstrcmp(tk, token)) {
   1.374 -                    *sub = sstrtrim(sstrsubsl(str, 0, token_start));
   1.375 -                    break;
   1.376 -                }
   1.377 -                token_start = -1;
   1.378 -                token_end = -1;
   1.379 -            }
   1.380 -        } else {
   1.381 -            if(token_start == -1) {
   1.382 -                token_start = i;
   1.383 -            }
   1.384 -        }
   1.385 -    }
   1.386 -    
   1.387 -    if(i < str.length) {
   1.388 -        return sstrtrim(sstrsubs(str, i));
   1.389 -    } else {
   1.390 -        str.ptr = NULL;
   1.391 -        str.length = 0;
   1.392 -        return str;
   1.393 -    }
   1.394 -}

mercurial