Rev 2996 | Rev 3030 | Go to most recent revision | 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 | |||
3019 | guerimand | 3 | !for t in site,cat,zone,delay,download_site |
23 | reyssat | 4 | mu_$t=!defof mu_$t in wimshome/log/wims.conf |
5 | !default mu_$t=!defof DF_mu_$t in wimshome/src/defaults.conf |
||
6 | !next t |
||
7 | |||
3019 | guerimand | 8 | mu_downloadcentername=$empty |
9 | !for depot in $mu_download_site |
||
10 | tmp=!defof publishname in wimshome/public_html/bases/sys/publishcenter/$depot |
||
11 | tmp=!replace internal , by , in $tmp |
||
12 | !default tmp=$depot |
||
13 | mu_downloadcentername=!append item $tmp to $mu_downloadcentername |
||
14 | !next depot |
||
23 | reyssat | 15 | |
3019 | guerimand | 16 | !! inutile puisque de toute façon mu_site vaut la valeur de defaults.conf |
17 | !!if $mu_site=random or $mu_site=$empty |
||
18 | !! mu_site=!defof downloadsites in wimshome/public_html/bases/sys/downloaddata |
||
19 | !! mu_site=!randitem $mu_site |
||
20 | !!endif |
||
21 | |||
23 | reyssat | 22 | !if $job2=one |
23 | !changeto mu/one.proc |
||
24 | !endif |
||
25 | |||
26 | !default musite=$mu_site |
||
27 | !default mucat=$mu_cat |
||
28 | !default muzone=$mu_zone |
||
29 | !default mudelay=$mu_delay |
||
30 | |||
31 | !if $muauto notwordof check update install |
||
32 | muauto= |
||
33 | !exit |
||
34 | !endif |
||
35 | |||
36 | mu_add=mu_site=$musite\ |
||
37 | mu_cat=$mucat\ |
||
38 | mu_zone=$muzone\ |
||
39 | mu_delay=$mudelay\ |
||
40 | mu_auto=$muauto\ |
||
971 | bpr | 41 | w_wims_session=$wims_session\ |
42 | mu_ref=$wims_ref_name |
||
23 | reyssat | 43 | auto=$muauto |
44 | muauto= |
||
45 | |||
46 | !if $auto=check |
||
47 | modupdate=!sh $wims_home/bin/modupdate |
||
48 | !else |
||
49 | !appendfile wimshome/log/wimslogd.exec scripttest=yes\ |
||
50 | wims_home=$wims_home\ |
||
51 | w_wims_version=$wims_version\ |
||
52 | w_mu_add="$mu_add"\ |
||
53 | export scripttest wims_home w_wims_version w_mu_add\ |
||
54 | $wims_home/bin/modupdate mail |
||
55 | !endif |
||
3019 | guerimand | 56 | |
23 | reyssat | 57 | check=!nonempty lines $modupdate |
58 | n=!linecnt $check |
||
59 | !reset mode,modif,new |
||
60 | |||
61 | !for i=1 to $n |
||
62 | l=!line $i of $check |
||
63 | !if updated iswordof $l |
||
64 | mode=modif |
||
65 | !endif |
||
66 | !if added iswordof $l |
||
67 | mode=new |
||
68 | !endif |
||
69 | t=!itemcnt $l |
||
3019 | guerimand | 70 | !if / isin $l and $t=4 and $mode!=$empty |
23 | reyssat | 71 | $mode=!append line $l to $($mode) |
72 | !endif |
||
73 | !next i |
||
74 | |||
75 | modif=!translate internal /~ to ,/ in $modif |
||
76 | new=!translate internal /~ to ,/ in $new |
||
77 | modifcnt=!linecnt $modif |
||
78 | newcnt=!linecnt $new |
||
79 |