2018-10-13 11:35:51 +02:00
< ? php
2020-02-09 15:45:36 +01:00
/**
* @ copyright Copyright ( C ) 2020 , Friendica
*
* @ license GNU AGPL version 3 or any later version
*
* This program is free software : you can redistribute it and / or modify
* it under the terms of the GNU Affero General Public License as
* published by the Free Software Foundation , either version 3 of the
* License , or ( at your option ) any later version .
*
* This program is distributed in the hope that it will be useful ,
* but WITHOUT ANY WARRANTY ; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
* GNU Affero General Public License for more details .
*
* You should have received a copy of the GNU Affero General Public License
* along with this program . If not , see < https :// www . gnu . org / licenses />.
*
*/
2018-10-13 11:35:51 +02:00
namespace Friendica\Module ;
use Friendica\App ;
use Friendica\BaseModule ;
use Friendica\Content\ContactSelector ;
use Friendica\Content\Nav ;
2018-10-24 08:15:24 +02:00
use Friendica\Content\Pager ;
2018-10-13 11:35:51 +02:00
use Friendica\Content\Text\BBCode ;
use Friendica\Content\Widget ;
2018-10-21 07:53:47 +02:00
use Friendica\Core\ACL ;
2018-12-26 07:06:24 +01:00
use Friendica\Core\Hook ;
2018-10-13 11:35:51 +02:00
use Friendica\Core\Protocol ;
2018-10-31 15:35:50 +01:00
use Friendica\Core\Renderer ;
2018-10-13 11:35:51 +02:00
use Friendica\Core\Worker ;
use Friendica\Database\DBA ;
2019-12-15 22:34:11 +01:00
use Friendica\DI ;
2018-10-13 13:29:56 +02:00
use Friendica\Model ;
2020-07-27 12:11:12 +02:00
use Friendica\Model\Contact as ModelContact ;
2019-12-27 22:19:28 +01:00
use Friendica\Module\Security\Login ;
2019-05-18 17:33:35 +02:00
use Friendica\Network\HTTPException\BadRequestException ;
use Friendica\Network\HTTPException\NotFoundException ;
2018-10-13 11:35:51 +02:00
use Friendica\Util\DateTimeFormat ;
use Friendica\Util\Proxy as ProxyUtils ;
2018-11-08 16:14:37 +01:00
use Friendica\Util\Strings ;
2018-10-13 11:35:51 +02:00
/**
* Manages and show Contacts and their content
*/
2018-10-15 00:30:02 +02:00
class Contact extends BaseModule
2018-10-13 11:35:51 +02:00
{
2019-12-16 00:28:31 +01:00
private static function batchActions ()
2018-10-13 11:35:51 +02:00
{
if ( empty ( $_POST [ 'contact_batch' ]) || ! is_array ( $_POST [ 'contact_batch' ])) {
return ;
}
$contacts_id = $_POST [ 'contact_batch' ];
2019-01-09 14:23:11 +01:00
$stmt = DBA :: select ( 'contact' , [ 'id' , 'archive' ], [ 'id' => $contacts_id , 'uid' => local_user (), 'self' => false , 'deleted' => false ]);
2018-10-13 13:29:56 +02:00
$orig_records = DBA :: toArray ( $stmt );
2018-10-15 00:30:02 +02:00
2018-10-13 11:35:51 +02:00
$count_actions = 0 ;
foreach ( $orig_records as $orig_record ) {
$contact_id = $orig_record [ 'id' ];
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_POST [ 'contacts_batch_update' ])) {
2018-10-13 11:35:51 +02:00
self :: updateContactFromPoll ( $contact_id );
$count_actions ++ ;
}
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_POST [ 'contacts_batch_block' ])) {
2018-10-13 11:35:51 +02:00
self :: blockContact ( $contact_id );
$count_actions ++ ;
}
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_POST [ 'contacts_batch_ignore' ])) {
2018-10-13 11:35:51 +02:00
self :: ignoreContact ( $contact_id );
$count_actions ++ ;
}
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_POST [ 'contacts_batch_archive' ])
&& self :: archiveContact ( $contact_id , $orig_record )
) {
$count_actions ++ ;
2018-10-13 11:35:51 +02:00
}
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_POST [ 'contacts_batch_drop' ])) {
2018-10-13 11:35:51 +02:00
self :: dropContact ( $orig_record );
$count_actions ++ ;
}
}
if ( $count_actions > 0 ) {
2020-01-18 20:53:01 +01:00
info ( DI :: l10n () -> tt ( '%d contact edited.' , '%d contacts edited.' , $count_actions ));
2018-10-13 11:35:51 +02:00
}
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact' );
2018-10-13 11:35:51 +02:00
}
2019-11-05 22:48:54 +01:00
public static function post ( array $parameters = [])
2018-10-13 11:35:51 +02:00
{
2019-12-15 22:34:11 +01:00
$a = DI :: app ();
2018-10-13 11:35:51 +02:00
if ( ! local_user ()) {
return ;
}
2019-05-07 21:15:22 +02:00
// @TODO: Replace with parameter from router
2018-10-15 00:30:02 +02:00
if ( $a -> argv [ 1 ] === 'batch' ) {
2019-12-16 00:28:31 +01:00
self :: batchActions ();
2018-10-13 11:35:51 +02:00
return ;
}
2019-05-07 21:15:22 +02:00
// @TODO: Replace with parameter from router
2018-10-13 11:35:51 +02:00
$contact_id = intval ( $a -> argv [ 1 ]);
if ( ! $contact_id ) {
return ;
}
2019-01-09 14:23:11 +01:00
if ( ! DBA :: exists ( 'contact' , [ 'id' => $contact_id , 'uid' => local_user (), 'deleted' => false ])) {
2020-07-23 08:25:01 +02:00
notice ( DI :: l10n () -> t ( 'Could not access contact record.' ));
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact' );
2018-10-13 11:35:51 +02:00
return ; // NOTREACHED
}
2018-12-26 07:06:24 +01:00
Hook :: callAll ( 'contact_edit_post' , $_POST );
2018-10-13 11:35:51 +02:00
2018-10-15 00:17:22 +02:00
$hidden = ! empty ( $_POST [ 'hidden' ]);
2018-10-13 11:35:51 +02:00
2018-10-15 00:17:22 +02:00
$notify = ! empty ( $_POST [ 'notify' ]);
2018-10-13 11:35:51 +02:00
2019-10-15 15:20:32 +02:00
$fetch_further_information = intval ( $_POST [ 'fetch_further_information' ] ? ? 0 );
2018-10-13 11:35:51 +02:00
2020-06-06 22:43:23 +02:00
$ffi_keyword_denylist = Strings :: escapeHtml ( trim ( $_POST [ 'ffi_keyword_denylist' ] ? ? '' ));
2018-10-13 11:35:51 +02:00
2019-10-15 15:20:32 +02:00
$priority = intval ( $_POST [ 'poll' ] ? ? 0 );
2018-10-13 11:35:51 +02:00
if ( $priority > 5 || $priority < 0 ) {
$priority = 0 ;
}
2019-10-15 15:20:32 +02:00
$info = Strings :: escapeHtml ( trim ( $_POST [ 'info' ] ? ? '' ));
2018-10-13 11:35:51 +02:00
2018-10-15 00:30:02 +02:00
$r = DBA :: update ( 'contact' , [
'priority' => $priority ,
'info' => $info ,
'hidden' => $hidden ,
'notify_new_posts' => $notify ,
'fetch_further_information' => $fetch_further_information ,
2020-06-06 22:43:23 +02:00
'ffi_keyword_denylist' => $ffi_keyword_denylist ],
2018-10-15 00:30:02 +02:00
[ 'id' => $contact_id , 'uid' => local_user ()]
);
2018-10-13 13:29:56 +02:00
2020-07-23 08:11:21 +02:00
if ( ! DBA :: isResult ( $r )) {
2020-07-23 08:25:01 +02:00
notice ( DI :: l10n () -> t ( 'Failed to update contact record.' ));
2018-10-13 11:35:51 +02:00
}
2019-01-09 14:23:11 +01:00
$contact = DBA :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => local_user (), 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
if ( DBA :: isResult ( $contact )) {
$a -> data [ 'contact' ] = $contact ;
}
return ;
}
/* contact actions */
private static function updateContactFromPoll ( $contact_id )
{
2019-01-09 14:23:11 +01:00
$contact = DBA :: selectFirst ( 'contact' , [ 'uid' , 'url' , 'network' ], [ 'id' => $contact_id , 'uid' => local_user (), 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
if ( ! DBA :: isResult ( $contact )) {
return ;
}
2018-10-15 00:30:02 +02:00
if ( $contact [ 'network' ] == Protocol :: OSTATUS ) {
2020-06-10 16:36:42 +02:00
$user = Model\User :: getById ( $contact [ 'uid' ]);
$result = Model\Contact :: createFromProbe ( $user , $contact [ 'url' ], false , $contact [ 'network' ]);
2018-10-13 11:35:51 +02:00
if ( $result [ 'success' ]) {
2018-10-13 13:29:56 +02:00
DBA :: update ( 'contact' , [ 'subhub' => 1 ], [ 'id' => $contact_id ]);
2018-10-13 11:35:51 +02:00
}
} else {
// pull feed and consume it, which should subscribe to the hub.
2018-10-15 00:30:02 +02:00
Worker :: add ( PRIORITY_HIGH , 'OnePoll' , $contact_id , 'force' );
2018-10-13 11:35:51 +02:00
}
}
private static function updateContactFromProbe ( $contact_id )
{
2019-08-26 17:51:56 +02:00
$contact = DBA :: selectFirst ( 'contact' , [ 'url' ], [ 'id' => $contact_id , 'uid' => local_user (), 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
if ( ! DBA :: isResult ( $contact )) {
return ;
}
// Update the entry in the contact table
2019-08-26 17:51:56 +02:00
Model\Contact :: updateFromProbe ( $contact_id , '' , true );
2018-10-13 11:35:51 +02:00
// Update the entry in the gcontact table
2019-08-26 17:51:56 +02:00
Model\GContact :: updateFromProbe ( $contact [ 'url' ]);
2018-10-13 11:35:51 +02:00
}
2019-10-15 15:20:32 +02:00
/**
* Toggles the blocked status of a contact identified by id .
*
* @ param $contact_id
* @ throws \Exception
*/
2018-10-13 11:35:51 +02:00
private static function blockContact ( $contact_id )
{
2018-10-13 13:29:56 +02:00
$blocked = ! Model\Contact :: isBlockedByUser ( $contact_id , local_user ());
Model\Contact :: setBlockedForUser ( $contact_id , local_user (), $blocked );
2018-10-13 11:35:51 +02:00
}
2019-10-15 15:20:32 +02:00
/**
* Toggles the ignored status of a contact identified by id .
*
* @ param $contact_id
* @ throws \Exception
*/
2018-10-13 11:35:51 +02:00
private static function ignoreContact ( $contact_id )
{
2018-10-13 13:29:56 +02:00
$ignored = ! Model\Contact :: isIgnoredByUser ( $contact_id , local_user ());
Model\Contact :: setIgnoredForUser ( $contact_id , local_user (), $ignored );
2018-10-13 11:35:51 +02:00
}
2019-10-15 15:20:32 +02:00
/**
* Toggles the archived status of a contact identified by id .
* If the current status isn ' t provided , this will always archive the contact .
*
* @ param $contact_id
* @ param $orig_record
* @ return bool
* @ throws \Exception
*/
2018-10-13 11:35:51 +02:00
private static function archiveContact ( $contact_id , $orig_record )
{
2019-10-15 15:20:32 +02:00
$archived = empty ( $orig_record [ 'archive' ]);
2018-10-13 13:29:56 +02:00
$r = DBA :: update ( 'contact' , [ 'archive' => $archived ], [ 'id' => $contact_id , 'uid' => local_user ()]);
2018-10-13 11:35:51 +02:00
return DBA :: isResult ( $r );
}
private static function dropContact ( $orig_record )
{
2018-10-15 00:30:02 +02:00
$owner = Model\User :: getOwnerDataById ( local_user ());
if ( ! DBA :: isResult ( $owner )) {
2018-10-13 11:35:51 +02:00
return ;
}
2018-10-15 00:30:02 +02:00
Model\Contact :: terminateFriendship ( $owner , $orig_record , true );
2018-10-13 13:29:56 +02:00
Model\Contact :: remove ( $orig_record [ 'id' ]);
2018-10-13 11:35:51 +02:00
}
2019-11-05 22:48:54 +01:00
public static function content ( array $parameters = [], $update = 0 )
2018-10-13 11:35:51 +02:00
{
2019-05-18 17:33:35 +02:00
if ( ! local_user ()) {
2019-05-23 19:01:40 +02:00
return Login :: form ( $_SERVER [ 'REQUEST_URI' ]);
2019-05-18 17:33:35 +02:00
}
2019-12-15 22:34:11 +01:00
$a = DI :: app ();
2019-05-18 17:33:35 +02:00
2020-01-23 20:52:22 +01:00
$search = Strings :: escapeTags ( trim ( $_GET [ 'search' ] ? ? '' ));
$nets = Strings :: escapeTags ( trim ( $_GET [ 'nets' ] ? ? '' ));
$rel = Strings :: escapeTags ( trim ( $_GET [ 'rel' ] ? ? '' ));
$group = Strings :: escapeTags ( trim ( $_GET [ 'group' ] ? ? '' ));
2019-05-18 17:33:35 +02:00
2019-12-30 20:02:09 +01:00
if ( empty ( DI :: page ()[ 'aside' ])) {
DI :: page ()[ 'aside' ] = '' ;
2019-05-18 17:33:35 +02:00
}
$contact_id = null ;
$contact = null ;
// @TODO: Replace with parameter from router
if ( $a -> argc == 2 && intval ( $a -> argv [ 1 ])
|| $a -> argc == 3 && intval ( $a -> argv [ 1 ]) && in_array ( $a -> argv [ 2 ], [ 'posts' , 'conversations' ])
) {
$contact_id = intval ( $a -> argv [ 1 ]);
$contact = DBA :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => local_user (), 'deleted' => false ]);
if ( ! DBA :: isResult ( $contact )) {
$contact = DBA :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => 0 , 'deleted' => false ]);
}
// Don't display contacts that are about to be deleted
if ( $contact [ 'network' ] == Protocol :: PHANTOM ) {
$contact = false ;
}
2020-07-27 12:11:12 +02:00
2020-07-27 12:22:02 +02:00
$contact = ModelContact :: checkAvatarCacheByArray ( $contact );
2019-05-18 17:33:35 +02:00
}
if ( DBA :: isResult ( $contact )) {
if ( $contact [ 'self' ]) {
// @TODO: Replace with parameter from router
if (( $a -> argc == 3 ) && intval ( $a -> argv [ 1 ]) && in_array ( $a -> argv [ 2 ], [ 'posts' , 'conversations' ])) {
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'profile/' . $contact [ 'nick' ]);
2019-05-18 17:33:35 +02:00
} else {
2020-01-28 01:21:18 +01:00
DI :: baseUrl () -> redirect ( 'profile/' . $contact [ 'nick' ] . '/profile' );
2019-05-18 17:33:35 +02:00
}
}
$a -> data [ 'contact' ] = $contact ;
if (( $contact [ 'network' ] != '' ) && ( $contact [ 'network' ] != Protocol :: DFRN )) {
$network_link = Strings :: formatNetworkName ( $contact [ 'network' ], $contact [ 'url' ]);
} else {
$network_link = '' ;
}
2019-06-11 03:40:44 +02:00
$follow_link = '' ;
$unfollow_link = '' ;
if ( in_array ( $contact [ 'network' ], Protocol :: NATIVE_SUPPORT )) {
if ( $contact [ 'uid' ] && in_array ( $contact [ 'rel' ], [ Model\Contact :: SHARING , Model\Contact :: FRIEND ])) {
$unfollow_link = 'unfollow?url=' . urlencode ( $contact [ 'url' ]);
} elseif ( ! $contact [ 'pending' ]) {
$follow_link = 'follow?url=' . urlencode ( $contact [ 'url' ]);
}
}
$wallmessage_link = '' ;
if ( $contact [ 'uid' ] && Model\Contact :: canReceivePrivateMessages ( $contact )) {
$wallmessage_link = 'message/new/' . $contact [ 'id' ];
}
2019-05-18 17:33:35 +02:00
$vcard_widget = Renderer :: replaceMacros ( Renderer :: getMarkupTemplate ( 'widget/vcard.tpl' ), [
'$name' => $contact [ 'name' ],
'$photo' => $contact [ 'photo' ],
'$url' => Model\Contact :: magicLinkByContact ( $contact , $contact [ 'url' ]),
2019-10-15 15:20:32 +02:00
'$addr' => $contact [ 'addr' ] ? ? '' ,
2019-05-18 17:33:35 +02:00
'$network_link' => $network_link ,
2020-01-18 20:52:34 +01:00
'$network' => DI :: l10n () -> t ( 'Network:' ),
2019-06-11 03:40:44 +02:00
'$account_type' => Model\Contact :: getAccountType ( $contact ),
2020-01-18 20:52:34 +01:00
'$follow' => DI :: l10n () -> t ( 'Follow' ),
2019-06-11 03:40:44 +02:00
'$follow_link' => $follow_link ,
2020-01-18 20:52:34 +01:00
'$unfollow' => DI :: l10n () -> t ( 'Unfollow' ),
2019-06-11 03:40:44 +02:00
'$unfollow_link' => $unfollow_link ,
2020-01-18 20:52:34 +01:00
'$wallmessage' => DI :: l10n () -> t ( 'Message' ),
2019-06-11 03:40:44 +02:00
'$wallmessage_link' => $wallmessage_link ,
2019-05-18 17:33:35 +02:00
]);
$findpeople_widget = '' ;
$follow_widget = '' ;
$networks_widget = '' ;
2019-05-18 17:44:04 +02:00
$rel_widget = '' ;
2020-01-23 23:49:55 +01:00
if ( $contact [ 'uid' ] != 0 ) {
$groups_widget = Model\Group :: sidebarWidget ( 'contact' , 'group' , 'full' , 'everyone' , $contact_id );
} else {
$groups_widget = '' ;
}
2019-05-18 17:33:35 +02:00
} else {
$vcard_widget = '' ;
$findpeople_widget = Widget :: findPeople ();
if ( isset ( $_GET [ 'add' ])) {
$follow_widget = Widget :: follow ( $_GET [ 'add' ]);
} else {
$follow_widget = Widget :: follow ();
}
$networks_widget = Widget :: networks ( $_SERVER [ 'REQUEST_URI' ], $nets );
2019-05-18 17:44:04 +02:00
$rel_widget = Widget :: contactRels ( $_SERVER [ 'REQUEST_URI' ], $rel );
2020-01-23 23:49:55 +01:00
$groups_widget = Widget :: groups ( $_SERVER [ 'REQUEST_URI' ], $group );
2019-05-18 17:33:35 +02:00
}
2019-12-30 20:02:09 +01:00
DI :: page ()[ 'aside' ] .= $vcard_widget . $findpeople_widget . $follow_widget . $groups_widget . $networks_widget . $rel_widget ;
2019-05-18 17:33:35 +02:00
$tpl = Renderer :: getMarkupTemplate ( 'contacts-head.tpl' );
2019-12-30 20:02:09 +01:00
DI :: page ()[ 'htmlhead' ] .= Renderer :: replaceMacros ( $tpl , [
2019-12-16 01:05:15 +01:00
'$baseurl' => DI :: baseUrl () -> get ( true ),
2019-05-18 17:33:35 +02:00
]);
2018-10-13 11:35:51 +02:00
$o = '' ;
2018-10-14 20:03:22 +02:00
Nav :: setSelected ( 'contact' );
2018-10-13 11:35:51 +02:00
if ( ! local_user ()) {
2020-07-23 08:25:01 +02:00
notice ( DI :: l10n () -> t ( 'Permission denied.' ));
2018-10-13 11:35:51 +02:00
return Login :: form ();
}
if ( $a -> argc == 3 ) {
$contact_id = intval ( $a -> argv [ 1 ]);
if ( ! $contact_id ) {
2019-05-18 17:33:35 +02:00
throw new BadRequestException ();
2018-10-13 11:35:51 +02:00
}
2019-05-06 18:57:50 +02:00
// @TODO: Replace with parameter from router
2018-10-13 11:35:51 +02:00
$cmd = $a -> argv [ 2 ];
2019-01-09 14:23:11 +01:00
$orig_record = DBA :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => [ 0 , local_user ()], 'self' => false , 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
if ( ! DBA :: isResult ( $orig_record )) {
2020-01-18 20:52:34 +01:00
throw new NotFoundException ( DI :: l10n () -> t ( 'Contact not found' ));
2018-10-13 11:35:51 +02:00
}
if ( $cmd === 'update' && ( $orig_record [ 'uid' ] != 0 )) {
self :: updateContactFromPoll ( $contact_id );
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact/' . $contact_id );
2018-10-13 11:35:51 +02:00
// NOTREACHED
}
if ( $cmd === 'updateprofile' && ( $orig_record [ 'uid' ] != 0 )) {
self :: updateContactFromProbe ( $contact_id );
2020-02-02 20:50:53 +01:00
DI :: baseUrl () -> redirect ( 'contact/' . $contact_id . '/advanced/' );
2018-10-13 11:35:51 +02:00
// NOTREACHED
}
if ( $cmd === 'block' ) {
self :: blockContact ( $contact_id );
2018-10-13 13:29:56 +02:00
$blocked = Model\Contact :: isBlockedByUser ( $contact_id , local_user ());
2020-07-23 08:25:01 +02:00
info (( $blocked ? DI :: l10n () -> t ( 'Contact has been blocked' ) : DI :: l10n () -> t ( 'Contact has been unblocked' )));
2018-10-13 11:35:51 +02:00
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact/' . $contact_id );
2019-05-18 17:33:35 +02:00
// NOTREACHED
2018-10-13 11:35:51 +02:00
}
if ( $cmd === 'ignore' ) {
self :: ignoreContact ( $contact_id );
2018-10-13 13:29:56 +02:00
$ignored = Model\Contact :: isIgnoredByUser ( $contact_id , local_user ());
2020-07-23 08:25:01 +02:00
info (( $ignored ? DI :: l10n () -> t ( 'Contact has been ignored' ) : DI :: l10n () -> t ( 'Contact has been unignored' )));
2018-10-13 11:35:51 +02:00
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact/' . $contact_id );
2019-05-18 17:33:35 +02:00
// NOTREACHED
2018-10-13 11:35:51 +02:00
}
if ( $cmd === 'archive' && ( $orig_record [ 'uid' ] != 0 )) {
$r = self :: archiveContact ( $contact_id , $orig_record );
if ( $r ) {
$archived = (( $orig_record [ 'archive' ]) ? 0 : 1 );
2020-07-23 08:25:01 +02:00
info ((( $archived ) ? DI :: l10n () -> t ( 'Contact has been archived' ) : DI :: l10n () -> t ( 'Contact has been unarchived' )));
2018-10-13 11:35:51 +02:00
}
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact/' . $contact_id );
2019-05-18 17:33:35 +02:00
// NOTREACHED
2018-10-13 11:35:51 +02:00
}
if ( $cmd === 'drop' && ( $orig_record [ 'uid' ] != 0 )) {
// Check if we should do HTML-based delete confirmation
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_REQUEST [ 'confirm' ])) {
// <form> can't take arguments in its 'action' parameter
2018-10-13 11:35:51 +02:00
// so add any arguments as hidden inputs
2019-12-16 01:30:34 +01:00
$query = explode_querystring ( DI :: args () -> getQueryString ());
2018-10-13 11:35:51 +02:00
$inputs = [];
foreach ( $query [ 'args' ] as $arg ) {
if ( strpos ( $arg , 'confirm=' ) === false ) {
$arg_parts = explode ( '=' , $arg );
$inputs [] = [ 'name' => $arg_parts [ 0 ], 'value' => $arg_parts [ 1 ]];
}
}
2019-12-30 20:02:09 +01:00
DI :: page ()[ 'aside' ] = '' ;
2018-10-13 11:35:51 +02:00
2018-10-31 15:44:06 +01:00
return Renderer :: replaceMacros ( Renderer :: getMarkupTemplate ( 'contact_drop_confirm.tpl' ), [
2020-01-18 20:52:34 +01:00
'$header' => DI :: l10n () -> t ( 'Drop contact' ),
2018-10-13 11:35:51 +02:00
'$contact' => self :: getContactTemplateVars ( $orig_record ),
'$method' => 'get' ,
2020-01-18 20:52:34 +01:00
'$message' => DI :: l10n () -> t ( 'Do you really want to delete this contact?' ),
2018-10-13 11:35:51 +02:00
'$extra_inputs' => $inputs ,
2020-01-18 20:52:34 +01:00
'$confirm' => DI :: l10n () -> t ( 'Yes' ),
2018-10-13 11:35:51 +02:00
'$confirm_url' => $query [ 'base' ],
'$confirm_name' => 'confirmed' ,
2020-01-18 20:52:34 +01:00
'$cancel' => DI :: l10n () -> t ( 'Cancel' ),
2018-10-13 11:35:51 +02:00
]);
}
// Now check how the user responded to the confirmation query
2018-10-15 00:17:22 +02:00
if ( ! empty ( $_REQUEST [ 'canceled' ])) {
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact' );
2018-10-13 11:35:51 +02:00
}
self :: dropContact ( $orig_record );
2020-07-23 08:25:01 +02:00
info ( DI :: l10n () -> t ( 'Contact has been removed.' ));
2018-10-13 11:35:51 +02:00
2019-12-16 00:28:31 +01:00
DI :: baseUrl () -> redirect ( 'contact' );
2019-05-18 17:33:35 +02:00
// NOTREACHED
2018-10-13 11:35:51 +02:00
}
if ( $cmd === 'posts' ) {
return self :: getPostsHTML ( $a , $contact_id );
}
if ( $cmd === 'conversations' ) {
return self :: getConversationsHMTL ( $a , $contact_id , $update );
}
}
2019-12-16 01:30:34 +01:00
$_SESSION [ 'return_path' ] = DI :: args () -> getQueryString ();
2018-10-13 11:35:51 +02:00
2018-10-15 00:17:22 +02:00
if ( ! empty ( $a -> data [ 'contact' ]) && is_array ( $a -> data [ 'contact' ])) {
2018-10-13 11:35:51 +02:00
$contact = $a -> data [ 'contact' ];
2019-12-30 20:02:09 +01:00
DI :: page ()[ 'htmlhead' ] .= Renderer :: replaceMacros ( Renderer :: getMarkupTemplate ( 'contact_head.tpl' ), [
2019-12-16 01:05:15 +01:00
'$baseurl' => DI :: baseUrl () -> get ( true ),
2018-10-13 11:35:51 +02:00
]);
2018-10-15 00:30:02 +02:00
$contact [ 'blocked' ] = Model\Contact :: isBlockedByUser ( $contact [ 'id' ], local_user ());
2018-10-13 13:29:56 +02:00
$contact [ 'readonly' ] = Model\Contact :: isIgnoredByUser ( $contact [ 'id' ], local_user ());
2018-10-13 11:35:51 +02:00
$dir_icon = '' ;
$relation_text = '' ;
switch ( $contact [ 'rel' ]) {
2018-10-13 13:29:56 +02:00
case Model\Contact :: FRIEND :
2018-10-13 11:35:51 +02:00
$dir_icon = 'images/lrarrow.gif' ;
2020-01-18 20:52:34 +01:00
$relation_text = DI :: l10n () -> t ( 'You are mutual friends with %s' );
2018-10-13 11:35:51 +02:00
break ;
2018-10-13 13:29:56 +02:00
case Model\Contact :: FOLLOWER ;
2018-10-13 11:35:51 +02:00
$dir_icon = 'images/larrow.gif' ;
2020-01-18 20:52:34 +01:00
$relation_text = DI :: l10n () -> t ( 'You are sharing with %s' );
2018-10-13 11:35:51 +02:00
break ;
2018-10-13 13:29:56 +02:00
case Model\Contact :: SHARING ;
2018-10-13 11:35:51 +02:00
$dir_icon = 'images/rarrow.gif' ;
2020-01-18 20:52:34 +01:00
$relation_text = DI :: l10n () -> t ( '%s is sharing with you' );
2018-10-13 11:35:51 +02:00
break ;
default :
break ;
}
if ( $contact [ 'uid' ] == 0 ) {
$relation_text = '' ;
}
2020-03-07 14:05:16 +01:00
if ( ! in_array ( $contact [ 'network' ], array_merge ( Protocol :: FEDERATED , [ Protocol :: TWITTER ]))) {
2018-10-15 00:30:02 +02:00
$relation_text = '' ;
2018-10-13 11:35:51 +02:00
}
2018-12-25 13:12:59 +01:00
$relation_text = sprintf ( $relation_text , $contact [ 'name' ]);
2018-10-13 11:35:51 +02:00
2018-10-13 13:29:56 +02:00
$url = Model\Contact :: magicLink ( $contact [ 'url' ]);
2018-10-13 11:35:51 +02:00
if ( strpos ( $url , 'redir/' ) === 0 ) {
$sparkle = ' class="sparkle" ' ;
} else {
$sparkle = '' ;
}
2020-01-18 20:52:34 +01:00
$insecure = DI :: l10n () -> t ( 'Private communications are not available for this contact.' );
2018-10-13 11:35:51 +02:00
2020-01-18 20:52:34 +01:00
$last_update = (( $contact [ 'last-update' ] <= DBA :: NULL_DATETIME ) ? DI :: l10n () -> t ( 'Never' ) : DateTimeFormat :: local ( $contact [ 'last-update' ], 'D, j M Y, g:i A' ));
2018-10-13 11:35:51 +02:00
2018-10-21 07:53:47 +02:00
if ( $contact [ 'last-update' ] > DBA :: NULL_DATETIME ) {
2020-01-18 20:52:34 +01:00
$last_update .= ' ' . (( $contact [ 'last-update' ] <= $contact [ 'success_update' ]) ? DI :: l10n () -> t ( '(Update was successful)' ) : DI :: l10n () -> t ( '(Update was not successful)' ));
2018-10-13 11:35:51 +02:00
}
2020-01-18 20:52:34 +01:00
$lblsuggest = (( $contact [ 'network' ] === Protocol :: DFRN ) ? DI :: l10n () -> t ( 'Suggest friends' ) : '' );
2018-10-13 11:35:51 +02:00
$poll_enabled = in_array ( $contact [ 'network' ], [ Protocol :: DFRN , Protocol :: OSTATUS , Protocol :: FEED , Protocol :: MAIL ]);
2020-01-18 20:52:34 +01:00
$nettype = DI :: l10n () -> t ( 'Network type: %s' , ContactSelector :: networkToName ( $contact [ 'network' ], $contact [ 'url' ], $contact [ 'protocol' ]));
2018-10-13 11:35:51 +02:00
// tabs
$tab_str = self :: getTabsHTML ( $a , $contact , 3 );
2020-01-18 20:52:34 +01:00
$lost_contact = (( $contact [ 'archive' ] && $contact [ 'term-date' ] > DBA :: NULL_DATETIME && $contact [ 'term-date' ] < DateTimeFormat :: utcNow ()) ? DI :: l10n () -> t ( 'Communications lost with this contact!' ) : '' );
2018-10-13 11:35:51 +02:00
$fetch_further_information = null ;
if ( $contact [ 'network' ] == Protocol :: FEED ) {
$fetch_further_information = [
'fetch_further_information' ,
2020-01-18 20:52:34 +01:00
DI :: l10n () -> t ( 'Fetch further information for feeds' ),
2018-10-13 11:35:51 +02:00
$contact [ 'fetch_further_information' ],
2020-01-18 20:52:34 +01:00
DI :: l10n () -> t ( 'Fetch information like preview pictures, title and teaser from the feed item. You can activate this if the feed doesn\'t contain much text. Keywords are taken from the meta header in the feed item and are posted as hash tags.' ),
2018-10-15 00:30:02 +02:00
[
2020-01-18 20:52:34 +01:00
'0' => DI :: l10n () -> t ( 'Disabled' ),
'1' => DI :: l10n () -> t ( 'Fetch information' ),
'3' => DI :: l10n () -> t ( 'Fetch keywords' ),
'2' => DI :: l10n () -> t ( 'Fetch information and keywords' )
2018-10-13 11:35:51 +02:00
]
];
}
$poll_interval = null ;
if ( in_array ( $contact [ 'network' ], [ Protocol :: FEED , Protocol :: MAIL ])) {
2018-10-15 00:30:02 +02:00
$poll_interval = ContactSelector :: pollInterval ( $contact [ 'priority' ], ! $poll_enabled );
2018-10-13 11:35:51 +02:00
}
// Load contactact related actions like hide, suggest, delete and others
$contact_actions = self :: getContactActions ( $contact );
if ( $contact [ 'uid' ] != 0 ) {
2020-01-18 20:52:34 +01:00
$lbl_info1 = DI :: l10n () -> t ( 'Contact Information / Notes' );
$contact_settings_label = DI :: l10n () -> t ( 'Contact Settings' );
2018-10-13 11:35:51 +02:00
} else {
$lbl_info1 = null ;
$contact_settings_label = null ;
}
2018-10-31 15:44:06 +01:00
$tpl = Renderer :: getMarkupTemplate ( 'contact_edit.tpl' );
2018-10-31 15:35:50 +01:00
$o .= Renderer :: replaceMacros ( $tpl , [
2020-01-18 20:52:34 +01:00
'$header' => DI :: l10n () -> t ( 'Contact' ),
2018-10-15 00:30:02 +02:00
'$tab_str' => $tab_str ,
2020-01-18 20:52:34 +01:00
'$submit' => DI :: l10n () -> t ( 'Submit' ),
2018-10-15 00:30:02 +02:00
'$lbl_info1' => $lbl_info1 ,
2020-01-18 20:52:34 +01:00
'$lbl_info2' => DI :: l10n () -> t ( 'Their personal note' ),
2018-11-09 19:29:42 +01:00
'$reason' => trim ( Strings :: escapeTags ( $contact [ 'reason' ])),
2020-01-18 20:52:34 +01:00
'$infedit' => DI :: l10n () -> t ( 'Edit contact notes' ),
2018-10-15 00:30:02 +02:00
'$common_link' => 'common/loc/' . local_user () . '/' . $contact [ 'id' ],
'$relation_text' => $relation_text ,
2020-01-18 20:52:34 +01:00
'$visit' => DI :: l10n () -> t ( 'Visit %s\'s profile [%s]' , $contact [ 'name' ], $contact [ 'url' ]),
'$blockunblock' => DI :: l10n () -> t ( 'Block/Unblock contact' ),
'$ignorecont' => DI :: l10n () -> t ( 'Ignore contact' ),
'$lblrecent' => DI :: l10n () -> t ( 'View conversations' ),
2018-10-15 00:30:02 +02:00
'$lblsuggest' => $lblsuggest ,
'$nettype' => $nettype ,
'$poll_interval' => $poll_interval ,
'$poll_enabled' => $poll_enabled ,
2020-01-18 20:52:34 +01:00
'$lastupdtext' => DI :: l10n () -> t ( 'Last update:' ),
2018-10-15 00:30:02 +02:00
'$lost_contact' => $lost_contact ,
2020-01-18 20:52:34 +01:00
'$updpub' => DI :: l10n () -> t ( 'Update public posts' ),
2018-10-15 00:30:02 +02:00
'$last_update' => $last_update ,
2020-01-18 20:52:34 +01:00
'$udnow' => DI :: l10n () -> t ( 'Update now' ),
2018-10-15 00:30:02 +02:00
'$contact_id' => $contact [ 'id' ],
2020-01-18 20:52:34 +01:00
'$block_text' => ( $contact [ 'blocked' ] ? DI :: l10n () -> t ( 'Unblock' ) : DI :: l10n () -> t ( 'Block' )),
'$ignore_text' => ( $contact [ 'readonly' ] ? DI :: l10n () -> t ( 'Unignore' ) : DI :: l10n () -> t ( 'Ignore' )),
2018-10-15 00:30:02 +02:00
'$insecure' => ( in_array ( $contact [ 'network' ], [ Protocol :: ACTIVITYPUB , Protocol :: DFRN , Protocol :: MAIL , Protocol :: DIASPORA ]) ? '' : $insecure ),
'$info' => $contact [ 'info' ],
'$cinfo' => [ 'info' , '' , $contact [ 'info' ], '' ],
2020-01-18 20:52:34 +01:00
'$blocked' => ( $contact [ 'blocked' ] ? DI :: l10n () -> t ( 'Currently blocked' ) : '' ),
'$ignored' => ( $contact [ 'readonly' ] ? DI :: l10n () -> t ( 'Currently ignored' ) : '' ),
'$archived' => ( $contact [ 'archive' ] ? DI :: l10n () -> t ( 'Currently archived' ) : '' ),
'$pending' => ( $contact [ 'pending' ] ? DI :: l10n () -> t ( 'Awaiting connection acknowledge' ) : '' ),
'$hidden' => [ 'hidden' , DI :: l10n () -> t ( 'Hide this contact from others' ), ( $contact [ 'hidden' ] == 1 ), DI :: l10n () -> t ( 'Replies/likes to your public posts <strong>may</strong> still be visible' )],
'$notify' => [ 'notify' , DI :: l10n () -> t ( 'Notification for new posts' ), ( $contact [ 'notify_new_posts' ] == 1 ), DI :: l10n () -> t ( 'Send a notification of every new post of this contact' )],
2018-10-13 11:35:51 +02:00
'$fetch_further_information' => $fetch_further_information ,
2020-06-06 22:43:23 +02:00
'$ffi_keyword_denylist' => [ 'ffi_keyword_denylist' , DI :: l10n () -> t ( 'Keyword Deny List' ), $contact [ 'ffi_keyword_denylist' ], DI :: l10n () -> t ( 'Comma separated list of keywords that should not be converted to hashtags, when "Fetch information and keywords" is selected' )],
2018-10-15 00:30:02 +02:00
'$photo' => $contact [ 'photo' ],
2018-11-25 19:56:26 +01:00
'$name' => $contact [ 'name' ],
2018-10-15 00:30:02 +02:00
'$dir_icon' => $dir_icon ,
'$sparkle' => $sparkle ,
'$url' => $url ,
2020-01-18 20:52:34 +01:00
'$profileurllabel' => DI :: l10n () -> t ( 'Profile URL' ),
2018-10-15 00:30:02 +02:00
'$profileurl' => $contact [ 'url' ],
'$account_type' => Model\Contact :: getAccountType ( $contact ),
2019-01-06 22:04:10 +01:00
'$location' => BBCode :: convert ( $contact [ 'location' ]),
2020-01-18 20:52:34 +01:00
'$location_label' => DI :: l10n () -> t ( 'Location:' ),
2018-10-15 00:30:02 +02:00
'$xmpp' => BBCode :: convert ( $contact [ 'xmpp' ]),
2020-01-18 20:52:34 +01:00
'$xmpp_label' => DI :: l10n () -> t ( 'XMPP:' ),
2018-10-15 00:30:02 +02:00
'$about' => BBCode :: convert ( $contact [ 'about' ], false ),
2020-01-18 20:52:34 +01:00
'$about_label' => DI :: l10n () -> t ( 'About:' ),
2018-10-15 00:30:02 +02:00
'$keywords' => $contact [ 'keywords' ],
2020-01-18 20:52:34 +01:00
'$keywords_label' => DI :: l10n () -> t ( 'Tags:' ),
'$contact_action_button' => DI :: l10n () -> t ( 'Actions' ),
2018-10-15 00:30:02 +02:00
'$contact_actions' => $contact_actions ,
2020-01-18 20:52:34 +01:00
'$contact_status' => DI :: l10n () -> t ( 'Status' ),
2018-10-13 11:35:51 +02:00
'$contact_settings_label' => $contact_settings_label ,
2020-01-18 20:52:34 +01:00
'$contact_profile_label' => DI :: l10n () -> t ( 'Profile' ),
2018-10-13 11:35:51 +02:00
]);
$arr = [ 'contact' => $contact , 'output' => $o ];
2018-12-26 07:06:24 +01:00
Hook :: callAll ( 'contact_edit' , $arr );
2018-10-13 11:35:51 +02:00
return $arr [ 'output' ];
}
2020-01-23 20:52:22 +01:00
$sql_values = [ local_user ()];
2019-12-12 12:58:57 +01:00
2019-05-06 18:57:50 +02:00
// @TODO: Replace with parameter from router
2019-10-15 15:20:32 +02:00
$type = $a -> argv [ 1 ] ? ? '' ;
2019-05-18 17:33:35 +02:00
switch ( $type ) {
case 'blocked' :
2020-01-23 20:52:22 +01:00
$sql_extra = " AND EXISTS(SELECT `id` from `user-contact` WHERE `contact`.`id` = `user-contact`.`cid` and `user-contact`.`uid` = ? and `user-contact`.`blocked`) " ;
// This makes the query look for contact.uid = 0
array_unshift ( $sql_values , 0 );
2019-05-18 17:33:35 +02:00
break ;
case 'hidden' :
2019-12-12 12:58:57 +01:00
$sql_extra = " AND `hidden` AND NOT `blocked` AND NOT `pending` " ;
2019-05-18 17:33:35 +02:00
break ;
case 'ignored' :
2020-01-23 20:52:22 +01:00
$sql_extra = " AND EXISTS(SELECT `id` from `user-contact` WHERE `contact`.`id` = `user-contact`.`cid` and `user-contact`.`uid` = ? and `user-contact`.`ignored`) " ;
// This makes the query look for contact.uid = 0
array_unshift ( $sql_values , 0 );
2019-05-18 17:33:35 +02:00
break ;
case 'archived' :
2019-12-12 12:58:57 +01:00
$sql_extra = " AND `archive` AND NOT `blocked` AND NOT `pending` " ;
2019-05-18 17:33:35 +02:00
break ;
2019-09-08 21:18:56 +02:00
case 'pending' :
2020-01-23 20:52:22 +01:00
$sql_extra = " AND `pending` AND NOT `archive` AND ((`rel` = ?)
OR EXISTS ( SELECT `id` FROM `intro` WHERE `contact-id` = `contact` . `id` AND NOT `ignore` )) " ;
$sql_values [] = Model\Contact :: SHARING ;
2019-09-08 21:18:56 +02:00
break ;
2019-05-18 17:33:35 +02:00
default :
2019-09-08 21:18:56 +02:00
$sql_extra = " AND NOT `archive` AND NOT `blocked` AND NOT `pending` " ;
2020-01-23 20:52:22 +01:00
break ;
}
$searching = false ;
$search_hdr = null ;
if ( $search ) {
$searching = true ;
$search_hdr = $search ;
$search_txt = preg_quote ( $search );
$sql_extra .= " AND (name REGEXP ? OR url REGEXP ? OR nick REGEXP ?) " ;
$sql_values [] = $search_txt ;
$sql_values [] = $search_txt ;
$sql_values [] = $search_txt ;
2018-10-13 11:35:51 +02:00
}
2020-01-23 20:52:22 +01:00
if ( $nets ) {
$sql_extra .= " AND network = ? " ;
$sql_values [] = $nets ;
}
2018-10-13 11:35:51 +02:00
2020-01-23 20:52:22 +01:00
switch ( $rel ) {
case 'followers' :
$sql_extra .= " AND `rel` IN (?, ?) " ;
$sql_values [] = Model\Contact :: FOLLOWER ;
$sql_values [] = Model\Contact :: FRIEND ;
break ;
case 'following' :
$sql_extra .= " AND `rel` IN (?, ?) " ;
$sql_values [] = Model\Contact :: SHARING ;
$sql_values [] = Model\Contact :: FRIEND ;
break ;
case 'mutuals' :
$sql_extra .= " AND `rel` = ? " ;
$sql_values [] = Model\Contact :: FRIEND ;
break ;
}
2020-01-23 23:49:55 +01:00
if ( $group ) {
$sql_extra = " AND EXISTS(SELECT `id` FROM `group_member` WHERE `gid` = ? AND `contact`.`id` = `contact-id`) " ;
$sql_values [] = $group ;
}
2020-01-23 20:52:22 +01:00
$total = 0 ;
$stmt = DBA :: p ( " SELECT COUNT(*) AS `total`
FROM `contact`
WHERE `uid` = ?
AND `self` = 0
AND NOT `deleted`
2020-06-25 00:49:55 +02:00
$sql_extra
" . Widget::unavailableNetworks(),
2020-01-23 20:52:22 +01:00
$sql_values
);
if ( DBA :: isResult ( $stmt )) {
$total = DBA :: fetch ( $stmt )[ 'total' ];
}
DBA :: close ( $stmt );
2020-02-16 17:53:52 +01:00
$pager = new Pager ( DI :: l10n (), DI :: args () -> getQueryString ());
2020-01-23 20:52:22 +01:00
$sql_values [] = $pager -> getStart ();
$sql_values [] = $pager -> getItemsPerPage ();
$contacts = [];
$stmt = DBA :: p ( " SELECT *
FROM `contact`
WHERE `uid` = ?
AND `self` = 0
AND NOT `deleted`
$sql_extra
ORDER BY `name` ASC
LIMIT ? , ? " ,
$sql_values
);
while ( $contact = DBA :: fetch ( $stmt )) {
$contact [ 'blocked' ] = Model\Contact :: isBlockedByUser ( $contact [ 'id' ], local_user ());
$contact [ 'readonly' ] = Model\Contact :: isIgnoredByUser ( $contact [ 'id' ], local_user ());
$contacts [] = self :: getContactTemplateVars ( $contact );
}
DBA :: close ( $stmt );
2018-10-13 11:35:51 +02:00
$tabs = [
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'All Contacts' ),
2019-05-18 17:33:35 +02:00
'url' => 'contact' ,
'sel' => ! $type ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Show all contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'showall-tab' ,
'accesskey' => 'l' ,
],
2019-09-08 21:18:56 +02:00
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Pending' ),
2019-09-08 21:18:56 +02:00
'url' => 'contact/pending' ,
'sel' => $type == 'pending' ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Only show pending contacts' ),
2019-09-08 21:18:56 +02:00
'id' => 'showpending-tab' ,
'accesskey' => 'p' ,
],
2018-10-13 11:35:51 +02:00
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Blocked' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/blocked' ,
2019-05-18 17:33:35 +02:00
'sel' => $type == 'blocked' ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Only show blocked contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'showblocked-tab' ,
'accesskey' => 'b' ,
],
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Ignored' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/ignored' ,
2019-05-18 17:33:35 +02:00
'sel' => $type == 'ignored' ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Only show ignored contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'showignored-tab' ,
'accesskey' => 'i' ,
],
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Archived' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/archived' ,
2019-05-18 17:33:35 +02:00
'sel' => $type == 'archived' ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Only show archived contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'showarchived-tab' ,
'accesskey' => 'y' ,
],
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Hidden' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/hidden' ,
2019-05-18 17:33:35 +02:00
'sel' => $type == 'hidden' ? 'active' : '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Only show hidden contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'showhidden-tab' ,
'accesskey' => 'h' ,
],
2018-11-17 18:33:12 +01:00
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Groups' ),
2018-11-17 18:33:12 +01:00
'url' => 'group' ,
2019-05-18 17:33:35 +02:00
'sel' => '' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Organize your contact groups' ),
2018-11-17 18:33:12 +01:00
'id' => 'contactgroups-tab' ,
'accesskey' => 'e' ,
],
2018-10-13 11:35:51 +02:00
];
2020-01-23 20:52:22 +01:00
$tabs_tpl = Renderer :: getMarkupTemplate ( 'common_tabs.tpl' );
$tabs_html = Renderer :: replaceMacros ( $tabs_tpl , [ '$tabs' => $tabs ]);
2018-10-13 11:35:51 +02:00
2019-05-18 17:44:04 +02:00
switch ( $rel ) {
2020-01-18 20:52:34 +01:00
case 'followers' : $header = DI :: l10n () -> t ( 'Followers' ); break ;
case 'following' : $header = DI :: l10n () -> t ( 'Following' ); break ;
case 'mutuals' : $header = DI :: l10n () -> t ( 'Mutual friends' ); break ;
default : $header = DI :: l10n () -> t ( 'Contacts' );
2019-05-18 17:44:04 +02:00
}
2019-05-18 17:33:35 +02:00
switch ( $type ) {
2020-01-18 20:52:34 +01:00
case 'pending' : $header .= ' - ' . DI :: l10n () -> t ( 'Pending' ); break ;
case 'blocked' : $header .= ' - ' . DI :: l10n () -> t ( 'Blocked' ); break ;
case 'hidden' : $header .= ' - ' . DI :: l10n () -> t ( 'Hidden' ); break ;
case 'ignored' : $header .= ' - ' . DI :: l10n () -> t ( 'Ignored' ); break ;
case 'archived' : $header .= ' - ' . DI :: l10n () -> t ( 'Archived' ); break ;
2019-05-18 17:33:35 +02:00
}
$header .= $nets ? ' - ' . ContactSelector :: networkToName ( $nets ) : '' ;
2018-10-31 15:44:06 +01:00
$tpl = Renderer :: getMarkupTemplate ( 'contacts-template.tpl' );
2018-10-31 15:35:50 +01:00
$o .= Renderer :: replaceMacros ( $tpl , [
2019-05-18 17:33:35 +02:00
'$header' => $header ,
2020-01-23 20:52:22 +01:00
'$tabs' => $tabs_html ,
2018-10-15 00:30:02 +02:00
'$total' => $total ,
'$search' => $search_hdr ,
2020-01-18 20:52:34 +01:00
'$desc' => DI :: l10n () -> t ( 'Search your contacts' ),
'$finding' => $searching ? DI :: l10n () -> t ( 'Results for: %s' , $search ) : '' ,
'$submit' => DI :: l10n () -> t ( 'Find' ),
2019-12-16 01:33:13 +01:00
'$cmd' => DI :: args () -> getCommand (),
2018-10-15 00:30:02 +02:00
'$contacts' => $contacts ,
2020-01-18 20:52:34 +01:00
'$contact_drop_confirm' => DI :: l10n () -> t ( 'Do you really want to delete this contact?' ),
2018-10-13 11:35:51 +02:00
'multiselect' => 1 ,
'$batch_actions' => [
2020-01-18 20:52:34 +01:00
'contacts_batch_update' => DI :: l10n () -> t ( 'Update' ),
'contacts_batch_block' => DI :: l10n () -> t ( 'Block' ) . '/' . DI :: l10n () -> t ( 'Unblock' ),
'contacts_batch_ignore' => DI :: l10n () -> t ( 'Ignore' ) . '/' . DI :: l10n () -> t ( 'Unignore' ),
'contacts_batch_archive' => DI :: l10n () -> t ( 'Archive' ) . '/' . DI :: l10n () -> t ( 'Unarchive' ),
'contacts_batch_drop' => DI :: l10n () -> t ( 'Delete' ),
2018-10-13 11:35:51 +02:00
],
2020-01-18 20:52:34 +01:00
'$h_batch_actions' => DI :: l10n () -> t ( 'Batch Actions' ),
2018-10-24 17:42:59 +02:00
'$paginate' => $pager -> renderFull ( $total ),
2018-10-13 11:35:51 +02:00
]);
return $o ;
}
/**
2020-01-19 07:05:23 +01:00
* List of pages for the Contact TabBar
2018-10-13 11:35:51 +02:00
*
* Available Pages are 'Status' , 'Profile' , 'Contacts' and 'Common Friends'
*
2019-01-06 22:06:53 +01:00
* @ param App $a
* @ param array $contact The contact array
* @ param int $active_tab 1 if tab should be marked as active
2018-10-13 11:35:51 +02:00
*
2019-01-06 22:06:53 +01:00
* @ return string HTML string of the contact page tabs buttons .
* @ throws \Friendica\Network\HTTPException\InternalServerErrorException
2018-10-13 11:35:51 +02:00
*/
public static function getTabsHTML ( $a , $contact , $active_tab )
{
// tabs
$tabs = [
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Status' ),
2018-10-13 13:29:56 +02:00
'url' => " contact/ " . $contact [ 'id' ] . " /conversations " ,
2018-10-13 11:35:51 +02:00
'sel' => (( $active_tab == 1 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Conversations started by this contact' ),
2018-10-13 11:35:51 +02:00
'id' => 'status-tab' ,
'accesskey' => 'm' ,
],
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Posts and Comments' ),
2018-10-13 13:29:56 +02:00
'url' => " contact/ " . $contact [ 'id' ] . " /posts " ,
2018-10-13 11:35:51 +02:00
'sel' => (( $active_tab == 2 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Status Messages and Posts' ),
2018-10-13 11:35:51 +02:00
'id' => 'posts-tab' ,
'accesskey' => 'p' ,
],
[
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Profile' ),
2018-10-13 13:29:56 +02:00
'url' => " contact/ " . $contact [ 'id' ],
2018-10-13 11:35:51 +02:00
'sel' => (( $active_tab == 3 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Profile Details' ),
2018-10-13 11:35:51 +02:00
'id' => 'profile-tab' ,
'accesskey' => 'o' ,
]
];
// Show this tab only if there is visible friend list
2018-10-13 13:29:56 +02:00
$x = Model\GContact :: countAllFriends ( local_user (), $contact [ 'id' ]);
2018-10-13 11:35:51 +02:00
if ( $x ) {
2020-01-18 20:52:34 +01:00
$tabs [] = [ 'label' => DI :: l10n () -> t ( 'Contacts' ),
2018-10-13 11:35:51 +02:00
'url' => " allfriends/ " . $contact [ 'id' ],
'sel' => (( $active_tab == 4 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'View all contacts' ),
2018-10-13 11:35:51 +02:00
'id' => 'allfriends-tab' ,
'accesskey' => 't' ];
}
// Show this tab only if there is visible common friend list
2018-10-13 13:29:56 +02:00
$common = Model\GContact :: countCommonFriends ( local_user (), $contact [ 'id' ]);
2018-10-13 11:35:51 +02:00
if ( $common ) {
2020-01-18 20:52:34 +01:00
$tabs [] = [ 'label' => DI :: l10n () -> t ( 'Common Friends' ),
2018-10-13 11:35:51 +02:00
'url' => " common/loc/ " . local_user () . " / " . $contact [ 'id' ],
'sel' => (( $active_tab == 5 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'View all common friends' ),
2018-10-13 11:35:51 +02:00
'id' => 'common-loc-tab' ,
'accesskey' => 'd'
];
}
if ( ! empty ( $contact [ 'uid' ])) {
2020-01-18 20:52:34 +01:00
$tabs [] = [ 'label' => DI :: l10n () -> t ( 'Advanced' ),
2020-02-02 20:50:53 +01:00
'url' => 'contact/' . $contact [ 'id' ] . '/advanced/' ,
2018-10-13 11:35:51 +02:00
'sel' => (( $active_tab == 6 ) ? 'active' : '' ),
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Advanced Contact Settings' ),
2018-10-13 11:35:51 +02:00
'id' => 'advanced-tab' ,
'accesskey' => 'r'
];
}
2018-10-31 15:44:06 +01:00
$tab_tpl = Renderer :: getMarkupTemplate ( 'common_tabs.tpl' );
2018-10-31 15:35:50 +01:00
$tab_str = Renderer :: replaceMacros ( $tab_tpl , [ '$tabs' => $tabs ]);
2018-10-13 11:35:51 +02:00
return $tab_str ;
}
private static function getConversationsHMTL ( $a , $contact_id , $update )
{
$o = '' ;
if ( ! $update ) {
// We need the editor here to be able to reshare an item.
if ( local_user ()) {
$x = [
'is_owner' => true ,
'allow_location' => $a -> user [ 'allow_location' ],
'default_location' => $a -> user [ 'default-location' ],
'nickname' => $a -> user [ 'nickname' ],
'lockstate' => ( is_array ( $a -> user ) && ( strlen ( $a -> user [ 'allow_cid' ]) || strlen ( $a -> user [ 'allow_gid' ]) || strlen ( $a -> user [ 'deny_cid' ]) || strlen ( $a -> user [ 'deny_gid' ])) ? 'lock' : 'unlock' ),
2019-12-30 23:35:01 +01:00
'acl' => ACL :: getFullSelectorHTML ( DI :: page (), $a -> user , true ),
2018-10-13 11:35:51 +02:00
'bang' => '' ,
'visitor' => 'block' ,
'profile_uid' => local_user (),
];
$o = status_editor ( $a , $x , 0 , true );
}
}
2019-01-09 14:23:11 +01:00
$contact = DBA :: selectFirst ( 'contact' , [ 'uid' , 'url' , 'id' ], [ 'id' => $contact_id , 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
if ( ! $update ) {
$o .= self :: getTabsHTML ( $a , $contact , 1 );
}
if ( DBA :: isResult ( $contact )) {
2019-12-30 23:35:01 +01:00
DI :: page ()[ 'aside' ] = '' ;
2018-10-13 11:35:51 +02:00
2020-07-15 19:06:48 +02:00
$profiledata = Model\Contact :: getByURL ( $contact [ 'url' ], false );
2018-10-13 11:35:51 +02:00
2020-01-28 04:01:12 +01:00
Model\Profile :: load ( $a , '' , $profiledata , true );
2020-06-10 00:38:06 +02:00
if ( $contact [ 'uid' ] == 0 ) {
$o .= Model\Contact :: getPostsFromId ( $contact [ 'id' ], true , $update );
} else {
$o .= Model\Contact :: getPostsFromUrl ( $contact [ 'url' ], true , $update );
}
2018-10-13 11:35:51 +02:00
}
return $o ;
}
private static function getPostsHTML ( $a , $contact_id )
{
2019-01-09 14:23:11 +01:00
$contact = DBA :: selectFirst ( 'contact' , [ 'uid' , 'url' , 'id' ], [ 'id' => $contact_id , 'deleted' => false ]);
2018-10-13 11:35:51 +02:00
$o = self :: getTabsHTML ( $a , $contact , 2 );
if ( DBA :: isResult ( $contact )) {
2019-12-30 23:35:01 +01:00
DI :: page ()[ 'aside' ] = '' ;
2018-10-13 11:35:51 +02:00
2020-07-15 19:06:48 +02:00
$profiledata = Model\Contact :: getByURL ( $contact [ 'url' ], false );
2018-10-13 11:35:51 +02:00
2019-07-01 20:00:55 +02:00
if ( local_user () && in_array ( $profiledata [ 'network' ], Protocol :: FEDERATED )) {
2019-12-30 23:00:08 +01:00
$profiledata [ 'remoteconnect' ] = DI :: baseUrl () . '/follow?url=' . urlencode ( $profiledata [ 'url' ]);
2018-10-13 11:35:51 +02:00
}
2020-01-28 04:01:12 +01:00
Model\Profile :: load ( $a , '' , $profiledata , true );
2020-06-10 00:38:06 +02:00
if ( $contact [ 'uid' ] == 0 ) {
$o .= Model\Contact :: getPostsFromId ( $contact [ 'id' ]);
} else {
$o .= Model\Contact :: getPostsFromUrl ( $contact [ 'url' ]);
}
2018-10-13 11:35:51 +02:00
}
return $o ;
}
public static function getContactTemplateVars ( array $rr )
{
$dir_icon = '' ;
$alt_text = '' ;
2019-08-16 13:29:34 +02:00
if ( ! empty ( $rr [ 'uid' ]) && ! empty ( $rr [ 'rel' ])) {
2019-08-16 03:24:33 +02:00
switch ( $rr [ 'rel' ]) {
case Model\Contact :: FRIEND :
$dir_icon = 'images/lrarrow.gif' ;
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'Mutual Friendship' );
2019-08-16 03:24:33 +02:00
break ;
2018-10-13 11:35:51 +02:00
2019-08-16 03:24:33 +02:00
case Model\Contact :: FOLLOWER ;
$dir_icon = 'images/larrow.gif' ;
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'is a fan of yours' );
2019-08-16 03:24:33 +02:00
break ;
2018-10-13 11:35:51 +02:00
2019-08-16 03:24:33 +02:00
case Model\Contact :: SHARING ;
$dir_icon = 'images/rarrow.gif' ;
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'you are a fan of' );
2019-08-16 03:24:33 +02:00
break ;
2018-10-13 11:35:51 +02:00
2019-08-16 03:24:33 +02:00
default :
break ;
}
2018-10-13 11:35:51 +02:00
}
2018-10-13 13:29:56 +02:00
$url = Model\Contact :: magicLink ( $rr [ 'url' ]);
2018-10-13 11:35:51 +02:00
if ( strpos ( $url , 'redir/' ) === 0 ) {
$sparkle = ' class="sparkle" ' ;
} else {
$sparkle = '' ;
}
2019-09-08 21:18:56 +02:00
if ( $rr [ 'pending' ]) {
if ( in_array ( $rr [ 'rel' ], [ Model\Contact :: FRIEND , Model\Contact :: SHARING ])) {
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'Pending outgoing contact request' );
2019-09-08 21:18:56 +02:00
} else {
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'Pending incoming contact request' );
2019-09-08 21:18:56 +02:00
}
}
2018-10-13 11:35:51 +02:00
if ( $rr [ 'self' ]) {
$dir_icon = 'images/larrow.gif' ;
2020-01-18 20:52:34 +01:00
$alt_text = DI :: l10n () -> t ( 'This is you' );
2018-10-13 11:35:51 +02:00
$url = $rr [ 'url' ];
$sparkle = '' ;
}
return [
2020-01-18 20:52:34 +01:00
'img_hover' => DI :: l10n () -> t ( 'Visit %s\'s profile [%s]' , $rr [ 'name' ], $rr [ 'url' ]),
'edit_hover' => DI :: l10n () -> t ( 'Edit contact' ),
2018-10-15 00:30:02 +02:00
'photo_menu' => Model\Contact :: photoMenu ( $rr ),
'id' => $rr [ 'id' ],
'alt_text' => $alt_text ,
'dir_icon' => $dir_icon ,
'thumb' => ProxyUtils :: proxifyUrl ( $rr [ 'thumb' ], false , ProxyUtils :: SIZE_THUMB ),
2018-11-25 19:56:26 +01:00
'name' => $rr [ 'name' ],
'username' => $rr [ 'name' ],
2018-10-13 13:29:56 +02:00
'account_type' => Model\Contact :: getAccountType ( $rr ),
2018-10-15 00:30:02 +02:00
'sparkle' => $sparkle ,
2019-10-15 15:20:32 +02:00
'itemurl' => ( $rr [ 'addr' ] ? ? '' ) ? : $rr [ 'url' ],
2018-10-15 00:30:02 +02:00
'url' => $url ,
2019-12-27 18:24:29 +01:00
'network' => ContactSelector :: networkToName ( $rr [ 'network' ], $rr [ 'url' ], $rr [ 'protocol' ]),
2018-11-25 19:56:26 +01:00
'nick' => $rr [ 'nick' ],
2018-10-13 11:35:51 +02:00
];
}
/**
2020-01-19 07:05:23 +01:00
* Gives a array with actions which can performed to a given contact
2018-10-13 11:35:51 +02:00
*
* This includes actions like e . g . 'block' , 'hide' , 'archive' , 'delete' and others
*
* @ param array $contact Data about the Contact
* @ return array with contact related actions
*/
private static function getContactActions ( $contact )
{
$poll_enabled = in_array ( $contact [ 'network' ], [ Protocol :: ACTIVITYPUB , Protocol :: DFRN , Protocol :: OSTATUS , Protocol :: FEED , Protocol :: MAIL ]);
$contact_actions = [];
// Provide friend suggestion only for Friendica contacts
if ( $contact [ 'network' ] === Protocol :: DFRN ) {
$contact_actions [ 'suggest' ] = [
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Suggest friends' ),
2018-10-13 11:35:51 +02:00
'url' => 'fsuggest/' . $contact [ 'id' ],
'title' => '' ,
'sel' => '' ,
'id' => 'suggest' ,
];
}
if ( $poll_enabled ) {
$contact_actions [ 'update' ] = [
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Update now' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/' . $contact [ 'id' ] . '/update' ,
2018-10-13 11:35:51 +02:00
'title' => '' ,
'sel' => '' ,
'id' => 'update' ,
];
}
$contact_actions [ 'block' ] = [
2020-01-18 20:52:34 +01:00
'label' => ( intval ( $contact [ 'blocked' ]) ? DI :: l10n () -> t ( 'Unblock' ) : DI :: l10n () -> t ( 'Block' )),
2018-10-13 13:29:56 +02:00
'url' => 'contact/' . $contact [ 'id' ] . '/block' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Toggle Blocked status' ),
2018-10-13 11:35:51 +02:00
'sel' => ( intval ( $contact [ 'blocked' ]) ? 'active' : '' ),
'id' => 'toggle-block' ,
];
$contact_actions [ 'ignore' ] = [
2020-01-18 20:52:34 +01:00
'label' => ( intval ( $contact [ 'readonly' ]) ? DI :: l10n () -> t ( 'Unignore' ) : DI :: l10n () -> t ( 'Ignore' )),
2018-10-13 13:29:56 +02:00
'url' => 'contact/' . $contact [ 'id' ] . '/ignore' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Toggle Ignored status' ),
2018-10-13 11:35:51 +02:00
'sel' => ( intval ( $contact [ 'readonly' ]) ? 'active' : '' ),
'id' => 'toggle-ignore' ,
];
if ( $contact [ 'uid' ] != 0 ) {
$contact_actions [ 'archive' ] = [
2020-01-18 20:52:34 +01:00
'label' => ( intval ( $contact [ 'archive' ]) ? DI :: l10n () -> t ( 'Unarchive' ) : DI :: l10n () -> t ( 'Archive' )),
2018-10-13 13:29:56 +02:00
'url' => 'contact/' . $contact [ 'id' ] . '/archive' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Toggle Archive status' ),
2018-10-13 11:35:51 +02:00
'sel' => ( intval ( $contact [ 'archive' ]) ? 'active' : '' ),
'id' => 'toggle-archive' ,
];
$contact_actions [ 'delete' ] = [
2020-01-18 20:52:34 +01:00
'label' => DI :: l10n () -> t ( 'Delete' ),
2018-10-13 13:29:56 +02:00
'url' => 'contact/' . $contact [ 'id' ] . '/drop' ,
2020-01-18 20:52:34 +01:00
'title' => DI :: l10n () -> t ( 'Delete contact' ),
2018-10-13 11:35:51 +02:00
'sel' => '' ,
'id' => 'delete' ,
];
}
return $contact_actions ;
}
}