Subversion Repositories wimsdev

Rev

Rev 2441 | Rev 4689 | 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
12
 
13
namesuffix=
14
if [ ! -z "$w_existing" ]; then
15
 namebase=$w_existing
16
else
17
 if [ -f $logd/$w_oef_fname.oef ]; then
18
  if diff -b -B -q $oefname $logd/$w_oef_fname.oef >/dev/null; then
19
   echo fail already
20
   exit
21
  fi
22
  max_suffix=20
23
  namesuffix=2
24
  while [ -f $logd/$w_oef_fname$namesuffix.oef -a $namesuffix -lt $max_suffix ];
25
  do
26
   if diff -b -B -q $oefname $logd/$w_oef_fname$namesuffix.oef >/dev/null; then
27
    echo fail already
28
    exit
29
   fi
30
   namesuffix=$(($namesuffix+1))
31
  done
32
  if [ $namesuffix -gt $(($max_suffix-1)) ]; then
33
   echo fail name_exhaust
34
   exit
35
  fi
36
 fi
37
 namebase=$w_oef_fname$namesuffix
38
fi
39
 
40
if [ ! -d "$logd" ]; then
41
  mkdir $logd >/dev/null
42
fi
43
cp -f $oefname $logd/$namebase.oef >/dev/null
44
cd $classd
45
msg=`src2def oef`
46
 
47
if [ -d $sessiond/getfile/oefimg ]; then
48
 mkdir -p $logd/images/$namebase
49
 rm -f $logd/images/$namebase/* 2>/dev/null
3854 bpr 50
 cp -pPR $sessiond/getfile/oefimg/* $logd/images/$namebase >/dev/null
23 reyssat 51
fi
52
 
53
if [ -f $Logd/def/$namebase.def ]; then
54
 echo success $namebase
55
else
56
 echo fail unknown
57
fi
58
echo "$msg"
59