oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

- fix [ 1275024 ] Can not edit layout on 6.7.2

Browse source 
- fix [ 1262235 ] sql report form params
 - fix [ 1277529 ] Extra radio buttons in Settings console
 - Removed the last remnants of wobject ids.
 - Fixed a GUID case sensitivity problem.
 - Fixed several large security holes. See the security advisory on
   getwebgui.com for details.
 - fix [ 1279157 ] showInForms option not stored
 - fix [ 1250290 ] ECommerce state field broken on Plainblack.com
 - fix [ 1261985 ] (Fix?) sortby.lastreply.url (Andreas Graf)
This commit is contained in:
JT Smith 2005-09-01 17:41:05 +00:00
parent 01ad8fd12c
commit f6c2dfe6fb
15 changed files with 274 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/PassiveProfiling.pm
View file

@ -33,7 +33,7 @@ This package provides an interface to the passive profiling system.
=head1 SYNOPSIS
use WebGUI::PassiveProfiling;
WebGUI::PassiveProfiling::add( $wobjectId );
WebGUI::PassiveProfiling::add( $assetId );
=head1 METHODS
@ -43,24 +43,24 @@ These functions/methods are available from this package:
#-------------------------------------------------------------------
=head2 add ( wobjectId )
=head2 add ( assetId )
Adds a wobjectId to the passive profile log.
Adds a assetId to the passive profile log.
=head3 wobjectId
=head3 assetId
The wobjectId to add.
The assetId to add.
=cut
sub add {
return unless ($session{setting}{passiveProfilingEnabled});
my $wobjectId = shift;
my $sql = "insert into passiveProfileLog (passiveProfileLogId, userId, sessionId, wobjectId, dateOfEntry)
my $assetId = shift;
my $sql = "insert into passiveProfileLog (passiveProfileLogId, userId, sessionId, assetId, dateOfEntry)
values (".quote(WebGUI::Id::generate()).",".
quote($session{user}{userId}).",".
quote($session{var}{sessionId}).",".
quote($wobjectId).",".
quote($assetId).",".
quote(WebGUI::DateTime::time()).")";
WebGUI::SQL->write($sql);
return;
@ -98,7 +98,7 @@ is logged in the passiveProfileAOI table.
=head3 hashRef
A hashRef with userId and wobjectId.
A hashRef with userId and assetId.
=cut
@ -108,11 +108,11 @@ sub summarizeAOI {
select f.fieldName,
f.fieldType,
d.fieldId,
d.wobjectId,
d.assetId,
d.value
from metaData_values d , metaData_properties f
where f.fieldId = d.fieldId
and d.wobjectId = ".quote($data->{wobjectId});
and d.assetId = ".quote($data->{assetId});
my $sth = WebGUI::SQL->read($sql);
while (my $field = $sth->hashRef) {