' . "\n" .
' | ' . "\n" .
' ' . "\n" .
' | '."\n";
} else {
/* The link is subtle, below "view full header". */
$result = "
\n";
}
/* Output the link. */
if ($javascript_on) {
$result .= '\n" .
"$print_text\n";
} else {
$result .= '$print_text\n";
}
if (!$pf_subtle_link) {
/* The link is large, on the bottom of the header panel. */
$result .= ' | ' . "\n" .
' ' . "\n";
}
return ($result);
}
/*****************************/
/*** Main of read_boby.php ***/
/*****************************/
$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
sqimap_mailbox_select($imapConnection, $mailbox);
do_hook('html_top');
displayPageHeader($color, $mailbox);
if (isset($view_hdr)) {
$read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[HEADER]", true, $a, $b);
echo '
' .
'\n" .
"\n" .
'| ';
$cnum = 0;
for ($i=1; $i < count($read); $i++) {
$line = htmlspecialchars($read[$i]);
if (eregi("^>", $line)) {
$second[$i] = $line;
$first[$i] = ' ';
$cnum++;
} else if (eregi("^[ |\t]", $line)) {
$second[$i] = $line;
$first[$i] = '';
} else if (eregi("^([^:]+):(.+)", $line, $regs)) {
$first[$i] = $regs[1] . ':';
$second[$i] = $regs[2];
$cnum++;
} else {
$second[$i] = trim($line);
$first[$i] = '';
}
}
for ($i=0; $i < count($second); $i = $j) {
if (isset($first[$i])) {
$f = $first[$i];
}
if (isset($second[$i])) {
$s = nl2br($second[$i]);
}
$j = $i + 1;
while (($first[$j] == '') && ($j < count($first))) {
$s .= ' ' . nl2br($second[$j]);
$j++;
}
parseEmail($s);
if (isset($f)) echo "$f$s";
}
echo " |
\n";
echo '