alecpl
2010-04-23 2eb7943f2aeaec8efc74b16b7bedb56da9913abf
program/include/rcube_imap.php
@@ -21,10 +21,6 @@
*/
require_once('lib/mime.inc');
require_once('lib/tnef_decoder.inc');
/**
 * Interface class for accessing an IMAP server
 *
@@ -135,6 +131,8 @@
                $this->set_rootdir($this->conn->rootdir);
            if (empty($this->delimiter))
               $this->get_hierarchy_delimiter();
            return true;
        }
        // write error log
        else if ($this->conn->error) {
@@ -144,7 +142,7 @@
                'message' => $this->conn->error), true, false);
        }
        return $this->conn ? true : false;
        return false;
    }
@@ -1412,6 +1410,27 @@
        return $a_messages;
    }
    
    /**
     * Direct (real and simple) SEARCH request to IMAP server,
     * without result sorting and caching
     *
     * @param  string  Mailbox name to search in
     * @param  string  Search string
     * @param  boolean True if UIDs should be returned
     * @return array   Search results as list of message IDs or UIDs
     * @access public
     */
    function search_once($mbox_name='', $str=NULL, $ret_uid=false)
    {
        if (!$str)
            return false;
        $mailbox = $mbox_name ? $this->mod_mailbox($mbox_name) : $this->mailbox;
        return $this->conn->search($mailbox, $str, $ret_uid);
    }
  
    /**
     * Sort thread
@@ -1591,9 +1610,10 @@
            return $headers->structure;
        }
        if (!$structure_str)
        if (!$structure_str) {
            $structure_str = $this->conn->fetchStructureString($this->mailbox, $uid, true);
        $structure = iml_GetRawStructureArray($structure_str);
        }
        $structure = rcube_mime_struct::parseStructure($structure_str);
        $struct = false;
        // parse structure and add headers
@@ -1943,16 +1963,16 @@
        // get part encoding if not provided
        if (!is_object($o_part)) {
            $structure_str = $this->conn->fetchStructureString($this->mailbox, $uid, true); 
            $structure = iml_GetRawStructureArray($structure_str);
            $structure = new rcube_mime_struct();
            // error or message not found
            if (empty($structure))
            if (!$structure->loadStructure($structure_str)) {
                return false;
            }
            $part_type = iml_GetPartTypeCode($structure, $part);
            $o_part = new rcube_message_part;
            $o_part->ctype_primary = $part_type==0 ? 'text' : ($part_type==2 ? 'message' : 'other');
            $o_part->encoding = strtolower(iml_GetPartEncodingString($structure, $part));
            $o_part->charset = iml_GetPartCharset($structure, $part);
            $o_part->ctype_primary = strtolower($structure->getPartType($part));
            $o_part->encoding      = strtolower($structure->getPartEncoding($part));
            $o_part->charset       = $structure->getPartCharset($part);
        }
      
        // TODO: Add caching for message parts
@@ -2521,24 +2541,23 @@
     */
    function list_unsubscribed($root='')
    {
        static $sa_unsubscribed;
        static $a_folders;
    
        if (is_array($sa_unsubscribed))
            return $sa_unsubscribed;
        if (is_array($a_folders))
            return $a_folders;
      
        // retrieve list of folders from IMAP server
        $a_mboxes = $this->conn->listMailboxes($this->mod_mailbox($root), '*');
        // modify names with root dir
        foreach ($a_mboxes as $mbox_name) {
            $name = $this->mod_mailbox($mbox_name, 'out');
            if (strlen($name))
            if ($name = $this->mod_mailbox($mbox_name, 'out'))
                $a_folders[] = $name;
        }
        // filter folders and sort them
        $sa_unsubscribed = $this->_sort_mailbox_list($a_folders);
        return $sa_unsubscribed;
        $a_folders = $this->_sort_mailbox_list($a_folders);
        return $a_folders;
    }
@@ -3308,6 +3327,8 @@
        if (!isset($part->body))
            $part->body = $this->get_message_part($uid, $part->mime_id, $part);
        require_once('lib/tnef_decoder.inc');
        $pid = 0;
        $tnef_parts = array();
        $tnef_arr = tnef_decode($part->body);
@@ -3511,7 +3532,7 @@
            if (($p = array_search($folder, $this->default_folders)) !== false && !$a_defaults[$p])
                $a_defaults[$p] = $folder;
            else
                $folders[$folder] = mb_strtolower(rcube_charset_convert($folder, 'UTF7-IMAP'));
                $folders[$folder] = rcube_charset_convert($folder, 'UTF7-IMAP');
        }
        // sort folders and place defaults on the top