function compile($query)
{
global $compiledir, $datadir;
getdir($query);
$compilecommand = getcompilecommand($query);
$query['code'] = filter($query['code'], $query['language']);
wfile($query['code'], $query['src']);
if (file_exists($query['pname'])) {
unlink($query['pname']);
}
$compilecommand = "timelimit 20 " . $compilecommand;
$handle = popen($compilecommand, 'r');
$tmp['msg'] = rfile($handle);
pclose($handle);
if (file_exists($query['pname']) || $query['language'] == 3) {
$tmp['compilesucc'] = 1;
} else {
$tmp['compilesucc'] = 0;
}
echo array_encode($tmp);
}
$jobdir = "jobs/{$jobno}";
if ($jobfile['type'] != "application/zip") {
$error = "Uploaded files must be in ZIP format";
} elseif (!mkdir($jobdir)) {
$error = "Unable to create folder for job no. {$jobno}";
} elseif (!chmod($jobdir, 0770)) {
$error = "Unable to set job permissions for job no. {$jobno}.";
} elseif (!move_uploaded_file($jobfile['tmp_name'], "{$jobdir}/jobfile.zip")) {
$error = "Unable to move jobfile to {$jobdir}";
wfile("{$jobdir}/.status", "Error");
} else {
// setup job
wfile("{$jobdir}/.status", "Pending");
wfile("{$jobdir}/.description", "Name: " . $jobfile['name'] . "; ");
wfile("{$jobdir}/.htaccess", "Require user {$USER}");
wfile("jobs/.nextjob", $jobno + 1);
$message = "File <B>" . $jobfile['name'] . "</B> uploaded ok. Job <A HREF=\"#{$jobno}\">no. {$jobno}</A> queued.";
}
break;
case 1:
$error = "File exceeds server limit";
break;
case 2:
$error = "File exceeds client limit";
break;
case 3:
$error = "File only partially uploaded";
break;
case 4:
$error = "No file uploaded";
break;
cli_beep();
sleep(1);
cli_beep();
}
$log = "#transaction";
if ($sudden_mode == 1) {
$log = "#suddenmode";
}
if ($balancing == 1) {
$log = "#unbalancing";
}
$infodata = get_infodataf($fake);
$info = get_infodata($infodata, $fake);
$wallet_amount = "[btc:" . round($info["btc_balance"], 4) . "/usd:" . round($info["usd_balance"], 2) . "]";
$line = "\$" . $transa["type"] . " " . $wallet_amount . " @ \$" . $transa["price"] . " (" . $transa["prem"] . ") {$log}";
wfile($lastfile_clean, $line);
if ($balancing != 1) {
if ($enable_tweet) {
tweet($tmhOAuth, $line . " {$twitter_users}");
}
if ($wall == 1) {
wfilew($lastfile, $transa["type"] . "," . $wallet_amount . "," . $transa["price"] . "," . $transa["datetime"] . "," . $transa["prem"] . ",{$log},\r\n");
} else {
wfilew($lastfile, $transa["type"] . "," . $wallet_amount . "," . $transa["price"] . "," . $transa["datetime"] . "," . $transa["prem"] . ",{$log},\r\n");
}
$dt = date("Y-m-d H:i:s");
if ($fake == true and $paper == false) {
$dt = $ticker["datetime"];
}
$hora_new = date("i");
$pre = $transa["prem"];
