blog/lib.php

   1 <?php //$Id$
   2
   3     /**
   4      * Library of functions and constants for blog
   5      */
   6     require_once($CFG->libdir .'/blocklib.php');
   7     require_once($CFG->libdir .'/pagelib.php');
   8     require_once($CFG->dirroot .'/blog/rsslib.php');
   9     require_once($CFG->dirroot .'/blog/blogpage.php');
  10     include_once($CFG->dirroot.'/tag/lib.php');
  11
  12     /**
  13      * Definition of blogcourse page type (blog page with course id present).
  14      */
  15     //not used at the moment, and may not need to be
  16     define('PAGE_BLOG_COURSE_VIEW', 'blog_course-view');
  17
  18
  19     /**
  20      * Checks to see if user has visited blogpages before, if not, install 2
  21      * default blocks (blog_menu and blog_tags).
  22      */
  23     function blog_check_and_install_blocks() {
  24         global $USER;
  25         if (isloggedin() && !isguest()) {
  26             // if this user has not visited this page before
  27             if (!get_user_preferences('blogpagesize')) {
  28                 // find the correct ids for blog_menu and blog_from blocks
  29                 $menublock = get_record('block','name','blog_menu');
  30                 $tagsblock = get_record('block','name','blog_tags');
  31                 // add those 2 into block_instance page
  32
  33                 // add blog_menu block
  34                 $newblock = new object();
  35                 $newblock->blockid  = $menublock->id;
  36                 $newblock->pageid   = $USER->id;
  37                 $newblock->pagetype = 'blog-view';
  38                 $newblock->position = 'r';
  39                 $newblock->weight   = 0;
  40                 $newblock->visible  = 1;
  41                 insert_record('block_instance', $newblock);
  42
  43                 // add blog_tags menu
  44                 $newblock -> blockid = $tagsblock->id;
  45                 $newblock -> weight  = 1;
  46                 insert_record('block_instance', $newblock);
  47
  48                 // finally we set the page size pref
  49                 set_user_preference('blogpagesize', 10);
  50             }
  51         }
  52     }
  53
  54
  55     /**
  56      * Adaptation of isediting in moodlelib.php for blog module
  57      * @return bool
  58      */
  59     function blog_isediting() {
  60         global $SESSION;
  61
  62         return !empty($SESSION->blog_editing_enabled);
  63     }
  64
  65
  66     /**
  67      *  This function is in lib and not in BlogInfo because entries being searched
  68      *   might be found in any number of blogs rather than just one.
  69      *
  70      *   $@param ...
  71      */
  72     function blog_print_html_formatted_entries($postid, $filtertype, $filterselect, $tagid, $tag) {
  73
  74         global $CFG, $USER;
  75
  76         $blogpage  = optional_param('blogpage', 0, PARAM_INT);
  77         $bloglimit = optional_param('limit', get_user_preferences('blogpagesize', 10), PARAM_INT);
  78         $start     = $blogpage * $bloglimit;
  79
  80         $sitecontext = get_context_instance(CONTEXT_SYSTEM, SITEID);
  81
  82         $morelink = '<br />&nbsp;&nbsp;';
  83
  84         $totalentries = get_viewable_entry_count($postid, $bloglimit, $start, $filtertype, $filterselect, $tagid, $tag, $sort='lastmodified DESC');
  85         $blogEntries = blog_fetch_entries($postid, $bloglimit, $start, $filtertype, $filterselect, $tagid, $tag, $sort='lastmodified DESC', true);
  86
  87         print_paging_bar($totalentries, $blogpage, $bloglimit, get_baseurl($filtertype, $filterselect), 'blogpage');
  88
  89         if ($CFG->enablerssfeeds) {
  90             blog_rss_print_link($filtertype, $filterselect, $tag);
  91         }
  92
  93         if (has_capability('moodle/blog:create', $sitecontext)) {
  94             //the user's blog is enabled and they are viewing their own blog
  95             $addlink = '<div class="addbloglink">';
  96             $addlink .= '<a href="'.$CFG->wwwroot .'/blog/edit.php?action=add'.'">'. get_string('addnewentry', 'blog').'</a>';
  97             $addlink .= '</div>';
  98             echo $addlink;
  99         }
 100
 101         if ($blogEntries) {
 102
 103             $count = 0;
 104             foreach ($blogEntries as $blogEntry) {
 105                 blog_print_entry($blogEntry, 'list', $filtertype, $filterselect); //print this entry.
 106                 $count++;
 107             }
 108
 109             print_paging_bar($totalentries, $blogpage, $bloglimit, get_baseurl($filtertype, $filterselect), 'blogpage');
 110
 111             if (!$count) {
 112                 print '<br /><div style="text-align:center">'. get_string('noentriesyet', 'blog') .'</div><br />';
 113
 114             }
 115
 116             print $morelink.'<br />'."\n";
 117             return;
 118         }
 119
 120         $output = '<br /><div style="text-align:center">'. get_string('noentriesyet', 'blog') .'</div><br />';
 121
 122         print $output;
 123
 124     }
 125
 126
 127     /**
 128      * This function is in lib and not in BlogInfo because entries being searched
 129      * might be found in any number of blogs rather than just one.
 130      *
 131      * This function builds an array which can be used by the included
 132      * template file, making predefined and nicely formatted variables available
 133      * to the template. Template creators will not need to become intimate
 134      * with the internal objects and vars of moodle blog nor will they need to worry
 135      * about properly formatting their data
 136      *
 137      *   @param BlogEntry blogEntry - a hopefully fully populated BlogEntry object
 138      *   @param string viewtype Default is 'full'. If 'full' then display this blog entry
 139      *     in its complete form (eg. archive page). If anything other than 'full'
 140      *     display the entry in its abbreviated format (eg. index page)
 141      */
 142     function blog_print_entry($blogEntry, $viewtype='full', $filtertype='', $filterselect='', $mode='loud') {
 143
 144         global $USER, $CFG, $COURSE, $ME;
 145
 146         $template['body'] = format_text($blogEntry->summary, $blogEntry->format);
 147         //$template['title'] = '<a name="'. $blogEntry->subject .'"></a>';
 148         //enclose the title in nolink tags so that moodle formatting doesn't autolink the text
 149         $template['title'] = '<span class="nolink">'.$blogEntry->subject.'</span>';
 150         $template['userid'] = $blogEntry->userid;
 151         $template['author'] = fullname(get_record('user','id',$blogEntry->userid));
 152         $template['lastmod'] = userdate($blogEntry->lastmodified);
 153         $template['created'] = userdate($blogEntry->created);
 154         $template['publishstate'] = $blogEntry->publishstate;
 155
 156         /// preventing user to browse blogs that they aren't supposed to see
 157         /// This might not be too good since there are multiple calls per page
 158
 159         /*
 160         if (!blog_user_can_view_user_post($template['userid'])) {
 161             error ('you can not view this post');
 162         }*/
 163
 164         $stredit = get_string('edit');
 165         $strdelete = get_string('delete');
 166
 167         $user = get_record('user','id',$template['userid']);
 168
 169         /// Start printing of the blog
 170
 171         echo '<table cellspacing="0" class="forumpost blogpost blog'.$template['publishstate'].'" width="100%">';
 172
 173         echo '<tr class="header"><td class="picture left">';
 174         print_user_picture($template['userid'], SITEID, $user->picture);
 175         echo '</td>';
 176
 177         echo '<td class="topic starter"><div class="subject">'.$template['title'].'</div><div class="author">';
 178         $fullname = fullname($user, $template['userid']);
 179         $by = new object();
 180         $by->name =  '<a href="'.$CFG->wwwroot.'/user/view.php?id='.
 181                     $user->id.'&amp;course='.$COURSE->id.'">'.$fullname.'</a>';
 182         $by->date = $template['lastmod'];
 183         print_string('bynameondate', 'forum', $by);
 184         echo '</div></td></tr>';
 185
 186         echo '<tr><td class="left side">';
 187
 188     /// Actual content
 189
 190         echo '</td><td class="content">'."\n";
 191
 192         if ($blogEntry->attachment) {
 193             echo '<div class="attachments">';
 194             $attachedimages = blog_print_attachments($blogEntry);
 195             echo '</div>';
 196         } else {
 197             $attachedimages = '';
 198         }
 199
 200         switch ($template['publishstate']) {
 201             case 'draft':
 202                 $blogtype = get_string('publishtonoone', 'blog');
 203             break;
 204             case 'site':
 205                 $blogtype = get_string('publishtosite', 'blog');
 206             break;
 207             case 'public':
 208                 $blogtype = get_string('publishtoworld', 'blog');
 209             break;
 210             default:
 211                 $blogtype = '';
 212             break;
 213
 214         }
 215
 216         echo '<div class="audience">'.$blogtype.'</div>';
 217
 218         // Print whole message
 219         echo format_text($template['body']);
 220
 221         /// Print attachments
 222         echo $attachedimages;
 223     /// Links to tags
 224
 225         /*
 226         if ($blogtags = get_records_sql('SELECT t.* FROM '.$CFG->prefix.'tags t, '.$CFG->prefix.'blog_tag_instance ti
 227                                      WHERE t.id = ti.tagid
 228                                      AND ti.entryid = '.$blogEntry->id)) {
 229         */
 230         if (!empty($CFG->usetags) && ($blogtags = get_item_tags('blog', $blogEntry->id))) {
 231             echo '<div class="tags">';
 232             if ($blogtags) {
 233                 print_string('tags');
 234                 echo ': ';
 235                 foreach ($blogtags as $key => $blogtag) {
 236                     //$taglist[] = '<a href="index.php?filtertype='.$filtertype.'&amp;filterselect='.$filterselect.'&amp;tagid='.$blogtag->id.'">'.tag_display_name($blogtag).'</a>';  // Blog tag only
 237                     $taglist[] = '<a href="'.$CFG->wwwroot.'/tag/index.php?id='.$blogtag->id.'">'.tag_display_name($blogtag).'</a>';  // General tag link
 238                 }
 239                 echo implode(', ', $taglist);
 240             }
 241             echo '</div>';
 242         }
 243
 244     /// Commands
 245
 246         echo '<div class="commands">';
 247
 248         if (blog_user_can_edit_post($blogEntry)) {
 249             echo '<a href="'.$CFG->wwwroot.'/blog/edit.php?action=edit&amp;id='.$blogEntry->id.'">'.$stredit.'</a>';
 250             echo '| <a href="'.$CFG->wwwroot.'/blog/edit.php?action=delete&amp;id='.$blogEntry->id.'">'.$strdelete.'</a>';
 251         }
 252
 253         echo '</div>';
 254
 255         echo '</td></tr></table>'."\n\n";
 256
 257     }
 258
 259     function blog_file_area_name($blogentry) {
 260     //  Creates a directory file name, suitable for make_upload_directory()
 261         global $CFG;
 262         // $CFG->dataroot/blog/attachments/xxxx/file.jpg
 263         return "blog/attachments/$blogentry->id";
 264     }
 265
 266     function blog_file_area($blogentry) {
 267         return make_upload_directory( blog_file_area_name($blogentry) );
 268     }
 269
 270     function blog_delete_old_attachments($post, $exception="") {
 271     // Deletes all the user files in the attachments area for a post
 272     // EXCEPT for any file named $exception
 273
 274         if ($basedir = blog_file_area($post)) {
 275             if ($files = get_directory_list($basedir)) {
 276                 foreach ($files as $file) {
 277                     if ($file != $exception) {
 278                         unlink("$basedir/$file");
 279                         notify("Existing file '$file' has been deleted!");
 280                     }
 281                 }
 282             }
 283             if (!$exception) {  // Delete directory as well, if empty
 284                 rmdir("$basedir");
 285             }
 286         }
 287     }
 288
 289     function blog_print_attachments($blogentry, $return=NULL) {
 290     // if return=html, then return a html string.
 291     // if return=text, then return a text-only string.
 292     // otherwise, print HTML for non-images, and return image HTML
 293
 294         global $CFG;
 295
 296         $filearea = blog_file_area_name($blogentry);
 297
 298         $imagereturn = "";
 299         $output = "";
 300
 301         if ($basedir = blog_file_area($blogentry)) {
 302             if ($files = get_directory_list($basedir)) {
 303                 $strattachment = get_string("attachment", "forum");
 304                 foreach ($files as $file) {
 305                     include_once($CFG->libdir.'/filelib.php');
 306                     $icon = mimeinfo("icon", $file);
 307                     $type = mimeinfo("type", $file);
 308                     if ($CFG->slasharguments) {
 309                         $ffurl = "$CFG->wwwroot/file.php/$filearea/$file";
 310                     } else {
 311                         $ffurl = "$CFG->wwwroot/file.php?file=/$filearea/$file";
 312                     }
 313                     $image = "<img src=\"$CFG->pixpath/f/$icon\" class=\"icon\" alt=\"\" />";
 314
 315                     if ($return == "html") {
 316                         $output .= "<a href=\"$ffurl\">$image</a> ";
 317                         $output .= "<a href=\"$ffurl\">$file</a><br />";
 318
 319                     } else if ($return == "text") {
 320                         $output .= "$strattachment $file:\n$ffurl\n";
 321
 322                     } else {
 323                         if (in_array($type, array('image/gif', 'image/jpeg', 'image/png'))) {    // Image attachments don't get printed as links
 324                             $imagereturn .= "<br /><img src=\"$ffurl\" alt=\"\" />";
 325                         } else {
 326                             echo "<a href=\"$ffurl\">$image</a> ";
 327                             echo filter_text("<a href=\"$ffurl\">$file</a><br />");
 328                         }
 329                     }
 330                 }
 331             }
 332         }
 333
 334         if ($return) {
 335             return $output;
 336         }
 337
 338         return $imagereturn;
 339     }
 340
 341
 342     /**
 343      * Use this function to retrieve a list of publish states available for
 344      * the currently logged in user.
 345      *
 346      * @return array This function returns an array ideal for sending to moodles'
 347      *                choose_from_menu function.
 348      */
 349     function blog_applicable_publish_states($courseid='') {
 350
 351         global $CFG;
 352
 353         // everyone gets draft access
 354         if ($CFG->bloglevel >= BLOG_USER_LEVEL) {
 355             $options = array ( 'draft' => get_string('publishtonoone', 'blog') );
 356         }
 357
 358         if ($CFG->bloglevel > BLOG_USER_LEVEL) {
 359             $options['site'] = get_string('publishtosite', 'blog');
 360         }
 361
 362         if ($CFG->bloglevel >= BLOG_GLOBAL_LEVEL) {
 363             $options['public'] = get_string('publishtoworld', 'blog');
 364         }
 365
 366         return $options;
 367     }
 368
 369
 370     /**
 371      * User can edit a blog entry if this is their own blog post and they have
 372      * the capability moodle/blog:create, or if they have the capability
 373      * moodle/blog:manageentries.
 374      *
 375      * This also applies to deleting of posts.
 376      */
 377     function blog_user_can_edit_post($blogEntry) {
 378
 379         global $CFG, $USER;
 380
 381         $sitecontext = get_context_instance(CONTEXT_SYSTEM, SITEID);
 382
 383         if (has_capability('moodle/blog:manageentries', $sitecontext)) {
 384             return true; // can edit any blog post
 385         }
 386
 387         if ($blogEntry->userid == $USER->id
 388           and has_capability('moodle/blog:create', $sitecontext)) {
 389             return true; // can edit own when having blog:create capability
 390         }
 391
 392         return false;
 393     }
 394
 395
 396     /**
 397      * Checks to see if a user can view the blogs of another user.
 398      * Only blog level is checked here, the capabilities are enforced
 399      * in blog/index.php
 400      */
 401     function blog_user_can_view_user_post($targetuserid, $blogEntry=null) {
 402         global $CFG, $USER;
 403
 404         if (empty($CFG->bloglevel)) {
 405             return false; // blog system disabled
 406         }
 407
 408         if (!empty($USER->id) and $USER->id == $targetuserid) {
 409             return true; // can view own posts in any case
 410         }
 411
 412         $sitecontext = get_context_instance(CONTEXT_SYSTEM, SITEID);
 413         if (has_capability('moodle/blog:manageentries', $sitecontext)) {
 414             return true; // can manage all posts
 415         }
 416
 417         // coming for 1 post, make sure it's not a draft
 418         if ($blogEntry and $blogEntry->publishstate == 'draft') {
 419             return false;  // can not view draft of others
 420         }
 421
 422         // coming for 1 post, make sure user is logged in, if not a public blog
 423         if ($blogEntry && $blogEntry->publishstate != 'public' && !isloggedin()) {
 424             return false;
 425         }
 426
 427         switch ($CFG->bloglevel) {
 428             case BLOG_GLOBAL_LEVEL:
 429                 return true;
 430             break;
 431
 432             case BLOG_SITE_LEVEL:
 433                 if (!empty($USER->id)) { // not logged in viewers forbidden
 434                     return true;
 435                 }
 436                 return false;
 437             break;
 438
 439             case BLOG_COURSE_LEVEL:
 440                 $mycourses = array_keys(get_my_courses($USER->id));
 441                 $usercourses = array_keys(get_my_courses($targetuserid));
 442                 $shared = array_intersect($mycourses, $usercourses);
 443                 if (!empty($shared)) {
 444                     return true;
 445                 }
 446                 return false;
 447             break;
 448
 449             case BLOG_GROUP_LEVEL:
 450                 $mycourses = array_keys(get_my_courses($USER->id));
 451                 $usercourses = array_keys(get_my_courses($targetuserid));
 452                 $shared = array_intersect($mycourses, $usercourses);
 453                 foreach ($shared as $courseid) {
 454                     $coursecontext = get_context_instance(CONTEXT_COURSE, $courseid);
 455                     if (has_capability('moodle/site:accessallgroups', $coursecontext)
 456                       or groupmode($courseid) != SEPARATEGROUPS) {
 457                         return true;
 458                     } else {
 459                         if ($usergroups = groups_get_all_groups($courseid, $targetuserid)) {
 460                             foreach ($usergroups as $usergroup) {
 461                                 if (groups_is_member($usergroup->id)) {
 462                                     return true;
 463                                 }
 464                             }
 465                         }
 466                     }
 467                 }
 468                 return false;
 469             break;
 470
 471             case BLOG_USER_LEVEL:
 472             default:
 473                 $personalcontext = get_context_instance(CONTEXT_USER, $targetuserid);
 474                 return has_capability('moodle/user:readuserblogs', $personalcontext);
 475             break;
 476
 477         }
 478     }
 479
 480
 481     /**
 482      * Main filter function.
 483      */
 484     function blog_fetch_entries($postid='', $fetchlimit=10, $fetchstart='', $filtertype='', $filterselect='', $tagid='', $tag ='', $sort='lastmodified DESC', $limit=true) {
 485
 486         global $CFG, $USER;
 487
 488         /// the post table will be used for other things too
 489         $typesql = " AND p.module = 'blog' ";
 490
 491         /// set the tag id for searching
 492         if ($tagid) {
 493             $tag = $tagid;
 494         } else if ($tag) {
 495             if ($tagrec = get_record_sql('SELECT * FROM '.$CFG->prefix.'tag WHERE name LIKE "'.$tag.'"')) {
 496                 $tag = $tagrec->id;
 497             } else {
 498                 $tag = -1;    //no records found
 499             }
 500         }
 501
 502         // If we have specified an ID
 503         // Just return 1 entry
 504
 505         if ($postid) {
 506
 507             if ($post = get_record('post', 'id', $postid)) {
 508
 509                 if (blog_user_can_view_user_post($post->userid, $post)) {
 510
 511                     if ($user = get_record('user', 'id', $post->userid)) {
 512                         $post->email = $user->email;
 513                         $post->firstname = $user->firstname;
 514                         $post->lastname = $user->lastname;
 515                     }
 516                     $retarray[] = $post;
 517                     return $retarray;
 518                 } else {
 519                     return null;
 520                 }
 521
 522             } else { // bad postid
 523                 return null;
 524             }
 525         }
 526
 527         if ($tag) {
 528             $tagtablesql = $CFG->prefix.'tag_instance ti, ';
 529             $tagquerysql = ' AND ti.itemid = p.id AND ti.tagid = '.$tag.' AND ti.itemtype = \'blog\' ';
 530         } else {
 531             $tagtablesql = '';
 532             $tagquerysql = '';
 533         }
 534
 535         if (isloggedin() && !has_capability('moodle/legacy:guest', get_context_instance(CONTEXT_SYSTEM, SITEID), $USER->id, false)) {
 536             $permissionsql =  'AND (p.publishstate = \'site\' OR p.publishstate = \'public\' OR p.userid = '.$USER->id.')';
 537         } else {
 538             $permissionsql =  'AND p.publishstate = \'public\'';
 539         }
 540
 541         // fix for MDL-9165, use with readuserblogs capability in a user context can read that user's private blogs
 542         // admins can see all blogs regardless of publish states, as described on the help page
 543         if (has_capability('moodle/user:readuserblogs', get_context_instance(CONTEXT_SYSTEM, SITEID))) {
 544             $permissionsql = '';
 545         } else if ($filtertype=='user' && has_capability('moodle/user:readuserblogs', get_context_instance(CONTEXT_USER, $filterselect))) {
 546             $permissionsql = '';
 547         }
 548         /****************************************
 549          * depending on the type, there are 4   *
 550          * different possible sqls              *
 551          ****************************************/
 552
 553         $requiredfields = 'p.*, u.firstname,u.lastname,u.email';
 554
 555         if ($filtertype == 'course' && $filterselect == SITEID) {  // Really a site
 556             $filtertype = 'site';
 557         }
 558
 559         switch ($filtertype) {
 560
 561             case 'site':
 562
 563                 $SQL = 'SELECT '.$requiredfields.' FROM '.$CFG->prefix.'post p, '.$tagtablesql
 564                         .$CFG->prefix.'user u
 565                         WHERE p.userid = u.id '.$tagquerysql.'
 566                         AND u.deleted = 0
 567                         '.$permissionsql.$typesql;
 568
 569             break;
 570
 571             case 'course':
 572                 // all users with a role assigned
 573                 $context = get_context_instance(CONTEXT_COURSE, $filterselect);
 574
 575                 // MDL-10037, hidden users' blogs should not appear
 576                 if (has_capability('moodle/role:viewhiddenassigns', $context)) {
 577                     $hiddensql = '';
 578                 } else {
 579                     $hiddensql = ' AND ra.hidden = 0 ';
 580                 }
 581
 582                 $SQL = 'SELECT '.$requiredfields.' FROM '.$CFG->prefix.'post p, '.$tagtablesql
 583                         .$CFG->prefix.'role_assignments ra, '.$CFG->prefix.'user u
 584                         WHERE p.userid = ra.userid '.$tagquerysql.'
 585                         AND ra.contextid '.get_related_contexts_string($context).'
 586                         AND u.id = p.userid
 587                         AND u.deleted = 0
 588                         '.$hiddensql.$permissionsql.$typesql;
 589
 590             break;
 591
 592             case 'group':
 593
 594                 $SQL = 'SELECT '.$requiredfields.' FROM '.$CFG->prefix.'post p, '.$tagtablesql
 595                           .$CFG->prefix.'groups_members gm, '.$CFG->prefix.'user u
 596                         WHERE p.userid = gm.userid AND u.id = p.userid '.$tagquerysql.'
 597                           AND gm.groupid = '.$filterselect.'
 598                           AND u.deleted = 0
 599                           '.$permissionsql.$typesql;
 600             break;
 601
 602             case 'user':
 603
 604                 $SQL = 'SELECT '.$requiredfields.' FROM '.$CFG->prefix.'post p, '.$tagtablesql
 605                         .$CFG->prefix.'user u
 606                         WHERE p.userid = u.id '.$tagquerysql.'
 607                         AND u.id = '.$filterselect.'
 608                         AND u.deleted = 0
 609                         '.$permissionsql.$typesql;
 610             break;
 611         }
 612
 613         $limitfrom = 0;
 614         $limitnum = 0;
 615
 616         if ($fetchstart !== '' && $limit) {
 617             $limitfrom = $fetchstart;
 618             $limitnum = $fetchlimit;
 619         }
 620
 621         $orderby = ' ORDER BY '. $sort .' ';
 622
 623         //global $db; $db->debug = true;
 624         $records = get_records_sql($SQL . $orderby, $limitfrom, $limitnum);
 625         //$db->debug = false;
 626
 627         if (empty($records)) {
 628             return array();
 629         }
 630
 631         return $records;
 632     }
 633
 634
 635     /**
 636      * get the count of viewable entries, easiest way is to count blog_fetch_entries
 637      * this is used for print_paging_bar
 638      * this is not ideal, but because of the UNION in the sql in blog_fetch_entries,
 639      * it is hard to use count_records_sql
 640      */
 641     function get_viewable_entry_count($postid='', $fetchlimit=10,
 642                 $fetchstart='', $filtertype='', $filterselect='', $tagid='',
 643                 $tag ='', $sort='lastmodified DESC') {
 644
 645         $blogEntries = blog_fetch_entries($postid, $fetchlimit,
 646                 $fetchstart, $filtertype, $filterselect, $tagid, $tag,
 647                 $sort='lastmodified DESC', false);
 648
 649         return count($blogEntries);
 650     }
 651
 652
 653     /// Find the base url from $_GET variables, for print_paging_bar
 654     function get_baseurl($filtertype, $filterselect) {
 655
 656         $getcopy  = $_GET;
 657
 658         unset($getcopy['blogpage']);
 659
 660         $strippedurl = strip_querystring(qualified_me());
 661         if(!empty($getcopy)) {
 662             $first = false;
 663             $querystring = '';
 664             foreach($getcopy as $var => $val) {
 665                 if(!$first) {
 666                     $first = true;
 667                     if ($var != 'filterselect' && $var != 'filtertype') {
 668                         $querystring .= '?'.$var.'='.$val;
 669                         $hasparam = true;
 670                     } else {
 671                         $querystring .= '?';
 672                     }
 673                 } else {
 674                     if ($var != 'filterselect' && $var != 'filtertype') {
 675                     $querystring .= '&amp;'.$var.'='.$val;
 676                     $hasparam = true;
 677                     }
 678                 }
 679             }
 680             if (isset($hasparam)) {
 681                 $querystring .= '&amp;';
 682             } else {
 683                 $querystring = '?';
 684             }
 685         } else {
 686             $querystring = '?';
 687         }
 688
 689         return strip_querystring(qualified_me()) . $querystring. 'filtertype='.
 690                 $filtertype.'&amp;filterselect='.$filterselect.'&amp;';
 691
 692     }
 693 ?>