3 * StatusNet - the distributed open-source microblogging tool
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU Affero General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU Affero General Public License for more details.
15 * You should have received a copy of the GNU Affero General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
20 * @author Shashi Gowda <connect2shashi@gmail.com>
21 * @license GNU Affero General Public License http://www.gnu.org/licenses/
24 if (!defined('STATUSNET') && !defined('LACONICA')) {
29 * Table Definition for profile_list
31 require_once INSTALLDIR.'/classes/Memcached_DataObject.php';
33 class Profile_list extends Memcached_DataObject
36 /* the code below is auto generated do not remove the above tag */
38 public $__table = 'profile_list'; // table name
39 public $id; // int(4) primary_key not_null
40 public $tagger; // int(4)
41 public $tag; // varchar(64)
42 public $description; // text
43 public $private; // tinyint(1)
44 public $created; // datetime not_null default_0000-00-00%2000%3A00%3A00
45 public $modified; // timestamp not_null default_CURRENT_TIMESTAMP
46 public $uri; // varchar(255) unique_key
47 public $mainpage; // varchar(255)
48 public $tagged_count; // smallint
49 public $subscriber_count; // smallint
52 function staticGet($k,$v=NULL) { return Memcached_DataObject::staticGet('Profile_list',$k,$v); }
54 /* the code above is auto generated do not remove the tag below */
58 * return a profile_list record, given its tag and tagger.
60 * @param array $kv ideally array('tag' => $tag, 'tagger' => $tagger)
62 * @return Profile_list a Profile_list object with the given tag and tagger.
67 return Memcached_DataObject::pkeyGet('Profile_list', $kv);
71 * get the tagger of this profile_list object
73 * @return Profile the tagger
78 return Profile::staticGet('id', $this->tagger);
82 * return a string to identify this
83 * profile_list in the user interface etc.
88 function getBestName()
94 * return a uri string for this profile_list
102 if (Event::handle('StartProfiletagGetUri', array($this, &$uri))) {
103 if (!empty($this->uri)) {
106 $uri = common_local_url('profiletagbyid',
107 array('id' => $this->id, 'tagger_id' => $this->tagger));
110 Event::handle('EndProfiletagGetUri', array($this, &$uri));
115 * return a url to the homepage of this item
117 * @return String home url
123 if (Event::handle('StartUserPeopletagHomeUrl', array($this, &$url))) {
124 // normally stored in mainpage, but older ones may be null
125 if (!empty($this->mainpage)) {
126 $url = $this->mainpage;
128 $url = common_local_url('showprofiletag',
129 array('tagger' => $this->getTagger()->nickname,
130 'tag' => $this->tag));
133 Event::handle('EndUserPeopletagHomeUrl', array($this, &$url));
138 * return an immutable url for this object
140 * @return String permalink
146 if (Event::handle('StartProfiletagPermalink', array($this, &$url))) {
147 $url = common_local_url('profiletagbyid',
148 array('id' => $this->id));
150 Event::handle('EndProfiletagPermalink', array($this, &$url));
155 * Query notices by users associated with this tag,
156 * but first check the cache before hitting the DB.
158 * @param integer $offset offset
159 * @param integer $limit maximum no of results
160 * @param integer $since_id=null since this id
161 * @param integer $max_id=null maximum id in result
163 * @return Notice the query
166 function getNotices($offset, $limit, $since_id=null, $max_id=null)
168 $stream = new PeopletagNoticeStream($this);
170 return $stream->getNotices($offset, $limit, $since_id, $max_id);
174 * Get subscribers (local and remote) to this people tag
175 * Order by reverse chronology
177 * @param integer $offset offset
178 * @param integer $limit maximum no of results
179 * @param integer $since_id=null since unix timestamp
180 * @param integer $upto=null maximum unix timestamp when subscription was made
182 * @return Profile results
185 function getSubscribers($offset=0, $limit=null, $since=0, $upto=0)
187 $subs = new Profile();
190 array('id', 'profile_tag_subscription:profile_id')
192 $subs->whereAdd('profile_tag_subscription.profile_tag_id = ' . $this->id);
194 $subs->selectAdd('unix_timestamp(profile_tag_subscription.' .
195 'created) as "cursor"');
198 $subs->whereAdd('cursor > ' . $since);
202 $subs->whereAdd('cursor <= ' . $upto);
205 if ($limit != null) {
206 $subs->limit($offset, $limit);
209 $subs->orderBy('profile_tag_subscription.created DESC');
216 * Get all and only local subscribers to this people tag
217 * used for distributing notices to user inboxes.
219 * @return array ids of users
222 function getUserSubscribers()
227 if(common_config('db','quote_identifiers'))
228 $user_table = '"user"';
229 else $user_table = 'user';
233 'FROM '. $user_table .' JOIN profile_tag_subscription '.
234 'ON '. $user_table .'.id = profile_tag_subscription.profile_id ' .
235 'WHERE profile_tag_subscription.profile_tag_id = %d ';
237 $user->query(sprintf($qry, $this->id));
241 while ($user->fetch()) {
251 * Check to see if a given profile has
252 * subscribed to this people tag's timeline
254 * @param mixed $id User or Profile object or integer id
256 * @return boolean subscription status
259 function hasSubscriber($id)
261 if (!is_numeric($id)) {
265 $sub = Profile_tag_subscription::pkeyGet(array('profile_tag_id' => $this->id,
266 'profile_id' => $id));
271 * Get profiles tagged with this people tag,
272 * include modified timestamp as a "cursor" field
273 * order by descending order of modified time
275 * @param integer $offset offset
276 * @param integer $limit maximum no of results
277 * @param integer $since_id=null since unix timestamp
278 * @param integer $upto=null maximum unix timestamp when subscription was made
280 * @return Profile results
283 function getTagged($offset=0, $limit=null, $since=0, $upto=0)
285 $tagged = new Profile();
286 $tagged->joinAdd(array('id', 'profile_tag:tagged'));
289 $tagged->selectAdd('unix_timestamp(profile_tag.modified) as "cursor"');
290 $tagged->whereAdd('profile_tag.tagger = '.$this->tagger);
291 $tagged->whereAdd("profile_tag.tag = '{$this->tag}'");
294 $tagged->whereAdd('cursor > ' . $since);
298 $tagged->whereAdd('cursor <= ' . $upto);
301 if ($limit != null) {
302 $tagged->limit($offset, $limit);
305 $tagged->orderBy('profile_tag.modified DESC');
312 * Gracefully delete one or many people tags
313 * along with their members and subscriptions data
315 * @return boolean success
320 // force delete one item at a time.
321 if (empty($this->id)) {
323 while ($this->fetch()) {
328 Profile_tag::cleanup($this);
329 Profile_tag_subscription::cleanup($this);
331 self::blow('profile:lists:%d', $this->tagger);
333 return parent::delete();
337 * Update a people tag gracefully
338 * also change "tag" fields in profile_tag table
340 * @param Profile_list $orig Object's original form
342 * @return boolean success
345 function update($orig=null)
349 if (!is_object($orig) && !$orig instanceof Profile_list) {
350 parent::update($orig);
353 // if original tag was different
354 // check to see if the new tag already exists
355 // if not, rename the tag correctly
356 if($orig->tag != $this->tag || $orig->tagger != $this->tagger) {
357 $existing = Profile_list::getByTaggerAndTag($this->tagger, $this->tag);
358 if(!empty($existing)) {
359 // TRANS: Server exception.
360 throw new ServerException(_('The tag you are trying to rename ' .
361 'to already exists.'));
364 // XXX: allow OStatus plugin to send out profile tag
365 $result = Profile_tag::moveTag($orig, $this);
367 parent::update($orig);
372 * return an xml string representing this people tag
373 * as the author of an atom feed
375 * @return string atom author element
378 function asAtomAuthor()
380 $xs = new XMLStringer(true);
382 $tagger = $this->getTagger();
383 $xs->elementStart('author');
384 $xs->element('name', null, '@' . $tagger->nickname . '/' . $this->tag);
385 $xs->element('uri', null, $this->permalink());
386 $xs->elementEnd('author');
388 return $xs->getString();
392 * return an xml string to represent this people tag
393 * as the subject of an activitystreams feed.
395 * @return string activitystreams subject
398 function asActivitySubject()
400 return $this->asActivityNoun('subject');
404 * return an xml string to represent this people tag
405 * as a noun in an activitystreams feed.
407 * @param string $element the xml tag
409 * @return string activitystreams noun
412 function asActivityNoun($element)
414 $noun = ActivityObject::fromPeopletag($this);
415 return $noun->asString('activity:' . $element);
419 * get the cached number of profiles tagged with this
420 * people tag, re-count if the argument is true.
422 * @param boolean $recount whether to ignore cache
424 * @return integer count
427 function taggedCount($recount=false)
429 $keypart = sprintf('profile_list:tagged_count:%d:%s',
433 $count = self::cacheGet($keypart);
435 if ($count === false) {
436 $tags = new Profile_tag();
438 $tags->tag = $this->tag;
439 $tags->tagger = $this->tagger;
441 $count = $tags->count('distinct tagged');
443 self::cacheSet($keypart, $count);
450 * get the cached number of profiles subscribed to this
451 * people tag, re-count if the argument is true.
453 * @param boolean $recount whether to ignore cache
455 * @return integer count
458 function subscriberCount($recount=false)
460 $keypart = sprintf('profile_list:subscriber_count:%d',
463 $count = self::cacheGet($keypart);
465 if ($count === false) {
467 $sub = new Profile_tag_subscription();
468 $sub->profile_tag_id = $this->id;
469 $count = (int) $sub->count('distinct profile_id');
471 self::cacheSet($keypart, $count);
478 * get the cached number of profiles subscribed to this
479 * people tag, re-count if the argument is true.
481 * @param boolean $recount whether to ignore cache
483 * @return integer count
486 function blowNoticeStreamCache($all=false)
488 self::blow('profile_list:notice_ids:%d', $this->id);
490 self::blow('profile_list:notice_ids:%d;last', $this->id);
495 * get the Profile_list object by the
496 * given tagger and with given tag
498 * @param integer $tagger the id of the creator profile
499 * @param integer $tag the tag
501 * @return integer count
504 static function getByTaggerAndTag($tagger, $tag)
506 $ptag = Profile_list::pkeyGet(array('tagger' => $tagger, 'tag' => $tag));
511 * create a profile_list record for a tag, tagger pair
512 * if it doesn't exist, return it.
514 * @param integer $tagger the tagger
515 * @param string $tag the tag
516 * @param string $description description
517 * @param boolean $private protected or not
519 * @return Profile_list the people tag object
522 static function ensureTag($tagger, $tag, $description=null, $private=false)
524 $ptag = Profile_list::getByTaggerAndTag($tagger, $tag);
526 if(empty($ptag->id)) {
530 'description' => $description,
531 'private' => $private
534 $new_tag = Profile_list::saveNew($args);
542 * get the maximum number of characters
543 * that can be used in the description of
546 * determined by $config['peopletag']['desclimit']
547 * if not set, falls back to $config['site']['textlimit']
549 * @return integer maximum number of characters
552 static function maxDescription()
554 $desclimit = common_config('peopletag', 'desclimit');
555 // null => use global limit (distinct from 0!)
556 if (is_null($desclimit)) {
557 $desclimit = common_config('site', 'textlimit');
563 * check if the length of given text exceeds
566 * @param string $desc the description
568 * @return boolean is the descripition too long?
571 static function descriptionTooLong($desc)
573 $desclimit = self::maxDescription();
574 return ($desclimit > 0 && !empty($desc) && (mb_strlen($desc) > $desclimit));
578 * save a new people tag, this should be always used
579 * since it makes uri, homeurl, created and modified
580 * timestamps and performs checks.
582 * @param array $fields an array with fields and their values
584 * @return mixed Profile_list on success, false on fail
586 static function saveNew($fields) {
589 $ptag = new Profile_list();
591 $ptag->query('BEGIN');
593 if (empty($tagger)) {
594 // TRANS: Server exception saving new tag without having a tagger specified.
595 throw new Exception(_('No tagger specified.'));
599 // TRANS: Server exception saving new tag without having a tag specified.
600 throw new Exception(_('No tag specified.'));
603 if (empty($mainpage)) {
612 if (empty($mainpage)) {
616 if (empty($description)) {
620 if (empty($private)) {
624 $ptag->tagger = $tagger;
626 $ptag->description = $description;
627 $ptag->private = $private;
629 $ptag->mainpage = $mainpage;
630 $ptag->created = common_sql_now();
631 $ptag->modified = common_sql_now();
633 $result = $ptag->insert();
636 common_log_db_error($ptag, 'INSERT', __FILE__);
637 // TRANS: Server exception saving new tag.
638 throw new ServerException(_('Could not create profile tag.'));
641 if (!isset($uri) || empty($uri)) {
642 $orig = clone($ptag);
643 $ptag->uri = common_local_url('profiletagbyid', array('id' => $ptag->id, 'tagger_id' => $ptag->tagger));
644 $result = $ptag->update($orig);
646 common_log_db_error($ptag, 'UPDATE', __FILE__);
647 // TRANS: Server exception saving new tag.
648 throw new ServerException(_('Could not set profile tag URI.'));
652 if (!isset($mainpage) || empty($mainpage)) {
653 $orig = clone($ptag);
654 $user = User::staticGet('id', $ptag->tagger);
656 $ptag->mainpage = common_local_url('showprofiletag', array('tag' => $ptag->tag, 'tagger' => $user->nickname));
658 $ptag->mainpage = $uri; // assume this is a remote peopletag and the uri works
661 $result = $ptag->update($orig);
663 common_log_db_error($ptag, 'UPDATE', __FILE__);
664 // TRANS: Server exception saving new tag.
665 throw new ServerException(_('Could not set profile tag mainpage.'));
672 * get all items at given cursor position for api
674 * @param callback $fn a function that takes the following arguments in order:
675 * $offset, $limit, $since_id, $max_id
676 * and returns a Profile_list object after making the DB query
677 * @param array $args arguments required for $fn
678 * @param integer $cursor the cursor
679 * @param integer $count max. number of results
682 * - if cursor is 0, return empty list
683 * - if cursor is -1, get first 21 items, next_cursor = 20th prev_cursor = 0
684 * - if cursor is +ve get 22 consecutive items before starting at cursor
685 * - return items[1..20] if items[0] == cursor else return items[0..21]
686 * - prev_cursor = items[1]
687 * - next_cursor = id of the last item being returned
689 * - if cursor is -ve get 22 consecutive items after cursor starting at cursor
690 * - return items[1..20]
692 * @returns array (array (mixed items), int next_cursor, int previous_cursor)
695 // XXX: This should be in Memcached_DataObject... eventually.
697 static function getAtCursor($fn, $args, $cursor, $count=20)
707 // if cursor is +ve fetch $count+2 items before cursor starting at cursor
709 $fn_args = array_merge($args, array(0, $count+2, 0, $max_id));
710 $list = call_user_func_array($fn, $fn_args);
711 while($list->fetch()) {
712 $items[] = clone($list);
715 if ((isset($items[0]->cursor) && $items[0]->cursor == $cursor) ||
716 $items[0]->id == $cursor) {
718 $prev_cursor = isset($items[0]->cursor) ?
719 -$items[0]->cursor : -$items[0]->id;
721 if (count($items) > $count+1) {
724 // this means the cursor item has been deleted, check to see if there are more
725 $fn_args = array_merge($args, array(0, 1, $cursor));
726 $more = call_user_func($fn, $fn_args);
727 if (!$more->fetch() || empty($more)) {
731 $prev_cursor = isset($items[0]->cursor) ?
732 -$items[0]->cursor : -$items[0]->id;
736 if (count($items)==$count+1) {
737 // this means there is a next page.
738 $next = array_pop($items);
739 $next_cursor = isset($next->cursor) ?
740 $items[$count-1]->cursor : $items[$count-1]->id;
743 } else if($cursor < -1) {
744 // if cursor is -ve fetch $count+2 items created after -$cursor-1
745 $cursor = abs($cursor);
746 $since_id = $cursor-1;
748 $fn_args = array_merge($args, array(0, $count+2, $since_id));
749 $list = call_user_func_array($fn, $fn_args);
750 while($list->fetch()) {
751 $items[] = clone($list);
754 $end = count($items)-1;
755 if ((isset($items[$end]->cursor) && $items[$end]->cursor == $cursor) ||
756 $items[$end]->id == $cursor) {
758 $next_cursor = isset($items[$end-1]->cursor) ?
759 $items[$end-1]->cursor : $items[$end-1]->id;
761 $next_cursor = isset($items[$end]->cursor) ?
762 $items[$end]->cursor : $items[$end]->id;
763 if ($end > $count) array_pop($items); // excess item.
765 // check if there are more items for next page
766 $fn_args = array_merge($args, array(0, 1, 0, $cursor));
767 $more = call_user_func_array($fn, $fn_args);
768 if (!$more->fetch() || empty($more)) {
773 if (count($items) == $count+1) {
774 // this means there is a previous page.
775 $prev = array_shift($items);
776 $prev_cursor = isset($prev->cursor) ?
777 -$items[0]->cursor : -$items[0]->id;
779 } else if($cursor == -1) {
780 $fn_args = array_merge($args, array(0, $count+1));
781 $list = call_user_func_array($fn, $fn_args);
783 while($list->fetch()) {
784 $items[] = clone($list);
787 if (count($items)==$count+1) {
788 $next = array_pop($items);
789 if(isset($next->cursor)) {
790 $next_cursor = $items[$count-1]->cursor;
792 $next_cursor = $items[$count-1]->id;
797 return array($items, $next_cursor, $prev_cursor);
801 * save a collection of people tags into the cache
803 * @param string $ckey cache key
804 * @param Profile_list &$tag the results to store
805 * @param integer $offset offset for slicing results
806 * @param integer $limit maximum number of results
808 * @return boolean success
811 static function setCache($ckey, &$tag, $offset=0, $limit=null) {
812 $cache = Cache::instance();
818 while ($tag->fetch()) {
819 $str .= $tag->tagger . ':' . $tag->tag . ';';
820 $tags[] = clone($tag);
822 $str = substr($str, 0, -1);
823 if ($offset>=0 && !is_null($limit)) {
824 $tags = array_slice($tags, $offset, $limit);
827 $tag = new ArrayWrapper($tags);
829 return self::cacheSet($ckey, $str);
833 * get people tags from the cache
835 * @param string $ckey cache key
836 * @param integer $offset offset for slicing
837 * @param integer $limit limit
839 * @return Profile_list results
842 static function getCached($ckey, $offset=0, $limit=null) {
844 $keys_str = self::cacheGet($ckey);
845 if ($keys_str === false) {
849 $pairs = explode(';', $keys_str);
851 foreach ($pairs as $pair) {
852 $keys[] = explode(':', $pair);
855 if ($offset>=0 && !is_null($limit)) {
856 $keys = array_slice($keys, $offset, $limit);
858 return self::getByKeys($keys);
862 * get Profile_list objects from the database
863 * given their (tag, tagger) key pairs.
865 * @param array $keys array of array(tagger, tag)
867 * @return Profile_list results
870 static function getByKeys($keys) {
871 $cache = Cache::instance();
873 if (!empty($cache)) {
876 foreach ($keys as $key) {
877 $t = Profile_list::getByTaggerAndTag($key[0], $key[1]);
882 return new ArrayWrapper($tags);
884 $tag = new Profile_list();
886 //if no IDs requested, just return the tag object
891 foreach ($keys as $key) {
892 $pairs[] = '(' . $key[0] . ', "' . $key[1] . '")';
895 $tag->whereAdd('(tagger, tag) in (' . implode(', ', $pairs) . ')');
901 while ($tag->fetch()) {
902 $temp[$tag->tagger.'-'.$tag->tag] = clone($tag);
907 foreach ($keys as $key) {
908 $id = $key[0].'-'.$key[1];
909 if (array_key_exists($id, $temp)) {
910 $wrapped[] = $temp[$id];
914 return new ArrayWrapper($wrapped);
920 $result = parent::insert();
922 self::blow('profile:lists:%d', $this->tagger);