Why got this even approved?
[friendica.git/.git] / 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('DFRN'),
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 = [
149                         'EMPTY'            => '',
150                         'Male'             => L10n::t('Male'),
151                         'Female'           => L10n::t('Female'),
152                         'Currently Male'   => L10n::t('Currently Male'),
153                         'Currently Female' => L10n::t('Currently Female'),
154                         'Mostly Male'      => L10n::t('Mostly Male'),
155                         'Mostly Female'    => L10n::t('Mostly Female'),
156                         'Transgender'      => L10n::t('Transgender'),
157                         'Intersex'         => L10n::t('Intersex'),
158                         'Transsexual'      => L10n::t('Transsexual'),
159                         'Hermaphrodite'    => L10n::t('Hermaphrodite'),
160                         'Neuter'           => L10n::t('Neuter'),
161                         'Non-specific'     => L10n::t('Non-specific'),
162                         'Other'            => L10n::t('Other'),
163                         'Undecided'        => L10n::t('Undecided'),
164                 ];
165
166                 Addon::callHooks('gender_selector', $select);
167
168                 $o .= "<select name=\"gender$suffix\" id=\"gender-select$suffix\" size=\"1\" >";
169                 foreach ($select as $neutral => $selection) {
170                         if ($selection !== 'NOTRANSLATION') {
171                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
172                                 $o .= "<option value=\"$neutral\" $selected >$selection</option>";
173                         }
174                 }
175                 $o .= '</select>';
176                 return $o;
177         }
178
179         /**
180          * @param string $current optional, default empty
181          * @param string $suffix  optionsl, default empty
182          */
183         public static function sexualPreference($current = "", $suffix = "")
184         {
185                 $o = '';
186                 $select = [
187                         'EMPTY'         => '',
188                         'Males'         => L10n::t('Males'),
189                         'Females'       => L10n::t('Females'),
190                         'Gay'           => L10n::t('Gay'),
191                         'Lesbian'       => L10n::t('Lesbian'),
192                         'No Preference' => L10n::t('No Preference'),
193                         'Bisexual'      => L10n::t('Bisexual'),
194                         'Autosexual'    => L10n::t('Autosexual'),
195                         'Abstinent'     => L10n::t('Abstinent'),
196                         'Virgin'        => L10n::t('Virgin'),
197                         'Deviant'       => L10n::t('Deviant'),
198                         'Fetish'        => L10n::t('Fetish'),
199                         'Oodles'        => L10n::t('Oodles'),
200                         'Nonsexual'     => L10n::t('Nonsexual'),
201                 ];
202
203                 Addon::callHooks('sexpref_selector', $select);
204
205                 $o .= "<select name=\"sexual$suffix\" id=\"sexual-select$suffix\" size=\"1\" >";
206                 foreach ($select as $neutral => $selection) {
207                         if ($selection !== 'NOTRANSLATION') {
208                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
209                                 $o .= "<option value=\"$neutral\" $selected >$selection</option>";
210                         }
211                 }
212                 $o .= '</select>';
213                 return $o;
214         }
215
216         /**
217          * @param string $current optional, default empty
218          */
219         public static function maritalStatus($current = "")
220         {
221                 $o = '';
222                 $select = [
223                         'EMPTY' => '',
224                         'Single' => L10n::t('Single'),
225                         'Lonely' => L10n::t('Lonely'),
226                         'Available' => L10n::t('Available'),
227                         'Unavailable' => L10n::t('Unavailable'),
228                         'Has crush' => L10n::t('Has crush'),
229                         'Infatuated' => L10n::t('Infatuated'),
230                         'Dating' => L10n::t('Dating'),
231                         'Unfaithful' => L10n::t('Unfaithful'),
232                         'Sex Addict' => L10n::t('Sex Addict'),
233                         'Friends' => L10n::t('Friends'),
234                         'Friends/Benefits' => L10n::t('Friends/Benefits'),
235                         'Casual' => L10n::t('Casual'),
236                         'Engaged' => L10n::t('Engaged'),
237                         'Married' => L10n::t('Married'),
238                         'Imaginarily married' => L10n::t('Imaginarily married'),
239                         'Partners' => L10n::t('Partners'),
240                         'Cohabiting' => L10n::t('Cohabiting'),
241                         'Common law' => L10n::t('Common law'),
242                         'Happy' => L10n::t('Happy'),
243                         'Not looking' => L10n::t('Not looking'),
244                         'Swinger' => L10n::t('Swinger'),
245                         'Betrayed' => L10n::t('Betrayed'),
246                         'Separated' => L10n::t('Separated'),
247                         'Unstable' => L10n::t('Unstable'),
248                         'Divorced' => L10n::t('Divorced'),
249                         'Imaginarily divorced' => L10n::t('Imaginarily divorced'),
250                         'Widowed' => L10n::t('Widowed'),
251                         'Uncertain' => L10n::t('Uncertain'),
252                         'It\'s complicated' => L10n::t('It\'s complicated'),
253                         'Don\'t care' => L10n::t('Don\'t care'),
254                         'Ask me' => L10n::t('Ask me'),
255                 ];
256
257                 Addon::callHooks('marital_selector', $select);
258
259                 $o .= '<select name="marital" id="marital-select" size="1" >';
260                 foreach ($select as $neutral => $selection) {
261                         if ($selection !== 'NOTRANSLATION') {
262                                 $selected = (($selection == $current) ? ' selected="selected" ' : '');
263                                 $o .= "<option value=\"$neutral\" $selected >$selection</option>";
264                         }
265                 }
266                 $o .= '</select>';
267                 return $o;
268         }
269 }