3 * Laconica - a distributed open-source microblogging tool
4 * Copyright (C) 2008, Controlez-Vous, Inc.
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU Affero General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU Affero General Public License for more details.
16 * You should have received a copy of the GNU Affero General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
20 if (!defined('LACONICA')) { exit(1); }
22 require_once('XMPPHP/XMPP.php');
24 /* Subscribe $user to nickname $other_nickname
25 Returns true or an error message.
28 function subs_subscribe_user($user, $other_nickname) {
30 $other = User::staticGet('nickname', $other_nickname);
33 return _('No such user.');
36 return subs_subscribe_to($user, $other);
39 /* Subscribe user $user to other user $other.
40 * Note: $other must be a local user, not a remote profile.
41 * Because the other way is quite a bit more complicated.
44 function subs_subscribe_to($user, $other) {
46 if ($user->isSubscribed($other)) {
47 return _('Already subscribed!.');
50 if ($other->hasBlocked($user)) {
51 return _('User has blocked you.');
54 if (!$user->subscribeTo($other)) {
55 return _('Could not subscribe.');
59 subs_notify($other, $user);
61 if (common_config('memcached', 'enabled')) {
62 $cache = new Memcache();
63 if ($cache->connect(common_config('memcached', 'server'), common_config('memcached', 'port'))) {
64 $cache->delete(common_cache_key('user:notices_with_friends:' . $user->id));
68 if ($other->autosubscribe && !$other->isSubscribed($user) && !$user->hasBlocked($other)) {
69 if (!$other->subscribeTo($user)) {
70 return _('Could not subscribe other to you.');
72 if (common_config('memcached', 'enabled')) {
73 $cache = new Memcache();
74 if ($cache->connect(common_config('memcached', 'server'), common_config('memcached', 'port'))) {
75 $cache->delete(common_cache_key('user:notices_with_friends:' . $other->id));
79 subs_notify($user, $other);
85 function subs_notify($listenee, $listener) {
86 # XXX: add other notifications (Jabber, SMS) here
87 # XXX: queue this and handle it offline
88 # XXX: Whatever happens, do it in Twitter-like API, too
89 subs_notify_email($listenee, $listener);
92 function subs_notify_email($listenee, $listener) {
93 mail_subscribe_notify($listenee, $listener);
96 /* Unsubscribe $user from nickname $other_nickname
97 Returns true or an error message.
100 function subs_unsubscribe_user($user, $other_nickname) {
102 $other = User::staticGet('nickname', $other_nickname);
105 return _('No such user.');
108 return subs_unsubscribe_to($user, $other->getProfile());
111 /* Unsubscribe user $user from profile $other
112 * NB: other can be a remote user. */
114 function subs_unsubscribe_to($user, $other) {
116 if (!$user->isSubscribed($other))
117 return _('Not subscribed!.');
119 $sub = DB_DataObject::factory('subscription');
121 $sub->subscriber = $user->id;
122 $sub->subscribed = $other->id;
126 // note we checked for existence above
129 return _('Couldn\'t delete subscription.');
131 if (common_config('memcached', 'enabled')) {
132 $cache = new Memcache();
133 if ($cache->connect(common_config('memcached', 'server'), common_config('memcached', 'port'))) {
134 $cache->delete(common_cache_key('user:notices_with_friends:' . $user->id));