2011-04-14 03:14:30 +00:00
< ? php
2018-01-01 21:27:01 +00:00
2017-11-29 17:17:12 +00:00
/**
* @ file mod / crepair . php
*/
2017-04-30 04:07:00 +00:00
use Friendica\App ;
2017-11-07 02:22:52 +00:00
use Friendica\Core\Config ;
2017-11-08 03:57:46 +00:00
use Friendica\Database\DBM ;
2017-12-07 14:04:24 +00:00
use Friendica\Model\Contact ;
2017-04-30 04:07:00 +00:00
2017-11-19 22:06:18 +00:00
require_once 'mod/contacts.php' ;
2011-04-14 03:14:30 +00:00
2018-01-01 21:27:01 +00:00
function crepair_init ( App $a )
{
if ( ! local_user ()) {
2011-11-10 03:30:14 +00:00
return ;
2016-12-20 10:56:34 +00:00
}
2011-11-10 03:30:14 +00:00
2018-01-13 04:41:18 +00:00
$contact = null ;
2018-01-01 21:27:01 +00:00
if (( $a -> argc == 2 ) && intval ( $a -> argv [ 1 ])) {
2018-01-13 04:41:18 +00:00
$contact = dba :: selectFirst ( 'contact' , [], [ 'uid' => local_user (), 'id' => $a -> argv [ 1 ]]);
2011-11-10 03:30:14 +00:00
}
2018-01-01 21:27:01 +00:00
if ( ! x ( $a -> page , 'aside' )) {
2011-11-10 03:30:14 +00:00
$a -> page [ 'aside' ] = '' ;
2018-01-01 21:27:01 +00:00
}
2011-11-10 03:30:14 +00:00
2018-01-13 04:41:18 +00:00
if ( DBM :: is_result ( $contact )) {
$a -> data [ 'contact' ] = $contact ;
2017-11-19 22:03:39 +00:00
profile_load ( $a , " " , 0 , Contact :: getDetailsByURL ( $contact [ " url " ]));
2014-01-05 15:10:02 +00:00
}
2011-11-10 03:30:14 +00:00
}
2018-01-01 21:27:01 +00:00
function crepair_post ( App $a )
{
if ( ! local_user ()) {
2011-04-14 03:14:30 +00:00
return ;
2016-12-20 10:56:34 +00:00
}
2011-04-14 03:14:30 +00:00
$cid = (( $a -> argc > 1 ) ? intval ( $a -> argv [ 1 ]) : 0 );
2018-01-13 04:41:18 +00:00
$contact = null ;
2018-01-01 21:27:01 +00:00
if ( $cid ) {
2018-01-13 04:41:18 +00:00
$contact = dba :: selectFirst ( 'contact' , [], [ 'id' => $cid , 'uid' => local_user ()]);
2011-04-14 03:14:30 +00:00
}
2018-01-13 04:41:18 +00:00
if ( ! DBM :: is_result ( $contact )) {
2011-04-14 03:14:30 +00:00
return ;
2016-12-20 09:10:33 +00:00
}
2011-04-14 03:14:30 +00:00
2018-01-01 21:27:01 +00:00
$name = defaults ( $_POST , 'name' , $contact [ 'name' ]);
$nick = defaults ( $_POST , 'nick' , '' );
$url = defaults ( $_POST , 'url' , '' );
$request = defaults ( $_POST , 'request' , '' );
$confirm = defaults ( $_POST , 'confirm' , '' );
$notify = defaults ( $_POST , 'notify' , '' );
$poll = defaults ( $_POST , 'poll' , '' );
$attag = defaults ( $_POST , 'attag' , '' );
$photo = defaults ( $_POST , 'photo' , '' );
$remote_self = defaults ( $_POST , 'remote_self' , false );
$nurl = normalise_link ( $url );
2011-04-14 03:14:30 +00:00
2014-09-11 21:37:55 +00:00
$r = q ( " UPDATE `contact` SET `name` = '%s', `nick` = '%s', `url` = '%s', `nurl` = '%s', `request` = '%s', `confirm` = '%s', `notify` = '%s', `poll` = '%s', `attag` = '%s' , `remote_self` = %d
2014-03-11 22:52:32 +00:00
WHERE `id` = % d AND `uid` = % d " ,
2012-01-13 02:54:35 +00:00
dbesc ( $name ),
2011-04-14 03:14:30 +00:00
dbesc ( $nick ),
dbesc ( $url ),
2014-09-11 21:37:55 +00:00
dbesc ( $nurl ),
2011-04-14 03:14:30 +00:00
dbesc ( $request ),
dbesc ( $confirm ),
dbesc ( $notify ),
dbesc ( $poll ),
2011-09-05 05:40:36 +00:00
dbesc ( $attag ),
2014-01-05 15:10:02 +00:00
intval ( $remote_self ),
2011-04-14 03:14:30 +00:00
intval ( $contact [ 'id' ]),
local_user ()
);
2017-11-29 17:17:12 +00:00
if ( $photo ) {
2011-10-06 03:01:42 +00:00
logger ( 'mod-crepair: updating photo from ' . $photo );
2017-11-29 22:29:11 +00:00
Contact :: updateAvatar ( $photo , local_user (), $contact [ 'id' ]);
2011-10-06 03:01:42 +00:00
}
2017-11-29 17:17:12 +00:00
if ( $r ) {
info ( t ( 'Contact settings applied.' ) . EOL );
} else {
notice ( t ( 'Contact update failed.' ) . EOL );
}
2011-10-06 03:01:42 +00:00
2011-04-14 03:14:30 +00:00
return ;
}
2018-01-01 21:27:01 +00:00
function crepair_content ( App $a )
{
if ( ! local_user ()) {
notice ( t ( 'Permission denied.' ) . EOL );
2011-04-14 03:14:30 +00:00
return ;
}
$cid = (( $a -> argc > 1 ) ? intval ( $a -> argv [ 1 ]) : 0 );
2018-01-13 04:41:18 +00:00
$contact = null ;
2018-01-01 21:27:01 +00:00
if ( $cid ) {
2018-01-13 04:41:18 +00:00
$contact = dba :: selectFirst ( 'contact' , [], [ 'id' => $cid , 'uid' => local_user ()]);
2011-04-14 03:14:30 +00:00
}
2018-01-13 04:41:18 +00:00
if ( ! DBM :: is_result ( $contact )) {
2018-01-01 21:27:01 +00:00
notice ( t ( 'Contact not found.' ) . EOL );
2011-04-14 03:14:30 +00:00
return ;
}
2015-10-24 13:57:46 +00:00
$warning = t ( '<strong>WARNING: This is highly advanced</strong> and if you enter incorrect information your communications with this contact may stop working.' );
$info = t ( 'Please use your browser \'Back\' button <strong>now</strong> if you are uncertain what to do on this page.' );
2011-04-14 03:14:30 +00:00
2015-10-24 13:57:46 +00:00
$returnaddr = " contacts/ $cid " ;
2012-01-13 02:54:35 +00:00
2018-01-01 21:27:01 +00:00
$allow_remote_self = Config :: get ( 'system' , 'allow_users_remote_self' );
2014-09-06 15:22:59 +00:00
// Disable remote self for everything except feeds.
// There is an issue when you repeat an item from maybe twitter and you got comments from friendica and twitter
// Problem is, you couldn't reply to both networks.
2018-01-01 21:27:01 +00:00
if ( ! in_array ( $contact [ 'network' ], array ( NETWORK_FEED , NETWORK_DFRN , NETWORK_DIASPORA ))) {
2014-09-06 15:22:59 +00:00
$allow_remote_self = false ;
2018-01-01 21:27:01 +00:00
}
2014-09-06 15:22:59 +00:00
2018-01-01 21:27:01 +00:00
if ( $contact [ 'network' ] == NETWORK_FEED ) {
$remote_self_options = array ( '0' => t ( 'No mirroring' ), '1' => t ( 'Mirror as forwarded posting' ), '2' => t ( 'Mirror as my own posting' ));
} else {
$remote_self_options = array ( '0' => t ( 'No mirroring' ), '2' => t ( 'Mirror as my own posting' ));
}
2014-10-22 06:30:16 +00:00
2018-01-01 21:27:01 +00:00
$update_profile = in_array ( $contact [ 'network' ], array ( NETWORK_DFRN , NETWORK_DIASPORA , NETWORK_OSTATUS ));
2015-04-11 21:51:47 +00:00
2015-12-01 07:12:05 +00:00
$tab_str = contacts_tab ( $a , $contact [ 'id' ], 5 );
2015-11-29 22:22:05 +00:00
2011-05-11 11:37:13 +00:00
$tpl = get_markup_template ( 'crepair.tpl' );
2018-01-01 21:27:01 +00:00
$o = replace_macros ( $tpl , array (
'$tab_str' => $tab_str ,
'$warning' => $warning ,
'$info' => $info ,
'$returnaddr' => $returnaddr ,
'$return' => t ( 'Return to contact editor' ),
'$update_profile' => $update_profile ,
'$udprofilenow' => t ( 'Refetch contact data' ),
'$contact_id' => $contact [ 'id' ],
'$lbl_submit' => t ( 'Submit' ),
2013-12-22 16:05:49 +00:00
'$label_remote_self' => t ( 'Remote Self' ),
2014-09-06 15:22:59 +00:00
'$allow_remote_self' => $allow_remote_self ,
2015-10-24 13:57:46 +00:00
'$remote_self' => array ( 'remote_self' ,
2018-01-01 21:27:01 +00:00
t ( 'Mirror postings from this contact' ),
$contact [ 'remote_self' ],
t ( 'Mark this contact as remote_self, this will cause friendica to repost new entries from this contact.' ),
$remote_self_options
),
2016-07-26 07:09:40 +00:00
'$name' => array ( 'name' , t ( 'Name' ) , htmlentities ( $contact [ 'name' ])),
'$nick' => array ( 'nick' , t ( 'Account Nickname' ), htmlentities ( $contact [ 'nick' ])),
'$attag' => array ( 'attag' , t ( '@Tagname - overrides Name/Nickname' ), $contact [ 'attag' ]),
'$url' => array ( 'url' , t ( 'Account URL' ), $contact [ 'url' ]),
'$request' => array ( 'request' , t ( 'Friend Request URL' ), $contact [ 'request' ]),
'confirm' => array ( 'confirm' , t ( 'Friend Confirm URL' ), $contact [ 'confirm' ]),
'notify' => array ( 'notify' , t ( 'Notification Endpoint URL' ), $contact [ 'notify' ]),
'poll' => array ( 'poll' , t ( 'Poll/Feed URL' ), $contact [ 'poll' ]),
'photo' => array ( 'photo' , t ( 'New photo from this URL' ), '' ),
2015-10-24 13:57:46 +00:00
));
2011-04-14 03:14:30 +00:00
return $o ;
2011-05-23 09:39:57 +00:00
}