diff options
author | Andrew Bartlett <abartlet@samba.org> | 2012-03-02 11:44:56 +1100 |
---|---|---|
committer | Andrew Bartlett <abartlet@samba.org> | 2012-03-02 03:48:05 +0100 |
commit | 10700f69b2ec552939471fb43f0913511860af6f (patch) | |
tree | d0886bf95f3fc04f4f4f5214ef84c6f8e242adcf /selftest/target/Samba.pm | |
parent | f1452a296429b79755235f4a480f0d5ea38ce178 (diff) | |
download | samba-10700f69b2ec552939471fb43f0913511860af6f.tar.gz samba-10700f69b2ec552939471fb43f0913511860af6f.tar.bz2 samba-10700f69b2ec552939471fb43f0913511860af6f.zip |
selftest: Establish a registry of socket wrapper IPs
This fixes a bug where chgdcpass was on the same IP as localsubdc, and
will avoid similar mistakes in future.
Andrew Bartlett
Autobuild-User: Andrew Bartlett <abartlet@samba.org>
Autobuild-Date: Fri Mar 2 03:48:05 CET 2012 on sn-devel-104
Diffstat (limited to 'selftest/target/Samba.pm')
-rw-r--r-- | selftest/target/Samba.pm | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/selftest/target/Samba.pm b/selftest/target/Samba.pm index 445cbb250d..06b6472a6c 100644 --- a/selftest/target/Samba.pm +++ b/selftest/target/Samba.pm @@ -134,4 +134,42 @@ sub mk_realms_stanza($$$$) return $realms_stanza; } +sub get_interface($) +{ + my ($netbiosname) = @_; + $netbiosname = lc($netbiosname); + + my %interfaces = (); + $interfaces{"locals3dc2"} = 2; + $interfaces{"localmember3"} = 3; + $interfaces{"localshare4"} = 4; + $interfaces{"localserver5"} = 5; + $interfaces{"localktest6"} = 6; + $interfaces{"maptoguest"} = 7; + + # 11-16 used by selftest.pl for client interfaces + + $interfaces{"localdc"} = 21; + $interfaces{"localvampiredc"} = 22; + $interfaces{"s4member"} = 23; + $interfaces{"localrpcproxy"} = 24; + $interfaces{"dc5"} = 25; + $interfaces{"dc6"} = 26; + $interfaces{"dc7"} = 27; + $interfaces{"rodc"} = 28; + $interfaces{"localadmember"} = 29; + $interfaces{"plugindc"} = 30; + $interfaces{"localsubdc"} = 31; + $interfaces{"chgdcpass"} = 32; + + # update lib/socket_wrapper/socket_wrapper.c + # #define MAX_WRAPPED_INTERFACES 32 + # if you wish to have more than 32 interfaces + + if (not defined($interfaces{$netbiosname})) { + die(); + } + + return $interfaces{$netbiosname}; +} 1; |