Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-11-04 08:04:06 +01:00
Code Issues Releases Wiki Activity
Files
a1b02e5dbeaaa42737269f70c18e232e68092541
audacity/lib-src/redland/librdf/rdf_parser_raptor.c
ra 58caf78a86 Move library tree where it belongs
2010-01-24 09:19:39 +00:00

1448 lines
45 KiB
C
Raw Blame History

/* -*- Mode: c; c-basic-offset: 2 -*-
*
* rdf_parser.c - RDF Parser using Raptor
*
* Copyright (C) 2000-2008, David Beckett http://www.dajobe.org/
* Copyright (C) 2000-2004, University of Bristol, UK http://www.bristol.ac.uk/
*
* This package is Free Software and part of Redland http://librdf.org/
*
* It is licensed under the following three licenses as alternatives:
* 1. GNU Lesser General Public License (LGPL) V2.1 or any newer version
* 2. GNU General Public License (GPL) V2 or any newer version
* 3. Apache License, V2.0 or any newer version
*
* You may not use this file except in compliance with at least one of
* the above three licenses.
*
* See LICENSE.html or LICENSE.txt at the top of this package for the
* complete terms and further detail along with the license texts for
* the licenses in COPYING.LIB, COPYING and LICENSE-2.0.txt respectively.
*
*
*/
#ifdef HAVE_CONFIG_H
#include <rdf_config.h>
#endif
#ifdef WIN32
#include <win32_rdf_config.h>
#endif
#include <stdio.h>
#include <string.h>
#ifdef HAVE_STDLIB_H
#include <stdlib.h> /* for abort() as used in errors */
#endif
#ifdef HAVE_ERRNO_H
#include <errno.h>
#endif
#include <redland.h>
/* serialising implementing functions */
static int librdf_parser_raptor_serialise_end_of_stream(void* context);
static int librdf_parser_raptor_serialise_next_statement(void* context);
static void* librdf_parser_raptor_serialise_get_statement(void* context, int flags);
static void librdf_parser_raptor_serialise_finished(void* context);
typedef struct {
librdf_parser *parser; /* librdf parser object */
librdf_hash *bnode_hash; /* bnode id (raptor=>internal) map */
raptor_parser *rdf_parser; /* source URI string (for raptor) */
const char *parser_name; /* raptor parser name to use */
raptor_sequence* nspace_prefixes;
raptor_sequence* nspace_uris;
int errors;
int warnings;
raptor_www *www; /* raptor stream */
void *stream_context; /* librdf_parser_raptor_stream_context* */
} librdf_parser_raptor_context;
typedef struct {
librdf_parser_raptor_context* pcontext; /* parser context */
/* when reading from a file */
FILE *fh;
/* when true, this FH is closed on finish */
int close_fh;
/* when finished */
int finished;
/* when storing into a model - librdf_parser_raptor_parse_uri_into_model */
librdf_model *model;
/* The set of statements pending is a sequence, with 'current'
* as the first entry and any remaining ones held in 'statements'.
* The latter are filled by the parser
* sequence is empty := current=NULL and librdf_list_size(statements)=0
*/
librdf_statement* current; /* current statement */
librdf_list* statements;
} librdf_parser_raptor_stream_context;
static int
librdf_parser_raptor_relay_filter(void* user_data, raptor_uri* uri)
{
librdf_parser* parser=(librdf_parser*)user_data;
return parser->uri_filter(parser->uri_filter_user_data, (librdf_uri*)uri);
}
/**
* librdf_parser_raptor_init:
* @parser: the parser
* @context: context
*
* Initialise the raptor RDF parser.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_init(librdf_parser *parser, void *context)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
pcontext->parser = parser;
pcontext->parser_name=pcontext->parser->factory->name;
/* legacy name - see librdf_parser_raptor_constructor
* from when there was just one parser
*/
if(!strcmp(pcontext->parser_name, "raptor"))
pcontext->parser_name="rdfxml";
/* New in-memory hash for mapping bnode IDs */
pcontext->bnode_hash=librdf_new_hash(parser->world, NULL);
if(!pcontext->bnode_hash)
return 1;
pcontext->rdf_parser=raptor_new_parser(pcontext->parser_name);
if(!pcontext->rdf_parser)
return 1;
return 0;
}
/**
* librdf_parser_raptor_terminate:
* @context: context
*
* Terminate the raptor RDF parser.
*
**/
static void
librdf_parser_raptor_terminate(void *context)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
if(pcontext->stream_context)
librdf_parser_raptor_serialise_finished(pcontext->stream_context);
if(pcontext->www)
raptor_www_free(pcontext->www);
if(pcontext->rdf_parser)
raptor_free_parser(pcontext->rdf_parser);
if(pcontext->bnode_hash)
librdf_free_hash(pcontext->bnode_hash);
if(pcontext->nspace_prefixes)
raptor_free_sequence(pcontext->nspace_prefixes);
if(pcontext->nspace_uris)
raptor_free_sequence(pcontext->nspace_uris);
}
/*
* librdf_parser_raptor_new_statement_handler - helper callback function for raptor RDF when a new triple is asserted
* @context: context for callback
* @statement: raptor_statement
*
* Adds the statement to the list of statements.
*/
static void
librdf_parser_raptor_new_statement_handler(void *context,
const raptor_statement *rstatement)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)context;
librdf_node* node;
librdf_statement* statement;
#ifdef LIBRDF_DEBUG
#if LIBRDF_DEBUG > 1
char *s;
#endif
#endif
librdf_world* world=scontext->pcontext->parser->world;
int rc;
statement=librdf_new_statement(world);
if(!statement)
return;
if(rstatement->subject_type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS) {
node=librdf_new_node_from_blank_identifier(world, (const unsigned char*)rstatement->subject);
} else if (rstatement->subject_type == RAPTOR_IDENTIFIER_TYPE_RESOURCE) {
node=librdf_new_node_from_uri(world, (librdf_uri*)rstatement->subject);
} else {
librdf_log(world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Unknown Raptor subject identifier type %d", rstatement->subject_type);
librdf_free_statement(statement);
return;
}
if(!node) {
librdf_log(world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Cannot create subject node");
librdf_free_statement(statement);
return;
}
librdf_statement_set_subject(statement, node);
if(rstatement->predicate_type == RAPTOR_IDENTIFIER_TYPE_ORDINAL) {
/* FIXME - but only a little
* Do I really need to do log10(ordinal) [or /10 and count] + 1 ?
* See also librdf_heuristic_gen_name for some code to repurpose.
*/
char ordinal_buffer[100];
int ordinal=*(int*)rstatement->predicate;
sprintf(ordinal_buffer, "http://www.w3.org/1999/02/22-rdf-syntax-ns#_%d", ordinal);
node=librdf_new_node_from_uri_string(world, (const unsigned char*)ordinal_buffer);
} else if (rstatement->predicate_type == RAPTOR_IDENTIFIER_TYPE_RESOURCE ||
rstatement->predicate_type == RAPTOR_IDENTIFIER_TYPE_PREDICATE) {
node=librdf_new_node_from_uri(world, (librdf_uri*)rstatement->predicate);
} else {
librdf_log(world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Unknown Raptor predicate identifier type %d", rstatement->predicate_type);
librdf_free_statement(statement);
return;
}
if(!node) {
librdf_log(world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Cannot create predicate node");
librdf_free_statement(statement);
return;
}
librdf_statement_set_predicate(statement, node);
if(rstatement->object_type == RAPTOR_IDENTIFIER_TYPE_LITERAL ||
rstatement->object_type == RAPTOR_IDENTIFIER_TYPE_XML_LITERAL) {
int is_xml_literal = (rstatement->object_type == RAPTOR_IDENTIFIER_TYPE_XML_LITERAL);
librdf_uri *datatype_uri=(librdf_uri*)rstatement->object_literal_datatype;
if(is_xml_literal) {
node = librdf_new_node_from_literal(world,
(const unsigned char*)rstatement->object,
(const char*)rstatement->object_literal_language,
is_xml_literal);
} else {
node = librdf_new_node_from_typed_literal(world,
(const unsigned char*)rstatement->object,
(const char*)rstatement->object_literal_language,
datatype_uri);
}
} else if(rstatement->object_type == RAPTOR_IDENTIFIER_TYPE_ANONYMOUS) {
node=librdf_new_node_from_blank_identifier(world, (const unsigned char*)rstatement->object);
} else if(rstatement->object_type == RAPTOR_IDENTIFIER_TYPE_RESOURCE) {
node=librdf_new_node_from_uri(world, (librdf_uri*)rstatement->object);
} else {
librdf_log(world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Unknown Raptor object identifier type %d", rstatement->object_type);
librdf_free_statement(statement);
return;
}
if(!node) {
librdf_log(world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Cannot create object node");
librdf_free_statement(statement);
return;
}
librdf_statement_set_object(statement, node);
#ifdef LIBRDF_DEBUG
#if LIBRDF_DEBUG > 1
s=librdf_statement_to_string(statement);
fprintf(stderr, "Got new statement: %s\n", s);
LIBRDF_FREE(cstring, s);
#endif
#endif
if(scontext->model) {
rc=librdf_model_add_statement(scontext->model, statement);
librdf_free_statement(statement);
} else {
rc=librdf_list_add(scontext->statements, statement);
if(rc)
librdf_free_statement(statement);
}
if(rc) {
librdf_log(world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Cannot add statement to model");
}
}
/*
* librdf_parser_raptor_namespace_handler - helper callback function for raptor RDF when a namespace is seen
* @context: context for callback
* @statement: raptor_statement
*
* Adds the statement to the list of statements.
*/
static void
librdf_parser_raptor_namespace_handler(void* user_data,
raptor_namespace *nspace)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)user_data;
const unsigned char* prefix;
unsigned char* nprefix;
size_t prefix_length;
librdf_uri* uri;
int i;
uri=(librdf_uri*)raptor_namespace_get_uri(nspace);
if(!uri)
return;
for(i=0; i < raptor_sequence_size(pcontext->nspace_uris); i++) {
librdf_uri* u=(librdf_uri*)raptor_sequence_get_at(pcontext->nspace_uris, i);
if(librdf_uri_equals(uri, u))
return;
}
/* new namespace */
uri=librdf_new_uri_from_uri(uri);
raptor_sequence_push(pcontext->nspace_uris, uri);
prefix=raptor_namespace_get_counted_prefix(nspace, &prefix_length);
if(prefix) {
nprefix=(unsigned char*)LIBRDF_MALLOC(cstring, prefix_length+1);
/* FIXME: what if nprefix alloc failed? now just pushes NULL to sequence */
if(nprefix)
strncpy((char*)nprefix, (const char*)prefix, prefix_length+1);
} else
nprefix=NULL;
raptor_sequence_push(pcontext->nspace_prefixes, nprefix);
}
static void
librdf_parser_raptor_error_handler(void *data, raptor_locator *locator,
const char *message)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)data;
pcontext->errors++;
raptor_parse_abort(pcontext->rdf_parser);
librdf_log_simple(pcontext->parser->world, 0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, locator, message);
}
static void
librdf_parser_raptor_warning_handler(void *data, raptor_locator *locator,
const char *message)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)data;
pcontext->warnings++;
librdf_log_simple(pcontext->parser->world, 0, LIBRDF_LOG_WARN, LIBRDF_FROM_PARSER, locator, message);
}
/* FIXME: Yeah? What about it? */
#define RAPTOR_IO_BUFFER_LEN 1024
/*
* librdf_parser_raptor_get_next_statement - helper function to get the next statement
* @context: serialisation context
*
* Return value: >0 if a statement found, 0 at end of file, or <0 on error
*/
static int
librdf_parser_raptor_get_next_statement(librdf_parser_raptor_stream_context *context) {
unsigned char buffer[RAPTOR_IO_BUFFER_LEN];
int status=0;
if(context->finished || !context->fh)
return 0;
context->current=NULL;
while(!feof(context->fh)) {
int len=fread(buffer, 1, RAPTOR_IO_BUFFER_LEN, context->fh);
int ret=raptor_parse_chunk(context->pcontext->rdf_parser, buffer, len,
(len < RAPTOR_IO_BUFFER_LEN));
if(ret) {
status=(-1);
break; /* failed and done */
}
/* parsing found at least 1 statement, return */
if(librdf_list_size(context->statements)) {
context->current=(librdf_statement*)librdf_list_pop(context->statements);
status=1;
break;
}
if(len < RAPTOR_IO_BUFFER_LEN)
break;
}
if(feof(context->fh) || status <1)
context->finished=1;
return status;
}
static unsigned char*
librdf_parser_raptor_generate_id_handler(void *user_data,
raptor_genid_type type,
unsigned char *user_bnodeid)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)user_data;
if(user_bnodeid) {
unsigned char *mapped_id=(unsigned char*)librdf_hash_get(pcontext->bnode_hash, (const char*)user_bnodeid);
if(!mapped_id) {
mapped_id=librdf_world_get_genid(pcontext->parser->world);
if(mapped_id && librdf_hash_put_strings(pcontext->bnode_hash, (char*)user_bnodeid, (char*)mapped_id)) {
/* error -> free mapped_id and return NULL */
LIBRDF_FREE(cstring, mapped_id);
mapped_id=NULL;
}
}
/* always free passed in bnodeid */
raptor_free_memory(user_bnodeid);
return mapped_id;
}
else
return librdf_world_get_genid(pcontext->parser->world);
}
/*
* librdf_parser_raptor_parse_file_handle_as_stream:
* @context: parser context
* @fh: FILE* of content source
* @close_fh: if true to fclose(fh) on finish
* @base_uri: #librdf_uri URI of the content location
*
* Retrieve content from FILE* @fh and parse it into a #librdf_stream.
*
**/
static librdf_stream*
librdf_parser_raptor_parse_file_handle_as_stream(void *context,
FILE *fh, int close_fh,
librdf_uri *base_uri)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
librdf_parser_raptor_stream_context* scontext;
librdf_stream *stream;
int rc;
librdf_world_open(pcontext->parser->world);
if(raptor_get_need_base_uri(pcontext->rdf_parser) && !base_uri) {
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Missing base URI for %s parser",
pcontext->parser_name);
return NULL;
}
pcontext->errors=0;
pcontext->warnings=0;
scontext=(librdf_parser_raptor_stream_context*)LIBRDF_CALLOC(librdf_parser_raptor_stream_context, 1, sizeof(librdf_parser_raptor_stream_context));
if(!scontext)
goto oom;
scontext->pcontext=pcontext;
pcontext->stream_context=scontext;
scontext->statements=librdf_new_list(pcontext->parser->world);
if(!scontext->statements)
goto oom;
if(pcontext->nspace_prefixes)
raptor_free_sequence(pcontext->nspace_prefixes);
pcontext->nspace_prefixes=raptor_new_sequence(free, NULL);
if(!pcontext->nspace_prefixes)
goto oom;
if(pcontext->nspace_uris)
raptor_free_sequence(pcontext->nspace_uris);
pcontext->nspace_uris=raptor_new_sequence((raptor_sequence_free_handler*)librdf_free_uri, NULL);
if(!pcontext->nspace_uris)
goto oom;
raptor_set_statement_handler(pcontext->rdf_parser, scontext,
librdf_parser_raptor_new_statement_handler);
raptor_set_namespace_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_namespace_handler);
raptor_set_error_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_error_handler);
raptor_set_warning_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_warning_handler);
raptor_set_generate_id_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_generate_id_handler);
scontext->fh=fh;
scontext->close_fh=close_fh;
if(pcontext->parser->uri_filter)
raptor_parser_set_uri_filter(pcontext->rdf_parser,
librdf_parser_raptor_relay_filter,
pcontext->parser);
/* Start the parse */
stream=NULL;
rc=raptor_start_parse(pcontext->rdf_parser, (raptor_uri*)base_uri);
if(!rc) {
/* start parsing; initialises scontext->statements, scontext->current */
librdf_parser_raptor_get_next_statement(scontext);
stream=librdf_new_stream(pcontext->parser->world,
(void*)scontext,
&librdf_parser_raptor_serialise_end_of_stream,
&librdf_parser_raptor_serialise_next_statement,
&librdf_parser_raptor_serialise_get_statement,
&librdf_parser_raptor_serialise_finished);
}
if(!stream)
goto oom;
return stream;
/* Clean up and report an error on OOM */
oom:
librdf_parser_raptor_serialise_finished((void*)scontext);
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Out of memory");
return NULL;
}
static void
librdf_parser_raptor_parse_uri_as_stream_write_bytes_handler(raptor_www *www,
void *userdata,
const void *ptr,
size_t size,
size_t nmemb)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)userdata;
int len=size*nmemb;
if(raptor_parse_chunk(scontext->pcontext->rdf_parser, (const unsigned char*)ptr, len, 0))
raptor_www_abort(www, "Parsing failed");
}
/**
* librdf_parser_raptor_parse_as_stream_common:
* @context: parser context
* @uri: #librdf_uri URI of RDF content source
* @string: or content string
* @length: length of the string or 0 if not yet counted
* @base_uri: #librdf_uri URI of the content location or NULL if the same
*
* Retrieve the content at URI/string and parse it into a #librdf_stream.
*
* Only one of uri or string may be given
*
**/
static librdf_stream*
librdf_parser_raptor_parse_as_stream_common(void *context, librdf_uri *uri,
const unsigned char *string,
size_t length,
librdf_uri *base_uri)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
librdf_parser_raptor_stream_context* scontext;
librdf_stream *stream;
if(!base_uri && uri)
base_uri=uri;
if(raptor_get_need_base_uri(pcontext->rdf_parser) && !base_uri) {
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Missing base URI for %s parser",
pcontext->parser_name);
return NULL;
}
pcontext->errors=0;
pcontext->warnings=0;
if(uri && librdf_uri_is_file_uri(uri)) {
char* filename=(char*)librdf_uri_to_filename(uri);
FILE *fh;
if(!filename)
return NULL;
fh=fopen(filename, "r");
if(!fh) {
librdf_log(pcontext->parser->world, 0, LIBRDF_LOG_ERROR,
LIBRDF_FROM_PARSER, NULL, "failed to open file '%s' - %s",
filename, strerror(errno));
SYSTEM_FREE(filename);
return NULL;
}
/* stream will close FH */
stream=librdf_parser_raptor_parse_file_handle_as_stream(context, fh, 1,
base_uri);
SYSTEM_FREE(filename);
return stream;
}
scontext=(librdf_parser_raptor_stream_context*)LIBRDF_CALLOC(librdf_parser_raptor_stream_context, 1, sizeof(librdf_parser_raptor_stream_context));
if(!scontext)
goto oom;
scontext->pcontext=pcontext;
pcontext->stream_context=scontext;
scontext->statements=librdf_new_list(pcontext->parser->world);
if(!scontext->statements)
goto oom;
if(pcontext->nspace_prefixes)
raptor_free_sequence(pcontext->nspace_prefixes);
pcontext->nspace_prefixes=raptor_new_sequence(free, NULL);
if(!pcontext->nspace_prefixes)
goto oom;
if(pcontext->nspace_uris)
raptor_free_sequence(pcontext->nspace_uris);
pcontext->nspace_uris=raptor_new_sequence((raptor_sequence_free_handler*)librdf_free_uri, NULL);
if(!pcontext->nspace_uris)
goto oom;
raptor_set_statement_handler(pcontext->rdf_parser, scontext,
librdf_parser_raptor_new_statement_handler);
raptor_set_namespace_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_namespace_handler);
raptor_set_error_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_error_handler);
raptor_set_warning_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_warning_handler);
raptor_set_generate_id_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_generate_id_handler);
if(pcontext->parser->uri_filter)
raptor_parser_set_uri_filter(pcontext->rdf_parser,
librdf_parser_raptor_relay_filter,
pcontext->parser);
if(uri) {
const char *accept_h;
if(pcontext->www)
raptor_www_free(pcontext->www);
pcontext->www=raptor_www_new();
if(!pcontext->www)
goto oom;
accept_h=raptor_parser_get_accept_header(pcontext->rdf_parser);
if(accept_h) {
raptor_www_set_http_accept(pcontext->www, accept_h);
raptor_free_memory((char*)accept_h);
}
raptor_www_set_write_bytes_handler(pcontext->www,
librdf_parser_raptor_parse_uri_as_stream_write_bytes_handler,
scontext);
if(raptor_start_parse(pcontext->rdf_parser, (raptor_uri*)base_uri)) {
raptor_www_free(pcontext->www);
pcontext->www=NULL;
librdf_parser_raptor_serialise_finished((void*)scontext);
return NULL;
}
raptor_www_fetch(pcontext->www, (raptor_uri*)uri);
raptor_parse_chunk(pcontext->rdf_parser, NULL, 0, 1);
raptor_www_free(pcontext->www);
pcontext->www=NULL;
} else {
if(raptor_start_parse(pcontext->rdf_parser, (raptor_uri*)base_uri)) {
librdf_parser_raptor_serialise_finished((void*)scontext);
return NULL;
}
if(!length)
length=strlen((const char*)string);
raptor_parse_chunk(pcontext->rdf_parser, string, length, 1);
}
/* get first statement, else is empty */
scontext->current=(librdf_statement*)librdf_list_pop(scontext->statements);
stream=librdf_new_stream(pcontext->parser->world,
(void*)scontext,
&librdf_parser_raptor_serialise_end_of_stream,
&librdf_parser_raptor_serialise_next_statement,
&librdf_parser_raptor_serialise_get_statement,
&librdf_parser_raptor_serialise_finished);
if(!stream)
goto oom;
return stream;
/* Clean up and report an error on OOM */
oom:
librdf_parser_raptor_serialise_finished((void*)scontext);
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Out of memory");
return NULL;
}
/**
* librdf_parser_raptor_parse_uri_as_stream:
* @context: parser context
* @uri: #librdf_uri URI of content source
* @base_uri: #librdf_uri URI of the content location or NULL if the same
*
* Retrieve the content at URI and parse it into a librdf_stream.
*
*
**/
static librdf_stream*
librdf_parser_raptor_parse_uri_as_stream(void *context, librdf_uri *uri,
librdf_uri *base_uri)
{
return librdf_parser_raptor_parse_as_stream_common(context, uri,
NULL, 0,
base_uri);
}
/**
* librdf_parser_raptor_parse_string_as_stream:
* @context: parser context
* @string: string content to parse
* @base_uri: #librdf_uri URI of the content location or NULL if the same
*
* Parse the content in a string and return a librdf_stream.
*
*
**/
static librdf_stream*
librdf_parser_raptor_parse_string_as_stream(void *context,
const unsigned char *string,
librdf_uri *base_uri)
{
return librdf_parser_raptor_parse_as_stream_common(context, NULL,
string, 0,
base_uri);
}
/**
* librdf_parser_raptor_parse_counted_string_as_stream:
* @context: parser context
* @string: string content to parse
* @length: length of the string content (must be >0)
* @base_uri: the base URI to use
*
* Parse a counted string of content to a librdf_stream of statements.
*
* Return value: #librdf_stream of statements or NULL
**/
static librdf_stream*
librdf_parser_raptor_parse_counted_string_as_stream(void *context,
const unsigned char *string,
size_t length,
librdf_uri* base_uri)
{
return librdf_parser_raptor_parse_as_stream_common(context, NULL,
string, length,
base_uri);
}
/*
* librdf_parser_raptor_parse_into_model_common:
* @context: parser context
* @uri: #librdf_uri URI of RDF content source or NULL if from a string or a file handler
* @string: string content to parser or NULL if from a URI or a file handler
* @fh: FILE* content source or NULL if from a URI or a string
* @length: length of the string or 0 if not yet counted
* @base_uri: #librdf_uri URI of the content location or NULL
* @model: #librdf_model of model
*
* Retrieve the RDF content at URI and store it into a librdf_model.
*
* Parses the content at @uri, @string or @fh and store it in the given model.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_parse_into_model_common(void *context,
librdf_uri *uri,
const unsigned char *string,
FILE *fh,
size_t length,
librdf_uri *base_uri,
librdf_model* model)
{
int status=0;
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
librdf_parser_raptor_stream_context* scontext;
if(!base_uri)
base_uri=uri;
if(raptor_get_need_base_uri(pcontext->rdf_parser) && !base_uri) {
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Missing base URI for %s parser",
pcontext->parser_name);
return 1;
}
pcontext->errors=0;
pcontext->warnings=0;
scontext=(librdf_parser_raptor_stream_context*)LIBRDF_CALLOC(librdf_parser_raptor_stream_context, 1, sizeof(librdf_parser_raptor_stream_context));
if(!scontext)
goto oom;
scontext->pcontext=pcontext;
pcontext->stream_context=scontext;
if(pcontext->nspace_prefixes)
raptor_free_sequence(pcontext->nspace_prefixes);
pcontext->nspace_prefixes=raptor_new_sequence(free, NULL);
if(!pcontext->nspace_prefixes)
goto oom;
if(pcontext->nspace_uris)
raptor_free_sequence(pcontext->nspace_uris);
pcontext->nspace_uris=raptor_new_sequence((raptor_sequence_free_handler*)librdf_free_uri, NULL);
if(!pcontext->nspace_uris)
goto oom;
raptor_set_statement_handler(pcontext->rdf_parser, scontext,
librdf_parser_raptor_new_statement_handler);
raptor_set_namespace_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_namespace_handler);
raptor_set_error_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_error_handler);
raptor_set_warning_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_warning_handler);
raptor_set_generate_id_handler(pcontext->rdf_parser, pcontext,
librdf_parser_raptor_generate_id_handler);
/* direct into model */
scontext->model=model;
if(pcontext->parser->uri_filter)
raptor_parser_set_uri_filter(pcontext->rdf_parser,
librdf_parser_raptor_relay_filter,
pcontext->parser);
if(uri) {
status=raptor_parse_uri(pcontext->rdf_parser, (raptor_uri*)uri,
(raptor_uri*)base_uri);
} else if (string != NULL) {
status=raptor_start_parse(pcontext->rdf_parser, (raptor_uri*)base_uri);
if(!status) {
if(!length)
length=strlen((const char*)string);
status=raptor_parse_chunk(pcontext->rdf_parser, string, length, 1);
}
} else {
status=raptor_parse_file_stream(pcontext->rdf_parser, fh, NULL, (raptor_uri*)base_uri);
}
librdf_parser_raptor_serialise_finished((void*)scontext);
return status;
/* Clean up and report an error on OOM */
oom:
librdf_parser_raptor_serialise_finished((void*)scontext);
librdf_log(pcontext->parser->world,
0, LIBRDF_LOG_FATAL, LIBRDF_FROM_PARSER, NULL,
"Out of memory");
return -1;
}
/**
* librdf_parser_raptor_parse_uri_into_model:
* @context: parser context
* @uri: #librdf_uri URI of RDF content source
* @base_uri: #librdf_uri URI of the content location (or NULL if the same as @uri)
* @model: #librdf_model of model
*
* Retrieve the RDF content at URI and store it into a librdf_model.
*
* Retrieves all statements and stores them in the given model.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_parse_uri_into_model(void *context, librdf_uri *uri,
librdf_uri *base_uri,
librdf_model* model)
{
return librdf_parser_raptor_parse_into_model_common(context, uri,
NULL, NULL, 0,
base_uri, model);}
/**
* librdf_parser_raptor_parse_string_into_model:
* @context: parser context
* @string: content to parse
* @base_uri: #librdf_uri URI of the content location
* @model: #librdf_model of model
*
* Parse the RDF content in a string and store it into a librdf_model.
*
* Stores the statements found parsing string and stores in the given model.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_parse_string_into_model(void *context,
const unsigned char *string,
librdf_uri *base_uri,
librdf_model* model)
{
return librdf_parser_raptor_parse_into_model_common(context, NULL,
string, NULL, 0,
base_uri, model);
}
/**
* librdf_parser_raptor_parse_file_handle_into_model:
* @context: parser context
* @fh: FILE* of content source
* @close_fh: non-0 to fclose(fh) on finish
* @base_uri: #librdf_uri URI of the content location (or NULL)
* @model: #librdf_model of model
*
* INTERNAL - Retrieve the RDF content from a FILE* handle and store it into a #librdf_model.
*
* Retrieves all statements and stores them in the given model.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_parse_file_handle_into_model(void *context, FILE *fh,
int close_fh,
librdf_uri *base_uri,
librdf_model* model)
{
int status=librdf_parser_raptor_parse_into_model_common(context, NULL,
NULL, fh, 0,
base_uri, model);
if (close_fh)
fclose(fh);
return status;
}
/**
* librdf_parser_raptor_parse_counted_string_into_model:
* @context: parser context
* @string: the content to parse
* @length: length of content (must be >0)
* @base_uri: the base URI to use
* @model: the model to use
*
* INTERNAL - Parse a counted string of content into an #librdf_model.
*
* Return value: non 0 on failure
**/
static int
librdf_parser_raptor_parse_counted_string_into_model(void *context,
const unsigned char *string,
size_t length,
librdf_uri* base_uri,
librdf_model* model)
{
return librdf_parser_raptor_parse_into_model_common(context, NULL,
string, NULL, length,
base_uri, model);
}
/**
* librdf_parser_raptor_serialise_end_of_stream:
* @context: the context passed in by #librdf_stream
*
* Check for the end of the stream of statements from the raptor RDF parser.
*
* Return value: non 0 at end of stream
**/
static int
librdf_parser_raptor_serialise_end_of_stream(void* context)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)context;
return (!scontext->current && !librdf_list_size(scontext->statements));
}
/**
* librdf_parser_raptor_serialise_next_statement:
* @context: the context passed in by #librdf_stream
*
* Move to the next librdf_statement in the stream of statements from the raptor RDF parse.
*
* Return value: non 0 at end of stream
**/
static int
librdf_parser_raptor_serialise_next_statement(void* context)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)context;
librdf_free_statement(scontext->current);
scontext->current=NULL;
/* get another statement if there is one */
while(!scontext->current) {
scontext->current=(librdf_statement*)librdf_list_pop(scontext->statements);
if(scontext->current)
break;
/* else get a new one */
/* 0 is end, <0 is error. Either way stop */
if(librdf_parser_raptor_get_next_statement(scontext) <=0)
break;
}
return (scontext->current == NULL);
}
/**
* librdf_parser_raptor_serialise_get_statement:
* @context: the context passed in by #librdf_stream
* @flags: the context get method flags
*
* Get the current librdf_statement from the stream of statements from the raptor RDF parse.
*
* Return value: a new #librdf_statement or NULL on error or if no statements found.
**/
static void*
librdf_parser_raptor_serialise_get_statement(void* context, int flags)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)context;
switch(flags) {
case LIBRDF_ITERATOR_GET_METHOD_GET_OBJECT:
return scontext->current;
case LIBRDF_ITERATOR_GET_METHOD_GET_CONTEXT:
return NULL;
default:
librdf_log(scontext->pcontext->parser->world,
0, LIBRDF_LOG_ERROR, LIBRDF_FROM_PARSER, NULL,
"Unknown iterator method flag %d", flags);
return NULL;
}
}
/**
* librdf_parser_raptor_serialise_finished:
* @context: the context passed in by #librdf_stream
*
* Finish the serialisation of the statement stream from the raptor RDF parse.
*
**/
static void
librdf_parser_raptor_serialise_finished(void* context)
{
librdf_parser_raptor_stream_context* scontext=(librdf_parser_raptor_stream_context*)context;
if(scontext) {
librdf_statement* statement;
if(scontext->current)
librdf_free_statement(scontext->current);
if(scontext->statements) {
while((statement=(librdf_statement*)librdf_list_pop(scontext->statements)))
librdf_free_statement(statement);
librdf_free_list(scontext->statements);
}
if(scontext->fh && scontext->close_fh)
fclose(scontext->fh);
if(scontext->pcontext)
scontext->pcontext->stream_context=NULL;
LIBRDF_FREE(librdf_parser_raptor_context, scontext);
}
}
static librdf_node*
librdf_parser_raptor_get_feature(void* context, librdf_uri *feature)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
unsigned char intbuffer[20]; /* FIXME */
unsigned char *uri_string;
if(!feature)
return NULL;
uri_string=librdf_uri_as_string(feature);
if(!uri_string)
return NULL;
if(!strcmp((const char*)uri_string, LIBRDF_PARSER_FEATURE_ERROR_COUNT)) {
sprintf((char*)intbuffer, "%d", pcontext->errors);
return librdf_new_node_from_typed_literal(pcontext->parser->world,
intbuffer, NULL, NULL);
} else if(!strcmp((const char*)uri_string, LIBRDF_PARSER_FEATURE_WARNING_COUNT)) {
sprintf((char*)intbuffer, "%d", pcontext->warnings);
return librdf_new_node_from_typed_literal(pcontext->parser->world,
intbuffer, NULL, NULL);
} else {
/* try a raptor feature */
raptor_feature feature_i=raptor_feature_from_uri((raptor_uri*)feature);
if((int)feature_i >= 0) {
int value=raptor_get_feature(pcontext->rdf_parser, feature_i);
sprintf((char*)intbuffer, "%d", value);
return librdf_new_node_from_typed_literal(pcontext->parser->world,
intbuffer, NULL, NULL);
}
}
return NULL;
}
static int
librdf_parser_raptor_set_feature(void* context,
librdf_uri *feature, librdf_node *value)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
raptor_feature feature_i;
const unsigned char* value_s;
if(!feature)
return 1;
/* try a raptor feature */
feature_i=raptor_feature_from_uri((raptor_uri*)feature);
if((int)feature_i < 0)
return 1;
if(!librdf_node_is_literal(value))
return 1;
value_s=(const unsigned char*)librdf_node_get_literal_value(value);
return raptor_parser_set_feature_string(pcontext->rdf_parser, feature_i,
value_s);
}
static raptor_uri*
librdf_raptor_new_uri(void *context, const unsigned char *uri_string)
{
return (raptor_uri*)librdf_new_uri((librdf_world*)context, uri_string);
}
static raptor_uri*
librdf_raptor_new_uri_from_uri_local_name(void *context,
raptor_uri *uri,
const unsigned char *local_name)
{
return (raptor_uri*)librdf_new_uri_from_uri_local_name((librdf_uri*)uri, local_name);
}
static raptor_uri*
librdf_raptor_new_uri_relative_to_base(void *context,
raptor_uri *base_uri,
const unsigned char *uri_string)
{
return (raptor_uri*)librdf_new_uri_relative_to_base((librdf_uri*)base_uri, uri_string);
}
static raptor_uri*
librdf_raptor_new_uri_for_rdf_concept(void *context, const char *name)
{
librdf_uri *uri=NULL;
librdf_get_concept_by_name((librdf_world*)context, 1, name, &uri, NULL);
if(!uri)
return NULL;
return (raptor_uri*)librdf_new_uri_from_uri(uri);
}
static void
librdf_raptor_free_uri(void *context, raptor_uri *uri)
{
librdf_free_uri((librdf_uri*)uri);
}
static int
librdf_raptor_uri_equals(void *context, raptor_uri* uri1, raptor_uri* uri2)
{
return librdf_uri_equals((librdf_uri*)uri1, (librdf_uri*)uri2);
}
static int
librdf_raptor_uri_compare(void *context, raptor_uri* uri1, raptor_uri* uri2)
{
return librdf_uri_compare((librdf_uri*)uri1, (librdf_uri*)uri2);
}
static raptor_uri*
librdf_raptor_uri_copy(void *context, raptor_uri *uri)
{
return (raptor_uri*)librdf_new_uri_from_uri((librdf_uri*)uri);
}
static unsigned char*
librdf_raptor_uri_as_string(void *context, raptor_uri *uri)
{
return librdf_uri_as_string((librdf_uri*)uri);
}
static unsigned char*
librdf_raptor_uri_as_counted_string(void *context, raptor_uri *uri, size_t *len_p)
{
return librdf_uri_as_counted_string((librdf_uri*)uri, len_p);
}
static char*
librdf_parser_raptor_get_accept_header(void* context)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
const char* accept;
char* r_accept;
size_t length;
accept=raptor_parser_get_accept_header(pcontext->rdf_parser);
if(!accept)
return NULL;
length=strlen(accept);
r_accept=(char*)LIBRDF_MALLOC(cstring, length+1);
strncpy(r_accept, accept, length+1);
raptor_free_memory((void*)accept);
return r_accept;
}
static const char*
librdf_parser_raptor_get_namespaces_seen_prefix(void* context, int offset)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
if(!pcontext->nspace_prefixes)
return NULL;
if(offset < 0 || offset > raptor_sequence_size(pcontext->nspace_prefixes))
return NULL;
return (const char*)raptor_sequence_get_at(pcontext->nspace_prefixes, offset);
}
static librdf_uri*
librdf_parser_raptor_get_namespaces_seen_uri(void* context, int offset)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
if(!pcontext->nspace_uris)
return NULL;
if(offset < 0 || offset > raptor_sequence_size(pcontext->nspace_uris))
return NULL;
return (librdf_uri*)raptor_sequence_get_at(pcontext->nspace_uris, offset);
}
static int
librdf_parser_raptor_get_namespaces_seen_count(void* context)
{
librdf_parser_raptor_context* pcontext=(librdf_parser_raptor_context*)context;
if(!pcontext->nspace_uris)
return 0;
return raptor_sequence_size(pcontext->nspace_uris);
}
static const raptor_uri_handler librdf_raptor_uri_handler = {
librdf_raptor_new_uri,
librdf_raptor_new_uri_from_uri_local_name,
librdf_raptor_new_uri_relative_to_base,
librdf_raptor_new_uri_for_rdf_concept,
librdf_raptor_free_uri,
librdf_raptor_uri_equals,
librdf_raptor_uri_copy,
librdf_raptor_uri_as_string,
librdf_raptor_uri_as_counted_string,
2,
librdf_raptor_uri_compare
};
/**
* librdf_parser_raptor_register_factory:
* @factory: factory
*
* Register the raptor RDF parser with the RDF parser factory.
*
**/
static void
librdf_parser_raptor_register_factory(librdf_parser_factory *factory)
{
factory->context_length = sizeof(librdf_parser_raptor_context);
factory->init = librdf_parser_raptor_init;
factory->terminate = librdf_parser_raptor_terminate;
factory->parse_uri_as_stream = librdf_parser_raptor_parse_uri_as_stream;
factory->parse_uri_into_model = librdf_parser_raptor_parse_uri_into_model;
factory->parse_string_as_stream = librdf_parser_raptor_parse_string_as_stream;
factory->parse_string_into_model = librdf_parser_raptor_parse_string_into_model;
factory->parse_counted_string_as_stream = librdf_parser_raptor_parse_counted_string_as_stream;
factory->parse_counted_string_into_model = librdf_parser_raptor_parse_counted_string_into_model;
factory->parse_file_handle_as_stream = librdf_parser_raptor_parse_file_handle_as_stream;
factory->parse_file_handle_into_model = librdf_parser_raptor_parse_file_handle_into_model;
factory->get_feature = librdf_parser_raptor_get_feature;
factory->set_feature = librdf_parser_raptor_set_feature;
factory->get_accept_header = librdf_parser_raptor_get_accept_header;
factory->get_namespaces_seen_prefix = librdf_parser_raptor_get_namespaces_seen_prefix;
factory->get_namespaces_seen_uri = librdf_parser_raptor_get_namespaces_seen_uri;
factory->get_namespaces_seen_count = librdf_parser_raptor_get_namespaces_seen_count;
}
/**
* librdf_parser_raptor_constructor:
* @world: redland world object
*
* Initialise the raptor RDF parser module.
*
**/
void
librdf_parser_raptor_constructor(librdf_world *world)
{
unsigned int i;
raptor_init();
raptor_uri_set_handler(&librdf_raptor_uri_handler, world);
/* enumerate from parser 1, so the default parser 0 is done last */
for(i=1; 1; i++) {
const char *syntax_name=NULL;
const char *syntax_label=NULL;
const char *mime_type=NULL;
const unsigned char *uri_string=NULL;
if(raptor_syntaxes_enumerate(i, &syntax_name, &syntax_label,
&mime_type, &uri_string)) {
/* reached the end of the parsers, now register the default one */
i=0;
raptor_syntaxes_enumerate(i, &syntax_name, &syntax_label,
&mime_type, &uri_string);
}
if(!strcmp(syntax_name, "rdfxml")) {
/* legacy name - see librdf_parser_raptor_init */
librdf_parser_register_factory(world, "raptor", NULL,
mime_type, uri_string,
&librdf_parser_raptor_register_factory);
}
librdf_parser_register_factory(world, syntax_name, syntax_label,
mime_type, uri_string,
&librdf_parser_raptor_register_factory);
if(!i) /* registered default parser, end */
break;
}
}
/**
* librdf_parser_raptor_destructor:
* @world: redland world object
*
* Terminate the raptor RDF parser module.
*
**/
void
librdf_parser_raptor_destructor(void)
{
raptor_finish();
}
Reference in New Issue View Git Blame Copy Permalink