added some helper tools for vasp usage
[physik/posic.git] / vasp_tools / visualize
1 #!/bin/sh
2
3 #
4 # visualization script
5 # author: frank.zirkelbach@physik.uni-augsburg.de
6 #
7
8 # help function
9 draw_cyl() {
10         cat >> temp.pov <<-EOF
11 cylinder {
12 <$1, $3, $2>, <$4, $6, $5>, 0.05
13 pigment { color White }
14 }
15 EOF
16 }
17 draw_bond() {
18         cat >> temp.pov <<-EOF
19 cylinder {
20 <$1, $3, $2>, <$4, $6, $5>, $7
21 pigment { color Blue }
22 }
23 EOF
24 }
25
26 # defaults
27
28 lc=5.429
29 directory="doesnt_exist____for_sure"
30 width="640"
31 height="480"
32 radius="0.6"
33 x0="-0.6"; y0="-0.6"; z0="-0.6";
34 x1="0.6"; y1="0.6"; z1="0.6";
35 cx=""; cy=""; cz="";
36 lx="0"; ly="-100"; lz="100";
37 ortographic=""
38 bx0=""; by0=""; bz0="";
39 bx1=""; by1=""; bz1="";
40 bcr="";
41 clx="0"; cly="0"; clz="0";
42 extra=0
43
44 # parse argv
45
46 while [ "$1" ]; do
47         case "$1" in
48                 -d)             directory=$2;           shift 2;;
49                 -w)             width=$2;               shift 2;;
50                 -h)             height=$2;              shift 2;;
51                 -r)             radius=$2;              shift 2;;
52                 -nll)           x0=$2; y0=$3; z0=$4;    shift 4;;
53                 -fur)           x1=$2; y1=$3; z1=$4;    shift 4;;
54                 -c)             cx=$2; cy=$3; cz=$4;    shift 4;;
55                 -L)             clx=$2; cly=$3; clz=$4; shift 4;;
56                 -l)             lx=$2; ly=$3; lz=$4;    shift 4;;
57                 -o)             ortographic=1;          shift 1;;
58                 -b)             bx0=$2; by0=$3; bz0=$4;
59                                 bx1=$5; by1=$6; bz1=$7; shift 7;;
60                 -B)             bcr=$2;                 shift 2;;
61                 -C)             lc=$2;                  shift 2;;
62                 -e)             extra=1;                shift 1;;
63                 *)
64                                 echo "options:"
65                                 echo "########"
66                                 echo "directory to progress:"
67                                 echo "  -d <directory> (mandatory)"
68                                 echo "png dim:"
69                                 echo "  -w <width>"
70                                 echo "  -h <height>"
71                                 echo "atom size:"
72                                 echo "  -r <radius>"
73                                 echo "  -B <bond cylinder radius>"
74                                 echo "unit cell:"
75                                 echo "  -C <lattice constant>"
76                                 echo "visualization volume:"
77                                 echo "  -nll <x> <y> <z> (near lower left)"
78                                 echo "  -fur <x> <y> <z> (far upper right)"
79                                 echo "  -o (ortographic)"
80                                 echo "bounding box:"
81                                 echo "  -b <x0> <y0> <z0> <x1> <y1> <z1>"
82                                 echo "povray:"
83                                 echo "  -c <x> <y> <z> (camera position)"
84                                 echo "  -L <x> <y> <z> (camera look)"
85                                 echo "  -l <x> <y> <z> (light source)"
86                                 exit 1;;
87         esac
88 done
89
90 # calculation from lattic eunits to angstroms
91
92 [ "$lc" = "sic" ] && lc=4.359
93 [ "$lc" = "si" ] && lc=5.429
94 [ "$lc" = "c" ] && lc=3.566
95
96 #offset=`echo 0.125 \* $lc | bc`
97 offset=0.0
98
99 x0=`echo $x0 \* $lc + $offset | bc`
100 y0=`echo $y0 \* $lc + $offset | bc`
101 z0=`echo $z0 \* $lc + $offset | bc`
102 x1=`echo $x1 \* $lc + $offset | bc`
103 y1=`echo $y1 \* $lc + $offset | bc`
104 z1=`echo $z1 \* $lc + $offset | bc`
105
106 clx=`echo $clx \* $lc + $offset | bc`
107 cly=`echo $cly \* $lc + $offset | bc`
108 clz=`echo $clz \* $lc + $offset | bc`
109
110 if [ -n "$cx" -a -n "$cy" -a -n "$cz" ]; then
111         cx=`echo $cx \* $lc + $offset | bc`
112         cy=`echo $cy \* $lc + $offset | bc`
113         cz=`echo $cz \* $lc + $offset | bc`
114 fi
115
116 if [ -n "$bx0" ]; then
117         bx0=`echo $bx0 \* $lc + $offset | bc`
118         by0=`echo $by0 \* $lc + $offset | bc`
119         bz0=`echo $bz0 \* $lc + $offset | bc`
120         bx1=`echo $bx1 \* $lc + $offset | bc`
121         by1=`echo $by1 \* $lc + $offset | bc`
122         bz1=`echo $bz1 \* $lc + $offset | bc`
123 fi
124
125 # povray command
126
127 POVRAY="povray -W${width} -H${height} -d" 
128
129 # convert options
130
131 COPTS="-font /usr/share/fonts/truetype/ttf-dejavu/DejaVuSans.ttf"
132 COPTS="$COPTS -depth 8 -fill white -stroke blue -pointsize 24"
133
134 # do it ...
135
136 if [ -d $directory ]; then
137         filesource=$directory/atomic_conf_*.xyz
138 fi
139
140 if [ -f $directory ]; then
141         filesource=$directory
142 fi
143
144 for file in $filesource; do
145
146         cat > temp.pov <<-EOF
147 #include "colors.inc"
148 #include "textures.inc"
149 #include "shapes.inc"
150 #include "glass.inc"
151 #include "metals.inc"
152 #include "woods.inc"
153 #include "stones.inc"
154 EOF
155
156         # meta info
157         count=`grep '# \[P\]' $file | awk '{ print $3 }'`
158         time=`grep '# \[P\]' $file | awk '{ print $4 }'`
159         camloc=`grep '# \[P\]' $file | awk '{ print $5 }'`
160         [ -n "$cx" -a -n "$cy" -a -n "$cz" ] && camloc="<$cx,$cz,$cy>"
161
162         # atoms
163 #echo "-----> $x0 $y0 $z0 $x1 $y1 $z1 <-----"
164         if [ -n "$x0" ]; then
165                 export x0 y0 z0 x1 y1 z1 radius extra
166                 cat $file | grep -v '#' | awk '\
167                 BEGIN {
168                         x0=ENVIRON["x0"]; y0=ENVIRON["y0"]; z0=ENVIRON["z0"];
169                         x1=ENVIRON["x1"]; y1=ENVIRON["y1"]; z1=ENVIRON["z1"];
170                         radius=ENVIRON["radius"]; extra=ENVIRON["extra"];
171                 }
172                 {
173 #                       print "----> " x0 " " y0 " " z0 " " $2 " " $3 " " $4
174 #                       print "----> " x1 " " y1 " " z1 " " $2 " " $3 " " $4
175 #if(($2>=x0)) print $2 " groesser " x0
176 #if(($3>=y0)) print $3 " groesser " y0
177 #if(($4>=z0)) print $4 " groesser " z0
178 #if(($2<=x1)) print $2 " kleiner " x1
179 #if(($3<=y1)) print $3 " kleiner " y1
180 #if(($4<=z1)) print $4 " kleiner " z1
181                         if(($2>=x0)&&($3>=y0)&&($4>=z0)&&\
182                            ($2<=x1)&&($3<=y1)&&($4<=z1)) {
183 #                       if(($2<=x0)&&($3<=y0)&&($4<=z0)&&\
184 #                          ($2>=x1)&&($3>=y1)&&($4>=z1)) {
185                                 print "sphere { <"$2","$4","$3">, "radius" ";
186                                 if(extra)
187                 print "texture { pigment { color rgb<"$6/4.4",0,"1-$6/4.4"> } ";
188                                 else
189                 print "texture { pigment { color "$5" } ";
190                                 print "finish { phong 1 metallic } } }";
191                         }
192                 }' >> temp.pov
193         else
194                 cat $file | grep -v '#' | while read name x y z color temp; do
195                         cat >> temp.pov <<-EOF
196 sphere {
197 <$x, $z, $y>, $radius
198 texture {
199 pigment { color $color }
200 finish {
201 phong 1
202 metallic
203 }
204 }
205 }
206 EOF
207                 done
208         fi
209
210         # boundaries
211         if [ -z "$bx0" ]; then
212
213         #if [ -z "$x0" ]; then
214
215         cat $file | grep '# \[D\]' | while read foo bar x1 y1 z1 x2 y2 z2 ; do
216                 draw_cyl $x1 $y1 $z1 $x2 $y2 $z2 0.05
217         done
218
219         #else
220
221                 # manually drawing the 3x4 boundaries ...
222 #               draw_cyl $x0 $y0 $z0 $x1 $y0 $z0
223 #               draw_cyl $x0 $y0 $z0 $x0 $y1 $z0
224 #               draw_cyl $x1 $y1 $z0 $x1 $y0 $z0
225 #               draw_cyl $x0 $y1 $z0 $x1 $y1 $z0
226
227 #               draw_cyl $x0 $y0 $z1 $x1 $y0 $z1
228 #               draw_cyl $x0 $y0 $z1 $x0 $y1 $z1
229 #               draw_cyl $x1 $y1 $z1 $x1 $y0 $z1
230 #               draw_cyl $x0 $y1 $z1 $x1 $y1 $z1
231
232 #               draw_cyl $x0 $y0 $z1 $x0 $y0 $z0
233 #               draw_cyl $x0 $y1 $z1 $x0 $y1 $z0
234 #               draw_cyl $x1 $y0 $z1 $x1 $y0 $z0
235 #               draw_cyl $x1 $y1 $z1 $x1 $y1 $z0
236 #       fi
237
238         else
239
240                 # manually drawing the 3x4 boundaries specified by argv ...
241                 draw_cyl $bx0 $by0 $bz0 $bx1 $by0 $bz0
242                 draw_cyl $bx0 $by0 $bz0 $bx0 $by1 $bz0
243                 draw_cyl $bx1 $by1 $bz0 $bx1 $by0 $bz0
244                 draw_cyl $bx0 $by1 $bz0 $bx1 $by1 $bz0
245
246                 draw_cyl $bx0 $by0 $bz1 $bx1 $by0 $bz1
247                 draw_cyl $bx0 $by0 $bz1 $bx0 $by1 $bz1
248                 draw_cyl $bx1 $by1 $bz1 $bx1 $by0 $bz1
249                 draw_cyl $bx0 $by1 $bz1 $bx1 $by1 $bz1
250
251                 draw_cyl $bx0 $by0 $bz1 $bx0 $by0 $bz0
252                 draw_cyl $bx0 $by1 $bz1 $bx0 $by1 $bz0
253                 draw_cyl $bx1 $by0 $bz1 $bx1 $by0 $bz0
254                 draw_cyl $bx1 $by1 $bz1 $bx1 $by1 $bz0
255
256         fi      
257
258         # bonds
259         if [ -n "$bcr" ]; then
260
261                 if [ -z "$x0" ]; then
262
263         cat $file | grep '# \[B\]' | while read foo bar x1 y1 z1 x2 y2 z2 ; do
264                 draw_bond $x1 $z1 $y1 $x2 $z2 $y2 $bcr
265         done
266
267                 else
268
269                 export x0 y0 z0 x1 y1 z1 bcr
270                 cat $file | grep '# \[B\]' | awk '\
271                 BEGIN {
272                         x0=ENVIRON["x0"]; y0=ENVIRON["y0"]; z0=ENVIRON["z0"];
273                         x1=ENVIRON["x1"]; y1=ENVIRON["y1"]; z1=ENVIRON["z1"];
274                         bcr=ENVIRON["bcr"];
275                 }
276                 {
277                         if(($3>=x0)&&($4>=y0)&&($5>=z0)&&\
278                            ($3<=x1)&&($4<=y1)&&($5<=z1)) {
279                                 print "cylinder {";
280                                 print "<"$3","$5","$4">,";
281                                 print "<"$6","$8","$7">, "bcr;
282                                 print "pigment { color Blue }";
283                                 print "}";
284                         }
285                 }' >> temp.pov
286
287                 fi
288         fi      
289
290         # add camera and light source
291         cat >> temp.pov <<-EOF
292 camera {
293 EOF
294         if [ -n "$ortographic" ]; then  cat >> temp.pov <<-EOF
295 orthographic
296 EOF
297         fi
298         cat >> temp.pov <<-EOF
299 location $camloc
300 look_at <$clx,$clz,$clz>
301 }
302 light_source { <0,100,-100> color White shadowless }
303 EOF
304
305         # mv png
306         $POVRAY temp.pov > /dev/null 2>&1
307         time=`basename $file | awk -F. '{ print $1 }' | awk -F_ '{ print $3 }'`
308         convert $COPTS -draw "text 5,20 't = $time fs'" temp.png temp.png
309         mv temp.png `echo $file | sed 's/\.xyz/\.png/'`
310
311 done
312
313 echo "done"