user['nickname']; $profile = $a->argv[1]; profile_load($a,$which,$profile); } function profperm_content(&$a) { if(! local_user()) { notice( t('Permission denied') . EOL); return; } if($a->argc < 2) { notice( t('Invalid profile identifier.') . EOL ); return; } // Switch to text mod interface if we have more than 'n' contacts or group members $switchtotext = get_pconfig(local_user(),'system','groupedit_image_limit'); if($switchtotext === false) $switchtotext = get_config('system','groupedit_image_limit'); if($switchtotext === false) $switchtotext = 400; if(($a->argc > 2) && intval($a->argv[1]) && intval($a->argv[2])) { $r = q("SELECT `id` FROM `contact` WHERE `blocked` = 0 AND `pending` = 0 AND `self` = 0 AND `network` = '%s' AND `id` = %d AND `uid` = %d LIMIT 1", dbesc(NETWORK_DFRN), intval($a->argv[2]), intval(local_user()) ); if(count($r)) $change = intval($a->argv[2]); } if(($a->argc > 1) && (intval($a->argv[1]))) { $r = q("SELECT * FROM `profile` WHERE `id` = %d AND `uid` = %d AND `is-default` = 0 LIMIT 1", intval($a->argv[1]), intval(local_user()) ); if(! count($r)) { notice( t('Invalid profile identifier.') . EOL ); return; } $profile = $r[0]; $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `profile-id` = %d", intval(local_user()), intval($a->argv[1]) ); $ingroup = array(); if(count($r)) foreach($r as $member) $ingroup[] = $member['id']; $members = $r; if($change) { if(in_array($change,$ingroup)) { q("UPDATE `contact` SET `profile-id` = 0 WHERE `id` = %d AND `uid` = %d", intval($change), intval(local_user()) ); } else { q("UPDATE `contact` SET `profile-id` = %d WHERE `id` = %d AND `uid` = %d", intval($a->argv[1]), intval($change), intval(local_user()) ); } $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `profile-id` = %d", intval(local_user()), intval($a->argv[1]) ); $members = $r; $ingroup = array(); if(count($r)) foreach($r as $member) $ingroup[] = $member['id']; } $o .= '