org.netfrag.elib/smtp/smtpmail.class

<?
//if ($EMAIL_INC) return; 
//$EMAIL_INC= "defined"; 
define("SmtpPort",25); 

class Smtp { 

    var $Subject;             // string the email's subject 
    var $FromName;                // string sender's name (opt) 
    var $ToName;                  // string recipient's name (opt) 
    var $Body;                    // string body copy 
    var $Attachment;        // attachment (optional) 
    var $AttachmentType; 
    var $Socket; 
    var $Line; 
    var $Status; 

    function Smtp($Server = "localhost", $Port = SmtpPort) 
    {     
        return $this->Open($Server, $Port); 
    } 
     
    function SmtpMail($FromEmail, $FromName, $ToEmail, $ToName, $Subject, $Body, $Attachment=null, $AttachmentType="TEXT") 
    { 
        $this->Subject   = $Subject; 
        $this->ToName    = $ToName; 

        $this->FromName    = $FromName; 
        $this->Body      = $Body; 

        $this->Attachment = $Attachment; 
        $this->AttachmentType = $AttachmentType; 

        if ($this->Helo() == false){ 
            return false; 
        } 
        if ($this->MailFrom($FromEmail) == false){ 
            return false; 
        } 
        if ($this->RcptTo($ToEmail) == false){ 
            return false; 
        } 
        if ($this->Body() == false){ 
            return false; 
        } 
        if ($this->Quit() == false){ 
            return false; 
        } 
    } 

    function Open($Server, $Port) 
    { 

     $this->Socket = fsockopen($Server, $Port); 
     if ($this->Socket < 0) return false; 

     $this->Line = fgets($this->Socket, 1024); 

     $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
     $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

     if ($this->Status["LASTRESULT"] <> "2") return false; 

     return true; 
    } 


    function Helo() 
    { 
        if (fputs($this->Socket, "helo\r\n") < 0 ){ 
            return false; 
        } 
        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "2") return false; 

        return true;   
    } 

    function Ehlo() 
    { 

        /* Well, let's use "helo" for now.. Until we need the 
        extra func's   [Unk] 
        */ 
        if(fputs($this->Socket, "helo localhost\r\n")<0){ 
            return false; 
        } 
        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "2") return false; 

        return true; 
    } 


    function MailFrom($FromEmail) 
    { 

        if (fputs($this->Socket, "MAIL FROM: <$FromEmail>\r\n")<0){ 
            return false; 
        } 

        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "2") return false; 

        return true; 
    } 

    function RcptTo($ToEmail) 
    { 

        if(fputs($this->Socket, "RCPT TO: <$ToEmail>\r\n")<0){ 
            return false; 
        } 
        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "2") return false; 
            return true; 
    } 

    function Body() 
    { 
        $FileSize = 0; 
        $Attachment = null; 
        $fp = null; 

        $buffer = sprintf("From: %s\r\nTo:%s\r\nSubject:%s\r\n", $this->FromName, $this->ToName, $this->Subject); 

        if(fputs($this->Socket, "DATA\r\n")<0){ 
            return false; 
        } 
        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "3") return false; 
         
        if(fputs($this->Socket, $buffer)<0){ 
            return false; 
        } 


        if ($this->Attachment == null){ 

            if(fputs($this->Socket, "MIME-Version: 1.0\r\nContent-Type: text/plain; charset=ISO-8859-1\r\nContent-Transfer-Encoding: 7bit\r\n\r\n")<0){ 
                return false; 
            } 
            if(fputs($this->Socket, "$this->Body\r\n\r\n")<0){ 
                return false; 
            } 
     
            if(fputs($this->Socket, ".\r\n")<0){ 
                return false; 
            } 

            $this->Line = fgets($this->Socket, 1024); 
            if (substr($this->Line, 0, 1) <> "2"){ 
                return false;  
            }else{ 
                return true; 
            } 
        }else{ 
            if(fputs($this->Socket,"MIME-Version: 1.0\r\nContent-Type: multipart/mixed; boundary=\"----=_NextPart_000_01BCFA61.A3697360\"\r\n". 
                "Content-Transfer-Encoding: 7bit\r\n\r\n". 
                "This is a multi-part message in MIME format.\r\n". 
                "\r\n------=_NextPart_000_01BCFA61.A3697360\r\n". 
                "Content-Type: text/plain; charset=ISO-8859-1\r\n". 
                "Content-Transfer-Encoding: 7bit\r\n". 
                "\r\n")<0){ 
                return false; 
            } 
     

            /* output the body file */ 
            if(fputs($this->Socket, "$this->Body\r\n\r\n")<0){ 
                return false; 
            } 

            if ( fputs($this->Socket,"\r\n------=_NextPart_000_01BCFA61.A3697360\r\n")<0){ 
                return false; 
            } 
            $FileSize = filesize($this->Attachment); 
            if ($FileSize == false){ 
                return false; 
            } 
            if (($fp = fopen($this->Attachment,"r"))== false) { 
                return false; 
            }else{ 
                $Attachment = fread($fp,$FileSize);     
            } 

            // we don't want any of the directory in the attachment 
            if (($AttachName = strrchr($this->Attachment,'/')) == false){ 

                // no directory so just copy the name in 
                $AttachName = $this->Attachment; 
            } 

            if( fputs($this->Socket, 
                "Content-Type: application/octet-stream; \r\nname=\"$AttachName\"\r\n". 
                "Content-Transfer-Encoding: quoted-printable\r\n". 
                "Content-Description: $AttachName\r\n". 
                "Content-Disposition: attachment; \r\n\tfilename=\"$AttachName\"\r\n". 
                "\r\n")<0){ 
                return false; 
            } 
     
            /* output the attachment file */ 
            if( fputs($this->Socket, $Attachment)<0){ 
                return false; 
            } 
            if ( fputs($this->Socket,"\r\n\r\n------=_NextPart_000_01BCFA61.A3697360--\r\n")<0){ 
                return false; 
            } 

            if( fputs($this->Socket,".\r\n")<0){ 
                return false; 
            } 

            $this->Line = fgets($this->Socket, 1024); 
            if (substr($this->Line, 0, 1) <> "2") 
                return false;  

            return true; 

        } 
    } 

    function Quit() 
    { 

        if(fputs($this->Socket, "QUIT\r\n")<0){ 
            return false; 
        } 
        $this->Line = fgets($this->Socket, 1024); 

        $this->Status["LASTRESULT"] = substr($this->Line, 0, 1); 
        $this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024); 

        if ($this->Status["LASTRESULT"] <> "2") return 0; 

        return 1; 
    }  
    function Close() 
    { 
        fclose($this->Socket); 
    } 
} 

?>
1	<?
2	//if ($EMAIL_INC) return;
3	//$EMAIL_INC= "defined";
4	define("SmtpPort",25);
5
6	class Smtp {
7
8	var $Subject; // string the email's subject
9	var $FromName; // string sender's name (opt)
10	var $ToName; // string recipient's name (opt)
11	var $Body; // string body copy
12	var $Attachment; // attachment (optional)
13	var $AttachmentType;
14	var $Socket;
15	var $Line;
16	var $Status;
17
18	function Smtp($Server = "localhost", $Port = SmtpPort)
19	{
20	return $this->Open($Server, $Port);
21	}
22
23	function SmtpMail($FromEmail, $FromName, $ToEmail, $ToName, $Subject, $Body, $Attachment=null, $AttachmentType="TEXT")
24	{
25	$this->Subject = $Subject;
26	$this->ToName = $ToName;
27
28	$this->FromName = $FromName;
29	$this->Body = $Body;
30
31	$this->Attachment = $Attachment;
32	$this->AttachmentType = $AttachmentType;
33
34	if ($this->Helo() == false){
35	return false;
36	}
37	if ($this->MailFrom($FromEmail) == false){
38	return false;
39	}
40	if ($this->RcptTo($ToEmail) == false){
41	return false;
42	}
43	if ($this->Body() == false){
44	return false;
45	}
46	if ($this->Quit() == false){
47	return false;
48	}
49	}
50
51	function Open($Server, $Port)
52	{
53
54	$this->Socket = fsockopen($Server, $Port);
55	if ($this->Socket < 0) return false;
56
57	$this->Line = fgets($this->Socket, 1024);
58
59	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
60	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
61
62	if ($this->Status["LASTRESULT"] <> "2") return false;
63
64	return true;
65	}
66
67
68	function Helo()
69	{
70	if (fputs($this->Socket, "helo\r\n") < 0 ){
71	return false;
72	}
73	$this->Line = fgets($this->Socket, 1024);
74
75	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
76	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
77
78	if ($this->Status["LASTRESULT"] <> "2") return false;
79
80	return true;
81	}
82
83	function Ehlo()
84	{
85
86	/* Well, let's use "helo" for now.. Until we need the
87	extra func's [Unk]
88	*/
89	if(fputs($this->Socket, "helo localhost\r\n")<0){
90	return false;
91	}
92	$this->Line = fgets($this->Socket, 1024);
93
94	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
95	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
96
97	if ($this->Status["LASTRESULT"] <> "2") return false;
98
99	return true;
100	}
101
102
103	function MailFrom($FromEmail)
104	{
105
106	if (fputs($this->Socket, "MAIL FROM: <$FromEmail>\r\n")<0){
107	return false;
108	}
109
110	$this->Line = fgets($this->Socket, 1024);
111
112	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
113	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
114
115	if ($this->Status["LASTRESULT"] <> "2") return false;
116
117	return true;
118	}
119
120	function RcptTo($ToEmail)
121	{
122
123	if(fputs($this->Socket, "RCPT TO: <$ToEmail>\r\n")<0){
124	return false;
125	}
126	$this->Line = fgets($this->Socket, 1024);
127
128	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
129	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
130
131	if ($this->Status["LASTRESULT"] <> "2") return false;
132	return true;
133	}
134
135	function Body()
136	{
137	$FileSize = 0;
138	$Attachment = null;
139	$fp = null;
140
141	$buffer = sprintf("From: %s\r\nTo:%s\r\nSubject:%s\r\n", $this->FromName, $this->ToName, $this->Subject);
142
143	if(fputs($this->Socket, "DATA\r\n")<0){
144	return false;
145	}
146	$this->Line = fgets($this->Socket, 1024);
147
148	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
149	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
150
151	if ($this->Status["LASTRESULT"] <> "3") return false;
152
153	if(fputs($this->Socket, $buffer)<0){
154	return false;
155	}
156
157
158	if ($this->Attachment == null){
159
160	if(fputs($this->Socket, "MIME-Version: 1.0\r\nContent-Type: text/plain; charset=ISO-8859-1\r\nContent-Transfer-Encoding: 7bit\r\n\r\n")<0){
161	return false;
162	}
163	if(fputs($this->Socket, "$this->Body\r\n\r\n")<0){
164	return false;
165	}
166
167	if(fputs($this->Socket, ".\r\n")<0){
168	return false;
169	}
170
171	$this->Line = fgets($this->Socket, 1024);
172	if (substr($this->Line, 0, 1) <> "2"){
173	return false;
174	}else{
175	return true;
176	}
177	}else{
178	if(fputs($this->Socket,"MIME-Version: 1.0\r\nContent-Type: multipart/mixed; boundary=\"----=_NextPart_000_01BCFA61.A3697360\"\r\n".
179	"Content-Transfer-Encoding: 7bit\r\n\r\n".
180	"This is a multi-part message in MIME format.\r\n".
181	"\r\n------=_NextPart_000_01BCFA61.A3697360\r\n".
182	"Content-Type: text/plain; charset=ISO-8859-1\r\n".
183	"Content-Transfer-Encoding: 7bit\r\n".
184	"\r\n")<0){
185	return false;
186	}
187
188
189	/* output the body file */
190	if(fputs($this->Socket, "$this->Body\r\n\r\n")<0){
191	return false;
192	}
193
194	if ( fputs($this->Socket,"\r\n------=_NextPart_000_01BCFA61.A3697360\r\n")<0){
195	return false;
196	}
197	$FileSize = filesize($this->Attachment);
198	if ($FileSize == false){
199	return false;
200	}
201	if (($fp = fopen($this->Attachment,"r"))== false) {
202	return false;
203	}else{
204	$Attachment = fread($fp,$FileSize);
205	}
206
207	// we don't want any of the directory in the attachment
208	if (($AttachName = strrchr($this->Attachment,'/')) == false){
209
210	// no directory so just copy the name in
211	$AttachName = $this->Attachment;
212	}
213
214	if( fputs($this->Socket,
215	"Content-Type: application/octet-stream; \r\nname=\"$AttachName\"\r\n".
216	"Content-Transfer-Encoding: quoted-printable\r\n".
217	"Content-Description: $AttachName\r\n".
218	"Content-Disposition: attachment; \r\n\tfilename=\"$AttachName\"\r\n".
219	"\r\n")<0){
220	return false;
221	}
222
223	/* output the attachment file */
224	if( fputs($this->Socket, $Attachment)<0){
225	return false;
226	}
227	if ( fputs($this->Socket,"\r\n\r\n------=_NextPart_000_01BCFA61.A3697360--\r\n")<0){
228	return false;
229	}
230
231	if( fputs($this->Socket,".\r\n")<0){
232	return false;
233	}
234
235	$this->Line = fgets($this->Socket, 1024);
236	if (substr($this->Line, 0, 1) <> "2")
237	return false;
238
239	return true;
240
241	}
242	}
243
244	function Quit()
245	{
246
247	if(fputs($this->Socket, "QUIT\r\n")<0){
248	return false;
249	}
250	$this->Line = fgets($this->Socket, 1024);
251
252	$this->Status["LASTRESULT"] = substr($this->Line, 0, 1);
253	$this->Status["LASTRESULTTXT"] = substr($this->Line, 0, 1024);
254
255	if ($this->Status["LASTRESULT"] <> "2") return 0;
256
257	return 1;
258	}
259	function Close()
260	{
261	fclose($this->Socket);
262	}
263	}
264
265	?>
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26