<?php
|
|
namespace XRay\Formats;
|
|
|
|
use HTMLPurifier, HTMLPurifier_Config;
|
|
use Parse;
|
|
|
|
class Mf2 {
|
|
|
|
public static function parse($mf2, $url, $http) {
|
|
if(count($mf2['items']) == 0)
|
|
return false;
|
|
// If there is only one item on the page, just use that
|
|
if(count($mf2['items']) == 1) {
|
|
$item = $mf2['items'][0];
|
|
if(in_array('h-entry', $item['type']) || in_array('h-cite', $item['type'])) {
|
|
Parse::debug("mf2:0: Recognized $url as an h-entry it is the only item on the page");
|
|
return self::parseAsHEntry($mf2, $item, $http);
|
|
}
|
|
if(in_array('h-event', $item['type'])) {
|
|
Parse::debug("mf2:0: Recognized $url as an h-event it is the only item on the page");
|
|
return self::parseAsHEvent($mf2, $item, $http);
|
|
}
|
|
}
|
|
|
|
// Check if the list of items is a bunch of h-entrys and return as a feed
|
|
// Unless this page's URL matches one of the entries, then treat it as a permalink
|
|
$hentrys = 0;
|
|
$lastSeenEntry = false;
|
|
foreach($mf2['items'] as $item) {
|
|
if(in_array('h-entry', $item['type']) || in_array('h-cite', $item['type'])) {
|
|
if(array_key_exists('url', $item['properties'])) {
|
|
$urls = $item['properties']['url'];
|
|
$urls = array_map('self::normalize_url', $urls);
|
|
if(in_array($url, $urls)) {
|
|
Parse::debug("mf2:1: Recognized $url as an h-entry because an h-entry on the page matched the URL of the request");
|
|
return self::parseAsHEntry($mf2, $item, $http);
|
|
}
|
|
$lastSeenEntry = $item;
|
|
}
|
|
$hentrys++;
|
|
}
|
|
}
|
|
|
|
// If there was more than one h-entry on the page, treat the whole page as a feed
|
|
if($hentrys > 1) {
|
|
Parse::debug("mf2:2: Recognized $url as an h-feed because there are more than one h-entry on the page");
|
|
return self::parseAsHFeed($mf2, $http);
|
|
}
|
|
|
|
// If the first item is an h-feed, parse as a feed
|
|
$first = $mf2['items'][0];
|
|
if(in_array('h-feed', $first['type'])) {
|
|
Parse::debug("mf2:3: Recognized $url as an h-feed because the first item is an h-feed");
|
|
return self::parseAsHFeed($mf2, $http);
|
|
}
|
|
|
|
// Check each top-level h-card and h-event, and if there is one that matches this URL, the page is an h-card
|
|
foreach($mf2['items'] as $item) {
|
|
if((in_array('h-card', $item['type']) or in_array('h-event', $item['type']))
|
|
and array_key_exists('url', $item['properties'])
|
|
) {
|
|
$urls = $item['properties']['url'];
|
|
$urls = array_map('self::normalize_url', $urls);
|
|
if(in_array($url, $urls)) {
|
|
// TODO: check for children h-entrys (like tantek.com), or sibling h-entries (like aaronparecki.com)
|
|
// and return the result as a feed instead
|
|
if(in_array('h-card', $item['type'])) {
|
|
Parse::debug("mf2:4: Recognized $url as an h-card because an h-card on the page matched the URL of the request");
|
|
return self::parseAsHCard($item, $http, $url);
|
|
} else {
|
|
Parse::debug("mf2:4: Recognized $url as an h-event because an h-event on the page matched the URL of the request");
|
|
return self::parseAsHEvent($mf2, $item, $http);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// If there was only one h-entry, but the URL for it is not the same as this page, then treat as a feed
|
|
if($hentrys == 1) {
|
|
if($lastSeenEntry) {
|
|
$urls = $lastSeenEntry['properties']['url'];
|
|
$urls = array_map('self::normalize_url', $urls);
|
|
if(count($urls) && !in_array($url, $urls)) {
|
|
Parse::debug("mf2:5: Recognized $url as an h-feed no h-entrys on the page matched the URL of the request");
|
|
return self::parseAsHFeed($mf2, $http);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Fallback case, but hopefully we have found something before this point
|
|
foreach($mf2['items'] as $item) {
|
|
// Otherwise check for an h-entry
|
|
if(in_array('h-entry', $item['type']) || in_array('h-cite', $item['type'])) {
|
|
Parse::debug("mf2:6: $url is falling back to the first h-entry on the page");
|
|
return self::parseAsHEntry($mf2, $item, $http);
|
|
}
|
|
}
|
|
|
|
Parse::debug("mf2:E: No object at $url was recognized");
|
|
|
|
return false;
|
|
}
|
|
|
|
private static function parseAsHEntry($mf2, $item, $http) {
|
|
$data = [
|
|
'type' => 'entry'
|
|
];
|
|
$refs = [];
|
|
|
|
// Single plaintext values
|
|
$properties = ['url','published','summary','rsvp'];
|
|
foreach($properties as $p) {
|
|
if(($v = self::getPlaintext($item, $p)) !== null) {
|
|
if($p == 'url') {
|
|
if(self::isURL($v))
|
|
$data[$p] = $v;
|
|
} else {
|
|
$data[$p] = $v;
|
|
}
|
|
}
|
|
}
|
|
|
|
// Always arrays
|
|
$properties = ['photo','video','audio','syndication'];
|
|
foreach($properties as $p) {
|
|
if(array_key_exists($p, $item['properties'])) {
|
|
foreach($item['properties'][$p] as $v) {
|
|
if(is_string($v) && self::isURL($v)) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $v;
|
|
}
|
|
elseif(is_array($v) and array_key_exists('value', $v) && self::isURL($v['value'])) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $v['value'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// Always returned as arrays, and may also create external references
|
|
// If these are not objects, they must be URLs
|
|
$set = [
|
|
'normal' => ['category','invitee'],
|
|
'url' => ['in-reply-to','like-of','repost-of','bookmark-of']
|
|
];
|
|
foreach($set as $type=>$properties) {
|
|
foreach($properties as $p) {
|
|
if(array_key_exists($p, $item['properties'])) {
|
|
foreach($item['properties'][$p] as $v) {
|
|
if(is_string($v) && ($type == 'normal' || self::isURL($v))) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $v;
|
|
}
|
|
elseif(self::isMicroformat($v) && ($u=self::getPlaintext($v, 'url')) && self::isURL($u)) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $u;
|
|
// parse the object and put the result in the "refs" object
|
|
$ref = self::parse(['items'=>[$v]], $u, $http);
|
|
if($ref) {
|
|
$refs[$u] = $ref['data'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// Determine if the name is distinct from the content
|
|
$name = self::getPlaintext($item, 'name');
|
|
$content = null;
|
|
$textContent = null;
|
|
$htmlContent = null;
|
|
if(array_key_exists('content', $item['properties'])) {
|
|
$content = $item['properties']['content'][0];
|
|
if(is_string($content)) {
|
|
$textContent = $content;
|
|
} elseif(!is_string($content) && is_array($content) && array_key_exists('value', $content)) {
|
|
if(array_key_exists('html', $content)) {
|
|
$htmlContent = trim(self::sanitizeHTML($content['html']));
|
|
$textContent = trim(str_replace("
","\r",strip_tags($htmlContent)));
|
|
$textContent = trim(str_replace("
","\r",$content['value']));
|
|
} else {
|
|
$textContent = trim($content['value']);
|
|
}
|
|
}
|
|
|
|
// Trim ellipses from the name
|
|
$name = preg_replace('/ ?(\.\.\.|…)$/', '', $name);
|
|
|
|
// Remove all whitespace when checking equality
|
|
$nameCompare = preg_replace('/\s/','',trim($name));
|
|
$contentCompare = preg_replace('/\s/','',trim($textContent));
|
|
|
|
// Check if the name is a prefix of the content
|
|
if($contentCompare && $nameCompare && strpos($contentCompare, $nameCompare) === 0) {
|
|
$name = null;
|
|
}
|
|
}
|
|
|
|
if($name) {
|
|
$data['name'] = $name;
|
|
}
|
|
|
|
// If there is content, always return the plaintext content, and return HTML content if it's different
|
|
if($content) {
|
|
$data['content'] = [
|
|
'text' => $textContent
|
|
];
|
|
if($htmlContent && $textContent != $htmlContent) {
|
|
$data['content']['html'] = $htmlContent;
|
|
}
|
|
// TODO: If no HTML content was included in the post, create HTML by autolinking?
|
|
}
|
|
|
|
if($author = self::findAuthor($mf2, $item, $http))
|
|
$data['author'] = $author;
|
|
|
|
$response = [
|
|
'data' => $data
|
|
];
|
|
|
|
if(count($refs)) {
|
|
$response['refs'] = $refs;
|
|
}
|
|
|
|
return $response;
|
|
}
|
|
|
|
private static function parseAsHEvent($mf2, $item, $http) {
|
|
$data = [
|
|
'type' => 'event'
|
|
];
|
|
$refs = [];
|
|
|
|
// Single plaintext values
|
|
$properties = ['name','summary','url','published','start','end','duration'];
|
|
foreach($properties as $p) {
|
|
if(($v = self::getPlaintext($item, $p)) !== null) {
|
|
if($p == 'url') {
|
|
if(self::isURL($v))
|
|
$data[$p] = $v;
|
|
} else {
|
|
$data[$p] = $v;
|
|
}
|
|
}
|
|
}
|
|
|
|
// Always arrays
|
|
$properties = ['photo','video','audio','syndication'];
|
|
foreach($properties as $p) {
|
|
if(array_key_exists($p, $item['properties'])) {
|
|
foreach($item['properties'][$p] as $v) {
|
|
if(is_string($v) && self::isURL($v)) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $v;
|
|
}
|
|
elseif(is_array($v) and array_key_exists('value', $v) && self::isURL($v['value'])) {
|
|
if(!array_key_exists($p, $data)) $data[$p] = [];
|
|
$data[$p][] = $v['value'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// Always returned as arrays, and may also create external references
|
|
$properties = ['category','location','attendee'];
|
|
foreach($properties as $p) {
|
|
if(array_key_exists($p, $item['properties'])) {
|
|
$data[$p] = [];
|
|
foreach($item['properties'][$p] as $v) {
|
|
if(is_string($v))
|
|
$data[$p][] = $v;
|
|
elseif(self::isMicroformat($v) && ($u=self::getPlaintext($v, 'url')) && self::isURL($u)) {
|
|
$data[$p][] = $u;
|
|
// parse the object and put the result in the "refs" object
|
|
$ref = self::parse(['items'=>[$v]], $u, $http);
|
|
if($ref) {
|
|
$refs[$u] = $ref['data'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// If there is a description, always return the plaintext description, and return HTML description if it's different
|
|
$textDescription = null;
|
|
$htmlDescription = null;
|
|
if(array_key_exists('description', $item['properties'])) {
|
|
$description = $item['properties']['description'][0];
|
|
if(is_string($description)) {
|
|
$textDescription = $description;
|
|
} elseif(!is_string($description) && is_array($description) && array_key_exists('value', $description)) {
|
|
if(array_key_exists('html', $description)) {
|
|
$htmlDescription = trim(self::sanitizeHTML($description['html']));
|
|
$textDescription = trim(str_replace("
","\r",strip_tags($htmlDescription)));
|
|
$textDescription = trim(str_replace("
","\r",$description['value']));
|
|
} else {
|
|
$textDescription = trim($description['value']);
|
|
}
|
|
}
|
|
}
|
|
|
|
if($textDescription) {
|
|
$data['description'] = [
|
|
'text' => $textDescription
|
|
];
|
|
if($htmlDescription && $textDescription != $htmlDescription) {
|
|
$data['description']['html'] = $htmlDescription;
|
|
}
|
|
}
|
|
|
|
$response = [
|
|
'data' => $data
|
|
];
|
|
|
|
if(count($refs)) {
|
|
$response['refs'] = $refs;
|
|
}
|
|
|
|
return $response;
|
|
}
|
|
|
|
private static function parseAsHFeed($mf2, $http) {
|
|
$data = [
|
|
'type' => 'feed',
|
|
'author' => [
|
|
'type' => 'card',
|
|
'name' => null,
|
|
'url' => null,
|
|
'photo' => null
|
|
],
|
|
'todo' => 'Not yet implemented. Please see https://github.com/aaronpk/XRay/issues/1'
|
|
];
|
|
|
|
return [
|
|
'data' => $data,
|
|
'entries' => []
|
|
];
|
|
}
|
|
|
|
private static function parseAsHCard($item, $http, $authorURL=false) {
|
|
$data = [
|
|
'type' => 'card',
|
|
'name' => null,
|
|
'url' => null,
|
|
'photo' => null
|
|
];
|
|
|
|
$properties = ['url','name','photo'];
|
|
foreach($properties as $p) {
|
|
if($p == 'url' && $authorURL) {
|
|
// If there is a matching author URL, use that one
|
|
$found = false;
|
|
foreach($item['properties']['url'] as $url) {
|
|
if(self::isURL($url)) {
|
|
$url = self::normalize_url($url);
|
|
if($url == $authorURL) {
|
|
$data['url'] = $url;
|
|
$found = true;
|
|
}
|
|
}
|
|
}
|
|
if(!$found && self::isURL($item['properties']['url'][0])) {
|
|
$data['url'] = $item['properties']['url'][0];
|
|
}
|
|
} else if(($v = self::getPlaintext($item, $p)) !== null) {
|
|
// Make sure the URL property is actually a URL
|
|
if($p == 'url' || $p == 'photo') {
|
|
if(self::isURL($v))
|
|
$data[$p] = $v;
|
|
} else {
|
|
$data[$p] = $v;
|
|
}
|
|
}
|
|
}
|
|
|
|
$response = [
|
|
'data' => $data
|
|
];
|
|
|
|
return $response;
|
|
}
|
|
|
|
private static function findAuthor($mf2, $item, $http) {
|
|
$author = [
|
|
'type' => 'card',
|
|
'name' => null,
|
|
'url' => null,
|
|
'photo' => null
|
|
];
|
|
|
|
// Author Discovery
|
|
// http://indiewebcamp.com/authorship
|
|
|
|
$authorPage = false;
|
|
if(array_key_exists('author', $item['properties'])) {
|
|
|
|
// Check if any of the values of the author property are an h-card
|
|
foreach($item['properties']['author'] as $a) {
|
|
if(self::isHCard($a)) {
|
|
// 5.1 "if it has an h-card, use it, exit."
|
|
return self::parseAsHCard($a, $http)['data'];
|
|
} elseif(is_string($a)) {
|
|
if(self::isURL($a)) {
|
|
// 5.2 "otherwise if author property is an http(s) URL, let the author-page have that URL"
|
|
$authorPage = $a;
|
|
} else {
|
|
// 5.3 "otherwise use the author property as the author name, exit"
|
|
// We can only set the name, no h-card or URL was found
|
|
$author['name'] = self::getPlaintext($item, 'author');
|
|
return $author;
|
|
}
|
|
} else {
|
|
// This case is only hit when the author property is an mf2 object that is not an h-card
|
|
$author['name'] = self::getPlaintext($item, 'author');
|
|
return $author;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
// 6. "if no author page was found" ... check for rel-author link
|
|
if(!$authorPage) {
|
|
if(isset($mf2['rels']) && isset($mf2['rels']['author']))
|
|
$authorPage = $mf2['rels']['author'][0];
|
|
}
|
|
|
|
// 7. "if there is an author-page URL" ...
|
|
if($authorPage) {
|
|
|
|
// 7.1 "get the author-page from that URL and parse it for microformats2"
|
|
$authorPageContents = self::getURL($authorPage, $http);
|
|
|
|
if($authorPageContents) {
|
|
foreach($authorPageContents['items'] as $i) {
|
|
if(self::isHCard($i)) {
|
|
|
|
// 7.2 "if author-page has 1+ h-card with url == uid == author-page's URL, then use first such h-card, exit."
|
|
if(array_key_exists('url', $i['properties'])
|
|
and in_array($authorPage, $i['properties']['url'])
|
|
and array_key_exists('uid', $i['properties'])
|
|
and in_array($authorPage, $i['properties']['uid'])
|
|
) {
|
|
return self::parseAsHCard($i, $http, $authorPage)['data'];
|
|
}
|
|
|
|
// 7.3 "else if author-page has 1+ h-card with url property which matches the href of a rel-me link on the author-page"
|
|
$relMeLinks = (isset($authorPageContents['rels']) && isset($authorPageContents['rels']['me'])) ? $authorPageContents['rels']['me'] : [];
|
|
if(count($relMeLinks) > 0
|
|
and array_key_exists('url', $i['properties'])
|
|
and count(array_intersect($i['properties']['url'], $relMeLinks)) > 0
|
|
) {
|
|
return self::parseAsHCard($i, $http, $authorPage)['data'];
|
|
}
|
|
|
|
}
|
|
}
|
|
}
|
|
|
|
// 7.4 "if the h-entry's page has 1+ h-card with url == author-page URL, use first such h-card, exit."
|
|
foreach($mf2['items'] as $i) {
|
|
if(self::isHCard($i)) {
|
|
|
|
if(array_key_exists('url', $i['properties'])
|
|
and in_array($authorPage, $i['properties']['url'])
|
|
) {
|
|
return self::parseAsHCard($i, $http)['data'];
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
if(!$author['name'] && !$author['photo'] && !$author['url'])
|
|
return null;
|
|
|
|
return $author;
|
|
}
|
|
|
|
private static function sanitizeHTML($html) {
|
|
$config = HTMLPurifier_Config::createDefault();
|
|
$config->set('Cache.DefinitionImpl', null);
|
|
$config->set('HTML.AllowedElements', [
|
|
'a',
|
|
'abbr',
|
|
'b',
|
|
'code',
|
|
'del',
|
|
'em',
|
|
'i',
|
|
'img',
|
|
'q',
|
|
'strike',
|
|
'strong',
|
|
'time',
|
|
'blockquote',
|
|
'pre',
|
|
'p',
|
|
'h1',
|
|
'h2',
|
|
'h3',
|
|
'h4',
|
|
'h5',
|
|
'h6',
|
|
'ul',
|
|
'li',
|
|
'ol'
|
|
]);
|
|
$def = $config->getHTMLDefinition(true);
|
|
$def->addElement(
|
|
'time',
|
|
'Inline',
|
|
'Inline',
|
|
'Common',
|
|
[
|
|
'datetime' => 'Text'
|
|
]
|
|
);
|
|
// Override the allowed classes to only support Microformats2 classes
|
|
$def->manager->attrTypes->set('Class', new HTMLPurifier_AttrDef_HTML_Microformats2());
|
|
$purifier = new HTMLPurifier($config);
|
|
$sanitized = $purifier->purify($html);
|
|
$sanitized = str_replace("
","\r",$sanitized);
|
|
return $sanitized;
|
|
}
|
|
|
|
private static function responseDisplayText($name, $summary, $content) {
|
|
|
|
// Build a fake h-entry to pass to the comments parser
|
|
$input = [
|
|
'type' => ['h-entry'],
|
|
'properties' => [
|
|
'name' => [trim($name)],
|
|
'summary' => [trim($summary)],
|
|
'content' => [trim($content)]
|
|
]
|
|
];
|
|
|
|
if(!trim($name))
|
|
unset($input['properties']['name']);
|
|
|
|
if(!trim($summary))
|
|
unset($input['properties']['summary']);
|
|
|
|
$result = \IndieWeb\comments\parse($input, false, 1024, 4);
|
|
|
|
return [
|
|
'name' => trim($result['name']),
|
|
'content' => $result['text']
|
|
];
|
|
}
|
|
|
|
private static function hasNumericKeys(array $arr) {
|
|
foreach($arr as $key=>$val)
|
|
if (is_numeric($key))
|
|
return true;
|
|
return false;
|
|
}
|
|
|
|
private static function isMicroformat($mf) {
|
|
return is_array($mf)
|
|
and !self::hasNumericKeys($mf)
|
|
and !empty($mf['type'])
|
|
and isset($mf['properties']);
|
|
}
|
|
|
|
private static function isHCard($mf) {
|
|
return is_array($mf)
|
|
and !empty($mf['type'])
|
|
and is_array($mf['type'])
|
|
and in_array('h-card', $mf['type']);
|
|
}
|
|
|
|
private static function isURL($string) {
|
|
return preg_match('/^https?:\/\/.+\..+$/', $string);
|
|
}
|
|
|
|
// Given an array of microformats properties and a key name, return the plaintext value
|
|
// at that property
|
|
// e.g.
|
|
// {"properties":{"published":["foo"]}} results in "foo"
|
|
private static function getPlaintext($mf2, $k, $fallback=null) {
|
|
if(!empty($mf2['properties'][$k]) and is_array($mf2['properties'][$k])) {
|
|
// $mf2['properties'][$v] will always be an array since the input was from the mf2 parser
|
|
$value = $mf2['properties'][$k][0];
|
|
if(is_string($value)) {
|
|
return $value;
|
|
} elseif(self::isMicroformat($value) && array_key_exists('value', $value)) {
|
|
return $value['value'];
|
|
}
|
|
}
|
|
return $fallback;
|
|
}
|
|
|
|
private static function getURL($url, $http) {
|
|
if(!$url) return null;
|
|
// TODO: consider adding caching here
|
|
$result = $http->get($url);
|
|
if($result['error'] || !$result['body']) {
|
|
return null;
|
|
}
|
|
return \mf2\Parse($result['body'], $url);
|
|
}
|
|
|
|
private static function normalize_url($url) {
|
|
$parts = parse_url($url);
|
|
if(empty($parts['path']))
|
|
$parts['path'] = '/';
|
|
$parts['host'] = strtolower($parts['host']);
|
|
return self::build_url($parts);
|
|
}
|
|
|
|
private static function build_url($parsed_url) {
|
|
$scheme = isset($parsed_url['scheme']) ? $parsed_url['scheme'] . '://' : '';
|
|
$host = isset($parsed_url['host']) ? $parsed_url['host'] : '';
|
|
$port = isset($parsed_url['port']) ? ':' . $parsed_url['port'] : '';
|
|
$user = isset($parsed_url['user']) ? $parsed_url['user'] : '';
|
|
$pass = isset($parsed_url['pass']) ? ':' . $parsed_url['pass'] : '';
|
|
$pass = ($user || $pass) ? "$pass@" : '';
|
|
$path = isset($parsed_url['path']) ? $parsed_url['path'] : '';
|
|
$query = isset($parsed_url['query']) ? '?' . $parsed_url['query'] : '';
|
|
$fragment = isset($parsed_url['fragment']) ? '#' . $parsed_url['fragment'] : '';
|
|
return "$scheme$user$pass$host$port$path$query$fragment";
|
|
}
|
|
}
|