From 820ded2c2d3cbbb170f990a2f0c162decb0029d7 Mon Sep 17 00:00:00 2001
From: Michael Vogel <icarus@dabo.de>
Date: Mon, 10 Aug 2015 21:33:57 +0200
Subject: [PATCH] Support for the new nodeinfo protocol that will replace
 statistics.json

---
 include/poller.php  |   4 +
 mod/_well_known.php |   4 +
 mod/nodeinfo.php    | 218 ++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 226 insertions(+)
 create mode 100644 mod/nodeinfo.php

diff --git a/include/poller.php b/include/poller.php
index 7cc1a2852..b72a4a823 100644
--- a/include/poller.php
+++ b/include/poller.php
@@ -36,6 +36,7 @@ function poller_run(&$argv, &$argc){
 	require_once('include/email.php');
 	require_once('include/socgraph.php');
 	require_once('include/pidfile.php');
+	require_once('mod/nodeinfo.php');
 
 	load_config('config');
 	load_config('system');
@@ -117,6 +118,9 @@ function poller_run(&$argv, &$argc){
 	// Check every conversation
 	check_conversations(false);
 
+	// update nodeinfo data
+	nodeinfo_cron();
+
 	// To-Do: Regenerate usage statistics
 	// q("ANALYZE TABLE `item`");
 
diff --git a/mod/_well_known.php b/mod/_well_known.php
index 3d722f722..1271e12f4 100644
--- a/mod/_well_known.php
+++ b/mod/_well_known.php
@@ -1,5 +1,6 @@
 <?php
 require_once("mod/hostxrd.php");
+require_once("mod/nodeinfo.php");
 
 function _well_known_init(&$a){
 	if ($a->argc > 1) {
@@ -10,6 +11,9 @@ function _well_known_init(&$a){
 			case "x-social-relay":
 				wk_social_relay($a);
 				break;
+			case "nodeinfo":
+				nodeinfo_wellknown($a);
+				break;
 		}
 	}
 	http_status_exit(404);
diff --git a/mod/nodeinfo.php b/mod/nodeinfo.php
new file mode 100644
index 000000000..bf1d4ef3e
--- /dev/null
+++ b/mod/nodeinfo.php
@@ -0,0 +1,218 @@
+<?php
+/*
+Documentation: http://nodeinfo.diaspora.software/schema.html
+*/
+
+function nodeinfo_wellknown(&$a) {
+	if (!get_config("system", "nodeinfo")) {
+		http_status_exit(404);
+		killme();
+	}
+	$nodeinfo = array("links" => array("rel" => "http://nodeinfo.diaspora.software/ns/schema/1.0",
+					"href" => $a->get_baseurl()."/nodeinfo/1.0"));
+
+	header('Content-type: application/json; charset=utf-8');
+	echo json_encode($nodeinfo, true);
+	exit;
+}
+
+function nodeinfo_init(&$a){
+	if (!get_config("system", "nodeinfo")) {
+		http_status_exit(404);
+		killme();
+	}
+
+	if (($a->argc != 2) OR ($a->argv[1] != "1.0")) {
+		http_status_exit(404);
+		killme();
+	}
+
+	$smtp = (function_exists("imap_open") AND !get_config("system","imap_disabled") AND !get_config("system","dfrn_only"));
+
+	$nodeinfo = array();
+	$nodeinfo["version"] = "1.0";
+	$nodeinfo["software"] = array("name" => "friendica", "version" => FRIENDICA_VERSION."-".DB_UPDATE_VERSION);
+
+	$nodeinfo["protocols"] = array();
+	$nodeinfo["protocols"]["inbound"] = array();
+	$nodeinfo["protocols"]["outbound"] = array();
+
+	if (get_config("system","diaspora_enabled")) {
+		$nodeinfo["protocols"]["inbound"][] = "diaspora";
+		$nodeinfo["protocols"]["outbound"][] = "diaspora";
+	}
+
+	$nodeinfo["protocols"]["inbound"][] = "friendica";
+	$nodeinfo["protocols"]["outbound"][] = "friendica";
+
+	if (!get_config("system","ostatus_disabled")) {
+		$nodeinfo["protocols"]["inbound"][] = "gnusocial";
+		$nodeinfo["protocols"]["outbound"][] = "gnusocial";
+	}
+
+	if ($smtp) {
+		$nodeinfo["protocols"]["inbound"][] = "smtp";
+		$nodeinfo["protocols"]["outbound"][] = "smtp";
+	}
+
+	$nodeinfo["services"] = array();
+
+	if (nodeinfo_plugin_enabled("appnet") OR nodeinfo_plugin_enabled("buffer"))
+		$nodeinfo["services"][] = "appnet";
+
+	if (nodeinfo_plugin_enabled("blogger"))
+		$nodeinfo["services"][] = "blogger";
+
+	if (get_config("system","diaspora_enabled"))
+		$nodeinfo["services"][] = "diaspora";
+
+	if (nodeinfo_plugin_enabled("dreamwidth"))
+		$nodeinfo["services"][] = "dreamwidth";
+
+	if (nodeinfo_plugin_enabled("fbpost") OR nodeinfo_plugin_enabled("buffer"))
+		$nodeinfo["services"][] = "facebook";
+
+	$nodeinfo["services"][] = " friendica";
+
+	if (nodeinfo_plugin_enabled("statusnet") OR !get_config("system","ostatus_disabled"))
+		$nodeinfo["services"][] = "gnusocial";
+
+	if (nodeinfo_plugin_enabled("fpluspost") OR nodeinfo_plugin_enabled("buffer"))
+		$nodeinfo["services"][] = "google";
+
+	if (nodeinfo_plugin_enabled("libertree"))
+		$nodeinfo["services"][] = "libertree";
+
+	if (nodeinfo_plugin_enabled("buffer"))
+		$nodeinfo["services"][] = "linkedin";
+
+	if (nodeinfo_plugin_enabled("ljpost"))
+		$nodeinfo["services"][] = "livejournal";
+
+	if (nodeinfo_plugin_enabled("pumpio"))
+		$nodeinfo["services"][] = "pumpio";
+
+	if ($smtp)
+		$nodeinfo["services"][] = "smtp";
+
+	if (nodeinfo_plugin_enabled("tumblr"))
+		$nodeinfo["services"][] = "tumblr";
+
+	if (nodeinfo_plugin_enabled("twitter"))
+		$nodeinfo["services"][] = "twitter";
+
+	if (nodeinfo_plugin_enabled("wordpress"))
+		$nodeinfo["services"][] = "wppost";
+
+	$nodeinfo["openRegistrations"] = ($a->config['register_policy'] != 0);
+
+	$nodeinfo["usage"] = array();
+	$nodeinfo["usage"]["users"] = array("total" => get_config("nodeinfo","total_users"),
+				"activeHalfyear" => get_config("nodeinfo","active_users_halfyear"),
+				"activeMonth" => get_config("nodeinfo","active_users_monthly"));
+	$nodeinfo["usage"]["localPosts"] = get_config("nodeinfo","local_posts");
+	$nodeinfo["usage"]["localComments"] = get_config("nodeinfo","local_comments");
+
+	header('Content-type: application/json; charset=utf-8');
+	echo json_encode($nodeinfo, true);
+	exit;
+}
+
+function nodeinfo_plugin_enabled($plugin) {
+	$r = q("SELECT * FROM `addon` WHERE `installed` = 1 AND `name` = '%s'", $plugin);
+	return((bool)(count($r) > 0));
+}
+
+function nodeinfo_cron() {
+	if (!get_config("system", "nodeinfo"))
+		return;
+
+	$last = get_config('nodeinfo','last_calucation');
+
+	if($last) {
+		// Calculate every 24 hours
+		$next = $last + (24 * 60 * 60);
+		if($next > time()) {
+			logger("calculation intervall not reached");
+			return;
+		}
+	}
+        logger("cron_start");
+
+	$users = q("SELECT profile.*, `user`.`login_date`, `lastitem`.`lastitem_date`
+			FROM (SELECT MAX(`item`.`changed`) as `lastitem_date`, `item`.`uid`
+				FROM `item`
+					WHERE `item`.`type` = 'wall'
+						GROUP BY `item`.`uid`) AS `lastitem`
+						RIGHT OUTER JOIN `user` ON `user`.`uid` = `lastitem`.`uid`, `contact`, `profile`
+                                WHERE
+					`user`.`uid` = `contact`.`uid` AND `profile`.`uid` = `user`.`uid`
+					AND `profile`.`is-default` AND (`profile`.`publish` OR `profile`.`net-publish`)
+					AND `user`.`verified` AND `contact`.`self`
+					AND NOT `user`.`blocked`
+					AND NOT `user`.`account_removed`
+					AND NOT `user`.`account_expired`");
+
+	if (is_array($users)) {
+			$total_users = count($users);
+			$active_users_halfyear = 0;
+			$active_users_monthly = 0;
+
+			$halfyear = time() - (180 * 24 * 60 * 60);
+			$month = time() - (30 * 24 * 60 * 60);
+
+			foreach ($users AS $user) {
+				if ((strtotime($user['login_date']) > $halfyear) OR
+					(strtotime($user['lastitem_date']) > $halfyear))
+					++$active_users_halfyear;
+
+				if ((strtotime($user['login_date']) > $month) OR
+					(strtotime($user['lastitem_date']) > $month))
+					++$active_users_monthly;
+
+			}
+			set_config('nodeinfo','total_users', $total_users);
+		        logger("total_users: ".$total_users, LOGGER_DEBUG);
+
+			set_config('nodeinfo','active_users_halfyear', $active_users_halfyear);
+			set_config('nodeinfo','active_users_monthly', $active_users_monthly);
+	}
+
+	//$posts = q("SELECT COUNT(*) AS local_posts FROM `item` WHERE `wall` AND `uid` != 0 AND `id` = `parent` AND left(body, 6) != '[share'");
+	$posts = q("SELECT COUNT(*) AS `local_posts` FROM `item`
+			INNER JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
+			WHERE `contact`.`self` and `item`.`id` = `item`.`parent` AND left(body, 6) != '[share' AND `item`.`network` IN ('%s', '%s', '%s')",
+			dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DIASPORA), dbesc(NETWORK_DFRN));
+
+	if (!is_array($posts))
+		$local_posts = -1;
+	else
+		$local_posts = $posts[0]["local_posts"];
+
+	set_config('nodeinfo','local_posts', $local_posts);
+
+        logger("local_posts: ".$local_posts, LOGGER_DEBUG);
+
+	$posts = q("SELECT COUNT(*) AS `local_comments` FROM `item`
+			INNER JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
+			WHERE `contact`.`self` and `item`.`id` != `item`.`parent` AND `item`.`network` IN ('%s', '%s', '%s')",
+			dbesc(NETWORK_OSTATUS), dbesc(NETWORK_DIASPORA), dbesc(NETWORK_DFRN));
+
+	if (!is_array($posts))
+		$local_comments = -1;
+	else
+		$local_comments = $posts[0]["local_comments"];
+
+	set_config('nodeinfo','local_comments', $local_comments);
+
+	// Now trying to register
+	//$url = "http://the-federation.info/register/".$a->get_hostname();
+        //logger('nodeinfo_cron: registering url: '.$url, LOGGER_DEBUG);
+	//$ret = fetch_url($url);
+        //logger('nodeinfo_cron: registering answer: '.$ret, LOGGER_DEBUG);
+
+        logger("cron_end");
+	set_config('nodeinfo','last_calucation', time());
+}
+
+?>