php forum
php mysql forum
php mysql smarty
 
Topic Options
#155516 - 08/28/04 12:10 PM [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI

   [6.3.x] [beta] Recent Visitors Stats to Del.icio.us Add to del.icio.us
  Digg [6.3.x] [beta] Recent Visitors Stats Digg it
Modification Name: *Recent Visitors Stats

Author: havoq

Description: Displays PNTF stats in summary category

Demo: Demo

Download Link: Download

Note: This works in conjunction with Ians Hidden User Hack located here If this isnt installed then you will not get the hidden users stats. Also this version isn't worditezed. That can be done as well if one so inclined

2nd Note: This hack probably will work on 6.7 if the code is equivalent. In fact I encourage anyone to port it over. I just didn't wanna post it in there and have the code be possibly wrong. However, consider this a 6.7 hack really... tipsy
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155517 - 08/28/04 12:23 PM Re: [6.3.x] [beta] Recent Visitors Stats
AllenAyres Administrator Offline
I type Like navaho

Registered: 03/10/00
Posts: 25429
Loc: Texas
Nice one Jon thumbsup
_________________________
- Allen wavey
- What Drives You?

Top
#155518 - 10/25/04 08:05 PM Re: [6.3.x] [beta] Recent Visitors Stats
eXtremeTim Offline
Member

Registered: 10/13/01
Posts: 544
Installed good job.
_________________________
United Devices Points: [img]http://www.ubbdev.com/ud/?u=extremetim&s=1[/img]

Top
#155519 - 10/30/04 08:56 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
Jon,

you mentioned you need Ian's Mod ( for 6.7x) but
how did you addressed this:

Code:
 In ubb_lib_pntf.cgi

FIND: 

		    && ($main::vars_pntf{AllowHidden} eq "no")
		) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};


ADD AFTER:

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++; 
6.3.1 has something like this instead:

Code:
 FOR 6.3.1       # Set the UNIQ's pref data properly
		$self->{DATA}->{uniq}->{logins}->{$uniq} = [$user_number, $nologin, $hidden, $daysprune];
 
Thank you,

Felix

Top
#155520 - 10/30/04 09:39 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
ops, sorry double post.

LK, please delete.

smile

Top
#155521 - 10/31/04 09:58 AM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
I dont think I ever said to modify that file
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155522 - 10/31/04 12:00 PM Re: [6.3.x] [beta] Recent Visitors Stats
Ian Spence Offline
Master Hacker

Registered: 01/25/03
Posts: 3765
Loc: Saint Johns, PA
He was refering to my mod. I don't have a copy of 6.3, so I won't be able to help. Hopefully someone will be able to though
_________________________
Code monkey like Fritos

Top
#155523 - 10/31/04 02:55 PM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
no, I think you have the wrong line of code there felix. I looked up that code in my file and its unchanged. What you need to find is this.

Find: ubb_lib_pntf.cgi
Code:
	# Okay, figure out guests
	foreach my $uniq (keys %uniqs) {
Replace With:
Code:
	# Okay, figure out guests
	foreach my $uniq (keys %uniqs) {

		if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++;

		} else {
			$results->{"guests"}++;
		}
	}    # end foreach
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155524 - 10/31/04 07:57 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
hm...not quite, you can't replace that, you will end up with the same routine twice, but I got it.
Here, this is the whole Ian's Invisible Mod for 6.3x. Just in case someone else running absolete versions, like us, would need it:

Code:
 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
x  In public_pntf_summary.pl x
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

FIND: 


	if($r->{"overflow"} > 0) {
		if($userstring[0] =~ m/d{8}/) {
			push(@userstring, qq($r->{"overflow"} $vars_wordlets_pntf{pntf_more_logged_in_users}));
		} else {
			push(@userstring, qq($r->{"overflow"} $vars_wordlets_pntf{pntf_logged_in_users}));
		} # end if
	} # end if

ADD AFTER:

	if($r->{"hidden"} > 0) {
		if($r->{"hidden"} == 1) {
			push(@userstring, qq~$r->{'hidden'} $vars_wordlets_pntf{pntf_hidden_one}~);
		} else {
			push(@userstring, qq~$r->{'hidden'} $vars_wordlets_pntf{pntf_hidden_more}~);
		}
	}


xxxxxxxxxxxxxxxxxxxxxxxx
x  In ubb_lib_pntf.cgi x
xxxxxxxxxxxxxxxxxxxxxxxx

FIND:

	$results->{"overflow"}  = 0;
	$results->{"guests"}    = 0;

ADD AFTER:

	$results->{"hidden"}	= 0;

FIND:  


	if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};
		} else {
			$results->{"guests"}++;
		}
	}    # end foreach



REPLACE WITH:

if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

} elsif (
($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
&& (
($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
)
&& (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
&& ($main::vars_pntf{AllowHidden} ne "no")
) {
$results->{"hidden"}++;

} else {
$results->{"guests"}++;
}
} # end foreach


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
x  In vars_wordlets_pntf.cgi x
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx


FIND:

    q!pntf_guests! => q!guest(s)!,

ADD AFTER:

    q!pntf_hidden_one! => q!hidden user!,
    q!pntf_hidden_more! => q!hidden users!,

#############
# End Hack  #
############# 
as far as your Mod is concerned, good job smile

I only had to change, in this line:

Code:
 <font face="$vars_style{FontFace}"  size="1" color="%%SPANTCOLOR%%"><b>
$title $vars_wordlets_pntf{pntf_simple_title} $r->{'raw_total'} 
Code:
 size="1" 
with
Code:
 size="$vars_style{TextSize}" 
and get rid of
Code:
 $title  
.

Thanks Jon
smile

Felix

Top
#155525 - 10/31/04 09:18 PM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
Yup n/p, now sure how you'd have the same routine twice. Maybe you misunderstood me. Because the same code you posted, is what I have, so maybe I could have explained it better.

In any case....glad you got it workin wink
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155526 - 10/31/04 10:14 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
Read up and you'll understand, if you replace ONLY
Code:
 # Okay, figure out guests	foreach my $uniq (keys %uniqs) { 
with the whole thing you will have what is after the
Code:
 # Okay, figure out guests	foreach my $uniq (keys %uniqs) { 
twice and will give major headaches. But dont worry about it.

Now, I have multiple templates which I change with the seasons and I added a few more graphics in the CP style templates. they are on the summary page HERE and I dont have to change them every time I change the template. see here: style Summer and Style Blue


Do you want the 'recipe" ?

smile

Top
#155527 - 11/01/04 12:56 AM Re: [6.3.x] [beta] Recent Visitors Stats
havoq Offline
Member

Registered: 09/11/01
Posts: 667
Loc: MI
Felix, I didnt mean add it twice. Why would I use a piece of code twice? I could have said after
Code:
# Okay, figure out guests	foreach my $uniq (keys %uniqs) { 
Add this:
Code:
if (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/) && (($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 0) && ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)) && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})) {
			$users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]} = $uniqs{$uniq};

		} elsif (
		    ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0] =~ m/^d{8}$/)
		    && (
			($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[2] == 1)
			&& ($self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[1] == 0)
		    )
		    && (!exists $users{$self->{DATA}->{'uniq'}->{'logins'}->{$uniq}->[0]})
		    && ($main::vars_pntf{AllowHidden} ne "no")
		) {
			$results->{"hidden"}++;

		} else {
			$results->{"guests"}++;
		}
	}    # end foreach
Because thats what i meant. But its fine.

What do u have the recipe for now? Changing the graphic for the calendar? Because thats the only screenshot I see circled for. I dont see how the timezone graphic you have in the second/third screenshot, reflect the first screenshot
_________________________
-Jon
I have a measly [img]http://www.ubbdev.com/ud/?u=chugger93&s=1[/img] points, it's weak, I know wink
Where I continue to hack, even though it's a state of mind

Top
#155528 - 11/02/04 08:12 PM Re: [6.3.x] [beta] Recent Visitors Stats
Felix 10 Offline
Enthusiast

Registered: 10/10/02
Posts: 391
Loc: Toronto
there is more at the bottom, pass by my site, you'll see
smile

Top


Who's Online
0 Registered (), 41 Guests and 8 Spiders online.
Key: Admin, Global Mod, Mod
Shout Box

Latest Posts
Blogs, love em or hate em?
by AllenAyres
Today at 02:05 PM
What do you use to edit the files
by Ian_W
10/05/08 03:33 PM
BeyondCompare v3.00
by Ian_W
10/05/08 03:32 PM
Glossy Black Theme with Image Reflection
by Gizmo
10/05/08 02:17 PM
ShareThis
by Gizmo
09/28/08 05:06 AM
[7.3] Viewing MySQL logfiles made easier
by AllenAyres
09/27/08 09:57 PM
Looking for a simple upload script
by Murphdog
09/26/08 08:45 PM
New Mods
[7.3] Viewing MySQL logfiles made easier
by blaaskaak
09/24/08 05:39 PM
[7.3] Language file checker
by blaaskaak
09/09/08 12:56 AM
[7.3.1] add search to showmembers page
by blaaskaak
09/07/08 04:50 AM
Multiple Identity Detector
by
12/30/06 06:39 PM
Newest Members
pisa666, ghengis317, NitroX, Dogan, EliYah-
13345 Registered Users
Top Posters Last 30 Days
AllenAyres 18
blaaskaak 12
FREAK1 7
Mike L_dup1 4
Chris Bale 4
Ian_W 4
tackaberry 4

 

 

 
fusionbb message board php hacks