danielebarchiesi@4: <?php
danielebarchiesi@4: 
danielebarchiesi@4: /**
danielebarchiesi@4:  * @file
danielebarchiesi@4:  * Functions for importing and parsing RDF data.
danielebarchiesi@4:  */
danielebarchiesi@4: 
danielebarchiesi@4: /**
danielebarchiesi@4:  * Loads an RDF file from an HTTP URI or local file, parses it, and builds an
danielebarchiesi@4:  * RDF schema representation (associative array) from it.
danielebarchiesi@4:  *
danielebarchiesi@4:  * @param $uri
danielebarchiesi@4:  *    The namespace URI for this graph.
danielebarchiesi@4:  * @param $prefix
danielebarchiesi@4:  *    The prefix for this graph.
danielebarchiesi@4:  * @param $filename (optional)
danielebarchiesi@4:  *    A local RDF file to parse.
danielebarchiesi@4:  * @return array
danielebarchiesi@4:  * @throws Exception On network or parse error
danielebarchiesi@4:  */
danielebarchiesi@4: function rdfx_fetch_rdf($uri, $prefix, $filename = NULL) {
danielebarchiesi@4:   if ($filename != NULL) {
danielebarchiesi@4:     if (!is_file($filename)) {
danielebarchiesi@4:       throw new Exception("File not found: '$filename'");
danielebarchiesi@4:       return;
danielebarchiesi@4:     }
danielebarchiesi@4:     $content = file_get_contents($filename);
danielebarchiesi@4:     return _rdfx_parse_rdf($uri, $content);
danielebarchiesi@4:   }
danielebarchiesi@4: 
danielebarchiesi@4:   $schema_url = $uri;
danielebarchiesi@4:   $i = strpos($schema_url, '#');
danielebarchiesi@4:   if ($i !== false) {
danielebarchiesi@4:     $schema_url = substr($schema_url, 0, $i);
danielebarchiesi@4:   }
danielebarchiesi@4:   return _rdfx_parse_rdf($uri);
danielebarchiesi@4: }
danielebarchiesi@4: 
danielebarchiesi@4: function _rdfx_parse_rdf($base_uri) {
danielebarchiesi@4:   $namespaces = array();
danielebarchiesi@4: 
danielebarchiesi@4:   $parser = ARC2::getRDFParser();
danielebarchiesi@4:   $parser->parse($base_uri);
danielebarchiesi@4:   // If this is an N3 file, the namespaces array isn't populated. Iterate
danielebarchiesi@4:   // through the attached parser object's prefixes and remove the colon from
danielebarchiesi@4:   // the end of the prefix.
danielebarchiesi@4:   // @todo File an issue with ARC2.
danielebarchiesi@4: 
danielebarchiesi@4:   switch ($parser->format) {
danielebarchiesi@4:     case 'turtle':
danielebarchiesi@4:       foreach ($parser->parser->prefixes as $prefix => $uri) {
danielebarchiesi@4:         $formatted_prefix = str_replace(':', '', $prefix);
danielebarchiesi@4:         $namespaces[$formatted_prefix] = $uri;
danielebarchiesi@4:       }
danielebarchiesi@4:       break;
danielebarchiesi@4:     default:
danielebarchiesi@4:       foreach ($parser->parser->nsp as $uri => $prefix) {
danielebarchiesi@4:         $namespaces[$prefix] = $uri;
danielebarchiesi@4:       }
danielebarchiesi@4:       break;
danielebarchiesi@4:   }
danielebarchiesi@4:   return array($parser->getTriples(), $namespaces);
danielebarchiesi@4: }