Home

Context Navigation

source: palm/trunk/SCRIPTS/img2video @ 2716

Last change on this file since 2716 was 2716, checked in by kanani, 7 years ago
Correction of "Former revisions" section
Property svn:executable set to ``* Property svn:keywords set to `Id`
File size: 15.0 KB

Line
1	#!/bin/ksh
2
3	#--------------------------------------------------------------------------------#
4	# This file is part of the PALM model system.
5	#
6	# PALM is free software: you can redistribute it and/or modify it under the terms
7	# of the GNU General Public License as published by the Free Software Foundation,
8	# either version 3 of the License, or (at your option) any later version.
9	#
10	# PALM is distributed in the hope that it will be useful, but WITHOUT ANY
11	# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12	# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
13	#
14	# You should have received a copy of the GNU General Public License along with
15	# PALM. If not, see <http://www.gnu.org/licenses/>.
16	#
17	# Copyright 1997-2017 Leibniz Universitaet Hannover
18	#--------------------------------------------------------------------------------#
19	#
20	# Current revisions:
21	# -----------------
22	#
23	#
24	# Former revisions:
25	# -----------------
26	# $Id: img2video 2716 2017-12-29 16:35:59Z kanani $
27	# Corrected "Former revisions" section
28	#
29	# 2696 2017-12-14 17:12:51Z kanani
30	# Change in file header (GPL part)
31	#
32	# 1310 2014-03-14 08:01:56Z raasch
33	# update of GPL copyright
34	#
35	# 1046 2012-11-09 14:38:45Z maronga
36	# code put under GPL (PALM 3.9)
37	#
38	# 981 2012-08-09 14:57:44Z maronga
39	# Added new codecs xvid, ffv1 and two-pass encoding
40	#
41	# 795 2011-12-12 15:21:03Z maronga
42	# Added Id tag, initial Revision
43	#
44	# Description:
45	# ------------
46	# img2video converts image files (e.g. from NCL, DVRP, VAPOR) and creates
47	# video files with several codecs. Required packages on the local host are:
48	# Imagemagick, MEncoder (MPlayer) and gifsicle
49	#------------------------------------------------------------------------------!
50
51	#PRESET OF VARIABLES
52	input_folder="."
53	output_folder=""
54	output_file=""
55	name=""
56	codec="mpeg4"
57	colors=256
58	errors=false
59	fps=25
60	hq=false
61	img_fmt="png"
62	keep=true
63	pass=1
64	preview_string="preview"
65	restart=false
66	rotate=0
67	scaling=1024
68	speedup=1
69	file_type="tiff"
70	watermark=""
71
72	#DEFINE STRING LENGTHS
73	typeset -L20 col1
74	typeset -L40 col2
75	typeset -L30 version="img2video Rev$Rev: 1 $"
76	typeset -R30 calltime
77	typeset -L60 text1
78
79	#GET COMMAND LINE PARAMETERS
80	while getopts :a:C:c:f:hi:I:kn:o:rR:S:s:t:Xw: option
81	do
82	case $option in
83	(a) fps=$OPTARG;;
84	(c) codec=$OPTARG;;
85	(C) colors=$OPTARG;;
86	(f) output_file=$OPTARG;;
87	(h) hq=true;;
88	(i) input_folder=$OPTARG;;
89	(k) keep=false;;
90	(n) name=$OPTARG;;
91	(o) output_folder=$OPTARG;;
92	(r) restart=true;;
93	(R) rotate=$OPTARG;;
94	(s) scaling=$OPTARG;;
95	(S) speedup=$OPTARG;;
96	(t) file_type=$OPTARG;;
97	(w) watermark=$OPTARG;;
98	(X) errors=true;;
99	(\?) printf "\n +++ unknown option $OPTARG \n"
100	printf "\n --> type \"$0 ?\" for available options \n"
101	locat=parameter;exit;;
102	esac
103	done
104
105	shift OPTIND-1
106
107	#PRINT HELP
108	if [[ "$1" = "?" ]]
109	then
110	(printf "\n *** img2video can be called as follows:\n"
111	printf "\n img2video -c.. -C.. -h -i.. -k -n.. -o.. -r -R.. -s.. -S.. -t.. -X -w\n"
112	printf "\n Description of available options:\n"
113	printf "\n Option Description Default-Value"
114	printf "\n -a fps (frames per second) 25"
115	printf "\n -c Video format flash"
116	printf "\n Available formats are: flash, mpeg, mpeg4, "
117	printf "\n mjpeg, gif, wmv2, xvid, ffv1 "
118	printf "\n -C Number of colors (only for gif output) 256"
119	printf "\n -f Output file name auto"
120	printf "\n -h enable high quality \"\""
121	printf "\n -i Input path ."
122	printf "\n -k Delete image files at the end "
123	printf "\n -n Jobname \"\""
124	printf "\n -o Output folder see Input path"
125	printf "\n -r Restart with existing image files "
126	printf "\n -R Rotate by angle 0"
127	printf "\n -s Rescaling to a width of #px 1024"
128	printf "\n -S Video speed-up 1"
129	printf "\n -t Input file type (tiff/eps) tiff"
130	printf "\n -X enable output of additional error messages "
131	printf "\n -w Watermark file \"\""
132	printf "\n ? this outline \n\n") \| more
133	exit
134	elif [[ "$1" != "" ]]
135	then
136	printf "\n +++ Positional parameter $1 unknown \n"
137	locat=parameter; exit
138	fi
139
140	if [[ $name == "" ]]
141	then
142	printf "\n +++ Parameter -n needed. Type 'img2video ?' for a full list of parameters. \n"
143	locat=parameter; exit
144	fi
145
146	if [[ $input_folder == "." ]]
147	then
148	printf "\n +++ Parameter -i needed. Type 'img2video ?' for a full list of parameters. \n"
149	locat=parameter; exit
150	fi
151
152	if [[ $output_folder == "" ]]
153	then
154	output_folder="$input_folder/$name"
155	fi
156
157	#PRINT HEADER TO INFORM ABOUT THE CURRENT SETTINGS
158	calltime=$(date)
159
160	printf "\n#--------------------------------------------------------------#"
161	printf "\n\| $version$calltime \|"
162
163	col1=""
164	col2=""
165	printf "\n\| $col1$col2 \|"
166
167	text1="Initialization parameters"
168	printf "\n\| $text1 \|"
169
170	col1="Jobname:"
171	col2=$name
172	printf "\n\| $col1$col2 \|"
173
174	col1="Input path:"
175	col2=$input_folder
176	printf "\n\| $col1$col2 \|"
177	row=$(echo "$input_folder" \| cut -c41-)
178	while [[ "$row" != "" ]]
179	do
180	col1=""
181	col2=$row
182	printf "\n\| $col1$col2 \|"
183	row=$(echo "$row" \| cut -c41-)
184	done
185
186
187
188
189
190	col1="Output path:"
191	col2=$output_folder
192	printf "\n\| $col1$col2 \|"
193	row=$(echo "$output_folder" \| cut -c41-)
194	while [[ "$row" != "" ]]
195	do
196	col1=""
197	col2=$row
198	printf "\n\| $col1$col2 \|"
199	row=$(echo "$row" \| cut -c41-)
200	done
201
202
203	if [[ "$codec" = "flash" ]]
204	then
205	suffix=".flv"
206	real_codec="flv"
207
208	elif [[ "$codec" = "mpeg" ]]
209	then
210	suffix=".avi"
211	real_codec="msmpeg4v2"
212	pass=2
213	elif [[ "$codec" = "mpeg4" ]]
214	then
215	suffix=".avi"
216	real_codec="mpeg4"
217	pass=2
218	elif [[ "$codec" = "mjpeg" ]]
219	then
220	suffix=".avi"
221	real_codec="mjpeg"
222
223	elif [[ "$codec" = "wmv2" ]]
224	then
225	suffix=".wmv"
226	real_codec="wmv2"
227	elif [[ "$codec" = "xvid" ]]
228	then
229	suffix=".avi"
230	real_codec="xvid"
231	pass=2
232	elif [[ "$codec" = "ffv1" ]]
233	then
234	suffix=".avi"
235	real_codec="ffv1"
236	pass=1
237	elif [[ "$codec" = "gif" ]]
238	then
239	suffix=".gif"
240	real_codec="gif"
241	img_fmt="gif"
242	else
243	printf "\n +++ Video codec unknown. Aborting..."
244	exit
245	fi
246
247	col1="Video codec:"
248	col2="$codec ($real_codec)"
249	printf "\n\| $col1$col2 \|"
250
251	if [[ $codec = "gif" ]]
252	then
253	col1="Colors (gif):"
254	col2=$colors
255	printf "\n\| $col1$col2 \|"
256	fi
257
258	col1="Input file type:"
259	col2=$file_type
260	printf "\n\| $col1$col2 \|"
261
262	col1="Video speed-up:"
263	col2=$speedup
264	printf "\n\| $col1$col2 \|"
265
266	col1="fps:"
267	col2=$fps
268	printf "\n\| $col1$col2 \|"
269
270	if [[ $rotate != 0 ]]
271	then
272	col1="Rotate video by"
273	col2="${rotate}Â°"
274	printf "\n\| $col1$col2 \|"
275	fi
276
277	col1="Scaling video to"
278	col2="${scaling}px width"
279	printf "\n\| $col1$col2 \|"
280
281	if [[ $watermark != "" ]]
282	then
283	col1="Watermark:"
284	col2=$watermark
285	else
286	col1="Watermark "
287	col2="disabled"
288	fi
289	printf "\n\| $col1$col2 \|"
290
291	col1="HQ-options:"
292	if [[ $hq = true ]]
293	then
294	if [[ $codec == mjpeg ]]
295	then
296	hq_text=":mbd=2"
297	fi
298	if [[ $codec == mpeg4 ]]
299	then
300	hq_text=":mbd=2:trell:vbitrate=2160000:keyint=132"
301	fi
302	col2=$hq_text
303	else
304	hq_text=""
305	col2="disabled"
306	fi
307	printf "\n\| $col1$col2 \|"
308
309	col1=""
310	col2=""
311	printf "\n\| $col1$col2 \|"
312
313	col1="Additional settings"
314	col2=""
315	printf "\n\| $col1$col2 \|"
316
317	if [[ $keep == false ]]
318	then
319	text1="- Image files will be deleted at the end."
320	else
321	text1="- Image files will be stored at the end."
322	fi
323	printf "\n\| $text1 \|"
324
325	if [[ $restart == true ]]
326	then
327	text1="- img2video will restart with existing images."
328	else
329	text1="- img2video will generate new images."
330	fi
331	printf "\n\| $text1 \|"
332
333	col1=""
334	col2=""
335	printf "\n\| $col1$col2 \|"
336
337	if [[ $output_file = "" ]]
338	then
339	output_file="${name}_${speedup}acc_${codec}"
340	fi
341
342	#CHECK CYCLE NUMBER
343	looping=true
344	output_file_new=$output_file
345	while [[ $looping = true ]]
346	do
347	if [ -f "$output_folder/$output_file_new$suffix" ]
348	then
349	((run_string += 1))
350	output_file_new="${output_file}_$run_string"
351	else
352	looping=false
353	if (( run_string >= 1 ))
354	then
355	output_file="${output_file}_$run_string"
356	preview_string="preview_$run_string"
357	fi
358	break;
359	fi
360	done
361
362
363
364	text1="Video will be saved as $output_file$suffix"
365	printf "\n\| $text1 \|"
366
367	printf "\n\| \|"
368	printf "\n#--------------------------------------------------------------#\n"
369
370	if [[ $errors = false ]]
371	then
372	error_opt="-really-quiet"
373	error_opt2="-quiet"
374	else
375	error_opt=""
376	error_opt2=""
377	fi
378
379
380	#STARTING CONVERSION
381	printf "\n *** Creating directory: $output_folder/images_${img_fmt}... "
382	mkdir -p $output_folder/images_${img_fmt}
383	printf "done."
384
385
386	if [[ $restart = false ]]
387	then
388	printf "\n *** Outdated images will be deleted in $output_folder/images_${img_fmt}... "
389	rm -rf $output_folder/images_${img_fmt}/*
390	printf "done."
391
392	printf "\n *** Converting images... "
393	if [[ $file_type = "eps" ]]
394	then
395
396	# CONVERTING IMAGES FROM EPS TO JPG OR GIF
397	img_counter=0
398	for i in $input_folder/$name*;
399	do
400	(( img_counter+=1 ))
401	filename=`basename ${i%}`
402	if [[ $img_fmt = "gif" ]]
403	then
404	gs -sDEVICE=jpeg -dJPEGQ=100 -q -dNOPAUSE -dBATCH -dSAFER -r175 -sOutputFile="$output_folder/images_${img_fmt}/${filename}.jpg" "$i"
405	convert $error_opt2 -resize "$scaling" "$output_folder/images_${img_fmt}/${filename}.jpg" "$output_folder/images_${img_fmt}/${filename}.${img_fmt}"
406	rm "$output_folder/images_${img_fmt}/${filename}.jpg"
407	else
408	gs -sDEVICE=jpeg -dJPEGQ=100 -q -dNOPAUSE -dBATCH -dSAFER -r175 -sOutputFile="$output_folder/images_${img_fmt}/${filename}.${img_fmt}" "$i"
409	fi
410	done
411
412	else
413
414	for i in $input_folder/$name*;
415	do
416	(( img_counter+=1 ))
417	filename=`basename ${i%}`
418	convert $error_opt2 "$i" "$output_folder/images_${img_fmt}/${filename}.${img_fmt}"
419	done
420	fi
421	printf "done."
422	printf "\n --> Converted $img_counter images."
423
424
425	# ROTATE IMAGE IF NECESSARY
426	if (( $rotate != 0 ))
427	then
428	printf "\n *** Rotating images... "
429	for i in $output_folder/images_${img_fmt}/$name*;
430	do
431	convert $error_opt2 -rotate $rotate $i $i
432	done
433	printf "done."
434	fi
435
436	# ADD WATERMARK IF NECESSARY (GIF ONLY)
437	if [[ $watermark != "" && $img_fmt = "gif" ]]
438	then
439	printf "\n *** Adding Watermark (only necessary for gif)... "
440	for i in $output_folder/images_${img_fmt}/$name*;
441	do
442	composite $watermark "$i" "$i"
443	done
444	printf "done."
445	fi
446
447	# GENERATE A PREVIEW IMAGE
448	cp $output_folder/images_${img_fmt}/${filename}.$img_fmt $output_folder/${name}_${preview_string}.${img_fmt}
449	else
450	printf "\n *** Restarting with images in ${name}*.$img_fmt in $output_folder/images_${img_fmt}/."
451	fi
452
453	#ENABLE WATERMARK (not for gif)
454	if [[ $watermark != "" && $codec != "gif" ]]
455	then
456	printf "\n *** Watermark enabled."
457	mkfifo watermark.fifo
458	convert $watermark watermark.rgba
459	echo "RGBA32 400 43 0 0 0 1" > watermark.fifo &
460	cat watermark.rgba > watermark.fifo &
461	wm_text=",bmovl=0:0:watermark.fifo"
462	else
463	wm_text=""
464	fi
465
466	#START ENCODING OF THE VIDEO
467	printf "\n *** Encoding video... "
468
469	if [[ $codec = "gif" ]]
470	then
471	# Animated GIF
472	j=1
473	if (( speedup != 1 ))
474	then
475	cp -r $output_folder/images_${img_fmt} $output_folder/images_${img_fmt}_tmp
476	fi
477
478	for i in $output_folder/images_${img_fmt}/$name*;
479	do
480	if (( $j == $speedup ))
481	then
482	j=1
483	else
484	rm $i
485	(( j += 1 ))
486	fi
487	done
488
489	(( speedup = ( 1.0 / $fps ) * 100.0 ))
490	gifsicle --delay=$speedup --colors $colors --loop $output_folder/images_${img_fmt}/*.${img_fmt} > $output_folder/${output_file}$suffix
491
492	if (( speedup != 1 ))
493	then
494	cp $output_folder/images_${img_fmt}_tmp/* $output_folder/images_${img_fmt}/
495	rm -r $output_folder/images_${img_fmt}_tmp
496	fi
497	else
498	if [[ $real_codec = "xvid" ]]
499	then
500	mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc xvid -xvidencopts "pass=1:autoaspect" -nosound -o $output_folder/${output_file}$suffix $error_opt
501	mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc xvid -xvidencopts "pass=2:autoaspect:bitrate=1800" -nosound -o $output_folder/${output_file}$suffix $error_opt
502	elif [[ $pass = 2 ]]
503	then
504	mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc lavc -lavcopts "vpass=1:vcodec=$real_codec$hq_text" -nosound -o $output_folder/${output_file}$suffix $error_opt
505	mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc lavc -lavcopts "vpass=2:vcodec=$real_codec$hq_text" -nosound -o $output_folder/${output_file}$suffix $error_opt
506	else
507	mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc lavc -lavcopts "vcodec=$real_codec$hq_text" -nosound -o $output_folder/${output_file}$suffix $error_opt
508	fi
509
510	#
511
512
513	# mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc lavc -lavcopts "vcodec=$real_codec:vpass=2:mbd=2:mv0:trell:vbitrate=infinity" -nosound -o $output_folder/${output_file}$suffix $error_opt
514	# mencoder mf://$output_folder/images_${img_fmt}/*$img_fmt -vf "scale=$scaling:-2$wm_text,filmdint=io=$speedup:1" -of lavf -mf "fps=$fps" -ovc lavc -lavcopts "vcodec=$real_codec:vpass=3:mbd=2:mv0:trell:vbitrate=infinity" -nosound -o $output_folder/${output_file}$suffix $error_opt
515	fi
516
517	printf "done."
518
519	#CLEANING UP
520
521	#REMOVE IMAGES
522	if [[ $keep = false ]]
523	then
524	rm -rf $output_folder/images_${img_fmt}
525	fi
526
527	#REMOVE WATERMARK FILES
528	if [[ $watermark != "" && $codec != "gif" ]]
529	then
530	rm watermark.fifo
531	rm watermark.rgba
532	fi
533
534	printf "\n --> All actions finished. Video saved as $output_folder/${output_file}$suffix.\n"
535	exit

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

| Impressum | ©Leibniz Universität Hannover |