]> git.mxchange.org Git - friendica.git/blobdiff - src/Model/GServer.php
Remove obsolete mod/lockview.php file
[friendica.git] / src / Model / GServer.php
index 08663fa0650f824b8f20f2f8edf49fd0ed698510..0f47146eb73705b67613bfa793f594d9ec3696a4 100644 (file)
@@ -23,21 +23,20 @@ namespace Friendica\Model;
 
 use DOMDocument;
 use DOMXPath;
+use Friendica\Core\Logger;
 use Friendica\Core\Protocol;
+use Friendica\Core\System;
 use Friendica\Core\Worker;
 use Friendica\Database\DBA;
 use Friendica\DI;
 use Friendica\Module\Register;
 use Friendica\Network\CurlResult;
-use Friendica\Util\Network;
+use Friendica\Protocol\Diaspora;
+use Friendica\Protocol\PortableContact;
 use Friendica\Util\DateTimeFormat;
+use Friendica\Util\Network;
 use Friendica\Util\Strings;
 use Friendica\Util\XML;
-use Friendica\Core\Logger;
-use Friendica\Core\System;
-use Friendica\Protocol\PortableContact;
-use Friendica\Protocol\Diaspora;
-use Friendica\Network\Probe;
 
 /**
  * This class handles GServer related functions
@@ -236,17 +235,23 @@ class GServer
        private static function setFailure(string $url)
        {
                if (DBA::exists('gserver', ['nurl' => Strings::normaliseLink($url)])) {
-                       DBA::update('gserver', ['last_failure' => DateTimeFormat::utcNow(), 'detection-method' => null],
+                       DBA::update('gserver', ['failed' => true, 'last_failure' => DateTimeFormat::utcNow(), 'detection-method' => null],
                        ['nurl' => Strings::normaliseLink($url)]);
                        Logger::info('Set failed status for existing server', ['url' => $url]);
                        return;
                }
                DBA::insert('gserver', ['url' => $url, 'nurl' => Strings::normaliseLink($url),
                        'network' => Protocol::PHANTOM, 'created' => DateTimeFormat::utcNow(),
-                       'last_failure' => DateTimeFormat::utcNow()]);
+                       'failed' => true, 'last_failure' => DateTimeFormat::utcNow()]);
                Logger::info('Set failed status for new server', ['url' => $url]);
        }
 
+       /**
+        * Remove unwanted content from the given URL
+        *
+        * @param string $url
+        * @return string cleaned URL
+        */
        public static function cleanURL(string $url)
        {
                $url = trim($url, '/');
@@ -260,13 +265,15 @@ class GServer
                return Network::unparseURL($urlparts);
        }
 
+       /**
+        * Return the base URL
+        *
+        * @param string $url
+        * @return string base URL
+        */
        private static function getBaseURL(string $url)
        {
-               $urlparts = parse_url($url);
-               unset($urlparts['user']);
-               unset($urlparts['pass']);
-               unset($urlparts['query']);
-               unset($urlparts['fragment']);
+               $urlparts = parse_url(self::cleanURL($url));
                unset($urlparts['path']);
                return Network::unparseURL($urlparts);
        }
@@ -296,12 +303,13 @@ class GServer
 
                // If the URL missmatches, then we mark the old entry as failure
                if ($url != $original_url) {
-                       DBA::update('gserver', ['last_failure' => DateTimeFormat::utcNow()], ['nurl' => Strings::normaliseLink($original_url)]);
+                       DBA::update('gserver', ['failed' => true, 'last_failure' => DateTimeFormat::utcNow()],
+                               ['nurl' => Strings::normaliseLink($original_url)]);
                }
 
                // When a nodeinfo is present, we don't need to dig further
                $xrd_timeout = DI::config()->get('system', 'xrd_timeout');
-               $curlResult = Network::curl($url . '/.well-known/nodeinfo', false, ['timeout' => $xrd_timeout]);
+               $curlResult = DI::httpRequest()->get($url . '/.well-known/nodeinfo', false, ['timeout' => $xrd_timeout]);
                if ($curlResult->isTimeout()) {
                        self::setFailure($url);
                        return false;
@@ -334,7 +342,7 @@ class GServer
                                        $basedata = ['detection-method' => self::DETECT_MANUAL];
                                }
 
-                               $curlResult = Network::curl($baseurl, false, ['timeout' => $xrd_timeout]);
+                               $curlResult = DI::httpRequest()->get($baseurl, false, ['timeout' => $xrd_timeout]);
                                if ($curlResult->isSuccess()) {
                                        $basedata = self::analyseRootHeader($curlResult, $basedata);
                                        $basedata = self::analyseRootBody($curlResult, $basedata, $baseurl);
@@ -351,7 +359,7 @@ class GServer
                                        // When the base path doesn't seem to contain a social network we try the complete path.
                                        // Most detectable system have to be installed in the root directory.
                                        // We checked the base to avoid false positives.
-                                       $curlResult = Network::curl($url, false, ['timeout' => $xrd_timeout]);
+                                       $curlResult = DI::httpRequest()->get($url, false, ['timeout' => $xrd_timeout]);
                                        if ($curlResult->isSuccess()) {
                                                $urldata = self::analyseRootHeader($curlResult, $serverdata);
                                                $urldata = self::analyseRootBody($curlResult, $urldata, $url);
@@ -442,6 +450,7 @@ class GServer
                }
 
                $serverdata['last_contact'] = DateTimeFormat::utcNow();
+               $serverdata['failed'] = false;
 
                $gserver = DBA::selectFirst('gserver', ['network'], ['nurl' => Strings::normaliseLink($url)]);
                if (!DBA::isResult($gserver)) {
@@ -461,7 +470,7 @@ class GServer
                        }
                }
 
-               if (!empty($id) && ($serverdata['network'] != Protocol::PHANTOM)) {
+               if (!empty($serverdata['network']) && !empty($id) && ($serverdata['network'] != Protocol::PHANTOM)) {
                        $gcontacts = DBA::count('gcontact', ['gsid' => $id]);
                        $apcontacts = DBA::count('apcontact', ['gsid' => $id]);
                        $contacts = DBA::count('contact', ['uid' => 0, 'gsid' => $id]);
@@ -489,7 +498,7 @@ class GServer
        {
                Logger::info('Discover relay data', ['server' => $server_url]);
 
-               $curlResult = Network::curl($server_url . '/.well-known/x-social-relay');
+               $curlResult = DI::httpRequest()->get($server_url . '/.well-known/x-social-relay');
                if (!$curlResult->isSuccess()) {
                        return;
                }
@@ -570,7 +579,7 @@ class GServer
         */
        private static function fetchStatistics(string $url)
        {
-               $curlResult = Network::curl($url . '/statistics.json');
+               $curlResult = DI::httpRequest()->get($url . '/statistics.json');
                if (!$curlResult->isSuccess()) {
                        return [];
                }
@@ -680,7 +689,8 @@ class GServer
         */
        private static function parseNodeinfo1(string $nodeinfo_url)
        {
-               $curlResult = Network::curl($nodeinfo_url);
+               $curlResult = DI::httpRequest()->get($nodeinfo_url);
+
                if (!$curlResult->isSuccess()) {
                        return [];
                }
@@ -756,7 +766,7 @@ class GServer
         */
        private static function parseNodeinfo2(string $nodeinfo_url)
        {
-               $curlResult = Network::curl($nodeinfo_url);
+               $curlResult = DI::httpRequest()->get($nodeinfo_url);
                if (!$curlResult->isSuccess()) {
                        return [];
                }
@@ -833,7 +843,7 @@ class GServer
         */
        private static function fetchSiteinfo(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/siteinfo.json');
+               $curlResult = DI::httpRequest()->get($url . '/siteinfo.json');
                if (!$curlResult->isSuccess()) {
                        return $serverdata;
                }
@@ -902,7 +912,7 @@ class GServer
        private static function validHostMeta(string $url)
        {
                $xrd_timeout = DI::config()->get('system', 'xrd_timeout');
-               $curlResult = Network::curl($url . '/.well-known/host-meta', false, ['timeout' => $xrd_timeout]);
+               $curlResult = DI::httpRequest()->get($url . '/.well-known/host-meta', false, ['timeout' => $xrd_timeout]);
                if (!$curlResult->isSuccess()) {
                        return false;
                }
@@ -972,8 +982,8 @@ class GServer
                }
 
                foreach ($contacts as $contact) {
-                       $probed = Probe::uri($contact);
-                       if (in_array($probed['network'], Protocol::FEDERATED)) {
+                       $probed = Contact::getByURL($contact);
+                       if (!empty($probed) && in_array($probed['network'], Protocol::FEDERATED)) {
                                $serverdata['network'] = $probed['network'];
                                break;
                        }
@@ -998,7 +1008,7 @@ class GServer
        {
                $serverdata['poco'] = '';
 
-               $curlResult = Network::curl($url. '/poco');
+               $curlResult = DI::httpRequest()->get($url . '/poco');
                if (!$curlResult->isSuccess()) {
                        return $serverdata;
                }
@@ -1028,7 +1038,7 @@ class GServer
         */
        public static function checkMastodonDirectory(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/api/v1/directory?limit=1');
+               $curlResult = DI::httpRequest()->get($url . '/api/v1/directory?limit=1');
                if (!$curlResult->isSuccess()) {
                        return $serverdata;
                }
@@ -1055,7 +1065,8 @@ class GServer
         */
        private static function detectNextcloud(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/status.php');
+               $curlResult = DI::httpRequest()->get($url . '/status.php');
+
                if (!$curlResult->isSuccess() || ($curlResult->getBody() == '')) {
                        return $serverdata;
                }
@@ -1088,7 +1099,8 @@ class GServer
         */
        private static function detectMastodonAlikes(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/api/v1/instance');
+               $curlResult = DI::httpRequest()->get($url . '/api/v1/instance');
+
                if (!$curlResult->isSuccess() || ($curlResult->getBody() == '')) {
                        return $serverdata;
                }
@@ -1153,7 +1165,7 @@ class GServer
         */
        private static function detectHubzilla(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/api/statusnet/config.json');
+               $curlResult = DI::httpRequest()->get($url . '/api/statusnet/config.json');
                if (!$curlResult->isSuccess() || ($curlResult->getBody() == '')) {
                        return $serverdata;
                }
@@ -1251,7 +1263,7 @@ class GServer
        private static function detectGNUSocial(string $url, array $serverdata)
        {
                // Test for GNU Social
-               $curlResult = Network::curl($url . '/api/gnusocial/version.json');
+               $curlResult = DI::httpRequest()->get($url . '/api/gnusocial/version.json');
                if ($curlResult->isSuccess() && ($curlResult->getBody() != '{"error":"not implemented"}') &&
                        ($curlResult->getBody() != '') && (strlen($curlResult->getBody()) < 30)) {
                        $serverdata['platform'] = 'gnusocial';
@@ -1269,7 +1281,7 @@ class GServer
                }
 
                // Test for Statusnet
-               $curlResult = Network::curl($url . '/api/statusnet/version.json');
+               $curlResult = DI::httpRequest()->get($url . '/api/statusnet/version.json');
                if ($curlResult->isSuccess() && ($curlResult->getBody() != '{"error":"not implemented"}') &&
                        ($curlResult->getBody() != '') && (strlen($curlResult->getBody()) < 30)) {
 
@@ -1305,9 +1317,9 @@ class GServer
         */
        private static function detectFriendica(string $url, array $serverdata)
        {
-               $curlResult = Network::curl($url . '/friendica/json');
+               $curlResult = DI::httpRequest()->get($url . '/friendica/json');
                if (!$curlResult->isSuccess()) {
-                       $curlResult = Network::curl($url . '/friendika/json');
+                       $curlResult = DI::httpRequest()->get($url . '/friendika/json');
                        $friendika = true;
                        $platform = 'Friendika';
                } else {
@@ -1578,7 +1590,7 @@ class GServer
 
                $gservers = DBA::p("SELECT `id`, `url`, `nurl`, `network`, `poco`
                        FROM `gserver`
-                       WHERE `last_contact` >= `last_failure`
+                       WHERE NOT `failed`
                        AND `poco` != ''
                        AND `last_poco_query` < ?
                        ORDER BY RAND()", $last_update
@@ -1619,15 +1631,17 @@ class GServer
                }
 
                // Discover federated servers
-               $curlResult = Network::fetchUrl("http://the-federation.info/pods.json");
-
-               if (!empty($curlResult)) {
-                       $servers = json_decode($curlResult, true);
-
-                       if (!empty($servers['pods'])) {
-                               foreach ($servers['pods'] as $server) {
-                                       // Using "only_nodeinfo" since servers that are listed on that page should always have it.
-                                       Worker::add(PRIORITY_LOW, 'UpdateGServer', 'https://' . $server['host'], true);
+               $protocols = ['activitypub', 'diaspora', 'dfrn', 'ostatus'];
+               foreach ($protocols as $protocol) {
+                       $query = '{nodes(protocol:"' . $protocol . '"){host}}';
+                       $curlResult = DI::httpRequest()->fetch('https://the-federation.info/graphql?query=' . urlencode($query));
+                       if (!empty($curlResult)) {
+                               $data = json_decode($curlResult, true);
+                               if (!empty($data['data']['nodes'])) {
+                                       foreach ($data['data']['nodes'] as $server) {
+                                               // Using "only_nodeinfo" since servers that are listed on that page should always have it.
+                                               Worker::add(PRIORITY_LOW, 'UpdateGServer', 'https://' . $server['host'], true);
+                                       }
                                }
                        }
                }
@@ -1638,7 +1652,8 @@ class GServer
                if (!empty($accesstoken)) {
                        $api = 'https://instances.social/api/1.0/instances/list?count=0';
                        $header = ['Authorization: Bearer '.$accesstoken];
-                       $curlResult = Network::curl($api, false, ['headers' => $header]);
+                       $curlResult = DI::httpRequest()->get($api, false, ['headers' => $header]);
+
                        if ($curlResult->isSuccess()) {
                                $servers = json_decode($curlResult->getBody(), true);