3 * @file src/Content/ContactSelector.php
5 namespace Friendica\Content;
7 use Friendica\Core\Hook;
8 use Friendica\Core\L10n;
9 use Friendica\Core\Protocol;
10 use Friendica\Database\DBA;
11 use Friendica\Util\Network;
12 use Friendica\Util\Strings;
15 * @brief ContactSelector class
20 * @param string $current current
21 * @param string $foreign_net network
25 public static function profileAssign($current, $foreign_net)
29 $disabled = (($foreign_net) ? ' disabled="true" ' : '');
31 $o .= "<select id=\"contact-profile-selector\" class=\"form-control\" $disabled name=\"profile-assign\" >\r\n";
33 $s = DBA::select('profile', ['id', 'profile-name', 'is-default'], ['uid' => $_SESSION['uid']]);
34 $r = DBA::toArray($s);
36 if (DBA::isResult($r)) {
38 $selected = (($rr['id'] == $current || ($current == 0 && $rr['is-default'] == 1)) ? " selected=\"selected\" " : "");
39 $o .= "<option value=\"{$rr['id']}\" $selected >{$rr['profile-name']}</option>\r\n";
42 $o .= "</select>\r\n";
47 * @param string $current current
48 * @param boolean $disabled optional, default false
51 public static function pollInterval($current, $disabled = false)
53 $dis = (($disabled) ? ' disabled="disabled" ' : '');
55 $o .= "<select id=\"contact-poll-interval\" name=\"poll\" $dis />" . "\r\n";
58 0 => L10n::t('Frequently'),
59 1 => L10n::t('Hourly'),
60 2 => L10n::t('Twice daily'),
61 3 => L10n::t('Daily'),
62 4 => L10n::t('Weekly'),
63 5 => L10n::t('Monthly')
66 foreach ($rep as $k => $v) {
67 $selected = (($k == $current) ? " selected=\"selected\" " : "");
68 $o .= "<option value=\"$k\" $selected >$v</option>\r\n";
70 $o .= "</select>\r\n";
75 * @param string $profile Profile URL
76 * @return string Server URL
77 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
79 private static function getServerURLForProfile($profile)
83 // Fetch the server url from the contact table
84 $contact = DBA::selectFirst('contact', ['baseurl'], ['uid' => 0, 'nurl' => Strings::normaliseLink($profile)]);
85 if (DBA::isResult($contact) && !empty($contact['baseurl'])) {
86 $server_url = Strings::normaliseLink($contact['baseurl']);
89 if (empty($server_url)) {
90 // Fetch the server url from the gcontact table
91 $gcontact = DBA::selectFirst('gcontact', ['server_url'], ['nurl' => Strings::normaliseLink($profile)]);
92 if (!empty($gcontact) && !empty($gcontact['server_url'])) {
93 $server_url = Strings::normaliseLink($gcontact['server_url']);
97 if (empty($server_url)) {
98 // Create the server url out of the profile url
99 $parts = parse_url($profile);
100 unset($parts['path']);
101 $server_url = Strings::normaliseLink(Network::unparseURL($parts));
108 * @param string $network network
109 * @param string $profile optional, default empty
111 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
113 public static function networkToName($network, $profile = "")
116 Protocol::DFRN => L10n::t('DFRN'),
117 Protocol::OSTATUS => L10n::t('OStatus'),
118 Protocol::FEED => L10n::t('RSS/Atom'),
119 Protocol::MAIL => L10n::t('Email'),
120 Protocol::DIASPORA => L10n::t('Diaspora'),
121 Protocol::ZOT => L10n::t('Zot!'),
122 Protocol::LINKEDIN => L10n::t('LinkedIn'),
123 Protocol::XMPP => L10n::t('XMPP/IM'),
124 Protocol::MYSPACE => L10n::t('MySpace'),
125 Protocol::GPLUS => L10n::t('Google+'),
126 Protocol::PUMPIO => L10n::t('pump.io'),
127 Protocol::TWITTER => L10n::t('Twitter'),
128 Protocol::DIASPORA2 => L10n::t('Diaspora Connector'),
129 Protocol::STATUSNET => L10n::t('GNU Social Connector'),
130 Protocol::ACTIVITYPUB => L10n::t('ActivityPub'),
131 Protocol::PNUT => L10n::t('pnut'),
134 Hook::callAll('network_to_name', $nets);
136 $search = array_keys($nets);
137 $replace = array_values($nets);
139 $networkname = str_replace($search, $replace, $network);
141 if ((in_array($network, Protocol::FEDERATED)) && ($profile != "")) {
142 $server_url = self::getServerURLForProfile($profile);
144 // Now query the GServer for the platform name
145 $gserver = DBA::selectFirst('gserver', ['platform', 'network'], ['nurl' => $server_url]);
147 if (DBA::isResult($gserver)) {
148 if (!empty($gserver['platform'])) {
149 $platform = $gserver['platform'];
150 } elseif (!empty($gserver['network']) && ($gserver['network'] != Protocol::ACTIVITYPUB)) {
151 $platform = self::networkToName($gserver['network']);
154 if (!empty($platform)) {
155 $networkname = $platform;
157 if ($network == Protocol::ACTIVITYPUB) {
158 $networkname .= ' (AP)';
168 * @param string $network network
169 * @param string $profile optional, default empty
171 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
173 public static function networkToIcon($network, $profile = "")
176 Protocol::DFRN => 'friendica',
177 Protocol::OSTATUS => 'gnu-social', // There is no generic OStatus icon
178 Protocol::FEED => 'rss',
179 Protocol::MAIL => 'file-text-o', /// @todo
180 Protocol::DIASPORA => 'diaspora',
181 Protocol::ZOT => 'hubzilla',
182 Protocol::LINKEDIN => 'linkedin',
183 Protocol::XMPP => 'xmpp',
184 Protocol::MYSPACE => 'file-text-o', /// @todo
185 Protocol::GPLUS => 'google-plus',
186 Protocol::PUMPIO => 'file-text-o', /// @todo
187 Protocol::TWITTER => 'twitter',
188 Protocol::DIASPORA2 => 'diaspora',
189 Protocol::STATUSNET => 'gnu-social',
190 Protocol::ACTIVITYPUB => 'activitypub',
191 Protocol::PNUT => 'file-text-o', /// @todo
194 $search = array_keys($nets);
195 $replace = array_values($nets);
197 $networkicon = str_replace($search, $replace, $network);
199 if ((in_array($network, Protocol::FEDERATED)) && ($profile != "")) {
200 $server_url = self::getServerURLForProfile($profile);
202 // Now query the GServer for the platform name
203 $gserver = DBA::selectFirst('gserver', ['platform'], ['nurl' => $server_url]);
205 if (DBA::isResult($gserver) && !empty($gserver['platform'])) {
206 $icons = ['diaspora' => 'diaspora', 'friendica' => 'friendica', 'friendika' => 'friendica',
207 'GNU Social' => 'gnu-social', 'gnusocial' => 'gnu-social', 'hubzilla' => 'hubzilla',
208 'mastodon' => 'mastodon', 'peertube' => 'peertube', 'pixelfed' => 'pixelfed',
209 'pleroma' => 'pleroma', 'red' => 'hubzilla', 'redmatrix' => 'hubzilla',
210 'socialhome' => 'social-home', 'wordpress' => 'wordpress'];
211 $networkicon = $icons[strtolower($gserver['platform'])] ?? $networkicon;
219 * @param string $current optional, default empty
220 * @param string $suffix optionsl, default empty
222 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
224 public static function gender($current = "", $suffix = "")
228 '' => L10n::t('No answer'),
229 'Male' => L10n::t('Male'),
230 'Female' => L10n::t('Female'),
231 'Currently Male' => L10n::t('Currently Male'),
232 'Currently Female' => L10n::t('Currently Female'),
233 'Mostly Male' => L10n::t('Mostly Male'),
234 'Mostly Female' => L10n::t('Mostly Female'),
235 'Transgender' => L10n::t('Transgender'),
236 'Intersex' => L10n::t('Intersex'),
237 'Transsexual' => L10n::t('Transsexual'),
238 'Hermaphrodite' => L10n::t('Hermaphrodite'),
239 'Neuter' => L10n::t('Neuter'),
240 'Non-specific' => L10n::t('Non-specific'),
241 'Other' => L10n::t('Other'),
242 'Undecided' => L10n::t('Undecided'),
245 Hook::callAll('gender_selector', $select);
247 $o .= "<select name=\"gender$suffix\" id=\"gender-select$suffix\" size=\"1\" >";
248 foreach ($select as $neutral => $selection) {
249 if ($selection !== 'NOTRANSLATION') {
250 $selected = (($neutral == $current) ? ' selected="selected" ' : '');
251 $o .= "<option value=\"$neutral\" $selected >$selection</option>";
259 * @param string $current optional, default empty
260 * @param string $suffix optionsl, default empty
262 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
264 public static function sexualPreference($current = "", $suffix = "")
268 '' => L10n::t('No answer'),
269 'Males' => L10n::t('Males'),
270 'Females' => L10n::t('Females'),
271 'Gay' => L10n::t('Gay'),
272 'Lesbian' => L10n::t('Lesbian'),
273 'No Preference' => L10n::t('No Preference'),
274 'Bisexual' => L10n::t('Bisexual'),
275 'Autosexual' => L10n::t('Autosexual'),
276 'Abstinent' => L10n::t('Abstinent'),
277 'Virgin' => L10n::t('Virgin'),
278 'Deviant' => L10n::t('Deviant'),
279 'Fetish' => L10n::t('Fetish'),
280 'Oodles' => L10n::t('Oodles'),
281 'Nonsexual' => L10n::t('Nonsexual'),
284 Hook::callAll('sexpref_selector', $select);
286 $o .= "<select name=\"sexual$suffix\" id=\"sexual-select$suffix\" size=\"1\" >";
287 foreach ($select as $neutral => $selection) {
288 if ($selection !== 'NOTRANSLATION') {
289 $selected = (($neutral == $current) ? ' selected="selected" ' : '');
290 $o .= "<option value=\"$neutral\" $selected >$selection</option>";
298 * @param string $current optional, default empty
300 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
302 public static function maritalStatus($current = "")
306 '' => L10n::t('No answer'),
307 'Single' => L10n::t('Single'),
308 'Lonely' => L10n::t('Lonely'),
309 'In a relation' => L10n::t('In a relation'),
310 'Has crush' => L10n::t('Has crush'),
311 'Infatuated' => L10n::t('Infatuated'),
312 'Dating' => L10n::t('Dating'),
313 'Unfaithful' => L10n::t('Unfaithful'),
314 'Sex Addict' => L10n::t('Sex Addict'),
315 'Friends' => L10n::t('Friends'),
316 'Friends/Benefits' => L10n::t('Friends/Benefits'),
317 'Casual' => L10n::t('Casual'),
318 'Engaged' => L10n::t('Engaged'),
319 'Married' => L10n::t('Married'),
320 'Imaginarily married' => L10n::t('Imaginarily married'),
321 'Partners' => L10n::t('Partners'),
322 'Cohabiting' => L10n::t('Cohabiting'),
323 'Common law' => L10n::t('Common law'),
324 'Happy' => L10n::t('Happy'),
325 'Not looking' => L10n::t('Not looking'),
326 'Swinger' => L10n::t('Swinger'),
327 'Betrayed' => L10n::t('Betrayed'),
328 'Separated' => L10n::t('Separated'),
329 'Unstable' => L10n::t('Unstable'),
330 'Divorced' => L10n::t('Divorced'),
331 'Imaginarily divorced' => L10n::t('Imaginarily divorced'),
332 'Widowed' => L10n::t('Widowed'),
333 'Uncertain' => L10n::t('Uncertain'),
334 'It\'s complicated' => L10n::t('It\'s complicated'),
335 'Don\'t care' => L10n::t('Don\'t care'),
336 'Ask me' => L10n::t('Ask me'),
339 Hook::callAll('marital_selector', $select);
341 $o .= '<select name="marital" id="marital-select" size="1" >';
342 foreach ($select as $neutral => $selection) {
343 if ($selection !== 'NOTRANSLATION') {
344 $selected = (($neutral == $current) ? ' selected="selected" ' : '');
345 $o .= "<option value=\"$neutral\" $selected >$selection</option>";