may apply to this list and any future members. If this is not what you intended, please create another list with a different name.') . EOL); } return true; } $hash = new_uuid(); $r = q("INSERT INTO pgrp ( hash, uid, visible, gname ) VALUES( '%s', %d, %d, '%s' ) ", dbesc($hash), intval($uid), intval($public), dbesc($name) ); $ret = $r; } Libsync::build_sync_packet($uid,null,true); return $ret; } static function remove($uid,$name) { $ret = false; if ($uid && $name) { $r = q("SELECT id, hash FROM pgrp WHERE uid = %d AND gname = '%s' LIMIT 1", intval($uid), dbesc($name) ); if ($r) { $group_id = $r[0]['id']; $group_hash = $r[0]['hash']; } else { return false; } // remove group from default posting lists $r = q("SELECT channel_default_group, channel_allow_gid, channel_deny_gid FROM channel WHERE channel_id = %d LIMIT 1", intval($uid) ); if ($r) { $user_info = array_shift($r); $change = false; if ($user_info['channel_default_group'] == $group_hash) { $user_info['channel_default_group'] = ''; $change = true; } if (strpos($user_info['channel_allow_gid'], '<' . $group_hash . '>') !== false) { $user_info['channel_allow_gid'] = str_replace('<' . $group_hash . '>', '', $user_info['channel_allow_gid']); $change = true; } if (strpos($user_info['channel_deny_gid'], '<' . $group_hash . '>') !== false) { $user_info['channel_deny_gid'] = str_replace('<' . $group_hash . '>', '', $user_info['channel_deny_gid']); $change = true; } if ($change) { q("UPDATE channel SET channel_default_group = '%s', channel_allow_gid = '%s', channel_deny_gid = '%s' WHERE channel_id = %d", intval($user_info['channel_default_group']), dbesc($user_info['channel_allow_gid']), dbesc($user_info['channel_deny_gid']), intval($uid) ); } } // remove all members $r = q("DELETE FROM pgrp_member WHERE uid = %d AND gid = %d ", intval($uid), intval($group_id) ); // remove group $r = q("UPDATE pgrp SET deleted = 1 WHERE uid = %d AND gname = '%s'", intval($uid), dbesc($name) ); $ret = $r; } Libsync::build_sync_packet($uid,null,true); return $ret; } // returns the integer id of an access group owned by $uid and named $name // or false. static function byname($uid,$name) { if (! ($uid && $name)) { return false; } $r = q("SELECT id FROM pgrp WHERE uid = %d AND gname = '%s' LIMIT 1", intval($uid), dbesc($name) ); if ($r) { return $r[0]['id']; } return false; } static function by_id($uid,$id) { if (! ($uid && $id)) { return false; } $r = q("SELECT * FROM pgrp WHERE uid = %d AND id = %d and deleted = 0", intval($uid), intval($id) ); if ($r) { return array_shift($r); } return false; } static function rec_byhash($uid,$hash) { if (! ( $uid && $hash)) { return false; } $r = q("SELECT * FROM pgrp WHERE uid = %d AND hash = '%s' LIMIT 1", intval($uid), dbesc($hash) ); if ($r) { return array_shift($r); } return false; } static function member_remove($uid,$name,$member) { $gid = self::byname($uid,$name); if (! $gid) { return false; } if (! ($uid && $gid && $member)) { return false; } $r = q("DELETE FROM pgrp_member WHERE uid = %d AND gid = %d AND xchan = '%s' ", intval($uid), intval($gid), dbesc($member) ); Libsync::build_sync_packet($uid,null,true); return $r; } static function member_add($uid,$name,$member,$gid = 0) { if (! $gid) { $gid = self::byname($uid,$name); } if (! ($gid && $uid && $member)) { return false; } $r = q("SELECT * FROM pgrp_member WHERE uid = %d AND gid = %d AND xchan = '%s' LIMIT 1", intval($uid), intval($gid), dbesc($member) ); if ($r) { return true; // You might question this, but // we indicate success because the group member was in fact created // -- It was just created at another time } else { $r = q("INSERT INTO pgrp_member (uid, gid, xchan) VALUES( %d, %d, '%s' ) ", intval($uid), intval($gid), dbesc($member) ); } Libsync::build_sync_packet($uid,null,true); return $r; } static function members($uid, $gid) { $ret = []; if (intval($gid)) { $r = q("SELECT * FROM pgrp_member LEFT JOIN abook ON abook_xchan = pgrp_member.xchan left join xchan on xchan_hash = abook_xchan WHERE gid = %d AND abook_channel = %d and pgrp_member.uid = %d and xchan_deleted = 0 and abook_self = 0 and abook_blocked = 0 and abook_pending = 0 ORDER BY xchan_name ASC ", intval($gid), intval($uid), intval($uid) ); if ($r) { $ret = $r; } } return $ret; } static function members_xchan($uid,$gid) { $ret = []; if (intval($gid)) { $r = q("SELECT xchan FROM pgrp_member WHERE gid = %d AND uid = %d", intval($gid), intval($uid) ); if ($r) { foreach ($r as $rv) { $ret[] = $rv['xchan']; } } } return $ret; } static function members_profile_xchan($uid,$gid) { $ret = []; if (intval($gid)) { $r = q("SELECT abook_xchan as xchan from abook left join profile on abook_profile = profile_guid where profile.id = %d and profile.uid = %d", intval($gid), intval($uid) ); if ($r) { foreach($r as $rv) { $ret[] = $rv['xchan']; } } } return $ret; } static function select($uid,$group = '') { $grps = []; $r = q("SELECT * FROM pgrp WHERE deleted = 0 AND uid = %d ORDER BY gname ASC", intval($uid) ); $grps[] = [ 'name' => '', 'hash' => '0', 'selected' => '' ]; if ($r) { foreach ($r as $rr) { $grps[] = [ 'name' => $rr['gname'], 'id' => $rr['hash'], 'selected' => (($group == $rr['hash']) ? 'true' : '') ]; } } return replace_macros(get_markup_template('group_selection.tpl'), [ '$label' => t('Add new connections to this access list'), '$groups' => $grps ]); } static function widget($every="connections",$each="lists",$edit = false, $group_id = 0, $cid = '',$mode = 1) { $o = ''; $groups = []; $r = q("SELECT * FROM pgrp WHERE deleted = 0 AND uid = %d ORDER BY gname ASC", intval($_SESSION['uid']) ); $member_of = []; if ($cid) { $member_of = self::containing(local_channel(),$cid); } if ($r) { foreach ($r as $rr) { $selected = (($group_id == $rr['id']) ? ' group-selected' : ''); if ($edit) { $groupedit = [ 'href' => "lists/".$rr['id'], 'title' => t('edit') ]; } else { $groupedit = null; } $groups[] = [ 'id' => $rr['id'], 'enc_cid' => base64url_encode($cid), 'cid' => $cid, 'text' => $rr['gname'], 'selected' => $selected, 'href' => (($mode == 0) ? $each.'?f=&gid='.$rr['id'] : $each."/".$rr['id']) . ((x($_GET,'new')) ? '&new=' . $_GET['new'] : '') . ((x($_GET,'order')) ? '&order=' . $_GET['order'] : ''), 'edit' => $groupedit, 'ismember' => in_array($rr['id'],$member_of), ]; } } return replace_macros(get_markup_template('group_side.tpl'), [ '$title' => t('Lists'), '$edittext' => t('Edit list'), '$createtext' => t('Create new list'), '$ungrouped' => (($every === 'contacts') ? t('Channels not in any access list') : ''), '$groups' => $groups, '$add' => t('add'), ]); } static function expand($g) { if (! (is_array($g) && count($g))) { return []; } $ret = []; $x = []; // private profile linked virtual groups foreach ($g as $gv) { if (substr($gv,0,3) === 'vp.') { $profile_hash = substr($gv,3); if ($profile_hash) { $r = q("select abook_xchan from abook where abook_profile = '%s'", dbesc($profile_hash) ); if ($r) { foreach ($r as $rv) { $ret[] = $rv['abook_xchan']; } } } } else { $x[] = $gv; } } if ($x) { stringify_array_elms($x,true); $groups = implode(',', $x); if ($groups) { $r = q("SELECT xchan FROM pgrp_member WHERE gid IN ( select id from pgrp where hash in ( $groups ))"); if ($r) { foreach ($r as $rv) { $ret[] = $rv['xchan']; } } } } return $ret; } static function member_of($c) { $r = q("SELECT pgrp.gname, pgrp.id FROM pgrp LEFT JOIN pgrp_member ON pgrp_member.gid = pgrp.id WHERE pgrp_member.xchan = '%s' AND pgrp.deleted = 0 ORDER BY pgrp.gname ASC ", dbesc($c) ); return $r; } static function containing($uid,$c) { $r = q("SELECT gid FROM pgrp_member WHERE uid = %d AND pgrp_member.xchan = '%s' ", intval($uid), dbesc($c) ); $ret = []; if ($r) { foreach ($r as $rv) $ret[] = $rv['gid']; } return $ret; } }