Subversion Repositories wimsdev

bad=

!if $pass!=$empty and $pass notsametext $pass2
 login=
 error=pass_discord
 !exit
!endif

!if $auth_method isitemof $auth_method_list
  !if $idp_method=ldap 
    !read adm/class/initldap 
    !if $ldap_login!=$empty
      !set login_method=$idp_method $ldap_login
    !endif
  !endif
  up_external_auth=!lowercase $user_auth
  !if $new_user!=no
    !read adm/class/hashlogin $user_auth,$class,$login_method
  !endif
!endif

!if $idp_method isitemof $idp_method_list
  !read adm/class/idp_$idp_method $user_auth
  firstname=$up_firstname
  lastname=$up_lastname
  email=$up_email
!endif

!if $login=$empty or $lastname=$empty or $firstname=$empty or \
  ($new_user=yes and $pass=$empty)
 login=
 error=empty_data
 !exit
!endif

test=!defof user_exists in $classdir1/.users/$login
!if $new_user=yes and $test=yes
 login=
 error=user_exists
 !exit
!endif

!if $new_user=no and $test!=yes
 error=bad_user
 !exit
!endif

!if $new_user=yes or $pass!=$empty
 up_password=$pass
!endif

test=!defof user_exists in $classdir1/.users/.$login
!if $test=yes
 login=
 error=user_deleted
 !exit
!endif

up_lastname=$lastname
up_firstname=$firstname
up_email=$email
up_class=$wims_superclass
up_external_auth=!lowercase $user_auth

replacelist=external_auth,supervise,participate,email
!read adm/class/adduser $login

!if $bad!=$empty
 error=bad_definition
 !exit
!endif