Add a couple of table cleanups when a user is denied access to a

project and the account is removed. Add some better warm fuzzies.
Also some changes to command line args to backend scripts.

www/approveproject.php3

 <?php
 #
 # EMULAB-COPYRIGHT
-# Copyright (c) 2000-2002 University of Utah and the Flux Group.
+# Copyright (c) 2000-2003 University of Utah and the Flux Group.
 # All rights reserved.
 #
 include("defs.php3");
@@ -234,11 +234,18 @@ elseif (strcmp($approval, "approve") == 0) {
     # Invoke the script. This does it all. If it fails, we will find out
     # about it.
     #
-    SUEXEC($uid, $TBADMINGROUP, "webmkproj $pid", 0); 
+    echo "<br>
+          Project '$pid' is being created!<br><br>
+          This will take a minute or two. <b>Please</b> do not click the Stop
+          button during this time. If you do not receive notification within
+          a reasonable amount of time, please contact $TBMAILADDR.\n";
+    flush();
 
-    echo "<h3><p>
-              Project $pid (User: $headuid) has been approved.
-          </h3>\n";
+    SUEXEC($uid, $TBADMINGROUP, "webmkproj $pid", 1); 
+
+    echo "<p><b>
+             Project $pid (User: $headuid) has been approved.
+          </b>\n";
 }
 else {
     TBERROR("Invalid approval value $approval in approveproject.php3.", 1);

www/approveuser.php3

 <?php
 #
 # EMULAB-COPYRIGHT
-# Copyright (c) 2000-2002 University of Utah and the Flux Group.
+# Copyright (c) 2000-2003 University of Utah and the Flux Group.
 # All rights reserved.
 #
 include("defs.php3");
@@ -429,13 +429,15 @@ while (list ($header, $value) = each ($HTTP_POST_VARS)) {
                   \n";
 	    continue;
 	}
-	
-	$query_result = DBQueryFatal("delete FROM users where uid='$user'");
+
+	DBQueryFatal("delete from users where uid='$user'");
+	DBQueryFatal("delete from user_pubkeys where uid='$user'");
+	DBQueryFatal("delete from user_sfskeys where uid='$user'");
 	
 	echo "<p>
                 User $user was <b>denied</b> membership in $project/$group.
                 <br>
-		The account has also been <b>terminated</b> with prejudice!\n";
+		The account has also been <b>terminated</b>!\n";
 
 	continue;
     }
@@ -494,7 +496,7 @@ while (list ($header, $value) = each ($HTTP_POST_VARS)) {
 	#
         # Create user account on control node.
         #
-	MKACCT($uid, "webmkacct -a $user");
+	MKACCT($uid, "webmkacct $user");
 	SUEXEC($uid, $TBADMINGROUP, "websetgroups $user", 0);
 		
 	continue;