diff options
author | Badlop <badlop@process-one.net> | 2010-12-03 17:21:50 +0100 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2010-12-03 17:26:10 +0100 |
commit | 548be4cf3df92b01244c1b21fb9daf506537d4fb (patch) | |
tree | a08b0db3456f01c64500bcb434e80165d0f9547d /examples | |
parent | Revert "Fix cyrsasl_digest RFC-2831 2.1.2.1 (EJAB-476)" (diff) |
Update example extauth script with tryregister, removeuser and removeuser3 (EJAB-641)
Diffstat (limited to 'examples')
-rwxr-xr-x | examples/extauth/check_pass_null.pl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/examples/extauth/check_pass_null.pl b/examples/extauth/check_pass_null.pl index f15fe910b..cbf179202 100755 --- a/examples/extauth/check_pass_null.pl +++ b/examples/extauth/check_pass_null.pl @@ -42,6 +42,22 @@ while(1) # password is null. Return 1 if the user $user\@$domain exitst. $result = 1; },last SWITCH; + + $op eq 'tryregister' and do + { + $result = 1; + },last SWITCH; + + $op eq 'removeuser' and do + { + # password is null. Return 1 if the user $user\@$domain exitst. + $result = 1; + },last SWITCH; + + $op eq 'removeuser3' and do + { + $result = 1; + },last SWITCH; }; my $out = pack "nn",2,$result ? 1 : 0; syswrite STDOUT,$out; |