Subversion Repositories wimsdev

Rev

Rev 3047 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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