6 require_once('mitsql.cfg.php');
7 require_once('mitsql.lib.php');
8 require_once('proc.lib.php');
10 if (!isLoggedIn()) redirect('index');
12 if(!isset($_SESSION['csrf_token']))
14 $n = rand(10e16, 10e20);
15 $_SESSION['csrf_token'] = base_convert($n, 10, 36);
18 $err1 = $msg1 = array();
20 $User = new User($Login->getUserID());
23 if($_SESSION['csrf_token'] != $_POST['csrf_token'])
25 $err1[] = "CSRF token incorrect or not found. Try submitting again.";
27 if (isset($i_newdb)) {
28 list($msg1, $err1) = proc::newdb($User, $i_newdb);
31 list($msg1, $err1) = proc::drop($User, $i_drop);
36 if (!count($err1)) {//&& !isset($i_r))
37 checkQuotas($Login->getUserID());
41 $myDBs = $User->getDBList();
43 include 'tpl/main.php';