Rev 4689 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
23 | reyssat | 1 | #! /bin/sh |
2 | |||
3 | basedir=`pwd` |
||
4 | sessiond=$w_wims_home/$w_wims_sesdir |
||
5 | Logd=$w_wims_home/log/classes/$w_wims_class |
||
6 | logd=$Logd/src |
||
7 | classb=$basedir/modules/classes |
||
8 | classd=$classb/$w_lang |
||
9 | oefname=$sessiond/submit.oef |
||
10 | |||
11 | if [ ! -d $classd ]; then exit; fi |
||
4689 | bpr | 12 | ### in a particular situation a file images has been created by error |
13 | ### do not understand why |
||
14 | if [ -f $logd/images ]; then rm $logd/images ; mkdir $logd/images; fi |
||
23 | reyssat | 15 | |
16 | namesuffix= |
||
14091 | obado | 17 | if [ ! -z "$w_existing" ]; then |
23 | reyssat | 18 | namebase=$w_existing |
19 | else |
||
20 | if [ -f $logd/$w_oef_fname.oef ]; then |
||
21 | if diff -b -B -q $oefname $logd/$w_oef_fname.oef >/dev/null; then |
||
22 | echo fail already |
||
23 | exit |
||
24 | fi |
||
25 | max_suffix=20 |
||
26 | namesuffix=2 |
||
14091 | obado | 27 | while [ -f $logd/$w_oef_fname$namesuffix.oef -a $namesuffix -lt $max_suffix ]; |
23 | reyssat | 28 | do |
29 | if diff -b -B -q $oefname $logd/$w_oef_fname$namesuffix.oef >/dev/null; then |
||
30 | echo fail already |
||
31 | exit |
||
32 | fi |
||
33 | namesuffix=$(($namesuffix+1)) |
||
34 | done |
||
35 | if [ $namesuffix -gt $(($max_suffix-1)) ]; then |
||
36 | echo fail name_exhaust |
||
37 | exit |
||
38 | fi |
||
39 | fi |
||
40 | namebase=$w_oef_fname$namesuffix |
||
41 | fi |
||
14091 | obado | 42 | |
23 | reyssat | 43 | if [ ! -d "$logd" ]; then |
44 | mkdir $logd >/dev/null |
||
45 | fi |
||
46 | cp -f $oefname $logd/$namebase.oef >/dev/null |
||
47 | cd $classd |
||
48 | msg=`src2def oef` |
||
49 | |||
50 | if [ -d $sessiond/getfile/oefimg ]; then |
||
51 | mkdir -p $logd/images/$namebase |
||
52 | rm -f $logd/images/$namebase/* 2>/dev/null |
||
3854 | bpr | 53 | cp -pPR $sessiond/getfile/oefimg/* $logd/images/$namebase >/dev/null |
23 | reyssat | 54 | fi |
55 | |||
14091 | obado | 56 | if [ -f $Logd/def/$namebase.def ]; then |
23 | reyssat | 57 | echo success $namebase |
58 | else |
||
59 | echo fail unknown |
||
60 | fi |
||
61 | echo "$msg" |