+ if($a->argc == 3) {
+
+ $contact_id = intval($a->argv[1]);
+ if(! $contact_id)
+ return;
+
+ $cmd = $a->argv[2];
+
+ $orig_record = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
+ intval($contact_id),
+ intval(local_user())
+ );
+
+ if(! count($orig_record)) {
+ notice( t('Could not access contact record.') . EOL);
+ goaway($a->get_baseurl() . '/contacts');
+ return; // NOTREACHED
+ }
+
+
+ if($cmd === 'block') {
+ $blocked = (($orig_record[0]['blocked']) ? 0 : 1);
+ $r = q("UPDATE `contact` SET `blocked` = %d WHERE `id` = %d AND `uid` = %d LIMIT 1",
+ intval($blocked),
+ intval($contact_id),
+ intval(local_user())
+ );
+ if($r) {
+ notice( t('Contact has been ') . (($blocked) ? t('blocked') : t('unblocked')) . EOL );
+ }
+ goaway($a->get_baseurl() . '/contacts/' . $contact_id);
+ return; // NOTREACHED
+ }
+
+ if($cmd === 'ignore') {
+ $readonly = (($orig_record[0]['readonly']) ? 0 : 1);
+ $r = q("UPDATE `contact` SET `readonly` = %d WHERE `id` = %d AND `uid` = %d LIMIT 1",
+ intval($readonly),
+ intval($contact_id),
+ intval(local_user())
+ );
+ if($r) {
+ notice( t('Contact has been ') . (($readonly) ? t('ignored') : t('unignored')) . EOL );
+ }
+ goaway($a->get_baseurl() . '/contacts/' . $contact_id);
+ return; // NOTREACHED
+ }
+
+ if($cmd === 'drop') {
+
+ // create an unfollow slap
+
+ if($orig_record[0]['network'] === 'stat') {
+ $tpl = load_view_file('view/follow_slap.tpl');
+ $slap = replace_macros($tpl, array(
+ '$name' => $a->user['username'],
+ '$profile_page' => $a->get_baseurl() . '/profile/' . $a->user['nickname'],
+ '$photo' => $a->contact['photo'],
+ '$thumb' => $a->contact['thumb'],
+ '$published' => datetime_convert('UTC','UTC', 'now', ATOM_TIME),
+ '$item_id' => 'urn:X-dfrn:' . $a->get_hostname() . ':unfollow:' . random_string(),
+ '$title' => '',
+ '$type' => 'text',
+ '$content' => t('stopped following'),
+ '$nick' => $a->user['nickname'],
+ '$verb' => ACTIVITY_UNFOLLOW,
+ '$ostat_follow' => '<as:verb>http://ostatus.org/schema/1.0/unfollow</as:verb>' . "\r\n"
+ ));
+
+ if((x($orig_record[0],'notify')) && (strlen($orig_record[0]['notify']))) {
+ require_once('include/salmon.php');
+ slapper($a->user,$orig_record[0]['notify'],$slap);
+ }
+ }
+
+ if($orig_record[0]['network'] === 'dfrn') {
+ require_once('include/items.php');
+ dfrn_deliver($a->user,$orig_record[0],'placeholder', 1);
+ }
+
+
+ contact_remove($contact_id);
+ notice( t('Contact has been removed.') . EOL );
+ goaway($a->get_baseurl() . '/contacts');
+ return; // NOTREACHED
+ }
+ }
+
+ if(($a->argc == 2) && intval($a->argv[1])) {
+
+ $contact_id = intval($a->argv[1]);
+ $r = q("SELECT * FROM `contact` WHERE `uid` = %d and `id` = %d LIMIT 1",
+ intval(local_user()),
+ intval($contact_id)
+ );
+ if(! count($r)) {
+ notice( t('Contact not found.') . EOL);
+ return;
+ }
+
+ $tpl = load_view_file('view/contact_head.tpl');
+ $a->page['htmlhead'] .= replace_macros($tpl, array('$baseurl' => $a->get_baseurl()));
+
+ require_once('include/contact_selectors.php');
+
+ $tpl = load_view_file("view/contact_edit.tpl");
+
+ switch($r[0]['rel']) {
+ case REL_BUD:
+ $dir_icon = 'images/lrarrow.gif';
+ $alt_text = t('Mutual Friendship');
+ break;
+ case REL_VIP;
+ $dir_icon = 'images/larrow.gif';
+ $alt_text = t('is a fan of yours');
+ break;
+
+ case REL_FAN;
+ $dir_icon = 'images/rarrow.gif';
+ $alt_text = t('you are a fan of');
+ break;
+ default:
+ break;
+ }
+
+ if(($r[0]['network'] === 'dfrn') && ($r[0]['rel'])) {
+ $url = "redir/{$r[0]['id']}";
+ $sparkle = ' class="sparkle" ';
+ }
+ else {
+ $url = $r[0]['url'];
+ $sparkle = '';
+ }
+
+ $o .= replace_macros($tpl,array(
+ '$header' => t('Contact Editor'),
+ '$visit' => t('Visit $name\'s profile'),
+ '$blockunblock' => t('Block/Unblock contact'),
+ '$ignorecont' => t('Ignore contact'),
+ '$delete' => t('Delete contact'),
+ '$poll_interval' => contact_poll_interval($r[0]['priority']),
+ '$lastupdtext' => t('Last updated: '),
+ '$updpub' => t('Update public posts: '),
+ '$last_update' => (($r[0]['last-update'] == '0000-00-00 00:00:00')
+ ? t('Never')
+ : datetime_convert('UTC',date_default_timezone_get(),$r[0]['last-update'],'D, j M Y, g:i A')),
+ '$profile_select' => contact_profile_assign($r[0]['profile-id'],(($r[0]['network'] !== 'dfrn') ? true : false)),
+ '$contact_id' => $r[0]['id'],
+ '$block_text' => (($r[0]['blocked']) ? t('Unblock this contact') : t('Block this contact') ),
+ '$ignore_text' => (($r[0]['readonly']) ? t('Unignore this contact') : t('Ignore this contact') ),
+ '$insecure' => (($r[0]['network'] === 'stat') ? load_view_file('view/insecure_net.tpl') : ''),
+ '$info' => $r[0]['info'],
+ '$blocked' => (($r[0]['blocked']) ? '<div id="block-message">' . t('Currently blocked') . '</div>' : ''),
+ '$ignored' => (($r[0]['readonly']) ? '<div id="ignore-message">' . t('Currently ignored') . '</div>' : ''),
+ '$rating' => contact_reputation($r[0]['rating']),
+ '$reason' => $r[0]['reason'],
+ '$groups' => '', // group_selector(),
+ '$photo' => $r[0]['photo'],
+ '$name' => $r[0]['name'],
+ '$dir_icon' => $dir_icon,
+ '$alt_text' => $alt_text,
+ '$sparkle' => $sparkle,
+ '$url' => $url
+
+ ));
+
+ $arr = array('contact' => $r[0],'output' => $o);
+
+ call_hooks('contact_edit', $arr);
+
+ return $arr['output'];
+
+ }
+
+
+ if(($a->argc == 2) && ($a->argv[1] === 'all'))