WebSVN – wimsdev – Diff – /trunk/wims/public_html/modules/adm/class/config/var.proc


wims_exolog_limit=40
wims_prefix=class user tmp n sharing sharable
wims_pfback=$wims_prefix
wims_writable=allow except
wims_nw=today empty nonew creatdays backdays warn
!!## useful here to be able to read the error msg
!read adm/class/classlang lang/names.phtml
 
!if $wims_user!=supervisor and $wims_ismanager<2
  error=not_supervisor
  job=
  !exit
!endif
 
!if $wims_class=$empty
  error=bad_class
  !exit
!endif
 
!read adm/class/config.auth
!if $error!=$empty or $jobt=auth
  job=$jobt
  !exit
!endif
 
!read adm/levelname.phtml
!!## must be read again because $job could be not defined
!read adm/class/classlang lang/names.phtml
wims_helper=chapter=3
!readproc scripts/votemodel.proc
sharelist=user,doc,exo,sheet,exam,forum,sup,motd,cdt,livret,seq,userphoto,tool
!if $votemodel!=yes
  sharelist=$sharelist,vote
!endif
!if $wims_superclass!=$empty
  sharelist=!listcomplement userphoto in $sharelist
!endif
nosharelist=user,exo,sheet,exam
!read adm/class/limits
class_bgcolor=$wims_bgcolor
class_bgimg=$wims_bgimg
class_theme=$wims_theme
class_theme_icon=$wims_theme_icon
class_css=$wims_css
class_ref_menucolor=$wims_ref_menucolor
class_ref_button_bgcolor=$wims_ref_button_bgcolor
class_ref_button_color=$wims_ref_button_color
class_ref_button_help_bgcolor=$wims_ref_button_help_bgcolor
class_ref_button_help_color=$wims_ref_button_help_color
today=!char 1 to 8 of $wims_now
!defread wimshome/log/classes/$wims_class/.def
joballowlist=list,arch,clean,security,grestrict,log,connect,\
    present,access,propagate,index,oefdefault,authtype,connectlink
!if $class_type!=2
  joballowlist=$joballowlist,neighbor
!endif
!bound job within $joballowlist default new
du=!record 0 of wimshome/log/classes/$wims_class/.du
du=!word 1 of $du
du1=!char -3 to -1 of $du
du2=!char 1 to -4 of $du
!default du2=0
du=$du2.$du1
!read tabletheme
 
!if $nonew=$empty
  creation=$class_creation
  !bound creation between integer 20010101 and $today default 20010101
  lastback=$class_backup
  !default lastback=$creation
  !bound lastback between integer 20010101 and $today default 20010101
  warn=
  csec=!date -d '$creation' '+%s'
  creatdays=$[floor(($wims_nowseconds-$csec)/(3600*24))]
  !if $creatdays>340
    warn=$warn creation
  !endif
  lsec=!date -d '$lastback' '+%s'
  backdays=$[floor(($wims_nowseconds-$lsec)/(3600*24))]
  !bound backdays between integer 0 and 101
  !if $backdays>30
    warn=$warn backup
  !endif
  !if ($backdays>7 or $warn!=$empty) and $job2!=import and $job!=log
    !read $job.proc
    job=new
  !endif
  nonew=yes
!endif
 
wims_module_log=$job $job2 $wims_class
 
!read $job.proc
 

Rev 12849	Rev 13318
1	wims_exolog_limit=40	1	wims_exolog_limit=40
2	wims_prefix=class user tmp n sharing sharable	2	wims_prefix=class user tmp n sharing sharable
3	wims_pfback=$wims_prefix	3	wims_pfback=$wims_prefix
4	wims_writable=allow except	4	wims_writable=allow except
5	wims_nw=today empty nonew creatdays backdays warn	5	wims_nw=today empty nonew creatdays backdays warn
6	!!## useful here to be able to read the error msg	6	!!## useful here to be able to read the error msg
7	!read adm/class/classlang lang/names.phtml	7	!read adm/class/classlang lang/names.phtml
8		8
9	!if $wims_user!=supervisor and $wims_ismanager<2	9	!if $wims_user!=supervisor and $wims_ismanager<2
10	error=not_supervisor	10	error=not_supervisor
11	job=	11	job=
-		12	!exit
-		13	!endif
-		14
-		15	!if $wims_class=$empty
-		16	error=bad_class
12	!exit	17	!exit
13	!endif	18	!endif
14		19
15	!read adm/class/config.auth	20	!read adm/class/config.auth
16	!if $error!=$empty or $jobt=auth	21	!if $error!=$empty or $jobt=auth
17	job=$jobt	22	job=$jobt
18	!exit	23	!exit
19	!endif	24	!endif
20		25
21	!read adm/levelname.phtml	26	!read adm/levelname.phtml
22	!!## must be read again because $job could be not defined	27	!!## must be read again because $job could be not defined
23	!read adm/class/classlang lang/names.phtml	28	!read adm/class/classlang lang/names.phtml
24	wims_helper=chapter=3	29	wims_helper=chapter=3
25	!readproc scripts/votemodel.proc	30	!readproc scripts/votemodel.proc
26	sharelist=user,doc,exo,sheet,exam,forum,sup,motd,cdt,livret,seq,userphoto,tool	31	sharelist=user,doc,exo,sheet,exam,forum,sup,motd,cdt,livret,seq,userphoto,tool
27	!if $votemodel!=yes	32	!if $votemodel!=yes
28	sharelist=$sharelist,vote	33	sharelist=$sharelist,vote
29	!endif	34	!endif
30	!if $wims_superclass!=$empty	35	!if $wims_superclass!=$empty
31	sharelist=!listcomplement userphoto in $sharelist	36	sharelist=!listcomplement userphoto in $sharelist
32	!endif	37	!endif
33	nosharelist=user,exo,sheet,exam	38	nosharelist=user,exo,sheet,exam
34	!read adm/class/limits	39	!read adm/class/limits
35	class_bgcolor=$wims_bgcolor	40	class_bgcolor=$wims_bgcolor
36	class_bgimg=$wims_bgimg	41	class_bgimg=$wims_bgimg
37	class_theme=$wims_theme	42	class_theme=$wims_theme
38	class_theme_icon=$wims_theme_icon	43	class_theme_icon=$wims_theme_icon
39	class_css=$wims_css	44	class_css=$wims_css
40	class_ref_menucolor=$wims_ref_menucolor	45	class_ref_menucolor=$wims_ref_menucolor
41	class_ref_button_bgcolor=$wims_ref_button_bgcolor	46	class_ref_button_bgcolor=$wims_ref_button_bgcolor
42	class_ref_button_color=$wims_ref_button_color	47	class_ref_button_color=$wims_ref_button_color
43	class_ref_button_help_bgcolor=$wims_ref_button_help_bgcolor	48	class_ref_button_help_bgcolor=$wims_ref_button_help_bgcolor
44	class_ref_button_help_color=$wims_ref_button_help_color	49	class_ref_button_help_color=$wims_ref_button_help_color
45	today=!char 1 to 8 of $wims_now	50	today=!char 1 to 8 of $wims_now
46	!defread wimshome/log/classes/$wims_class/.def	51	!defread wimshome/log/classes/$wims_class/.def
47	joballowlist=list,arch,clean,security,grestrict,log,connect,\	52	joballowlist=list,arch,clean,security,grestrict,log,connect,\
48	present,access,propagate,index,oefdefault,authtype,connectlink	53	present,access,propagate,index,oefdefault,authtype,connectlink
49	!if $class_type!=2	54	!if $class_type!=2
50	joballowlist=$joballowlist,neighbor	55	joballowlist=$joballowlist,neighbor
51	!endif	56	!endif
52	!bound job within $joballowlist default new	57	!bound job within $joballowlist default new
53	du=!record 0 of wimshome/log/classes/$wims_class/.du	58	du=!record 0 of wimshome/log/classes/$wims_class/.du
54	du=!word 1 of $du	59	du=!word 1 of $du
55	du1=!char -3 to -1 of $du	60	du1=!char -3 to -1 of $du
56	du2=!char 1 to -4 of $du	61	du2=!char 1 to -4 of $du
57	!default du2=0	62	!default du2=0
58	du=$du2.$du1	63	du=$du2.$du1
59	!read tabletheme	64	!read tabletheme
60		65
61	!if $nonew=$empty	66	!if $nonew=$empty
62	creation=$class_creation	67	creation=$class_creation
63	!bound creation between integer 20010101 and $today default 20010101	68	!bound creation between integer 20010101 and $today default 20010101
64	lastback=$class_backup	69	lastback=$class_backup
65	!default lastback=$creation	70	!default lastback=$creation
66	!bound lastback between integer 20010101 and $today default 20010101	71	!bound lastback between integer 20010101 and $today default 20010101
67	warn=	72	warn=
68	csec=!date -d '$creation' '+%s'	73	csec=!date -d '$creation' '+%s'
69	creatdays=$[floor(($wims_nowseconds-$csec)/(3600*24))]	74	creatdays=$[floor(($wims_nowseconds-$csec)/(3600*24))]
70	!if $creatdays>340	75	!if $creatdays>340
71	warn=$warn creation	76	warn=$warn creation
72	!endif	77	!endif
73	lsec=!date -d '$lastback' '+%s'	78	lsec=!date -d '$lastback' '+%s'
74	backdays=$[floor(($wims_nowseconds-$lsec)/(3600*24))]	79	backdays=$[floor(($wims_nowseconds-$lsec)/(3600*24))]
75	!bound backdays between integer 0 and 101	80	!bound backdays between integer 0 and 101
76	!if $backdays>30	81	!if $backdays>30
77	warn=$warn backup	82	warn=$warn backup
78	!endif	83	!endif
79	!if ($backdays>7 or $warn!=$empty) and $job2!=import and $job!=log	84	!if ($backdays>7 or $warn!=$empty) and $job2!=import and $job!=log
80	!read $job.proc	85	!read $job.proc
81	job=new	86	job=new
82	!endif	87	!endif
83	nonew=yes	88	nonew=yes
84	!endif	89	!endif
85		90
86	wims_module_log=$job $job2 $wims_class	91	wims_module_log=$job $job2 $wims_class
87		92
88	!read $job.proc	93	!read $job.proc
89		94

Subversion Repositories wimsdev

(root)/trunk/wims/public_html/modules/adm/class/config/var.proc – Rev 12849 → 13318