Source for file read_body.php

Documentation is available at read_body.php

  1. <?php
  3. /**
  4. * read_body.php
  5. *
  6. * This file is used for reading the msgs array and displaying
  7. * the resulting emails in the right frame.
  8. *
  9. * @copyright 1999-2020 The SquirrelMail Project Team
  10. * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  11. * @version $Id: read_body.php 14840 2020年01月07日 07:42:38Z pdontthink $
  12. * @package squirrelmail
  13. */
  15. /** This is the read_body page */
  16. define ('PAGE_NAME', 'read_body');
  18. /**
  19. * Path for SquirrelMail required files.
  20. * @ignore
  21. */
  22. define ('SM_PATH','../');
  24. /* SquirrelMail required files. */
  25. require_once(SM_PATH . 'include/validate.php');
  26. require_once(SM_PATH . 'functions/imap.php');
  27. require_once(SM_PATH . 'functions/mime.php');
  28. require_once(SM_PATH . 'functions/date.php');
  29. require_once(SM_PATH . 'functions/url_parser.php');
  30. require_once(SM_PATH . 'functions/html.php');
  32. /**
  33. * Given an IMAP message id number, this will look it up in the cached
  34. * and sorted msgs array and return the index. Used for finding the next
  35. * and previous messages.
  36. *
  37. * @return the index of the next valid message from the array
  38. */
  39. function findNextMessage ($passed_id) {
  40. global $msort, $msgs, $sort,
  41. $thread_sort_messages, $allow_server_sort ,
  42. $server_sort_array;
  43. if (!is_array ($server_sort_array)) {
  44. $thread_sort_messages = 0;
  45. $allow_server_sort = FALSE;
  46. }
  47. $result = -1;
  48. if ($thread_sort_messages || $allow_server_sort) {
  49. $count = count ($server_sort_array) - 1;
  50. foreach($server_sort_array as $key=>$value) {
  51. if ($passed_id == $value) {
  52. if ($key == $count) {
  53. break;
  54. }
  55. $result = $server_sort_array[$key + 1];
  56. break;
  57. }
  58. }
  59. } else {
  60. if (is_array ($msort)) {
  61. for (reset ($msort); ($key = key ($msort)), (isset($key)); next ($msort)) {
  62. if ($passed_id == $msgs[$key]['ID']) {
  63. next ($msort);
  64. $key = key ($msort);
  65. if (isset($key)){
  66. $result = $msgs[$key]['ID'];
  67. break;
  68. }
  69. }
  70. }
  71. }
  72. }
  73. return $result;
  74. }
  76. /** returns the index of the previous message from the array. */
  77. function findPreviousMessage ($numMessages, $passed_id) {
  78. global $msort, $sort, $msgs,
  79. $thread_sort_messages,
  80. $allow_server_sort , $server_sort_array;
  81. $result = -1;
  82. if (!is_array ($server_sort_array)) {
  83. $thread_sort_messages = 0;
  84. $allow_server_sort = FALSE;
  85. }
  86. if ($thread_sort_messages || $allow_server_sort ) {
  87. foreach($server_sort_array as $key=>$value) {
  88. if ($passed_id == $value) {
  89. if ($key == 0) {
  90. break;
  91. }
  92. $result = $server_sort_array[$key - 1];
  93. break;
  94. }
  95. }
  96. } else {
  97. if (is_array ($msort)) {
  98. for (reset ($msort); ($key = key ($msort)), (isset($key)); next ($msort)) {
  99. if ($passed_id == $msgs[$key]['ID']) {
  100. prev ($msort);
  101. $key = key ($msort);
  102. if (isset($key)) {
  103. $result = $msgs[$key]['ID'];
  104. break;
  105. }
  106. }
  107. }
  108. }
  109. }
  110. return $result;
  111. }
  113. /**
  114. * Displays a link to a page where the message is displayed more
  115. * "printer friendly".
  116. */
  117. function printer_friendly_link ($mailbox, $passed_id, $passed_ent_id, $color) {
  118. global $javascript_on;
  120. /* hackydiehack */
  122. // Pull "view_unsafe_images" from the URL to find out if the unsafe images
  123. // should be displayed. The default is not to display unsafe images.
  124. if( !sqgetGlobalVar ('view_unsafe_images', $view_unsafe_images, SQ_GET ) ) {
  125. // If "view_unsafe_images" isn't part of the URL, default to not
  126. // displaying unsafe images.
  127. $view_unsafe_images = false;
  128. } else {
  129. // If "view_unsafe_images" is part of the URL, display unsafe images
  130. // regardless of the value of the URL variable.
  131. // FIXME: Do we really want to display the unsafe images regardless of the value in URL variable?
  132. $view_unsafe_images = true;
  133. }
  135. $params = '?passed_ent_id=' . urlencode ($passed_ent_id) .
  136. '&mailbox=' . urlencode ($mailbox) .
  137. '&passed_id=' . urlencode ($passed_id).
  138. '&view_unsafe_images='. (bool) $view_unsafe_images;
  140. $print_text = _ ("View Printable Version");
  142. $result = '';
  143. /* Output the link. */
  144. if ($javascript_on) {
  145. $result = '<script language="javascript" type="text/javascript">' . "\n" .
  146. '<!--' . "\n" .
  147. " function printFormat() {\n" .
  148. ' window.open("../src/printer_friendly_main.php' .
  149. $params . '","Print","width=800,height=600");' . "\n".
  150. " }\n" .
  151. "// -->\n" .
  152. '</script>' .
  153. "<a href=\"javascript:printFormat();\" style=\"white-space: nowrap;\">$print_text</a>";
  154. } else {
  155. $result = '<a target="_blank" href="../src/printer_friendly_bottom.php' .
  156. "$params\" style=\"white-space: nowrap;\">$print_text</a>";
  157. }
  158. return $result;
  159. }
  161. function ServerMDNSupport ($read) {
  162. /* escaping $ doesn't work -> \x36 */
  163. $ret = preg_match ('/(\x36MDNSent|\\\\\*)/i', $read);
  164. return $ret;
  165. }
  167. function SendMDN ( $mailbox, $passed_id, $sender, $message, $imapConnection) {
  168. global $username, $attachment_dir , $color, $default_move_to_sent,
  169. $version, $attachments, $squirrelmail_language, $default_charset ,
  170. $languages , $useSendmail , $domain , $sent_folder,
  171. $popuser, $data_dir ;
  173. sqgetGlobalVar ('SERVER_NAME', $SERVER_NAME, SQ_SERVER );
  175. $header = $message->rfc822_header;
  176. $hashed_attachment_dir = getHashedDir ($username, $attachment_dir);
  178. $rfc822_header = new Rfc822Header ();
  179. $content_type = new ContentType ('multipart/report');
  180. $content_type->properties['report-type']='disposition-notification';
  183. if ($default_charset) {
  184. $content_type->properties['charset']=$default_charset;
  185. }
  186. $rfc822_header->content_type = $content_type;
  187. $rfc822_header->to[] = $header->dnt;
  188. $rfc822_header->subject = _ ("Read:") . ' ' . decodeHeader ($header->subject, true, false);
  190. // FIXME: use identity.php from SM 1.5. Change this also in compose.php
  192. $reply_to = '';
  193. if (isset($identity) && $identity != 'default') {
  194. $from_mail = getPref ($data_dir, $username,
  195. 'email_address' . $identity);
  196. $full_name = getPref ($data_dir, $username,
  197. 'full_name' . $identity);
  198. $from_addr = '"'.$full_name.'" <'.$from_mail.'>';
  199. $reply_to = getPref ($data_dir, $username,
  200. 'reply_to' . $identity);
  201. } else {
  202. $from_mail = getPref ($data_dir, $username, 'email_address');
  203. $full_name = getPref ($data_dir, $username, 'full_name');
  204. $from_addr = '"'.$full_name.'" <'.$from_mail.'>';
  205. $reply_to = getPref ($data_dir, $username,'reply_to');
  206. }
  208. // Patch #793504 Return Receipt Failing with <@> from Tim Craig (burny_md)
  209. // This merely comes from compose.php and only happens when there is no
  210. // email_addr specified in user's identity (which is the startup config)
  211. if (preg_match ('|^([^@%/]+)[@%/](.+)$|', $username, $usernamedata)) {
  212. $popuser = $usernamedata[1];
  213. $domain = $usernamedata[2];
  214. unset($usernamedata);
  215. } else {
  216. $popuser = $username;
  217. }
  219. if (!$from_mail) {
  220. $from_mail = "$popuser@$domain";
  221. $from_addr = $from_mail;
  222. }
  224. $rfc822_header->from = $rfc822_header->parseAddress ($from_addr,true);
  225. if ($reply_to) {
  226. $rfc822_header->reply_to = $rfc822_header->parseAddress ($reply_to,true);
  227. }
  229. // part 1 (RFC2298)
  230. $senton = getLongDateString ( $header->date , $header->date_unparsed );
  231. $to_array = $header->to;
  232. $to = '';
  233. foreach ($to_array as $line) {
  234. $to .= ' '.$line->getAddress();
  235. }
  236. $now = getLongDateString ( time () );
  238. $body = _ ("Your message") . "\r\n\r\n" .
  239. "\t" . _ ("To") . ': ' . decodeHeader ($to,false,false,true) . "\r\n" .
  240. "\t" . _ ("Subject") . ': ' . decodeHeader ($header->subject,false,false,true) . "\r\n" .
  241. "\t" . _ ("Sent") . ': ' . $senton . "\r\n" .
  242. "\r\n" .
  243. sprintf ( _ ("Was displayed on %s"), $now );
  245. $special_encoding = '';
  246. if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
  247. function_exists ($languages[$squirrelmail_language]['XTRA_CODE'])) {
  248. $body = $languages[$squirrelmail_language]['XTRA_CODE']('encode', $body);
  249. if (strtolower ($default_charset) == 'iso-2022-jp') {
  250. if (mb_detect_encoding ($body) == 'ASCII') {
  251. $special_encoding = '8bit';
  252. } else {
  253. $body = mb_convert_encoding ($body, 'JIS');
  254. $special_encoding = '7bit';
  255. }
  256. }
  257. } elseif (sq_is8bit ($body)) {
  258. // detect 8bit symbols added by translations
  259. $special_encoding = '8bit';
  260. }
  261. $part1 = new Message ();
  262. $part1->setBody($body);
  263. $mime_header = new MessageHeader ;
  264. $mime_header->type0 = 'text';
  265. $mime_header->type1 = 'plain';
  266. if ($special_encoding) {
  267. $mime_header->encoding = $special_encoding;
  268. } else {
  269. $mime_header->encoding = '7bit';
  270. }
  271. if ($default_charset) {
  272. $mime_header->parameters['charset'] = $default_charset;
  273. }
  274. $part1->mime_header = $mime_header;
  276. // part2 (RFC2298)
  277. $original_recipient = $to;
  278. $original_message_id = $header->message_id;
  280. $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n";
  281. if ($original_recipient != '') {
  282. $report .= "Original-Recipient : $original_recipient\r\n";
  283. }
  284. $final_recipient = $sender;
  285. $report .= "Final-Recipient: rfc822; $final_recipient\r\n" .
  286. "Original-Message-ID : $original_message_id\r\n" .
  287. "Disposition: manual-action/MDN-sent-manually; displayed\r\n";
  289. $part2 = new Message ();
  290. $part2->setBody($report);
  291. $mime_header = new MessageHeader ;
  292. $mime_header->type0 = 'message';
  293. $mime_header->type1 = 'disposition-notification';
  294. $mime_header->encoding = '7bit';
  295. $part2->mime_header = $mime_header;
  297. $composeMessage = new Message ();
  298. $composeMessage->rfc822_header = $rfc822_header;
  299. $composeMessage->addEntity($part1);
  300. $composeMessage->addEntity($part2);
  303. if ($useSendmail) {
  304. require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php');
  306. // Check for outdated configuration
  307. if (!isset($sendmail_args)) {
  308. if ($sendmail_path=='/var/qmail/bin/qmail-inject') {
  309. $sendmail_args = '';
  310. } else {
  311. $sendmail_args = '-i -t';
  312. }
  313. }
  314. $deliver = new Deliver_SendMail (array('sendmail_args'=>$sendmail_args));
  315. $stream = $deliver->initStream($composeMessage,$sendmail_path);
  316. } else {
  317. require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php');
  318. $deliver = new Deliver_SMTP ();
  321. $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false;
  323. $user = '';
  324. $pass = '';
  325. if (empty($pop_before_smtp_host))
  326. $pop_before_smtp_host = $smtpServerAddress;
  328. get_smtp_user ($user, $pass);
  330. $stream = $deliver->initStream($composeMessage,$domain,0,
  331. $smtpServerAddress, $smtpPort, $user, $pass, $authPop, $pop_before_smtp_host);
  332. }
  333. $success = false;
  334. if ($stream) {
  335. $deliver->mail ($composeMessage, $stream);
  336. $success = $deliver->finalizeStream($stream);
  337. }
  338. if (!$success) {
  339. $msg = _ ("Message not sent.") .' '. _ ("Server replied:") .
  340. "\n<blockquote>\n" . $deliver->dlv_msg . '<br />' .
  341. $deliver->dlv_ret_nr . ' ' .
  342. $deliver->dlv_server_msg . "</blockquote>\n\n";
  343. require_once(SM_PATH . 'functions/display_messages.php');
  344. plain_error_message ($msg, $color);
  345. } else {
  346. unset ($deliver);
  348. // copy message to sent folder
  349. $move_to_sent = getPref ($data_dir,$username,'move_to_sent', $default_move_to_sent);
  350. if (isset($default_move_to_sent) && ($default_move_to_sent != 0)) {
  351. $svr_allow_sent = true;
  352. } else {
  353. $svr_allow_sent = false;
  354. }
  356. if (isset($sent_folder) && (($sent_folder != '') || ($sent_folder != 'none'))
  357. && sqimap_mailbox_exists ( $imapConnection, $sent_folder)) {
  358. $fld_sent = true;
  359. } else {
  360. $fld_sent = false;
  361. }
  363. if ((isset($move_to_sent) && ($move_to_sent != 0)) || (!isset($move_to_sent))) {
  364. $lcl_allow_sent = true;
  365. } else {
  366. $lcl_allow_sent = false;
  367. }
  369. if (($fld_sent && $svr_allow_sent && !$lcl_allow_sent) || ($fld_sent && $lcl_allow_sent)) {
  370. require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php');
  371. $imap_deliver = new Deliver_IMAP ();
  372. $imap_deliver->mail ($composeMessage, $imapConnection, 0, 0, $imapConnection, $sent_folder);
  373. unset ($imap_deliver);
  374. }
  375. }
  376. return $success;
  377. }
  379. function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id, $uid_support) {
  380. $sg = $set?'+':'-';
  381. $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)';
  382. $read = sqimap_run_command ($imapConnection, $cmd, true, $response,
  383. $readmessage, $uid_support);
  384. }
  386. function formatRecipientString ($recipients, $item ) {
  387. global $show_more_cc, $show_more, $show_more_bcc,
  388. $PHP_SELF;
  390. $string = '';
  391. if ((is_array ($recipients)) && (isset($recipients[0]))) {
  392. $show = false;
  394. if ($item == 'to') {
  395. if ($show_more) {
  396. $show = true;
  397. $url = set_url_var ($PHP_SELF, 'show_more',0);
  398. } else {
  399. $url = set_url_var ($PHP_SELF, 'show_more',1);
  400. }
  401. } else if ($item == 'cc') {
  402. if ($show_more_cc) {
  403. $show = true;
  404. $url = set_url_var ($PHP_SELF, 'show_more_cc',0);
  405. } else {
  406. $url = set_url_var ($PHP_SELF, 'show_more_cc',1);
  407. }
  408. } else if ($item == 'bcc') {
  409. if ($show_more_bcc) {
  410. $show = true;
  411. $url = set_url_var ($PHP_SELF, 'show_more_bcc',0);
  412. } else {
  413. $url = set_url_var ($PHP_SELF, 'show_more_bcc',1);
  414. }
  415. }
  417. $cnt = count ($recipients);
  418. foreach($recipients as $r) {
  419. $add = decodeHeader ($r->getAddress(true));
  420. if ($string) {
  421. $string .= '<br />' . $add;
  422. } else {
  423. $string = $add;
  424. if ($cnt > 1) {
  425. $string .= '&nbsp;(<a href="'.$url;
  426. if ($show) {
  427. $string .= '">'._ ("less").'</a>)';
  428. } else {
  429. $string .= '">'._ ("more").'</a>)';
  430. break;
  431. }
  432. }
  433. }
  434. }
  435. }
  436. return $string;
  437. }
  439. function formatEnvheader ($mailbox, $passed_id, $passed_ent_id, $message,
  440. $color, $FirstTimeSee) {
  442. $show_xmailer_default, $mdn_user_support, $PHP_SELF, $javascript_on,
  443. $squirrelmail_language;
  445. $header = $message->rfc822_header;
  446. $env = array();
  447. $env[_ ("Subject")] = decodeHeader ($header->subject);
  448. $from_name = $header->getAddr_s('from');
  449. if (!$from_name) {
  450. $from_name = $header->getAddr_s('sender');
  451. if (!$from_name) {
  452. $from_name = _ ("Unknown sender");
  453. }
  454. }
  455. $env[_ ("From")] = decodeHeader ($from_name);
  456. $env[_ ("Date")] = getLongDateString ($header->date , $header->date_unparsed);
  457. $env[_ ("To")] = formatRecipientString ($header->to, "to");
  458. $env[_ ("Cc")] = formatRecipientString ($header->cc, "cc");
  459. $env[_ ("Bcc")] = formatRecipientString ($header->bcc, "bcc");
  460. if ($default_use_priority) {
  461. $env[_ ("Priority")] = sm_encode_html_special_chars (getPriorityStr ($header->priority));
  462. }
  463. if ($show_xmailer_default) {
  464. $env[_ ("Mailer")] = decodeHeader ($header->xmailer);
  465. }
  466. if ($default_use_mdn) {
  467. if ($mdn_user_support) {
  468. if ($header->dnt) {
  469. if ($message->is_mdnsent) {
  470. $env[_ ("Read receipt")] = _ ("sent");
  471. } else {
  472. $env[_ ("Read receipt")] = _ ("requested");
  473. if (!(handleAsSent ($mailbox) ||
  474. $message->is_deleted ||
  475. $passed_ent_id)) {
  476. $mdn_url = $PHP_SELF;
  477. $mdn_url = set_url_var ($mdn_url, 'mailbox', urlencode ($mailbox));
  478. $mdn_url = set_url_var ($mdn_url, 'passed_id', $passed_id);
  479. $mdn_url = set_url_var ($mdn_url, 'passed_ent_id', $passed_ent_id);
  480. $mdn_url = set_url_var ($mdn_url, 'sendreceipt', 1);
  481. if ($FirstTimeSee && $javascript_on) {
  482. $script = '<script language="JavaScript" type="text/javascript">' . "\n";
  483. $script .= '<!--'. "\n";
  484. $script .= 'if(window.confirm("' .
  485. _ ("The message sender has requested a response to indicate that you have read this message. Would you like to send a receipt?") .
  486. '")) { '."\n" .
  487. ' sendMDN()'.
  488. '}' . "\n";
  489. $script .= '// -->'. "\n";
  490. $script .= '</script>'. "\n";
  491. echo $script;
  492. }
  493. $env[_ ("Read receipt")] .= '&nbsp;<a href="' . $mdn_url . '">[' .
  494. _ ("Send read receipt now") . ']</a>';
  495. }
  496. }
  497. }
  498. }
  499. }
  501. $s = '<table width="100%" cellpadding="0" cellspacing="2" border="0"';
  502. $s .= ' align="center" bgcolor="'.$color[0].'">';
  503. foreach ($env as $key => $val) {
  504. if ($val) {
  505. $s .= '<tr>';
  506. $s .= html_tag ('td', '<b>' . $key . ':&nbsp;&nbsp;</b>', 'right', '', 'valign="top" width="20%"') . "\n";
  507. $s .= html_tag ('td', $val, 'left', '', 'valign="top" width="80%"') . "\n";
  508. $s .= '</tr>';
  509. }
  510. }
  511. echo '<table bgcolor="'.$color[9].'" width="100%" cellpadding="1"'.
  512. ' cellspacing="0" border="0" align="center">'."\n";
  513. echo '<tr><td height="5" colspan="2" bgcolor="'.
  514. $color[4].'"></td></tr><tr><td align="center">'."\n";
  515. echo $s;
  516. do_hook ('read_body_header');
  517. formatToolbar ($mailbox, $passed_id, $passed_ent_id, $message, $color);
  518. echo '</table>';
  519. echo '</td></tr><tr><td height="5" colspan="2" bgcolor="'.$color[4].'"></td></tr>'."\n";
  520. echo '</table>';
  521. }
  523. function formatMenuBar ($mailbox, $passed_id, $passed_ent_id, $message, $mbx_response) {
  524. global $base_uri, $draft_folder, $where, $what, $color, $sort,
  525. $startMessage, $PHP_SELF, $save_as_draft,
  526. $enable_forward_as_attachment;
  528. // wrapping is ok: $topbar_delimiter = '&nbsp;|&nbsp;';
  529. $topbar_delimiter = '&nbsp;| ';
  530. $urlMailbox = urlencode ($mailbox);
  531. $s = '<table width="100%" cellpadding="3" cellspacing="0" align="center"'.
  532. ' border="0" bgcolor="'.$color[9].'"><tr>' .
  533. html_tag ( 'td', '', 'left', '', 'width="49%"' ) . '<small>';
  535. $msgs_url = $base_uri . 'src/';
  536. if (isset($where) && isset($what)) {
  537. $msgs_url .= 'search.php?smtoken=' . sm_generate_security_token () . '&amp;where=' . urlencode ($where) .
  538. '&amp;what=' . urlencode ($what) . '&amp;mailbox=' . $urlMailbox;
  539. $msgs_str = _ ("Search Results");
  540. } else {
  541. $msgs_url .= 'right_main.php?sort=' . $sort . '&amp;startMessage=' .
  542. $startMessage . '&amp;mailbox=' . $urlMailbox;
  543. $msgs_str = _ ("Message List");
  544. }
  545. $s .= '<a href="' . $msgs_url . '" style="white-space: nowrap;">' . $msgs_str . '</a>';
  547. $delete_url = $base_uri . 'src/delete_message.php?mailbox=' . $urlMailbox .
  548. '&amp;message=' . $passed_id . '&amp;smtoken=' . sm_generate_security_token () . '&amp;';
  549. $unread_url = $base_uri . 'src/';
  550. if (!(isset($passed_ent_id) && $passed_ent_id)) {
  551. if ($where && $what) {
  552. $unread_url .= 'search.php?unread_passed_id=' . $passed_id . '&amp;smtoken=' . sm_generate_security_token () . '&amp;where=' . urlencode ($where) . '&amp;what=' . urlencode ($what) . '&amp;mailbox=' . $urlMailbox;
  553. } else {
  554. $unread_url .= 'right_main.php?unread_passed_id=' . $passed_id . '&amp;sort=' . $sort . '&amp;startMessage=' . $startMessage . '&amp;mailbox=' . $urlMailbox;
  555. }
  556. $s .= $topbar_delimiter;
  557. $s .= '<a href="' . $unread_url . '">' . _ ("Unread") . '</a>';
  559. if ($where && $what) {
  560. $delete_url .= 'where=' . urlencode ($where) . '&amp;what=' . urlencode ($what);
  561. } else {
  562. $delete_url .= 'sort=' . $sort . '&amp;startMessage=' . $startMessage;
  563. }
  564. $s .= $topbar_delimiter;
  565. $s .= '<a href="' . $delete_url . '">' . _ ("Delete") . '</a>';
  566. }
  568. $comp_uri = 'src/compose.php' .
  569. '?passed_id=' . $passed_id .
  570. '&amp;mailbox=' . $urlMailbox .
  571. '&amp;startMessage=' . $startMessage .
  572. (isset($passed_ent_id)?'&amp;passed_ent_id='.urlencode ($passed_ent_id):'');
  574. if (($mailbox == $draft_folder) && ($save_as_draft)) {
  575. $comp_alt_uri = $comp_uri . '&amp;smaction=draft';
  576. $comp_alt_string = _ ("Resume Draft");
  577. } else if (handleAsSent ($mailbox)) {
  578. $comp_alt_uri = $comp_uri . '&amp;smaction=edit_as_new';
  579. $comp_alt_string = _ ("Edit Message as New");
  580. }
  581. if (isset($comp_alt_uri)) {
  582. $s .= $topbar_delimiter;
  583. $s .= makeComposeLink ($comp_alt_uri, '<span style="white-space: nowrap;">' . $comp_alt_string . '</span>');
  584. }
  586. $s .= '</small></td><td align="center" width="2%" style="white-space: nowrap"><small>'
  587. . (strpos ($topbar_delimiter, '&nbsp;') === 0 ? substr ($topbar_delimiter, 6) : ltrim ($topbar_delimiter));
  589. if (!(isset($where) && isset($what)) && !$passed_ent_id) {
  590. $prev = findPreviousMessage ($mbx_response['EXISTS'], $passed_id);
  591. $next = findNextMessage ($passed_id);
  592. if ($prev != -1) {
  593. $uri = $base_uri . 'src/read_body.php?passed_id='.$prev.
  594. '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
  595. '&amp;startMessage='.$startMessage;
  596. $s .= '<a href="'.$uri.'">'._ ("Previous").'</a>';
  597. } else {
  598. $s .= _ ("Previous");
  599. }
  600. $s .= $topbar_delimiter;
  601. if ($next != -1) {
  602. $uri = $base_uri . 'src/read_body.php?passed_id='.$next.
  603. '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
  604. '&amp;startMessage='.$startMessage;
  605. $s .= '<a href="'.$uri.'">'._ ("Next").'</a>';
  606. } else {
  607. $s .= _ ("Next");
  608. }
  609. } else if (isset($passed_ent_id) && $passed_ent_id) {
  610. /* code for navigating through attached message/rfc822 messages */
  611. $url = set_url_var ($PHP_SELF, 'passed_ent_id',0);
  612. $s .= '<a href="'.$url.'">'._ ("View Message").'</a>';
  613. $entities = array();
  614. $entity_count = array();
  615. $c = 0;
  617. foreach($message->parent->entities as $ent) {
  618. if ($ent->type0 == 'message' && $ent->type1 == 'rfc822') {
  619. $c++;
  620. $entity_count[$c] = $ent->entity_id;
  621. $entities[$ent->entity_id] = $c;
  622. }
  623. }
  625. $prev_link = _ ("Previous");
  626. if (!empty($entities[$passed_ent_id]) && ($entities[$passed_ent_id] > 1)) {
  627. $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1];
  628. $prev_link = '<a href="'
  629. . set_url_var ($PHP_SELF, 'passed_ent_id', $prev_ent_id)
  630. . '">' . $prev_link . '</a>';
  631. }
  633. $next_link = _ ("Next");
  634. if (!empty($entities[$passed_ent_id]) && ($entities[$passed_ent_id] < $c)) {
  635. $next_ent_id = $entity_count[$entities[$passed_ent_id] + 1];
  636. $next_link = '<a href="'
  637. . set_url_var ($PHP_SELF, 'passed_ent_id', $next_ent_id)
  638. . '">' . $next_link . '</a>';
  639. }
  640. $s .= $topbar_delimiter . $prev_link;
  641. $par_ent_id = $message->parent->entity_id;
  642. if ($par_ent_id) {
  643. $par_ent_id = substr ($par_ent_id,0,-2);
  644. $s .= $topbar_delimiter;
  645. $url = set_url_var ($PHP_SELF, 'passed_ent_id',$par_ent_id);
  646. $s .= '<a href="'.$url.'">'._ ("Up").'</a>';
  647. }
  648. $s .= $topbar_delimiter . $next_link;
  649. }
  651. $s .= (strrpos ($topbar_delimiter, '&nbsp;') === strlen ($topbar_delimiter) - 6 ? substr ($topbar_delimiter, 0, -6) : rtrim ($topbar_delimiter))
  652. . '</small></td>' . "\n" .
  653. html_tag ( 'td', '', 'right', '', 'width="49%" ' ) . '<small>';
  654. $comp_action_uri = $comp_uri . '&amp;smaction=forward';
  655. $s .= makeComposeLink ($comp_action_uri, _ ("Forward"));
  657. if ($enable_forward_as_attachment) {
  658. $comp_action_uri = $comp_uri . '&amp;smaction=forward_as_attachment';
  659. $s .= $topbar_delimiter;
  660. $s .= makeComposeLink ($comp_action_uri, '<span style="white-space: nowrap;">' . _ ("Forward as Attachment") . '</span>');
  661. }
  663. $comp_action_uri = $comp_uri . '&amp;smaction=reply';
  664. $s .= $topbar_delimiter;
  665. $s .= makeComposeLink ($comp_action_uri, _ ("Reply"));
  667. $comp_action_uri = $comp_uri . '&amp;smaction=reply_all';
  668. $s .= $topbar_delimiter;
  669. $s .= makeComposeLink ($comp_action_uri, '<span style="white-space: nowrap;">' . _ ("Reply All") . '</span>');
  670. $s .= '</small></td></tr></table>';
  671. $ret = do_hook_function ('read_body_menu_top', $s);
  672. if(!is_null ($ret)) {
  673. $s = $ret;
  674. }
  675. echo $s;
  676. do_hook ('read_body_menu_bottom');
  677. }
  679. function formatToolbar ($mailbox, $passed_id, $passed_ent_id, $message, $color) {
  680. global $base_uri, $where, $what, $download_and_unsafe_link;
  682. $urlMailbox = urlencode ($mailbox);
  683. $urlPassed_id = urlencode ($passed_id);
  684. $urlPassed_ent_id = urlencode ($passed_ent_id);
  686. $query_string = 'mailbox=' . $urlMailbox . '&amp;passed_id=' . $urlPassed_id . '&amp;passed_ent_id=' . $urlPassed_ent_id;
  688. if (!empty($where)) {
  689. $query_string .= '&amp;where=' . urlencode ($where);
  690. }
  692. if (!empty($what)) {
  693. $query_string .= '&amp;what=' . urlencode ($what);
  694. }
  696. $url = $base_uri.'src/view_header.php?'.$query_string;
  698. $s = "<tr>\n" .
  699. html_tag ( 'td', '', 'right', '', 'valign="middle" width="20%"' ) . '<b>' . _ ("Options") . ":&nbsp;&nbsp;</b></td>\n" .
  700. html_tag ( 'td', '', 'left', '', 'valign="middle" width="80%"' ) . '<small>' .
  701. '<a href="'.$url.'" style="white-space: nowrap;">'._ ("View Full Header").'</a>';
  703. /* Output the printer friendly link if we are in subtle mode. */
  704. $s .= '&nbsp;| ' .
  705. printer_friendly_link ($mailbox, $passed_id, $passed_ent_id, $color);
  706. echo $s;
  708. /* Output the download and/or unsafe images link/-s, if any. */
  709. if ($download_and_unsafe_link) {
  710. echo $download_and_unsafe_link;
  711. }
  713. do_hook ("read_body_header_right");
  714. $s = "</small></td>\n" .
  715. "</tr>\n";
  716. echo $s;
  718. }
  720. /***************************/
  721. /* Main of read_body.php */
  722. /***************************/
  724. /* get the globals we may need */
  726. sqgetGlobalVar ('key', $key, SQ_COOKIE );
  727. sqgetGlobalVar ('username', $username, SQ_SESSION );
  728. sqgetGlobalVar ('onetimepad',$onetimepad, SQ_SESSION );
  729. sqgetGlobalVar ('delimiter', $delimiter, SQ_SESSION );
  730. sqgetGlobalVar ('base_uri', $base_uri, SQ_SESSION );
  732. sqgetGlobalVar ('msgs', $msgs, SQ_SESSION );
  733. sqgetGlobalVar ('msort', $msort, SQ_SESSION );
  734. sqgetGlobalVar ('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION );
  735. sqgetGlobalVar ('server_sort_array', $server_sort_array, SQ_SESSION );
  736. if (!sqgetGlobalVar ('messages', $messages, SQ_SESSION ) ) {
  737. $messages = array();
  738. }
  740. /** GET VARS */
  741. sqgetGlobalVar ('sendreceipt', $sendreceipt, SQ_GET );
  742. sqgetGlobalVar ('where', $where, SQ_GET );
  743. sqgetGlobalVar ('what', $what, SQ_GET );
  744. if ( sqgetGlobalVar ('show_more', $temp, SQ_GET ) ) {
  745. $show_more = (int) $temp;
  746. }
  747. if ( sqgetGlobalVar ('show_more_cc', $temp, SQ_GET ) ) {
  748. $show_more_cc = (int) $temp;
  749. }
  750. if ( sqgetGlobalVar ('show_more_bcc', $temp, SQ_GET ) ) {
  751. $show_more_bcc = (int) $temp;
  752. }
  753. if ( sqgetGlobalVar ('view_hdr', $temp, SQ_GET ) ) {
  754. $view_hdr = (int) $temp;
  755. }
  757. /** POST VARS */
  758. sqgetGlobalVar ('move_id', $move_id, SQ_POST );
  760. /** GET/POST VARS */
  761. sqgetGlobalVar ('passed_ent_id', $passed_ent_id);
  762. sqgetGlobalVar ('mailbox', $mailbox);
  764. if ( sqgetGlobalVar ('passed_id', $temp) ) {
  765. $passed_id = (int) $temp;
  766. }
  767. if ( sqgetGlobalVar ('sort', $temp) ) {
  768. $sort = (int) $temp;
  769. }
  770. if ( sqgetGlobalVar ('startMessage', $temp) ) {
  771. $startMessage = (int) $temp;
  772. }
  774. /* end of get globals */
  775. global $uid_support, $sqimap_capabilities;
  777. global $imap_stream_options; // in case not defined in config
  778. $imapConnection = sqimap_login ($username, $key, $imapServerAddress, $imapPort, 0, $imap_stream_options);
  779. $mbx_response = sqimap_mailbox_select ($imapConnection, $mailbox, false, false, true);
  782. /**
  783. * $message contains all information about the message
  784. * including header and body
  785. */
  787. $uidvalidity = $mbx_response['UIDVALIDITY'];
  789. if (!isset($messages[$uidvalidity])) {
  790. $messages[$uidvalidity] = array();
  791. }
  792. if (!isset($messages[$uidvalidity][$passed_id]) || !$uid_support) {
  793. $message = sqimap_get_message ($imapConnection, $passed_id, $mailbox);
  794. $FirstTimeSee = !$message->is_seen;
  795. $message->is_seen = true;
  796. $messages[$uidvalidity][$passed_id] = $message;
  797. } else {
  798. // $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
  799. $message = $messages[$uidvalidity][$passed_id];
  800. $FirstTimeSee = !$message->is_seen;
  801. }
  803. if (isset($passed_ent_id) && $passed_ent_id) {
  804. $message = $message->getEntity ($passed_ent_id);
  805. if ($message->type0 != 'message' && $message->type1 != 'rfc822') {
  806. $message = $message->parent;
  807. }
  808. $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, $uid_support);
  809. $rfc822_header = new Rfc822Header ();
  810. $rfc822_header->parseHeader($read);
  811. $message->rfc822_header = $rfc822_header;
  812. } else {
  813. $passed_ent_id = 0;
  814. }
  815. $header = $message->header ;
  817. // gmail does not mark messages as read when retrieving the message body
  818. // even though RFC 3501, section 6.4.5 (FETCH Command) says:
  819. // "The \Seen flag is implicitly set; if this causes the flags to change,
  820. // they SHOULD be included as part of the FETCH responses."
  821. //
  822. if ($imap_server_type == 'gmail') {
  823. sqimap_toggle_flag ($imapConnection, $passed_id, '\\Seen', true, true);
  824. }
  826. do_hook ('html_top');
  828. /****************************************/
  829. /* Block for handling incoming url vars */
  830. /****************************************/
  832. if (isset($sendreceipt)) {
  833. if ( !$message->is_mdnsent ) {
  834. if (isset($identity) ) {
  835. $final_recipient = getPref ($data_dir, $username, 'email_address0', '' );
  836. } else {
  837. $final_recipient = getPref ($data_dir, $username, 'email_address', '' );
  838. }
  840. $final_recipient = trim ($final_recipient);
  841. if ($final_recipient == '' ) {
  842. $final_recipient = getPref ($data_dir, $username, 'email_address', '' );
  843. }
  844. $supportMDN = ServerMDNSupport ($mbx_response["PERMANENTFLAGS"]);
  845. if ( SendMDN ( $mailbox, $passed_id, $final_recipient, $message, $imapConnection ) > 0 && $supportMDN ) {
  846. ToggleMDNflag ( true, $imapConnection, $mailbox, $passed_id, $uid_support);
  847. $message->is_mdnsent = true;
  848. $messages[$uidvalidity][$passed_id]=$message;
  849. }
  850. }
  851. }
  852. /***********************************************/
  853. /* End of block for handling incoming url vars */
  854. /***********************************************/
  856. $msgs[$passed_id]['FLAG_SEEN'] = true;
  858. $messagebody = '';
  859. do_hook ('read_body_top');
  860. if ($show_html_default == 1) {
  861. $ent_ar = $message->findDisplayEntity(array());
  862. } else {
  863. $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
  864. }
  865. $cnt = count ($ent_ar);
  866. for ($i = 0; $i < $cnt; $i++) {
  867. $messagebody .= formatBody ($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
  868. if ($i != $cnt-1) {
  869. $messagebody .= '<hr noshade size=1>';
  870. }
  871. }
  873. displayPageHeader ($color, $mailbox);
  874. formatMenuBar ($mailbox, $passed_id, $passed_ent_id, $message, $mbx_response);
  875. formatEnvheader ($mailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee);
  876. echo '<table width="100%" cellpadding="0" cellspacing="0" align="center" border="0">';
  877. echo ' <tr><td>';
  878. echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center" border="0" bgcolor="'.$color[9].'">';
  879. echo ' <tr><td>';
  880. echo ' <table width="100%" cellpadding="3" cellspacing="0" align="center" border="0">';
  881. echo ' <tr bgcolor="'.$color[4].'"><td>';
  882. // echo ' <table cellpadding="1" cellspacing="5" align="left" border="0">';
  883. echo html_tag ( 'table' ,'' , 'left', '', 'cellpadding="1" cellspacing="5" border="0"' );
  884. echo ' <tr>' . html_tag ( 'td', '<br />'. $messagebody."\n", 'left')
  885. . '</tr>';
  886. echo ' </table>';
  887. echo ' </td></tr>';
  888. echo ' </table></td></tr>';
  889. echo ' </table>';
  890. echo ' </td></tr>';
  892. echo '<tr><td height="5" colspan="2" bgcolor="'.
  893. $color[4].'"></td></tr>'."\n";
  895. $attachmentsdisplay = formatAttachments ($message,$ent_ar,$mailbox, $passed_id);
  896. if ($attachmentsdisplay) {
  897. echo ' <tr><td>';
  898. echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center"'.' border="0" bgcolor="'.$color[9].'">';
  899. echo ' <tr><td>';
  900. echo ' <table width="100%" cellpadding="0" cellspacing="0" align="center" border="0" bgcolor="'.$color[4].'">';
  901. echo ' <tr>' . html_tag ( 'td', '', 'left', $color[9] );
  902. echo ' <b>' . _ ("Attachments") . ':</b>';
  903. $hook_args = array($message, $mailbox, $passed_id, $passed_ent_id);
  904. echo concat_hook_function ('attachments_top', $hook_args);
  905. echo ' </td></tr>';
  906. echo ' <tr><td>';
  907. echo ' <table width="100%" cellpadding="2" cellspacing="2" align="center"'.' border="0" bgcolor="'.$color[0].'">';
  908. echo $attachmentsdisplay;
  909. echo ' </table>';
  910. echo ' </td></tr></table>';
  911. echo ' </td></tr></table>';
  912. echo ' </td></tr>';
  913. echo '<tr><td height="5" colspan="2" bgcolor="'.
  914. $color[4].'"></td></tr>';
  915. }
  916. echo '</table>';
  918. /* show attached images inline -- if pref'fed so */
  919. if (($attachment_common_show_images) &&
  920. is_array ($attachment_common_show_images_list)) {
  921. foreach ($attachment_common_show_images_list as $img) {
  922. $imgurl = SM_PATH . 'src/download.php' .
  923. '?' .
  924. 'passed_id=' . urlencode ($img['passed_id']) .
  925. '&amp;mailbox=' . urlencode ($mailbox) .
  926. '&amp;ent_id=' . urlencode ($img['ent_id']) .
  927. '&amp;absolute_dl=true';
  929. echo html_tag ( 'table', "\n" .
  930. html_tag ( 'tr', "\n" .
  931. html_tag ( 'td', '<img src="' . $imgurl . '" />' ."\n", 'left'
  932. )
  933. ) ,
  934. 'center', '', 'cellspacing="0" border="0" cellpadding="2"');
  935. }
  936. }
  938. //FIXME: one of these hooks should be removed if we can verify disuse (html_bottom?)
  939. do_hook ('read_body_bottom');
  940. do_hook ('html_bottom');
  941. sqimap_logout ($imapConnection);
  942. /* sessions are written at the end of the script. it's better to register
  943. them at the end so we avoid double session_register calls */
  944. sqsession_register ($messages,'messages');
  946. ?>
  947. </body></html>

Documentation generated on 2020年1月13日 04:25:12 +0100 by phpDocumentor 1.4.3

AltStyle によって変換されたページ (->オリジナル) /