00000000
00000018
00000030
00000048
00000060
00000078
00000090
000000A8
000000C0
000000D8
000000F0
00000108
00000120
00000138
00000150
00000168
00000180
00000198
000001B0
000001C8
000001E0
000001F8
00000210
00000228
00000240
00000258
00000270
00000288
000002A0
000002B8
000002D0
000002E8
00000300
00000318
00000330
00000348
00000360
00000378
00000390
000003A8
000003C0
000003D8
000003F0
00000408
00000420
00000438
00000450
00000468
00000480
00000498
000004B0
000004C8
000004E0
000004F8
00000510
00000528
00000540
00000558
00000570
00000588
000005A0
000005B8
000005D0
000005E8
00000600
00000618
00000630
00000648
00000660
00000678
00000690
000006A8
000006C0
000006D8
000006F0
00000708
00000720
00000738
00000750
00000768
00000780
00000798
000007B0
000007C8
000007E0
000007F8
00000810
00000828
00000840
00000858
00000870
00000888
| 23 21 2F 62 69 6E 2F 73 68 0A 23 0A 23 20 70 61 6D 73 74 72 65 74 63 68
2D 67 65 6E 20 2D 20 61 20 73 68 65 6C 6C 20 73 63 72 69 70 74 20 77 68
69 63 68 20 61 63 74 73 20 61 20 6C 69 74 74 6C 65 20 6C 69 6B 65 20 61
20 67 65 6E 65 72 61 6C 0A 23 20 66 6F 72 6D 20 6F 66 20 70 61 6D 73 74
72 65 74 63 68 2C 20 62 79 20 73 63 61 6C 69 6E 67 20 75 70 20 77 69 74
68 20 70 61 6D 73 74 72 65 74 63 68 20 74 68 65 6E 20 73 63 61 6C 69 6E
67 0A 23 20 64 6F 77 6E 20 77 69 74 68 20 70 61 6D 73 63 61 6C 65 2E 0A
23 0A 23 20 69 74 20 61 6C 73 6F 20 63 6F 70 65 73 20 77 69 74 68 20 4E
3C 31 2C 20 62 75 74 20 74 68 65 6E 20 69 74 20 6A 75 73 74 20 75 73 65
73 20 70 61 6D 73 63 61 6C 65 2E 20 3A 2D 29 0A 23 0A 23 20 46 6F 72 6D
65 72 6C 79 20 6E 61 6D 65 64 20 27 70 6E 6D 69 6E 74 65 72 70 2D 67 65
6E 27 20 61 6E 64 20 27 70 6E 6D 73 74 72 65 74 63 68 2D 67 65 6E 27 2E
0A 23 0A 23 20 43 6F 70 79 72 69 67 68 74 20 28 43 29 20 31 39 39 38 2C
32 30 30 30 20 52 75 73 73 65 6C 6C 20 4D 61 72 6B 73 2E 0A 23 20 0A 23
20 54 68 69 73 20 70 72 6F 67 72 61 6D 20 69 73 20 66 72 65 65 20 73 6F
66 74 77 61 72 65 3B 20 79 6F 75 20 63 61 6E 20 72 65 64 69 73 74 72 69
62 75 74 65 20 69 74 20 61 6E 64 2F 6F 72 20 6D 6F 64 69 66 79 0A 23 20
69 74 20 75 6E 64 65 72 20 74 68 65 20 74 65 72 6D 73 20 6F 66 20 74 68
65 20 47 4E 55 20 47 65 6E 65 72 61 6C 20 50 75 62 6C 69 63 20 4C 69 63
65 6E 73 65 20 61 73 20 70 75 62 6C 69 73 68 65 64 20 62 79 0A 23 20 74
68 65 20 46 72 65 65 20 53 6F 66 74 77 61 72 65 20 46 6F 75 6E 64 61 74
69 6F 6E 3B 20 65 69 74 68 65 72 20 76 65 72 73 69 6F 6E 20 32 20 6F 66
20 74 68 65 20 4C 69 63 65 6E 73 65 2C 20 6F 72 20 28 61 74 0A 23 20 79
6F 75 72 20 6F 70 74 69 6F 6E 29 20 61 6E 79 20 6C 61 74 65 72 20 76 65
72 73 69 6F 6E 2E 0A 23 20 0A 23 20 54 68 69 73 20 70 72 6F 67 72 61 6D
20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6E 20 74 68 65 20 68
6F 70 65 20 74 68 61 74 20 69 74 20 77 69 6C 6C 20 62 65 20 75 73 65 66
75 6C 2C 20 62 75 74 0A 23 20 57 49 54 48 4F 55 54 20 41 4E 59 20 57 41
52 52 41 4E 54 59 3B 20 77 69 74 68 6F 75 74 20 65 76 65 6E 20 74 68 65
20 69 6D 70 6C 69 65 64 20 77 61 72 72 61 6E 74 79 20 6F 66 0A 23 20 4D
45 52 43 48 41 4E 54 41 42 49 4C 49 54 59 20 6F 72 20 46 49 54 4E 45 53
53 20 46 4F 52 20 41 20 50 41 52 54 49 43 55 4C 41 52 20 50 55 52 50 4F
53 45 2E 20 20 53 65 65 20 74 68 65 20 47 4E 55 0A 23 20 47 65 6E 65 72
61 6C 20 50 75 62 6C 69 63 20 4C 69 63 65 6E 73 65 20 66 6F 72 20 6D 6F
72 65 20 64 65 74 61 69 6C 73 2E 0A 23 20 0A 23 20 59 6F 75 20 73 68 6F
75 6C 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6F 70 79
20 6F 66 20 74 68 65 20 47 4E 55 20 47 65 6E 65 72 61 6C 20 50 75 62 6C
69 63 20 4C 69 63 65 6E 73 65 0A 23 20 61 6C 6F 6E 67 20 77 69 74 68 20
74 68 69 73 20 70 72 6F 67 72 61 6D 3B 20 69 66 20 6E 6F 74 2C 20 77 72
69 74 65 20 74 6F 20 74 68 65 20 46 72 65 65 20 53 6F 66 74 77 61 72 65
0A 23 20 46 6F 75 6E 64 61 74 69 6F 6E 2C 20 35 39 20 54 65 6D 70 6C 65
20 50 6C 61 63 65 20 2D 20 53 75 69 74 65 20 33 33 30 2C 20 42 6F 73 74
6F 6E 2C 20 4D 41 20 30 32 31 31 31 2D 31 33 30 37 2C 20 55 53 41 2E 0A
23 20 0A 0A 0A 69 66 20 5B 20 22 24 31 22 20 3D 20 22 22 20 5D 3B 20 74
68 65 6E 0A 20 20 65 63 68 6F 20 27 75 73 61 67 65 3A 20 70 61 6D 73 74
72 65 74 63 68 2D 67 65 6E 20 4E 20 5B 70 6E 6D 66 69 6C 65 5D 27 0A 20
20 65 78 69 74 20 31 0A 66 69 0A 0A 74 65 6D 70 66 69 6C 65 3D 24 28 6D
6B 74 65 6D 70 20 2F 74 6D 70 2F 70 6E 6D 69 67 2E 58 58 58 58 58 58 58
58 58 58 29 20 7C 7C 20 65 78 69 74 20 31 0A 0A 74 72 61 70 20 27 72 6D
20 2D 72 66 20 24 74 65 6D 70 64 69 72 27 20 30 20 31 20 33 20 31 35 0A
0A 69 66 20 21 20 63 61 74 20 24 32 20 3E 24 74 65 6D 70 66 69 6C 65 20
32 3E 2F 64 65 76 2F 6E 75 6C 6C 3B 20 74 68 65 6E 0A 20 20 65 63 68 6F
20 27 70 61 6D 73 74 72 65 74 63 68 2D 67 65 6E 3A 20 65 72 72 6F 72 20
72 65 61 64 69 6E 67 20 66 69 6C 65 27 20 31 3E 26 32 0A 20 20 65 78 69
74 20 31 0A 66 69 0A 0A 69 66 20 21 20 70 6E 6D 66 69 6C 65 20 24 74 65
6D 70 66 69 6C 65 20 31 3E 2F 64 65 76 2F 6E 75 6C 6C 20 32 3E 2F 64 65
76 2F 6E 75 6C 6C 3B 20 74 68 65 6E 0A 20 20 65 63 68 6F 20 27 4E 6F 74
20 76 61 6C 69 64 20 70 6E 6D 20 69 6E 70 75 74 27 0A 20 20 65 78 69 74
20 31 0A 66 69 0A 0A 23 20 77 65 20 75 73 65 20 74 68 65 20 77 69 64 74
68 20 61 73 20 69 6E 64 69 63 61 74 69 6F 6E 20 6F 66 20 68 6F 77 20 6D
75 63 68 20 74 6F 20 73 63 61 6C 65 3B 20 77 69 64 74 68 20 61 6E 64 0A
23 20 68 65 69 67 68 74 20 61 72 65 20 62 65 69 6E 67 20 73 63 61 6C 65
64 20 65 71 75 61 6C 6C 79 2C 20 73 6F 20 74 68 69 73 20 73 68 6F 75 6C
64 20 62 65 20 6F 6B 2E 0A 77 69 64 74 68 3D 60 70 6E 6D 66 69 6C 65 20
24 74 65 6D 70 66 69 6C 65 20 32 3E 2F 64 65 76 2F 6E 75 6C 6C 7C 63 75
74 20 2D 64 20 22 20 22 20 2D 66 20 33 60 0A 0A 69 66 20 5B 20 22 24 77
69 64 74 68 22 20 3D 20 22 22 20 5D 3B 20 74 68 65 6E 0A 20 20 65 63 68
6F 20 27 70 61 6D 73 74 72 65 74 63 68 2D 67 65 6E 3A 20 6E 6F 74 20 61
20 50 4E 4D 20 66 69 6C 65 27 20 31 3E 26 32 0A 20 20 65 78 69 74 20 31
0A 66 69 0A 0A 23 20 73 68 6F 75 6C 64 20 72 65 61 6C 6C 79 20 75 73 65
20 64 63 20 66 6F 72 20 6D 61 74 68 73 2C 20 62 75 74 20 61 77 6B 20 69
73 20 6C 65 73 73 20 70 61 69 6E 66 75 6C 20 3A 2D 29 0A 74 61 72 67 65
74 5F 77 69 64 74 68 3D 60 61 77 6B 20 27 42 45 47 49 4E 7B 70 72 69 6E
74 66 28 22 25 64 22 2C 27 30 2E 35 2B 22 24 77 69 64 74 68 22 2A 22 24
31 22 27 29 7D 27 60 0A 0A 23 20 77 6F 72 6B 20 6F 75 74 20 68 6F 77 20
66 61 72 20 77 65 20 68 61 76 65 20 74 6F 20 73 63 61 6C 65 20 69 74 20
75 70 20 77 69 74 68 20 70 61 6D 73 74 72 65 74 63 68 20 73 6F 20 74 68
61 74 20 74 68 65 0A 23 20 6E 65 77 20 77 69 64 74 68 20 69 73 20 3E 3D
20 74 68 65 20 74 61 72 67 65 74 20 77 69 64 74 68 2E 0A 69 6E 74 5F 73
63 61 6C 65 3D 60 61 77 6B 20 27 0A 42 45 47 49 4E 20 7B 0A 69 6E 74 5F
73 63 61 6C 65 3D 31 3B 69 6E 74 5F 77 69 64 74 68 3D 27 22 24 77 69 64
74 68 22 27 0A 77 68 69 6C 65 28 69 6E 74 5F 77 69 64 74 68 3C 27 22 24
74 61 72 67 65 74 5F 77 69 64 74 68 22 27 29 0A 20 20 7B 0A 20 20 69 6E
74 5F 73 63 61 6C 65 2B 2B 0A 20 20 69 6E 74 5F 77 69 64 74 68 2B 3D 27
22 24 77 69 64 74 68 22 27 0A 20 20 7D 0A 70 72 69 6E 74 20 69 6E 74 5F
73 63 61 6C 65 0A 7D 27 60 0A 0A 69 66 20 5B 20 22 24 69 6E 74 5F 73 63
61 6C 65 22 20 2D 65 71 20 31 20 5D 3B 20 74 68 65 6E 0A 20 20 70 61 6D
73 63 61 6C 65 20 22 24 31 22 20 24 74 65 6D 70 66 69 6C 65 0A 65 6C 73
65 0A 20 20 70 61 6D 73 74 72 65 74 63 68 20 22 24 69 6E 74 5F 73 63 61
6C 65 22 20 24 74 65 6D 70 66 69 6C 65 20 7C 20 70 6E 6D 73 63 61 6C 65
20 2D 78 73 69 20 22 24 74 61 72 67 65 74 5F 77 69 64 74 68 22 0A 66 69
0A | #!/bin/sh # # pamstretch
-gen - a shell script wh
ich acts a little like a
general # form of pamst
retch, by scaling up wit
h pamstretch then scalin
g # down with pamscale.
# # it also copes with N
<1, but then it just use
s pamscale. :-) # # Form
erly named 'pnminterp-ge
n' and 'pnmstretch-gen'.
# # Copyright (C) 1998,
2000 Russell Marks. # #
This program is free so
ftware; you can redistri
bute it and/or modify #
it under the terms of th
e GNU General Public Lic
ense as published by # t
he Free Software Foundat
ion; either version 2 of
the License, or (at # y
our option) any later ve
rsion. # # This program
is distributed in the h
ope that it will be usef
ul, but # WITHOUT ANY WA
RRANTY; without even the
implied warranty of # M
ERCHANTABILITY or FITNES
S FOR A PARTICULAR PURPO
SE. See the GNU # Gener
al Public License for mo
re details. # # You sho
uld have received a copy
of the GNU General Publ
ic License # along with
this program; if not, wr
ite to the Free Software
# Foundation, 59 Temple
Place - Suite 330, Bost
on, MA 02111-1307, USA.
# if [ "$1" = "" ]; t
hen echo 'usage: pamst
retch-gen N [pnmfile]'
exit 1 fi tempfile=$(m
ktemp /tmp/pnmig.XXXXXXX
XXX) || exit 1 trap 'rm
-rf $tempdir' 0 1 3 15
if ! cat $2 >$tempfile
2>/dev/null; then echo
'pamstretch-gen: error
reading file' 1>&2 exi
t 1 fi if ! pnmfile $te
mpfile 1>/dev/null 2>/de
v/null; then echo 'Not
valid pnm input' exit
1 fi # we use the widt
h as indication of how m
uch to scale; width and
# height are being scale
d equally, so this shoul
d be ok. width=`pnmfile
$tempfile 2>/dev/null|cu
t -d " " -f 3` if [ "$w
idth" = "" ]; then ech
o 'pamstretch-gen: not a
PNM file' 1>&2 exit 1
fi # should really use
dc for maths, but awk i
s less painful :-) targe
t_width=`awk 'BEGIN{prin
tf("%d",'0.5+"$width"*"$
1"')}'` # work out how
far we have to scale it
up with pamstretch so th
at the # new width is >=
the target width. int_s
cale=`awk ' BEGIN { int_
scale=1;int_width='"$wid
th"' while(int_width<'"$
target_width"') { in
t_scale++ int_width+='
"$width"' } print int_
scale }'` if [ "$int_sc
ale" -eq 1 ]; then pam
scale "$1" $tempfile els
e pamstretch "$int_sca
le" $tempfile | pnmscale
-xsi "$target_width" fi
|