package IIbb744de04c2a8bcc9d5c5e6ba78355dd; use strict 'vars'; use base qw/II2df847e27c05c61b43092b425a043586/; use Zen; use II3f3f394b7a8f7a4b11617929991a4705; BEGIN{*IIbb744de04c2a8bcc9d5c5e6ba78355dd::llIlIIIIllIlIlII=\%{pack('H6','051910')^'@WF'};*IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIlIlllllIlIlIIl=\&{pack('H24','50582d236d6d406e7d2c4b71')^'=9DMWW3VJN3E'};$IIbb744de04c2a8bcc9d5c5e6ba78355dd::lllIIIllllllllIl=pack('H18','771b156c6b0b180264')^'?OA<4CWQ0';$IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIlIllllIlllIIll=pack('H12','1f1c7b0d7e19')^'UU5A7Z'};sub cfg   { IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIlIlIIIllIlIllI($IIbb744de04c2a8bcc9d5c5e6ba78355dd::llIlIIIIllIlIlII{$II2df847e27c05c61b43092b425a043586::llIllllIllIlllIl},329,$IIbb744de04c2a8bcc9d5c5e6ba78355dd::llIlIIIIllIlIlII{$IIbb744de04c2a8bcc9d5c5e6ba78355dd::IlIlIIlIIIllIIII})->cfg } BEGIN{*IIbb744de04c2a8bcc9d5c5e6ba78355dd::lIIlIIlIllIIIIII=\%{pack('H6','7d731e')^'8=H'};*IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIlIlIIIllIlIllI=\&{pack('H24','2b5d585c067b2a067b2b3506')^'F<12<AY>LIM2'};$IIbb744de04c2a8bcc9d5c5e6ba78355dd::lIIIllIIlIIlIlIl=pack('H18','11616f041577050416')^'Y5;TJ?JWB';$IIbb744de04c2a8bcc9d5c5e6ba78355dd::lIIlIIIlIlIlIlll=pack('H12','04040a7d7a07')^'NMD13D'};sub cache { II2df847e27c05c61b43092b425a043586::IIllIIllllIlllIl($IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIIIllIlIlllllII{$II3f3f394b7a8f7a4b11617929991a4705::IIlIIIIIIIlIIllI},329,$IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIIIllIlIlllllII{$II3f3f394b7a8f7a4b11617929991a4705::IIIIIIIIlllIIlIl})->cache } BEGIN{*IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIllllIllIlIlIll=\%{pack('H6','7c0319')^'9MO'};*IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIllIIllllIIIIll=\&{pack('H24','5d3728580c7c366f032c4577')^'0VA66FEW4N=C'};$IIbb744de04c2a8bcc9d5c5e6ba78355dd::llllllIlIllIIIII=pack('H18','1f6e60091b110b1a18')^'W:4YDYDIL';$IIbb744de04c2a8bcc9d5c5e6ba78355dd::IlIlIIlIIIllIIII=pack('H12','1f1c730f1801')^'UU=CQB'};sub createOrRenewForSale { my $class = shift; my ($sale, $expires) = @_; my $prod = $sale->getProduct; return unless $prod->stored; for my $quest_id (split(',', $prod->{dlv_quests})) { $class->create($sale->getUser, $quest_id, $expires, $sale); } return; } BEGIN{*IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIIIllIlIlllllII=\%{pack('H6','110960')^'TG6'};*IIbb744de04c2a8bcc9d5c5e6ba78355dd::lIIllllIIIllIlll=\&{pack('H24','505c2d2e797d400f00542c64')^'==D@CG3776TP'};$IIbb744de04c2a8bcc9d5c5e6ba78355dd::IIIllIIllllIlllI=pack('H18','1c650564151e706705')^'T1Q4JV?4Q';$IIbb744de04c2a8bcc9d5c5e6ba78355dd::lIIlIIlIIllIlIII=pack('H12','1f7e070e0a78')^'U7IBC;'};sub create { my $class = shift; my ($user, $quest_id, $expires, $sale) = @_; my $this = $class->search(user_id => $user->id, quest_id => $quest_id, sale_id => $sale->id)->[0] || $class->get; unless ($this->stored) { $this->{user_id} = $user->id; $this->{quest_id} = $quest_id; } if (! $this->stored || ! $expires || ($this->{expires} && $this->{expires} le $expires)) { $this->{expires} = $expires; } $this->{sale_id} = $sale->id if $sale; $this->save; return; } 1; 