Okay So I got pop3 to auth against system account password with a lightly 
modded perl to pam script (some one else wrote and posted to this list).
[Code]
#!/usr/bin/perl
use Authen::PAM;
# arguments: (1)user (2)password
my $username = shift;
my $password = shift;
if($username =~/(.+)[EMAIL PROTECTED]/) {
 $username=$1;
}
$service = "passwd";
sub my_conv_func {
  my @res;
  while ( @_ ) {
     my $code = shift;
     my $msg = shift;
     my $ans = "";
     $ans = $username if ($code == PAM_PROMPT_ECHO_ON );
     $ans = $password if ($code == PAM_PROMPT_ECHO_OFF );
     push @res, (PAM_SUCCESS,$ans);
  }
 push @res, PAM_SUCCESS;
 return @res;
}

ref($pamh = new Authen::PAM($service, $username, \&my_conv_func)) ||
   die "Error code $pamh during PAM init!";

$res = $pamh->pam_authenticate;
exit($res);
[/Code]


And in my MailRoot/userauth/pop3 i created a '.tab' and put this inside it :
"userauth"[TAB]"/var/MailRoot/bin/Authpam.pl"[TAB]"@@USER"[TAB]"@@PASSWD"

No big deal pop3 work great. Now my problem is how could I go about getting 
smtp to basicly work the same way ? (part of my problem is i don't find the 
XMail docs (ReadMe) to be all that help full when it comes to this.)

XMail exmaples looks like this :
"external"  "auth-name" "secret"    "prog-path" "arg-or-macro"

So when i break down the columns I see this:
external: Write external here so that xmail knows to run a external program 
/ script
auth-name : replace this with the smtp auth type "cram-md5,login,plain"
secret : No clue ???
prog-path : Path to the script or program
arg-or-macro : this can be @@CHALL,@@SECRT, and or @@RFILE

Basicly I've tryed everything I can think of to get this to work like the 
pop3 auth. But i just can seem to grasp Somthing ?

Help

-- Chris L. Franklin -- 


-
To unsubscribe from this list: send the line "unsubscribe xmail" in
the body of a message to [EMAIL PROTECTED]
For general help: send the line "help" in the body of a message to
[EMAIL PROTECTED]

Reply via email to