3e701b90ac
- use dba::is_result() everywhere (where I found the old, bad way) - converted some spaces -> tabs for code - converted some CRLF -> LF as mixures of both is not good Signed-off-by: Roland Haeder <roland@mxchange.org>
81 lines
2 KiB
PHP
81 lines
2 KiB
PHP
<?php
|
|
|
|
require_once("boot.php");
|
|
require_once('include/Scrape.php');
|
|
require_once('include/socgraph.php');
|
|
|
|
function gprobe_run(&$argv, &$argc){
|
|
global $a, $db;
|
|
|
|
if(is_null($a)) {
|
|
$a = new App;
|
|
}
|
|
|
|
if(is_null($db)) {
|
|
@include(".htconfig.php");
|
|
require_once("include/dba.php");
|
|
$db = new dba($db_host, $db_user, $db_pass, $db_data);
|
|
unset($db_host, $db_user, $db_pass, $db_data);
|
|
};
|
|
|
|
require_once('include/session.php');
|
|
require_once('include/datetime.php');
|
|
|
|
load_config('config');
|
|
load_config('system');
|
|
|
|
$a->set_baseurl(get_config('system','url'));
|
|
|
|
load_hooks();
|
|
|
|
if($argc != 2)
|
|
return;
|
|
|
|
$url = hex2bin($argv[1]);
|
|
|
|
$r = q("SELECT `id`, `url`, `network` FROM `gcontact` WHERE `nurl` = '%s' ORDER BY `id` LIMIT 1",
|
|
dbesc(normalise_link($url))
|
|
);
|
|
|
|
logger("gprobe start for ".normalise_link($url), LOGGER_DEBUG);
|
|
|
|
if (!count($r)) {
|
|
|
|
// Is it a DDoS attempt?
|
|
$urlparts = parse_url($url);
|
|
|
|
$result = Cache::get("gprobe:".$urlparts["host"]);
|
|
if (!is_null($result)) {
|
|
$result = unserialize($result);
|
|
if (in_array($result["network"], array(NETWORK_FEED, NETWORK_PHANTOM))) {
|
|
logger("DDoS attempt detected for ".$urlparts["host"]." by ".$_SERVER["REMOTE_ADDR"].". server data: ".print_r($_SERVER, true), LOGGER_DEBUG);
|
|
return;
|
|
}
|
|
}
|
|
|
|
$arr = probe_url($url);
|
|
|
|
if (is_null($result))
|
|
Cache::set("gprobe:".$urlparts["host"],serialize($arr));
|
|
|
|
if (!in_array($arr["network"], array(NETWORK_FEED, NETWORK_PHANTOM)))
|
|
update_gcontact($arr);
|
|
|
|
$r = q("SELECT `id`, `url`, `network` FROM `gcontact` WHERE `nurl` = '%s' ORDER BY `id` LIMIT 1",
|
|
dbesc(normalise_link($url))
|
|
);
|
|
}
|
|
if(dba::is_result($r)) {
|
|
// Check for accessibility and do a poco discovery
|
|
if (poco_last_updated($r[0]['url'], true) AND ($r[0]["network"] == NETWORK_DFRN))
|
|
poco_load(0,0,$r[0]['id'], str_replace('/profile/','/poco/',$r[0]['url']));
|
|
}
|
|
|
|
logger("gprobe end for ".normalise_link($url), LOGGER_DEBUG);
|
|
return;
|
|
}
|
|
|
|
if (array_search(__file__,get_included_files())===0){
|
|
gprobe_run($_SERVER["argv"],$_SERVER["argc"]);
|
|
killme();
|
|
}
|