A kinda sorta list of authors'; switch ($show) { case 'list': $wheres = array(); switch ($k) { case 'fid': if ($v) { $wheres[] = sprintf(' fid=%d ', $v); } break; case 'aid': if ($v) { $wheres[] = sprintf(' topic_id in (select topic_id from authorposts where aid = %d) ', $v); } break; case 'gid': if ($v) { $wheres[] = sprintf(' topic_id in (select topic_id from ghostposts where gid = %d) ', $v); } break; } if ($wheres) { print "

Posts that may or may not have been written by the same person or persons. Maybe.

\n"; print "

{$row->name} by {$row->author} on {$row->created} EOT; } } print "

\n"; break; } // fall through case 'who': if ($fid) { $query .= sprintf(' where fid=%d ', $fid); $title = '

Posts that may or may not be by the same person or persons. Could be. Not impossible.

'; } // fall through default: print << An Authorish Name Posting As
(Probably) Ghost Posts From Those Hosts EOT; if ($result = $dbh->query($query)) { $asth = do_prep('select * from authors where fid = :fid'); $gsth = do_prep('select * from ghosts where fid = :fid'); while ($row = $result->fetchObject()) { print << {$row->author} ({$row->tick} posts) EOT; do_exec($asth, array(':fid' => $row->fid)); while ($arow = $asth->fetchObject()) { print <<{$arow->author} ({$arow->tick} posts)
EOT; } print << EOT; do_exec($gsth, array(':fid' => $row->fid)); while ($grow = $gsth->fetchObject()) { print <<{$grow->author} ({$grow->tick} posts)
EOT; } print << EOT; } } print << EOT; break; } PrintFooter();