admin-ycml.php

<?php
/*
 * admin-ycml.php:
 * HearFromYourMP admin pages.
 * 
 * Copyright (c) 2005 UK Citizens Online Democracy. All rights reserved.
 * Email: matthew@mysociety.org. WWW: http://www.mysociety.org
 * 
 */

require_once "ycml.php";
require_once 'reps.php';
require_once 'comment.php';
require_once "../commonlib/phplib/db.php";
require_once "../commonlib/phplib/mapit.php";
require_once "../commonlib/phplib/dadem.php";
require_once "../commonlib/phplib/utility.php";
require_once "../commonlib/phplib/importparams.php";
require_once "../commonlib/phplib/person.php";

class ADMIN_PAGE_YCML_SUMMARY {
    function ADMIN_PAGE_YCML_SUMMARY() {
        $this->id = 'summary';
    }
    function display() {
        $signups = db_getOne('SELECT COUNT(*) FROM constituent');
        $consts = db_getOne('SELECT COUNT(DISTINCT(area_id)) FROM constituent');
            $consts_posted = db_getOne("select count(distinct area_id) from message where state in ('approved','closed')");
        $people1 = db_getOne('SELECT COUNT(*) FROM person');
        $people2 = db_getOne('SELECT COUNT(DISTINCT(person_id)) FROM constituent');
        $messages_approved = db_getOne("SELECT COUNT(*) FROM message WHERE state in ('approved','closed')");
        $alerts = db_getOne('SELECT COUNT(*) FROM alert');
        $comments = db_getOne('SELECT COUNT(*) FROM comment');

        print "$signups area signups from $people2 people
            (though $people1 person entries) to $consts areas<br>
            $consts_posted areas have had $messages_approved message".
            ($messages_approved!=1?'s':'').", and there have been 
            $comments comments<br>$alerts alerts";
    }
}

class ADMIN_PAGE_YCML_MAIN {
    function ADMIN_PAGE_YCML_MAIN () {
        $this->id = "ycml";
        $this->navname = _("HearFromYourMP Summary");
    }

    function table_header($sort) {
        print '<table border="1" cellpadding="5" cellspacing="0"><tr>';
        $cols = array(
            'c'=>'Constituency', 
            'r'=>'Representative',
            's'=>'Signups',
            'l'=>'Latest signup'
        );
        foreach ($cols as $s => $col) {
            print '<th>';
            if ($sort != $s) print '<a href="'.$this->self_link.'&amp;s='.$s.'">';
            print $col;
            if ($sort != $s) print '</a>';
            print '</th>';
        }
        print '</tr>';
        print "\n";
    }

    function list_all() {
        global $open;
        $sort = get_http_var('s');
        if (!$sort || preg_match('/[^csl]/', $sort)) $sort = 's';
        $order = '';
        if ($sort=='l') $order = 'latest DESC';
        elseif ($sort=='c') $order = 'area_id';
        elseif ($sort=='s') $order = 'count DESC';

        if (get_http_var('makerepurl')) {
            $area_id = get_http_var('makerepurl');

            $area_info = ycml_get_area_info($area_id);
            $reps_info = ycml_get_reps_for_area($area_id);
            print "<ul>";
            foreach ($reps_info as $id => $rep_info) {
                print '<li><i>';
                if (!isset($rep_info['email']) || $rep_info['email'] === '') {
                    print("No email address available for ${rep_info['name']} (${area_info['name']}). ");
                    if ($rep_info['email'] === '')
                        print("Email address returned by DaDem was blank; should be null.");
                } else {
                    # Create account for rep if they don't already have one.
                    $P = person_get_or_create($rep_info['email'], $rep_info['name']);
                    $already_signed = db_getOne("select id from constituent where 
                        area_id = ? and person_id = ?
                        for update", array( $area_id, $P->id() ) );
                    if (!$already_signed) {
                        db_query("insert into constituent (
                                    person_id, area_id, is_rep,
                                    postcode, creation_ipaddr
                                )
                                values (?, ?, ?, ?, ?)", array($P->id(), $area_id, true, '', ''));
                    } else {
                         db_query("update constituent set is_rep = true where person_id=? and area_id=?",
                             array($P->id(), $area_id));
                    }
                    print "Email address for ${rep_info['name']} is ${rep_info['email']}.";
                    $url = person_make_signon_url(null, $rep_info['email'], 'GET', OPTION_BASE_URL . '/post/r' . $id, null);
                    db_commit();
                    print "<br>New login URL: <a href=\"$url\">$url</a>\n";
                }
                print '</i></li>';
            }
            print "</ul>";
        }

        $q = db_query('SELECT COUNT(id) AS count,area_id,EXTRACT(epoch FROM MAX(creation_time)) AS latest FROM constituent GROUP BY area_id' . 
            ($order ? ' ORDER BY ' . $order : '') );
        list($areas_info, $rows) = ycml_get_all_areas_info($q, false);
        $reps_info = ycml_get_all_reps_info(array_keys($areas_info));

        foreach ($rows as $k=>$r) {
            $c_id = $r['area_id'] ? $r['area_id'] : -1;
            $c_name = array_key_exists($c_id, $areas_info) ? $areas_info[$c_id]['name'] : '&lt;Unknown / bad postcode&gt;';
            $r_names = isset($reps_info[$c_id]['names']) ? join(', ', $reps_info[$c_id]['names']) : 'Unknown';
            $row = "";
            $row .= '<td>';
            if ($c_id != -1) $row .= '<a href="' . OPTION_BASE_URL . '/view/'.$c_id.'">';
            $row .= $c_name;
            if ($c_id != -1) $row .= '</a>';
            $row .= '<br><a href="'.$this->self_link.'&amp;area_id='.$c_id.'">admin</a> |
                <a href="?page=ycmllatest&amp;area_id='.$c_id.'">timeline</a>';
            $row .= '</td>';
            $row .= "<td>$r_names<br>" .
                    '<form method="post">
                    <input type="hidden" name="page" value="ycml">
                    <input type="hidden" name="makerepurl" value="'.$c_id.'">
                    <input type="submit" value="Create login URL">
                    </form>'
                . "</a></td>";
            $row .= '<td align="center">' . $r['count'] . '</td>';
            $row .= '<td>' . prettify($r['latest']) . '</td>';
            $rows[$k] = $row;
        }
        if (count($rows)) {
            print '<p>Here\'s the current state of HearFromYourMP:</p>';
            $this->table_header($sort);
            $a = 0;
            foreach ($rows as $row) {
                print '<tr'.($a++%2==0?' class="v"':'').'>';
                print $row;
                print '</tr>'."\n";
            }
            print '</table>';
        } else {
            print '<p>No-one has signed up to HearFromYourMP at all, anywhere, ever.</p>';
        }
    }

    function show_area($id) {
        print '<p><a href="'.$this->self_link.'">' . _('Main page') . '</a></p>';

        $sort = get_http_var('s');
        if (!$sort || preg_match('/[^etn]/', $sort)) $sort = 'e';

        if ($id > 0) {
            $area_info = mapit_call('area', $id);
            $reps = dadem_get_representatives($id);
            $reps_info = array_values(dadem_get_representatives_info($reps));
            $query = 'SELECT constituent.*, person.*, extract(epoch from creation_time) as creation_time
                       FROM constituent
                       LEFT JOIN person ON person.id = constituent.person_id
                       WHERE area_id=?';
            if ($sort=='t') $query .= ' ORDER BY constituent.creation_time DESC';
            elseif ($sort=='n') $query .= ' ORDER BY showname DESC';
            $q = db_query($query, $id);
        } else {
            $area_info['name'] = 'Unknown / bad postcode';
            $query = 'SELECT *, extract(epoch from creation_time) as creation_time
                       FROM constituent
                       WHERE area_id IS NULL';
            if ($sort=='t') $query .= ' ORDER BY constituent.creation_time DESC';
            elseif ($sort=='n') $query .= ' ORDER BY showname DESC';
            $q = db_query($query);
        }
        $subscribers = db_num_rows($q);

        $out = array();
        print "<div style='float:left; width:47%;'><h2 style='margin:0'>$area_info[name]";
        if ($id>0) {
            foreach ($reps_info as $rep_info) {
                print ", $rep_info[name] ($rep_info[party])";
            }
            print ", $subscribers subscribed";
        }
        print '</h2>';

        if ($id>0) {
            $is_rep = db_getOne('SELECT is_rep FROM constituent WHERE area_id=? AND is_rep', $id);
            $no_thanks = db_getOne('SELECT status FROM rep_nothanks WHERE area_id=?', $id)=='t' ? true : false;
            $all = db_getAll('SELECT constituent.id,is_rep,person.name,person.email FROM constituent,person
                              WHERE constituent.person_id=person.id AND area_id=?
                              ORDER BY person.name', array($id));
            $choices = '';
            foreach ($all as $r) {
                $choices .= '<option';
                if ($r['is_rep']=='t') $choices .= ' selected';
                $choices .= ' value="' . $r['id'] . '">' . $r['name'] . ' &lt;' . $r['email'] . '&gt;</option>';
            }
            $sent_messages = db_getOne("select count(*) from message where area_id=? and state in ('approved','closed')", $id);
?>
<form method="post">
<p>Alert status: <strong>
<?          if ($no_thanks) { ?>
<input type="hidden" name="change_alert_state" value="interested">
Not interested - <input type="submit" value="Change">
<?          } else {
                if ($sent_messages) {
                    print 'Previous user';
                } else {
                    print 'New user';
                } ?>
<input type="hidden" name="change_alert_state" value="not_interested">
 -
 Gender: <select name="gender">
 <option>-</option>
 <option>Female</option>
 <option>Male</option>
 </select>
 <input type="submit" value="Not interested">
<?          }
?></strong></p></form>
<h3>Create or set login for this MP</h3>
<p style="color: #990000">Do not use in multi-member areas, it de-reps everyone else!</p>
<form method="post">
<em>Either:</em> email:<input type="text" name="MPemail" value="" size="30"> <input type="submit" name="createMP" value="Create a brand spanking new account for this MP">
</form>
<form method="post">
<em>Or:</em> pick an existing account subscribed to this area:
<?          if ($choices) {
                print '<select name="selectMP"><option value="">None selected</option>' . $choices . '</select> <input';
            } else {
                print '<select name="selectMP" disabled><option>No matches</select> <input disabled';
            }
?>
 type="submit" value="Use this account">
</form>
<?    
        }

?>
</div>
<div style="float:left; width:47%">
<?      if ($id>0) {
            $query = db_getAll('select * from rep_threshold_alert where area_id=?', $id);
            if (count($query)) {
                print '<h3>Alerts sent</h3> <table><tr><th>Subscribers</th><th>When</th></tr>';
                foreach ($query as $r) {
                    print "<tr><td>$r[num_subscribers]</td><td>$r[whensent]</td></tr>";
                }
                print '</table>';
            }
            $query = db_getAll('select id,state,subject from message 
                    where area_id = ? order by posted', $id);
            if (count($query)) {
                print '<h3>Messages</h3> <table cellpadding="3" cellspacing="0" border="0"><tr><th>State</th><th>Subject</th><th></th></tr>';
                foreach ($query as $r) {
                    print "<tr><td>$r[state]</td><td>";
                    if ($r['state']=='approved' || $r['state']=='closed') print '<a href="' . OPTION_BASE_URL . '/view/message/'.$r['id'].'">';
                    print $r['subject'];
                    if ($r['state']=='approved' || $r['state']=='closed') print '</a>';
                    print '</td></tr>';
                }
                print '</table>';
            }
        }
?>
<h3 style="clear:both">Subscribers</h3>
<?      while ($r = db_fetch_array($q)) {
            $is_rep = ($r['is_rep'] == 't') ? true : false;
            $r = array_map('htmlspecialchars', $r);
            $e = array();
            if ($r['name']) array_push($e, $r['name']);
            if ($r['email']) array_push($e, $r['email']);
            if ($r['postcode']) array_push($e, $r['postcode']);
            $e = join("<br>", $e);
            if ($is_rep) $e = "<strong>$e</strong>";
            $out[$e] = '<td>'.$e.'</td>';
            $out[$e] .= '<td>'.prettify($r['creation_time']).'</td>';

#            $out[$e] .= '<td><form name="shownameform" method="post" action="'.$this->self_link.'"><input type="hidden" name="showname_signer_id" value="' . $r['signid'] . '">';
#            $out[$e] .= '<select name="showname">';
#            $out[$e] .=  '<option value="1"' . ($r['showname'] == 't'?' selected':'') . '>Yes</option>';
#            $out[$e] .=  '<option value="0"' . ($r['showname'] == 'f'?' selected':'') . '>No</option>';
#            $out[$e] .=  '</select>';
#            $out[$e] .= '<input type="submit" name="showname_signer" value="update">';
#            $out[$e] .= '</form></td>';

#            $out[$e] .= '<td>';
#            $out[$e] .= '<form name="removesignerform" method="post" action="'.$this->self_link.'"><input type="hidden" name="remove_signer_id" value="' . $r['signid'] . '"><input type="submit" name="remove_signer" value="Remove signer permanently"></form>';
#            $out[$e] .= '</td>';
        }
        if ($sort == 'e') {
            function sort_by_domain($a, $b) {
                $aa = stristr($a, '@');
                $bb = stristr($b, '@');
                if ($aa==$bb) return 0;
                return ($aa>$bb) ? 1 : -1;
            }
            uksort($out, 'sort_by_domain');
        }
        if (count($out)) {
            print '<table border="1" cellpadding="3" cellspacing="0"><tr>';
            $cols = array('e'=>'Signer', 't'=>'Time');
            foreach ($cols as $s => $col) {
                print '<th>';
                if ($sort != $s) print '<a href="'.$this->self_link.'&amp;area_id='.$id.'&amp;s='.$s.'">';
                print $col;
                if ($sort != $s) print '</a>';
                print '</th>';
            }
            print '</tr>';
            $a = 0;
            foreach ($out as $row) {
                print '<tr'.($a++%2==0?' class="v"':'').'>';
                print $row;
                print '</tr>';
            }
            print '</table>';
        } else {
            print '<p>Nobody has signed up to this area.</p>';
        }
        print '</div>';
    }

    function display($self_link) {
        $area_id = get_http_var('area_id');

        // Perform actions
        if (get_http_var('createMP')) {
            $reps = dadem_get_representatives($area_id);
            $rep_info = dadem_get_representative_info($reps[0]);
            $email = get_http_var('MPemail');
            $P = person_get_or_create($email, $rep_info['name']);
            db_query('UPDATE constituent SET is_rep = false WHERE area_id = ?', $area_id);
            db_query("INSERT INTO constituent (person_id, area_id, postcode,
                    creation_ipaddr, is_rep) VALUES (?, ?, ?, ?, true)",
                    array($P->id(), $area_id, '', $_SERVER['REMOTE_ADDR']));
            db_commit();
            print '<p><em>MP created</em></p>';
        } elseif (get_http_var('selectMP')) {
            $c_id = get_http_var('selectMP');
            if (ctype_digit($c_id)) {
                db_query('UPDATE constituent SET is_rep = false WHERE area_id = ?', $area_id);
                db_query('UPDATE constituent SET is_rep = true WHERE id = ?', $c_id);
                db_commit();
                print '<p><em>MP selected</em></p>';
            }
        } elseif ($change_state = get_http_var('change_alert_state')) {
            if ($change_state == 'interested') {
                db_query('UPDATE rep_nothanks SET status=? WHERE area_id = ?', array(false, $area_id));
                print '<p><em>Removed from the not interested list</p>';
            } else {
                if (db_getOne('SELECT status FROM rep_nothanks WHERE area_id = ?', $area_id)=='f') {
                    db_query('UPDATE rep_nothanks SET status=? WHERE area_id = ?', array(true, $area_id));
                } else {
                    $gender = get_http_var('gender')=='Female' ? 'f' : 'm';
                    db_query('INSERT INTO rep_nothanks (area_id, status, website, gender) VALUES (?,?,?,?)', array($area_id, true, null, $gender));
                }
                print '<p><em>Added to the not interested list</em></p>';
            }
            db_commit();
        }

        // Display page
        if ($area_id) {
            $this->show_area($area_id);
        } else {
            $this->list_all();
        }
    }
}

class ADMIN_PAGE_YCML_LATEST {
    function ADMIN_PAGE_YCML_LATEST() {
        $this->id = 'ycmllatest';
        $this->navname = 'Timeline';

        if (get_http_var('linelimit')) {
            $this->linelimit = get_http_var('linelimit');
        } else {
            $this->linelimit = 250;
        }

        $this->area_id = null;
        if ($area_id = get_http_var('area_id')) {
            $this->area_id = $area_id;
        }
    }

    function show_latest_changes() {
        $q = db_query('SELECT *,extract(epoch from posted) as epoch FROM message
                     ORDER BY posted DESC');
        $this->area_info = array();
        $time = array();
        while ($r = db_fetch_array($q)) {
            $c_id = $r['area_id'];
            if (!array_key_exists($c_id, $this->area_info)) {
                $this->area_info[$c_id] = mapit_call('area', $c_id);
            }
            if (!$this->area_id || $this->area_id==$c_id) {
                $time[$r['epoch']][] = $r;
            }
        }
        $q = db_query('SELECT comment.*,area_id,subject,name,email,extract(epoch from date) as epoch
                        FROM comment, message, person
                        WHERE comment.message = message.id AND person_id = person.id
                        ORDER BY date DESC');
        while ($r = db_fetch_array($q)) {
            if (!$this->area_id || $this->area_id==$r['area_id']) {
                $time[$r['epoch']][] = $r;
            }
        }
        if (!$this->area_id || $this->area_id>0) {
            $q = db_query('SELECT *,extract(epoch from creation_time) as epoch FROM constituent,person
                            WHERE person_id = person.id
                            ORDER BY creation_time DESC');
            while ($r = db_fetch_array($q)) {
                $c_id = $r['area_id'];
                if (!array_key_exists($c_id, $this->area_info)) {
                    $this->area_info[$c_id] = mapit_call('area', $c_id);
                }
                if (!$this->area_id || $this->area_id==$c_id) {
                    $time[$r['epoch']][] = $r;
                }
            }
        } elseif ($this->area_id<0) {
            $this->area_info[-1]['name'] = 'Unknown / bad postcode';
            $q = db_query('SELECT *,extract(epoch from creation_time) as epoch FROM constituent
                            WHERE area_id IS NULL
                            ORDER BY creation_time DESC');
            while ($r = db_fetch_array($q)) {
                $time[$r['epoch']][] = $r;
            }
        }
        krsort($time);

        print '<a href="'.$this->self_link.'">Full log</a>';
        if ($this->area_id) {
            print ' | <em>Viewing area_id "'.$this->area_info[$this->area_id]['name'].'"</em> (<a href="?page=ycml&amp;area_id='.$this->area_id.'">admin</a>)';
        }
        $date = ''; 
        $linecount = 0;
        print "<div class=\"timeline\">";
        foreach ($time as $epoch => $datas) {
            $linecount++;
            if ($linecount > $this->linelimit) {
                print '<dt><br><a href="'.$this->self_link.
                        '&linelimit='.htmlspecialchars($this->linelimit + 250).'">Expand timeline...</a></dt>';
                break;
            }
            $curdate = date('l, jS F Y', $epoch);
            if ($date != $curdate) {
                if ($date <> "")
                    print '</dl>';
                print '<h2>'. $curdate . '</h2> <dl>';
                $date = $curdate;
            }
            print '<dt><b>' . date('H:i:s', $epoch) . ':</b></dt> <dd>';
            foreach ($datas as $data) {
            if (array_key_exists('posted', $data)) {
                if (!$this->area_id) print $this->area_info[$data['area_id']]['name'] . ' ';
                print "MP posted message <a href=\"" . OPTION_BASE_URL . "/view/message/$data[id]\">$data[subject]</a> : $data[content]";
            } elseif (array_key_exists('date', $data)) {
                print "$data[name] &lt;$data[email]&gt; commented on <a href=\"" . OPTION_BASE_URL . "/view/message/$data[message]\">$data[subject]</a> saying '";
                print htmlspecialchars($data['content']) . "'";
            } elseif (array_key_exists('creation_time', $data)) {
                print "$data[name] &lt;$data[email]&gt; (postcode $data[postcode]) signed up";
                if (!$this->area_id) print " to " . $this->area_info[$data['area_id']]['name'];
            } else {
                print_r($data);
            }
            print '<br>';
            }
            print "</dd>\n";
        }
        print '</dl>';
        print "</div>";
    }

    function display($self_link) {
        $this->show_latest_changes();
    }
}

class ADMIN_PAGE_YCML_ABUSEREPORTS {
    function ADMIN_PAGE_YCML_ABUSEREPORTS() {
        $this->id = 'ycmlabusereports';
        $this->navname = _('Abuse reports');
    }

    function display($self_link) {
        db_connect();
        $do_discard = false;
        if (get_http_var('discardReports'))
            $do_discard = true;
        foreach ($_POST as $k => $v) {
            if ($do_discard && preg_match('/^ar_([1-9]\d*)$/', $k, $a))
                db_query('delete from abusereport where id = ?', $a[1]);
            if (preg_match('/^remove_comment_([0-9a-f]{8})$/', $k, $a)) {
                db_query('UPDATE comment SET visible=0 WHERE id=?', $a[1]);
                print "<em>Removed comment"
                        . " #" . htmlspecialchars($a[1]) . "</em><br>";
            }
        }
        db_commit();
        $this->showlist($self_link);
    }

    function showlist($self_link) {
        $old_id = null;
        $q = db_query('select id, comment_id, reason, ipaddr, extract(epoch from whenreported) as epoch from abusereport order by whenreported desc');

        if (db_num_rows($q) > 0) {

            print '<form name="discardreportsform" method="POST" action="'.$this->self_link.'">';
            print '
    <p><input type="submit" name="discardReports" value="Discard selected abuse reports"></p>
    <table class="abusereporttable">
    ';
            while (list($id, $comment_id, $reason, $ipaddr, $t) = db_fetch_row($q)) {
                if ($comment_id !== $old_id) {
                
                    print '<tr style="background-color: #eee;"><td colspan="4">';
                    print '<table>';
                    $comment = db_getRow('
                                        select comment.id, message, extract(epoch from date) as date,
                                            content, posted_by_rep, name, email, website, visible
                                        from comment, person
                                        where comment.person_id = person.id
                                            and comment.id = ?', $comment_id);

                    print '<tr class="break">';
                    $commentT = comment_show_one($comment, true);
                    $commentT = preg_replace('/<a href="#/', '<a href="' . OPTION_BASE_URL . '/view/message/'
                        . $comment['message'] . '#', $commentT);
                    print "<td>$commentT <input type='submit' name='remove_comment_${comment_id}' value='Remove this comment'>";
                    print '</td></tr></table>';
                    $old_id = $comment_id;
                }

                print '<tr><td>'
                        . '<input type="checkbox" name="ar_' . $id . '" value="1">'
                        . '</td><td><b>Abuse report:</b> '
                        . date('Y-m-d H:i', $t)
                        . ' from '
                        . $ipaddr
                        . '</td><td><b>Reason: </b>'
                        . htmlspecialchars($reason)
                        . '</td></tr>';
            }

            print '</table>';
            print '<p><input type="submit" name="discardReports" value="Discard selected abuse reports"></form>';
        } else {
            print '<p>No abuse reports.</p>';
        }
    }
}

class ADMIN_PAGE_YCML_SUBSCRIBERS {
    function ADMIN_PAGE_YCML_SUBSCRIBERS() {
        $this->id = 'subscribers';
        $this->navname = 'HearFromYourMP Subscribers';
    }
    function display() {
        $search = get_http_var('search');
        $h_search = htmlspecialchars($search);
?>
<form method="post">
Search for a subscriber: <input type="text" name="search" value="<?=$h_search ?>">
<input type="submit" value="Go">
</form>
<?
        if ($search) {
            $q = db_getAll("select constituent.postcode, extract(epoch from constituent.creation_time) as creation_time,
                                constituent.creation_ipaddr, constituent.area_id, person.name, person.email
                            from constituent, person
                            where constituent.person_id = person.id and
                            (person.name ilike '%' || ? || '%' or
                             person.email ilike '%' || ? || '%')
                             order by email", array($search, $search));
?>
<h2>Results for search</h2>
<table cellpadding="3" cellspacing="0" border="0">
<tr><th>Name</th><th>Email</th><th>Postcode</th><th>Constituency</th><th>Signup</th><th>IP address</th></tr>
<?
            $constituencies = array();
            foreach ($q as $r)
                $constituencies[] = $r['area_id'];
            $areas_info = mapit_call('areas', $constituencies);
            
            $c = 0;
            foreach ($q as $r) {
                $creation_time = prettify($r['creation_time']);
                $area_id = $areas_info[$r['area_id']]['name'];
                print '<tr';
                if ($c=1-$c) print ' class="v"';
                print "><td>$r[name]</td><td>$r[email]</td><td>$r[postcode]</td><td>$area_id</td><td>$creation_time</td><td>$r[creation_ipaddr]</td><tr>\n";
            }
            print '</table>';
        }
    }
}

class ADMIN_PAGE_YCML_MULTIPLE {
    function ADMIN_PAGE_YCML_MULTIPLE() {
        $this->id = 'multiple';
        $this->navname = 'HearFromYourMP Multiple Signups';
    }
    function display() {
        $q = db_getAll('select count(c.id) as count, person_id, p.name, p.email
                        from constituent as c,person as p
                        where person_id=p.id
                        group by person_id, p.name, p.email
                        having count(c.id)>1
                        order by count(c.id) desc');
        print '<table><tr><th>Count</th><th>Name</th><th>Email</th></tr>';
        foreach ($q as $r) {
            print "<tr><td>$r[count]</td><td>$r[name]</td><td>$r[email]</td></tr>\n";
        }
        print '</table>';
    }
}

?>