3 use Friendica\Core\PConfig;
4 use Friendica\Database\DBM;
6 function group_add($uid,$name) {
9 if (x($uid) && x($name)) {
10 $r = group_byname($uid,$name); // check for dups
13 // This could be a problem.
14 // Let's assume we've just created a group which we once deleted
15 // all the old members are gone, but the group remains so we don't break any security
16 // access lists. What we're doing here is reviving the dead group, but old content which
17 // was restricted to this group may now be seen by the new group members.
19 $z = q("SELECT * FROM `group` WHERE `id` = %d LIMIT 1",
22 if (count($z) && $z[0]['deleted']) {
23 $r = q("UPDATE `group` SET `deleted` = 0 WHERE `uid` = %d AND `name` = '%s'",
27 notice( t('A deleted group with this name was revived. Existing item permissions <strong>may</strong> apply to this group and any future members. If this is not what you intended, please create another group with a different name.') . EOL);
31 $r = dba::insert('group', array('uid' => $uid, 'name' => $name));
38 function group_rmv($uid,$name) {
40 if (x($uid) && x($name)) {
41 $r = q("SELECT id FROM `group` WHERE `uid` = %d AND `name` = '%s' LIMIT 1",
45 if (DBM::is_result($r))
46 $group_id = $r[0]['id'];
50 // remove group from default posting lists
51 $r = q("SELECT def_gid, allow_gid, deny_gid FROM user WHERE uid = %d LIMIT 1",
58 if ($user_info['def_gid'] == $group_id) {
59 $user_info['def_gid'] = 0;
62 if (strpos($user_info['allow_gid'], '<' . $group_id . '>') !== false) {
63 $user_info['allow_gid'] = str_replace('<' . $group_id . '>', '', $user_info['allow_gid']);
66 if (strpos($user_info['deny_gid'], '<' . $group_id . '>') !== false) {
67 $user_info['deny_gid'] = str_replace('<' . $group_id . '>', '', $user_info['deny_gid']);
72 q("UPDATE user SET def_gid = %d, allow_gid = '%s', deny_gid = '%s' WHERE uid = %d",
73 intval($user_info['def_gid']),
74 dbesc($user_info['allow_gid']),
75 dbesc($user_info['deny_gid']),
82 dba::delete('group_member', array('uid' => $uid, 'pid' => $group_id));
85 $r = q("UPDATE `group` SET `deleted` = 1 WHERE `uid` = %d AND `name` = '%s'",
97 function group_byname($uid,$name) {
98 if ((! $uid) || (! strlen($name)))
100 $r = q("SELECT * FROM `group` WHERE `uid` = %d AND `name` = '%s' LIMIT 1",
104 if (DBM::is_result($r))
109 function group_rmv_member($uid, $name, $member) {
110 $gid = group_byname($uid, $name);
116 if (!($uid && $gid && $member)) {
120 $r = dba::delete('group_member', array('uid' => $uid, 'gid' => $gid, 'contact-id' => $member));
125 function group_add_member($uid,$name,$member,$gid = 0) {
127 $gid = group_byname($uid,$name);
128 if ((! $gid) || (! $uid) || (! $member))
131 $r = q("SELECT * FROM `group_member` WHERE `uid` = %d AND `gid` = %d AND `contact-id` = %d LIMIT 1",
136 if (DBM::is_result($r))
137 return true; // You might question this, but
138 // we indicate success because the group member was in fact created
139 // -- It was just created at another time
140 if (! DBM::is_result($r)) {
141 $r = dba::insert('group_member', array('uid' => $uid, 'gid' => $gid, 'contact-id' => $member));
146 function group_get_members($gid) {
149 $r = q("SELECT `group_member`.`contact-id`, `contact`.* FROM `group_member`
150 INNER JOIN `contact` ON `contact`.`id` = `group_member`.`contact-id`
151 WHERE `gid` = %d AND `group_member`.`uid` = %d AND
152 NOT `contact`.`self` AND NOT `contact`.`blocked` AND NOT `contact`.`pending`
153 ORDER BY `contact`.`name` ASC ",
157 if (DBM::is_result($r))
163 function group_public_members($gid) {
166 $r = q("SELECT `contact`.`id` AS `contact-id` FROM `group_member`
167 INNER JOIN `contact` ON `contact`.`id` = `group_member`.`contact-id`
168 WHERE `gid` = %d AND `group_member`.`uid` = %d
169 AND `contact`.`network` = '%s' AND `contact`.`notify` != '' ",
171 intval(local_user()),
172 dbesc(NETWORK_OSTATUS)
174 if (DBM::is_result($r))
181 function mini_group_select($uid,$gid = 0, $label = "") {
186 $r = q("SELECT * FROM `group` WHERE `deleted` = 0 AND `uid` = %d ORDER BY `name` ASC",
189 $grps[] = array('name' => '', 'id' => '0', 'selected' => '');
190 if (DBM::is_result($r)) {
191 foreach ($r as $rr) {
192 $grps[] = array('name' => $rr['name'], 'id' => $rr['id'], 'selected' => (($gid == $rr['id']) ? 'true' : ''));
196 logger('groups: ' . print_r($grps,true));
199 $label = t('Default privacy group for new contacts');
201 $o = replace_macros(get_markup_template('group_selection.tpl'), array(
210 * @brief Create group sidebar widget
212 * @param string $every
213 * @param string $each
214 * @param string $editmode
215 * 'standard' => include link 'Edit groups'
216 * 'extended' => include link 'Create new group'
217 * 'full' => include link 'Create new group' and provide for each group a link to edit this group
218 * @param int $group_id
222 function group_side($every="contacts",$each="group",$editmode = "standard", $group_id = 0, $cid = 0) {
232 'text' => t('Everybody'),
234 'selected' => (($group_id == 0) ? 'group-selected' : ''),
240 $r = q("SELECT * FROM `group` WHERE `deleted` = 0 AND `uid` = %d ORDER BY `name` ASC",
241 intval($_SESSION['uid'])
243 $member_of = array();
245 $member_of = groups_containing(local_user(),$cid);
248 if (DBM::is_result($r)) {
249 foreach ($r as $rr) {
250 $selected = (($group_id == $rr['id']) ? ' group-selected' : '');
252 if ($editmode == "full") {
254 'href' => "group/".$rr['id'],
255 'title' => t('edit'),
264 'text' => $rr['name'],
265 'selected' => $selected,
266 'href' => $each."/".$rr['id'],
267 'edit' => $groupedit,
268 'ismember' => in_array($rr['id'],$member_of),
274 $tpl = get_markup_template("group_side.tpl");
275 $o = replace_macros($tpl, array(
276 '$title' => t('Groups'),
277 'newgroup' => (($editmode == "extended") || ($editmode == "full") ? 1 : ''),
278 '$editgroupstext' => t('Edit groups'),
279 'grouppage' => "group/",
280 '$edittext' => t('Edit group'),
281 '$createtext' => t('Create a new group'),
282 '$creategroup' => t('Group Name: '),
283 '$form_security_token' => get_form_security_token("group_edit"),
284 '$ungrouped' => (($every === 'contacts') ? t('Contacts not in any group') : ''),
285 '$groups' => $groups,
293 function expand_groups($a,$check_dead = false, $use_gcontact = false) {
294 if (! (is_array($a) && count($a)))
296 $groups = implode(',', $a);
297 $groups = dbesc($groups);
300 $r = q("SELECT `gcontact`.`id` AS `contact-id` FROM `group_member`
301 INNER JOIN `contact` ON `contact`.`id` = `group_member`.`contact-id`
302 INNER JOIN `gcontact` ON `gcontact`.`nurl` = `contact`.`nurl`
303 WHERE `gid` IN ($groups)");
305 $r = q("SELECT `contact-id` FROM `group_member` WHERE `gid` IN ( $groups )");
309 if (DBM::is_result($r))
311 $ret[] = $rr['contact-id'];
312 if ($check_dead && !$use_gcontact) {
313 require_once('include/acl_selectors.php');
314 $ret = prune_deadguys($ret);
320 function member_of($c) {
322 $r = q("SELECT `group`.`name`, `group`.`id` FROM `group` INNER JOIN `group_member` ON `group_member`.`gid` = `group`.`id` WHERE `group_member`.`contact-id` = %d AND `group`.`deleted` = 0 ORDER BY `group`.`name` ASC ",
330 function groups_containing($uid,$c) {
332 $r = q("SELECT `gid` FROM `group_member` WHERE `uid` = %d AND `group_member`.`contact-id` = %d ",
338 if (DBM::is_result($r)) {
339 foreach ($r as $rr) {
347 * @brief count unread group items
349 * Count unread items of each groups
353 * 'name' => group name
354 * 'count' => counted unseen group items
357 function groups_count_unseen() {
359 $r = q("SELECT `group`.`id`, `group`.`name`,
360 (SELECT COUNT(*) FROM `item` FORCE INDEX (`uid_unseen_contactid`)
361 WHERE `uid` = %d AND `unseen` AND
362 `contact-id` IN (SELECT `contact-id` FROM `group_member`
363 WHERE `group_member`.`gid` = `group`.`id` AND `group_member`.`uid` = %d)) AS `count`
364 FROM `group` WHERE `group`.`uid` = %d;",
365 intval(local_user()),
366 intval(local_user()),
374 * @brief Returns the default group for a given user and network
376 * @param int $uid User id
377 * @param string $network network name
379 * @return int group id
381 function get_default_group($uid, $network = "") {
385 if ($network == NETWORK_OSTATUS)
386 $default_group = PConfig::get($uid, "ostatus", "default_group");
388 if ($default_group != 0)
389 return $default_group;
391 $g = q("SELECT `def_gid` FROM `user` WHERE `uid` = %d LIMIT 1", intval($uid));
392 if ($g && intval($g[0]["def_gid"]))
393 $default_group = $g[0]["def_gid"];
395 return $default_group;