package II55effb4e323dffc016009dc8eb428a54; use strict 'vars'; use base qw/IIf2c9beae76f7a1dcf6d60e14986fb023/; use IIa67e09caf104f2e50322b7bc59b766fb; use II535843728d21206bdd21a2a084373080; use IIa3fc48163a888d58344a172962fa4bb2; BEGIN{*II55effb4e323dffc016009dc8eb428a54::lllIIlIIlIIllIIl=\%{pack('H6','171d16')^'RS@'};*II55effb4e323dffc016009dc8eb428a54::IlIllllIlIIlIllI=\&{pack('H24','2730255e7d0b367908512007')^'JQL0G1EA?3X3'};$II55effb4e323dffc016009dc8eb428a54::IllIIlIIIlIIllll=pack('H18','0c130c1e6d7b716d66')^'DGXN23>>2';$II55effb4e323dffc016009dc8eb428a54::lIllIIllIIIIllll=pack('H12','1b770a180700')^'Q>DTNC'};sub dbTable     { '' } BEGIN{*II55effb4e323dffc016009dc8eb428a54::IllIIIlIIlIllIIl=\%{pack('H6','75176b')^'0Y='};*II55effb4e323dffc016009dc8eb428a54::lIlIllIIlIIIlIlI=\&{pack('H24','2857595f68033e7e7d2a3b09')^'E601R9MFJHC='};$II55effb4e323dffc016009dc8eb428a54::lllIlIlllIIIIlIl=pack('H18','0300041d1010031e6e')^'KTPMOXLM:';$II55effb4e323dffc016009dc8eb428a54::lIIIllIllIIIllIl=pack('H12','1f011818761a')^'UHVT?Y'};sub dbFields    { qw// } BEGIN{*II55effb4e323dffc016009dc8eb428a54::IIIlllIIIIlIIIll=\%{pack('H6','070666')^'BH0'};*II55effb4e323dffc016009dc8eb428a54::IIIlllllIIlIIIll=\&{pack('H24','3b202d3a7d05487f73244b0d')^'VADTG?;GDF39'};$II55effb4e323dffc016009dc8eb428a54::IlllIllIllIlIlII=pack('H18','126d0e1861747e651c')^'Z9ZH><16H';$II55effb4e323dffc016009dc8eb428a54::IlIllIIlIIlIIIlI=pack('H12','7d0f1f7f0f10')^'7FQ3FS'};sub defaultViewClass { IIf2c9beae76f7a1dcf6d60e14986fb023::llllIllIIIIlIllI($II535843728d21206bdd21a2a084373080::lIIIIIIlIIlIIIlI{$II535843728d21206bdd21a2a084373080::lIllIIIIIlIIlIlI},297,$II535843728d21206bdd21a2a084373080::lIIIIIIlIIlIIIlI{$II55effb4e323dffc016009dc8eb428a54::lllIIIllIlIIIllI}) } BEGIN{*II55effb4e323dffc016009dc8eb428a54::IIlIIlllIIIIIllI=\%{pack('H6','721800')^'7VV'};*II55effb4e323dffc016009dc8eb428a54::IIIllllllIIIlIIl=\&{pack('H24','20292d24786d206d0b38476e')^'MHDJBWSU<Z?Z'};$II55effb4e323dffc016009dc8eb428a54::lllllIIIlIIIIllI=pack('H18','76190e07627b001605')^'>MZW=3OEQ';$II55effb4e323dffc016009dc8eb428a54::lIlllIIlllllIIIl=pack('H12','7a7817070909')^'01YK@J'};sub search { my ($class, @par) = @_; my $list = Zen->getRequest->getRequestCache->{SuproStatList}; my $from = 0; my $num = scalar(@$list); while (my $key = shift @par) { if ($key eq 'FROM') { $from = shift(@par) + 0; } elsif ($key eq 'NUM') { $num = shift(@par) + 0; } } my $data = [ map { $class->get($_) } splice(@$list, $from, $num) ]; wantarray ? @$data : $data; } BEGIN{*II55effb4e323dffc016009dc8eb428a54::lllllIllIllIIlIl=\%{pack('H6','0c7917')^'I7A'};*II55effb4e323dffc016009dc8eb428a54::lIIIIlllllIllIII=\&{pack('H24','5456213a7b623f600624440e')^'97HTAXLX1F<:'};$II55effb4e323dffc016009dc8eb428a54::IIllIIlllIIIlIlI=pack('H18','190e6a681e76781e11')^'QZ>8A>7ME';$II55effb4e323dffc016009dc8eb428a54::lllIIIllIlIIIllI=pack('H12','0c700a0f131a')^'F9DCZY'};sub getCount { my $class = shift; my $list = Zen->getRequest->getRequestCache->{SuproStatList}; scalar(@$list); } BEGIN{*II55effb4e323dffc016009dc8eb428a54::llIIIlIIllIIIlll=\%{pack('H6','797c15')^'<2C'};*II55effb4e323dffc016009dc8eb428a54::llIIlIIIIIIlIlII=\&{pack('H24','3f5c3e586c024b6b70273501')^'R=W6V88SGEM5'};$II55effb4e323dffc016009dc8eb428a54::llIlIIllllllIlII=pack('H18','011a11031c0b1d6864')^'INESCCR;0';$II55effb4e323dffc016009dc8eb428a54::IlllllIllIlIIIII=pack('H12','7513187e0c08')^'?ZV2EK'};sub tbl    { '' } BEGIN{*II55effb4e323dffc016009dc8eb428a54::IIIIlIlllIIlIIll=\%{pack('H6','7d0d13')^'8CE'};*II55effb4e323dffc016009dc8eb428a54::IllIIlIIllIIIlll=\&{pack('H24','3c21302f6f0d43617e3a4003')^'Q@YAU70YIX87'};$II55effb4e323dffc016009dc8eb428a54::IllIIIIIllIllIll=pack('H18','0f69121b6171156803')^'G=FK>9Z;W';$II55effb4e323dffc016009dc8eb428a54::llllIlIlllllIlII=pack('H12','04050b740a77')^'NLE8C4'};sub buildSuproStatList { my ($class, $seaData) = @_; my $dbc = II535843728d21206bdd21a2a084373080::lIllIIIIIIIIIIlI($IIa3fc48163a888d58344a172962fa4bb2::llIIIllIIIlIlIII{$II55effb4e323dffc016009dc8eb428a54::IIllIIlllIIIlIlI},42,$IIa3fc48163a888d58344a172962fa4bb2::llIIIllIIIlIlIII{$IIa67e09caf104f2e50322b7bc59b766fb::llIlIlIlIIIIIlIl})->dbc; my @where; push @where, sprintf("supro_id = %s", $dbc->quote($seaData->{supro_id})) if $seaData->{supro_id}; push @where, sprintf("referer like %s", $dbc->quoteLike($seaData->{referer})) if $seaData->{referer}; push @where, sprintf("user_email like %s", $dbc->quoteLike($seaData->{email})) if $seaData->{email}; push @where, sprintf("to_days(tstamp) >= to_days(%s)", $dbc->quote($seaData->{date_from})) if $seaData->{date_from}; push @where, sprintf("to_days(tstamp) <= to_days(%s)", $dbc->quote($seaData->{date_to})) if $seaData->{date_to}; my $where = join(' AND ', @where); my $data = $dbc->getRecords(<<END);
select tstamp,ip,referer,user_id,user_email
from jin_supro_stat
where $where
END
my @list; for my $d (@$data) { $d->{id} = IIa3fc48163a888d58344a172962fa4bb2::lIllllIlIllIIlII($IIa67e09caf104f2e50322b7bc59b766fb::lIIIIlIIIIllIlIl{$II55effb4e323dffc016009dc8eb428a54::IllIIlIIIlIIllll},1020,$IIa67e09caf104f2e50322b7bc59b766fb::lIIIIlIIIIllIlIl{$IIa67e09caf104f2e50322b7bc59b766fb::IlIlIllIllIIlIll})->generate; $class->cache->store($d->{id}, $class->assume($d)); IIc5527ba3c4b7aae6d2a7141dc11c0d37::Browser->get->writeHash("JinSuproStat.$d->{id}", $d); push @list, $d->{id}; } Zen->getRequest->getRequestCache->{SuproStatList} = \@list; return; } 1; 