Subversion Repositories wimsdev

Rev

Rev 5072 | Rev 5100 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5072 Rev 5092
Line 105... Line 105...
105 
##### end of final test of external connection #####
 105 
##### end of final test of external connection #####
106 
:wimsauth
 106 
:wimsauth
107 
 
 107 
 
108 
pass=!passcrypt $pass
 108 
pass=!passcrypt $pass
109 
!if $pass=$empty
 109 
!if $pass=$empty
110 
  !if $auth_user_orig=$empty
 110 
  !if $auth_user_connection=$empty
111 
    !exit
 111 
    !exit
112 
  !endif
 112 
  !endif
113 
 passwd=????
 113 
 passwd=????
114 
 !appendfile $logfile $logline
 114 
 !appendfile $logfile $logline
115 
 auth_user=$auth_user_orig
 115 
 auth_user=$auth_user_connection
116 
 error=bad_password
 116 
 error=bad_password
117 
 !exit
 117 
 !exit
118 
!endif
 118 
!endif
119 
 
 119 
 
120 
!if $wims_superclass!=$empty and $wims_user!=supervisor and $auth_user!=$wims_user
 120 
!if $wims_superclass!=$empty and $wims_user!=supervisor and $auth_user!=$wims_user