Subversion Repositories wimsdev

Rev

Rev 2441 | Rev 4689 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  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
  50.  cp -pPR $sessiond/getfile/oefimg/* $logd/images/$namebase >/dev/null
  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.  
  60.