Edit Report a Bug

    IMAP, POP3 和 NNTP

    add a note add a note

    User Contributed Notes 3 notes

    up
    39
    Wil Barath
    14 years ago
    For all the people coming here praying for:

    1) a dead-easy way to read MIME attachments, or
    2) a dead-easy way to access POP3 folders

    Look no further.

    <?php
    function pop3_login($host,$port,$user,$pass,$folder="INBOX",$ssl=false)
    {
            $ssl=($ssl==false)?"/novalidate-cert":"";
        return (    imap_open("{"."$host:$port/pop3$ssl"."}$folder",$user,$pass));
    }
    function     pop3_stat($connection)       
    {
            $check = imap_mailboxmsginfo($connection);
        return ((array)    $check);
    }
    function     pop3_list($connection,$message="")
    {
        if (    $message)
        {
                $range=$message;
        } else {
                $MC = imap_check($connection);
                $range = "1:".$MC->Nmsgs;
        }
            $response = imap_fetch_overview($connection,$range);
        foreach (    $response as $msg) $result[$msg->msgno]=(array)$msg;
            return     $result;
    }
    function     pop3_retr($connection,$message)
    {
        return(    imap_fetchheader($connection,$message,FT_PREFETCHTEXT));
    }
    function     pop3_dele($connection,$message)
    {
        return(    imap_delete($connection,$message));
    }
    function     mail_parse_headers($headers)
    {
            $headers=preg_replace('/\r\n\s+/m', '',$headers);
            preg_match_all('/([^: ]+): (.+?(?:\r\n\s(?:.+?))*)?\r\n/m', $headers, $matches);
        foreach (    $matches[1] as $key =>$value) $result[$value]=$matches[2][$key];
        return(    $result);
    }
    function     mail_mime_to_array($imap,$mid,$parse_headers=false)
    {
            $mail = imap_fetchstructure($imap,$mid);
            $mail = mail_get_parts($imap,$mid,$mail,0);
        if (    $parse_headers) $mail[0]["parsed"]=mail_parse_headers($mail[0]["data"]);
        return(    $mail);
    }
    function     mail_get_parts($imap,$mid,$part,$prefix)
    {   
            $attachments=array();
            $attachments[$prefix]=mail_decode_part($imap,$mid,$part,$prefix);
        if (isset(    $part->parts)) // multipart
            {
                $prefix = ($prefix == "0")?"":"$prefix.";
            foreach (    $part->parts as $number=>$subpart)
                    $attachments=array_merge($attachments, mail_get_parts($imap,$mid,$subpart,$prefix.($number+1)));
        }
        return     $attachments;
    }
    function     mail_decode_part($connection,$message_number,$part,$prefix)
    {
            $attachment = array();

        if(    $part->ifdparameters) {
            foreach(    $part->dparameters as $object) {
                    $attachment[strtolower($object->attribute)]=$object->value;
                if(    strtolower($object->attribute) == 'filename') {
                        $attachment['is_attachment'] = true;
                        $attachment['filename'] = $object->value;
                }
            }
        }

        if(    $part->ifparameters) {
            foreach(    $part->parameters as $object) {
                    $attachment[strtolower($object->attribute)]=$object->value;
                if(    strtolower($object->attribute) == 'name') {
                        $attachment['is_attachment'] = true;
                        $attachment['name'] = $object->value;
                }
            }
        }

            $attachment['data'] = imap_fetchbody($connection, $message_number, $prefix);
        if(    $part->encoding == 3) { // 3 = BASE64
                $attachment['data'] = base64_decode($attachment['data']);
        }
        elseif(    $part->encoding == 4) { // 4 = QUOTED-PRINTABLE
                $attachment['data'] = quoted_printable_decode($attachment['data']);
        }
        return(    $attachment);
    }
    ?>

    [EDIT BY danbrown AT php DOT net: Contains a bugfix by "mn26826" on 09-JUN-2010, which fixed the erroneous reference to $imap as the parameter passed to imap_mailboxmsginfo() within the user function pop3_stat().  This was intended to be $connection.]

    [EDIT BY visualmind AT php DOT net: Contains a bugfix by "elias-jobview" on 17-AUG-2010, which fixed the error in pop3_list function which didn't have: return $result]

    [EDIT BY danbrown AT php DOT net: Contains a bugfix by "chrismeistre" on 09-SEP-2010, which fixed the erroneous reference to $mbox (should be $connection) in the pop3_list() function.]
    up
    -6
    opto
    12 years ago
    it seems that in new PHP versions, $ssl must be specified even if no ssl is used - I got it working for POP3 only after adding /notls (honour some post I found somewhere)
    Klaus
    up
    -27
    dev at bluehead dot com dot br
    12 years ago
    Because I don't know regular expressions, I hacked the mail_parse_headers() to properly get the last line from the header string:

    <?php
    function mail_parse_headers($headers)
    {

            $headers=preg_replace('/\r\n\s+/m', '',$headers);
            $headers=trim($headers)."\r\n"; /* a hack for the preg_match_all in the next line */
            preg_match_all('/([^: ]+): (.+?(?:\r\n\s(?:.+?))*)?\r\n/m', $headers, $matches);
        foreach (    $matches[1] as $key =>$value) $result[$value]=$matches[2][$key];
        return(    $result);
    }
    ?>
    add a note add a note
    To Top