Rev 13573 | Rev 15280 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 13573 | Rev 14348 | ||
---|---|---|---|
Line 47... | Line 47... | ||
47 | !endif |
47 | !endif |
48 | !endif |
48 | !endif |
49 | 49 | ||
50 | success=no |
50 | success=no |
51 | !if $wims_deposit!=$empty and $wims_deposit!=noname.file \ |
51 | !if $wims_deposit!=$empty and $wims_deposit!=noname.file \ |
52 |
|
52 | and $bin_job=deposit and $bin_dir!=$empty \ |
53 |
|
53 | and / notin $wims_deposit and .. notin $wims_deposit and & notin $wims_deposit |
54 |
|
54 | wims_deposit=!nospace $wims_deposit |
55 |
|
55 | wims_deposit=!deaccent $wims_deposit |
56 |
|
56 | !set test=!filelist $devdir/$mod/images |
57 |
|
57 | !set test1=!lowercase $test |
58 |
|
58 | !set test2=!lowercase $wims_deposit |
59 |
|
59 | !if $test2 isin $test1 and $wims_deposit notin $test |
60 |
|
60 | !!files are different only by the case |
61 |
|
61 | error=bad_case |
62 |
|
62 | !goto list |
63 |
|
63 | !endif |
64 |
|
64 | src=mkdir $devdir/$mod/$bin_dir\ |
65 | mv $wims_home/$wims_sesdir/user-deposit $devdir/$mod/$bin_dir/$wims_deposit |
65 | mv $wims_home/$wims_sesdir/user-deposit $devdir/$mod/$bin_dir/$wims_deposit |
66 |
|
66 | !if ../images/ isin ../$bin_dir/ |
67 | src=$src\ |
67 | src=$src\ |
68 |
|
68 | cd $devdir/$mod\ |
69 |
|
69 | exec imgindex |
70 |
|
70 | !endif |
71 |
|
71 | !sh $src |
72 |
|
72 | success=yes |
73 | !endif |
73 | !endif |
74 | :list |
74 | :list |
75 | dirs=!items2words $dir |
75 | dirs=!items2words $dir |
76 | bfiles=!sh cd $devdir/$mod\ |
76 | bfiles=!sh cd $devdir/$mod\ |
77 |
|
77 | dd=`find $dirs -type f -name '*'| sort | uniq 2>/dev/null`\ |
78 |
|
78 | [ -z "$$dd" ] && exit\ |
79 |
|
79 | ls -l $$dd | awk '{print $$9","$$5}' |
80 | 80 | ||
81 | bcnt=!linecnt $bfiles |
81 | bcnt=!linecnt $bfiles |
82 | 82 | ||
83 | dest_=$wims_home/public_html/$devdir/$mod |
83 | dest_=$wims_home/public_html/$devdir/$mod |
84 | 84 |