1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/test/ctestfile.c Tue Apr 21 09:47:52 2015 +0200
1.3 @@ -0,0 +1,386 @@
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 +
1.54 +time_t util_parse_creationdate(char *str) {
1.55 + // example: 2012-11-29T21:35:35Z
1.56 + if(!str) {
1.57 + return 0;
1.58 + }
1.59 + // TODO
1.60 + return 0;
1.61 +}
1.62 +
1.63 +time_t util_parse_lastmodified(char *str) {
1.64 + // example: Thu, 29 Nov 2012 21:35:35 GMT
1.65 + if(!str) {
1.66 + return 0;
1.67 + } else {
1.68 + return curl_getdate(str, NULL);
1.69 + }
1.70 +}
1.71 +
1.72 +int util_getboolean(char *v) {
1.73 + if(v[0] == 'T' || v[0] == 't') {
1.74 + return 1;
1.75 + }
1.76 + return 0;
1.77 +}
1.78 +
1.79 +int util_strtoint(char *str, int64_t *value) {
1.80 + char *end;
1.81 + int64_t val = strtoll(str, &end, 0);
1.82 + if(strlen(end) == 0) {
1.83 + *value = val;
1.84 + return 1;
1.85 + } else {
1.86 + return 0;
1.87 + }
1.88 +}
1.89 +
1.90 +char* util_url_path(char *url) {
1.91 + char *path = NULL;
1.92 + size_t len = strlen(url);
1.93 + int slashcount = 0;
1.94 + int slmax;
1.95 + if(len > 7 && !strncasecmp(url, "http://", 7)) {
1.96 + slmax = 3;
1.97 + } else if(len > 8 && !strncasecmp(url, "https://", 8)) {
1.98 + slmax = 3;
1.99 + } else {
1.100 + slmax = 1;
1.101 + }
1.102 + char c;
1.103 + for(int i=0;i<len;i++) {
1.104 + c = url[i];
1.105 + if(c == '/') {
1.106 + slashcount++;
1.107 + if(slashcount == slmax) {
1.108 + path = url + i;
1.109 + break;
1.110 + }
1.111 + }
1.112 + }
1.113 + return path;
1.114 +}
1.115 +
1.116 +char* util_url_decode(DavSession *sn, char *url) {
1.117 + char *unesc = curl_easy_unescape(sn->handle, url, strlen(url), NULL);
1.118 + char *ret = strdup(unesc);
1.119 + curl_free(unesc);
1.120 + return ret;
1.121 +}
1.122 +
1.123 +char* util_resource_name(char *url) {
1.124 + int si = 0;
1.125 + int osi = 0;
1.126 + int i = 0;
1.127 + int p = 0;
1.128 + char c;
1.129 + while((c = url[i]) != 0) {
1.130 + if(c == '/') {
1.131 + osi = si;
1.132 + si = i;
1.133 + p = 1;
1.134 + }
1.135 + i++;
1.136 + }
1.137 +
1.138 + char *name = url + si + p;
1.139 + if(name[0] == 0) {
1.140 + name = url + osi + p;
1.141 + if(name[0] == 0) {
1.142 + return url;
1.143 + }
1.144 + }
1.145 +
1.146 + return name;
1.147 +}
1.148 +
1.149 +int util_mkdir(char *path, mode_t mode) {
1.150 +#ifdef _WIN32
1.151 + return mkdir(path);
1.152 +#else
1.153 + return mkdir(path, mode);
1.154 +#endif
1.155 +}
1.156 +
1.157 +char* util_concat_path(char *url_base, char *p) {
1.158 + sstr_t base = sstr(url_base);
1.159 + sstr_t path;
1.160 + if(p) {
1.161 + path = sstr(p);
1.162 + } else {
1.163 + path = sstrn("", 0);
1.164 + }
1.165 +
1.166 + int add_separator = 0;
1.167 + if(base.ptr[base.length-1] == '/') {
1.168 + if(path.ptr[0] == '/') {
1.169 + base.length--;
1.170 + }
1.171 + } else {
1.172 + if(path.length == 0 || path.ptr[0] != '/') {
1.173 + add_separator = 1;
1.174 + }
1.175 + }
1.176 +
1.177 + sstr_t url;
1.178 + if(add_separator) {
1.179 + url = sstrcat(3, base, sstr("/"), path);
1.180 + } else {
1.181 + url = sstrcat(2, base, path);
1.182 + }
1.183 +
1.184 + return url.ptr;
1.185 +}
1.186 +
1.187 +void util_set_url(DavSession *sn, char *href) {
1.188 + sstr_t base = sstr(sn->base_url);
1.189 + sstr_t href_str = sstr(href);
1.190 +
1.191 + char *base_path = util_url_path(sn->base_url);
1.192 + base.length -= strlen(base_path);
1.193 +
1.194 + sstr_t url = sstrcat(2, base, href_str);
1.195 +
1.196 + curl_easy_setopt(sn->handle, CURLOPT_URL, url.ptr);
1.197 + free(url.ptr);
1.198 +}
1.199 +
1.200 +char* util_path_to_url(DavSession *sn, char *path) {
1.201 + char *space = malloc(256);
1.202 + UcxBuffer *url = ucx_buffer_new(space, 256, UCX_BUFFER_AUTOEXTEND);
1.203 +
1.204 + // add base url
1.205 + ucx_buffer_write(sn->base_url, 1, strlen(sn->base_url), url);
1.206 + // remove trailing slash
1.207 + ucx_buffer_seek(url, -1, SEEK_CUR);
1.208 +
1.209 + sstr_t p = sstr(path);
1.210 + ssize_t ntk = 0;
1.211 + sstr_t *tks = sstrsplit(p, S("/"), &ntk);
1.212 +
1.213 + for(int i=0;i<ntk;i++) {
1.214 + sstr_t node = tks[i];
1.215 + if(node.length > 0) {
1.216 + char *esc = curl_easy_escape(sn->handle, node.ptr, node.length);
1.217 + ucx_buffer_putc(url, '/');
1.218 + ucx_buffer_write(esc, 1, strlen(esc), url);
1.219 + curl_free(esc);
1.220 + }
1.221 + free(node.ptr);
1.222 + }
1.223 + free(tks);
1.224 + if(path[p.length-1] == '/') {
1.225 + ucx_buffer_putc(url, '/');
1.226 + }
1.227 + ucx_buffer_putc(url, 0);
1.228 +
1.229 + space = url->space;
1.230 + ucx_buffer_free(url);
1.231 +
1.232 + return space;
1.233 +}
1.234 +
1.235 +char* util_parent_path(char *path) {
1.236 + char *name = util_resource_name(path);
1.237 + size_t namelen = strlen(name);
1.238 + size_t pathlen = strlen(path);
1.239 + size_t parentlen = pathlen - namelen;
1.240 + char *parent = malloc(parentlen + 1);
1.241 + memcpy(parent, path, parentlen);
1.242 + parent[parentlen] = '\0';
1.243 + return parent;
1.244 +}
1.245 +
1.246 +
1.247 +char* util_xml_get_text(xmlNode *elm) {
1.248 + xmlNode *node = elm->children;
1.249 + while(node) {
1.250 + if(node->type == XML_TEXT_NODE) {
1.251 + return (char*)node->content;
1.252 + }
1.253 + node = node->next;
1.254 + }
1.255 + return NULL;
1.256 +}
1.257 +
1.258 +
1.259 +char* util_base64decode(char *in) {
1.260 + int len = 0;
1.261 + return util_base64decode_len(in, &len);
1.262 +}
1.263 +
1.264 +char* util_base64decode_len(char* in, int *outlen) {
1.265 + size_t len = strlen(in);
1.266 + char *out = calloc(1, len);
1.267 +
1.268 + BIO* b = BIO_new_mem_buf(in, len);
1.269 + BIO *d = BIO_new(BIO_f_base64());
1.270 + BIO_set_flags(d, BIO_FLAGS_BASE64_NO_NL);
1.271 + b = BIO_push(d, b);
1.272 +
1.273 + *outlen = BIO_read(b, out, len);
1.274 + BIO_free_all(b);
1.275 +
1.276 + return out;
1.277 +}
1.278 +
1.279 +char* util_base64encode(char *in, size_t len) {
1.280 + BIO *b;
1.281 + BIO *e;
1.282 + BUF_MEM *mem;
1.283 +
1.284 + e = BIO_new(BIO_f_base64());
1.285 + b = BIO_new(BIO_s_mem());
1.286 +
1.287 + e = BIO_push(e, b);
1.288 + BIO_write(e, in, len);
1.289 + BIO_flush(e);
1.290 +
1.291 + BIO_get_mem_ptr(e, &mem);
1.292 + char *out = malloc(mem->length);
1.293 + memcpy(out, mem->data, mem->length -1);
1.294 + out[mem->length - 1] = '\0';
1.295 +
1.296 + BIO_free_all(e);
1.297 +
1.298 + return out;
1.299 +}
1.300 +
1.301 +char* util_encrypt_str(DavSession *sn, char *str, char *key) {
1.302 + DavKey *k = dav_context_get_key(sn->context, key);
1.303 + if(!k) {
1.304 + // TODO: session error
1.305 + return NULL;
1.306 + }
1.307 +
1.308 + char *enc_str = aes_encrypt(str, k);
1.309 + char *ret_str = dav_session_strdup(sn, enc_str);
1.310 + free(enc_str);
1.311 + return ret_str;
1.312 +}
1.313 +
1.314 +char* util_decrypt_str(DavSession *sn, char *str, char *key) {
1.315 + DavKey *k = dav_context_get_key(sn->context, key);
1.316 + if(!k) {
1.317 + // TODO: session error
1.318 + return NULL;
1.319 + }
1.320 +
1.321 + char *dec_str = aes_decrypt(str, k);
1.322 + char *ret_str = dav_session_strdup(sn, dec_str);
1.323 + free(dec_str);
1.324 + return ret_str;
1.325 +}
1.326 +
1.327 +char* util_random_str() {
1.328 + unsigned char *str = malloc(25);
1.329 + str[24] = '\0';
1.330 +
1.331 + sstr_t t = S(
1.332 + "01234567890"
1.333 + "abcdefghijklmnopqrstuvwxyz"
1.334 + "ABCDEFGHIJKLMNOPQRSTUVWXYZ");
1.335 + const unsigned char *table = (const unsigned char*)t.ptr;
1.336 +
1.337 + RAND_pseudo_bytes(str, 24);
1.338 + for(int i=0;i<24;i++) {
1.339 + int c = str[i] % t.length;
1.340 + str[i] = table[c];
1.341 + }
1.342 +
1.343 + return (char*)str;
1.344 +}
1.345 +
1.346 +/*
1.347 + * gets a substring from 0 to the appearance of the token
1.348 + * tokens are separated by space
1.349 + * sets sub to the substring and returns the remaining string
1.350 + */
1.351 +sstr_t util_getsubstr_until_token(sstr_t str, sstr_t token, sstr_t *sub) {
1.352 + int i;
1.353 + int token_start = -1;
1.354 + int token_end = -1;
1.355 + for(i=0;i<=str.length;i++) {
1.356 + int c;
1.357 + if(i == str.length) {
1.358 + c = ' ';
1.359 + } else {
1.360 + c = str.ptr[i];
1.361 + }
1.362 + if(c < 33) {
1.363 + if(token_start != -1) {
1.364 + token_end = i;
1.365 + size_t len = token_end - token_start;
1.366 + sstr_t tk = sstrsubsl(str, token_start, len);
1.367 + //printf("token: {%.*s}\n", token.length, token.ptr);
1.368 + if(!sstrcmp(tk, token)) {
1.369 + *sub = sstrtrim(sstrsubsl(str, 0, token_start));
1.370 + break;
1.371 + }
1.372 + token_start = -1;
1.373 + token_end = -1;
1.374 + }
1.375 + } else {
1.376 + if(token_start == -1) {
1.377 + token_start = i;
1.378 + }
1.379 + }
1.380 + }
1.381 +
1.382 + if(i < str.length) {
1.383 + return sstrtrim(sstrsubs(str, i));
1.384 + } else {
1.385 + str.ptr = NULL;
1.386 + str.length = 0;
1.387 + return str;
1.388 + }
1.389 +}
