Subversion Repositories wimsdev

Rev

Rev 16091 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3974 guerimand 1
!if $wims_supertype!=0 and $class_typename isitemof portal,group,level
12411 bpr 2
  noarch=yes
3
  !exit
3974 guerimand 4
!endif
23 reyssat 5
 
12841 bpr 6
reclist=user,exo,sheet,exam,doc,sup,def,neighbor,log,\
16094 guerimand 7
  forum,score,manual,cdt,vote,livret,seq,motd,userphoto,tool,freework
3974 guerimand 8
!! test of sharing ressources
9
!if $class_typename!=program
12411 bpr 10
  test_sharing=!defof sharable_all in wimshome/log/classes/$wims_class/neighbors
3974 guerimand 11
!endif
23 reyssat 12
 
16091 guerimand 13
!! ------- system limit configuration read
14
tmp=!defof MAX_SHEETS\
15
MAX_EXAM\
16
MAX_VOTES\
16094 guerimand 17
MAX_FREEWORKS in wimshome/public_html/bases/sys/define.conf
16091 guerimand 18
!distribute line $tmp into max_sheet,max_exam,max_vote,max_freework
19
max_user=!defof class_limit in wimshome/log/classes/$wims_class/.def
20
 
21
 
3974 guerimand 22
!if $test_sharing!=$empty
12411 bpr 23
  !bound job2 within first,download default first
3974 guerimand 24
!else
12411 bpr 25
  !bound job2 within first,upload,download,restore default first
3974 guerimand 26
!endif
27
 
28
!! restriction of restore ressource in portal
4225 bpr 29
!if $job2 iswordof restore upload and $wims_supertype=4
12411 bpr 30
  reclist_portal=sup,neighbor,log,def
16094 guerimand 31
  reclist_program=$(reclist_portal),exo,sheet,exam,doc,vote,livret,seq,freework
12411 bpr 32
  reclist_class=$(reclist_portal),user,motd
33
  !! program test
34
  !if /0/// isin $(wims_class)///
13204 bpr 35
    reclist_course=exo,sheet,doc,tool,seq
12411 bpr 36
  !else
12841 bpr 37
    reclist_course=$(reclist_portal),score,manual,cdt,exo,sheet,exam,doc,vote,motd,tool
12411 bpr 38
  !endif
39
  reclist=$(reclist_$(wims_typename))
3974 guerimand 40
!endif
41
 
23 reyssat 42
!if $job2=upload and $wims_deposit=$empty
12411 bpr 43
  job2=first
23 reyssat 44
!endif
45
 
46
!if $job2!=first
12411 bpr 47
  !read arch/$job2.proc
23 reyssat 48
!endif
49
 
50
!if $job2 iswordof upload restore and $error!=$empty
12411 bpr 51
  job2=first
23 reyssat 52
!endif