Subversion Repositories wimsdev

Rev

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

Rev 10984 Rev 10985
Line 4... Line 4...
4 
uclass=$wims_read_parm
 4 
uclass=$wims_read_parm
- 
 
 5 
!if $uclass!=$empty
5 
superclass=!defof class_superclass in wimshome/log/classes/$uclass/.def
 6 
  superclass=!defof class_superclass in wimshome/log/classes/$uclass/.def
- 
 
 7 
!endif
6 
!default superclass=$wims_superclass
 8 
!default superclass=$wims_superclass
7 
!default uclass=$wims_superclass
 9 
!default uclass=$wims_superclass
8 
!!! je ne comprends pas : l'indexation ne se fait pas sinon lorsqu'un enseignant s'inscrit
 10 
!!! je ne comprends pas : l'indexation ne se fait pas sinon lorsqu'un enseignant s'inscrit
9 
!default superclass=$uclass
 11 
!default superclass=$uclass
10 
!default wims_superclass=$class
 12 
!default wims_superclass=$class
Line 13... Line 15...
13 
 !exit
 15 
 !exit
14 
!endif
 16 
!endif
15 
!if $wims_superclass!=$empty and $superclass!=$wims_superclass and $wims_ismanager<2
 17 
!if $wims_superclass!=$empty and $superclass!=$wims_superclass and $wims_ismanager<2
16 
 !exit
 18 
 !exit
17 
!endif
 19 
!endif
18 
 
 20 
 
19 
basedir=wimshome/log/classes/$superclass
 21 
basedir=wimshome/log/classes/$superclass
20 
basedir2=$wims_home/log/classes/$superclass
 22 
basedir2=$wims_home/log/classes/$superclass
21 
basedirr=wimshome/log/classes/$uclass
 23 
basedirr=wimshome/log/classes/$uclass
22 
basedirr2=$wims_home/log/classes/$uclass
 24 
basedirr2=$wims_home/log/classes/$uclass
23 
basedir0=wimshome/log/classes
 25 
basedir0=wimshome/log/classes
Line 26... Line 28...
26 
tlist=!sh cd $basedir2/.users\
 28 
tlist=!sh cd $basedir2/.users\
27 
	grep -l user_supervisable=yes *
 29 
	grep -l user_supervisable=yes *
28 
tlist=!words2items $tlist
 30 
tlist=!words2items $tlist
29 
!set tmp=
 31 
!set tmp=
30 
!writefile $basedirr/.teacherlist.1
 32 
!writefile $basedirr/.teacherlist.1
31 
!if $(authidp_method[1;]) iswordof cas php
 - 
 
32 
  !writefile $basedirr/.teacherlist_external.1
 33 
!writefile $basedirr/.teacherlist_external.1
33 
!endif
 - 
 
34 
!for t in $tlist
 34 
!for t in $tlist
35 
  US_=!defof user_supervise in $basedir/.users/$t
 35 
  US_=!defof user_supervise in $basedir/.users/$t
36 
  EXT_=!defof user_external_auth in $basedir/.users/$t
 36 
  EXT_=!defof user_external_auth in $basedir/.users/$t
37 
  !if $superclass=$uclass or $uclass isitemof $US_
 37 
  !if $superclass=$uclass or $uclass isitemof $US_
38 
   U_=!defof user_lastname,user_firstname in $basedir/.users/$t
 38 
   U_=!defof user_lastname,user_firstname in $basedir/.users/$t
39 
   !appendfile $basedirr/.teacherlist.1 $U_,$t
 39 
   !appendfile $basedirr/.teacherlist.1 $U_,$t
40 
   !if $EXT_!=$empty and $(authidp_method[1;]) iswordof cas php
 40 
   !if $EXT_!=$empty
41 
     !appendfile $basedirr/.teacherlist_external.1 $EXT_:$t
 41 
     !appendfile $basedirr/.teacherlist_external.1 $EXT_:$t
42 
   !endif
 42 
   !endif
43 
   !for l in $US_
 43 
   !for l in $US_
44 
!!teacherlist has not the same status in the superclass (every teacher)
 44 
!!teacherlist has not the same status in the superclass (every teacher)
45 
!! and in the subclasses (supervise teachers )
 45 
!! and in the subclasses (supervise teachers )
46 
     !if $l notwordof $superclass $uclass
 46 
     !if $l notwordof $superclass $uclass
47 
       !appendfile $basedir0/$l/.teacherlist.1 $U_,$t
 47 
       !appendfile $basedir0/$l/.teacherlist.1 $U_,$t
48 
       !if $EXT_!=$empty and $(authidp_method[1;]) iswordof cas php
 48 
       !if $EXT_!=$empty
49 
         !appendfile $basedir0/$l/.teacherlist_external.1 $EXT_:$t
 49 
         !appendfile $basedir0/$l/.teacherlist_external.1 $EXT_:$t
50 
       !endif
 50 
       !endif
51 
       !set tmp=!append item $l to $tmp
 51 
       !set tmp=!append item $l to $tmp
52 
     !endif
 52 
     !endif
53 
   !next
 53 
   !next
Line 56... Line 56...
56 
!set tmp=!listuniq $tmp,$uclass
 56 
!set tmp=!listuniq $tmp,$uclass
57 
!set tmp=!nonempty items $tmp
 57 
!set tmp=!nonempty items $tmp
58 
!for t in $tmp
 58 
!for t in $tmp
59 
    !sh sort -f $basedir02/$t/.teacherlist.1 | uniq | grep . >$basedir02/$t/.teacherlist\
 59 
    !sh sort -f $basedir02/$t/.teacherlist.1 | uniq | grep . >$basedir02/$t/.teacherlist\
60 
       rm -f $basedir02/$t/.teacherlist.1 >/dev/null
 60 
       rm -f $basedir02/$t/.teacherlist.1 >/dev/null
61 
    !if $(authidp_method[1;]) iswordof cas php
 - 
 
62 
     !sh sort -f $basedir02/$t/.teacherlist_external.1 | uniq | grep . >$basedir02/$t/.teacherlist_external\
 61 
     !sh [ -f $basedir02/$t/.teacherlist_external.1 ] && sort -f $basedir02/$t/.teacherlist_external.1 | uniq | grep . >$basedir02/$t/.teacherlist_external\
63 
  rm -f $basedir02/$t/.teacherlist_external.1 >/dev/null
 62 
  rm -f $basedir02/$t/.teacherlist_external.1 >/dev/null
64 
    !endif
 - 
 
65 
!next
 63 
!next
66 
 
 64 
 
67 
!reset tmp
 65 
!reset tmp