1
0
mirror of https://github.com/cookiengineer/audacity synced 2025-05-04 17:49:45 +02:00
audacity/lib-src/redland/librdf/rdf_concepts.c
2010-01-24 09:19:39 +00:00

321 lines
8.7 KiB
C

/* -*- Mode: c; c-basic-offset: 2 -*-
*
* rdf_concepts.c - Nodes representing concepts from the RDF Model
*
* Copyright (C) 2000-2008, David Beckett http://www.dajobe.org/
* Copyright (C) 2000-2005, 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>
#include <stdarg.h>
#ifdef HAVE_STDLIB_H
#include <stdlib.h> /* for abort() as used in errors */
#endif
#include <redland.h>
#include <rdf_node.h>
#ifndef STANDALONE
/* FIXME: All the stuff here and in rdf_concepts.h should be machine
* generated from the schemas but there is a catch-22 here - can't do
* it without representing it
*/
/* TAKE CARE: Tokens != Labels */
/* Tokens used by the RDF world */
static const char* const librdf_concept_tokens[LIBRDF_CONCEPT_LAST+1]={
/* RDF M&S */
"Alt", "Bag", "Property", "Seq", "Statement", "object", "predicate", "subject", "type", "value", "li",
"RDF", "Description",
"aboutEach", "aboutEachPrefix",
/* all new in RDF/XML revised */
"nodeID",
"List", "first", "rest", "nil",
"XMLLiteral",
/* RDF S */
"Class", "ConstraintProperty", "ConstraintResource", "Container", "ContainerMembershipProperty", "Literal", "Resource", "comment", "domain", "isDefinedBy", "label", "range", "seeAlso", "subClassOf", "subPropertyOf"
};
static const unsigned char * const librdf_concept_ms_namespace=(const unsigned char *)"http://www.w3.org/1999/02/22-rdf-syntax-ns#";
static const unsigned char * const librdf_concept_schema_namespace=(const unsigned char *)"http://www.w3.org/2000/01/rdf-schema#";
/**
* librdf_init_concepts:
* @world: redland world object
*
* INTERNAL - Initialise the concepts module.
*
**/
void
librdf_init_concepts(librdf_world *world)
{
int i;
/* Create the Unique URI objects */
world->concept_ms_namespace_uri=librdf_new_uri(world, librdf_concept_ms_namespace);
world->concept_schema_namespace_uri=librdf_new_uri(world, librdf_concept_schema_namespace);
if(!world->concept_ms_namespace_uri || !world->concept_schema_namespace_uri)
LIBRDF_FATAL1(world, LIBRDF_FROM_CONCEPTS, "Failed to create M&S or Schema URIs");
/* Create arrays for the M&S and Schema resource nodes and uris */
world->concept_uris=
LIBRDF_CALLOC(ptrarray, LIBRDF_CONCEPT_LAST+1, sizeof(librdf_uri*));
world->concept_resources=
LIBRDF_CALLOC(ptrarray, LIBRDF_CONCEPT_LAST+1, sizeof(librdf_node*));
if(!world->concept_uris || !world->concept_resources)
LIBRDF_FATAL1(world, LIBRDF_FROM_CONCEPTS, "Out of memory creating node/uri arrays");
/* Create the M&S and Schema resource nodes */
for (i=0; i<= LIBRDF_CONCEPT_LAST; i++) {
librdf_uri* ns_uri=(i < LIBRDF_CONCEPT_FIRST_S_ID) ? world->concept_ms_namespace_uri :
world->concept_schema_namespace_uri;
const unsigned char * token=(const unsigned char *)librdf_concept_tokens[i];
world->concept_resources[i]=librdf_new_node_from_uri_local_name(world, ns_uri, token);
if(!world->concept_resources[i])
LIBRDF_FATAL1(world, LIBRDF_FROM_CONCEPTS, "Failed to create Node from URI\n");
/* keep shared copy of URI from node */
world->concept_uris[i]=librdf_node_get_uri(world->concept_resources[i]);
}
}
/**
* librdf_get_concept_ms_namespace:
* @world: librdf world object
*
* Get a shared #librdf_uri for the RDF Syntax namespace.
*
* Return value: #librdf_uri pointer or NULL on failure.
*/
librdf_uri *
librdf_get_concept_ms_namespace(librdf_world *world)
{
librdf_world_open(world);
return world->concept_ms_namespace_uri;
}
/**
* librdf_get_concept_schema_namespace:
* @world: librdf world object
*
* Get a shared #librdf_uri for the RDF Schema namespace.
*
* Return value: #librdf_uri pointer or NULL on failure.
*/
librdf_uri *
librdf_get_concept_schema_namespace(librdf_world *world)
{
librdf_world_open(world);
return world->concept_schema_namespace_uri;
}
/**
* librdf_get_concept_by_name:
* @world: redland world object
* @is_ms: non zero if name is a RDF namespace concept (else is RDF schema)
* @name: the name to look up
* @uri_p: pointer to variable to hold #librdf_uri of concept or NULL if not required
* @node_p: pointer to variable to hold #librdf_node of concept or NULL if not required
*
* Get Redland uri and/or node objects for RDF concepts.
*
* Allows the dynamic look-up of an RDF concept by the local_name of
* the concept in either the RDF or RDF Schema namespace. Returns
* the #librdf_uri and/or #librdf_node found as required.
**/
void
librdf_get_concept_by_name(librdf_world *world, int is_ms,
const char *name,
librdf_uri **uri_p, librdf_node **node_p)
{
int i;
int start=is_ms ? 0 : LIBRDF_CONCEPT_FIRST_S_ID;
int last=is_ms ? LIBRDF_CONCEPT_FIRST_S_ID : LIBRDF_CONCEPT_LAST;
librdf_world_open(world);
for (i=start; i< last; i++)
if(!strcmp(librdf_concept_tokens[i], name)) {
if(uri_p)
*uri_p=world->concept_uris[i];
if(node_p)
*node_p=world->concept_resources[i];
}
}
/**
* librdf_get_concept_resource_by_index:
* @world: redland world object
* @idx: #librdf_concepts_index
*
* Get Redland node object for RDF concepts.
*
* Return value: #librdf_node pointer or NULL on failure.
**/
librdf_node*
librdf_get_concept_resource_by_index(librdf_world *world,
librdf_concepts_index idx)
{
librdf_world_open(world);
if ((int)idx < 0 || idx > LIBRDF_CONCEPT_LAST)
return NULL;
return world->concept_resources[idx];
}
/**
* librdf_get_concept_uri_by_index:
* @world: redland world object
* @idx: #librdf_concepts_index
*
* Get Redland uri object for RDF concepts.
*
* Return value: #librdf_uri pointer or NULL on failure.
**/
librdf_uri*
librdf_get_concept_uri_by_index(librdf_world *world,
librdf_concepts_index idx)
{
librdf_world_open(world);
if ((int)idx < 0 || idx > LIBRDF_CONCEPT_LAST)
return NULL;
return world->concept_uris[idx];
}
/**
* librdf_finish_concepts:
* @world: redland world object
*
* INTERNAL - Terminate the concepts module.
*
**/
void
librdf_finish_concepts(librdf_world *world)
{
int i;
/* Free resources and set pointers to NULL so that they are cleared
* in case the concepts module is initialised again in the same process. */
if(world->concept_ms_namespace_uri) {
librdf_free_uri(world->concept_ms_namespace_uri);
world->concept_ms_namespace_uri=NULL;
}
if(world->concept_schema_namespace_uri) {
librdf_free_uri(world->concept_schema_namespace_uri);
world->concept_schema_namespace_uri=NULL;
}
if(world->concept_resources) {
for (i=0; i<= LIBRDF_CONCEPT_LAST; i++) {
/* deletes associated URI too */
if(world->concept_resources[i])
librdf_free_node(world->concept_resources[i]);
}
LIBRDF_FREE(ptrarray, world->concept_resources);
world->concept_resources=NULL;
}
if(world->concept_uris) {
/* uris were freed above, now just free the array */
LIBRDF_FREE(ptrarray, world->concept_uris);
world->concept_uris=NULL;
}
}
#endif
/* TEST CODE */
#ifdef STANDALONE
/* one more prototype */
int main(int argc, char *argv[]);
#define EXPECTED_STRING "http://www.w3.org/1999/02/22-rdf-syntax-ns#Seq"
int
main(int argc, char *argv[])
{
const char *program=librdf_basename((const char*)argv[0]);
librdf_world *world;
librdf_uri* uri;
librdf_node* node;
unsigned char* actual;
world=librdf_new_world();
librdf_world_open(world);
uri=LIBRDF_MS_Seq_URI(world);
if(!uri) {
fprintf(stderr, "%s: Got no concept URI for rdf:Seq\n", program);
exit(1);
}
actual=librdf_uri_as_string(uri);
if(strcmp(EXPECTED_STRING, (const char*)actual)) {
fprintf(stderr, "%s: Expected URI: <%s> Got: <%s>\n", program,
EXPECTED_STRING, actual);
exit(1);
}
node=librdf_get_concept_resource_by_index(world, LIBRDF_CONCEPT_LAST);
if(!node) {
fprintf(stderr, "%s: Got no concept node for the last concept\n", program);
exit(1);
}
librdf_free_world(world);
/* keep gcc -Wall happy */
return(0);
}
#endif