comparison lib-src/movemail.c @ 2584:96d5f81e234f

[xemacs-hg @ 2005-02-14 03:40:45 by vins] Security fixes for CAN-2005-0100.
author vins
date Mon, 14 Feb 2005 03:40:45 +0000
parents 943eaba38521
children 308d34e9f07d
comparison
equal deleted inserted replaced
2583:6a89ac689a9a 2584:96d5f81e234f
744 744
745 VERBOSE(("opening server\n")); 745 VERBOSE(("opening server\n"));
746 server = pop_open (0, user, password, POP_NO_GETPASS); 746 server = pop_open (0, user, password, POP_NO_GETPASS);
747 if (! server) 747 if (! server)
748 { 748 {
749 error (pop_error, NULL, NULL); 749 error ("%s", pop_error, NULL);
750 return (1); 750 return (1);
751 } 751 }
752 752
753 VERBOSE(("stat'ing messages\n")); 753 VERBOSE(("stat'ing messages\n"));
754 if (pop_stat (server, &nmsgs, &nbytes)) 754 if (pop_stat (server, &nmsgs, &nbytes))
755 { 755 {
756 error (pop_error, NULL, NULL); 756 error ("%s", pop_error, NULL);
757 return (1); 757 return (1);
758 } 758 }
759 759
760 if (!nmsgs) 760 if (!nmsgs)
761 { 761 {
799 { 799 {
800 VERBOSE(("retrieving message %d \n", i)); 800 VERBOSE(("retrieving message %d \n", i));
801 mbx_delimit_begin (mbf); 801 mbx_delimit_begin (mbf);
802 if (pop_retr (server, i, mbx_write, mbf) != POP_RETRIEVED) 802 if (pop_retr (server, i, mbx_write, mbf) != POP_RETRIEVED)
803 { 803 {
804 error (Errmsg, NULL, NULL); 804 error ("%s", Errmsg, NULL);
805 close (mbfi); 805 close (mbfi);
806 return (1); 806 return (1);
807 } 807 }
808 808
809 retrieved_list[i]=1; 809 retrieved_list[i]=1;
847 if (retrieved_list[i] == 1) 847 if (retrieved_list[i] == 1)
848 { 848 {
849 VERBOSE(("deleting message %d \n", i)); 849 VERBOSE(("deleting message %d \n", i));
850 if (pop_delete (server, i)) 850 if (pop_delete (server, i))
851 { 851 {
852 error (pop_error, NULL, NULL); 852 error ("%s", pop_error, NULL);
853 pop_close (server); 853 pop_close (server);
854 return (1); 854 return (1);
855 } 855 }
856 } 856 }
857 } 857 }
858 } 858 }
859 859
860 VERBOSE(("closing server \n")); 860 VERBOSE(("closing server \n"));
861 if (pop_quit (server)) 861 if (pop_quit (server))
862 { 862 {
863 error (pop_error, NULL, NULL); 863 error ("%s", pop_error, NULL);
864 return (1); 864 return (1);
865 } 865 }
866 866
867 return (0); 867 return (0);
868 } 868 }