Authen::Smb






Authen::Smb − Perl extension to authenticate against an SMB
server


  use Authen::Smb;
  my $authResult = Authen::Smb::authen('myUser',
                                       'myPassword',
                                       'myPDC',
                                       'myBDC',
                                       'myNTDomain');

  if ( $authResult == Authen::Smb::NO_ERROR ) {
    print "User successfully authenticated.\n";
  } else {
    print "User not authenticated with error level $authResult\n";
  }

Authen::Smb allows you to authenticate a user against an NT
domain.  You can specify both a primary and a backup server
to use for authentication.  The NT names of the machines
should be used for specifying servers.

     An authentication request will return one of four
values:

     NTV_NO_ERROR \fIs0(0) NTV_SERVER_ERROR \fIs0(1)
NTV_PROTOCOL_ERROR \fIs0(2) NTV_LOGON_ERROR \fIs0(3)

     NTV_NO_ERROR is the only return value possible for a
successful authentication.  All other return values indicate
failure, of one sort or another.


  NTV_LOGON_ERROR
  NTV_NO_ERROR
  NTV_PROTOCOL_ERROR
  NTV_SERVER_ERROR

Patrick Michael Kane, modus@pr.es.to Based on the smbval
library from the samba package Additions for
Apache::AuthenNTLM by Gerald Richter <richter@dev.ecos.de>

perl(1).