static int
librdf_storage_trees_node_compare(librdf_node* n1, librdf_node* n2)
{
if (n1 == n2) {
return 0;
} else if (n1->type != n2->type) {
return n2->type - n1->type;
} else {
switch (n1->type) {
case LIBRDF_NODE_TYPE_RESOURCE:
return librdf_uri_compare(librdf_node_get_uri(n1), librdf_node_get_uri(n2));
case LIBRDF_NODE_TYPE_LITERAL:
if (1) {
const char *s;
size_t l1;
size_t l2;
size_t l;
int r;
s = librdf_node_get_literal_value_language(n1);
l1 = s ? strlen(s) : 0;
s = librdf_node_get_literal_value_language(n2);
l2 = s ? strlen(s) : 0;
l = (l1 < l2) ? l1 : l2;
/* compare first by data type */
r = librdf_uri_compare(librdf_node_get_literal_value_datatype_uri(n1),
librdf_node_get_literal_value_datatype_uri(n2));
if (r)
return r;
/* if data type is equal, compare by value */
r = strcmp((const char*)librdf_node_get_literal_value(n1),
(const char*)librdf_node_get_literal_value(n2));
if (r)
return r;
/* if both data type and value are equal, compare by language */
if (l) {
return strncmp(librdf_node_get_literal_value_language(n1),
librdf_node_get_literal_value_language(n2),
(size_t)l);
} else {
/* if l == 0 strncmp will always return 0; in that case
* consider the node with no language to be lesser. */
return l1 - l2;
}
}
case LIBRDF_NODE_TYPE_BLANK:
return strcmp((char*)n1->value.blank.identifier,
(char*)n2->value.blank.identifier);
case LIBRDF_NODE_TYPE_UNKNOWN:
default:
return (char*)n2-(char*)n1; /* ? */
}
}
}
RdfNode RdfStorePrivate::LibRdfNodeToRdfNode(librdf_node* node) const
{
RdfNode mitkNode;
if (!node) return mitkNode;
if (librdf_node_is_resource(node))
{
mitkNode.SetType(RdfNode::URI);
librdf_uri *uri = librdf_node_get_uri(node);
mitkNode.SetValue(LibRdfUriToRdfUri(uri).ToString());
}
else if (librdf_node_is_literal(node))
{
mitkNode.SetType(RdfNode::LITERAL);
std::string value = (const char*) librdf_node_get_literal_value(node);
if (!value.empty()) mitkNode.SetValue(value);
librdf_uri* typeUri = librdf_node_get_literal_value_datatype_uri(node);
if (typeUri) mitkNode.SetDatatype(LibRdfUriToRdfUri(typeUri));
}
else if (librdf_node_is_blank(node))
{
mitkNode.SetType(RdfNode::BLANK);
std::string str = (const char*) librdf_node_get_blank_identifier(node);
if (!str.empty()) mitkNode.SetValue(str);
}
return mitkNode;
}
rasqal_literal*
redland_node_to_rasqal_literal(librdf_world* world, librdf_node *node)
{
rasqal_literal* l;
if(librdf_node_is_resource(node)) {
raptor_uri* uri=(raptor_uri*)librdf_new_uri_from_uri(librdf_node_get_uri(node));
l=rasqal_new_uri_literal(world->rasqal_world_ptr, uri); /* transfer uri ownership to literal */
} else if(librdf_node_is_literal(node)) {
unsigned char *string;
librdf_uri *uri;
unsigned char *new_string;
char *new_language=NULL;
raptor_uri *new_datatype=NULL;
size_t len;
string=librdf_node_get_literal_value_as_counted_string(node, &len);
new_string=(unsigned char*)rasqal_alloc_memory(len+1);
if(!new_string)
return NULL;
strcpy((char*)new_string, (const char*)string);
string=(unsigned char*)librdf_node_get_literal_value_language(node);
if(string) {
new_language=(char*)rasqal_alloc_memory(strlen((const char*)string)+1);
if(!new_language) {
rasqal_free_memory((void*)new_string);
return NULL;
}
strcpy((char*)new_language, (const char*)string);
}
uri=librdf_node_get_literal_value_datatype_uri(node);
if(uri)
new_datatype=(raptor_uri*)librdf_new_uri_from_uri(uri);
/* transfer new_string,new_language,new_datatype ownership to literal */
l = rasqal_new_string_literal(world->rasqal_world_ptr, (const unsigned char*)new_string, new_language, new_datatype, NULL);
} else {
unsigned char *blank=librdf_node_get_blank_identifier(node);
unsigned char *new_blank;
if(!blank)
return NULL;
new_blank=(unsigned char*)rasqal_alloc_memory(strlen((const char*)blank)+1);
if(!new_blank)
return NULL;
strcpy((char*)new_blank, (const char*)blank);
/* transfer new_blank ownership to literal */
l = rasqal_new_simple_literal(world->rasqal_world_ptr, RASQAL_LITERAL_BLANK, (const unsigned char*)new_blank);
}
return l;
}
/** Create a new SLV2Value from a librdf_node, or return NULL if impossible */
SLV2Value
slv2_value_from_librdf_node(SLV2World world, librdf_node* node)
{
SLV2Value result = NULL;
librdf_uri* datatype_uri = NULL;
SLV2ValueType type = SLV2_VALUE_STRING;
switch (librdf_node_get_type(node)) {
case LIBRDF_NODE_TYPE_RESOURCE:
type = SLV2_VALUE_URI;
result = slv2_value_new_librdf_uri(world, librdf_node_get_uri(node));
break;
case LIBRDF_NODE_TYPE_LITERAL:
datatype_uri = librdf_node_get_literal_value_datatype_uri(node);
if (datatype_uri) {
if (!strcmp((const char*)librdf_uri_as_string(datatype_uri),
"http://www.w3.org/2001/XMLSchema#integer"))
type = SLV2_VALUE_INT;
else if (!strcmp((const char*)librdf_uri_as_string(datatype_uri),
"http://www.w3.org/2001/XMLSchema#decimal"))
type = SLV2_VALUE_FLOAT;
else
fprintf(stderr, "Unknown datatype %s\n", librdf_uri_as_string(datatype_uri));
}
result = slv2_value_new(world, type, (const char*)librdf_node_get_literal_value(node));
break;
case LIBRDF_NODE_TYPE_BLANK:
type = SLV2_VALUE_STRING;
result = slv2_value_new(world, type, (const char*)librdf_node_get_blank_identifier(node));
break;
case LIBRDF_NODE_TYPE_UNKNOWN:
default:
fprintf(stderr, "Unknown RDF node type %d\n", librdf_node_get_type(node));
break;
}
return result;
}
/*
* Convert the given literal librdf_node to a Ruby object and return it.
*/
VALUE
rleaf_librdf_literal_node_to_object( librdf_node *node ) {
VALUE node_object = Qnil;
librdf_uri *uri;
VALUE literalstring, uristring;
uri = librdf_node_get_literal_value_datatype_uri( node );
literalstring = rb_str_new2( (char *)librdf_node_get_literal_value(node) );
/* Plain literal -> String */
if ( uri == NULL ) {
// rleaf_log( "debug", "Converting plain literal %s to a String.", literalstring );
node_object = literalstring;
}
/* Typed literal */
else {
uristring = rb_str_new2( (char *)librdf_uri_to_string(uri) );
node_object = rb_funcall( rleaf_mRedleafNodeUtils,
rb_intern("make_typed_literal_object"), 2, uristring, literalstring );
}
return node_object;
}
static
char* node_helper(librdf_storage* storage, librdf_node* node)
{
librdf_uri* uri;
librdf_uri* dt_uri;
const char* integer_type = "http://www.w3.org/2001/XMLSchema#integer";
const char* float_type = "http://www.w3.org/2001/XMLSchema#float";
const char* datetime_type = "http://www.w3.org/2001/XMLSchema#dateTime";
char* name;
char data_type;
switch(librdf_node_get_type(node)) {
case LIBRDF_NODE_TYPE_RESOURCE:
uri = librdf_node_get_uri(node);
name = librdf_uri_as_string(uri);
data_type = 'u';
break;
case LIBRDF_NODE_TYPE_LITERAL:
dt_uri = librdf_node_get_literal_value_datatype_uri(node);
if (dt_uri == 0)
data_type = 's';
else {
const char* type_uri = librdf_uri_as_string(dt_uri);
if (strcmp(type_uri, integer_type) == 0)
data_type = 'i';
else if (strcmp(type_uri, float_type) == 0)
data_type = 'f';
else if (strcmp(type_uri, datetime_type) == 0)
data_type = 'd';
else
data_type = 's';
}
name = librdf_node_get_literal_value(node);
break;
case LIBRDF_NODE_TYPE_BLANK:
name = librdf_node_get_blank_identifier(node);
data_type = 'b';
break;
case LIBRDF_NODE_TYPE_UNKNOWN:
break;
}
char* term = malloc(5 + strlen(name));
if (term == 0) {
fprintf(stderr, "malloc failed");
return 0;
}
sprintf(term, "%c:%s", data_type, name);
return term;
}
static void
librdf_serializer_print_statement_as_ntriple(librdf_statement * statement,
FILE *stream)
{
librdf_node *subject=librdf_statement_get_subject(statement);
librdf_node *predicate=librdf_statement_get_predicate(statement);
librdf_node *object=librdf_statement_get_object(statement);
char *lang=NULL;
librdf_uri *dt_uri=NULL;
if(librdf_node_is_blank(subject))
fprintf(stream, "_:%s", librdf_node_get_blank_identifier(subject));
else if(librdf_node_is_resource(subject)) {
/* Must be a URI */
fputc('<', stream);
raptor_print_ntriples_string(stream, librdf_uri_as_string(librdf_node_get_uri(subject)), '\0');
fputc('>', stream);
} else {
LIBRDF_ERROR2(statement->world, "Do not know how to print triple subject type %d\n", librdf_node_get_type(subject));
return;
}
if(!librdf_node_is_resource(predicate)) {
LIBRDF_ERROR2(statement->world, "Do not know how to print triple predicate type %d\n", librdf_node_get_type(predicate));
return;
}
fputc(' ', stream);
fputc('<', stream);
raptor_print_ntriples_string(stream, librdf_uri_as_string(librdf_node_get_uri(predicate)), '\0');
fputc('>', stream);
fputc(' ', stream);
switch(librdf_node_get_type(object)) {
case LIBRDF_NODE_TYPE_LITERAL:
fputc('"', stream);
raptor_print_ntriples_string(stream, librdf_node_get_literal_value(object), '"');
fputc('"', stream);
lang=librdf_node_get_literal_value_language(object);
dt_uri=librdf_node_get_literal_value_datatype_uri(object);
if(lang) {
fputc('@', stream);
fputs(lang, stream);
}
if(dt_uri) {
fputs("^^<", stream);
raptor_print_ntriples_string(stream, librdf_uri_as_string(dt_uri), '\0');
fputc('>', stream);
}
break;
case LIBRDF_NODE_TYPE_BLANK:
fputs("_:", stream);
fputs((const char*)librdf_node_get_blank_identifier(object), stream);
break;
case LIBRDF_NODE_TYPE_RESOURCE:
fputc('<', stream);
raptor_print_ntriples_string(stream, librdf_uri_as_string(librdf_node_get_uri(object)), '\0');
fputc('>', stream);
break;
default:
LIBRDF_ERROR2(statement->world, "Do not know how to print triple object type %d\n", librdf_node_get_type(object));
return;
}
fputs(" .", stream);
}
UT_Error IE_Imp_OpenDocument::_handleRDFStreams ()
{
#ifndef WITH_REDLAND
return UT_OK;
#else
UT_Error error = UT_OK;
UT_DEBUGMSG(("IE_Imp_OpenDocument::_handleRDFStreams()\n"));
// // DEBUG.
// {
// PD_DocumentRDFHandle rdf = getDoc()->getDocumentRDF();
// PD_DocumentRDFMutationHandle m = rdf->createMutation();
// m->add( PD_URI("http://www.example.com/foo#bar" ),
// PD_URI("http://www.example.com/foo#bar" ),
// PD_Object("http://www.example.com/foo#bar" ) );
// m->commit();
// rdf->dumpModel("added foo");
// }
RDFArguments args;
librdf_model* model = args.model;
// check if we can load a manifest.rdf file
GsfInput* pRdfManifest = gsf_infile_child_by_name(m_pGsfInfile, "manifest.rdf");
if (pRdfManifest)
{
UT_DEBUGMSG(("IE_Imp_OpenDocument::_handleRDFStreams() have manifest.rdf\n"));
error = _loadRDFFromFile( pRdfManifest, "manifest.rdf", &args );
g_object_unref (G_OBJECT (pRdfManifest));
if (error != UT_OK)
return error;
}
// find other RDF/XML files referenced in the manifest
const char* query_string = ""
"prefix rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#> \n"
"prefix odf: <http://docs.oasis-open.org/opendocument/meta/package/odf#> \n"
"prefix odfcommon: <http://docs.oasis-open.org/opendocument/meta/package/common#> \n"
"select ?subj ?fileName \n"
" where { \n"
" ?subj rdf:type odf:MetaDataFile . \n"
" ?subj odfcommon:path ?fileName \n"
" } \n";
librdf_uri* base_uri = 0;
librdf_query* query = librdf_new_query( args.world, "sparql", 0,
(unsigned char*)query_string,
base_uri );
librdf_query_results* results = librdf_query_execute( query, model );
if( !results )
{
// Query failed is a failure to execute the SPARQL,
// in which case there might be results but we couldn't find them
UT_DEBUGMSG(("IE_Imp_OpenDocument::_handleRDFStreams() SPARQL query to find auxillary RDF/XML files failed! q:%p\n", query ));
error = UT_ERROR;
}
else
{
UT_DEBUGMSG(("IE_Imp_OpenDocument::_handleRDFStreams() aux RDF/XML file count:%d\n",
librdf_query_results_get_count( results )));
// parse auxillary RDF/XML files too
for( ; !librdf_query_results_finished( results ) ;
librdf_query_results_next( results ))
{
librdf_node* fnNode = librdf_query_results_get_binding_value_by_name
( results, "fileName" );
UT_DEBUGMSG(("_handleRDFStreams() fnNode:%p\n", fnNode ));
std::string fn = toString(fnNode);
UT_DEBUGMSG(("_handleRDFStreams() loading auxilary RDF/XML file from:%s\n",
fn.c_str()));
GsfInput* pAuxRDF = gsf_infile_child_by_name(m_pGsfInfile, fn.c_str());
if (pAuxRDF) {
error = _loadRDFFromFile( pAuxRDF, fn.c_str(), &args );
g_object_unref (G_OBJECT (pAuxRDF));
if( error != UT_OK )
break;
} else {
UT_ASSERT_HARMLESS(UT_SHOULD_NOT_HAPPEN);
return UT_ERROR;
}
}
librdf_free_query_results( results );
}
librdf_free_query( query );
UT_DEBUGMSG(("_handleRDFStreams() error:%d model.sz:%d\n",
error, librdf_model_size( model )));
if( error != UT_OK )
{
return error;
}
// convert the redland model into native AbiWord RDF triples
{
PD_DocumentRDFHandle rdf = getDoc()->getDocumentRDF();
PD_DocumentRDFMutationHandle m = rdf->createMutation();
librdf_statement* statement = librdf_new_statement( args.world );
librdf_stream* stream = librdf_model_find_statements( model, statement );
while (!librdf_stream_end(stream))
{
librdf_statement* current = librdf_stream_get_object( stream );
int objectType = PD_Object::OBJECT_TYPE_URI;
std::string xsdType = "";
if( librdf_node_is_blank( librdf_statement_get_object( current )))
{
objectType = PD_Object::OBJECT_TYPE_BNODE;
}
if( librdf_node_is_literal( librdf_statement_get_object( current )))
{
objectType = PD_Object::OBJECT_TYPE_LITERAL;
if( librdf_uri* u = librdf_node_get_literal_value_datatype_uri(
librdf_statement_get_object( current )))
{
xsdType = toString(u);
}
}
if( DEBUG_RDF_IO )
{
UT_DEBUGMSG(("_handleRDFStreams() adding s:%s p:%s o:%s rotv:%d otv:%d ots:%s\n",
toString( librdf_statement_get_subject( current )).c_str(),
toString( librdf_statement_get_predicate( current )).c_str(),
toString( librdf_statement_get_object( current )).c_str(),
librdf_node_get_type(librdf_statement_get_object( current )),
objectType,
xsdType.c_str()
));
}
m->add( PD_URI( toString( librdf_statement_get_subject( current ))),
PD_URI( toString( librdf_statement_get_predicate( current ))),
PD_Object( toString( librdf_statement_get_object( current )), objectType, xsdType ));
// m->add( PD_URI( toString( librdf_statement_get_subject( current ))),
// PD_URI( toString( librdf_statement_get_predicate( current ))),
// PD_Object( toString( librdf_statement_get_object( current )),
// objectType,
// xsdType ));
librdf_stream_next(stream);
}
librdf_free_stream( stream );
librdf_free_statement( statement );
// m->add( PD_URI("http://www.example.com/foo#bar" ),
// PD_URI("http://www.example.com/foo#bar" ),
// PD_Object("http://www.example.com/foo#bar" ) );
m->commit();
}
if( DEBUG_RDF_IO )
{
getDoc()->getDocumentRDF()->dumpModel("Loaded RDF from ODF file");
}
return error;
#endif
}
