1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/test/ctest.c Mon Oct 03 12:56:28 2022 +0200 1.3 @@ -0,0 +1,391 @@ 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 +}