mirror of
https://github.com/processone/ejabberd
synced 2025-10-03 09:49:18 +02:00
Update example extauth script with tryregister, removeuser and removeuser3 (EJAB-641)
This commit is contained in:
parent
0e5b0b43fa
commit
548be4cf3d
1 changed files with 16 additions and 0 deletions
|
@ -42,6 +42,22 @@ while(1)
|
||||||
# password is null. Return 1 if the user $user\@$domain exitst.
|
# password is null. Return 1 if the user $user\@$domain exitst.
|
||||||
$result = 1;
|
$result = 1;
|
||||||
},last SWITCH;
|
},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;
|
my $out = pack "nn",2,$result ? 1 : 0;
|
||||||
syswrite STDOUT,$out;
|
syswrite STDOUT,$out;
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue