<?php
//HOSTS:
//GMAIL:        '{imap.gmail.com:993/ssl/novalidate-cert}';
//HOTMAIL:  '{pop3.live.com:995/pop3/ssl/novalidate-cert}';
//YAHOO:        '{pop.correo.yahoo.es:995/pop3/ssl/novalidate-cert}';
$hostname= '{imap.gmail.com:993/ssl/novalidate-cert}';
$username = '@gmail.com';
$password = '';

$mailseparator = "################################################################################################";
$max_mail_per_mailbox = 0; //N?mero de mails a extraer por cada carpeta
$max_message_len = 100;      //N?mero m?ximo de caracteres de cada mail, 0 para extraer todo el mensaje

showEMailsFromAccount($hostname, $username, $password, $mailseparator, $max_message_len, $max_mail_per_mailbox);

function showEMailsFromAccount($hostname, $username, $password, $mailseparator, $max_message_len, $max_mail_per_mailbox)
{
        $inbox = imap_open($hostname,$username,$password) or die('Cannot connect to: ' . print_r(imap_errors()));

        $mailboxes = imap_list ($inbox, $hostname, "*");

        if (is_array($mailboxes))
        {
                foreach($mailboxes as $mailbox)
                {
                        if(imap_reopen ($inbox , $mailbox))
                        {
                                $emails = imap_search($inbox,'ALL');

                                echo "\nMAILS FROM : " . $mailbox . "\n\n";

                                if($emails)
                                {
                                        rsort($emails);

                                        $count = 0;

                                        foreach($emails as $email_number)
                                        {
                                                if($max_mail_per_mailbox > 0)
                                                $count++;

                                                $overview = imap_fetch_overview($inbox,$email_number,0);
                                                $structure = imap_fetchstructure($inbox, $email_number);

                                                $encoding = 0;
                                                $charset = "";
                                                $message = "";
                                                $miss_warning = null;
                                                if (isset($structure->parts)){

                                                        $parts = $structure->parts;

                                                        $part_cnt = 1;
                                                        //DEBUG print_r($structure);
                                                        foreach ($parts as $part)
                                                        {

                                                                $encoding = $part->encoding;
                                                                if (isset($part->parts))
                                                                {
                                                                        if (is_array($part->parts))
                                                                        {
                                                                                if (is_array($part->parts[0]->parameters))
                                                                                {
																						for($k = 0; $k < count($part->parts[0]->parameters); $k++)
																						{
																							if (!($part->parts[0]->parameters[$k]->attribute == "NAME" || $part->parts[0]->parameters[$k]->attribute == "FILENAME"))
																							if ($part->parts[0]->parameters[$k]->attribute == "CHARSET")
																							{
																									$charset = $part->parts[0]->parameters[$k]->value;
																									$message_aux = imap_fetchbody($inbox,$email_number,$part_cnt.'.1');
																									if($message_aux == "")
																										$message .= imap_fetchbody($inbox,$email_number,$part_cnt);
																									else
																										$message .= $message_aux;
																							}
																							else
																							{
																								$miss_warning = "MISS ERROR CODE1";
																								//DEBUG print_r($part->parts[0]->parameters);
																							}
																						}
                                                                                }
																				else
																				{
																					$miss_warning = "MISS ERROR CODE2";
																					//DEBUG print_r($part->parts[0]->parameters);
																				}
                                                                        }
																		else
																		{
																			$miss_warning = "MISS ERROR CODEERROR CODE 3";
																			//DEBUG print_r($part->parts);
																		}
                                                                }
                                                                else
                                                                {
                                                                        if (is_array($part->parameters))
                                                                        {
																				for($k = 0; $k < count($part->parameters); $k++)
																				{
																					if (!($part->parameters[$k]->attribute == "NAME" || $part->parameters[$k]->attribute == "FILENAME"))
																					if ($part->parameters[$k]->attribute == "CHARSET")
																					{
																							$charset = $part->parameters[$k]->value;
																							$message .= imap_fetchbody($inbox,$email_number,$part_cnt) . "\n";
																					}
																					else
																					{
																						$miss_warning = "MISS ERROR CODE4";
																						//DEBUG print_r($structure->parameters);
																					}
																				}
                                                                        }
																		else
																		{
																			$message .= imap_fetchbody($inbox,$email_number,$part_cnt) . "\n";
																		}
                                                                }

                                                                //Attachments
                                                                //if ($part->parameters[0]->attribute == "NAME") {
                                                                //
                                                                //      $att_name = imap_utf8($part->parameters[0]->value);
                                                                //
                                                                //      $savefilename = $att_cntr.'_'.$att_name;
                                                                //
                                                                //      $att_cntr++;
                                                                //
                                                                //      $atts[] = array($att_name, $gmail_attachments_upload_to.$savefilename);
                                                                //}

                                                                $part_cnt++;

                                                        }

                                                }
                                                else
                                                {
                                                        if (is_array($structure->parameters) && count($structure->parameters) > 0)
                                                        {
																for($k = 0; $k < count($structure->parameters); $k++)
																{
																	if (!($structure->parameters[$k]->attribute == "NAME" || $structure->parameters[$k]->attribute == "FILENAME"))
																	if ($structure->parameters[$k]->attribute == "CHARSET")
																	{
																			if(property_exists($structure->parameters[$k], "value")) $charset = $structure->parameters[$k]->value;
																			$encoding = $structure->encoding;
																			$message .= imap_body($inbox,$email_number);
																	}
																	else
																	{
																		$miss_warning = "MISS ERROR CODE6";
																		//DEBUG print_r($structure->parameters);
																	}
																}
                                                        }
														else
														{
															$miss_warning = "MISS ERROR CODE7";
															//DEBUG print_r($structure->parameters);
														}

                                                }

                                                $subject = "";
                                                $elementos = imap_mime_header_decode($overview[0]->subject);
                                                for ($i=0; $i<count($elementos); $i++) {
                                                        $subject .= $elementos[$i]->text;
                                                }

                                                if ($encoding == 0)
                                                {
                                                        $message = $message; //to7bit($message, $charset);
                                                }
                                                elseif ($encoding == 1)
                                                {
                                                        $message = $message; //imap_qprint(imap_8bit($message));
                                                }
                                                elseif ($encoding == 2)
                                                {
                                                        $message = imap_binary($message);
                                                }
                                                elseif ($encoding == 3)
                                                {
                                                        $message = imap_base64($message);
                                                }
                                                elseif ($encoding == 4)
                                                {
                                                        $message = quoted_printable_decode($message); //imap_qprint($message); //
                                                }
                                                elseif ($encoding == 5)
                                                {
                                                        $message = $message;
                                                }
                                                $charset = strtoupper($charset);

                                                echo "\n$mailseparator\n";
                                                echo "FROM: " . $overview[0]->from . "\n";
                                                echo "DATE: " . $overview[0]->date . "\n";
                                                echo "SUBJECT: " . $subject . "\n";
                                                echo "ENCODING: " . $encoding . "\n";
                                                echo "CHARSET: " . $charset . "\n";

												if($charset != "ISO-8859-15" && $charset != "ISO-8859-1")
                                                if($charset != "")
                                                        $message = mb_convert_encoding ($message, 'ISO-8859-15', $charset);
                                                else
                                                        $message = mb_convert_encoding ($message, 'ISO-8859-15');

												echo "CHARS:" . strlen($message) . "\n";

                                                if($max_message_len > 0) $message = substr($message, 0, $max_message_len);

												echo "MESSAGE:\n";
                                                echo $message . "\n";
												if($miss_warning != null) echo "MISS_ERROR:" . $miss_warning;
                                                echo "\n$mailseparator\n";
                                        }
                                }
                        }
                }
        }
        else
        {
                echo imap_last_error() . "\n";
        }

        imap_close($inbox);
}
?>