]> andersk Git - sql-web.git/blob - main.php
signup: now takes signups by argument
[sql-web.git] / main.php
1 <?php
2
3 require_once('mitsql.cfg.php');
4 require_once('mitsql.lib.php');
5 require_once('proc.lib.php');
6
7 if (!isLoggedIn()) redirect('index');
8
9 $err1 = $msg1 = array();
10
11 $User = new User($Login->getUserID());
12
13 if (isPost()) {
14         if (isset($i_newdb)) {
15                 list($msg1, $err1) = proc::newdb($User, $i_newdb);
16         }
17         if (isset($i_drop)) {
18                 list($msg1, $err1) = proc::drop($User, $i_drop);
19         }
20 }
21
22 if (!count($err1)) {//&& !isset($i_r))
23         checkQuotas($Login->getUserID());
24         $User->refresh();
25 }
26
27 $myDBs = $User->getDBList();
28
29 include 'tpl/main.php';
30
31 ?>
This page took 0.03215 seconds and 5 git commands to generate.