Rev 3854 | Go to most recent revision | 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= |
||
| 17 | if [ ! -z "$w_existing" ]; then |
||
| 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 |
||
| 27 | while [ -f $logd/$w_oef_fname$namesuffix.oef -a $namesuffix -lt $max_suffix ]; |
||
| 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 |
||
| 42 | |||
| 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 | |||
| 56 | if [ -f $Logd/def/$namebase.def ]; then |
||
| 57 | echo success $namebase |
||
| 58 | else |
||
| 59 | echo fail unknown |
||
| 60 | fi |
||
| 61 | echo "$msg" |
||
| 62 |