git.samba.org
/
bbaumbach
/
samba-autobuild
/
.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Merge branch 'master' of ssh://git.samba.org/data/git/samba into regsrv
[bbaumbach/samba-autobuild/.git]
/
selftest
/
test_samba4.pl
1
#!/usr/bin/perl
2
3
use Test::More tests => 3;
4
use FindBin qw($RealBin);
5
use lib $RealBin;
6
use Samba4;
7
8
my $s = new Samba4($RealBin."/../bin", undef, $RealBin."/../setup");
9
10
ok($s);
11
12
is($RealBin."/../bin", $s->{bindir});
13
14
ok($s->write_ldb_file("tmpldb", "
15
dn: a=b
16
a: b
17
c: d
18
"));
19
20
unlink("tmpldb");