1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
|
#!/usr/bin/env zsh
# export a clip from a video as a gif
local callstr=$0
local hasgsic
[[ $(whence gifsicle) ]] && hasgsic=true
print_error() {
echo -e "\e[1;31merror:\e[0m $1\n"
}
usage() {
[[ -z $1 ]] || print_error $1
echo "Usage: $callstr [OPTIONS...] <infile> <outfile>"
echo "Create an animated gif from a video"
echo ""
echo -e " \e[1mdescription opt longform arg default val\e[0m"
echo " start time -s --start <time> 00:00:00"
echo " length in seconds -l --length <num> full length"
echo " gif fps -f --fps <num> 10"
echo " output pixel width -w --width <num> 480"
echo " use subtitles -b --sub [int] track 0, if enabled"
echo " (optionally specify track)"
echo " number of colours -c --colours <int> 256"
echo " dithering algorithm -d --dither <str> sierra2_4a"
echo "redraw only changed rectangle -r --rect"
[[ $hasgsic ]] && echo " optimise with gifsicle -o --optimise"
echo " print this help -h --help"
exit 1
}
# preface used to ensure unique inputs, just in case links exist. see below
local tmp_pref
rm_tmps() {
if [[ ${tmp_pref} ]]; then
rm -f ${tmp_pref}-palette.png
rm -f ${tmp_pref}-in
fi
}
abort() {
[[ -z $1 ]] || print_error $1
rm_tmps
exit 1
}
trap 'abort' SIGABRT SIGHUP SIGINT SIGQUIT SIGTERM
local start="00:00:00"
local length=""
local fps=10
local width=480
local subs=""
local strack=0
local gsic=""
local dithalg="sierra2_4a"
local colour_count=256
local rect=""
local timepat='^(([0-9][0-9]:){1,2}[0-9][0-9]|[0-9]+)(\.[0-9]+){0,1}$'
local numpat='^([1-9][0-9]*(\.[0-9]+){0,1}|0\.[0-9]*[1-9])$'
local intpat='^[1-9][0-9]*$'
local zintpat='^[0-9]+$'
local dithpat='^(none|bayer[0-5]|heckbert|floyd_steinberg|sierra2|sierra2_4a)$'
zparseopts -D -E -M -A args \
s: -start:=s \
l: -length:=l \
f: -fps:=f \
w: -width:=w \
b:: -sub::=b \
c: -colours:=c -colors:=c \
d: -dither:=d \
r -rect=r \
o -optimise=o -optimize=o \
h -help=h
local optarg
for opt in ${(@k)args}; do
unset optarg
[[ -z $args[$opt] ]] || optarg=$args[$opt]
case $opt in
-s)
[[ ! $(echo $optarg | grep -oE "$timepat") ]] \
&& usage "malformed start timestamp"
start="$optarg"
;;
-l)
[[ ! $(echo $optarg | grep -oE "$numpat") ]] \
&& usage "length must be a positive rational number"
length=(-t $optarg)
;;
-f)
[[ ! $(echo $optarg | grep -oE "$numpat") ]] \
&& usage "fps must be a positive rational number"
fps=$optarg
;;
-w)
[[ ! $(echo $optarg | grep -oE "$intpat") ]] \
&& usage "width must be a positive integer"
width=$optarg
;;
-b)
[[ ! -z $optarg ]] && [[ ! $(echo $optarg | grep -oE "$zintpat") ]] \
&& usage "sub track index must be a non-negative integer"
[[ -z $optarg ]] && strack=0 || start=$optarg
subs=true
;;
-c)
[[ ! $(echo $optarg | grep -oE "$intpat") ]] \
|| [[ $optarg -gt 256 || $optarg -lt 2 ]] \
&& usage "colour count must be an integer in the range 2-256"
colour_count=$optarg
;;
-d)
[[ ! $(echo $optarg | grep -oE "$dithpat") ]] \
&& usage "dithering algorithm must be one of none, bayer<0-5>, heckbert,\nfloyd_steinberg, sierra2, sierra2_4a"
dithalg=$optarg
[[ $(echo $optarg | grep -o bayer) ]] \
&& dithalg="bayer:bayer_scale=$(echo $optarg | grep -oE '[0-5]')"
;;
-o) gsic=true; [[ -z $hasgsic ]] && usage "gifsicle program not found" ;;
-r) rectmode=":diff_mode=rectangle" ;;
-h) usage ;;
esac
done
# check some error conditions
if [[ ${#@} -gt 2 ]]; then
for opt in $@; do
[[ $opt[1] == '-' ]] && usage "unrecognised option $opt"
done
usage "trailing file arguments detected"
fi
[[ ${#@} -eq 1 ]] && usage "no output file specified"
[[ ${#@} -eq 0 ]] && usage "no input file specified"
[[ $1 != "%d.png" ]] && [[ ! -f $1 ]] && usage "input file not found"
[[ ${2:e} != "gif" ]] && usage "output file must have a .gif file extension"
# make links
local tmp_pref_i
tmp_pref_i="make-gif"
tmp_pref_i="${2:h}/${tmp_pref_i}"
while [[ -f "${tmp_pref_i}-palette.png" ]] || [[ -f "${tmp_pref_i}-in" ]]; do
tmp_pref_i="${tmp_pref_i}-1"
done
tmp_pref=${tmp_pref_i}
ln -s "${1:a}" "${tmp_pref}-in" \
|| abort "could not write to output dir"
# get output height using aspect ratio
local height
local as
height=-1
ffprobe -loglevel -8 -print_format json -show_streams "${tmp_pref}-in" \
| grep -m 1 display_aspect_ratio | grep -Eo '[0-9]+:[0-9]+' \
| IFS=':' read -A as
[[ -z $as ]] || let "height = ${width} * ${as[2]} / ${as[1]}"
# convenience var
local substr
[[ $subs ]] && substr="subtitles=${tmp_pref}-in:si=$strack,"
# convert
echo "pass 1..."
ffmpeg -loglevel 16 -y -ss "$start" ${length[@]} -i "${tmp_pref}-in" -copyts -filter_complex \
"${substr}setsar=1/1,fps=$fps,scale=${width}:${height}:flags=lanczos,palettegen=max_colors=${colour_count}" \
${tmp_pref}-palette.png
[[ $? -ne 0 ]] && fferr=true
[[ ! $fferr ]] && echo "pass 2..." && ffmpeg -loglevel 24 \
-ss $start ${length[@]} \
-i "${tmp_pref}-in" -i ${tmp_pref}-palette.png -copyts -filter_complex \
"${substr}setsar=1/1,fps=$fps,scale=${width}:${height}:flags=lanczos[x];[x][1:v]paletteuse=dither=${dithalg}${rectmode}" \
"$2"
[[ $? -ne 0 ]] && fferr=true
[[ $fferr ]] && abort
rm_tmps
# gifsicle
if [[ -f "$2" && $gsic ]]; then
echo "optimising..."
gifsicle --batch -O3 -i "$2"
fi
|
