Adding comp_in_new fxn back to message list page. CVS sure is slow these days. :(
[squirrelmail.git] / functions / page_header.php
CommitLineData
59177427 1<?php
7350889b 2
35586184 3/**
4 * page_header.php
5 *
6c84ba1e 6 * Copyright (c) 1999-2005 The SquirrelMail Project Team
35586184 7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * Prints the page header (duh)
10 *
31841a9e 11 * @version $Id$
d6c32258 12 * @package squirrelmail
35586184 13 */
14
d6c32258 15/** Include required files from SM */
b68edc75 16require_once(SM_PATH . 'functions/strings.php');
17require_once(SM_PATH . 'functions/html.php');
18require_once(SM_PATH . 'functions/imap_mailbox.php');
0b97a708 19require_once(SM_PATH . 'functions/global.php');
b68edc75 20
d6c32258 21/**
8b096f0a 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
62b9c984 28 * @param bool frames generate html frameset doctype (since 1.5.1)
8b096f0a 29 * @return void
d6c32258 30 */
62b9c984 31function displayHtmlHeader( $title = 'SquirrelMail', $xtra = '', $do_hook = true, $frames = false ) {
e842b215 32 global $squirrelmail_language;
692155b7 33
0365891c 34 if ( !sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION) ) {
0b97a708 35 global $base_uri;
36 }
b6c283c4 37 global $theme_css, $custom_css, $pageheader_sent;
2c21ef20 38
62b9c984 39 if ($frames) {
40 echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN">';
91e0dccc 41 } else {
62b9c984 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";
2c21ef20 45
fcae5445 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 */
a714cb95 50 if ( !isset( $custom_css ) || $custom_css == 'none' ) {
692155b7 51 if ($theme_css != '') {
fcae5445 52 echo "<link rel=\"stylesheet\" type=\"text/css\" href=\"$theme_css\">";
692155b7 53 }
8f1ba72b 54 } else {
d68323ff 55 echo '<link rel="stylesheet" type="text/css" href="' .
fcae5445 56 $base_uri . 'themes/css/'.$custom_css.'">';
8f1ba72b 57 }
62f7daa5 58
e842b215 59 if ($squirrelmail_language == 'ja_JP') {
683b7853 60 /*
e50f5ac2 61 * force correct detection of charset, when browser does not follow
683b7853 62 * http content-type and tries to detect charset from page content.
63 * Shooting of browser's creator can't be implemented in php.
e50f5ac2 64 * We might get rid of it, if we follow http://www.w3.org/TR/japanese-xml/
683b7853 65 * recommendations and switch to unicode.
e50f5ac2 66 */
e842b215 67 echo "<!-- \xfd\xfe -->\n";
fcae5445 68 echo '<meta http-equiv="Content-type" content="text/html; charset=euc-jp">' . "\n";
e842b215 69 }
62f7daa5 70
237470b4 71 if ($do_hook) {
d68323ff 72 do_hook('generic_header');
237470b4 73 }
62f7daa5 74
5ca4b1ee 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 */
62f7daa5 82 body {
83 voice-family: "\"}\"";
84 voice-family: inherit;
5ca4b1ee 85 width: expression(document.documentElement.clientWidth - 30);
86 }
87-->
88</style>
89
90ECHO;
91
92 echo "\n</head>\n\n";
b6c283c4 93
94 /* this is used to check elsewhere whether we should call this function */
95 $pageheader_sent = TRUE;
a07cd1a4 96}
97
8b096f0a 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 */
d62c4938 105function makeInternalLink($path, $text, $target='') {
0365891c 106 sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
dcc1cc82 107 if ($target != '') {
108 $target = " target=\"$target\"";
109 }
4910106a 110
e50f5ac2 111 // This is an inefficient hook and is only used by
4910106a 112 // one plugin that still needs to patch this code,
e50f5ac2 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?)
4910106a 116 // use for the internal_link hook.
117 //
118 //$hooktext = do_hook_function('internal_link',$text);
119 //if ($hooktext != '')
120 // $text = $hooktext;
121
d62c4938 122 return '<a href="'.$base_uri.$path.'"'.$target.'>'.$text.'</a>';
123}
124
8b096f0a 125/**
126 * Same as makeInternalLink, but echoes it too
127 */
d62c4938 128function displayInternalLink($path, $text, $target='') {
b26d81e5 129 echo makeInternalLink($path, $text, $target);
a07cd1a4 130}
131
8b096f0a 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 */
aca403fa 143function displayPageHeader($color, $mailbox, $xtra='', $session=false) {
715225af 144
0b97a708 145 global $hide_sm_attributions, $PHP_SELF, $frame_top,
1ba8cd6b 146 $compose_new_win, $compose_width, $compose_height,
ce68b76b 147 $provider_name, $provider_uri, $startMessage,
148 $javascript_on, $default_use_mdn, $mdn_user_support;
715225af 149
0365891c 150 sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION );
151 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION );
715225af 152 $module = substr( $PHP_SELF, ( strlen( $PHP_SELF ) - strlen( $base_uri ) ) * -1 );
f3e14140 153 if ($qmark = strpos($module, '?')) {
154 $module = substr($module, 0, $qmark);
155 }
d03f3582 156 if (!isset($frame_top)) {
157 $frame_top = '_top';
158 }
715225af 159
735f6b9c 160 if ($session) {
1a531551 161 $compose_uri = $base_uri.'src/compose.php?mailbox='.urlencode($mailbox).'&amp;attachedmessages=true&amp;session='."$session";
aca403fa 162 } else {
087ce5f8 163 $compose_uri = $base_uri.'src/compose.php?newmessage=1';
1a531551 164 $session = 0;
aca403fa 165 }
62f7daa5 166
04f8889b 167 if( $javascript_on || strpos($xtra, 'new_js_autodetect_results.value') ) {
d62c4938 168
169 switch ( $module ) {
170 case 'src/read_body.php':
171 $js ='';
32485e5e 172
173 // compose in new window code
d62c4938 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 }
1a531551 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.
75442b66 193 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
1a531551 194 "}\n\n";
e346043e 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.
75442b66 202 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
e346043e 203 "}\n\n";
32485e5e 204 }
d62c4938 205
32485e5e 206 // javascript for sending read receipts
207 if($default_use_mdn && $mdn_user_support) {
d62c4938 208 $js .= 'function sendMDN() {'."\n".
32485e5e 209 " mdnuri=window.location+'&sendreceipt=1'; ".
d62c4938 210 "var newwin = window.open(mdnuri,'right');".
1a531551 211 "\n}\n\n";
32485e5e 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 }
d62c4938 219
32485e5e 220 displayHtmlHeader ('SquirrelMail', $js);
221 $onload = $xtra;
d62c4938 222 break;
223 case 'src/compose.php':
224 $js = '<script language="JavaScript" type="text/javascript">' .
225 "\n<!--\n" .
9f2f6126 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";
192cdcf5 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";
9f2f6126 239 }
240 else
241 $js .= "var f = document.forms.length;\n".
d62c4938 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".
d7f8e6e6 252 "}\n".
d62c4938 253 "i++;\n".
d7f8e6e6 254 "}\n".
d62c4938 255 "if( pos >= 0 ) {\n".
256 "document.forms[i-1].elements[pos].focus();\n".
257 "}\n".
258 "}\n";
62f7daa5 259
d62c4938 260 $js .= "// -->\n".
1a531551 261 "</script>\n";
d62c4938 262 $onload = 'onload="checkForm();"';
263 displayHtmlHeader ('SquirrelMail', $js);
62f7daa5 264 break;
d62c4938 265
cc681ac9 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 */
273var 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 */
288function 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...
f603fc95 358 //document.getElementById('msg[' + theRowNum + ']').checked = true;
cc681ac9 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;
f603fc95 370 //document.getElementById('msg[' + theRowNum + ']').checked = true;
cc681ac9 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;
f603fc95 382 //document.getElementById('msg[' + theRowNum + ']').checked = false;
cc681ac9 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
405EOS;
406 $js = "\n".'<script language="JavaScript" type="text/javascript">' .
eaf17634 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";
cc681ac9 426 $onload = '';
427 displayHtmlHeader ('SquirrelMail', $js);
428 break;
429
d62c4938 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".
353616c4 446 "}\n".
d62c4938 447 "i++;\n".
448 "}\n".
449 "if( pos >= 0 ) {\n".
450 "document.forms[i-1].elements[pos].focus();\n".
353616c4 451 "}\n".
1a531551 452 "$xtra\n".
d62c4938 453 "}\n";
62f7daa5 454
d62c4938 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".
75442b66 463 " if (!comp_uri) {\n".
464 ' comp_uri = "'.$compose_uri."\";\n".
465 ' }'. "\n".
d62c4938 466 ' var newwin = window.open(comp_uri' .
467 ', "_blank",'.
468 '"width='.$compose_width. ',height='.$compose_height.
75442b66 469 ',scrollbars=yes,resizable=yes,status=yes");'."\n".
d62c4938 470 "}\n\n";
471
9c3e6cd4 472 }
d62c4938 473 $js .= "// -->\n". "</script>\n";
62f7daa5 474
d62c4938 475 $onload = 'onload="checkForm();"';
476 displayHtmlHeader ('SquirrelMail', $js);
62f7daa5 477 break;
0cba960a 478
d62c4938 479 }
480 } else {
481 /* do not use JavaScript */
482 displayHtmlHeader ('SquirrelMail');
483 $onload = '';
715225af 484 }
485
b01b21d0 486 echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" $onload>\n\n";
a07cd1a4 487 /** Here is the header and wrapping table **/
72520f77 488 $shortBoxName = htmlspecialchars(imap_utf7_decode_local(
91e0dccc 489 readShortMailboxName($mailbox, $delimiter)));
3b7d68e6 490 if ( $shortBoxName == 'INBOX' ) {
7da23762 491 $shortBoxName = _("INBOX");
492 }
b01b21d0 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";
5bb2a991 497 if ( $shortBoxName <> '' && strtolower( $shortBoxName ) <> 'none' ) {
b01b21d0 498 echo ' ' . _("Current Folder") . ": <b>$shortBoxName&nbsp;</b>\n";
5bb2a991 499 } else {
500 echo '&nbsp;';
501 }
b01b21d0 502 echo " </td>\n"
503 . html_tag( 'td', '', 'right' ) ."<b>\n";
80e86e94 504 displayInternalLink ('src/signout.php', _("Sign Out"), $frame_top);
b01b21d0 505 echo "</b></td>\n"
506 . " </tr>\n"
507 . html_tag( 'tr', '', '', $color[4] ) ."\n"
99ea51d3 508 . ($hide_sm_attributions ? html_tag( 'td', '', 'left', '', 'colspan="2"' )
509 : html_tag( 'td', '', 'left' ) )
510 . "\n";
a07cd1a4 511 $urlMailbox = urlencode($mailbox);
e233a3ad 512 echo makeComposeLink('src/compose.php?mailbox='.$urlMailbox.'&amp;startMessage='.$startMessage);
a07cd1a4 513 echo "&nbsp;&nbsp;\n";
21a957a9 514 displayInternalLink ('src/addressbook.php', _("Addresses"));
a07cd1a4 515 echo "&nbsp;&nbsp;\n";
21a957a9 516 displayInternalLink ('src/folders.php', _("Folders"));
a07cd1a4 517 echo "&nbsp;&nbsp;\n";
21a957a9 518 displayInternalLink ('src/options.php', _("Options"));
a07cd1a4 519 echo "&nbsp;&nbsp;\n";
21a957a9 520 displayInternalLink ("src/search.php?mailbox=$urlMailbox", _("Search"));
a07cd1a4 521 echo "&nbsp;&nbsp;\n";
21a957a9 522 displayInternalLink ('src/help.php', _("Help"));
a07cd1a4 523 echo "&nbsp;&nbsp;\n";
524
d68323ff 525 do_hook('menuline');
a07cd1a4 526
99ea51d3 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".
04fa3c41 538 "</table><br />\n\n";
a07cd1a4 539}
2ba13803 540
8b096f0a 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 */
9c3e6cd4 549function compose_Header($color, $mailbox) {
550
d62c4938 551 global $javascript_on;
9c3e6cd4 552
553 /*
d62c4938 554 * Locate the first displayable form element (only when JavaScript on)
555 */
556 if($javascript_on) {
ce68b76b 557 global $base_uri, $PHP_SELF, $data_dir, $username;
d62c4938 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" .
9f2f6126 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";
192cdcf5 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";
9f2f6126 583 }
584 else
585 $js .= "var f = document.forms.length;\n".
d62c4938 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".
9c3e6cd4 596 "}\n".
d62c4938 597 "i++;\n".
9c3e6cd4 598 "}\n".
d62c4938 599 "if( pos >= 0 ) {\n".
600 "document.forms[i-1].elements[pos].focus();\n".
601 "}\n".
602 "}\n";
603 $js .= "// -->\n".
1a531551 604 "</script>\n";
d62c4938 605 $onload = 'onload="checkForm();"';
606 displayHtmlHeader (_("Compose"), $js);
62f7daa5 607 break;
d62c4938 608 }
609 } else {
610 /* javascript off */
611 displayHtmlHeader(_("Compose"));
612 $onload = '';
9c3e6cd4 613 }
614
b01b21d0 615 echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" $onload>\n\n";
9c3e6cd4 616}
e842b215 617
cc681ac9 618?>