webwml/newmaint/gpguserdel.wml

<?
  session_start();
  include("gpgconfig.inc");
  include("common.inc");
  include("gpgcommon.inc");

  $html_end = "</TD>\n</TR>\n</TABLE>\n</BODY>\n</HTML>";
?>
#use wml::gpgpage title="GPG Signing Coordination - Your profile"
<?
  if (!session_is_registered("s_username")) {
?>
<STRONG>You should not be here!</STRONG>
There's no session registered for you. Please relogin.
<?
   return FALSE;
 } else {
  session_register("s_username");
  }
?>

<?
    if (! ($db = open_db())) {
        echo "<P>Cannot open database.</P>";
        return FALSE;
    }

    if (! $doit) {
?>

        <H2>Delete User <? echo $s_username; ?></H2>
        <P>Really delete your entry in the PGP Signing Coordination Database?</P>
        <P><A HREF="gpguserdel.php?doit=1">YES</A> - <A HREF="gpgmain.php">NO</A></P>
<?
    } else {

        $sql = "DELETE FROM people WHERE email = '$s_username'";
        if (! ($result = pg_exec($db, $sql))) {
            echo "Problem with query", pg_ErrorMessage($db), "<BR>";
            return FALSE;
        }

        session_destroy();
?>
        <H2>Delete User</H2>
        <P>You should have been removed from the database</P>
<?
    }
        return TRUE;
?>
1	weasel	1.1	<?
2			session_start();
3			include("gpgconfig.inc");
4			include("common.inc");
5			include("gpgcommon.inc");
6
7			$html_end = "</TD>\n</TR>\n</TABLE>\n</BODY>\n</HTML>";
8			?>
9			#use wml::gpgpage title="GPG Signing Coordination - Your profile"
10			<?
11			if (!session_is_registered("s_username")) {
12			?>
13			<STRONG>You should not be here!</STRONG>
14			There's no session registered for you. Please relogin.
15			<?
16			return FALSE;
17			} else {
18			session_register("s_username");
19			}
20			?>
21
22			<?
23			if (! ($db = open_db())) {
24			echo "<P>Cannot open database.</P>";
25			return FALSE;
26			}
27
28			if (! $doit) {
29			?>
30
31			<H2>Delete User <? echo $s_username; ?></H2>
32			<P>Really delete your entry in the PGP Signing Coordination Database?</P>
33			<P><A HREF="gpguserdel.php?doit=1">YES</A> - <A HREF="gpgmain.php">NO</A></P>
34			<?
35			} else {
36
37			$sql = "DELETE FROM people WHERE email = '$s_username'";
38			if (! ($result = pg_exec($db, $sql))) {
39			echo "Problem with query", pg_ErrorMessage($db), "<BR>";
40			return FALSE;
41			}
42
43			session_destroy();
44			?>
45			<H2>Delete User</H2>
46			<P>You should have been removed from the database</P>
47			<?
48			}
49			return TRUE;
50			?>