surps has asked for the wisdom of the Perl Monks concerning the following question:

Hi all,I am trying to modify the POP3Server module that can be used for system users and database authentication. If the pop access is through Database authentication, then it can read the mail file from mail folder. The mails are stored in the users mail folder. After the successful DB Authentication, getting error as "-ERR not logged in yet! ". I set authentication type = 5; Can i read each files from the user mail folder and is it possible to download the mails to client side? For this, which part i should modify to get mails to be downloaded to client side. Waiting for kind help from Perl experts... Best Regards,
  • Comment on POP access using System users and DB authentication

Replies are listed 'Best First'.
Re: POP access using System users and DB authentication
by rdfield (Priest) on Oct 20, 2002 at 07:34 UTC
    This question needs a lot more detail for us to help you. Perhaps you could post some code and some idea of the data that it is processing (and of course the resulting output!).

    rdfield

      rdfield,

      The existing module can be used for system user verification and download the mail to client side.

      I had modified commandPASS function to handle both cases. The system user verification is working properly and mail gets download to the client machine. In the other part (for DB authentication), verification has been done but mail downloading is not working ... i think it has to handle different structure and separate function for that.

      The code i wrote in the commandPASS :

      if ($uidok == 0) { #### Used for if ($fqdn eq "dev.com") { ### Starts Database connection ### Query for getting password if ($password1 eq $password2) ## $password1 is from client machine a +nd $password2 from database { #### INCOMPLETE PART ### ### Here i want to handle the mails (Path say : usr/domainname/useri +d/mailfolder/ ### mail folder contains file1,file2 etc (file1,file1 represents eac +h mail...) ### Read the mail from the user mail folder. Each mail is stored as +a single file. ### I would like to read each mail and download it to the client mac +hine } else { print "-ERR access denied $uid $arg $CRLF"; &TimeIsUp("Incorrect Password... :\($CRLF"); } } else { ### Used for System Users... #### WORKING PROPERLY.... ### The actual code from the module ## } }

      Hope i explained my problem ... If not clear, i can post entire code here .... Lines of code is very large.

      Thanks a lot for your comment
      Waiting for your help


      Edited: ~Mon Oct 21 17:08:31 2002 (GMT) by footpad: Added <CODE> and other HTML formatting tags, per Consideration

        Looks pretty straightforward to me. There's plenty of modules out there to help you. Try looking at DBI (the DataBase Interface module and its associated drivers) for your database connectivity and the various Mail:: modules (all available via http://search.cpan.org. There's even one called Mail::POP3Client...could be worth a close look.

        rdfield

Re: POP access using System users and DB authentication
by Anonymous Monk on Oct 21, 2002 at 07:08 UTC
    Which mail agent are you using ..qmail has Database authentication .. look at their source you will get some idea ...hope this helps