Home > Developer > PHP

POP3 class implemented by PHPSocket

Source: Internet
Author: User
Developer on Alibaba Coud: Build your first app with APIs, SDKs, and tutorials on the Alibaba Cloud. Read more ＞
POP3 class implemented by PHPSocket

  3. /**

  4. * PHP Socket POP3 class
  5. * By bbs.it-home.org
  6. */
  7. Class SocketPOPClient
  8. {
  9. Var $ strMessage = '';
  10. Var $ intErrorNum = 0;
  11. Var $ bolDebug = false;

  12. Var $ strEmail = '';

  13. Var $ strPasswd = '';
  14. Var $ strHost = '';
  15. Var $ intPort = 110;
  16. Var $ intConnSecond = 30;
  17. Var $ intBuffSize = 8192;
  18. Var $ resHandler = NULL;
  19. Var $ bolIsLogin = false;
  20. Var $ strRequest = '';
  21. Var $ strResponse = '';
  22. Var $ arrRequest = array ();
  23. Var $ arrResponse = array ();

  24. //---------------

  25. // Basic operations
  26. //---------------
  27. // Constructor
  28. Function SocketPOP3Client ($ strLoginEmail, $ strLoginPasswd, $ strPopHost = '', $ intPort = '')
  29. {
  30. $ This-> strEmail = trim (strtolower ($ strLoginEmail ));
  31. $ This-> strPasswd = trim ($ strLoginPasswd );
  32. $ This-> strHost = trim (strtolower ($ strPopHost ));
  33. If ($ this-> strEmail = ''| $ this-> strPasswd = '')
  34. {
  35. $ This-> setMessage ('email address or Passwd is empty', 1001 );
  36. Return false;
  37. }
  38. If (! PReg_match ("/^ [\ w-] + (\. [\ w-] +) * @ [\ w-] + (\. [\ w-] +) + $/I ", $ this-> strEmail ))
  39. {
  40. $ This-> setMessage ('email address invalid', 1002 );
  41. Return false;
  42. }
  43. If ($ this-> strHost = '')
  44. {
  45. $ This-> strHost = substr (strrchr ($ this-> strEmail, "@"), 1 );
  46. }
  47. If ($ intPort! = '')
  48. {
  49. $ This-> intPort = $ intPort;
  50. }
  51. $ This-> connectHost ();
  52. }

  53. // Connect to the server

  54. Function connectHost ()
  55. {
  56. If ($ this-> bolDebug)
  57. {
  58. Echo "Connection". $ this-> strHost. "... \ r \ n ";
  59. }
  60. If (! $ This-> getIsConnect ())
  61. {
  62. If ($ this-> strHost = ''| $ this-> intPort = '')
  63. {
  64. $ This-> setMessage ('pop3 host or Port is empty', 1003 );
  65. Return false;
  66. }
  67. $ This-> resHandler = @ fsockopen ($ this-> strHost, $ this-> intPort, & $ this-> intErrorNum, & $ this-> strMessage, $ this-> intConnSecond );
  68. If (! $ This-> resHandler)
  69. {
  70. $ StrErrMsg = 'connection POP3 host: '. $ this-> strHost. 'failed ';
  71. $ IntErrNum = 2001;
  72. $ This-> setMessage ($ strErrMsg, $ intErrNum );
  73. Return false;
  74. }
  75. $ This-> getLineResponse ();
  76. If (! $ This-> getRestIsSucceed ())
  77. {
  78. Return false;
  79. }
  80. }
  81. Return true;
  82. }
  83. // Close the connection
  84. Function closeHost ()
  85. {
  86. If ($ this-> resHandler)
  87. {
  88. Fclose ($ this-> resHandler );
  89. }
  90. Return true;
  91. }
  92. // Send command
  93. Function sendCommand ($ strCommand)
  94. {
  95. If ($ this-> bolDebug)
  96. {
  97. If (! Preg_match ("/PASS/", $ strCommand ))
  98. {
  99. Echo "Send Command:". $ strCommand. "\ r \ n ";
  100. }
  101. Else
  102. {
  103. Echo "Send Command: PASS ****** \ r \ n ";
  104. }
  105. }
  106. If (! $ This-> getIsConnect ())
  107. {
  108. Return false;
  109. }
  110. If (trim ($ strCommand) = '')
  111. {
  112. $ This-> setMessage ('request command is empty', 1004 );
  113. Return false;
  114. }
  115. $ This-> strRequest = $ strCommand. "\ r \ n ";
  116. $ This-> arrRequest [] = $ strCommand;
  117. Fputs ($ this-> resHandler, $ this-> strRequest );
  118. Return true;
  119. }
  120. // Extract the first line of response information
  121. Function getLineResponse ()
  122. {
  123. If (! $ This-> getIsConnect ())
  124. {
  125. Return false;
  126. }
  127. $ This-> strResponse = fgets ($ this-> resHandler, $ this-> intBuffSize );
  128. $ This-> arrResponse [] = $ this-> strResponse;
  129. Return $ this-> strResponse;
  130. }
  131. // Extract response information. $ intReturnType is the return value type. 1 is a string and 2 is an array.
  132. Function getRespMessage ($ intReturnType)
  133. {
  134. If (! $ This-> getIsConnect ())
  135. {
  136. Return false;
  137. }
  138. If ($ intReturnType = 1)
  139. {
  140. $ StrAllResponse = '';
  141. While (! Feof ($ this-> resHandler ))
  142. {
  143. $ StrLineResponse = $ this-> getLineResponse ();
  144. If (preg_match ("/^ \ + OK/", $ strLineResponse ))
  145. {
  146. Continue;
  147. }
  148. If (trim ($ strLineResponse) = '.')
  149. {
  150. Break;
  151. }
  152. $ StrAllResponse. = $ strLineResponse;
  153. }
  154. Return $ strAllResponse;
  155. }
  156. Else
  157. {
  158. $ ArrAllResponse = array ();
  159. While (! Feof ($ this-> resHandler ))
  160. {
  161. $ StrLineResponse = $ this-> getLineResponse ();
  162. If (preg_match ("/^ \ + OK/", $ strLineResponse ))
  163. {
  164. Continue;
  165. }
  166. If (trim ($ strLineResponse) = '.')
  167. {
  168. Break;
  169. }
  170. $ ArrAllResponse [] = $ strLineResponse;
  171. }
  172. Return $ arrAllResponse;
  173. }
  174. }
  175. // Indicates whether the request is successfully extracted.
  176. Function getRestIsSucceed ($ strRespMessage = '')
  177. {
  178. If (trim ($ responseMessage) = '')
  179. {
  180. If ($ this-> strResponse = '')
  181. {
  182. $ This-> getLineResponse ();
  183. }
  184. $ StrRespMessage = $ this-> strResponse;
  185. }
  186. If (trim ($ strRespMessage) = '')
  187. {
  188. $ This-> setMessage ('response message is empty', 2003 );
  189. Return false;
  190. }
  191. If (! Preg_match ("/^ \ + OK/", $ strRespMessage ))
  192. {
  193. $ This-> setMessage ($ strRespMessage, 2000 );
  194. Return false;
  195. }
  196. Return true;
  197. }
  198. // Obtain whether the connection is established
  199. Function getIsConnect ()
  200. {
  201. If (! $ This-> resHandler)
  202. {
  203. $ This-> setMessage ("Nonexistent availability connection handler", 2002 );
  204. Return false;
  205. }
  206. Return true;
  207. }

  208. // Set the message

  209. Function setMessage ($ strMessage, $ intErrorNum)
  210. {
  211. If (trim ($ strMessage) = ''| $ intErrorNum = '')
  212. {
  213. Return false;
  214. }
  215. $ This-> strMessage = $ strMessage;
  216. $ This-> intErrorNum = $ intErrorNum;
  217. Return true;
  218. }
  219. // Obtain the message
  220. Function getMessage ()
  221. {
  222. Return $ this-> strMessage;
  223. }
  224. // Get error code
  225. Function getErrorNum ()
  226. {
  227. Return $ this-> intErrorNum;
  228. }
  229. // Obtain request information
  230. Function getRequest ()
  231. {
  232. Return $ this-> strRequest;
  233. }
  234. // Obtain response information
  235. Function getResponse ()
  236. {
  237. Return $ this-> strResponse;
  238. }

  239. //---------------

  240. // Mail atomic operation
  241. //---------------
  242. // Logon email
  243. Function popLogin ()
  244. {
  245. If (! $ This-> getIsConnect ())
  246. {
  247. Return false;
  248. }
  249. $ This-> sendCommand ("USER". $ this-> strEmail );
  250. $ This-> getLineResponse ();
  251. $ BolUserRight = $ this-> getRestIsSucceed ();
  252. $ This-> sendCommand ("PASS". $ this-> strPasswd );
  253. $ This-> getLineResponse ();
  254. $ BolPassRight = $ this-> getRestIsSucceed ();
  255. If (! $ BolUserRight |! $ BolPassRight)
  256. {
  257. $ This-> setMessage ($ this-> strResponse, 2004 );
  258. Return false;
  259. }
  260. $ This-> bolIsLogin = true;
  261. Return true;
  262. }
  263. // Log out
  264. Function popLogout ()
  265. {
  266. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  267. {
  268. Return false;
  269. }
  270. $ This-> sendCommand ("QUIT ");
  271. $ This-> getLineResponse ();
  272. If (! $ This-> getRestIsSucceed ())
  273. {
  274. Return false;
  275. }
  276. Return true;
  277. }
  278. // Obtain whether or not it is online
  279. Function getIsOnline ()
  280. {
  281. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  282. {
  283. Return false;
  284. }
  285. $ This-> sendCommand ("NOOP ");
  286. $ This-> getLineResponse ();
  287. If (! $ This-> getRestIsSucceed ())
  288. {
  289. Return false;
  290. }
  291. Return true;
  292. }
  293. // Obtain the number of mails and number of cells (returned array)
  294. Function getMailSum ($ intReturnType = 2)
  295. {
  296. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  297. {
  298. Return false;
  299. }
  300. $ This-> sendCommand ("STAT ");
  301. $ StrLineResponse = $ this-> getLineResponse ();
  302. If (! $ This-> getRestIsSucceed ())
  303. {
  304. Return false;
  305. }
  306. If ($ intReturnType = 1)
  307. {
  308. Return $ this-> strResponse;
  309. }
  310. Else
  311. {
  312. $ ArrResponse = explode ("", $ this-> strResponse );
  313. If (! Is_array ($ arrResponse) | count ($ arrResponse) <= 0)
  314. {
  315. $ This-> setMessage ('stat command response message is error', 2006 );
  316. Return false;
  317. }
  318. Return array ($ arrResponse [1], $ arrResponse [2]);
  319. }
  320. }
  321. // Obtain the session Id of the specified email
  322. Function getMailSessId ($ intMailId, $ intReturnType = 2)
  323. {
  324. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  325. {
  326. Return false;
  327. }
  328. If (! $ IntMailId = intval ($ intMailId ))
  329. {
  330. $ This-> setMessage ('mail message id invalid', 1005 );
  331. Return false;
  332. }
  333. $ This-> sendCommand ("UIDL". $ intMailId );
  334. $ This-> getLineResponse ();
  335. If (! $ This-> getRestIsSucceed ())
  336. {
  337. Return false;
  338. }
  339. If ($ intReturnType = 1)
  340. {
  341. Return $ this-> strResponse;
  342. }
  343. Else
  344. {
  345. $ ArrResponse = explode ("", $ this-> strResponse );
  346. If (! Is_array ($ arrResponse) | count ($ arrResponse) <= 0)
  347. {
  348. $ This-> setMessage ('uidl command response message is error', 2006 );
  349. Return false;
  350. }
  351. Return array ($ arrResponse [1], $ arrResponse [2]);
  352. }
  353. }
  354. // Obtain the size of an email.
  355. Function getMailSize ($ intMailId, $ intReturnType = 2)
  356. {
  357. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  358. {
  359. Return false;
  360. }
  361. $ This-> sendCommand ("LIST". $ intMailId );
  362. $ This-> getLineResponse ();
  363. If (! $ This-> getRestIsSucceed ())
  364. {
  365. Return false;
  366. }
  367. If ($ intReturnType = 1)
  368. {
  369. Return $ this-> strResponse;
  370. }
  371. Else
  372. {
  373. $ ArrMessage = explode ('', $ this-> strResponse );
  374. Return array ($ arrMessage [1], $ arrMessage [2]);
  375. }
  376. }
  377. // Obtain the basic list of emails
  378. Function getMailBaseList ($ intReturnType = 2)
  379. {
  380. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  381. {
  382. Return false;
  383. }
  384. $ This-> sendCommand ("LIST ");
  385. $ This-> getLineResponse ();
  386. If (! $ This-> getRestIsSucceed ())
  387. {
  388. Return false;
  389. }
  390. Return $ this-> getRespMessage ($ intReturnType );
  391. }
  392. // Obtain all the information of the specified Email. intReturnType indicates the return value type, 1 indicates the string, and 2 indicates the array.
  393. Function getMailMessage ($ intMailId, $ intReturnType = 1)
  394. {
  395. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  396. {
  397. Return false;
  398. }
  399. If (! $ IntMailId = intval ($ intMailId ))
  400. {
  401. $ This-> setMessage ('mail message id invalid', 1005 );
  402. Return false;
  403. }
  404. $ This-> sendCommand ("RETR". $ intMailId );
  405. $ This-> getLineResponse ();
  406. If (! $ This-> getRestIsSucceed ())
  407. {
  408. Return false;
  409. }
  410. Return $ this-> getRespMessage ($ intReturnType );
  411. }
  412. // Get the specified row before an email, $ intReturnType return value type, 1 is a string, 2 is an array
  413. Function getMailTopMessage ($ intMailId, $ intTopLines = 10, $ intReturnType = 1)
  414. {
  415. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  416. {
  417. Return false;
  418. }
  419. If (! $ IntMailId = intval ($ intMailId) |! $ IntTopLines = int ($ intTopLines ))
  420. {
  421. $ This-> setMessage ('mail message id or Top lines number invalid', 1005 );
  422. Return false;
  423. }
  424. $ This-> sendCommand ("TOP". $ intMailId. "". $ intTopLines );
  425. $ This-> getLineResponse ();
  426. If (! $ This-> getRestIsSucceed ())
  427. {
  428. Return false;
  429. }
  430. Return $ this-> getRespMessage ($ intReturnType );
  431. }
  432. // Delete the email
  433. Function delMail ($ intMailId)
  434. {
  435. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  436. {
  437. Return false;
  438. }
  439. If (! $ IntMailId = intval ($ intMailId ))
  440. {
  441. $ This-> setMessage ('mail message id invalid', 1005 );
  442. Return false;
  443. }
  444. $ This-> sendCommand ("DELE". $ intMailId );
  445. $ This-> getLineResponse ();
  446. If (! $ This-> getRestIsSucceed ())
  447. {
  448. Return false;
  449. }
  450. Return true;
  451. }
  452. // Reset the deleted email to undeleted
  453. Function resetDeleMail ()
  454. {
  455. If (! $ This-> getIsConnect () & $ this-> bolIsLogin)
  456. {
  457. Return false;
  458. }
  459. $ This-> sendCommand ("RSET ");
  460. $ This-> getLineResponse ();
  461. If (! $ This-> getRestIsSucceed ())
  462. {
  463. Return false;
  464. }
  465. Return true;
  466. }
  467. //---------------
  468. // Debug the operation
  469. //---------------
  470. // Output object information
  471. Function printObject ()
  472. {
  473. Print_r ($ this );
  474. Exit;
  475. }
  476. // Output error message
  477. Function printError ()
  478. {
  479. Echo "[Error Msg]: $ strMessage
    \ N ";
  480. Echo "[Error Num]: $ intErrorNum
    \ N ";
  481. Exit;
  482. }
  483. // Output host information
  484. Function printHost ()
  485. {
  486. Echo "[Host]: $ this-> strHost
    \ N ";
  487. Echo "[Port]: $ this-> intPort
    \ N ";
  488. Echo "[Email]: $ this-> strEmail
    \ N ";
  489. Echo "[Passwd]: ********
    \ N ";
  490. Exit;
  491. }
  492. // Output the connection information
  493. Function printConnect ()
  494. {
  495. Echo "[Connect]: $ this-> resHandler
    \ N ";
  496. Echo "[Request]: $ this-> strRequest
    \ N ";
  497. Echo "[Response]: $ this-> strResponse
    \ N ";
  498. Exit;
  499. }
  500. }
  501. ?>

Call example:

  2. // Test code
  3. // Example: $ o = SocketPOP3Client ('email address', 'password', 'pop3 server', 'pop3 Port ')
  4. /*
  5. Set_time_limit (0 );
  6. $ O = new SocketPOPClient ('ABC @ 126.com ', '000000', 'pop .126.com', '000000 ');
  7. $ O-> popLogin ();
  8. Print_r ($ o-> getMailBaseList ());
  9. Print_r ($ o-> getMailSum (1 ));
  10. Print_r ($ o-> getMailTopMessage (2, 2, 2 ));
  11. $ O-> popLogout ();
  12. $ O-> closeHost ();
  13. $ O-> printObject ();
  14. */
  15. ?>

This article is an English version of an article which is originally in the Chinese language on aliyun.com and is provided for information purposes only. This website makes no representation or warranty of any kind, either expressed or implied, as to the accuracy, completeness ownership or reliability of the article or any translations thereof. If you have any concerns or complaints relating to the article, please send an email, providing a detailed description of the concern or complaint, to info-contact@alibabacloud.com. A staff member will contact you within 5 working days. Once verified, infringing content will be removed immediately.

Related Keywords:
xpath select by class document getelement by class get class by name get element by class name document get element by class jquery get element by class what meant by abstract class
Related Article
Php basename function

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

What's Trending
Top 10 Tags
datastax versions naming convention zookeeper client class definition md5 microsoft sql server 2005 data structures exception handling error handling
Top 10 Keywords
microsoft download center down wordpress address url site address url wordpress address url windows installer 4 0 download 302 not found web address url definition site address url wordpress db2 integer mac os installation step by step pdf abbreviation for return

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

  • Sales Support

    1 on 1 presale consultation

    Chat Contact Sales

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    Open a Ticket

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

    Learn More