!read adm/language lang/names.phtml
!read adm/language adm/lang/external_auth.phtml
!read adm/css.phtml
!header1
!read adm/title.phtml 1\
WIMS $httpd_HTTP_HOST\
$name_title
!! login and password must contain 4-16 alphanumeric characters
!!set password_pattern=[a-zA-Z0-9]{4,16}
!!set login_pattern=[a-zA-Z0-9]{4,16}
!readproc adm/class/authchars
!set login_pattern=[$char_login]{4,16}
!set password_pattern=[$char_passwd]{4,16}
!if $cltype iswordof 2 4 and $classcnt>0
<p class="wimscenter">
($name_reserved)
</p>
!endif
!if $error!=$empty
<div class="wims_msg alert">
!read lang/msg.phtml.$modu_lang
</div>
<p>
!set wims_ref_class=wims_button
!href cmd=new&class=$class&subclass=yes $wims_name_back2
</p>
!goto end1
!endif
!if $classcnt=0
$name_warning1
!endif
!if $classlist!=$empty
$name_inscription
$table_header
!if $ctype=0
$table_hdtr
<th>$wims_name_name</th><th>$wims_name_nameteacher</th><th>$wims_name_level</th><th>$wims_name_Language</th>
<th>$name_remainig</th><th>$wims_name_Status</th>
!else
<caption>$institution_name</caption>
$table_hdtr
<th>$wims_name_name</th><th>$wims_name_Supervisor</th><th>$wims_name_level</th>
<th>$wims_name_Status</th></tr>
!endif
!for cl in $classlist
!reset class_supervisor
,class_email
,class_level
,class_lang
,class_institution
,class_description
,class_password
,class_limit
!defread wimshome
/log/classes
/$cl/.def
!distribute char $class_level into l1,l2
!set part
=!recordcnt wimshome
/log/classes
/$cl/.userlist
$table_tr<td>
!if $ctype=0
!href module=$module&cmd=reply&class=$cl $class_institution<br>$class_description
!else
!href module=$module&cmd=reply&class=$cl $class_description
!endif
</td><td>
!mailurl $class_email $class_supervisor
</td>
!if $class_level=$empty
!set pname
=!defof class_description in wimshome
/log/classes
/$class_parent/.def
<td>$pname</td>
!else
<td>$(level$l1)<br>$name_year $l2</td>
!endif
!if $ctype=0
<td>$(lang_$class_lang)</td>
<td style="text-align:right">
!if $class_limit-$part>$site_dispo
$site_dispo
!else
$[$class_limit-$part]
!endif
</td>
!endif
<td>
!if $class_password=$empty
<span class="wims_label open">$(name_statut[1])</span>
!else
<span class="wims_label wims_warning">$(name_statut[2])</span>
!endif
</td>
</tr>
$table_end
<div class="wims_msg info">$name_remark1</div>
!goto end1
!endif classlist!=$empty
!read adm/class/classname.phtml $description\
$institution
!! if class_mixed_external_auth not 0 show message in and class_external_auth
!! and when class_mixed_external_auth=2 also disable the registration form
!! please check! thanks!
!default authreg=0
!if $cltype=1
!set authreg
=!defof class_mixed_external_auth in wimshome
/log/classes
/$class_parent/.def
!set extauth
=!defof class_external_auth in wimshome
/log/classes
/$class_parent/.def
!set usuperv
=!defof user_supervisable in wimshome
/log/classes
/$class_parent/.users
/$wims_user !endif
!if $cltype=0
!set super_mixed_auth
=!defof class_mixed_external_auth in wimshome
/log/classes
/$class_superclass/.def
!if $super_mixed_auth=2
!set authreg=$super_mixed_auth
!set extauth
=!defof class_external_auth in wimshome
/log/classes
/$class_superclass/.def
!else
!set authreg=$class_mixed_external_auth
!set extauth
=!defof class_external_auth in wimshome
/log/classes
/$class/.def
!endif
!! do we really need this for $cltype=0?
!set usuperv
=!defof user_supervisable in wimshome
/log/classes
/$class/.users
/$wims_user !endif
!! need to check if supervisor in order to allow user management by supervisor
!! need to check if user_supervisable for direct access from module=home
!! anything else?
!if $wims_user!=supervisor and $usuperv!=yes and $authreg iswordof 1 2 and $cltype iswordof 0 1
<div class="wims_external_auth">
$extauth
</div>
!if $authreg=2
!goto end1
!endif
!endif
!if $password!=$empty and $passverify=$empty
!if $cltype iswordof 2 4
$name_classessss
!href module=adm/class/classes&type=authparticipant&class=$class $classname
!else
$name_classessss
!href module=adm/class/classes&type=authparticipant&class=$class $classname
!endif
!if $cltype iswordof 4 2
$name_warning_protected
!if $classcnt>0
$name_inscription_student
!href cmd=new&module=$module&class=$class&subclass=yes $name_inyourclass
.
!endif
!else
$name_isprotected
!endif
<p>$name_writepasswd
!if $cltype iswordof 2 4
$name_asateacher.
!else
$name_asaparticipant.
!endif
</p>
!form reply
<input type="hidden" name="step" value="1">
<fieldset class="property_fields halfwidth blockcenter">
<legend>
!if $utype=0
$name_title_participant
!else
$name_type_supervisor
!endif
</legend>
<div class="field box">
<label for="classpass">$wims_name_Password</label>
<input type="password" name="classpass" id="classpass" required="required" class="noicon" placeholder="$wims_name_Password">
</div>
<div class="wimscenter wimsform">
<input type="submit" value="$wims_name_send">
</div>
</fieldset>
!formend
<span class="wims_warning">$wims_name_warning</span>.
!if $cltype iswordof 2 4
$name_access1
!else
$name_access2
!endif
$name_obtainpasswd
(
!if $cltype iswordof 2 4
!mailurl $smail $name_write_adm
!else
!mailurl $smail $wims_name_wsup
!endif
).
!if $cltype iswordof 2 4
<p>
<span class="wims_warning">$wims_name_warning</span>.
$name_warning_direct
!href cmd=new&module=$module&class=$class&subclass=yes $name_inyourclass
.
</p>
!endif
!goto end1
!endif
!if $step=$empty or $step<2
!if $ssclass!=$empty and $wims_class!=$ssclass and $wims_user=supervisor
!form reply
<input type="hidden" name="step" value="1">
<label for="search">$name_research:</label>
<input size="20" name="search" id="search" value="$search">
<input type="submit" value="$wims_name_tosave">
!formend
!default foundcnt=0
!if $foundcnt>0
$table_header
<caption>$name_clickname</caption>
$table_hdtr<th>$wims_name_name</th><th>$wims_name_Login</th></tr>
!for i=1 to $foundcnt
!set l=!line $i of $found
!distribute item $l into l_,f_,L_
$table_tr<td>
!href cmd=reply&step=2&login=$L_ $l_, $f_
</td>
<td>$L_</td>
</tr>
$table_end
!goto end1
!endif
!if $search!=$empty and $foundcnt=0
<p> ($name_nofound) </p>
!endif
$name_newparticipant
!else
!if $idp_method notitemof $idp_method_list
!if $wims_user=supervisor
$name_inscription21
!else
$name_inscription2
!endif
!endif
!endif
!form reply
!! check user supervisor??
!if $idp_method isitemof $idp_method_list and $auth_user$user_auth!=$empty and $wims_user!=supervisor
<input type="hidden" name="step" value="3">
$name_inscription4:
<p>
!formcheckbox agreecgu
list yes prompt
$name_cgu [
!href target=wims_internal module=adm/light&phtml=cgu.phtml $name_seecgu
]
</p>
<div class="wimscenter wimsform"><input type="submit" value="$wims_name_tosave"></div>
!goto end1
!endif
!!FIXME $auth_user=$empty
!if $wims_user=supervisor and $auth_user=$empty
!! teacher registering a student with idp ldap
!if $idp_method isitemof ldap
<span class="wims_warning">$name_login_external ($name_idp_external)</span>:
!!!FIXME check the value of step
<input type="hidden" name="step" value="3">
<fieldset class="property_fields halfwidth blockcenter">
<legend>$name_title_participant</legend>
<div class="field box">
<label for="user_auth">$wims_name_Login ($name_external)</label>
<input size="16" name="user_auth" id="user_auth" value="$user_auth">
</div>
!set ct
=!defof class_type in wimshome
/log/classes
/$class/.def
!if $wims_user=supervisor and $class=$wims_class and $ct iswordof 2 4
<div class="field box">
<label for="utype">$name_accounttype</label>
!default utype=0
!set wims_ref_class=wims_formradio
!formradio utype
list 0,1 prompt
$wims_name_namestudent,$wims_name_nameteacher </div>
!endif
<div class="wimscenter wimsform">
<input type="submit" value="$wims_name_tosave">
</div>
</fieldset>
!formend
!goto end1
!endif
!! teacher registering a student with external auth without idp ldap
!if $auth_method isitemof $auth_method_list
<input type="hidden" name="step" value="3">
<fieldset class="property_fields halfwidth blockcenter">
<legend>$name_title_participant</legend>
<div class="field box halfwidth">
<label for="lastn">$wims_name_lastname</label>
<input size="20" name="lastn" id="lastn" value="$lastn">
</div>
<div class="field box halfwidth">
<label for="firstn">$wims_name_firstname</label>
<input size="20" name="firstn" id="firstn" value="$firstn">
</div>
<div class="field box">
<label for="user_auth">$wims_name_Login </label>
<input size="16" name="user_auth" id="user_auth" value="$user_auth">
<div class="formHelp">$name_external,
<span class="wims_warning">$name_login_external_warning</span>
</div>
</div>
<div class="field box">
<label for="email">$wims_name_email</label>
<input type="email" size="60" name="email" id="email" value="$email">
<div class="formHelp">$name_optional</div>
</div>
<div class="wimscenter wimsform">
<input type="submit" value="$wims_name_tosave">
</div>
</fieldset>
!formend
!goto end1
!endif
!endif step
empty or step
<2
!if $auth_user=$empty or $auth_method notitemof $auth_method_list
!!read adm/language lang/names.phtml
<input type="hidden" name="step" value="2">
!else
<input type="hidden" name="step" value="3">
!endif
<fieldset class="property_fields halfwidth blockcenter">
<legend>
!if $utype=0
$name_title_participant
!else
$name_title_supervisor
!endif
</legend>
<div class="field box halfwidth">
<label for="lastn">$wims_name_lastname</label>
<input size="20" name="lastn" id="lastn" value="$lastn" required="required">
</div>
<div class="field box halfwidth">
<label for="firstn">$wims_name_firstname</label>
<input size="20" name="firstn" id="firstn" value="$firstn" required="required">
</div>
!if $wims_user=supervisor
!endif
!if ($auth_user=$empty or $auth_method notitemof $auth_method_list) or $wims_user=supervisor
<div class="field box">
<label for="login">$wims_name_Login</label>
<input size="16" name="login" id="login" value="$login" required="required" pattern="$login_pattern">
<div class="formHelp">
!if $auth_method notitemof $auth_method_list or $wims_user!=supervisor
$name_warning_login
!endif
$name_warning_login2
</div>
!if $auth_method isitemof $auth_method_list and $wims_user=supervisor
<label for="login_ext">$wims_name_Login</label>
<input size="16" name="login_ext" id="login_ext" value="$login_ext">
<div class="formHelp">$name_external
<span class="wims_warning">$name_login_external_warning</span>
</div>
!endif
</div>
!if $auth_method notitemof $auth_method_list
<div class="field box">
<label for="pass">$wims_name_Password</label>
<input type="password" size="16" name="pass" id="pass" required="required" pattern="$password_pattern">
<div class="formHelp">$name_passwd_warning</div>
</div>
!endif
!else
<div class="field box">
<label for="login">$wims_name_Login</label>
<input size="16" name="login" id="login" value="$login" readonly="readonly">
<div class="formHelp">$name_internal</div>
</div>
<div class="field box">
<label for="login_ext">$wims_name_Login</label>
<input size="16" name="login_ext" id="login_ext" value="$login_ext" readonly="readonly">
<div class="formHelp">$name_external, <span class="wims_warning"></span></div>
</div>
!endif
<div class="field box">
<label for="email">$wims_name_email</label>
<input type="email" size="60" name="email" id="email" value="$email">
<div class="formHelp">$name_optional</div>
</div>
!if $wims_user=supervisor and $class=$wims_class and $cltype iswordof 2 4
<div class="field box">
!! <label for="utype">$name_accounttype</label>
<b>$name_accounttype</b>
!if $utype=0
$wims_name_namestudent
!else
$wims_name_nameteacher
!endif
!! !default utype=0
!! !set wims_ref_class=wims_formradio
!! !formradio utype
list 0,1 prompt
$wims_name_namestudent,$wims_name_nameteacher </div>
!endif
!if $regvars_cnt>0
!read regvars.phtml
!endif
!if $wims_user!=supervisor
<div class="field box">
!set wims_ref_class=wims_formradio
!formcheckbox agreecgu
list yes prompt
$name_cgu [
!href target=wims_internal module=adm/light&phtml=cgu.phtml $name_seecgu
]
</div>
!endif
<div class="wimscenter wimsform"><input type="submit" value="$wims_name_tosave"></div>
</fieldset>
!formend
!goto end1
!endif
!if $step=2
!if $wims_user!=supervisor
$name_hello, $name_student!<p>
$name_inscription3
!else
$name_inscription31
!endif
<span class="tt wims_login">$login</span>. </p>
!if $email=$empty
<p> $name_emptyemail </p>
!else
<p>$wims_name_email: <span class="tt wims_address">$email</span> </p>
!endif
!form reply
<input type="hidden" name="step" value="3">
<fieldset class="property_fields halfwidth blockcenter">
<legend>
!if $utype=0
$name_title_participant
!else
$name_title_supervisor
!endif
</legend>
<div class="field box">
<label for="pass2">$name_passwd_exact</label>
<input type="password" size="16" name="pass2" id="pass2" required="required">
</div>
<div class="wimscenter wimsform">
<input type="submit" value="$wims_name_send">
</div>
</fieldset>
!formend
!goto end1
!endif
!if $step=3
!! needed for $name_student after !endif ?
!readproc adm/class/userdef class,$class,$login
!set firstn=!defof user_firstname in $userdef
!set lastn=!defof user_lastname in $userdef
!if $wims_user=supervisor
!set login_wims=!defof user_external_auth in $userdef
!default login_wims=$Login
$name_studentadded
<span class="tt wims_login">
!href module=adm/class/usermanage&job=userprop&getuser=$Login $login_wims
</span>.
!if $wims_supertype iswordof 2 4
!readproc adm/gateway/transfer $login test
!if $transfer_test>0
<p>
$name_otheractivities
!href module=adm/class/usermanage&job=transfer&getuser=$login $name_transfer1
</p>
!endif
!endif
!set wims_menu_items=!append line usermanage,1,module=adm/class/usermanage\
addstudent,1,module=$module&step=1\
to wims_menu_items
!endif
<p>$name_hello, $name_student!</p>
<p>$name_welcome
<span class="tt wims_login">$login</span>.</p>
$name_youcan
!read adm/class/initclass $class,auth
!if $wims_class!=$empty
!if $auth_method iswordof cas
!set url = $wims_ref_name?module=adm/class/classes&type=authparticipant&class=$class
!read adm/codeurl $url
!set class_cas_auth
=!getdef class_cas_auth in wimshome
/log/classes
/$ssclass/.def
<a class="wims_button" href="$class_cas_auth/login?service=$script_out">$wims_name_Enter</a>
!else
!if $auth_method iswordof ldap php
!set tmp
=!getdef user_external_auth in wimshome
/log/classes
/$ssclass/.users
/$login !href module=adm/class/classes&type=authparticipant&class=$class&auth_user=$tmp $name_gotowork
!else
!href module=adm/class/classes&type=authparticipant&class=$class&auth_user=$login $name_gotowork
!endif
!endif
!!FIXME what about php here
!! Pourquoi est-ce different : dans le second cas ouvre une autre session,
!! demande de nouveau le mot de passe ???
!else
!if $auth_method isitemof cas
!set url = $wims_ref_name?module=adm/class/classes&type=authparticipant&class=$class
!read adm/codeurl $url
!set class_cas_auth
=!getdef class_cas_auth in wimshome
/log/classes
/$ssclass/.def
<a class="wims_button" href="$class_cas_auth/login?service=$script_out">$wims_name_Enter</a>
!else
!if $auth_method iswordof ldap
!set tmp
=!getdef user_external_auth in wimshome
/log/classes
/$ssclass/.users
/$login !href module=adm/class/classes&type=authparticipant&class=$class&auth_user=$tmp $name_gotowork
!else
<a href="$wims_ref_name?lang=$lang&+module=adm/class/classes&+type=authparticipant&+class=$class&+auth_user=$login">
$name_gotowork</a> ($name_bookmark).
!endif
!endif
!endif
!endif
:end1
!if $wims_user=supervisor
!if $step=1
!set wims_menu_items=!append line back2,1,module=adm/class/usermanage\
to $wims_menu_items
!endif
!endif
!if $cltype iswordof 2 4
!set wims_menu_items=!append line classlist,1,module=adm/class/classes&type=supervisor\
to $wims_menu_items
!else
!set wims_menu_items=!append line classlist,1,module=adm/class/classes&type=participant\
to $wims_menu_items
!endif
!tail