Added function to get mime-entity headers

git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@2883 7612ce4b-ef26-0410-bec9-ea0150e637f0

diff --git a/functions/imap_messages.php b/functions/imap_messages.php
index 603dc2c5657665af0a11c8345fbe3b93d643d261..08ba6e305c61c331c9b634c1d0df090b83a37edb 100755 (executable)
--- a/functions/imap_messages.php
+++ b/functions/imap_messages.php
@@ -619,6 +619,16 @@ function sqimap_get_entity_header ($imap_stream, &$read, &$type0, &$type1, &$bou
     $charset = $header["CHARSET"];
     $filename = $header["FILENAME"];
 }
+
+/* function to get the mime headers */
+function sqimap_get_mime_ent_header ($imap_stream, $id, $mailbox, $ent) {
+    $read = sqimap_run_command ($imap_stream, "FETCH $id:$id BODY[$ent.MIME]", true, $response, $message);
+    $header = sqimap_get_header($imap_stream, $read); 
+    $header->id = $id;
+    $header->mailbox = $mailbox;
+    return $header;
+}
+
 */
 /* Queries the IMAP server and gets all header information. */
 function sqimap_get_header ($imap_stream, $read) {