2010-07-01 19:48:07 -04:00
< ? php
2017-11-29 07:52:27 -05:00
/**
* @ file mod / contacts . php
*/
2017-04-30 00:07:00 -04:00
use Friendica\App ;
2018-01-09 22:42:04 -05:00
use Friendica\Content\ContactSelector ;
2018-01-15 14:51:56 -05:00
use Friendica\Content\Nav ;
2018-01-15 09:50:06 -05:00
use Friendica\Content\Widget ;
2018-01-17 13:42:40 -05:00
use Friendica\Core\Addon ;
2018-01-21 13:33:59 -05:00
use Friendica\Core\L10n ;
2017-08-26 02:04:21 -04:00
use Friendica\Core\System ;
2017-11-05 07:15:53 -05:00
use Friendica\Core\Worker ;
2017-11-07 22:57:46 -05:00
use Friendica\Database\DBM ;
2017-12-07 09:04:24 -05:00
use Friendica\Model\Contact ;
2017-12-07 09:09:28 -05:00
use Friendica\Model\GContact ;
2017-12-09 13:45:17 -05:00
use Friendica\Model\Group ;
2018-01-14 21:22:39 -05:00
use Friendica\Model\Profile ;
2017-05-07 14:44:30 -04:00
use Friendica\Network\Probe ;
2017-04-30 00:07:00 -04:00
2018-01-05 21:05:18 -05:00
require_once 'mod/proxy.php' ;
2010-09-08 23:14:17 -04:00
2018-01-05 21:05:18 -05:00
function contacts_init ( App $a )
{
if ( ! local_user ()) {
2011-07-17 19:08:47 -04:00
return ;
2016-12-20 05:56:34 -05:00
}
2011-07-17 19:08:47 -04:00
2018-01-01 16:27:01 -05:00
$nets = defaults ( $_GET , 'nets' , '' );
if ( $nets == " all " ) {
$nets = " " ;
2016-12-20 04:58:55 -05:00
}
2015-10-22 18:12:00 -04:00
2018-01-05 21:05:18 -05:00
if ( ! x ( $a -> page , 'aside' )) {
2010-10-31 19:38:22 -04:00
$a -> page [ 'aside' ] = '' ;
2016-12-20 04:58:55 -05:00
}
2011-10-11 21:24:37 -04:00
2018-01-12 23:41:18 -05:00
$contact_id = null ;
2018-01-11 03:26:30 -05:00
$contact = null ;
2018-01-05 21:05:18 -05:00
if ((( $a -> argc == 2 ) && intval ( $a -> argv [ 1 ])) || (( $a -> argc == 3 ) && intval ( $a -> argv [ 1 ]) && ( $a -> argv [ 2 ] == " posts " ))) {
$contact_id = intval ( $a -> argv [ 1 ]);
2018-01-10 08:36:02 -05:00
$contact = dba :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => local_user ()]);
2018-01-05 21:05:18 -05:00
}
if ( DBM :: is_result ( $contact )) {
$a -> data [ 'contact' ] = $contact ;
2015-12-01 12:31:08 -05:00
2017-06-07 22:00:59 -04:00
if (( $a -> data [ 'contact' ][ 'network' ] != " " ) && ( $a -> data [ 'contact' ][ 'network' ] != NETWORK_DFRN )) {
2018-01-05 21:05:18 -05:00
$networkname = format_network_name ( $a -> data [ 'contact' ][ 'network' ], $a -> data [ 'contact' ][ 'url' ]);
2016-12-30 15:48:09 -05:00
} else {
$networkname = '' ;
}
2015-12-01 12:31:08 -05:00
2016-12-30 15:48:09 -05:00
/// @TODO Add nice spaces
2018-01-15 08:05:12 -05:00
$vcard_widget = replace_macros ( get_markup_template ( " vcard-widget.tpl " ), [
2016-12-30 15:48:09 -05:00
'$name' => htmlentities ( $a -> data [ 'contact' ][ 'name' ]),
'$photo' => $a -> data [ 'contact' ][ 'photo' ],
2018-01-05 21:05:18 -05:00
'$url' => ( $a -> data [ 'contact' ][ 'network' ] == NETWORK_DFRN ) ? " redir/ " . $a -> data [ 'contact' ][ 'id' ] : $a -> data [ 'contact' ][ 'url' ],
2016-12-30 15:48:09 -05:00
'$addr' => (( $a -> data [ 'contact' ][ 'addr' ] != " " ) ? ( $a -> data [ 'contact' ][ 'addr' ]) : " " ),
'$network_name' => $networkname ,
2018-01-21 13:33:59 -05:00
'$network' => L10n :: t ( 'Network:' ),
2017-11-19 17:03:39 -05:00
'$account_type' => Contact :: getAccountType ( $a -> data [ 'contact' ])
2018-01-15 08:05:12 -05:00
]);
2016-12-30 15:48:09 -05:00
2018-01-01 16:27:01 -05:00
$findpeople_widget = '' ;
2016-12-30 15:48:09 -05:00
$follow_widget = '' ;
$networks_widget = '' ;
} else {
2012-09-07 14:17:03 -04:00
$vcard_widget = '' ;
2018-01-15 09:50:06 -05:00
$networks_widget = Widget :: networks ( 'contacts' , $nets );
2016-12-30 15:48:09 -05:00
if ( isset ( $_GET [ 'add' ])) {
2018-01-15 09:50:06 -05:00
$follow_widget = Widget :: follow ( $_GET [ 'add' ]);
2016-12-30 15:48:09 -05:00
} else {
2018-01-15 09:50:06 -05:00
$follow_widget = Widget :: follow ();
2016-12-30 15:48:09 -05:00
}
2010-07-27 22:27:14 -04:00
2018-01-15 09:50:06 -05:00
$findpeople_widget = Widget :: findPeople ();
2012-09-07 14:17:03 -04:00
}
2015-02-20 17:33:21 -05:00
2018-01-05 21:05:18 -05:00
$groups_widget = Group :: sidebarWidget ( 'contacts' , 'group' , 'full' , 0 , $contact_id );
2015-11-29 07:37:24 -05:00
2018-01-15 08:05:12 -05:00
$a -> page [ 'aside' ] .= replace_macros ( get_markup_template ( " contacts-widget-sidebar.tpl " ), [
2012-09-07 14:17:03 -04:00
'$vcard_widget' => $vcard_widget ,
2015-10-22 18:12:00 -04:00
'$findpeople_widget' => $findpeople_widget ,
2012-09-07 14:17:03 -04:00
'$follow_widget' => $follow_widget ,
'$groups_widget' => $groups_widget ,
'$networks_widget' => $networks_widget
2018-01-15 08:05:12 -05:00
]);
2011-03-22 00:43:22 -04:00
2017-08-26 03:32:10 -04:00
$base = System :: baseUrl ();
2012-07-28 11:57:16 -04:00
$tpl = get_markup_template ( " contacts-head.tpl " );
2018-01-15 08:05:12 -05:00
$a -> page [ 'htmlhead' ] .= replace_macros ( $tpl , [
2017-08-26 03:32:10 -04:00
'$baseurl' => System :: baseUrl ( true ),
2012-07-28 11:57:16 -04:00
'$base' => $base
2018-01-15 08:05:12 -05:00
]);
2012-09-07 14:17:03 -04:00
2012-07-28 11:57:16 -04:00
$tpl = get_markup_template ( " contacts-end.tpl " );
2018-01-15 08:05:12 -05:00
$a -> page [ 'end' ] .= replace_macros ( $tpl , [
2017-08-26 03:32:10 -04:00
'$baseurl' => System :: baseUrl ( true ),
2012-07-28 11:57:16 -04:00
'$base' => $base
2018-01-15 08:05:12 -05:00
]);
2010-07-01 19:48:07 -04:00
}
2018-01-05 21:05:18 -05:00
function contacts_batch_actions ( App $a )
{
2013-12-17 05:19:06 -05:00
$contacts_id = $_POST [ 'contact_batch' ];
2018-01-05 21:05:18 -05:00
if ( ! is_array ( $contacts_id )) {
return ;
}
2015-01-28 17:34:46 -05:00
2013-12-17 05:19:06 -05:00
$orig_records = q ( " SELECT * FROM `contact` WHERE `id` IN (%s) AND `uid` = %d AND `self` = 0 " ,
implode ( " , " , $contacts_id ),
intval ( local_user ())
);
2015-01-28 17:34:46 -05:00
2018-01-05 21:05:18 -05:00
$count_actions = 0 ;
foreach ( $orig_records as $orig_record ) {
2013-12-17 05:19:06 -05:00
$contact_id = $orig_record [ 'id' ];
if ( x ( $_POST , 'contacts_batch_update' )) {
_contact_update ( $contact_id );
$count_actions ++ ;
}
if ( x ( $_POST , 'contacts_batch_block' )) {
2018-01-05 21:05:18 -05:00
$r = _contact_block ( $contact_id , $orig_record );
if ( $r ) {
$count_actions ++ ;
}
2013-12-17 05:19:06 -05:00
}
if ( x ( $_POST , 'contacts_batch_ignore' )) {
$r = _contact_ignore ( $contact_id , $orig_record );
2018-01-05 21:05:18 -05:00
if ( $r ) {
$count_actions ++ ;
}
2013-12-17 05:19:06 -05:00
}
if ( x ( $_POST , 'contacts_batch_archive' )) {
$r = _contact_archive ( $contact_id , $orig_record );
2018-01-05 21:05:18 -05:00
if ( $r ) {
$count_actions ++ ;
}
2013-12-17 05:19:06 -05:00
}
if ( x ( $_POST , 'contacts_batch_drop' )) {
2017-11-19 17:03:39 -05:00
_contact_drop ( $orig_record );
2013-12-17 05:19:06 -05:00
$count_actions ++ ;
}
}
2018-01-05 21:05:18 -05:00
if ( $count_actions > 0 ) {
2018-01-21 17:15:52 -05:00
info ( L10n :: tt ( " %d contact edited. " , " %d contacts edited. " , $count_actions ));
2013-12-17 05:19:06 -05:00
}
2015-01-28 17:34:46 -05:00
2018-01-05 21:05:18 -05:00
if ( x ( $_SESSION , 'return_url' )) {
2016-02-17 17:47:32 -05:00
goaway ( '' . $_SESSION [ 'return_url' ]);
2018-01-05 21:05:18 -05:00
} else {
2016-02-17 17:47:32 -05:00
goaway ( 'contacts' );
2016-12-20 15:15:53 -05:00
}
2016-02-05 15:52:39 -05:00
}
2013-12-17 05:19:06 -05:00
2018-01-05 21:05:18 -05:00
function contacts_post ( App $a )
{
if ( ! local_user ()) {
2010-07-01 19:48:07 -04:00
return ;
2016-12-20 05:56:34 -05:00
}
2010-07-01 19:48:07 -04:00
2018-01-05 21:05:18 -05:00
if ( $a -> argv [ 1 ] === " batch " ) {
2013-12-17 05:19:06 -05:00
contacts_batch_actions ( $a );
return ;
}
2010-07-01 19:48:07 -04:00
$contact_id = intval ( $a -> argv [ 1 ]);
2018-01-05 21:05:18 -05:00
if ( ! $contact_id ) {
2010-07-01 19:48:07 -04:00
return ;
2016-12-20 05:56:34 -05:00
}
2010-07-11 05:52:47 -04:00
2018-01-12 23:54:16 -05:00
if ( ! dba :: exists ( 'contact' , [ 'id' => $contact_id , 'uid' => local_user ()])) {
2018-01-21 13:33:59 -05:00
notice ( L10n :: t ( 'Could not access contact record.' ) . EOL );
2016-02-17 17:47:32 -05:00
goaway ( 'contacts' );
2010-07-11 02:03:54 -04:00
return ; // NOTREACHED
}
2010-07-01 19:48:07 -04:00
2018-01-17 13:42:40 -05:00
Addon :: callHooks ( 'contact_edit_post' , $_POST );
2011-01-07 06:15:52 -05:00
2010-07-11 02:03:54 -04:00
$profile_id = intval ( $_POST [ 'profile-assign' ]);
2016-12-20 05:56:34 -05:00
if ( $profile_id ) {
2018-01-12 23:54:16 -05:00
if ( ! dba :: exists ( 'profile' , [ 'id' => $profile_id , 'uid' => local_user ()])) {
2018-01-21 13:33:59 -05:00
notice ( L10n :: t ( 'Could not locate selected profile.' ) . EOL );
2010-07-01 19:48:07 -04:00
return ;
2010-07-11 02:03:54 -04:00
}
2010-07-01 19:48:07 -04:00
}
2011-05-31 01:17:04 -04:00
2011-12-05 21:36:26 -05:00
$hidden = intval ( $_POST [ 'hidden' ]);
2010-10-01 05:28:06 -04:00
2014-01-05 10:10:02 -05:00
$notify = intval ( $_POST [ 'notify' ]);
$fetch_further_information = intval ( $_POST [ 'fetch_further_information' ]);
2017-01-26 22:57:53 -05:00
$ffi_keyword_blacklist = escape_tags ( trim ( $_POST [ 'ffi_keyword_blacklist' ]));
2014-10-29 19:24:23 -04:00
2011-01-26 23:29:32 -05:00
$priority = intval ( $_POST [ 'poll' ]);
2018-01-05 21:05:18 -05:00
if ( $priority > 5 || $priority < 0 ) {
2010-08-01 08:46:51 -04:00
$priority = 0 ;
2018-01-05 21:05:18 -05:00
}
2010-08-01 08:46:51 -04:00
2017-01-26 22:57:53 -05:00
$info = escape_tags ( trim ( $_POST [ 'info' ]));
2010-12-28 04:06:34 -05:00
2011-12-05 21:36:26 -05:00
$r = q ( " UPDATE `contact` SET `profile-id` = %d, `priority` = %d , `info` = '%s',
2014-10-29 19:24:23 -04:00
`hidden` = % d , `notify_new_posts` = % d , `fetch_further_information` = % d ,
`ffi_keyword_blacklist` = '%s' WHERE `id` = % d AND `uid` = % d " ,
2010-07-11 02:03:54 -04:00
intval ( $profile_id ),
2010-08-01 08:46:51 -04:00
intval ( $priority ),
2010-12-28 04:06:34 -05:00
dbesc ( $info ),
2011-12-05 21:36:26 -05:00
intval ( $hidden ),
2014-01-05 10:10:02 -05:00
intval ( $notify ),
intval ( $fetch_further_information ),
2014-10-29 19:24:23 -04:00
dbesc ( $ffi_keyword_blacklist ),
2010-07-11 02:03:54 -04:00
intval ( $contact_id ),
2010-10-18 17:34:59 -04:00
intval ( local_user ())
2010-07-11 02:03:54 -04:00
);
2018-01-05 21:05:18 -05:00
if ( DBM :: is_result ( $r )) {
2018-01-21 13:33:59 -05:00
info ( L10n :: t ( 'Contact updated.' ) . EOL );
2018-01-05 21:05:18 -05:00
} else {
2018-01-21 13:33:59 -05:00
notice ( L10n :: t ( 'Failed to update contact record.' ) . EOL );
2018-01-05 21:05:18 -05:00
}
2012-02-12 02:17:55 -05:00
2018-01-10 08:36:02 -05:00
$contact = dba :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => local_user ()]);
2018-01-05 21:05:18 -05:00
if ( DBM :: is_result ( $contact )) {
$a -> data [ 'contact' ] = $contact ;
}
2012-02-12 02:17:55 -05:00
2010-07-11 02:03:54 -04:00
return ;
2010-07-01 19:48:07 -04:00
}
2018-01-12 23:41:18 -05:00
2018-01-05 21:05:18 -05:00
/* contact actions */
2010-07-01 19:48:07 -04:00
2018-01-05 21:05:18 -05:00
function _contact_update ( $contact_id )
{
2018-01-10 08:36:02 -05:00
$contact = dba :: selectFirst ( 'contact' , [ 'uid' , 'url' , 'network' ], [ 'id' => $contact_id , 'uid' => local_user ()]);
2018-01-05 21:05:18 -05:00
if ( ! DBM :: is_result ( $contact )) {
2015-09-03 16:18:25 -04:00
return ;
2018-01-05 21:05:18 -05:00
}
2015-09-03 16:18:25 -04:00
2018-01-05 21:05:18 -05:00
$uid = $contact [ " uid " ];
2015-09-03 16:18:25 -04:00
2018-01-11 03:26:30 -05:00
if ( $contact [ " network " ] == NETWORK_OSTATUS ) {
2018-01-09 11:40:25 -05:00
$result = Contact :: createFromProbe ( $uid , $contact [ " url " ], false , $contact [ " network " ]);
2015-09-03 16:18:25 -04:00
2018-01-05 21:05:18 -05:00
if ( $result [ 'success' ]) {
q ( " UPDATE `contact` SET `subhub` = 1 WHERE `id` = %d " , intval ( $contact_id ));
}
} else {
2015-09-03 16:18:25 -04:00
// pull feed and consume it, which should subscribe to the hub.
2017-11-12 13:50:35 -05:00
Worker :: add ( PRIORITY_HIGH , " OnePoll " , $contact_id , " force " );
2018-01-05 21:05:18 -05:00
}
2013-12-17 05:19:06 -05:00
}
2015-04-11 17:51:47 -04:00
2018-01-05 21:05:18 -05:00
function _contact_update_profile ( $contact_id )
{
2018-01-10 08:36:02 -05:00
$contact = dba :: selectFirst ( 'contact' , [ 'uid' , 'url' , 'network' ], [ 'id' => $contact_id , 'uid' => local_user ()]);
2018-01-05 21:05:18 -05:00
if ( ! DBM :: is_result ( $contact )) {
2015-04-11 17:51:47 -04:00
return ;
2018-01-05 21:05:18 -05:00
}
2015-04-11 17:51:47 -04:00
2018-01-05 21:05:18 -05:00
$uid = $contact [ " uid " ];
2015-09-03 16:18:25 -04:00
2018-01-05 21:05:18 -05:00
$data = Probe :: uri ( $contact [ " url " ], " " , 0 , false );
2015-04-11 17:51:47 -04:00
2015-10-04 13:48:29 -04:00
// "Feed" or "Unknown" is mostly a sign of communication problems
2018-01-15 08:05:12 -05:00
if (( in_array ( $data [ " network " ], [ NETWORK_FEED , NETWORK_PHANTOM ])) && ( $data [ " network " ] != $contact [ " network " ])) {
2015-04-12 04:32:02 -04:00
return ;
2018-01-05 21:05:18 -05:00
}
2015-04-12 04:32:02 -04:00
2018-01-15 08:05:12 -05:00
$updatefields = [ " name " , " nick " , " url " , " addr " , " batch " , " notify " , " poll " , " request " , " confirm " ,
" poco " , " network " , " alias " ];
$update = [];
2015-04-11 17:51:47 -04:00
2015-09-03 16:18:25 -04:00
if ( $data [ " network " ] == NETWORK_OSTATUS ) {
2018-01-09 11:40:25 -05:00
$result = Contact :: createFromProbe ( $uid , $data [ " url " ], false );
2015-09-03 16:18:25 -04:00
2018-01-05 21:05:18 -05:00
if ( $result [ 'success' ]) {
2015-09-03 16:18:25 -04:00
$update [ " subhub " ] = true ;
2018-01-05 21:05:18 -05:00
}
2015-09-03 16:18:25 -04:00
}
2018-01-05 21:05:18 -05:00
foreach ( $updatefields AS $field ) {
if ( isset ( $data [ $field ]) && ( $data [ $field ] != " " )) {
2015-04-11 17:51:47 -04:00
$update [ $field ] = $data [ $field ];
2018-01-05 21:05:18 -05:00
}
}
2015-04-11 17:51:47 -04:00
2015-04-12 04:32:02 -04:00
$update [ " nurl " ] = normalise_link ( $data [ " url " ]);
2015-04-11 17:51:47 -04:00
$query = " " ;
2018-01-05 21:05:18 -05:00
if ( isset ( $data [ " priority " ]) && ( $data [ " priority " ] != 0 )) {
$query = " `priority` = " . intval ( $data [ " priority " ]);
}
2015-04-11 17:51:47 -04:00
2018-01-05 21:05:18 -05:00
foreach ( $update AS $key => $value ) {
if ( $query != " " ) {
2015-04-11 17:51:47 -04:00
$query .= " , " ;
2018-01-05 21:05:18 -05:00
}
2015-04-11 17:51:47 -04:00
2018-01-05 21:05:18 -05:00
$query .= " ` " . $key . " ` = ' " . dbesc ( $value ) . " ' " ;
2015-04-11 17:51:47 -04:00
}
2018-01-05 21:05:18 -05:00
if ( $query == " " ) {
2015-04-11 17:51:47 -04:00
return ;
2018-01-05 21:05:18 -05:00
}
2015-04-11 17:51:47 -04:00
$r = q ( " UPDATE `contact` SET $query WHERE `id` = %d AND `uid` = %d " ,
intval ( $contact_id ),
intval ( local_user ())
);
2016-01-28 05:09:08 -05:00
// Update the entry in the contact table
2017-11-29 17:29:11 -05:00
Contact :: updateAvatar ( $data [ 'photo' ], local_user (), $contact_id , true );
2015-04-11 17:51:47 -04:00
2016-01-10 13:06:34 -05:00
// Update the entry in the gcontact table
2017-12-07 09:09:28 -05:00
GContact :: updateFromProbe ( $data [ " url " ]);
2015-04-11 17:51:47 -04:00
}
2018-01-05 21:05:18 -05:00
function _contact_block ( $contact_id , $orig_record )
{
2013-12-17 05:19:06 -05:00
$blocked = (( $orig_record [ 'blocked' ]) ? 0 : 1 );
2014-03-09 04:19:14 -04:00
$r = q ( " UPDATE `contact` SET `blocked` = %d WHERE `id` = %d AND `uid` = %d " ,
2013-12-17 05:19:06 -05:00
intval ( $blocked ),
intval ( $contact_id ),
intval ( local_user ())
);
2018-01-05 21:05:18 -05:00
return DBM :: is_result ( $r );
2016-02-07 09:11:34 -05:00
}
2018-01-05 21:05:18 -05:00
function _contact_ignore ( $contact_id , $orig_record )
{
2013-12-17 05:19:06 -05:00
$readonly = (( $orig_record [ 'readonly' ]) ? 0 : 1 );
2014-03-09 04:19:14 -04:00
$r = q ( " UPDATE `contact` SET `readonly` = %d WHERE `id` = %d AND `uid` = %d " ,
2013-12-17 05:19:06 -05:00
intval ( $readonly ),
intval ( $contact_id ),
intval ( local_user ())
);
2018-01-05 21:05:18 -05:00
return DBM :: is_result ( $r );
2013-12-17 05:19:06 -05:00
}
2018-01-05 21:05:18 -05:00
function _contact_archive ( $contact_id , $orig_record )
{
2013-12-17 05:19:06 -05:00
$archived = (( $orig_record [ 'archive' ]) ? 0 : 1 );
2014-03-09 04:19:14 -04:00
$r = q ( " UPDATE `contact` SET `archive` = %d WHERE `id` = %d AND `uid` = %d " ,
2013-12-17 05:19:06 -05:00
intval ( $archived ),
intval ( $contact_id ),
intval ( local_user ())
);
if ( $archived ) {
q ( " UPDATE `item` SET `private` = 2 WHERE `contact-id` = %d AND `uid` = %d " , intval ( $contact_id ), intval ( local_user ()));
}
2018-01-05 21:05:18 -05:00
return DBM :: is_result ( $r );
2013-12-17 05:19:06 -05:00
}
2017-11-19 17:03:39 -05:00
function _contact_drop ( $orig_record )
{
2013-12-17 05:19:06 -05:00
$a = get_app ();
2017-09-23 10:48:27 -04:00
$r = q ( " SELECT `contact`.*, `user`.* FROM `contact` INNER JOIN `user` ON `contact`.`uid` = `user`.`uid`
WHERE `user` . `uid` = % d AND `contact` . `self` LIMIT 1 " ,
intval ( $a -> user [ 'uid' ])
);
2017-11-07 22:57:46 -05:00
if ( ! DBM :: is_result ( $r )) {
2017-09-23 10:48:27 -04:00
return ;
}
2017-11-19 17:03:39 -05:00
Contact :: terminateFriendship ( $r [ 0 ], $orig_record );
Contact :: remove ( $orig_record [ 'id' ]);
2013-12-17 05:19:06 -05:00
}
2010-07-01 19:48:07 -04:00
2018-01-05 21:05:18 -05:00
function contacts_content ( App $a )
{
2010-10-31 19:38:22 -04:00
$sort_type = 0 ;
$o = '' ;
2018-01-15 14:51:56 -05:00
Nav :: setSelected ( 'contacts' );
2010-10-31 19:38:22 -04:00
2018-01-05 21:05:18 -05:00
if ( ! local_user ()) {
2018-01-21 13:33:59 -05:00
notice ( L10n :: t ( 'Permission denied.' ) . EOL );
2010-07-01 19:48:07 -04:00
return ;
}
2018-01-05 21:05:18 -05:00
if ( $a -> argc == 3 ) {
2010-07-11 02:03:54 -04:00
$contact_id = intval ( $a -> argv [ 1 ]);
2018-01-05 21:05:18 -05:00
if ( ! $contact_id ) {
2010-07-11 02:03:54 -04:00
return ;
2018-01-05 21:05:18 -05:00
}
2010-07-11 02:03:54 -04:00
$cmd = $a -> argv [ 2 ];
2018-01-10 08:36:02 -05:00
$orig_record = dba :: selectFirst ( 'contact' , [], [ 'id' => $contact_id , 'uid' => local_user (), 'self' => false ]);
2018-01-05 21:05:18 -05:00
if ( ! DBM :: is_result ( $orig_record )) {
2018-01-21 13:33:59 -05:00
notice ( L10n :: t ( 'Could not access contact record.' ) . EOL );
2016-02-17 17:47:32 -05:00
goaway ( 'contacts' );
2010-07-11 02:03:54 -04:00
return ; // NOTREACHED
}
2014-09-02 19:03:23 -04:00
2018-01-05 21:05:18 -05:00
if ( $cmd === 'update' ) {
2013-12-17 05:19:06 -05:00
_contact_update ( $contact_id );
2016-02-17 17:47:32 -05:00
goaway ( 'contacts/' . $contact_id );
2011-01-30 22:38:03 -05:00
// NOTREACHED
}
2010-07-11 02:03:54 -04:00
2018-01-05 21:05:18 -05:00
if ( $cmd === 'updateprofile' ) {
2015-04-11 17:51:47 -04:00
_contact_update_profile ( $contact_id );
2016-02-17 17:47:32 -05:00
goaway ( 'crepair/' . $contact_id );
2015-04-11 17:51:47 -04:00
// NOTREACHED
}
2018-01-05 21:05:18 -05:00
if ( $cmd === 'block' ) {
$r = _contact_block ( $contact_id , $orig_record );
2016-12-20 15:15:53 -05:00
if ( $r ) {
2018-01-05 21:05:18 -05:00
$blocked = (( $orig_record [ 'blocked' ]) ? 0 : 1 );
2018-01-21 13:33:59 -05:00
info ((( $blocked ) ? L10n :: t ( 'Contact has been blocked' ) : L10n :: t ( 'Contact has been unblocked' )) . EOL );
2010-07-28 01:32:21 -04:00
}
2014-09-02 19:03:23 -04:00
2016-02-17 17:47:32 -05:00
goaway ( 'contacts/' . $contact_id );
2010-07-28 01:32:21 -04:00
return ; // NOTREACHED
}
2018-01-05 21:05:18 -05:00
if ( $cmd === 'ignore' ) {
$r = _contact_ignore ( $contact_id , $orig_record );
2016-12-20 15:15:53 -05:00
if ( $r ) {
2018-01-05 21:05:18 -05:00
$readonly = (( $orig_record [ 'readonly' ]) ? 0 : 1 );
2018-01-21 13:33:59 -05:00
info ((( $readonly ) ? L10n :: t ( 'Contact has been ignored' ) : L10n :: t ( 'Contact has been unignored' )) . EOL );
2010-07-11 02:03:54 -04:00
}
2014-09-02 19:03:23 -04:00
2016-02-17 17:47:32 -05:00
goaway ( 'contacts/' . $contact_id );
2010-07-11 02:03:54 -04:00
return ; // NOTREACHED
}
2018-01-05 21:05:18 -05:00
if ( $cmd === 'archive' ) {
$r = _contact_archive ( $contact_id , $orig_record );
2016-12-20 15:15:53 -05:00
if ( $r ) {
2018-01-05 21:05:18 -05:00
$archived = (( $orig_record [ 'archive' ]) ? 0 : 1 );
2018-01-21 13:33:59 -05:00
info ((( $archived ) ? L10n :: t ( 'Contact has been archived' ) : L10n :: t ( 'Contact has been unarchived' )) . EOL );
2014-09-02 19:03:23 -04:00
}
2016-02-17 17:47:32 -05:00
goaway ( 'contacts/' . $contact_id );
2012-04-27 20:17:58 -04:00
return ; // NOTREACHED
}
2018-01-05 21:05:18 -05:00
if ( $cmd === 'drop' ) {
2013-01-26 14:52:21 -05:00
// Check if we should do HTML-based delete confirmation
2018-01-05 21:05:18 -05:00
if ( x ( $_REQUEST , 'confirm' )) {
2013-01-26 14:52:21 -05:00
// <form> can't take arguments in its "action" parameter
// so add any arguments as hidden inputs
$query = explode_querystring ( $a -> query_string );
2018-01-15 08:05:12 -05:00
$inputs = [];
2018-01-05 21:05:18 -05:00
foreach ( $query [ 'args' ] as $arg ) {
if ( strpos ( $arg , 'confirm=' ) === false ) {
2013-01-26 14:52:21 -05:00
$arg_parts = explode ( '=' , $arg );
2018-01-15 08:05:12 -05:00
$inputs [] = [ 'name' => $arg_parts [ 0 ], 'value' => $arg_parts [ 1 ]];
2013-01-26 14:52:21 -05:00
}
}
$a -> page [ 'aside' ] = '' ;
2015-10-07 18:25:55 -04:00
2018-01-15 08:05:12 -05:00
return replace_macros ( get_markup_template ( 'contact_drop_confirm.tpl' ), [
2018-01-21 13:33:59 -05:00
'$header' => L10n :: t ( 'Drop contact' ),
2018-01-05 21:05:18 -05:00
'$contact' => _contact_detail_for_template ( $orig_record ),
2013-01-26 14:52:21 -05:00
'$method' => 'get' ,
2018-01-21 13:33:59 -05:00
'$message' => L10n :: t ( 'Do you really want to delete this contact?' ),
2013-01-26 14:52:21 -05:00
'$extra_inputs' => $inputs ,
2018-01-21 13:33:59 -05:00
'$confirm' => L10n :: t ( 'Yes' ),
2013-01-26 14:52:21 -05:00
'$confirm_url' => $query [ 'base' ],
'$confirm_name' => 'confirmed' ,
2018-01-21 13:33:59 -05:00
'$cancel' => L10n :: t ( 'Cancel' ),
2018-01-15 08:05:12 -05:00
]);
2013-01-26 14:52:21 -05:00
}
// Now check how the user responded to the confirmation query
2018-01-05 21:05:18 -05:00
if ( x ( $_REQUEST , 'canceled' )) {
if ( x ( $_SESSION , 'return_url' )) {
2016-02-17 17:47:32 -05:00
goaway ( '' . $_SESSION [ 'return_url' ]);
2018-01-05 21:05:18 -05:00
} else {
2016-02-17 17:47:32 -05:00
goaway ( 'contacts' );
2016-12-20 15:15:53 -05:00
}
2013-01-26 14:52:21 -05:00
}
2018-01-05 21:05:18 -05:00
_contact_drop ( $orig_record );
2018-01-21 13:33:59 -05:00
info ( L10n :: t ( 'Contact has been removed.' ) . EOL );
2018-01-05 21:05:18 -05:00
if ( x ( $_SESSION , 'return_url' )) {
2016-02-17 17:47:32 -05:00
goaway ( '' . $_SESSION [ 'return_url' ]);
2018-01-05 21:05:18 -05:00
} else {
2016-02-17 17:47:32 -05:00
goaway ( 'contacts' );
2016-12-20 15:15:53 -05:00
}
2010-07-11 02:03:54 -04:00
return ; // NOTREACHED
}
2016-12-20 15:15:53 -05:00
if ( $cmd === 'posts' ) {
2015-11-29 17:22:05 -05:00
return contact_posts ( $a , $contact_id );
}
2010-07-11 02:03:54 -04:00
}
2010-07-06 08:07:28 -04:00
2013-01-26 14:52:21 -05:00
$_SESSION [ 'return_url' ] = $a -> query_string ;
2018-01-05 21:05:18 -05:00
if (( x ( $a -> data , 'contact' )) && ( is_array ( $a -> data [ 'contact' ]))) {
2011-11-09 22:30:14 -05:00
$contact_id = $a -> data [ 'contact' ][ 'id' ];
$contact = $a -> data [ 'contact' ];
2010-07-06 08:07:28 -04:00
2018-01-15 08:05:12 -05:00
$a -> page [ 'htmlhead' ] .= replace_macros ( get_markup_template ( 'contact_head.tpl' ), [
2017-08-26 03:32:10 -04:00
'$baseurl' => System :: baseUrl ( true ),
2018-01-15 08:05:12 -05:00
]);
$a -> page [ 'end' ] .= replace_macros ( get_markup_template ( 'contact_end.tpl' ), [
2017-08-26 03:32:10 -04:00
'$baseurl' => System :: baseUrl ( true ),
2018-01-15 08:05:12 -05:00
]);
2010-10-26 00:52:30 -04:00
2018-01-05 21:05:18 -05:00
$dir_icon = '' ;
$relation_text = '' ;
switch ( $contact [ 'rel' ]) {
2011-08-07 19:15:54 -04:00
case CONTACT_IS_FRIEND :
2010-07-11 02:03:54 -04:00
$dir_icon = 'images/lrarrow.gif' ;
2018-01-21 13:33:59 -05:00
$relation_text = L10n :: t ( 'You are mutual friends with %s' );
2010-09-08 23:14:17 -04:00
break ;
2011-08-07 19:15:54 -04:00
case CONTACT_IS_FOLLOWER ;
2010-07-11 02:03:54 -04:00
$dir_icon = 'images/larrow.gif' ;
2018-01-21 13:33:59 -05:00
$relation_text = L10n :: t ( 'You are sharing with %s' );
2010-09-08 23:14:17 -04:00
break ;
2011-08-07 19:15:54 -04:00
case CONTACT_IS_SHARING ;
2010-09-08 23:14:17 -04:00
$dir_icon = 'images/rarrow.gif' ;
2018-01-21 13:33:59 -05:00
$relation_text = L10n :: t ( '%s is sharing with you' );
2010-09-08 23:14:17 -04:00
break ;
default :
break ;
2010-07-11 02:03:54 -04:00
}
2018-01-15 08:05:12 -05:00
if ( ! in_array ( $contact [ 'network' ], [ NETWORK_DFRN , NETWORK_OSTATUS , NETWORK_DIASPORA ])) {
2018-01-05 21:05:18 -05:00
$relation_text = " " ;
}
2015-02-20 17:56:41 -05:00
2018-01-05 21:05:18 -05:00
$relation_text = sprintf ( $relation_text , htmlentities ( $contact [ 'name' ]));
2011-11-09 00:22:45 -05:00
2018-01-05 21:05:18 -05:00
if (( $contact [ 'network' ] === NETWORK_DFRN ) && ( $contact [ 'rel' ])) {
2011-11-09 22:30:14 -05:00
$url = " redir/ { $contact [ 'id' ] } " ;
2010-09-27 22:48:45 -04:00
$sparkle = ' class="sparkle" ' ;
2018-01-05 21:05:18 -05:00
} else {
2011-11-09 22:30:14 -05:00
$url = $contact [ 'url' ];
2010-09-27 22:48:45 -04:00
$sparkle = '' ;
}
2010-10-01 05:28:06 -04:00
2018-01-21 13:33:59 -05:00
$insecure = L10n :: t ( 'Private communications are not available for this contact.' );
2011-03-20 22:29:01 -04:00
2018-01-21 13:33:59 -05:00
$last_update = (( $contact [ 'last-update' ] <= NULL_DATE ) ? L10n :: t ( 'Never' ) : datetime_convert ( 'UTC' , date_default_timezone_get (), $contact [ 'last-update' ], 'D, j M Y, g:i A' ));
2011-02-06 18:50:50 -05:00
2017-03-21 12:02:59 -04:00
if ( $contact [ 'last-update' ] > NULL_DATE ) {
2018-01-21 13:33:59 -05:00
$last_update .= ' ' . (( $contact [ 'last-update' ] <= $contact [ 'success_update' ]) ? L10n :: t ( " \x28 Update was successful \x29 " ) : L10n :: t ( " \x28 Update was not successful \x29 " ));
2017-03-19 04:04:04 -04:00
}
2018-01-21 13:33:59 -05:00
$lblsuggest = (( $contact [ 'network' ] === NETWORK_DFRN ) ? L10n :: t ( 'Suggest friends' ) : '' );
2011-06-27 01:57:08 -04:00
2018-01-15 08:05:12 -05:00
$poll_enabled = in_array ( $contact [ 'network' ], [ NETWORK_DFRN , NETWORK_OSTATUS , NETWORK_FEED , NETWORK_MAIL ]);
2011-08-25 21:12:42 -04:00
2018-01-21 13:33:59 -05:00
$nettype = L10n :: t ( 'Network type: %s' , ContactSelector :: networkToName ( $contact [ 'network' ], $contact [ " url " ]));
2011-11-09 00:22:45 -05:00
2011-11-09 22:30:14 -05:00
// tabs
2015-12-01 02:12:05 -05:00
$tab_str = contacts_tab ( $a , $contact_id , 2 );
2011-11-09 22:30:14 -05:00
2018-01-21 13:33:59 -05:00
$lost_contact = (( $contact [ 'archive' ] && $contact [ 'term-date' ] > NULL_DATE && $contact [ 'term-date' ] < datetime_converL10n :: t ( '' , '' , 'now' )) ? L10n :: t ( 'Communications lost with this contact!' ) : '' );
2011-11-09 22:30:14 -05:00
2018-01-01 16:27:01 -05:00
$fetch_further_information = null ;
2017-03-19 04:04:04 -04:00
if ( $contact [ 'network' ] == NETWORK_FEED ) {
2018-01-15 08:05:12 -05:00
$fetch_further_information = [
2018-01-05 21:05:18 -05:00
'fetch_further_information' ,
2018-01-21 13:33:59 -05:00
L10n :: t ( 'Fetch further information for feeds' ),
2018-01-05 21:05:18 -05:00
$contact [ 'fetch_further_information' ],
2018-01-21 13:33:59 -05:00
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. " ),
[ '0' => L10n :: t ( 'Disabled' ),
'1' => L10n :: t ( 'Fetch information' ),
'3' => L10n :: t ( 'Fetch keywords' ),
'2' => L10n :: t ( 'Fetch information and keywords' )
2018-01-15 08:05:12 -05:00
]
];
2017-03-19 04:04:04 -04:00
}
2018-01-01 16:27:01 -05:00
$poll_interval = null ;
2018-01-15 08:05:12 -05:00
if ( in_array ( $contact [ 'network' ], [ NETWORK_FEED , NETWORK_MAIL ])) {
2018-01-09 22:42:04 -05:00
$poll_interval = ContactSelector :: pollInterval ( $contact [ 'priority' ], ( ! $poll_enabled ));
2018-01-01 16:27:01 -05:00
}
2015-02-20 17:12:04 -05:00
2018-01-01 16:27:01 -05:00
$profile_select = null ;
if ( $contact [ 'network' ] == NETWORK_DFRN ) {
2018-01-09 22:42:04 -05:00
$profile_select = ContactSelector :: profileAssign ( $contact [ 'profile-id' ], (( $contact [ 'network' ] !== NETWORK_DFRN ) ? true : false ));
2018-01-01 16:27:01 -05:00
}
2015-02-21 14:03:02 -05:00
2018-01-01 16:27:01 -05:00
$follow = '' ;
$follow_text = '' ;
2018-01-15 08:05:12 -05:00
if ( in_array ( $contact [ 'network' ], [ NETWORK_DIASPORA , NETWORK_OSTATUS ])) {
2017-09-12 02:08:24 -04:00
if ( $contact [ 'rel' ] == CONTACT_IS_FOLLOWER ) {
2018-01-05 21:05:18 -05:00
$follow = System :: baseUrl ( true ) . " /follow?url= " . urlencode ( $contact [ " url " ]);
2018-01-21 13:33:59 -05:00
$follow_text = L10n :: t ( " Connect/Follow " );
2017-09-12 02:08:24 -04:00
} elseif ( $contact [ 'rel' ] == CONTACT_IS_FRIEND ) {
2018-01-05 21:05:18 -05:00
$follow = System :: baseUrl ( true ) . " /unfollow?url= " . urlencode ( $contact [ " url " ]);
2018-01-21 13:33:59 -05:00
$follow_text = L10n :: t ( " Disconnect/Unfollow " );
2017-09-12 02:08:24 -04:00
}
}
2015-10-10 05:06:18 -04:00
2016-02-08 17:15:20 -05:00
// Load contactact related actions like hide, suggest, delete and others
2016-02-08 09:00:53 -05:00
$contact_actions = contact_actions ( $contact );
2016-02-07 19:56:15 -05:00
2018-01-01 16:27:01 -05:00
$tpl = get_markup_template ( " contact_edit.tpl " );
2018-01-15 08:05:12 -05:00
$o .= replace_macros ( $tpl , [
2018-01-21 13:33:59 -05:00
'$header' => L10n :: t ( " Contact " ),
2011-11-09 22:30:14 -05:00
'$tab_str' => $tab_str ,
2018-01-21 13:33:59 -05:00
'$submit' => L10n :: t ( 'Submit' ),
'$lbl_vis1' => L10n :: t ( 'Profile Visibility' ),
'$lbl_vis2' => L10n :: t ( 'Please choose the profile you would like to display to %s when viewing your profile securely.' , $contact [ 'name' ]),
'$lbl_info1' => L10n :: t ( 'Contact Information / Notes' ),
'$lbl_info2' => L10n :: t ( 'Their personal note' ),
2017-08-01 11:47:13 -04:00
'$reason' => trim ( notags ( $contact [ 'reason' ])),
2018-01-21 13:33:59 -05:00
'$infedit' => L10n :: t ( 'Edit contact notes' ),
2016-02-17 17:47:32 -05:00
'$common_link' => 'common/loc/' . local_user () . '/' . $contact [ 'id' ],
2011-11-09 00:22:45 -05:00
'$relation_text' => $relation_text ,
2018-01-21 13:33:59 -05:00
'$visit' => L10n :: t ( 'Visit %s\'s profile [%s]' , $contact [ 'name' ], $contact [ 'url' ]),
'$blockunblock' => L10n :: t ( 'Block/Unblock contact' ),
'$ignorecont' => L10n :: t ( 'Ignore contact' ),
'$lblcrepair' => L10n :: t ( " Repair URL settings " ),
'$lblrecent' => L10n :: t ( 'View conversations' ),
2011-06-27 01:57:08 -04:00
'$lblsuggest' => $lblsuggest ,
2011-08-25 21:12:42 -04:00
'$nettype' => $nettype ,
2015-02-20 17:12:04 -05:00
'$poll_interval' => $poll_interval ,
2011-08-25 21:12:42 -04:00
'$poll_enabled' => $poll_enabled ,
2018-01-21 13:33:59 -05:00
'$lastupdtext' => L10n :: t ( 'Last update:' ),
2012-06-14 19:56:46 -04:00
'$lost_contact' => $lost_contact ,
2018-01-21 13:33:59 -05:00
'$updpub' => L10n :: t ( 'Update public posts' ),
2011-02-06 18:50:50 -05:00
'$last_update' => $last_update ,
2018-01-21 13:33:59 -05:00
'$udnow' => L10n :: t ( 'Update now' ),
2015-10-10 05:06:18 -04:00
'$follow' => $follow ,
2017-09-12 02:08:24 -04:00
'$follow_text' => $follow_text ,
2015-02-21 14:03:02 -05:00
'$profile_select' => $profile_select ,
2011-11-09 22:30:14 -05:00
'$contact_id' => $contact [ 'id' ],
2018-01-21 13:33:59 -05:00
'$block_text' => (( $contact [ 'blocked' ]) ? L10n :: t ( 'Unblock' ) : L10n :: t ( 'Block' ) ),
'$ignore_text' => (( $contact [ 'readonly' ]) ? L10n :: t ( 'Unignore' ) : L10n :: t ( 'Ignore' ) ),
2011-11-09 22:30:14 -05:00
'$insecure' => (( $contact [ 'network' ] !== NETWORK_DFRN && $contact [ 'network' ] !== NETWORK_MAIL && $contact [ 'network' ] !== NETWORK_FACEBOOK && $contact [ 'network' ] !== NETWORK_DIASPORA ) ? $insecure : '' ),
'$info' => $contact [ 'info' ],
2018-01-15 08:05:12 -05:00
'$cinfo' => [ 'info' , '' , $contact [ 'info' ], '' ],
2018-01-21 13:33:59 -05:00
'$blocked' => (( $contact [ 'blocked' ]) ? L10n :: t ( 'Currently blocked' ) : '' ),
'$ignored' => (( $contact [ 'readonly' ]) ? L10n :: t ( 'Currently ignored' ) : '' ),
'$archived' => (( $contact [ 'archive' ]) ? L10n :: t ( 'Currently archived' ) : '' ),
'$pending' => (( $contact [ 'pending' ]) ? L10n :: t ( 'Awaiting connection acknowledge' ) : '' ),
'$hidden' => [ 'hidden' , L10n :: t ( 'Hide this contact from others' ), ( $contact [ 'hidden' ] == 1 ), L10n :: t ( 'Replies/likes to your public posts <strong>may</strong> still be visible' )],
'$notify' => [ 'notify' , L10n :: t ( 'Notification for new posts' ), ( $contact [ 'notify_new_posts' ] == 1 ), L10n :: t ( 'Send a notification of every new post of this contact' )],
2015-02-20 17:12:04 -05:00
'$fetch_further_information' => $fetch_further_information ,
2014-10-29 19:24:23 -04:00
'$ffi_keyword_blacklist' => $contact [ 'ffi_keyword_blacklist' ],
2018-01-21 13:33:59 -05:00
'$ffi_keyword_blacklist' => [ 'ffi_keyword_blacklist' , L10n :: t ( 'Blacklisted keywords' ), $contact [ 'ffi_keyword_blacklist' ], L10n :: t ( 'Comma separated list of keywords that should not be converted to hashtags, when "Fetch information and keywords" is selected' )],
2011-11-09 22:30:14 -05:00
'$photo' => $contact [ 'photo' ],
2015-10-07 18:25:55 -04:00
'$name' => htmlentities ( $contact [ 'name' ]),
2010-07-06 08:07:28 -04:00
'$dir_icon' => $dir_icon ,
2010-09-27 22:48:45 -04:00
'$sparkle' => $sparkle ,
2012-12-22 14:57:29 -05:00
'$url' => $url ,
2018-01-21 13:33:59 -05:00
'$profileurllabel' => L10n :: t ( 'Profile URL' ),
2015-07-18 04:57:31 -04:00
'$profileurl' => $contact [ 'url' ],
2017-11-19 17:03:39 -05:00
'$account_type' => Contact :: getAccountType ( $contact ),
2015-11-29 11:04:48 -05:00
'$location' => bbcode ( $contact [ " location " ]),
2018-01-21 13:33:59 -05:00
'$location_label' => L10n :: t ( " Location: " ),
2016-09-25 11:28:00 -04:00
'$xmpp' => bbcode ( $contact [ " xmpp " ]),
2018-01-21 13:33:59 -05:00
'$xmpp_label' => L10n :: t ( " XMPP: " ),
2015-11-29 11:04:48 -05:00
'$about' => bbcode ( $contact [ " about " ], false , false ),
2018-01-21 13:33:59 -05:00
'$about_label' => L10n :: t ( " About: " ),
2015-11-29 11:04:48 -05:00
'$keywords' => $contact [ " keywords " ],
2018-01-21 13:33:59 -05:00
'$keywords_label' => L10n :: t ( " Tags: " ),
'$contact_action_button' => L10n :: t ( " Actions " ),
2016-02-07 19:56:15 -05:00
'$contact_actions' => $contact_actions ,
2018-01-21 13:33:59 -05:00
'$contact_status' => L10n :: t ( " Status " ),
'$contact_settings_label' => L10n :: t ( 'Contact Settings' ),
'$contact_profile_label' => L10n :: t ( " Profile " ),
2018-01-15 08:05:12 -05:00
]);
2010-07-06 08:07:28 -04:00
2018-01-15 08:05:12 -05:00
$arr = [ 'contact' => $contact , 'output' => $o ];
2011-01-07 06:15:52 -05:00
2018-01-17 13:42:40 -05:00
Addon :: callHooks ( 'contact_edit' , $arr );
2011-01-07 06:15:52 -05:00
return $arr [ 'output' ];
2010-07-06 08:07:28 -04:00
}
2010-07-19 09:58:03 -04:00
2018-01-05 21:05:18 -05:00
$blocked = false ;
$hidden = false ;
$ignored = false ;
2018-01-01 16:27:01 -05:00
$archived = false ;
2018-01-05 21:05:18 -05:00
$all = false ;
2012-02-11 06:07:15 -05:00
2018-01-05 21:05:18 -05:00
if (( $a -> argc == 2 ) && ( $a -> argv [ 1 ] === 'all' )) {
2010-07-01 19:48:07 -04:00
$sql_extra = '' ;
2012-02-13 23:38:00 -05:00
$all = true ;
2018-01-05 21:05:18 -05:00
} elseif (( $a -> argc == 2 ) && ( $a -> argv [ 1 ] === 'blocked' )) {
2012-02-13 23:38:00 -05:00
$sql_extra = " AND `blocked` = 1 " ;
$blocked = true ;
2018-01-05 21:05:18 -05:00
} elseif (( $a -> argc == 2 ) && ( $a -> argv [ 1 ] === 'hidden' )) {
2012-02-13 23:38:00 -05:00
$sql_extra = " AND `hidden` = 1 " ;
$hidden = true ;
2018-01-05 21:05:18 -05:00
} elseif (( $a -> argc == 2 ) && ( $a -> argv [ 1 ] === 'ignored' )) {
2012-02-14 01:48:35 -05:00
$sql_extra = " AND `readonly` = 1 " ;
$ignored = true ;
2018-01-05 21:05:18 -05:00
} elseif (( $a -> argc == 2 ) && ( $a -> argv [ 1 ] === 'archived' )) {
2012-04-27 20:17:58 -04:00
$sql_extra = " AND `archive` = 1 " ;
$archived = true ;
2018-01-01 16:27:01 -05:00
} else {
2017-03-21 12:02:59 -04:00
$sql_extra = " AND `blocked` = 0 " ;
2018-01-01 16:27:01 -05:00
}
2012-02-13 23:38:00 -05:00
2018-01-01 16:27:01 -05:00
$search = x ( $_GET , 'search' ) ? notags ( trim ( $_GET [ 'search' ])) : '' ;
2018-01-05 21:05:18 -05:00
$nets = x ( $_GET , 'nets' ) ? notags ( trim ( $_GET [ 'nets' ])) : '' ;
2010-08-17 21:44:13 -04:00
2018-01-15 08:05:12 -05:00
$tabs = [
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Suggestions' ),
2016-02-17 17:47:32 -05:00
'url' => 'suggest' ,
2012-03-20 19:05:32 -04:00
'sel' => '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Suggest potential friends' ),
2018-01-05 21:05:18 -05:00
'id' => 'suggestions-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'g' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'All Contacts' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts/all' ,
2012-02-13 23:38:00 -05:00
'sel' => ( $all ) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Show all contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showall-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'l' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Unblocked' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts' ,
2018-01-05 21:05:18 -05:00
'sel' => (( ! $all ) && ( ! $blocked ) && ( ! $hidden ) && ( ! $search ) && ( ! $nets ) && ( ! $ignored ) && ( ! $archived )) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Only show unblocked contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showunblocked-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'o' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Blocked' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts/blocked' ,
2012-02-13 23:38:00 -05:00
'sel' => ( $blocked ) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Only show blocked contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showblocked-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'b' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Ignored' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts/ignored' ,
2012-02-14 01:48:35 -05:00
'sel' => ( $ignored ) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Only show ignored contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showignored-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'i' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Archived' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts/archived' ,
2012-04-27 20:17:58 -04:00
'sel' => ( $archived ) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Only show archived contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showarchived-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'y' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Hidden' ),
2016-02-17 17:47:32 -05:00
'url' => 'contacts/hidden' ,
2012-02-13 23:38:00 -05:00
'sel' => ( $hidden ) ? 'active' : '' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Only show hidden contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'showhidden-tab' ,
2015-08-08 11:33:43 -04:00
'accesskey' => 'h' ,
2018-01-15 08:05:12 -05:00
],
];
2012-02-13 23:38:00 -05:00
$tab_tpl = get_markup_template ( 'common_tabs.tpl' );
2018-01-15 08:05:12 -05:00
$t = replace_macros ( $tab_tpl , [ '$tabs' => $tabs ]);
2012-02-13 23:38:00 -05:00
2018-01-05 21:05:18 -05:00
$total = 0 ;
2012-06-20 19:05:46 -04:00
$searching = false ;
2018-01-01 16:27:01 -05:00
$search_hdr = null ;
if ( $search ) {
2018-01-05 21:05:18 -05:00
$searching = true ;
2012-02-14 01:48:35 -05:00
$search_hdr = $search ;
2012-06-20 19:20:55 -04:00
$search_txt = dbesc ( protect_sprintf ( preg_quote ( $search )));
2018-01-05 21:05:18 -05:00
$sql_extra .= " AND (name REGEXP ' $search_txt ' OR url REGEXP ' $search_txt ' OR nick REGEXP ' $search_txt ') " ;
2012-02-14 01:48:35 -05:00
}
2010-08-17 21:44:13 -04:00
2018-01-01 16:27:01 -05:00
if ( $nets ) {
2012-02-12 00:39:51 -05:00
$sql_extra .= sprintf ( " AND network = '%s' " , dbesc ( $nets ));
2018-01-01 16:27:01 -05:00
}
2010-08-17 21:44:13 -04:00
2018-01-05 21:05:18 -05:00
$sql_extra2 = ((( $sort_type > 0 ) && ( $sort_type <= CONTACT_IS_FRIEND )) ? sprintf ( " AND `rel` = %d " , intval ( $sort_type )) : '' );
2015-01-28 17:34:46 -05:00
$r = q ( " SELECT COUNT(*) AS `total` FROM `contact`
2012-03-13 19:02:20 -04:00
WHERE `uid` = % d AND `self` = 0 AND `pending` = 0 $sql_extra $sql_extra2 " ,
2018-01-01 16:27:01 -05:00
intval ( $_SESSION [ 'uid' ])
);
2017-11-07 22:57:46 -05:00
if ( DBM :: is_result ( $r )) {
2010-07-30 09:09:20 -04:00
$a -> set_pager_total ( $r [ 0 ][ 'total' ]);
2012-03-09 05:50:57 -05:00
$total = $r [ 0 ][ 'total' ];
}
2012-02-13 23:38:00 -05:00
2018-01-15 09:50:06 -05:00
$sql_extra3 = Widget :: unavailableNetworks ();
2012-02-13 23:38:00 -05:00
2018-01-15 08:05:12 -05:00
$contacts = [];
2018-01-05 21:05:18 -05:00
2015-11-29 07:37:24 -05:00
$r = q ( " SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 0 AND `pending` = 0 $sql_extra $sql_extra2 $sql_extra3 ORDER BY `name` ASC LIMIT %d , %d " ,
2010-08-17 21:44:13 -04:00
intval ( $_SESSION [ 'uid' ]),
intval ( $a -> pager [ 'start' ]),
intval ( $a -> pager [ 'itemspage' ])
);
2017-11-07 22:57:46 -05:00
if ( DBM :: is_result ( $r )) {
2016-12-14 03:31:27 -05:00
foreach ( $r as $rr ) {
2015-06-23 04:09:27 -04:00
$contacts [] = _contact_detail_for_template ( $rr );
2010-07-01 19:48:07 -04:00
}
}
2014-10-23 19:37:33 -04:00
2012-02-23 05:22:32 -05:00
$tpl = get_markup_template ( " contacts-template.tpl " );
2018-01-15 08:05:12 -05:00
$o .= replace_macros ( $tpl , [
2017-08-26 03:32:10 -04:00
'$baseurl' => System :: baseUrl (),
2018-01-21 13:33:59 -05:00
'$header' => L10n :: t ( 'Contacts' ) . (( $nets ) ? ' - ' . ContactSelector :: networkToName ( $nets ) : '' ),
2012-02-23 05:22:32 -05:00
'$tabs' => $t ,
2012-03-09 05:50:57 -05:00
'$total' => $total ,
2012-02-23 05:22:32 -05:00
'$search' => $search_hdr ,
2018-01-21 13:33:59 -05:00
'$desc' => L10n :: t ( 'Search your contacts' ),
'$finding' => $searching ? L10n :: t ( 'Results for: %s' , $search ) : " " ,
'$submit' => L10n :: t ( 'Find' ),
2012-02-23 05:22:32 -05:00
'$cmd' => $a -> cmd ,
'$contacts' => $contacts ,
2018-01-21 13:33:59 -05:00
'$contact_drop_confirm' => L10n :: t ( 'Do you really want to delete this contact?' ),
2015-10-18 11:12:48 -04:00
'multiselect' => 1 ,
2018-01-15 08:05:12 -05:00
'$batch_actions' => [
2018-01-21 13:33:59 -05:00
'contacts_batch_update' => L10n :: t ( 'Update' ),
'contacts_batch_block' => L10n :: t ( 'Block' ) . " / " . L10n :: t ( " Unblock " ),
" contacts_batch_ignore " => L10n :: t ( 'Ignore' ) . " / " . L10n :: t ( " Unignore " ),
" contacts_batch_archive " => L10n :: t ( 'Archive' ) . " / " . L10n :: t ( " Unarchive " ),
" contacts_batch_drop " => L10n :: t ( 'Delete' ),
2018-01-15 08:05:12 -05:00
],
2018-01-21 13:33:59 -05:00
'$h_batch_actions' => L10n :: t ( 'Batch Actions' ),
2012-02-23 05:22:32 -05:00
'$paginate' => paginate ( $a ),
2018-01-15 08:05:12 -05:00
]);
2015-04-11 17:51:47 -04:00
2010-07-01 19:48:07 -04:00
return $o ;
2011-05-23 05:39:57 -04:00
}
2015-06-23 04:09:27 -04:00
2016-02-08 17:51:51 -05:00
/**
* @ brief List of pages for the Contact TabBar
2017-01-09 07:12:54 -05:00
*
2016-02-08 17:51:51 -05:00
* Available Pages are 'Status' , 'Profile' , 'Contacts' and 'Common Friends'
2017-01-09 07:12:54 -05:00
*
2017-04-30 00:17:49 -04:00
* @ param App $a
2016-02-08 17:51:51 -05:00
* @ param int $contact_id The ID of the contact
* @ param int $active_tab 1 if tab should be marked as active
2017-01-09 07:12:54 -05:00
*
2018-01-05 21:05:18 -05:00
* @ return string
2016-02-08 17:51:51 -05:00
*/
2018-01-05 21:05:18 -05:00
function contacts_tab ( $a , $contact_id , $active_tab )
{
2015-11-29 17:22:05 -05:00
// tabs
2018-01-15 08:05:12 -05:00
$tabs = [
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Status' ),
2018-01-05 21:05:18 -05:00
'url' => " contacts/ " . $contact_id . " /posts " ,
'sel' => (( $active_tab == 1 ) ? 'active' : '' ),
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Status Messages and Posts' ),
2018-01-05 21:05:18 -05:00
'id' => 'status-tab' ,
2015-11-29 17:22:05 -05:00
'accesskey' => 'm' ,
2018-01-15 08:05:12 -05:00
],
[
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Profile' ),
2018-01-05 21:05:18 -05:00
'url' => " contacts/ " . $contact_id ,
'sel' => (( $active_tab == 2 ) ? 'active' : '' ),
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Profile Details' ),
2018-01-05 21:05:18 -05:00
'id' => 'profile-tab' ,
2015-12-02 01:56:10 -05:00
'accesskey' => 'o' ,
2018-01-15 08:05:12 -05:00
]
];
2015-12-01 02:12:05 -05:00
2016-02-08 17:51:51 -05:00
// Show this tab only if there is visible friend list
2017-12-07 09:09:28 -05:00
$x = GContact :: countAllFriends ( local_user (), $contact_id );
2018-01-05 21:05:18 -05:00
if ( $x ) {
2018-01-21 13:33:59 -05:00
$tabs [] = [ 'label' => L10n :: t ( 'Contacts' ),
2018-01-05 21:05:18 -05:00
'url' => " allfriends/ " . $contact_id ,
'sel' => (( $active_tab == 3 ) ? 'active' : '' ),
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'View all contacts' ),
2018-01-05 21:05:18 -05:00
'id' => 'allfriends-tab' ,
2018-01-15 08:05:12 -05:00
'accesskey' => 't' ];
2018-01-05 21:05:18 -05:00
}
2015-12-01 02:12:05 -05:00
2016-02-08 17:51:51 -05:00
// Show this tab only if there is visible common friend list
2017-12-07 09:09:28 -05:00
$common = GContact :: countCommonFriends ( local_user (), $contact_id );
2018-01-05 21:05:18 -05:00
if ( $common ) {
2018-01-21 13:33:59 -05:00
$tabs [] = [ 'label' => L10n :: t ( 'Common Friends' ),
2018-01-05 21:05:18 -05:00
'url' => " common/loc/ " . local_user () . " / " . $contact_id ,
'sel' => (( $active_tab == 4 ) ? 'active' : '' ),
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'View all common friends' ),
2018-01-05 21:05:18 -05:00
'id' => 'common-loc-tab' ,
'accesskey' => 'd'
2018-01-15 08:05:12 -05:00
];
2018-01-05 21:05:18 -05:00
}
2015-12-01 02:12:05 -05:00
2018-01-21 13:33:59 -05:00
$tabs [] = [ 'label' => L10n :: t ( 'Advanced' ),
2018-01-05 21:05:18 -05:00
'url' => 'crepair/' . $contact_id ,
'sel' => (( $active_tab == 5 ) ? 'active' : '' ),
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Advanced Contact Settings' ),
2018-01-05 21:05:18 -05:00
'id' => 'advanced-tab' ,
'accesskey' => 'r'
2018-01-15 08:05:12 -05:00
];
2015-12-01 02:12:05 -05:00
2015-11-29 17:22:05 -05:00
$tab_tpl = get_markup_template ( 'common_tabs.tpl' );
2018-01-15 08:05:12 -05:00
$tab_str = replace_macros ( $tab_tpl , [ '$tabs' => $tabs ]);
2015-11-29 17:22:05 -05:00
return $tab_str ;
}
2018-01-05 21:05:18 -05:00
function contact_posts ( $a , $contact_id )
{
$o = contacts_tab ( $a , $contact_id , 1 );
2015-11-29 17:22:05 -05:00
2018-01-10 08:36:02 -05:00
$contact = dba :: selectFirst ( 'contact' , [ 'url' ], [ 'id' => $contact_id ]);
2018-01-05 21:05:18 -05:00
if ( DBM :: is_result ( $contact )) {
2015-11-29 17:22:05 -05:00
$a -> page [ 'aside' ] = " " ;
2018-01-14 21:22:39 -05:00
Profile :: load ( $a , " " , 0 , Contact :: getDetailsByURL ( $contact [ " url " ]));
2018-01-05 21:05:18 -05:00
$o .= Contact :: getPostsFromUrl ( $contact [ " url " ]);
2018-01-01 16:27:01 -05:00
}
2015-11-29 17:22:05 -05:00
return $o ;
}
2018-01-05 21:05:18 -05:00
function _contact_detail_for_template ( $rr )
{
$dir_icon = '' ;
$alt_text = '' ;
switch ( $rr [ 'rel' ]) {
2015-06-23 04:09:27 -04:00
case CONTACT_IS_FRIEND :
$dir_icon = 'images/lrarrow.gif' ;
2018-01-21 13:33:59 -05:00
$alt_text = L10n :: t ( 'Mutual Friendship' );
2015-06-23 04:09:27 -04:00
break ;
2018-01-05 21:05:18 -05:00
case CONTACT_IS_FOLLOWER ;
2015-06-23 04:09:27 -04:00
$dir_icon = 'images/larrow.gif' ;
2018-01-21 13:33:59 -05:00
$alt_text = L10n :: t ( 'is a fan of yours' );
2015-06-23 04:09:27 -04:00
break ;
case CONTACT_IS_SHARING ;
$dir_icon = 'images/rarrow.gif' ;
2018-01-21 13:33:59 -05:00
$alt_text = L10n :: t ( 'you are a fan of' );
2015-06-23 04:09:27 -04:00
break ;
default :
break ;
}
2018-01-05 21:05:18 -05:00
if (( $rr [ 'network' ] === NETWORK_DFRN ) && ( $rr [ 'rel' ])) {
2015-06-23 04:09:27 -04:00
$url = " redir/ { $rr [ 'id' ] } " ;
$sparkle = ' class="sparkle" ' ;
2018-01-05 21:05:18 -05:00
} else {
2015-06-23 04:09:27 -04:00
$url = $rr [ 'url' ];
$sparkle = '' ;
}
2015-10-07 02:25:10 -04:00
2018-01-15 08:05:12 -05:00
return [
2018-01-21 13:33:59 -05:00
'img_hover' => L10n :: t ( 'Visit %s\'s profile [%s]' , $rr [ 'name' ], $rr [ 'url' ]),
'edit_hover' => L10n :: t ( 'Edit contact' ),
2017-11-19 17:03:39 -05:00
'photo_menu' => Contact :: photoMenu ( $rr ),
2015-06-23 04:09:27 -04:00
'id' => $rr [ 'id' ],
'alt_text' => $alt_text ,
'dir_icon' => $dir_icon ,
2015-10-07 02:25:10 -04:00
'thumb' => proxy_url ( $rr [ 'thumb' ], false , PROXY_SIZE_THUMB ),
2015-10-07 18:25:55 -04:00
'name' => htmlentities ( $rr [ 'name' ]),
'username' => htmlentities ( $rr [ 'name' ]),
2017-11-19 17:03:39 -05:00
'account_type' => Contact :: getAccountType ( $rr ),
2015-06-23 04:09:27 -04:00
'sparkle' => $sparkle ,
2015-11-05 18:47:54 -05:00
'itemurl' => (( $rr [ 'addr' ] != " " ) ? $rr [ 'addr' ] : $rr [ 'url' ]),
2015-06-23 04:09:27 -04:00
'url' => $url ,
2018-01-09 22:42:04 -05:00
'network' => ContactSelector :: networkToName ( $rr [ 'network' ], $rr [ 'url' ]),
2018-01-15 08:05:12 -05:00
];
2015-07-16 04:09:59 -04:00
}
2016-02-07 19:56:15 -05:00
2016-02-08 09:00:53 -05:00
/**
* @ brief Gives a array with actions which can performed to a given contact
2017-01-09 07:12:54 -05:00
*
2016-02-08 09:00:53 -05:00
* This includes actions like e . g . 'block' , 'hide' , 'archive' , 'delete' and others
2017-01-09 07:12:54 -05:00
*
2016-02-08 09:00:53 -05:00
* @ param array $contact Data about the Contact
2016-02-08 17:51:51 -05:00
* @ return array with contact related actions
2016-02-08 09:00:53 -05:00
*/
2018-01-05 21:05:18 -05:00
function contact_actions ( $contact )
{
2018-01-15 08:05:12 -05:00
$poll_enabled = in_array ( $contact [ 'network' ], [ NETWORK_DFRN , NETWORK_OSTATUS , NETWORK_FEED , NETWORK_MAIL ]);
$contact_actions = [];
2016-02-08 09:00:53 -05:00
2016-02-08 17:51:51 -05:00
// Provide friend suggestion only for Friendica contacts
2018-01-05 21:05:18 -05:00
if ( $contact [ 'network' ] === NETWORK_DFRN ) {
2018-01-15 08:05:12 -05:00
$contact_actions [ 'suggest' ] = [
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Suggest friends' ),
2018-01-05 21:05:18 -05:00
'url' => 'fsuggest/' . $contact [ 'id' ],
'title' => '' ,
'sel' => '' ,
'id' => 'suggest' ,
2018-01-15 08:05:12 -05:00
];
2016-02-08 09:00:53 -05:00
}
2018-01-05 21:05:18 -05:00
if ( $poll_enabled ) {
2018-01-15 08:05:12 -05:00
$contact_actions [ 'update' ] = [
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Update now' ),
2018-01-05 21:05:18 -05:00
'url' => 'contacts/' . $contact [ 'id' ] . '/update' ,
'title' => '' ,
'sel' => '' ,
'id' => 'update' ,
2018-01-15 08:05:12 -05:00
];
2016-02-08 09:00:53 -05:00
}
2018-01-15 08:05:12 -05:00
$contact_actions [ 'block' ] = [
2018-01-21 13:33:59 -05:00
'label' => ( intval ( $contact [ 'blocked' ]) ? L10n :: t ( 'Unblock' ) : L10n :: t ( 'Block' ) ),
2018-01-05 21:05:18 -05:00
'url' => 'contacts/' . $contact [ 'id' ] . '/block' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Toggle Blocked status' ),
2018-01-05 21:05:18 -05:00
'sel' => ( intval ( $contact [ 'blocked' ]) ? 'active' : '' ),
'id' => 'toggle-block' ,
2018-01-15 08:05:12 -05:00
];
2016-02-08 09:00:53 -05:00
2018-01-15 08:05:12 -05:00
$contact_actions [ 'ignore' ] = [
2018-01-21 13:33:59 -05:00
'label' => ( intval ( $contact [ 'readonly' ]) ? L10n :: t ( 'Unignore' ) : L10n :: t ( 'Ignore' ) ),
2018-01-05 21:05:18 -05:00
'url' => 'contacts/' . $contact [ 'id' ] . '/ignore' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Toggle Ignored status' ),
2018-01-05 21:05:18 -05:00
'sel' => ( intval ( $contact [ 'readonly' ]) ? 'active' : '' ),
'id' => 'toggle-ignore' ,
2018-01-15 08:05:12 -05:00
];
2016-02-08 09:00:53 -05:00
2018-01-15 08:05:12 -05:00
$contact_actions [ 'archive' ] = [
2018-01-21 13:33:59 -05:00
'label' => ( intval ( $contact [ 'archive' ]) ? L10n :: t ( 'Unarchive' ) : L10n :: t ( 'Archive' ) ),
2018-01-05 21:05:18 -05:00
'url' => 'contacts/' . $contact [ 'id' ] . '/archive' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Toggle Archive status' ),
2018-01-05 21:05:18 -05:00
'sel' => ( intval ( $contact [ 'archive' ]) ? 'active' : '' ),
'id' => 'toggle-archive' ,
2018-01-15 08:05:12 -05:00
];
2016-02-08 09:00:53 -05:00
2018-01-15 08:05:12 -05:00
$contact_actions [ 'delete' ] = [
2018-01-21 13:33:59 -05:00
'label' => L10n :: t ( 'Delete' ),
2018-01-05 21:05:18 -05:00
'url' => 'contacts/' . $contact [ 'id' ] . '/drop' ,
2018-01-21 13:33:59 -05:00
'title' => L10n :: t ( 'Delete contact' ),
2018-01-05 21:05:18 -05:00
'sel' => '' ,
'id' => 'delete' ,
2018-01-15 08:05:12 -05:00
];
2016-02-07 19:56:15 -05:00
2016-02-08 17:15:20 -05:00
return $contact_actions ;
2016-02-07 19:56:15 -05:00
}