Add forum statistics section

This will create a new block under the forums called "What's Going On?", it displays the number of members, posts, and topics your forum has, along with the online users and the latest member.

I am currently adding:

In advanced_forum.module add:

<?php
// $Id$

/************************* GENERAL FUNCTIONS *********************************/

// Count total amount of forum threads*
function advanced_statistics_topics() {
    $topics = db_result(db_query('SELECT COUNT(vid) AS number FROM {forum}'));
    return $topics;
}

// Count total amount of forum posts
function advanced_statistics_posts() {
    $posts = db_result(db_query('SELECT COUNT(cid) AS number FROM {comments}'));
    return $posts;
}

// Count total amount of members
function advanced_statistics_members() {
    $members = db_result(db_query('SELECT COUNT(uid) AS number FROM {users} WHERE status=1'));
    return $members;
}

// Display latest member
function advanced_statistics_latestmember() {
    $l_member = db_result(db_query('SELECT name FROM {users} ORDER BY created DESC'));
    return $l_member;
}

// Grab latest member uid
function advanced_statistics_latestmemberuid() {
    $l_member_uid = db_result(db_query('SELECT uid FROM {users} ORDER BY created DESC'));
    return $l_member_uid;
}

// Formatting the userlist
function advanced_statistics_onlineusers() {

    if (user_access('access content')) {
      $interval = time() - variable_get('user_block_seconds_online', 900);

      $anonymous_count = sess_count($interval);
      $authenticated_users = db_query('SELECT DISTINCT u.uid, u.name, s.timestamp FROM {users} u INNER JOIN {sessions} s ON u.uid = s.uid WHERE s.timestamp >= %d AND s.uid > 0 ORDER BY s.timestamp DESC', $interval);
      $authenticated_count = 0;
      $max_users = variable_get('user_block_max_list_count', 10);
      $items = array();
      while ($account = db_fetch_object($authenticated_users)) {
        if ($max_users > 0) {
          $items[] = $account;
          $max_users--;
        }
        $authenticated_count++;
      }

      // Output the userlist.
      $max_users = variable_get('user_block_max_list_count', 10);
      if ($authenticated_count && $max_users) {
        $list = array();
        foreach ($items as $item) {
        $list[] = l($item->name, 'user/' . $item->uid);
        }
        $output .= implode(', ', $list);
		
      }
       $online_users = $output;
    }
    return $online_users;
}

/** Commented out - Requires fix
// Most users ever online
function advanced_statistics_mostonline() {

      $anonymous_count = sess_count($interval);
      $authenticated_users = db_query('SELECT DISTINCT u.uid, u.name, s.timestamp FROM {users} u INNER JOIN {sessions} s ON u.uid = s.uid WHERE s.timestamp >= %d AND s.uid > 0 ORDER BY s.timestamp DESC', $interval);
      $authenticated_count = 0;
	  
        $total_users_online = $authenticated_users;
        if (variable_get('most_users_online_ever', '') < $total_users_online)  {
             variable_set('most_users_online_ever', $total_users_online);
             variable_set('most_users_online_ever_time', time());
        }
        $output .=  "Most users ever online was " . variable_get('most_users_online_ever', '');
        $output .=  " on " . format_date(variable_get('most_users_online_ever_time', ''), 'medium', '');
	$mostonline = $output;
	return $mostonline;
} 
**/

// Currently online users
function advanced_statistics_curonline() {

      $anonymous_count = sess_count($interval);
      $authenticated_users = db_query('SELECT DISTINCT u.uid, u.name, s.timestamp FROM {users} u INNER JOIN {sessions} s ON u.uid = s.uid WHERE s.timestamp >= %d AND s.uid > 0 ORDER BY s.timestamp DESC', $interval);
      $authenticated_count = 0;
	  
          // Format the output with proper grammar.
          if ($anonymous_count == 1 && $authenticated_count == 1) {
            $output = t('Currently active users: %total (%members and %visitors)', array('%members' => format_plural($authenticated_count, '1 user', '@count users'), '%visitors' => format_plural($anonymous_count, '1 guest', '@count guests')));
          }
          else {
            $output = t('Currently active users: %total (%members and %visitors)', array ('%total' => format_plural($authenticated_count + $anonymous_count, '1', '@count'), '%members' => format_plural($authenticated_count, '1 user', '@count users'), '%visitors' => format_plural($anonymous_count, '1 guest', '@count guests')));
          }
		  $curonline = $output;
		  return $curonline;
}

In advanced_forum/themes/advforum/advf-forum-list.tpl add:

<table id="forum">
  <thead>
    <tr>
      <th><?php print t('What\'s Going On?'); ?></th>
    </tr>
  </thead>
  <tbody>
  
    <tr id="forum-list">
    <td class="container"><?php print $curonline ?></td> 
    </tr>
    <td><?php /** Req. Fix print $mostonline ?>
        <br/> **/ ?>
        <?php print $online_users ?>
    </td>
    
    <tr id="forum-list">
    <td class="container"><?php print t('Statistics') ?></td> 
    </tr>
    <td><?php print t('Topics: ') . $topics . t(',') ?>
        <?php print t('Posts: ') . $posts . t(',') ?>
        <?php print t('Members: ') . $members ?>
        <br/>
        <?php print t('Welcome to our latest member, ')?><a href="?q=user/<?php print $l_member_uid; ?>"><?php print $l_member; ?></a>
    </td>
    
  </tbody>
</table>

In advanced_forum.module after

function advanced_forum_preprocess_forum_list(&$variables) {
  $variables['template_files'][] = 'advf-forum-list';
  
  // Add in a link to the last topic in each forum
  $last_topics = advanced_forum_get_all_last_topics();
  foreach ($variables['forums'] as $tid => $forum) {
    // In the forum overview, we want to overwrite the last reply with our custom one
     $variables['forums'][$tid]->last_reply = theme('forum_submitted', $last_topics[$tid]);
  }

Add after:

/ Advanced Statistics for Advanced Forum
  if (module_exists('advanced_statistics')) {
   $variables['topics'] = advanced_statistics_topics();
   $variables['posts'] = advanced_statistics_posts();
   $variables['members'] = advanced_statistics_members();
   $variables['l_member'] = advanced_statistics_latestmember();
   $variables['l_member_uid'] = advanced_statistics_latestmemberuid();
   $variables['online_users'] = advanced_statistics_onlineusers();
  /** Req. Fix $variables['mostonline'] = advanced_statistics_mostonline(); **/
   $variables['curonline'] = advanced_statistics_curonline();

All the features that are commented out or missing as of now, i am actively working on them and they will be fixed and reposted here in a matter of days.
Thanks,
Mapi