1
0
mirror of git://projects.qi-hardware.com/ben-wpan.git synced 2024-11-23 00:10:17 +02:00
ben-wpan/scripts/gitsch2ppm
Werner Almesberger 3ca646cd57 Minor code cleanup and robustness improvement.
- scripts/gitsch2ppm, scripts/schhist2web: replace awkward and cryptic
  `dirname "$x"`/`basename "$x" .old`.new
  construct with much more friendly "${x%.old}.new"
- scripts/gitenealogy: put -- before path names in git-log, to prevent
  parsing ambiguities
2010-08-28 23:12:27 -03:00

129 lines
2.5 KiB
Bash
Executable File

#!/bin/sh
#
# gitsch2ppm - Generate PPM files for KiCad schematics in git
#
# Written 2010 by Werner Almesberger
# Copyright 2010 Werner Almesberger
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
RES=1280x850
LINEWIDTH=120
ps2ppm()
{
X=`echo $RES | sed 's/x.*//'`
Y=`echo $RES | sed 's/.*x//'`
IRES=${Y}x$X
res=`expr 72 \* $X / 800`
( cat <<EOF
%!PS-Adobe-3.0
/setlinewidth { $LINEWIDTH 2 copy lt { exch } if pop setlinewidth } bind def
/rectfill { rectstroke } bind def
EOF
sed 1d <"$1"; ) |
gs -sDEVICE=ppmraw -sOutputFile=- -g$IRES -r$res \
-dTextAlphaBits=4 -dGraphicsAlphaBits=4 -q - |
pnmflip -r270 |
cat >"${1%.ps}.ppm"
}
usage()
{
cat <<EOF 1>&2
usage: $0 [options] top-dir top-schem [commit] outdir
-c use cached Postscript files (from previous run, with -k)
-k keep checked-out tree (for immediate reuse with -c)
-r XxY image resolution (default: $RES)
-S sanitize the KiCad profile
-w points Postscript line width (default: $LINEWIDTH)
EOF
exit 1
}
cache=false
keep=false
sanitize=true
while true; do
case "$1" in
-c) cache=true
shift;;
-k) keep=true
shift;;
-r) [ -z "$2" ] && usage
RES="$2"
shift 2;;
-S) sanitize=`PATH="$PATH":\`dirname "$0"\` which sanitize-profile`
[ "$sanitize" = "${sanitize#/}" ] && sanitize=`pwd`/"$sanitize"
shift;;
-w) [ -z "$2" ] && usage
LINEWIDTH="$2"
shift 2;;
-*)
usage;;
*)
break;;
esac
done
[ ! -z "$3" -a -z "$5" ] || usage
dir="$1"
schem="$2"
sdir=`dirname "$schem"`
if [ -z "$4" ]; then
commit=HEAD
outdir="$3"
else
commit="$3"
outdir="$4"
fi
[ "$dir" != "${dir#/}" ] || dir=`pwd`/$dir
[ "$commit" != HEAD -o -f "$dir/$schem" ] || usage
[ -d "$dir/.git" ] || usage
tmp="$dir/../_gitsch2ppm"
sch="$tmp/$sdir"
if ! $cache; then
rm -rf "$tmp"
rm -rf "$outdir"
git clone -s -n "$dir/.git" "$tmp" || exit
( cd "$tmp" && git checkout -q "$commit"; ) || exit
if [ ! -f "$tmp/$schem" ]; then
echo "$schem not found (checked out into $tmp)" 1>&2
exit 1
fi
(
cd "$sch" || exit
rm -f *.ps *.ppm
$sanitize "$tmp/${schem%.sch}.pro" ||
exit
eeschema --plot "$tmp/$schem"
) || exit
fi
for n in "$sch"/*.ps; do
ps2ppm "$n"
done
mkdir -p "$outdir"
mv "$sch"/*.ppm "$outdir"
$keep || rm -rf "$tmp"