124 lines
3.3 KiB
PHP
Executable file
124 lines
3.3 KiB
PHP
Executable file
<?php
|
|
|
|
require_once('library/HTML5/Parser.php');
|
|
|
|
if(! function_exists('attribute_contains')) {
|
|
function attribute_contains($attr,$s) {
|
|
$a = explode(' ', $attr);
|
|
if(count($a) && in_array($s,$a))
|
|
return true;
|
|
return false;
|
|
}}
|
|
|
|
|
|
if(! function_exists('scrape_dfrn')) {
|
|
function scrape_dfrn($url, $max_nodes=5000) {
|
|
|
|
$minNodes = 100; //Lets do at least 100 nodes per type.
|
|
$timeout = 10; //Timeout will affect batch processing.
|
|
|
|
$ret = array();
|
|
$s = fetch_url($url, $timeout);
|
|
|
|
if(! $s)
|
|
return $ret;
|
|
|
|
$dom = HTML5_Parser::parse($s);
|
|
|
|
if(! $dom)
|
|
return $ret;
|
|
|
|
|
|
$items = $dom->getElementsByTagName('meta');
|
|
|
|
// get DFRN link elements
|
|
$nodes_left = max(intval($max_nodes), $minNodes);
|
|
foreach($items as $item) {
|
|
$x = $item->getAttribute('name');
|
|
if($x == 'dfrn-global-visibility') {
|
|
$z = strtolower(trim($item->getAttribute('content')));
|
|
if($z != 'true')
|
|
$ret['hide'] = 1;
|
|
}
|
|
if($x == 'friendika.community' || $x == 'friendica.community') {
|
|
$z = strtolower(trim($item->getAttribute('content')));
|
|
if($z == 'true')
|
|
$ret['comm'] = 1;
|
|
}
|
|
if($x == 'keywords') {
|
|
$z = str_replace(',',' ',strtolower(trim($item->getAttribute('content'))));
|
|
if(strlen($z))
|
|
$ret['tags'] = $z;
|
|
}
|
|
$nodes_left--;
|
|
if($nodes_left <= 0) break;
|
|
}
|
|
|
|
$items = $dom->getElementsByTagName('link');
|
|
|
|
// get DFRN link elements
|
|
|
|
$nodes_left = max(intval($max_nodes), $minNodes);
|
|
foreach($items as $item) {
|
|
$x = $item->getAttribute('rel');
|
|
if(substr($x,0,5) == "dfrn-")
|
|
$ret[$x] = $item->getAttribute('href');
|
|
$nodes_left--;
|
|
if($nodes_left <= 0) break;
|
|
}
|
|
|
|
// Pull out hCard profile elements
|
|
|
|
$nodes_left = max(intval($max_nodes), $minNodes);
|
|
$items = $dom->getElementsByTagName('*');
|
|
foreach($items as $item) {
|
|
if(attribute_contains($item->getAttribute('class'), 'vcard')) {
|
|
$level2 = $item->getElementsByTagName('*');
|
|
foreach($level2 as $x) {
|
|
if(attribute_contains($x->getAttribute('class'),'fn'))
|
|
$ret['fn'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'title'))
|
|
$ret['pdesc'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'photo'))
|
|
$ret['photo'] = $x->getAttribute('src');
|
|
if(attribute_contains($x->getAttribute('class'),'key'))
|
|
$ret['key'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'locality'))
|
|
$ret['locality'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'region'))
|
|
$ret['region'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'postal-code'))
|
|
$ret['postal-code'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'country-name'))
|
|
$ret['country-name'] = $x->textContent;
|
|
if(attribute_contains($x->getAttribute('class'),'x-gender'))
|
|
$ret['gender'] = $x->textContent;
|
|
|
|
}
|
|
}
|
|
if(attribute_contains($item->getAttribute('class'),'marital-text'))
|
|
$ret['marital'] = $item->textContent;
|
|
$nodes_left--;
|
|
if($nodes_left <= 0) break;
|
|
}
|
|
return $ret;
|
|
}}
|
|
|
|
|
|
if(! function_exists('validate_dfrn')) {
|
|
function validate_dfrn($a) {
|
|
$errors = 0;
|
|
if(! x($a,'key'))
|
|
$errors ++;
|
|
if(! x($a,'dfrn-request'))
|
|
$errors ++;
|
|
if(! x($a,'dfrn-confirm'))
|
|
$errors ++;
|
|
if(! x($a,'dfrn-notify'))
|
|
$errors ++;
|
|
if(! x($a,'dfrn-poll'))
|
|
$errors ++;
|
|
return $errors;
|
|
}}
|
|
|