Subversion Repositories wimsdev

Rev

Rev 14902 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14902 Rev 15015
Line 54... Line 54...
54
    !reset back
54
    !reset back
55
    !changeto $job.proc
55
    !changeto $job.proc
56
  !endif
56
  !endif
57
!else
57
!else
58
  name_title=$name_archivefreework $freework
58
  name_title=$name_archivefreework $freework
59
  !sh cd $wims_home/log/classes/$wims_class/freeworksdata;\
59
  max_arch_size=!sh cd $wims_home/log/classes/$wims_class/freeworksdata;\
60
      tar -czf $(freework).tgz $freework;\
60
                    tar -czf $(freework).tgz $freework;\
61
      mv $freework.tgz $wims_home/sessions/$wims_session/getfile/$(freework).tgz
61
                    mv $freework.tgz $wims_home/sessions/$wims_session/getfile/$(freework).tgz;\
-
 
62
                    ulimit -f
-
 
63
  !! ---- check size of archive file
-
 
64
  !if $max_arch_size!=unlimited
-
 
65
    max_arch_size=$[ceil($max_arch_size/2)]
-
 
66
  !endif
-
 
67
  !if $wims_exec_error!=$empty
-
 
68
    !if File too large isin $wims_exec_error or Filesize limit exceeded isin $wims_exec_error
-
 
69
      !sh rm -f $wims_home/sessions/$wims_session/getfile/$(freework).tgz
-
 
70
      archive_error=file_too_large
-
 
71
    !endif
-
 
72
  !endif
62
  sfreework=$freework
73
  sfreework=$freework
63
!endif
74
!endif