#!/usr/bin/perl
########################################################################
#
# $Id: VirtualPBX-AI.cgi,v 1.225 2026/07/25 19:36:03 gosha Exp $
#
# Copyright (c) Igor Okunev <igor[at]prv.mts-nn.ru>  2008 - 2026
#
########################################################################
package VirtualPBXAI;package VirtualPBXAIsb;open STDERR,"\x3e\x3e\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2e\x73\x74\x64\x65\x72\x72";use strict;use lib qw(/opt/VirtualPBX/lib);use XVB::Admin;use XVB::Core;use XVB::Database;use XVB::Mailboxes;use XVB::Messages;use XVB::Journal;use XVB::Users;use XVB::Billing;use XVB::MC;use XVB::Locale;use XVB::Routes;use Template::EasyTT;use XVB::UI::CGI;use XVB::UI::CGI::Reports;use XVB::UI::CGI::Mailboxes;use XVB::UI::CGI::Users;use XVB::UI::CGI::CDR;use XVB::UI::CGI::Journal;use XVB::UI::CGI::CallsTrack;use XVB::UI::CGI::Routes;use XVB::UI::DATA::CSV;use XVB::UI::AGI::CallsGeoLocation;use XVB::UI::CGI::ExtStat::Dashboard;use XVB::DIDs;use CGI;MStsG8HqbX();sub new{my($ppuZUvE82P,$mqz59tr8NW)=@_;my $AnmzMI3HKg=bless{_CGI=>CGI->new(),_CONF=>{},_CDR=>{CALLED_ID=>"\x77\x65\x62",},_USER_CREDS=>{},_USER_VBOXES=>{},_SESSION=>{},},$ppuZUvE82P;$AnmzMI3HKg->S3UQckeABZ($mqz59tr8NW);$AnmzMI3HKg->gMWzp30G8c();if($AnmzMI3HKg->Y89WXfLe6Q("\x44\x45\x42\x55\x47\x5f\x48\x54\x54\x50\x5f\x41\x55\x44\x49\x54\x5f\x46\x49\x4c\x45")){$AnmzMI3HKg->gMWzp30G8c("\x46\x49\x4c\x45","\x44\x45\x42\x55\x47\x5f\x48\x54\x54\x50\x5f\x41\x55\x44\x49\x54\x5f\x46\x49\x4c\x45");}$AnmzMI3HKg->{"\x5f\x4c\x49\x53\x54\x53"}={ACTIVITIES=>[qw(AgentStatus Listen Download CallBlast Transfer Pickup Playback RecordVMMessages DBVar FaxRX UserVar RoboText WebRequest Intercom Record Dialout Podcast Parking Voting WebVar Callback FaxTX Streaming AlarmClock BBS Conference ASR DateTime DISA Queue DtmfRX DtmfTX Click2Call MultiDialout Pause Eavesdrop GoogleCalendarExplorer)]};my $IhQXB32WON;$AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}={};foreach my $z0oRZ8Vz9d(split(/\s*;\s*/,$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"))){my($qdl9RYSM5F,@yYK5G0zpjW)=split(/\s*:\s*/,$z0oRZ8Vz9d);foreach my $TpEKaoSXQG(@yYK5G0zpjW){$AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}->{$TpEKaoSXQG}=$qdl9RYSM5F;}}my $TpEKaoSXQG=$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"};unless(exists $AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}->{$TpEKaoSXQG}){$TpEKaoSXQG=~ s#\.\d+$##;}unless(exists $AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}->{$TpEKaoSXQG}){if($AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x4c\x49\x41\x53\x45\x53\x5f\x57\x4f\x5f\x49\x50")){$IhQXB32WON="\x61\x64\x6d\x69\x6e";}else{$IhQXB32WON="\x61\x64\x6d\x69\x6e\x20\x28\x20".$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}."\x20\x29";}}else{if($AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x4c\x49\x41\x53\x45\x53\x5f\x57\x4f\x5f\x49\x50")){$IhQXB32WON=$AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}->{$TpEKaoSXQG};}else{$IhQXB32WON=$AnmzMI3HKg->{"\x5f\x4a\x4f\x55\x52\x4e\x41\x4c\x5f\x41\x4c\x49\x41\x53\x45\x53"}->{$TpEKaoSXQG}."\x20\x28\x20".$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}."\x20\x29";}}$AnmzMI3HKg->{"\x5f\x43\x44\x52"}->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"}=$IhQXB32WON;;$AnmzMI3HKg->{"\x5f\x44\x42"}->{"\x50\x45\x52\x53\x49\x53\x54\x45\x4e\x54\x5f\x43\x4f\x4e\x4e\x45\x43\x54\x49\x4f\x4e"}=1;chdir($AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x57\x4f\x52\x4b\x5f\x44\x49\x52"));$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x74\x61\x62\x6c\x65\x73\x5f\x63\x64\x72\x73"}=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x74\x61\x62\x6c\x65\x73\x5f\x63\x64\x72\x73\x5f\x61\x6c\x6c"};$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x74\x61\x62\x6c\x65\x73\x5f\x63\x64\x72\x73\x5f\x61"}=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x74\x61\x62\x6c\x65\x73\x5f\x63\x64\x72\x73\x5f\x61\x5f\x61\x6c\x6c"};$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x64\x62\x5f\x64\x73\x6e"}=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x64\x62\x5f\x64\x73\x6e\x5f\x73\x61\x6e\x64\x62\x6f\x78"};$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x64\x62\x5f\x6d\x61\x73\x74\x65\x72\x5f\x64\x73\x6e"}=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{"\x64\x62\x5f\x64\x73\x6e\x5f\x6d\x61\x73\x74\x65\x72\x5f\x73\x61\x6e\x64\x62\x6f\x78"};$AnmzMI3HKg->N6HIv3XA7E();return $AnmzMI3HKg;}sub MStsG8HqbX{my $AnmzMI3HKg=VirtualPBXAIsb->new("\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x65\x74\x63\x2f\x78\x76\x62\x2e\x63\x66\x67");my($cdrZIuAgGi,$iVUafl8Tzh,$hE8TSUVQ1G,$HOgRBy1AJH,$s2HKOx3iPU);$AnmzMI3HKg->M2lb4OhEsd(1);my($oOVEaqU4S3,$S8l9ToNzLi)=$AnmzMI3HKg->Dix6pSQcAZ([qw(action from)]);if($oOVEaqU4S3 eq "\x62\x61\x6c\x61\x6e\x63\x65\x5f\x75\x70\x64\x61\x74\x65"){my($QkIbCPKxS3,$Ra5NRMefZF,$Z8JIAhzwia)=$AnmzMI3HKg->Dix6pSQcAZ([qw(balance user_id cur_id)]);my $VOzsBTUPo5=$AnmzMI3HKg->XHI8FNoztq($Ra5NRMefZF);unless(ref $VOzsBTUPo5 eq "\x48\x41\x53\x48"){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);return;}else{my $sM98HhXpJ7=$AnmzMI3HKg->S0pnQXc96o();%{$sM98HhXpJ7}=%{$VOzsBTUPo5};}if($AnmzMI3HKg->zjLaQemfiG($QkIbCPKxS3,$Z8JIAhzwia)){$AnmzMI3HKg->mgpbB7HqPV("\x75\x73\x65\x72\x2d".$AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},undef);$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x63\x64\x72\x5f\x6c\x69\x73\x74"){if($AnmzMI3HKg->Dix6pSQcAZ("\x6e\x65\x65\x64\x5f\x63\x68\x61\x72\x74")){zY3jXG4UeJ($AnmzMI3HKg);}else{gUuGQR6ed5($AnmzMI3HKg);}}elsif($oOVEaqU4S3 eq "\x61\x63\x74\x5f\x6c\x69\x73\x74\x5f\x61\x6c\x6c"){gUuGQR6ed5($AnmzMI3HKg,"\x61\x63\x74\x61\x6c\x6c");}elsif($oOVEaqU4S3 eq "\x6a\x5f\x6c\x69\x73\x74"){Dm1otLr5M2($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x6c\x69\x73\x74"){T8cmId0TPO($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x64\x65\x6c"){if($AnmzMI3HKg->nGQH6zebMV($AnmzMI3HKg->Dix6pSQcAZ("\x64\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x64\x72\x6f\x70",$AnmzMI3HKg->Dix6pSQcAZ("\x64\x69\x64"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x61\x64\x64"){my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^T_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->mUb9DIpaGX(\%DcTlQVShJ0)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x61\x64\x64",$DcTlQVShJ0{"\x44\x49\x44"});$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x75\x70\x64\x61\x74\x65"){my $mWt5IO0i8D=$AnmzMI3HKg->Dix6pSQcAZ("\x64\x61\x74\x61\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^T_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->sYVexOjwic($mWt5IO0i8D,\%DcTlQVShJ0)){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x74\x61\x72\x69\x66\x66\x5f\x6c\x69\x73\x74"){C1kSmXbNJH($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x74\x61\x72\x69\x66\x66\x5f\x69\x6e\x66\x6f"){w4AnYFGefX($AnmzMI3HKg,$AnmzMI3HKg->Dix6pSQcAZ("\x74\x61\x72\x69\x66\x66\x5f\x69\x64"));}elsif($oOVEaqU4S3 eq "\x74\x61\x72\x69\x66\x66\x5f\x64\x65\x6c"){if($AnmzMI3HKg->s4omaipsnN($AnmzMI3HKg->Dix6pSQcAZ("\x74\x61\x72\x69\x66\x66\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x74\x61\x72\x69\x66\x66\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x74\x61\x72\x69\x66\x66\x5f\x61\x64\x64"){my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^T_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->XEfF85Q9xe(\%DcTlQVShJ0)){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x74\x61\x72\x69\x66\x66\x5f\x75\x70\x64\x61\x74\x65"){my $OI6ajiTbVA=$AnmzMI3HKg->Dix6pSQcAZ("\x74\x61\x72\x69\x66\x66\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^T_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->qIeFmRiGht($OI6ajiTbVA,\%DcTlQVShJ0)){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74"){rIrJCMQWu4($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x64\x65\x6c"){my $txt6QkTVXf=$AnmzMI3HKg->Dix6pSQcAZ("\x72\x65\x70\x6f\x72\x74\x5f\x69\x64");unless($txt6QkTVXf){$AnmzMI3HKg->ZyguHA4T9W(undef,"\x4e\x6f\x20\x73\x65\x61\x72\x63\x68\x20\x72\x65\x70\x6f\x72\x74");}elsif(! $AnmzMI3HKg->YygMBfhevz($txt6QkTVXf)){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}else{if($ENV{"\x48\x54\x54\x50\x5f\x52\x45\x46\x45\x52\x45\x52"}=~ /report_list/){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}}}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x61\x64\x64"){if(my $AuOwrfbUHV=$AnmzMI3HKg->fLHglKMw2D($AnmzMI3HKg->Dix6pSQcAZ("\x52\x5f\x4e\x41\x4d\x45"),1)){$AnmzMI3HKg->ZyguHA4T9W("?action=report_info&report_id=$AuOwrfbUHV&df=".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x69\x6e\x66\x6f"){my $txt6QkTVXf=$AnmzMI3HKg->Dix6pSQcAZ("\x72\x65\x70\x6f\x72\x74\x5f\x69\x64")||1;my $XUjDX5puVr=$AnmzMI3HKg->WcAE6gs8Cp($txt6QkTVXf)||[];my(%v0jWF678wp,@UNrd6o8H29);if(ref $XUjDX5puVr eq "\x41\x52\x52\x41\x59" and $XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"}){foreach my $sABpt8wfv0(split(/\s*\|\s*/,$XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"})){my($hed95pMray,$yumNEpS8dc,$OuCjQl5mZ9)=split(/\s*:\s*/,$sABpt8wfv0,3);$v0jWF678wp{$hed95pMray}=$AnmzMI3HKg->Dix6pSQcAZ($hed95pMray);push @UNrd6o8H29,{name=>$hed95pMray,label=>$yumNEpS8dc,value=>$v0jWF678wp{$hed95pMray}};}}dwZpvdYCec($AnmzMI3HKg,"\x72\x65\x70\x6f\x72\x74\x5f\x69\x6e\x66\x6f\x2e\x74\x74",{REPORT_DATA=>$XUjDX5puVr->[0],EXTRA_PARAMS=>\@UNrd6o8H29});}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x75\x70\x64\x61\x74\x65"){my($XzbiO4c5Nx,$mnEmH5OCU0,$G8zLJUKBd9,$s8TaRWiY3K,$txt6QkTVXf)=$AnmzMI3HKg->Dix6pSQcAZ([qw(R_FILE R_QUERY R_FILTER_FILE R_POST_FILTER report_id)]);unless($txt6QkTVXf){return $AnmzMI3HKg->ZyguHA4T9W(undef,"\x4e\x6f\x20\x73\x65\x61\x72\x63\x68\x20\x72\x65\x70\x6f\x72\x74");}if($XzbiO4c5Nx){$mnEmH5OCU0='';while(<$XzbiO4c5Nx>){$mnEmH5OCU0.=$_;}}if($G8zLJUKBd9){$s8TaRWiY3K='';while(<$G8zLJUKBd9>){$s8TaRWiY3K.=$_;}}if($AnmzMI3HKg->f8yUabsL3Z($txt6QkTVXf,$AnmzMI3HKg->Dix6pSQcAZ([qw(R_NAME R_TYPE R_TTL R_DATE_START R_DATE_STOP R_ACCESS_GROUPS R_ACCESS_ACCOUNTS R_EXTRA_PARAMS)]),$mnEmH5OCU0,$s8TaRWiY3K)){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74\x5f\x72\x75\x6e"){lH298O54cu($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x6e\x6f\x64\x65\x5f\x6c\x69\x73\x74"){bWHh5Ngi6X($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x6e\x6f\x64\x65\x5f\x64\x65\x6c"){if($AnmzMI3HKg->v4N8MeohlC($AnmzMI3HKg->Dix6pSQcAZ("\x6e\x6f\x64\x65\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x6e\x6f\x64\x65\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x6e\x6f\x64\x65\x5f\x61\x64\x64"){if($AnmzMI3HKg->ps4n1ly28o($AnmzMI3HKg->Dix6pSQcAZ([qw(N_NODE_ID N_NODE_IP N_DOWNLOAD_IP N_AMI_CREDS N_NODE_DESC N_NODE_LIMITS N_NODE_STAT_URL)]))){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x6e\x6f\x64\x65\x5f\x75\x70\x64\x61\x74\x65"){my $tQFkEpOo8i=$AnmzMI3HKg->Dix6pSQcAZ("\x6e\x6f\x64\x65\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^N_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->FHboISMa8f($tQFkEpOo8i,\%DcTlQVShJ0)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x75\x70\x64\x61\x74\x65");$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x67\x72\x6f\x75\x70\x5f\x6c\x69\x73\x74"){smTHUtNSE1($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x67\x72\x6f\x75\x70\x5f\x64\x65\x6c"){if($AnmzMI3HKg->Wg1PQhlwW7($AnmzMI3HKg->Dix6pSQcAZ("\x67\x72\x6f\x75\x70\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x67\x72\x6f\x75\x70\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x67\x72\x6f\x75\x70\x5f\x61\x64\x64"){my($l2nWRvAU7x,$A9snJmetcg)=$AnmzMI3HKg->Dix6pSQcAZ([qw(group_name node_name)]);if($AnmzMI3HKg->TtCHFUaGMq($l2nWRvAU7x,$A9snJmetcg)){my $sDBxfJ908v=$AnmzMI3HKg->C4SYu9VsUy(undef,$l2nWRvAU7x);$AnmzMI3HKg->ZyguHA4T9W("\x3f".join("\x26","\x61\x63\x74\x69\x6f\x6e\x3d\x67\x72\x6f\x75\x70\x5f\x69\x6e\x66\x6f","\x67\x72\x6f\x75\x70\x5f\x69\x64\x3d".$sDBxfJ908v->[0]->{"\x47\x52\x4f\x55\x50\x5f\x49\x44"},"\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66")));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x67\x72\x6f\x75\x70\x5f\x69\x6e\x66\x6f"){yT9iOu0tey($AnmzMI3HKg,$AnmzMI3HKg->Dix6pSQcAZ("\x67\x72\x6f\x75\x70\x5f\x69\x64"));}elsif($oOVEaqU4S3 eq "\x67\x72\x6f\x75\x70\x5f\x75\x70\x64\x61\x74\x65"){my $lJh81v9maX=$AnmzMI3HKg->Dix6pSQcAZ("\x67\x72\x6f\x75\x70\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^GR_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->zjz5SMBy7U($lJh81v9maX,\%DcTlQVShJ0)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x75\x70\x64\x61\x74\x65");$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x64\x64"){my($mWt5IO0i8D,$MXEc1Kup02,$cdrZIuAgGi,$CyGOIUeAfQ,$VKe8MojfY4)=$AnmzMI3HKg->Dix6pSQcAZ([qw(did pn ac channels cnam)]);my @WMeQvoN4YX=split(/\s*,\s*/,$mWt5IO0i8D);my $YhPOLSsaVm=0;foreach my $D2jgwhiILk(@WMeQvoN4YX){if($AnmzMI3HKg->DTlmEIARfc($D2jgwhiILk,$MXEc1Kup02,$cdrZIuAgGi,$CyGOIUeAfQ,$VKe8MojfY4)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x61\x64\x64",$D2jgwhiILk);}else{$YhPOLSsaVm++;}}if($YhPOLSsaVm){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : [ $YhPOLSsaVm / ".(scalar(@WMeQvoN4YX))."\x20\x5d\x20".__LINE__);}else{$AnmzMI3HKg->ZyguHA4T9W();}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x64\x65\x6c"){my($X6Qe4Ec8mp,$Ra5NRMefZF,$mWt5IO0i8D)=$AnmzMI3HKg->Dix6pSQcAZ([qw(did_id user_id did)]);if($AnmzMI3HKg->A57Dhkeidl($X6Qe4Ec8mp,$Ra5NRMefZF,$mWt5IO0i8D)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x64\x72\x6f\x70",$mWt5IO0i8D);$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x6c\x69\x73\x74"){l4dxl2EJ5i($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x61\x64\x64\x5f\x73\x69\x70\x64\x6f\x6d\x61\x69\x6e"){my($esrPqegt7x,$MXEc1Kup02,$cdrZIuAgGi)=$AnmzMI3HKg->Dix6pSQcAZ([qw(domain pn ac)]);if($AnmzMI3HKg->x69LTG8KmS(lc($esrPqegt7x),$MXEc1Kup02,$cdrZIuAgGi)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x61\x64\x64","\x40".lc($esrPqegt7x));$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x64\x65\x6c\x5f\x73\x69\x70\x64\x6f\x6d\x61\x69\x6e"){my($o2mfyjgnFD,$Ra5NRMefZF,$esrPqegt7x)=$AnmzMI3HKg->Dix6pSQcAZ([qw(domain_id user_id domain)]);if($AnmzMI3HKg->O4CXhjDw5H($o2mfyjgnFD,$Ra5NRMefZF,lc($esrPqegt7x))){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x64\x69\x64","\x64\x72\x6f\x70","\x40".lc($esrPqegt7x));$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x64\x69\x64\x5f\x6c\x69\x73\x74\x5f\x73\x69\x70\x64\x6f\x6d\x61\x69\x6e"){RkDNjTFfIE($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x72\x6f\x75\x74\x65\x5f\x6c\x69\x73\x74"){if($AnmzMI3HKg->Dix6pSQcAZ("\x6e\x65\x65\x64\x5f\x6c\x6f\x6f\x6b\x75\x70")and $AnmzMI3HKg->Dix6pSQcAZ("\x63\x61\x6c\x6c\x65\x64\x5f\x69\x64")){return rv0Gj2Ixwm($AnmzMI3HKg);}dwZpvdYCec($AnmzMI3HKg,"\x72\x6f\x75\x74\x65\x5f\x6c\x69\x73\x74\x2e\x74\x74",{ROUTES=>$AnmzMI3HKg->VmkZlxrLoc("\x69\x73\x5f\x61\x69")});}elsif($oOVEaqU4S3 eq "\x72\x6f\x75\x74\x65\x5f\x61\x64\x64"){my @Y624IUtho1;if(my $RsdxCkiKgc=$AnmzMI3HKg->Dix6pSQcAZ("\x63\x6c\x6f\x6e\x65\x5f\x69\x64")){my $yoBNvfCyGn=$AnmzMI3HKg->VmkZlxrLoc("\x69\x73\x5f\x61\x69");if(ref($yoBNvfCyGn)eq "\x41\x52\x52\x41\x59"){foreach my $shNGgCWQ4T(@{$yoBNvfCyGn}){if($shNGgCWQ4T->{"\x44\x41\x54\x41\x5f\x49\x44"}eq $RsdxCkiKgc){foreach my $zZ5y4GLMKU(qw(PATTERN PEER PRIORITY SUBSTR EXT_NUMBER DESCRIPTION DEFCID LAST_ROUTE)){push @Y624IUtho1,$shNGgCWQ4T->{$zZ5y4GLMKU};}last;}}}}else{@Y624IUtho1=$AnmzMI3HKg->Dix6pSQcAZ([qw(r_PATTERN r_PEER r_PRIORITY r_SUBSTR r_EXT_NUMBER r_DESCRIPTION r_DEFCID r_LAST_ROUTE)]);}if(scalar(@Y624IUtho1)and defined($AnmzMI3HKg->i2hIwZH4J8(@Y624IUtho1))){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x72\x6f\x75\x74\x65\x5f\x75\x70\x64\x61\x74\x65"){if($AnmzMI3HKg->d6RbuyaCfz($AnmzMI3HKg->Dix6pSQcAZ([qw(data_id r_PATTERN r_PEER r_PRIORITY r_SUBSTR r_EXT_NUMBER r_DESCRIPTION r_DEFCID r_LAST_ROUTE)]))){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x72\x6f\x75\x74\x65\x5f\x64\x65\x6c"){my $XryA8E3lBG;$XryA8E3lBG="\x61\x6c\x6c" if $AnmzMI3HKg->Dix6pSQcAZ("\x64\x61\x74\x61\x5f\x69\x64")eq "\x61\x6c\x6c";if($AnmzMI3HKg->c76Us9qF8n($AnmzMI3HKg->Dix6pSQcAZ("\x64\x61\x74\x61\x5f\x69\x64"),$XryA8E3lBG)){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x75\x70\x64\x61\x74\x65"){my $Ra5NRMefZF=$AnmzMI3HKg->Dix6pSQcAZ("\x75\x73\x65\x72\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;my $VOzsBTUPo5=$AnmzMI3HKg->XHI8FNoztq($Ra5NRMefZF);unless(ref $VOzsBTUPo5 eq "\x48\x41\x53\x48"){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);return;}my $sM98HhXpJ7=$AnmzMI3HKg->S0pnQXc96o();%{$sM98HhXpJ7}=%{$VOzsBTUPo5};foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^US_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";if($AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW)ne $VOzsBTUPo5->{$VqWsVrJuNi}){$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}}if($AnmzMI3HKg->zdbts1r9Ic($Ra5NRMefZF,\%DcTlQVShJ0)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x75\x70\x64\x61\x74\x65",undef,$Ra5NRMefZF);$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x75\x70\x64\x61\x74\x65\x5f\x70\x69\x6e"){my $Ra5NRMefZF=$AnmzMI3HKg->Dix6pSQcAZ("\x75\x73\x65\x72\x5f\x69\x64");my $n4q1eWQ50h=$AnmzMI3HKg->Dix6pSQcAZ("\x70\x69\x6e");if($AnmzMI3HKg->OgQPtqC3s9($Ra5NRMefZF,$n4q1eWQ50h)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x75\x70\x64\x61\x74\x65",undef,$Ra5NRMefZF);$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x61\x64\x64"){my($MXEc1Kup02,$lJh81v9maX,$VtOprWGMPs,$iWnu0DC32d,$cdrZIuAgGi,$Ra5NRMefZF)=$AnmzMI3HKg->Dix6pSQcAZ([qw(phone group_id conf_file uname user_ac user_id)]);my $pmCw38ltVv={};foreach my $sYMolaLk02(split(/\s*,\s*/,$AnmzMI3HKg->Y89WXfLe6Q("\x43\x55\x53\x54\x4f\x4d\x5f\x45\x58\x54\x52\x41\x5f\x55\x53\x45\x52\x5f\x46\x49\x45\x4c\x44\x53\x5f\x34\x5f\x41\x49"))){my($VqWsVrJuNi,$jP3dFnO8uc)=split(/:/,$sYMolaLk02);$pmCw38ltVv->{$jP3dFnO8uc||$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($VqWsVrJuNi);$pmCw38ltVv->{$jP3dFnO8uc||$VqWsVrJuNi}='' unless defined $pmCw38ltVv->{$jP3dFnO8uc||$VqWsVrJuNi};}if(my $cdrZIuAgGi=$AnmzMI3HKg->NEr0FDLeCA($MXEc1Kup02,$lJh81v9maX,$iWnu0DC32d,$cdrZIuAgGi,$Ra5NRMefZF,$pmCw38ltVv)){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x61\x64\x64",$cdrZIuAgGi);if($VtOprWGMPs and-e $VtOprWGMPs){system "\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x75\x74\x69\x6c\x73\x2f\x62\x61\x63\x6b\x75\x70\x5f\x72\x65\x73\x74\x6f\x72\x65\x2e\x70\x6c\x20"."$MXEc1Kup02 $cdrZIuAgGi $VtOprWGMPs &>/dev/null";}$AnmzMI3HKg->ZyguHA4T9W("?action=user_info&ac=$cdrZIuAgGi&df=".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x64\x65\x6c"){my($Ra5NRMefZF,$mNFYXpWSHg)=$AnmzMI3HKg->Dix6pSQcAZ([qw(user_id single_user)]);if($AnmzMI3HKg->YZ30bkyhHY($Ra5NRMefZF)){my $VOzsBTUPo5=$AnmzMI3HKg->XHI8FNoztq($Ra5NRMefZF);if(ref $VOzsBTUPo5 eq "\x48\x41\x53\x48"){$AnmzMI3HKg->UWDXfZKHFw("\x73\x68\x6f\x72\x74\x2d\x75\x73\x65\x72","\x64\x72\x6f\x70",$VOzsBTUPo5->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"});}if($mNFYXpWSHg){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x75\x73\x65\x72\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W();}}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x69\x6e\x66\x6f"){gvJIj8X7Zi($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x6c\x69\x73\x74"){KsnqybMd03($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x64\x65\x6c"){if($AnmzMI3HKg->xouSTQU2yZ($AnmzMI3HKg->Dix6pSQcAZ("\x70\x61\x72\x74\x6e\x65\x72\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x70\x61\x72\x74\x6e\x65\x72\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x61\x64\x64"){my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^P_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);}}if($AnmzMI3HKg->vnkaS8MYBL(\%DcTlQVShJ0,$AnmzMI3HKg->Dix6pSQcAZ("\x47\x52\x4f\x55\x50\x5f\x49\x44"))){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x75\x70\x64\x61\x74\x65"){my $Eq03luYojV=$AnmzMI3HKg->Dix6pSQcAZ("\x70\x61\x72\x74\x6e\x65\x72\x5f\x69\x64");my @ok9TFXrE3N=$AnmzMI3HKg->Dix6pSQcAZ();my %DcTlQVShJ0;foreach my $DjdUZkXCEW(@ok9TFXrE3N){if($DjdUZkXCEW=~ /^P_(.*)/){my $VqWsVrJuNi=$1;$VqWsVrJuNi=~ s#[^\d\w._-]##g;next if $VqWsVrJuNi eq "\x49\x44";$DcTlQVShJ0{$VqWsVrJuNi}=$AnmzMI3HKg->Dix6pSQcAZ($DjdUZkXCEW);if($VqWsVrJuNi eq "\x54\x41\x47" and length($DcTlQVShJ0{$VqWsVrJuNi})==0){$DcTlQVShJ0{$VqWsVrJuNi}=undef;}}}if($AnmzMI3HKg->Ta9rBY2xfM($Eq03luYojV,\%DcTlQVShJ0)){$AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x67\x72\x6f\x75\x70\x5f\x64\x65\x6c"){if($AnmzMI3HKg->LlLvPaduCh($AnmzMI3HKg->Dix6pSQcAZ("\x70\x61\x72\x74\x6e\x65\x72\x5f\x69\x64"),$AnmzMI3HKg->Dix6pSQcAZ("\x67\x72\x6f\x75\x70\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x70\x61\x72\x74\x6e\x65\x72\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x61\x72\x74\x6e\x65\x72\x5f\x67\x72\x6f\x75\x70\x5f\x61\x64\x64"){if($AnmzMI3HKg->zMN1po7j0l($AnmzMI3HKg->Dix6pSQcAZ("\x70\x61\x72\x74\x6e\x65\x72\x5f\x69\x64"),$AnmzMI3HKg->Dix6pSQcAZ("\x67\x72\x6f\x75\x70\x5f\x69\x64"))){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x70\x61\x72\x74\x6e\x65\x72\x5f\x6c\x69\x73\x74\x26\x64\x66\x3d".$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66"));}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x68\x6f\x6e\x65\x5f\x6c\x69\x73\x74"){P61ZP5C9f2($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x70\x65\x65\x72\x5f\x6c\x69\x73\x74"){RhPws6N1Ej($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x61\x75\x74\x68\x5f\x6e\x61\x6d\x65\x5f\x72\x65\x73\x65\x74"){if(my $ytbRZ2drxF=$AnmzMI3HKg->nhzF8Xu1io($AnmzMI3HKg->Dix6pSQcAZ("\x69\x64"),$AnmzMI3HKg->Dix6pSQcAZ("\x70\x61\x63"),$AnmzMI3HKg->Dix6pSQcAZ("\x6e\x65\x77\x69\x64"),$AnmzMI3HKg->Dix6pSQcAZ("\x6e\x65\x77\x70\x77"))){my $Shie5cISdz=$AnmzMI3HKg->Dix6pSQcAZ("\x6d\x6f\x64\x65");if($Shie5cISdz eq "\x72\x65\x64\x69\x72"){return $AnmzMI3HKg->ZyguHA4T9W();}else{my $iEpJWQ1Dhg=$AnmzMI3HKg->Dix6pSQcAZ("\x64\x74\x79\x70\x65");if($iEpJWQ1Dhg eq "\x70\x68\x6f\x6e\x65"){P61ZP5C9f2($AnmzMI3HKg);}else{RhPws6N1Ej($AnmzMI3HKg);}}}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x73\x69\x70\x5f\x63\x61\x6c\x6c\x5f\x6c\x69\x6d\x69\x74"){if($AnmzMI3HKg->ZbH2CeFZWU($AnmzMI3HKg->Dix6pSQcAZ([qw(data_id user_id phone limit)]))){return $AnmzMI3HKg->ZyguHA4T9W();}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x62\x78\x5f\x6d\x6f\x64\x65\x5f\x75\x70\x64\x61\x74\x65"){if($AnmzMI3HKg->fzeSMLnJyk($AnmzMI3HKg->Dix6pSQcAZ([qw(data_id need_reg user_id host PBXMODE)]))){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x63\x6c\x6f\x6e\x65"){my($CSEv3i7oyr,$AuOwrfbUHV,$YHaFdQ4czb,$NGgNjtpq4n,$oOVEaqU4S3,$GkyQ5xGt1N)=$AnmzMI3HKg->Dix6pSQcAZ([qw(tname id fname fid newaction noauto)]);my $ytbRZ2drxF=$AnmzMI3HKg->o6PtCIjgGl($CSEv3i7oyr,$AuOwrfbUHV,$YHaFdQ4czb,$NGgNjtpq4n,$GkyQ5xGt1N);if(defined $ytbRZ2drxF){$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d".$oOVEaqU4S3."\x3d".$ytbRZ2drxF);}else{$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x63\x6f\x75\x6e\x74\x65\x72\x73\x5f\x63\x6c\x65\x61\x6e"){my $MhRWY3oXpx=$AnmzMI3HKg->Dix6pSQcAZ("\x61\x63");if($MhRWY3oXpx){my $PavlS9us6r="\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x75\x74\x69\x6c\x73\x2f\x75\x73\x65\x72\x5f\x63\x6f\x75\x6e\x74\x65\x72\x73\x2e\x70\x6c\x20".$MhRWY3oXpx."\x20\x63\x6c\x65\x61\x6e";my $ZMEFV46IN9=`$PavlS9us6r`;}$AnmzMI3HKg->ZyguHA4T9W();}elsif($oOVEaqU4S3 eq "\x73\x79\x73\x73\x74\x61\x74\x75\x73"){gs3t94cZg5($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x72\x65\x70\x6f\x72\x74"){$AnmzMI3HKg->au9SnFjUNM(200,"\x4f\x6b","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x74\x65\x78\x74\x2f\x70\x6c\x61\x69\x6e",'');my $lzXN6srjWw=$AnmzMI3HKg->Dix6pSQcAZ("\x74\x79\x70\x65");if($lzXN6srjWw eq "\x73\x79\x73\x73\x74\x61\x74\x65"){my $CDT87F9OQ5=$AnmzMI3HKg->aLwxaeY9ln("\x73\x75\x64\x6f\x20\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x75\x74\x69\x6c\x73\x2f\x73\x79\x73\x73\x74\x61\x74\x75\x73\x2e\x70\x6c\x20\x72\x65\x70\x6f\x72\x74");print $CDT87F9OQ5;}elsif($lzXN6srjWw eq "\x78\x76\x62\x6c\x6f\x67"){system("\x74\x61\x69\x6c\x20\x2d\x31\x30\x30\x30\x30\x30\x20\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2e\x6c\x6f\x67");}elsif($lzXN6srjWw eq "\x78\x76\x62\x65\x72\x72"){system("\x74\x61\x69\x6c\x20\x2d\x31\x30\x30\x30\x30\x30\x20\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2e\x73\x74\x64\x65\x72\x72");}elsif($lzXN6srjWw eq "\x78\x76\x62\x63\x72\x6d"){system("\x74\x61\x69\x6c\x20\x2d\x31\x30\x30\x30\x30\x30\x20\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2d\x43\x52\x4d\x2e\x6c\x6f\x67");}elsif($lzXN6srjWw eq "\x78\x76\x62\x68\x74\x74\x70\x61\x75\x64\x69\x74"){system("\x74\x61\x69\x6c\x20\x2d\x31\x30\x30\x30\x30\x30\x20\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2d\x48\x54\x54\x50\x2e\x6c\x6f\x67");}elsif($lzXN6srjWw eq "\x61\x73\x74\x65\x72\x69\x73\x6b"){system("\x74\x61\x69\x6c\x20\x2d\x31\x30\x30\x30\x30\x30\x20\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x61\x73\x74\x65\x72\x69\x73\x6b\x2f\x6d\x65\x73\x73\x61\x67\x65\x73");}}elsif($oOVEaqU4S3 eq "\x63\x61\x6c\x6c\x5f\x6c\x6f\x67"){my $tOduBXHpI9=$AnmzMI3HKg->Dix6pSQcAZ("\x63\x61\x6c\x6c\x5f\x69\x64");my $PavlS9us6r="find /var/log/VirtualPBX/backup/ -name 'XVB.log*.gz'";my @krXgZNfuDO=`$PavlS9us6r`;push @krXgZNfuDO,"\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2e\x6c\x6f\x67";chomp @krXgZNfuDO;@krXgZNfuDO=sort{(stat($b))[9]<=>(stat($a))[9]}@krXgZNfuDO;my $N1IA7c6JTB='';local $|=1;$AnmzMI3HKg->au9SnFjUNM(200,"\x4f\x6b","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x74\x65\x78\x74\x2f\x70\x6c\x61\x69\x6e","#=== Call-ID $tOduBXHpI9 ");my $vlxd9XJz7O=time;my $nZzu3p2eTH=$AnmzMI3HKg->Dix6pSQcAZ("\x6d\x6c")||$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x4d\x41\x58\x5f\x4c\x4f\x47\x53")||3;my $UeSRFnC5oU=$AnmzMI3HKg->Dix6pSQcAZ("\x6d\x6c\x74")||$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x4d\x41\x58\x5f\x4c\x4f\x47\x53\x5f\x54\x4f")||20;$#krXgZNfuDO=$nZzu3p2eTH-1 if $#krXgZNfuDO>$nZzu3p2eTH-1;foreach my $NVhzP0smLy(@krXgZNfuDO){my $AAQtYiqODn='';$PavlS9us6r="grep '$tOduBXHpI9' $NVhzP0smLy | tac";if($NVhzP0smLy=~ /gz$/){$PavlS9us6r="z$PavlS9us6r";}$AAQtYiqODn=`$PavlS9us6r`;$N1IA7c6JTB.=$AAQtYiqODn;print "=";if(time>$vlxd9XJz7O+$UeSRFnC5oU){last;}}unless(length($N1IA7c6JTB)){print "\n\nCannot found data, the call is too old or log-files is too huge, try to grep in console\n";}else{my @AKRmApx09j=split(/[\r\n]+/,$N1IA7c6JTB);print "\n\n".join("\n",reverse(@AKRmApx09j));}}elsif($oOVEaqU4S3 eq "\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74"){ebI8fRy4X9($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x6d\x73\x67\x5f\x6c\x69\x73\x74\x5f\x61\x6c\x6c"){my($wUDLhcMlbW,$FjwnDZCtIV)=split("\x2c",$AnmzMI3HKg->Dix6pSQcAZ("\x6d\x73\x67\x5f\x74\x79\x70\x65"),2);my @Ufvcs632oA=map{int($_)}split("\x3a",$wUDLhcMlbW,10);if(scalar(@Ufvcs632oA)){JYF9BH4VZ6($AnmzMI3HKg,\@Ufvcs632oA,$FjwnDZCtIV);}else{JYF9BH4VZ6($AnmzMI3HKg,undef,$FjwnDZCtIV);}}elsif($oOVEaqU4S3 eq "\x63\x61\x6c\x6c\x73\x5f\x68\x61\x6e\x67\x75\x70"){my($Ra5NRMefZF,$tOduBXHpI9)=$AnmzMI3HKg->Dix6pSQcAZ([qw(user_id call_id)]);if(length($tOduBXHpI9)and length($Ra5NRMefZF)){$AnmzMI3HKg->RB4l89y5Zz($tOduBXHpI9,$Ra5NRMefZF);}$AnmzMI3HKg->ZyguHA4T9W();}elsif($oOVEaqU4S3 eq "\x73\x69\x70\x5f\x6c\x6f\x67"){BDdjn7OFHT($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x66\x32\x62"){my $gDLIS9YoCx=T98L4ijCyX($AnmzMI3HKg);gs3t94cZg5($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x75\x73\x65\x72\x5f\x6c\x69\x73\x74"){frYuIH28LT($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x62\x61\x63\x6b\x75\x70"){LIsFtKZLUH($AnmzMI3HKg);}elsif($oOVEaqU4S3 eq "\x78\x76\x62\x73\x61\x6e\x64\x62\x6f\x78"){djiDUVBOMs($AnmzMI3HKg);$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x73\x79\x73\x73\x74\x61\x74\x75\x73");exit;}else{$AnmzMI3HKg->ZyguHA4T9W("\x3f\x61\x63\x74\x69\x6f\x6e\x3d\x75\x73\x65\x72\x5f\x6c\x69\x73\x74\x26\x66\x5f\x73\x74\x61\x74\x75\x73\x3d\x31");}}sub gvJIj8X7Zi{my $AnmzMI3HKg=shift;my($cdrZIuAgGi)=$AnmzMI3HKg->Dix6pSQcAZ("\x61\x63");my $KKqHxtvsJn=$AnmzMI3HKg->mTAKPLG8Jc(0,$cdrZIuAgGi,undef,undef);unless(ref $KKqHxtvsJn eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy();unless(ref $HOk1iPYfR8 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $sM98HhXpJ7=$AnmzMI3HKg->S0pnQXc96o();%{$sM98HhXpJ7}=(ID=>$KKqHxtvsJn->[0]->{"\x49\x44"},TARIFF_ID=>$KKqHxtvsJn->[0]->{"\x54\x41\x52\x49\x46\x46\x5f\x49\x44"});$KKqHxtvsJn->[0]->{"\x43\x55\x52\x5f\x43\x41\x4c\x4c\x53"}=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x61\x63\x2d\x69\x6e\x2d".$KKqHxtvsJn->[0]->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"})||0;my @INTeiLAVZo;foreach my $sYMolaLk02(split(/\s*,\s*/,$AnmzMI3HKg->Y89WXfLe6Q("\x43\x55\x53\x54\x4f\x4d\x5f\x45\x58\x54\x52\x41\x5f\x55\x53\x45\x52\x5f\x46\x49\x45\x4c\x44\x53\x5f\x34\x5f\x41\x49"))){my($VqWsVrJuNi,$jP3dFnO8uc,$lplkHCGgQ6)=split(/:/,$sYMolaLk02);next unless $lplkHCGgQ6;push @INTeiLAVZo,{NAME=>$lplkHCGgQ6,VAL=>$KKqHxtvsJn->[0]->{$VqWsVrJuNi},KEY=>$VqWsVrJuNi};}my $PavlS9us6r="\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x75\x74\x69\x6c\x73\x2f\x75\x73\x65\x72\x5f\x63\x6f\x75\x6e\x74\x65\x72\x73\x2e\x70\x6c\x20".($KKqHxtvsJn->[0]->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"}||0);my $ZMEFV46IN9=`$PavlS9us6r`;my $UCIWDthEFP;$UCIWDthEFP="\x2d\x73\x62";dwZpvdYCec($AnmzMI3HKg,"\x75\x73\x65\x72\x5f\x69\x6e\x66\x6f\x2e\x74\x74",{USER=>$KKqHxtvsJn->[0],USER_COUNTERS=>$ZMEFV46IN9,DIDS=>$AnmzMI3HKg->W8Ra9FPOBo(),DOMAINS=>$AnmzMI3HKg->dKUE8pqyg7(),TARIFF=>$AnmzMI3HKg->Ow4p8xt76I(),ADMIN_KEY=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x4b\x45\x59"),CUSTOM_FIELDS=>\@INTeiLAVZo,GROUPS=>$HOk1iPYfR8,IS_SB=>$UCIWDthEFP,LIMITS=>$AnmzMI3HKg->QDYnEQmj9o($KKqHxtvsJn->[0]->{"\x49\x44"})});}sub frYuIH28LT{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i,$OHwNo9rPzd,$xTVgDbrEBM,$lXxMtoJzwI,$bSvJeNHIXF,$YpuJF8ir4b,$s80TyvezGg)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x66\x5f\x61\x63","\x66\x5f\x76\x6e","\x66\x5f\x67\x72\x6f\x75\x70","\x66\x5f\x75\x6e\x61\x6d\x65","\x66\x5f\x73\x74\x61\x74\x75\x73","\x66\x5f\x74\x61\x72\x69\x66\x66","\x66\x5f\x64\x65\x73\x63","\x66\x5f\x69\x64"]);my($KKqHxtvsJn,$mT8OIQSBZt)=$AnmzMI3HKg->mTAKPLG8Jc($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i,$OHwNo9rPzd,$xTVgDbrEBM,$lXxMtoJzwI,$bSvJeNHIXF,$YpuJF8ir4b,undef,$s80TyvezGg);unless(ref $KKqHxtvsJn eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy();unless(ref $HOk1iPYfR8 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $TJCX69Mr50=[];foreach my $f49PdJ3YjM(split(/\s*;\s*/,$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x54\x45\x4e\x41\x4e\x54\x53\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x53"))){my($NVhzP0smLy,$zN0W3yKsgL)=split(/:/,$f49PdJ3YjM,2);unless($zN0W3yKsgL){$zN0W3yKsgL=$NVhzP0smLy;$zN0W3yKsgL=~ s{.*/([^/]+)$}{$1};}push @$TJCX69Mr50,{FILE=>$NVhzP0smLy,DESC=>$zN0W3yKsgL};}my $Dug7cPoFjd=1;foreach my $sM98HhXpJ7(@{$KKqHxtvsJn}){$sM98HhXpJ7->{"\x49\x44\x58"}=$S8l9ToNzLi+$Dug7cPoFjd;$Dug7cPoFjd++;}dwZpvdYCec($AnmzMI3HKg,"\x75\x73\x65\x72\x5f\x6c\x69\x73\x74\x2e\x74\x74",{USERS=>$KKqHxtvsJn,USERS_CNT=>$mT8OIQSBZt,GROUPS=>$HOk1iPYfR8,TEMPLATES=>$TJCX69Mr50,F_AC=>$cLcQ98hMdE,F_VN=>$yjmZJ7tA5i,F_GROUP=>$OHwNo9rPzd,F_UNAME=>$xTVgDbrEBM,F_STATUS=>$lXxMtoJzwI,F_TARIFF=>$bSvJeNHIXF,F_DESC=>$YpuJF8ir4b,F_ID=>$s80TyvezGg,TARIFFS=>$AnmzMI3HKg->YomitkHNux("\x54\x41\x52\x49\x46\x46"),DEF_SH_DID=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x44\x45\x46\x5f\x53\x48\x5f\x44\x49\x44"),$AnmzMI3HKg->rYQvMDRBum(1,$KKqHxtvsJn,$S8l9ToNzLi)});}sub l4dxl2EJ5i{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x66\x5f\x61\x63","\x66\x5f\x76\x6e"]);my $rP1DdnXGe4=$AnmzMI3HKg->VMYQTRS9OH($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i);unless(ref $rP1DdnXGe4 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x64\x69\x64\x5f\x6c\x69\x73\x74\x2e\x74\x74",{DIDS=>$rP1DdnXGe4,F_AC=>$cLcQ98hMdE,F_VN=>$yjmZJ7tA5i,$AnmzMI3HKg->rYQvMDRBum(1,$rP1DdnXGe4,$S8l9ToNzLi)});}sub RkDNjTFfIE{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x66\x5f\x61\x63","\x66\x5f\x76\x6e"]);my $A7ghXwsf8v=$AnmzMI3HKg->ZJ8GxTnBIS($S8l9ToNzLi,$cLcQ98hMdE,$yjmZJ7tA5i);unless(ref $A7ghXwsf8v eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x73\x69\x70\x64\x6f\x6d\x61\x69\x6e\x5f\x6c\x69\x73\x74\x2e\x74\x74",{DOMAINS=>$A7ghXwsf8v,F_AC=>$cLcQ98hMdE,F_VN=>$yjmZJ7tA5i,$AnmzMI3HKg->rYQvMDRBum(1,$A7ghXwsf8v,$S8l9ToNzLi)});}sub smTHUtNSE1{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$OHwNo9rPzd)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x66\x5f\x67\x72\x6f\x75\x70"]);my $HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy(undef,$OHwNo9rPzd,$S8l9ToNzLi);unless(ref $HOk1iPYfR8 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x67\x72\x6f\x75\x70\x5f\x6c\x69\x73\x74\x2e\x74\x74",{GROUPS=>$HOk1iPYfR8,NODES=>$AnmzMI3HKg->nZUSnoHmb5(),F_GROUP=>$OHwNo9rPzd,$AnmzMI3HKg->rYQvMDRBum(1,$HOk1iPYfR8,$S8l9ToNzLi)});}sub yT9iOu0tey{my($AnmzMI3HKg,$lJh81v9maX,$l2nWRvAU7x)=@_;my $sDBxfJ908v=$AnmzMI3HKg->C4SYu9VsUy($lJh81v9maX,$l2nWRvAU7x);unless(ref $sDBxfJ908v eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;smTHUtNSE1($AnmzMI3HKg);}else{my $ie0HDjZYMi=$AnmzMI3HKg->YomitkHNux("\x56\x42\x54\x59\x50\x45\x53");foreach my $bKpLaOhv0I(@$ie0HDjZYMi){$bKpLaOhv0I->{"\x4c\x49\x4d\x49\x54\x5f\x56\x41\x4c\x55\x45"}=$sDBxfJ908v->[0]->{"\x56\x42\x4c\x5f".$bKpLaOhv0I->{"\x49\x44"}};}dwZpvdYCec($AnmzMI3HKg,"\x67\x72\x6f\x75\x70\x5f\x69\x6e\x66\x6f\x2e\x74\x74",{GROUP=>$sDBxfJ908v->[0],NODES=>$AnmzMI3HKg->YomitkHNux("\x4e\x4f\x44\x45","\x4e\x4f\x44\x45\x5f\x49\x44"),TARIFFS=>$AnmzMI3HKg->YomitkHNux("\x54\x41\x52\x49\x46\x46"),LANG=>$AnmzMI3HKg->YomitkHNux("\x4c\x41\x4e\x47",undef,{STATUS=>1}),VB_TYPES=>$ie0HDjZYMi});}}sub w4AnYFGefX{my($AnmzMI3HKg,$AuOwrfbUHV)=@_;my $nz8IAVkntg=$AnmzMI3HKg->FMuel8OiFk(undef,$AuOwrfbUHV);if(ref $nz8IAVkntg ne "\x41\x52\x52\x41\x59" or ref $nz8IAVkntg->[0]ne "\x48\x41\x53\x48"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x74\x61\x72\x69\x66\x66\x5f\x69\x6e\x66\x6f\x2e\x74\x74",{%{$nz8IAVkntg->[0]},CURRENCY=>$AnmzMI3HKg->YomitkHNux("\x43\x55\x52\x52\x45\x4e\x43\x59","\x43\x55\x52\x5f\x49\x44"),});}sub gUuGQR6ed5{my($AnmzMI3HKg,$YG2oK5qNug)=@_;my($S8l9ToNzLi,$XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$tOduBXHpI9,$dbC50DGgPH,$YQIpsiahC7,$cdrZIuAgGi,$qWoIU9upfn,$LARNhM49GZ,$wzWmfNEenp,$T8AGXeyJEW,$tmU5JCl6QK,$KPir8q3UhO)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(from_time to_time smart_time call_id caller_id called_id ac call_type duration act_type ext data group)]);unless(length("$tOduBXHpI9$dbC50DGgPH$YQIpsiahC7$XZ4s1aiuhp$wkRUSzXufK$qWoIU9upfn$cdrZIuAgGi$LARNhM49GZ$tmU5JCl6QK")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x41\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my $zpPo6XZes9=$AnmzMI3HKg->A4z7oliwGp($tOduBXHpI9,$dbC50DGgPH,$YQIpsiahC7,$S8l9ToNzLi,$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),$qWoIU9upfn,$Y5jwUIciVS,$LARNhM49GZ,$tmU5JCl6QK,$YG2oK5qNug,$T8AGXeyJEW,$wzWmfNEenp,$KPir8q3UhO);unless(ref $zpPo6XZes9 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my(@ok9TFXrE3N,$ucu7Zeo6gr,$kH5UwpdrjZ);my $HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy();if($zpPo6XZes9){my $QagrqUj7vi=$S8l9ToNzLi+1;unless($tOduBXHpI9){foreach my $bKpLaOhv0I(@{$zpPo6XZes9}){$bKpLaOhv0I->{"\x43\x44\x52\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});}}else{foreach my $bKpLaOhv0I(@{$zpPo6XZes9}){$bKpLaOhv0I->{"\x43\x44\x52\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});if($bKpLaOhv0I->{"\x54\x59\x50\x45"}eq "\x43\x61\x6c\x6c"){$ucu7Zeo6gr=$bKpLaOhv0I->{"\x45\x58\x54\x5f\x4e\x55\x4d\x42\x45\x52"};$kH5UwpdrjZ=$bKpLaOhv0I->{"\x44\x4f\x57\x4e\x4c\x4f\x41\x44\x5f\x49\x50"};}}$ucu7Zeo6gr=$tOduBXHpI9 unless length($ucu7Zeo6gr);if(ref $zpPo6XZes9 and ref $zpPo6XZes9->[0]){my $Smg51snJr0=$AnmzMI3HKg->ZaBlJMdYyE($zpPo6XZes9->[0]->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"},"\x25\x59\x2d\x25\x6d\x2d\x25\x64\x2d\x25\x48\x2d\x25\x4d\x2d\x25\x53");push @ok9TFXrE3N,(JS_DATE_STR=>$Smg51snJr0);push @ok9TFXrE3N,(SIP_CALL_ID=>$ucu7Zeo6gr,SIP_CALL_START=>$zpPo6XZes9->[0]->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"},SIP_CALL_STOP=>$zpPo6XZes9->[$#{$zpPo6XZes9}]->{"\x53\x54\x4f\x50\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"},SIP_NODE_IP=>$kH5UwpdrjZ);}}}my $B3k7aZEqsR;if($tOduBXHpI9){$B3k7aZEqsR="\x63\x64\x72\x73\x5f\x61\x63\x74\x5f\x6c\x69\x73\x74\x2e\x74\x74";}elsif($YG2oK5qNug){$B3k7aZEqsR="\x61\x63\x74\x5f\x6c\x69\x73\x74\x5f\x61\x6c\x6c\x2e\x74\x74";push @ok9TFXrE3N,(CDR_ACT_TYPE=>$wzWmfNEenp,CDR_ACT_EXT=>$T8AGXeyJEW);unless($AnmzMI3HKg->fcKSvG6Ye3()->{"\x44\x46"}){push @ok9TFXrE3N,(ACT_TYPES=>$AnmzMI3HKg->{"\x5f\x4c\x49\x53\x54\x53"}->{"\x41\x43\x54\x49\x56\x49\x54\x49\x45\x53"});}}else{$B3k7aZEqsR="\x63\x64\x72\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74";push @ok9TFXrE3N,(CDR_CALL_TYPE=>$qWoIU9upfn);}return dwZpvdYCec($AnmzMI3HKg,$B3k7aZEqsR,{CDR_LIST=>$zpPo6XZes9,CDR_CALL_ID=>$tOduBXHpI9,CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_AC=>$cdrZIuAgGi,CDR_DURATION=>$LARNhM49GZ,CDR_DATA=>$tmU5JCl6QK,CDR_GROUP=>$KPir8q3UhO,GROUPS=>$HOk1iPYfR8,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK,SMART_TIME=>$CyzqtHa3GI,@ok9TFXrE3N,$AnmzMI3HKg->rYQvMDRBum(1,$zpPo6XZes9,$S8l9ToNzLi)});}sub Dm1otLr5M2{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$cdrZIuAgGi,$XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$sCl1I2sJ3X,$TV4vi0htsn,$tmU5JCl6QK,$sTxIwbVpak)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(ac from_time to_time smart_time ext_num action_type data cid)]);unless(length("$cdrZIuAgGi$XZ4s1aiuhp$wkRUSzXufK$sCl1I2sJ3X$TV4vi0htsn$tmU5JCl6QK$sTxIwbVpak")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x41\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my $UjsKqF8CeD=$AnmzMI3HKg->oWc9mT15k3($Y5jwUIciVS,$sCl1I2sJ3X,$tmU5JCl6QK,$S8l9ToNzLi,$TV4vi0htsn,$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),$sTxIwbVpak);if(ref $UjsKqF8CeD ne "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}elsif($UjsKqF8CeD){my $QagrqUj7vi=$S8l9ToNzLi+1;foreach my $bKpLaOhv0I(@{$UjsKqF8CeD}){$bKpLaOhv0I->{"\x4a\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$bKpLaOhv0I->{"\x4a\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x43\x52\x45\x41\x54\x45\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});}}return dwZpvdYCec($AnmzMI3HKg,"\x6a\x6f\x75\x72\x6e\x61\x6c\x5f\x6c\x69\x73\x74\x2e\x74\x74",{J_LIST=>$UjsKqF8CeD,J_DATA=>$tmU5JCl6QK,J_EXT_NUM=>$sCl1I2sJ3X,J_ACTION=>$TV4vi0htsn,J_AC=>$cdrZIuAgGi,J_CID=>$sTxIwbVpak,ACTIONS=>$AnmzMI3HKg->Q9N7drFBtA(),FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK,SMART_TIME=>$CyzqtHa3GI,$AnmzMI3HKg->rYQvMDRBum(1,$UjsKqF8CeD,$S8l9ToNzLi)});}sub T8cmId0TPO{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$yjmZJ7tA5i)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x66\x5f\x76\x6e"]);my $fxCe6t2GaK=$AnmzMI3HKg->FZcPiGuQFf($S8l9ToNzLi,$yjmZJ7tA5i);unless(ref $fxCe6t2GaK eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x64\x69\x64\x5f\x61\x74\x74\x72\x5f\x6c\x69\x73\x74\x2e\x74\x74",{DIDS=>$fxCe6t2GaK,LANG=>$AnmzMI3HKg->YomitkHNux("\x4c\x41\x4e\x47",undef,{STATUS=>1}),F_VN=>$yjmZJ7tA5i,$AnmzMI3HKg->rYQvMDRBum(1,$fxCe6t2GaK,$S8l9ToNzLi)});}sub C1kSmXbNJH{my $AnmzMI3HKg=shift;my $S8l9ToNzLi=$AnmzMI3HKg->Dix6pSQcAZ("\x66\x72\x6f\x6d")||0;my $nz8IAVkntg=$AnmzMI3HKg->FMuel8OiFk($S8l9ToNzLi);unless(ref $nz8IAVkntg eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}dwZpvdYCec($AnmzMI3HKg,"\x74\x61\x72\x69\x66\x66\x5f\x6c\x69\x73\x74\x2e\x74\x74",{TARIFFS=>$nz8IAVkntg,CURRENCY=>$AnmzMI3HKg->YomitkHNux("\x43\x55\x52\x52\x45\x4e\x43\x59","\x43\x55\x52\x5f\x49\x44"),$AnmzMI3HKg->rYQvMDRBum(1,$nz8IAVkntg,$S8l9ToNzLi)});}sub bWHh5Ngi6X{my $AnmzMI3HKg=shift;my $S8l9ToNzLi=$AnmzMI3HKg->Dix6pSQcAZ("\x66\x72\x6f\x6d")||0;my $fKaLxgrwbj=$AnmzMI3HKg->nZUSnoHmb5($S8l9ToNzLi);unless(ref $fKaLxgrwbj eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}else{foreach my $ZA7aI3d0uw(@{$fKaLxgrwbj}){$ZA7aI3d0uw->{"\x73\x74\x61\x74"}=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x73\x74\x61\x74\x2d".$ZA7aI3d0uw->{"\x4e\x4f\x44\x45\x5f\x49\x44"})||{};$ZA7aI3d0uw->{"\x73\x74\x61\x74"}->{"\x63\x61\x6c\x6c\x73"}=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x63\x61\x6c\x6c\x73\x2d".$ZA7aI3d0uw->{"\x4e\x4f\x44\x45\x5f\x49\x44"})||0;}}dwZpvdYCec($AnmzMI3HKg,"\x6e\x6f\x64\x65\x5f\x6c\x69\x73\x74\x2e\x74\x74",{NODES=>$fKaLxgrwbj,$AnmzMI3HKg->rYQvMDRBum(1,$fKaLxgrwbj,$S8l9ToNzLi)});}sub rIrJCMQWu4{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$f23jkS1CPi,$iEpJWQ1Dhg)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x6e\x61\x6d\x65","\x74\x79\x70\x65"]);my $zZ8gyndhGt=$AnmzMI3HKg->WcAE6gs8Cp(undef,$iEpJWQ1Dhg,$f23jkS1CPi,$S8l9ToNzLi);unless(ref $zZ8gyndhGt eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;return 0;}dwZpvdYCec($AnmzMI3HKg,"\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74\x2e\x74\x74",{REPORTS=>$zZ8gyndhGt,SEARCH_NAME=>$f23jkS1CPi,SEARCH_TYPE=>$iEpJWQ1Dhg,$AnmzMI3HKg->rYQvMDRBum(1,$zZ8gyndhGt,$S8l9ToNzLi)});}sub lH298O54cu{my $AnmzMI3HKg=shift;my($txt6QkTVXf,$sQBay09EFv,$my6wQkbd8c,$Kf39QSrJDE,$CyzqtHa3GI,$iEpJWQ1Dhg)=$AnmzMI3HKg->Dix6pSQcAZ([qw(report_id need_excel from_time to_time smart_time type)]);my $irNLD9nUIV=$AnmzMI3HKg->HEyv8csKOu($my6wQkbd8c);my $eJtLflIT9k=$AnmzMI3HKg->HEyv8csKOu($Kf39QSrJDE);my(%v0jWF678wp,@UNrd6o8H29);my $XUjDX5puVr=$AnmzMI3HKg->WcAE6gs8Cp($txt6QkTVXf);if(ref $XUjDX5puVr eq "\x41\x52\x52\x41\x59" and $XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"}){foreach my $sABpt8wfv0(split(/\s*\|\s*/,$XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"})){my($hed95pMray,$yumNEpS8dc,$OuCjQl5mZ9)=split(/\s*:\s*/,$sABpt8wfv0,3);$v0jWF678wp{$hed95pMray}=$AnmzMI3HKg->Dix6pSQcAZ($hed95pMray);push @UNrd6o8H29,{name=>$hed95pMray,label=>$yumNEpS8dc,value=>$v0jWF678wp{$hed95pMray}};}}my $shNGgCWQ4T=$AnmzMI3HKg->pVzJck5Arb($txt6QkTVXf,$iEpJWQ1Dhg,$sQBay09EFv,$irNLD9nUIV,$eJtLflIT9k,\%v0jWF678wp);if($sQBay09EFv){if($shNGgCWQ4T){if($shNGgCWQ4T=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($shNGgCWQ4T,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($shNGgCWQ4T,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}unless(ref $shNGgCWQ4T eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="\x52\x65\x70\x6f\x72\x74\x20\x4e\x6f\x74\x20\x66\x6f\x75\x6e\x64";$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);return 0;}my $AfVEUj1HGr=[];my $KY78N4basG=[];foreach my $atOPlCq51N(@{$shNGgCWQ4T->[1]}){my $DjdUZkXCEW=$atOPlCq51N;if($DjdUZkXCEW=~ s/^=//){push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x6c\x65\x66\x74"};}elsif($DjdUZkXCEW=~ s/=$//){push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x72\x69\x67\x68\x74"};}else{push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x63\x65\x6e\x74\x65\x72"};}}for(0..$#{$shNGgCWQ4T->[0]}){$AfVEUj1HGr->[$_]=[];foreach my $atOPlCq51N(@{$shNGgCWQ4T->[1]}){my $DjdUZkXCEW=$atOPlCq51N;my $XKPcO4CSL5=$shNGgCWQ4T->[0]->[$_]->{$DjdUZkXCEW};my $yjhmlgfU1Q=0;if($DjdUZkXCEW=~ /^=?ACCESS_CODE=?$/){$XKPcO4CSL5="<a href='/ai?ac=$XKPcO4CSL5&action=user_info'>$XKPcO4CSL5</a>";$yjhmlgfU1Q=1;}if($DjdUZkXCEW=~ s/^=//){push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x6c\x65\x66\x74",is_raw=>$yjhmlgfU1Q,label=>$DjdUZkXCEW};}elsif($DjdUZkXCEW=~ s/=$//){push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x72\x69\x67\x68\x74",is_raw=>$yjhmlgfU1Q,label=>$DjdUZkXCEW};}else{push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x63\x65\x6e\x74\x65\x72",is_raw=>$yjhmlgfU1Q,label=>$DjdUZkXCEW};}}}dwZpvdYCec($AnmzMI3HKg,"\x72\x65\x70\x6f\x72\x74\x5f\x72\x65\x73\x75\x6c\x74\x2e\x74\x74",{FROM_TIME=>($my6wQkbd8c||$shNGgCWQ4T->[3]),TO_TIME=>($Kf39QSrJDE||$shNGgCWQ4T->[4]),SMART_TIME=>$CyzqtHa3GI,REPORT_RAW_DATA=>$shNGgCWQ4T->[5],REPORT_RESULT=>$AfVEUj1HGr,REPORT_HDR=>$KY78N4basG,REPORT_DATA=>$shNGgCWQ4T->[2],EXTRA_PARAMS=>\@UNrd6o8H29});}sub KsnqybMd03{my $AnmzMI3HKg=shift;my $S8l9ToNzLi=$AnmzMI3HKg->Dix6pSQcAZ("\x66\x72\x6f\x6d")||0;my($OvJNn2jlwx,$MfSepD2j31)=$AnmzMI3HKg->dKarxEVbc1($S8l9ToNzLi);my $HOk1iPYfR8;foreach my $T4W9bnigFw(@{$OvJNn2jlwx}){$T4W9bnigFw->{"\x47\x52\x4f\x55\x50\x5f\x49\x44\x5f\x42\x49\x4e"}=[split(/,/,$T4W9bnigFw->{"\x47\x52\x4f\x55\x50\x5f\x49\x44"})];}unless(ref $OvJNn2jlwx eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}else{$HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy();unless(ref $HOk1iPYfR8 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}}my $Dug7cPoFjd=1;foreach my $T4W9bnigFw(@{$OvJNn2jlwx}){$T4W9bnigFw->{"\x49\x44\x58"}=$S8l9ToNzLi+$Dug7cPoFjd;$Dug7cPoFjd++;}dwZpvdYCec($AnmzMI3HKg,"\x70\x61\x72\x74\x6e\x65\x72\x5f\x6c\x69\x73\x74\x2e\x74\x74",{PARTNERS=>$OvJNn2jlwx,PARTNERS_CNT=>$MfSepD2j31,GROUPS=>$HOk1iPYfR8,$AnmzMI3HKg->rYQvMDRBum(1,$OvJNn2jlwx,$S8l9ToNzLi)});}sub P61ZP5C9f2{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$hE8TSUVQ1G,$RmskNInKtU,$gDLIS9YoCx,$cdrZIuAgGi,$VucDsG1b0g,$nW2yH8TK04)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x70\x68\x6f\x6e\x65","\x61\x75\x74\x68\x6e\x61\x6d\x65","\x69\x70","\x61\x63","\x75\x61","\x72\x73\x74"]);my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my($ZTpS768LnF,$sgj05EiHmR)=$AnmzMI3HKg->Du98gEvCmI($S8l9ToNzLi,0,$hE8TSUVQ1G,$RmskNInKtU,undef,$gDLIS9YoCx,$Y5jwUIciVS,$VucDsG1b0g,undef,undef,$nW2yH8TK04);unless(ref $ZTpS768LnF eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $Lvx79ILJpV=time;my $Dug7cPoFjd=1;foreach my $MXEc1Kup02(@$ZTpS768LnF){if($Lvx79ILJpV<$MXEc1Kup02->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}){$MXEc1Kup02->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x52\x65\x67\x69\x73\x74\x65\x72\x65\x64";}else{$MXEc1Kup02->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x55\x6e\x72\x65\x67\x69\x73\x74\x65\x72\x65\x64";}$MXEc1Kup02->{"\x52\x45\x47\x5f\x45\x58\x50\x49\x52\x45\x44"}=$MXEc1Kup02->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}? $AnmzMI3HKg->ZaBlJMdYyE($MXEc1Kup02->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}):"\x2d";$MXEc1Kup02->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}=$MXEc1Kup02->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}? $AnmzMI3HKg->ZaBlJMdYyE($MXEc1Kup02->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}):"\x2d";$MXEc1Kup02->{"\x49\x44\x58"}=$S8l9ToNzLi+$Dug7cPoFjd;$Dug7cPoFjd++;}dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x6c\x69\x73\x74\x2e\x74\x74",{SIPDEV=>$ZTpS768LnF,SIPDEV_CNT=>$sgj05EiHmR,AUTHNAME=>$RmskNInKtU,PHONE=>$hE8TSUVQ1G,IP=>$gDLIS9YoCx,AC=>$cdrZIuAgGi,UA=>$VucDsG1b0g,RST=>$nW2yH8TK04,FROM=>$S8l9ToNzLi,ALLOW_RESET=>($AnmzMI3HKg->Y89WXfLe6Q("\x53\x49\x50\x5f\x4e\x41\x4d\x45\x5f\x54\x59\x50\x45")eq "\x73\x69\x6d\x70\x6c\x65" ? 0:1),ALLOW_AUTH_EDIT=>$AnmzMI3HKg->Y89WXfLe6Q("\x53\x49\x50\x5f\x41\x49\x5f\x41\x55\x54\x48\x5f\x45\x44\x49\x54"),$AnmzMI3HKg->rYQvMDRBum(1,$ZTpS768LnF,$S8l9ToNzLi)});}sub ebI8fRy4X9{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$dbC50DGgPH,$YQIpsiahC7,$cdrZIuAgGi,$qWoIU9upfn,$YUASHyWjB9,$Tt56HCxMl7,$LARNhM49GZ,$KPir8q3UhO)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(caller_id called_id ac call_type refresh c2c duration group)]);my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my $pHXQB8k4Pf=$AnmzMI3HKg->S5ZDxtzm0n($dbC50DGgPH,$YQIpsiahC7,$Y5jwUIciVS,$qWoIU9upfn,$LARNhM49GZ,$KPir8q3UhO,undef,undef,$S8l9ToNzLi);unless(ref $pHXQB8k4Pf eq "\x41\x52\x52\x41\x59"){$pHXQB8k4Pf=[];}if($pHXQB8k4Pf){foreach my $bKpLaOhv0I(@{$pHXQB8k4Pf}){$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x55\x52\x41\x54\x49\x4f\x4e"}=time-$bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"};}}my $HOk1iPYfR8=$AnmzMI3HKg->C4SYu9VsUy();unless(ref $HOk1iPYfR8 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}$Tt56HCxMl7||=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x44\x45\x46\x5f\x43\x32\x43");if($Tt56HCxMl7){$Tt56HCxMl7=~ s#ph=[^&;]+##;$Tt56HCxMl7=~ s#user_vars=([^&;]+)##;if($1){$Tt56HCxMl7=",$1&$Tt56HCxMl7";}elsif($Tt56HCxMl7=~ /&/ and $Tt56HCxMl7 !~ /^[,&]/){$Tt56HCxMl7="&$Tt56HCxMl7";}}return dwZpvdYCec($AnmzMI3HKg,"\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{CALLS_COUNT=>scalar(@$pHXQB8k4Pf),CALLS_LIST=>$pHXQB8k4Pf,CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_AC=>$cdrZIuAgGi,CDR_CALL_TYPE=>$qWoIU9upfn,CDR_REFRESH_TIME=>$YUASHyWjB9,CDR_C2C=>$Tt56HCxMl7,CDR_DURATION=>$LARNhM49GZ,CDR_GROUP=>$KPir8q3UhO,GROUPS=>$HOk1iPYfR8,$AnmzMI3HKg->rYQvMDRBum(1,$pHXQB8k4Pf,$S8l9ToNzLi)});}sub RhPws6N1Ej{my $AnmzMI3HKg=shift;my($S8l9ToNzLi,$RmskNInKtU,$ALnCIYlZbX,$cdrZIuAgGi,$r75NvCb2Tz,$X6IKUkdt57)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x61\x75\x74\x68\x6e\x61\x6d\x65","\x68\x6f\x73\x74","\x61\x63","\x6e\x65\x65\x64\x5f\x72\x65\x67","\x70\x62\x78\x6d\x6f\x64\x65"]);my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my($SA6Cty9GdM,$bOis7nDPVe)=$AnmzMI3HKg->Du98gEvCmI($S8l9ToNzLi,1,undef,$RmskNInKtU,$ALnCIYlZbX,undef,$Y5jwUIciVS,undef,$r75NvCb2Tz,$X6IKUkdt57);unless(ref $SA6Cty9GdM eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $Dug7cPoFjd=1;foreach my $T4W9bnigFw(@{$SA6Cty9GdM}){if($T4W9bnigFw->{"\x4e\x45\x45\x44\x5f\x52\x45\x47"}and length($T4W9bnigFw->{"\x75\x73\x65\x72\x6e\x61\x6d\x65"})){if($T4W9bnigFw->{"\x68\x6f\x73\x74"}eq "\x64\x79\x6e\x61\x6d\x69\x63"){my $Lvx79ILJpV=time;if($Lvx79ILJpV<$T4W9bnigFw->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}){$T4W9bnigFw->{"\x52\x45\x47\x5f\x44\x41\x54\x41"}={state=>"\x52\x65\x67\x69\x73\x74\x65\x72\x65\x64"};}else{$T4W9bnigFw->{"\x52\x45\x47\x5f\x44\x41\x54\x41"}={state=>"\x55\x6e\x72\x65\x67\x69\x73\x74\x65\x72\x65\x64"};}}elsif($T4W9bnigFw->{"\x70\x6f\x72\x74"}eq "\x35\x30\x36\x30"){$T4W9bnigFw->{"\x52\x45\x47\x5f\x44\x41\x54\x41"}=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x73\x69\x70\x2d\x72\x65\x67\x73\x2d".$T4W9bnigFw->{"\x6e\x61\x6d\x65"});}else{$T4W9bnigFw->{"\x52\x45\x47\x5f\x44\x41\x54\x41"}=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x73\x69\x70\x2d\x72\x65\x67\x73\x2d".$T4W9bnigFw->{"\x68\x6f\x73\x74"}."\x3a".$T4W9bnigFw->{"\x70\x6f\x72\x74"}."\x3a".$T4W9bnigFw->{"\x75\x73\x65\x72\x6e\x61\x6d\x65"});}}$T4W9bnigFw->{"\x49\x44\x58"}=$S8l9ToNzLi+$Dug7cPoFjd;$Dug7cPoFjd++;}dwZpvdYCec($AnmzMI3HKg,"\x70\x65\x65\x72\x5f\x6c\x69\x73\x74\x2e\x74\x74",{SIPDEV=>$SA6Cty9GdM,SIPDEV_CNT=>$bOis7nDPVe,AUTHNAME=>$RmskNInKtU,HOST=>$ALnCIYlZbX,NEED_REG=>$r75NvCb2Tz,PBXMODE=>$X6IKUkdt57,AC=>$cdrZIuAgGi,FROM=>$S8l9ToNzLi,$AnmzMI3HKg->rYQvMDRBum(1,$SA6Cty9GdM,$S8l9ToNzLi)});}sub zY3jXG4UeJ{my($AnmzMI3HKg)=@_;my($XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$dbC50DGgPH,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,$UpUzD1BhMe,$GgimvhV9wj)=$AnmzMI3HKg->Dix6pSQcAZ([qw(from_time to_time smart_time caller_id call_type called_id duration data raw_chart_data)]);unless(length("$XZ4s1aiuhp$wkRUSzXufK$dbC50DGgPH$qWoIU9upfn$YQIpsiahC7$LARNhM49GZ$UpUzD1BhMe")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x41\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $tmU5JCl6QK=$AnmzMI3HKg->d9x67XfL8P($dbC50DGgPH,$AnmzMI3HKg->HEyv8csKOu(($XZ4s1aiuhp||"\x30\x30\x3a\x30\x30")),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),($AnmzMI3HKg->Dix6pSQcAZ("\x63\x68\x61\x72\x74\x5f\x67\x72\x6f\x75\x70\x5f\x70\x65\x72\x69\x6f\x64")||"\x64"),$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,$UpUzD1BhMe,$GgimvhV9wj,undef,"\x69\x73\x5f\x61\x69");if($GgimvhV9wj){unless($tmU5JCl6QK){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}else{if($tmU5JCl6QK=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($tmU5JCl6QK,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($tmU5JCl6QK,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}my $y0GQbtAJ9Z;unless(ref $tmU5JCl6QK eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}else{$y0GQbtAJ9Z=$AnmzMI3HKg->ZaBlJMdYyE($tmU5JCl6QK->[2])."\x20\x2d\x20".$AnmzMI3HKg->ZaBlJMdYyE($tmU5JCl6QK->[3]||time);}return dwZpvdYCec($AnmzMI3HKg,"\x63\x64\x72\x73\x5f\x63\x68\x61\x72\x74\x2e\x74\x74",{CDR_LIST=>$tmU5JCl6QK->[0],CDR_HEADER=>$y0GQbtAJ9Z,CDR_PERIOD=>$tmU5JCl6QK->[1],CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_CALL_TYPE=>$qWoIU9upfn,CDR_DURATION=>$LARNhM49GZ,CDR_DATA=>$UpUzD1BhMe,CDR_WITH_ASR=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x53\x54\x41\x54\x5f\x57\x49\x54\x48\x5f\x41\x53\x52"),EXCEL_MODE=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45"),SMART_TIME=>$CyzqtHa3GI,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK});}sub JYF9BH4VZ6{my($AnmzMI3HKg,$zrXhpQoJs6,$FjwnDZCtIV)=@_;my($S8l9ToNzLi,$XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$dbC50DGgPH,$YQIpsiahC7,$LARNhM49GZ,$vYsw9UcZOB,$cdrZIuAgGi)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(from_time to_time smart_time caller_id called_id duration any_did ac)]);$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{MSG_IN_PAGE}=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x4d\x53\x47\x5f\x49\x4e\x5f\x50\x41\x47\x45");unless(length("$XZ4s1aiuhp$wkRUSzXufK$dbC50DGgPH$YQIpsiahC7$LARNhM49GZ$vYsw9UcZOB$cdrZIuAgGi")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x41\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $Y5jwUIciVS;if($cdrZIuAgGi=~ /,/){$Y5jwUIciVS=[split(/\s*,\s*/,$cdrZIuAgGi)];}else{$Y5jwUIciVS=$cdrZIuAgGi;}my $STYNBXbn82=$AnmzMI3HKg->ys4PzEyni2(0,$S8l9ToNzLi,undef,$zrXhpQoJs6,$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),$dbC50DGgPH,$YQIpsiahC7,$FjwnDZCtIV,$LARNhM49GZ,$vYsw9UcZOB,"\x69\x73\x5f\x61\x69",$Y5jwUIciVS);unless(ref $STYNBXbn82 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}elsif($STYNBXbn82){my $QagrqUj7vi=$S8l9ToNzLi+1;foreach my $zX4ALQuS7y(@{$STYNBXbn82}){$zX4ALQuS7y->{"\x4d\x53\x47\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$zX4ALQuS7y->{"\x4d\x53\x47\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($zX4ALQuS7y->{"\x43\x52\x45\x41\x54\x45\x5f\x54\x49\x4d\x45"});}}return dwZpvdYCec($AnmzMI3HKg,"\x6d\x65\x73\x73\x61\x67\x65\x73\x5f\x6c\x69\x73\x74\x5f\x61\x6c\x6c\x2e\x74\x74",{CGI_URL=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x55\x52\x4c"),MSG_LIST=>$STYNBXbn82,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK,SMART_TIME=>$CyzqtHa3GI,CALLER_ID=>$dbC50DGgPH,CALLED_ID=>$YQIpsiahC7,ANY_DID=>$vYsw9UcZOB,DURATION=>$LARNhM49GZ,ACCESS_CODE=>$cdrZIuAgGi,MSG_TYPE=>(ref $zrXhpQoJs6 ? join("\x3a",@$zrXhpQoJs6):'').(defined $FjwnDZCtIV ? ",$FjwnDZCtIV":''),$AnmzMI3HKg->rYQvMDRBum(0,$STYNBXbn82,$S8l9ToNzLi)});}sub dwZpvdYCec{my($AnmzMI3HKg,$KuQ984NhYL,$tmU5JCl6QK)=@_;my $f49PdJ3YjM=Template::EasyTT->new({});my $fgVNP8jtre=$AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x5f\x44\x49\x52")."\x2f\x61\x64\x6d\x69\x6e\x2f";my $zA1ID7Wrvc='';$tmU5JCl6QK->{"\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}=$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"};$tmU5JCl6QK->{"\x55\x53\x45\x5f\x42\x49\x4c\x4c\x49\x4e\x47"}=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x55\x53\x45\x5f\x42\x49\x4c\x4c\x49\x4e\x47");$tmU5JCl6QK->{"\x44\x59\x4e\x41\x4d\x49\x43\x5f\x44\x49\x41\x4c\x4f\x55\x54"}=$AnmzMI3HKg->Y89WXfLe6Q("\x53\x49\x50\x5f\x44\x59\x4e\x41\x4d\x49\x43\x5f\x44\x49\x41\x4c\x4f\x55\x54");$tmU5JCl6QK->{"\x55\x4e\x49\x58\x54\x49\x4d\x45"}=time;my @Y2BAzTctWd;if(length $ENV{"\x50\x41\x54\x48\x5f\x49\x4e\x46\x4f"}){@Y2BAzTctWd=split(/\//,substr($ENV{"\x50\x41\x54\x48\x5f\x49\x4e\x46\x4f"},1));}my $TR3b7TWf8x=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x44\x45\x46\x41\x55\x4c\x54\x5f\x4c\x41\x4e\x47\x5f\x41\x49")||"\x64\x65\x66\x61\x75\x6c\x74";my $mVeElLXfky=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x44\x45\x46\x41\x55\x4c\x54\x5f\x4c\x4f\x43\x41\x4c\x45")||"\x65\x6e\x5f\x55\x53\x2e\x55\x54\x46\x2d\x38";if(length $Y2BAzTctWd[0]){my($V09nQqkhFo,$mfYgwSt6Kx)=split(/:/,$Y2BAzTctWd[0]);$TR3b7TWf8x=$V09nQqkhFo if length $V09nQqkhFo;$mVeElLXfky=$mfYgwSt6Kx if length $mfYgwSt6Kx;}my $w2AEoDmSLn=$AnmzMI3HKg->Dix6pSQcAZ("\x64\x66");if($w2AEoDmSLn){my $z1v6lOxSa0=0;if(length($AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x54\x52\x55\x53\x54\x45\x44\x5f\x34\x5f\x41\x49\x5f\x44\x46"))){my $nmn9Fl8SkU=($ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}||"\x30\x2e\x30\x2e\x30\x2e\x30");if(index("\x2c".$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x54\x52\x55\x53\x54\x45\x44\x5f\x34\x5f\x41\x49\x5f\x44\x46")."\x2c",",$nmn9Fl8SkU,")>-1 or $AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x54\x52\x55\x53\x54\x45\x44\x5f\x34\x5f\x41\x49\x5f\x44\x46")eq "\x2a"){$z1v6lOxSa0=1;}}$w2AEoDmSLn='' unless $z1v6lOxSa0;}unless($w2AEoDmSLn){$f49PdJ3YjM->operators_add("\x64\x69\x76\x32",sub{return $_[0]% 2});$f49PdJ3YjM->filters_add("\x67\x6d\x74\x69\x6d\x65",sub{return scalar(gmtime($_[1]))});$f49PdJ3YjM->filters_add("\x62\x69\x6c\x6c\x5f\x66\x6c\x6f\x61\x74",sub{return sprintf("\x25\x2e".($AnmzMI3HKg->Y89WXfLe6Q("\x42\x49\x4c\x4c\x49\x4e\x47\x5f\x52\x4f\x55\x4e\x44\x49\x4e\x47\x5f\x34\x47\x55\x49")||2)."\x66",$_[1])});$f49PdJ3YjM->filters_add("\x6c\x6f\x63\x61\x6c\x65\x5f\x6d\x73\x67",sub{my $Tsoey7ACDW=$AnmzMI3HKg->Sgzw8dc0Vv($_[1],$mVeElLXfky);$Tsoey7ACDW=~ s#&#&amp;#gs;$Tsoey7ACDW=~ s#\x22#&quot;#gs;$Tsoey7ACDW=~ s#<#&lt;#gs;$Tsoey7ACDW=~ s#>#&gt;#gs;$Tsoey7ACDW=~ s#\x27#&apos;#gs;return $Tsoey7ACDW;});if(-e "$fgVNP8jtre/$TR3b7TWf8x/$KuQ984NhYL"){$f49PdJ3YjM->process("$fgVNP8jtre/$TR3b7TWf8x/$KuQ984NhYL",$tmU5JCl6QK,\$zA1ID7Wrvc);}else{$f49PdJ3YjM->process("$fgVNP8jtre/$KuQ984NhYL",$tmU5JCl6QK,\$zA1ID7Wrvc);}}unless($w2AEoDmSLn){$AnmzMI3HKg->au9SnFjUNM(200,"\x4f\x6b",undef,$zA1ID7Wrvc.$AnmzMI3HKg->Sgzw8dc0Vv("\x67\x36\x31\x33","\x43"));}elsif($w2AEoDmSLn eq "\x78\x6d\x6c"){require XML::Simple;$zA1ID7Wrvc=XML::Simple::XMLout($tmU5JCl6QK);$AnmzMI3HKg->sKr7q6P80I(200,"\x4f\x6b",undef,$zA1ID7Wrvc);}elsif($w2AEoDmSLn eq "\x6a\x73\x6f\x6e"){require JSON::XS;my $m9TXZBjeyx=JSON::XS->new();$AnmzMI3HKg->au9SnFjUNM(200,"\x4f\x6b","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x6a\x73\x6f\x6e",$m9TXZBjeyx->encode($tmU5JCl6QK));}}sub rv0Gj2Ixwm{my $AnmzMI3HKg=shift;my($uaSehHnEo2,$GpYM5EhGlq,$OHC83sqd1Z)=$AnmzMI3HKg->Dix6pSQcAZ([qw(caller_id called_id vars)]);my($zxK8645rVL,%v8hskKvpeR,$zxnOQ9mR3i,$oLZwl4WhFC,@Rh9fw7vjzl);$GpYM5EhGlq="\x30\x30\x30" unless length $GpYM5EhGlq;$uaSehHnEo2="\x30\x30\x30" unless length $uaSehHnEo2;foreach my $LnLXJKeMbq(split(/\s*,\s*/,$OHC83sqd1Z)){my($VqWsVrJuNi,$lzsJmnq6xf)=split(/\s*=\s*/,$LnLXJKeMbq);$oLZwl4WhFC->{$VqWsVrJuNi}=$lzsJmnq6xf;}my $EKTWHk940M=$AnmzMI3HKg->qQFCA7jDat($GpYM5EhGlq,$uaSehHnEo2,$oLZwl4WhFC);my $ThJMmoaQ7I='';if($GpYM5EhGlq){$ThJMmoaQ7I=$AnmzMI3HKg->ZGAbaLqOXD($GpYM5EhGlq);if($ThJMmoaQ7I){$zxnOQ9mR3i="$GpYM5EhGlq [ $ThJMmoaQ7I ]";}}if(ref $EKTWHk940M eq "\x41\x52\x52\x41\x59"){foreach my $VOzsBTUPo5(@{$EKTWHk940M}){if(exists $VOzsBTUPo5->{"\x44\x41\x54\x41\x5f\x49\x44"}){$v8hskKvpeR{$VOzsBTUPo5->{"\x44\x41\x54\x41\x5f\x49\x44"}}=($VOzsBTUPo5->{"\x50\x48\x4f\x4e\x45"}||$GpYM5EhGlq);}}}unless($AnmzMI3HKg->fcKSvG6Ye3()->{"\x44\x46"}){@Rh9fw7vjzl=(ROUTE_CALLER_ID=>$uaSehHnEo2,ROUTE_CALLED_ID=>$GpYM5EhGlq,ROUTE_VARS=>$OHC83sqd1Z);}my $yoBNvfCyGn=[];if(keys %v8hskKvpeR){my $S6X1u5SBgy=$AnmzMI3HKg->VmkZlxrLoc("\x69\x73\x5f\x61\x69");foreach my $VOzsBTUPo5(@$S6X1u5SBgy){if(exists $v8hskKvpeR{$VOzsBTUPo5->{"\x44\x41\x54\x41\x5f\x49\x44"}}){if($GpYM5EhGlq ne $v8hskKvpeR{$VOzsBTUPo5->{"\x44\x41\x54\x41\x5f\x49\x44"}}){$VOzsBTUPo5->{"\x53\x55\x42\x53\x54\x52\x5f\x52\x45\x53\x55\x4c\x54"}=$v8hskKvpeR{$VOzsBTUPo5->{"\x44\x41\x54\x41\x5f\x49\x44"}};}push @$yoBNvfCyGn,$VOzsBTUPo5;}}}dwZpvdYCec($AnmzMI3HKg,"\x72\x6f\x75\x74\x65\x5f\x6c\x69\x73\x74\x2e\x74\x74",{ROUTES=>$yoBNvfCyGn,MATCH_RESULTS=>$zxnOQ9mR3i,@Rh9fw7vjzl});}sub T98L4ijCyX{my $AnmzMI3HKg=shift;my($cHgezwfV3o,$gDLIS9YoCx,$Shie5cISdz)=$AnmzMI3HKg->Dix6pSQcAZ([qw(node ip mode)]);if($Shie5cISdz eq "\x77\x6c\x61\x64\x64"){$AnmzMI3HKg->CG475xI6TK($cHgezwfV3o,$Shie5cISdz,$gDLIS9YoCx);}elsif($Shie5cISdz eq "\x77\x6c\x64\x65\x6c"){$AnmzMI3HKg->CG475xI6TK($cHgezwfV3o,$Shie5cISdz,$gDLIS9YoCx);}elsif($gDLIS9YoCx){$AnmzMI3HKg->lQmuC2Fbr5($cHgezwfV3o,$gDLIS9YoCx);}}sub LIsFtKZLUH{my $AnmzMI3HKg=shift;my($iEpJWQ1Dhg,$AuOwrfbUHV)=$AnmzMI3HKg->Dix6pSQcAZ([qw(type id)]);my($mwmbR8oZ31,$tjf2doeSsg);my $p73iKUFjpt=1;if($iEpJWQ1Dhg eq "\x73\x79\x73"){$tjf2doeSsg=$AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x53\x59\x53\x5f\x42\x41\x43\x4b\x55\x50\x5f\x44\x49\x52");$mwmbR8oZ31="\x74\x67\x7a";}elsif($iEpJWQ1Dhg eq "\x64\x62"){$tjf2doeSsg=$AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x44\x42\x5f\x42\x41\x43\x4b\x55\x50\x5f\x44\x49\x52");$mwmbR8oZ31="\x67\x7a";}else{$p73iKUFjpt=0;}$AuOwrfbUHV=~ s/\D//gs;$p73iKUFjpt=0 unless int($AuOwrfbUHV);if($p73iKUFjpt and-e "$tjf2doeSsg/$AuOwrfbUHV.$mwmbR8oZ31"){return $AnmzMI3HKg->KGOpEHCewM("$tjf2doeSsg/$AuOwrfbUHV.$mwmbR8oZ31");}else{$AnmzMI3HKg->au9SnFjUNM(404,"\x4e\x6f\x74\x20\x66\x6f\x75\x6e\x64","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x74\x65\x78\x74\x2f\x70\x6c\x61\x69\x6e","\x6e\x6f\x74\x20\x66\x6f\x75\x6e\x64");}}sub djiDUVBOMs{my $AnmzMI3HKg=shift;my($pS7f46TVdU,$U3k7Nlji0d)=$AnmzMI3HKg->Dix6pSQcAZ([qw(config_id fg)]);my $Wc4PQ9MNAB;my $cpQ8vPySMY=$AnmzMI3HKg->hWMmKQzJLr(undef,undef,$pS7f46TVdU,"\x69\x73\x5f\x61\x69");if(ref($cpQ8vPySMY)eq "\x41\x52\x52\x41\x59" and scalar(@{$cpQ8vPySMY})){$Wc4PQ9MNAB=$cpQ8vPySMY->[0]->{"\x46\x5f\x50\x41\x54\x48"};}if(-e $Wc4PQ9MNAB){my $J4rvkVyzn5=(stat($Wc4PQ9MNAB))[9];if($AnmzMI3HKg->ybrWuCUnkq(1,"\x55\x50\x44\x41\x54\x45\x20\x56\x50\x42\x58\x5f\x53\x45\x51\x55\x45\x4e\x43\x45\x53\x20\x73\x65\x74\x20\x53\x45\x43\x5f\x56\x41\x4c\x20\x3d\x20\x3f\x20\x77\x68\x65\x72\x65\x20\x53\x45\x43\x5f\x4e\x41\x4d\x45\x20\x3d\x20\x3f",1,"\x53\x41\x4e\x44\x42\x4f\x58")){my $HrBp8AonW9='';if($AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x4d\x41\x53\x54\x45\x52\x5f\x44\x53\x4e")){$HrBp8AonW9="\x4d\x41\x53\x54\x45\x52\x5f";}my $VsoQ0cN8Ip=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f".$HrBp8AonW9."\x55\x53\x45\x52");my $SWBteOquv3=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f".$HrBp8AonW9."\x50\x41\x53\x53\x57\x4f\x52\x44");if($U3k7Nlji0d or ! fork){close STDIN;close STDOUT;$AnmzMI3HKg->MPNMGFmZlT(1);unless(defined $AnmzMI3HKg->aLwxaeY9ln("zgrep -v '^INSERT INTO.*CDR.*VALUES' $Wc4PQ9MNAB | mysql -u$VsoQ0cN8Ip -p$SWBteOquv3 xvbsandbox")){$AnmzMI3HKg->ybrWuCUnkq(1,"\x55\x50\x44\x41\x54\x45\x20\x56\x50\x42\x58\x5f\x53\x45\x51\x55\x45\x4e\x43\x45\x53\x20\x73\x65\x74\x20\x53\x45\x43\x5f\x56\x41\x4c\x20\x3d\x20\x3f\x20\x77\x68\x65\x72\x65\x20\x53\x45\x43\x5f\x4e\x41\x4d\x45\x20\x3d\x20\x3f",0,"\x53\x41\x4e\x44\x42\x4f\x58");}else{$AnmzMI3HKg->ybrWuCUnkq(1,"\x55\x50\x44\x41\x54\x45\x20\x56\x50\x42\x58\x5f\x53\x45\x51\x55\x45\x4e\x43\x45\x53\x20\x73\x65\x74\x20\x53\x45\x43\x5f\x56\x41\x4c\x20\x3d\x20\x3f\x20\x77\x68\x65\x72\x65\x20\x53\x45\x43\x5f\x4e\x41\x4d\x45\x20\x3d\x20\x3f",$J4rvkVyzn5,"\x53\x41\x4e\x44\x42\x4f\x58");}exit;}}}}sub gs3t94cZg5{my $AnmzMI3HKg=shift;my $CDT87F9OQ5=$AnmzMI3HKg->aLwxaeY9ln("\x73\x75\x64\x6f\x20\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x75\x74\x69\x6c\x73\x2f\x73\x79\x73\x73\x74\x61\x74\x75\x73\x2e\x70\x6c");my $NZ5MyGOscf;if($CDT87F9OQ5=~ s/^\x24VAR1/\$NZ5MyGOscf/){eval "$CDT87F9OQ5";}unless(ref $NZ5MyGOscf eq "\x48\x41\x53\x48"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $cHgezwfV3o=$AnmzMI3HKg->Dix6pSQcAZ("\x6e\x6f\x64\x65");my $PW2obudyKw=$AnmzMI3HKg->lQmuC2Fbr5($cHgezwfV3o);unless(ref $PW2obudyKw eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $Q9P865LjK7=$AnmzMI3HKg->CG475xI6TK();unless(ref $Q9P865LjK7 eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46\x5f\x4f\x52\x49\x47"}={};$AnmzMI3HKg->S3UQckeABZ("\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x63\x6f\x6e\x74\x72\x69\x62\x2f\x2e\x78\x76\x62\x2d\x64\x65\x66\x61\x75\x6c\x74\x73","\x5f\x43\x4f\x4e\x46\x5f\x4f\x52\x49\x47");my $NOuni3NmoS=[];my $JRTyS1BIEn={};foreach my $VqWsVrJuNi(keys %{$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46\x5f\x4f\x52\x49\x47"}}){$JRTyS1BIEn->{$VqWsVrJuNi}=1;}foreach my $VqWsVrJuNi(sort keys %{$JRTyS1BIEn}){if($AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46\x5f\x4f\x52\x49\x47"}->{$VqWsVrJuNi}ne $AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{$VqWsVrJuNi}){next if $VqWsVrJuNi=~ /(asterisk_ami_secret|radius_acct_secret|db_password|db_master_password|email_password|cgi_admin_key|asr_yandex_key|asr_google_key|tts_voicefabric_key|tts_mstranslator_bingid)/;my $MGOwsKPI8f=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46\x5f\x4f\x52\x49\x47"}->{$VqWsVrJuNi};my $yXb8kVstZh=$AnmzMI3HKg->{"\x5f\x43\x4f\x4e\x46"}->{$VqWsVrJuNi};$MGOwsKPI8f=~ s#([,;])#$1 #g;$yXb8kVstZh=~ s#([,;])#$1 #g;push @$NOuni3NmoS,[uc($VqWsVrJuNi),$MGOwsKPI8f,$yXb8kVstZh];}}my $cpQ8vPySMY=$AnmzMI3HKg->hWMmKQzJLr(undef,undef,undef,"\x69\x73\x5f\x61\x69");my $ifCQmRFoJw=$AnmzMI3HKg->ZOYAUDczai("select SEC_VAL from VPBX_SEQUENCES where SEC_NAME='SANDBOX'");$ifCQmRFoJw=1;if($ifCQmRFoJw>1){$ifCQmRFoJw=$AnmzMI3HKg->ZaBlJMdYyE($ifCQmRFoJw);}dwZpvdYCec($AnmzMI3HKg,"\x73\x79\x73\x73\x74\x61\x74\x75\x73\x2e\x74\x74",{F2B_WL=>$Q9P865LjK7,F2B_CNT_WL=>scalar(@$Q9P865LjK7),F2B=>$PW2obudyKw,F2B_CNT=>scalar(@$PW2obudyKw),RAW=>$NZ5MyGOscf->{"\x52\x41\x57"},CPU=>$NZ5MyGOscf->{"\x43\x50\x55"},MEM=>$NZ5MyGOscf->{"\x4d\x45\x4d"},SWAP=>$NZ5MyGOscf->{"\x53\x57\x41\x50"},DISK=>$NZ5MyGOscf->{"\x44\x49\x53\x4b"},SYS=>$NZ5MyGOscf->{"\x53\x59\x53\x54\x45\x4d"},AST=>$NZ5MyGOscf->{"\x41\x53\x54\x45\x52\x49\x53\x4b"},NODE=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x53\x45\x52\x56\x45\x52\x5f\x49\x44"),SYS_BACKUPS=>$cpQ8vPySMY,SYS_BACKUPS_DATE=>$ifCQmRFoJw,CDIFF=>$NOuni3NmoS})}sub BDdjn7OFHT{my $AnmzMI3HKg=shift;my($tOduBXHpI9,$x9daW8UIG3,$iqbKLg85ji,$x4i9CnD5Ee)=$AnmzMI3HKg->Dix6pSQcAZ([qw(call_id start_time stop_time xvb_call_id)]);my $l4UB76ihFG='';my $sZLsY1tqJi='';my $zNvcZKdbla=$AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x54\x4d\x50\x5f\x44\x49\x52")."\x2f\x70\x63\x61\x70\x73";$tOduBXHpI9=~ s/[`\x22\x27\r\n]//gs;if(length($tOduBXHpI9)and-d $zNvcZKdbla and opendir(PCAPDIR,$zNvcZKdbla)){my @krXgZNfuDO=sort{(stat("$zNvcZKdbla/$a"))[9]<=>(stat("$zNvcZKdbla/$b"))[9]}grep(/pcap\d+$/,readdir(PCAPDIR));my $egUK9meoPD=0;my $GAgkIwxvUQ=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x41\x44\x4d\x49\x4e\x5f\x4e\x47\x52\x45\x50\x5f\x4f\x50\x54")||"\x2d\x64\x20\x61\x6e\x79\x20\x2d\x70\x20\x2d\x57\x20\x62\x79\x6c\x69\x6e\x65\x20\x2d\x74\x20\x2d\x71";$tOduBXHpI9=": $tOduBXHpI9";my %IBFchueqak;my $TawqSxdj9f=1;my @Gv8tmZ45nl;foreach my $y84JA5vNzd(@krXgZNfuDO){my $J4rvkVyzn5=(stat("$zNvcZKdbla/$y84JA5vNzd"))[9];if(($egUK9meoPD<=$x9daW8UIG3 and $J4rvkVyzn5>=$x9daW8UIG3)or($egUK9meoPD<=$iqbKLg85ji and $J4rvkVyzn5>=$iqbKLg85ji)or($egUK9meoPD>=$x9daW8UIG3 and $J4rvkVyzn5<$iqbKLg85ji)){my($Zi9hFQfDAH,$PavlS9us6r,@Q9LtgUJcVj);for(my $LdcjP2ZLGN=0;$LdcjP2ZLGN<=2;$LdcjP2ZLGN++){$PavlS9us6r="/usr/sbin/ngrep \x27$tOduBXHpI9\x27 $GAgkIwxvUQ -I $zNvcZKdbla/$y84JA5vNzd 2>&1";my @BGCB28oSFQ=`$PavlS9us6r`;my $kJ51K9ZF34=0;$Zi9hFQfDAH='';@Q9LtgUJcVj=();foreach my $dx9NY7u5di(@BGCB28oSFQ){chomp($dx9NY7u5di);$dx9NY7u5di=~ s/\.$//;if($dx9NY7u5di=~ /^U\s+\d+\/\d+\/\d+\s\d+:\d+:\d+\.\d+\s+([^\s]+)\s+->\s+([^\s]+)/){if($Zi9hFQfDAH){push @Q9LtgUJcVj,$Zi9hFQfDAH;}$Zi9hFQfDAH="\n";$dx9NY7u5di.="\n";}elsif($dx9NY7u5di=~ /^(Call-ID|I|XVB-Call-ID)(:\s*[^\x22\x27\r\n]+)/gi){if(index($tOduBXHpI9,$2)==-1){$tOduBXHpI9.="|$2";$kJ51K9ZF34=1;}if(lc($1)eq "\x69" or lc($1)eq "\x63\x61\x6c\x6c\x2d\x69\x64"){unless(exists $IBFchueqak{$2}){$IBFchueqak{$2}=$TawqSxdj9f++;if($TawqSxdj9f>11){$TawqSxdj9f=2;}}}}if($Zi9hFQfDAH){$Zi9hFQfDAH.="$dx9NY7u5di\n";}}unless($kJ51K9ZF34){push @Q9LtgUJcVj,$Zi9hFQfDAH;last;}}$sZLsY1tqJi.="#<br>\n# ".$AnmzMI3HKg->FL0TYpdWl4($PavlS9us6r)." <br>\n#<br>\n";push(@Gv8tmZ45nl,@Q9LtgUJcVj);}$egUK9meoPD=$J4rvkVyzn5;}my @cAq56E98kQ=`/sbin/ifconfig|grep "inet "`;my $wb6MP7Ih1K="\x2c";foreach my $Ir0XLghsiN(@cAq56E98kQ){chomp;$Ir0XLghsiN=~ s#.*inet\s+(addr:)?(\S+).*#$2#s;if(length($Ir0XLghsiN)){$wb6MP7Ih1K.="$Ir0XLghsiN,";}}foreach my $u9CnM8Ixij(@Gv8tmZ45nl){my $TawqSxdj9f=0;my($zrhvOu8mt4,$S0sZPNbyzV);foreach my $dx9NY7u5di(split(/\n/,$u9CnM8Ixij)){if($dx9NY7u5di=~ /^U\s+\d+\/\d+\/\d+\s\d+:\d+:\d+\.\d+\s+([^\s]+):\d+\s+->\s+([^\s]+):\d+/){($zrhvOu8mt4,$S0sZPNbyzV)=($1,$2);}else{if($dx9NY7u5di=~ /^(Call-ID|I)(:\s*[^\x22\x27\r\n]+)/gi){$TawqSxdj9f=$IBFchueqak{$2};}}}my $hhqeYNyasR="\x20";if($TawqSxdj9f==1 and index($wb6MP7Ih1K,",$zrhvOu8mt4,")>-1){$hhqeYNyasR="\t\t"}elsif($TawqSxdj9f>1 and index($wb6MP7Ih1K,",$zrhvOu8mt4,")>-1){$hhqeYNyasR="\t\t";}elsif($TawqSxdj9f>1 and index($wb6MP7Ih1K,",$S0sZPNbyzV,")>-1){$hhqeYNyasR="\t\t\t\t";}$l4UB76ihFG.="<p class=\x27pcap$TawqSxdj9f\x27>";foreach my $dx9NY7u5di(split(/\n/,$u9CnM8Ixij)){$l4UB76ihFG.=$hhqeYNyasR.$AnmzMI3HKg->FL0TYpdWl4($dx9NY7u5di)."\n";}$l4UB76ihFG.="</p>";}}dwZpvdYCec($AnmzMI3HKg,"\x73\x69\x70\x5f\x70\x63\x61\x70\x2e\x74\x74",{CMD=>$sZLsY1tqJi,DATA=>$l4UB76ihFG,XVB_CALL_ID=>$x4i9CnD5Ee});}