|
Menu |
|
|
Home |
| |
|
Discussions |
| |
|
Tools |
| |
|
Affiliates |
| |
|
Content |
| |
|
Info |
| | |
|
|
|
|
|
User Info |
|
Membership:
Latest: MichaelSnaRe
New Today: 0
New Yesterday: 0
Overall: 9144
People Online:
Visitors: 44
Members: 0
Total: 44
|
|
|
|
|
|
Full disclosure |
|
|
|
|
|
|
|
|
|
IT Security and Insecurity Portal |
|
|
Help my decode php files |
|
Posted: Wed Aug 04, 2010 12:31 pm |
|
|
petrme12 |
Beginner |
|
|
Joined: Aug 04, 2010 |
Posts: 2 |
|
|
|
|
|
|
|
<?php //0035e
if(!extension_loaded('ionCube Loader')){$__oc=strtolower(substr(php_uname(),0,3));$__ln='/ioncube/ioncube_loader_'.$__oc.'_'.substr(phpversion(),0,3).(($__oc=='win')?'.dll':'.so');$__oid=$__id=realpath(ini_get('extension_dir'));$__here=dirname(__FILE__);if(strlen($__id)>1&&$__id[1]==':'){$__id=str_replace('\\','/',substr($__id,2));$__here=str_replace('\\','/',substr($__here,2));}$__rd=str_repeat('/..',substr_count($__id,'/')).$__here.'/';$__i=strlen($__rd);while($__i--){if($__rd[$__i]=='/'){$__lp=substr($__rd,0,$__i).$__ln;if(file_exists($__oid.$__lp)){$__ln=$__lp;break;}}}@dl($__ln);}else{die('The file '.__FILE__." is corrupted.\n");}if(function_exists('_il_exec')){return _il_exec();}echo('Site error: the file <b>'.__FILE__.'</b> requires the ionCube PHP Loader '.basename($__ln).' to be installed by the site administrator.');exit(199);
?>
4+oV57exXpPXk7ivSkOI5QpZJoTPO2r5FXBRwPAsoKuK7ZgPnqkCEMTQuU9dFYXw98gK/IhiizVd
2bI5gCe9mIAHejcpMAtWqC+NFVUEBkhLN3iE0Io1SKUZEsDM6moL3ijwpiHJWT4ztvbjN3EU7U9I
qyH/q4JuNnAnFiwysZAZexW1X49iV1XlY4Ed2U230XIwladGNcfgU0xqIIrhrZIovIHvN+YMaAtI
5bVZPQbRgzK6txWplphmKmlZBs2I9q/EMNJnvr0mPVLsZfmx850VVTIBP0AM9L8sVeLVbD0CeW7n
SlGJU5dQrhjrFIsmjQ0nQIQM8TGHKC/GosdqARAHdDru1g+UOk4M2Nnip/Sn3ilgQ8A+jEvdH9ea
lqD+qANyfvoQmmq83Q2PfXaP8M7HD1kcgnyCdkw0CgHxO9Zh/tm+N990+8EdCLAaOK40oUacCNW6
KSuqbfkqcU/gBinuvIRhumlxHC3xojGsVRqInNgRUpjWVd6+569myR0dkU8pLbOed26ft0SAc/Xj
osuwuVgLRrEC2/nGO1pHjLB8zo6hozQnq4VHGVJa0a2s4FHNy2jsjsoq20unNrKtAb+FNnZdOF2M
On5Rp5wmEVLm6zArVnjQ3e5wagDD2X3ti2V1+Q8XSH52/wfmcc/XxAU2gRwMsXKOk/LVnkZyZdSf
h9d6nAL5XjrzJpyf6CxwezZ9SIH9nxW9lPtGga/t/IeXNGZqRICabCmY2/3aGuKm3tUep5P0zJLC
q5E5S8nDCxrdSS/jGJ9tAiaUMjKkdAt/s+YDL9yAOMBHc4HHL/WoXzerTSY3dGGR9DdgwWbnMWI9
a2W01Kvy/uqZaQVcA0iaTD0C/VOCQNU/LukuoOnJbw59RNUEQR4+xIn4C8advovoGTeoXh9JFQ3u
istRppPSPSljWHH/72dJmtcghtlFlctuqjZGsg5yUid41mQsWj9T4eSxOQImwDNPTUSfkoG3Yvu9
x6k+Rrt/miNWYj7XMUPWOi0adHGq87OlLf6NswvSl0VQzQyKyVdZjQr+op67iuUi8QOIQV+PbuxM
StK8cABflOMin30CdumRh+kbG4Z/9GTKnSpL07uajoG9MOJ7BcPZH5vWO7Z1S1Nu61vZZCaEPfv+
r3JWWiOJzNOHjYaTVtz7mQvkZrs2OT15TJJdwWMNitchlOb86LpJg0+VhWEs0eOzyPoDj0vP5Wdj
vIK0Vwf0Ba26Nb8PyIUo2xx9DRFA3OsWNKWDuoUIlunhfbIY0iYGlcWVpoLrV4YxpihAT6DYsDol
pPX91CCYnmXjOgxSvVCiXRDZ1hATgKQIN+Mh7VlQzDew2ulGoOMtr473dBHHTbUrdAl4bhlSnj4n
JG8BeNET3y5cZhpJ90np8RpSV8cHfPEkCQyKeeaRtDYqdObI/U5mm6fMga97XeWXcyjho5l3J4/u
17zx5kEk5yDf77BpPShMixRo59Sj23Zh48TQZpFHS8zwutyYwVs0HzvKjazUVA84EOmIgvnUtEOu
DGAuYwDxSsKnN/elcheVEixxn0KEPw5o2KRJZPvYGc/J5Ci+axno6fJcLmmb2YLU1tx9/64Q8ZJp
64iPt0eWN3bG591IKP5szZH8TKwj0FG6z+aOkSKQXxqwfdN4FJWhu4a/HKgmPvRfqD+gGaHC2C0E
yXxfpC5a0jf7/qk60idF/6DK1L/zGpiY/Fqs/iZGugaWPcg1wW3S2MJRLyGWNt67lXk8+o0K6h8s
kln8g7BBdUfB6NZkoyAsh71h4HVNFzhH82yBAGg7Vnt+0F8HfNwS8wAuWYds0R+u5AdSmmHgyPio
C1a/btVj8uZ2Q8ekcCQ1Ge6DSfgx3sfL6yvxxviC6XmNrF6pMiqd1N3NZENNTWIZ2jcRk1dI62F1
95aOfwakcr0jvFpzJfqWqVueL67cydWQ2uIHKFEFQ8UC5EMX7BRlA+w4yOuEN9pRBMpaxBqCkfY+
qnk6p0jn+Hguj/gxmCcKQjmTHhSgLGdqFR++xAJkTXtPpVjzgMxnosscThS6G/bWAs/DJ5G7qWRe
Rhe4ApZAYxFZMQxF+14kB95bO0cmTFs0gRLNJvzqG9Iz3pG4Il45TbSZUcpV4hRHUxp6awc2Vs9u
ZQbNXRjTwKUqovEkxIeXiQXdRTIWdknEG59qYiEcaA6MMq0gsTByQ7ARMQNJSAH7Wq4XQUiboSM9
/UyG17fguVBa7xIFYU114AZzcZgQbQA3chzoBqqIJ9AA2j0wkXWpCBEuoRZ2jYvoyjc7wC0faLZu
OzE1V2v2DwvVL3eBQC7XOg93+k0wS/DKpKAB1h59XZK9KRk23P9l68uad0qT//Tpzlm7dOxSMWqh
WpO7ab3RpQm6hSRA3HhsnWiiB25YNho8nedGKLq4btE+OrQv++Y3setm0WNNFTS2qeA04hF33fIV
YhcYJ4bgBmIEDMO26DkXRVPoH5Zu2MBnK0IfhZEIjbNaNo0lTlHp5WCcOrhuj3TaiJNMyj4JkDo6
BkMqvTpcFyLBTRHoTK87nRv4/3ims30uFbkP6GyC9ravF/89O4JK1dn47lM1Pbg0ZCpO8PY2OabF
5PG30uMLYQX/fW1h3Ki1MtY4ICNB/YhLYgTIqWfJw59CEEEB82rtCAG3aF+W/3rE0kxPeSMss4ni
l+kopP9V3Igakj0GZMxVW2XSGb+Eu5xjt2WrSAaQioUn22STD16gd6jXcd+AxBD71U9HCUE44dwW
/vRl/YDCMm88cGD80xI3q6/6FWPtWn0q0gD/PwbtwVZm4XFiVUAY0JqqOvUHj2udxyRLt9Wq35Z5
95F1RG9KyLj5NOpgZWO2y+VtmakjY0Y/DJHfLUN7Zca4TUhXCwH7MZFL+E2GDriI0NpX52zDerkA
d3dbWL1xuWJV/Shdz+O+ju46fzjy4G7u7q+26RNv9frgWl0lb4CntBaJhwiEH3hNoE46zbuf+DQZ
xz0x0vPA6wYzcngej+e5kIZfvhMpe6bxnhU4NE5BGtVzr1f6suIK72yvqk/dLvrkJWS66uU50JB7
qCKYSwyUgdIH21IscR+vXJHsY2iiVl7d33gxHC7syda/OMMyUtzOfRWCvrMSMBLksYaJtyDv/zCv
1B8fdooPeTvbefxRLO1SVV+oUevPWN+jxC7USNZ74pSMkbXR66A+cKrZDxOLS1Ujg/gcSfleaYkm
331nTa9XI6nqtK3984AedvxIUPwvuTr6SHCPIKspSs3qUK3Obl8vNLk3udO78HWzQXY/9fP/7JQz
0xDKip08oOFAvg8lj/LeGiFbfwpb+aXmuRufjHA/u/MYc8g4QvzriwsttRGfMtIgVGLUyEAT1mr8
HzeC5LZUZgm+SqeIj7NpYTOIzvQ639yDTBrUhFm5b0uufqPw7xhiQNiOG2Uxkdo/N7sQD8Y2Aozx
ctkDzuSh0xUEY4GKiYeSNfhYPWcoxSS0lgd7FjMU5KnOZvYM+jjAQ/vTVCG4cnD3PZ2eLgZb1/1S
YfeqU8TPQ2XZ/LamHsQX6QOuhRUMv++I1EKwH6WEe8/r4nWFeFWYILW0+TuIKw9eQ8+8loVO/zaC
jphG2IOZYVN1ZchAEDjx1kq1vLPk7uQlKVBwIhoyMHKBqDBJlytKWsJ1aZfDwkV8kk/0DKxSHmpY
dfSWP4WalE7D9/2rPNjUoiELXzts8LEwOb0FcChsa+Lvmm58Bi8E9U9x8G+vhnS0MrrwDEHnDLio
/6MorCIdn2eOEA845QLDfglaX6/AxT2tzUTBXxh4lvjgu4bnWKxB+VqxKmfq2DesDJ1Q3WRJ+zei
XoBv8ZDzymh2+2wL+bjwbWVK9Z8H+cqSzD3A1kUC8Rd+XL7V3/5WevTxI/BYbjq8oUCkj9Jrqc0e
zoX/0No6YYcQ7WlfPv2DAinwzWnvsikZI/xUctRzcuQLoNl1w1i1ONpTAd1KrH278B5IDzjZ72Zr
l5WiMfvTQ9nmi37yO/QKWmkAV9dqedNga/UJ1qfvZ5OkdXedrIkgf9DRHTcSx4U0Q2GG2dIay5UM
Bm9RigBHtB545LDEhYltD+7MNFsuTQqhX/qv6BKHjvhV1gO9Whm2uB0Q2PaIIo9yqbzi5E4eDvqE
f9aR+t0HW5fTg+CghVRDQ6vA3u4NzZ3/sZKeIRZbjJhZRMh6WAO4Cj29p1L+2aaKcVs6+OSoox55
X2REvMPm4OXKzb01Le7TtY1yWMG9cxk87QNjTc4/xLdUQug4uxt/oMXakZZcVMrU8GINwuSrOxg8
xpG/n4Qny5USBi7VqLmPa8GEvwPWVYd1ptkBMtsyn+3uNJDgrydUL76IzXfs/mOV3d/ZZsDkdMZK
Wx8A4ETl8vNImGu85IxLKrpb1cbXVuyXTHY6Y0px3t2mmCRKIdaRA0HS0A6gbdN03OjtCZcOQ+06
jcK7dVSbsg3+pYWnMEeZPcY8bRL5kt5/K10aYt2D7y+KAQuFDHvIRt0p/UJPauDjBO3cPoOVBvai
lm12vMdw2MxwlMkgfxfGcE604PblBZqsElHlpBIV6z32jeSOVCxGviYu9VhFz99hTTQDWmQMWVbc
RVSrXYF/DJ+fAeH1X8j6oXNnuWVsh9CF3A3ajk446i/BT+C/GyddL7IrIUX1P4i1TCafCkwhk9ae
ACzrbjPTqqfdTlhdm8Dyr2OTaCtztbs1w9+hiqAY9nehh372WGERZSVuSRsOnBHcJgODHCMQ8rNf
9Jy7aaWoDoe4JZz4RPy7/ikAiZEnxKyxivrZEIFCGAJGzlK0J2U4Mq+Ot4xpsLREPohkK3+bHj85
Wcc0VITaiAa5xdNSXgOrm9pyGGafMlMC/06p0THp/mnIe3B2Jc+DDfcB/RLAUc/1ao5v9vqHgd3o
1TOZKnESfdbVHHbg1+jOui/7d7Xn2XJrkkN9ee0jCBGp/ydXGVOj3Vl4DObzrimItjXxQADs98bu
XLMmBooLAXg46WEt9EeFQKTZHMAG2gDQ7SD4bwtROOUJvqh31a7wdnFZfsStXMpBWhRyNSXzW7V7
+Eq4az2NGQw8420rq5aUPmjWYAkeWN9dYT2LTRQrrFQ4HO53opLRCW9IJOjke1KV4HTmWIE4Kjr3
jfcPGGpbmOdBvHSk4qFswDYHQO7Q4/EiNdLzX2Jy1iEy9D/k+N1Y4G/EHxGdtbaxyk39WNSQ9zQW
X1Z/KHz+5zIEh8OdBxRAyXyX8LPFunLVpJIcLOPpjdmAy7ZAYOXZgIAdm/tX6M1TmIJC2mqDPTea
cTtUUW1D7pXEFKGkIEOHqk7Bo3lM/7NCh7bcrpM499HLgH4aDIEJWa9PMe5St319Gp37D6m+xyjN
366PUwsfo4p/rS515reL3hkEZ3256Mq2vUH1YksyUjY1SN3kAcgjnljGpGYjn4tNBVWVwQrDqrGR
G10RHVQTYdSsLp7XXntd2U14Ea2JWG1Yxm8SOJVYxi8TtYun/ZaYouKcKSRBFSe2QWt5iopvUTmn
/tl898rlATcvLZv9G+ia00YyzPAv9UUbUCQNgn4D0mBJ5OEhDw1+9Bp3Zqpfq55iqvkVY+XBbngD
7U7PEF9AQtNWV1zbRcQnzbXsDpyeHt+cI4hXycTVuq9hVk6nSZy5cMo36hl20Sl2eBpGJbjOwY2w
aobzZJ5q4we8GGvIJedJXns5RQpbfml+u7YlrfIrcFrZ/3k2K/m03u1xFi6sNY6Vof8xI8rrJAqU
xheD77VYlVz1cJPWKUd4211OS2SQLvRF3JVwb/LbMwAZ5pMkAoogsq27DVdvTZd3e1jTSXctXdXT
z3YgWllwc5MSb1bp9Z82of0lvKHoS+PMfvijUie64gC11U9QuFJeTPQr+yaK5Lz19a8xlc+okhL6
4uCr1TitFhXF/mpGRL3Bzxelg5ocvlp10SamOQCj20khGq4X1LbKfvbCeW4C9KkI+NzCQQTuqxdk
wgiY0EUzAYaAQeO7QzdegJjgoMYqCjwcW7A0ba1Oe2QkmOiwJG8NcGs54++fnF53t/2atDefIZJp
3ewH+eNezQNi/eWYB+zjqTHOYNPcKlB7I/JmPcE4ok2LIfV+XpIzsSKSC3CVAiV3f7EbT34gvwDC
UiZFbF8vf3zYOihrHfkmfExjeG2T59XFsQ9vOpK6kTSaQ6lBFfFpqAd5kt/xgIdtrcJ2cr1/JRvx
HwaL8ZUomfZ+X3IJsSXbfqvkr1CN0l+3l9Dh7Iv2XAo6SKDMBNB/FmVJAUD/057ErQ8paFzIqjBL
6D/n4Uoqno/5sMBVmP5sdojaFi0TDAWREFmVovB0DOLCx5Z9pqrtL21Yg/ua0P9eZb912YFkvpHo
ICJYW7HwT3Uwv3VE9DlyddB0PkhFFpuFhl6QXCSKZwdpc1min4BrY8EfB3qGjPqVU/ubMt/gEE9S
OTr78ngMPuge5R3odcD+9lis280CD4AV0SKNXMuxOugk0bqdoCdUXh2j++8pwQbubBEoFr3WB8IG
NvaM6dcLRh/gVDm9uSKbxDoYjcQt+rA+3QVkf+Wb22wwI6do8F1Vcj3uYmB4S/VtiWlfNKmf6Dhh
l5r4rYuMvu3D3lyn2iEjyiC9o8stg6C4gSPdRl5ly0ruVs7M10A7CeMJv1VKftVDXWhN3tYz2cNr
Al/prm9561m56htEiinjS1OxhsvxuYAlcslSKbN3BQFbgIjd5JHuE9Hf2H1qPQCrdXSD5VO+GrYK
/BOXlX1nAnYlj2VI/BQfhyGiqYEn8PkQV5UR/NPEoSUYfSbhanaP3hFqjSN/LW0I5MO++C/SFrtt
5GMjIAyd7GFKlMHZ5SA489nb0M09wpsw/gfby0EwA/bnx9hiGKxNsDhkocV8O/kNrQRwBZA2vv6T
RYsZLU33HjWejDlaatspR/YTZ6+FeyA0fqv6qMlterEAWgtflpji/nvQjS1F5M7RiSINCDK7/TI9
eJyhppx3gWT8i+tzAnggZdzrmaY3Q9hJDlFHjrzYwIY5uuRZUCRDAeawd90zScbRd5aZbo44oedl
DUKaWwzZSLAaDNoeWB3vN1f6VbeNXYwgbDc23PjtPHRf/KOE9Q2WBrIbMapuzqns+h4jOrIdMxEC
MqPFwa33QIsUaeiEC18ZiSo2TIu6Uw5dmJktZ381LJVXuKOHTVaMxdeHgl3MTMBmbl3VxQd07WMU
G6lE9WqfQ3C99XE9/6xqtwcFpcjf8F8OLnGH6XjxXBeF+zYewPiqbPbxnXCVyEcsrTTw7/tn5+XQ
xy3A7aWS6h36JHy2BaEVur6B5a6D+8cTUm1CrlGVzp1wEI1RmK5EKAVoDez0ioY8q4zlXa01UTt4
YGaHMLJn/2n5bVyS8VTeJ//k+uPhnOCqSm39uE+W6FlzLnhrOG4KgKTHaHdgV04WBIiK2AH18G0q
eCUfT5Nw8mPfSM/fHh+zdY4ELL90HfcDzzmgK5Y81ZOCkd4Xxibqr1u1qf590N23futCRkDKji0i
tR/0joqAm/qWSEG2RZuvO09G6hsqw+NyIWh3RQLnd8DouixfEnr1LQKGw43itiumMWysTauDU+X0
efCrOfFIc2R++5KE4x4JEb40ftfGxGTFs+ZSRf+nEGBSdCIJvkxm7bV2Nda8DV+yJT57TzSRPj39
L1KmRVeByZ7SQo930tLc3pz4G0Zkw4BMxBRYUA3yl05W/WlByt42mJLv/WZtGpLoQt1gkup7BcXq
Rv6SLHWPO9baA+DMEzbWmrCic0oEZl+5xvM57HyTXZ+yOCRfWS4rQ/26EfOxawska+2eHVbvyBck
pGA3XDbybAoKIV8upnk5kNwDHMgwDDdkAal0jQx+cMHirxfMRzQ6J8NWlw+YygGBtpKgfLF/+SNo
gfJ89dyudkXftCxpLfxMDKJE/V8K8WZcS/UKkUJsAjdmiLYS9gW+LiCdOFc54YYZnE2m2cgJdFgv
he3GDhUutD+lP3Tr39LC6H15WgnKhldR8VKgZ9Fq5Oy8gPercI9NulIozSBoKzjOH1WZRnZunOuk
ifOEXe/0o0i9lxx2fNjqBgZftM7WDehQZgVTzpeHxaju7AetCHerepX4NQr5vOj9h4gEsG6HNbny
AZh1kwEzUfL7C1uR/befc4TN43/aPEfjOnU/1jLumZBOm5U53o5wOUTlwrodnfdRrbVg815yzV0S
s4aPJ4vS4LwSCha1KKelZvFdxOSlN8C0X2LD6xdNCUZf4mALq4iSYih3Y0MdUrIh45vALtVw/myj
P2SN9f3jvdW1/N2HuuIa6y62DTfv7oVP/8+B4FlPhm27jjNc3AWSvUrgHLBmhMU1p3a1kmCFKfMp
jFNdsvat/ngN88U3W/PAxss1FpVTefh3IVPTwBDkY5fF+YEf3jERmFFTpIYjFaX0CDibUfqwYHnz
OIv2+bMikMKsDA+6YY9DcdXCDvWjVJFujeg5/dhli3Ei0tNHuDuFcCiO+vszNtimiDYmnTGwsllm
1Pj3hLFLzM1Ytq9qz39ie6ezmIA+MzeVuKxWJ7FoFXweYk6aezmKE/fvHFFk1SdioZMwayjFxOMN
q5oOI8v/wZGBz7Ezg0KAihrGV0qB1tqS9/jffdNmu9jXZ2xrkWYIPPS4aHrTCvAsynaUOLrxgGEf
WJ0q0THYp7LQ0/DY/DP91mb9RFlvP0uZ+u6I7F/lzgSPsY/4z8J0XTjcLdpO3BRRTPwvBU3CDaOf
BFKYbVgIzgtGUP2vFx2zW21mnErB3XsOVD/nKHgyf2vxtXNRSabF63CgFaASTPLCrTkV2k0JCuHV
N7rf+k/CyX/TiP/w0pLRa9UuX8kyMU0FLQhCmF5wdCLU5lA9Eu+XoXsq/JxOWOhonczclYFE6c52
rB4kWfpXRCn2i5ju1VRgI2UMVycQGEwf8jacVMOho2qIioAYjDLs1qky5wbj77Cw/vq55bXZ9P99
FZBLzGXCoCti8quM3M8/0SBZ4pyoaw+EgOHNRyWCv95MVhzxNcQuDPH0Hx3ghz4Bpf6YjWVIL3i5
X/j51JAJEtXM8Cli12vzBbnxFlfO9SXjMtKnCCLy3TDz/7vKB+JYnwxGQZJPb+oPWGv7ef5mTQRK
p8s9tK0VMfj17qobkp8bzyGQUmgLZSK+WZjAi7tp+/JJcSIrfIzlkY3HBZMqgDtjmNwzOZUQgw5y
FNIUx/im1ULKPcoojJ2X1nB8/kfIcuLAFtUzfqOEr0VKCj/uM7Lw5hTt+XteCDsZ3a3ador/wEZZ
vzVYAs9eVZFVcc7BhVQtSARLiQgldaibCzb5p1gXkkFYQ47XadCqKIC5s8HLx+lBjSYOUS+Hd6DH
OYUzEgtLbr89gNJYZW/u2/DAuaKVNRDXNAWzvMjCcKC7Qw4pFSYSXeEK1LUdB0xESNQ2BbbkGhQ2
bHn9SwVEuZ59RpI6d+1tGyGuY1ocQZW1z2iczS/GpYJ+6nZ3UHXaKVrX7FrHs2QGo85LCBSO0PPJ
/ndHgIQwaTV6NlXltdCVH++5q5EVNmNZIZyA237uUTH5O6PH4PdH6zIV4i72yyrSFh7Cl6KFvHqP
1j4h6biSFxoo4qbJf2obXFD5s2zkDqOHPmAbJib8uyFzDDhntxoTxdMYDtrBx86q/bIWhimim1c1
r84q9CSMOzwTpnB+tqV19SxqbHy4LxvKogxEHKiSlI2ADaH9IgvnZSA3qfjKZucN5I/fqyqBKrKt
VfE7/HOHB8d52K77gMI/gc/7GSVShVg/zjGSL8rs0E2b/3gKrg/NxgrizUgGlwiARYU1L/NgvliH
kdtsneW2N8OasgESEj5vDbxWI8d0I1xYPeTE/hKEFVilPEEJ+b0JjtqS2dr0DKRRNeVKZ0Y8VscU
2k++MsPjbFGNcFlnsC3PCzOEzUO10AAycw2vnM+8rca60GGbxTtcNIHVpSYmEAFXmVZxsj4aCCtt
xgH6qXsQpCQIsdNGkvJiegy9GhW0gNnJcJ+iiFL0kfp822esZIQvBIKinSF5wnDImlnrLd0DZXxZ
2ZvQaPKM+RWgmURM1y6yX4U1jxWKNZjuqP6Scdur14wjAFnEDbAKd0gh02Lpdwbc1stNpw642AL+
Cd/Aq4t6a1jBGqYcGttIa290PJMmV+Set3YhNsKg38I/H36fVCCMuYSrtcPq1/re0CNJFa8kQYJK
LrLAugtyZAj91fNGYMNQR7JSNCxqIGTfv4dcqkSFm100Wl9TXZsy5iEuvd7lCzU3qg1ZLtGDvKhb
zFcxyKgCgjXG05n+rqBXGXpIV9QsFQUEggC/cl4Lp9Qu6vCfNL8lNolV8cOKrD7o7PSgOzpQu+C8
5Zy3kJ5DcSYDg+hkVxHeiGl1mFAvBAIFPN3+yy6FMOYS+jgLtuPE11PqrufY6Gs9MLJmVLCLBjHX
Z+g/Z2dohr2qtcG= |
|
|
|
|
|
|
|
|
Posted: Thu Jul 26, 2012 11:52 am |
|
|
demon |
Moderator |
|
|
Joined: Sep 22, 2010 |
Posts: 485 |
|
|
|
|
|
|
|
Code: | <?php
function round_up( $value, $places = 0 )
{
if ( $places < 0 )
{
$places = 0;
}
$mult = pow( 10, $places );
return ceil( $value * $mult ) / $mult;
}
function round_out( $value, $places = 0 )
{
if ( $places < 0 )
{
$places = 0;
}
$mult = pow( 10, $places );
return ( 0 <= $value ? ceil( $value * $mult ) : floor( $value * $mult ) ) / $mult;
}
function billing( $costpermin, $billsec, $billsecstart, $billsecnext, $discount )
{
if ( 0 < $costpermin )
{
if ( $billsec <= $billsecstart )
{
$cost = ceil( $billsec / $billsecstart ) * ( $costpermin / ( 60 / $billsecstart ) );
}
else
{
$coststart = ceil( $billsecstart / $billsecstart ) * ( $costpermin / ( 60 / $billsecstart ) );
$costnext = ceil( ( $billsec - $billsecstart ) / $billsecnext ) * ( $costpermin / ( 60 / $billsecnext ) );
$cost = $coststart + $costnext;
}
}
else
{
$cost = 0;
}
$xcost = round_up( $cost, 2 );
return $xcost;
}
include( "./_conf.php" );
include( "./_fn.php" );
$q = "select c.calldate, c.clid, c.src, c.dst, c.dcontext, c.duration, c.billsec, c.disposition, c.amaflags, c.accountcode, c.userfield from cdr c where c.proc=0";
if ( !( $cdr = mysql_query( $q ) ) )
{
exit( "ERR: ".mysql_error( ) );
}
while ( $l = mysql_fetch_array( $cdr, MYSQL_ASSOC ) )
{
if ( substr( rtrim( ltrim( $l['dst'] ) ), 0, 2 ) == "00" )
{
$dst = substr( rtrim( ltrim( $l['dst'] ) ), 0, 13 );
}
else
{
$dst = "00420".substr( rtrim( ltrim( $l['dst'] ) ), 0, 9 );
}
$xsrc = str_replace( "+", "00", $l['src'] );
if ( substr( rtrim( ltrim( $xsrc ) ), 0, 2 ) == "00" )
{
$src = substr( rtrim( ltrim( $xsrc ) ), 0, 13 );
}
else
{
$src = "00420".substr( rtrim( ltrim( $xsrc ) ), 0, 9 );
}
unset( $line );
$q = "select acode as tarif, iduser from line where idmsn='".$l['accountcode']."'";
$line = query( $q );
$q = "select msn from msn where concat(intcode,msn)='".substr( $dst, 2 )."'";
$localmsn = query( $q );
print_r( $localmsn );
echo "\n\n";
unset( $qcost );
$q = "select u.iduser, ".$l['duration']." as dursec, ".$l['billsec']." as billsec, p.cost as costpermin, p.cost_low as costperminlow, p.billsecstart, p.billsecnext, p.acode, u.dph from user u, line s, pricelist p where u.iduser=s.iduser and s.idmsn='".$l['accountcode']."' and s.acode=p.acode and s.acode='".$line['tarif']."' and u.currency=p.currency and right(left('".$dst."',CHAR_LENGTH(p.ccode)+2),CHAR_LENGTH(p.ccode)) like concat(p.ccode,'%') order by p.ccode desc limit 1";
$qcost = query( $q );
if ( $localmsn['msn'] )
{
echo ">>>>>>>> lokalni volani\n";
$qcost[iduser] = $qcost[iduser];
$qcost[dursec] = $qcost[dursec];
$qcost[billsec] = $qcost[billsec];
$qcost[costpermin] = 0;
$qcost[costperminlow] = 0;
$qcost[billsecstart] = $qcost[billsecstart];
$qcost[billsecnext] = $qcost[billsecnext];
$qcost[acode] = $qcost[acode];
$qcost[dph] = $qcost[dph];
}
unset( $user );
$q = "select iduser, credit, discount, currency, prepaid from user where iduser='".$line['iduser']."' ";
$user = query( $q );
print_r( $user );
echo "\n";
unset( $dstuser );
$q = "select u.iduser, u.credit, u.discount, u.currency, u.prepaid from user u, line s where s.iduser=u.iduser and '".$l['dst']."' like s.idmsn ";
$dstuser = query( $q );
if ( !$user['iduser'] )
{
$iduser = $dstuser['iduser'];
$cost = 0;
}
else
{
$iduser = $user['iduser'];
if ( strstr( $l['userfield'], "lowtarif" ) )
{
echo ">>>>>>>> nizky tarif\n";
if ( strstr( $l['userfield'], "ENUM" ) )
{
echo ">>>>>>>> ENUM\n";
$cost = billing( $qcost['costperminlow'], $qcost['billsec'], $qcost['billsecstart'], $qcost['billsecnext'], $user['discount'] );
}
else
{
echo ">>>>>>>> JTS\n";
$cost = billing( $qcost['costperminlow'], $qcost['billsec'], $qcost['billsecstart'], $qcost['billsecnext'], $user['discount'] );
echo ">>>>>>>> vysoky tarif\n";
}
}
else if ( strstr( $l['userfield'], "ENUM" ) )
{
echo ">>>>>>>> ENUM\n";
$cost = billing( $qcost['costpermin'], $qcost['billsec'], $qcost['billsecstart'], $qcost['billsecnext'], $user['discount'] );
}
else
{
echo ">>>>>>>> JTS\n";
$cost = billing( $qcost['costpermin'], $qcost['billsec'], $qcost['billsecstart'], $qcost['billsecnext'], $user['discount'] );
}
}
if ( $user['iduser'] || $dstuser['iduser'] )
{
if ( !$qcost['dph'] )
{
$qcost['dph'] = "1.19";
}
unset( $dcost );
$cost = number_format( $cost, 2, ".", "" );
$dcost = number_format( $cost * $qcost['dph'], 2, ".", "" );
if ( $user['prepaid'] == 1 )
{
echo ">>>>>>>> PREPAID\n";
$q = "update user set credit=credit-".$dcost." where iduser='".$user['iduser']."'";
if ( !( $r = mysql_query( $q ) ) )
{
exit( "ERR: {$q} :".mysql_error( )."\n" );
}
}
else
{
echo ">>>>>>>> POSTPAID\n";
}
$q = "replace billing (idmsn,src,dst,clid,dursec,billsec,price,dph,datetime,disposition,billsecstart,billsecnext,acode) values ('".$l['accountcode']."','".$l['src']."','".$l['dst']."','".$l['clid']."',".$l['duration'].",".$l['billsec'].",".$cost.",'".$qcost['dph']."','".$l['calldate']."','".$l['disposition']."','".$qcost['billsecstart']."','".$qcost['billsecnext']."','".$qcost['acode']."')";
if ( !( $r = mysql_query( $q ) ) )
{
exit( "ERR: {$q} :".mysql_error( )."\n" );
}
}
if ( $user['iduser'] || $dstuser['iduser'] )
{
$q = "update cdr set proc=1 where src='".$l['src']."' and dst='".$l['dst']."' and calldate='".$l['calldate']."'";
if ( !( $r = mysql_query( $q ) ) )
{
exit( "ERR: {$q} :".mysql_error( )."\n" );
}
}
else
{
$q = "update cdr set proc=-1 where src='".$l['src']."' and dst='".$l['dst']."' and calldate='".$l['calldate']."'";
if ( !( $r = mysql_query( $q ) ) )
{
exit( "ERR: {$q} :".mysql_error( )."\n" );
}
}
echo "--------------------------------------------------\n";
}
echo "DONE - ".date( "r" )."\n";
echo "*************************************************************************\n";
?>
|
|
|
|
|
|
|
www.waraxe.us Forum Index -> PHP script decode requests
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
All times are GMT
Page 1 of 1
|
|
|
Powered by phpBB © 2001-2008 phpBB Group
|
|
|
|
|
|