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