src/Content/ContactSelector.php

   1 <?php
   2 /**
   3  * @file src/Content/ContactSelector.php
   4  */
   5 namespace Friendica\Content;
   6
   7 use Friendica\Core\Addon;
   8 use Friendica\Core\L10n;
   9 use Friendica\Core\Protocol;
  10 use Friendica\Core\System;
  11 use Friendica\Database\DBA;
  12 use Friendica\Util\Network;
  13 use Friendica\Util\Strings;
  14
  15 /**
  16  * @brief ContactSelector class
  17  */
  18 class ContactSelector
  19 {
  20         /**
  21          * @param string $current     current
  22          * @param string $foreign_net network
  23          */
  24         public static function profileAssign($current, $foreign_net)
  25         {
  26                 $o = '';
  27
  28                 $disabled = (($foreign_net) ? ' disabled="true" ' : '');
  29
  30                 $o .= "<select id=\"contact-profile-selector\" class=\"form-control\" $disabled name=\"profile-assign\" >\r\n";
  31
  32                 $s = DBA::select('profile', ['id', 'profile-name', 'is-default'], ['uid' => $_SESSION['uid']]);
  33                 $r = DBA::toArray($s);
  34
  35                 if (DBA::isResult($r)) {
  36                         foreach ($r as $rr) {
  37                                 $selected = (($rr['id'] == $current || ($current == 0 && $rr['is-default'] == 1)) ? " selected=\"selected\" " : "");
  38                                 $o .= "<option value=\"{$rr['id']}\" $selected >{$rr['profile-name']}</option>\r\n";
  39                         }
  40                 }
  41                 $o .= "</select>\r\n";
  42                 return $o;
  43         }
  44
  45         /**
  46          * @param string  $current  current
  47          * @param boolean $disabled optional, default false
  48          * @return object
  49          */
  50         public static function pollInterval($current, $disabled = false)
  51         {
  52                 $dis = (($disabled) ? ' disabled="disabled" ' : '');
  53                 $o = '';
  54                 $o .= "<select id=\"contact-poll-interval\" name=\"poll\" $dis />" . "\r\n";
  55
  56                 $rep = [
  57                         0 => L10n::t('Frequently'),
  58                         1 => L10n::t('Hourly'),
  59                         2 => L10n::t('Twice daily'),
  60                         3 => L10n::t('Daily'),
  61                         4 => L10n::t('Weekly'),
  62                         5 => L10n::t('Monthly')
  63                 ];
  64
  65                 foreach ($rep as $k => $v) {
  66                         $selected = (($k == $current) ? " selected=\"selected\" " : "");
  67                         $o .= "<option value=\"$k\" $selected >$v</option>\r\n";
  68                 }
  69                 $o .= "</select>\r\n";
  70                 return $o;
  71         }
  72
  73         /**
  74          * @param string $network network
  75          * @param string $profile optional, default empty
  76          * @return string
  77          */
  78         public static function networkToName($network, $profile = "")
  79         {
  80                 $nets = [
  81                         Protocol::DFRN      =>   L10n::t('Friendica'),
  82                         Protocol::OSTATUS   =>   L10n::t('OStatus'),
  83                         Protocol::FEED      =>   L10n::t('RSS/Atom'),
  84                         Protocol::MAIL      =>   L10n::t('Email'),
  85                         Protocol::DIASPORA  =>   L10n::t('Diaspora'),
  86                         Protocol::ZOT       =>   L10n::t('Zot!'),
  87                         Protocol::LINKEDIN  =>   L10n::t('LinkedIn'),
  88                         Protocol::XMPP      =>   L10n::t('XMPP/IM'),
  89                         Protocol::MYSPACE   =>   L10n::t('MySpace'),
  90                         Protocol::GPLUS     =>   L10n::t('Google+'),
  91                         Protocol::PUMPIO    =>   L10n::t('pump.io'),
  92                         Protocol::TWITTER   =>   L10n::t('Twitter'),
  93                         Protocol::DIASPORA2 =>   L10n::t('Diaspora Connector'),
  94                         Protocol::STATUSNET =>   L10n::t('GNU Social Connector'),
  95                         Protocol::ACTIVITYPUB => L10n::t('ActivityPub'),
  96                         Protocol::PNUT      =>   L10n::t('pnut'),
  97                 ];
  98
  99                 Addon::callHooks('network_to_name', $nets);
 100
 101                 $search  = array_keys($nets);
 102                 $replace = array_values($nets);
 103
 104                 $networkname = str_replace($search, $replace, $network);
 105
 106                 if ((in_array($network, [Protocol::ACTIVITYPUB, Protocol::DFRN, Protocol::DIASPORA, Protocol::OSTATUS])) && ($profile != "")) {
 107                         // Create the server url out of the profile url
 108                         $parts = parse_url($profile);
 109                         unset($parts['path']);
 110                         $server_url = [Strings::normaliseLink(Network::unparseURL($parts))];
 111
 112                         // Fetch the server url
 113                         $gcontact = DBA::selectFirst('gcontact', ['server_url'], ['nurl' => Strings::normaliseLink($profile)]);
 114                         if (!empty($gcontact) && !empty($gcontact['server_url'])) {
 115                                 $server_url[] = Strings::normaliseLink($gcontact['server_url']);
 116                         }
 117
 118                         // Now query the GServer for the platform name
 119                         $gserver = DBA::selectFirst('gserver', ['platform', 'network'], ['nurl' => $server_url]);
 120
 121                         if (DBA::isResult($gserver)) {
 122                                 if (!empty($gserver['platform'])) {
 123                                         $platform = $gserver['platform'];
 124                                 } elseif (!empty($gserver['network']) && ($gserver['network'] != Protocol::ACTIVITYPUB)) {
 125                                         $platform = self::networkToName($gserver['network']);
 126                                 }
 127
 128                                 if (!empty($platform)) {
 129                                         $networkname = $platform;
 130
 131                                         if ($network == Protocol::ACTIVITYPUB) {
 132                                                 $networkname .= ' (AP)';
 133                                         }
 134                                 }
 135                         }
 136                 }
 137
 138                 return $networkname;
 139         }
 140
 141         /**
 142          * @param string $current optional, default empty
 143          * @param string $suffix  optionsl, default empty
 144          */
 145         public static function gender($current = "", $suffix = "")
 146         {
 147                 $o = '';
 148                 $select = ['', L10n::t('Male'), L10n::t('Female'), L10n::t('Currently Male'), L10n::t('Currently Female'), L10n::t('Mostly Male'), L10n::t('Mostly Female'), L10n::t('Transgender'), L10n::t('Intersex'), L10n::t('Transsexual'), L10n::t('Hermaphrodite'), L10n::t('Neuter'), L10n::t('Non-specific'), L10n::t('Other'), L10n::t('Undecided')];
 149
 150                 Addon::callHooks('gender_selector', $select);
 151
 152                 $o .= "<select name=\"gender$suffix\" id=\"gender-select$suffix\" size=\"1\" >";
 153                 foreach ($select as $selection) {
 154                         if ($selection !== 'NOTRANSLATION') {
 155                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
 156                                 $o .= "<option value=\"$selection\" $selected >$selection</option>";
 157                         }
 158                 }
 159                 $o .= '</select>';
 160                 return $o;
 161         }
 162
 163         /**
 164          * @param string $current optional, default empty
 165          * @param string $suffix  optionsl, default empty
 166          */
 167         public static function sexualPreference($current = "", $suffix = "")
 168         {
 169                 $o = '';
 170                 $select = ['', L10n::t('Males'), L10n::t('Females'), L10n::t('Gay'), L10n::t('Lesbian'), L10n::t('No Preference'), L10n::t('Bisexual'), L10n::t('Autosexual'), L10n::t('Abstinent'), L10n::t('Virgin'), L10n::t('Deviant'), L10n::t('Fetish'), L10n::t('Oodles'), L10n::t('Nonsexual')];
 171
 172
 173                 Addon::callHooks('sexpref_selector', $select);
 174
 175                 $o .= "<select name=\"sexual$suffix\" id=\"sexual-select$suffix\" size=\"1\" >";
 176                 foreach ($select as $selection) {
 177                         if ($selection !== 'NOTRANSLATION') {
 178                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
 179                                 $o .= "<option value=\"$selection\" $selected >$selection</option>";
 180                         }
 181                 }
 182                 $o .= '</select>';
 183                 return $o;
 184         }
 185
 186         /**
 187          * @param string $current optional, default empty
 188          */
 189         public static function maritalStatus($current = "")
 190         {
 191                 $o = '';
 192                 $select = ['', L10n::t('Single'), L10n::t('Lonely'), L10n::t('Available'), L10n::t('Unavailable'), L10n::t('Has crush'), L10n::t('Infatuated'), L10n::t('Dating'), L10n::t('Unfaithful'), L10n::t('Sex Addict'), L10n::t('Friends'), L10n::t('Friends/Benefits'), L10n::t('Casual'), L10n::t('Engaged'), L10n::t('Married'), L10n::t('Imaginarily married'), L10n::t('Partners'), L10n::t('Cohabiting'), L10n::t('Common law'), L10n::t('Happy'), L10n::t('Not looking'), L10n::t('Swinger'), L10n::t('Betrayed'), L10n::t('Separated'), L10n::t('Unstable'), L10n::t('Divorced'), L10n::t('Imaginarily divorced'), L10n::t('Widowed'), L10n::t('Uncertain'), L10n::t('It\'s complicated'), L10n::t('Don\'t care'), L10n::t('Ask me')];
 193
 194                 Addon::callHooks('marital_selector', $select);
 195
 196                 $o .= '<select name="marital" id="marital-select" size="1" >';
 197                 foreach ($select as $selection) {
 198                         if ($selection !== 'NOTRANSLATION') {
 199                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
 200                                 $o .= "<option value=\"$selection\" $selected >$selection</option>";
 201                         }
 202                 }
 203                 $o .= '</select>';
 204                 return $o;
 205         }
 206 }