new

args hash

methods

This is the methods to use to for getting the information.

It is taken in a camma seperated list with the default being 'hostname,dns,devldap,env,user'.

The available values are listed below.

    hostname
    devldap
    env
    user

byDevLDAP

This fetches it using /dev/ldap/ if possible.

It will return false if /dev/ldap/ is not a directory or does not resit.

POPULATES

    bind
    CAfile
    CApath
    checkCRL
    clientCert
    clientKey
    pass
    port
    server
    my $returned=$autoserver->byDevLDAP;

byDNS

This only populates the server field.

This will run s/^[0-9a-zA-Z\-\_]*\./ldap./ over the hostname then try to connect to it.

If it can't lookup the hostname or connect, it returns undef.

Once connected, it will check to see if it is possible to start TLS.

POPULATES

    startTLS
    server
    port

byEESDPenv

This will populate as much as possible using enviromental variables.

ENVIROMENTAL VARIABLES

EESDP-BindDN EESDP-CAfile EESDP-CApath EESDP-CheckCRL EESDP-ClientCert EESDP-ClientKey EESDP-Port EESDP-Server EESDP-StartTLS

POPULATES

    bind
    CAfile
    CApath
    checkCRL
    clientCert
    clientKey
    port
    server
    startTLS

byEnv

This will populate as much as possible using enviromental variables.

ENVIROMENTAL VARIABLES

    Net::LDAP::AutoServer-bind
    Net::LDAP::AutoServer-CAfile
    Net::LDAP::AutoServer-CApath
    Net::LDAP::AutoServer-checkCRL
    Net::LDAP::AutoServer-clientCert
    Net::LDAP::AutoServer-clientkey
    Net::LDAP::AutoServer-port
    Net::LDAP::AutoServer-server
    Net::LDAP::AutoServer-startTLS

POPULATES

    bind
    CAfile
    CApath
    checkCRL
    clientCert
    clientKey
    port
    server
    startTLS

byHostname

This only populates the server field.

This will run s/^[0-9a-zA-Z\-\_]*\./ldap./ over the hostname then try to connect to it.

If it can't lookup the hostname or connect, it returns undef.

Once connected, it will check to see if it is possible to start TLS.

POPULATES

    startTLS
    server
    port

byUser

This only populates the server field.

This requires $ENV{USER} to be defined. If it is not, undef is returned.

This looks for '~/.ldappass' and '~/.ldapbind'.

POPULATES

    bind
    pass
    my $returned=$autoserver->byUser;

clear

This clears all previous selections.

    $autoserver->clear;

connect

This forms a LDAP connections.

    my ($ldap, $mesg, $success, $errorString)=$autoserver->connect;
    if(!$success){
        if(!$ldap){
            print "Failed to connect to LDAP either bad info or none present.\n";
        }else{
            print "Failed to bind or start TLS.\n".
                  $mesg->error_desc."\n";
        }
    }