Version 3.1.4

2025-12-19 00:32:22 -08:00
1 parent 1d4720f3e2
commit ae5c01cc78
@@ -0,0 +1,97 @@
+<?php
+/*
+ * test_pop3.php
+ *
+ * @(#) $Header: /home/mlemos/cvsroot/pop3/test_pop3.php,v 1.7 2006/06/11 14:52:09 mlemos Exp $
+ *
+ */
+
+?><HTML>
+<HEAD>
+<TITLE>Test for Manuel Lemos's PHP POP3 class</TITLE>
+</HEAD>
+<BODY>
+<?php
+
+	require("pop3.php");
+
+  /* Uncomment when using SASL authentication mechanisms */
+	/*
+	require("sasl.php");
+	*/
+
+	$pop3=new pop3_class;
+	$pop3->hostname="localhost";             /* POP 3 server host name                      */
+	$pop3->port=110;                         /* POP 3 server host port,
+	                                            usually 110 but some servers use other ports
+	                                            Gmail uses 995                              */
+	$pop3->tls=0;                            /* Establish secure connections using TLS      */
+	$user="username";                        /* Authentication user name                    */
+	$password="password";                    /* Authentication password                     */
+	$pop3->realm="";                         /* Authentication realm or domain              */
+	$pop3->workstation="";                   /* Workstation for NTLM authentication         */
+	$apop=0;                                 /* Use APOP authentication                     */
+	$pop3->authentication_mechanism="USER";  /* SASL authentication mechanism               */
+	$pop3->debug=1;                          /* Output debug information                    */
+	$pop3->html_debug=1;                     /* Debug information is in HTML                */
+	$pop3->join_continuation_header_lines=1; /* Concatenate headers split in multiple lines */
+
+	if(($error=$pop3->Open())=="")
+	{
+		echo "<PRE>Connected to the POP3 server &quot;".$pop3->hostname."&quot;.</PRE>\n";
+		if(($error=$pop3->Login($user,$password,$apop))=="")
+		{
+			echo "<PRE>User &quot;$user&quot; logged in.</PRE>\n";
+			if(($error=$pop3->Statistics($messages,$size))=="")
+			{
+				echo "<PRE>There are $messages messages in the mail box with a total of $size bytes.</PRE>\n";
+				$result=$pop3->ListMessages("",0);
+				if(GetType($result)=="array")
+				{
+					for(Reset($result),$message=0;$message<count($result);Next($result),$message++)
+						echo "<PRE>Message ",Key($result)," - ",$result[Key($result)]," bytes.</PRE>\n";
+					$result=$pop3->ListMessages("",1);
+					if(GetType($result)=="array")
+					{
+						for(Reset($result),$message=0;$message<count($result);Next($result),$message++)
+							echo "<PRE>Message ",Key($result),", Unique ID - \"",$result[Key($result)],"\"</PRE>\n";
+						if($messages>0)
+						{
+							if(($error=$pop3->RetrieveMessage(1,$headers,$body,2))=="")
+							{
+								echo "<PRE>Message 1:\n---Message headers starts below---</PRE>\n";
+								for($line=0;$line<count($headers);$line++)
+									echo "<PRE>",HtmlSpecialChars($headers[$line]),"</PRE>\n";
+								echo "<PRE>---Message headers ends above---\n---Message body starts below---</PRE>\n";
+								for($line=0;$line<count($body);$line++)
+									echo "<PRE>",HtmlSpecialChars($body[$line]),"</PRE>\n";
+								echo "<PRE>---Message body ends above---</PRE>\n";
+								if(($error=$pop3->DeleteMessage(1))=="")
+								{
+									echo "<PRE>Marked message 1 for deletion.</PRE>\n";
+									if(($error=$pop3->ResetDeletedMessages())=="")
+									{
+										echo "<PRE>Resetted the list of messages to be deleted.</PRE>\n";
+									}
+								}
+							}
+						}
+						if($error==""
+						&& ($error=$pop3->Close())=="")
+							echo "<PRE>Disconnected from the POP3 server &quot;".$pop3->hostname."&quot;.</PRE>\n";
+						
+					}
+					else
+						$error=$result;
+				}
+				else
+					$error=$result;
+			}
+		}
+	}
+	if($error!="")
+		echo "<H2>Error: ",HtmlSpecialChars($error),"</H2>";
+?>
+
+</BODY>
+</HTML>