2010-08-27 09:54:26 +03:00
|
|
|
#!/bin/sh
|
|
|
|
|
|
2010-08-27 18:47:51 +03:00
|
|
|
OUTDIR=_out
|
|
|
|
|
THUMB_OPTS="-w 3 -d 60 -c 0.5,0.5,0.5 -n 1,1,0"
|
2010-08-27 09:54:26 +03:00
|
|
|
|
|
|
|
|
|
|
|
|
|
shrink()
|
|
|
|
|
{
|
|
|
|
|
pnmscale -width 120 "$@" || exit
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
pngdiff()
|
|
|
|
|
{
|
|
|
|
|
# pngdiff preproc outfile arg ...
|
|
|
|
|
pp="$1"
|
|
|
|
|
of="$2"
|
|
|
|
|
shift 2
|
2010-08-27 12:44:10 +03:00
|
|
|
if ! PATH=$PATH:`dirname $0`/ppmdiff ppmdiff "$@" "$out/_tmp"; then
|
|
|
|
|
rm -f "$out/_tmp"
|
2010-08-27 09:54:26 +03:00
|
|
|
return 1
|
|
|
|
|
fi
|
|
|
|
|
$pp "$out/_tmp" | pnmtopng >"$of"
|
2010-08-27 12:44:10 +03:00
|
|
|
rm "$out/_tmp"
|
2010-08-27 09:54:26 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
usage()
|
|
|
|
|
{
|
2010-08-27 18:47:51 +03:00
|
|
|
cat <<EOF 2>&1
|
|
|
|
|
usage: $0 [-c cache-dir] [-n] [top-dir] [top-schem] [out-dir]
|
|
|
|
|
|
|
|
|
|
top-dir top-level directory of the git archive (default: locate it)
|
|
|
|
|
top-schem root sheet of the schematics (default: locate it in top-dir)
|
|
|
|
|
out-dir output directory (default: $OUTDIR)
|
|
|
|
|
-n don't use previous cache content (rebuild the cache)
|
|
|
|
|
-c cache-dir cache directory (default: same as out-dir)
|
|
|
|
|
EOF
|
2010-08-27 09:54:26 +03:00
|
|
|
exit 1
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2010-08-27 18:47:51 +03:00
|
|
|
no_cache=false
|
|
|
|
|
while true; do
|
|
|
|
|
case "$1" in
|
|
|
|
|
-n) no_cache=true;;
|
|
|
|
|
-c) [ -z "$1" ] && usage
|
|
|
|
|
cache="$1"
|
|
|
|
|
shift;;
|
|
|
|
|
-*) usage;;
|
|
|
|
|
*) break;;
|
|
|
|
|
esac
|
|
|
|
|
done
|
|
|
|
|
|
2010-08-27 09:54:26 +03:00
|
|
|
if [ ! -z "$1" -a -d "$1/.git" ]; then
|
|
|
|
|
dir="$1"
|
|
|
|
|
shift
|
|
|
|
|
else
|
|
|
|
|
dir=.
|
|
|
|
|
while [ ! -d $dir/.git ]; do
|
|
|
|
|
if [ $dir -ef $dir/.. ]; then
|
|
|
|
|
echo "no .git/ directory found in hierarchy" 1>&2
|
|
|
|
|
exit 1
|
|
|
|
|
fi
|
|
|
|
|
dir=$dir/..
|
|
|
|
|
done
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "found top-dir: $dir" 1>&2
|
2010-08-27 09:54:26 +03:00
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
if [ ! -z "$1" -a -f "$dir/$1" -a \
|
|
|
|
|
-f "$dir"/`dirname "$1"`/`basename "$1" .sch`.pro ]; then
|
|
|
|
|
sch="$1"
|
|
|
|
|
shift
|
|
|
|
|
else
|
|
|
|
|
for n in "$dir"/*.sch; do
|
|
|
|
|
[ -f `dirname "$n"`/`basename "$n" .sch`.pro ] || continue
|
|
|
|
|
if [ ! -z "$sch" ]; then
|
|
|
|
|
echo "multiple choices for top-level .sch file" 1>&2
|
|
|
|
|
exit 1
|
|
|
|
|
fi
|
|
|
|
|
sch="$n"
|
|
|
|
|
done
|
|
|
|
|
if [ -z "$sch" -o "$sch" = "$dir/*.sch" ]; then
|
|
|
|
|
echo "no candidate for top-level .sch file found" 1>&2
|
|
|
|
|
exit 1
|
|
|
|
|
fi
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "found root sheet: $sch" 1>&2
|
2010-08-27 09:54:26 +03:00
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
if [ ! -z "$1" ] && [ ! -e "$1" ] || [ -d "$1" -a ! -d "$1"/.git ]; then
|
|
|
|
|
out="$1"
|
|
|
|
|
shift
|
|
|
|
|
else
|
2010-08-27 18:47:51 +03:00
|
|
|
out=$OUTDIR
|
2010-08-27 09:54:26 +03:00
|
|
|
fi
|
2010-08-27 18:47:51 +03:00
|
|
|
[ -z "$cache" ] && cache="$out"
|
2010-08-27 09:54:26 +03:00
|
|
|
|
|
|
|
|
[ -z "$1" ] || usage
|
|
|
|
|
|
|
|
|
|
PATH=`dirname "$0"`:"$PATH"
|
|
|
|
|
first=`gitenealogy "$dir/$sch" | sed '$s/ .*//p;d'`
|
|
|
|
|
schname=`gitenealogy "$dir/$sch" | sed '$s/^.* //p;d'`
|
|
|
|
|
|
2010-08-27 18:47:51 +03:00
|
|
|
rm -rf "$out/diff_*" "$out/thumb_*" "$out/names"
|
2010-08-27 09:54:26 +03:00
|
|
|
mkdir -p "$out/names"
|
2010-08-27 18:47:51 +03:00
|
|
|
$no_cache && rm -rf "$cache"
|
|
|
|
|
mkdir -p "$cache"
|
2010-08-27 09:54:26 +03:00
|
|
|
|
|
|
|
|
for n in $first `git rev-list --reverse $first..HEAD`; do
|
|
|
|
|
echo Processing $n
|
|
|
|
|
new=`gitenealogy "$dir/$sch" | sed "/^$n /s///p;d"`
|
|
|
|
|
if [ ! -z "$new" ]; then
|
2010-08-27 18:47:51 +03:00
|
|
|
echo Name change $schname to $new 1>&2
|
2010-08-27 09:54:26 +03:00
|
|
|
schname="$new"
|
|
|
|
|
fi
|
2010-08-27 18:47:51 +03:00
|
|
|
if [ ! -d "$cache/ppm_$n" ]; then
|
|
|
|
|
rm -rf "$cache/ppm_$n"
|
|
|
|
|
mkdir "$cache/ppm_$n"
|
|
|
|
|
gitsch2ppm "$dir" "$schname" $n "$cache/ppm_$n" || exit
|
|
|
|
|
gitsch2ppm -w 500 "$dir" "$schname" $n "$out/fat_$n" || exit
|
|
|
|
|
fi
|
|
|
|
|
for m in "$cache/ppm_$n/"*; do
|
|
|
|
|
[ "$m" = "$cache/ppm_$n/*" ] && break
|
2010-08-27 09:54:26 +03:00
|
|
|
touch "$out/names/"`basename "$m" .ppm`
|
|
|
|
|
done
|
|
|
|
|
done
|
|
|
|
|
|
2010-08-27 18:47:51 +03:00
|
|
|
index="$out/index.html"
|
|
|
|
|
cat <<EOF >"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
<HTML>
|
|
|
|
|
<BODY>
|
|
|
|
|
<TABLE bgcolor="#f0f0ff" callpadding=1>
|
|
|
|
|
<TR>
|
|
|
|
|
EOF
|
|
|
|
|
for m in `ls -1 "$out/names"`; do
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "<TD><B>$m</B>" >>"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
done
|
|
|
|
|
|
|
|
|
|
head=`git rev-list HEAD~1..HEAD`
|
|
|
|
|
next="$head"
|
|
|
|
|
for n in `git rev-list $first..HEAD~1` $first; do
|
|
|
|
|
empty=true
|
|
|
|
|
s="<TR><TR>"
|
|
|
|
|
mkdir -p "$out/diff_$next" "$out/thumb_$next"
|
|
|
|
|
for m in `ls -1 "$out/names"`; do
|
2010-08-27 18:47:51 +03:00
|
|
|
a="$cache/ppm_$n/$m.ppm"
|
|
|
|
|
fat_a="$cache/fat_$n/$m.ppm"
|
|
|
|
|
b="$cache/ppm_$next/$m.ppm"
|
|
|
|
|
fat_b="$cache/fat_$next/$m.ppm"
|
2010-08-27 09:54:26 +03:00
|
|
|
diff="$out/diff_$next/$m.png"
|
|
|
|
|
thumb="$out/thumb_$next/$m.png"
|
|
|
|
|
|
|
|
|
|
if [ -f "$a" -a -f "$b" ]; then
|
|
|
|
|
s="$s<TD>"
|
|
|
|
|
pngdiff cat "$diff" "$a" "$b" || continue
|
2010-08-27 12:44:10 +03:00
|
|
|
pngdiff shrink "$thumb" -f $THUMB_OPTS "$fat_a" "$fat_b" \
|
|
|
|
|
"$a" "$b" || exit
|
2010-08-27 09:54:26 +03:00
|
|
|
elif [ -f "$a" ]; then
|
|
|
|
|
s="$s<TD>"
|
2010-08-27 10:52:26 +03:00
|
|
|
pngdiff cat "$diff" -f -c 1,0,0 "$a" "$a" || exit
|
|
|
|
|
pngdiff shrink "$thumb" -f -c 1,0,0 $THUMB_OPTS "$fat_a" "$fat_a" \
|
|
|
|
|
|| exit
|
2010-08-27 18:47:51 +03:00
|
|
|
elif [ -f "$b" ]; then
|
2010-08-27 09:54:26 +03:00
|
|
|
s="$s<TD>"
|
2010-08-27 10:52:26 +03:00
|
|
|
pngdiff cat "$diff" -f -c 0,1,0 "$b" "$b" || exit
|
|
|
|
|
pngdiff shrink "$thumb" -f -c 0,1,0 $THUMB_OPTS "$fat_b" "$fat_b" \
|
|
|
|
|
|| exit
|
2010-08-27 09:54:26 +03:00
|
|
|
else
|
2010-08-27 10:52:26 +03:00
|
|
|
s="$s<TD>"
|
2010-08-27 09:54:26 +03:00
|
|
|
continue
|
|
|
|
|
fi
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "$s" >>"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
s=
|
|
|
|
|
empty=false
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "<A href=\"diff_$next/$m.png\"><IMG src=\"thumb_$next/$m.png\"></A>" >>"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
done
|
|
|
|
|
if ! $empty; then
|
|
|
|
|
(
|
|
|
|
|
cat <<EOF
|
|
|
|
|
$s<TD valign="middle">
|
|
|
|
|
<TABLE bgcolor="#000000" cellspacing=0 width="100%"><TR><TD></TABLE>
|
|
|
|
|
EOF
|
|
|
|
|
mkdir -p "$out/diff_$next" "$out/thumb_$next"
|
|
|
|
|
echo "<PRE>"
|
|
|
|
|
git log --pretty=short $n..$next
|
|
|
|
|
echo "</PRE>"
|
2010-08-27 18:47:51 +03:00
|
|
|
) >>"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
fi
|
|
|
|
|
next=$n
|
|
|
|
|
done
|
|
|
|
|
|
2010-08-27 18:47:51 +03:00
|
|
|
echo "</TABLE>" >>"$index"
|
2010-08-27 09:54:26 +03:00
|
|
|
exit 1
|
