<?php

require_once('../mitsql.cfg.php');
require_once('mitsql.lib.php');
require_once('proc.lib.php');

require_once('batch.inc.php');

$Login = new Login($i_u, $i_p);
if (!$Login->canLogin()) die('-1');

$User = new User($Login->getUserID());
$myUsername = $User->getUsername();

if (substr($i_d,0,strlen($myUsername)+1) == $myUsername.DELIMETER) {
	$i_d = explode(DELIMETER, $i_d);
	array_shift($i_d);
	$i_d = implode(DELIMETER, $i_d);
}

list($msg1, $err1) = proc::newdb($User, $i_d);
if (!empty($err1)) die('-3,'.implode(' ',$err1));
if (empty($err1)) die('0,'.$i_d);

?>