+function ostatus_check_follow_friends() {
+ $r = q("SELECT `uid`,`v` FROM `pconfig` WHERE `cat`='system' AND `k`='ostatus_legacy_contact' AND `v` != ''");
+
+ if (!$r)
+ return;
+
+ foreach ($r AS $contact) {
+ ostatus_follow_friends($contact["uid"], $contact["v"]);
+ set_pconfig($contact["uid"], "system", "ostatus_legacy_contact", "");
+ }
+}
+
+// This function doesn't work reliable by now.
+function ostatus_follow_friends($uid, $url) {
+ $contact = probe_url($url);
+
+ if (!$contact)
+ return;
+
+ $api = $contact["baseurl"]."/api/";
+
+ // Fetching friends
+ $data = z_fetch_url($api."statuses/friends.json?screen_name=".$contact["nick"]);
+
+ if (!$data["success"])
+ return;
+
+ $friends = json_decode($data["body"]);
+
+ foreach ($friends AS $friend) {
+ $url = $friend->statusnet_profile_url;
+ $r = q("SELECT `url` FROM `contact` WHERE `uid` = %d AND
+ (`nurl` = '%s' OR `alias` = '%s' OR `alias` = '%s') AND
+ `network` != '%s' LIMIT 1",
+ intval($uid), dbesc(normalise_link($url)),
+ dbesc(normalise_link($url)), dbesc($url), dbesc(NETWORK_STATUSNET));
+ if (!$r) {
+ $data = probe_url($friend->statusnet_profile_url);
+ if ($data["network"] == NETWORK_OSTATUS) {
+ $result = new_contact($uid,$friend->statusnet_profile_url);
+ if ($result["success"])
+ logger($friend->name." ".$url." - success", LOGGER_DEBUG);
+ else
+ logger($friend->name." ".$url." - failed", LOGGER_DEBUG);
+ } else
+ logger($friend->name." ".$url." - not OStatus", LOGGER_DEBUG);
+ }
+ }
+}
+
+function ostatus_fetchauthor($xpath, $context, $importer, &$contact, $onlyfetch) {