src/Module/Debug/Feed.php

   1 <?php
   2 /**
   3  * @copyright Copyright (C) 2010-2022, the Friendica project
   4  *
   5  * @license GNU AGPL version 3 or any later version
   6  *
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as
   9  * published by the Free Software Foundation, either version 3 of the
  10  * License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <https://www.gnu.org/licenses/>.
  19  *
  20  */
  21
  22 namespace Friendica\Module\Debug;
  23
  24 use Friendica\App;
  25 use Friendica\BaseModule;
  26 use Friendica\Core\L10n;
  27 use Friendica\Core\Renderer;
  28 use Friendica\Core\Session;
  29 use Friendica\DI;
  30 use Friendica\Model;
  31 use Friendica\Module\Response;
  32 use Friendica\Network\HTTPClient\Capability\ICanSendHttpRequests;
  33 use Friendica\Network\HTTPClient\Client\HttpClientAccept;
  34 use Friendica\Protocol;
  35 use Friendica\Util\Profiler;
  36 use Psr\Log\LoggerInterface;
  37
  38 /**
  39  * Tests a given feed of a contact
  40  */
  41 class Feed extends BaseModule
  42 {
  43         /** @var ICanSendHttpRequests */
  44         protected $httpClient;
  45
  46         public function __construct(L10n $l10n, App\BaseURL $baseUrl, App\Arguments $args, LoggerInterface $logger, Profiler $profiler, Response $response, ICanSendHttpRequests $httpClient, array $server, array $parameters = [])
  47         {
  48                 parent::__construct($l10n, $baseUrl, $args, $logger, $profiler, $response, $server, $parameters);
  49
  50                 $this->httpClient = $httpClient;
  51
  52                 if (!Session::getLocalUser()) {
  53                         DI::sysmsg()->addNotice($this->t('You must be logged in to use this module'));
  54                         $baseUrl->redirect();
  55                 }
  56         }
  57
  58         protected function content(array $request = []): string
  59         {
  60                 $result = [];
  61                 if (!empty($_REQUEST['url'])) {
  62                         $url = $_REQUEST['url'];
  63
  64                         $contact = Model\Contact::getByURLForUser($url, Session::getLocalUser(), null);
  65
  66                         $xml = $this->httpClient->fetch($contact['poll'], HttpClientAccept::FEED_XML);
  67
  68                         $import_result = Protocol\Feed::import($xml);
  69
  70                         $result = [
  71                                 'input' => $xml,
  72                                 'output' => var_export($import_result, true),
  73                         ];
  74                 }
  75
  76                 $tpl = Renderer::getMarkupTemplate('feedtest.tpl');
  77                 return Renderer::replaceMacros($tpl, [
  78                         '$url'    => ['url', $this->t('Source URL'), $_REQUEST['url'] ?? '', ''],
  79                         '$result' => $result
  80                 ]);
  81         }
  82 }