/rdf/sites/all/modules/rdf/vendor/arc/parsers/ARC2_SemHTMLParser.php
PHP | 339 lines | 264 code | 44 blank | 31 comment | 69 complexity | f71910499e0e6d433a5562a1edc419aa MD5 | raw file
- <?php
- /*
- homepage: http://arc.semsol.org/
- license: http://arc.semsol.org/license
- class: ARC2 RDF/XML Parser
- author: Benjamin Nowack
- version: 2010-11-16
- */
- ARC2::inc('LegacyXMLParser');
- class ARC2_SemHTMLParser extends ARC2_LegacyXMLParser {
- function __construct($a, &$caller) {
- parent::__construct($a, $caller);
- }
-
- function __init() {/* reader */
- parent::__init();
- $this->default_sem_html_formats = 'dc openid erdf rdfa posh-rdf microformats';
- $this->triples = array();
- $this->target_encoding = '';
- $this->t_count = 0;
- $this->added_triples = array();
- $this->skip_dupes = false;
- $this->bnode_prefix = $this->v('bnode_prefix', 'arc'.substr(md5(uniqid(rand())), 0, 4).'b', $this->a);
- $this->bnode_id = 0;
- $this->auto_extract = $this->v('auto_extract', 1, $this->a);
- $this->extracted_formats = array();
- $this->cache = array();
- $this->detected_formats = array();
- $this->keep_cdata_ws = $this->v('keep_cdata_whitespace', 0, $this->a);
- }
-
- /* */
- function x($re, $v, $options = 'si', $keep_ws = 0) {
- list($ws, $v) = preg_match('/^(\s*)(.*)$/s', $v, $m) ? array($m[1], $m[2]) : array('', $v);
- if (preg_match("/^" . $re . "(.*)$/" . $options, $v, $m)) {
- if ($keep_ws) $m[1] = $ws . $m[1];
- return $m;
- }
- return false;
- }
- /* */
- function setReader(&$reader) {
- $this->reader = $reader;
- }
-
- function createBnodeID(){
- $this->bnode_id++;
- return '_:' . $this->bnode_prefix . $this->bnode_id;
- }
-
- function addT($t) {
- if (function_exists('html_entity_decode')) {
- $t['o'] = html_entity_decode($t['o']);
- }
- if ($this->skip_dupes) {
- $h = md5(serialize($t));
- if (!isset($this->added_triples[$h])) {
- $this->triples[$this->t_count] = $t;
- $this->t_count++;
- $this->added_triples[$h] = true;
- }
- }
- else {
- $this->triples[$this->t_count] = $t;
- $this->t_count++;
- }
- }
- function getTriples() {
- return $this->v('triples', array());
- }
- function countTriples() {
- return $this->t_count;
- }
-
- function getSimpleIndex($flatten_objects = 1, $vals = '') {
- return ARC2::getSimpleIndex($this->getTriples(), $flatten_objects, $vals);
- }
- /* */
- function parse($path, $data = '', $iso_fallback = 'ignore') {
- $this->nodes = array();
- $this->node_count = 0;
- $this->level = 0;
- /* reader */
- if (!$this->v('reader')) {
- ARC2::inc('Reader');
- $this->reader = new ARC2_Reader($this->a, $this);
- }
- $this->reader->setAcceptHeader('Accept: text/html, application/xhtml, */*; q=0.9');
- $this->reader->activate($path, $data);
- $this->target_encoding = $this->reader->getEncoding(false);
- $this->x_base = isset($this->a['base']) && $this->a['base'] ? $this->a['base'] : $this->reader->base;
- $this->base = $this->x_base;
- $this->doc_url = $this->reader->base;
- /* parse */
- $rest = '';
- $this->cur_tag = '';
- while ($d = $this->reader->readStream(1)) {
- $rest = $this->processData($rest . $d);
- }
- $this->reader->closeStream();
- unset($this->reader);
- return $this->done();
- }
-
- /* */
- function getEncoding($src = 'ignore') {
- return $this->target_encoding;
- }
- /* */
-
- function done() {
- if ($this->auto_extract) {
- $this->extractRDF();
- }
- }
-
- /* */
- function processData($v) {
- $sub_v = $v;
- do {
- $proceed = 1;
- if ((list($sub_r, $sub_v) = $this->xComment($sub_v)) && $sub_r) {
- $this->open(0, 'comment', array('value' => $sub_r));
- $this->close(0, 'comment');
- continue;
- }
- if ((list($sub_r, $sub_v) = $this->xDoctype($sub_v)) && $sub_r) {
- $this->open(0, 'doctype', array('value' => $sub_r));
- $this->close(0, 'doctype');
- /* RDFa detection */
- if (preg_match('/rdfa /i', $sub_r)) $this->detected_formats['rdfa'] = 1;
- continue;
- }
- if ($this->level && ((list($sub_r, $sub_v) = $this->xWS($sub_v)) && $sub_r)) {
- $this->cData(0, $sub_r);
- }
- elseif ((list($sub_r, $sub_v) = $this->xOpen($sub_v)) && $sub_r) {
- $this->open(0, $sub_r['tag'], $sub_r['a']);
- $this->cur_tag = $sub_r['tag'];
- if ($sub_r['empty']) {
- $this->close(0, $sub_r['tag'], 1);
- $this->cur_tag = '';
- }
- /* eRDF detection */
- if (!isset($this->detected_formats['erdf']) && isset($sub_r['a']['profile m']) && in_array('http://purl.org/NET/erdf/profile', $sub_r['a']['profile m'])) $this->detected_formats['erdf'] = 1;
- /* poshRDF detection */
- if (!isset($this->detected_formats['posh-rdf']) && isset($sub_r['a']['class m']) && in_array('rdf-p', $sub_r['a']['class m'])) $this->detected_formats['posh-rdf'] = 1;
- /* RDFa detection */
- if (!isset($this->detected_formats['rdfa']) && ($this->cur_tag == 'html') && isset($sub_r['a']['version m']) && in_array('XHTML+RDFa', $sub_r['a']['version m'])) $this->detected_formats['rdfa'] = 1;
- if (!isset($this->detected_formats['rdfa']) && isset($sub_r['a']['xmlns']) && $sub_r['a']['xmlns'] && $this->isRDFNSDecl($sub_r['a']['xmlns'])) $this->detected_formats['rdfa'] = 1;
- if (!isset($this->detected_formats['rdfa']) && array_intersect(array('about', 'typeof', 'property'), array_keys($sub_r['a']))) $this->detected_formats['rdfa'] = 1;
- }
- elseif ((list($sub_r, $sub_v) = $this->xClose($sub_v)) && $sub_r) {
- if (preg_match('/^(area|base|br|col|frame|hr|input|img|link|xmeta|param)$/', $sub_r['tag'])) {
- /* already implicitly closed */
- }
- else {
- $this->close(0, $sub_r['tag']);
- $this->cur_tag = '';
- }
- }
- elseif ((list($sub_r, $sub_v) = $this->xCData($sub_v)) && $sub_r) {
- $this->cData(0, $sub_r);
- }
- else {
- $proceed = 0;
- }
- } while ($proceed);
- return $sub_v;
- }
- /* */
- function isRDFNSDecl($ns) {
- foreach ($ns as $k => $v) {
- if ($k) return 1;
- }
- return 0;
- }
- /* */
- function xComment($v) {
- if ($r = $this->x('\<\!\-\-', $v)) {
- if ($sub_r = $this->x('(.*)\-\-\>', $r[1], 'Us')) {
- return array($sub_r[1], $sub_r[2]);
- }
- }
- return array(0, $v);
- }
-
- function xDoctype($v) {
- if ($r = $this->x('\<\!DOCTYPE', $v)) {
- if ($sub_r = $this->x('([^\>]+)\>', $r[1])) {
- return array($sub_r[1], $sub_r[2]);
- }
- }
- return array(0, $v);
- }
-
- function xWS($v) {
- if ($r = ARC2::x('(\s+)', $v)) {
- return array($r[1], $r[2]);
- }
- return array(0, $v);
- }
-
- /* */
- function xOpen($v) {
- if ($r = $this->x('\<([^\s\/\>]+)([^\>]*)\>', $v)) {
- list($sub_r, $sub_v) = $this->xAttributes($r[2]);
- return array(array('tag' => strtolower($r[1]), 'a' => $sub_r, 'empty' => $this->isEmpty($r[1], $r[2])), $r[3]);
- }
- return array(0, $v);
- }
-
- /* */
- function xAttributes($v) {
- $r = array();
- while ((list($sub_r, $v) = $this->xAttribute($v)) && $sub_r) {
- if ($sub_sub_r = $this->x('xmlns\:?(.*)', $sub_r['k'])) {
- $this->nsDecl(0, $sub_sub_r[1], $sub_r['value']);
- $r['xmlns'][$sub_sub_r[1]] = $sub_r['value'];
- }
- else {
- $r[$sub_r['k']] = $sub_r['value'];
- $r[$sub_r['k'] . ' m'] = $sub_r['values'];
- }
- }
- return array($r, $v);
- }
- /* */
- function xAttribute($v) {
- if ($r = $this->x('([^\s\=]+)\s*(\=)?\s*([\'\"]?)', $v)) {
- if (!$r[2]) {/* no '=' */
- if ($r[1] == '/') {
- return array(0, $r[4]);
- }
- return array(array('k' => $r[1], 'value' => 1, 'values' => array(1)), $r[4]);
- }
- if (!$r[3]) {/* no quots */
- if ($sub_r = $this->x('([^\s]+)', $r[4])) {
- return array(array('k' => $r[1], 'value' => $sub_r[1], 'values' => array($sub_r[1])), $sub_r[2]);
- }
- return array(array('k' => $r[1], 'value' => '', 'values' => array()), $r[4]);
- }
- $val = '';
- $multi = 0;
- $sub_v = $r[4];
- while ($sub_v && (!$sub_r = $this->x('(\x5c\\' .$r[3]. '|\\' .$r[3]. ')', $sub_v))) {
- $val .= substr($sub_v, 0, 1);
- $sub_v = substr($sub_v, 1);
- }
- $sub_v = $sub_v ? $sub_r[2] : $sub_v;
- $vals = preg_split('/ /', $val);
- return array(array('k' => $r[1], 'value' => $val, 'values' => $vals), $sub_v);
- }
- return array(0, $v);
- }
-
- /* */
- function isEmpty($t, $v) {
- if (preg_match('/^(area|base|br|col|frame|hr|input|img|link|xmeta|param)$/', $t)) {
- return 1;
- }
- if (preg_match('/\/$/', $v)) {
- return 1;
- }
- return 0;
- }
-
- /* */
-
- function xClose($v) {
- if ($r = $this->x('\<\/([^\s\>]+)\>', $v)) {
- return array(array('tag' => strtolower($r[1])), $r[2]);
- }
- return array(0, $v);
- }
- /* */
-
- function xCData($v) {
- if (preg_match('/(script|style)/i', $this->cur_tag)) {
- if ($r = $this->x('(.+)(\<\/' . $this->cur_tag . '\>)', $v, 'Uis')) {
- return array($r[1], $r[2] . $r[3]);
- }
- }
- elseif ($r = $this->x('([^\<]+)', $v, 'si', $this->keep_cdata_ws)) {
- return array($r[1], $r[2]);
- }
- return array(0, $v);
- }
- /* */
- function extractRDF($formats = '') {
- $this->node_index = $this->getNodeIndex();
- $formats = !$formats ? $this->v('sem_html_formats', $this->default_sem_html_formats, $this->a) : $formats;
- $formats = preg_split('/ /', $formats);
- foreach ($formats as $format) {
- if (!in_array($format, $this->extracted_formats)) {
- $comp = $this->camelCase($format) . 'Extractor';
- if (ARC2::inc($comp)) {
- $cls = 'ARC2_' . $comp;
- $e = new $cls($this->a, $this);
- $e->extractRDF();
- }
- $this->extracted_formats[] = $format;
- }
- }
- }
-
- function getNode($id) {
- return isset($this->nodes[$id]) ? $this->nodes[$id] : 0;
- }
-
- /* */
-
- }