From 92a15d91784830c34aea3a29f1e4aafe4ac16bf8 Mon Sep 17 00:00:00 2001
From: Michael Vogel <icarus@dabo.de>
Date: Sun, 6 Sep 2015 12:20:31 +0200
Subject: [PATCH] Include the server list from the-federation.info

---
 include/socgraph.php | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/include/socgraph.php b/include/socgraph.php
index 002623c16e..97daae1d2e 100644
--- a/include/socgraph.php
+++ b/include/socgraph.php
@@ -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) {
 
+	// Update the server list
+	poco_discover_federation();
+
 	$no_of_queries = 5;
 
 	$requery_days = intval(get_config("system", "poco_requery_days"));