danielebarchiesi@4: <?php
danielebarchiesi@4: /**
danielebarchiesi@4:  * ARC2 Turtle Serializer
danielebarchiesi@4:  *
danielebarchiesi@4:  * @author    Benjamin Nowack
danielebarchiesi@4:  * @license   http://arc.semsol.org/license
danielebarchiesi@4:  * @homepage <http://arc.semsol.org/>
danielebarchiesi@4:  * @package   ARC2
danielebarchiesi@4:  * @version   2010-11-16
danielebarchiesi@4: */
danielebarchiesi@4: 
danielebarchiesi@4: ARC2::inc('RDFSerializer');
danielebarchiesi@4: 
danielebarchiesi@4: class ARC2_TurtleSerializer extends ARC2_RDFSerializer {
danielebarchiesi@4: 
danielebarchiesi@4:   function __construct($a, &$caller) {
danielebarchiesi@4:     parent::__construct($a, $caller);
danielebarchiesi@4:   }
danielebarchiesi@4:   
danielebarchiesi@4:   function __init() {
danielebarchiesi@4:     parent::__init();
danielebarchiesi@4:     $this->content_header = 'application/x-turtle';
danielebarchiesi@4:   }
danielebarchiesi@4: 
danielebarchiesi@4:   /*  */
danielebarchiesi@4:   
danielebarchiesi@4:   function getTerm($v, $term = '', $qualifier = '') {
danielebarchiesi@4:     if (!is_array($v)) {
danielebarchiesi@4:       if (preg_match('/^\_\:/', $v)) {
danielebarchiesi@4:         return $v;
danielebarchiesi@4:       }
danielebarchiesi@4:       if (($term === 'p') && ($pn = $this->getPName($v))) {
danielebarchiesi@4:         return $pn;
danielebarchiesi@4:       }
danielebarchiesi@4:       if (
danielebarchiesi@4:         ($term === 'o') &&
danielebarchiesi@4:         in_array($qualifier, array('rdf:type', 'rdfs:domain', 'rdfs:range', 'rdfs:subClassOf')) &&
danielebarchiesi@4:         ($pn = $this->getPName($v))
danielebarchiesi@4:       ) {
danielebarchiesi@4:         return $pn;
danielebarchiesi@4:       }
danielebarchiesi@4:       if (preg_match('/^[a-z0-9]+\:[^\s]*$/is' . ($this->has_pcre_unicode ? 'u' : ''), $v)) {
danielebarchiesi@4:         return '<' .$v. '>';
danielebarchiesi@4:       }
danielebarchiesi@4:       return $this->getTerm(array('type' => 'literal', 'value' => $v), $term, $qualifier);
danielebarchiesi@4:     }
danielebarchiesi@4:     if (!isset($v['type']) || ($v['type'] != 'literal')) {
danielebarchiesi@4:       return $this->getTerm($v['value'], $term, $qualifier);
danielebarchiesi@4:     }
danielebarchiesi@4:     /* literal */
danielebarchiesi@4:     $quot = '"';
danielebarchiesi@4:     if (preg_match('/\"/', $v['value'])) {
danielebarchiesi@4:       $quot = "'";
danielebarchiesi@4:       if (preg_match('/\'/', $v['value']) || preg_match('/[\x0d\x0a]/', $v['value'])) {
danielebarchiesi@4:         $quot = '"""';
danielebarchiesi@4:         if (preg_match('/\"\"\"/', $v['value']) || preg_match('/\"$/', $v['value']) || preg_match('/^\"/', $v['value'])) {
danielebarchiesi@4:           $quot = "'''";
danielebarchiesi@4:           $v['value'] = preg_replace("/'$/", "' ", $v['value']);
danielebarchiesi@4:           $v['value'] = preg_replace("/^'/", " '", $v['value']);
danielebarchiesi@4:           $v['value'] = str_replace("'''", '\\\'\\\'\\\'', $v['value']);
danielebarchiesi@4:         }
danielebarchiesi@4:       }
danielebarchiesi@4:     }
danielebarchiesi@4:     if ((strlen($quot) == 1) && preg_match('/[\x0d\x0a]/', $v['value'])) {
danielebarchiesi@4:       $quot = $quot . $quot . $quot;
danielebarchiesi@4:     }
danielebarchiesi@4:     $suffix = isset($v['lang']) && $v['lang'] ? '@' . $v['lang'] : '';
danielebarchiesi@4:     $suffix = isset($v['datatype']) && $v['datatype'] ? '^^' . $this->getTerm($v['datatype'], 'dt') : $suffix;
danielebarchiesi@4:     return $quot . $v['value'] . $quot . $suffix;
danielebarchiesi@4:   }
danielebarchiesi@4:   
danielebarchiesi@4:   function getHead() {
danielebarchiesi@4:     $r = '';
danielebarchiesi@4:     $nl = "\n";
danielebarchiesi@4:     foreach ($this->used_ns as $v) {
danielebarchiesi@4:       $r .= $r ? $nl : '';
danielebarchiesi@4:       foreach ($this->ns as $prefix => $ns) {
danielebarchiesi@4:         if ($ns != $v) continue;
danielebarchiesi@4:         $r .= '@prefix ' . $prefix . ': <' .$v. '> .';
danielebarchiesi@4:         break;
danielebarchiesi@4:       }
danielebarchiesi@4:     }
danielebarchiesi@4:     return $r;
danielebarchiesi@4:   }
danielebarchiesi@4:   
danielebarchiesi@4:   function getSerializedIndex($index, $raw = 0) {
danielebarchiesi@4:     $r = '';
danielebarchiesi@4:     $nl = "\n";
danielebarchiesi@4:     foreach ($index as $s => $ps) {
danielebarchiesi@4:       $r .= $r ? ' .' . $nl . $nl : '';
danielebarchiesi@4:       $s = $this->getTerm($s, 's');
danielebarchiesi@4:       $r .= $s;
danielebarchiesi@4:       $first_p = 1;
danielebarchiesi@4:       foreach ($ps as $p => $os) {
danielebarchiesi@4:         if (!$os) continue;
danielebarchiesi@4:         $p = $this->getTerm($p, 'p');
danielebarchiesi@4:         $r .= $first_p ? ' ' : ' ;' . $nl . str_pad('', strlen($s) + 1);
danielebarchiesi@4:         $r .= $p;
danielebarchiesi@4:         $first_o = 1;
danielebarchiesi@4:         if (!is_array($os)) {/* single literal o */
danielebarchiesi@4:           $os = array(array('value' => $os, 'type' => 'literal'));
danielebarchiesi@4:         }
danielebarchiesi@4:         foreach ($os as $o) {
danielebarchiesi@4:           $r .= $first_o ? ' ' : ' ,' . $nl . str_pad('', strlen($s) + strlen($p) + 2);
danielebarchiesi@4:           $o = $this->getTerm($o, 'o', $p);
danielebarchiesi@4:           $r .= $o;
danielebarchiesi@4:           $first_o = 0;
danielebarchiesi@4:         }
danielebarchiesi@4:         $first_p = 0;
danielebarchiesi@4:       }
danielebarchiesi@4:     }
danielebarchiesi@4:     $r .= $r ? ' .' : '';
danielebarchiesi@4:     if ($raw) {
danielebarchiesi@4:       return $r;
danielebarchiesi@4:     }
danielebarchiesi@4:     return $r ? $this->getHead() . $nl . $nl . $r : '';
danielebarchiesi@4:   }
danielebarchiesi@4:   
danielebarchiesi@4:   /*  */
danielebarchiesi@4: 
danielebarchiesi@4: }