@ -6,10 +6,11 @@
declare(strict_types=1);
namespace MensBeam\Lax\Parser\XML;
use MensBeam\Lax\Date;
use MensBeam\Lax\Person\Person;
use MensBeam\Lax\Person\Collection as PersonCollection;
use MensBeam\Lax\Text;
use MensBeam\Lax\Date;
use MensBeam\Lax\Url;
abstract class Construct {
use \MensBeam\Lax\Parser\Construct;
@ -30,11 +31,6 @@ abstract class Construct {
return ($node->length) ? $node->item(0) : null;
}
/** Retrieves multiple element node based on an XPath query */
protected function fetchElements(string $query, \DOMNode $context = null): \DOMNodeList {
return $this->xpath->query($query, $context ?? $this->subject);
}
/** Retrieves the trimmed text content of one or more DOM elements based on an XPath query, optionally matching a pattern
*
* Returns null if no suitable nodes were found
@ -86,112 +82,6 @@ abstract class Construct {
return $out ?: null;
}
/** Returns a node-list of Atom link elements with the desired relation or equivalents.
*
* Links without an href attribute are excluded.
*
* @see https://tools.ietf.org/html/rfc4287#section-4.2.7.2
*/
protected function fetchAtomRelations(string $rel = ""): \DOMNodeList {
// FIXME: The XPath evaluation will fail if the relation contains an apostrophe. This is a known and difficult-to-overcome limitation of XPath 1.0 which I consider not worth the effort to address at this time
if ($rel == "" || $rel == "alternate" || $rel == "http://www.iana.org/assignments/relation/alternate") {
$cond = "not(@rel) or @rel='' or @rel='alternate' or @rel='http://www.iana.org/assignments/relation/alternate'";
} elseif (strpos($rel, ":") === false) {
// FIXME: Checking only for a colon in a link relation is a hack that does not strictly follow IRI rules, but it's adequate for our needs
$cond = "@rel='$rel' or @rel='http://www.iana.org/assignments/relation/$rel'";
} elseif (strlen($rel) > 41 & & strpos($rel, "http://www.iana.org/assignments/relation/") === 0) {
$rel = substr($rel, 41);
$cond = "@rel='$rel' or @rel='http://www.iana.org/assignments/relation/$rel'";
} else {
$cond = "@rel='$rel'";
}
return $this->xpath->query("atom:link[@href][$cond]", $this->subject);
}
/** Finds and parses RSS person-texts and returns a collection of person objects
*
* Each can have a name, e-mail address, or both
*
* The following forms will yield both a name and address:
*
* - user@example.com (Full Name)
* - Full Name < user @ example . com >
*/
protected function fetchPeople(string $query, string $role): ?PersonCollection {
$people = $this->fetchString($query, null, true) ?? [];
$out = new PersonCollection;
foreach ($people as $person) {
if (!strlen($person)) {
continue;
}
$p = new Person;
if (preg_match("/^([^@\s]+@\S+) \((.+?)\)$/", $person, $match)) { // tests "user@example.com (Full Name)" form
if ($this->validateMail($match[1])) {
$p->name = trim($match[2]);
$p->mail = $match[1];
} else {
$p->name = $person;
}
} elseif (preg_match("/^((?:\S|\s(?!< ))+) < ([^>]+)>$/", $person, $match)) { // tests "Full Name < user @ example . com > " form
if ($this->validateMail($match[2])) {
$p->name = trim($match[1]);
$p->mail = $match[2];
} else {
$p->name = $person;
}
} elseif ($this->validateMail($person)) {
$p->name = $person;
$p->mail = $person;
} else {
$p->name = $person;
}
$p->role = $role;
$out[] = $p;
}
return count($out) ? $out : null;
}
/** Finds and parses Atom person-constructs, and returns a collection of Person objects */
protected function fetchPeopleAtom(string $query, string $role): ?PersonCollection {
$nodes = $this->fetchElements($query);
$out = new PersonCollection;
foreach ($nodes as $node) {
$p = new Person;
$p->mail = $this->fetchString("atom:email", $node) ?? "";
$p->name = $this->fetchString("atom:name", $node) ?? $p->mail;
$p->url = $this->fetchUrl("atom:uri", $node);
$p->role = $role;
if (strlen($p->name)) {
$out[] = $p;
}
}
return count($out) ? $out : null;
}
/** Resolves a URL contained in a DOM element's atrribute or text
*
* This automatically performs xml:base and HTML < base > resolution
*
* Specifying the empty string for $attr results in the element content being used as a URL
*/
protected function resolveNodeUrl(\DOMElement $node = null, string $attr = "", string $ns = null): string {
$base = $node->baseURI;
$url = strlen($attr) ? $node->getAttributeNS($ns, $attr) : $this->trimText($node->textContent);
return $this->resolveUrl($url, $base);
}
protected function fetchUrl(string $query, \DOMElement $context = null, string $attr = "", string $ns = null) {
$nodes = $this->fetchElements($query, $context);
foreach ($nodes as $node) {
$url = strlen($attr) ? $node->getAttributeNS($ns, $attr) : $this->trimText($node->textContent);
$url = $this->trimText($node->textContent);
if (strlen($url)) {
return $this->resolveUrl($url, $node->baseURI);
}
}
return null;
}
/** Primitive to fetch an Atom feed/entry identifier */
protected function getIdAtom(): ?string {
return $this->fetchString("atom:id", ".+");
