[sql-web.git] / batch / create_db.php

<?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);

?>
Commit	Line	Data
2f91d7fe JP	1	<?php
	2
	3	require_once('../mitsql.cfg.php');
	4	require_once('mitsql.lib.php');
	5	require_once('proc.lib.php');
	6
	7	require_once('batch.inc.php');
	8
	9	$Login = new Login($i_u, $i_p);
	10	if (!$Login->canLogin()) die('-1');
	11
	12	$User = new User($Login->getUserID());
	13	$myUsername = $User->getUsername();
	14
	15	if (substr($i_d,0,strlen($myUsername)+1) == $myUsername.DELIMETER) {
	16	$i_d = explode(DELIMETER, $i_d);
	17	array_shift($i_d);
	18	$i_d = implode(DELIMETER, $i_d);
	19	}
	20
	21	list($msg1, $err1) = proc::newdb($User, $i_d);
69e08b46 JP	22	if (!empty($err1)) die('-3,'.implode(' ',$err1));
69e08b46 JP	23	if (empty($err1)) die('0,'.$i_d);
2f91d7fe JP	24
2f91d7fe JP	25	?>