_darcs/pristine/lib/subs.php

   1 <?php
   2 /*
   3  * Laconica - a distributed open-source microblogging tool
   4  * Copyright (C) 2008, Controlez-Vous, Inc.
   5  *
   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.
  10  *
  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.
  15  *
  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/>.
  18  */
  19
  20 if (!defined('LACONICA')) { exit(1); }
  21
  22 require_once('XMPPHP/XMPP.php');
  23
  24 /* Subscribe $user to nickname $other_nickname
  25   Returns true or an error message.
  26 */
  27
  28 function subs_subscribe_user($user, $other_nickname) {
  29
  30     $other = User::staticGet('nickname', $other_nickname);
  31
  32     if (!$other) {
  33         return _('No such user.');
  34     }
  35
  36     return subs_subscribe_to($user, $other);
  37 }
  38
  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.
  42  */
  43
  44 function subs_subscribe_to($user, $other) {
  45
  46     if ($user->isSubscribed($other)) {
  47         return _('Already subscribed!.');
  48     }
  49
  50     if ($other->hasBlocked($user)) {
  51         return _('User has blocked you.');
  52     }
  53
  54     if (!$user->subscribeTo($other)) {
  55         return _('Could not subscribe.');
  56         return;
  57     }
  58
  59     subs_notify($other, $user);
  60
  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));
  65         }
  66     }
  67
  68     if ($other->autosubscribe && !$other->isSubscribed($user) && !$user->hasBlocked($other)) {
  69         if (!$other->subscribeTo($user)) {
  70             return _('Could not subscribe other to you.');
  71         }
  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));
  76             }
  77         }
  78
  79         subs_notify($user, $other);
  80     }
  81
  82     return true;
  83 }
  84
  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);
  90 }
  91
  92 function subs_notify_email($listenee, $listener) {
  93     mail_subscribe_notify($listenee, $listener);
  94 }
  95
  96 /* Unsubscribe $user from nickname $other_nickname
  97   Returns true or an error message.
  98 */
  99
 100 function subs_unsubscribe_user($user, $other_nickname) {
 101
 102     $other = User::staticGet('nickname', $other_nickname);
 103
 104     if (!$other) {
 105         return _('No such user.');
 106     }
 107
 108     return subs_unsubscribe_to($user, $other->getProfile());
 109 }
 110
 111 /* Unsubscribe user $user from profile $other
 112  * NB: other can be a remote user. */
 113
 114 function subs_unsubscribe_to($user, $other) {
 115
 116     if (!$user->isSubscribed($other))
 117         return _('Not subscribed!.');
 118
 119     $sub = DB_DataObject::factory('subscription');
 120
 121     $sub->subscriber = $user->id;
 122     $sub->subscribed = $other->id;
 123
 124     $sub->find(true);
 125
 126     // note we checked for existence above
 127
 128     if (!$sub->delete())
 129         return _('Couldn\'t delete subscription.');
 130
 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));
 135         }
 136     }
 137
 138     return true;
 139 }
 140