Include the server list from the-federation.info

This commit is contained in:
Michael Vogel 2015-09-06 12:20:31 +02:00
parent c9faec49c1
commit 92a15d9178
1 changed files with 26 additions and 0 deletions

View File

@ -1255,8 +1255,34 @@ function update_suggestions() {
} }
} }
function poco_discover_federation() {
$last = get_config('poco','last_federation_discovery');
if($last) {
$next = $last + (24 * 60 * 60);
if($next > time())
return;
}
$serverdata = fetch_url("http://the-federation.info/pods.json");
if (!$serverdata)
return;
$servers = json_decode($serverdata);
foreach($servers->pods AS $server)
poco_check_server("https://".$server->host);
set_config('poco','last_federation_discovery', time());
}
function poco_discover($complete = false) { function poco_discover($complete = false) {
// Update the server list
poco_discover_federation();
$no_of_queries = 5; $no_of_queries = 5;
$requery_days = intval(get_config("system", "poco_requery_days")); $requery_days = intval(get_config("system", "poco_requery_days"));