6 * Copyright (c) 1999-2002 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
9 * Prints the page header (duh)
14 require_once('../functions/strings.php');
16 // Always set up the language before calling these functions
17 function displayHtmlHeader( $title = 'SquirrelMail', $xtra = '', $do_hook = TRUE ) {
19 global $theme_css, $custom_css, $base_uri;
21 echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">' .
22 "\n\n<HTML>\n<HEAD>\n";
24 if ( !isset( $custom_css ) ||
$custom_css == 'none' ) {
25 if ($theme_css != '') {
26 echo "<LINK REL=\"stylesheet\" TYPE=\"text/css\" HREF=\"$theme_css\">\n";
29 echo '<LINK REL="stylesheet" TYPE="text/css" HREF="' .
30 $base_uri . "themes/css/$custom_css\">\n";
34 do_hook ("generic_header");
37 echo "<title>$title</title>$xtra</head>\n\n";
40 function displayInternalLink($path, $text, $target='') {
44 $target = " target=\"$target\"";
47 echo '<a href="'.$base_uri.$path.'"'.$target.'>'.$text.'</a>';
50 function displayPageHeader($color, $mailbox) {
52 global $delimiter, $hide_sm_attributions, $base_uri, $PHP_SELF, $frame_top;
56 $module = substr( $PHP_SELF, ( strlen( $PHP_SELF ) - strlen( $base_uri ) ) * -1 );
57 if (!isset($frame_top)) {
62 Locate the first displayable form element
65 case 'src/search.php':
66 $pos = getPref($data_dir, $username, 'search_pos', 0 ) - 1;
67 $onload = "onLoad=\"document.forms[$pos].elements[2].focus();\"";
70 echo '<script language="JavaScript">' .
72 "function checkForm() {\n".
73 "var f = document.forms.length;\n".
76 "while( pos == -1 && i < f ) {\n".
77 "var e = document.forms[i].elements.length;\n".
79 "while( pos == -1 && j < e ) {\n".
80 "if ( document.forms[i].elements[j].type == 'text' ) {\n".
88 "document.forms[i-1].elements[pos].focus();\n".
93 $onload = "onLoad=\"checkForm();\"";
98 echo "<BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\" $onload>\n\n";
100 /** Here is the header and wrapping table **/
101 $shortBoxName = readShortMailboxName($mailbox, $delimiter);
102 if ( $shortBoxName == 'INBOX' ) {
103 $shortBoxName = _("INBOX");
105 echo "<A NAME=pagetop></A>\n"
106 . "<TABLE BGCOLOR=\"$color[4]\" BORDER=0 WIDTH=\"100%\" CELLSPACING=0 CELLPADDING=2>\n"
107 . " <TR BGCOLOR=\"$color[9]\" >\n"
108 . " <TD ALIGN=left>\n";
109 if ( $shortBoxName <> '' && strtolower( $shortBoxName ) <> 'none' ) {
110 echo ' ' . _("Current Folder") . ": <B>$shortBoxName </B>\n";
115 . " <TD ALIGN=right><b>\n";
116 displayInternalLink ('src/signout.php', _("Sign Out"), $frame_top);
119 . " <TR BGCOLOR=\"$color[4]\">\n"
120 . " <TD ALIGN=left>\n";
121 $urlMailbox = urlencode($mailbox);
122 displayInternalLink ("src/compose.php?mailbox=$urlMailbox", _("Compose"), 'right');
123 echo " \n";
124 displayInternalLink ("src/addressbook.php", _("Addresses"), 'right');
125 echo " \n";
126 displayInternalLink ("src/folders.php", _("Folders"), 'right');
127 echo " \n";
128 displayInternalLink ("src/options.php", _("Options"), 'right');
129 echo " \n";
130 displayInternalLink ("src/search.php?mailbox=$urlMailbox", _("Search"), 'right');
131 echo " \n";
132 displayInternalLink ("src/help.php", _("Help"), 'right');
133 echo " \n";
137 echo " </TD><TD ALIGN=right>\n";
138 echo ($hide_sm_attributions ?
' ' :
139 "<A HREF=\"http://www.squirrelmail.org/\" TARGET=\"_blank\">SquirrelMail</A>\n");