3 * @file mod/ostatus_subscribe.php
6 use Friendica\Core\L10n;
7 use Friendica\Core\PConfig;
8 use Friendica\Core\System;
9 use Friendica\Model\Contact;
10 use Friendica\Network\Probe;
12 function ostatus_subscribe_content(App $a) {
15 notice(L10n::t('Permission denied.') . EOL);
16 goaway($_SESSION['return_url']);
20 $o = "<h2>".t("Subscribing to OStatus contacts")."</h2>";
26 $counter = intval($_REQUEST['counter']);
28 if (PConfig::get($uid, "ostatus", "legacy_friends") == "") {
30 if ($_REQUEST["url"] == "") {
31 return $o.t("No contact provided.");
34 $contact = Probe::uri($_REQUEST["url"]);
37 return $o.t("Couldn't fetch information for contact.");
40 $api = $contact["baseurl"]."/api/";
43 $data = z_fetch_url($api."statuses/friends.json?screen_name=".$contact["nick"]);
45 if (!$data["success"]) {
46 return $o.t("Couldn't fetch friends for contact.");
49 PConfig::set($uid, "ostatus", "legacy_friends", $data["body"]);
52 $friends = json_decode(PConfig::get($uid, "ostatus", "legacy_friends"));
54 $total = sizeof($friends);
56 if ($counter >= $total) {
57 $a->page['htmlhead'] = '<meta http-equiv="refresh" content="0; URL='.System::baseUrl().'/settings/connectors">';
58 PConfig::delete($uid, "ostatus", "legacy_friends");
59 PConfig::delete($uid, "ostatus", "legacy_contact");
64 $friend = $friends[$counter++];
66 $url = $friend->statusnet_profile_url;
68 $o .= "<p>".$counter."/".$total.": ".$url;
70 $data = Probe::uri($url);
71 if ($data["network"] == NETWORK_OSTATUS) {
72 $result = Contact::createFromProbe($uid, $url, true, NETWORK_OSTATUS);
73 if ($result["success"]) {
74 $o .= " - ".t("success");
76 $o .= " - ".t("failed");
79 $o .= " - ".t("ignored");
84 $o .= "<p>".t("Keep this window open until done.")."</p>";
86 $a->page['htmlhead'] = '<meta http-equiv="refresh" content="0; URL='.System::baseUrl().'/ostatus_subscribe?counter='.$counter.'">';