/* Check the list to see if the node is a duplicate. If not, add it
* to the list.
*/
static void
raptor_dot_serializer_assert_node(raptor_serializer* serializer,
raptor_term* assert_node)
{
raptor_dot_context* context = (raptor_dot_context*)serializer->context;
raptor_sequence* seq = NULL;
int i;
/* Which list are we searching? */
switch(assert_node->type) {
case RAPTOR_TERM_TYPE_URI:
seq = context->resources;
break;
case RAPTOR_TERM_TYPE_BLANK:
seq = context->bnodes;
break;
case RAPTOR_TERM_TYPE_LITERAL:
seq = context->literals;
break;
case RAPTOR_TERM_TYPE_UNKNOWN:
break;
}
for(i = 0 ; i < raptor_sequence_size(seq) ; i++ ) {
raptor_term* node = (raptor_term*)raptor_sequence_get_at(seq, i);
if(raptor_term_equals(node, assert_node))
return;
}
raptor_sequence_push(seq, raptor_term_copy(assert_node));
}
int
librdf_statement_match(librdf_statement* statement,
librdf_statement* partial_statement)
{
LIBRDF_ASSERT_OBJECT_POINTER_RETURN_VALUE(statement, librdf_statement, 0);
LIBRDF_ASSERT_OBJECT_POINTER_RETURN_VALUE(partial_statement, librdf_statement, 0);
if(partial_statement->subject &&
!raptor_term_equals(statement->subject, partial_statement->subject))
return 0;
if(partial_statement->predicate &&
!raptor_term_equals(statement->predicate, partial_statement->predicate))
return 0;
if(partial_statement->object &&
!raptor_term_equals(statement->object, partial_statement->object))
return 0;
return 1;
}
int
raptor_rss_item_equals_statement_subject(const raptor_rss_item *item,
const raptor_statement *statement)
{
return raptor_term_equals(statement->subject, item->term);
}
/* return 0 to abort visit */
static int
raptor_json_serialize_avltree_visit(int depth, void* data, void *user_data)
{
raptor_serializer* serializer = (raptor_serializer*)user_data;
raptor_json_context* context = (raptor_json_context*)serializer->context;
raptor_statement* statement = (raptor_statement*)data;
raptor_statement* s1 = statement;
raptor_statement* s2 = context->last_statement;
int new_subject = 0;
int new_predicate = 0;
if(s2) {
new_subject = !raptor_term_equals(s1->subject, s2->subject);
if(new_subject) {
/* end last predicate */
raptor_json_writer_newline(context->json_writer);
raptor_json_writer_end_block(context->json_writer, ']');
raptor_json_writer_newline(context->json_writer);
/* end last statement */
raptor_json_writer_end_block(context->json_writer, '}');
raptor_json_writer_newline(context->json_writer);
context->need_subject_comma = 1;
context->need_object_comma = 0;
}
} else
new_subject = 1;
if(new_subject) {
if(context->need_subject_comma) {
raptor_iostream_write_byte(',', serializer->iostream);
raptor_json_writer_newline(context->json_writer);
}
/* start triple */
/* subject */
switch(s1->subject->type) {
case RAPTOR_TERM_TYPE_URI:
raptor_json_writer_key_uri_value(context->json_writer,
NULL, 0,
s1->subject->value.uri);
break;
case RAPTOR_TERM_TYPE_BLANK:
raptor_iostream_counted_string_write("\"_:", 3, serializer->iostream);
raptor_string_python_write(s1->subject->value.blank.string, 0,
'"', 2,
serializer->iostream);
raptor_iostream_write_byte('"', serializer->iostream);
break;
case RAPTOR_TERM_TYPE_LITERAL:
case RAPTOR_TERM_TYPE_UNKNOWN:
default:
raptor_log_error_formatted(serializer->world, RAPTOR_LOG_LEVEL_ERROR,
NULL,
"Triple has unsupported subject term type %d",
s1->subject->type);
break;
}
raptor_iostream_counted_string_write(" : ", 3, serializer->iostream);
raptor_json_writer_start_block(context->json_writer, '{');
raptor_json_writer_newline(context->json_writer);
}
/* predicate */
if(context->last_statement) {
if(new_subject)
new_predicate = 1;
else {
new_predicate = !raptor_uri_equals(s1->predicate->value.uri,
s2->predicate->value.uri);
if(new_predicate) {
raptor_json_writer_newline(context->json_writer);
raptor_json_writer_end_block(context->json_writer, ']');
raptor_iostream_write_byte(',', serializer->iostream);
raptor_json_writer_newline(context->json_writer);
}
}
} else
new_predicate = 1;
if(new_predicate) {
/* start predicate */
raptor_json_writer_key_uri_value(context->json_writer,
NULL, 0,
s1->predicate->value.uri);
raptor_iostream_counted_string_write(" : ", 3, serializer->iostream);
raptor_json_writer_start_block(context->json_writer, '[');
raptor_iostream_write_byte(' ', serializer->iostream);
context->need_object_comma = 0;
}
if(context->need_object_comma) {
raptor_iostream_write_byte(',', serializer->iostream);
raptor_json_writer_newline(context->json_writer);
}
/* object */
switch(s1->object->type) {
case RAPTOR_TERM_TYPE_URI:
raptor_json_writer_uri_object(context->json_writer,
s1->object->value.uri);
raptor_json_writer_newline(context->json_writer);
break;
case RAPTOR_TERM_TYPE_LITERAL:
raptor_json_writer_literal_object(context->json_writer,
s1->object->value.literal.string,
s1->object->value.literal.language,
s1->object->value.literal.datatype,
"value", "type");
break;
case RAPTOR_TERM_TYPE_BLANK:
raptor_json_writer_blank_object(context->json_writer,
s1->object->value.blank.string);
raptor_json_writer_newline(context->json_writer);
break;
case RAPTOR_TERM_TYPE_UNKNOWN:
default:
raptor_log_error_formatted(serializer->world, RAPTOR_LOG_LEVEL_ERROR,
NULL,
"Triple has unsupported object term type %d",
s1->object->type);
break;
}
/* end triple */
context->need_object_comma = 1;
context->last_statement = statement;
return 1;
}
int
main(int argc, char *argv[])
{
raptor_world *world;
const char *program = raptor_basename(argv[0]);
int rc = 0;
raptor_term* term1 = NULL; /* URI string 1 */
raptor_term* term2 = NULL; /* literal string1 */
raptor_term* term3 = NULL; /* blank node 1 */
raptor_term* term4 = NULL; /* URI string 2 */
raptor_term* term5 = NULL; /* URI string 1 again */
raptor_uri* uri1;
unsigned char* uri_str;
size_t uri_len;
world = raptor_new_world();
if(!world || raptor_world_open(world))
exit(1);
/* check a term for NULL URI fails */
term1 = raptor_new_term_from_uri(world, NULL);
if(term1) {
fprintf(stderr, "%s: raptor_new_uri(NULL) returned object rather than failing\n", program);
rc = 1;
goto tidy;
}
/* check a term for non-NULL URI succeeds */
uri1 = raptor_new_uri(world, uri_string1);
if(!uri1) {
fprintf(stderr, "%s: raptor_new_uri(%s) failed\n", program, uri_string1);
rc = 1;
goto tidy;
}
term1 = raptor_new_term_from_uri(world, uri1);
if(!term1) {
fprintf(stderr, "%s: raptor_new_term_from_uri_string(URI %s) failed\n",
program, uri_string1);
rc = 1;
goto tidy;
}
raptor_free_uri(uri1); uri1 = NULL;
if(term1->type != uri_string1_type) {
fprintf(stderr, "%s: raptor term 1 is of type %d expected %d\n",
program, term1->type, uri_string1_type);
rc = 1;
goto tidy;
}
/* returns a pointer to shared string */
uri_str = raptor_uri_as_counted_string(term1->value.uri, &uri_len);
if(!uri_str) {
fprintf(stderr, "%s: raptor_uri_as_counted_string term 1 failed\n",
program);
rc = 1;
goto tidy;
}
if(uri_len != uri_string1_len) {
fprintf(stderr, "%s: raptor term 1 URI is of length %d expected %d\n",
program, (int)uri_len, (int)uri_string1_len);
rc = 1;
goto tidy;
}
/* check an empty literal is created from a NULL literal pointer succeeds */
term2 = raptor_new_term_from_counted_literal(world, NULL, 0, NULL, NULL, 0);
if(!term2) {
fprintf(stderr, "%s: raptor_new_term_from_counted_literal() with all NULLs failed\n", program);
rc = 1;
goto tidy;
}
raptor_free_term(term2);
/* check an empty literal from an empty language literal pointer succeeds */
term2 = raptor_new_term_from_counted_literal(world, NULL, 0, NULL,
(const unsigned char*)"", 0);
if(!term2) {
fprintf(stderr, "%s: raptor_new_term_from_counted_literal() with empty language failed\n", program);
rc = 1;
goto tidy;
}
raptor_free_term(term2);
/* check a literal with language and datatype fails */
uri1 = raptor_new_uri(world, uri_string1);
if(!uri1) {
fprintf(stderr, "%s: raptor_new_uri(%s) failed\n", program, uri_string1);
rc = 1;
goto tidy;
}
term2 = raptor_new_term_from_counted_literal(world, literal_string1,
literal_string1_len,
uri1, language1, 0);
raptor_free_uri(uri1); uri1 = NULL;
if(term2) {
fprintf(stderr, "%s: raptor_new_term_from_counted_literal() with language and datatype returned object rather than failing\n", program);
rc = 1;
goto tidy;
}
/* check a literal with no language and no datatype succeeds */
term2 = raptor_new_term_from_counted_literal(world, literal_string1,
literal_string1_len, NULL, NULL, 0);
if(!term2) {
fprintf(stderr, "%s: raptor_new_term_from_counted_literal(%s) failed\n",
program, literal_string1);
rc = 1;
goto tidy;
}
if(term2->type != literal_string1_type) {
fprintf(stderr, "%s: raptor term 2 is of type %d expected %d\n",
program, term2->type, literal_string1_type);
rc = 1;
goto tidy;
}
/* check a blank node term with NULL id generates a new identifier */
term3 = raptor_new_term_from_counted_blank(world, NULL, 0);
if(!term3) {
fprintf(stderr, "%s: raptor_new_term_from_counted_blank(NULL) failed\n",
program);
rc = 1;
goto tidy;
}
if(term3->type != bnodeid1_type) {
fprintf(stderr, "%s: raptor term 3 is of type %d expected %d\n",
program, term3->type, bnodeid1_type);
rc = 1;
goto tidy;
}
raptor_free_term(term3);
/* check a blank node term with an identifier succeeds */
term3 = raptor_new_term_from_counted_blank(world, bnodeid1, bnodeid1_len);
if(!term3) {
fprintf(stderr, "%s: raptor_new_term_from_counted_blank(%s) failed\n",
program, bnodeid1);
rc = 1;
goto tidy;
}
if(term3->type != bnodeid1_type) {
fprintf(stderr, "%s: raptor term 3 is of type %d expected %d\n",
program, term3->type, bnodeid1_type);
rc = 1;
goto tidy;
}
/* check a different URI term succeeds */
term4 = raptor_new_term_from_counted_uri_string(world, uri_string2,
uri_string2_len);
if(!term4) {
fprintf(stderr,
"%s: raptor_new_term_from_counted_uri_string(URI %s) failed\n",
program, uri_string2);
rc = 1;
goto tidy;
}
if(term4->type != uri_string2_type) {
fprintf(stderr, "%s: raptor term 4 is of type %d expected %d\n",
program, term4->type, uri_string2_type);
rc = 1;
goto tidy;
}
/* returns a pointer to shared string */
uri_str = raptor_uri_as_counted_string(term4->value.uri, &uri_len);
if(!uri_str) {
fprintf(stderr, "%s: raptor_uri_as_counted_string term 4 failed\n",
program);
rc = 1;
goto tidy;
}
if(uri_len != uri_string2_len) {
fprintf(stderr, "%s: raptor term 4 URI is of length %d expected %d\n",
program, (int)uri_len, (int)uri_string2_len);
rc = 1;
goto tidy;
}
/* check the same URI term as term1 succeeds */
term5 = raptor_new_term_from_uri_string(world, uri_string1);
if(!term5) {
fprintf(stderr, "%s: raptor_new_term_from_uri_string(URI %s) failed\n",
program, uri_string1);
rc = 1;
goto tidy;
}
if(raptor_term_equals(term1, term2)) {
fprintf(stderr, "%s: raptor_term_equals (URI %s, literal %s) returned equal, expected not-equal\n",
program, uri_string1, literal_string1);
rc = 1;
goto tidy;
}
if(raptor_term_equals(term1, term3)) {
fprintf(stderr, "%s: raptor_term_equals (URI %s, bnode %s) returned equal, expected not-equal\n",
program, uri_string1, bnodeid1);
rc = 1;
goto tidy;
}
if(raptor_term_equals(term1, term4)) {
fprintf(stderr, "%s: raptor_term_equals (URI %s, URI %s) returned equal, expected not-equal\n",
program, uri_string1, uri_string2);
rc = 1;
goto tidy;
}
if(!raptor_term_equals(term1, term5)) {
fprintf(stderr, "%s: raptor_term_equals (URI %s, URI %s) returned not-equal, expected equal\n",
program, uri_string1, uri_string1);
rc = 1;
goto tidy;
}
if(term1->value.uri != term5->value.uri) {
fprintf(stderr, "%s: term1 and term5 URI objects returned not-equal pointers, expected equal\n",
program);
/* This is not necessarily a failure if the raptor_uri module has had
* the URI interning disabled with
* raptor_world_set_flag(world, RAPTOR_WORLD_FLAG_URI_INTERNING, 0)
* however this test suite does not do that, so it is a failure here.
*/
rc = 1;
goto tidy;
}
tidy:
if(term1)
raptor_free_term(term1);
if(term2)
raptor_free_term(term2);
if(term3)
raptor_free_term(term3);
if(term4)
raptor_free_term(term4);
if(term5)
raptor_free_term(term5);
raptor_free_world(world);
return rc;
}