author | viric <viriketo@gmail.com> |
Sun, 24 Apr 2011 20:43:56 +0200 | |
changeset 4 | 6d09f682bc3e |
permissions | -rwxr-xr-x |
4
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
1 |
#!/bin/sh -ex |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
2 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
3 |
# $1 file.pnm |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
4 |
# 600 dpi by default. |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
5 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
6 |
INPUT=$1 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
7 |
DPI=190 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
8 |
OUTPUT=`basename $INPUT .pgm`.djvu |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
9 |
TMPFILE=/tmp/tempfile |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
10 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
11 |
function threshold_mkbitmap |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
12 |
{ |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
13 |
PPM=$1 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
14 |
PBM=$2 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
15 |
mkbitmap -s 1 -o "$PBM" "$PPM" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
16 |
} |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
17 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
18 |
function threshold_netpbm |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
19 |
{ |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
20 |
pamditherbw -threshold $1 | pamtopnm >$2 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
21 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
22 |
} |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
23 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
24 |
function threshold_netpbm2 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
25 |
{ |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
26 |
pamthreshold -contrast 0.5 -dual=16x16 $1 |pamtopnm > $2 |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
27 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
28 |
} |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
29 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
30 |
if [ $# -ne 1 ]; then |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
31 |
echo "usage: $0 <file.pnm>" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
32 |
exit |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
33 |
fi |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
34 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
35 |
pnmnorm < "$INPUT" > "$TMPFILE.ppm" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
36 |
threshold_netpbm2 "$TMPFILE.ppm" "$TMPFILE.pbm" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
37 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
38 |
cjb2 -clean -dpi $DPI "$TMPFILE.pbm" "$TMPFILE.djvu" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
39 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
40 |
djvumake "$OUTPUT" PPM="$TMPFILE.ppm" Sjbz="$TMPFILE.djvu" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
41 |
|
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
42 |
rm -f "$TMPFILE.pbm" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
43 |
rm -f "$TMPFILE.ppm" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
44 |
rm -f "$TMPFILE.djvu" |
6d09f682bc3e
Afegeixo scripts que faig servir per a fer llibres. Aquests són de Duna.
viric <viriketo@gmail.com>
parents:
diff
changeset
|
45 |
echo Done: \"$OUTPUT\" created. |