#!perl -w

use warnings;
use strict;
use Test::More tests =>4;

BEGIN {
        use_ok( 'Samba::LDAP');
}

my $sid = Samba::LDAP->new();
isa_ok ( $sid, 'Samba::LDAP' );
can_ok( $sid, qw( get_local_sid ) );

SKIP: {

    skip 'Samba is already set up as a PDC, can not test for unconfigured PDC', 
    1 if $sid->get_local_sid() ne 'Can not find SID';
    
    is ( $sid->get_local_sid(), 'Can not find SID', 'Test for unconfigured PDC' );

}