Xchan Lookup';
$o .= '';
$o .= '
';
if(x($_GET,'addr')) {
$addr = trim($_GET['addr']);
$r = q("select * from xchan where xchan_hash like '%s%%' or xchan_addr = '%s' group by xchan_hash",
dbesc($addr),
dbesc($addr)
);
if($r) {
foreach($r as $rr) {
$o .= str_replace(array("\n"," "),array("
"," "),print_r($rr,true)) . EOL;
$s = q("select * from hubloc where hubloc_hash like '%s'",
dbesc($r[0]['xchan_hash'])
);
if($s) {
foreach($s as $rr)
$o .= str_replace(array("\n"," "),array("
"," "),print_r($rr,true)) . EOL;
}
}
}
else
notice( t('Not found.') . EOL);
}
return $o;
}