cannam@85: /* cannam@85: Copyright 2011-2012 David Robillard cannam@85: cannam@85: Permission to use, copy, modify, and/or distribute this software for any cannam@85: purpose with or without fee is hereby granted, provided that the above cannam@85: copyright notice and this permission notice appear in all copies. cannam@85: cannam@85: THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES cannam@85: WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF cannam@85: MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR cannam@85: ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES cannam@85: WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN cannam@85: ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF cannam@85: OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. cannam@85: */ cannam@85: cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: #include cannam@85: cannam@85: #include "serd/serd.h" cannam@85: cannam@85: #define USTR(s) ((const uint8_t*)(s)) cannam@85: cannam@85: #ifdef _WIN32 cannam@85: # define INFINITY (DBL_MAX + DBL_MAX) cannam@85: # define NAN (INFINITY - INFINITY) cannam@85: #endif cannam@85: cannam@85: static int cannam@85: failure(const char* fmt, ...) cannam@85: { cannam@85: va_list args; cannam@85: va_start(args, fmt); cannam@85: fprintf(stderr, "error: "); cannam@85: vfprintf(stderr, fmt, args); cannam@85: va_end(args); cannam@85: return 1; cannam@85: } cannam@85: cannam@85: static bool cannam@85: test_strtod(double dbl, double max_delta) cannam@85: { cannam@85: char buf[1024]; cannam@85: snprintf(buf, sizeof(buf), "%lf", dbl); cannam@85: cannam@85: char* endptr = NULL; cannam@85: const double out = serd_strtod(buf, &endptr); cannam@85: cannam@85: const double diff = fabs(out - dbl); cannam@85: if (diff > max_delta) { cannam@85: return !failure("Parsed %lf != %lf (delta %lf)\n", dbl, out, diff); cannam@85: } cannam@85: return true; cannam@85: } cannam@85: cannam@85: static SerdStatus cannam@85: count_prefixes(void* handle, const SerdNode* name, const SerdNode* uri) cannam@85: { cannam@85: ++*(int*)handle; cannam@85: return SERD_SUCCESS; cannam@85: } cannam@85: cannam@85: typedef struct { cannam@85: int n_statements; cannam@85: const SerdNode* graph; cannam@85: } ReaderTest; cannam@85: cannam@85: static SerdStatus cannam@85: test_sink(void* handle, cannam@85: SerdStatementFlags flags, cannam@85: const SerdNode* graph, cannam@85: const SerdNode* subject, cannam@85: const SerdNode* predicate, cannam@85: const SerdNode* object, cannam@85: const SerdNode* object_datatype, cannam@85: const SerdNode* object_lang) cannam@85: { cannam@85: ReaderTest* rt = (ReaderTest*)handle; cannam@85: ++rt->n_statements; cannam@85: rt->graph = graph; cannam@85: return SERD_SUCCESS; cannam@85: } cannam@85: cannam@85: int cannam@85: main(void) cannam@85: { cannam@85: #define MAX 1000000 cannam@85: #define NUM_TESTS 1000 cannam@85: for (int i = 0; i < NUM_TESTS; ++i) { cannam@85: double dbl = rand() % MAX; cannam@85: dbl += (rand() % MAX) / (double)MAX; cannam@85: cannam@85: if (!test_strtod(dbl, 1 / (double)MAX)) { cannam@85: return 1; cannam@85: } cannam@85: } cannam@85: cannam@85: const double expt_test_nums[] = { cannam@85: 2.0E18, -5e19, +8e20, 2e+34, -5e-5, 8e0, 9e-0, 2e+0 cannam@85: }; cannam@85: cannam@85: const char* expt_test_strs[] = { cannam@85: "02e18", "-5e019", "+8e20", "2E+34", "-5E-5", "8E0", "9e-0", " 2e+0" cannam@85: }; cannam@85: cannam@85: for (unsigned i = 0; i < sizeof(expt_test_nums) / sizeof(double); ++i) { cannam@85: const double num = serd_strtod(expt_test_strs[i], NULL); cannam@85: const double delta = fabs(num - expt_test_nums[i]); cannam@85: if (delta > DBL_EPSILON) { cannam@85: return failure("Parsed `%s' %lf != %lf (delta %lf)\n", cannam@85: expt_test_strs[i], num, expt_test_nums[i], delta); cannam@85: } cannam@85: } cannam@85: cannam@85: // Test serd_node_new_decimal cannam@85: cannam@85: const double dbl_test_nums[] = { cannam@85: 0.0, 9.0, 10.0, .01, 2.05, -16.00001, 5.000000005, 0.0000000001, NAN, INFINITY cannam@85: }; cannam@85: cannam@85: const char* dbl_test_strs[] = { cannam@85: "0.0", "9.0", "10.0", "0.01", "2.05", "-16.00001", "5.00000001", "0.0", NULL, NULL cannam@85: }; cannam@85: cannam@85: for (unsigned i = 0; i < sizeof(dbl_test_nums) / sizeof(double); ++i) { cannam@85: SerdNode node = serd_node_new_decimal(dbl_test_nums[i], 8); cannam@85: const bool pass = (node.buf && dbl_test_strs[i]) cannam@85: ? !strcmp((const char*)node.buf, (const char*)dbl_test_strs[i]) cannam@85: : ((const char*)node.buf == dbl_test_strs[i]); cannam@85: if (!pass) { cannam@85: return failure("Serialised `%s' != %s\n", cannam@85: node.buf, dbl_test_strs[i]); cannam@85: } cannam@85: const size_t len = node.buf ? strlen((const char*)node.buf) : 0; cannam@85: if (node.n_bytes != len || node.n_chars != len) { cannam@85: return failure("Length %zu,%zu != %zu\n", cannam@85: node.n_bytes, node.n_chars, len); cannam@85: } cannam@85: serd_node_free(&node); cannam@85: } cannam@85: cannam@85: // Test serd_node_new_integer cannam@85: cannam@85: const long int_test_nums[] = { cannam@85: 0, -0, -23, 23, -12340, 1000, -1000 cannam@85: }; cannam@85: cannam@85: const char* int_test_strs[] = { cannam@85: "0", "0", "-23", "23", "-12340", "1000", "-1000" cannam@85: }; cannam@85: cannam@85: for (unsigned i = 0; i < sizeof(int_test_nums) / sizeof(double); ++i) { cannam@85: SerdNode node = serd_node_new_integer(int_test_nums[i]); cannam@85: if (strcmp((const char*)node.buf, (const char*)int_test_strs[i])) { cannam@85: return failure("Serialised `%s' != %s\n", cannam@85: node.buf, int_test_strs[i]); cannam@85: } cannam@85: const size_t len = strlen((const char*)node.buf); cannam@85: if (node.n_bytes != len || node.n_chars != len) { cannam@85: return failure("Length %zu,%zu != %zu\n", cannam@85: node.n_bytes, node.n_chars, len); cannam@85: } cannam@85: serd_node_free(&node); cannam@85: } cannam@85: cannam@85: // Test serd_node_new_blob cannam@85: for (size_t size = 0; size < 256; ++size) { cannam@85: uint8_t* data = (uint8_t*)malloc(size); cannam@85: for (size_t i = 0; i < size; ++i) { cannam@85: data[i] = (uint8_t)(rand() % 256); cannam@85: } cannam@85: cannam@85: SerdNode blob = serd_node_new_blob(data, size, size % 5); cannam@85: cannam@85: if (blob.n_bytes != blob.n_chars) { cannam@85: return failure("Blob %zu bytes != %zu chars\n", cannam@85: blob.n_bytes, blob.n_chars); cannam@85: } cannam@85: cannam@85: size_t out_size; cannam@85: uint8_t* out = (uint8_t*)serd_base64_decode( cannam@85: blob.buf, blob.n_bytes, &out_size); cannam@85: if (out_size != size) { cannam@85: return failure("Blob size %zu != %zu\n", out_size, size); cannam@85: } cannam@85: cannam@85: for (size_t i = 0; i < size; ++i) { cannam@85: if (out[i] != data[i]) { cannam@85: return failure("Corrupt blob at byte %zu\n", i); cannam@85: } cannam@85: } cannam@85: cannam@85: serd_node_free(&blob); cannam@85: free(out); cannam@85: free(data); cannam@85: } cannam@85: cannam@85: // Test serd_strlen cannam@85: cannam@85: const uint8_t str[] = { '"', '5', 0xE2, 0x82, 0xAC, '"', '\n', 0 }; cannam@85: cannam@85: size_t n_bytes; cannam@85: SerdNodeFlags flags; cannam@85: size_t len = serd_strlen(str, &n_bytes, &flags); cannam@85: if (len != 5 || n_bytes != 7 cannam@85: || flags != (SERD_HAS_QUOTE|SERD_HAS_NEWLINE)) { cannam@85: return failure("Bad serd_strlen(%s) len=%zu n_bytes=%zu flags=%u\n", cannam@85: str, len, n_bytes, flags); cannam@85: } cannam@85: len = serd_strlen(str, NULL, &flags); cannam@85: if (len != 5) { cannam@85: return failure("Bad serd_strlen(%s) len=%zu flags=%u\n", cannam@85: str, len, flags); cannam@85: } cannam@85: cannam@85: // Test serd_strerror cannam@85: cannam@85: const uint8_t* msg = NULL; cannam@85: if (strcmp((const char*)(msg = serd_strerror(SERD_SUCCESS)), "Success")) { cannam@85: return failure("Bad message `%s' for SERD_SUCCESS\n", msg); cannam@85: } cannam@85: for (int i = SERD_FAILURE; i <= SERD_ERR_INTERNAL; ++i) { cannam@85: msg = serd_strerror((SerdStatus)i); cannam@85: if (!strcmp((const char*)msg, "Success")) { cannam@85: return failure("Bad message `%s' for (SerdStatus)%d\n", msg, i); cannam@85: } cannam@85: } cannam@85: msg = serd_strerror((SerdStatus)-1); cannam@85: cannam@85: // Test serd_uri_to_path cannam@85: cannam@85: const uint8_t* uri = (const uint8_t*)"file:///home/user/foo.ttl"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "/home/user/foo.ttl")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"file://localhost/home/user/foo.ttl"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "/home/user/foo.ttl")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"file:illegal/file/uri"; cannam@85: if (serd_uri_to_path(uri)) { cannam@85: return failure("Converted invalid URI `%s' to path `%s'\n", cannam@85: uri, serd_uri_to_path(uri)); cannam@85: } cannam@85: uri = (const uint8_t*)"file:///c:/awful/system"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "c:/awful/system")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"file:///c:awful/system"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "/c:awful/system")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"file:///0/1"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "/0/1")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"C:\\Windows\\Sucks"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "C:\\Windows\\Sucks")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: uri = (const uint8_t*)"C|/Windows/Sucks"; cannam@85: if (strcmp((const char*)serd_uri_to_path(uri), "C|/Windows/Sucks")) { cannam@85: return failure("Bad path %s for %s\n", serd_uri_to_path(uri), uri); cannam@85: } cannam@85: cannam@85: // Test serd_node_new_file_uri and serd_file_uri_parse cannam@85: SerdURI furi; cannam@85: const uint8_t* path_str = USTR("C:/My 100%"); cannam@85: SerdNode file_node = serd_node_new_file_uri(path_str, 0, &furi, true); cannam@85: uint8_t* hostname = NULL; cannam@85: uint8_t* out_path = serd_file_uri_parse(file_node.buf, &hostname); cannam@85: if (strcmp((const char*)file_node.buf, "file:///C:/My%20100%%")) { cannam@85: return failure("Bad URI %s\n", file_node.buf); cannam@85: } else if (hostname) { cannam@85: return failure("hostname `%s' shouldn't exist\n", hostname); cannam@85: } else if (strcmp((const char*)path_str, (const char*)out_path)) { cannam@85: return failure("path=>URI=>path failure %s => %s => %s\n", cannam@85: path_str, file_node.buf, out_path); cannam@85: } cannam@85: free(out_path); cannam@85: serd_node_free(&file_node); cannam@85: cannam@85: path_str = USTR("C:\\Pointless Space"); cannam@85: file_node = serd_node_new_file_uri(path_str, USTR("pwned"), 0, true); cannam@85: hostname = NULL; cannam@85: out_path = serd_file_uri_parse(file_node.buf, &hostname); cannam@85: if (strcmp((const char*)file_node.buf, "file://pwned/C:/Pointless%20Space")) { cannam@85: return failure("Bad URI %s\n", file_node.buf); cannam@85: } else if (!hostname || strcmp((const char*)hostname, "pwned")) { cannam@85: return failure("Bad hostname `%s'\n", hostname); cannam@85: } else if (strcmp((const char*)out_path, "C:/Pointless Space")) { cannam@85: return failure("path=>URI=>path failure %s => %s => %s\n", cannam@85: path_str, file_node.buf, out_path); cannam@85: } cannam@85: free(hostname); cannam@85: free(out_path); cannam@85: serd_node_free(&file_node); cannam@85: cannam@85: path_str = USTR("/foo/bar"); cannam@85: file_node = serd_node_new_file_uri(path_str, 0, 0, true); cannam@85: hostname = NULL; cannam@85: out_path = serd_file_uri_parse(file_node.buf, &hostname); cannam@85: if (strcmp((const char*)file_node.buf, "file:///foo/bar")) { cannam@85: return failure("Bad URI %s\n", file_node.buf); cannam@85: } else if (hostname) { cannam@85: return failure("hostname `%s' shouldn't exist\n", hostname); cannam@85: } else if (strcmp((const char*)path_str, (const char*)out_path)) { cannam@85: return failure("path=>URI=>path failure %s => %s => %s\n", cannam@85: path_str, file_node.buf, out_path); cannam@85: } cannam@85: free(out_path); cannam@85: serd_node_free(&file_node); cannam@85: cannam@85: path_str = USTR("/foo/bar"); cannam@85: file_node = serd_node_new_file_uri(path_str, USTR("localhost"), 0, true); cannam@85: out_path = serd_file_uri_parse(file_node.buf, &hostname); cannam@85: if (strcmp((const char*)file_node.buf, "file://localhost/foo/bar")) { cannam@85: return failure("Bad URI %s\n", file_node.buf); cannam@85: } else if (strcmp((const char*)hostname, "localhost")) { cannam@85: return failure("incorrect hostname `%s'\n", hostname); cannam@85: } else if (strcmp((const char*)path_str, (const char*)out_path)) { cannam@85: return failure("path=>URI=>path failure %s => %s => %s\n", cannam@85: path_str, file_node.buf, out_path); cannam@85: } cannam@85: free(hostname); cannam@85: free(out_path); cannam@85: serd_node_free(&file_node); cannam@85: cannam@85: path_str = USTR("a/relative path"); cannam@85: file_node = serd_node_new_file_uri(path_str, 0, 0, false); cannam@85: out_path = serd_file_uri_parse(file_node.buf, &hostname); cannam@85: if (strcmp((const char*)file_node.buf, "a/relative path")) { cannam@85: return failure("Bad URI %s\n", file_node.buf); cannam@85: } else if (hostname) { cannam@85: return failure("hostname `%s' shouldn't exist\n", hostname); cannam@85: } else if (strcmp((const char*)path_str, (const char*)out_path)) { cannam@85: return failure("path=>URI=>path failure %s => %s => %s\n", cannam@85: path_str, file_node.buf, out_path); cannam@85: } cannam@85: free(hostname); cannam@85: free(out_path); cannam@85: serd_node_free(&file_node); cannam@85: cannam@85: if (serd_file_uri_parse(USTR("file://invalid"), NULL)) { cannam@85: return failure("successfully parsed bogus URI \n"); cannam@85: } cannam@85: cannam@85: out_path = serd_file_uri_parse(USTR("file://host/foo/%XYbar"), NULL); cannam@85: if (strcmp((const char*)out_path, "/foo/bar")) { cannam@85: return failure("bad tolerance of junk escape: `%s'\n", out_path); cannam@85: } cannam@85: free(out_path); cannam@85: out_path = serd_file_uri_parse(USTR("file://host/foo/%0Abar"), NULL); cannam@85: if (strcmp((const char*)out_path, "/foo/bar")) { cannam@85: return failure("bad tolerance of junk escape: `%s'\n", out_path); cannam@85: } cannam@85: free(out_path); cannam@85: cannam@85: // Test serd_node_equals cannam@85: cannam@85: const uint8_t replacement_char_str[] = { 0xEF, 0xBF, 0xBD, 0 }; cannam@85: SerdNode lhs = serd_node_from_string(SERD_LITERAL, replacement_char_str); cannam@85: SerdNode rhs = serd_node_from_string(SERD_LITERAL, USTR("123")); cannam@85: if (serd_node_equals(&lhs, &rhs)) { cannam@85: return failure("%s == %s\n", lhs.buf, rhs.buf); cannam@85: } cannam@85: cannam@85: SerdNode qnode = serd_node_from_string(SERD_CURIE, USTR("foo:bar")); cannam@85: if (serd_node_equals(&lhs, &qnode)) { cannam@85: return failure("%s == %s\n", lhs.buf, qnode.buf); cannam@85: } cannam@85: cannam@85: if (!serd_node_equals(&lhs, &lhs)) { cannam@85: return failure("%s != %s\n", lhs.buf, lhs.buf); cannam@85: } cannam@85: cannam@85: // Test serd_node_from_string cannam@85: cannam@85: SerdNode node = serd_node_from_string(SERD_LITERAL, (const uint8_t*)"hello\""); cannam@85: if (node.n_bytes != 6 || node.n_chars != 6 || node.flags != SERD_HAS_QUOTE cannam@85: || strcmp((const char*)node.buf, "hello\"")) { cannam@85: return failure("Bad node %s %zu %zu %d %d\n", cannam@85: node.buf, node.n_bytes, node.n_chars, node.flags, node.type); cannam@85: } cannam@85: cannam@85: node = serd_node_from_string(SERD_URI, NULL); cannam@85: if (!serd_node_equals(&node, &SERD_NODE_NULL)) { cannam@85: return failure("Creating node from NULL string failed\n"); cannam@85: } cannam@85: cannam@85: // Test serd_node_new_uri_from_string cannam@85: cannam@85: SerdURI base_uri; cannam@85: SerdNode base = serd_node_new_uri_from_string(USTR("http://example.org/"), cannam@85: NULL, &base_uri); cannam@85: SerdNode nil = serd_node_new_uri_from_string(NULL, &base_uri, NULL); cannam@85: if (nil.type != SERD_URI || strcmp((const char*)nil.buf, (const char*)base.buf)) { cannam@85: return failure("URI %s != base %s\n", nil.buf, base.buf); cannam@85: } cannam@85: serd_node_free(&base); cannam@85: serd_node_free(&nil); cannam@85: cannam@85: // Test SerdEnv cannam@85: cannam@85: SerdNode u = serd_node_from_string(SERD_URI, USTR("http://example.org/foo")); cannam@85: SerdNode b = serd_node_from_string(SERD_CURIE, USTR("invalid")); cannam@85: SerdNode c = serd_node_from_string(SERD_CURIE, USTR("eg.2:b")); cannam@85: SerdEnv* env = serd_env_new(NULL); cannam@85: serd_env_set_prefix_from_strings(env, USTR("eg.2"), USTR("http://example.org/")); cannam@85: cannam@85: if (!serd_env_set_base_uri(env, &node)) { cannam@85: return failure("Set base URI to %s\n", node.buf); cannam@85: } cannam@85: cannam@85: SerdChunk prefix, suffix; cannam@85: if (!serd_env_expand(env, &b, &prefix, &suffix)) { cannam@85: return failure("Expanded invalid curie %s\n", b.buf); cannam@85: } cannam@85: cannam@85: SerdNode xnode = serd_env_expand_node(env, &node); cannam@85: if (!serd_node_equals(&xnode, &SERD_NODE_NULL)) { cannam@85: return failure("Expanded %s to %s\n", c.buf, xnode.buf); cannam@85: } cannam@85: cannam@85: SerdNode xu = serd_env_expand_node(env, &u); cannam@85: if (strcmp((const char*)xu.buf, "http://example.org/foo")) { cannam@85: return failure("Expanded %s to %s\n", c.buf, xu.buf); cannam@85: } cannam@85: serd_node_free(&xu); cannam@85: cannam@85: SerdNode badpre = serd_node_from_string(SERD_CURIE, USTR("hm:what")); cannam@85: SerdNode xbadpre = serd_env_expand_node(env, &badpre); cannam@85: if (!serd_node_equals(&xbadpre, &SERD_NODE_NULL)) { cannam@85: return failure("Expanded invalid curie %s\n", badpre.buf); cannam@85: } cannam@85: cannam@85: SerdNode xc = serd_env_expand_node(env, &c); cannam@85: if (strcmp((const char*)xc.buf, "http://example.org/b")) { cannam@85: return failure("Expanded %s to %s\n", c.buf, xc.buf); cannam@85: } cannam@85: serd_node_free(&xc); cannam@85: cannam@85: if (!serd_env_set_prefix(env, &SERD_NODE_NULL, &SERD_NODE_NULL)) { cannam@85: return failure("Set NULL prefix\n"); cannam@85: } cannam@85: cannam@85: const SerdNode lit = serd_node_from_string(SERD_LITERAL, USTR("hello")); cannam@85: if (!serd_env_set_prefix(env, &b, &lit)) { cannam@85: return failure("Set prefix to literal\n"); cannam@85: } cannam@85: cannam@85: int n_prefixes = 0; cannam@85: serd_env_set_prefix_from_strings(env, USTR("eg.2"), USTR("http://example.org/")); cannam@85: serd_env_foreach(env, count_prefixes, &n_prefixes); cannam@85: if (n_prefixes != 1) { cannam@85: return failure("Bad prefix count %d\n", n_prefixes); cannam@85: } cannam@85: cannam@85: SerdNode shorter_uri = serd_node_from_string(SERD_URI, USTR("urn:foo")); cannam@85: SerdNode prefix_name; cannam@85: if (serd_env_qualify(env, &shorter_uri, &prefix_name, &suffix)) { cannam@85: return failure("Qualified %s\n", shorter_uri.buf); cannam@85: } cannam@85: cannam@85: // Test SerdReader and SerdWriter cannam@85: cannam@85: const char* path = "serd_test.ttl"; cannam@85: FILE* fd = fopen(path, "w"); cannam@85: if (!fd) { cannam@85: return failure("Failed to open file %s\n", path); cannam@85: } cannam@85: cannam@85: SerdWriter* writer = serd_writer_new( cannam@85: SERD_TURTLE, (SerdStyle)0, env, NULL, serd_file_sink, fd); cannam@85: if (!writer) { cannam@85: return failure("Failed to create writer\n"); cannam@85: } cannam@85: cannam@85: serd_writer_chop_blank_prefix(writer, USTR("tmp")); cannam@85: serd_writer_chop_blank_prefix(writer, NULL); cannam@85: cannam@85: if (!serd_writer_set_base_uri(writer, &lit)) { cannam@85: return failure("Set base URI to %s\n", lit.buf); cannam@85: } cannam@85: cannam@85: if (!serd_writer_set_prefix(writer, &lit, &lit)) { cannam@85: return failure("Set prefix %s to %s\n", lit.buf, lit.buf); cannam@85: } cannam@85: cannam@85: if (!serd_writer_end_anon(writer, NULL)) { cannam@85: return failure("Ended non-existent anonymous node\n"); cannam@85: } cannam@85: cannam@85: if (serd_writer_get_env(writer) != env) { cannam@85: return failure("Writer has incorrect env\n"); cannam@85: } cannam@85: cannam@85: uint8_t buf[] = { 0x80, 0, 0, 0, 0 }; cannam@85: SerdNode s = serd_node_from_string(SERD_URI, USTR("")); cannam@85: SerdNode p = serd_node_from_string(SERD_URI, USTR("http://example.org/pred")); cannam@85: SerdNode o = serd_node_from_string(SERD_LITERAL, buf); cannam@85: cannam@85: // Write 3 invalid statements (should write nothing) cannam@85: const SerdNode* junk[][5] = { { &s, &p, NULL, NULL, NULL }, cannam@85: { &s, NULL, &o, NULL, NULL }, cannam@85: { NULL, &p, &o, NULL, NULL }, cannam@85: { &s, &p, &SERD_NODE_NULL, NULL, NULL }, cannam@85: { &s, &SERD_NODE_NULL, &o, NULL, NULL }, cannam@85: { &SERD_NODE_NULL, &p, &o, NULL, NULL }, cannam@85: { &s, &o, &o, NULL, NULL }, cannam@85: { &o, &p, &o, NULL, NULL }, cannam@85: { NULL, NULL, NULL, NULL, NULL } }; cannam@85: for (unsigned i = 0; i < sizeof(junk) / (sizeof(SerdNode*) * 5); ++i) { cannam@85: if (!serd_writer_write_statement( cannam@85: writer, 0, NULL, cannam@85: junk[i][0], junk[i][1], junk[i][2], junk[i][3], junk[i][4])) { cannam@85: return failure("Successfully wrote junk statement %d\n", i); cannam@85: } cannam@85: } cannam@85: cannam@85: const SerdNode t = serd_node_from_string(SERD_URI, USTR("urn:Type")); cannam@85: const SerdNode l = serd_node_from_string(SERD_LITERAL, USTR("en")); cannam@85: const SerdNode* good[][5] = { { &s, &p, &o, NULL, NULL }, cannam@85: { &s, &p, &o, &SERD_NODE_NULL, &SERD_NODE_NULL }, cannam@85: { &s, &p, &o, &t, NULL }, cannam@85: { &s, &p, &o, NULL, &l }, cannam@85: { &s, &p, &o, &t, &l }, cannam@85: { &s, &p, &o, &t, &SERD_NODE_NULL }, cannam@85: { &s, &p, &o, &SERD_NODE_NULL, &l }, cannam@85: { &s, &p, &o, NULL, &SERD_NODE_NULL }, cannam@85: { &s, &p, &o, &SERD_NODE_NULL, NULL }, cannam@85: { &s, &p, &o, &SERD_NODE_NULL, NULL } }; cannam@85: for (unsigned i = 0; i < sizeof(good) / (sizeof(SerdNode*) * 5); ++i) { cannam@85: if (serd_writer_write_statement( cannam@85: writer, 0, NULL, cannam@85: good[i][0], good[i][1], good[i][2], good[i][3], good[i][4])) { cannam@85: return failure("Failed to write good statement %d\n", i); cannam@85: } cannam@85: } cannam@85: cannam@85: // Write 1 statement with bad UTF-8 (should be replaced) cannam@85: if (serd_writer_write_statement(writer, 0, NULL, cannam@85: &s, &p, &o, NULL, NULL)) { cannam@85: return failure("Failed to write junk UTF-8\n"); cannam@85: } cannam@85: cannam@85: // Write 1 valid statement cannam@85: o = serd_node_from_string(SERD_LITERAL, USTR("hello")); cannam@85: if (serd_writer_write_statement(writer, 0, NULL, cannam@85: &s, &p, &o, NULL, NULL)) { cannam@85: return failure("Failed to write valid statement\n"); cannam@85: } cannam@85: cannam@85: serd_writer_free(writer); cannam@85: cannam@85: // Test chunk sink cannam@85: SerdChunk chunk = { NULL, 0 }; cannam@85: writer = serd_writer_new( cannam@85: SERD_TURTLE, (SerdStyle)0, env, NULL, serd_chunk_sink, &chunk); cannam@85: cannam@85: o = serd_node_from_string(SERD_URI, USTR("http://example.org/base")); cannam@85: if (serd_writer_set_base_uri(writer, &o)) { cannam@85: return failure("Failed to write to chunk sink\n"); cannam@85: } cannam@85: cannam@85: serd_writer_free(writer); cannam@85: uint8_t* out = serd_chunk_sink_finish(&chunk); cannam@85: cannam@85: if (strcmp((const char*)out, "@base .\n")) { cannam@85: return failure("Incorrect chunk output:\n%s\n", chunk.buf); cannam@85: } cannam@85: cannam@85: free(out); cannam@85: cannam@85: // Rewind and test reader cannam@85: fseek(fd, 0, SEEK_SET); cannam@85: cannam@85: ReaderTest* rt = (ReaderTest*)malloc(sizeof(ReaderTest)); cannam@85: rt->n_statements = 0; cannam@85: rt->graph = NULL; cannam@85: cannam@85: SerdReader* reader = serd_reader_new( cannam@85: SERD_TURTLE, rt, free, cannam@85: NULL, NULL, test_sink, NULL); cannam@85: if (!reader) { cannam@85: return failure("Failed to create reader\n"); cannam@85: } cannam@85: if (serd_reader_get_handle(reader) != rt) { cannam@85: return failure("Corrupt reader handle\n"); cannam@85: } cannam@85: cannam@85: SerdNode g = serd_node_from_string(SERD_URI, USTR("http://example.org/")); cannam@85: serd_reader_set_default_graph(reader, &g); cannam@85: serd_reader_add_blank_prefix(reader, USTR("tmp")); cannam@85: serd_reader_add_blank_prefix(reader, NULL); cannam@85: cannam@85: if (!serd_reader_read_file(reader, USTR("http://notafile"))) { cannam@85: return failure("Apparently read an http URI\n"); cannam@85: } cannam@85: if (!serd_reader_read_file(reader, USTR("file:///better/not/exist"))) { cannam@85: return failure("Apprently read a non-existent file\n"); cannam@85: } cannam@85: SerdStatus st = serd_reader_read_file(reader, USTR(path)); cannam@85: if (st) { cannam@85: return failure("Error reading file (%s)\n", serd_strerror(st)); cannam@85: } cannam@85: cannam@85: if (rt->n_statements != 12) { cannam@85: return failure("Bad statement count %d\n", rt->n_statements); cannam@85: } else if (!rt->graph || !rt->graph->buf || cannam@85: strcmp((const char*)rt->graph->buf, "http://example.org/")) { cannam@85: return failure("Bad graph %p\n", rt->graph); cannam@85: } cannam@85: cannam@85: if (!serd_reader_read_string(reader, USTR("This isn't Turtle at all."))) { cannam@85: return failure("Parsed invalid string successfully.\n"); cannam@85: } cannam@85: cannam@85: serd_reader_free(reader); cannam@85: fclose(fd); cannam@85: cannam@85: serd_env_free(env); cannam@85: cannam@85: printf("Success\n"); cannam@85: return 0; cannam@85: }