1818# OPTIONAL INPUTS:
1919# -h --help Print this header
2020# --clobber Overwrite submission folder
21+ # --maxsize X Shrink all images with size greater than X kb
2122#
2223# OUTPUTS:
2324# arxiv/lsst-obs-str-vX.X.tar.gz
3132
3233set help = 0
3334set fromscratch = 0
35+ set maxsize = 200
3436
3537while ( $# argv > 0 )
3638 switch ($argv [1])
@@ -46,6 +48,11 @@ while ( $#argv > 0 )
4648 shift argv
4749 set fromscratch = 1
4850 breaksw
51+ case --{maxsize}:
52+ shift argv
53+ set maxsize = $argv [1]
54+ shift argv
55+ breaksw
4956 endsw
5057end
5158
@@ -84,10 +91,11 @@ foreach texfile ( $texfiles )
8491 mkdir -p $texfolder
8592 cp -v $texfile $texfolder
8693end
94+ mv $folder /LSST_Observing_Strategy_White_Paper.tex $folder /ms.tex
8795
8896# Do style files etc by hand
8997cp -v LSST_Observing_Strategy_White_Paper.sty $folder /.
90- cp -v LSST_Observing_Strategy_White_Paper.bbl $folder /.
98+ cp -v LSST_Observing_Strategy_White_Paper.bbl $folder /ms.bbl
9199cp -v deluxetable.sty $folder /.
92100cp -v yahapj.bst $folder /.
93101
@@ -99,25 +107,38 @@ foreach figname ( $fignames )
99107 if ( $# thesefigfiles > 1 ) echo " Warning: copying multiple files $thesefigfiles "
100108 set figfiles = ( $figfiles $thesefigfiles )
101109end
110+
111+ # Copy figures, shrinking as required:
102112foreach figfile ( $figfiles )
103113 set figfolder = $folder /$figfile :h
104114 mkdir -p $figfolder
105- cp -v $figfile $figfolder
115+ set size = ` du -k $figfile | awk ' {print $1}' `
116+ set target = $figfolder /$figfile :t
117+ if ( $size > $maxsize && $figfile :e == pdf ) then
118+ convert $figfile intermediate.png
119+ convert intermediate.png $target
120+ rm intermediate.png
121+ echo " Reduced file size:"
122+ du -k $figfile $target
123+ else
124+ cp -v $figfile $target
125+ endif
106126end
107127
108128# Compile paper, to check:
109- mv $folder /LSST_Observing_Strategy_White_Paper.tex $folder /ms.tex
110129cd $folder
111130 pdflatex ms.tex
112131 pdflatex ms.tex
113132cd -
114133
115134echo " "
116135echo " Successfully compiled paper:"
117- du -h $folder /ms.pdf
136+ set pdffile = $folder :h/${folder: t} .pdf
137+ mv $folder /ms.pdf $pdffile
138+ du -h $pdffile
118139
119140# Clean up before archiving:
120- set types = ( out ent pdf log tod toc )
141+ set types = ( out ent log tod toc )
121142foreach ext ( $types )
122143 rm -vf $folder /ms.* $ext
123144end
0 commit comments