src/Content/ContactSelector.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\Content;
  23
  24 use Friendica\Core\Hook;
  25 use Friendica\Core\Protocol;
  26 use Friendica\Database\DBA;
  27 use Friendica\DI;
  28 use Friendica\Util\Network;
  29 use Friendica\Util\Strings;
  30
  31 /**
  32  * ContactSelector class
  33  */
  34 class ContactSelector
  35 {
  36         static $serverdata = [];
  37         static $server_url = [];
  38
  39         /**
  40          * @param string  $current  current
  41          * @param boolean $disabled optional, default false
  42          * @return string
  43          */
  44         public static function pollInterval($current, $disabled = false)
  45         {
  46                 $dis = (($disabled) ? ' disabled="disabled" ' : '');
  47                 $o = '';
  48                 $o .= "<select id=\"contact-poll-interval\" name=\"poll\" $dis />" . "\r\n";
  49
  50                 $rep = [
  51                         0 => DI::l10n()->t('Frequently'),
  52                         1 => DI::l10n()->t('Hourly'),
  53                         2 => DI::l10n()->t('Twice daily'),
  54                         3 => DI::l10n()->t('Daily'),
  55                         4 => DI::l10n()->t('Weekly'),
  56                         5 => DI::l10n()->t('Monthly')
  57                 ];
  58
  59                 foreach ($rep as $k => $v) {
  60                         $selected = (($k == $current) ? " selected=\"selected\" " : "");
  61                         $o .= "<option value=\"$k\" $selected >$v</option>\r\n";
  62                 }
  63                 $o .= "</select>\r\n";
  64                 return $o;
  65         }
  66
  67         private static function getServerForProfile(string $profile)
  68         {
  69                 $server_url = self::getServerURLForProfile($profile);
  70
  71                 if (!empty(self::$serverdata[$server_url])) {
  72                         return self::$serverdata[$server_url];
  73                 }
  74
  75                 // Now query the GServer for the platform name
  76                 $gserver = DBA::selectFirst('gserver', ['platform', 'network'], ['nurl' => $server_url]);
  77
  78                 self::$serverdata[$server_url] = $gserver;
  79                 return $gserver;
  80         }
  81
  82         /**
  83          * @param string $profile Profile URL
  84          * @return string Server URL
  85          * @throws \Exception
  86          */
  87         private static function getServerURLForProfile($profile)
  88         {
  89                 if (!empty(self::$server_url[$profile])) {
  90                         return self::$server_url[$profile];
  91                 }
  92
  93                 $server_url = '';
  94
  95                 // Fetch the server url from the contact table
  96                 $contact = DBA::selectFirst('contact', ['baseurl'], ['uid' => 0, 'nurl' => Strings::normaliseLink($profile)]);
  97                 if (DBA::isResult($contact) && !empty($contact['baseurl'])) {
  98                         $server_url = Strings::normaliseLink($contact['baseurl']);
  99                 }
 100
 101                 if (empty($server_url)) {
 102                         // Create the server url out of the profile url
 103                         $parts = parse_url($profile);
 104                         unset($parts['path']);
 105                         $server_url = Strings::normaliseLink(Network::unparseURL($parts));
 106                 }
 107
 108                 self::$server_url[$profile] = $server_url;
 109
 110                 return $server_url;
 111         }
 112
 113         /**
 114          * @param string $network  network of the contact
 115          * @param string $profile  optional, default empty
 116          * @param string $protocol (Optional) Protocol that is used for the transmission
 117          * @return string
 118          * @throws \Friendica\Network\HTTPException\InternalServerErrorException
 119          */
 120         public static function networkToName($network, $profile = '', $protocol = '', $gsid = 0)
 121         {
 122                 $nets = [
 123                         Protocol::DFRN      =>   DI::l10n()->t('DFRN'),
 124                         Protocol::OSTATUS   =>   DI::l10n()->t('OStatus'),
 125                         Protocol::FEED      =>   DI::l10n()->t('RSS/Atom'),
 126                         Protocol::MAIL      =>   DI::l10n()->t('Email'),
 127                         Protocol::DIASPORA  =>   DI::l10n()->t('Diaspora'),
 128                         Protocol::ZOT       =>   DI::l10n()->t('Zot!'),
 129                         Protocol::LINKEDIN  =>   DI::l10n()->t('LinkedIn'),
 130                         Protocol::XMPP      =>   DI::l10n()->t('XMPP/IM'),
 131                         Protocol::MYSPACE   =>   DI::l10n()->t('MySpace'),
 132                         Protocol::GPLUS     =>   DI::l10n()->t('Google+'),
 133                         Protocol::PUMPIO    =>   DI::l10n()->t('pump.io'),
 134                         Protocol::TWITTER   =>   DI::l10n()->t('Twitter'),
 135                         Protocol::DISCOURSE =>   DI::l10n()->t('Discourse'),
 136                         Protocol::DIASPORA2 =>   DI::l10n()->t('Diaspora Connector'),
 137                         Protocol::STATUSNET =>   DI::l10n()->t('GNU Social Connector'),
 138                         Protocol::ACTIVITYPUB => DI::l10n()->t('ActivityPub'),
 139                         Protocol::PNUT      =>   DI::l10n()->t('pnut'),
 140                 ];
 141
 142                 Hook::callAll('network_to_name', $nets);
 143
 144                 $search  = array_keys($nets);
 145                 $replace = array_values($nets);
 146
 147                 $networkname = str_replace($search, $replace, $network);
 148
 149                 if ((in_array($network, Protocol::FEDERATED)) && ($profile != "")) {
 150                         if (!empty($gsid) && !empty(self::$serverdata[$gsid])) {
 151                                 $gserver = self::$serverdata[$gsid];
 152                         } elseif (!empty($gsid)) {
 153                                 $gserver = DBA::selectFirst('gserver', ['platform', 'network'], ['id' => $gsid]);
 154                                 self::$serverdata[$gsid] = $gserver;
 155                         } else {
 156                                 $gserver = self::getServerForProfile($profile);
 157                         }
 158
 159                         if (!empty($gserver['platform'])) {
 160                                 $platform = $gserver['platform'];
 161                         } elseif (!empty($gserver['network']) && ($gserver['network'] != Protocol::ACTIVITYPUB)) {
 162                                 $platform = self::networkToName($gserver['network']);
 163                         }
 164
 165                         if (!empty($platform)) {
 166                                 $networkname = $platform;
 167
 168                                 if ($network == Protocol::ACTIVITYPUB) {
 169                                         $networkname .= ' (AP)';
 170                                 }
 171                         }
 172                 }
 173
 174                 if (!empty($protocol) && ($protocol != $network)) {
 175                         $networkname = DI::l10n()->t('%s (via %s)', $networkname, self::networkToName($protocol));
 176                 }
 177
 178                 return $networkname;
 179         }
 180
 181         /**
 182          * @param string $network network
 183          * @param string $profile optional, default empty
 184          * @return string
 185          * @throws \Exception
 186          */
 187         public static function networkToIcon($network, $profile = "", $gsid = 0)
 188         {
 189                 $nets = [
 190                         Protocol::DFRN      =>   'friendica',
 191                         Protocol::OSTATUS   =>   'gnu-social', // There is no generic OStatus icon
 192                         Protocol::FEED      =>   'rss',
 193                         Protocol::MAIL      =>   'inbox',
 194                         Protocol::DIASPORA  =>   'diaspora',
 195                         Protocol::ZOT       =>   'hubzilla',
 196                         Protocol::LINKEDIN  =>   'linkedin',
 197                         Protocol::XMPP      =>   'xmpp',
 198                         Protocol::MYSPACE   =>   'file-text-o', /// @todo
 199                         Protocol::GPLUS     =>   'google-plus',
 200                         Protocol::PUMPIO    =>   'file-text-o', /// @todo
 201                         Protocol::TWITTER   =>   'twitter',
 202                         Protocol::DISCOURSE =>   'dot-circle-o', /// @todo
 203                         Protocol::DIASPORA2 =>   'diaspora',
 204                         Protocol::STATUSNET =>   'gnu-social',
 205                         Protocol::ACTIVITYPUB => 'activitypub',
 206                         Protocol::PNUT      =>   'file-text-o', /// @todo
 207                 ];
 208
 209                 $platform_icons = ['diaspora' => 'diaspora', 'friendica' => 'friendica', 'friendika' => 'friendica',
 210                         'GNU Social' => 'gnu-social', 'gnusocial' => 'gnu-social', 'hubzilla' => 'hubzilla',
 211                         'mastodon' => 'mastodon', 'peertube' => 'peertube', 'pixelfed' => 'pixelfed',
 212                         'pleroma' => 'pleroma', 'red' => 'hubzilla', 'redmatrix' => 'hubzilla',
 213                         'socialhome' => 'social-home', 'wordpress' => 'wordpress'];
 214
 215                 $search  = array_keys($nets);
 216                 $replace = array_values($nets);
 217
 218                 $network_icon = str_replace($search, $replace, $network);
 219
 220                 if ((in_array($network, Protocol::FEDERATED)) && ($profile != "")) {
 221                         if (!empty($gsid) && !empty(self::$serverdata[$gsid])) {
 222                                 $gserver = self::$serverdata[$gsid];
 223                         } elseif (!empty($gsid)) {
 224                                 $gserver = DBA::selectFirst('gserver', ['platform', 'network'], ['id' => $gsid]);
 225                                 self::$serverdata[$gsid] = $gserver;
 226                         } else {
 227                                 $gserver = self::getServerForProfile($profile);
 228                         }
 229                         if (!empty($gserver['platform'])) {
 230                                 $network_icon = $platform_icons[strtolower($gserver['platform'])] ?? $network_icon;
 231                         }
 232                 }
 233
 234                 return $network_icon;
 235         }
 236 }