Mercurial > hg > rc2
diff program/steps/mail/headers.inc @ 0:4681f974d28b
vanilla 1.3.3 distro, I hope
author | Charlie Root |
---|---|
date | Thu, 04 Jan 2018 15:52:31 -0500 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/program/steps/mail/headers.inc Thu Jan 04 15:52:31 2018 -0500 @@ -0,0 +1,56 @@ +<?php + +/** + +-----------------------------------------------------------------------+ + | program/steps/mail/headers.inc | + | | + | This file is part of the Roundcube Webmail client | + | Copyright (C) 2005-2016, The Roundcube Dev Team | + | | + | Licensed under the GNU General Public License version 3 or | + | any later version with exceptions for skins & plugins. | + | See the README file for a full license statement. | + | | + | PURPOSE: | + | Fetch message headers in raw format for display | + | | + +-----------------------------------------------------------------------+ + | Author: Aleksander Machniak <alec@alec.pl> | + +-----------------------------------------------------------------------+ +*/ + +if ($uid = rcube_utils::get_input_value('_uid', rcube_utils::INPUT_POST)) { + if ($pos = strpos($uid, '.')) { + $message = new rcube_message($uid); + $source = $message->get_part_body(substr($uid, $pos + 1)); + $source = substr($source, 0, strpos($source, "\r\n\r\n")); + } + else { + $source = $RCMAIL->storage->get_raw_headers($uid); + } + + if ($source !== false) { + $source = trim(rcube_charset::clean($source)); + $source = htmlspecialchars($source); + $source = preg_replace( + array( + '/\n[\t\s]+/', + '/^([a-z0-9_:-]+)/im', + '/\r?\n/' + ), + array( + "\n ", + '<font class="bold">\1</font>', + '<br />' + ), $source); + + $OUTPUT->command('set_headers', $source); + } + else { + $RCMAIL->output->show_message('messageopenerror', 'error'); + } + + $OUTPUT->send(); +} + +exit;