/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3311

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 61 6a | 63 64 40 63 73 2e 65 64 |From: aj|cd@cs.ed|
|00000010| 2e 61 63 2e 75 6b 20 28 | 41 6e 67 75 73 20 44 75 |.ac.uk (|Angus Du|
|00000020| 67 67 61 6e 29 0a 4e 65 | 77 73 67 72 6f 75 70 73 |ggan).Ne|wsgroups|
|00000030| 3a 20 61 6c 74 2e 67 72 | 61 70 68 69 63 73 2e 70 |: alt.gr|aphics.p|
|00000040| 69 78 75 74 69 6c 73 2c | 61 6c 74 2e 73 6f 75 72 |ixutils,|alt.sour|
|00000050| 63 65 73 0a 53 75 62 6a | 65 63 74 3a 20 70 70 6d |ces.Subj|ect: ppm|
|00000060| 74 6f 70 63 6c 20 30 31 | 2f 30 31 20 28 77 61 73 |topcl 01|/01 (was|
|00000070| 20 52 65 3a 20 67 69 66 | 20 2d 2d 3e 20 70 62 6d | Re: gif| --> pbm|
|00000080| 70 6c 75 73 20 2d 2d 3e | 20 48 50 20 50 61 69 6e |plus -->| HP Pain|
|00000090| 74 4a 65 74 3f 29 0a 4d | 65 73 73 61 67 65 2d 49 |tJet?).M|essage-I|
|000000a0| 44 3a 20 3c 31 30 33 37 | 36 40 73 6b 79 65 2e 63 |D: <1037|6@skye.c|
|000000b0| 73 2e 65 64 2e 61 63 2e | 75 6b 3e 0a 44 61 74 65 |s.ed.ac.|uk>.Date|
|000000c0| 3a 20 39 20 4d 61 79 20 | 39 31 20 30 39 3a 35 33 |: 9 May |91 09:53|
|000000d0| 3a 33 33 20 47 4d 54 0a | 0a 49 6e 20 61 72 74 69 |:33 GMT.|.In arti|
|000000e0| 63 6c 65 20 3c 34 37 35 | 40 66 65 32 6f 33 2e 6c |cle <475|@fe2o3.l|
|000000f0| 61 75 72 65 6c 2e 6d 64 | 2e 75 73 3e 2c 20 72 75 |aurel.md|.us>, ru|
|00000100| 73 74 79 40 66 65 32 6f | 33 2e 6c 61 75 72 65 6c |sty@fe2o|3.laurel|
|00000110| 2e 6d 64 2e 75 73 20 28 | 52 75 73 74 79 20 48 61 |.md.us (|Rusty Ha|
|00000120| 64 64 6f 63 6b 29 20 77 | 72 69 74 65 73 3a 0a 3e |ddock) w|rites:.>|
|00000130| 20 49 6e 20 61 72 74 69 | 63 6c 65 20 3c 31 35 39 | In arti|cle <159|
|00000140| 36 33 40 68 65 6c 69 6f | 73 2e 54 41 4d 55 2e 45 |63@helio|s.TAMU.E|
|00000150| 44 55 3e 20 6a 64 6d 35 | 35 34 38 40 74 61 6d 73 |DU> jdm5|548@tams|
|00000160| 75 6e 2e 74 61 6d 75 2e | 65 64 75 20 28 4a 61 6d |un.tamu.|edu (Jam|
|00000170| 65 73 20 44 61 72 72 65 | 6c 6c 20 4d 63 43 61 75 |es Darre|ll McCau|
|00000180| 6c 65 79 29 20 77 72 69 | 74 65 73 3a 0a 3e 20 20 |ley) wri|tes:.>  |
|00000190| 20 20 7c 49 20 72 65 63 | 65 69 76 65 64 20 73 6f |  |I rec|eived so|
|000001a0| 6d 65 20 73 6f 75 72 63 | 65 20 6f 6e 63 65 20 74 |me sourc|e once t|
|000001b0| 68 61 74 20 77 6f 75 6c | 64 20 73 70 65 61 6b 20 |hat woul|d speak |
|000001c0| 50 61 69 6e 74 4a 65 74 | 20 76 69 61 20 53 75 6e |PaintJet| via Sun|
|000001d0| 20 52 61 73 74 65 72 2e | 0a 3e 20 20 20 20 7c 2e | Raster.|.>    |.|
|000001e0| 2e 2e 0a 3e 20 20 20 20 | 7c 49 74 20 64 6f 65 73 |...>    ||It does|
|000001f0| 20 77 6f 72 6b 20 76 65 | 72 79 20 77 65 6c 6c 20 | work ve|ry well |
|00000200| 74 68 6f 75 67 68 2e 20 | 20 50 61 72 74 69 63 75 |though. | Particu|
|00000210| 6c 61 72 6c 79 2c 20 69 | 66 20 74 68 65 20 69 6d |larly, i|f the im|
|00000220| 61 67 65 20 69 73 20 37 | 32 30 20 70 69 78 65 6c |age is 7|20 pixel|
|00000230| 73 0a 3e 20 20 20 20 7c | 2e 2e 2e 0a 3e 20 20 20 |s.>    ||....>   |
|00000240| 20 7c 70 70 6d 74 6f 70 | 6a 2c 20 61 6e 79 6f 6e | |ppmtop|j, anyon|
|00000250| 65 3f 0a 3e 20 0a 3e 20 | 70 70 6d 74 6f 70 6a 2c |e?.> .> |ppmtopj,|
|00000260| 20 79 65 73 21 20 20 41 | 66 74 65 72 20 74 68 69 | yes!  A|fter thi|
|00000270| 73 20 73 65 6d 65 73 74 | 65 72 20 69 73 20 6f 76 |s semest|er is ov|
|00000280| 65 72 2c 20 77 68 69 63 | 68 20 69 73 6e 27 74 20 |er, whic|h isn't |
|00000290| 74 6f 6f 20 66 61 72 20 | 6f 66 66 0a 3e 20 6e 6f |too far |off.> no|
|000002a0| 77 2c 20 49 20 77 61 6e | 74 20 74 6f 20 73 74 61 |w, I wan|t to sta|
|000002b0| 72 74 20 6f 6e 20 69 74 | 2e 20 20 48 6f 70 65 66 |rt on it|.  Hopef|
|000002c0| 75 6c 6c 79 20 69 74 20 | 77 6f 6e 27 74 20 74 61 |ully it |won't ta|
|000002d0| 6b 65 20 6d 75 63 68 20 | 6d 6f 72 65 20 74 68 61 |ke much |more tha|
|000002e0| 6e 0a 3e 20 61 20 77 65 | 65 6b 65 6e 64 2e 20 20 |n.> a we|ekend.  |
|000002f0| 49 66 20 79 6f 75 20 77 | 69 6c 6c 2c 20 62 6f 75 |If you w|ill, bou|
|00000300| 6e 63 65 20 74 68 61 74 | 20 63 6f 64 65 20 6d 79 |nce that| code my|
|00000310| 20 77 61 79 20 73 6f 20 | 49 20 63 61 6e 20 67 65 | way so |I can ge|
|00000320| 74 20 73 6f 6d 65 0a 3e | 20 6d 6f 72 65 20 69 6e |t some.>| more in|
|00000330| 73 69 67 68 74 20 69 6e | 74 6f 20 70 72 6f 67 72 |sight in|to progr|
|00000340| 61 6d 6d 69 6e 67 20 74 | 68 65 20 50 4a 2e 20 20 |amming t|he PJ.  |
|00000350| 49 27 6d 20 69 6e 74 65 | 72 65 73 74 65 64 20 69 |I'm inte|rested i|
|00000360| 6e 20 68 6f 77 20 74 68 | 65 0a 3e 20 31 36 2d 63 |n how th|e.> 16-c|
|00000370| 6f 6c 6f 72 20 6c 69 6d | 69 74 20 69 73 20 68 61 |olor lim|it is ha|
|00000380| 6e 64 6c 65 64 2e 20 20 | 54 68 61 6e 6b 73 21 20 |ndled.  |Thanks! |
|00000390| 0a 0a 4f 66 20 63 6f 75 | 72 73 65 2c 20 69 66 20 |..Of cou|rse, if |
|000003a0| 79 6f 75 20 68 61 76 65 | 20 61 20 50 61 69 6e 74 |you have| a Paint|
|000003b0| 4a 65 74 20 58 4c 2c 20 | 79 6f 75 20 63 6f 75 6c |Jet XL, |you coul|
|000003c0| 64 20 75 73 65 20 69 74 | 73 20 69 6e 74 65 72 6e |d use it|s intern|
|000003d0| 61 6c 20 69 6d 61 67 69 | 6e 67 0a 63 61 70 61 62 |al imagi|ng.capab|
|000003e0| 69 6c 69 74 69 65 73 20 | 77 69 74 68 20 74 68 65 |ilities |with the|
|000003f0| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 70 72 6f 67 72 | followi|ng progr|
|00000400| 61 6d 2e 0a 0a 3e 20 0a | 3e 20 09 09 2d 52 75 73 |am...> .|> ..-Rus|
|00000410| 74 79 2d 0a 0a 46 6f 6c | 6c 6f 77 75 70 73 20 64 |ty-..Fol|lowups d|
|00000420| 69 72 65 63 74 65 64 20 | 74 6f 20 61 6c 74 2e 67 |irected |to alt.g|
|00000430| 72 61 70 68 69 63 73 2e | 70 69 78 75 74 69 6c 73 |raphics.|pixutils|
|00000440| 2e 0a 0a 61 2e 0a 2d 2d | 20 0a 41 6e 67 75 73 20 |...a..--| .Angus |
|00000450| 44 75 67 67 61 6e 2c 20 | 44 65 70 61 72 74 6d 65 |Duggan, |Departme|
|00000460| 6e 74 20 6f 66 20 43 6f | 6d 70 75 74 65 72 20 53 |nt of Co|mputer S|
|00000470| 63 69 65 6e 63 65 2c 09 | 7c 20 49 27 6d 20 70 69 |cience,.|| I'm pi|
|00000480| 6e 6b 2c 20 74 68 65 72 | 65 66 6f 72 65 20 49 27 |nk, ther|efore I'|
|00000490| 6d 20 53 70 61 6d 2e 0a | 55 6e 69 76 65 72 73 69 |m Spam..|Universi|
|000004a0| 74 79 20 6f 66 20 45 64 | 69 6e 62 75 72 67 68 2c |ty of Ed|inburgh,|
|000004b0| 20 4a 43 4d 42 2c 09 09 | 09 7c 20 4a 41 4e 45 54 | JCMB,..|.| JANET|
|000004c0| 3a 20 20 61 6a 63 64 40 | 75 6b 2e 61 63 2e 65 64 |:  ajcd@|uk.ac.ed|
|000004d0| 2e 6c 66 63 73 0a 54 68 | 65 20 4b 69 6e 67 27 73 |.lfcs.Th|e King's|
|000004e0| 20 42 75 69 6c 64 69 6e | 67 73 2c 20 4d 61 79 66 | Buildin|gs, Mayf|
|000004f0| 69 65 6c 64 20 52 6f 61 | 64 2c 09 09 7c 20 56 4f |ield Roa|d,..| VO|
|00000500| 49 43 45 3a 20 20 28 55 | 4b 29 20 30 33 31 20 36 |ICE:  (U|K) 031 6|
|00000510| 35 30 20 35 31 32 36 0a | 45 64 69 6e 62 75 72 67 |50 5126.|Edinburg|
|00000520| 68 2c 20 45 48 39 20 33 | 4a 5a 2c 20 53 63 6f 74 |h, EH9 3|JZ, Scot|
|00000530| 6c 61 6e 64 2e 09 7c 20 | 4f 52 3a 20 20 61 6a 63 |land..| |OR:  ajc|
|00000540| 64 25 6c 66 63 73 2e 65 | 64 2e 61 63 2e 75 6b 40 |d%lfcs.e|d.ac.uk@|
|00000550| 6e 73 66 6e 65 74 2d 72 | 65 6c 61 79 2e 61 63 2e |nsfnet-r|elay.ac.|
|00000560| 75 6b 0a 0a 23 21 20 2f | 62 69 6e 2f 73 68 0a 23 |uk..#! /|bin/sh.#|
|00000570| 20 54 68 69 73 20 69 73 | 20 61 20 73 68 65 6c 6c | This is| a shell|
|00000580| 20 61 72 63 68 69 76 65 | 2e 20 20 52 65 6d 6f 76 | archive|.  Remov|
|00000590| 65 20 61 6e 79 74 68 69 | 6e 67 20 62 65 66 6f 72 |e anythi|ng befor|
|000005a0| 65 20 74 68 69 73 20 6c | 69 6e 65 2c 20 74 68 65 |e this l|ine, the|
|000005b0| 6e 20 75 6e 70 61 63 6b | 0a 23 20 69 74 20 62 79 |n unpack|.# it by|
|000005c0| 20 73 61 76 69 6e 67 20 | 69 74 20 69 6e 74 6f 20 | saving |it into |
|000005d0| 61 20 66 69 6c 65 20 61 | 6e 64 20 74 79 70 69 6e |a file a|nd typin|
|000005e0| 67 20 22 73 68 20 66 69 | 6c 65 22 2e 20 20 54 6f |g "sh fi|le".  To|
|000005f0| 20 6f 76 65 72 77 72 69 | 74 65 20 65 78 69 73 74 | overwri|te exist|
|00000600| 69 6e 67 0a 23 20 66 69 | 6c 65 73 2c 20 74 79 70 |ing.# fi|les, typ|
|00000610| 65 20 22 73 68 20 66 69 | 6c 65 20 2d 63 22 2e 20 |e "sh fi|le -c". |
|00000620| 20 59 6f 75 20 63 61 6e | 20 61 6c 73 6f 20 66 65 | You can| also fe|
|00000630| 65 64 20 74 68 69 73 20 | 61 73 20 73 74 61 6e 64 |ed this |as stand|
|00000640| 61 72 64 20 69 6e 70 75 | 74 20 76 69 61 0a 23 20 |ard inpu|t via.# |
|00000650| 75 6e 73 68 61 72 2c 20 | 6f 72 20 62 79 20 74 79 |unshar, |or by ty|
|00000660| 70 69 6e 67 20 22 73 68 | 20 3c 66 69 6c 65 22 2c |ping "sh| <file",|
|00000670| 20 65 2e 67 2e 2e 20 20 | 49 66 20 74 68 69 73 20 | e.g..  |If this |
|00000680| 61 72 63 68 69 76 65 20 | 69 73 20 63 6f 6d 70 6c |archive |is compl|
|00000690| 65 74 65 2c 20 79 6f 75 | 0a 23 20 77 69 6c 6c 20 |ete, you|.# will |
|000006a0| 73 65 65 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |see the |followin|
|000006b0| 67 20 6d 65 73 73 61 67 | 65 20 61 74 20 74 68 65 |g messag|e at the|
|000006c0| 20 65 6e 64 3a 0a 23 09 | 09 22 45 6e 64 20 6f 66 | end:.#.|."End of|
|000006d0| 20 61 72 63 68 69 76 65 | 20 31 20 28 6f 66 20 31 | archive| 1 (of 1|
|000006e0| 29 2e 22 0a 23 20 43 6f | 6e 74 65 6e 74 73 3a 20 |).".# Co|ntents: |
|000006f0| 20 70 70 6d 74 6f 70 63 | 6c 2e 31 20 70 70 6d 74 | ppmtopc|l.1 ppmt|
|00000700| 6f 70 63 6c 2e 63 0a 23 | 20 57 72 61 70 70 65 64 |opcl.c.#| Wrapped|
|00000710| 20 62 79 20 61 6a 63 64 | 40 64 61 76 61 61 72 20 | by ajcd|@davaar |
|00000720| 6f 6e 20 54 68 75 20 4d | 61 79 20 20 39 20 31 30 |on Thu M|ay  9 10|
|00000730| 3a 34 38 3a 33 39 20 31 | 39 39 31 0a 50 41 54 48 |:48:39 1|991.PATH|
|00000740| 3d 2f 62 69 6e 3a 2f 75 | 73 72 2f 62 69 6e 3a 2f |=/bin:/u|sr/bin:/|
|00000750| 75 73 72 2f 75 63 62 20 | 3b 20 65 78 70 6f 72 74 |usr/ucb |; export|
|00000760| 20 50 41 54 48 0a 69 66 | 20 74 65 73 74 20 2d 66 | PATH.if| test -f|
|00000770| 20 70 70 6d 74 6f 70 63 | 6c 2e 31 20 2d 61 20 22 | ppmtopc|l.1 -a "|
|00000780| 24 7b 31 7d 22 20 21 3d | 20 22 2d 63 22 20 3b 20 |${1}" !=| "-c" ; |
|00000790| 74 68 65 6e 20 0a 20 20 | 65 63 68 6f 20 73 68 61 |then .  |echo sha|
|000007a0| 72 3a 20 57 69 6c 6c 20 | 6e 6f 74 20 6f 76 65 72 |r: Will |not over|
|000007b0| 2d 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |-write e|xisting |
|000007c0| 66 69 6c 65 20 5c 22 70 | 70 6d 74 6f 70 63 6c 2e |file \"p|pmtopcl.|
|000007d0| 31 5c 22 0a 65 6c 73 65 | 0a 65 63 68 6f 20 73 68 |1\".else|.echo sh|
|000007e0| 61 72 3a 20 45 78 74 72 | 61 63 74 69 6e 67 20 5c |ar: Extr|acting \|
|000007f0| 22 70 70 6d 74 6f 70 63 | 6c 2e 31 5c 22 20 5c 28 |"ppmtopc|l.1\" \(|
|00000800| 32 31 39 31 20 63 68 61 | 72 61 63 74 65 72 73 5c |2191 cha|racters\|
|00000810| 29 0a 73 65 64 20 22 73 | 2f 5e 58 2f 2f 22 20 3e |).sed "s|/^X//" >|
|00000820| 70 70 6d 74 6f 70 63 6c | 2e 31 20 3c 3c 27 45 4e |ppmtopcl|.1 <<'EN|
|00000830| 44 5f 4f 46 5f 70 70 6d | 74 6f 70 63 6c 2e 31 27 |D_OF_ppm|topcl.1'|
|00000840| 0a 58 2e 54 48 20 50 50 | 4d 54 4f 50 43 4c 20 31 |.X.TH PP|MTOPCL 1|
|00000850| 20 22 31 34 20 4d 61 72 | 63 68 20 31 39 39 31 22 | "14 Mar|ch 1991"|
|00000860| 0a 58 2e 53 48 20 4e 41 | 4d 45 0a 58 70 70 6d 74 |.X.SH NA|ME.Xppmt|
|00000870| 6f 70 63 6c 20 2d 20 63 | 6f 6e 76 65 72 74 20 61 |opcl - c|onvert a|
|00000880| 20 70 6f 72 74 61 62 6c | 65 20 70 69 78 6d 61 70 | portabl|e pixmap|
|00000890| 20 69 6e 74 6f 20 61 6e | 20 48 50 20 50 61 69 6e | into an| HP Pain|
|000008a0| 74 4a 65 74 20 58 4c 20 | 50 43 4c 20 66 69 6c 65 |tJet XL |PCL file|
|000008b0| 0a 58 2e 53 48 20 53 59 | 4e 4f 50 53 49 53 0a 58 |.X.SH SY|NOPSIS.X|
|000008c0| 70 70 6d 74 6f 70 63 6c | 20 5b 2d 6e 6f 70 61 63 |ppmtopcl| [-nopac|
|000008d0| 6b 5d 20 5b 2d 67 61 6d | 6d 61 0a 58 2e 49 20 3c |k] [-gam|ma.X.I <|
|000008e0| 6e 3e 0a 58 5d 20 5b 2d | 70 72 65 73 65 6e 74 61 |n>.X] [-|presenta|
|000008f0| 74 69 6f 6e 5d 20 5b 2d | 64 61 72 6b 5d 20 5b 2d |tion] [-|dark] [-|
|00000900| 64 69 66 66 75 73 65 5d | 20 5b 2d 63 6c 75 73 74 |diffuse]| [-clust|
|00000910| 65 72 5d 20 5b 2d 64 69 | 74 68 65 72 5d 20 5b 2d |er] [-di|ther] [-|
|00000920| 78 73 68 69 66 74 0a 58 | 2e 49 20 3c 73 3e 0a 58 |xshift.X|.I <s>.X|
|00000930| 5d 20 5b 2d 79 73 68 69 | 66 74 0a 58 2e 49 20 3c |] [-yshi|ft.X.I <|
|00000940| 73 3e 0a 58 5d 20 5b 2d | 78 73 68 69 66 74 0a 58 |s>.X] [-|xshift.X|
|00000950| 2e 49 20 3c 73 3e 0a 58 | 5d 20 5b 2d 79 73 68 69 |.I <s>.X|] [-yshi|
|00000960| 66 74 0a 58 2e 49 20 3c | 73 3e 0a 58 5d 20 5b 2d |ft.X.I <|s>.X] [-|
|00000970| 78 73 69 7a 65 7c 2d 77 | 69 64 74 68 7c 2d 78 73 |xsize|-w|idth|-xs|
|00000980| 63 61 6c 65 0a 58 2e 49 | 20 3c 73 3e 0a 58 5d 20 |cale.X.I| <s>.X] |
|00000990| 5b 2d 79 73 69 7a 65 7c | 2d 68 65 69 67 68 74 7c |[-ysize||-height||
|000009a0| 2d 79 73 63 61 6c 65 0a | 58 2e 49 20 3c 73 3e 0a |-yscale.|X.I <s>.|
|000009b0| 58 5d 20 5b 70 70 6d 66 | 69 6c 65 5d 0a 58 0a 58 |X] [ppmf|ile].X.X|
|000009c0| 2e 53 48 20 44 45 53 43 | 52 49 50 54 49 4f 4e 0a |.SH DESC|RIPTION.|
|000009d0| 58 52 65 61 64 73 20 61 | 20 70 6f 72 74 61 62 6c |XReads a| portabl|
|000009e0| 65 20 70 69 78 6d 61 70 | 20 61 73 20 69 6e 70 75 |e pixmap| as inpu|
|000009f0| 74 2e 0a 58 50 72 6f 64 | 75 63 65 73 20 61 20 50 |t..XProd|uces a P|
|00000a00| 43 4c 20 66 69 6c 65 20 | 73 75 69 74 61 62 6c 65 |CL file |suitable|
|00000a10| 20 66 6f 72 20 70 72 69 | 6e 74 69 6e 67 20 6f 6e | for pri|nting on|
|00000a20| 20 61 6e 20 48 50 20 50 | 61 69 6e 74 4a 65 74 20 | an HP P|aintJet |
|00000a30| 58 4c 20 70 72 69 6e 74 | 65 72 20 61 73 0a 58 6f |XL print|er as.Xo|
|00000a40| 75 74 70 75 74 2e 0a 58 | 2e 50 50 0a 58 54 68 65 |utput..X|.PP.XThe|
|00000a50| 20 67 65 6e 65 72 61 74 | 65 64 20 66 69 6c 65 20 | generat|ed file |
|00000a60| 69 73 20 6e 6f 74 20 73 | 75 69 74 61 62 6c 65 20 |is not s|uitable |
|00000a70| 66 6f 72 20 70 72 69 6e | 74 69 6e 67 20 6f 6e 20 |for prin|ting on |
|00000a80| 61 20 6e 6f 72 6d 61 6c | 20 50 72 69 6e 74 4a 65 |a normal| PrintJe|
|00000a90| 74 20 70 72 69 6e 74 65 | 72 2e 0a 58 54 68 65 0a |t printe|r..XThe.|
|00000aa0| 58 2e 42 20 5c 2d 6e 6f | 70 61 63 6b 0a 58 6f 70 |X.B \-no|pack.Xop|
|00000ab0| 74 69 6f 6e 20 67 65 6e | 65 72 61 74 65 73 20 61 |tion gen|erates a|
|00000ac0| 20 66 69 6c 65 20 77 68 | 69 63 68 20 64 6f 65 73 | file wh|ich does|
|00000ad0| 20 6e 6f 74 20 75 73 65 | 20 74 68 65 20 6e 6f 72 | not use| the nor|
|00000ae0| 6d 61 6c 20 54 49 46 46 | 20 34 2e 30 20 63 6f 6d |mal TIFF| 4.0 com|
|00000af0| 70 72 65 73 73 69 6f 6e | 0a 58 6d 65 74 68 6f 64 |pression|.Xmethod|
|00000b00| 2e 20 54 68 69 73 20 66 | 69 6c 65 20 6d 69 67 68 |. This f|ile migh|
|00000b10| 74 20 62 65 20 70 72 69 | 6e 74 61 62 6c 65 20 6f |t be pri|ntable o|
|00000b20| 6e 20 61 20 6e 6f 72 6d | 61 6c 20 50 61 69 6e 74 |n a norm|al Paint|
|00000b30| 4a 65 74 20 70 72 69 6e | 74 65 72 20 28 6e 6f 74 |Jet prin|ter (not|
|00000b40| 20 61 6e 20 58 4c 29 2e | 0a 58 2e 50 50 0a 58 54 | an XL).|.X.PP.XT|
|00000b50| 68 65 0a 58 2e 42 20 5c | 2d 67 61 6d 6d 61 0a 58 |he.X.B \|-gamma.X|
|00000b60| 6f 70 74 69 6f 6e 20 73 | 65 74 73 20 74 68 65 20 |option s|ets the |
|00000b70| 67 61 6d 6d 61 20 63 6f | 72 72 65 63 74 69 6f 6e |gamma co|rrection|
|00000b80| 20 66 6f 72 20 74 68 65 | 20 69 6d 61 67 65 2e 20 | for the| image. |
|00000b90| 54 68 65 20 75 73 65 66 | 75 6c 20 72 61 6e 67 65 |The usef|ul range|
|00000ba0| 20 66 6f 72 20 74 68 65 | 0a 58 50 61 69 6e 74 4a | for the|.XPaintJ|
|00000bb0| 65 74 20 58 4c 20 69 73 | 20 61 70 70 72 6f 78 69 |et XL is| approxi|
|00000bc0| 6d 61 74 65 6c 79 20 30 | 2e 36 20 74 6f 20 31 2e |mately 0|.6 to 1.|
|00000bd0| 35 2e 0a 58 2e 50 50 0a | 58 54 68 65 20 72 65 6e |5..X.PP.|XThe ren|
|00000be0| 64 65 72 69 6e 67 20 61 | 6c 67 6f 72 69 74 68 6d |dering a|lgorithm|
|00000bf0| 20 75 73 65 64 20 66 6f | 72 20 69 6d 61 67 65 73 | used fo|r images|
|00000c00| 20 63 61 6e 20 62 65 20 | 61 6c 74 65 72 65 64 20 | can be |altered |
|00000c10| 77 69 74 68 20 74 68 65 | 0a 58 2e 42 20 2d 64 69 |with the|.X.B -di|
|00000c20| 74 68 65 72 2c 0a 58 2e | 42 20 2d 63 6c 75 73 74 |ther,.X.|B -clust|
|00000c30| 65 72 2c 0a 58 61 6e 64 | 0a 58 2e 42 20 2d 64 69 |er,.Xand|.X.B -di|
|00000c40| 66 66 75 73 65 0a 58 6f | 70 74 69 6f 6e 73 2e 20 |ffuse.Xo|ptions. |
|00000c50| 54 68 65 73 65 20 6f 70 | 74 69 6f 6e 73 20 73 65 |These op|tions se|
|00000c60| 6c 65 63 74 20 6f 72 64 | 65 72 65 64 20 64 69 74 |lect ord|ered dit|
|00000c70| 68 65 72 69 6e 67 2c 20 | 63 6c 75 73 74 65 72 65 |hering, |clustere|
|00000c80| 64 20 6f 72 64 65 72 65 | 64 20 64 69 74 68 65 72 |d ordere|d dither|
|00000c90| 69 6e 67 2c 0a 58 6f 72 | 20 65 72 72 6f 72 20 64 |ing,.Xor| error d|
|00000ca0| 69 66 66 75 73 69 6f 6e | 20 72 65 73 70 65 63 74 |iffusion| respect|
|00000cb0| 69 76 65 6c 79 2e 0a 58 | 54 68 65 0a 58 2e 42 20 |ively..X|The.X.B |
|00000cc0| 5c 2d 64 61 72 6b 0a 58 | 6f 70 74 69 6f 6e 20 63 |\-dark.X|option c|
|00000cd0| 61 6e 20 62 65 20 75 73 | 65 64 20 74 6f 20 65 6e |an be us|ed to en|
|00000ce0| 68 61 6e 63 65 20 69 6d | 61 67 65 73 20 77 69 74 |hance im|ages wit|
|00000cf0| 68 20 61 20 64 61 72 6b | 20 62 61 63 6b 67 72 6f |h a dark| backgro|
|00000d00| 75 6e 64 20 77 68 65 6e | 20 74 68 65 79 20 61 72 |und when| they ar|
|00000d10| 65 0a 58 72 65 64 75 63 | 65 64 20 69 6e 20 73 69 |e.Xreduc|ed in si|
|00000d20| 7a 65 2e 0a 58 54 68 65 | 0a 58 2e 42 20 5c 2d 70 |ze..XThe|.X.B \-p|
|00000d30| 72 65 73 65 6e 74 61 74 | 69 6f 6e 0a 58 6f 70 74 |resentat|ion.Xopt|
|00000d40| 69 6f 6e 20 74 75 72 6e | 73 20 6f 6e 20 70 72 65 |ion turn|s on pre|
|00000d50| 73 65 6e 74 61 74 69 6f | 6e 20 6d 6f 64 65 2c 20 |sentatio|n mode, |
|00000d60| 69 6e 20 77 68 69 63 68 | 20 74 77 6f 20 70 61 73 |in which| two pas|
|00000d70| 73 65 73 20 61 72 65 20 | 6d 61 64 65 20 6f 76 65 |ses are |made ove|
|00000d80| 72 20 74 68 65 20 70 61 | 70 65 72 0a 58 74 6f 20 |r the pa|per.Xto |
|00000d90| 69 6e 63 72 65 61 73 65 | 20 69 6e 6b 20 64 65 6e |increase| ink den|
|00000da0| 73 69 74 79 2e 20 54 68 | 69 73 20 73 68 6f 75 6c |sity. Th|is shoul|
|00000db0| 64 20 62 65 20 75 73 65 | 64 20 6f 6e 6c 79 20 66 |d be use|d only f|
|00000dc0| 6f 72 20 69 6d 61 67 65 | 73 20 77 68 65 72 65 20 |or image|s where |
|00000dd0| 71 75 61 6c 69 74 79 20 | 69 73 0a 58 63 72 69 74 |quality |is.Xcrit|
|00000de0| 69 63 61 6c 2e 0a 58 0a | 58 2e 50 50 0a 58 54 68 |ical..X.|X.PP.XTh|
|00000df0| 65 20 69 6d 61 67 65 20 | 63 61 6e 20 62 65 20 72 |e image |can be r|
|00000e00| 65 73 69 7a 65 64 20 62 | 79 20 73 65 74 74 69 6e |esized b|y settin|
|00000e10| 67 20 74 68 65 20 0a 58 | 2e 42 20 5c 2d 78 73 69 |g the .X|.B \-xsi|
|00000e20| 7a 65 0a 58 61 6e 64 20 | 0a 58 2e 42 20 5c 2d 79 |ze.Xand |.X.B \-y|
|00000e30| 73 69 7a 65 0a 58 6f 70 | 74 69 6f 6e 73 2e 20 54 |size.Xop|tions. T|
|00000e40| 68 65 20 70 61 72 61 6d | 65 74 65 72 20 74 6f 20 |he param|eter to |
|00000e50| 65 69 74 68 65 72 20 6f | 66 20 74 68 65 73 65 20 |either o|f these |
|00000e60| 6f 70 74 69 6f 6e 73 20 | 69 73 20 69 6e 74 65 72 |options |is inter|
|00000e70| 70 72 65 74 65 64 20 61 | 73 20 74 68 65 0a 58 6e |preted a|s the.Xn|
|00000e80| 75 6d 62 65 72 20 6f 66 | 20 64 6f 74 73 20 74 6f |umber of| dots to|
|00000e90| 20 73 65 74 20 74 68 65 | 20 77 69 64 74 68 20 6f | set the| width o|
|00000ea0| 72 20 68 65 69 67 68 74 | 20 74 6f 2c 20 62 75 74 |r height| to, but|
|00000eb0| 20 61 6e 20 6f 70 74 69 | 6f 6e 61 6c 20 64 69 6d | an opti|onal dim|
|00000ec0| 65 6e 73 69 6f 6e 20 6f | 66 0a 58 60 5c 66 42 70 |ension o|f.X`\fBp|
|00000ed0| 74 5c 66 52 27 20 28 70 | 6f 69 6e 74 73 29 2c 20 |t\fR' (p|oints), |
|00000ee0| 60 5c 66 42 64 70 5c 66 | 52 27 20 28 64 65 63 69 |`\fBdp\f|R' (deci|
|00000ef0| 70 6f 69 6e 74 73 29 2c | 20 60 5c 66 42 69 6e 5c |points),| `\fBin\|
|00000f00| 66 52 27 20 28 69 6e 63 | 68 65 73 29 2c 20 6f 72 |fR' (inc|hes), or|
|00000f10| 0a 58 60 5c 66 42 63 6d | 5c 66 52 27 20 28 63 65 |.X`\fBcm|\fR' (ce|
|00000f20| 6e 74 69 6d 65 74 72 65 | 73 29 20 6d 61 79 20 62 |ntimetre|s) may b|
|00000f30| 65 20 61 70 70 65 6e 64 | 65 64 2e 0a 58 49 66 20 |e append|ed..XIf |
|00000f40| 6f 6e 6c 79 20 6f 6e 65 | 20 64 69 6d 65 6e 73 69 |only one| dimensi|
|00000f50| 6f 6e 20 69 73 20 73 70 | 65 63 69 66 69 65 64 2c |on is sp|ecified,|
|00000f60| 20 74 68 65 20 6f 74 68 | 65 72 20 77 69 6c 6c 20 | the oth|er will |
|00000f70| 62 65 20 73 63 61 6c 65 | 64 20 61 70 70 72 6f 70 |be scale|d approp|
|00000f80| 72 69 61 74 65 6c 79 2e | 0a 58 0a 58 54 68 65 20 |riately.|.X.XThe |
|00000f90| 6f 70 74 69 6f 6e 73 0a | 58 2e 42 20 5c 2d 77 69 |options.|X.B \-wi|
|00000fa0| 64 74 68 0a 58 61 6e 64 | 0a 58 2e 42 20 5c 2d 68 |dth.Xand|.X.B \-h|
|00000fb0| 65 69 67 68 74 0a 58 61 | 72 65 20 73 79 6e 6f 6e |eight.Xa|re synon|
|00000fc0| 79 6d 73 20 6f 66 0a 58 | 2e 42 20 5c 2d 78 73 69 |yms of.X|.B \-xsi|
|00000fd0| 7a 65 0a 58 61 6e 64 0a | 58 2e 42 20 5c 2d 79 73 |ze.Xand.|X.B \-ys|
|00000fe0| 69 7a 65 2e 0a 58 0a 58 | 54 68 65 0a 58 2e 42 20 |ize..X.X|The.X.B |
|00000ff0| 5c 2d 78 73 63 61 6c 65 | 0a 58 61 6e 64 0a 58 2e |\-xscale|.Xand.X.|
|00001000| 42 20 5c 2d 79 73 63 61 | 6c 65 0a 58 6f 70 74 69 |B \-ysca|le.Xopti|
|00001010| 6f 6e 73 20 63 61 6e 20 | 61 6c 74 65 72 6e 61 74 |ons can |alternat|
|00001020| 69 76 65 6c 79 20 62 65 | 20 75 73 65 64 20 74 6f |ively be| used to|
|00001030| 20 73 63 61 6c 65 20 74 | 68 65 20 69 6d 61 67 65 | scale t|he image|
|00001040| 20 62 79 20 61 20 73 69 | 6d 70 6c 65 20 66 61 63 | by a si|mple fac|
|00001050| 74 6f 72 2e 0a 58 0a 58 | 2e 50 50 0a 58 54 68 65 |tor..X.X|.PP.XThe|
|00001060| 20 69 6d 61 67 65 20 63 | 61 6e 20 62 65 20 73 68 | image c|an be sh|
|00001070| 69 66 74 65 64 20 6f 6e | 20 74 68 65 20 70 61 67 |ifted on| the pag|
|00001080| 65 20 62 79 20 75 73 69 | 6e 67 20 74 68 65 0a 58 |e by usi|ng the.X|
|00001090| 2e 42 20 5c 2d 78 73 68 | 69 66 74 0a 58 61 6e 64 |.B \-xsh|ift.Xand|
|000010a0| 0a 58 2e 42 20 5c 2d 79 | 73 68 69 66 74 0a 58 6f |.X.B \-y|shift.Xo|
|000010b0| 70 74 69 6f 6e 73 2e 20 | 54 68 65 73 65 20 6d 6f |ptions. |These mo|
|000010c0| 76 65 20 74 68 65 20 69 | 6d 61 67 65 20 74 68 65 |ve the i|mage the|
|000010d0| 20 73 70 65 63 69 66 69 | 65 64 20 64 69 6d 65 6e | specifi|ed dimen|
|000010e0| 73 69 6f 6e 73 20 72 69 | 67 68 74 20 61 6e 64 20 |sions ri|ght and |
|000010f0| 64 6f 77 6e 2e 0a 58 0a | 58 2e 53 48 20 22 53 45 |down..X.|X.SH "SE|
|00001100| 45 20 41 4c 53 4f 22 0a | 58 70 70 6d 28 35 29 0a |E ALSO".|Xppm(5).|
|00001110| 58 2e 53 48 20 41 55 54 | 48 4f 52 0a 58 41 6e 67 |X.SH AUT|HOR.XAng|
|00001120| 75 73 20 44 75 67 67 61 | 6e 0a 45 4e 44 5f 4f 46 |us Dugga|n.END_OF|
|00001130| 5f 70 70 6d 74 6f 70 63 | 6c 2e 31 0a 69 66 20 74 |_ppmtopc|l.1.if t|
|00001140| 65 73 74 20 32 31 39 31 | 20 2d 6e 65 20 60 77 63 |est 2191| -ne `wc|
|00001150| 20 2d 63 20 3c 70 70 6d | 74 6f 70 63 6c 2e 31 60 | -c <ppm|topcl.1`|
|00001160| 3b 20 74 68 65 6e 0a 20 | 20 20 20 65 63 68 6f 20 |; then. |   echo |
|00001170| 73 68 61 72 3a 20 5c 22 | 70 70 6d 74 6f 70 63 6c |shar: \"|ppmtopcl|
|00001180| 2e 31 5c 22 20 75 6e 70 | 61 63 6b 65 64 20 77 69 |.1\" unp|acked wi|
|00001190| 74 68 20 77 72 6f 6e 67 | 20 73 69 7a 65 21 0a 66 |th wrong| size!.f|
|000011a0| 69 0a 23 20 65 6e 64 20 | 6f 66 20 6f 76 65 72 77 |i.# end |of overw|
|000011b0| 72 69 74 69 6e 67 20 63 | 68 65 63 6b 0a 66 69 0a |riting c|heck.fi.|
|000011c0| 69 66 20 74 65 73 74 20 | 2d 66 20 70 70 6d 74 6f |if test |-f ppmto|
|000011d0| 70 63 6c 2e 63 20 2d 61 | 20 22 24 7b 31 7d 22 20 |pcl.c -a| "${1}" |
|000011e0| 21 3d 20 22 2d 63 22 20 | 3b 20 74 68 65 6e 20 0a |!= "-c" |; then .|
|000011f0| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 57 69 6c |  echo s|har: Wil|
|00001200| 6c 20 6e 6f 74 20 6f 76 | 65 72 2d 77 72 69 74 65 |l not ov|er-write|
|00001210| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|00001220| 22 70 70 6d 74 6f 70 63 | 6c 2e 63 5c 22 0a 65 6c |"ppmtopc|l.c\".el|
|00001230| 73 65 0a 65 63 68 6f 20 | 73 68 61 72 3a 20 45 78 |se.echo |shar: Ex|
|00001240| 74 72 61 63 74 69 6e 67 | 20 5c 22 70 70 6d 74 6f |tracting| \"ppmto|
|00001250| 70 63 6c 2e 63 5c 22 20 | 5c 28 31 32 30 37 37 20 |pcl.c\" |\(12077 |
|00001260| 63 68 61 72 61 63 74 65 | 72 73 5c 29 0a 73 65 64 |characte|rs\).sed|
|00001270| 20 22 73 2f 5e 58 2f 2f | 22 20 3e 70 70 6d 74 6f | "s/^X//|" >ppmto|
|00001280| 70 63 6c 2e 63 20 3c 3c | 27 45 4e 44 5f 4f 46 5f |pcl.c <<|'END_OF_|
|00001290| 70 70 6d 74 6f 70 63 6c | 2e 63 27 0a 58 2f 2a 20 |ppmtopcl|.c'.X/* |
|000012a0| 70 70 6d 74 6f 70 63 6c | 2e 63 20 2d 20 63 6f 6e |ppmtopcl|.c - con|
|000012b0| 76 65 72 74 20 70 6f 72 | 74 61 62 6c 65 20 70 69 |vert por|table pi|
|000012c0| 78 6d 61 70 20 69 6e 74 | 6f 20 50 43 4c 20 6c 61 |xmap int|o PCL la|
|000012d0| 6e 67 75 61 67 65 20 66 | 6f 72 20 48 50 20 50 61 |nguage f|or HP Pa|
|000012e0| 69 6e 74 4a 65 74 20 61 | 6e 64 0a 58 20 2a 20 20 |intJet a|nd.X *  |
|000012f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 61 69 6e |        |    Pain|
|00001300| 74 4a 65 74 20 58 4c 20 | 63 6f 6c 6f 75 72 20 70 |tJet XL |colour p|
|00001310| 72 69 6e 74 65 72 73 0a | 58 20 2a 20 41 4a 43 44 |rinters.|X * AJCD|
|00001320| 20 31 32 2f 33 2f 39 31 | 0a 58 20 2a 20 0a 58 20 | 12/3/91|.X * .X |
|00001330| 2a 20 75 73 61 67 65 3a | 0a 58 20 2a 20 20 20 20 |* usage:|.X *    |
|00001340| 20 20 20 70 70 6d 74 6f | 70 63 6c 20 5b 2d 6e 6f |   ppmto|pcl [-no|
|00001350| 70 61 63 6b 5d 20 5b 2d | 67 61 6d 6d 61 20 3c 6e |pack] [-|gamma <n|
|00001360| 3e 5d 20 5b 2d 70 72 65 | 73 65 6e 74 61 74 69 6f |>] [-pre|sentatio|
|00001370| 6e 5d 20 5b 2d 64 61 72 | 6b 5d 0a 58 20 2a 20 20 |n] [-dar|k].X *  |
|00001380| 20 20 20 20 20 20 20 20 | 5b 2d 64 69 66 66 75 73 |        |[-diffus|
|00001390| 65 5d 20 5b 2d 63 6c 75 | 73 74 65 72 5d 20 5b 2d |e] [-clu|ster] [-|
|000013a0| 64 69 74 68 65 72 5d 0a | 58 20 2a 20 20 20 20 20 |dither].|X *     |
|000013b0| 20 20 20 20 20 5b 2d 78 | 73 68 69 66 74 20 3c 73 |     [-x|shift <s|
|000013c0| 3e 5d 20 5b 2d 79 73 68 | 69 66 74 20 3c 73 3e 5d |>] [-ysh|ift <s>]|
|000013d0| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 5b 2d |.X *    |      [-|
|000013e0| 78 73 68 69 66 74 20 3c | 73 3e 5d 20 5b 2d 79 73 |xshift <|s>] [-ys|
|000013f0| 68 69 66 74 20 3c 73 3e | 5d 0a 58 20 2a 20 20 20 |hift <s>|].X *   |
|00001400| 20 20 20 20 20 20 20 5b | 2d 78 73 69 7a 65 7c 2d |       [|-xsize|-|
|00001410| 77 69 64 74 68 7c 2d 78 | 73 63 61 6c 65 20 3c 73 |width|-x|scale <s|
|00001420| 3e 5d 20 5b 2d 79 73 69 | 7a 65 7c 2d 68 65 69 67 |>] [-ysi|ze|-heig|
|00001430| 68 74 7c 2d 79 73 63 61 | 6c 65 20 3c 73 3e 5d 0a |ht|-ysca|le <s>].|
|00001440| 58 20 2a 20 20 20 20 20 | 20 20 20 20 20 5b 70 70 |X *     |     [pp|
|00001450| 6d 66 69 6c 65 5d 0a 58 | 20 2a 0a 58 20 2a 2f 0a |mfile].X| *.X */.|
|00001460| 58 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 73 74 64 |X.X#incl|ude <std|
|00001470| 69 6f 2e 68 3e 0a 58 23 | 69 6e 63 6c 75 64 65 20 |io.h>.X#|include |
|00001480| 3c 70 70 6d 2e 68 3e 0a | 58 23 69 6e 63 6c 75 64 |<ppm.h>.|X#includ|
|00001490| 65 20 3c 70 70 6d 63 6d | 61 70 2e 68 3e 0a 58 0a |e <ppmcm|ap.h>.X.|
|000014a0| 58 23 64 65 66 69 6e 65 | 20 4d 41 58 43 4f 4c 4f |X#define| MAXCOLO|
|000014b0| 52 53 20 31 30 32 34 0a | 58 0a 58 65 78 74 65 72 |RS 1024.|X.Xexter|
|000014c0| 6e 20 64 6f 75 62 6c 65 | 20 61 74 6f 66 28 29 3b |n double| atof();|
|000014d0| 0a 58 65 78 74 65 72 6e | 20 69 6e 74 20 61 74 6f |.Xextern| int ato|
|000014e0| 69 28 29 3b 0a 58 0a 58 | 63 68 61 72 20 2a 75 73 |i();.X.X|char *us|
|000014f0| 61 67 65 3d 22 5b 2d 6e | 6f 70 61 63 6b 5d 20 5b |age="[-n|opack] [|
|00001500| 2d 67 61 6d 6d 61 20 3c | 6e 3e 5d 20 5b 2d 70 72 |-gamma <|n>] [-pr|
|00001510| 65 73 65 6e 74 61 74 69 | 6f 6e 5d 20 5b 2d 64 61 |esentati|on] [-da|
|00001520| 72 6b 5d 5c 6e 5c 0a 58 | 20 20 20 20 20 20 20 20 |rk]\n\.X|        |
|00001530| 20 20 20 20 5b 2d 64 69 | 66 66 75 73 65 5d 20 5b |    [-di|ffuse] [|
|00001540| 2d 63 6c 75 73 74 65 72 | 5d 20 5b 2d 64 69 74 68 |-cluster|] [-dith|
|00001550| 65 72 5d 5c 6e 5c 0a 58 | 20 20 20 20 20 20 20 20 |er]\n\.X|        |
|00001560| 20 20 20 20 5b 2d 78 73 | 68 69 66 74 20 3c 73 3e |    [-xs|hift <s>|
|00001570| 5d 20 5b 2d 79 73 68 69 | 66 74 20 3c 73 3e 5d 5c |] [-yshi|ft <s>]\|
|00001580| 6e 5c 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |n\.X    |        |
|00001590| 5b 2d 78 73 68 69 66 74 | 20 3c 73 3e 5d 20 5b 2d |[-xshift| <s>] [-|
|000015a0| 79 73 68 69 66 74 20 3c | 73 3e 5d 5c 6e 5c 0a 58 |yshift <|s>]\n\.X|
|000015b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5b 2d 78 73 |        |    [-xs|
|000015c0| 69 7a 65 7c 2d 77 69 64 | 74 68 7c 2d 78 73 63 61 |ize|-wid|th|-xsca|
|000015d0| 6c 65 20 3c 73 3e 5d 20 | 5b 2d 79 73 69 7a 65 7c |le <s>] |[-ysize||
|000015e0| 2d 68 65 69 67 68 74 7c | 2d 79 73 63 61 6c 65 20 |-height||-yscale |
|000015f0| 3c 73 3e 5d 5c 6e 5c 0a | 58 20 20 20 20 20 20 20 |<s>]\n\.|X       |
|00001600| 20 20 20 20 20 5b 70 70 | 6d 66 69 6c 65 5d 22 3b |     [pp|mfile]";|
|00001610| 0a 58 0a 58 23 64 65 66 | 69 6e 65 20 50 43 4c 5f |.X.X#def|ine PCL_|
|00001620| 4d 41 58 57 49 44 54 48 | 20 32 30 34 38 0a 58 23 |MAXWIDTH| 2048.X#|
|00001630| 64 65 66 69 6e 65 20 50 | 43 4c 5f 4d 41 58 48 45 |define P|CL_MAXHE|
|00001640| 49 47 48 54 20 33 32 37 | 36 37 0a 58 23 64 65 66 |IGHT 327|67.X#def|
|00001650| 69 6e 65 20 50 43 4c 5f | 4d 41 58 56 41 4c 20 32 |ine PCL_|MAXVAL 2|
|00001660| 35 35 0a 58 0a 58 73 74 | 61 74 69 63 20 69 6e 74 |55.X.Xst|atic int|
|00001670| 20 6e 6f 70 61 63 6b 20 | 3d 20 30 3b 0a 58 73 74 | nopack |= 0;.Xst|
|00001680| 61 74 69 63 20 69 6e 74 | 20 64 61 72 6b 20 3d 20 |atic int| dark = |
|00001690| 30 3b 0a 58 73 74 61 74 | 69 63 20 69 6e 74 20 64 |0;.Xstat|ic int d|
|000016a0| 69 66 66 75 73 65 20 3d | 20 30 3b 0a 58 73 74 61 |iffuse =| 0;.Xsta|
|000016b0| 74 69 63 20 69 6e 74 20 | 64 69 74 68 65 72 20 3d |tic int |dither =|
|000016c0| 20 30 3b 0a 58 73 74 61 | 74 69 63 20 69 6e 74 20 | 0;.Xsta|tic int |
|000016d0| 63 6c 75 73 74 65 72 20 | 3d 20 30 3b 0a 58 73 74 |cluster |= 0;.Xst|
|000016e0| 61 74 69 63 20 69 6e 74 | 20 78 73 69 7a 65 20 3d |atic int| xsize =|
|000016f0| 20 30 3b 0a 58 73 74 61 | 74 69 63 20 69 6e 74 20 | 0;.Xsta|tic int |
|00001700| 79 73 69 7a 65 20 3d 20 | 30 3b 0a 58 73 74 61 74 |ysize = |0;.Xstat|
|00001710| 69 63 20 69 6e 74 20 78 | 73 68 69 66 74 20 3d 20 |ic int x|shift = |
|00001720| 30 3b 0a 58 73 74 61 74 | 69 63 20 69 6e 74 20 79 |0;.Xstat|ic int y|
|00001730| 73 68 69 66 74 20 3d 20 | 30 3b 0a 58 73 74 61 74 |shift = |0;.Xstat|
|00001740| 69 63 20 69 6e 74 20 71 | 75 61 6c 69 74 79 20 3d |ic int q|uality =|
|00001750| 20 30 3b 0a 58 73 74 61 | 74 69 63 20 64 6f 75 62 | 0;.Xsta|tic doub|
|00001760| 6c 65 20 78 73 63 61 6c | 65 20 3d 20 30 2e 30 3b |le xscal|e = 0.0;|
|00001770| 0a 58 73 74 61 74 69 63 | 20 64 6f 75 62 6c 65 20 |.Xstatic| double |
|00001780| 79 73 63 61 6c 65 20 3d | 20 30 2e 30 3b 0a 58 73 |yscale =| 0.0;.Xs|
|00001790| 74 61 74 69 63 20 64 6f | 75 62 6c 65 20 67 61 6d |tatic do|uble gam|
|000017a0| 6d 61 20 3d 20 30 2e 30 | 3b 0a 58 0a 58 2f 2a 20 |ma = 0.0|;.X.X/* |
|000017b0| 61 72 67 75 6d 65 6e 74 | 20 74 79 70 65 73 20 2a |argument| types *|
|000017c0| 2f 0a 58 23 64 65 66 69 | 6e 65 20 44 49 4d 20 30 |/.X#defi|ne DIM 0|
|000017d0| 0a 58 23 64 65 66 69 6e | 65 20 52 45 41 4c 20 31 |.X#defin|e REAL 1|
|000017e0| 0a 58 23 64 65 66 69 6e | 65 20 42 4f 4f 4c 20 32 |.X#defin|e BOOL 2|
|000017f0| 0a 58 73 74 61 74 69 63 | 20 73 74 72 75 63 74 20 |.Xstatic| struct |
|00001800| 6f 70 74 69 6f 6e 73 20 | 7b 0a 58 20 20 20 63 68 |options |{.X   ch|
|00001810| 61 72 20 2a 6e 61 6d 65 | 3b 0a 58 20 20 20 69 6e |ar *name|;.X   in|
|00001820| 74 20 74 79 70 65 3b 0a | 58 20 20 20 63 68 61 72 |t type;.|X   char|
|00001830| 20 2a 76 61 6c 75 65 3b | 0a 58 7d 20 6f 70 74 69 | *value;|.X} opti|
|00001840| 6f 6e 73 5b 5d 20 3d 20 | 7b 0a 58 20 20 20 7b 22 |ons[] = |{.X   {"|
|00001850| 67 61 6d 6d 61 22 2c 20 | 20 20 20 20 20 20 20 52 |gamma", |       R|
|00001860| 45 41 4c 2c 20 28 63 68 | 61 72 20 2a 29 26 67 61 |EAL, (ch|ar *)&ga|
|00001870| 6d 6d 61 20 7d 2c 0a 58 | 20 20 20 7b 22 70 72 65 |mma },.X|   {"pre|
|00001880| 73 65 6e 74 61 74 69 6f | 6e 22 2c 20 42 4f 4f 4c |sentatio|n", BOOL|
|00001890| 2c 20 28 63 68 61 72 20 | 2a 29 26 71 75 61 6c 69 |, (char |*)&quali|
|000018a0| 74 79 20 7d 2c 0a 58 20 | 20 20 7b 22 77 69 64 74 |ty },.X |  {"widt|
|000018b0| 68 22 2c 20 20 20 20 20 | 20 20 20 44 49 4d 2c 20 |h",     |   DIM, |
|000018c0| 20 28 63 68 61 72 20 2a | 29 26 78 73 69 7a 65 20 | (char *|)&xsize |
|000018d0| 7d 2c 0a 58 20 20 20 7b | 22 78 73 69 7a 65 22 2c |},.X   {|"xsize",|
|000018e0| 20 20 20 20 20 20 20 20 | 44 49 4d 2c 20 20 28 63 |        |DIM,  (c|
|000018f0| 68 61 72 20 2a 29 26 78 | 73 69 7a 65 20 7d 2c 0a |har *)&x|size },.|
|00001900| 58 20 20 20 7b 22 68 65 | 69 67 68 74 22 2c 20 20 |X   {"he|ight",  |
|00001910| 20 20 20 20 20 44 49 4d | 2c 20 20 28 63 68 61 72 |     DIM|,  (char|
|00001920| 20 2a 29 26 79 73 69 7a | 65 20 7d 2c 0a 58 20 20 | *)&ysiz|e },.X  |
|00001930| 20 7b 22 79 73 69 7a 65 | 22 2c 20 20 20 20 20 20 | {"ysize|",      |
|00001940| 20 20 44 49 4d 2c 20 20 | 28 63 68 61 72 20 2a 29 |  DIM,  |(char *)|
|00001950| 26 79 73 69 7a 65 20 7d | 2c 0a 58 20 20 20 7b 22 |&ysize }|,.X   {"|
|00001960| 78 73 63 61 6c 65 22 2c | 20 20 20 20 20 20 20 52 |xscale",|       R|
|00001970| 45 41 4c 2c 20 28 63 68 | 61 72 20 2a 29 26 78 73 |EAL, (ch|ar *)&xs|
|00001980| 63 61 6c 65 20 7d 2c 0a | 58 20 20 20 7b 22 79 73 |cale },.|X   {"ys|
|00001990| 63 61 6c 65 22 2c 20 20 | 20 20 20 20 20 52 45 41 |cale",  |     REA|
|000019a0| 4c 2c 20 28 63 68 61 72 | 20 2a 29 26 79 73 63 61 |L, (char| *)&ysca|
|000019b0| 6c 65 20 7d 2c 0a 58 20 | 20 20 7b 22 78 73 68 69 |le },.X |  {"xshi|
|000019c0| 66 74 22 2c 20 20 20 20 | 20 20 20 44 49 4d 2c 20 |ft",    |   DIM, |
|000019d0| 20 28 63 68 61 72 20 2a | 29 26 78 73 68 69 66 74 | (char *|)&xshift|
|000019e0| 20 7d 2c 0a 58 20 20 20 | 7b 22 79 73 68 69 66 74 | },.X   |{"yshift|
|000019f0| 22 2c 20 20 20 20 20 20 | 20 44 49 4d 2c 20 20 28 |",      | DIM,  (|
|00001a00| 63 68 61 72 20 2a 29 26 | 79 73 68 69 66 74 20 7d |char *)&|yshift }|
|00001a10| 2c 0a 58 20 20 20 7b 22 | 64 61 72 6b 22 2c 20 20 |,.X   {"|dark",  |
|00001a20| 20 20 20 20 20 20 20 42 | 4f 4f 4c 2c 20 28 63 68 |       B|OOL, (ch|
|00001a30| 61 72 20 2a 29 26 64 61 | 72 6b 20 7d 2c 0a 58 20 |ar *)&da|rk },.X |
|00001a40| 20 20 7b 22 64 69 66 66 | 75 73 65 22 2c 20 20 20 |  {"diff|use",   |
|00001a50| 20 20 20 42 4f 4f 4c 2c | 20 28 63 68 61 72 20 2a |   BOOL,| (char *|
|00001a60| 29 26 64 69 66 66 75 73 | 65 20 7d 2c 0a 58 20 20 |)&diffus|e },.X  |
|00001a70| 20 7b 22 64 69 74 68 65 | 72 22 2c 20 20 20 20 20 | {"dithe|r",     |
|00001a80| 20 20 42 4f 4f 4c 2c 20 | 28 63 68 61 72 20 2a 29 |  BOOL, |(char *)|
|00001a90| 26 64 69 74 68 65 72 20 | 7d 2c 0a 58 20 20 20 7b |&dither |},.X   {|
|00001aa0| 22 63 6c 75 73 74 65 72 | 22 2c 20 20 20 20 20 20 |"cluster|",      |
|00001ab0| 42 4f 4f 4c 2c 20 28 63 | 68 61 72 20 2a 29 26 63 |BOOL, (c|har *)&c|
|00001ac0| 6c 75 73 74 65 72 20 7d | 2c 0a 58 20 20 20 7b 22 |luster }|,.X   {"|
|00001ad0| 6e 6f 70 61 63 6b 22 2c | 20 20 20 20 20 20 20 42 |nopack",|       B|
|00001ae0| 4f 4f 4c 2c 20 28 63 68 | 61 72 20 2a 29 26 6e 6f |OOL, (ch|ar *)&no|
|00001af0| 70 61 63 6b 20 7d 2c 0a | 58 7d 3b 0a 58 0a 58 23 |pack },.|X};.X.X#|
|00001b00| 64 65 66 69 6e 65 20 70 | 75 74 77 6f 72 64 28 77 |define p|utword(w|
|00001b10| 29 20 28 70 75 74 63 68 | 61 72 28 28 28 77 29 3e |) (putch|ar(((w)>|
|00001b20| 3e 38 29 20 26 20 32 35 | 35 29 2c 20 70 75 74 63 |>8) & 25|5), putc|
|00001b30| 68 61 72 28 28 77 29 20 | 26 20 32 35 35 29 29 0a |har((w) |& 255)).|
|00001b40| 58 0a 58 69 6e 74 20 62 | 69 74 73 70 65 72 70 69 |X.Xint b|itsperpi|
|00001b50| 78 65 6c 28 76 29 0a 58 | 20 20 20 20 20 69 6e 74 |xel(v).X|     int|
|00001b60| 20 76 3b 0a 58 7b 0a 58 | 20 20 20 69 6e 74 20 62 | v;.X{.X|   int b|
|00001b70| 70 70 20 3d 20 30 3b 0a | 58 20 20 20 77 68 69 6c |pp = 0;.|X   whil|
|00001b80| 65 20 28 76 20 3e 20 30 | 29 20 7b 20 20 2f 2a 20 |e (v > 0|) {  /* |
|00001b90| 63 61 6c 63 75 6c 61 74 | 65 20 23 20 62 69 74 73 |calculat|e # bits|
|00001ba0| 20 66 6f 72 20 76 61 6c | 75 65 20 2a 2f 0a 58 20 | for val|ue */.X |
|00001bb0| 20 20 20 20 20 2b 2b 62 | 70 70 3b 0a 58 20 20 20 |     ++b|pp;.X   |
|00001bc0| 20 20 20 76 3e 3e 3d 31 | 3b 0a 58 20 20 20 7d 0a |   v>>=1|;.X   }.|
|00001bd0| 58 20 20 20 72 65 74 75 | 72 6e 20 28 62 70 70 29 |X   retu|rn (bpp)|
|00001be0| 3b 0a 58 7d 0a 58 0a 58 | 73 74 61 74 69 63 20 63 |;.X}.X.X|static c|
|00001bf0| 68 61 72 20 2a 69 6e 72 | 6f 77 20 3d 20 4e 55 4c |har *inr|ow = NUL|
|00001c00| 4c 3b 0a 58 73 74 61 74 | 69 63 20 63 68 61 72 20 |L;.Xstat|ic char |
|00001c10| 2a 6f 75 74 72 6f 77 20 | 3d 20 4e 55 4c 4c 3b 0a |*outrow |= NULL;.|
|00001c20| 58 73 74 61 74 69 63 20 | 2f 2a 73 69 67 6e 65 64 |Xstatic |/*signed|
|00001c30| 2a 2f 20 63 68 61 72 20 | 2a 72 75 6e 63 6e 74 20 |*/ char |*runcnt |
|00001c40| 3d 20 4e 55 4c 4c 3b 0a | 58 0a 58 70 75 74 62 69 |= NULL;.|X.Xputbi|
|00001c50| 74 73 28 62 2c 20 6e 29 | 20 2f 2a 20 70 75 74 20 |ts(b, n)| /* put |
|00001c60| 23 6e 20 62 69 74 73 20 | 69 6e 20 62 20 6f 75 74 |#n bits |in b out|
|00001c70| 2c 20 70 61 63 6b 69 6e | 67 20 69 6e 74 6f 20 62 |, packin|g into b|
|00001c80| 79 74 65 73 3b 20 6e 3d | 30 20 66 6c 75 73 68 65 |ytes; n=|0 flushe|
|00001c90| 73 20 62 69 74 73 20 2a | 2f 0a 58 20 20 20 20 20 |s bits *|/.X     |
|00001ca0| 69 6e 74 20 62 2c 20 6e | 3b 20 2f 2a 20 6e 20 73 |int b, n|; /* n s|
|00001cb0| 68 6f 75 6c 64 20 6e 65 | 76 65 72 20 62 65 20 3e |hould ne|ver be >|
|00001cc0| 20 38 20 2a 2f 0a 58 7b | 0a 58 20 20 20 73 74 61 | 8 */.X{|.X   sta|
|00001cd0| 74 69 63 20 69 6e 74 20 | 6f 75 74 20 3d 20 30 3b |tic int |out = 0;|
|00001ce0| 0a 58 20 20 20 73 74 61 | 74 69 63 20 69 6e 74 20 |.X   sta|tic int |
|00001cf0| 63 6e 74 20 3d 20 30 3b | 0a 58 20 20 20 73 74 61 |cnt = 0;|.X   sta|
|00001d00| 74 69 63 20 69 6e 74 20 | 6e 75 6d 20 3d 20 30 3b |tic int |num = 0;|
|00001d10| 0a 58 20 20 20 73 74 61 | 74 69 63 20 69 6e 74 20 |.X   sta|tic int |
|00001d20| 70 61 63 6b 20 3d 20 30 | 3b 0a 58 20 20 20 69 66 |pack = 0|;.X   if|
|00001d30| 20 28 6e 29 20 7b 0a 58 | 20 20 20 20 20 20 69 6e | (n) {.X|      in|
|00001d40| 74 20 78 6f 20 3d 20 30 | 3b 0a 58 20 20 20 20 20 |t xo = 0|;.X     |
|00001d50| 20 69 6e 74 20 78 63 20 | 3d 20 30 3b 0a 58 20 20 | int xc |= 0;.X  |
|00001d60| 20 20 20 20 69 66 20 28 | 63 6e 74 2b 6e 20 3e 20 |    if (|cnt+n > |
|00001d70| 38 29 20 7b 20 20 2f 2a | 20 6f 76 65 72 66 6c 6f |8) {  /*| overflo|
|00001d80| 77 69 6e 67 20 63 75 72 | 72 65 6e 74 20 62 79 74 |wing cur|rent byt|
|00001d90| 65 3f 20 2a 2f 0a 58 09 | 20 78 63 20 3d 20 63 6e |e? */.X.| xc = cn|
|00001da0| 74 20 2b 20 6e 20 2d 20 | 38 3b 0a 58 09 20 78 6f |t + n - |8;.X. xo|
|00001db0| 20 3d 20 28 62 20 26 20 | 7e 28 2d 31 20 3c 3c 20 | = (b & |~(-1 << |
|00001dc0| 78 63 29 29 20 3c 3c 20 | 28 38 2d 78 63 29 3b 0a |xc)) << |(8-xc);.|
|00001dd0| 58 09 20 6e 20 2d 3d 20 | 78 63 3b 0a 58 09 20 62 |X. n -= |xc;.X. b|
|00001de0| 20 3e 3e 3d 20 78 63 3b | 0a 58 20 20 20 20 20 20 | >>= xc;|.X      |
|00001df0| 7d 0a 58 20 20 20 20 20 | 20 63 6e 74 20 2b 3d 20 |}.X     | cnt += |
|00001e00| 6e 3b 0a 58 20 20 20 20 | 20 20 6f 75 74 20 7c 3d |n;.X    |  out |=|
|00001e10| 20 28 62 20 26 20 7e 28 | 2d 31 20 3c 3c 20 6e 29 | (b & ~(|-1 << n)|
|00001e20| 29 20 3c 3c 20 28 38 2d | 63 6e 74 29 3b 0a 58 20 |) << (8-|cnt);.X |
|00001e30| 20 20 20 20 20 69 66 20 | 28 63 6e 74 20 3e 3d 20 |     if |(cnt >= |
|00001e40| 38 29 20 7b 0a 58 09 20 | 69 6e 72 6f 77 5b 6e 75 |8) {.X. |inrow[nu|
|00001e50| 6d 2b 2b 5d 20 3d 20 6f | 75 74 3b 0a 58 09 20 6f |m++] = o|ut;.X. o|
|00001e60| 75 74 20 3d 20 78 6f 3b | 0a 58 09 20 63 6e 74 20 |ut = xo;|.X. cnt |
|00001e70| 3d 20 78 63 3b 0a 58 20 | 20 20 20 20 20 7d 0a 58 |= xc;.X |     }.X|
|00001e80| 20 20 20 7d 20 65 6c 73 | 65 20 7b 20 2f 2a 20 66 |   } els|e { /* f|
|00001e90| 6c 75 73 68 20 72 6f 77 | 20 2a 2f 0a 58 20 20 20 |lush row| */.X   |
|00001ea0| 20 20 20 69 6e 74 20 69 | 3b 0a 58 20 20 20 20 20 |   int i|;.X     |
|00001eb0| 20 69 66 20 28 63 6e 74 | 29 20 7b 0a 58 09 20 69 | if (cnt|) {.X. i|
|00001ec0| 6e 72 6f 77 5b 6e 75 6d | 2b 2b 5d 20 3d 20 6f 75 |nrow[num|++] = ou|
|00001ed0| 74 3b 0a 58 09 20 6f 75 | 74 20 3d 20 63 6e 74 20 |t;.X. ou|t = cnt |
|00001ee0| 3d 20 30 3b 0a 58 20 20 | 20 20 20 20 7d 0a 58 20 |= 0;.X  |    }.X |
|00001ef0| 20 20 20 20 20 66 6f 72 | 20 28 3b 20 6e 75 6d 20 |     for| (; num |
|00001f00| 3e 20 30 20 26 26 20 69 | 6e 72 6f 77 5b 6e 75 6d |> 0 && i|nrow[num|
|00001f10| 2d 31 5d 20 3d 3d 20 30 | 3b 20 6e 75 6d 2d 2d 29 |-1] == 0|; num--)|
|00001f20| 3b 20 2f 2a 20 72 65 6d | 6f 76 65 20 74 72 61 69 |; /* rem|ove trai|
|00001f30| 6c 69 6e 67 20 7a 65 72 | 6f 73 20 2a 2f 0a 58 20 |ling zer|os */.X |
|00001f40| 20 20 20 20 20 70 72 69 | 6e 74 66 28 22 5c 30 33 |     pri|ntf("\03|
|00001f50| 33 2a 62 22 29 3b 20 0a | 58 20 20 20 20 20 20 69 |3*b"); .|X      i|
|00001f60| 66 20 28 6e 75 6d 20 26 | 26 20 21 6e 6f 70 61 63 |f (num &|& !nopac|
|00001f70| 6b 29 20 7b 20 20 20 20 | 20 20 20 20 20 20 20 20 |k) {    |        |
|00001f80| 2f 2a 20 54 49 46 46 20 | 34 2e 30 20 70 61 63 6b |/* TIFF |4.0 pack|
|00001f90| 62 69 74 73 20 65 6e 63 | 6f 64 69 6e 67 20 2a 2f |bits enc|oding */|
|00001fa0| 0a 58 09 20 69 6e 74 20 | 73 74 61 72 74 20 3d 20 |.X. int |start = |
|00001fb0| 30 3b 0a 58 09 20 69 6e | 74 20 6e 65 78 74 3b 0a |0;.X. in|t next;.|
|00001fc0| 58 09 20 72 75 6e 63 6e | 74 5b 73 74 61 72 74 5d |X. runcn|t[start]|
|00001fd0| 20 3d 20 30 3b 0a 58 09 | 20 66 6f 72 20 28 69 20 | = 0;.X.| for (i |
|00001fe0| 3d 20 31 3b 20 69 20 3c | 20 6e 75 6d 3b 20 69 2b |= 1; i <| num; i+|
|00001ff0| 2b 29 20 7b 0a 58 09 20 | 20 20 20 69 66 20 28 69 |+) {.X. |   if (i|
|00002000| 6e 72 6f 77 5b 69 5d 20 | 3d 3d 20 69 6e 72 6f 77 |nrow[i] |== inrow|
|00002010| 5b 69 2d 31 5d 29 20 7b | 0a 58 09 20 20 20 20 20 |[i-1]) {|.X.     |
|00002020| 20 20 69 66 20 28 72 75 | 6e 63 6e 74 5b 73 74 61 |  if (ru|ncnt[sta|
|00002030| 72 74 5d 20 3c 3d 20 30 | 20 26 26 20 72 75 6e 63 |rt] <= 0| && runc|
|00002040| 6e 74 5b 73 74 61 72 74 | 5d 20 3e 20 2d 31 32 37 |nt[start|] > -127|
|00002050| 29 0a 58 09 09 20 20 72 | 75 6e 63 6e 74 5b 73 74 |).X..  r|uncnt[st|
|00002060| 61 72 74 5d 2d 2d 3b 0a | 58 09 20 20 20 20 20 20 |art]--;.|X.      |
|00002070| 20 65 6c 73 65 0a 58 09 | 09 20 20 72 75 6e 63 6e | else.X.|.  runcn|
|00002080| 74 5b 73 74 61 72 74 20 | 3d 20 69 5d 20 3d 20 30 |t[start |= i] = 0|
|00002090| 3b 0a 58 09 20 20 20 20 | 7d 20 65 6c 73 65 20 7b |;.X.    |} else {|
|000020a0| 0a 58 09 20 20 20 20 20 | 20 20 69 66 20 28 72 75 |.X.     |  if (ru|
|000020b0| 6e 63 6e 74 5b 73 74 61 | 72 74 5d 20 3e 3d 20 30 |ncnt[sta|rt] >= 0|
|000020c0| 20 26 26 20 72 75 6e 63 | 6e 74 5b 73 74 61 72 74 | && runc|nt[start|
|000020d0| 5d 20 3c 20 31 32 37 29 | 0a 58 09 09 20 20 72 75 |] < 127)|.X..  ru|
|000020e0| 6e 63 6e 74 5b 73 74 61 | 72 74 5d 2b 2b 3b 0a 58 |ncnt[sta|rt]++;.X|
|000020f0| 09 20 20 20 20 20 20 20 | 65 6c 73 65 0a 58 09 09 |.       |else.X..|
|00002100| 20 20 72 75 6e 63 6e 74 | 5b 73 74 61 72 74 20 3d |  runcnt|[start =|
|00002110| 20 69 5d 20 3d 20 30 3b | 0a 58 09 20 20 20 20 7d | i] = 0;|.X.    }|
|00002120| 0a 58 09 20 7d 0a 58 09 | 20 73 74 61 72 74 20 3d |.X. }.X.| start =|
|00002130| 20 30 3b 0a 58 09 20 66 | 6f 72 20 28 69 20 3d 20 | 0;.X. f|or (i = |
|00002140| 30 3b 20 69 20 3c 20 6e | 75 6d 3b 20 69 20 3d 20 |0; i < n|um; i = |
|00002150| 6e 65 78 74 29 20 7b 0a | 58 09 20 20 20 20 69 6e |next) {.|X.    in|
|00002160| 74 20 63 6f 75 6e 74 20 | 3d 20 72 75 6e 63 6e 74 |t count |= runcnt|
|00002170| 5b 69 5d 3b 0a 58 09 20 | 20 20 20 69 6e 74 20 66 |[i];.X. |   int f|
|00002180| 72 6f 6d 20 3d 20 69 3b | 0a 58 09 20 20 20 20 69 |rom = i;|.X.    i|
|00002190| 66 20 28 63 6f 75 6e 74 | 20 3e 3d 20 30 29 20 7b |f (count| >= 0) {|
|000021a0| 20 2f 2a 20 6d 65 72 67 | 65 20 74 77 6f 2d 62 79 | /* merg|e two-by|
|000021b0| 74 65 20 72 75 6e 73 20 | 2a 2f 0a 58 09 20 20 20 |te runs |*/.X.   |
|000021c0| 20 20 20 20 66 6f 72 20 | 28 3b 3b 29 20 7b 0a 58 |    for |(;;) {.X|
|000021d0| 09 09 20 20 6e 65 78 74 | 20 3d 20 69 2b 31 2b 72 |..  next| = i+1+r|
|000021e0| 75 6e 63 6e 74 5b 69 5d | 3b 0a 58 09 09 20 20 69 |uncnt[i]|;.X..  i|
|000021f0| 66 28 6e 65 78 74 20 3e | 3d 20 6e 75 6d 20 7c 7c |f(next >|= num |||
|00002200| 20 72 75 6e 63 6e 74 5b | 6e 65 78 74 5d 20 3c 20 | runcnt[|next] < |
|00002210| 30 20 7c 7c 0a 58 09 09 | 20 20 20 20 20 63 6f 75 |0 ||.X..|     cou|
|00002220| 6e 74 2b 72 75 6e 63 6e | 74 5b 6e 65 78 74 5d 2b |nt+runcn|t[next]+|
|00002230| 31 20 3e 20 31 32 37 29 | 0a 58 09 09 20 20 20 20 |1 > 127)|.X..    |
|00002240| 20 62 72 65 61 6b 3b 0a | 58 09 09 20 20 63 6f 75 | break;.|X..  cou|
|00002250| 6e 74 20 2b 3d 20 72 75 | 6e 63 6e 74 5b 6e 65 78 |nt += ru|ncnt[nex|
|00002260| 74 5d 2b 31 3b 0a 58 09 | 09 20 20 69 20 3d 20 6e |t]+1;.X.|.  i = n|
|00002270| 65 78 74 3b 0a 58 09 20 | 20 20 20 20 20 20 7d 0a |ext;.X. |      }.|
|00002280| 58 09 20 20 20 20 7d 0a | 58 09 20 20 20 20 6e 65 |X.    }.|X.    ne|
|00002290| 78 74 20 3d 20 20 69 20 | 2b 20 31 20 2b 20 28 28 |xt =  i |+ 1 + ((|
|000022a0| 72 75 6e 63 6e 74 5b 69 | 5d 20 3c 20 30 29 20 3f |runcnt[i|] < 0) ?|
|000022b0| 20 2d 72 75 6e 63 6e 74 | 5b 69 5d 20 3a 20 72 75 | -runcnt|[i] : ru|
|000022c0| 6e 63 6e 74 5b 69 5d 29 | 3b 0a 58 09 20 20 20 20 |ncnt[i])|;.X.    |
|000022d0| 69 66 20 28 6e 65 78 74 | 20 3c 20 6e 75 6d 20 26 |if (next| < num &|
|000022e0| 26 20 63 6f 75 6e 74 20 | 3e 20 30 20 26 26 0a 58 |& count |> 0 &&.X|
|000022f0| 09 09 72 75 6e 63 6e 74 | 5b 6e 65 78 74 5d 20 3c |..runcnt|[next] <|
|00002300| 20 30 20 26 26 20 72 75 | 6e 63 6e 74 5b 6e 65 78 | 0 && ru|ncnt[nex|
|00002310| 74 5d 20 3e 20 2d 31 32 | 37 29 20 7b 0a 58 09 20 |t] > -12|7) {.X. |
|00002320| 20 20 20 20 20 20 63 6f | 75 6e 74 2d 2d 3b 0a 58 |      co|unt--;.X|
|00002330| 09 20 20 20 20 20 20 20 | 6e 65 78 74 2d 2d 3b 0a |.       |next--;.|
|00002340| 58 09 20 20 20 20 20 20 | 20 72 75 6e 63 6e 74 5b |X.      | runcnt[|
|00002350| 6e 65 78 74 5d 20 3d 20 | 72 75 6e 63 6e 74 5b 6e |next] = |runcnt[n|
|00002360| 65 78 74 2b 31 5d 2d 31 | 3b 0a 58 09 20 20 20 20 |ext+1]-1|;.X.    |
|00002370| 7d 0a 58 09 20 20 20 20 | 6f 75 74 72 6f 77 5b 73 |}.X.    |outrow[s|
|00002380| 74 61 72 74 2b 2b 5d 20 | 3d 20 63 6f 75 6e 74 3b |tart++] |= count;|
|00002390| 0a 58 09 20 20 20 20 69 | 66 20 28 63 6f 75 6e 74 |.X.    i|f (count|
|000023a0| 20 3e 3d 20 30 29 20 7b | 0a 58 09 20 20 20 20 20 | >= 0) {|.X.     |
|000023b0| 20 20 77 68 69 6c 65 20 | 28 63 6f 75 6e 74 2d 2d |  while |(count--|
|000023c0| 20 3e 3d 20 30 29 0a 58 | 09 09 20 20 6f 75 74 72 | >= 0).X|..  outr|
|000023d0| 6f 77 5b 73 74 61 72 74 | 2b 2b 5d 20 3d 20 69 6e |ow[start|++] = in|
|000023e0| 72 6f 77 5b 66 72 6f 6d | 2b 2b 5d 3b 0a 58 09 20 |row[from|++];.X. |
|000023f0| 20 20 20 7d 20 65 6c 73 | 65 0a 58 09 20 20 20 20 |   } els|e.X.    |
|00002400| 20 20 20 6f 75 74 72 6f | 77 5b 73 74 61 72 74 2b |   outro|w[start+|
|00002410| 2b 5d 20 3d 20 69 6e 72 | 6f 77 5b 66 72 6f 6d 5d |+] = inr|ow[from]|
|00002420| 3b 0a 58 09 20 7d 0a 58 | 09 20 69 66 20 28 73 74 |;.X. }.X|. if (st|
|00002430| 61 72 74 20 3c 20 6e 75 | 6d 29 20 7b 0a 58 09 20 |art < nu|m) {.X. |
|00002440| 20 20 20 6e 75 6d 20 3d | 20 73 74 61 72 74 3b 0a |   num =| start;.|
|00002450| 58 09 20 20 20 20 69 66 | 20 28 21 70 61 63 6b 29 |X.    if| (!pack)|
|00002460| 20 7b 0a 58 09 20 20 20 | 20 20 20 20 70 72 69 6e | {.X.   |    prin|
|00002470| 74 66 28 22 32 6d 22 29 | 3b 0a 58 09 20 20 20 20 |tf("2m")|;.X.    |
|00002480| 20 20 20 70 61 63 6b 20 | 3d 20 31 3b 0a 58 09 20 |   pack |= 1;.X. |
|00002490| 20 20 20 7d 0a 58 09 20 | 7d 20 65 6c 73 65 20 7b |   }.X. |} else {|
|000024a0| 0a 58 09 20 20 20 20 69 | 66 20 28 70 61 63 6b 29 |.X.    i|f (pack)|
|000024b0| 20 7b 0a 58 09 20 20 20 | 20 20 20 20 70 72 69 6e | {.X.   |    prin|
|000024c0| 74 66 28 22 30 6d 22 29 | 3b 0a 58 09 20 20 20 20 |tf("0m")|;.X.    |
|000024d0| 20 20 20 70 61 63 6b 20 | 3d 20 30 3b 0a 58 09 20 |   pack |= 0;.X. |
|000024e0| 20 20 20 7d 0a 58 09 20 | 7d 0a 58 20 20 20 20 20 |   }.X. |}.X     |
|000024f0| 20 7d 0a 58 20 20 20 20 | 20 20 70 72 69 6e 74 66 | }.X    |  printf|
|00002500| 28 22 25 64 57 22 2c 20 | 6e 75 6d 29 3b 0a 58 20 |("%dW", |num);.X |
|00002510| 20 20 20 20 20 66 6f 72 | 20 28 69 20 3d 20 30 3b |     for| (i = 0;|
|00002520| 20 69 20 3c 20 6e 75 6d | 3b 20 69 2b 2b 29 0a 58 | i < num|; i++).X|
|00002530| 09 20 70 75 74 63 68 61 | 72 28 70 61 63 6b 20 3f |. putcha|r(pack ?|
|00002540| 20 6f 75 74 72 6f 77 5b | 69 5d 20 3a 20 69 6e 72 | outrow[|i] : inr|
|00002550| 6f 77 5b 69 5d 29 3b 0a | 58 20 20 20 20 20 20 6e |ow[i]);.|X      n|
|00002560| 75 6d 20 3d 20 30 3b 20 | 2f 2a 20 6e 65 77 20 72 |um = 0; |/* new r|
|00002570| 6f 77 20 2a 2f 0a 58 20 | 20 20 7d 0a 58 7d 0a 58 |ow */.X |  }.X}.X|
|00002580| 0a 58 6d 61 69 6e 28 61 | 72 67 63 2c 20 61 72 67 |.Xmain(a|rgc, arg|
|00002590| 76 29 0a 58 20 20 20 20 | 20 69 6e 74 20 61 72 67 |v).X    | int arg|
|000025a0| 63 3b 0a 58 20 20 20 20 | 20 63 68 61 72 20 2a 61 |c;.X    | char *a|
|000025b0| 72 67 76 5b 5d 3b 0a 58 | 7b 0a 58 20 20 20 46 49 |rgv[];.X|{.X   FI|
|000025c0| 4c 45 20 2a 69 66 64 3b | 0a 58 20 20 20 72 65 67 |LE *ifd;|.X   reg|
|000025d0| 69 73 74 65 72 20 70 69 | 78 65 6c 20 2a 2a 70 69 |ister pi|xel **pi|
|000025e0| 78 65 6c 73 2c 20 2a 70 | 69 78 72 6f 77 3b 0a 58 |xels, *p|ixrow;.X|
|000025f0| 20 20 20 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 |   regis|ter int |
|00002600| 20 72 6f 77 2c 20 63 6f | 6c 2c 20 62 70 70 2c 20 | row, co|l, bpp, |
|00002610| 69 3b 0a 58 20 20 20 69 | 6e 74 20 72 6f 77 73 2c |i;.X   i|nt rows,|
|00002620| 20 63 6f 6c 73 3b 0a 58 | 20 20 20 70 69 78 76 61 | cols;.X|   pixva|
|00002630| 6c 20 6d 61 78 76 61 6c | 3b 0a 58 20 20 20 69 6e |l maxval|;.X   in|
|00002640| 74 20 62 70 72 2c 20 62 | 70 67 2c 20 62 70 62 3b |t bpr, b|pg, bpb;|
|00002650| 0a 58 20 20 20 69 6e 74 | 20 72 65 6e 64 65 72 3b |.X   int| render;|
|00002660| 0a 58 20 20 20 69 6e 74 | 20 63 6f 6c 6f 75 72 73 |.X   int| colours|
|00002670| 2c 20 69 6e 64 65 78 3b | 0a 58 20 20 20 63 6f 6c |, index;|.X   col|
|00002680| 6f 72 68 69 73 74 5f 76 | 65 63 74 6f 72 20 63 68 |orhist_v|ector ch|
|00002690| 76 3b 0a 58 20 20 20 63 | 6f 6c 6f 72 68 61 73 68 |v;.X   c|olorhash|
|000026a0| 5f 74 61 62 6c 65 20 63 | 68 74 3b 0a 58 20 20 20 |_table c|ht;.X   |
|000026b0| 0a 58 20 20 20 70 6d 5f | 70 72 6f 67 6e 61 6d 65 |.X   pm_|progname|
|000026c0| 20 3d 20 61 72 67 76 5b | 30 5d 3b 0a 58 20 20 20 | = argv[|0];.X   |
|000026d0| 0a 58 20 20 20 77 68 69 | 6c 65 20 28 61 72 67 63 |.X   whi|le (argc|
|000026e0| 20 3e 20 31 20 26 26 20 | 61 72 67 76 5b 31 5d 5b | > 1 && |argv[1][|
|000026f0| 30 5d 20 3d 3d 20 27 2d | 27 29 20 7b 0a 58 20 20 |0] == '-|') {.X  |
|00002700| 20 20 20 20 63 68 61 72 | 20 2a 63 2c 20 2a 76 61 |    char| *c, *va|
|00002710| 6c 3d 61 72 67 76 5b 31 | 5d 2b 31 3b 0a 58 20 20 |l=argv[1|]+1;.X  |
|00002720| 20 20 20 20 66 6f 72 20 | 28 69 20 3d 20 30 3b 20 |    for |(i = 0; |
|00002730| 69 20 3c 20 73 69 7a 65 | 6f 66 28 6f 70 74 69 6f |i < size|of(optio|
|00002740| 6e 73 29 2f 73 69 7a 65 | 6f 66 28 73 74 72 75 63 |ns)/size|of(struc|
|00002750| 74 20 6f 70 74 69 6f 6e | 73 29 3b 20 69 2b 2b 29 |t option|s); i++)|
|00002760| 20 7b 0a 58 09 20 69 66 | 20 28 73 74 72 6c 65 6e | {.X. if| (strlen|
|00002770| 28 76 61 6c 29 20 3c 3d | 20 73 74 72 6c 65 6e 28 |(val) <=| strlen(|
|00002780| 6f 70 74 69 6f 6e 73 5b | 69 5d 2e 6e 61 6d 65 29 |options[|i].name)|
|00002790| 20 26 26 0a 58 09 20 20 | 20 20 20 21 73 74 72 6e | &&.X.  |   !strn|
|000027a0| 63 6d 70 28 76 61 6c 2c | 20 6f 70 74 69 6f 6e 73 |cmp(val,| options|
|000027b0| 5b 69 5d 2e 6e 61 6d 65 | 2c 20 73 74 72 6c 65 6e |[i].name|, strlen|
|000027c0| 28 76 61 6c 29 29 29 20 | 7b 0a 58 09 20 20 20 20 |(val))) |{.X.    |
|000027d0| 73 77 69 74 63 68 20 28 | 6f 70 74 69 6f 6e 73 5b |switch (|options[|
|000027e0| 69 5d 2e 74 79 70 65 29 | 20 7b 0a 58 09 20 20 20 |i].type)| {.X.   |
|000027f0| 20 63 61 73 65 20 44 49 | 4d 3a 0a 58 09 20 20 20 | case DI|M:.X.   |
|00002800| 20 20 20 20 69 66 20 28 | 2b 2b 61 72 67 76 2c 20 |    if (|++argv, |
|00002810| 2d 2d 61 72 67 63 20 3d | 3d 20 31 29 0a 58 09 09 |--argc =|= 1).X..|
|00002820| 20 20 70 6d 5f 75 73 61 | 67 65 28 75 73 61 67 65 |  pm_usa|ge(usage|
|00002830| 29 3b 0a 58 09 20 20 20 | 20 20 20 20 66 6f 72 20 |);.X.   |    for |
|00002840| 28 63 20 3d 20 61 72 67 | 76 5b 31 5d 3b 20 69 73 |(c = arg|v[1]; is|
|00002850| 64 69 67 69 74 28 2a 63 | 29 3b 20 63 2b 2b 29 3b |digit(*c|); c++);|
|00002860| 0a 58 09 20 20 20 20 20 | 20 20 69 66 20 28 63 5b |.X.     |  if (c[|
|00002870| 30 5d 20 3d 3d 20 27 70 | 27 20 26 26 20 63 5b 31 |0] == 'p|' && c[1|
|00002880| 5d 20 3d 3d 20 27 74 27 | 29 20 2f 2a 20 70 6f 69 |] == 't'|) /* poi|
|00002890| 6e 74 73 20 2a 2f 0a 58 | 09 09 20 20 2a 28 69 6e |nts */.X|..  *(in|
|000028a0| 74 20 2a 29 28 6f 70 74 | 69 6f 6e 73 5b 69 5d 2e |t *)(opt|ions[i].|
|000028b0| 76 61 6c 75 65 29 20 3d | 20 61 74 6f 69 28 61 72 |value) =| atoi(ar|
|000028c0| 67 76 5b 31 5d 29 2a 31 | 30 3b 0a 58 09 20 20 20 |gv[1])*1|0;.X.   |
|000028d0| 20 20 20 20 65 6c 73 65 | 20 69 66 20 28 63 5b 30 |    else| if (c[0|
|000028e0| 5d 20 3d 3d 20 27 64 27 | 20 26 26 20 63 5b 31 5d |] == 'd'| && c[1]|
|000028f0| 20 3d 3d 20 27 70 27 29 | 20 2f 2a 20 64 65 63 69 | == 'p')| /* deci|
|00002900| 70 6f 69 6e 74 73 20 2a | 2f 0a 58 09 09 20 20 2a |points *|/.X..  *|
|00002910| 28 69 6e 74 20 2a 29 28 | 6f 70 74 69 6f 6e 73 5b |(int *)(|options[|
|00002920| 69 5d 2e 76 61 6c 75 65 | 29 20 3d 20 61 74 6f 69 |i].value|) = atoi|
|00002930| 28 61 72 67 76 5b 31 5d | 29 3b 0a 58 09 20 20 20 |(argv[1]|);.X.   |
|00002940| 20 20 20 20 65 6c 73 65 | 20 69 66 20 28 63 5b 30 |    else| if (c[0|
|00002950| 5d 20 3d 3d 20 27 69 27 | 20 26 26 20 63 5b 31 5d |] == 'i'| && c[1]|
|00002960| 20 3d 3d 20 27 6e 27 29 | 20 2f 2a 20 69 6e 63 68 | == 'n')| /* inch|
|00002970| 65 73 20 2a 2f 0a 58 09 | 09 20 20 2a 28 69 6e 74 |es */.X.|.  *(int|
|00002980| 20 2a 29 28 6f 70 74 69 | 6f 6e 73 5b 69 5d 2e 76 | *)(opti|ons[i].v|
|00002990| 61 6c 75 65 29 20 3d 20 | 61 74 6f 69 28 61 72 67 |alue) = |atoi(arg|
|000029a0| 76 5b 31 5d 29 2a 37 32 | 30 3b 0a 58 09 20 20 20 |v[1])*72|0;.X.   |
|000029b0| 20 20 20 20 65 6c 73 65 | 20 69 66 20 28 63 5b 30 |    else| if (c[0|
|000029c0| 5d 20 3d 3d 20 27 63 27 | 20 26 26 20 63 5b 31 5d |] == 'c'| && c[1]|
|000029d0| 20 3d 3d 20 27 6d 27 29 | 20 2f 2a 20 63 65 6e 74 | == 'm')| /* cent|
|000029e0| 69 6d 65 74 72 65 73 20 | 2a 2f 0a 58 09 09 20 20 |imetres |*/.X..  |
|000029f0| 2a 28 69 6e 74 20 2a 29 | 28 6f 70 74 69 6f 6e 73 |*(int *)|(options|
|00002a00| 5b 69 5d 2e 76 61 6c 75 | 65 29 20 3d 20 61 74 6f |[i].valu|e) = ato|
|00002a10| 69 28 61 72 67 76 5b 31 | 5d 29 2a 32 38 33 2e 34 |i(argv[1|])*283.4|
|00002a20| 36 34 35 37 3b 0a 58 09 | 20 20 20 20 20 20 20 65 |6457;.X.|       e|
|00002a30| 6c 73 65 20 69 66 20 28 | 21 63 5b 30 5d 29 20 2f |lse if (|!c[0]) /|
|00002a40| 2a 20 64 6f 74 73 20 2a | 2f 0a 58 09 09 20 20 2a |* dots *|/.X..  *|
|00002a50| 28 69 6e 74 20 2a 29 28 | 6f 70 74 69 6f 6e 73 5b |(int *)(|options[|
|00002a60| 69 5d 2e 76 61 6c 75 65 | 29 20 3d 20 61 74 6f 69 |i].value|) = atoi|
|00002a70| 28 61 72 67 76 5b 31 5d | 29 2a 34 3b 0a 58 09 20 |(argv[1]|)*4;.X. |
|00002a80| 20 20 20 20 20 20 65 6c | 73 65 0a 58 09 09 20 20 |      el|se.X..  |
|00002a90| 70 6d 5f 65 72 72 6f 72 | 28 22 69 6c 6c 65 67 61 |pm_error|("illega|
|00002aa0| 6c 20 75 6e 69 74 20 6f | 66 20 6d 65 61 73 75 72 |l unit o|f measur|
|00002ab0| 65 20 25 73 22 2c 20 63 | 29 3b 0a 58 09 20 20 20 |e %s", c|);.X.   |
|00002ac0| 20 20 20 20 62 72 65 61 | 6b 3b 0a 58 09 20 20 20 |    brea|k;.X.   |
|00002ad0| 20 63 61 73 65 20 52 45 | 41 4c 3a 0a 58 09 20 20 | case RE|AL:.X.  |
|00002ae0| 20 20 20 20 20 69 66 20 | 28 2b 2b 61 72 67 76 2c |     if |(++argv,|
|00002af0| 20 2d 2d 61 72 67 63 20 | 3d 3d 20 31 29 0a 58 09 | --argc |== 1).X.|
|00002b00| 09 20 20 70 6d 5f 75 73 | 61 67 65 28 75 73 61 67 |.  pm_us|age(usag|
|00002b10| 65 29 3b 0a 58 09 20 20 | 20 20 20 20 20 2a 28 64 |e);.X.  |     *(d|
|00002b20| 6f 75 62 6c 65 20 2a 29 | 28 6f 70 74 69 6f 6e 73 |ouble *)|(options|
|00002b30| 5b 69 5d 2e 76 61 6c 75 | 65 29 20 3d 20 61 74 6f |[i].valu|e) = ato|
|00002b40| 66 28 61 72 67 76 5b 31 | 5d 29 3b 0a 58 09 20 20 |f(argv[1|]);.X.  |
|00002b50| 20 20 20 20 20 62 72 65 | 61 6b 3b 0a 58 09 20 20 |     bre|ak;.X.  |
|00002b60| 20 20 63 61 73 65 20 42 | 4f 4f 4c 3a 0a 58 09 20 |  case B|OOL:.X. |
|00002b70| 20 20 20 20 20 20 2a 28 | 69 6e 74 20 2a 29 28 6f |      *(|int *)(o|
|00002b80| 70 74 69 6f 6e 73 5b 69 | 5d 2e 76 61 6c 75 65 29 |ptions[i|].value)|
|00002b90| 20 3d 20 31 3b 0a 58 09 | 20 20 20 20 20 20 20 62 | = 1;.X.|       b|
|00002ba0| 72 65 61 6b 3b 0a 58 09 | 20 20 20 20 7d 0a 58 09 |reak;.X.|    }.X.|
|00002bb0| 20 20 20 20 62 72 65 61 | 6b 3b 0a 58 09 20 7d 0a |    brea|k;.X. }.|
|00002bc0| 58 20 20 20 20 20 20 7d | 0a 58 20 20 20 20 20 20 |X      }|.X      |
|00002bd0| 69 66 20 28 69 20 3e 3d | 20 73 69 7a 65 6f 66 28 |if (i >=| sizeof(|
|00002be0| 6f 70 74 69 6f 6e 73 29 | 2f 73 69 7a 65 6f 66 28 |options)|/sizeof(|
|00002bf0| 73 74 72 75 63 74 20 6f | 70 74 69 6f 6e 73 29 29 |struct o|ptions))|
|00002c00| 0a 58 09 20 70 6d 5f 75 | 73 61 67 65 28 75 73 61 |.X. pm_u|sage(usa|
|00002c10| 67 65 29 3b 0a 58 20 20 | 20 20 20 20 61 72 67 76 |ge);.X  |    argv|
|00002c20| 2b 2b 3b 20 61 72 67 63 | 2d 2d 3b 0a 58 20 20 20 |++; argc|--;.X   |
|00002c30| 7d 0a 58 20 20 20 69 66 | 20 28 61 72 67 63 20 3e |}.X   if| (argc >|
|00002c40| 20 32 29 0a 58 20 20 20 | 20 20 20 70 6d 5f 75 73 | 2).X   |   pm_us|
|00002c50| 61 67 65 28 75 73 61 67 | 65 29 3b 0a 58 20 20 20 |age(usag|e);.X   |
|00002c60| 65 6c 73 65 20 69 66 20 | 28 61 72 67 63 20 3d 3d |else if |(argc ==|
|00002c70| 20 32 29 0a 58 20 20 20 | 20 20 20 69 66 64 20 3d | 2).X   |   ifd =|
|00002c80| 20 70 6d 5f 6f 70 65 6e | 72 28 61 72 67 76 5b 31 | pm_open|r(argv[1|
|00002c90| 5d 29 3b 0a 58 20 20 20 | 65 6c 73 65 0a 58 20 20 |]);.X   |else.X  |
|00002ca0| 20 20 20 20 69 66 64 20 | 3d 20 73 74 64 69 6e 20 |    ifd |= stdin |
|00002cb0| 3b 0a 58 0a 58 20 20 20 | 2f 2a 20 76 61 6c 69 64 |;.X.X   |/* valid|
|00002cc0| 61 74 65 20 61 72 67 75 | 6d 65 6e 74 73 20 2a 2f |ate argu|ments */|
|00002cd0| 0a 58 20 20 20 69 66 20 | 28 64 69 66 66 75 73 65 |.X   if |(diffuse|
|00002ce0| 2b 63 6c 75 73 74 65 72 | 2b 64 69 74 68 65 72 20 |+cluster|+dither |
|00002cf0| 3e 20 31 29 0a 58 20 20 | 20 20 20 20 70 6d 5f 65 |> 1).X  |    pm_e|
|00002d00| 72 72 6f 72 28 22 6f 6e | 6c 79 20 6f 6e 65 20 6f |rror("on|ly one o|
|00002d10| 66 20 2d 64 69 66 66 75 | 73 65 2c 20 2d 64 69 74 |f -diffu|se, -dit|
|00002d20| 68 65 72 20 61 6e 64 20 | 2d 63 6c 75 73 74 65 72 |her and |-cluster|
|00002d30| 20 6d 61 79 20 62 65 20 | 75 73 65 64 22 29 3b 0a | may be |used");.|
|00002d40| 58 20 20 20 72 65 6e 64 | 65 72 20 3d 20 64 69 66 |X   rend|er = dif|
|00002d50| 66 75 73 65 20 3f 20 34 | 20 3a 20 64 69 74 68 65 |fuse ? 4| : dithe|
|00002d60| 72 20 3f 20 33 20 3a 20 | 63 6c 75 73 74 65 72 20 |r ? 3 : |cluster |
|00002d70| 3f 20 37 20 3a 20 30 3b | 0a 58 0a 58 20 20 20 69 |? 7 : 0;|.X.X   i|
|00002d80| 66 20 28 78 73 69 7a 65 | 20 21 3d 20 30 2e 30 20 |f (xsize| != 0.0 |
|00002d90| 26 26 20 78 73 63 61 6c | 65 20 21 3d 20 30 2e 30 |&& xscal|e != 0.0|
|00002da0| 29 0a 58 20 20 20 20 20 | 20 70 6d 5f 65 72 72 6f |).X     | pm_erro|
|00002db0| 72 28 22 6f 6e 6c 79 20 | 6f 6e 65 20 6f 66 20 2d |r("only |one of -|
|00002dc0| 78 73 69 7a 65 20 61 6e | 64 20 2d 78 73 63 61 6c |xsize an|d -xscal|
|00002dd0| 65 20 6d 61 79 20 62 65 | 20 75 73 65 64 22 29 3b |e may be| used");|
|00002de0| 0a 58 0a 58 20 20 20 69 | 66 20 28 79 73 69 7a 65 |.X.X   i|f (ysize|
|00002df0| 20 21 3d 20 30 2e 30 20 | 26 26 20 79 73 63 61 6c | != 0.0 |&& yscal|
|00002e00| 65 20 21 3d 20 30 2e 30 | 29 0a 58 20 20 20 20 20 |e != 0.0|).X     |
|00002e10| 20 70 6d 5f 65 72 72 6f | 72 28 22 6f 6e 6c 79 20 | pm_erro|r("only |
|00002e20| 6f 6e 65 20 6f 66 20 2d | 79 73 69 7a 65 20 61 6e |one of -|ysize an|
|00002e30| 64 20 2d 79 73 63 61 6c | 65 20 6d 61 79 20 62 65 |d -yscal|e may be|
|00002e40| 20 75 73 65 64 22 29 3b | 0a 58 0a 58 20 20 20 70 | used");|.X.X   p|
|00002e50| 69 78 65 6c 73 20 3d 20 | 70 70 6d 5f 72 65 61 64 |ixels = |ppm_read|
|00002e60| 70 70 6d 28 20 69 66 64 | 2c 20 26 63 6f 6c 73 2c |ppm( ifd|, &cols,|
|00002e70| 20 26 72 6f 77 73 2c 20 | 26 6d 61 78 76 61 6c 20 | &rows, |&maxval |
|00002e80| 29 3b 0a 58 20 20 20 70 | 6d 5f 63 6c 6f 73 65 28 |);.X   p|m_close(|
|00002e90| 20 69 66 64 20 29 3b 0a | 58 0a 58 20 20 20 2f 2a | ifd );.|X.X   /*|
|00002ea0| 20 6c 69 6d 69 74 20 63 | 68 65 63 6b 73 20 2a 2f | limit c|hecks */|
|00002eb0| 0a 58 20 20 20 69 66 20 | 28 63 6f 6c 73 20 3e 20 |.X   if |(cols > |
|00002ec0| 50 43 4c 5f 4d 41 58 57 | 49 44 54 48 20 7c 7c 20 |PCL_MAXW|IDTH || |
|00002ed0| 72 6f 77 73 20 3e 20 50 | 43 4c 5f 4d 41 58 48 45 |rows > P|CL_MAXHE|
|00002ee0| 49 47 48 54 29 0a 58 20 | 20 20 20 20 20 70 6d 5f |IGHT).X |     pm_|
|00002ef0| 65 72 72 6f 72 28 22 69 | 6d 61 67 65 20 74 6f 6f |error("i|mage too|
|00002f00| 20 6c 61 72 67 65 3b 20 | 72 65 64 75 63 65 20 77 | large; |reduce w|
|00002f10| 69 74 68 20 70 70 6d 73 | 63 61 6c 65 22 29 3b 0a |ith ppms|cale");.|
|00002f20| 58 20 20 20 69 66 20 28 | 6d 61 78 76 61 6c 20 3e |X   if (|maxval >|
|00002f30| 20 50 43 4c 5f 4d 41 58 | 56 41 4c 29 0a 58 20 20 | PCL_MAX|VAL).X  |
|00002f40| 20 20 20 20 70 6d 5f 65 | 72 72 6f 72 28 22 63 6f |    pm_e|rror("co|
|00002f50| 6c 6f 75 72 20 72 61 6e | 67 65 20 74 6f 6f 20 6c |lour ran|ge too l|
|00002f60| 61 72 67 65 3b 20 72 65 | 64 75 63 65 20 77 69 74 |arge; re|duce wit|
|00002f70| 68 20 70 70 6d 63 73 63 | 61 6c 65 22 29 3b 0a 58 |h ppmcsc|ale");.X|
|00002f80| 0a 58 20 20 20 2f 2a 20 | 46 69 67 75 72 65 20 6f |.X   /* |Figure o|
|00002f90| 75 74 20 74 68 65 20 63 | 6f 6c 6f 72 6d 61 70 2e |ut the c|olormap.|
|00002fa0| 20 2a 2f 0a 58 20 20 20 | 66 70 72 69 6e 74 66 28 | */.X   |fprintf(|
|00002fb0| 20 73 74 64 65 72 72 2c | 20 22 28 43 6f 6d 70 75 | stderr,| "(Compu|
|00002fc0| 74 69 6e 67 20 63 6f 6c | 6f 72 6d 61 70 2e 2e 2e |ting col|ormap...|
|00002fd0| 22 20 29 3b 20 66 66 6c | 75 73 68 28 20 73 74 64 |" ); ffl|ush( std|
|00002fe0| 65 72 72 20 29 3b 0a 58 | 20 20 20 63 68 76 20 3d |err );.X|   chv =|
|00002ff0| 20 70 70 6d 5f 63 6f 6d | 70 75 74 65 63 6f 6c 6f | ppm_com|putecolo|
|00003000| 72 68 69 73 74 28 20 70 | 69 78 65 6c 73 2c 20 63 |rhist( p|ixels, c|
|00003010| 6f 6c 73 2c 20 72 6f 77 | 73 2c 20 4d 41 58 43 4f |ols, row|s, MAXCO|
|00003020| 4c 4f 52 53 2c 20 26 63 | 6f 6c 6f 75 72 73 20 29 |LORS, &c|olours )|
|00003030| 3b 0a 58 20 20 20 69 66 | 20 28 20 63 68 76 20 3d |;.X   if| ( chv =|
|00003040| 3d 20 28 63 6f 6c 6f 72 | 68 69 73 74 5f 76 65 63 |= (color|hist_vec|
|00003050| 74 6f 72 29 20 30 20 29 | 0a 58 20 20 20 20 20 20 |tor) 0 )|.X      |
|00003060| 70 6d 5f 65 72 72 6f 72 | 28 22 74 6f 6f 20 6d 61 |pm_error|("too ma|
|00003070| 6e 79 20 63 6f 6c 6f 75 | 72 73 3b 20 72 65 64 75 |ny colou|rs; redu|
|00003080| 63 65 20 77 69 74 68 20 | 70 70 6d 71 75 61 6e 74 |ce with |ppmquant|
|00003090| 22 2c 20 30 2c 30 2c 30 | 2c 30 2c 30 20 29 3b 0a |", 0,0,0|,0,0 );.|
|000030a0| 58 20 20 20 66 70 72 69 | 6e 74 66 28 20 73 74 64 |X   fpri|ntf( std|
|000030b0| 65 72 72 2c 20 22 20 20 | 44 6f 6e 65 2e 20 20 25 |err, "  |Done.  %|
|000030c0| 64 20 63 6f 6c 6f 72 73 | 20 66 6f 75 6e 64 2e 29 |d colors| found.)|
|000030d0| 5c 6e 22 2c 20 63 6f 6c | 6f 75 72 73 20 29 3b 0a |\n", col|ours );.|
|000030e0| 58 0a 58 20 20 20 2f 2a | 20 41 6e 64 20 6d 61 6b |X.X   /*| And mak|
|000030f0| 65 20 61 20 68 61 73 68 | 20 74 61 62 6c 65 20 66 |e a hash| table f|
|00003100| 6f 72 20 66 61 73 74 20 | 6c 6f 6f 6b 75 70 2e 20 |or fast |lookup. |
|00003110| 2a 2f 0a 58 20 20 20 63 | 68 74 20 3d 20 70 70 6d |*/.X   c|ht = ppm|
|00003120| 5f 63 6f 6c 6f 72 68 69 | 73 74 74 6f 63 6f 6c 6f |_colorhi|sttocolo|
|00003130| 72 68 61 73 68 28 20 63 | 68 76 2c 20 63 6f 6c 6f |rhash( c|hv, colo|
|00003140| 75 72 73 20 29 3b 0a 58 | 0a 58 20 20 20 2f 2a 20 |urs );.X|.X   /* |
|00003150| 77 6f 72 6b 20 6f 75 74 | 20 63 6f 6c 6f 75 72 20 |work out| colour |
|00003160| 64 6f 77 6e 6c 6f 61 64 | 69 6e 67 20 6d 6f 64 65 |download|ing mode|
|00003170| 20 2a 2f 0a 58 20 20 20 | 69 6e 64 65 78 20 3d 20 | */.X   |index = |
|00003180| 62 69 74 73 70 65 72 70 | 69 78 65 6c 28 63 6f 6c |bitsperp|ixel(col|
|00003190| 6f 75 72 73 29 3b 0a 58 | 20 20 20 69 66 20 28 69 |ours);.X|   if (i|
|000031a0| 6e 64 65 78 20 3e 20 38 | 29 20 2f 2a 20 63 61 6e |ndex > 8|) /* can|
|000031b0| 27 74 20 75 73 65 20 69 | 6e 64 65 78 65 64 20 6d |'t use i|ndexed m|
|000031c0| 6f 64 65 20 2a 2f 0a 58 | 20 20 20 20 20 20 69 6e |ode */.X|      in|
|000031d0| 64 65 78 20 3d 20 30 3b | 0a 58 20 20 20 65 6c 73 |dex = 0;|.X   els|
|000031e0| 65 0a 58 20 20 20 20 20 | 20 73 77 69 74 63 68 20 |e.X     | switch |
|000031f0| 28 69 6e 64 65 78 29 20 | 7b 20 2f 2a 20 72 6f 75 |(index) |{ /* rou|
|00003200| 6e 64 20 75 70 20 74 6f | 20 31 2c 32 2c 34 2c 38 |nd up to| 1,2,4,8|
|00003210| 20 2a 2f 0a 58 20 20 20 | 20 20 20 63 61 73 65 20 | */.X   |   case |
|00003220| 30 3a 20 2f 2a 20 64 69 | 72 65 63 74 20 6d 6f 64 |0: /* di|rect mod|
|00003230| 65 20 28 6e 6f 20 70 61 | 6c 65 74 74 65 29 20 2a |e (no pa|lette) *|
|00003240| 2f 0a 58 09 20 62 70 70 | 20 3d 20 62 69 74 73 70 |/.X. bpp| = bitsp|
|00003250| 65 72 70 69 78 65 6c 28 | 6d 61 78 76 61 6c 29 3b |erpixel(|maxval);|
|00003260| 20 2f 2a 20 62 69 74 73 | 20 70 65 72 20 70 69 78 | /* bits| per pix|
|00003270| 65 6c 20 2a 2f 0a 58 09 | 20 62 70 67 20 3d 20 62 |el */.X.| bpg = b|
|00003280| 70 70 3b 20 62 70 62 20 | 3d 20 62 70 70 3b 0a 58 |pp; bpb |= bpp;.X|
|00003290| 09 20 62 70 70 20 3d 20 | 28 62 70 70 2a 33 2b 37 |. bpp = |(bpp*3+7|
|000032a0| 29 3e 3e 33 3b 20 20 20 | 20 20 2f 2a 20 62 79 74 |)>>3;   |  /* byt|
|000032b0| 65 73 20 70 65 72 20 70 | 69 78 65 6c 20 6e 6f 77 |es per p|ixel now|
|000032c0| 20 2a 2f 0a 58 09 20 62 | 70 72 20 3d 20 28 62 70 | */.X. b|pr = (bp|
|000032d0| 70 3c 3c 33 29 2d 62 70 | 67 2d 62 70 62 3b 20 0a |p<<3)-bp|g-bpb; .|
|000032e0| 58 09 20 62 70 70 20 2a | 3d 20 63 6f 6c 73 3b 20 |X. bpp *|= cols; |
|000032f0| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 62 79 |        |   /* by|
|00003300| 74 65 73 20 70 65 72 20 | 72 6f 77 20 6e 6f 77 20 |tes per |row now |
|00003310| 2a 2f 0a 58 09 20 62 72 | 65 61 6b 3b 0a 58 20 20 |*/.X. br|eak;.X  |
|00003320| 20 20 20 20 63 61 73 65 | 20 35 3a 20 20 20 20 20 |    case| 5:     |
|00003330| 20 20 20 20 69 6e 64 65 | 78 2b 2b 3b 0a 58 20 20 |    inde|x++;.X  |
|00003340| 20 20 20 20 63 61 73 65 | 20 36 3a 20 20 20 20 20 |    case| 6:     |
|00003350| 20 20 20 20 69 6e 64 65 | 78 2b 2b 3b 0a 58 20 20 |    inde|x++;.X  |
|00003360| 20 20 20 20 63 61 73 65 | 20 33 3a 20 63 61 73 65 |    case| 3: case|
|00003370| 20 37 3a 20 69 6e 64 65 | 78 2b 2b 3b 0a 58 20 20 | 7: inde|x++;.X  |
|00003380| 20 20 20 20 64 65 66 61 | 75 6c 74 3a 0a 58 09 20 |    defa|ult:.X. |
|00003390| 62 70 70 20 3d 20 38 2f | 69 6e 64 65 78 3b 0a 58 |bpp = 8/|index;.X|
|000033a0| 09 20 62 70 70 20 3d 20 | 28 63 6f 6c 73 2b 62 70 |. bpp = |(cols+bp|
|000033b0| 70 2d 31 29 2f 62 70 70 | 3b 20 20 20 20 20 20 2f |p-1)/bpp|;      /|
|000033c0| 2a 20 62 79 74 65 73 20 | 70 65 72 20 72 6f 77 20 |* bytes |per row |
|000033d0| 2a 2f 0a 58 20 20 20 20 | 20 20 7d 0a 58 0a 58 20 |*/.X    |  }.X.X |
|000033e0| 20 20 69 66 20 28 28 69 | 6e 72 6f 77 20 3d 20 28 |  if ((i|nrow = (|
|000033f0| 63 68 61 72 20 2a 29 6d | 61 6c 6c 6f 63 28 28 75 |char *)m|alloc((u|
|00003400| 6e 73 69 67 6e 65 64 29 | 62 70 70 29 29 20 3d 3d |nsigned)|bpp)) ==|
|00003410| 20 4e 55 4c 4c 20 7c 7c | 0a 58 20 20 20 20 20 20 | NULL |||.X      |
|00003420| 20 28 6f 75 74 72 6f 77 | 20 3d 20 28 63 68 61 72 | (outrow| = (char|
|00003430| 20 2a 29 6d 61 6c 6c 6f | 63 28 28 75 6e 73 69 67 | *)mallo|c((unsig|
|00003440| 6e 65 64 29 62 70 70 2a | 32 29 29 20 3d 3d 20 4e |ned)bpp*|2)) == N|
|00003450| 55 4c 4c 20 7c 7c 0a 58 | 20 20 20 20 20 20 20 28 |ULL ||.X|       (|
|00003460| 72 75 6e 63 6e 74 20 3d | 20 28 2f 2a 73 69 67 6e |runcnt =| (/*sign|
|00003470| 65 64 2a 2f 20 63 68 61 | 72 20 2a 29 6d 61 6c 6c |ed*/ cha|r *)mall|
|00003480| 6f 63 28 28 75 6e 73 69 | 67 6e 65 64 29 62 70 70 |oc((unsi|gned)bpp|
|00003490| 29 29 20 3d 3d 20 4e 55 | 4c 4c 29 0a 58 20 20 20 |)) == NU|LL).X   |
|000034a0| 20 20 20 70 6d 5f 65 72 | 72 6f 72 28 22 63 61 6e |   pm_er|ror("can|
|000034b0| 27 74 20 61 6c 6c 6f 63 | 61 74 65 20 73 70 61 63 |'t alloc|ate spac|
|000034c0| 65 20 66 6f 72 20 72 6f | 77 22 2c 20 30 2c 30 2c |e for ro|w", 0,0,|
|000034d0| 30 2c 30 2c 30 29 3b 0a | 58 0a 58 20 20 20 2f 2a |0,0,0);.|X.X   /*|
|000034e0| 20 73 65 74 20 75 70 20 | 69 6d 61 67 65 20 64 65 | set up |image de|
|000034f0| 74 61 69 6c 73 20 2a 2f | 0a 58 20 20 20 69 66 20 |tails */|.X   if |
|00003500| 28 78 73 63 61 6c 65 20 | 21 3d 20 30 2e 30 29 0a |(xscale |!= 0.0).|
|00003510| 58 20 20 20 20 20 20 78 | 73 69 7a 65 20 3d 20 63 |X      x|size = c|
|00003520| 6f 6c 73 20 2a 20 78 73 | 63 61 6c 65 20 2a 20 34 |ols * xs|cale * 4|
|00003530| 3b 0a 58 20 20 20 69 66 | 20 28 79 73 63 61 6c 65 |;.X   if| (yscale|
|00003540| 20 21 3d 20 30 2e 30 29 | 0a 58 20 20 20 20 20 20 | != 0.0)|.X      |
|00003550| 79 73 69 7a 65 20 3d 20 | 72 6f 77 73 20 2a 20 79 |ysize = |rows * y|
|00003560| 73 63 61 6c 65 20 2a 20 | 34 3b 0a 58 0a 58 23 69 |scale * |4;.X.X#i|
|00003570| 66 64 65 66 20 44 45 42 | 55 47 0a 58 20 20 20 66 |fdef DEB|UG.X   f|
|00003580| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00003590| 64 61 72 6b 20 20 20 20 | 3d 25 64 5c 6e 22 2c 20 |dark    |=%d\n", |
|000035a0| 64 61 72 6b 29 3b 0a 58 | 20 20 20 66 70 72 69 6e |dark);.X|   fprin|
|000035b0| 74 66 28 73 74 64 65 72 | 72 2c 20 22 64 69 66 66 |tf(stder|r, "diff|
|000035c0| 75 73 65 20 3d 25 64 5c | 6e 22 2c 20 64 69 66 66 |use =%d\|n", diff|
|000035d0| 75 73 65 29 3b 0a 58 20 | 20 20 66 70 72 69 6e 74 |use);.X |  fprint|
|000035e0| 66 28 73 74 64 65 72 72 | 2c 20 22 64 69 74 68 65 |f(stderr|, "dithe|
|000035f0| 72 20 20 3d 25 64 5c 6e | 22 2c 20 64 69 74 68 65 |r  =%d\n|", dithe|
|00003600| 72 29 3b 0a 58 20 20 20 | 66 70 72 69 6e 74 66 28 |r);.X   |fprintf(|
|00003610| 73 74 64 65 72 72 2c 20 | 22 63 6c 75 73 74 65 72 |stderr, |"cluster|
|00003620| 20 3d 25 64 5c 6e 22 2c | 20 63 6c 75 73 74 65 72 | =%d\n",| cluster|
|00003630| 29 3b 0a 58 20 20 20 66 | 70 72 69 6e 74 66 28 73 |);.X   f|printf(s|
|00003640| 74 64 65 72 72 2c 20 22 | 71 75 61 6c 69 74 79 20 |tderr, "|quality |
|00003650| 3d 25 64 5c 6e 22 2c 20 | 71 75 61 6c 69 74 79 29 |=%d\n", |quality)|
|00003660| 3b 0a 58 20 20 20 66 70 | 72 69 6e 74 66 28 73 74 |;.X   fp|rintf(st|
|00003670| 64 65 72 72 2c 20 22 78 | 73 69 7a 65 20 20 20 3d |derr, "x|size   =|
|00003680| 25 64 5c 6e 22 2c 20 78 | 73 69 7a 65 29 3b 0a 58 |%d\n", x|size);.X|
|00003690| 20 20 20 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |   fprin|tf(stder|
|000036a0| 72 2c 20 22 79 73 69 7a | 65 20 20 20 3d 25 64 5c |r, "ysiz|e   =%d\|
|000036b0| 6e 22 2c 20 79 73 69 7a | 65 29 3b 0a 58 20 20 20 |n", ysiz|e);.X   |
|000036c0| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|000036d0| 22 78 73 68 69 66 74 20 | 20 3d 25 64 5c 6e 22 2c |"xshift | =%d\n",|
|000036e0| 20 78 73 68 69 66 74 29 | 3b 0a 58 20 20 20 66 70 | xshift)|;.X   fp|
|000036f0| 72 69 6e 74 66 28 73 74 | 64 65 72 72 2c 20 22 79 |rintf(st|derr, "y|
|00003700| 73 68 69 66 74 20 20 3d | 25 64 5c 6e 22 2c 20 79 |shift  =|%d\n", y|
|00003710| 73 68 69 66 74 29 3b 0a | 58 20 20 20 66 70 72 69 |shift);.|X   fpri|
|00003720| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 78 73 63 |ntf(stde|rr, "xsc|
|00003730| 61 6c 65 20 20 3d 25 6c | 66 5c 6e 22 2c 20 78 73 |ale  =%l|f\n", xs|
|00003740| 63 61 6c 65 29 3b 0a 58 | 20 20 20 66 70 72 69 6e |cale);.X|   fprin|
|00003750| 74 66 28 73 74 64 65 72 | 72 2c 20 22 79 73 63 61 |tf(stder|r, "ysca|
|00003760| 6c 65 20 20 3d 25 6c 66 | 5c 6e 22 2c 20 79 73 63 |le  =%lf|\n", ysc|
|00003770| 61 6c 65 29 3b 0a 58 20 | 20 20 66 70 72 69 6e 74 |ale);.X |  fprint|
|00003780| 66 28 73 74 64 65 72 72 | 2c 20 22 67 61 6d 6d 61 |f(stderr|, "gamma|
|00003790| 20 20 20 3d 25 6c 66 5c | 6e 22 2c 20 67 61 6d 6d |   =%lf\|n", gamm|
|000037a0| 61 29 3b 0a 58 20 20 20 | 66 70 72 69 6e 74 66 28 |a);.X   |fprintf(|
|000037b0| 73 74 64 65 72 72 2c 20 | 22 69 6e 64 65 78 20 20 |stderr, |"index  |
|000037c0| 20 3d 25 64 5c 6e 22 2c | 20 69 6e 64 65 78 29 3b | =%d\n",| index);|
|000037d0| 0a 58 20 20 20 66 70 72 | 69 6e 74 66 28 73 74 64 |.X   fpr|intf(std|
|000037e0| 65 72 72 2c 20 22 6e 6f | 70 61 63 6b 20 20 3d 25 |err, "no|pack  =%|
|000037f0| 64 5c 6e 22 2c 20 6e 6f | 70 61 63 6b 29 3b 0a 58 |d\n", no|pack);.X|
|00003800| 23 65 6e 64 69 66 0a 58 | 0a 58 20 20 20 2f 2a 20 |#endif.X|.X   /* |
|00003810| 77 72 69 74 65 20 50 43 | 4c 20 68 65 61 64 65 72 |write PC|L header|
|00003820| 20 2a 2f 0a 58 2f 2a 20 | 20 20 70 72 69 6e 74 66 | */.X/* |  printf|
|00003830| 28 22 5c 30 33 33 26 6c | 32 36 41 22 29 3b 20 20 |("\033&l|26A");  |
|00003840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003850| 20 20 20 20 20 20 20 2f | 2a 20 70 61 70 65 72 20 |       /|* paper |
|00003860| 73 69 7a 65 20 2a 2f 0a | 58 20 20 20 70 72 69 6e |size */.|X   prin|
|00003870| 74 66 28 22 5c 30 33 33 | 2a 72 25 64 73 25 64 54 |tf("\033|*r%ds%dT|
|00003880| 22 2c 20 63 6f 6c 73 2c | 20 72 6f 77 73 29 3b 20 |", cols,| rows); |
|00003890| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 73 6f 75 72 |        | /* sour|
|000038a0| 63 65 20 77 69 64 74 68 | 2c 20 68 65 69 67 68 74 |ce width|, height|
|000038b0| 20 2a 2f 0a 58 20 20 20 | 69 66 20 28 78 73 68 69 | */.X   |if (xshi|
|000038c0| 66 74 20 21 3d 20 30 20 | 7c 7c 20 79 73 68 69 66 |ft != 0 ||| yshif|
|000038d0| 74 20 21 3d 20 30 29 0a | 58 20 20 20 20 20 20 70 |t != 0).|X      p|
|000038e0| 72 69 6e 74 66 28 22 5c | 30 33 33 26 61 25 2b 64 |rintf("\|033&a%+d|
|000038f0| 68 25 2b 64 56 22 2c 20 | 78 73 68 69 66 74 2c 20 |h%+dV", |xshift, |
|00003900| 79 73 68 69 66 74 29 3b | 20 2f 2a 20 78 73 68 69 |yshift);| /* xshi|
|00003910| 66 74 2c 20 79 73 68 69 | 66 74 20 2a 2f 0a 58 20 |ft, yshi|ft */.X |
|00003920| 20 20 69 66 20 28 71 75 | 61 6c 69 74 79 29 0a 58 |  if (qu|ality).X|
|00003930| 20 20 20 20 20 20 70 72 | 69 6e 74 66 28 22 5c 30 |      pr|intf("\0|
|00003940| 33 33 2a 6f 25 64 51 22 | 2c 20 71 75 61 6c 69 74 |33*o%dQ"|, qualit|
|00003950| 79 29 3b 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |y);     |        |
|00003960| 2f 2a 20 70 72 69 6e 74 | 20 71 75 61 6c 69 74 79 |/* print| quality|
|00003970| 20 2a 2f 0a 58 20 20 20 | 70 72 69 6e 74 66 28 22 | */.X   |printf("|
|00003980| 5c 30 33 33 2a 74 22 29 | 3b 0a 58 20 20 20 69 66 |\033*t")|;.X   if|
|00003990| 20 28 78 73 69 7a 65 20 | 3d 3d 20 30 20 26 26 20 | (xsize |== 0 && |
|000039a0| 79 73 69 7a 65 20 3d 3d | 20 30 29 0a 58 20 20 20 |ysize ==| 0).X   |
|000039b0| 20 20 20 70 72 69 6e 74 | 66 28 22 31 38 30 72 22 |   print|f("180r"|
|000039c0| 29 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |);      |        |
|000039d0| 20 20 20 20 20 2f 2a 20 | 72 65 73 6f 6c 75 74 69 |     /* |resoluti|
|000039e0| 6f 6e 20 2a 2f 0a 58 20 | 20 20 65 6c 73 65 20 7b |on */.X |  else {|
|000039f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003a00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2f |        |       /|
|00003a10| 2a 20 64 65 73 74 69 6e | 61 74 69 6f 6e 20 77 69 |* destin|ation wi|
|00003a20| 64 74 68 2c 20 68 65 69 | 67 68 74 20 2a 2f 0a 58 |dth, hei|ght */.X|
|00003a30| 20 20 20 20 20 20 69 66 | 20 28 78 73 69 7a 65 20 |      if| (xsize |
|00003a40| 21 3d 20 30 29 0a 58 09 | 20 70 72 69 6e 74 66 28 |!= 0).X.| printf(|
|00003a50| 22 25 64 68 22 2c 20 78 | 73 69 7a 65 29 3b 0a 58 |"%dh", x|size);.X|
|00003a60| 20 20 20 20 20 20 69 66 | 20 28 79 73 69 7a 65 20 |      if| (ysize |
|00003a70| 21 3d 20 30 29 0a 58 09 | 20 70 72 69 6e 74 66 28 |!= 0).X.| printf(|
|00003a80| 22 25 64 76 22 2c 20 79 | 73 69 7a 65 29 3b 0a 58 |"%dv", y|size);.X|
|00003a90| 20 20 20 7d 0a 58 20 20 | 20 69 66 20 28 67 61 6d |   }.X  | if (gam|
|00003aa0| 6d 61 20 21 3d 20 30 29 | 0a 58 20 20 20 20 20 20 |ma != 0)|.X      |
|00003ab0| 70 72 69 6e 74 66 28 22 | 25 2e 33 6c 66 69 22 2c |printf("|%.3lfi",|
|00003ac0| 20 67 61 6d 6d 61 29 3b | 20 20 20 20 20 20 20 20 | gamma);|        |
|00003ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 2f 2a 20 67 |        |    /* g|
|00003ae0| 61 6d 6d 61 20 63 6f 72 | 72 65 63 74 69 6f 6e 20 |amma cor|rection |
|00003af0| 2a 2f 0a 58 20 20 20 69 | 66 20 28 64 61 72 6b 29 |*/.X   i|f (dark)|
|00003b00| 0a 58 20 20 20 20 20 20 | 70 72 69 6e 74 66 28 22 |.X      |printf("|
|00003b10| 25 64 6b 22 2c 20 64 61 | 72 6b 29 3b 20 20 20 20 |%dk", da|rk);    |
|00003b20| 20 20 20 20 20 20 20 20 | 20 20 2f 2a 20 73 63 61 |        |  /* sca|
|00003b30| 6c 69 6e 67 20 61 6c 67 | 6f 72 69 74 68 6d 73 20 |ling alg|orithms |
|00003b40| 2a 2f 0a 58 20 20 20 70 | 72 69 6e 74 66 28 22 25 |*/.X   p|rintf("%|
|00003b50| 64 4a 22 2c 20 72 65 6e | 64 65 72 29 3b 20 20 20 |dJ", ren|der);   |
|00003b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 2f 2a 20 72 |        |    /* r|
|00003b70| 65 6e 64 65 72 69 6e 67 | 20 61 6c 67 6f 72 69 74 |endering| algorit|
|00003b80| 68 6d 20 2a 2f 0a 58 20 | 20 20 70 72 69 6e 74 66 |hm */.X |  printf|
|00003b90| 28 22 5c 30 33 33 2a 76 | 31 38 57 22 29 3b 20 20 |("\033*v|18W");  |
|00003ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003bb0| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 63 6f 6e 66 |        | /* conf|
|00003bc0| 69 67 75 72 65 20 69 6d | 61 67 65 20 64 61 74 61 |igure im|age data|
|00003bd0| 20 2a 2f 0a 58 20 20 20 | 20 20 20 70 75 74 63 68 | */.X   |   putch|
|00003be0| 61 72 28 30 29 3b 20 2f | 2a 20 72 65 6c 61 74 69 |ar(0); /|* relati|
|00003bf0| 76 65 20 63 6f 6c 6f 75 | 72 73 20 2a 2f 0a 58 20 |ve colou|rs */.X |
|00003c00| 20 20 20 20 20 70 75 74 | 63 68 61 72 28 69 6e 64 |     put|char(ind|
|00003c10| 65 78 20 3f 20 31 20 3a | 20 33 29 3b 20 2f 2a 20 |ex ? 1 :| 3); /* |
|00003c20| 69 6e 64 65 78 2f 64 69 | 72 65 63 74 20 70 69 78 |index/di|rect pix|
|00003c30| 65 6c 20 6d 6f 64 65 20 | 2a 2f 0a 58 20 20 20 20 |el mode |*/.X    |
|00003c40| 20 20 70 75 74 63 68 61 | 72 28 69 6e 64 65 78 29 |  putcha|r(index)|
|00003c50| 3b 20 2f 2a 20 69 67 6e | 6f 72 65 64 20 69 6e 20 |; /* ign|ored in |
|00003c60| 64 69 72 65 63 74 20 70 | 69 78 65 6c 20 6d 6f 64 |direct p|ixel mod|
|00003c70| 65 20 2a 2f 0a 58 20 20 | 20 20 20 20 69 66 20 28 |e */.X  |    if (|
|00003c80| 69 6e 64 65 78 29 20 7b | 0a 58 09 20 70 75 74 63 |index) {|.X. putc|
|00003c90| 68 61 72 28 30 29 3b 0a | 58 09 20 70 75 74 63 68 |har(0);.|X. putch|
|00003ca0| 61 72 28 30 29 3b 0a 58 | 09 20 70 75 74 63 68 61 |ar(0);.X|. putcha|
|00003cb0| 72 28 30 29 3b 0a 58 20 | 20 20 20 20 20 7d 20 65 |r(0);.X |     } e|
|00003cc0| 6c 73 65 20 7b 0a 58 09 | 20 70 75 74 63 68 61 72 |lse {.X.| putchar|
|00003cd0| 28 62 70 72 29 3b 20 2f | 2a 20 62 69 74 73 20 70 |(bpr); /|* bits p|
|00003ce0| 65 72 20 72 65 64 20 2a | 2f 0a 58 09 20 70 75 74 |er red *|/.X. put|
|00003cf0| 63 68 61 72 28 62 70 67 | 29 3b 20 2f 2a 20 62 69 |char(bpg|); /* bi|
|00003d00| 74 73 20 70 65 72 20 67 | 72 65 65 6e 20 2a 2f 0a |ts per g|reen */.|
|00003d10| 58 09 20 70 75 74 63 68 | 61 72 28 62 70 62 29 3b |X. putch|ar(bpb);|
|00003d20| 20 2f 2a 20 62 69 74 73 | 20 70 65 72 20 62 6c 75 | /* bits| per blu|
|00003d30| 65 20 2a 2f 0a 58 20 20 | 20 20 20 20 7d 0a 58 20 |e */.X  |    }.X |
|00003d40| 20 20 20 20 20 70 75 74 | 77 6f 72 64 28 6d 61 78 |     put|word(max|
|00003d50| 76 61 6c 29 3b 20 2f 2a | 20 6d 61 78 20 72 65 64 |val); /*| max red|
|00003d60| 20 72 65 66 65 72 65 6e | 63 65 20 2a 2f 0a 58 20 | referen|ce */.X |
|00003d70| 20 20 20 20 20 70 75 74 | 77 6f 72 64 28 6d 61 78 |     put|word(max|
|00003d80| 76 61 6c 29 3b 20 2f 2a | 20 6d 61 78 20 67 72 65 |val); /*| max gre|
|00003d90| 65 6e 20 72 65 66 65 72 | 65 6e 63 65 20 2a 2f 0a |en refer|ence */.|
|00003da0| 58 20 20 20 20 20 20 70 | 75 74 77 6f 72 64 28 6d |X      p|utword(m|
|00003db0| 61 78 76 61 6c 29 3b 20 | 2f 2a 20 6d 61 78 20 62 |axval); |/* max b|
|00003dc0| 6c 75 65 20 72 65 66 65 | 72 65 6e 63 65 20 2a 2f |lue refe|rence */|
|00003dd0| 0a 58 20 20 20 20 20 20 | 70 75 74 77 6f 72 64 28 |.X      |putword(|
|00003de0| 30 29 3b 20 2f 2a 20 6d | 69 6e 20 72 65 64 20 72 |0); /* m|in red r|
|00003df0| 65 66 65 72 65 6e 63 65 | 20 2a 2f 0a 58 20 20 20 |eference| */.X   |
|00003e00| 20 20 20 70 75 74 77 6f | 72 64 28 30 29 3b 20 2f |   putwo|rd(0); /|
|00003e10| 2a 20 6d 69 6e 20 67 72 | 65 65 6e 20 72 65 66 65 |* min gr|een refe|
|00003e20| 72 65 6e 63 65 20 2a 2f | 0a 58 20 20 20 20 20 20 |rence */|.X      |
|00003e30| 70 75 74 77 6f 72 64 28 | 30 29 3b 20 2f 2a 20 6d |putword(|0); /* m|
|00003e40| 69 6e 20 62 6c 75 65 20 | 72 65 66 65 72 65 6e 63 |in blue |referenc|
|00003e50| 65 20 2a 2f 0a 58 20 20 | 20 69 66 20 28 69 6e 64 |e */.X  | if (ind|
|00003e60| 65 78 29 20 7b 20 20 20 | 20 20 20 20 20 20 20 20 |ex) {   |        |
|00003e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2a 20 |        |     /* |
|00003e80| 73 65 74 20 70 61 6c 65 | 74 74 65 20 2a 2f 0a 58 |set pale|tte */.X|
|00003e90| 20 20 20 20 20 20 66 6f | 72 20 28 69 20 3d 20 30 |      fo|r (i = 0|
|00003ea0| 3b 20 69 20 3c 20 63 6f | 6c 6f 75 72 73 3b 20 69 |; i < co|lours; i|
|00003eb0| 2b 2b 29 20 7b 0a 58 09 | 20 69 6e 74 20 72 2c 20 |++) {.X.| int r, |
|00003ec0| 67 2c 20 62 3b 0a 58 09 | 20 72 20 3d 20 50 50 4d |g, b;.X.| r = PPM|
|00003ed0| 5f 47 45 54 52 28 20 63 | 68 76 5b 69 5d 2e 63 6f |_GETR( c|hv[i].co|
|00003ee0| 6c 6f 72 20 29 3b 0a 58 | 09 20 67 20 3d 20 50 50 |lor );.X|. g = PP|
|00003ef0| 4d 5f 47 45 54 47 28 20 | 63 68 76 5b 69 5d 2e 63 |M_GETG( |chv[i].c|
|00003f00| 6f 6c 6f 72 20 29 3b 0a | 58 09 20 62 20 3d 20 50 |olor );.|X. b = P|
|00003f10| 50 4d 5f 47 45 54 42 28 | 20 63 68 76 5b 69 5d 2e |PM_GETB(| chv[i].|
|00003f20| 63 6f 6c 6f 72 20 29 3b | 0a 58 09 20 69 66 20 28 |color );|.X. if (|
|00003f30| 69 20 3d 3d 20 30 29 0a | 58 09 20 20 20 20 70 72 |i == 0).|X.    pr|
|00003f40| 69 6e 74 66 28 22 5c 30 | 33 33 2a 76 22 29 3b 0a |intf("\0|33*v");.|
|00003f50| 58 09 20 69 66 20 28 72 | 29 0a 58 09 20 20 20 20 |X. if (r|).X.    |
|00003f60| 70 72 69 6e 74 66 28 22 | 25 64 61 22 2c 20 72 29 |printf("|%da", r)|
|00003f70| 3b 0a 58 09 20 69 66 20 | 28 67 29 0a 58 09 20 20 |;.X. if |(g).X.  |
|00003f80| 20 20 70 72 69 6e 74 66 | 28 22 25 64 62 22 2c 20 |  printf|("%db", |
|00003f90| 67 29 3b 0a 58 09 20 69 | 66 20 28 62 29 0a 58 09 |g);.X. i|f (b).X.|
|00003fa0| 20 20 20 20 70 72 69 6e | 74 66 28 22 25 64 63 22 |    prin|tf("%dc"|
|00003fb0| 2c 20 62 29 3b 0a 58 09 | 20 69 66 20 28 69 20 3d |, b);.X.| if (i =|
|00003fc0| 3d 20 63 6f 6c 6f 75 72 | 73 2d 31 29 0a 58 09 20 |= colour|s-1).X. |
|00003fd0| 20 20 20 70 72 69 6e 74 | 66 28 22 25 64 49 22 2c |   print|f("%dI",|
|00003fe0| 20 69 29 3b 20 20 20 20 | 2f 2a 20 61 73 73 69 67 | i);    |/* assig|
|00003ff0| 6e 20 63 6f 6c 6f 75 72 | 20 69 6e 64 65 78 20 2a |n colour| index *|
|00004000| 2f 0a 58 09 20 65 6c 73 | 65 0a 58 09 20 20 20 20 |/.X. els|e.X.    |
|00004010| 70 72 69 6e 74 66 28 22 | 25 64 69 22 2c 20 69 29 |printf("|%di", i)|
|00004020| 3b 20 20 20 20 2f 2a 20 | 61 73 73 69 67 6e 20 63 |;    /* |assign c|
|00004030| 6f 6c 6f 75 72 20 69 6e | 64 65 78 20 2a 2f 0a 58 |olour in|dex */.X|
|00004040| 20 20 20 20 20 20 7d 0a | 58 20 20 20 7d 0a 58 20 |      }.|X   }.X |
|00004050| 20 20 70 70 6d 5f 66 72 | 65 65 63 6f 6c 6f 72 68 |  ppm_fr|eecolorh|
|00004060| 69 73 74 28 20 63 68 76 | 20 29 3b 0a 58 0a 58 20 |ist( chv| );.X.X |
|00004070| 20 20 2f 2a 20 73 74 61 | 72 74 20 72 61 73 74 65 |  /* sta|rt raste|
|00004080| 72 20 67 72 61 70 68 69 | 63 73 20 61 74 20 43 41 |r graphi|cs at CA|
|00004090| 50 20 2a 2f 0a 58 20 20 | 20 70 72 69 6e 74 66 28 |P */.X  | printf(|
|000040a0| 22 5c 30 33 33 2a 72 25 | 64 41 22 2c 20 28 78 73 |"\033*r%|dA", (xs|
|000040b0| 69 7a 65 20 21 3d 20 30 | 20 7c 7c 20 79 73 69 7a |ize != 0| || ysiz|
|000040c0| 65 20 21 3d 20 30 29 20 | 3f 20 33 20 3a 20 31 29 |e != 0) |? 3 : 1)|
|000040d0| 3b 0a 58 0a 58 20 20 20 | 66 6f 72 20 28 72 6f 77 |;.X.X   |for (row|
|000040e0| 20 3d 20 30 3b 20 72 6f | 77 20 3c 20 72 6f 77 73 | = 0; ro|w < rows|
|000040f0| 3b 20 72 6f 77 2b 2b 29 | 20 7b 0a 58 20 20 20 20 |; row++)| {.X    |
|00004100| 20 20 69 66 20 28 69 6e | 64 65 78 29 20 7b 20 2f |  if (in|dex) { /|
|00004110| 2a 20 69 6e 64 65 78 65 | 64 20 63 6f 6c 6f 75 72 |* indexe|d colour|
|00004120| 20 6d 6f 64 65 20 2a 2f | 0a 58 09 20 69 6e 74 20 | mode */|.X. int |
|00004130| 6f 75 74 2c 20 63 6e 74 | 3b 0a 58 09 20 6f 75 74 |out, cnt|;.X. out|
|00004140| 20 3d 20 63 6e 74 20 3d | 20 30 3b 0a 58 09 20 66 | = cnt =| 0;.X. f|
|00004150| 6f 72 20 28 63 6f 6c 20 | 3d 20 30 2c 20 70 69 78 |or (col |= 0, pix|
|00004160| 72 6f 77 3d 70 69 78 65 | 6c 73 5b 72 6f 77 5d 3b |row=pixe|ls[row];|
|00004170| 20 63 6f 6c 20 3c 20 63 | 6f 6c 73 3b 20 63 6f 6c | col < c|ols; col|
|00004180| 2b 2b 2c 20 70 69 78 72 | 6f 77 2b 2b 29 20 7b 0a |++, pixr|ow++) {.|
|00004190| 58 09 20 20 20 20 70 75 | 74 62 69 74 73 28 70 70 |X.    pu|tbits(pp|
|000041a0| 6d 5f 6c 6f 6f 6b 75 70 | 63 6f 6c 6f 72 28 20 63 |m_lookup|color( c|
|000041b0| 68 74 2c 20 2a 70 69 78 | 72 6f 77 20 29 2c 20 69 |ht, *pix|row ), i|
|000041c0| 6e 64 65 78 29 3b 0a 58 | 09 20 7d 0a 58 09 20 70 |ndex);.X|. }.X. p|
|000041d0| 75 74 62 69 74 73 28 30 | 2c 20 30 29 3b 20 2f 2a |utbits(0|, 0); /*|
|000041e0| 20 66 6c 75 73 68 20 72 | 6f 77 20 2a 2f 0a 58 20 | flush r|ow */.X |
|000041f0| 20 20 20 20 20 7d 20 65 | 6c 73 65 20 7b 20 2f 2a |     } e|lse { /*|
|00004200| 20 64 69 72 65 63 74 20 | 63 6f 6c 6f 75 72 20 6d | direct |colour m|
|00004210| 6f 64 65 20 2a 2f 0a 58 | 09 20 66 6f 72 20 28 63 |ode */.X|. for (c|
|00004220| 6f 6c 20 3d 20 30 2c 20 | 70 69 78 72 6f 77 3d 70 |ol = 0, |pixrow=p|
|00004230| 69 78 65 6c 73 5b 72 6f | 77 5d 3b 20 63 6f 6c 20 |ixels[ro|w]; col |
|00004240| 3c 20 63 6f 6c 73 3b 20 | 63 6f 6c 2b 2b 2c 20 70 |< cols; |col++, p|
|00004250| 69 78 72 6f 77 2b 2b 29 | 20 7b 0a 58 09 20 20 20 |ixrow++)| {.X.   |
|00004260| 20 70 75 74 62 69 74 73 | 28 50 50 4d 5f 47 45 54 | putbits|(PPM_GET|
|00004270| 52 28 20 2a 70 69 78 72 | 6f 77 20 29 2c 20 62 70 |R( *pixr|ow ), bp|
|00004280| 72 29 3b 0a 58 09 20 20 | 20 20 70 75 74 62 69 74 |r);.X.  |  putbit|
|00004290| 73 28 50 50 4d 5f 47 45 | 54 47 28 20 2a 70 69 78 |s(PPM_GE|TG( *pix|
|000042a0| 72 6f 77 20 29 2c 20 62 | 70 67 29 3b 0a 58 09 20 |row ), b|pg);.X. |
|000042b0| 20 20 20 70 75 74 62 69 | 74 73 28 50 50 4d 5f 47 |   putbi|ts(PPM_G|
|000042c0| 45 54 42 28 20 2a 70 69 | 78 72 6f 77 20 29 2c 20 |ETB( *pi|xrow ), |
|000042d0| 62 70 62 29 3b 20 2f 2a | 20 64 6f 6e 27 74 20 6e |bpb); /*| don't n|
|000042e0| 65 65 64 20 74 6f 20 66 | 6c 75 73 68 20 2a 2f 0a |eed to f|lush */.|
|000042f0| 58 09 20 7d 0a 58 09 20 | 70 75 74 62 69 74 73 28 |X. }.X. |putbits(|
|00004300| 30 2c 20 30 29 3b 20 2f | 2a 20 66 6c 75 73 68 20 |0, 0); /|* flush |
|00004310| 72 6f 77 20 2a 2f 0a 58 | 20 20 20 20 20 20 7d 0a |row */.X|      }.|
|00004320| 58 20 20 20 7d 0a 58 20 | 20 20 70 72 69 6e 74 66 |X   }.X |  printf|
|00004330| 28 22 5c 30 33 33 2a 72 | 43 22 29 3b 20 2f 2a 20 |("\033*r|C"); /* |
|00004340| 65 6e 64 20 72 61 73 74 | 65 72 20 67 72 61 70 68 |end rast|er graph|
|00004350| 69 63 73 20 2a 2f 0a 58 | 20 20 20 65 78 69 74 28 |ics */.X|   exit(|
|00004360| 30 29 3b 0a 58 7d 0a 45 | 4e 44 5f 4f 46 5f 70 70 |0);.X}.E|ND_OF_pp|
|00004370| 6d 74 6f 70 63 6c 2e 63 | 0a 69 66 20 74 65 73 74 |mtopcl.c|.if test|
|00004380| 20 31 32 30 37 37 20 2d | 6e 65 20 60 77 63 20 2d | 12077 -|ne `wc -|
|00004390| 63 20 3c 70 70 6d 74 6f | 70 63 6c 2e 63 60 3b 20 |c <ppmto|pcl.c`; |
|000043a0| 74 68 65 6e 0a 20 20 20 | 20 65 63 68 6f 20 73 68 |then.   | echo sh|
|000043b0| 61 72 3a 20 5c 22 70 70 | 6d 74 6f 70 63 6c 2e 63 |ar: \"pp|mtopcl.c|
|000043c0| 5c 22 20 75 6e 70 61 63 | 6b 65 64 20 77 69 74 68 |\" unpac|ked with|
|000043d0| 20 77 72 6f 6e 67 20 73 | 69 7a 65 21 0a 66 69 0a | wrong s|ize!.fi.|
|000043e0| 23 20 65 6e 64 20 6f 66 | 20 6f 76 65 72 77 72 69 |# end of| overwri|
|000043f0| 74 69 6e 67 20 63 68 65 | 63 6b 0a 66 69 0a 65 63 |ting che|ck.fi.ec|
|00004400| 68 6f 20 73 68 61 72 3a | 20 45 6e 64 20 6f 66 20 |ho shar:| End of |
|00004410| 61 72 63 68 69 76 65 20 | 31 20 5c 28 6f 66 20 31 |archive |1 \(of 1|
|00004420| 5c 29 2e 0a 63 70 20 2f | 64 65 76 2f 6e 75 6c 6c |\)..cp /|dev/null|
|00004430| 20 61 72 6b 31 69 73 64 | 6f 6e 65 0a 4d 49 53 53 | ark1isd|one.MISS|
|00004440| 49 4e 47 3d 22 22 0a 66 | 6f 72 20 49 20 69 6e 20 |ING="".f|or I in |
|00004450| 31 20 3b 20 64 6f 0a 20 | 20 20 20 69 66 20 74 65 |1 ; do. |   if te|
|00004460| 73 74 20 21 20 2d 66 20 | 61 72 6b 24 7b 49 7d 69 |st ! -f |ark${I}i|
|00004470| 73 64 6f 6e 65 20 3b 20 | 74 68 65 6e 0a 09 4d 49 |sdone ; |then..MI|
|00004480| 53 53 49 4e 47 3d 22 24 | 7b 4d 49 53 53 49 4e 47 |SSING="$|{MISSING|
|00004490| 7d 20 24 7b 49 7d 22 0a | 20 20 20 20 66 69 0a 64 |} ${I}".|    fi.d|
|000044a0| 6f 6e 65 0a 69 66 20 74 | 65 73 74 20 22 24 7b 4d |one.if t|est "${M|
|000044b0| 49 53 53 49 4e 47 7d 22 | 20 3d 20 22 22 20 3b 20 |ISSING}"| = "" ; |
|000044c0| 74 68 65 6e 0a 20 20 20 | 20 65 63 68 6f 20 59 6f |then.   | echo Yo|
|000044d0| 75 20 68 61 76 65 20 75 | 6e 70 61 63 6b 65 64 20 |u have u|npacked |
|000044e0| 61 6c 6c 20 31 20 61 72 | 63 68 69 76 65 73 2e 0a |all 1 ar|chives..|
|000044f0| 20 20 20 20 72 6d 20 2d | 66 20 61 72 6b 5b 31 2d |    rm -|f ark[1-|
|00004500| 39 5d 69 73 64 6f 6e 65 | 0a 65 6c 73 65 0a 20 20 |9]isdone|.else.  |
|00004510| 20 20 65 63 68 6f 20 59 | 6f 75 20 73 74 69 6c 6c |  echo Y|ou still|
|00004520| 20 6e 65 65 64 20 74 6f | 20 75 6e 70 61 63 6b 20 | need to| unpack |
|00004530| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 61 72 |the foll|owing ar|
|00004540| 63 68 69 76 65 73 3a 0a | 20 20 20 20 65 63 68 6f |chives:.|    echo|
|00004550| 20 22 20 20 20 20 20 20 | 20 20 22 20 24 7b 4d 49 | "      |  " ${MI|
|00004560| 53 53 49 4e 47 7d 0a 66 | 69 0a 23 23 20 20 45 6e |SSING}.f|i.##  En|
|00004570| 64 20 6f 66 20 73 68 65 | 6c 6c 20 61 72 63 68 69 |d of she|ll archi|
|00004580| 76 65 2e 0a 65 78 69 74 | 20 30 0a                |ve..exit| 0.     |
+--------+-------------------------+-------------------------+--------+--------+