4 * @brief The group module (create and rename contact groups, add and
5 * remove contacts to the contact groups
9 use Friendica\Core\Config;
10 use Friendica\Core\L10n;
11 use Friendica\Core\PConfig;
12 use Friendica\Core\System;
13 use Friendica\Database\DBM;
14 use Friendica\Model\Contact;
15 use Friendica\Model\Group;
17 function group_init(App $a) {
19 $a->page['aside'] = Group::sidebarWidget('contacts', 'group', 'extended', (($a->argc > 1) ? intval($a->argv[1]) : 0));
23 function group_post(App $a) {
26 notice(L10n::t('Permission denied.') . EOL);
30 if (($a->argc == 2) && ($a->argv[1] === 'new')) {
31 check_form_security_token_redirectOnErr('/group/new', 'group_edit');
33 $name = notags(trim($_POST['groupname']));
34 $r = Group::create(local_user(), $name);
36 info(L10n::t('Group created.') . EOL);
37 $r = Group::getIdByName(local_user(), $name);
39 goaway(System::baseUrl() . '/group/' . $r);
42 notice(L10n::t('Could not create group.') . EOL);
44 goaway(System::baseUrl() . '/group');
48 if (($a->argc == 2) && (intval($a->argv[1]))) {
49 check_form_security_token_redirectOnErr('/group', 'group_edit');
51 $r = q("SELECT * FROM `group` WHERE `id` = %d AND `uid` = %d LIMIT 1",
55 if (! DBM::is_result($r)) {
56 notice(L10n::t('Group not found.') . EOL);
57 goaway(System::baseUrl() . '/contacts');
61 $groupname = notags(trim($_POST['groupname']));
62 if ((strlen($groupname)) && ($groupname != $group['name'])) {
63 $r = q("UPDATE `group` SET `name` = '%s' WHERE `uid` = %d AND `id` = %d",
70 info(L10n::t('Group name changed.') . EOL);
74 $a->page['aside'] = Group::sidebarWidget();
79 function group_content(App $a) {
83 notice(L10n::t('Permission denied') . EOL);
87 // Switch to text mode interface if we have more than 'n' contacts or group members
90 goaway(System::baseUrl() . '/contacts');
93 $switchtotext = PConfig::get(local_user(), 'system', 'groupedit_image_limit');
94 if (is_null($switchtotext)) {
95 $switchtotext = Config::get('system', 'groupedit_image_limit', 400);
98 $tpl = get_markup_template('group_edit.tpl');
101 '$submit' => L10n::t('Save Group'),
104 if (($a->argc == 2) && ($a->argv[1] === 'new')) {
105 return replace_macros($tpl, $context + [
106 '$title' => L10n::t('Create a group of contacts/friends.'),
107 '$gname' => ['groupname', L10n::t('Group Name: '), '', ''],
109 '$form_security_token' => get_form_security_token("group_edit"),
115 if (($a->argc == 3) && ($a->argv[1] === 'drop')) {
116 check_form_security_token_redirectOnErr('/group', 'group_drop', 't');
118 if (intval($a->argv[2])) {
119 $r = q("SELECT `name` FROM `group` WHERE `id` = %d AND `uid` = %d LIMIT 1",
126 if (DBM::is_result($r)) {
127 $result = Group::removeByName(local_user(), $r[0]['name']);
131 info(L10n::t('Group removed.') . EOL);
133 notice(L10n::t('Unable to remove group.') . EOL);
136 goaway(System::baseUrl() . '/group');
140 if (($a->argc > 2) && intval($a->argv[1]) && intval($a->argv[2])) {
141 check_form_security_token_ForbiddenOnErr('group_member_change', 't');
143 $r = q("SELECT `id` FROM `contact` WHERE `id` = %d AND `uid` = %d and `self` = 0 and `blocked` = 0 AND `pending` = 0 LIMIT 1",
147 if (DBM::is_result($r)) {
148 $change = intval($a->argv[2]);
152 if (($a->argc > 1) && (intval($a->argv[1]))) {
153 require_once 'mod/contacts.php';
155 $r = q("SELECT * FROM `group` WHERE `id` = %d AND `uid` = %d AND `deleted` = 0 LIMIT 1",
160 if (! DBM::is_result($r)) {
161 notice(L10n::t('Group not found.') . EOL);
162 goaway(System::baseUrl() . '/contacts');
166 $members = Contact::getByGroupId($group['id']);
171 if (count($members)) {
172 foreach ($members as $member) {
173 $preselected[] = $member['id'];
178 if (in_array($change, $preselected)) {
179 Group::removeMember($group['id'], $change);
181 Group::addMember($group['id'], $change);
184 $members = Contact::getByGroupId($group['id']);
186 if (count($members)) {
187 foreach ($members as $member) {
188 $preselected[] = $member['id'];
193 $drop_tpl = get_markup_template('group_drop.tpl');
194 $drop_txt = replace_macros($drop_tpl, [
195 '$id' => $group['id'],
196 '$delete' => L10n::t('Delete Group'),
197 '$form_security_token' => get_form_security_token("group_drop"),
201 $context = $context + [
202 '$title' => L10n::t('Group Editor'),
203 '$gname' => ['groupname', L10n::t('Group Name: '), $group['name'], ''],
204 '$gid' => $group['id'],
205 '$drop' => $drop_txt,
206 '$form_security_token' => get_form_security_token('group_edit'),
207 '$edit_name' => L10n::t('Edit Group Name')
212 if (! isset($group)) {
217 'label_members' => L10n::t('Members'),
219 'label_contacts' => L10n::t('All Contacts'),
220 'group_is_empty' => L10n::t('Group is empty'),
224 $sec_token = addslashes(get_form_security_token('group_member_change'));
226 // Format the data of the group members
227 foreach ($members as $member) {
228 if ($member['url']) {
229 $entry = _contact_detail_for_template($member);
230 $entry['label'] = 'members';
231 $entry['photo_menu'] = '';
232 $entry['change_member'] = [
233 'title' => L10n::t("Remove contact from group"),
234 'gid' => $group['id'],
235 'cid' => $member['id'],
236 'sec_token' => $sec_token
239 $groupeditor['members'][] = $entry;
241 Group::removeMember($group['id'], $member['id']);
245 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND NOT `blocked` AND NOT `pending` AND NOT `self` ORDER BY `name` ASC",
249 if (DBM::is_result($r)) {
250 // Format the data of the contacts who aren't in the contact group
251 foreach ($r as $member) {
252 if (! in_array($member['id'], $preselected)) {
253 $entry = _contact_detail_for_template($member);
254 $entry['label'] = 'contacts';
255 $entry['photo_menu'] = '';
256 $entry['change_member'] = [
257 'title' => L10n::t("Add contact to group"),
258 'gid' => $group['id'],
259 'cid' => $member['id'],
260 'sec_token' => $sec_token
263 $groupeditor['contacts'][] = $entry;
268 $context['$groupeditor'] = $groupeditor;
269 $context['$desc'] = L10n::t('Click on a contact to add or remove.');
271 // If there are to many contacts we could provide an alternative view mode
272 $total = count($groupeditor['members']) + count($groupeditor['contacts']);
273 $context['$shortmode'] = (($switchtotext && ($total > $switchtotext)) ? true : false);
276 $tpl = get_markup_template('groupeditor.tpl');
277 echo replace_macros($tpl, $context);
281 return replace_macros($tpl, $context);