Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1
!bound job2 within all,one,first default first
2
 
3030 guerimand 3
!for t in site,cat,zone,delay
15421 bpr 4
  mu_$t=!defof mu_$t in wimshome/log/wims.conf
5
  !default mu_$t=!defof DF_mu_$t in wimshome/public_html/bases/sys/defaults.conf
23 reyssat 6
!next t
7
 
3030 guerimand 8
!readproc mu/publishdownload.def
23 reyssat 9
 
10
!if $job2=one
15421 bpr 11
  !changeto mu/one.proc
23 reyssat 12
!endif
13
 
14
!default musite=$mu_site
15
!default mucat=$mu_cat
16
!default muzone=$mu_zone
17
!default mudelay=$mu_delay
18
 
19
!if $muauto notwordof check update install
15421 bpr 20
  muauto=
21
  !exit
23 reyssat 22
!endif
23
 
24
mu_add=mu_site=$musite\
25
mu_cat=$mucat\
26
mu_zone=$muzone\
27
mu_delay=$mudelay\
28
mu_auto=$muauto\
971 bpr 29
w_wims_session=$wims_session\
30
mu_ref=$wims_ref_name
23 reyssat 31
auto=$muauto
32
muauto=
33
 
34
!if $auto=check
15421 bpr 35
  modupdate=!sh $wims_home/bin/modupdate
23 reyssat 36
!else
15421 bpr 37
  !appendfile wimshome/log/wimslogd.exec scripttest=yes\
23 reyssat 38
wims_home=$wims_home\
39
w_wims_version=$wims_version\
40
w_mu_add="$mu_add"\
41
export scripttest wims_home w_wims_version w_mu_add\
42
$wims_home/bin/modupdate mail
43
!endif
3019 guerimand 44
 
23 reyssat 45
check=!nonempty lines $modupdate
46
n=!linecnt $check
47
!reset mode,modif,new
48
 
49
!for i=1 to $n
15421 bpr 50
  l=!line $i of $check
51
  !if updated iswordof $l
52
    mode=modif
53
  !endif
54
  !if added iswordof $l
55
    mode=new
56
  !endif
57
  t=!itemcnt $l
58
  !if / isin $l and $t=4 and $mode!=$empty
59
    $mode=!append line $l to $($mode)
60
  !endif
23 reyssat 61
!next i
62
 
63
modif=!translate internal /~ to ,/ in $modif
64
new=!translate internal /~ to ,/ in $new
65
modifcnt=!linecnt $modif
66
newcnt=!linecnt $new