Subversion Repositories wimsdev

Rev

Rev 10235 | Rev 11174 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
!read scripts/getindex $modreq
2
!if $title=$empty and $inddef=$empty
3
 job=modname
4
 modreq=
5
 !changeto $job.proc
6
!endif
7
 
6222 bpr 8
dir=binary,data,images,help,anstype,slib
23 reyssat 9
cattest=!module category devel/$auth_login/$mod
10
!if document isin $cattest
7239 bpr 11
  dir=doc/srctex
7285 bpr 12
  test=!defof common_files in wimshome/public_html/$devdir/$mod/var.proc
7236 bpr 13
!!!FIXME depends on 1
14
  !if $test!=yes
7239 bpr 15
    dir=!append item doc/1/files to $dir
7236 bpr 16
  !else
7239 bpr 17
    dir=!append item doc/files to $dir
7236 bpr 18
  !endif
23 reyssat 19
!endif
20
!if oef isin $cattest
21
 test=!defof common_images in wimshome/public_html/$devdir/$mod/var.proc
22
 !if $test!=yes and datamodule/ notin $test
23
  oefs=!sh cd $devdir/$mod/src\
24
   ls *.oef | grep -v '\*' | sed 's/\.oef$$//' | awk '{print "images/"$$1}'
25
  oefs=!lines2items $oefs
26
  dir=$dir,$oefs
27
 !endif
28
!endif
29
 
30
!bound bin_dir within $dir default $
31
 
32
!if $bin_job=erase and $fname!=$empty
33
 check=!translate internal / to , in $fname
34
 check=!item 1 to -2 of $check
35
 check=!nospace $check
36
 check=!translate internal , to / in $check
37
 !if $check!=$empty and $check isitemof $dir and .. notin $fname
38
  src=cd $devdir/$mod; rm -f $fname
39
  !if ../images/ isin ../$check/
40
   src=$src\
41
    exec imgindex
42
  !endif
43
  !sh $src
44
 !endif
45
!endif
10237 bpr 46
success=no
23 reyssat 47
!if $wims_deposit!=$empty and $wims_deposit!=noname.file \
48
	and $bin_job=deposit and $bin_dir!=$empty \
49
	and / notin $wims_deposit and .. notin $wims_deposit
10237 bpr 50
 
23 reyssat 51
 src=mkdir $devdir/$mod/$bin_dir\
52
   mv $wims_home/$wims_sesdir/user-deposit $devdir/$mod/$bin_dir/$wims_deposit
53
 !if ../images/ isin ../$bin_dir/
54
  src=$src\
55
   cd $devdir/$mod\
56
   exec imgindex
57
 !endif
58
 !sh $src
10237 bpr 59
 success=yes
23 reyssat 60
!endif
61
 
62
dirs=!items2words $dir
63
bfiles=!sh cd $devdir/$mod\
10235 bpr 64
	dd=`find $dirs -type f -name '*'| sort | uniq 2>/dev/null`\
23 reyssat 65
	[ -z "$$dd" ] && exit\
66
	ls -l $$dd | awk '{print $$9","$$5}'
67
 
68
bcnt=!linecnt $bfiles
9932 bpr 69
 
70
dest_=$wims_home/public_html/$devdir/$mod
71
 
10235 bpr 72
!if $mkdoc !=$empty
9932 bpr 73
  !sh cd $dest_ ; $wims_home/other/bin/src2def ;
74
!endif
75
 
76
!reset mkdoc