/*
* raptor_turtle_emit_subject:
* @serializer: #raptor_serializer object
* @subject: subject node
* @depth: depth into tree
*
* Emit a subject node
*
* Return value: non-0 on failure
**/
static int
raptor_turtle_emit_subject(raptor_serializer *serializer,
raptor_abbrev_subject* subject,
int depth)
{
raptor_turtle_context* context=(raptor_turtle_context*)serializer->context;
raptor_turtle_writer* turtle_writer=context->turtle_writer;
int blank = 1;
int collection = 0;
int rc = 0;
if (!raptor_abbrev_subject_valid(subject)) return 0;
RAPTOR_DEBUG5("Emitting subject node %p refcount %d subject %d object %d\n",
subject->node,
subject->node->ref_count,
subject->node->count_as_subject,
subject->node->count_as_object);
if(!depth &&
subject->node->type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS &&
subject->node->count_as_subject == 1 &&
subject->node->count_as_object == 1) {
RAPTOR_DEBUG2("Skipping subject node %p\n", subject->node);
return 0;
}
if(raptor_avltree_size(subject->properties) == 0) {
RAPTOR_DEBUG2("Skipping subject node %p\n", subject->node);
return 0;
}
/* check if we can do collection abbreviation */
if(raptor_avltree_size(subject->properties) >= 2) {
raptor_avltree_iterator* iter=NULL;
raptor_abbrev_node* pred1;
raptor_abbrev_node* pred2;
iter=raptor_new_avltree_iterator(subject->properties, NULL, NULL, 1);
if(!iter)
return 1;
pred1=((raptor_abbrev_node**)raptor_avltree_iterator_get(iter))[0];
raptor_avltree_iterator_next(iter);
pred2=((raptor_abbrev_node**)raptor_avltree_iterator_get(iter))[0];
raptor_free_avltree_iterator(iter);
if(pred1->type == RAPTOR_IDENTIFIER_TYPE_RESOURCE &&
pred2->type == RAPTOR_IDENTIFIER_TYPE_RESOURCE &&
(
(raptor_uri_equals_v2(serializer->world, pred1->value.resource.uri, context->rdf_first_uri) &&
raptor_uri_equals_v2(serializer->world, pred2->value.resource.uri, context->rdf_rest_uri))
||
(raptor_uri_equals_v2(serializer->world, pred2->value.resource.uri, context->rdf_first_uri) &&
raptor_uri_equals_v2(serializer->world, pred1->value.resource.uri, context->rdf_rest_uri))
)
) {
collection = 1;
}
}
/* emit the subject node */
if(subject->node->type == RAPTOR_IDENTIFIER_TYPE_RESOURCE) {
rc= raptor_turtle_emit_resource(serializer, subject->node, depth+1);
if(rc)
return rc;
blank = 0;
} else if(subject->node->type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS) {
if((subject->node->count_as_subject == 1 &&
subject->node->count_as_object == 0) && depth > 1) {
blank = 1;
} else if(subject->node->count_as_object == 0) {
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)"[]");
blank = 0;
} else if(!collection && subject->node->count_as_object > 1) {
/* Referred to (used as an object), so needs a nodeID */
const unsigned char* genid = subject->node->value.blank.string;
size_t len = strlen((const char*)genid);
unsigned char* subject_str;
subject_str= (unsigned char *)RAPTOR_MALLOC(cstring, len+3);
if(!subject_str)
return 1;
subject_str[0]='_';
subject_str[1]=':';
strncpy((char*)&subject_str[2], (const char*)genid, len+1);
raptor_turtle_writer_raw(turtle_writer, subject_str);
RAPTOR_FREE(cstring, subject_str);
}
} else if(subject->node->type == RAPTOR_IDENTIFIER_TYPE_ORDINAL) {
unsigned char* subject_str;
subject_str = (unsigned char *)RAPTOR_MALLOC(string,
raptor_rdf_namespace_uri_len + MAX_ASCII_INT_SIZE + 2);
if(!subject_str)
return 1;
sprintf((char*)subject, "%s_%d", raptor_rdf_namespace_uri,
subject->node->value.ordinal.ordinal);
raptor_turtle_writer_raw(turtle_writer, subject_str);
RAPTOR_FREE(cstring, subject_str);
return blank = 0;
}
if(collection) {
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)"(");
raptor_turtle_writer_increase_indent(turtle_writer);
rc=raptor_turtle_emit_subject_collection_items(serializer, subject, depth+1);
raptor_turtle_writer_decrease_indent(turtle_writer);
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)")");
} else {
if(blank && depth > 1)
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)"[");
raptor_turtle_writer_increase_indent(turtle_writer);
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_emit_subject_properties(serializer, subject, depth+1);
raptor_turtle_writer_decrease_indent(turtle_writer);
if(blank && depth > 1) {
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)"]");
}
}
if(depth == 0) {
/* NOTE: the space before the . here MUST be there or statements
* that end in a numeric literal will be interpreted incorrectly
* (the "." will be parsed as part of the literal and statement
* left unterminated)
*/
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)" .");
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_writer_newline(turtle_writer);
}
return rc;
}
int
main(int argc, char *argv[])
{
raptor_world *world;
const char *program = raptor_basename(argv[0]);
raptor_iostream *iostr;
raptor_namespace_stack *nstack;
raptor_namespace* ex_ns;
raptor_turtle_writer* turtle_writer;
raptor_uri* base_uri;
raptor_qname* el_name;
unsigned long count;
raptor_uri* datatype;
/* for raptor_new_iostream_to_string */
void *string = NULL;
size_t string_len = 0;
world = raptor_new_world();
if(!world || raptor_world_open(world))
exit(1);
iostr = raptor_new_iostream_to_string(world, &string, &string_len, NULL);
if(!iostr) {
fprintf(stderr, "%s: Failed to create iostream to string\n", program);
exit(1);
}
nstack = raptor_new_namespaces(world, 1);
base_uri = raptor_new_uri(world, base_uri_string);
turtle_writer = raptor_new_turtle_writer(world, base_uri, 1, nstack, iostr);
if(!turtle_writer) {
fprintf(stderr, "%s: Failed to create turtle_writer to iostream\n", program);
exit(1);
}
raptor_turtle_writer_set_option(turtle_writer,
RAPTOR_OPTION_WRITER_AUTO_INDENT, 1);
ex_ns = raptor_new_namespace(nstack,
(const unsigned char*)"ex",
(const unsigned char*)"http://example.org/ns#",
0);
raptor_turtle_writer_namespace_prefix(turtle_writer, ex_ns);
raptor_turtle_writer_reference(turtle_writer, base_uri);
raptor_turtle_writer_increase_indent(turtle_writer);
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_writer_raw(turtle_writer, (const unsigned char*)"ex:foo ");
raptor_turtle_writer_quoted_counted_string(turtle_writer, longstr,
strlen((const char*)longstr));
raptor_turtle_writer_raw_counted(turtle_writer,
(const unsigned char*)" ;", 2);
raptor_turtle_writer_newline(turtle_writer);
el_name = raptor_new_qname_from_namespace_local_name(world,
ex_ns,
(const unsigned char*)"bar",
NULL);
raptor_turtle_writer_qname(turtle_writer, el_name);
raptor_free_qname(el_name);
raptor_turtle_writer_raw_counted(turtle_writer, (const unsigned char*)" ", 1);
datatype = raptor_new_uri(world, (const unsigned char*)"http://www.w3.org/2001/XMLSchema#decimal");
raptor_turtle_writer_literal(turtle_writer, nstack,
(const unsigned char*)"10.0", NULL,
datatype);
raptor_free_uri(datatype);
raptor_turtle_writer_newline(turtle_writer);
raptor_turtle_writer_decrease_indent(turtle_writer);
raptor_turtle_writer_raw_counted(turtle_writer, (const unsigned char*)".", 1);
raptor_turtle_writer_newline(turtle_writer);
raptor_free_turtle_writer(turtle_writer);
raptor_free_namespace(ex_ns);
raptor_free_namespaces(nstack);
raptor_free_uri(base_uri);
count = raptor_iostream_tell(iostr);
#if RAPTOR_DEBUG > 1
fprintf(stderr, "%s: Freeing iostream\n", program);
#endif
raptor_free_iostream(iostr);
if(count != OUT_BYTES_COUNT) {
fprintf(stderr, "%s: I/O stream wrote %d bytes, expected %d\n", program,
(int)count, (int)OUT_BYTES_COUNT);
fputs("[[", stderr);
(void)fwrite(string, 1, string_len, stderr);
fputs("]]\n", stderr);
return 1;
}
if(!string) {
fprintf(stderr, "%s: I/O stream failed to create a string\n", program);
return 1;
}
string_len = strlen((const char*)string);
if(string_len != count) {
fprintf(stderr, "%s: I/O stream created a string length %d, expected %d\n", program, (int)string_len, (int)count);
return 1;
}
#if RAPTOR_DEBUG > 1
fprintf(stderr, "%s: Made Turtle string of %d bytes\n", program, (int)string_len);
fputs("[[", stderr);
(void)fwrite(string, 1, string_len, stderr);
fputs("]]\n", stderr);
#endif
raptor_free_memory(string);
raptor_free_world(world);
/* keep gcc -Wall happy */
return(0);
}
