| | |
| | | +-----------------------------------------------------------------------+ |
| | | | program/steps/mail/viewsource.inc | |
| | | | | |
| | | | This file is part of the RoundCube Webmail client | |
| | | | Copyright (C) 2005-2009, RoundCube Dev. - Switzerland | |
| | | | This file is part of the Roundcube Webmail client | |
| | | | Copyright (C) 2005-2009, The Roundcube Dev Team | |
| | | | Licensed under the GNU GPL | |
| | | | | |
| | | | PURPOSE: | |
| | |
| | | if ($uid = get_input_value('_uid', RCUBE_INPUT_GET)) |
| | | { |
| | | $headers = $IMAP->get_headers($uid); |
| | | $charset = $headers->charset ? $headers->charset : $IMAP->default_charset; |
| | | $charset = $headers->charset ? $headers->charset : $CONFIG['default_charset']; |
| | | header("Content-Type: text/plain; charset={$charset}"); |
| | | |
| | | if (!empty($_GET['_save'])) { |
| | | $filename = ($headers->subject ? $IMAP->decode_header($headers->subject) : 'roundcube') . '.eml'; |
| | | $browser = new rcube_browser; |
| | | |
| | | $browser = $RCMAIL->output->browser; |
| | | |
| | | if ($browser->ie && $browser->ver < 7) |
| | | $filename = rawurlencode(abbreviate_string($filename, 55)); |
| | | else if ($browser->ie) |
| | |
| | | header("Content-Length: {$headers->size}"); |
| | | header("Content-Disposition: attachment; filename=\"$filename\""); |
| | | } |
| | | |
| | | |
| | | $IMAP->print_raw_body($uid); |
| | | } |
| | | else |
| | |
| | | } |
| | | |
| | | exit; |
| | | ?> |
| | | |