3 * Laconica - a distributed open-source microblogging tool
4 * Copyright (C) 2008, 2009, Control Yourself, 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(INSTALLDIR.'/lib/channel.php');
29 function __construct($user=null)
34 function execute($channel)
40 class UnimplementedCommand extends Command
42 function execute($channel)
44 $channel->error($this->user, _("Sorry, this command is not yet implemented."));
48 class TrackingCommand extends UnimplementedCommand
52 class TrackOffCommand extends UnimplementedCommand
56 class TrackCommand extends UnimplementedCommand
59 function __construct($user, $word)
61 parent::__construct($user);
66 class UntrackCommand extends UnimplementedCommand
69 function __construct($user, $word)
71 parent::__construct($user);
76 class NudgeCommand extends UnimplementedCommand
79 function __construct($user, $other)
81 parent::__construct($user);
82 $this->other = $other;
86 class InviteCommand extends UnimplementedCommand
89 function __construct($user, $other)
91 parent::__construct($user);
92 $this->other = $other;
96 class StatsCommand extends Command
98 function execute($channel)
100 $profile = $this->user->getProfile();
102 $subs_count = $profile->subscriptionCount();
103 $subbed_count = $profile->subscriberCount();
104 $notice_count = $profile->noticeCount();
106 $channel->output($this->user, sprintf(_("Subscriptions: %1\$s\n".
107 "Subscribers: %2\$s\n".
115 class FavCommand extends Command
120 function __construct($user, $other)
122 parent::__construct($user);
123 $this->other = $other;
126 function execute($channel)
130 common_relative_profile($this->user, common_canonical_nickname($this->other));
133 $channel->error($this->user, _('No such user.'));
136 $notice = $recipient->getCurrentNotice();
138 $channel->error($this->user, _('User has no last notice'));
142 $fave = Fave::addNew($this->user, $notice);
145 $channel->error($this->user, _('Could not create favorite.'));
149 $other = User::staticGet('id', $recipient->id);
151 if ($other && $other->id != $user->id) {
152 if ($other->email && $other->emailnotifyfav) {
153 mail_notify_fave($other, $this->user, $notice);
157 $this->user->blowFavesCache();
159 $channel->output($this->user, _('Notice marked as fave.'));
163 class WhoisCommand extends Command
166 function __construct($user, $other)
168 parent::__construct($user);
169 $this->other = $other;
172 function execute($channel)
175 common_relative_profile($this->user, common_canonical_nickname($this->other));
178 $channel->error($this->user, _('No such user.'));
182 $whois = sprintf(_("%1\$s (%2\$s)"), $recipient->nickname,
183 $recipient->profileurl);
184 if ($recipient->fullname) {
185 $whois .= "\n" . sprintf(_('Fullname: %s'), $recipient->fullname);
187 if ($recipient->location) {
188 $whois .= "\n" . sprintf(_('Location: %s'), $recipient->location);
190 if ($recipient->homepage) {
191 $whois .= "\n" . sprintf(_('Homepage: %s'), $recipient->homepage);
193 if ($recipient->bio) {
194 $whois .= "\n" . sprintf(_('About: %s'), $recipient->bio);
196 $channel->output($this->user, $whois);
200 class MessageCommand extends Command
204 function __construct($user, $other, $text)
206 parent::__construct($user);
207 $this->other = $other;
211 function execute($channel)
213 $other = User::staticGet('nickname', common_canonical_nickname($this->other));
215 $len = mb_strlen($this->text);
218 $channel->error($this->user, _('No content!'));
222 $this->text = common_shorten_links($this->text);
224 if (Message::contentTooLong($this->text)) {
225 $channel->error($this->user, sprintf(_('Message too long - maximum is %d characters, you sent %d'),
226 Message::maxContent(), mb_strlen($this->text)));
231 $channel->error($this->user, _('No such user.'));
233 } else if (!$this->user->mutuallySubscribed($other)) {
234 $channel->error($this->user, _('You can\'t send a message to this user.'));
236 } else if ($this->user->id == $other->id) {
237 $channel->error($this->user, _('Don\'t send a message to yourself; just say it to yourself quietly instead.'));
240 $message = Message::saveNew($this->user->id, $other->id, $this->text, $channel->source());
242 $channel->output($this->user, sprintf(_('Direct message to %s sent'), $this->other));
244 $channel->error($this->user, _('Error sending direct message.'));
249 class GetCommand extends Command
254 function __construct($user, $other)
256 parent::__construct($user);
257 $this->other = $other;
260 function execute($channel)
262 $target_nickname = common_canonical_nickname($this->other);
265 common_relative_profile($this->user, $target_nickname);
268 $channel->error($this->user, _('No such user.'));
271 $notice = $target->getCurrentNotice();
273 $channel->error($this->user, _('User has no last notice'));
276 $notice_content = $notice->content;
278 $channel->output($this->user, $target_nickname . ": " . $notice_content);
282 class SubCommand extends Command
287 function __construct($user, $other)
289 parent::__construct($user);
290 $this->other = $other;
293 function execute($channel)
297 $channel->error($this->user, _('Specify the name of the user to subscribe to'));
301 $result = subs_subscribe_user($this->user, $this->other);
303 if ($result == 'true') {
304 $channel->output($this->user, sprintf(_('Subscribed to %s'), $this->other));
306 $channel->error($this->user, $result);
311 class UnsubCommand extends Command
316 function __construct($user, $other)
318 parent::__construct($user);
319 $this->other = $other;
322 function execute($channel)
325 $channel->error($this->user, _('Specify the name of the user to unsubscribe from'));
329 $result=subs_unsubscribe_user($this->user, $this->other);
332 $channel->output($this->user, sprintf(_('Unsubscribed from %s'), $this->other));
334 $channel->error($this->user, $result);
339 class OffCommand extends Command
342 function __construct($user, $other=null)
344 parent::__construct($user);
345 $this->other = $other;
347 function execute($channel)
350 $channel->error($this->user, _("Command not yet implemented."));
352 if ($channel->off($this->user)) {
353 $channel->output($this->user, _('Notification off.'));
355 $channel->error($this->user, _('Can\'t turn off notification.'));
361 class OnCommand extends Command
364 function __construct($user, $other=null)
366 parent::__construct($user);
367 $this->other = $other;
370 function execute($channel)
373 $channel->error($this->user, _("Command not yet implemented."));
375 if ($channel->on($this->user)) {
376 $channel->output($this->user, _('Notification on.'));
378 $channel->error($this->user, _('Can\'t turn on notification.'));
384 class HelpCommand extends Command
386 function execute($channel)
388 $channel->output($this->user,
390 "on - turn on notifications\n".
391 "off - turn off notifications\n".
392 "help - show this help\n".
393 "follow <nickname> - subscribe to user\n".
394 "leave <nickname> - unsubscribe from user\n".
395 "d <nickname> <text> - direct message to user\n".
396 "get <nickname> - get last notice from user\n".
397 "whois <nickname> - get profile info on user\n".
398 "fav <nickname> - add user's last notice as a 'fave'\n".
399 "stats - get your stats\n".
400 "stop - same as 'off'\n".
401 "quit - same as 'off'\n".
402 "sub <nickname> - same as 'follow'\n".
403 "unsub <nickname> - same as 'leave'\n".
404 "last <nickname> - same as 'get'\n".
405 "on <nickname> - not yet implemented.\n".
406 "off <nickname> - not yet implemented.\n".
407 "nudge <nickname> - not yet implemented.\n".
408 "invite <phone number> - not yet implemented.\n".
409 "track <word> - not yet implemented.\n".
410 "untrack <word> - not yet implemented.\n".
411 "track off - not yet implemented.\n".
412 "untrack all - not yet implemented.\n".
413 "tracks - not yet implemented.\n".
414 "tracking - not yet implemented.\n"));