Fork of https://github.com/oxigraph/oxigraph.git for the purpose of NextGraph project
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
134 lines
4.2 KiB
134 lines
4.2 KiB
7 years ago
|
#[macro_use]
|
||
|
extern crate lazy_static;
|
||
|
extern crate reqwest;
|
||
|
extern crate rudf;
|
||
|
extern crate url;
|
||
|
|
||
|
use reqwest::Client;
|
||
|
use rudf::model::data::*;
|
||
|
use rudf::rio::RioError;
|
||
|
use rudf::rio::RioResult;
|
||
|
use rudf::rio::turtle::read_turtle;
|
||
|
use std::collections::HashSet;
|
||
|
use std::iter::FromIterator;
|
||
|
use url::Url;
|
||
|
|
||
|
struct RDFClient {
|
||
|
client: Client,
|
||
|
data_factory: DataFactory,
|
||
|
}
|
||
|
|
||
|
impl Default for RDFClient {
|
||
|
fn default() -> Self {
|
||
|
Self {
|
||
|
client: Client::new(),
|
||
|
data_factory: DataFactory::default(),
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
impl RDFClient {
|
||
|
fn load_turtle(&self, uri: Url) -> RioResult<HashSet<Triple>> {
|
||
|
match self.client.get(uri.clone()).send() {
|
||
|
Ok(response) => Ok(HashSet::from_iter(read_turtle(
|
||
|
response,
|
||
|
&self.data_factory,
|
||
|
Some(uri),
|
||
|
)?)),
|
||
|
Err(error) => Err(RioError::new(error)),
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
fn objects_for_subject_predicate<'a>(
|
||
|
graph: &'a HashSet<Triple>,
|
||
|
subject: &'a NamedOrBlankNode,
|
||
|
predicate: &'a NamedNode,
|
||
|
) -> impl Iterator<Item = &'a Term> {
|
||
|
graph
|
||
|
.iter()
|
||
|
.filter(move |t| t.subject() == subject && t.predicate() == predicate)
|
||
|
.map(|t| t.object())
|
||
|
}
|
||
|
|
||
|
fn object_for_subject_predicate<'a>(
|
||
|
graph: &'a HashSet<Triple>,
|
||
|
subject: &'a NamedOrBlankNode,
|
||
|
predicate: &'a NamedNode,
|
||
|
) -> Option<&'a Term> {
|
||
|
objects_for_subject_predicate(graph, subject, predicate).nth(0)
|
||
|
}
|
||
|
|
||
|
fn subjects_for_predicate_object<'a>(
|
||
|
graph: &'a HashSet<Triple>,
|
||
|
predicate: &'a NamedNode,
|
||
|
object: &'a Term,
|
||
|
) -> impl Iterator<Item = &'a NamedOrBlankNode> {
|
||
|
graph
|
||
|
.iter()
|
||
|
.filter(move |t| t.predicate() == predicate && t.object() == object)
|
||
|
.map(|t| t.subject())
|
||
|
}
|
||
|
|
||
|
fn subject_for_predicate_object<'a>(
|
||
|
graph: &'a HashSet<Triple>,
|
||
|
predicate: &'a NamedNode,
|
||
|
object: &'a Term,
|
||
|
) -> Option<&'a NamedOrBlankNode> {
|
||
|
subjects_for_predicate_object(graph, predicate, object).nth(0)
|
||
|
}
|
||
|
|
||
|
#[test]
|
||
|
fn turtle_w3c_testsuite() {
|
||
|
let client = RDFClient::default();
|
||
|
let data_factory = &client.data_factory;
|
||
|
let manifest = client
|
||
|
.load_turtle(Url::parse("https://www.w3.org/2013/TurtleTests/manifest.ttl").unwrap())
|
||
|
.unwrap();
|
||
|
let rdf_type = data_factory
|
||
|
.named_node(Url::parse("http://www.w3.org/1999/02/22-rdf-syntax-ns#type").unwrap());
|
||
|
let mf_action = data_factory.named_node(
|
||
|
Url::parse("http://www.w3.org/2001/sw/DataAccess/tests/test-manifest#action").unwrap(),
|
||
|
);
|
||
|
let rdfs_comment = data_factory
|
||
|
.named_node(Url::parse("http://www.w3.org/2000/01/rdf-schema#comment").unwrap());
|
||
|
let rdft_test_turtle_positive_syntax =
|
||
|
Term::from(data_factory.named_node(
|
||
|
Url::parse("http://www.w3.org/ns/rdftest#TestTurtlePositiveSyntax").unwrap(),
|
||
|
));
|
||
|
let rdft_test_turtle_negative_syntax =
|
||
|
Term::from(data_factory.named_node(
|
||
|
Url::parse("http://www.w3.org/ns/rdftest#TestTurtleNegativeSyntax").unwrap(),
|
||
|
));
|
||
|
|
||
|
subjects_for_predicate_object(&manifest, &rdf_type, &rdft_test_turtle_positive_syntax)
|
||
|
.for_each(|test| {
|
||
|
let comment = object_for_subject_predicate(&manifest, test, &rdfs_comment).unwrap();
|
||
|
if let Some(Term::NamedNode(file)) =
|
||
|
object_for_subject_predicate(&manifest, test, &mf_action)
|
||
|
{
|
||
|
if let Err(error) = client.load_turtle(file.url().clone()) {
|
||
|
assert!(
|
||
|
false,
|
||
|
"Failure on positive syntax file {} about {} with error: {}",
|
||
|
file, comment, error
|
||
|
)
|
||
|
}
|
||
|
}
|
||
|
});
|
||
|
subjects_for_predicate_object(&manifest, &rdf_type, &rdft_test_turtle_negative_syntax)
|
||
|
.for_each(|test| {
|
||
|
let comment = object_for_subject_predicate(&manifest, test, &rdfs_comment).unwrap();
|
||
|
if let Some(Term::NamedNode(file)) =
|
||
|
object_for_subject_predicate(&manifest, test, &mf_action)
|
||
|
{
|
||
|
assert!(
|
||
|
client.load_turtle(file.url().clone()).is_err(),
|
||
|
"Failure on negative syntax test file {} about {}",
|
||
|
file,
|
||
|
comment
|
||
|
);
|
||
|
}
|
||
|
});
|
||
|
}
|