raptor_abbrev_subject*
raptor_abbrev_subject_lookup(raptor_avltree* nodes,
raptor_sequence* subjects,
raptor_sequence* blanks,
raptor_identifier_type node_type,
const void *node_data)
{
raptor_sequence *sequence;
raptor_abbrev_subject* rv_subject;
/* Search for specified resource in resources array.
* FIXME: this should really be a hash, not a list.
*/
sequence= (node_type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS) ?
blanks : subjects;
rv_subject= raptor_abbrev_subject_find(sequence, node_type,
node_data, NULL);
/* If not found, create one and insert it */
if(!rv_subject) {
raptor_abbrev_node* node = raptor_abbrev_node_lookup(nodes, node_type,
node_data, NULL, NULL);
if(node) {
rv_subject = raptor_new_abbrev_subject(node);
if(rv_subject) {
if(raptor_sequence_push(sequence, rv_subject)) {
rv_subject = NULL;
}
}
}
}
return rv_subject;
}
/*
* raptor_turtle_emit_blank:
* @serializer: #raptor_serializer object
* @node: blank node
* @depth: depth into tree
*
* Emit a description of a blank node
*
* Return value: non-0 on failure
**/
static int
raptor_turtle_emit_blank(raptor_serializer *serializer,
raptor_abbrev_node* node,
int depth)
{
raptor_turtle_context* context=(raptor_turtle_context*)serializer->context;
int rc=0;
RAPTOR_DEBUG5("Emitting blank node %p refcount %d subject %d object %d\n",
node,
node->ref_count, node->count_as_subject, node->count_as_object);
if(node->type != RAPTOR_IDENTIFIER_TYPE_ANONYMOUS)
return 1;
if((node->count_as_subject == 1 && node->count_as_object == 1)) {
/* If this is only used as a 1 subject and object or never
* used as a subject or never used as an object, it never need
* be referenced with an explicit name */
raptor_abbrev_subject* blank;
blank = raptor_abbrev_subject_find(context->blanks,
node->type,
node->value.blank.string);
if(blank) {
rc = raptor_turtle_emit_subject(serializer, blank, depth+1);
raptor_abbrev_subject_invalidate(blank);
}
} else {
/* Blank node that needs an explicit name */
const unsigned char *node_id = node->value.blank.string;
raptor_turtle_writer_raw(context->turtle_writer, (const unsigned char*)"_:");
raptor_turtle_writer_raw(context->turtle_writer, node_id);
}
RAPTOR_DEBUG2("Emitted %p\n", node);
return rc;
}
/*
* raptor_turtle_emit_subject_collection_items:
* @serializer: #raptor_serializer object
* @subject: subject node
* @depth: depth into tree
*
* Emit an abbreviated rdf collection of items (rdf:first, rdf:rest) about a subject node.
*
* Return value: non-0 on failure
**/
static int
raptor_turtle_emit_subject_collection_items(raptor_serializer* serializer,
raptor_abbrev_subject* subject,
int depth)
{
raptor_turtle_context* context=(raptor_turtle_context*)serializer->context;
int rv = 0;
raptor_avltree_iterator* iter=NULL;
int i;
int is_new_subject = 0;
RAPTOR_DEBUG5("Emitting subject collection items for 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 just saw a new subject (is_new_subject is true) then there is no need
* to advance the iterator - it was just reset
*/
for(i=0, (iter=raptor_new_avltree_iterator(subject->properties, NULL, NULL, 1));
iter && !rv;
i++, (rv = is_new_subject ? 0 : raptor_avltree_iterator_next(iter))) {
raptor_abbrev_node** nodes;
raptor_abbrev_node* predicate;
raptor_abbrev_node* object;
is_new_subject = 0;
nodes=(raptor_abbrev_node**)raptor_avltree_iterator_get(iter);
if(!nodes)
break;
predicate= nodes[0];
object= nodes[1];
if(!raptor_uri_equals_v2(serializer->world,
predicate->value.resource.uri,
context->rdf_first_uri)) {
raptor_serializer_error(serializer,
"Malformed collection - first predicate is not rdf:first");
return 1;
}
if(!object)
continue;
if(i > 0)
raptor_turtle_writer_newline(context->turtle_writer);
switch(object->type) {
case RAPTOR_IDENTIFIER_TYPE_RESOURCE:
rv = raptor_turtle_emit_resource(serializer, object, depth+1);
break;
case RAPTOR_IDENTIFIER_TYPE_LITERAL:
rv = raptor_turtle_emit_literal(serializer, object, depth+1);
break;
case RAPTOR_IDENTIFIER_TYPE_XML_LITERAL:
rv = raptor_turtle_emit_xml_literal(serializer, object, depth+1);
break;
case RAPTOR_IDENTIFIER_TYPE_ANONYMOUS:
rv = raptor_turtle_emit_blank(serializer, object, depth+1);
break;
case RAPTOR_IDENTIFIER_TYPE_ORDINAL:
/* ordinals should never appear as an object with current parsers */
case RAPTOR_IDENTIFIER_TYPE_PREDICATE:
/* predicates should never appear as an object */
case RAPTOR_IDENTIFIER_TYPE_UNKNOWN:
default:
RAPTOR_FATAL1("Unsupported identifier type\n");
break;
}
/* last item */
rv=raptor_avltree_iterator_next(iter);
if(rv)
break;
nodes=(raptor_abbrev_node**)raptor_avltree_iterator_get(iter);
predicate = nodes[0];
object = nodes[1];
if(!raptor_uri_equals_v2(serializer->world, predicate->value.resource.uri, context->rdf_rest_uri)) {
raptor_serializer_error(serializer,
"Malformed collection - second predicate is not rdf:rest");
return 1;
}
if(object->type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS) {
subject = raptor_abbrev_subject_find(context->blanks, object->type,
object->value.blank.string);
if(!subject) {
raptor_serializer_error(serializer,
"Malformed collection - could not find subject for rdf:rest");
return 1;
}
/* got a <(old)subject> rdf:rest <(new)subject> triple so know
* subject has changed and should reset the properties iterator
*/
if(iter)
raptor_free_avltree_iterator(iter);
iter = raptor_new_avltree_iterator(subject->properties, NULL, NULL, 1);
is_new_subject = 1;
} else {
if(object->type != RAPTOR_IDENTIFIER_TYPE_RESOURCE ||
!raptor_uri_equals_v2(serializer->world, object->value.resource.uri, context->rdf_nil_uri)) {
raptor_serializer_error(serializer,
"Malformed collection - last rdf:rest resource is not rdf:nil");
return 1;
}
break;
}
}
if(iter)
raptor_free_avltree_iterator(iter);
return rv;
}
/*
* raptor_turtle_emit_subject_collection_items:
* @serializer: #raptor_serializer object
* @subject: subject node
* @depth: depth into tree
*
* Emit an abbreviated rdf collection of items (rdf:first, rdf:rest) about a subject node.
*
* Return value: non-0 on failure
**/
static int
raptor_turtle_emit_subject_collection_items(raptor_serializer* serializer,
raptor_abbrev_subject* subject,
int depth)
{
raptor_turtle_context* context = (raptor_turtle_context*)serializer->context;
int rv = 0;
raptor_avltree_iterator* iter = NULL;
int i;
int is_new_subject = 0;
RAPTOR_DEBUG5("Emitting subject collection items for 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 just saw a new subject (is_new_subject is true) then there is no need
* to advance the iterator - it was just reset
*/
for(i = 0, (iter = raptor_new_avltree_iterator(subject->properties, NULL, NULL, 1));
iter && !rv;
i++, (rv = is_new_subject ? 0 : raptor_avltree_iterator_next(iter))) {
raptor_abbrev_node** nodes;
raptor_abbrev_node* predicate;
raptor_abbrev_node* object;
is_new_subject = 0;
nodes = (raptor_abbrev_node**)raptor_avltree_iterator_get(iter);
if(!nodes)
break;
predicate= nodes[0];
object= nodes[1];
if(!raptor_uri_equals(predicate->term->value.uri,
context->rdf_first_uri)) {
raptor_log_error(serializer->world, RAPTOR_LOG_LEVEL_ERROR, NULL,
"Malformed collection - first predicate is not rdf:first");
return 1;
}
if(!object)
continue;
if(i > 0)
raptor_turtle_writer_newline(context->turtle_writer);
switch(object->term->type) {
case RAPTOR_TERM_TYPE_URI:
rv = raptor_turtle_emit_resource(serializer, object, depth+1);
break;
case RAPTOR_TERM_TYPE_LITERAL:
rv = raptor_turtle_emit_literal(serializer, object, depth+1);
break;
case RAPTOR_TERM_TYPE_BLANK:
rv = raptor_turtle_emit_blank(serializer, object, depth+1);
break;
case RAPTOR_TERM_TYPE_UNKNOWN:
default:
raptor_log_error_formatted(serializer->world, RAPTOR_LOG_LEVEL_ERROR,
NULL, "Triple has unsupported term type %d",
object->term->type);
break;
}
/* Return error if emitting something failed above */
if(rv)
return rv;
/* last item */
rv = raptor_avltree_iterator_next(iter);
if(rv)
break;
nodes = (raptor_abbrev_node**)raptor_avltree_iterator_get(iter);
predicate = nodes[0];
object = nodes[1];
if(!raptor_uri_equals(predicate->term->value.uri, context->rdf_rest_uri)) {
raptor_log_error(serializer->world, RAPTOR_LOG_LEVEL_ERROR, NULL,
"Malformed collection - second predicate is not rdf:rest");
return 1;
}
if(object->term->type == RAPTOR_TERM_TYPE_BLANK) {
subject = raptor_abbrev_subject_find(context->blanks, object->term);
if(!subject) {
raptor_log_error(serializer->world, RAPTOR_LOG_LEVEL_ERROR, NULL,
"Malformed collection - could not find subject for rdf:rest");
return 1;
}
/* got a <(old)subject> rdf:rest <(new)subject> triple so know
* subject has changed and should reset the properties iterator
*/
if(iter)
raptor_free_avltree_iterator(iter);
iter = raptor_new_avltree_iterator(subject->properties, NULL, NULL, 1);
is_new_subject = 1;
} else {
if(object->term->type != RAPTOR_TERM_TYPE_URI ||
!raptor_uri_equals(object->term->value.uri, context->rdf_nil_uri)) {
raptor_log_error(serializer->world, RAPTOR_LOG_LEVEL_ERROR, NULL,
"Malformed collection - last rdf:rest resource is not rdf:nil");
return 1;
}
break;
}
}
if(iter)
raptor_free_avltree_iterator(iter);
return rv;
}
