Adding comp_in_new fxn back to message list page. CVS sure is slow these days. :(
[squirrelmail.git] / functions / page_header.php
1 <?php
2
3 /**
4 * page_header.php
5 *
6 * Copyright (c) 1999-2005 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * Prints the page header (duh)
10 *
11 * @version $Id$
12 * @package squirrelmail
13 */
14
15 /** Include required files from SM */
16 require_once(SM_PATH . 'functions/strings.php');
17 require_once(SM_PATH . 'functions/html.php');
18 require_once(SM_PATH . 'functions/imap_mailbox.php');
19 require_once(SM_PATH . 'functions/global.php');
20
21 /**
22 * Output a SquirrelMail page header, from <!doctype> to </head>
23 * Always set up the language before calling these functions.
24 *
25 * @param string title the page title, default SquirrelMail.
26 * @param string xtra extra HTML to insert into the header
27 * @param bool do_hook whether to execute hooks, default true
28 * @param bool frames generate html frameset doctype (since 1.5.1)
29 * @return void
30 */
31 function displayHtmlHeader( $title = 'SquirrelMail', $xtra = '', $do_hook = true, $frames = false ) {
32 global $squirrelmail_language;
33
34 if ( !sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION) ) {
35 global $base_uri;
36 }
37 global $theme_css, $custom_css, $pageheader_sent;
38
39 if ($frames) {
40 echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN">';
41 } else {
42 echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">';
43 }
44 echo "\n\n" . html_tag( 'html' ,'' , '', '', 'lang="'.$squirrelmail_language.'"' ) . "\n<head>\n";
45
46 /*
47 * Add closing / to link and meta elements only after switching to xhtml 1.0 Transitional.
48 * It is not compatible with html 4.01 Transitional
49 */
50 if ( !isset( $custom_css ) || $custom_css == 'none' ) {
51 if ($theme_css != '') {
52 echo "<link rel=\"stylesheet\" type=\"text/css\" href=\"$theme_css\">";
53 }
54 } else {
55 echo '<link rel="stylesheet" type="text/css" href="' .
56 $base_uri . 'themes/css/'.$custom_css.'">';
57 }
58
59 if ($squirrelmail_language == 'ja_JP') {
60 /*
61 * force correct detection of charset, when browser does not follow
62 * http content-type and tries to detect charset from page content.
63 * Shooting of browser's creator can't be implemented in php.
64 * We might get rid of it, if we follow http://www.w3.org/TR/japanese-xml/
65 * recommendations and switch to unicode.
66 */
67 echo "<!-- \xfd\xfe -->\n";
68 echo '<meta http-equiv="Content-type" content="text/html; charset=euc-jp">' . "\n";
69 }
70
71 if ($do_hook) {
72 do_hook('generic_header');
73 }
74
75 echo "\n<title>$title</title>$xtra\n";
76
77 /* work around IE6's scrollbar bug */
78 echo <<<ECHO
79 <style type="text/css">
80 <!--
81 /* avoid stupid IE6 bug with frames and scrollbars */
82 body {
83 voice-family: "\"}\"";
84 voice-family: inherit;
85 width: expression(document.documentElement.clientWidth - 30);
86 }
87 -->
88 </style>
89
90 ECHO;
91
92 echo "\n</head>\n\n";
93
94 /* this is used to check elsewhere whether we should call this function */
95 $pageheader_sent = TRUE;
96 }
97
98 /**
99 * Given a path to a SquirrelMail file, return a HTML link to it
100 *
101 * @param string path the SquirrelMail file to link to
102 * @param string text the link text
103 * @param string target the target frame for this link
104 */
105 function makeInternalLink($path, $text, $target='') {
106 sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
107 if ($target != '') {
108 $target = " target=\"$target\"";
109 }
110
111 // This is an inefficient hook and is only used by
112 // one plugin that still needs to patch this code,
113 // plus if we are templat-izing SM, visual hooks
114 // are not needed. However, I am leaving the code
115 // here just in case we find a good (non-visual?)
116 // use for the internal_link hook.
117 //
118 //$hooktext = do_hook_function('internal_link',$text);
119 //if ($hooktext != '')
120 // $text = $hooktext;
121
122 return '<a href="'.$base_uri.$path.'"'.$target.'>'.$text.'</a>';
123 }
124
125 /**
126 * Same as makeInternalLink, but echoes it too
127 */
128 function displayInternalLink($path, $text, $target='') {
129 echo makeInternalLink($path, $text, $target);
130 }
131
132 /**
133 * Outputs a complete SquirrelMail page header, starting with <!doctype> and
134 * including the default menu bar. Uses displayHtmlHeader and takes
135 * JavaScript and locale settings into account.
136 *
137 * @param array color the array of theme colors
138 * @param string mailbox the current mailbox name to display
139 * @param string xtra extra html code to add
140 * @param bool session
141 * @return void
142 */
143 function displayPageHeader($color, $mailbox, $xtra='', $session=false) {
144
145 global $hide_sm_attributions, $PHP_SELF, $frame_top,
146 $compose_new_win, $compose_width, $compose_height,
147 $provider_name, $provider_uri, $startMessage,
148 $javascript_on, $default_use_mdn, $mdn_user_support;
149
150 sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION );
151 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION );
152 $module = substr( $PHP_SELF, ( strlen( $PHP_SELF ) - strlen( $base_uri ) ) * -1 );
153 if ($qmark = strpos($module, '?')) {
154 $module = substr($module, 0, $qmark);
155 }
156 if (!isset($frame_top)) {
157 $frame_top = '_top';
158 }
159
160 if ($session) {
161 $compose_uri = $base_uri.'src/compose.php?mailbox='.urlencode($mailbox).'&amp;attachedmessages=true&amp;session='."$session";
162 } else {
163 $compose_uri = $base_uri.'src/compose.php?newmessage=1';
164 $session = 0;
165 }
166
167 if( $javascript_on || strpos($xtra, 'new_js_autodetect_results.value') ) {
168
169 switch ( $module ) {
170 case 'src/read_body.php':
171 $js ='';
172
173 // compose in new window code
174 if ($compose_new_win == '1') {
175 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
176 $compose_width = '640';
177 }
178 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
179 $compose_height = '550';
180 }
181 $js .= "function comp_in_new_form(comp_uri, button, myform) {\n".
182 ' if (!comp_uri) {'."\n".
183 ' comp_uri = "'.$compose_uri."\";\n".
184 ' }'. "\n".
185 ' comp_uri += "&" + button.name + "=1";'."\n".
186 ' for ( var i=0; i < myform.elements.length; i++ ) {'."\n".
187 ' if ( myform.elements[i].type == "checkbox" && myform.elements[i].checked )'."\n".
188 ' comp_uri += "&" + myform.elements[i].name + "=1";'."\n".
189 ' }'."\n".
190 ' var newwin = window.open(comp_uri' .
191 ', "_blank",'.
192 '"width='.$compose_width. ',height='.$compose_height.
193 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
194 "}\n\n";
195 $js .= "function comp_in_new(comp_uri) {\n".
196 " if (!comp_uri) {\n".
197 ' comp_uri = "'.$compose_uri."\";\n".
198 ' }'. "\n".
199 ' var newwin = window.open(comp_uri' .
200 ', "_blank",'.
201 '"width='.$compose_width. ',height='.$compose_height.
202 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
203 "}\n\n";
204 }
205
206 // javascript for sending read receipts
207 if($default_use_mdn && $mdn_user_support) {
208 $js .= 'function sendMDN() {'."\n".
209 " mdnuri=window.location+'&sendreceipt=1'; ".
210 "var newwin = window.open(mdnuri,'right');".
211 "\n}\n\n";
212 }
213
214 // if any of the above passes, add the JS tags too.
215 if($js) {
216 $js = "\n".'<script language="JavaScript" type="text/javascript">' .
217 "\n<!--\n" . $js . "// -->\n</script>\n";
218 }
219
220 displayHtmlHeader ('SquirrelMail', $js);
221 $onload = $xtra;
222 break;
223 case 'src/compose.php':
224 $js = '<script language="JavaScript" type="text/javascript">' .
225 "\n<!--\n" .
226 "function checkForm() {\n";
227
228 global $action, $reply_focus;
229 if (strpos($action, 'reply') !== FALSE && $reply_focus)
230 {
231 if ($reply_focus == 'select') $js .= "document.forms['compose'].body.select();}\n";
232 else if ($reply_focus == 'focus') $js .= "document.forms['compose'].body.focus();}\n";
233 else if ($reply_focus == 'none') $js .= "}\n";
234 }
235 // no reply focus also applies to composing new messages
236 else if ($reply_focus == 'none')
237 {
238 $js .= "}\n";
239 }
240 else
241 $js .= "var f = document.forms.length;\n".
242 "var i = 0;\n".
243 "var pos = -1;\n".
244 "while( pos == -1 && i < f ) {\n".
245 "var e = document.forms[i].elements.length;\n".
246 "var j = 0;\n".
247 "while( pos == -1 && j < e ) {\n".
248 "if ( document.forms[i].elements[j].type == 'text' ) {\n".
249 "pos = j;\n".
250 "}\n".
251 "j++;\n".
252 "}\n".
253 "i++;\n".
254 "}\n".
255 "if( pos >= 0 ) {\n".
256 "document.forms[i-1].elements[pos].focus();\n".
257 "}\n".
258 "}\n";
259
260 $js .= "// -->\n".
261 "</script>\n";
262 $onload = 'onload="checkForm();"';
263 displayHtmlHeader ('SquirrelMail', $js);
264 break;
265
266 case 'src/right_main.php':
267 // following code graciously stolen from phpMyAdmin project at:
268 // http://www.phpmyadmin.net
269 $js = <<<EOS
270 /**
271 * This array is used to remember mark status of rows in browse mode
272 */
273 var marked_row = new Array;
274
275
276 /**
277 * Sets/unsets the pointer and marker in browse mode
278 *
279 * @param object the table row
280 * @param integer the row number
281 * @param string the action calling this script (over, out or click)
282 * @param string the default background color
283 * @param string the color to use for mouseover
284 * @param string the color to use for marking a row
285 *
286 * @return boolean whether pointer is set or not
287 */
288 function setPointer(theRow, theRowNum, theAction, theDefaultColor, thePointerColor, theMarkColor)
289 {
290 var theCells = null;
291
292 // 1. Pointer and mark feature are disabled or the browser can't get the
293 // row -> exits
294 if ((thePointerColor == '' && theMarkColor == '')
295 || typeof(theRow.style) == 'undefined') {
296 return false;
297 }
298
299 // 2. Gets the current row and exits if the browser can't get it
300 if (typeof(document.getElementsByTagName) != 'undefined') {
301 theCells = theRow.getElementsByTagName('td');
302 }
303 else if (typeof(theRow.cells) != 'undefined') {
304 theCells = theRow.cells;
305 }
306 else {
307 return false;
308 }
309
310 // 3. Gets the current color...
311 var rowCellsCnt = theCells.length;
312 var domDetect = null;
313 var currentColor = null;
314 var newColor = null;
315 // 3.1 ... with DOM compatible browsers except Opera that does not return
316 // valid values with "getAttribute"
317 if (typeof(window.opera) == 'undefined'
318 && typeof(theCells[0].getAttribute) != 'undefined') {
319 currentColor = theCells[0].getAttribute('bgcolor');
320 domDetect = true;
321 }
322 // 3.2 ... with other browsers
323 else {
324 currentColor = theCells[0].style.backgroundColor;
325 domDetect = false;
326 } // end 3
327
328 // 3.3 ... Opera changes colors set via HTML to rgb(r,g,b) format so fix it
329 if (currentColor.indexOf("rgb") >= 0)
330 {
331 var rgbStr = currentColor.slice(currentColor.indexOf('(') + 1,
332 currentColor.indexOf(')'));
333 var rgbValues = rgbStr.split(",");
334 currentColor = "#";
335 var hexChars = "0123456789ABCDEF";
336 for (var i = 0; i < 3; i++)
337 {
338 var v = rgbValues[i].valueOf();
339 currentColor += hexChars.charAt(v/16) + hexChars.charAt(v%16);
340 }
341 }
342
343 // 4. Defines the new color
344 // 4.1 Current color is the default one
345 if (currentColor == ''
346 || currentColor.toLowerCase() == theDefaultColor.toLowerCase()) {
347 if (theAction == 'over' && thePointerColor != '') {
348 newColor = thePointerColor;
349 }
350 else if (theAction == 'click' && theMarkColor != '') {
351 newColor = theMarkColor;
352 marked_row[theRowNum] = true;
353 // deactivated onclick marking of the checkbox because it's also executed
354 // when an action (clicking on the checkbox itself) on a single item is
355 // performed. Then the checkbox would get deactived, even though we need
356 // it activated. Maybe there is a way to detect if the row was clicked,
357 // and not an item therein...
358 //document.getElementById('msg[' + theRowNum + ']').checked = true;
359 }
360 }
361 // 4.1.2 Current color is the pointer one
362 else if (currentColor.toLowerCase() == thePointerColor.toLowerCase()
363 && (typeof(marked_row[theRowNum]) == 'undefined' || !marked_row[theRowNum])) {
364 if (theAction == 'out') {
365 newColor = theDefaultColor;
366 }
367 else if (theAction == 'click' && theMarkColor != '') {
368 newColor = theMarkColor;
369 marked_row[theRowNum] = true;
370 //document.getElementById('msg[' + theRowNum + ']').checked = true;
371 }
372 }
373 // 4.1.3 Current color is the marker one
374 else if (currentColor.toLowerCase() == theMarkColor.toLowerCase()) {
375 if (theAction == 'click') {
376 newColor = (thePointerColor != '')
377 ? thePointerColor
378 : theDefaultColor;
379 marked_row[theRowNum] = (typeof(marked_row[theRowNum]) == 'undefined' || !marked_row[theRowNum])
380 ? true
381 : null;
382 //document.getElementById('msg[' + theRowNum + ']').checked = false;
383 }
384 } // end 4
385
386 // 5. Sets the new color...
387 if (newColor) {
388 var c = null;
389 // 5.1 ... with DOM compatible browsers except Opera
390 if (domDetect) {
391 for (c = 0; c < rowCellsCnt; c++) {
392 theCells[c].setAttribute('bgcolor', newColor, 0);
393 } // end for
394 }
395 // 5.2 ... with other browsers
396 else {
397 for (c = 0; c < rowCellsCnt; c++) {
398 theCells[c].style.backgroundColor = newColor;
399 }
400 }
401 } // end 5
402
403 return true;
404 } // end of the 'setPointer()' function
405 EOS;
406 $js = "\n".'<script language="JavaScript" type="text/javascript">' .
407 "\n<!--\n" . $js;
408 if ($compose_new_win == '1') {
409 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
410 $compose_width = '640';
411 }
412 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
413 $compose_height = '550';
414 }
415 $js .= "function comp_in_new(comp_uri) {\n".
416 " if (!comp_uri) {\n".
417 ' comp_uri = "'.$compose_uri."\";\n".
418 ' }'. "\n".
419 ' var newwin = window.open(comp_uri' .
420 ', "_blank",'.
421 '"width='.$compose_width. ',height='.$compose_height.
422 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
423 "}\n\n";
424 }
425 $js .= "// -->\n</script>\n";
426 $onload = '';
427 displayHtmlHeader ('SquirrelMail', $js);
428 break;
429
430 default:
431 $js = '<script language="JavaScript" type="text/javascript">' .
432 "\n<!--\n" .
433 "function checkForm() {\n".
434 "var f = document.forms.length;\n".
435 "var i = 0;\n".
436 "var pos = -1;\n".
437 "while( pos == -1 && i < f ) {\n".
438 "var e = document.forms[i].elements.length;\n".
439 "var j = 0;\n".
440 "while( pos == -1 && j < e ) {\n".
441 "if ( document.forms[i].elements[j].type == 'text' " .
442 "|| document.forms[i].elements[j].type == 'password' ) {\n".
443 "pos = j;\n".
444 "}\n".
445 "j++;\n".
446 "}\n".
447 "i++;\n".
448 "}\n".
449 "if( pos >= 0 ) {\n".
450 "document.forms[i-1].elements[pos].focus();\n".
451 "}\n".
452 "$xtra\n".
453 "}\n";
454
455 if ($compose_new_win == '1') {
456 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
457 $compose_width = '640';
458 }
459 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
460 $compose_height = '550';
461 }
462 $js .= "function comp_in_new(comp_uri) {\n".
463 " if (!comp_uri) {\n".
464 ' comp_uri = "'.$compose_uri."\";\n".
465 ' }'. "\n".
466 ' var newwin = window.open(comp_uri' .
467 ', "_blank",'.
468 '"width='.$compose_width. ',height='.$compose_height.
469 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
470 "}\n\n";
471
472 }
473 $js .= "// -->\n". "</script>\n";
474
475 $onload = 'onload="checkForm();"';
476 displayHtmlHeader ('SquirrelMail', $js);
477 break;
478
479 }
480 } else {
481 /* do not use JavaScript */
482 displayHtmlHeader ('SquirrelMail');
483 $onload = '';
484 }
485
486 echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" $onload>\n\n";
487 /** Here is the header and wrapping table **/
488 $shortBoxName = htmlspecialchars(imap_utf7_decode_local(
489 readShortMailboxName($mailbox, $delimiter)));
490 if ( $shortBoxName == 'INBOX' ) {
491 $shortBoxName = _("INBOX");
492 }
493 echo "<a name=\"pagetop\"></a>\n"
494 . html_tag( 'table', '', '', $color[4], 'border="0" width="100%" cellspacing="0" cellpadding="2"' ) ."\n"
495 . html_tag( 'tr', '', '', $color[9] ) ."\n"
496 . html_tag( 'td', '', 'left' ) ."\n";
497 if ( $shortBoxName <> '' && strtolower( $shortBoxName ) <> 'none' ) {
498 echo ' ' . _("Current Folder") . ": <b>$shortBoxName&nbsp;</b>\n";
499 } else {
500 echo '&nbsp;';
501 }
502 echo " </td>\n"
503 . html_tag( 'td', '', 'right' ) ."<b>\n";
504 displayInternalLink ('src/signout.php', _("Sign Out"), $frame_top);
505 echo "</b></td>\n"
506 . " </tr>\n"
507 . html_tag( 'tr', '', '', $color[4] ) ."\n"
508 . ($hide_sm_attributions ? html_tag( 'td', '', 'left', '', 'colspan="2"' )
509 : html_tag( 'td', '', 'left' ) )
510 . "\n";
511 $urlMailbox = urlencode($mailbox);
512 echo makeComposeLink('src/compose.php?mailbox='.$urlMailbox.'&amp;startMessage='.$startMessage);
513 echo "&nbsp;&nbsp;\n";
514 displayInternalLink ('src/addressbook.php', _("Addresses"));
515 echo "&nbsp;&nbsp;\n";
516 displayInternalLink ('src/folders.php', _("Folders"));
517 echo "&nbsp;&nbsp;\n";
518 displayInternalLink ('src/options.php', _("Options"));
519 echo "&nbsp;&nbsp;\n";
520 displayInternalLink ("src/search.php?mailbox=$urlMailbox", _("Search"));
521 echo "&nbsp;&nbsp;\n";
522 displayInternalLink ('src/help.php', _("Help"));
523 echo "&nbsp;&nbsp;\n";
524
525 do_hook('menuline');
526
527 echo " </td>\n";
528
529 if (!$hide_sm_attributions)
530 {
531 echo html_tag( 'td', '', 'right' ) ."\n";
532 if (!isset($provider_uri)) $provider_uri= 'http://www.squirrelmail.org/';
533 if (!isset($provider_name)) $provider_name= 'SquirrelMail';
534 echo '<a href="'.$provider_uri.'" target="_blank">'.$provider_name.'</a>';
535 echo "</td>\n";
536 }
537 echo " </tr>\n".
538 "</table><br />\n\n";
539 }
540
541 /**
542 * Blatantly copied/truncated/modified from displayPageHeader.
543 * Outputs a page header specifically for the compose_in_new popup window
544 *
545 * @param array color the array of theme colors
546 * @param string mailbox the current mailbox name to display
547 * @return void
548 */
549 function compose_Header($color, $mailbox) {
550
551 global $javascript_on;
552
553 /*
554 * Locate the first displayable form element (only when JavaScript on)
555 */
556 if($javascript_on) {
557 global $base_uri, $PHP_SELF, $data_dir, $username;
558
559 $module = substr( $PHP_SELF, ( strlen( $PHP_SELF ) - strlen( $base_uri ) ) * -1 );
560
561 switch ( $module ) {
562 case 'src/search.php':
563 $pos = getPref($data_dir, $username, 'search_pos', 0 ) - 1;
564 $onload = "onload=\"document.forms[$pos].elements[2].focus();\"";
565 displayHtmlHeader (_("Compose"));
566 break;
567 default:
568 $js = '<script language="JavaScript" type="text/javascript">' .
569 "\n<!--\n" .
570 "function checkForm() {\n";
571
572 global $action, $reply_focus;
573 if (strpos($action, 'reply') !== FALSE && $reply_focus)
574 {
575 if ($reply_focus == 'select') $js .= "document.forms['compose'].body.select();}\n";
576 else if ($reply_focus == 'focus') $js .= "document.forms['compose'].body.focus();}\n";
577 else if ($reply_focus == 'none') $js .= "}\n";
578 }
579 // no reply focus also applies to composing new messages
580 else if ($reply_focus == 'none')
581 {
582 $js .= "}\n";
583 }
584 else
585 $js .= "var f = document.forms.length;\n".
586 "var i = 0;\n".
587 "var pos = -1;\n".
588 "while( pos == -1 && i < f ) {\n".
589 "var e = document.forms[i].elements.length;\n".
590 "var j = 0;\n".
591 "while( pos == -1 && j < e ) {\n".
592 "if ( document.forms[i].elements[j].type == 'text' ) {\n".
593 "pos = j;\n".
594 "}\n".
595 "j++;\n".
596 "}\n".
597 "i++;\n".
598 "}\n".
599 "if( pos >= 0 ) {\n".
600 "document.forms[i-1].elements[pos].focus();\n".
601 "}\n".
602 "}\n";
603 $js .= "// -->\n".
604 "</script>\n";
605 $onload = 'onload="checkForm();"';
606 displayHtmlHeader (_("Compose"), $js);
607 break;
608 }
609 } else {
610 /* javascript off */
611 displayHtmlHeader(_("Compose"));
612 $onload = '';
613 }
614
615 echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" $onload>\n\n";
616 }
617
618 ?>