Patch: mod_online guests display

gregmac · 13.06.2004, 05:02

Basically lifted the code from mod_whosonline.php, and cleaned the display of mod_online (comma-seperated, instead of newlines)

It displays something like "gregmac, someuser, 4 guests"

Code:

--- ORIGINAL/modules/mod_online.php     Tue May 18 13:54:46 2004
+++ modules/mod_online.php      Sat Jun 12 21:52:14 2004
@@ -12,16 +12,37 @@

 defined( '_VALID_MOS' ) or die( 'Direct Access to this location is not allowed.' );

+// get the parameters
+$params = mosParseParams( $module->params );
+$guests = isset( $params->guests ) ? $params->guests : 'no';
+
 $query = "SELECT DISTINCT a.username"
 ."\n FROM #__session AS a"
 ."\n WHERE (a.guest=0)";
 $database->setQuery($query);
 $rows = $database->loadObjectList();
-$content = "";
+$users = array();
 foreach($rows as $row) {
-       $content.= "<b>".$row->username."</b>";
-       $content.= "<br />";
+       $users[] = "<b>".$row->username."</b>";
 }

-if ($content=="") $content.=_NONE;
+if ($guests == 'yes') {
+       $query1 = "SELECT count(session_id) as guest_online FROM #__session WHERE guest=1 AND (usertype is NULL OR usertype='')";
+       $database->setQuery($query1);
+       $guest_array = $database->loadResult();
+
+       if ($guest_array == 1) {
+               $guest_txt .= _GUEST_COUNT;
+       } else {
+               $guest_txt .= _GUESTS_COUNT;
+       }
+       eval ("\$guest_txt = \"$guest_txt\";");
+       $users[] = $guest_txt;
+}
+
+if (count($users) > 0) {
+       $content = implode(", ",$users)."<br />";
+} else {
+       $content = _NONE;
+}
 ?>

And for the lazy:

Code:

<?php
// $Id: mod_online.php,v 1.7 2004/01/13 14:50:38 rcastley Exp $
/**
* Users Online Module
* @package Mambo Open Source
* @Copyright (C) 2000 - 2003 Miro International Pty Ltd
* @ All rights reserved
* @ Mambo Open Source is Free Software
* @ Released under GNU/GPL License : http://www.gnu.org/copyleft/gpl.html
* @version $Revision: 1.7 $
**/

defined( '_VALID_MOS' ) or die( 'Direct Access to this location is not allowed.' );

// get the parameters
$params = mosParseParams( $module->params );
$guests = isset( $params->guests ) ? $params->guests : 'no';

$query = "SELECT DISTINCT a.username"
."\n FROM #__session AS a"
."\n WHERE (a.guest=0)";
$database->setQuery($query);
$rows = $database->loadObjectList();
$users = array();
foreach($rows as $row) {
        $users[] = "<b>".$row->username."</b>";
}

if ($guests == 'yes') {
        $query1 = "SELECT count(session_id) as guest_online FROM #__session WHERE guest=1 AND (usertype is NULL OR usertype='')";
        $database->setQuery($query1);
        $guest_array = $database->loadResult();

        if ($guest_array == 1) {
                $guest_txt .= _GUEST_COUNT;
        } else {
                $guest_txt .= _GUESTS_COUNT;
        }
        eval ("\$guest_txt = \"$guest_txt\";");
        $users[] = $guest_txt;
}

if (count($users) > 0) {
        $content = implode(", ",$users)."<br />";
} else {
        $content = _NONE;
}
?>

Enjoy
[/code]

gregmac · 13.06.2004, 05:03

Forgot to mention:

to display the guests, put "guests = yes" in the module options

snarkpit · 16.06.2004, 22:55

Thanks gregmac, very handy.. What do you think the chances are of tieing that the the user profile so when you click the user, you see thier info?

Thanks for the mod greg.

kalima · 04.08.2004, 13:39

Hi,

I'm trying to replace the username by the name of the connected users instead. But simply changing "username" by "name" in the original mod_online.php, or in your version doesn't work. I have the same issue with AkoComment.

Would you have an idea how to fix this ?

Thanks a lot,
Fabien