home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
100%
| file
| news, ASCII text
| default
| |
100%
| checkBytes
| Printable ASCII
| default
| |
100%
| dexmagic
| PrintFox/Pagefox WEAK
| default
| |
100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
100%
| xdgMime
| message/news
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 50 61 74 68 3a 20 78 61 | 6e 74 68 21 6e 69 63 2e |Path: xa|nth!nic.|
|00000010| 4d 52 2e 4e 45 54 21 68 | 61 6c 21 6e 63 6f 61 73 |MR.NET!h|al!ncoas|
|00000020| 74 21 61 6c 6c 62 65 72 | 79 0a 46 72 6f 6d 3a 20 |t!allber|y.From: |
|00000030| 6a 65 66 40 68 65 6c 69 | 6f 73 2e 65 65 2e 6c 62 |jef@heli|os.ee.lb|
|00000040| 6c 2e 67 6f 76 20 28 4a | 65 66 20 50 6f 73 6b 61 |l.gov (J|ef Poska|
|00000050| 6e 7a 65 72 29 0a 4e 65 | 77 73 67 72 6f 75 70 73 |nzer).Ne|wsgroups|
|00000060| 3a 20 63 6f 6d 70 2e 73 | 6f 75 72 63 65 73 2e 6d |: comp.s|ources.m|
|00000070| 69 73 63 0a 53 75 62 6a | 65 63 74 3a 20 76 30 35 |isc.Subj|ect: v05|
|00000080| 69 30 34 32 3a 20 70 62 | 6d 2e 73 68 61 72 32 0a |i042: pb|m.shar2.|
|00000090| 4d 65 73 73 61 67 65 2d | 49 44 3a 20 3c 38 38 31 |Message-|ID: <881|
|000000a0| 31 30 31 30 32 33 36 2e | 41 41 30 32 36 39 34 40 |1010236.|AA02694@|
|000000b0| 68 65 6c 69 6f 73 2e 65 | 65 2e 6c 62 6c 2e 67 6f |helios.e|e.lbl.go|
|000000c0| 76 3e 0a 44 61 74 65 3a | 20 39 20 4e 6f 76 20 38 |v>.Date:| 9 Nov 8|
|000000d0| 38 20 30 32 3a 33 34 3a | 32 35 20 47 4d 54 0a 53 |8 02:34:|25 GMT.S|
|000000e0| 65 6e 64 65 72 3a 20 61 | 6c 6c 62 65 72 79 40 6e |ender: a|llbery@n|
|000000f0| 63 6f 61 73 74 2e 55 55 | 43 50 0a 52 65 70 6c 79 |coast.UU|CP.Reply|
|00000100| 2d 54 6f 3a 20 6a 65 66 | 40 68 65 6c 69 6f 73 2e |-To: jef|@helios.|
|00000110| 65 65 2e 6c 62 6c 2e 67 | 6f 76 20 28 4a 65 66 20 |ee.lbl.g|ov (Jef |
|00000120| 50 6f 73 6b 61 6e 7a 65 | 72 29 0a 4c 69 6e 65 73 |Poskanze|r).Lines|
|00000130| 3a 20 31 38 37 37 0a 41 | 70 70 72 6f 76 65 64 3a |: 1877.A|pproved:|
|00000140| 20 61 6c 6c 62 65 72 79 | 40 6e 63 6f 61 73 74 2e | allbery|@ncoast.|
|00000150| 55 55 43 50 0a 0a 50 6f | 73 74 69 6e 67 2d 6e 75 |UUCP..Po|sting-nu|
|00000160| 6d 62 65 72 3a 20 56 6f | 6c 75 6d 65 20 35 2c 20 |mber: Vo|lume 5, |
|00000170| 49 73 73 75 65 20 34 32 | 0a 53 75 62 6d 69 74 74 |Issue 42|.Submitt|
|00000180| 65 64 2d 62 79 3a 20 22 | 4a 65 66 20 50 6f 73 6b |ed-by: "|Jef Posk|
|00000190| 61 6e 7a 65 72 22 20 3c | 6a 65 66 40 68 65 6c 69 |anzer" <|jef@heli|
|000001a0| 6f 73 2e 65 65 2e 6c 62 | 6c 2e 67 6f 76 3e 0a 41 |os.ee.lb|l.gov>.A|
|000001b0| 72 63 68 69 76 65 2d 6e | 61 6d 65 3a 20 70 62 6d |rchive-n|ame: pbm|
|000001c0| 33 2f 50 61 72 74 32 0a | 0a 23 21 20 2f 62 69 6e |3/Part2.|.#! /bin|
|000001d0| 2f 73 68 0a 23 20 54 68 | 69 73 20 69 73 20 61 20 |/sh.# Th|is is a |
|000001e0| 73 68 65 6c 6c 20 61 72 | 63 68 69 76 65 2c 20 6d |shell ar|chive, m|
|000001f0| 65 61 6e 69 6e 67 3a 0a | 23 20 31 2e 20 52 65 6d |eaning:.|# 1. Rem|
|00000200| 6f 76 65 20 65 76 65 72 | 79 74 68 69 6e 67 20 61 |ove ever|ything a|
|00000210| 62 6f 76 65 20 74 68 65 | 20 23 21 20 2f 62 69 6e |bove the| #! /bin|
|00000220| 2f 73 68 20 6c 69 6e 65 | 2e 0a 23 20 32 2e 20 53 |/sh line|..# 2. S|
|00000230| 61 76 65 20 74 68 65 20 | 72 65 73 75 6c 74 69 6e |ave the |resultin|
|00000240| 67 20 74 65 78 74 20 69 | 6e 20 61 20 66 69 6c 65 |g text i|n a file|
|00000250| 2e 0a 23 20 33 2e 20 45 | 78 65 63 75 74 65 20 74 |..# 3. E|xecute t|
|00000260| 68 65 20 66 69 6c 65 20 | 77 69 74 68 20 2f 62 69 |he file |with /bi|
|00000270| 6e 2f 73 68 20 28 6e 6f | 74 20 63 73 68 29 20 74 |n/sh (no|t csh) t|
|00000280| 6f 20 63 72 65 61 74 65 | 20 74 68 65 20 66 69 6c |o create| the fil|
|00000290| 65 73 3a 0a 23 09 78 77 | 64 74 6f 70 62 6d 2e 31 |es:.#.xw|dtopbm.1|
|000002a0| 0a 23 09 70 62 6d 74 6f | 63 62 6d 2e 63 0a 23 09 |.#.pbmto|cbm.c.#.|
|000002b0| 70 62 6d 74 6f 63 62 6d | 2e 31 0a 23 09 70 62 6d |pbmtocbm|.1.#.pbm|
|000002c0| 74 6f 69 63 6f 6e 2e 63 | 0a 23 09 70 62 6d 74 6f |toicon.c|.#.pbmto|
|000002d0| 69 63 6f 6e 2e 31 0a 23 | 09 70 62 6d 74 6f 70 73 |icon.1.#|.pbmtops|
|000002e0| 2e 63 0a 23 09 70 62 6d | 74 6f 70 73 2e 31 0a 23 |.c.#.pbm|tops.1.#|
|000002f0| 09 70 62 6d 74 6f 70 74 | 78 2e 63 0a 23 09 70 62 |.pbmtopt|x.c.#.pb|
|00000300| 6d 74 6f 70 74 78 2e 31 | 0a 23 09 70 62 6d 74 6f |mtoptx.1|.#.pbmto|
|00000310| 72 61 73 74 2e 63 0a 23 | 09 70 62 6d 74 6f 72 61 |rast.c.#|.pbmtora|
|00000320| 73 74 2e 31 0a 23 09 70 | 62 6d 74 6f 78 62 6d 2e |st.1.#.p|bmtoxbm.|
|00000330| 63 0a 23 09 70 62 6d 74 | 6f 78 62 6d 2e 31 0a 23 |c.#.pbmt|oxbm.1.#|
|00000340| 09 70 62 6d 74 6f 78 31 | 30 62 6d 2e 63 0a 23 09 |.pbmtox1|0bm.c.#.|
|00000350| 70 62 6d 74 6f 78 31 30 | 62 6d 2e 31 0a 23 09 70 |pbmtox10|bm.1.#.p|
|00000360| 62 6d 74 6f 61 73 63 69 | 69 2e 63 0a 23 09 70 62 |bmtoasci|i.c.#.pb|
|00000370| 6d 74 6f 61 73 63 69 69 | 2e 31 0a 23 09 70 62 6d |mtoascii|.1.#.pbm|
|00000380| 63 61 74 6c 72 2e 63 0a | 23 09 70 62 6d 63 61 74 |catlr.c.|#.pbmcat|
|00000390| 6c 72 2e 31 0a 23 09 70 | 62 6d 63 61 74 74 62 2e |lr.1.#.p|bmcattb.|
|000003a0| 63 0a 23 09 70 62 6d 63 | 61 74 74 62 2e 31 0a 23 |c.#.pbmc|attb.1.#|
|000003b0| 09 70 62 6d 66 6c 69 70 | 6c 72 2e 63 0a 23 09 70 |.pbmflip|lr.c.#.p|
|000003c0| 62 6d 66 6c 69 70 6c 72 | 2e 31 0a 23 20 54 68 69 |bmfliplr|.1.# Thi|
|000003d0| 73 20 61 72 63 68 69 76 | 65 20 63 72 65 61 74 65 |s archiv|e create|
|000003e0| 64 3a 20 4d 6f 6e 20 4f | 63 74 20 33 31 20 31 38 |d: Mon O|ct 31 18|
|000003f0| 3a 33 33 3a 33 31 20 31 | 39 38 38 0a 23 20 42 79 |:33:31 1|988.# By|
|00000400| 3a 09 4a 65 66 20 50 6f | 73 6b 61 6e 7a 65 72 20 |:.Jef Po|skanzer |
|00000410| 28 50 61 72 61 74 68 65 | 6f 2d 41 6e 61 6d 65 74 |(Parathe|o-Anamet|
|00000420| 61 6d 79 73 74 69 6b 68 | 6f 6f 64 20 4f 66 20 45 |amystikh|ood Of E|
|00000430| 72 69 73 20 45 73 6f 74 | 65 72 69 63 2c 20 41 64 |ris Esot|eric, Ad|
|00000440| 61 20 4c 6f 76 65 6c 61 | 63 65 20 43 61 62 61 6c |a Lovela|ce Cabal|
|00000450| 29 0a 65 78 70 6f 72 74 | 20 50 41 54 48 3b 20 50 |).export| PATH; P|
|00000460| 41 54 48 3d 2f 62 69 6e | 3a 24 50 41 54 48 0a 65 |ATH=/bin|:$PATH.e|
|00000470| 63 68 6f 20 73 68 61 72 | 3a 20 65 78 74 72 61 63 |cho shar|: extrac|
|00000480| 74 69 6e 67 20 22 27 78 | 77 64 74 6f 70 62 6d 2e |ting "'x|wdtopbm.|
|00000490| 31 27 22 20 27 28 31 31 | 33 31 20 63 68 61 72 61 |1'" '(11|31 chara|
|000004a0| 63 74 65 72 73 29 27 0a | 69 66 20 74 65 73 74 20 |cters)'.|if test |
|000004b0| 2d 66 20 27 78 77 64 74 | 6f 70 62 6d 2e 31 27 0a |-f 'xwdt|opbm.1'.|
|000004c0| 74 68 65 6e 0a 09 65 63 | 68 6f 20 73 68 61 72 3a |then..ec|ho shar:|
|000004d0| 20 77 69 6c 6c 20 6e 6f | 74 20 6f 76 65 72 2d 77 | will no|t over-w|
|000004e0| 72 69 74 65 20 65 78 69 | 73 74 69 6e 67 20 66 69 |rite exi|sting fi|
|000004f0| 6c 65 20 22 27 78 77 64 | 74 6f 70 62 6d 2e 31 27 |le "'xwd|topbm.1'|
|00000500| 22 0a 65 6c 73 65 0a 73 | 65 64 20 27 73 2f 5e 58 |".else.s|ed 's/^X|
|00000510| 2f 2f 27 20 3c 3c 20 5c | 53 48 41 52 5f 45 4f 46 |//' << \|SHAR_EOF|
|00000520| 20 3e 20 27 78 77 64 74 | 6f 70 62 6d 2e 31 27 0a | > 'xwdt|opbm.1'.|
|00000530| 58 2e 54 48 20 78 77 64 | 74 6f 70 62 6d 20 31 20 |X.TH xwd|topbm 1 |
|00000540| 22 33 31 20 41 75 67 75 | 73 74 20 31 39 38 38 22 |"31 Augu|st 1988"|
|00000550| 0a 58 2e 53 48 20 4e 41 | 4d 45 0a 58 78 77 64 74 |.X.SH NA|ME.Xxwdt|
|00000560| 6f 70 62 6d 20 2d 20 63 | 6f 6e 76 65 72 74 20 58 |opbm - c|onvert X|
|00000570| 31 31 20 61 6e 64 20 58 | 31 30 20 77 69 6e 64 6f |11 and X|10 windo|
|00000580| 77 20 64 75 6d 70 20 66 | 69 6c 65 73 20 69 6e 74 |w dump f|iles int|
|00000590| 6f 20 70 6f 72 74 61 62 | 6c 65 20 62 69 74 6d 61 |o portab|le bitma|
|000005a0| 70 73 0a 58 2e 53 48 20 | 53 59 4e 4f 50 53 49 53 |ps.X.SH |SYNOPSIS|
|000005b0| 0a 58 78 77 64 74 6f 70 | 62 6d 20 5b 78 77 64 66 |.Xxwdtop|bm [xwdf|
|000005c0| 69 6c 65 5d 0a 58 2e 53 | 48 20 44 45 53 43 52 49 |ile].X.S|H DESCRI|
|000005d0| 50 54 49 4f 4e 0a 58 52 | 65 61 64 73 20 61 6e 20 |PTION.XR|eads an |
|000005e0| 58 31 31 20 6f 72 20 58 | 31 30 20 77 69 6e 64 6f |X11 or X|10 windo|
|000005f0| 77 20 64 75 6d 70 20 66 | 69 6c 65 20 61 73 20 69 |w dump f|ile as i|
|00000600| 6e 70 75 74 2e 0a 58 50 | 72 6f 64 75 63 65 73 20 |nput..XP|roduces |
|00000610| 61 20 70 6f 72 74 61 62 | 6c 65 20 62 69 74 6d 61 |a portab|le bitma|
|00000620| 70 20 61 73 20 6f 75 74 | 70 75 74 2e 0a 58 2e 4c |p as out|put..X.L|
|00000630| 50 0a 58 55 73 69 6e 67 | 20 74 68 69 73 20 70 72 |P.XUsing| this pr|
|00000640| 6f 67 72 61 6d 2c 20 79 | 6f 75 20 63 61 6e 20 63 |ogram, y|ou can c|
|00000650| 6f 6e 76 65 72 74 20 61 | 6e 79 74 68 69 6e 67 20 |onvert a|nything |
|00000660| 6f 6e 20 61 6e 20 58 20 | 77 6f 72 6b 73 74 61 74 |on an X |workstat|
|00000670| 69 6f 6e 27 73 20 73 63 | 72 65 65 6e 0a 58 69 6e |ion's sc|reen.Xin|
|00000680| 74 6f 20 61 20 70 62 6d | 20 62 69 74 6d 61 70 2e |to a pbm| bitmap.|
|00000690| 0a 58 4a 75 73 74 20 64 | 69 73 70 6c 61 79 20 77 |.XJust d|isplay w|
|000006a0| 68 61 74 65 76 65 72 20 | 79 6f 75 27 72 65 20 69 |hatever |you're i|
|000006b0| 6e 74 65 72 65 73 74 65 | 64 20 69 6e 2c 20 64 6f |ntereste|d in, do|
|000006c0| 20 61 6e 20 78 77 64 2c | 20 72 75 6e 20 69 74 20 | an xwd,| run it |
|000006d0| 74 68 72 6f 75 67 68 0a | 58 78 77 64 74 6f 70 62 |through.|Xxwdtopb|
|000006e0| 6d 2c 20 61 6e 64 20 74 | 68 65 6e 20 75 73 65 20 |m, and t|hen use |
|000006f0| 70 62 6d 63 75 74 20 74 | 6f 20 73 65 6c 65 63 74 |pbmcut t|o select|
|00000700| 20 74 68 65 20 70 61 72 | 74 20 79 6f 75 20 77 61 | the par|t you wa|
|00000710| 6e 74 2e 0a 58 2e 4c 50 | 0a 58 4e 6f 74 65 20 74 |nt..X.LP|.XNote t|
|00000720| 68 61 74 20 74 68 69 73 | 20 74 6f 6f 6c 20 6f 6e |hat this| tool on|
|00000730| 6c 79 20 77 6f 72 6b 73 | 20 66 6f 72 20 6d 6f 6e |ly works| for mon|
|00000740| 6f 63 68 72 6f 6d 65 20 | 64 75 6d 70 20 66 69 6c |ochrome |dump fil|
|00000750| 65 73 2e 0a 58 2e 53 48 | 20 42 55 47 53 0a 58 49 |es..X.SH| BUGS.XI|
|00000760| 20 68 61 76 65 6e 27 74 | 20 74 65 73 74 65 64 20 | haven't| tested |
|00000770| 74 68 69 73 20 74 6f 6f | 6c 20 77 69 74 68 20 76 |this too|l with v|
|00000780| 65 72 79 20 6d 61 6e 79 | 20 63 6f 6e 66 69 67 75 |ery many| configu|
|00000790| 72 61 74 69 6f 6e 73 2c | 20 73 6f 20 74 68 65 72 |rations,| so ther|
|000007a0| 65 20 61 72 65 0a 58 70 | 72 6f 62 61 62 6c 79 20 |e are.Xp|robably |
|000007b0| 62 75 67 73 2e 0a 58 50 | 6c 65 61 73 65 20 6c 65 |bugs..XP|lease le|
|000007c0| 74 20 6d 65 20 6b 6e 6f | 77 20 69 66 20 79 6f 75 |t me kno|w if you|
|000007d0| 20 66 69 6e 64 20 61 6e | 79 2e 0a 58 2e 53 48 20 | find an|y..X.SH |
|000007e0| 22 53 45 45 20 41 4c 53 | 4f 22 0a 58 70 62 6d 74 |"SEE ALS|O".Xpbmt|
|000007f0| 6f 78 77 64 28 31 29 2c | 20 70 62 6d 74 6f 78 31 |oxwd(1),| pbmtox1|
|00000800| 30 77 64 28 31 29 2c 20 | 70 62 6d 28 35 29 0a 58 |0wd(1), |pbm(5).X|
|00000810| 2e 53 48 20 41 55 54 48 | 4f 52 0a 58 43 6f 70 79 |.SH AUTH|OR.XCopy|
|00000820| 72 69 67 68 74 20 28 43 | 29 20 31 39 38 38 20 62 |right (C|) 1988 b|
|00000830| 79 20 4a 65 66 20 50 6f | 73 6b 61 6e 7a 65 72 2e |y Jef Po|skanzer.|
|00000840| 0a 58 0a 58 50 65 72 6d | 69 73 73 69 6f 6e 20 74 |.X.XPerm|ission t|
|00000850| 6f 20 75 73 65 2c 20 63 | 6f 70 79 2c 20 6d 6f 64 |o use, c|opy, mod|
|00000860| 69 66 79 2c 20 61 6e 64 | 20 64 69 73 74 72 69 62 |ify, and| distrib|
|00000870| 75 74 65 20 74 68 69 73 | 20 73 6f 66 74 77 61 72 |ute this| softwar|
|00000880| 65 20 61 6e 64 20 69 74 | 73 0a 58 64 6f 63 75 6d |e and it|s.Xdocum|
|00000890| 65 6e 74 61 74 69 6f 6e | 20 66 6f 72 20 61 6e 79 |entation| for any|
|000008a0| 20 70 75 72 70 6f 73 65 | 20 61 6e 64 20 77 69 74 | purpose| and wit|
|000008b0| 68 6f 75 74 20 66 65 65 | 20 69 73 20 68 65 72 65 |hout fee| is here|
|000008c0| 62 79 20 67 72 61 6e 74 | 65 64 2c 20 70 72 6f 76 |by grant|ed, prov|
|000008d0| 69 64 65 64 0a 58 74 68 | 61 74 20 74 68 65 20 61 |ided.Xth|at the a|
|000008e0| 62 6f 76 65 20 63 6f 70 | 79 72 69 67 68 74 20 6e |bove cop|yright n|
|000008f0| 6f 74 69 63 65 20 61 70 | 70 65 61 72 20 69 6e 20 |otice ap|pear in |
|00000900| 61 6c 6c 20 63 6f 70 69 | 65 73 20 61 6e 64 20 74 |all copi|es and t|
|00000910| 68 61 74 20 62 6f 74 68 | 20 74 68 61 74 0a 58 63 |hat both| that.Xc|
|00000920| 6f 70 79 72 69 67 68 74 | 20 6e 6f 74 69 63 65 20 |opyright| notice |
|00000930| 61 6e 64 20 74 68 69 73 | 20 70 65 72 6d 69 73 73 |and this| permiss|
|00000940| 69 6f 6e 20 6e 6f 74 69 | 63 65 20 61 70 70 65 61 |ion noti|ce appea|
|00000950| 72 20 69 6e 20 73 75 70 | 70 6f 72 74 69 6e 67 0a |r in sup|porting.|
|00000960| 58 64 6f 63 75 6d 65 6e | 74 61 74 69 6f 6e 2e 20 |Xdocumen|tation. |
|00000970| 20 54 68 69 73 20 73 6f | 66 74 77 61 72 65 20 69 | This so|ftware i|
|00000980| 73 20 70 72 6f 76 69 64 | 65 64 20 22 61 73 20 69 |s provid|ed "as i|
|00000990| 73 22 20 77 69 74 68 6f | 75 74 20 65 78 70 72 65 |s" witho|ut expre|
|000009a0| 73 73 20 6f 72 0a 58 69 | 6d 70 6c 69 65 64 20 77 |ss or.Xi|mplied w|
|000009b0| 61 72 72 61 6e 74 79 2e | 0a 53 48 41 52 5f 45 4f |arranty.|.SHAR_EO|
|000009c0| 46 0a 69 66 20 74 65 73 | 74 20 31 31 33 31 20 2d |F.if tes|t 1131 -|
|000009d0| 6e 65 20 22 60 77 63 20 | 2d 63 20 3c 20 27 78 77 |ne "`wc |-c < 'xw|
|000009e0| 64 74 6f 70 62 6d 2e 31 | 27 60 22 0a 74 68 65 6e |dtopbm.1|'`".then|
|000009f0| 0a 09 65 63 68 6f 20 73 | 68 61 72 3a 20 65 72 72 |..echo s|har: err|
|00000a00| 6f 72 20 74 72 61 6e 73 | 6d 69 74 74 69 6e 67 20 |or trans|mitting |
|00000a10| 22 27 78 77 64 74 6f 70 | 62 6d 2e 31 27 22 20 27 |"'xwdtop|bm.1'" '|
|00000a20| 28 73 68 6f 75 6c 64 20 | 68 61 76 65 20 62 65 65 |(should |have bee|
|00000a30| 6e 20 31 31 33 31 20 63 | 68 61 72 61 63 74 65 72 |n 1131 c|haracter|
|00000a40| 73 29 27 0a 66 69 0a 66 | 69 20 23 20 65 6e 64 20 |s)'.fi.f|i # end |
|00000a50| 6f 66 20 6f 76 65 72 77 | 72 69 74 69 6e 67 20 63 |of overw|riting c|
|00000a60| 68 65 63 6b 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |heck.ech|o shar: |
|00000a70| 65 78 74 72 61 63 74 69 | 6e 67 20 22 27 70 62 6d |extracti|ng "'pbm|
|00000a80| 74 6f 63 62 6d 2e 63 27 | 22 20 27 28 31 31 30 34 |tocbm.c'|" '(1104|
|00000a90| 20 63 68 61 72 61 63 74 | 65 72 73 29 27 0a 69 66 | charact|ers)'.if|
|00000aa0| 20 74 65 73 74 20 2d 66 | 20 27 70 62 6d 74 6f 63 | test -f| 'pbmtoc|
|00000ab0| 62 6d 2e 63 27 0a 74 68 | 65 6e 0a 09 65 63 68 6f |bm.c'.th|en..echo|
|00000ac0| 20 73 68 61 72 3a 20 77 | 69 6c 6c 20 6e 6f 74 20 | shar: w|ill not |
|00000ad0| 6f 76 65 72 2d 77 72 69 | 74 65 20 65 78 69 73 74 |over-wri|te exist|
|00000ae0| 69 6e 67 20 66 69 6c 65 | 20 22 27 70 62 6d 74 6f |ing file| "'pbmto|
|00000af0| 63 62 6d 2e 63 27 22 0a | 65 6c 73 65 0a 73 65 64 |cbm.c'".|else.sed|
|00000b00| 20 27 73 2f 5e 58 2f 2f | 27 20 3c 3c 20 5c 53 48 | 's/^X//|' << \SH|
|00000b10| 41 52 5f 45 4f 46 20 3e | 20 27 70 62 6d 74 6f 63 |AR_EOF >| 'pbmtoc|
|00000b20| 62 6d 2e 63 27 0a 58 2f | 2a 20 70 62 6d 74 6f 63 |bm.c'.X/|* pbmtoc|
|00000b30| 62 6d 2e 63 20 2d 20 72 | 65 61 64 20 61 20 70 6f |bm.c - r|ead a po|
|00000b40| 72 74 61 62 6c 65 20 62 | 69 74 6d 61 70 20 61 6e |rtable b|itmap an|
|00000b50| 64 20 70 72 6f 64 75 63 | 65 20 61 20 63 6f 6d 70 |d produc|e a comp|
|00000b60| 61 63 74 20 62 69 74 6d | 61 70 0a 58 2a 2a 0a 58 |act bitm|ap.X**.X|
|00000b70| 2a 2a 20 43 6f 70 79 72 | 69 67 68 74 20 28 43 29 |** Copyr|ight (C)|
|00000b80| 20 31 39 38 38 20 62 79 | 20 4a 65 66 20 50 6f 73 | 1988 by| Jef Pos|
|00000b90| 6b 61 6e 7a 65 72 2e 0a | 58 2a 2a 0a 58 2a 2a 20 |kanzer..|X**.X** |
|00000ba0| 50 65 72 6d 69 73 73 69 | 6f 6e 20 74 6f 20 75 73 |Permissi|on to us|
|00000bb0| 65 2c 20 63 6f 70 79 2c | 20 6d 6f 64 69 66 79 2c |e, copy,| modify,|
|00000bc0| 20 61 6e 64 20 64 69 73 | 74 72 69 62 75 74 65 20 | and dis|tribute |
|00000bd0| 74 68 69 73 20 73 6f 66 | 74 77 61 72 65 20 61 6e |this sof|tware an|
|00000be0| 64 20 69 74 73 0a 58 2a | 2a 20 64 6f 63 75 6d 65 |d its.X*|* docume|
|00000bf0| 6e 74 61 74 69 6f 6e 20 | 66 6f 72 20 61 6e 79 20 |ntation |for any |
|00000c00| 70 75 72 70 6f 73 65 20 | 61 6e 64 20 77 69 74 68 |purpose |and with|
|00000c10| 6f 75 74 20 66 65 65 20 | 69 73 20 68 65 72 65 62 |out fee |is hereb|
|00000c20| 79 20 67 72 61 6e 74 65 | 64 2c 20 70 72 6f 76 69 |y grante|d, provi|
|00000c30| 64 65 64 0a 58 2a 2a 20 | 74 68 61 74 20 74 68 65 |ded.X** |that the|
|00000c40| 20 61 62 6f 76 65 20 63 | 6f 70 79 72 69 67 68 74 | above c|opyright|
|00000c50| 20 6e 6f 74 69 63 65 20 | 61 70 70 65 61 72 20 69 | notice |appear i|
|00000c60| 6e 20 61 6c 6c 20 63 6f | 70 69 65 73 20 61 6e 64 |n all co|pies and|
|00000c70| 20 74 68 61 74 20 62 6f | 74 68 20 74 68 61 74 0a | that bo|th that.|
|00000c80| 58 2a 2a 20 63 6f 70 79 | 72 69 67 68 74 20 6e 6f |X** copy|right no|
|00000c90| 74 69 63 65 20 61 6e 64 | 20 74 68 69 73 20 70 65 |tice and| this pe|
|00000ca0| 72 6d 69 73 73 69 6f 6e | 20 6e 6f 74 69 63 65 20 |rmission| notice |
|00000cb0| 61 70 70 65 61 72 20 69 | 6e 20 73 75 70 70 6f 72 |appear i|n suppor|
|00000cc0| 74 69 6e 67 0a 58 2a 2a | 20 64 6f 63 75 6d 65 6e |ting.X**| documen|
|00000cd0| 74 61 74 69 6f 6e 2e 20 | 20 54 68 69 73 20 73 6f |tation. | This so|
|00000ce0| 66 74 77 61 72 65 20 69 | 73 20 70 72 6f 76 69 64 |ftware i|s provid|
|00000cf0| 65 64 20 22 61 73 20 69 | 73 22 20 77 69 74 68 6f |ed "as i|s" witho|
|00000d00| 75 74 20 65 78 70 72 65 | 73 73 20 6f 72 0a 58 2a |ut expre|ss or.X*|
|00000d10| 2a 20 69 6d 70 6c 69 65 | 64 20 77 61 72 72 61 6e |* implie|d warran|
|00000d20| 74 79 2e 0a 58 2a 2f 0a | 58 0a 58 23 69 6e 63 6c |ty..X*/.|X.X#incl|
|00000d30| 75 64 65 20 3c 73 74 64 | 69 6f 2e 68 3e 0a 58 23 |ude <std|io.h>.X#|
|00000d40| 69 6e 63 6c 75 64 65 20 | 22 70 62 6d 2e 68 22 0a |include |"pbm.h".|
|00000d50| 58 0a 58 6d 61 69 6e 28 | 20 61 72 67 63 2c 20 61 |X.Xmain(| argc, a|
|00000d60| 72 67 76 20 29 0a 58 69 | 6e 74 20 61 72 67 63 3b |rgv ).Xi|nt argc;|
|00000d70| 0a 58 63 68 61 72 20 2a | 61 72 67 76 5b 5d 3b 0a |.Xchar *|argv[];.|
|00000d80| 58 20 20 20 20 7b 0a 58 | 20 20 20 20 46 49 4c 45 |X {.X| FILE|
|00000d90| 20 2a 69 66 64 3b 0a 58 | 20 20 20 20 62 69 74 20 | *ifd;.X| bit |
|00000da0| 2a 2a 62 69 74 73 3b 0a | 58 20 20 20 20 69 6e 74 |**bits;.|X int|
|00000db0| 20 72 6f 77 73 2c 20 63 | 6f 6c 73 2c 20 72 6f 77 | rows, c|ols, row|
|00000dc0| 2c 20 63 6f 6c 3b 0a 58 | 0a 58 20 20 20 20 69 66 |, col;.X|.X if|
|00000dd0| 20 28 20 61 72 67 63 20 | 3e 20 32 20 29 0a 58 09 | ( argc |> 2 ).X.|
|00000de0| 7b 0a 58 09 66 70 72 69 | 6e 74 66 28 20 73 74 64 |{.X.fpri|ntf( std|
|00000df0| 65 72 72 2c 20 22 75 73 | 61 67 65 3a 20 20 25 73 |err, "us|age: %s|
|00000e00| 20 5b 70 62 6d 66 69 6c | 65 5d 5c 6e 22 2c 20 61 | [pbmfil|e]\n", a|
|00000e10| 72 67 76 5b 30 5d 20 29 | 3b 0a 58 09 65 78 69 74 |rgv[0] )|;.X.exit|
|00000e20| 28 20 31 20 29 3b 0a 58 | 09 7d 0a 58 0a 58 20 20 |( 1 );.X|.}.X.X |
|00000e30| 20 20 69 66 20 28 20 61 | 72 67 63 20 3d 3d 20 32 | if ( a|rgc == 2|
|00000e40| 20 29 0a 58 09 7b 0a 58 | 20 20 20 20 20 20 20 20 | ).X.{.X| |
|00000e50| 69 66 64 20 3d 20 66 6f | 70 65 6e 28 20 61 72 67 |ifd = fo|pen( arg|
|00000e60| 76 5b 31 5d 2c 20 22 72 | 22 20 29 3b 0a 58 20 20 |v[1], "r|" );.X |
|00000e70| 20 20 20 20 20 20 69 66 | 20 28 20 69 66 64 20 3d | if| ( ifd =|
|00000e80| 3d 20 4e 55 4c 4c 20 29 | 0a 58 09 20 20 20 20 7b |= NULL )|.X. {|
|00000e90| 0a 58 09 20 20 20 20 66 | 70 72 69 6e 74 66 28 20 |.X. f|printf( |
|00000ea0| 73 74 64 65 72 72 2c 20 | 22 25 73 3a 20 63 61 6e |stderr, |"%s: can|
|00000eb0| 27 74 20 6f 70 65 6e 2e | 5c 6e 22 2c 20 61 72 67 |'t open.|\n", arg|
|00000ec0| 76 5b 31 5d 20 29 3b 0a | 58 09 20 20 20 20 65 78 |v[1] );.|X. ex|
|00000ed0| 69 74 28 20 31 20 29 3b | 0a 58 09 20 20 20 20 7d |it( 1 );|.X. }|
|00000ee0| 0a 58 09 7d 0a 58 20 20 | 20 20 65 6c 73 65 0a 58 |.X.}.X | else.X|
|00000ef0| 09 69 66 64 20 3d 20 73 | 74 64 69 6e 3b 0a 58 0a |.ifd = s|tdin;.X.|
|00000f00| 58 20 20 20 20 62 69 74 | 73 20 3d 20 70 62 6d 5f |X bit|s = pbm_|
|00000f10| 72 65 61 64 70 62 6d 28 | 20 69 66 64 2c 20 26 63 |readpbm(| ifd, &c|
|00000f20| 6f 6c 73 2c 20 26 72 6f | 77 73 20 29 3b 0a 58 0a |ols, &ro|ws );.X.|
|00000f30| 58 20 20 20 20 69 66 20 | 28 20 69 66 64 20 21 3d |X if |( ifd !=|
|00000f40| 20 73 74 64 69 6e 20 29 | 0a 58 09 66 63 6c 6f 73 | stdin )|.X.fclos|
|00000f50| 65 28 20 69 66 64 20 29 | 3b 0a 58 20 20 20 20 0a |e( ifd )|;.X .|
|00000f60| 58 20 20 20 20 70 62 6d | 5f 77 72 69 74 65 63 62 |X pbm|_writecb|
|00000f70| 6d 28 20 73 74 64 6f 75 | 74 2c 20 62 69 74 73 2c |m( stdou|t, bits,|
|00000f80| 20 63 6f 6c 73 2c 20 72 | 6f 77 73 20 29 3b 0a 58 | cols, r|ows );.X|
|00000f90| 0a 58 20 20 20 20 65 78 | 69 74 28 20 30 20 29 3b |.X ex|it( 0 );|
|00000fa0| 0a 58 20 20 20 20 7d 0a | 53 48 41 52 5f 45 4f 46 |.X }.|SHAR_EOF|
|00000fb0| 0a 69 66 20 74 65 73 74 | 20 31 31 30 34 20 2d 6e |.if test| 1104 -n|
|00000fc0| 65 20 22 60 77 63 20 2d | 63 20 3c 20 27 70 62 6d |e "`wc -|c < 'pbm|
|00000fd0| 74 6f 63 62 6d 2e 63 27 | 60 22 0a 74 68 65 6e 0a |tocbm.c'|`".then.|
|00000fe0| 09 65 63 68 6f 20 73 68 | 61 72 3a 20 65 72 72 6f |.echo sh|ar: erro|
|00000ff0| 72 20 74 72 61 6e 73 6d | 69 74 74 69 6e 67 20 22 |r transm|itting "|
|00001000| 27 70 62 6d 74 6f 63 62 | 6d 2e 63 27 22 20 27 28 |'pbmtocb|m.c'" '(|
|00001010| 73 68 6f 75 6c 64 20 68 | 61 76 65 20 62 65 65 6e |should h|ave been|
|00001020| 20 31 31 30 34 20 63 68 | 61 72 61 63 74 65 72 73 | 1104 ch|aracters|
|00001030| 29 27 0a 66 69 0a 66 69 | 20 23 20 65 6e 64 20 6f |)'.fi.fi| # end o|
|00001040| 66 20 6f 76 65 72 77 72 | 69 74 69 6e 67 20 63 68 |f overwr|iting ch|
|00001050| 65 63 6b 0a 65 63 68 6f | 20 73 68 61 72 3a 20 65 |eck.echo| shar: e|
|00001060| 78 74 72 61 63 74 69 6e | 67 20 22 27 70 62 6d 74 |xtractin|g "'pbmt|
|00001070| 6f 63 62 6d 2e 31 27 22 | 20 27 28 36 36 39 20 63 |ocbm.1'"| '(669 c|
|00001080| 68 61 72 61 63 74 65 72 | 73 29 27 0a 69 66 20 74 |haracter|s)'.if t|
|00001090| 65 73 74 20 2d 66 20 27 | 70 62 6d 74 6f 63 62 6d |est -f '|pbmtocbm|
|000010a0| 2e 31 27 0a 74 68 65 6e | 0a 09 65 63 68 6f 20 73 |.1'.then|..echo s|
|000010b0| 68 61 72 3a 20 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |har: wil|l not ov|
|000010c0| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|000010d0| 67 20 66 69 6c 65 20 22 | 27 70 62 6d 74 6f 63 62 |g file "|'pbmtocb|
|000010e0| 6d 2e 31 27 22 0a 65 6c | 73 65 0a 73 65 64 20 27 |m.1'".el|se.sed '|
|000010f0| 73 2f 5e 58 2f 2f 27 20 | 3c 3c 20 5c 53 48 41 52 |s/^X//' |<< \SHAR|
|00001100| 5f 45 4f 46 20 3e 20 27 | 70 62 6d 74 6f 63 62 6d |_EOF > '|pbmtocbm|
|00001110| 2e 31 27 0a 58 2e 54 48 | 20 70 62 6d 74 6f 63 62 |.1'.X.TH| pbmtocb|
|00001120| 6d 20 31 20 22 33 31 20 | 41 75 67 75 73 74 20 31 |m 1 "31 |August 1|
|00001130| 39 38 38 22 0a 58 2e 53 | 48 20 4e 41 4d 45 0a 58 |988".X.S|H NAME.X|
|00001140| 70 62 6d 74 6f 63 62 6d | 20 2d 20 63 6f 6e 76 65 |pbmtocbm| - conve|
|00001150| 72 74 20 70 6f 72 74 61 | 62 6c 65 20 62 69 74 6d |rt porta|ble bitm|
|00001160| 61 70 73 20 69 6e 74 6f | 20 63 6f 6d 70 61 63 74 |aps into| compact|
|00001170| 20 62 69 74 6d 61 70 73 | 0a 58 2e 53 48 20 53 59 | bitmaps|.X.SH SY|
|00001180| 4e 4f 50 53 49 53 0a 58 | 70 62 6d 74 6f 63 62 6d |NOPSIS.X|pbmtocbm|
|00001190| 20 5b 70 62 6d 66 69 6c | 65 5d 0a 58 2e 53 48 20 | [pbmfil|e].X.SH |
|000011a0| 44 45 53 43 52 49 50 54 | 49 4f 4e 0a 58 52 65 61 |DESCRIPT|ION.XRea|
|000011b0| 64 73 20 61 20 70 6f 72 | 74 61 62 6c 65 20 62 69 |ds a por|table bi|
|000011c0| 74 6d 61 70 20 61 73 20 | 69 6e 70 75 74 2e 0a 58 |tmap as |input..X|
|000011d0| 50 72 6f 64 75 63 65 73 | 20 61 20 63 6f 6d 70 61 |Produces| a compa|
|000011e0| 63 74 20 62 69 74 6d 61 | 70 20 61 73 20 6f 75 74 |ct bitma|p as out|
|000011f0| 70 75 74 2e 0a 58 2e 53 | 48 20 22 53 45 45 20 41 |put..X.S|H "SEE A|
|00001200| 4c 53 4f 22 0a 58 63 62 | 6d 74 6f 70 62 6d 28 31 |LSO".Xcb|mtopbm(1|
|00001210| 29 2c 20 70 62 6d 28 35 | 29 0a 58 2e 53 48 20 41 |), pbm(5|).X.SH A|
|00001220| 55 54 48 4f 52 0a 58 43 | 6f 70 79 72 69 67 68 74 |UTHOR.XC|opyright|
|00001230| 20 28 43 29 20 31 39 38 | 38 20 62 79 20 4a 65 66 | (C) 198|8 by Jef|
|00001240| 20 50 6f 73 6b 61 6e 7a | 65 72 2e 0a 58 0a 58 50 | Poskanz|er..X.XP|
|00001250| 65 72 6d 69 73 73 69 6f | 6e 20 74 6f 20 75 73 65 |ermissio|n to use|
|00001260| 2c 20 63 6f 70 79 2c 20 | 6d 6f 64 69 66 79 2c 20 |, copy, |modify, |
|00001270| 61 6e 64 20 64 69 73 74 | 72 69 62 75 74 65 20 74 |and dist|ribute t|
|00001280| 68 69 73 20 73 6f 66 74 | 77 61 72 65 20 61 6e 64 |his soft|ware and|
|00001290| 20 69 74 73 0a 58 64 6f | 63 75 6d 65 6e 74 61 74 | its.Xdo|cumentat|
|000012a0| 69 6f 6e 20 66 6f 72 20 | 61 6e 79 20 70 75 72 70 |ion for |any purp|
|000012b0| 6f 73 65 20 61 6e 64 20 | 77 69 74 68 6f 75 74 20 |ose and |without |
|000012c0| 66 65 65 20 69 73 20 68 | 65 72 65 62 79 20 67 72 |fee is h|ereby gr|
|000012d0| 61 6e 74 65 64 2c 20 70 | 72 6f 76 69 64 65 64 0a |anted, p|rovided.|
|000012e0| 58 74 68 61 74 20 74 68 | 65 20 61 62 6f 76 65 20 |Xthat th|e above |
|000012f0| 63 6f 70 79 72 69 67 68 | 74 20 6e 6f 74 69 63 65 |copyrigh|t notice|
|00001300| 20 61 70 70 65 61 72 20 | 69 6e 20 61 6c 6c 20 63 | appear |in all c|
|00001310| 6f 70 69 65 73 20 61 6e | 64 20 74 68 61 74 20 62 |opies an|d that b|
|00001320| 6f 74 68 20 74 68 61 74 | 0a 58 63 6f 70 79 72 69 |oth that|.Xcopyri|
|00001330| 67 68 74 20 6e 6f 74 69 | 63 65 20 61 6e 64 20 74 |ght noti|ce and t|
|00001340| 68 69 73 20 70 65 72 6d | 69 73 73 69 6f 6e 20 6e |his perm|ission n|
|00001350| 6f 74 69 63 65 20 61 70 | 70 65 61 72 20 69 6e 20 |otice ap|pear in |
|00001360| 73 75 70 70 6f 72 74 69 | 6e 67 0a 58 64 6f 63 75 |supporti|ng.Xdocu|
|00001370| 6d 65 6e 74 61 74 69 6f | 6e 2e 20 20 54 68 69 73 |mentatio|n. This|
|00001380| 20 73 6f 66 74 77 61 72 | 65 20 69 73 20 70 72 6f | softwar|e is pro|
|00001390| 76 69 64 65 64 20 22 61 | 73 20 69 73 22 20 77 69 |vided "a|s is" wi|
|000013a0| 74 68 6f 75 74 20 65 78 | 70 72 65 73 73 20 6f 72 |thout ex|press or|
|000013b0| 0a 58 69 6d 70 6c 69 65 | 64 20 77 61 72 72 61 6e |.Ximplie|d warran|
|000013c0| 74 79 2e 0a 53 48 41 52 | 5f 45 4f 46 0a 69 66 20 |ty..SHAR|_EOF.if |
|000013d0| 74 65 73 74 20 36 36 39 | 20 2d 6e 65 20 22 60 77 |test 669| -ne "`w|
|000013e0| 63 20 2d 63 20 3c 20 27 | 70 62 6d 74 6f 63 62 6d |c -c < '|pbmtocbm|
|000013f0| 2e 31 27 60 22 0a 74 68 | 65 6e 0a 09 65 63 68 6f |.1'`".th|en..echo|
|00001400| 20 73 68 61 72 3a 20 65 | 72 72 6f 72 20 74 72 61 | shar: e|rror tra|
|00001410| 6e 73 6d 69 74 74 69 6e | 67 20 22 27 70 62 6d 74 |nsmittin|g "'pbmt|
|00001420| 6f 63 62 6d 2e 31 27 22 | 20 27 28 73 68 6f 75 6c |ocbm.1'"| '(shoul|
|00001430| 64 20 68 61 76 65 20 62 | 65 65 6e 20 36 36 39 20 |d have b|een 669 |
|00001440| 63 68 61 72 61 63 74 65 | 72 73 29 27 0a 66 69 0a |characte|rs)'.fi.|
|00001450| 66 69 20 23 20 65 6e 64 | 20 6f 66 20 6f 76 65 72 |fi # end| of over|
|00001460| 77 72 69 74 69 6e 67 20 | 63 68 65 63 6b 0a 65 63 |writing |check.ec|
|00001470| 68 6f 20 73 68 61 72 3a | 20 65 78 74 72 61 63 74 |ho shar:| extract|
|00001480| 69 6e 67 20 22 27 70 62 | 6d 74 6f 69 63 6f 6e 2e |ing "'pb|mtoicon.|
|00001490| 63 27 22 20 27 28 32 33 | 37 38 20 63 68 61 72 61 |c'" '(23|78 chara|
|000014a0| 63 74 65 72 73 29 27 0a | 69 66 20 74 65 73 74 20 |cters)'.|if test |
|000014b0| 2d 66 20 27 70 62 6d 74 | 6f 69 63 6f 6e 2e 63 27 |-f 'pbmt|oicon.c'|
|000014c0| 0a 74 68 65 6e 0a 09 65 | 63 68 6f 20 73 68 61 72 |.then..e|cho shar|
|000014d0| 3a 20 77 69 6c 6c 20 6e | 6f 74 20 6f 76 65 72 2d |: will n|ot over-|
|000014e0| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 20 66 |write ex|isting f|
|000014f0| 69 6c 65 20 22 27 70 62 | 6d 74 6f 69 63 6f 6e 2e |ile "'pb|mtoicon.|
|00001500| 63 27 22 0a 65 6c 73 65 | 0a 73 65 64 20 27 73 2f |c'".else|.sed 's/|
|00001510| 5e 58 2f 2f 27 20 3c 3c | 20 5c 53 48 41 52 5f 45 |^X//' <<| \SHAR_E|
|00001520| 4f 46 20 3e 20 27 70 62 | 6d 74 6f 69 63 6f 6e 2e |OF > 'pb|mtoicon.|
|00001530| 63 27 0a 58 2f 2a 20 70 | 62 6d 74 6f 69 63 6f 6e |c'.X/* p|bmtoicon|
|00001540| 2e 63 20 2d 20 72 65 61 | 64 20 61 20 70 6f 72 74 |.c - rea|d a port|
|00001550| 61 62 6c 65 20 62 69 74 | 6d 61 70 20 61 6e 64 20 |able bit|map and |
|00001560| 70 72 6f 64 75 63 65 20 | 61 20 53 75 6e 20 69 63 |produce |a Sun ic|
|00001570| 6f 6e 20 66 69 6c 65 0a | 58 2a 2a 0a 58 2a 2a 20 |on file.|X**.X** |
|00001580| 43 6f 70 79 72 69 67 68 | 74 20 28 43 29 20 31 39 |Copyrigh|t (C) 19|
|00001590| 38 38 20 62 79 20 4a 65 | 66 20 50 6f 73 6b 61 6e |88 by Je|f Poskan|
|000015a0| 7a 65 72 2e 0a 58 2a 2a | 0a 58 2a 2a 20 50 65 72 |zer..X**|.X** Per|
|000015b0| 6d 69 73 73 69 6f 6e 20 | 74 6f 20 75 73 65 2c 20 |mission |to use, |
|000015c0| 63 6f 70 79 2c 20 6d 6f | 64 69 66 79 2c 20 61 6e |copy, mo|dify, an|
|000015d0| 64 20 64 69 73 74 72 69 | 62 75 74 65 20 74 68 69 |d distri|bute thi|
|000015e0| 73 20 73 6f 66 74 77 61 | 72 65 20 61 6e 64 20 69 |s softwa|re and i|
|000015f0| 74 73 0a 58 2a 2a 20 64 | 6f 63 75 6d 65 6e 74 61 |ts.X** d|ocumenta|
|00001600| 74 69 6f 6e 20 66 6f 72 | 20 61 6e 79 20 70 75 72 |tion for| any pur|
|00001610| 70 6f 73 65 20 61 6e 64 | 20 77 69 74 68 6f 75 74 |pose and| without|
|00001620| 20 66 65 65 20 69 73 20 | 68 65 72 65 62 79 20 67 | fee is |hereby g|
|00001630| 72 61 6e 74 65 64 2c 20 | 70 72 6f 76 69 64 65 64 |ranted, |provided|
|00001640| 0a 58 2a 2a 20 74 68 61 | 74 20 74 68 65 20 61 62 |.X** tha|t the ab|
|00001650| 6f 76 65 20 63 6f 70 79 | 72 69 67 68 74 20 6e 6f |ove copy|right no|
|00001660| 74 69 63 65 20 61 70 70 | 65 61 72 20 69 6e 20 61 |tice app|ear in a|
|00001670| 6c 6c 20 63 6f 70 69 65 | 73 20 61 6e 64 20 74 68 |ll copie|s and th|
|00001680| 61 74 20 62 6f 74 68 20 | 74 68 61 74 0a 58 2a 2a |at both |that.X**|
|00001690| 20 63 6f 70 79 72 69 67 | 68 74 20 6e 6f 74 69 63 | copyrig|ht notic|
|000016a0| 65 20 61 6e 64 20 74 68 | 69 73 20 70 65 72 6d 69 |e and th|is permi|
|000016b0| 73 73 69 6f 6e 20 6e 6f | 74 69 63 65 20 61 70 70 |ssion no|tice app|
|000016c0| 65 61 72 20 69 6e 20 73 | 75 70 70 6f 72 74 69 6e |ear in s|upportin|
|000016d0| 67 0a 58 2a 2a 20 64 6f | 63 75 6d 65 6e 74 61 74 |g.X** do|cumentat|
|000016e0| 69 6f 6e 2e 20 20 54 68 | 69 73 20 73 6f 66 74 77 |ion. Th|is softw|
|000016f0| 61 72 65 20 69 73 20 70 | 72 6f 76 69 64 65 64 20 |are is p|rovided |
|00001700| 22 61 73 20 69 73 22 20 | 77 69 74 68 6f 75 74 20 |"as is" |without |
|00001710| 65 78 70 72 65 73 73 20 | 6f 72 0a 58 2a 2a 20 69 |express |or.X** i|
|00001720| 6d 70 6c 69 65 64 20 77 | 61 72 72 61 6e 74 79 2e |mplied w|arranty.|
|00001730| 0a 58 2a 2f 0a 58 0a 58 | 23 69 6e 63 6c 75 64 65 |.X*/.X.X|#include|
|00001740| 20 3c 73 74 64 69 6f 2e | 68 3e 0a 58 23 69 6e 63 | <stdio.|h>.X#inc|
|00001750| 6c 75 64 65 20 22 70 62 | 6d 2e 68 22 0a 58 0a 58 |lude "pb|m.h".X.X|
|00001760| 6d 61 69 6e 28 20 61 72 | 67 63 2c 20 61 72 67 76 |main( ar|gc, argv|
|00001770| 20 29 0a 58 69 6e 74 20 | 61 72 67 63 3b 0a 58 63 | ).Xint |argc;.Xc|
|00001780| 68 61 72 20 2a 61 72 67 | 76 5b 5d 3b 0a 58 20 20 |har *arg|v[];.X |
|00001790| 20 20 7b 0a 58 20 20 20 | 20 46 49 4c 45 20 2a 69 | {.X | FILE *i|
|000017a0| 66 64 3b 0a 58 20 20 20 | 20 62 69 74 20 2a 2a 62 |fd;.X | bit **b|
|000017b0| 69 74 73 3b 0a 58 20 20 | 20 20 69 6e 74 20 72 6f |its;.X | int ro|
|000017c0| 77 73 2c 20 63 6f 6c 73 | 2c 20 70 61 64 2c 20 70 |ws, cols|, pad, p|
|000017d0| 61 64 6c 65 66 74 2c 20 | 70 61 64 72 69 67 68 74 |adleft, |padright|
|000017e0| 2c 20 72 6f 77 2c 20 63 | 6f 6c 3b 0a 58 20 20 20 |, row, c|ol;.X |
|000017f0| 20 63 68 61 72 20 63 68 | 3b 0a 58 0a 58 20 20 20 | char ch|;.X.X |
|00001800| 20 69 66 20 28 20 61 72 | 67 63 20 3e 20 32 20 29 | if ( ar|gc > 2 )|
|00001810| 0a 58 09 7b 0a 58 09 66 | 70 72 69 6e 74 66 28 20 |.X.{.X.f|printf( |
|00001820| 73 74 64 65 72 72 2c 20 | 22 75 73 61 67 65 3a 20 |stderr, |"usage: |
|00001830| 20 25 73 20 5b 70 62 6d | 66 69 6c 65 5d 5c 6e 22 | %s [pbm|file]\n"|
|00001840| 2c 20 61 72 67 76 5b 30 | 5d 20 29 3b 0a 58 09 65 |, argv[0|] );.X.e|
|00001850| 78 69 74 28 20 31 20 29 | 3b 0a 58 09 7d 0a 58 0a |xit( 1 )|;.X.}.X.|
|00001860| 58 20 20 20 20 69 66 20 | 28 20 61 72 67 63 20 3d |X if |( argc =|
|00001870| 3d 20 32 20 29 0a 58 09 | 7b 0a 58 20 20 20 20 20 |= 2 ).X.|{.X |
|00001880| 20 20 20 69 66 64 20 3d | 20 66 6f 70 65 6e 28 20 | ifd =| fopen( |
|00001890| 61 72 67 76 5b 31 5d 2c | 20 22 72 22 20 29 3b 0a |argv[1],| "r" );.|
|000018a0| 58 20 20 20 20 20 20 20 | 20 69 66 20 28 20 69 66 |X | if ( if|
|000018b0| 64 20 3d 3d 20 4e 55 4c | 4c 20 29 0a 58 09 20 20 |d == NUL|L ).X. |
|000018c0| 20 20 7b 0a 58 09 20 20 | 20 20 66 70 72 69 6e 74 | {.X. | fprint|
|000018d0| 66 28 20 73 74 64 65 72 | 72 2c 20 22 25 73 3a 20 |f( stder|r, "%s: |
|000018e0| 63 61 6e 27 74 20 6f 70 | 65 6e 2e 5c 6e 22 2c 20 |can't op|en.\n", |
|000018f0| 61 72 67 76 5b 31 5d 20 | 29 3b 0a 58 09 20 20 20 |argv[1] |);.X. |
|00001900| 20 65 78 69 74 28 20 31 | 20 29 3b 0a 58 09 20 20 | exit( 1| );.X. |
|00001910| 20 20 7d 0a 58 09 7d 0a | 58 20 20 20 20 65 6c 73 | }.X.}.|X els|
|00001920| 65 0a 58 09 69 66 64 20 | 3d 20 73 74 64 69 6e 3b |e.X.ifd |= stdin;|
|00001930| 0a 58 0a 58 20 20 20 20 | 62 69 74 73 20 3d 20 70 |.X.X |bits = p|
|00001940| 62 6d 5f 72 65 61 64 70 | 62 6d 28 20 69 66 64 2c |bm_readp|bm( ifd,|
|00001950| 20 26 63 6f 6c 73 2c 20 | 26 72 6f 77 73 20 29 3b | &cols, |&rows );|
|00001960| 0a 58 0a 58 20 20 20 20 | 69 66 20 28 20 69 66 64 |.X.X |if ( ifd|
|00001970| 20 21 3d 20 73 74 64 69 | 6e 20 29 0a 58 09 66 63 | != stdi|n ).X.fc|
|00001980| 6c 6f 73 65 28 20 69 66 | 64 20 29 3b 0a 58 20 20 |lose( if|d );.X |
|00001990| 20 20 0a 58 20 20 20 20 | 2f 2a 20 52 6f 75 6e 64 | .X |/* Round|
|000019a0| 20 63 6f 6c 73 20 75 70 | 20 74 6f 20 74 68 65 20 | cols up| to the |
|000019b0| 6e 65 61 72 65 73 74 20 | 6d 75 6c 74 69 70 6c 65 |nearest |multiple|
|000019c0| 20 6f 66 20 31 36 2e 20 | 2a 2f 0a 58 20 20 20 20 | of 16. |*/.X |
|000019d0| 70 61 64 20 3d 20 28 20 | 28 20 63 6f 6c 73 20 2b |pad = ( |( cols +|
|000019e0| 20 31 35 20 29 20 2f 20 | 31 36 20 29 20 2a 20 31 | 15 ) / |16 ) * 1|
|000019f0| 36 20 2d 20 63 6f 6c 73 | 3b 0a 58 20 20 20 20 70 |6 - cols|;.X p|
|00001a00| 61 64 6c 65 66 74 20 3d | 20 70 61 64 20 2f 20 32 |adleft =| pad / 2|
|00001a10| 3b 0a 58 20 20 20 20 70 | 61 64 72 69 67 68 74 20 |;.X p|adright |
|00001a20| 3d 20 70 61 64 20 2d 20 | 70 61 64 6c 65 66 74 3b |= pad - |padleft;|
|00001a30| 0a 58 0a 58 20 20 20 20 | 70 72 69 6e 74 66 28 20 |.X.X |printf( |
|00001a40| 22 2f 2a 20 46 6f 72 6d | 61 74 5f 76 65 72 73 69 |"/* Form|at_versi|
|00001a50| 6f 6e 3d 31 2c 20 57 69 | 64 74 68 3d 25 64 2c 20 |on=1, Wi|dth=%d, |
|00001a60| 48 65 69 67 68 74 3d 25 | 64 22 2c 20 63 6f 6c 73 |Height=%|d", cols|
|00001a70| 20 2b 20 70 61 64 2c 20 | 72 6f 77 73 20 29 3b 0a | + pad, |rows );.|
|00001a80| 58 20 20 20 20 70 72 69 | 6e 74 66 28 20 22 2c 20 |X pri|ntf( ", |
|00001a90| 44 65 70 74 68 3d 31 2c | 20 56 61 6c 69 64 5f 62 |Depth=1,| Valid_b|
|00001aa0| 69 74 73 5f 70 65 72 5f | 69 74 65 6d 3d 31 36 5c |its_per_|item=16\|
|00001ab0| 6e 20 2a 2f 5c 6e 22 20 | 29 3b 0a 58 0a 58 20 20 |n */\n" |);.X.X |
|00001ac0| 20 20 70 75 74 69 6e 69 | 74 28 20 29 3b 0a 58 20 | putini|t( );.X |
|00001ad0| 20 20 20 66 6f 72 20 28 | 20 72 6f 77 20 3d 20 30 | for (| row = 0|
|00001ae0| 3b 20 72 6f 77 20 3c 20 | 72 6f 77 73 3b 20 72 6f |; row < |rows; ro|
|00001af0| 77 2b 2b 20 29 0a 58 09 | 7b 0a 58 09 66 6f 72 20 |w++ ).X.|{.X.for |
|00001b00| 28 20 63 6f 6c 20 3d 20 | 30 3b 20 63 6f 6c 20 3c |( col = |0; col <|
|00001b10| 20 70 61 64 6c 65 66 74 | 3b 20 63 6f 6c 2b 2b 20 | padleft|; col++ |
|00001b20| 29 0a 58 09 20 20 20 20 | 70 75 74 62 69 74 28 20 |).X. |putbit( |
|00001b30| 30 20 29 3b 0a 58 20 20 | 20 20 20 20 20 20 66 6f |0 );.X | fo|
|00001b40| 72 20 28 20 63 6f 6c 20 | 3d 20 30 3b 20 63 6f 6c |r ( col |= 0; col|
|00001b50| 20 3c 20 63 6f 6c 73 3b | 20 63 6f 6c 2b 2b 20 29 | < cols;| col++ )|
|00001b60| 0a 58 09 20 20 20 20 70 | 75 74 62 69 74 28 20 62 |.X. p|utbit( b|
|00001b70| 69 74 73 5b 72 6f 77 5d | 5b 63 6f 6c 5d 20 29 3b |its[row]|[col] );|
|00001b80| 0a 58 09 66 6f 72 20 28 | 20 63 6f 6c 20 3d 20 30 |.X.for (| col = 0|
|00001b90| 3b 20 63 6f 6c 20 3c 20 | 70 61 64 72 69 67 68 74 |; col < |padright|
|00001ba0| 3b 20 63 6f 6c 2b 2b 20 | 29 0a 58 09 20 20 20 20 |; col++ |).X. |
|00001bb0| 70 75 74 62 69 74 28 20 | 30 20 29 3b 0a 58 20 20 |putbit( |0 );.X |
|00001bc0| 20 20 20 20 20 20 7d 0a | 58 20 20 20 20 70 75 74 | }.|X put|
|00001bd0| 72 65 73 74 28 20 29 3b | 0a 58 0a 58 20 20 20 20 |rest( );|.X.X |
|00001be0| 65 78 69 74 28 20 30 20 | 29 3b 0a 58 20 20 20 20 |exit( 0 |);.X |
|00001bf0| 7d 0a 58 0a 58 0a 58 69 | 6e 74 20 69 74 65 6d 2c |}.X.X.Xi|nt item,|
|00001c00| 20 62 69 74 73 70 65 72 | 69 74 65 6d 2c 20 62 69 | bitsper|item, bi|
|00001c10| 74 73 68 69 66 74 2c 20 | 69 74 65 6d 73 70 65 72 |tshift, |itemsper|
|00001c20| 6c 69 6e 65 2c 20 66 69 | 72 73 74 69 74 65 6d 3b |line, fi|rstitem;|
|00001c30| 0a 58 0a 58 70 75 74 69 | 6e 69 74 28 20 29 0a 58 |.X.Xputi|nit( ).X|
|00001c40| 20 20 20 20 7b 0a 58 20 | 20 20 20 69 74 65 6d 73 | {.X | items|
|00001c50| 70 65 72 6c 69 6e 65 20 | 3d 20 30 3b 0a 58 20 20 |perline |= 0;.X |
|00001c60| 20 20 62 69 74 73 70 65 | 72 69 74 65 6d 20 3d 20 | bitspe|ritem = |
|00001c70| 30 3b 0a 58 20 20 20 20 | 69 74 65 6d 20 3d 20 30 |0;.X |item = 0|
|00001c80| 3b 0a 58 20 20 20 20 62 | 69 74 73 68 69 66 74 20 |;.X b|itshift |
|00001c90| 3d 20 31 35 3b 0a 58 20 | 20 20 20 66 69 72 73 74 |= 15;.X | first|
|00001ca0| 69 74 65 6d 20 3d 20 31 | 3b 0a 58 20 20 20 20 7d |item = 1|;.X }|
|00001cb0| 0a 58 0a 58 70 75 74 62 | 69 74 28 20 62 20 29 0a |.X.Xputb|it( b ).|
|00001cc0| 58 62 69 74 20 62 3b 0a | 58 20 20 20 20 7b 0a 58 |Xbit b;.|X {.X|
|00001cd0| 20 20 20 20 69 66 20 28 | 20 62 69 74 73 70 65 72 | if (| bitsper|
|00001ce0| 69 74 65 6d 20 3d 3d 20 | 31 36 20 29 0a 58 09 70 |item == |16 ).X.p|
|00001cf0| 75 74 69 74 65 6d 28 20 | 29 3b 0a 58 20 20 20 20 |utitem( |);.X |
|00001d00| 62 69 74 73 70 65 72 69 | 74 65 6d 2b 2b 3b 0a 58 |bitsperi|tem++;.X|
|00001d10| 20 20 20 20 69 66 20 28 | 20 62 20 29 0a 58 09 69 | if (| b ).X.i|
|00001d20| 74 65 6d 20 2b 3d 20 31 | 20 3c 3c 20 62 69 74 73 |tem += 1| << bits|
|00001d30| 68 69 66 74 3b 0a 58 20 | 20 20 20 62 69 74 73 68 |hift;.X | bitsh|
|00001d40| 69 66 74 2d 2d 3b 0a 58 | 20 20 20 20 7d 0a 58 0a |ift--;.X| }.X.|
|00001d50| 58 70 75 74 72 65 73 74 | 28 20 29 0a 58 20 20 20 |Xputrest|( ).X |
|00001d60| 20 7b 0a 58 20 20 20 20 | 69 66 20 28 20 62 69 74 | {.X |if ( bit|
|00001d70| 73 70 65 72 69 74 65 6d | 20 3e 20 30 20 29 0a 58 |speritem| > 0 ).X|
|00001d80| 09 70 75 74 69 74 65 6d | 28 20 29 3b 0a 58 20 20 |.putitem|( );.X |
|00001d90| 20 20 70 75 74 63 68 61 | 72 28 20 27 5c 6e 27 20 | putcha|r( '\n' |
|00001da0| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 0a 58 70 75 74 |);.X |}.X.Xput|
|00001db0| 69 74 65 6d 28 20 29 0a | 58 20 20 20 20 7b 0a 58 |item( ).|X {.X|
|00001dc0| 20 20 20 20 69 66 20 28 | 20 66 69 72 73 74 69 74 | if (| firstit|
|00001dd0| 65 6d 20 29 0a 58 09 66 | 69 72 73 74 69 74 65 6d |em ).X.f|irstitem|
|00001de0| 20 3d 20 30 3b 0a 58 20 | 20 20 20 65 6c 73 65 0a | = 0;.X | else.|
|00001df0| 58 09 70 75 74 63 68 61 | 72 28 20 27 2c 27 20 29 |X.putcha|r( ',' )|
|00001e00| 3b 0a 58 20 20 20 20 69 | 66 20 28 20 69 74 65 6d |;.X i|f ( item|
|00001e10| 73 70 65 72 6c 69 6e 65 | 20 3d 3d 20 38 20 29 0a |sperline| == 8 ).|
|00001e20| 58 09 7b 0a 58 09 70 75 | 74 63 68 61 72 28 20 27 |X.{.X.pu|tchar( '|
|00001e30| 5c 6e 27 20 29 3b 0a 58 | 09 69 74 65 6d 73 70 65 |\n' );.X|.itemspe|
|00001e40| 72 6c 69 6e 65 20 3d 20 | 30 3b 0a 58 09 7d 0a 58 |rline = |0;.X.}.X|
|00001e50| 20 20 20 20 69 66 20 28 | 20 69 74 65 6d 73 70 65 | if (| itemspe|
|00001e60| 72 6c 69 6e 65 20 3d 3d | 20 30 20 29 0a 58 09 70 |rline ==| 0 ).X.p|
|00001e70| 75 74 63 68 61 72 28 20 | 27 5c 74 27 20 29 3b 0a |utchar( |'\t' );.|
|00001e80| 58 20 20 20 20 69 74 65 | 6d 73 70 65 72 6c 69 6e |X ite|msperlin|
|00001e90| 65 2b 2b 3b 0a 58 20 20 | 20 20 70 72 69 6e 74 66 |e++;.X | printf|
|00001ea0| 28 20 22 30 78 25 30 34 | 78 22 2c 20 69 74 65 6d |( "0x%04|x", item|
|00001eb0| 20 29 3b 0a 58 20 20 20 | 20 62 69 74 73 70 65 72 | );.X | bitsper|
|00001ec0| 69 74 65 6d 20 3d 20 30 | 3b 0a 58 20 20 20 20 69 |item = 0|;.X i|
|00001ed0| 74 65 6d 20 3d 20 30 3b | 0a 58 20 20 20 20 62 69 |tem = 0;|.X bi|
|00001ee0| 74 73 68 69 66 74 20 3d | 20 31 35 3b 0a 58 20 20 |tshift =| 15;.X |
|00001ef0| 20 20 7d 0a 53 48 41 52 | 5f 45 4f 46 0a 69 66 20 | }.SHAR|_EOF.if |
|00001f00| 74 65 73 74 20 32 33 37 | 38 20 2d 6e 65 20 22 60 |test 237|8 -ne "`|
|00001f10| 77 63 20 2d 63 20 3c 20 | 27 70 62 6d 74 6f 69 63 |wc -c < |'pbmtoic|
|00001f20| 6f 6e 2e 63 27 60 22 0a | 74 68 65 6e 0a 09 65 63 |on.c'`".|then..ec|
|00001f30| 68 6f 20 73 68 61 72 3a | 20 65 72 72 6f 72 20 74 |ho shar:| error t|
|00001f40| 72 61 6e 73 6d 69 74 74 | 69 6e 67 20 22 27 70 62 |ransmitt|ing "'pb|
|00001f50| 6d 74 6f 69 63 6f 6e 2e | 63 27 22 20 27 28 73 68 |mtoicon.|c'" '(sh|
|00001f60| 6f 75 6c 64 20 68 61 76 | 65 20 62 65 65 6e 20 32 |ould hav|e been 2|
|00001f70| 33 37 38 20 63 68 61 72 | 61 63 74 65 72 73 29 27 |378 char|acters)'|
|00001f80| 0a 66 69 0a 66 69 20 23 | 20 65 6e 64 20 6f 66 20 |.fi.fi #| end of |
|00001f90| 6f 76 65 72 77 72 69 74 | 69 6e 67 20 63 68 65 63 |overwrit|ing chec|
|00001fa0| 6b 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 65 78 74 |k.echo s|har: ext|
|00001fb0| 72 61 63 74 69 6e 67 20 | 22 27 70 62 6d 74 6f 69 |racting |"'pbmtoi|
|00001fc0| 63 6f 6e 2e 31 27 22 20 | 27 28 36 36 32 20 63 68 |con.1'" |'(662 ch|
|00001fd0| 61 72 61 63 74 65 72 73 | 29 27 0a 69 66 20 74 65 |aracters|)'.if te|
|00001fe0| 73 74 20 2d 66 20 27 70 | 62 6d 74 6f 69 63 6f 6e |st -f 'p|bmtoicon|
|00001ff0| 2e 31 27 0a 74 68 65 6e | 0a 09 65 63 68 6f 20 73 |.1'.then|..echo s|
|00002000| 68 61 72 3a 20 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |har: wil|l not ov|
|00002010| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|00002020| 67 20 66 69 6c 65 20 22 | 27 70 62 6d 74 6f 69 63 |g file "|'pbmtoic|
|00002030| 6f 6e 2e 31 27 22 0a 65 | 6c 73 65 0a 73 65 64 20 |on.1'".e|lse.sed |
|00002040| 27 73 2f 5e 58 2f 2f 27 | 20 3c 3c 20 5c 53 48 41 |'s/^X//'| << \SHA|
|00002050| 52 5f 45 4f 46 20 3e 20 | 27 70 62 6d 74 6f 69 63 |R_EOF > |'pbmtoic|
|00002060| 6f 6e 2e 31 27 0a 58 2e | 54 48 20 70 62 6d 74 6f |on.1'.X.|TH pbmto|
|00002070| 69 63 6f 6e 20 31 20 22 | 33 31 20 41 75 67 75 73 |icon 1 "|31 Augus|
|00002080| 74 20 31 39 38 38 22 0a | 58 2e 53 48 20 4e 41 4d |t 1988".|X.SH NAM|
|00002090| 45 0a 58 70 62 6d 74 6f | 69 63 6f 6e 20 2d 20 63 |E.Xpbmto|icon - c|
|000020a0| 6f 6e 76 65 72 74 20 70 | 6f 72 74 61 62 6c 65 20 |onvert p|ortable |
|000020b0| 62 69 74 6d 61 70 73 20 | 69 6e 74 6f 20 53 75 6e |bitmaps |into Sun|
|000020c0| 20 69 63 6f 6e 73 20 0a | 58 2e 53 48 20 53 59 4e | icons .|X.SH SYN|
|000020d0| 4f 50 53 49 53 0a 58 70 | 62 6d 74 6f 69 63 6f 6e |OPSIS.Xp|bmtoicon|
|000020e0| 20 5b 70 62 6d 66 69 6c | 65 5d 0a 58 2e 53 48 20 | [pbmfil|e].X.SH |
|000020f0| 44 45 53 43 52 49 50 54 | 49 4f 4e 0a 58 52 65 61 |DESCRIPT|ION.XRea|
|00002100| 64 73 20 61 20 70 6f 72 | 74 61 62 6c 65 20 62 69 |ds a por|table bi|
|00002110| 74 6d 61 70 20 61 73 20 | 69 6e 70 75 74 2e 0a 58 |tmap as |input..X|
|00002120| 50 72 6f 64 75 63 65 73 | 20 61 20 53 75 6e 20 69 |Produces| a Sun i|
|00002130| 63 6f 6e 20 61 73 20 6f | 75 74 70 75 74 2e 0a 58 |con as o|utput..X|
|00002140| 2e 53 48 20 22 53 45 45 | 20 41 4c 53 4f 22 0a 58 |.SH "SEE| ALSO".X|
|00002150| 69 63 6f 6e 74 6f 70 62 | 6d 28 31 29 2c 20 70 62 |icontopb|m(1), pb|
|00002160| 6d 28 35 29 0a 58 2e 53 | 48 20 41 55 54 48 4f 52 |m(5).X.S|H AUTHOR|
|00002170| 0a 58 43 6f 70 79 72 69 | 67 68 74 20 28 43 29 20 |.XCopyri|ght (C) |
|00002180| 31 39 38 38 20 62 79 20 | 4a 65 66 20 50 6f 73 6b |1988 by |Jef Posk|
|00002190| 61 6e 7a 65 72 2e 0a 58 | 0a 58 50 65 72 6d 69 73 |anzer..X|.XPermis|
|000021a0| 73 69 6f 6e 20 74 6f 20 | 75 73 65 2c 20 63 6f 70 |sion to |use, cop|
|000021b0| 79 2c 20 6d 6f 64 69 66 | 79 2c 20 61 6e 64 20 64 |y, modif|y, and d|
|000021c0| 69 73 74 72 69 62 75 74 | 65 20 74 68 69 73 20 73 |istribut|e this s|
|000021d0| 6f 66 74 77 61 72 65 20 | 61 6e 64 20 69 74 73 0a |oftware |and its.|
|000021e0| 58 64 6f 63 75 6d 65 6e | 74 61 74 69 6f 6e 20 66 |Xdocumen|tation f|
|000021f0| 6f 72 20 61 6e 79 20 70 | 75 72 70 6f 73 65 20 61 |or any p|urpose a|
|00002200| 6e 64 20 77 69 74 68 6f | 75 74 20 66 65 65 20 69 |nd witho|ut fee i|
|00002210| 73 20 68 65 72 65 62 79 | 20 67 72 61 6e 74 65 64 |s hereby| granted|
|00002220| 2c 20 70 72 6f 76 69 64 | 65 64 0a 58 74 68 61 74 |, provid|ed.Xthat|
|00002230| 20 74 68 65 20 61 62 6f | 76 65 20 63 6f 70 79 72 | the abo|ve copyr|
|00002240| 69 67 68 74 20 6e 6f 74 | 69 63 65 20 61 70 70 65 |ight not|ice appe|
|00002250| 61 72 20 69 6e 20 61 6c | 6c 20 63 6f 70 69 65 73 |ar in al|l copies|
|00002260| 20 61 6e 64 20 74 68 61 | 74 20 62 6f 74 68 20 74 | and tha|t both t|
|00002270| 68 61 74 0a 58 63 6f 70 | 79 72 69 67 68 74 20 6e |hat.Xcop|yright n|
|00002280| 6f 74 69 63 65 20 61 6e | 64 20 74 68 69 73 20 70 |otice an|d this p|
|00002290| 65 72 6d 69 73 73 69 6f | 6e 20 6e 6f 74 69 63 65 |ermissio|n notice|
|000022a0| 20 61 70 70 65 61 72 20 | 69 6e 20 73 75 70 70 6f | appear |in suppo|
|000022b0| 72 74 69 6e 67 0a 58 64 | 6f 63 75 6d 65 6e 74 61 |rting.Xd|ocumenta|
|000022c0| 74 69 6f 6e 2e 20 20 54 | 68 69 73 20 73 6f 66 74 |tion. T|his soft|
|000022d0| 77 61 72 65 20 69 73 20 | 70 72 6f 76 69 64 65 64 |ware is |provided|
|000022e0| 20 22 61 73 20 69 73 22 | 20 77 69 74 68 6f 75 74 | "as is"| without|
|000022f0| 20 65 78 70 72 65 73 73 | 20 6f 72 0a 58 69 6d 70 | express| or.Ximp|
|00002300| 6c 69 65 64 20 77 61 72 | 72 61 6e 74 79 2e 0a 53 |lied war|ranty..S|
|00002310| 48 41 52 5f 45 4f 46 0a | 69 66 20 74 65 73 74 20 |HAR_EOF.|if test |
|00002320| 36 36 32 20 2d 6e 65 20 | 22 60 77 63 20 2d 63 20 |662 -ne |"`wc -c |
|00002330| 3c 20 27 70 62 6d 74 6f | 69 63 6f 6e 2e 31 27 60 |< 'pbmto|icon.1'`|
|00002340| 22 0a 74 68 65 6e 0a 09 | 65 63 68 6f 20 73 68 61 |".then..|echo sha|
|00002350| 72 3a 20 65 72 72 6f 72 | 20 74 72 61 6e 73 6d 69 |r: error| transmi|
|00002360| 74 74 69 6e 67 20 22 27 | 70 62 6d 74 6f 69 63 6f |tting "'|pbmtoico|
|00002370| 6e 2e 31 27 22 20 27 28 | 73 68 6f 75 6c 64 20 68 |n.1'" '(|should h|
|00002380| 61 76 65 20 62 65 65 6e | 20 36 36 32 20 63 68 61 |ave been| 662 cha|
|00002390| 72 61 63 74 65 72 73 29 | 27 0a 66 69 0a 66 69 20 |racters)|'.fi.fi |
|000023a0| 23 20 65 6e 64 20 6f 66 | 20 6f 76 65 72 77 72 69 |# end of| overwri|
|000023b0| 74 69 6e 67 20 63 68 65 | 63 6b 0a 65 63 68 6f 20 |ting che|ck.echo |
|000023c0| 73 68 61 72 3a 20 65 78 | 74 72 61 63 74 69 6e 67 |shar: ex|tracting|
|000023d0| 20 22 27 70 62 6d 74 6f | 70 73 2e 63 27 22 20 27 | "'pbmto|ps.c'" '|
|000023e0| 28 36 31 35 32 20 63 68 | 61 72 61 63 74 65 72 73 |(6152 ch|aracters|
|000023f0| 29 27 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 70 |)'.if te|st -f 'p|
|00002400| 62 6d 74 6f 70 73 2e 63 | 27 0a 74 68 65 6e 0a 09 |bmtops.c|'.then..|
|00002410| 65 63 68 6f 20 73 68 61 | 72 3a 20 77 69 6c 6c 20 |echo sha|r: will |
|00002420| 6e 6f 74 20 6f 76 65 72 | 2d 77 72 69 74 65 20 65 |not over|-write e|
|00002430| 78 69 73 74 69 6e 67 20 | 66 69 6c 65 20 22 27 70 |xisting |file "'p|
|00002440| 62 6d 74 6f 70 73 2e 63 | 27 22 0a 65 6c 73 65 0a |bmtops.c|'".else.|
|00002450| 73 65 64 20 27 73 2f 5e | 58 2f 2f 27 20 3c 3c 20 |sed 's/^|X//' << |
|00002460| 5c 53 48 41 52 5f 45 4f | 46 20 3e 20 27 70 62 6d |\SHAR_EO|F > 'pbm|
|00002470| 74 6f 70 73 2e 63 27 0a | 58 2f 2a 20 70 62 6d 74 |tops.c'.|X/* pbmt|
|00002480| 6f 70 73 2e 63 20 2d 20 | 72 65 61 64 20 61 20 70 |ops.c - |read a p|
|00002490| 6f 72 74 61 62 6c 65 20 | 62 69 74 6d 61 70 20 61 |ortable |bitmap a|
|000024a0| 6e 64 20 70 72 6f 64 75 | 63 65 20 61 20 50 6f 73 |nd produ|ce a Pos|
|000024b0| 74 53 63 72 69 70 74 20 | 62 69 74 6d 61 70 20 66 |tScript |bitmap f|
|000024c0| 69 6c 65 0a 58 2a 2a 0a | 58 2a 2a 20 43 6f 70 79 |ile.X**.|X** Copy|
|000024d0| 72 69 67 68 74 20 28 43 | 29 20 31 39 38 38 20 62 |right (C|) 1988 b|
|000024e0| 79 20 4a 65 66 20 50 6f | 73 6b 61 6e 7a 65 72 2e |y Jef Po|skanzer.|
|000024f0| 0a 58 2a 2a 0a 58 2a 2a | 20 50 65 72 6d 69 73 73 |.X**.X**| Permiss|
|00002500| 69 6f 6e 20 74 6f 20 75 | 73 65 2c 20 63 6f 70 79 |ion to u|se, copy|
|00002510| 2c 20 6d 6f 64 69 66 79 | 2c 20 61 6e 64 20 64 69 |, modify|, and di|
|00002520| 73 74 72 69 62 75 74 65 | 20 74 68 69 73 20 73 6f |stribute| this so|
|00002530| 66 74 77 61 72 65 20 61 | 6e 64 20 69 74 73 0a 58 |ftware a|nd its.X|
|00002540| 2a 2a 20 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |** docum|entation|
|00002550| 20 66 6f 72 20 61 6e 79 | 20 70 75 72 70 6f 73 65 | for any| purpose|
|00002560| 20 61 6e 64 20 77 69 74 | 68 6f 75 74 20 66 65 65 | and wit|hout fee|
|00002570| 20 69 73 20 68 65 72 65 | 62 79 20 67 72 61 6e 74 | is here|by grant|
|00002580| 65 64 2c 20 70 72 6f 76 | 69 64 65 64 0a 58 2a 2a |ed, prov|ided.X**|
|00002590| 20 74 68 61 74 20 74 68 | 65 20 61 62 6f 76 65 20 | that th|e above |
|000025a0| 63 6f 70 79 72 69 67 68 | 74 20 6e 6f 74 69 63 65 |copyrigh|t notice|
|000025b0| 20 61 70 70 65 61 72 20 | 69 6e 20 61 6c 6c 20 63 | appear |in all c|
|000025c0| 6f 70 69 65 73 20 61 6e | 64 20 74 68 61 74 20 62 |opies an|d that b|
|000025d0| 6f 74 68 20 74 68 61 74 | 0a 58 2a 2a 20 63 6f 70 |oth that|.X** cop|
|000025e0| 79 72 69 67 68 74 20 6e | 6f 74 69 63 65 20 61 6e |yright n|otice an|
|000025f0| 64 20 74 68 69 73 20 70 | 65 72 6d 69 73 73 69 6f |d this p|ermissio|
|00002600| 6e 20 6e 6f 74 69 63 65 | 20 61 70 70 65 61 72 20 |n notice| appear |
|00002610| 69 6e 20 73 75 70 70 6f | 72 74 69 6e 67 0a 58 2a |in suppo|rting.X*|
|00002620| 2a 20 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 2e |* docume|ntation.|
|00002630| 20 20 54 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 | This s|oftware |
|00002640| 69 73 20 70 72 6f 76 69 | 64 65 64 20 22 61 73 20 |is provi|ded "as |
|00002650| 69 73 22 20 77 69 74 68 | 6f 75 74 20 65 78 70 72 |is" with|out expr|
|00002660| 65 73 73 20 6f 72 0a 58 | 2a 2a 20 69 6d 70 6c 69 |ess or.X|** impli|
|00002670| 65 64 20 77 61 72 72 61 | 6e 74 79 2e 0a 58 2a 2f |ed warra|nty..X*/|
|00002680| 0a 58 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 73 74 |.X.X#inc|lude <st|
|00002690| 64 69 6f 2e 68 3e 0a 58 | 23 69 66 64 65 66 09 4f |dio.h>.X|#ifdef.O|
|000026a0| 53 5f 53 59 53 56 0a 58 | 23 69 6e 63 6c 75 64 65 |S_SYSV.X|#include|
|000026b0| 20 3c 73 74 72 69 6e 67 | 2e 68 3e 0a 58 23 65 6c | <string|.h>.X#el|
|000026c0| 73 65 09 4f 53 5f 53 59 | 53 56 0a 58 23 69 6e 63 |se.OS_SY|SV.X#inc|
|000026d0| 6c 75 64 65 20 3c 73 74 | 72 69 6e 67 73 2e 68 3e |lude <st|rings.h>|
|000026e0| 0a 58 23 65 6e 64 69 66 | 09 4f 53 5f 53 59 53 56 |.X#endif|.OS_SYSV|
|000026f0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 22 70 62 6d 2e |.X#inclu|de "pbm.|
|00002700| 68 22 0a 58 0a 58 6d 61 | 69 6e 28 20 61 72 67 63 |h".X.Xma|in( argc|
|00002710| 2c 20 61 72 67 76 20 29 | 0a 58 69 6e 74 20 61 72 |, argv )|.Xint ar|
|00002720| 67 63 3b 0a 58 63 68 61 | 72 20 2a 61 72 67 76 5b |gc;.Xcha|r *argv[|
|00002730| 5d 3b 0a 58 20 20 20 20 | 7b 0a 58 20 20 20 20 46 |];.X |{.X F|
|00002740| 49 4c 45 20 2a 69 66 64 | 3b 0a 58 20 20 20 20 62 |ILE *ifd|;.X b|
|00002750| 69 74 20 2a 2a 62 69 74 | 73 3b 0a 58 20 20 20 20 |it **bit|s;.X |
|00002760| 69 6e 74 20 61 72 67 6e | 2c 20 72 6f 77 73 2c 20 |int argn|, rows, |
|00002770| 63 6f 6c 73 2c 20 70 61 | 64 72 69 67 68 74 2c 20 |cols, pa|dright, |
|00002780| 72 6f 77 2c 20 63 6f 6c | 3b 0a 58 20 20 20 20 63 |row, col|;.X c|
|00002790| 68 61 72 20 63 68 3b 0a | 58 20 20 20 20 66 6c 6f |har ch;.|X flo|
|000027a0| 61 74 20 73 63 61 6c 65 | 3b 0a 58 20 20 20 20 63 |at scale|;.X c|
|000027b0| 68 61 72 20 6e 61 6d 65 | 5b 31 30 30 5d 2c 20 2a |har name|[100], *|
|000027c0| 63 70 3b 0a 58 20 20 20 | 20 63 68 61 72 20 2a 75 |cp;.X | char *u|
|000027d0| 73 61 67 65 20 3d 20 22 | 75 73 61 67 65 3a 20 20 |sage = "|usage: |
|000027e0| 25 73 20 5b 2d 73 20 73 | 63 61 6c 65 5d 20 5b 70 |%s [-s s|cale] [p|
|000027f0| 62 6d 66 69 6c 65 5d 5c | 6e 22 3b 0a 58 0a 58 20 |bmfile]\|n";.X.X |
|00002800| 20 20 20 61 72 67 6e 20 | 3d 20 31 3b 0a 58 20 20 | argn |= 1;.X |
|00002810| 20 20 73 63 61 6c 65 20 | 3d 20 31 2e 30 3b 0a 58 | scale |= 1.0;.X|
|00002820| 0a 58 20 20 20 20 2f 2a | 20 43 68 65 63 6b 20 66 |.X /*| Check f|
|00002830| 6f 72 20 66 6c 61 67 73 | 2e 20 2a 2f 0a 58 20 20 |or flags|. */.X |
|00002840| 20 20 69 66 20 28 20 61 | 72 67 6e 20 3c 20 61 72 | if ( a|rgn < ar|
|00002850| 67 63 20 29 0a 58 09 7b | 0a 58 09 69 66 20 28 20 |gc ).X.{|.X.if ( |
|00002860| 61 72 67 76 5b 61 72 67 | 6e 5d 5b 30 5d 20 3d 3d |argv[arg|n][0] ==|
|00002870| 20 27 2d 27 20 29 0a 58 | 09 20 20 20 20 7b 0a 58 | '-' ).X|. {.X|
|00002880| 09 20 20 20 20 69 66 20 | 28 20 28 20 61 72 67 76 |. if |( ( argv|
|00002890| 5b 61 72 67 6e 5d 5b 31 | 5d 20 3d 3d 20 27 73 27 |[argn][1|] == 's'|
|000028a0| 20 7c 7c 20 61 72 67 76 | 5b 61 72 67 6e 5d 5b 31 | || argv|[argn][1|
|000028b0| 5d 20 3d 3d 20 27 53 27 | 20 29 20 26 26 0a 58 09 |] == 'S'| ) &&.X.|
|000028c0| 09 20 61 72 67 76 5b 61 | 72 67 6e 5d 5b 32 5d 20 |. argv[a|rgn][2] |
|000028d0| 3d 3d 20 27 5c 30 27 20 | 29 0a 58 09 09 7b 0a 58 |== '\0' |).X..{.X|
|000028e0| 09 09 61 72 67 6e 2b 2b | 3b 0a 58 09 09 69 66 20 |..argn++|;.X..if |
|000028f0| 28 20 61 72 67 6e 20 3d | 3d 20 61 72 67 63 20 29 |( argn =|= argc )|
|00002900| 0a 58 09 09 20 20 20 20 | 7b 0a 58 09 09 20 20 20 |.X.. |{.X.. |
|00002910| 20 66 70 72 69 6e 74 66 | 28 20 73 74 64 65 72 72 | fprintf|( stderr|
|00002920| 2c 20 75 73 61 67 65 2c | 20 61 72 67 76 5b 30 5d |, usage,| argv[0]|
|00002930| 20 29 3b 0a 58 09 09 20 | 20 20 20 65 78 69 74 28 | );.X.. | exit(|
|00002940| 20 31 20 29 3b 0a 58 09 | 09 20 20 20 20 7d 0a 58 | 1 );.X.|. }.X|
|00002950| 09 09 69 66 20 28 20 73 | 73 63 61 6e 66 28 20 61 |..if ( s|scanf( a|
|00002960| 72 67 76 5b 61 72 67 6e | 5d 2c 20 22 25 66 22 2c |rgv[argn|], "%f",|
|00002970| 20 26 73 63 61 6c 65 20 | 29 20 21 3d 20 31 20 29 | &scale |) != 1 )|
|00002980| 0a 58 09 09 20 20 20 20 | 7b 0a 58 09 09 20 20 20 |.X.. |{.X.. |
|00002990| 20 66 70 72 69 6e 74 66 | 28 20 73 74 64 65 72 72 | fprintf|( stderr|
|000029a0| 2c 20 75 73 61 67 65 2c | 20 61 72 67 76 5b 30 5d |, usage,| argv[0]|
|000029b0| 20 29 3b 0a 58 09 09 20 | 20 20 20 65 78 69 74 28 | );.X.. | exit(|
|000029c0| 20 31 20 29 3b 0a 58 09 | 09 20 20 20 20 7d 0a 58 | 1 );.X.|. }.X|
|000029d0| 09 09 61 72 67 6e 2b 2b | 3b 0a 58 09 09 7d 0a 58 |..argn++|;.X..}.X|
|000029e0| 09 20 20 20 20 65 6c 73 | 65 0a 58 09 09 7b 0a 58 |. els|e.X..{.X|
|000029f0| 09 09 66 70 72 69 6e 74 | 66 28 20 73 74 64 65 72 |..fprint|f( stder|
|00002a00| 72 2c 20 75 73 61 67 65 | 2c 20 61 72 67 76 5b 30 |r, usage|, argv[0|
|00002a10| 5d 20 29 3b 0a 58 09 09 | 65 78 69 74 28 20 31 20 |] );.X..|exit( 1 |
|00002a20| 29 3b 0a 58 09 09 7d 0a | 58 09 20 20 20 20 7d 0a |);.X..}.|X. }.|
|00002a30| 58 09 7d 0a 58 0a 58 20 | 20 20 20 69 66 20 28 20 |X.}.X.X | if ( |
|00002a40| 61 72 67 6e 20 3d 3d 20 | 61 72 67 63 20 29 0a 58 |argn == |argc ).X|
|00002a50| 09 7b 0a 58 09 69 66 64 | 20 3d 20 73 74 64 69 6e |.{.X.ifd| = stdin|
|00002a60| 3b 0a 58 09 73 74 72 63 | 70 79 28 20 6e 61 6d 65 |;.X.strc|py( name|
|00002a70| 2c 20 22 6e 6f 6e 61 6d | 65 22 20 29 3b 0a 58 09 |, "nonam|e" );.X.|
|00002a80| 7d 0a 58 20 20 20 20 65 | 6c 73 65 0a 58 09 7b 0a |}.X e|lse.X.{.|
|00002a90| 58 20 20 20 20 20 20 20 | 20 69 66 64 20 3d 20 66 |X | ifd = f|
|00002aa0| 6f 70 65 6e 28 20 61 72 | 67 76 5b 61 72 67 6e 5d |open( ar|gv[argn]|
|00002ab0| 2c 20 22 72 22 20 29 3b | 0a 58 20 20 20 20 20 20 |, "r" );|.X |
|00002ac0| 20 20 69 66 20 28 20 69 | 66 64 20 3d 3d 20 4e 55 | if ( i|fd == NU|
|00002ad0| 4c 4c 20 29 0a 58 09 20 | 20 20 20 7b 0a 58 09 20 |LL ).X. | {.X. |
|00002ae0| 20 20 20 66 70 72 69 6e | 74 66 28 20 73 74 64 65 | fprin|tf( stde|
|00002af0| 72 72 2c 20 22 25 73 3a | 20 63 61 6e 27 74 20 6f |rr, "%s:| can't o|
|00002b00| 70 65 6e 2e 5c 6e 22 2c | 20 61 72 67 76 5b 61 72 |pen.\n",| argv[ar|
|00002b10| 67 6e 5d 20 29 3b 0a 58 | 09 20 20 20 20 65 78 69 |gn] );.X|. exi|
|00002b20| 74 28 20 31 20 29 3b 0a | 58 09 20 20 20 20 7d 0a |t( 1 );.|X. }.|
|00002b30| 58 09 73 74 72 63 70 79 | 28 20 6e 61 6d 65 2c 20 |X.strcpy|( name, |
|00002b40| 61 72 67 76 5b 61 72 67 | 6e 5d 20 29 3b 0a 58 0a |argv[arg|n] );.X.|
|00002b50| 58 23 69 66 64 65 66 09 | 4f 53 5f 53 59 53 56 0a |X#ifdef.|OS_SYSV.|
|00002b60| 58 09 69 66 20 28 20 28 | 20 63 70 20 3d 20 73 74 |X.if ( (| cp = st|
|00002b70| 72 63 68 72 28 20 6e 61 | 6d 65 2c 20 27 2e 27 20 |rchr( na|me, '.' |
|00002b80| 29 20 29 20 21 3d 20 30 | 20 29 0a 58 23 65 6c 73 |) ) != 0| ).X#els|
|00002b90| 65 09 4f 53 5f 53 59 53 | 56 0a 58 09 69 66 20 28 |e.OS_SYS|V.X.if (|
|00002ba0| 20 28 20 63 70 20 3d 20 | 69 6e 64 65 78 28 20 6e | ( cp = |index( n|
|00002bb0| 61 6d 65 2c 20 27 2e 27 | 20 29 20 29 20 21 3d 20 |ame, '.'| ) ) != |
|00002bc0| 30 20 29 0a 58 23 65 6e | 64 69 66 09 4f 53 5f 53 |0 ).X#en|dif.OS_S|
|00002bd0| 59 53 56 0a 58 09 20 20 | 20 20 2a 63 70 20 3d 20 |YSV.X. | *cp = |
|00002be0| 27 5c 30 27 3b 0a 58 09 | 61 72 67 6e 2b 2b 3b 0a |'\0';.X.|argn++;.|
|00002bf0| 58 09 7d 0a 58 0a 58 20 | 20 20 20 69 66 20 28 20 |X.}.X.X | if ( |
|00002c00| 61 72 67 6e 20 21 3d 20 | 61 72 67 63 20 29 0a 58 |argn != |argc ).X|
|00002c10| 09 7b 0a 58 09 66 70 72 | 69 6e 74 66 28 20 73 74 |.{.X.fpr|intf( st|
|00002c20| 64 65 72 72 2c 20 75 73 | 61 67 65 2c 20 61 72 67 |derr, us|age, arg|
|00002c30| 76 5b 30 5d 20 29 3b 0a | 58 09 65 78 69 74 28 20 |v[0] );.|X.exit( |
|00002c40| 31 20 29 3b 0a 58 09 7d | 0a 58 0a 58 20 20 20 20 |1 );.X.}|.X.X |
|00002c50| 62 69 74 73 20 3d 20 70 | 62 6d 5f 72 65 61 64 70 |bits = p|bm_readp|
|00002c60| 62 6d 28 20 69 66 64 2c | 20 26 63 6f 6c 73 2c 20 |bm( ifd,| &cols, |
|00002c70| 26 72 6f 77 73 20 29 3b | 0a 58 0a 58 20 20 20 20 |&rows );|.X.X |
|00002c80| 69 66 20 28 20 69 66 64 | 20 21 3d 20 73 74 64 69 |if ( ifd| != stdi|
|00002c90| 6e 20 29 0a 58 09 66 63 | 6c 6f 73 65 28 20 69 66 |n ).X.fc|lose( if|
|00002ca0| 64 20 29 3b 0a 58 20 20 | 20 20 0a 58 20 20 20 20 |d );.X | .X |
|00002cb0| 2f 2a 20 43 6f 6d 70 75 | 74 65 20 70 61 64 64 69 |/* Compu|te paddi|
|00002cc0| 6e 67 20 74 6f 20 72 6f | 75 6e 64 20 63 6f 6c 73 |ng to ro|und cols|
|00002cd0| 20 75 70 20 74 6f 20 74 | 68 65 20 6e 65 61 72 65 | up to t|he neare|
|00002ce0| 73 74 20 6d 75 6c 74 69 | 70 6c 65 20 6f 66 20 38 |st multi|ple of 8|
|00002cf0| 2e 20 2a 2f 0a 58 20 20 | 20 20 70 61 64 72 69 67 |. */.X | padrig|
|00002d00| 68 74 20 3d 20 28 20 28 | 20 63 6f 6c 73 20 2b 20 |ht = ( (| cols + |
|00002d10| 37 20 29 20 2f 20 38 20 | 29 20 2a 20 38 20 2d 20 |7 ) / 8 |) * 8 - |
|00002d20| 63 6f 6c 73 3b 0a 58 0a | 58 20 20 20 20 70 75 74 |cols;.X.|X put|
|00002d30| 69 6e 69 74 28 20 6e 61 | 6d 65 2c 20 63 6f 6c 73 |init( na|me, cols|
|00002d40| 2c 20 72 6f 77 73 2c 20 | 73 63 61 6c 65 20 29 3b |, rows, |scale );|
|00002d50| 0a 58 20 20 20 20 66 6f | 72 20 28 20 72 6f 77 20 |.X fo|r ( row |
|00002d60| 3d 20 30 3b 20 72 6f 77 | 20 3c 20 72 6f 77 73 3b |= 0; row| < rows;|
|00002d70| 20 72 6f 77 2b 2b 20 29 | 0a 58 09 7b 0a 58 20 20 | row++ )|.X.{.X |
|00002d80| 20 20 20 20 20 20 66 6f | 72 20 28 20 63 6f 6c 20 | fo|r ( col |
|00002d90| 3d 20 30 3b 20 63 6f 6c | 20 3c 20 63 6f 6c 73 3b |= 0; col| < cols;|
|00002da0| 20 63 6f 6c 2b 2b 20 29 | 0a 58 09 20 20 20 20 70 | col++ )|.X. p|
|00002db0| 75 74 62 69 74 28 20 62 | 69 74 73 5b 72 6f 77 5d |utbit( b|its[row]|
|00002dc0| 5b 63 6f 6c 5d 20 29 3b | 0a 58 09 66 6f 72 20 28 |[col] );|.X.for (|
|00002dd0| 20 63 6f 6c 20 3d 20 30 | 3b 20 63 6f 6c 20 3c 20 | col = 0|; col < |
|00002de0| 70 61 64 72 69 67 68 74 | 3b 20 63 6f 6c 2b 2b 20 |padright|; col++ |
|00002df0| 29 0a 58 09 20 20 20 20 | 70 75 74 62 69 74 28 20 |).X. |putbit( |
|00002e00| 30 20 29 3b 0a 58 20 20 | 20 20 20 20 20 20 7d 0a |0 );.X | }.|
|00002e10| 58 20 20 20 20 70 75 74 | 72 65 73 74 28 20 29 3b |X put|rest( );|
|00002e20| 0a 58 0a 58 20 20 20 20 | 65 78 69 74 28 20 30 20 |.X.X |exit( 0 |
|00002e30| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 0a 58 0a 58 69 |);.X |}.X.X.Xi|
|00002e40| 6e 74 20 69 74 65 6d 2c | 20 62 69 74 73 70 65 72 |nt item,| bitsper|
|00002e50| 69 74 65 6d 2c 20 62 69 | 74 73 68 69 66 74 2c 20 |item, bi|tshift, |
|00002e60| 72 6c 69 74 65 6d 73 70 | 65 72 6c 69 6e 65 3b 0a |rlitemsp|erline;.|
|00002e70| 58 69 6e 74 20 72 65 70 | 65 61 74 2c 20 69 74 65 |Xint rep|eat, ite|
|00002e80| 6d 62 75 66 5b 31 32 38 | 5d 2c 20 63 6f 75 6e 74 |mbuf[128|], count|
|00002e90| 2c 20 72 65 70 65 61 74 | 69 74 65 6d 2c 20 72 65 |, repeat|item, re|
|00002ea0| 70 65 61 74 63 6f 75 6e | 74 3b 0a 58 0a 58 70 75 |peatcoun|t;.X.Xpu|
|00002eb0| 74 69 6e 69 74 28 20 6e | 61 6d 65 2c 20 63 6f 6c |tinit( n|ame, col|
|00002ec0| 73 2c 20 72 6f 77 73 2c | 20 73 63 61 6c 65 20 29 |s, rows,| scale )|
|00002ed0| 0a 58 63 68 61 72 20 2a | 6e 61 6d 65 3b 0a 58 69 |.Xchar *|name;.Xi|
|00002ee0| 6e 74 20 63 6f 6c 73 2c | 20 72 6f 77 73 3b 0a 58 |nt cols,| rows;.X|
|00002ef0| 66 6c 6f 61 74 20 73 63 | 61 6c 65 3b 0a 58 20 20 |float sc|ale;.X |
|00002f00| 20 20 7b 0a 58 20 20 20 | 20 69 6e 74 20 73 63 6f | {.X | int sco|
|00002f10| 6c 73 2c 20 73 72 6f 77 | 73 3b 0a 58 0a 58 20 20 |ls, srow|s;.X.X |
|00002f20| 20 20 73 63 6f 6c 73 20 | 3d 20 63 6f 6c 73 20 2a | scols |= cols *|
|00002f30| 20 73 63 61 6c 65 20 2a | 20 30 2e 39 36 20 2b 20 | scale *| 0.96 + |
|00002f40| 30 2e 35 3b 09 2f 2a 20 | 20 20 30 2e 39 36 20 69 |0.5;./* | 0.96 i|
|00002f50| 73 20 74 68 65 20 6d 75 | 6c 74 69 70 6c 65 20 6f |s the mu|ltiple o|
|00002f60| 66 20 20 20 2a 2f 0a 58 | 20 20 20 20 73 72 6f 77 |f */.X| srow|
|00002f70| 73 20 3d 20 72 6f 77 73 | 20 2a 20 73 63 61 6c 65 |s = rows| * scale|
|00002f80| 20 2a 20 30 2e 39 36 20 | 2b 20 30 2e 35 3b 09 2f | * 0.96 |+ 0.5;./|
|00002f90| 2a 20 37 32 2f 33 30 30 | 20 74 68 61 74 20 69 73 |* 72/300| that is|
|00002fa0| 20 63 6c 6f 73 65 73 74 | 20 74 6f 20 31 20 2a 2f | closest| to 1 */|
|00002fb0| 0a 58 0a 58 20 20 20 20 | 70 72 69 6e 74 66 28 20 |.X.X |printf( |
|00002fc0| 22 25 25 21 20 25 73 2e | 70 73 5c 6e 22 2c 20 6e |"%%! %s.|ps\n", n|
|00002fd0| 61 6d 65 20 29 3b 0a 58 | 20 20 20 20 70 72 69 6e |ame );.X| prin|
|00002fe0| 74 66 28 20 22 5c 6e 22 | 20 29 3b 0a 58 20 20 20 |tf( "\n"| );.X |
|00002ff0| 20 70 72 69 6e 74 66 28 | 20 22 2f 72 6c 65 73 74 | printf(| "/rlest|
|00003000| 72 31 20 31 20 73 74 72 | 69 6e 67 20 64 65 66 5c |r1 1 str|ing def\|
|00003010| 6e 22 20 29 3b 0a 58 20 | 20 20 20 70 72 69 6e 74 |n" );.X | print|
|00003020| 66 28 20 22 2f 72 6c 65 | 73 74 72 20 31 32 38 20 |f( "/rle|str 128 |
|00003030| 73 74 72 69 6e 67 20 64 | 65 66 5c 6e 22 20 29 3b |string d|ef\n" );|
|00003040| 0a 58 20 20 20 20 70 72 | 69 6e 74 66 28 20 22 2f |.X pr|intf( "/|
|00003050| 72 65 61 64 72 6c 65 73 | 74 72 69 6e 67 20 7b 5c |readrles|tring {\|
|00003060| 6e 22 20 29 3b 0a 58 20 | 20 20 20 70 72 69 6e 74 |n" );.X | print|
|00003070| 66 28 20 22 20 20 63 75 | 72 72 65 6e 74 66 69 6c |f( " cu|rrentfil|
|00003080| 65 20 72 6c 65 73 74 72 | 31 20 72 65 61 64 68 65 |e rlestr|1 readhe|
|00003090| 78 73 74 72 69 6e 67 20 | 70 6f 70 20 20 30 20 67 |xstring |pop 0 g|
|000030a0| 65 74 5c 6e 22 20 29 3b | 0a 58 20 20 20 20 70 72 |et\n" );|.X pr|
|000030b0| 69 6e 74 66 28 20 22 20 | 20 64 75 70 20 31 32 37 |intf( " | dup 127|
|000030c0| 20 6c 65 20 7b 5c 6e 22 | 20 29 3b 0a 58 20 20 20 | le {\n"| );.X |
|000030d0| 20 70 72 69 6e 74 66 28 | 20 22 20 20 20 20 63 75 | printf(| " cu|
|000030e0| 72 72 65 6e 74 66 69 6c | 65 20 72 6c 65 73 74 72 |rrentfil|e rlestr|
|000030f0| 20 30 20 20 34 20 33 20 | 72 6f 6c 6c 20 20 31 20 | 0 4 3 |roll 1 |
|00003100| 61 64 64 20 20 67 65 74 | 69 6e 74 65 72 76 61 6c |add get|interval|
|00003110| 5c 6e 22 20 29 3b 0a 58 | 20 20 20 20 70 72 69 6e |\n" );.X| prin|
|00003120| 74 66 28 20 22 20 20 20 | 20 72 65 61 64 68 65 78 |tf( " | readhex|
|00003130| 73 74 72 69 6e 67 20 20 | 70 6f 70 5c 6e 22 20 29 |string |pop\n" )|
|00003140| 3b 0a 58 20 20 20 20 70 | 72 69 6e 74 66 28 20 22 |;.X p|rintf( "|
|00003150| 20 20 7d 20 7b 5c 6e 22 | 20 29 3b 0a 58 20 20 20 | } {\n"| );.X |
|00003160| 20 70 72 69 6e 74 66 28 | 20 22 20 20 20 20 32 35 | printf(| " 25|
|00003170| 36 20 65 78 63 68 20 73 | 75 62 20 20 64 75 70 5c |6 exch s|ub dup\|
|00003180| 6e 22 20 29 3b 0a 58 20 | 20 20 20 70 72 69 6e 74 |n" );.X | print|
|00003190| 66 28 20 22 20 20 20 20 | 63 75 72 72 65 6e 74 66 |f( " |currentf|
|000031a0| 69 6c 65 20 72 6c 65 73 | 74 72 31 20 72 65 61 64 |ile rles|tr1 read|
|000031b0| 68 65 78 73 74 72 69 6e | 67 20 70 6f 70 20 20 30 |hexstrin|g pop 0|
|000031c0| 20 67 65 74 5c 6e 22 20 | 29 3b 0a 58 20 20 20 20 | get\n" |);.X |
|000031d0| 70 72 69 6e 74 66 28 20 | 22 20 20 20 20 65 78 63 |printf( |" exc|
|000031e0| 68 20 30 20 65 78 63 68 | 20 31 20 65 78 63 68 20 |h 0 exch| 1 exch |
|000031f0| 31 20 73 75 62 20 7b 20 | 72 6c 65 73 74 72 20 65 |1 sub { |rlestr e|
|00003200| 78 63 68 20 32 20 69 6e | 64 65 78 20 70 75 74 20 |xch 2 in|dex put |
|00003210| 7d 20 66 6f 72 5c 6e 22 | 20 29 3b 0a 58 20 20 20 |} for\n"| );.X |
|00003220| 20 70 72 69 6e 74 66 28 | 20 22 20 20 20 20 70 6f | printf(| " po|
|00003230| 70 20 20 72 6c 65 73 74 | 72 20 65 78 63 68 20 30 |p rlest|r exch 0|
|00003240| 20 65 78 63 68 20 67 65 | 74 69 6e 74 65 72 76 61 | exch ge|tinterva|
|00003250| 6c 5c 6e 22 20 29 3b 0a | 58 20 20 20 20 70 72 69 |l\n" );.|X pri|
|00003260| 6e 74 66 28 20 22 20 20 | 7d 20 69 66 65 6c 73 65 |ntf( " |} ifelse|
|00003270| 5c 6e 22 20 29 3b 0a 58 | 20 20 20 20 70 72 69 6e |\n" );.X| prin|
|00003280| 74 66 28 20 22 7d 20 62 | 69 6e 64 20 64 65 66 5c |tf( "} b|ind def\|
|00003290| 6e 22 20 29 3b 0a 58 20 | 20 20 20 70 72 69 6e 74 |n" );.X | print|
|000032a0| 66 28 20 22 5c 6e 22 20 | 29 3b 0a 58 20 20 20 20 |f( "\n" |);.X |
|000032b0| 70 72 69 6e 74 66 28 0a | 58 09 22 25 64 20 25 64 |printf(.|X."%d %d|
|000032c0| 20 74 72 61 6e 73 6c 61 | 74 65 5c 74 25 25 20 6d | transla|te\t%% m|
|000032d0| 6f 76 65 20 74 6f 20 6c | 6f 77 65 72 20 6c 65 66 |ove to l|ower lef|
|000032e0| 74 20 63 6f 72 6e 65 72 | 20 6f 66 20 62 6f 78 5c |t corner| of box\|
|000032f0| 6e 22 2c 0a 58 09 33 30 | 30 20 2d 20 28 20 73 63 |n",.X.30|0 - ( sc|
|00003300| 6f 6c 73 2f 32 20 29 2c | 20 34 30 30 20 2d 20 28 |ols/2 ),| 400 - (|
|00003310| 20 73 72 6f 77 73 2f 32 | 20 29 20 29 3b 0a 58 20 | srows/2| ) );.X |
|00003320| 20 20 20 70 72 69 6e 74 | 66 28 20 22 25 64 20 25 | print|f( "%d %|
|00003330| 64 20 73 63 61 6c 65 5c | 74 5c 74 25 25 20 73 63 |d scale\|t\t%% sc|
|00003340| 61 6c 65 20 62 6f 78 5c | 6e 22 2c 20 73 63 6f 6c |ale box\|n", scol|
|00003350| 73 2c 20 73 72 6f 77 73 | 20 29 3b 0a 58 20 20 20 |s, srows| );.X |
|00003360| 20 70 72 69 6e 74 66 28 | 20 22 5c 6e 22 20 29 3b | printf(| "\n" );|
|00003370| 0a 58 20 20 20 20 70 72 | 69 6e 74 66 28 20 22 25 |.X pr|intf( "%|
|00003380| 64 20 25 64 20 31 5c 74 | 5c 74 5c 74 25 25 20 77 |d %d 1\t|\t\t%% w|
|00003390| 69 64 74 68 20 68 65 69 | 67 68 74 20 62 69 74 73 |idth hei|ght bits|
|000033a0| 2f 73 61 6d 70 6c 65 5c | 6e 22 2c 20 63 6f 6c 73 |/sample\|n", cols|
|000033b0| 2c 20 72 6f 77 73 20 29 | 3b 0a 58 20 20 20 20 70 |, rows )|;.X p|
|000033c0| 72 69 6e 74 66 28 0a 58 | 09 22 5b 20 25 64 20 30 |rintf(.X|."[ %d 0|
|000033d0| 20 30 20 2d 25 64 20 30 | 20 25 64 20 5d 5c 74 25 | 0 -%d 0| %d ]\t%|
|000033e0| 25 20 74 72 61 6e 73 66 | 6f 72 6d 61 74 69 6f 6e |% transf|ormation|
|000033f0| 20 6d 61 74 72 69 78 5c | 6e 22 2c 20 63 6f 6c 73 | matrix\|n", cols|
|00003400| 2c 20 72 6f 77 73 2c 20 | 72 6f 77 73 20 29 3b 0a |, rows, |rows );.|
|00003410| 58 20 20 20 20 70 72 69 | 6e 74 66 28 20 22 7b 20 |X pri|ntf( "{ |
|00003420| 72 65 61 64 72 6c 65 73 | 74 72 69 6e 67 20 7d 5c |readrles|tring }\|
|00003430| 74 25 25 20 70 72 6f 63 | 5c 6e 22 20 29 3b 0a 58 |t%% proc|\n" );.X|
|00003440| 20 20 20 20 70 72 69 6e | 74 66 28 20 22 69 6d 61 | prin|tf( "ima|
|00003450| 67 65 5c 6e 22 20 29 3b | 0a 58 0a 58 20 20 20 20 |ge\n" );|.X.X |
|00003460| 72 6c 69 74 65 6d 73 70 | 65 72 6c 69 6e 65 20 3d |rlitemsp|erline =|
|00003470| 20 30 3b 0a 58 20 20 20 | 20 69 74 65 6d 20 3d 20 | 0;.X | item = |
|00003480| 30 3b 0a 58 20 20 20 20 | 62 69 74 73 70 65 72 69 |0;.X |bitsperi|
|00003490| 74 65 6d 20 3d 20 30 3b | 0a 58 20 20 20 20 62 69 |tem = 0;|.X bi|
|000034a0| 74 73 68 69 66 74 20 3d | 20 37 3b 0a 58 0a 58 20 |tshift =| 7;.X.X |
|000034b0| 20 20 20 72 65 70 65 61 | 74 20 3d 20 31 3b 0a 58 | repea|t = 1;.X|
|000034c0| 20 20 20 20 63 6f 75 6e | 74 20 3d 20 30 3b 0a 58 | coun|t = 0;.X|
|000034d0| 20 20 20 20 7d 0a 58 0a | 58 70 75 74 72 6c 69 74 | }.X.|Xputrlit|
|000034e0| 65 6d 28 20 72 6c 69 74 | 65 6d 20 29 0a 58 69 6e |em( rlit|em ).Xin|
|000034f0| 74 20 72 6c 69 74 65 6d | 3b 0a 58 20 20 20 20 7b |t rlitem|;.X {|
|00003500| 0a 58 20 20 20 20 69 66 | 20 28 20 72 6c 69 74 65 |.X if| ( rlite|
|00003510| 6d 73 70 65 72 6c 69 6e | 65 20 3d 3d 20 33 30 20 |msperlin|e == 30 |
|00003520| 29 0a 58 09 7b 0a 58 09 | 70 75 74 63 68 61 72 28 |).X.{.X.|putchar(|
|00003530| 20 27 5c 6e 27 20 29 3b | 0a 58 09 72 6c 69 74 65 | '\n' );|.X.rlite|
|00003540| 6d 73 70 65 72 6c 69 6e | 65 20 3d 20 30 3b 0a 58 |msperlin|e = 0;.X|
|00003550| 09 7d 0a 58 20 20 20 20 | 72 6c 69 74 65 6d 73 70 |.}.X |rlitemsp|
|00003560| 65 72 6c 69 6e 65 2b 2b | 3b 0a 58 20 20 20 20 70 |erline++|;.X p|
|00003570| 72 69 6e 74 66 28 20 22 | 25 30 32 78 22 2c 20 72 |rintf( "|%02x", r|
|00003580| 6c 69 74 65 6d 20 29 3b | 0a 58 20 20 20 20 7d 0a |litem );|.X }.|
|00003590| 58 0a 58 70 75 74 72 6c | 62 75 66 66 65 72 28 20 |X.Xputrl|buffer( |
|000035a0| 29 0a 58 20 20 20 20 7b | 0a 58 20 20 20 20 69 6e |).X {|.X in|
|000035b0| 74 20 69 3b 0a 58 0a 58 | 20 20 20 20 69 66 20 28 |t i;.X.X| if (|
|000035c0| 20 72 65 70 65 61 74 20 | 29 0a 58 09 7b 0a 58 09 | repeat |).X.{.X.|
|000035d0| 70 75 74 72 6c 69 74 65 | 6d 28 20 32 35 36 20 2d |putrlite|m( 256 -|
|000035e0| 20 63 6f 75 6e 74 20 29 | 3b 0a 58 09 70 75 74 72 | count )|;.X.putr|
|000035f0| 6c 69 74 65 6d 28 20 72 | 65 70 65 61 74 69 74 65 |litem( r|epeatite|
|00003600| 6d 20 29 3b 0a 58 09 7d | 0a 58 20 20 20 20 65 6c |m );.X.}|.X el|
|00003610| 73 65 0a 58 09 7b 0a 58 | 09 70 75 74 72 6c 69 74 |se.X.{.X|.putrlit|
|00003620| 65 6d 28 20 63 6f 75 6e | 74 20 2d 20 31 20 29 3b |em( coun|t - 1 );|
|00003630| 0a 58 09 66 6f 72 20 28 | 20 69 20 3d 20 30 3b 20 |.X.for (| i = 0; |
|00003640| 69 20 3c 20 63 6f 75 6e | 74 3b 20 69 2b 2b 20 29 |i < coun|t; i++ )|
|00003650| 0a 58 09 20 20 20 20 70 | 75 74 72 6c 69 74 65 6d |.X. p|utrlitem|
|00003660| 28 20 69 74 65 6d 62 75 | 66 5b 69 5d 20 29 3b 0a |( itembu|f[i] );.|
|00003670| 58 09 7d 0a 58 20 20 20 | 20 72 65 70 65 61 74 20 |X.}.X | repeat |
|00003680| 3d 20 31 3b 0a 58 20 20 | 20 20 63 6f 75 6e 74 20 |= 1;.X | count |
|00003690| 3d 20 30 3b 0a 58 20 20 | 20 20 7d 0a 58 0a 58 70 |= 0;.X | }.X.Xp|
|000036a0| 75 74 69 74 65 6d 28 20 | 29 0a 58 20 20 20 20 7b |utitem( |).X {|
|000036b0| 0a 58 20 20 20 20 69 6e | 74 20 69 3b 0a 58 0a 58 |.X in|t i;.X.X|
|000036c0| 20 20 20 20 69 66 20 28 | 20 63 6f 75 6e 74 20 3d | if (| count =|
|000036d0| 3d 20 31 32 38 20 29 0a | 58 09 70 75 74 72 6c 62 |= 128 ).|X.putrlb|
|000036e0| 75 66 66 65 72 28 20 29 | 3b 0a 58 0a 58 20 20 20 |uffer( )|;.X.X |
|000036f0| 20 69 66 20 28 20 72 65 | 70 65 61 74 20 26 26 20 | if ( re|peat && |
|00003700| 63 6f 75 6e 74 20 3d 3d | 20 30 20 29 0a 58 09 7b |count ==| 0 ).X.{|
|00003710| 20 2f 2a 20 53 74 69 6c | 6c 20 69 6e 69 74 69 61 | /* Stil|l initia|
|00003720| 6c 69 7a 69 6e 67 20 61 | 20 72 65 70 65 61 74 20 |lizing a| repeat |
|00003730| 62 75 66 2e 20 2a 2f 0a | 58 09 69 74 65 6d 62 75 |buf. */.|X.itembu|
|00003740| 66 5b 63 6f 75 6e 74 5d | 20 3d 20 72 65 70 65 61 |f[count]| = repea|
|00003750| 74 69 74 65 6d 20 3d 20 | 69 74 65 6d 3b 0a 58 09 |titem = |item;.X.|
|00003760| 63 6f 75 6e 74 2b 2b 3b | 0a 58 09 7d 0a 58 20 20 |count++;|.X.}.X |
|00003770| 20 20 65 6c 73 65 20 69 | 66 20 28 20 72 65 70 65 | else i|f ( repe|
|00003780| 61 74 20 29 0a 58 09 7b | 20 2f 2a 20 52 65 70 65 |at ).X.{| /* Repe|
|00003790| 61 74 69 6e 67 20 2d 20 | 77 61 74 63 68 20 66 6f |ating - |watch fo|
|000037a0| 72 20 65 6e 64 20 6f 66 | 20 72 75 6e 2e 20 2a 2f |r end of| run. */|
|000037b0| 0a 58 09 69 66 20 28 20 | 69 74 65 6d 20 3d 3d 20 |.X.if ( |item == |
|000037c0| 72 65 70 65 61 74 69 74 | 65 6d 20 29 0a 58 09 20 |repeatit|em ).X. |
|000037d0| 20 20 20 7b 20 2f 2a 20 | 52 75 6e 20 63 6f 6e 74 | { /* |Run cont|
|000037e0| 69 6e 75 65 73 2e 20 2a | 2f 0a 58 09 20 20 20 20 |inues. *|/.X. |
|000037f0| 69 74 65 6d 62 75 66 5b | 63 6f 75 6e 74 5d 20 3d |itembuf[|count] =|
|00003800| 20 69 74 65 6d 3b 0a 58 | 09 20 20 20 20 63 6f 75 | item;.X|. cou|
|00003810| 6e 74 2b 2b 3b 0a 58 09 | 20 20 20 20 7d 0a 58 09 |nt++;.X.| }.X.|
|00003820| 65 6c 73 65 0a 58 09 20 | 20 20 20 7b 20 2f 2a 20 |else.X. | { /* |
|00003830| 52 75 6e 20 65 6e 64 65 | 64 20 2d 20 69 73 20 69 |Run ende|d - is i|
|00003840| 74 20 6c 6f 6e 67 20 65 | 6e 6f 75 67 68 20 74 6f |t long e|nough to|
|00003850| 20 64 75 6d 70 3f 20 2a | 2f 0a 58 09 20 20 20 20 | dump? *|/.X. |
|00003860| 69 66 20 28 20 63 6f 75 | 6e 74 20 3e 20 32 20 29 |if ( cou|nt > 2 )|
|00003870| 0a 58 09 09 7b 20 2f 2a | 20 59 65 73 2c 20 64 75 |.X..{ /*| Yes, du|
|00003880| 6d 70 20 61 20 72 65 70 | 65 61 74 2d 6d 6f 64 65 |mp a rep|eat-mode|
|00003890| 20 62 75 66 66 65 72 20 | 61 6e 64 20 73 74 61 72 | buffer |and star|
|000038a0| 74 20 61 20 6e 65 77 20 | 6f 6e 65 2e 20 2a 2f 0a |t a new |one. */.|
|000038b0| 58 09 09 70 75 74 72 6c | 62 75 66 66 65 72 28 20 |X..putrl|buffer( |
|000038c0| 29 3b 0a 58 09 09 69 74 | 65 6d 62 75 66 5b 63 6f |);.X..it|embuf[co|
|000038d0| 75 6e 74 5d 20 3d 20 72 | 65 70 65 61 74 69 74 65 |unt] = r|epeatite|
|000038e0| 6d 20 3d 20 69 74 65 6d | 3b 0a 58 09 09 63 6f 75 |m = item|;.X..cou|
|000038f0| 6e 74 2b 2b 3b 0a 58 09 | 09 7d 0a 58 09 20 20 20 |nt++;.X.|.}.X. |
|00003900| 20 65 6c 73 65 0a 58 09 | 09 7b 20 2f 2a 20 4e 6f | else.X.|.{ /* No|
|00003910| 74 20 6c 6f 6e 67 20 65 | 6e 6f 75 67 68 20 2d 20 |t long e|nough - |
|00003920| 63 6f 6e 76 65 72 74 20 | 74 6f 20 6e 6f 6e 2d 72 |convert |to non-r|
|00003930| 65 70 65 61 74 20 6d 6f | 64 65 2e 20 2a 2f 0a 58 |epeat mo|de. */.X|
|00003940| 09 09 72 65 70 65 61 74 | 20 3d 20 30 3b 0a 58 09 |..repeat| = 0;.X.|
|00003950| 09 69 74 65 6d 62 75 66 | 5b 63 6f 75 6e 74 5d 20 |.itembuf|[count] |
|00003960| 3d 20 72 65 70 65 61 74 | 69 74 65 6d 20 3d 20 69 |= repeat|item = i|
|00003970| 74 65 6d 3b 0a 58 09 09 | 63 6f 75 6e 74 2b 2b 3b |tem;.X..|count++;|
|00003980| 0a 58 09 09 72 65 70 65 | 61 74 63 6f 75 6e 74 20 |.X..repe|atcount |
|00003990| 3d 20 31 3b 0a 58 09 09 | 7d 0a 58 09 20 20 20 20 |= 1;.X..|}.X. |
|000039a0| 7d 0a 58 09 7d 0a 58 20 | 20 20 20 65 6c 73 65 0a |}.X.}.X | else.|
|000039b0| 58 09 7b 20 2f 2a 20 4e | 6f 74 20 72 65 70 65 61 |X.{ /* N|ot repea|
|000039c0| 74 69 6e 67 20 2d 20 77 | 61 74 63 68 20 66 6f 72 |ting - w|atch for|
|000039d0| 20 61 20 72 75 6e 20 77 | 6f 72 74 68 20 72 65 70 | a run w|orth rep|
|000039e0| 65 61 74 69 6e 67 2e 20 | 2a 2f 0a 58 09 69 66 20 |eating. |*/.X.if |
|000039f0| 28 20 69 74 65 6d 20 3d | 3d 20 72 65 70 65 61 74 |( item =|= repeat|
|00003a00| 69 74 65 6d 20 29 0a 58 | 09 20 20 20 20 7b 20 2f |item ).X|. { /|
|00003a10| 2a 20 50 6f 73 73 69 62 | 6c 65 20 72 75 6e 20 63 |* Possib|le run c|
|00003a20| 6f 6e 74 69 6e 75 65 73 | 2e 20 2a 2f 0a 58 09 20 |ontinues|. */.X. |
|00003a30| 20 20 20 72 65 70 65 61 | 74 63 6f 75 6e 74 2b 2b | repea|tcount++|
|00003a40| 3b 0a 58 09 20 20 20 20 | 69 66 20 28 20 72 65 70 |;.X. |if ( rep|
|00003a50| 65 61 74 63 6f 75 6e 74 | 20 3e 20 33 20 29 0a 58 |eatcount| > 3 ).X|
|00003a60| 09 09 7b 20 2f 2a 20 4c | 6f 6e 67 20 65 6e 6f 75 |..{ /* L|ong enou|
|00003a70| 67 68 20 2d 20 64 75 6d | 70 20 6e 6f 6e 2d 72 65 |gh - dum|p non-re|
|00003a80| 70 65 61 74 20 70 61 72 | 74 20 61 6e 64 20 73 74 |peat par|t and st|
|00003a90| 61 72 74 20 72 65 70 65 | 61 74 2e 20 2a 2f 0a 58 |art repe|at. */.X|
|00003aa0| 09 09 63 6f 75 6e 74 20 | 3d 20 63 6f 75 6e 74 20 |..count |= count |
|00003ab0| 2d 20 28 20 72 65 70 65 | 61 74 63 6f 75 6e 74 20 |- ( repe|atcount |
|00003ac0| 2d 20 31 20 29 3b 0a 58 | 09 09 70 75 74 72 6c 62 |- 1 );.X|..putrlb|
|00003ad0| 75 66 66 65 72 28 20 29 | 3b 0a 58 09 09 63 6f 75 |uffer( )|;.X..cou|
|00003ae0| 6e 74 20 3d 20 72 65 70 | 65 61 74 63 6f 75 6e 74 |nt = rep|eatcount|
|00003af0| 3b 0a 58 09 09 66 6f 72 | 20 28 20 69 20 3d 20 30 |;.X..for| ( i = 0|
|00003b00| 3b 20 69 20 3c 20 63 6f | 75 6e 74 3b 20 69 2b 2b |; i < co|unt; i++|
|00003b10| 20 29 0a 58 09 09 20 20 | 20 20 69 74 65 6d 62 75 | ).X.. | itembu|
|00003b20| 66 5b 69 5d 20 3d 20 69 | 74 65 6d 3b 0a 58 09 09 |f[i] = i|tem;.X..|
|00003b30| 7d 0a 58 09 20 20 20 20 | 65 6c 73 65 0a 58 09 09 |}.X. |else.X..|
|00003b40| 7b 20 2f 2a 20 4e 6f 74 | 20 6c 6f 6e 67 20 65 6e |{ /* Not| long en|
|00003b50| 6f 75 67 68 20 79 65 74 | 20 2d 20 63 6f 6e 74 69 |ough yet| - conti|
|00003b60| 6e 75 65 20 61 73 20 6e | 6f 6e 2d 72 65 70 65 61 |nue as n|on-repea|
|00003b70| 74 20 62 75 66 2e 20 2a | 2f 0a 58 09 09 69 74 65 |t buf. *|/.X..ite|
|00003b80| 6d 62 75 66 5b 63 6f 75 | 6e 74 5d 20 3d 20 69 74 |mbuf[cou|nt] = it|
|00003b90| 65 6d 3b 0a 58 09 09 63 | 6f 75 6e 74 2b 2b 3b 0a |em;.X..c|ount++;.|
|00003ba0| 58 09 09 7d 0a 58 09 20 | 20 20 20 7d 0a 58 09 65 |X..}.X. | }.X.e|
|00003bb0| 6c 73 65 0a 58 09 20 20 | 20 20 7b 20 2f 2a 20 42 |lse.X. | { /* B|
|00003bc0| 72 6f 6b 65 6e 20 72 75 | 6e 2e 20 2a 2f 0a 58 09 |roken ru|n. */.X.|
|00003bd0| 20 20 20 20 69 74 65 6d | 62 75 66 5b 63 6f 75 6e | item|buf[coun|
|00003be0| 74 5d 20 3d 20 72 65 70 | 65 61 74 69 74 65 6d 20 |t] = rep|eatitem |
|00003bf0| 3d 20 69 74 65 6d 3b 0a | 58 09 20 20 20 20 63 6f |= item;.|X. co|
|00003c00| 75 6e 74 2b 2b 3b 0a 58 | 09 20 20 20 20 72 65 70 |unt++;.X|. rep|
|00003c10| 65 61 74 63 6f 75 6e 74 | 20 3d 20 31 3b 0a 58 09 |eatcount| = 1;.X.|
|00003c20| 20 20 20 20 7d 0a 58 09 | 7d 0a 58 0a 58 20 20 20 | }.X.|}.X.X |
|00003c30| 20 69 74 65 6d 20 3d 20 | 30 3b 0a 58 20 20 20 20 | item = |0;.X |
|00003c40| 62 69 74 73 70 65 72 69 | 74 65 6d 20 3d 20 30 3b |bitsperi|tem = 0;|
|00003c50| 0a 58 20 20 20 20 62 69 | 74 73 68 69 66 74 20 3d |.X bi|tshift =|
|00003c60| 20 37 3b 0a 58 20 20 20 | 20 7d 0a 58 0a 58 70 75 | 7;.X | }.X.Xpu|
|00003c70| 74 62 69 74 28 20 62 20 | 29 0a 58 62 69 74 20 62 |tbit( b |).Xbit b|
|00003c80| 3b 0a 58 20 20 20 20 7b | 0a 58 20 20 20 20 69 66 |;.X {|.X if|
|00003c90| 20 28 20 62 69 74 73 70 | 65 72 69 74 65 6d 20 3d | ( bitsp|eritem =|
|00003ca0| 3d 20 38 20 29 0a 58 09 | 7b 0a 58 09 70 75 74 69 |= 8 ).X.|{.X.puti|
|00003cb0| 74 65 6d 28 20 29 3b 0a | 58 09 7d 0a 58 20 20 20 |tem( );.|X.}.X |
|00003cc0| 20 69 66 20 28 20 21 20 | 62 20 29 0a 58 09 69 74 | if ( ! |b ).X.it|
|00003cd0| 65 6d 20 2b 3d 20 31 20 | 3c 3c 20 62 69 74 73 68 |em += 1 |<< bitsh|
|00003ce0| 69 66 74 3b 0a 58 20 20 | 20 20 62 69 74 73 70 65 |ift;.X | bitspe|
|00003cf0| 72 69 74 65 6d 2b 2b 3b | 0a 58 20 20 20 20 62 69 |ritem++;|.X bi|
|00003d00| 74 73 68 69 66 74 2d 2d | 3b 0a 58 20 20 20 20 7d |tshift--|;.X }|
|00003d10| 0a 58 0a 58 70 75 74 72 | 65 73 74 28 20 29 0a 58 |.X.Xputr|est( ).X|
|00003d20| 20 20 20 20 7b 0a 58 20 | 20 20 20 69 66 20 28 20 | {.X | if ( |
|00003d30| 62 69 74 73 70 65 72 69 | 74 65 6d 20 3e 20 30 20 |bitsperi|tem > 0 |
|00003d40| 29 0a 58 09 70 75 74 69 | 74 65 6d 28 20 29 3b 0a |).X.puti|tem( );.|
|00003d50| 58 20 20 20 20 69 66 20 | 28 20 63 6f 75 6e 74 20 |X if |( count |
|00003d60| 3e 20 30 20 29 0a 58 09 | 70 75 74 72 6c 62 75 66 |> 0 ).X.|putrlbuf|
|00003d70| 66 65 72 28 20 29 3b 0a | 58 20 20 20 20 70 72 69 |fer( );.|X pri|
|00003d80| 6e 74 66 28 20 22 5c 6e | 73 68 6f 77 70 61 67 65 |ntf( "\n|showpage|
|00003d90| 5c 6e 22 20 29 3b 0a 58 | 20 20 20 20 7d 0a 53 48 |\n" );.X| }.SH|
|00003da0| 41 52 5f 45 4f 46 0a 69 | 66 20 74 65 73 74 20 36 |AR_EOF.i|f test 6|
|00003db0| 31 35 32 20 2d 6e 65 20 | 22 60 77 63 20 2d 63 20 |152 -ne |"`wc -c |
|00003dc0| 3c 20 27 70 62 6d 74 6f | 70 73 2e 63 27 60 22 0a |< 'pbmto|ps.c'`".|
|00003dd0| 74 68 65 6e 0a 09 65 63 | 68 6f 20 73 68 61 72 3a |then..ec|ho shar:|
|00003de0| 20 65 72 72 6f 72 20 74 | 72 61 6e 73 6d 69 74 74 | error t|ransmitt|
|00003df0| 69 6e 67 20 22 27 70 62 | 6d 74 6f 70 73 2e 63 27 |ing "'pb|mtops.c'|
|00003e00| 22 20 27 28 73 68 6f 75 | 6c 64 20 68 61 76 65 20 |" '(shou|ld have |
|00003e10| 62 65 65 6e 20 36 31 35 | 32 20 63 68 61 72 61 63 |been 615|2 charac|
|00003e20| 74 65 72 73 29 27 0a 66 | 69 0a 66 69 20 23 20 65 |ters)'.f|i.fi # e|
|00003e30| 6e 64 20 6f 66 20 6f 76 | 65 72 77 72 69 74 69 6e |nd of ov|erwritin|
|00003e40| 67 20 63 68 65 63 6b 0a | 65 63 68 6f 20 73 68 61 |g check.|echo sha|
|00003e50| 72 3a 20 65 78 74 72 61 | 63 74 69 6e 67 20 22 27 |r: extra|cting "'|
|00003e60| 70 62 6d 74 6f 70 73 2e | 31 27 22 20 27 28 31 32 |pbmtops.|1'" '(12|
|00003e70| 32 38 20 63 68 61 72 61 | 63 74 65 72 73 29 27 0a |28 chara|cters)'.|
|00003e80| 69 66 20 74 65 73 74 20 | 2d 66 20 27 70 62 6d 74 |if test |-f 'pbmt|
|00003e90| 6f 70 73 2e 31 27 0a 74 | 68 65 6e 0a 09 65 63 68 |ops.1'.t|hen..ech|
|00003ea0| 6f 20 73 68 61 72 3a 20 | 77 69 6c 6c 20 6e 6f 74 |o shar: |will not|
|00003eb0| 20 6f 76 65 72 2d 77 72 | 69 74 65 20 65 78 69 73 | over-wr|ite exis|
|00003ec0| 74 69 6e 67 20 66 69 6c | 65 20 22 27 70 62 6d 74 |ting fil|e "'pbmt|
|00003ed0| 6f 70 73 2e 31 27 22 0a | 65 6c 73 65 0a 73 65 64 |ops.1'".|else.sed|
|00003ee0| 20 27 73 2f 5e 58 2f 2f | 27 20 3c 3c 20 5c 53 48 | 's/^X//|' << \SH|
|00003ef0| 41 52 5f 45 4f 46 20 3e | 20 27 70 62 6d 74 6f 70 |AR_EOF >| 'pbmtop|
|00003f00| 73 2e 31 27 0a 58 2e 54 | 48 20 70 62 6d 74 6f 70 |s.1'.X.T|H pbmtop|
|00003f10| 73 20 31 20 22 32 39 20 | 41 75 67 75 73 74 20 31 |s 1 "29 |August 1|
|00003f20| 39 38 38 22 0a 58 2e 53 | 48 20 4e 41 4d 45 0a 58 |988".X.S|H NAME.X|
|00003f30| 70 62 6d 74 6f 70 73 20 | 2d 20 63 6f 6e 76 65 72 |pbmtops |- conver|
|00003f40| 74 20 70 6f 72 74 61 62 | 6c 65 20 62 69 74 6d 61 |t portab|le bitma|
|00003f50| 70 73 20 69 6e 74 6f 20 | 50 6f 73 74 53 63 72 69 |ps into |PostScri|
|00003f60| 70 74 0a 58 2e 53 48 20 | 53 59 4e 4f 50 53 49 53 |pt.X.SH |SYNOPSIS|
|00003f70| 0a 58 70 62 6d 74 6f 70 | 73 20 5b 20 2d 73 20 3c |.Xpbmtop|s [ -s <|
|00003f80| 73 63 61 6c 65 3e 20 5d | 20 5b 20 3c 70 62 6d 66 |scale> ]| [ <pbmf|
|00003f90| 69 6c 65 3e 20 5d 0a 58 | 2e 53 48 20 44 45 53 43 |ile> ].X|.SH DESC|
|00003fa0| 52 49 50 54 49 4f 4e 0a | 58 52 65 61 64 73 20 61 |RIPTION.|XReads a|
|00003fb0| 20 70 6f 72 74 61 62 6c | 65 20 62 69 74 6d 61 70 | portabl|e bitmap|
|00003fc0| 20 61 73 20 69 6e 70 75 | 74 2e 0a 58 50 72 6f 64 | as inpu|t..XProd|
|00003fd0| 75 63 65 73 20 50 6f 73 | 74 53 63 72 69 70 74 20 |uces Pos|tScript |
|00003fe0| 61 73 20 6f 75 74 70 75 | 74 2e 0a 58 2e 4c 50 0a |as outpu|t..X.LP.|
|00003ff0| 58 54 68 65 20 2d 73 20 | 66 6c 61 67 20 63 6f 6e |XThe -s |flag con|
|00004000| 74 72 6f 6c 73 20 74 68 | 65 20 73 63 61 6c 65 20 |trols th|e scale |
|00004010| 6f 66 20 74 68 65 20 72 | 65 73 75 6c 74 2e 20 20 |of the r|esult. |
|00004020| 54 68 65 20 64 65 66 61 | 75 6c 74 20 73 63 61 6c |The defa|ult scal|
|00004030| 65 20 69 73 20 31 2c 0a | 58 77 68 69 63 68 20 72 |e is 1,.|Xwhich r|
|00004040| 65 73 75 6c 74 73 20 69 | 6e 20 6f 6e 65 20 70 62 |esults i|n one pb|
|00004050| 6d 20 70 69 78 65 6c 20 | 70 72 6f 64 75 63 69 6e |m pixel |producin|
|00004060| 67 20 61 20 33 78 33 20 | 73 71 75 61 72 65 20 6f |g a 3x3 |square o|
|00004070| 66 20 50 6f 73 74 53 63 | 72 69 70 74 0a 58 70 69 |f PostSc|ript.Xpi|
|00004080| 78 65 6c 73 2e 20 20 4f | 6e 20 61 20 33 30 30 20 |xels. O|n a 300 |
|00004090| 64 70 69 20 70 72 69 6e | 74 65 72 20 73 75 63 68 |dpi prin|ter such|
|000040a0| 20 61 73 20 74 68 65 20 | 41 70 70 6c 65 20 4c 61 | as the |Apple La|
|000040b0| 73 65 72 77 72 69 74 65 | 72 2c 20 74 68 69 73 20 |serwrite|r, this |
|000040c0| 6d 61 6b 65 73 0a 58 74 | 68 65 20 6f 75 74 70 75 |makes.Xt|he outpu|
|000040d0| 74 20 6c 6f 6f 6b 20 61 | 62 6f 75 74 20 74 68 65 |t look a|bout the|
|000040e0| 20 73 61 6d 65 20 73 69 | 7a 65 20 61 73 20 74 68 | same si|ze as th|
|000040f0| 65 20 69 6e 70 75 74 20 | 77 6f 75 6c 64 20 69 66 |e input |would if|
|00004100| 20 69 74 20 77 61 73 20 | 64 69 73 70 6c 61 79 65 | it was |displaye|
|00004110| 64 0a 58 6f 6e 20 61 20 | 74 79 70 69 63 61 6c 20 |d.Xon a |typical |
|00004120| 37 32 20 64 70 69 20 73 | 63 72 65 65 6e 2e 0a 58 |72 dpi s|creen..X|
|00004130| 54 6f 20 67 65 74 20 6f | 6e 65 20 70 62 6d 20 70 |To get o|ne pbm p|
|00004140| 69 78 65 6c 20 70 65 72 | 20 50 6f 73 74 53 63 72 |ixel per| PostScr|
|00004150| 69 70 74 20 70 69 78 65 | 6c 2c 20 75 73 65 20 22 |ipt pixe|l, use "|
|00004160| 2d 73 20 30 2e 33 33 33 | 33 33 33 22 2e 0a 58 2e |-s 0.333|333"..X.|
|00004170| 4c 50 0a 58 4e 6f 74 65 | 20 74 68 61 74 20 74 68 |LP.XNote| that th|
|00004180| 65 72 65 20 69 73 20 6e | 6f 20 70 73 74 6f 70 62 |ere is n|o pstopb|
|00004190| 6d 0a 58 74 6f 6f 6c 20 | 2d 20 74 68 69 73 20 74 |m.Xtool |- this t|
|000041a0| 72 61 6e 73 66 6f 72 6d | 61 74 69 6f 6e 20 69 73 |ransform|ation is|
|000041b0| 20 6f 6e 65 2d 77 61 79 | 2c 20 62 65 63 61 75 73 | one-way|, becaus|
|000041c0| 65 20 61 20 70 73 74 6f | 70 62 6d 20 74 6f 6f 6c |e a psto|pbm tool|
|000041d0| 20 77 6f 75 6c 64 0a 58 | 62 65 20 61 20 66 75 6c | would.X|be a ful|
|000041e0| 6c 2d 66 6c 65 64 67 65 | 64 20 50 6f 73 74 53 63 |l-fledge|d PostSc|
|000041f0| 72 69 70 74 20 69 6e 74 | 65 72 70 72 65 74 65 72 |ript int|erpreter|
|00004200| 2c 20 77 68 69 63 68 20 | 69 73 20 62 65 79 6f 6e |, which |is beyon|
|00004210| 64 20 74 68 65 20 73 63 | 6f 70 65 0a 58 6f 66 20 |d the sc|ope.Xof |
|00004220| 74 68 69 73 20 70 61 63 | 6b 61 67 65 2e 0a 58 2e |this pac|kage..X.|
|00004230| 53 48 20 22 53 45 45 20 | 41 4c 53 4f 22 0a 58 70 |SH "SEE |ALSO".Xp|
|00004240| 62 6d 28 35 29 0a 58 2e | 53 48 20 41 55 54 48 4f |bm(5).X.|SH AUTHO|
|00004250| 52 0a 58 43 6f 70 79 72 | 69 67 68 74 20 28 43 29 |R.XCopyr|ight (C)|
|00004260| 20 31 39 38 38 20 62 79 | 20 4a 65 66 20 50 6f 73 | 1988 by| Jef Pos|
|00004270| 6b 61 6e 7a 65 72 2e 0a | 58 0a 58 50 65 72 6d 69 |kanzer..|X.XPermi|
|00004280| 73 73 69 6f 6e 20 74 6f | 20 75 73 65 2c 20 63 6f |ssion to| use, co|
|00004290| 70 79 2c 20 6d 6f 64 69 | 66 79 2c 20 61 6e 64 20 |py, modi|fy, and |
|000042a0| 64 69 73 74 72 69 62 75 | 74 65 20 74 68 69 73 20 |distribu|te this |
|000042b0| 73 6f 66 74 77 61 72 65 | 20 61 6e 64 20 69 74 73 |software| and its|
|000042c0| 0a 58 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |.Xdocume|ntation |
|000042d0| 66 6f 72 20 61 6e 79 20 | 70 75 72 70 6f 73 65 20 |for any |purpose |
|000042e0| 61 6e 64 20 77 69 74 68 | 6f 75 74 20 66 65 65 20 |and with|out fee |
|000042f0| 69 73 20 68 65 72 65 62 | 79 20 67 72 61 6e 74 65 |is hereb|y grante|
|00004300| 64 2c 20 70 72 6f 76 69 | 64 65 64 0a 58 74 68 61 |d, provi|ded.Xtha|
|00004310| 74 20 74 68 65 20 61 62 | 6f 76 65 20 63 6f 70 79 |t the ab|ove copy|
|00004320| 72 69 67 68 74 20 6e 6f | 74 69 63 65 20 61 70 70 |right no|tice app|
|00004330| 65 61 72 20 69 6e 20 61 | 6c 6c 20 63 6f 70 69 65 |ear in a|ll copie|
|00004340| 73 20 61 6e 64 20 74 68 | 61 74 20 62 6f 74 68 20 |s and th|at both |
|00004350| 74 68 61 74 0a 58 63 6f | 70 79 72 69 67 68 74 20 |that.Xco|pyright |
|00004360| 6e 6f 74 69 63 65 20 61 | 6e 64 20 74 68 69 73 20 |notice a|nd this |
|00004370| 70 65 72 6d 69 73 73 69 | 6f 6e 20 6e 6f 74 69 63 |permissi|on notic|
|00004380| 65 20 61 70 70 65 61 72 | 20 69 6e 20 73 75 70 70 |e appear| in supp|
|00004390| 6f 72 74 69 6e 67 0a 58 | 64 6f 63 75 6d 65 6e 74 |orting.X|document|
|000043a0| 61 74 69 6f 6e 2e 20 20 | 54 68 69 73 20 73 6f 66 |ation. |This sof|
|000043b0| 74 77 61 72 65 20 69 73 | 20 70 72 6f 76 69 64 65 |tware is| provide|
|000043c0| 64 20 22 61 73 20 69 73 | 22 20 77 69 74 68 6f 75 |d "as is|" withou|
|000043d0| 74 20 65 78 70 72 65 73 | 73 20 6f 72 0a 58 69 6d |t expres|s or.Xim|
|000043e0| 70 6c 69 65 64 20 77 61 | 72 72 61 6e 74 79 2e 0a |plied wa|rranty..|
|000043f0| 53 48 41 52 5f 45 4f 46 | 0a 69 66 20 74 65 73 74 |SHAR_EOF|.if test|
|00004400| 20 31 32 32 38 20 2d 6e | 65 20 22 60 77 63 20 2d | 1228 -n|e "`wc -|
|00004410| 63 20 3c 20 27 70 62 6d | 74 6f 70 73 2e 31 27 60 |c < 'pbm|tops.1'`|
|00004420| 22 0a 74 68 65 6e 0a 09 | 65 63 68 6f 20 73 68 61 |".then..|echo sha|
|00004430| 72 3a 20 65 72 72 6f 72 | 20 74 72 61 6e 73 6d 69 |r: error| transmi|
|00004440| 74 74 69 6e 67 20 22 27 | 70 62 6d 74 6f 70 73 2e |tting "'|pbmtops.|
|00004450| 31 27 22 20 27 28 73 68 | 6f 75 6c 64 20 68 61 76 |1'" '(sh|ould hav|
|00004460| 65 20 62 65 65 6e 20 31 | 32 32 38 20 63 68 61 72 |e been 1|228 char|
|00004470| 61 63 74 65 72 73 29 27 | 0a 66 69 0a 66 69 20 23 |acters)'|.fi.fi #|
|00004480| 20 65 6e 64 20 6f 66 20 | 6f 76 65 72 77 72 69 74 | end of |overwrit|
|00004490| 69 6e 67 20 63 68 65 63 | 6b 0a 65 63 68 6f 20 73 |ing chec|k.echo s|
|000044a0| 68 61 72 3a 20 65 78 74 | 72 61 63 74 69 6e 67 20 |har: ext|racting |
|000044b0| 22 27 70 62 6d 74 6f 70 | 74 78 2e 63 27 22 20 27 |"'pbmtop|tx.c'" '|
|000044c0| 28 31 37 39 31 20 63 68 | 61 72 61 63 74 65 72 73 |(1791 ch|aracters|
|000044d0| 29 27 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 70 |)'.if te|st -f 'p|
|000044e0| 62 6d 74 6f 70 74 78 2e | 63 27 0a 74 68 65 6e 0a |bmtoptx.|c'.then.|
|000044f0| 09 65 63 68 6f 20 73 68 | 61 72 3a 20 77 69 6c 6c |.echo sh|ar: will|
|00004500| 20 6e 6f 74 20 6f 76 65 | 72 2d 77 72 69 74 65 20 | not ove|r-write |
|00004510| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 22 27 |existing| file "'|
|00004520| 70 62 6d 74 6f 70 74 78 | 2e 63 27 22 0a 65 6c 73 |pbmtoptx|.c'".els|
|00004530| 65 0a 73 65 64 20 27 73 | 2f 5e 58 2f 2f 27 20 3c |e.sed 's|/^X//' <|
|00004540| 3c 20 5c 53 48 41 52 5f | 45 4f 46 20 3e 20 27 70 |< \SHAR_|EOF > 'p|
|00004550| 62 6d 74 6f 70 74 78 2e | 63 27 0a 58 2f 2a 20 70 |bmtoptx.|c'.X/* p|
|00004560| 62 6d 74 6f 70 74 78 2e | 63 20 2d 20 72 65 61 64 |bmtoptx.|c - read|
|00004570| 20 61 20 70 6f 72 74 61 | 62 6c 65 20 62 69 74 6d | a porta|ble bitm|
|00004580| 61 70 20 61 6e 64 20 70 | 72 6f 64 75 63 65 20 61 |ap and p|roduce a|
|00004590| 20 50 72 69 6e 74 72 6f | 6e 69 78 20 70 72 69 6e | Printro|nix prin|
|000045a0| 74 65 72 20 66 69 6c 65 | 0a 58 2a 2a 0a 58 2a 2a |ter file|.X**.X**|
|000045b0| 20 43 6f 70 79 72 69 67 | 68 74 20 28 43 29 20 31 | Copyrig|ht (C) 1|
|000045c0| 39 38 38 20 62 79 20 4a | 65 66 20 50 6f 73 6b 61 |988 by J|ef Poska|
|000045d0| 6e 7a 65 72 2e 0a 58 2a | 2a 0a 58 2a 2a 20 50 65 |nzer..X*|*.X** Pe|
|000045e0| 72 6d 69 73 73 69 6f 6e | 20 74 6f 20 75 73 65 2c |rmission| to use,|
|000045f0| 20 63 6f 70 79 2c 20 6d | 6f 64 69 66 79 2c 20 61 | copy, m|odify, a|
|00004600| 6e 64 20 64 69 73 74 72 | 69 62 75 74 65 20 74 68 |nd distr|ibute th|
|00004610| 69 73 20 73 6f 66 74 77 | 61 72 65 20 61 6e 64 20 |is softw|are and |
|00004620| 69 74 73 0a 58 2a 2a 20 | 64 6f 63 75 6d 65 6e 74 |its.X** |document|
|00004630| 61 74 69 6f 6e 20 66 6f | 72 20 61 6e 79 20 70 75 |ation fo|r any pu|
|00004640| 72 70 6f 73 65 20 61 6e | 64 20 77 69 74 68 6f 75 |rpose an|d withou|
|00004650| 74 20 66 65 65 20 69 73 | 20 68 65 72 65 62 79 20 |t fee is| hereby |
|00004660| 67 72 61 6e 74 65 64 2c | 20 70 72 6f 76 69 64 65 |granted,| provide|
|00004670| 64 0a 58 2a 2a 20 74 68 | 61 74 20 74 68 65 20 61 |d.X** th|at the a|
|00004680| 62 6f 76 65 20 63 6f 70 | 79 72 69 67 68 74 20 6e |bove cop|yright n|
|00004690| 6f 74 69 63 65 20 61 70 | 70 65 61 72 20 69 6e 20 |otice ap|pear in |
|000046a0| 61 6c 6c 20 63 6f 70 69 | 65 73 20 61 6e 64 20 74 |all copi|es and t|
|000046b0| 68 61 74 20 62 6f 74 68 | 20 74 68 61 74 0a 58 2a |hat both| that.X*|
|000046c0| 2a 20 63 6f 70 79 72 69 | 67 68 74 20 6e 6f 74 69 |* copyri|ght noti|
|000046d0| 63 65 20 61 6e 64 20 74 | 68 69 73 20 70 65 72 6d |ce and t|his perm|
|000046e0| 69 73 73 69 6f 6e 20 6e | 6f 74 69 63 65 20 61 70 |ission n|otice ap|
|000046f0| 70 65 61 72 20 69 6e 20 | 73 75 70 70 6f 72 74 69 |pear in |supporti|
|00004700| 6e 67 0a 58 2a 2a 20 64 | 6f 63 75 6d 65 6e 74 61 |ng.X** d|ocumenta|
|00004710| 74 69 6f 6e 2e 20 20 54 | 68 69 73 20 73 6f 66 74 |tion. T|his soft|
|00004720| 77 61 72 65 20 69 73 20 | 70 72 6f 76 69 64 65 64 |ware is |provided|
|00004730| 20 22 61 73 20 69 73 22 | 20 77 69 74 68 6f 75 74 | "as is"| without|
|00004740| 20 65 78 70 72 65 73 73 | 20 6f 72 0a 58 2a 2a 20 | express| or.X** |
|00004750| 69 6d 70 6c 69 65 64 20 | 77 61 72 72 61 6e 74 79 |implied |warranty|
|00004760| 2e 0a 58 2a 2f 0a 58 0a | 58 23 69 6e 63 6c 75 64 |..X*/.X.|X#includ|
|00004770| 65 20 3c 73 74 64 69 6f | 2e 68 3e 0a 58 23 69 66 |e <stdio|.h>.X#if|
|00004780| 64 65 66 09 4f 53 5f 53 | 59 53 56 0a 58 23 69 6e |def.OS_S|YSV.X#in|
|00004790| 63 6c 75 64 65 20 3c 73 | 74 72 69 6e 67 2e 68 3e |clude <s|tring.h>|
|000047a0| 0a 58 23 65 6c 73 65 09 | 4f 53 5f 53 59 53 56 0a |.X#else.|OS_SYSV.|
|000047b0| 58 23 69 6e 63 6c 75 64 | 65 20 3c 73 74 72 69 6e |X#includ|e <strin|
|000047c0| 67 73 2e 68 3e 0a 58 23 | 65 6e 64 69 66 09 4f 53 |gs.h>.X#|endif.OS|
|000047d0| 5f 53 59 53 56 0a 58 23 | 69 6e 63 6c 75 64 65 20 |_SYSV.X#|include |
|000047e0| 22 70 62 6d 2e 68 22 0a | 58 0a 58 6d 61 69 6e 28 |"pbm.h".|X.Xmain(|
|000047f0| 20 61 72 67 63 2c 20 61 | 72 67 76 20 29 0a 58 69 | argc, a|rgv ).Xi|
|00004800| 6e 74 20 61 72 67 63 3b | 0a 58 63 68 61 72 20 2a |nt argc;|.Xchar *|
|00004810| 61 72 67 76 5b 5d 3b 0a | 58 20 20 20 20 7b 0a 58 |argv[];.|X {.X|
|00004820| 20 20 20 20 46 49 4c 45 | 20 2a 69 66 64 3b 0a 58 | FILE| *ifd;.X|
|00004830| 20 20 20 20 62 69 74 20 | 2a 2a 62 69 74 73 3b 0a | bit |**bits;.|
|00004840| 58 20 20 20 20 69 6e 74 | 20 72 6f 77 73 2c 20 63 |X int| rows, c|
|00004850| 6f 6c 73 2c 20 72 6f 77 | 2c 20 63 6f 6c 3b 0a 58 |ols, row|, col;.X|
|00004860| 20 20 20 20 63 68 61 72 | 20 2a 75 73 61 67 65 20 | char| *usage |
|00004870| 3d 20 22 75 73 61 67 65 | 3a 20 20 25 73 20 5b 70 |= "usage|: %s [p|
|00004880| 62 6d 66 69 6c 65 5d 5c | 6e 22 3b 0a 58 0a 58 20 |bmfile]\|n";.X.X |
|00004890| 20 20 20 69 66 20 28 20 | 61 72 67 63 20 3e 20 32 | if ( |argc > 2|
|000048a0| 20 29 0a 58 09 7b 0a 58 | 09 66 70 72 69 6e 74 66 | ).X.{.X|.fprintf|
|000048b0| 28 20 73 74 64 65 72 72 | 2c 20 75 73 61 67 65 2c |( stderr|, usage,|
|000048c0| 20 61 72 67 76 5b 30 5d | 20 29 3b 0a 58 09 65 78 | argv[0]| );.X.ex|
|000048d0| 69 74 28 20 31 20 29 3b | 0a 58 09 7d 0a 58 0a 58 |it( 1 );|.X.}.X.X|
|000048e0| 20 20 20 20 69 66 20 28 | 20 61 72 67 63 20 3d 3d | if (| argc ==|
|000048f0| 20 32 20 29 0a 58 09 7b | 0a 58 20 20 20 20 20 20 | 2 ).X.{|.X |
|00004900| 20 20 69 66 64 20 3d 20 | 66 6f 70 65 6e 28 20 61 | ifd = |fopen( a|
|00004910| 72 67 76 5b 31 5d 2c 20 | 22 72 22 20 29 3b 0a 58 |rgv[1], |"r" );.X|
|00004920| 20 20 20 20 20 20 20 20 | 69 66 20 28 20 69 66 64 | |if ( ifd|
|00004930| 20 3d 3d 20 4e 55 4c 4c | 20 29 0a 58 09 20 20 20 | == NULL| ).X. |
|00004940| 20 7b 0a 58 09 20 20 20 | 20 66 70 72 69 6e 74 66 | {.X. | fprintf|
|00004950| 28 20 73 74 64 65 72 72 | 2c 20 22 25 73 3a 20 63 |( stderr|, "%s: c|
|00004960| 61 6e 27 74 20 6f 70 65 | 6e 2e 5c 6e 22 2c 20 61 |an't ope|n.\n", a|
|00004970| 72 67 76 5b 31 5d 20 29 | 3b 0a 58 09 20 20 20 20 |rgv[1] )|;.X. |
|00004980| 65 78 69 74 28 20 31 20 | 29 3b 0a 58 09 20 20 20 |exit( 1 |);.X. |
|00004990| 20 7d 0a 58 09 7d 0a 58 | 20 20 20 20 65 6c 73 65 | }.X.}.X| else|
|000049a0| 0a 58 09 69 66 64 20 3d | 20 73 74 64 69 6e 3b 0a |.X.ifd =| stdin;.|
|000049b0| 58 0a 58 20 20 20 20 62 | 69 74 73 20 3d 20 70 62 |X.X b|its = pb|
|000049c0| 6d 5f 72 65 61 64 70 62 | 6d 28 20 69 66 64 2c 20 |m_readpb|m( ifd, |
|000049d0| 26 63 6f 6c 73 2c 20 26 | 72 6f 77 73 20 29 3b 0a |&cols, &|rows );.|
|000049e0| 58 0a 58 20 20 20 20 69 | 66 20 28 20 69 66 64 20 |X.X i|f ( ifd |
|000049f0| 21 3d 20 73 74 64 69 6e | 20 29 0a 58 09 66 63 6c |!= stdin| ).X.fcl|
|00004a00| 6f 73 65 28 20 69 66 64 | 20 29 3b 0a 58 20 20 20 |ose( ifd| );.X |
|00004a10| 20 0a 58 20 20 20 20 70 | 75 74 69 6e 69 74 28 20 | .X p|utinit( |
|00004a20| 29 3b 0a 58 20 20 20 20 | 66 6f 72 20 28 20 72 6f |);.X |for ( ro|
|00004a30| 77 20 3d 20 30 3b 20 72 | 6f 77 20 3c 20 72 6f 77 |w = 0; r|ow < row|
|00004a40| 73 3b 20 72 6f 77 2b 2b | 20 29 0a 58 09 7b 0a 58 |s; row++| ).X.{.X|
|00004a50| 09 70 75 74 63 68 61 72 | 28 20 35 20 29 3b 0a 58 |.putchar|( 5 );.X|
|00004a60| 20 20 20 20 20 20 20 20 | 66 6f 72 20 28 20 63 6f | |for ( co|
|00004a70| 6c 20 3d 20 30 3b 20 63 | 6f 6c 20 3c 20 63 6f 6c |l = 0; c|ol < col|
|00004a80| 73 3b 20 63 6f 6c 2b 2b | 20 29 0a 58 09 20 20 20 |s; col++| ).X. |
|00004a90| 20 70 75 74 62 69 74 28 | 20 62 69 74 73 5b 72 6f | putbit(| bits[ro|
|00004aa0| 77 5d 5b 63 6f 6c 5d 20 | 29 3b 0a 58 09 70 75 74 |w][col] |);.X.put|
|00004ab0| 72 65 73 74 28 20 29 3b | 0a 58 09 70 75 74 63 68 |rest( );|.X.putch|
|00004ac0| 61 72 28 20 27 5c 6e 27 | 20 29 3b 0a 58 20 20 20 |ar( '\n'| );.X |
|00004ad0| 20 20 20 20 20 7d 0a 58 | 0a 58 20 20 20 20 65 78 | }.X|.X ex|
|00004ae0| 69 74 28 20 30 20 29 3b | 0a 58 20 20 20 20 7d 0a |it( 0 );|.X }.|
|00004af0| 58 0a 58 0a 58 63 68 61 | 72 20 69 74 65 6d 3b 0a |X.X.Xcha|r item;.|
|00004b00| 58 69 6e 74 20 62 69 74 | 73 70 65 72 69 74 65 6d |Xint bit|speritem|
|00004b10| 2c 20 62 69 74 73 68 69 | 66 74 3b 0a 58 0a 58 70 |, bitshi|ft;.X.Xp|
|00004b20| 75 74 69 6e 69 74 28 20 | 29 0a 58 20 20 20 20 7b |utinit( |).X {|
|00004b30| 0a 58 20 20 20 20 62 69 | 74 73 70 65 72 69 74 65 |.X bi|tsperite|
|00004b40| 6d 20 3d 20 30 3b 0a 58 | 20 20 20 20 69 74 65 6d |m = 0;.X| item|
|00004b50| 20 3d 20 36 34 3b 0a 58 | 20 20 20 20 62 69 74 73 | = 64;.X| bits|
|00004b60| 68 69 66 74 20 3d 20 30 | 3b 0a 58 20 20 20 20 7d |hift = 0|;.X }|
|00004b70| 0a 58 0a 58 70 75 74 62 | 69 74 28 20 62 20 29 0a |.X.Xputb|it( b ).|
|00004b80| 58 62 69 74 20 62 3b 0a | 58 20 20 20 20 7b 0a 58 |Xbit b;.|X {.X|
|00004b90| 20 20 20 20 69 66 20 28 | 20 62 69 74 73 70 65 72 | if (| bitsper|
|00004ba0| 69 74 65 6d 20 3d 3d 20 | 36 20 29 0a 58 09 70 75 |item == |6 ).X.pu|
|00004bb0| 74 69 74 65 6d 28 20 29 | 3b 0a 58 20 20 20 20 69 |titem( )|;.X i|
|00004bc0| 66 20 28 20 62 20 29 0a | 58 09 69 74 65 6d 20 2b |f ( b ).|X.item +|
|00004bd0| 3d 20 31 20 3c 3c 20 62 | 69 74 73 68 69 66 74 3b |= 1 << b|itshift;|
|00004be0| 0a 58 20 20 20 20 62 69 | 74 73 70 65 72 69 74 65 |.X bi|tsperite|
|00004bf0| 6d 2b 2b 3b 0a 58 20 20 | 20 20 62 69 74 73 68 69 |m++;.X | bitshi|
|00004c00| 66 74 2b 2b 3b 0a 58 20 | 20 20 20 7d 0a 58 0a 58 |ft++;.X | }.X.X|
|00004c10| 70 75 74 72 65 73 74 28 | 20 29 0a 58 20 20 20 20 |putrest(| ).X |
|00004c20| 7b 0a 58 20 20 20 20 69 | 66 20 28 20 62 69 74 73 |{.X i|f ( bits|
|00004c30| 70 65 72 69 74 65 6d 20 | 3e 20 30 20 29 0a 58 09 |peritem |> 0 ).X.|
|00004c40| 70 75 74 69 74 65 6d 28 | 20 29 3b 0a 58 20 20 20 |putitem(| );.X |
|00004c50| 20 7d 0a 58 0a 58 70 75 | 74 69 74 65 6d 28 20 29 | }.X.Xpu|titem( )|
|00004c60| 0a 58 20 20 20 20 7b 0a | 58 20 20 20 20 70 75 74 |.X {.|X put|
|00004c70| 63 68 61 72 28 20 69 74 | 65 6d 20 29 3b 0a 58 20 |char( it|em );.X |
|00004c80| 20 20 20 62 69 74 73 70 | 65 72 69 74 65 6d 20 3d | bitsp|eritem =|
|00004c90| 20 30 3b 0a 58 20 20 20 | 20 69 74 65 6d 20 3d 20 | 0;.X | item = |
|00004ca0| 36 34 3b 0a 58 20 20 20 | 20 62 69 74 73 68 69 66 |64;.X | bitshif|
|00004cb0| 74 20 3d 20 30 3b 0a 58 | 20 20 20 20 7d 0a 53 48 |t = 0;.X| }.SH|
|00004cc0| 41 52 5f 45 4f 46 0a 69 | 66 20 74 65 73 74 20 31 |AR_EOF.i|f test 1|
|00004cd0| 37 39 31 20 2d 6e 65 20 | 22 60 77 63 20 2d 63 20 |791 -ne |"`wc -c |
|00004ce0| 3c 20 27 70 62 6d 74 6f | 70 74 78 2e 63 27 60 22 |< 'pbmto|ptx.c'`"|
|00004cf0| 0a 74 68 65 6e 0a 09 65 | 63 68 6f 20 73 68 61 72 |.then..e|cho shar|
|00004d00| 3a 20 65 72 72 6f 72 20 | 74 72 61 6e 73 6d 69 74 |: error |transmit|
|00004d10| 74 69 6e 67 20 22 27 70 | 62 6d 74 6f 70 74 78 2e |ting "'p|bmtoptx.|
|00004d20| 63 27 22 20 27 28 73 68 | 6f 75 6c 64 20 68 61 76 |c'" '(sh|ould hav|
|00004d30| 65 20 62 65 65 6e 20 31 | 37 39 31 20 63 68 61 72 |e been 1|791 char|
|00004d40| 61 63 74 65 72 73 29 27 | 0a 66 69 0a 66 69 20 23 |acters)'|.fi.fi #|
|00004d50| 20 65 6e 64 20 6f 66 20 | 6f 76 65 72 77 72 69 74 | end of |overwrit|
|00004d60| 69 6e 67 20 63 68 65 63 | 6b 0a 65 63 68 6f 20 73 |ing chec|k.echo s|
|00004d70| 68 61 72 3a 20 65 78 74 | 72 61 63 74 69 6e 67 20 |har: ext|racting |
|00004d80| 22 27 70 62 6d 74 6f 70 | 74 78 2e 31 27 22 20 27 |"'pbmtop|tx.1'" '|
|00004d90| 28 37 36 33 20 63 68 61 | 72 61 63 74 65 72 73 29 |(763 cha|racters)|
|00004da0| 27 0a 69 66 20 74 65 73 | 74 20 2d 66 20 27 70 62 |'.if tes|t -f 'pb|
|00004db0| 6d 74 6f 70 74 78 2e 31 | 27 0a 74 68 65 6e 0a 09 |mtoptx.1|'.then..|
|00004dc0| 65 63 68 6f 20 73 68 61 | 72 3a 20 77 69 6c 6c 20 |echo sha|r: will |
|00004dd0| 6e 6f 74 20 6f 76 65 72 | 2d 77 72 69 74 65 20 65 |not over|-write e|
|00004de0| 78 69 73 74 69 6e 67 20 | 66 69 6c 65 20 22 27 70 |xisting |file "'p|
|00004df0| 62 6d 74 6f 70 74 78 2e | 31 27 22 0a 65 6c 73 65 |bmtoptx.|1'".else|
|00004e00| 0a 73 65 64 20 27 73 2f | 5e 58 2f 2f 27 20 3c 3c |.sed 's/|^X//' <<|
|00004e10| 20 5c 53 48 41 52 5f 45 | 4f 46 20 3e 20 27 70 62 | \SHAR_E|OF > 'pb|
|00004e20| 6d 74 6f 70 74 78 2e 31 | 27 0a 58 2e 54 48 20 70 |mtoptx.1|'.X.TH p|
|00004e30| 62 6d 74 6f 70 74 78 20 | 31 20 22 33 31 20 41 75 |bmtoptx |1 "31 Au|
|00004e40| 67 75 73 74 20 31 39 38 | 38 22 0a 58 2e 53 48 20 |gust 198|8".X.SH |
|00004e50| 4e 41 4d 45 0a 58 70 62 | 6d 74 6f 70 74 78 20 2d |NAME.Xpb|mtoptx -|
|00004e60| 20 63 6f 6e 76 65 72 74 | 20 70 6f 72 74 61 62 6c | convert| portabl|
|00004e70| 65 20 62 69 74 6d 61 70 | 73 20 69 6e 74 6f 20 50 |e bitmap|s into P|
|00004e80| 72 69 6e 74 72 6f 6e 69 | 78 20 70 72 69 6e 74 65 |rintroni|x printe|
|00004e90| 72 20 67 72 61 70 68 69 | 63 73 0a 58 2e 53 48 20 |r graphi|cs.X.SH |
|00004ea0| 53 59 4e 4f 50 53 49 53 | 0a 58 70 62 6d 74 6f 70 |SYNOPSIS|.Xpbmtop|
|00004eb0| 74 78 20 5b 70 62 6d 66 | 69 6c 65 5d 0a 58 2e 53 |tx [pbmf|ile].X.S|
|00004ec0| 48 20 44 45 53 43 52 49 | 50 54 49 4f 4e 0a 58 52 |H DESCRI|PTION.XR|
|00004ed0| 65 61 64 73 20 61 20 70 | 6f 72 74 61 62 6c 65 20 |eads a p|ortable |
|00004ee0| 62 69 74 6d 61 70 20 61 | 73 20 69 6e 70 75 74 2e |bitmap a|s input.|
|00004ef0| 0a 58 50 72 6f 64 75 63 | 65 73 20 61 20 66 69 6c |.XProduc|es a fil|
|00004f00| 65 20 6f 66 20 50 72 69 | 6e 74 72 6f 6e 69 78 20 |e of Pri|ntronix |
|00004f10| 70 72 69 6e 74 65 72 20 | 67 72 61 70 68 69 63 73 |printer |graphics|
|00004f20| 20 61 73 20 6f 75 74 70 | 75 74 2e 0a 58 2e 4c 50 | as outp|ut..X.LP|
|00004f30| 0a 58 4e 6f 74 65 20 74 | 68 61 74 20 74 68 65 72 |.XNote t|hat ther|
|00004f40| 65 20 69 73 20 6e 6f 20 | 70 74 78 74 6f 70 62 6d |e is no |ptxtopbm|
|00004f50| 20 74 6f 6f 6c 20 2d 20 | 74 68 69 73 20 74 72 61 | tool - |this tra|
|00004f60| 6e 73 66 6f 72 6d 61 74 | 69 6f 6e 20 69 73 20 6f |nsformat|ion is o|
|00004f70| 6e 65 20 77 61 79 2e 0a | 58 2e 53 48 20 22 53 45 |ne way..|X.SH "SE|
|00004f80| 45 20 41 4c 53 4f 22 0a | 58 70 62 6d 28 35 29 0a |E ALSO".|Xpbm(5).|
|00004f90| 58 2e 53 48 20 41 55 54 | 48 4f 52 0a 58 43 6f 70 |X.SH AUT|HOR.XCop|
|00004fa0| 79 72 69 67 68 74 20 28 | 43 29 20 31 39 38 38 20 |yright (|C) 1988 |
|00004fb0| 62 79 20 4a 65 66 20 50 | 6f 73 6b 61 6e 7a 65 72 |by Jef P|oskanzer|
|00004fc0| 2e 0a 58 0a 58 50 65 72 | 6d 69 73 73 69 6f 6e 20 |..X.XPer|mission |
|00004fd0| 74 6f 20 75 73 65 2c 20 | 63 6f 70 79 2c 20 6d 6f |to use, |copy, mo|
|00004fe0| 64 69 66 79 2c 20 61 6e | 64 20 64 69 73 74 72 69 |dify, an|d distri|
|00004ff0| 62 75 74 65 20 74 68 69 | 73 20 73 6f 66 74 77 61 |bute thi|s softwa|
|00005000| 72 65 20 61 6e 64 20 69 | 74 73 0a 58 64 6f 63 75 |re and i|ts.Xdocu|
|00005010| 6d 65 6e 74 61 74 69 6f | 6e 20 66 6f 72 20 61 6e |mentatio|n for an|
|00005020| 79 20 70 75 72 70 6f 73 | 65 20 61 6e 64 20 77 69 |y purpos|e and wi|
|00005030| 74 68 6f 75 74 20 66 65 | 65 20 69 73 20 68 65 72 |thout fe|e is her|
|00005040| 65 62 79 20 67 72 61 6e | 74 65 64 2c 20 70 72 6f |eby gran|ted, pro|
|00005050| 76 69 64 65 64 0a 58 74 | 68 61 74 20 74 68 65 20 |vided.Xt|hat the |
|00005060| 61 62 6f 76 65 20 63 6f | 70 79 72 69 67 68 74 20 |above co|pyright |
|00005070| 6e 6f 74 69 63 65 20 61 | 70 70 65 61 72 20 69 6e |notice a|ppear in|
|00005080| 20 61 6c 6c 20 63 6f 70 | 69 65 73 20 61 6e 64 20 | all cop|ies and |
|00005090| 74 68 61 74 20 62 6f 74 | 68 20 74 68 61 74 0a 58 |that bot|h that.X|
|000050a0| 63 6f 70 79 72 69 67 68 | 74 20 6e 6f 74 69 63 65 |copyrigh|t notice|
|000050b0| 20 61 6e 64 20 74 68 69 | 73 20 70 65 72 6d 69 73 | and thi|s permis|
|000050c0| 73 69 6f 6e 20 6e 6f 74 | 69 63 65 20 61 70 70 65 |sion not|ice appe|
|000050d0| 61 72 20 69 6e 20 73 75 | 70 70 6f 72 74 69 6e 67 |ar in su|pporting|
|000050e0| 0a 58 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 2e |.Xdocume|ntation.|
|000050f0| 20 20 54 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 | This s|oftware |
|00005100| 69 73 20 70 72 6f 76 69 | 64 65 64 20 22 61 73 20 |is provi|ded "as |
|00005110| 69 73 22 20 77 69 74 68 | 6f 75 74 20 65 78 70 72 |is" with|out expr|
|00005120| 65 73 73 20 6f 72 0a 58 | 69 6d 70 6c 69 65 64 20 |ess or.X|implied |
|00005130| 77 61 72 72 61 6e 74 79 | 2e 0a 53 48 41 52 5f 45 |warranty|..SHAR_E|
|00005140| 4f 46 0a 69 66 20 74 65 | 73 74 20 37 36 33 20 2d |OF.if te|st 763 -|
|00005150| 6e 65 20 22 60 77 63 20 | 2d 63 20 3c 20 27 70 62 |ne "`wc |-c < 'pb|
|00005160| 6d 74 6f 70 74 78 2e 31 | 27 60 22 0a 74 68 65 6e |mtoptx.1|'`".then|
|00005170| 0a 09 65 63 68 6f 20 73 | 68 61 72 3a 20 65 72 72 |..echo s|har: err|
|00005180| 6f 72 20 74 72 61 6e 73 | 6d 69 74 74 69 6e 67 20 |or trans|mitting |
|00005190| 22 27 70 62 6d 74 6f 70 | 74 78 2e 31 27 22 20 27 |"'pbmtop|tx.1'" '|
|000051a0| 28 73 68 6f 75 6c 64 20 | 68 61 76 65 20 62 65 65 |(should |have bee|
|000051b0| 6e 20 37 36 33 20 63 68 | 61 72 61 63 74 65 72 73 |n 763 ch|aracters|
|000051c0| 29 27 0a 66 69 0a 66 69 | 20 23 20 65 6e 64 20 6f |)'.fi.fi| # end o|
|000051d0| 66 20 6f 76 65 72 77 72 | 69 74 69 6e 67 20 63 68 |f overwr|iting ch|
|000051e0| 65 63 6b 0a 65 63 68 6f | 20 73 68 61 72 3a 20 65 |eck.echo| shar: e|
|000051f0| 78 74 72 61 63 74 69 6e | 67 20 22 27 70 62 6d 74 |xtractin|g "'pbmt|
|00005200| 6f 72 61 73 74 2e 63 27 | 22 20 27 28 31 38 34 39 |orast.c'|" '(1849|
|00005210| 20 63 68 61 72 61 63 74 | 65 72 73 29 27 0a 69 66 | charact|ers)'.if|
|00005220| 20 74 65 73 74 20 2d 66 | 20 27 70 62 6d 74 6f 72 | test -f| 'pbmtor|
|00005230| 61 73 74 2e 63 27 0a 74 | 68 65 6e 0a 09 65 63 68 |ast.c'.t|hen..ech|
|00005240| 6f 20 73 68 61 72 3a 20 | 77 69 6c 6c 20 6e 6f 74 |o shar: |will not|
|00005250| 20 6f 76 65 72 2d 77 72 | 69 74 65 20 65 78 69 73 | over-wr|ite exis|
|00005260| 74 69 6e 67 20 66 69 6c | 65 20 22 27 70 62 6d 74 |ting fil|e "'pbmt|
|00005270| 6f 72 61 73 74 2e 63 27 | 22 0a 65 6c 73 65 0a 73 |orast.c'|".else.s|
|00005280| 65 64 20 27 73 2f 5e 58 | 2f 2f 27 20 3c 3c 20 5c |ed 's/^X|//' << \|
|00005290| 53 48 41 52 5f 45 4f 46 | 20 3e 20 27 70 62 6d 74 |SHAR_EOF| > 'pbmt|
|000052a0| 6f 72 61 73 74 2e 63 27 | 0a 58 2f 2a 20 70 62 6d |orast.c'|.X/* pbm|
|000052b0| 74 6f 72 61 73 74 2e 63 | 20 2d 20 72 65 61 64 20 |torast.c| - read |
|000052c0| 61 20 70 6f 72 74 61 62 | 6c 65 20 62 69 74 6d 61 |a portab|le bitma|
|000052d0| 70 20 61 6e 64 20 70 72 | 6f 64 75 63 65 20 61 20 |p and pr|oduce a |
|000052e0| 53 75 6e 20 72 61 73 74 | 65 72 66 69 6c 65 0a 58 |Sun rast|erfile.X|
|000052f0| 2a 2a 0a 58 2a 2a 20 43 | 6f 70 79 72 69 67 68 74 |**.X** C|opyright|
|00005300| 20 28 43 29 20 31 39 38 | 38 20 62 79 20 4a 65 66 | (C) 198|8 by Jef|
|00005310| 20 50 6f 73 6b 61 6e 7a | 65 72 2e 0a 58 2a 2a 0a | Poskanz|er..X**.|
|00005320| 58 2a 2a 20 50 65 72 6d | 69 73 73 69 6f 6e 20 74 |X** Perm|ission t|
|00005330| 6f 20 75 73 65 2c 20 63 | 6f 70 79 2c 20 6d 6f 64 |o use, c|opy, mod|
|00005340| 69 66 79 2c 20 61 6e 64 | 20 64 69 73 74 72 69 62 |ify, and| distrib|
|00005350| 75 74 65 20 74 68 69 73 | 20 73 6f 66 74 77 61 72 |ute this| softwar|
|00005360| 65 20 61 6e 64 20 69 74 | 73 0a 58 2a 2a 20 64 6f |e and it|s.X** do|
|00005370| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 66 6f 72 20 |cumentat|ion for |
|00005380| 61 6e 79 20 70 75 72 70 | 6f 73 65 20 61 6e 64 20 |any purp|ose and |
|00005390| 77 69 74 68 6f 75 74 20 | 66 65 65 20 69 73 20 68 |without |fee is h|
|000053a0| 65 72 65 62 79 20 67 72 | 61 6e 74 65 64 2c 20 70 |ereby gr|anted, p|
|000053b0| 72 6f 76 69 64 65 64 0a | 58 2a 2a 20 74 68 61 74 |rovided.|X** that|
|000053c0| 20 74 68 65 20 61 62 6f | 76 65 20 63 6f 70 79 72 | the abo|ve copyr|
|000053d0| 69 67 68 74 20 6e 6f 74 | 69 63 65 20 61 70 70 65 |ight not|ice appe|
|000053e0| 61 72 20 69 6e 20 61 6c | 6c 20 63 6f 70 69 65 73 |ar in al|l copies|
|000053f0| 20 61 6e 64 20 74 68 61 | 74 20 62 6f 74 68 20 74 | and tha|t both t|
|00005400| 68 61 74 0a 58 2a 2a 20 | 63 6f 70 79 72 69 67 68 |hat.X** |copyrigh|
|00005410| 74 20 6e 6f 74 69 63 65 | 20 61 6e 64 20 74 68 69 |t notice| and thi|
|00005420| 73 20 70 65 72 6d 69 73 | 73 69 6f 6e 20 6e 6f 74 |s permis|sion not|
|00005430| 69 63 65 20 61 70 70 65 | 61 72 20 69 6e 20 73 75 |ice appe|ar in su|
|00005440| 70 70 6f 72 74 69 6e 67 | 0a 58 2a 2a 20 64 6f 63 |pporting|.X** doc|
|00005450| 75 6d 65 6e 74 61 74 69 | 6f 6e 2e 20 20 54 68 69 |umentati|on. Thi|
|00005460| 73 20 73 6f 66 74 77 61 | 72 65 20 69 73 20 70 72 |s softwa|re is pr|
|00005470| 6f 76 69 64 65 64 20 22 | 61 73 20 69 73 22 20 77 |ovided "|as is" w|
|00005480| 69 74 68 6f 75 74 20 65 | 78 70 72 65 73 73 20 6f |ithout e|xpress o|
|00005490| 72 0a 58 2a 2a 20 69 6d | 70 6c 69 65 64 20 77 61 |r.X** im|plied wa|
|000054a0| 72 72 61 6e 74 79 2e 0a | 58 2a 2f 0a 58 0a 58 23 |rranty..|X*/.X.X#|
|000054b0| 69 6e 63 6c 75 64 65 20 | 3c 73 74 64 69 6f 2e 68 |include |<stdio.h|
|000054c0| 3e 0a 58 23 69 6e 63 6c | 75 64 65 20 22 70 62 6d |>.X#incl|ude "pbm|
|000054d0| 2e 68 22 0a 58 0a 58 2f | 2a 20 42 65 63 61 75 73 |.h".X.X/|* Becaus|
|000054e0| 65 20 6f 66 20 74 68 65 | 20 66 6f 6c 6c 6f 77 69 |e of the| followi|
|000054f0| 6e 67 20 69 6e 63 6c 75 | 64 65 2c 20 74 68 69 73 |ng inclu|de, this|
|00005500| 20 70 72 6f 67 72 61 6d | 20 63 6f 6d 70 69 6c 65 | program| compile|
|00005510| 73 20 6f 6e 6c 79 20 6f | 6e 20 53 75 6e 73 2e 20 |s only o|n Suns. |
|00005520| 2a 2f 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 70 69 |*/.X#inc|lude <pi|
|00005530| 78 72 65 63 74 2f 70 69 | 78 72 65 63 74 5f 68 73 |xrect/pi|xrect_hs|
|00005540| 2e 68 3e 0a 58 0a 58 6d | 61 69 6e 28 20 61 72 67 |.h>.X.Xm|ain( arg|
|00005550| 63 2c 20 61 72 67 76 20 | 29 0a 58 69 6e 74 20 61 |c, argv |).Xint a|
|00005560| 72 67 63 3b 0a 58 63 68 | 61 72 20 2a 61 72 67 76 |rgc;.Xch|ar *argv|
|00005570| 5b 5d 3b 0a 58 20 20 20 | 20 7b 0a 58 20 20 20 20 |[];.X | {.X |
|00005580| 46 49 4c 45 20 2a 69 66 | 64 3b 0a 58 20 20 20 20 |FILE *if|d;.X |
|00005590| 62 69 74 20 2a 2a 62 69 | 74 73 3b 0a 58 20 20 20 |bit **bi|ts;.X |
|000055a0| 20 69 6e 74 20 6c 69 6e | 65 62 79 74 65 73 3b 0a | int lin|ebytes;.|
|000055b0| 58 20 20 20 20 69 6e 74 | 20 72 6f 77 73 2c 20 63 |X int| rows, c|
|000055c0| 6f 6c 73 2c 20 72 6f 77 | 2c 20 63 6f 6c 3b 0a 58 |ols, row|, col;.X|
|000055d0| 20 20 20 20 73 74 72 75 | 63 74 20 70 69 78 72 65 | stru|ct pixre|
|000055e0| 63 74 20 2a 70 72 3b 0a | 58 20 20 20 20 73 68 6f |ct *pr;.|X sho|
|000055f0| 72 74 20 2a 64 61 74 61 | 3b 0a 58 20 20 20 20 69 |rt *data|;.X i|
|00005600| 6e 74 20 73 68 6f 72 74 | 63 6f 75 6e 74 2c 20 62 |nt short|count, b|
|00005610| 69 74 63 6f 75 6e 74 3b | 0a 58 0a 58 20 20 20 20 |itcount;|.X.X |
|00005620| 69 66 20 28 20 61 72 67 | 63 20 3e 20 32 20 29 0a |if ( arg|c > 2 ).|
|00005630| 58 09 7b 0a 58 09 66 70 | 72 69 6e 74 66 28 20 73 |X.{.X.fp|rintf( s|
|00005640| 74 64 65 72 72 2c 20 22 | 75 73 61 67 65 3a 20 20 |tderr, "|usage: |
|00005650| 25 73 20 5b 70 62 6d 66 | 69 6c 65 5d 5c 6e 22 2c |%s [pbmf|ile]\n",|
|00005660| 20 61 72 67 76 5b 30 5d | 20 29 3b 0a 58 09 65 78 | argv[0]| );.X.ex|
|00005670| 69 74 28 20 31 20 29 3b | 0a 58 09 7d 0a 58 0a 58 |it( 1 );|.X.}.X.X|
|00005680| 20 20 20 20 69 66 20 28 | 20 61 72 67 63 20 3d 3d | if (| argc ==|
|00005690| 20 32 20 29 0a 58 09 7b | 0a 58 09 69 66 64 20 3d | 2 ).X.{|.X.ifd =|
|000056a0| 20 66 6f 70 65 6e 28 20 | 61 72 67 76 5b 31 5d 2c | fopen( |argv[1],|
|000056b0| 20 22 72 22 20 29 3b 0a | 58 09 69 66 20 28 20 69 | "r" );.|X.if ( i|
|000056c0| 66 64 20 3d 3d 20 4e 55 | 4c 4c 20 29 0a 58 09 20 |fd == NU|LL ).X. |
|000056d0| 20 20 20 7b 0a 58 09 20 | 20 20 20 66 70 72 69 6e | {.X. | fprin|
|000056e0| 74 66 28 20 73 74 64 65 | 72 72 2c 20 22 25 73 3a |tf( stde|rr, "%s:|
|000056f0| 20 63 61 6e 27 74 20 6f | 70 65 6e 2e 5c 6e 22 2c | can't o|pen.\n",|
|00005700| 20 61 72 67 76 5b 31 5d | 20 29 3b 0a 58 09 20 20 | argv[1]| );.X. |
|00005710| 20 20 65 78 69 74 28 20 | 31 20 29 3b 0a 58 09 20 | exit( |1 );.X. |
|00005720| 20 20 20 7d 0a 58 09 7d | 0a 58 20 20 20 20 65 6c | }.X.}|.X el|
|00005730| 73 65 0a 58 09 69 66 64 | 20 3d 20 73 74 64 69 6e |se.X.ifd| = stdin|
|00005740| 3b 0a 58 0a 58 20 20 20 | 20 62 69 74 73 20 3d 20 |;.X.X | bits = |
|00005750| 70 62 6d 5f 72 65 61 64 | 70 62 6d 28 20 69 66 64 |pbm_read|pbm( ifd|
|00005760| 2c 20 26 63 6f 6c 73 2c | 20 26 72 6f 77 73 20 29 |, &cols,| &rows )|
|00005770| 3b 0a 58 0a 58 20 20 20 | 20 69 66 20 28 20 69 66 |;.X.X | if ( if|
|00005780| 64 20 21 3d 20 73 74 64 | 69 6e 20 29 0a 58 09 66 |d != std|in ).X.f|
|00005790| 63 6c 6f 73 65 28 20 69 | 66 64 20 29 3b 0a 58 20 |close( i|fd );.X |
|000057a0| 20 20 20 0a 58 20 20 20 | 20 69 66 20 28 20 28 70 | .X | if ( (p|
|000057b0| 72 20 3d 20 6d 65 6d 5f | 63 72 65 61 74 65 28 63 |r = mem_|create(c|
|000057c0| 6f 6c 73 2c 20 72 6f 77 | 73 2c 20 31 29 29 20 3d |ols, row|s, 1)) =|
|000057d0| 3d 20 4e 55 4c 4c 20 29 | 0a 58 09 7b 0a 58 09 66 |= NULL )|.X.{.X.f|
|000057e0| 70 72 69 6e 74 66 28 20 | 73 74 64 65 72 72 2c 20 |printf( |stderr, |
|000057f0| 22 55 6e 61 62 6c 65 20 | 74 6f 20 63 72 65 61 74 |"Unable |to creat|
|00005800| 65 20 6e 65 77 20 70 69 | 78 72 65 63 74 2e 5c 6e |e new pi|xrect.\n|
|00005810| 22 29 3b 0a 58 09 65 78 | 69 74 28 20 31 20 29 3b |");.X.ex|it( 1 );|
|00005820| 0a 58 09 7d 0a 58 0a 58 | 20 20 20 20 64 61 74 61 |.X.}.X.X| data|
|00005830| 20 3d 20 28 28 73 74 72 | 75 63 74 20 6d 70 72 5f | = ((str|uct mpr_|
|00005840| 64 61 74 61 20 2a 29 70 | 72 2d 3e 70 72 5f 64 61 |data *)p|r->pr_da|
|00005850| 74 61 29 2d 3e 6d 64 5f | 69 6d 61 67 65 3b 0a 58 |ta)->md_|image;.X|
|00005860| 20 20 20 20 6c 69 6e 65 | 62 79 74 65 73 20 3d 20 | line|bytes = |
|00005870| 28 28 73 74 72 75 63 74 | 20 6d 70 72 5f 64 61 74 |((struct| mpr_dat|
|00005880| 61 20 2a 29 70 72 2d 3e | 70 72 5f 64 61 74 61 29 |a *)pr->|pr_data)|
|00005890| 2d 3e 6d 64 5f 6c 69 6e | 65 62 79 74 65 73 3b 0a |->md_lin|ebytes;.|
|000058a0| 58 0a 58 20 20 20 20 66 | 6f 72 20 28 20 72 6f 77 |X.X f|or ( row|
|000058b0| 20 3d 20 30 3b 20 72 6f | 77 20 3c 20 72 6f 77 73 | = 0; ro|w < rows|
|000058c0| 3b 20 72 6f 77 2b 2b 20 | 29 0a 58 09 7b 0a 58 09 |; row++ |).X.{.X.|
|000058d0| 62 69 74 63 6f 75 6e 74 | 20 3d 20 31 35 3b 0a 58 |bitcount| = 15;.X|
|000058e0| 09 73 68 6f 72 74 63 6f | 75 6e 74 20 3d 20 30 3b |.shortco|unt = 0;|
|000058f0| 0a 58 09 66 6f 72 20 28 | 20 63 6f 6c 20 3d 20 30 |.X.for (| col = 0|
|00005900| 3b 20 63 6f 6c 20 3c 20 | 63 6f 6c 73 3b 20 63 6f |; col < |cols; co|
|00005910| 6c 2b 2b 20 29 0a 58 09 | 20 20 20 20 7b 0a 58 09 |l++ ).X.| {.X.|
|00005920| 20 20 20 20 2a 28 64 61 | 74 61 20 2b 20 73 68 6f | *(da|ta + sho|
|00005930| 72 74 63 6f 75 6e 74 29 | 20 7c 3d 20 28 62 69 74 |rtcount)| |= (bit|
|00005940| 73 5b 72 6f 77 5d 5b 63 | 6f 6c 5d 20 3c 3c 20 62 |s[row][c|ol] << b|
|00005950| 69 74 63 6f 75 6e 74 29 | 3b 0a 58 09 20 20 20 20 |itcount)|;.X. |
|00005960| 62 69 74 63 6f 75 6e 74 | 2d 2d 3b 0a 58 09 20 20 |bitcount|--;.X. |
|00005970| 20 20 69 66 20 28 20 62 | 69 74 63 6f 75 6e 74 20 | if ( b|itcount |
|00005980| 3c 20 30 20 29 0a 58 09 | 09 7b 0a 58 09 09 62 69 |< 0 ).X.|.{.X..bi|
|00005990| 74 63 6f 75 6e 74 20 3d | 20 31 35 3b 0a 58 09 09 |tcount =| 15;.X..|
|000059a0| 73 68 6f 72 74 63 6f 75 | 6e 74 2b 2b 3b 0a 58 09 |shortcou|nt++;.X.|
|000059b0| 09 7d 0a 58 09 20 20 20 | 20 7d 0a 58 09 64 61 74 |.}.X. | }.X.dat|
|000059c0| 61 20 2b 3d 20 6c 69 6e | 65 62 79 74 65 73 20 2f |a += lin|ebytes /|
|000059d0| 20 73 69 7a 65 6f 66 28 | 73 68 6f 72 74 29 3b 0a | sizeof(|short);.|
|000059e0| 58 09 7d 0a 58 0a 58 20 | 20 20 20 70 72 5f 64 75 |X.}.X.X | pr_du|
|000059f0| 6d 70 28 20 70 72 2c 20 | 73 74 64 6f 75 74 2c 20 |mp( pr, |stdout, |
|00005a00| 4e 55 4c 4c 2c 20 52 54 | 5f 42 59 54 45 5f 45 4e |NULL, RT|_BYTE_EN|
|00005a10| 43 4f 44 45 44 2c 20 30 | 20 29 3b 0a 58 0a 58 20 |CODED, 0| );.X.X |
|00005a20| 20 20 20 65 78 69 74 28 | 20 30 20 29 3b 0a 58 20 | exit(| 0 );.X |
|00005a30| 20 20 20 7d 0a 53 48 41 | 52 5f 45 4f 46 0a 69 66 | }.SHA|R_EOF.if|
|00005a40| 20 74 65 73 74 20 31 38 | 34 39 20 2d 6e 65 20 22 | test 18|49 -ne "|
|00005a50| 60 77 63 20 2d 63 20 3c | 20 27 70 62 6d 74 6f 72 |`wc -c <| 'pbmtor|
|00005a60| 61 73 74 2e 63 27 60 22 | 0a 74 68 65 6e 0a 09 65 |ast.c'`"|.then..e|
|00005a70| 63 68 6f 20 73 68 61 72 | 3a 20 65 72 72 6f 72 20 |cho shar|: error |
|00005a80| 74 72 61 6e 73 6d 69 74 | 74 69 6e 67 20 22 27 70 |transmit|ting "'p|
|00005a90| 62 6d 74 6f 72 61 73 74 | 2e 63 27 22 20 27 28 73 |bmtorast|.c'" '(s|
|00005aa0| 68 6f 75 6c 64 20 68 61 | 76 65 20 62 65 65 6e 20 |hould ha|ve been |
|00005ab0| 31 38 34 39 20 63 68 61 | 72 61 63 74 65 72 73 29 |1849 cha|racters)|
|00005ac0| 27 0a 66 69 0a 66 69 20 | 23 20 65 6e 64 20 6f 66 |'.fi.fi |# end of|
|00005ad0| 20 6f 76 65 72 77 72 69 | 74 69 6e 67 20 63 68 65 | overwri|ting che|
|00005ae0| 63 6b 0a 65 63 68 6f 20 | 73 68 61 72 3a 20 65 78 |ck.echo |shar: ex|
|00005af0| 74 72 61 63 74 69 6e 67 | 20 22 27 70 62 6d 74 6f |tracting| "'pbmto|
|00005b00| 72 61 73 74 2e 31 27 22 | 20 27 28 37 37 30 20 63 |rast.1'"| '(770 c|
|00005b10| 68 61 72 61 63 74 65 72 | 73 29 27 0a 69 66 20 74 |haracter|s)'.if t|
|00005b20| 65 73 74 20 2d 66 20 27 | 70 62 6d 74 6f 72 61 73 |est -f '|pbmtoras|
|00005b30| 74 2e 31 27 0a 74 68 65 | 6e 0a 09 65 63 68 6f 20 |t.1'.the|n..echo |
|00005b40| 73 68 61 72 3a 20 77 69 | 6c 6c 20 6e 6f 74 20 6f |shar: wi|ll not o|
|00005b50| 76 65 72 2d 77 72 69 74 | 65 20 65 78 69 73 74 69 |ver-writ|e existi|
|00005b60| 6e 67 20 66 69 6c 65 20 | 22 27 70 62 6d 74 6f 72 |ng file |"'pbmtor|
|00005b70| 61 73 74 2e 31 27 22 0a | 65 6c 73 65 0a 73 65 64 |ast.1'".|else.sed|
|00005b80| 20 27 73 2f 5e 58 2f 2f | 27 20 3c 3c 20 5c 53 48 | 's/^X//|' << \SH|
|00005b90| 41 52 5f 45 4f 46 20 3e | 20 27 70 62 6d 74 6f 72 |AR_EOF >| 'pbmtor|
|00005ba0| 61 73 74 2e 31 27 0a 58 | 2e 54 48 20 70 62 6d 74 |ast.1'.X|.TH pbmt|
|00005bb0| 6f 72 61 73 74 20 31 20 | 22 33 31 20 41 75 67 75 |orast 1 |"31 Augu|
|00005bc0| 73 74 20 31 39 38 38 22 | 0a 58 2e 53 48 20 4e 41 |st 1988"|.X.SH NA|
|00005bd0| 4d 45 0a 58 70 62 6d 74 | 6f 72 61 73 74 20 2d 20 |ME.Xpbmt|orast - |
|00005be0| 63 6f 6e 76 65 72 74 20 | 70 6f 72 74 61 62 6c 65 |convert |portable|
|00005bf0| 20 62 69 74 6d 61 70 73 | 20 69 6e 74 6f 20 53 75 | bitmaps| into Su|
|00005c00| 6e 20 72 61 73 74 65 72 | 73 0a 58 2e 53 48 20 53 |n raster|s.X.SH S|
|00005c10| 59 4e 4f 50 53 49 53 0a | 58 70 62 6d 74 6f 72 61 |YNOPSIS.|Xpbmtora|
|00005c20| 73 74 20 5b 70 62 6d 66 | 69 6c 65 5d 0a 58 2e 53 |st [pbmf|ile].X.S|
|00005c30| 48 20 44 45 53 43 52 49 | 50 54 49 4f 4e 0a 58 52 |H DESCRI|PTION.XR|
|00005c40| 65 61 64 73 20 61 20 70 | 6f 72 74 61 62 6c 65 20 |eads a p|ortable |
|00005c50| 62 69 74 6d 61 70 20 61 | 73 20 69 6e 70 75 74 2e |bitmap a|s input.|
|00005c60| 0a 58 50 72 6f 64 75 63 | 65 73 20 61 20 53 75 6e |.XProduc|es a Sun|
|00005c70| 20 72 61 73 74 65 72 20 | 66 69 6c 65 20 61 73 20 | raster |file as |
|00005c80| 6f 75 74 70 75 74 2e 0a | 58 4e 4f 54 45 3a 20 73 |output..|XNOTE: s|
|00005c90| 69 6e 63 65 20 69 74 20 | 75 73 65 73 20 53 75 6e |ince it |uses Sun|
|00005ca0| 2d 73 70 65 63 69 66 69 | 63 20 69 6e 63 6c 75 64 |-specifi|c includ|
|00005cb0| 65 20 66 69 6c 65 73 2c | 20 70 62 6d 74 6f 72 61 |e files,| pbmtora|
|00005cc0| 73 74 20 77 69 6c 6c 20 | 63 6f 6d 70 69 6c 65 0a |st will |compile.|
|00005cd0| 58 6f 6e 6c 79 20 6f 6e | 20 53 75 6e 73 2e 0a 58 |Xonly on| Suns..X|
|00005ce0| 2e 53 48 20 22 53 45 45 | 20 41 4c 53 4f 22 0a 58 |.SH "SEE| ALSO".X|
|00005cf0| 72 61 73 74 74 6f 70 62 | 6d 28 31 29 2c 20 70 62 |rasttopb|m(1), pb|
|00005d00| 6d 28 35 29 0a 58 2e 53 | 48 20 41 55 54 48 4f 52 |m(5).X.S|H AUTHOR|
|00005d10| 0a 58 42 61 72 72 79 20 | 4b 6c 61 77 61 6e 73 0a |.XBarry |Klawans.|
|00005d20| 58 0a 58 43 6f 70 79 72 | 69 67 68 74 20 28 43 29 |X.XCopyr|ight (C)|
|00005d30| 20 31 39 38 38 20 62 79 | 20 4a 65 66 20 50 6f 73 | 1988 by| Jef Pos|
|00005d40| 6b 61 6e 7a 65 72 2e 0a | 58 0a 58 50 65 72 6d 69 |kanzer..|X.XPermi|
|00005d50| 73 73 69 6f 6e 20 74 6f | 20 75 73 65 2c 20 63 6f |ssion to| use, co|
|00005d60| 70 79 2c 20 6d 6f 64 69 | 66 79 2c 20 61 6e 64 20 |py, modi|fy, and |
|00005d70| 64 69 73 74 72 69 62 75 | 74 65 20 74 68 69 73 20 |distribu|te this |
|00005d80| 73 6f 66 74 77 61 72 65 | 20 61 6e 64 20 69 74 73 |software| and its|
|00005d90| 0a 58 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |.Xdocume|ntation |
|00005da0| 66 6f 72 20 61 6e 79 20 | 70 75 72 70 6f 73 65 20 |for any |purpose |
|00005db0| 61 6e 64 20 77 69 74 68 | 6f 75 74 20 66 65 65 20 |and with|out fee |
|00005dc0| 69 73 20 68 65 72 65 62 | 79 20 67 72 61 6e 74 65 |is hereb|y grante|
|00005dd0| 64 2c 20 70 72 6f 76 69 | 64 65 64 0a 58 74 68 61 |d, provi|ded.Xtha|
|00005de0| 74 20 74 68 65 20 61 62 | 6f 76 65 20 63 6f 70 79 |t the ab|ove copy|
|00005df0| 72 69 67 68 74 20 6e 6f | 74 69 63 65 20 61 70 70 |right no|tice app|
|00005e00| 65 61 72 20 69 6e 20 61 | 6c 6c 20 63 6f 70 69 65 |ear in a|ll copie|
|00005e10| 73 20 61 6e 64 20 74 68 | 61 74 20 62 6f 74 68 20 |s and th|at both |
|00005e20| 74 68 61 74 0a 58 63 6f | 70 79 72 69 67 68 74 20 |that.Xco|pyright |
|00005e30| 6e 6f 74 69 63 65 20 61 | 6e 64 20 74 68 69 73 20 |notice a|nd this |
|00005e40| 70 65 72 6d 69 73 73 69 | 6f 6e 20 6e 6f 74 69 63 |permissi|on notic|
|00005e50| 65 20 61 70 70 65 61 72 | 20 69 6e 20 73 75 70 70 |e appear| in supp|
|00005e60| 6f 72 74 69 6e 67 0a 58 | 64 6f 63 75 6d 65 6e 74 |orting.X|document|
|00005e70| 61 74 69 6f 6e 2e 20 20 | 54 68 69 73 20 73 6f 66 |ation. |This sof|
|00005e80| 74 77 61 72 65 20 69 73 | 20 70 72 6f 76 69 64 65 |tware is| provide|
|00005e90| 64 20 22 61 73 20 69 73 | 22 20 77 69 74 68 6f 75 |d "as is|" withou|
|00005ea0| 74 20 65 78 70 72 65 73 | 73 20 6f 72 0a 58 69 6d |t expres|s or.Xim|
|00005eb0| 70 6c 69 65 64 20 77 61 | 72 72 61 6e 74 79 2e 0a |plied wa|rranty..|
|00005ec0| 53 48 41 52 5f 45 4f 46 | 0a 69 66 20 74 65 73 74 |SHAR_EOF|.if test|
|00005ed0| 20 37 37 30 20 2d 6e 65 | 20 22 60 77 63 20 2d 63 | 770 -ne| "`wc -c|
|00005ee0| 20 3c 20 27 70 62 6d 74 | 6f 72 61 73 74 2e 31 27 | < 'pbmt|orast.1'|
|00005ef0| 60 22 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |`".then.|.echo sh|
|00005f00| 61 72 3a 20 65 72 72 6f | 72 20 74 72 61 6e 73 6d |ar: erro|r transm|
|00005f10| 69 74 74 69 6e 67 20 22 | 27 70 62 6d 74 6f 72 61 |itting "|'pbmtora|
|00005f20| 73 74 2e 31 27 22 20 27 | 28 73 68 6f 75 6c 64 20 |st.1'" '|(should |
|00005f30| 68 61 76 65 20 62 65 65 | 6e 20 37 37 30 20 63 68 |have bee|n 770 ch|
|00005f40| 61 72 61 63 74 65 72 73 | 29 27 0a 66 69 0a 66 69 |aracters|)'.fi.fi|
|00005f50| 20 23 20 65 6e 64 20 6f | 66 20 6f 76 65 72 77 72 | # end o|f overwr|
|00005f60| 69 74 69 6e 67 20 63 68 | 65 63 6b 0a 65 63 68 6f |iting ch|eck.echo|
|00005f70| 20 73 68 61 72 3a 20 65 | 78 74 72 61 63 74 69 6e | shar: e|xtractin|
|00005f80| 67 20 22 27 70 62 6d 74 | 6f 78 62 6d 2e 63 27 22 |g "'pbmt|oxbm.c'"|
|00005f90| 20 27 28 32 35 39 33 20 | 63 68 61 72 61 63 74 65 | '(2593 |characte|
|00005fa0| 72 73 29 27 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |rs)'.if |test -f |
|00005fb0| 27 70 62 6d 74 6f 78 62 | 6d 2e 63 27 0a 74 68 65 |'pbmtoxb|m.c'.the|
|00005fc0| 6e 0a 09 65 63 68 6f 20 | 73 68 61 72 3a 20 77 69 |n..echo |shar: wi|
|00005fd0| 6c 6c 20 6e 6f 74 20 6f | 76 65 72 2d 77 72 69 74 |ll not o|ver-writ|
|00005fe0| 65 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |e existi|ng file |
|00005ff0| 22 27 70 62 6d 74 6f 78 | 62 6d 2e 63 27 22 0a 65 |"'pbmtox|bm.c'".e|
|00006000| 6c 73 65 0a 73 65 64 20 | 27 73 2f 5e 58 2f 2f 27 |lse.sed |'s/^X//'|
|00006010| 20 3c 3c 20 5c 53 48 41 | 52 5f 45 4f 46 20 3e 20 | << \SHA|R_EOF > |
|00006020| 27 70 62 6d 74 6f 78 62 | 6d 2e 63 27 0a 58 2f 2a |'pbmtoxb|m.c'.X/*|
|00006030| 20 70 62 6d 74 6f 78 62 | 6d 2e 63 20 2d 20 72 65 | pbmtoxb|m.c - re|
|00006040| 61 64 20 61 20 70 6f 72 | 74 61 62 6c 65 20 62 69 |ad a por|table bi|
|00006050| 74 6d 61 70 20 61 6e 64 | 20 70 72 6f 64 75 63 65 |tmap and| produce|
|00006060| 20 61 6e 20 58 31 31 20 | 62 69 74 6d 61 70 20 66 | an X11 |bitmap f|
|00006070| 69 6c 65 0a 58 2a 2a 0a | 58 2a 2a 20 43 6f 70 79 |ile.X**.|X** Copy|
|00006080| 72 69 67 68 74 20 28 43 | 29 20 31 39 38 38 20 62 |right (C|) 1988 b|
|00006090| 79 20 4a 65 66 20 50 6f | 73 6b 61 6e 7a 65 72 2e |y Jef Po|skanzer.|
|000060a0| 0a 58 2a 2a 0a 58 2a 2a | 20 50 65 72 6d 69 73 73 |.X**.X**| Permiss|
|000060b0| 69 6f 6e 20 74 6f 20 75 | 73 65 2c 20 63 6f 70 79 |ion to u|se, copy|
|000060c0| 2c 20 6d 6f 64 69 66 79 | 2c 20 61 6e 64 20 64 69 |, modify|, and di|
|000060d0| 73 74 72 69 62 75 74 65 | 20 74 68 69 73 20 73 6f |stribute| this so|
|000060e0| 66 74 77 61 72 65 20 61 | 6e 64 20 69 74 73 0a 58 |ftware a|nd its.X|
|000060f0| 2a 2a 20 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |** docum|entation|
|00006100| 20 66 6f 72 20 61 6e 79 | 20 70 75 72 70 6f 73 65 | for any| purpose|
|00006110| 20 61 6e 64 20 77 69 74 | 68 6f 75 74 20 66 65 65 | and wit|hout fee|
|00006120| 20 69 73 20 68 65 72 65 | 62 79 20 67 72 61 6e 74 | is here|by grant|
|00006130| 65 64 2c 20 70 72 6f 76 | 69 64 65 64 0a 58 2a 2a |ed, prov|ided.X**|
|00006140| 20 74 68 61 74 20 74 68 | 65 20 61 62 6f 76 65 20 | that th|e above |
|00006150| 63 6f 70 79 72 69 67 68 | 74 20 6e 6f 74 69 63 65 |copyrigh|t notice|
|00006160| 20 61 70 70 65 61 72 20 | 69 6e 20 61 6c 6c 20 63 | appear |in all c|
|00006170| 6f 70 69 65 73 20 61 6e | 64 20 74 68 61 74 20 62 |opies an|d that b|
|00006180| 6f 74 68 20 74 68 61 74 | 0a 58 2a 2a 20 63 6f 70 |oth that|.X** cop|
|00006190| 79 72 69 67 68 74 20 6e | 6f 74 69 63 65 20 61 6e |yright n|otice an|
|000061a0| 64 20 74 68 69 73 20 70 | 65 72 6d 69 73 73 69 6f |d this p|ermissio|
|000061b0| 6e 20 6e 6f 74 69 63 65 | 20 61 70 70 65 61 72 20 |n notice| appear |
|000061c0| 69 6e 20 73 75 70 70 6f | 72 74 69 6e 67 0a 58 2a |in suppo|rting.X*|
|000061d0| 2a 20 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 2e |* docume|ntation.|
|000061e0| 20 20 54 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 | This s|oftware |
|000061f0| 69 73 20 70 72 6f 76 69 | 64 65 64 20 22 61 73 20 |is provi|ded "as |
|00006200| 69 73 22 20 77 69 74 68 | 6f 75 74 20 65 78 70 72 |is" with|out expr|
|00006210| 65 73 73 20 6f 72 0a 58 | 2a 2a 20 69 6d 70 6c 69 |ess or.X|** impli|
|00006220| 65 64 20 77 61 72 72 61 | 6e 74 79 2e 0a 58 2a 2f |ed warra|nty..X*/|
|00006230| 0a 58 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 73 74 |.X.X#inc|lude <st|
|00006240| 64 69 6f 2e 68 3e 0a 58 | 23 69 66 64 65 66 09 4f |dio.h>.X|#ifdef.O|
|00006250| 53 5f 53 59 53 56 0a 58 | 23 69 6e 63 6c 75 64 65 |S_SYSV.X|#include|
|00006260| 20 3c 73 74 72 69 6e 67 | 2e 68 3e 0a 58 23 65 6c | <string|.h>.X#el|
|00006270| 73 65 09 4f 53 5f 53 59 | 53 56 0a 58 23 69 6e 63 |se.OS_SY|SV.X#inc|
|00006280| 6c 75 64 65 20 3c 73 74 | 72 69 6e 67 73 2e 68 3e |lude <st|rings.h>|
|00006290| 0a 58 23 65 6e 64 69 66 | 09 4f 53 5f 53 59 53 56 |.X#endif|.OS_SYSV|
|000062a0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 22 70 62 6d 2e |.X#inclu|de "pbm.|
|000062b0| 68 22 0a 58 0a 58 6d 61 | 69 6e 28 20 61 72 67 63 |h".X.Xma|in( argc|
|000062c0| 2c 20 61 72 67 76 20 29 | 0a 58 69 6e 74 20 61 72 |, argv )|.Xint ar|
|000062d0| 67 63 3b 0a 58 63 68 61 | 72 20 2a 61 72 67 76 5b |gc;.Xcha|r *argv[|
|000062e0| 5d 3b 0a 58 20 20 20 20 | 7b 0a 58 20 20 20 20 46 |];.X |{.X F|
|000062f0| 49 4c 45 20 2a 69 66 64 | 3b 0a 58 20 20 20 20 62 |ILE *ifd|;.X b|
|00006300| 69 74 20 2a 2a 62 69 74 | 73 3b 0a 58 20 20 20 20 |it **bit|s;.X |
|00006310| 69 6e 74 20 72 6f 77 73 | 2c 20 63 6f 6c 73 2c 20 |int rows|, cols, |
|00006320| 70 61 64 72 69 67 68 74 | 2c 20 72 6f 77 2c 20 63 |padright|, row, c|
|00006330| 6f 6c 3b 0a 58 20 20 20 | 20 63 68 61 72 20 6e 61 |ol;.X | char na|
|00006340| 6d 65 5b 31 30 30 5d 2c | 20 2a 63 70 3b 0a 58 0a |me[100],| *cp;.X.|
|00006350| 58 20 20 20 20 69 66 20 | 28 20 61 72 67 63 20 3e |X if |( argc >|
|00006360| 20 32 20 29 0a 58 09 7b | 0a 58 09 66 70 72 69 6e | 2 ).X.{|.X.fprin|
|00006370| 74 66 28 20 73 74 64 65 | 72 72 2c 20 22 75 73 61 |tf( stde|rr, "usa|
|00006380| 67 65 3a 20 20 25 73 20 | 5b 70 62 6d 66 69 6c 65 |ge: %s |[pbmfile|
|00006390| 5d 5c 6e 22 2c 20 61 72 | 67 76 5b 30 5d 20 29 3b |]\n", ar|gv[0] );|
|000063a0| 0a 58 09 65 78 69 74 28 | 20 31 20 29 3b 0a 58 09 |.X.exit(| 1 );.X.|
|000063b0| 7d 0a 58 0a 58 20 20 20 | 20 69 66 20 28 20 61 72 |}.X.X | if ( ar|
|000063c0| 67 63 20 3d 3d 20 32 20 | 29 0a 58 09 7b 0a 58 20 |gc == 2 |).X.{.X |
|000063d0| 20 20 20 20 20 20 20 69 | 66 64 20 3d 20 66 6f 70 | i|fd = fop|
|000063e0| 65 6e 28 20 61 72 67 76 | 5b 31 5d 2c 20 22 72 22 |en( argv|[1], "r"|
|000063f0| 20 29 3b 0a 58 20 20 20 | 20 20 20 20 20 69 66 20 | );.X | if |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.