home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: 1655
| 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 or mail, ASCII text
| default
| |
| 100%
| TrID
| E-Mail message (Var. 2)
| default
| |
| 100%
| checkBytes
| Printable ASCII
| 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/rfc822
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 61 6a | 63 64 40 63 73 2e 65 64 |From: aj|cd@cs.ed|
|00000010| 2e 61 63 2e 75 6b 20 28 | 41 6e 67 75 73 20 44 75 |.ac.uk (|Angus Du|
|00000020| 67 67 61 6e 29 0a 4e 65 | 77 73 67 72 6f 75 70 73 |ggan).Ne|wsgroups|
|00000030| 3a 20 63 6f 6d 70 2e 74 | 65 78 74 2e 74 65 78 2c |: comp.t|ext.tex,|
|00000040| 61 6c 74 2e 73 6f 75 72 | 63 65 73 0a 53 75 62 6a |alt.sour|ces.Subj|
|00000050| 65 63 74 3a 20 70 62 6d | 74 6f 70 6b 2b 70 6b 74 |ect: pbm|topk+pkt|
|00000060| 6f 70 62 6d 20 50 61 72 | 74 30 31 2f 30 32 0a 4d |opbm Par|t01/02.M|
|00000070| 65 73 73 61 67 65 2d 49 | 44 3a 20 3c 31 33 32 40 |essage-I|D: <132@|
|00000080| 73 6b 79 65 2e 63 73 2e | 65 64 2e 61 63 2e 75 6b |skye.cs.|ed.ac.uk|
|00000090| 3e 0a 44 61 74 65 3a 20 | 39 20 41 75 67 20 39 30 |>.Date: |9 Aug 90|
|000000a0| 20 31 32 3a 31 39 3a 33 | 33 20 47 4d 54 0a 0a 53 | 12:19:3|3 GMT..S|
|000000b0| 69 6e 63 65 20 74 68 65 | 72 65 27 73 20 62 65 65 |ince the|re's bee|
|000000c0| 6e 20 73 6f 6d 65 20 69 | 6e 74 65 72 65 73 74 20 |n some i|nterest |
|000000d0| 69 6e 20 62 69 74 6d 61 | 70 20 74 6f 20 70 6b 20 |in bitma|p to pk |
|000000e0| 66 6f 6e 74 20 63 6f 6e | 76 65 72 74 6f 72 73 2c |font con|vertors,|
|000000f0| 20 49 20 74 68 6f 75 67 | 68 74 0a 49 27 64 20 70 | I thoug|ht.I'd p|
|00000100| 6f 73 74 20 6d 79 20 61 | 74 74 65 6d 70 74 2e 20 |ost my a|ttempt. |
|00000110| 70 6b 74 6f 70 62 6d 20 | 61 6e 64 20 70 62 6d 74 |pktopbm |and pbmt|
|00000120| 6f 70 6b 20 77 65 72 65 | 20 61 64 61 70 74 65 64 |opk were| adapted|
|00000130| 20 66 72 6f 6d 20 54 6f | 6d 20 52 6f 6b 69 63 6b | from To|m Rokick|
|00000140| 69 27 73 20 43 0a 76 65 | 72 73 69 6f 6e 73 20 6f |i's C.ve|rsions o|
|00000150| 66 20 50 4b 74 6f 50 58 | 20 61 6e 64 20 50 58 74 |f PKtoPX| and PXt|
|00000160| 6f 50 4b 20 6f 6e 20 74 | 68 65 20 54 65 58 38 32 |oPK on t|he TeX82|
|00000170| 20 64 69 73 74 72 69 62 | 75 74 69 6f 6e 20 74 61 | distrib|ution ta|
|00000180| 70 65 2c 20 61 6e 64 20 | 61 72 65 20 70 6f 73 74 |pe, and |are post|
|00000190| 65 64 0a 77 69 74 68 6f | 75 74 20 68 69 73 20 70 |ed.witho|ut his p|
|000001a0| 65 72 6d 69 73 73 69 6f | 6e 2e 20 49 20 65 78 70 |ermissio|n. I exp|
|000001b0| 65 63 74 20 74 68 61 74 | 20 49 27 76 65 20 73 63 |ect that| I've sc|
|000001c0| 72 65 77 65 64 20 75 70 | 20 69 6e 20 74 68 65 20 |rewed up| in the |
|000001d0| 72 6f 75 6e 64 69 6e 67 | 20 63 6f 64 65 0a 73 6f |rounding| code.so|
|000001e0| 6d 65 77 68 65 72 65 2c | 20 63 68 65 63 6b 69 6e |mewhere,| checkin|
|000001f0| 67 20 69 74 20 77 69 6c | 6c 20 68 61 76 65 20 74 |g it wil|l have t|
|00000200| 6f 20 77 61 69 74 20 66 | 6f 72 20 61 20 72 61 69 |o wait f|or a rai|
|00000210| 6e 79 20 64 61 79 2e 0a | 0a 49 20 68 61 76 65 6e |ny day..|.I haven|
|00000220| 27 74 20 64 6f 6e 65 20 | 61 6e 79 74 68 69 6e 67 |'t done |anything|
|00000230| 20 61 62 6f 75 74 20 63 | 61 6c 63 75 6c 61 74 69 | about c|alculati|
|00000240| 6e 67 20 74 68 65 20 63 | 6f 72 72 65 63 74 20 63 |ng the c|orrect c|
|00000250| 68 65 63 6b 73 75 6d 20 | 66 6f 72 20 74 68 65 20 |hecksum |for the |
|00000260| 66 6f 6e 74 2c 0a 62 65 | 79 6f 6e 64 20 65 78 74 |font,.be|yond ext|
|00000270| 72 61 63 74 69 6e 67 20 | 74 68 65 20 61 70 70 72 |racting |the appr|
|00000280| 6f 70 72 69 61 74 65 20 | 28 50 61 73 63 61 6c 29 |opriate |(Pascal)|
|00000290| 20 63 6f 64 65 20 66 72 | 6f 6d 20 70 6c 74 6f 74 | code fr|om pltot|
|000002a0| 66 2e 77 65 62 20 61 6e | 64 20 69 6e 73 65 72 74 |f.web an|d insert|
|000002b0| 69 6e 67 0a 69 74 20 61 | 73 20 61 20 63 6f 6d 6d |ing.it a|s a comm|
|000002c0| 65 6e 74 2e 0a 0a 41 6c | 73 6f 2c 20 49 20 77 6f |ent...Al|so, I wo|
|000002d0| 75 6c 64 20 6c 69 6b 65 | 20 61 20 68 65 75 72 69 |uld like| a heuri|
|000002e0| 73 74 69 63 20 66 6f 72 | 20 63 61 6c 63 75 6c 61 |stic for| calcula|
|000002f0| 74 69 6e 67 20 74 68 65 | 20 78 2d 68 65 69 67 68 |ting the| x-heigh|
|00000300| 74 20 6f 66 20 74 68 65 | 20 66 6f 6e 74 2c 20 62 |t of the| font, b|
|00000310| 61 73 65 64 0a 6f 6e 20 | 74 68 65 20 62 69 74 6d |ased.on |the bitm|
|00000320| 61 70 20 73 69 7a 65 73 | 2c 20 68 65 69 67 68 74 |ap sizes|, height|
|00000330| 73 20 26 20 64 65 70 74 | 68 73 20 65 74 63 2e 0a |s & dept|hs etc..|
|00000340| 0a 54 48 45 53 45 20 50 | 52 4f 47 52 41 4d 53 20 |.THESE P|ROGRAMS |
|00000350| 43 4f 4d 45 20 57 49 54 | 48 4f 55 54 20 41 4e 59 |COME WIT|HOUT ANY|
|00000360| 20 28 49 4d 50 4c 49 45 | 44 20 4f 52 20 4f 54 48 | (IMPLIE|D OR OTH|
|00000370| 45 52 57 49 53 45 29 20 | 57 41 52 52 41 4e 54 4c |ERWISE) |WARRANTL|
|00000380| 59 2e 20 49 20 57 49 4c | 4c 20 4e 4f 54 20 42 45 |Y. I WIL|L NOT BE|
|00000390| 0a 48 45 4c 44 20 52 45 | 53 50 4f 4e 53 49 42 4c |.HELD RE|SPONSIBL|
|000003a0| 45 20 46 4f 52 20 41 4e | 59 20 44 41 4d 41 47 45 |E FOR AN|Y DAMAGE|
|000003b0| 20 54 4f 20 59 4f 55 52 | 20 44 41 54 41 20 4f 52 | TO YOUR| DATA OR|
|000003c0| 20 53 59 53 54 45 4d 20 | 43 41 55 53 45 44 20 42 | SYSTEM |CAUSED B|
|000003d0| 59 20 55 53 45 20 4f 52 | 20 4d 49 53 55 53 45 0a |Y USE OR| MISUSE.|
|000003e0| 4f 46 20 54 48 45 53 45 | 20 50 52 4f 47 52 41 4d |OF THESE| PROGRAM|
|000003f0| 53 2e 20 55 53 45 20 41 | 54 20 59 4f 55 52 20 4f |S. USE A|T YOUR O|
|00000400| 57 4e 20 52 49 53 4b 21 | 0a 0a 53 75 67 67 65 73 |WN RISK!|..Sugges|
|00000410| 74 69 6f 6e 73 2c 20 62 | 75 67 20 72 65 70 6f 72 |tions, b|ug repor|
|00000420| 74 73 20 61 6e 64 20 66 | 69 78 65 73 2c 20 65 74 |ts and f|ixes, et|
|00000430| 63 2c 20 74 6f 20 61 6a | 63 64 40 63 73 2e 65 64 |c, to aj|cd@cs.ed|
|00000440| 2e 61 63 2e 75 6b 2c 20 | 66 6c 61 6d 65 73 20 74 |.ac.uk, |flames t|
|00000450| 6f 0a 2f 64 65 76 2f 6e | 75 6c 6c 2e 0a 3d 3d 0a |o./dev/n|ull..==.|
|00000460| 41 6e 67 75 73 20 44 75 | 67 67 61 6e 2c 20 44 65 |Angus Du|ggan, De|
|00000470| 70 61 72 74 6d 65 6e 74 | 20 6f 66 20 43 6f 6d 70 |partment| of Comp|
|00000480| 75 74 65 72 20 53 63 69 | 65 6e 63 65 2c 09 7c 20 |uter Sci|ence,.| |
|00000490| 49 67 6e 6f 72 61 6e 63 | 65 20 6f 66 20 74 68 65 |Ignoranc|e of the|
|000004a0| 20 6d 61 6e 75 61 6c 20 | 69 73 0a 55 6e 69 76 65 | manual |is.Unive|
|000004b0| 72 73 69 74 79 20 6f 66 | 20 45 64 69 6e 62 75 72 |rsity of| Edinbur|
|000004c0| 67 68 2c 20 4a 43 4d 42 | 2c 09 09 09 7c 20 6e 6f |gh, JCMB|,...| no|
|000004d0| 20 65 78 63 75 73 65 2e | 0a 54 68 65 20 4b 69 6e | excuse.|.The Kin|
|000004e0| 67 27 73 20 42 75 69 6c | 64 69 6e 67 73 2c 20 4d |g's Buil|dings, M|
|000004f0| 61 79 66 69 65 6c 64 20 | 52 6f 61 64 2c 09 09 7c |ayfield |Road,..||
|00000500| 20 4a 41 4e 45 54 3a 20 | 20 61 6a 63 64 40 75 6b | JANET: | ajcd@uk|
|00000510| 2e 61 63 2e 65 64 2e 6c | 66 63 73 0a 45 64 69 6e |.ac.ed.l|fcs.Edin|
|00000520| 62 75 72 67 68 2c 20 45 | 48 39 20 33 4a 5a 2c 20 |burgh, E|H9 3JZ, |
|00000530| 53 63 6f 74 6c 61 6e 64 | 2e 09 7c 20 4f 52 3a 20 |Scotland|..| OR: |
|00000540| 20 61 6a 63 64 25 6c 66 | 63 73 2e 65 64 2e 61 63 | ajcd%lf|cs.ed.ac|
|00000550| 2e 75 6b 40 6e 73 66 6e | 65 74 2d 72 65 6c 61 79 |.uk@nsfn|et-relay|
|00000560| 2e 61 63 2e 75 6b 0a 0a | 23 21 20 2f 62 69 6e 2f |.ac.uk..|#! /bin/|
|00000570| 73 68 0a 23 20 54 68 69 | 73 20 69 73 20 61 20 73 |sh.# Thi|s is a s|
|00000580| 68 65 6c 6c 20 61 72 63 | 68 69 76 65 2e 20 20 52 |hell arc|hive. R|
|00000590| 65 6d 6f 76 65 20 61 6e | 79 74 68 69 6e 67 20 62 |emove an|ything b|
|000005a0| 65 66 6f 72 65 20 74 68 | 69 73 20 6c 69 6e 65 2c |efore th|is line,|
|000005b0| 20 74 68 65 6e 20 66 65 | 65 64 20 69 74 0a 23 20 | then fe|ed it.# |
|000005c0| 69 6e 74 6f 20 61 20 73 | 68 65 6c 6c 20 76 69 61 |into a s|hell via|
|000005d0| 20 22 73 68 20 66 69 6c | 65 22 20 6f 72 20 73 69 | "sh fil|e" or si|
|000005e0| 6d 69 6c 61 72 2e 20 20 | 54 6f 20 6f 76 65 72 77 |milar. |To overw|
|000005f0| 72 69 74 65 20 65 78 69 | 73 74 69 6e 67 20 66 69 |rite exi|sting fi|
|00000600| 6c 65 73 2c 0a 23 20 74 | 79 70 65 20 22 73 68 20 |les,.# t|ype "sh |
|00000610| 66 69 6c 65 20 2d 63 22 | 2e 0a 23 20 54 68 65 20 |file -c"|..# The |
|00000620| 74 6f 6f 6c 20 74 68 61 | 74 20 67 65 6e 65 72 61 |tool tha|t genera|
|00000630| 74 65 64 20 74 68 69 73 | 20 61 70 70 65 61 72 65 |ted this| appeare|
|00000640| 64 20 69 6e 20 74 68 65 | 20 63 6f 6d 70 2e 73 6f |d in the| comp.so|
|00000650| 75 72 63 65 73 2e 75 6e | 69 78 20 6e 65 77 73 67 |urces.un|ix newsg|
|00000660| 72 6f 75 70 3b 0a 23 20 | 73 65 6e 64 20 6d 61 69 |roup;.# |send mai|
|00000670| 6c 20 74 6f 20 63 6f 6d | 70 2d 73 6f 75 72 63 65 |l to com|p-source|
|00000680| 73 2d 75 6e 69 78 40 75 | 75 6e 65 74 2e 75 75 2e |s-unix@u|unet.uu.|
|00000690| 6e 65 74 20 69 66 20 79 | 6f 75 20 77 61 6e 74 20 |net if y|ou want |
|000006a0| 74 68 61 74 20 74 6f 6f | 6c 2e 0a 23 20 49 66 20 |that too|l..# If |
|000006b0| 74 68 69 73 20 61 72 63 | 68 69 76 65 20 69 73 20 |this arc|hive is |
|000006c0| 63 6f 6d 70 6c 65 74 65 | 2c 20 79 6f 75 20 77 69 |complete|, you wi|
|000006d0| 6c 6c 20 73 65 65 20 74 | 68 65 20 66 6f 6c 6c 6f |ll see t|he follo|
|000006e0| 77 69 6e 67 20 6d 65 73 | 73 61 67 65 20 61 74 20 |wing mes|sage at |
|000006f0| 74 68 65 20 65 6e 64 3a | 0a 23 09 09 22 45 6e 64 |the end:|.#.."End|
|00000700| 20 6f 66 20 61 72 63 68 | 69 76 65 20 31 20 28 6f | of arch|ive 1 (o|
|00000710| 66 20 32 29 2e 22 0a 23 | 20 43 6f 6e 74 65 6e 74 |f 2).".#| Content|
|00000720| 73 3a 20 20 70 62 6d 74 | 6f 70 6b 2e 31 20 70 62 |s: pbmt|opk.1 pb|
|00000730| 6d 74 6f 70 6b 2e 63 20 | 70 6b 74 6f 70 62 6d 2e |mtopk.c |pktopbm.|
|00000740| 31 20 70 6b 74 6f 70 62 | 6d 2e 63 20 73 69 67 6e |1 pktopb|m.c sign|
|00000750| 2e 70 62 6d 0a 23 20 57 | 72 61 70 70 65 64 20 62 |.pbm.# W|rapped b|
|00000760| 79 20 61 6a 63 64 40 68 | 61 72 70 6f 20 6f 6e 20 |y ajcd@h|arpo on |
|00000770| 54 68 75 20 41 75 67 20 | 20 39 20 31 33 3a 30 31 |Thu Aug | 9 13:01|
|00000780| 3a 34 33 20 31 39 39 30 | 0a 50 41 54 48 3d 2f 62 |:43 1990|.PATH=/b|
|00000790| 69 6e 3a 2f 75 73 72 2f | 62 69 6e 3a 2f 75 73 72 |in:/usr/|bin:/usr|
|000007a0| 2f 75 63 62 20 3b 20 65 | 78 70 6f 72 74 20 50 41 |/ucb ; e|xport PA|
|000007b0| 54 48 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 70 |TH.if te|st -f 'p|
|000007c0| 62 6d 74 6f 70 6b 2e 31 | 27 20 2d 61 20 22 24 7b |bmtopk.1|' -a "${|
|000007d0| 31 7d 22 20 21 3d 20 22 | 2d 63 22 20 3b 20 74 68 |1}" != "|-c" ; th|
|000007e0| 65 6e 20 0a 20 20 65 63 | 68 6f 20 73 68 61 72 3a |en . ec|ho shar:|
|000007f0| 20 57 69 6c 6c 20 6e 6f | 74 20 63 6c 6f 62 62 65 | Will no|t clobbe|
|00000800| 72 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |r existi|ng file |
|00000810| 5c 22 27 70 62 6d 74 6f | 70 6b 2e 31 27 5c 22 0a |\"'pbmto|pk.1'\".|
|00000820| 65 6c 73 65 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |else.ech|o shar: |
|00000830| 45 78 74 72 61 63 74 69 | 6e 67 20 5c 22 27 70 62 |Extracti|ng \"'pb|
|00000840| 6d 74 6f 70 6b 2e 31 27 | 5c 22 20 5c 28 32 39 34 |mtopk.1'|\" \(294|
|00000850| 34 20 63 68 61 72 61 63 | 74 65 72 73 5c 29 0a 73 |4 charac|ters\).s|
|00000860| 65 64 20 22 73 2f 5e 58 | 2f 2f 22 20 3e 27 70 62 |ed "s/^X|//" >'pb|
|00000870| 6d 74 6f 70 6b 2e 31 27 | 20 3c 3c 27 45 4e 44 5f |mtopk.1'| <<'END_|
|00000880| 4f 46 5f 46 49 4c 45 27 | 0a 58 2e 54 48 20 70 62 |OF_FILE'|.X.TH pb|
|00000890| 6d 74 6f 70 6b 20 31 20 | 22 36 20 41 75 67 75 73 |mtopk 1 |"6 Augus|
|000008a0| 74 20 31 39 39 30 22 0a | 58 2e 53 48 20 4e 41 4d |t 1990".|X.SH NAM|
|000008b0| 45 0a 58 70 62 6d 74 6f | 70 6b 20 2d 20 63 6f 6e |E.Xpbmto|pk - con|
|000008c0| 76 65 72 74 20 61 20 70 | 6f 72 74 61 62 6c 65 20 |vert a p|ortable |
|000008d0| 62 69 74 6d 61 70 20 69 | 6e 74 6f 20 61 20 70 61 |bitmap i|nto a pa|
|000008e0| 63 6b 65 64 20 28 50 4b | 29 20 66 6f 72 6d 61 74 |cked (PK|) format|
|000008f0| 20 66 6f 6e 74 0a 58 2e | 53 48 20 53 59 4e 4f 50 | font.X.|SH SYNOP|
|00000900| 53 49 53 0a 58 70 62 6d | 74 6f 70 6b 20 70 6b 66 |SIS.Xpbm|topk pkf|
|00000910| 69 6c 65 5b 2e 70 6b 5d | 20 74 66 6d 66 69 6c 65 |ile[.pk]| tfmfile|
|00000920| 5b 2e 74 66 6d 5d 20 72 | 65 73 6f 6c 75 74 69 6f |[.tfm] r|esolutio|
|00000930| 6e 20 5b 2d 73 20 64 65 | 73 69 67 6e 73 69 7a 65 |n [-s de|signsize|
|00000940| 5d 20 5b 2d 70 20 6e 75 | 6d 20 70 61 72 61 6d 2e |] [-p nu|m param.|
|00000950| 2e 2e 5d 0a 58 5b 2d 43 | 20 63 6f 64 69 6e 67 73 |..].X[-C| codings|
|00000960| 63 68 65 6d 65 5d 20 5b | 2d 46 20 66 61 6d 69 6c |cheme] [|-F famil|
|00000970| 79 5d 20 5b 2d 66 20 6f | 70 74 66 69 6c 65 5d 20 |y] [-f o|ptfile] |
|00000980| 5b 2d 63 20 6e 75 6d 5d | 0a 58 5b 2d 57 20 77 69 |[-c num]|.X[-W wi|
|00000990| 64 74 68 5d 20 5b 2d 48 | 20 68 65 69 67 68 74 5d |dth] [-H| height]|
|000009a0| 20 5b 2d 44 20 64 65 70 | 74 68 5d 0a 58 5b 2d 49 | [-D dep|th].X[-I|
|000009b0| 20 69 74 61 6c 5d 20 5b | 2d 68 20 68 6f 72 69 7a | ital] [|-h horiz|
|000009c0| 5d 20 5b 2d 76 20 76 65 | 72 74 5d 20 5b 2d 78 20 |] [-v ve|rt] [-x |
|000009d0| 78 6f 66 66 5d 20 5b 2d | 79 20 79 6f 66 66 5d 20 |xoff] [-|y yoff] |
|000009e0| 5b 70 62 6d 66 69 6c 65 | 5d 2e 2e 2e 0a 58 2e 53 |[pbmfile|]....X.S|
|000009f0| 48 20 44 45 53 43 52 49 | 50 54 49 4f 4e 0a 58 52 |H DESCRI|PTION.XR|
|00000a00| 65 61 64 73 20 70 6f 72 | 74 61 62 6c 65 20 62 69 |eads por|table bi|
|00000a10| 74 6d 61 70 73 20 61 73 | 20 69 6e 70 75 74 2c 20 |tmaps as| input, |
|00000a20| 61 6e 64 20 70 72 6f 64 | 75 63 65 73 20 61 20 70 |and prod|uces a p|
|00000a30| 61 63 6b 65 64 20 28 50 | 4b 29 20 66 6f 6e 74 20 |acked (P|K) font |
|00000a40| 66 69 6c 65 20 61 6e 64 | 20 61 0a 58 54 46 4d 20 |file and| a.XTFM |
|00000a50| 28 54 65 58 20 66 6f 6e | 74 20 6d 65 74 72 69 63 |(TeX fon|t metric|
|00000a60| 29 20 66 69 6c 65 20 61 | 73 20 6f 75 74 70 75 74 |) file a|s output|
|00000a70| 2e 20 54 68 65 20 72 65 | 73 6f 6c 75 74 69 6f 6e |. The re|solution|
|00000a80| 20 70 61 72 61 6d 65 74 | 65 72 20 69 6e 64 69 63 | paramet|er indic|
|00000a90| 61 74 65 73 20 74 68 65 | 0a 58 72 65 73 6f 6c 75 |ates the|.Xresolu|
|00000aa0| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 66 6f 6e 74 |tion of |the font|
|00000ab0| 2c 20 69 6e 20 64 6f 74 | 73 20 70 65 72 20 69 6e |, in dot|s per in|
|00000ac0| 63 68 2e 20 49 66 20 74 | 68 65 20 66 69 6c 65 6e |ch. If t|he filen|
|00000ad0| 61 6d 65 20 22 2d 22 20 | 69 73 20 75 73 65 64 20 |ame "-" |is used |
|00000ae0| 66 6f 72 20 61 6e 79 0a | 58 6f 66 20 74 68 65 20 |for any.|Xof the |
|00000af0| 66 69 6c 65 6e 61 6d 65 | 73 2c 20 74 68 65 20 73 |filename|s, the s|
|00000b00| 74 61 6e 64 61 72 64 20 | 69 6e 70 75 74 20 73 74 |tandard |input st|
|00000b10| 72 65 61 6d 20 28 6f 72 | 20 73 74 61 6e 64 61 72 |ream (or| standar|
|00000b20| 64 20 6f 75 74 70 75 74 | 20 77 68 65 72 65 0a 58 |d output| where.X|
|00000b30| 61 70 70 72 6f 70 72 69 | 61 74 65 29 20 77 69 6c |appropri|ate) wil|
|00000b40| 6c 20 62 65 20 75 73 65 | 64 2e 0a 58 2e 53 48 20 |l be use|d..X.SH |
|00000b50| 4f 50 54 49 4f 4e 53 0a | 58 2e 49 50 20 22 2d 73 |OPTIONS.|X.IP "-s|
|00000b60| 20 64 65 73 69 67 6e 73 | 69 7a 65 22 0a 58 53 65 | designs|ize".XSe|
|00000b70| 74 73 20 74 68 65 20 64 | 65 73 69 67 6e 20 73 69 |ts the d|esign si|
|00000b80| 7a 65 20 6f 66 20 74 68 | 65 20 66 6f 6e 74 2c 20 |ze of th|e font, |
|00000b90| 69 6e 20 54 65 58 27 73 | 20 70 6f 69 6e 74 73 20 |in TeX's| points |
|00000ba0| 28 37 32 2e 32 37 70 74 | 20 74 6f 20 74 68 65 20 |(72.27pt| to the |
|00000bb0| 69 6e 63 68 29 2e 20 54 | 68 65 0a 58 64 65 66 61 |inch). T|he.Xdefa|
|00000bc0| 75 6c 74 20 64 65 73 69 | 67 6e 20 73 69 7a 65 20 |ult desi|gn size |
|00000bd0| 69 73 20 31 2e 20 54 68 | 65 20 54 46 4d 20 70 61 |is 1. Th|e TFM pa|
|00000be0| 72 61 6d 65 74 65 72 73 | 20 61 72 65 20 67 69 76 |rameters| are giv|
|00000bf0| 65 6e 20 61 73 20 6d 75 | 6c 74 69 70 6c 65 73 20 |en as mu|ltiples |
|00000c00| 6f 66 20 74 68 65 0a 58 | 64 65 73 69 67 6e 20 73 |of the.X|design s|
|00000c10| 69 7a 65 2e 0a 58 2e 49 | 50 20 22 2d 70 20 6e 75 |ize..X.I|P "-p nu|
|00000c20| 6d 20 70 61 72 61 6d 2e | 2e 2e 22 0a 58 53 65 74 |m param.|..".XSet|
|00000c30| 73 20 74 68 65 20 66 69 | 72 73 74 20 6e 75 6d 20 |s the fi|rst num |
|00000c40| 66 6f 6e 74 20 70 61 72 | 61 6d 65 74 65 72 73 20 |font par|ameters |
|00000c50| 66 6f 72 20 74 68 65 20 | 66 6f 6e 74 2e 20 54 68 |for the |font. Th|
|00000c60| 65 20 66 69 72 73 74 20 | 73 65 76 65 6e 20 70 61 |e first |seven pa|
|00000c70| 72 61 6d 65 74 65 72 73 | 0a 58 61 72 65 20 74 68 |rameters|.Xare th|
|00000c80| 65 20 73 6c 61 6e 74 2c | 0a 58 69 6e 74 65 72 77 |e slant,|.Xinterw|
|00000c90| 6f 72 64 20 73 70 61 63 | 69 6e 67 2c 20 69 6e 74 |ord spac|ing, int|
|00000ca0| 65 72 77 6f 72 64 20 73 | 70 61 63 65 20 73 74 72 |erword s|pace str|
|00000cb0| 65 74 63 68 61 62 69 6c | 69 74 79 2c 20 69 6e 74 |etchabil|ity, int|
|00000cc0| 65 72 77 6f 72 64 20 73 | 70 61 63 65 0a 58 73 68 |erword s|pace.Xsh|
|00000cd0| 72 69 6e 6b 61 62 69 6c | 69 74 79 2c 20 78 2d 68 |rinkabil|ity, x-h|
|00000ce0| 65 69 67 68 74 2c 20 71 | 75 61 64 20 77 69 64 74 |eight, q|uad widt|
|00000cf0| 68 2c 20 61 6e 64 20 70 | 6f 73 74 2d 73 65 6e 74 |h, and p|ost-sent|
|00000d00| 65 6e 63 65 20 65 78 74 | 72 61 20 73 70 61 63 65 |ence ext|ra space|
|00000d10| 20 6f 66 20 74 68 65 0a | 58 66 6f 6e 74 2e 20 4d | of the.|Xfont. M|
|00000d20| 61 74 68 20 61 6e 64 20 | 73 79 6d 62 6f 6c 20 66 |ath and |symbol f|
|00000d30| 6f 6e 74 73 20 6d 61 79 | 20 68 61 76 65 20 6d 6f |onts may| have mo|
|00000d40| 72 65 20 70 61 72 61 6d | 65 74 65 72 73 3b 20 73 |re param|eters; s|
|00000d50| 65 65 20 54 68 65 20 54 | 65 58 62 6f 6f 6b 20 66 |ee The T|eXbook f|
|00000d60| 6f 72 20 61 0a 58 6c 69 | 73 74 20 6f 66 20 74 68 |or a.Xli|st of th|
|00000d70| 65 73 65 2e 20 52 65 61 | 73 6f 6e 61 62 6c 65 20 |ese. Rea|sonable |
|00000d80| 64 65 66 61 75 6c 74 20 | 76 61 6c 75 65 73 20 61 |default |values a|
|00000d90| 72 65 20 63 68 6f 73 65 | 6e 20 66 6f 72 20 70 61 |re chose|n for pa|
|00000da0| 72 61 6d 65 74 65 72 73 | 20 77 68 69 63 68 20 61 |rameters| which a|
|00000db0| 72 65 0a 58 6e 6f 74 20 | 73 70 65 63 69 66 69 65 |re.Xnot |specifie|
|00000dc0| 64 2e 0a 58 2e 49 50 20 | 22 2d 43 20 63 6f 64 69 |d..X.IP |"-C codi|
|00000dd0| 6e 67 73 63 68 65 6d 65 | 22 0a 58 53 65 74 73 20 |ngscheme|".XSets |
|00000de0| 74 68 65 20 63 6f 64 69 | 6e 67 20 73 63 68 65 6d |the codi|ng schem|
|00000df0| 65 20 63 6f 6d 6d 65 6e | 74 20 69 6e 20 74 68 65 |e commen|t in the|
|00000e00| 20 54 46 4d 20 66 69 6c | 65 2e 0a 58 2e 49 50 20 | TFM fil|e..X.IP |
|00000e10| 22 2d 46 20 66 61 6d 69 | 6c 79 22 0a 58 53 65 74 |"-F fami|ly".XSet|
|00000e20| 73 20 74 68 65 20 66 6f | 6e 74 20 66 61 6d 69 6c |s the fo|nt famil|
|00000e30| 79 20 63 6f 6d 6d 65 6e | 74 20 69 6e 20 74 68 65 |y commen|t in the|
|00000e40| 20 54 46 4d 20 66 69 6c | 65 2e 0a 58 2e 49 50 20 | TFM fil|e..X.IP |
|00000e50| 22 2d 66 20 6f 70 74 66 | 69 6c 65 22 0a 58 52 65 |"-f optf|ile".XRe|
|00000e60| 61 64 73 20 74 68 65 20 | 66 69 6c 65 20 6f 70 74 |ads the |file opt|
|00000e70| 66 69 6c 65 2c 20 77 68 | 69 63 68 20 73 68 6f 75 |file, wh|ich shou|
|00000e80| 6c 64 20 63 6f 6e 74 61 | 69 6e 20 61 20 6c 69 6e |ld conta|in a lin|
|00000e90| 65 73 20 6f 66 20 74 68 | 65 20 66 6f 72 6d 3a 0a |es of th|e form:.|
|00000ea0| 58 2e 73 70 0a 58 2e 6e | 66 0a 58 2e 6e 61 0a 58 |X.sp.X.n|f.X.na.X|
|00000eb0| 20 20 20 66 69 6c 65 6e | 61 6d 65 20 78 6f 66 66 | filen|ame xoff|
|00000ec0| 20 79 6f 66 66 20 68 6f | 72 69 7a 20 76 65 72 74 | yoff ho|riz vert|
|00000ed0| 20 77 69 64 74 68 20 68 | 65 69 67 68 74 20 64 65 | width h|eight de|
|00000ee0| 70 74 68 20 69 74 61 6c | 0a 58 2e 66 69 0a 58 2e |pth ital|.X.fi.X.|
|00000ef0| 61 64 0a 58 2e 73 70 0a | 58 54 68 65 20 70 62 6d |ad.X.sp.|XThe pbm|
|00000f00| 20 66 69 6c 65 73 20 73 | 70 65 63 69 66 69 65 64 | files s|pecified|
|00000f10| 20 62 79 20 74 68 65 20 | 66 69 6c 65 6e 61 6d 65 | by the |filename|
|00000f20| 20 70 61 72 61 6d 65 74 | 65 72 73 20 61 72 65 20 | paramet|ers are |
|00000f30| 69 6e 73 65 72 74 65 64 | 20 63 6f 6e 73 65 63 75 |inserted| consecu|
|00000f40| 74 69 76 65 6c 79 0a 58 | 69 6e 20 74 68 65 20 66 |tively.X|in the f|
|00000f50| 6f 6e 74 20 77 69 74 68 | 20 74 68 65 20 73 70 65 |ont with| the spe|
|00000f60| 63 69 66 69 65 64 20 61 | 74 74 72 69 62 75 74 65 |cified a|ttribute|
|00000f70| 73 2e 20 49 66 20 61 6e | 79 20 6f 66 20 74 68 65 |s. If an|y of the|
|00000f80| 20 61 74 74 72 69 62 75 | 74 65 73 20 61 72 65 0a | attribu|tes are.|
|00000f90| 58 6f 6d 69 74 74 65 64 | 2c 20 6f 72 20 72 65 70 |Xomitted|, or rep|
|00000fa0| 6c 61 63 65 64 20 77 69 | 74 68 20 22 2a 22 2c 20 |laced wi|th "*", |
|00000fb0| 61 20 64 65 66 61 75 6c | 74 20 76 61 6c 75 65 20 |a defaul|t value |
|00000fc0| 77 69 6c 6c 20 62 65 20 | 63 61 6c 63 75 6c 61 74 |will be |calculat|
|00000fd0| 65 64 20 66 72 6f 6d 20 | 74 68 65 0a 58 73 69 7a |ed from |the.Xsiz|
|00000fe0| 65 20 6f 66 20 74 68 65 | 20 62 69 74 6d 61 70 2e |e of the| bitmap.|
|00000ff0| 20 54 68 65 20 73 65 74 | 74 69 6e 67 73 20 6f 66 | The set|tings of|
|00001000| 20 74 68 65 20 2d 57 2c | 20 2d 48 2c 20 2d 44 2c | the -W,| -H, -D,|
|00001010| 20 2d 49 2c 20 2d 68 2c | 20 2d 76 2c 20 2d 78 2c | -I, -h,| -v, -x,|
|00001020| 20 61 6e 64 20 2d 79 0a | 58 6f 70 74 69 6f 6e 73 | and -y.|Xoptions|
|00001030| 20 64 6f 20 6e 6f 74 20 | 61 66 66 65 63 74 65 64 | do not |affected|
|00001040| 20 63 68 61 72 61 63 74 | 65 72 73 20 63 72 65 61 | charact|ers crea|
|00001050| 74 65 64 20 69 6e 20 74 | 68 69 73 20 77 61 79 2e |ted in t|his way.|
|00001060| 20 4c 69 6e 65 73 20 62 | 65 67 69 6e 6e 69 6e 67 | Lines b|eginning|
|00001070| 20 77 69 74 68 0a 58 22 | 25 22 20 6f 72 20 22 23 | with.X"|%" or "#|
|00001080| 22 20 61 72 65 20 69 67 | 6e 6f 72 65 64 2e 0a 58 |" are ig|nored..X|
|00001090| 2e 49 50 20 22 2d 63 20 | 6e 75 6d 22 0a 58 53 65 |.IP "-c |num".XSe|
|000010a0| 74 73 20 74 68 65 20 63 | 68 61 72 61 63 74 65 72 |ts the c|haracter|
|000010b0| 20 6e 75 6d 62 65 72 20 | 6f 66 20 74 68 65 20 6e | number |of the n|
|000010c0| 65 78 74 20 62 69 74 6d | 61 70 20 65 6e 63 6f 75 |ext bitm|ap encou|
|000010d0| 6e 74 65 72 65 64 20 74 | 6f 20 6e 75 6d 2e 0a 58 |ntered t|o num..X|
|000010e0| 2e 49 50 20 22 2d 57 20 | 77 69 64 74 68 22 0a 58 |.IP "-W |width".X|
|000010f0| 53 65 74 73 20 74 68 65 | 20 54 46 4d 20 77 69 64 |Sets the| TFM wid|
|00001100| 74 68 20 6f 66 20 74 68 | 65 20 6e 65 78 74 20 63 |th of th|e next c|
|00001110| 68 61 72 61 63 74 65 72 | 20 74 6f 20 77 69 64 74 |haracter| to widt|
|00001120| 68 20 28 69 6e 20 64 65 | 73 69 67 6e 20 73 69 7a |h (in de|sign siz|
|00001130| 65 20 6d 75 6c 74 69 70 | 6c 65 73 29 2e 0a 58 2e |e multip|les)..X.|
|00001140| 49 50 20 22 2d 48 20 68 | 65 69 67 68 74 22 0a 58 |IP "-H h|eight".X|
|00001150| 53 65 74 73 20 74 68 65 | 20 54 46 4d 20 68 65 69 |Sets the| TFM hei|
|00001160| 67 68 74 20 6f 66 20 74 | 68 65 20 6e 65 78 74 20 |ght of t|he next |
|00001170| 63 68 61 72 61 63 74 65 | 72 20 74 6f 20 68 65 69 |characte|r to hei|
|00001180| 67 68 74 20 28 69 6e 20 | 64 65 73 69 67 6e 20 73 |ght (in |design s|
|00001190| 69 7a 65 20 6d 75 6c 74 | 69 70 6c 65 73 29 2e 0a |ize mult|iples)..|
|000011a0| 58 2e 49 50 20 22 2d 44 | 20 64 65 70 74 68 22 0a |X.IP "-D| depth".|
|000011b0| 58 53 65 74 73 20 74 68 | 65 20 54 46 4d 20 64 65 |XSets th|e TFM de|
|000011c0| 70 74 68 20 6f 66 20 74 | 68 65 20 6e 65 78 74 20 |pth of t|he next |
|000011d0| 63 68 61 72 61 63 74 65 | 72 20 74 6f 20 64 65 70 |characte|r to dep|
|000011e0| 74 68 20 28 69 6e 20 64 | 65 73 69 67 6e 20 73 69 |th (in d|esign si|
|000011f0| 7a 65 20 6d 75 6c 74 69 | 70 6c 65 73 29 2e 0a 58 |ze multi|ples)..X|
|00001200| 2e 49 50 20 22 2d 49 20 | 69 74 61 6c 22 0a 58 53 |.IP "-I |ital".XS|
|00001210| 65 74 73 20 74 68 65 20 | 69 74 61 6c 69 63 20 63 |ets the |italic c|
|00001220| 6f 72 72 65 63 74 69 6f | 6e 20 6f 66 20 74 68 65 |orrectio|n of the|
|00001230| 20 6e 65 78 74 20 63 68 | 61 72 61 63 74 65 72 20 | next ch|aracter |
|00001240| 74 6f 0a 58 69 74 61 6c | 20 28 69 6e 20 64 65 73 |to.Xital| (in des|
|00001250| 69 67 6e 20 73 69 7a 65 | 20 6d 75 6c 74 69 70 6c |ign size| multipl|
|00001260| 65 73 29 2e 0a 58 2e 49 | 50 20 22 2d 68 20 68 6f |es)..X.I|P "-h ho|
|00001270| 72 69 7a 22 0a 58 53 65 | 74 73 20 74 68 65 20 68 |riz".XSe|ts the h|
|00001280| 6f 72 69 7a 6f 6e 74 61 | 6c 20 65 73 63 61 70 65 |orizonta|l escape|
|00001290| 6d 65 6e 74 20 6f 66 20 | 74 68 65 20 6e 65 78 74 |ment of |the next|
|000012a0| 20 63 68 61 72 61 63 74 | 65 72 20 74 6f 20 68 6f | charact|er to ho|
|000012b0| 72 69 7a 20 28 69 6e 20 | 70 69 78 65 6c 73 29 2e |riz (in |pixels).|
|000012c0| 0a 58 2e 49 50 20 22 2d | 76 20 76 65 72 74 22 0a |.X.IP "-|v vert".|
|000012d0| 58 53 65 74 73 20 74 68 | 65 20 76 65 72 74 69 63 |XSets th|e vertic|
|000012e0| 61 6c 20 65 73 63 61 70 | 65 6d 65 6e 74 20 6f 66 |al escap|ement of|
|000012f0| 20 74 68 65 20 6e 65 78 | 74 20 63 68 61 72 61 63 | the nex|t charac|
|00001300| 74 65 72 20 74 6f 20 76 | 65 72 74 20 28 69 6e 20 |ter to v|ert (in |
|00001310| 70 69 78 65 6c 73 29 2e | 0a 58 2e 49 50 20 22 2d |pixels).|.X.IP "-|
|00001320| 78 20 78 6f 66 66 22 0a | 58 53 65 74 73 20 74 68 |x xoff".|XSets th|
|00001330| 65 20 68 6f 72 69 7a 6f | 6e 74 61 6c 20 6f 66 66 |e horizo|ntal off|
|00001340| 73 65 74 20 6f 66 20 74 | 68 65 20 6e 65 78 74 20 |set of t|he next |
|00001350| 63 68 61 72 61 63 74 65 | 72 20 74 6f 20 78 6f 66 |characte|r to xof|
|00001360| 66 20 28 69 6e 20 70 69 | 78 65 6c 73 29 2e 0a 58 |f (in pi|xels)..X|
|00001370| 2e 49 50 20 22 2d 79 20 | 79 6f 66 66 22 0a 58 53 |.IP "-y |yoff".XS|
|00001380| 65 74 73 20 74 68 65 20 | 76 65 72 74 69 63 61 6c |ets the |vertical|
|00001390| 20 6f 66 66 73 65 74 20 | 6f 66 20 74 68 65 20 6e | offset |of the n|
|000013a0| 65 78 74 20 63 68 61 72 | 61 63 74 65 72 20 74 6f |ext char|acter to|
|000013b0| 20 79 6f 66 66 20 28 69 | 6e 20 70 69 78 65 6c 73 | yoff (i|n pixels|
|000013c0| 2c 20 66 72 6f 6d 20 74 | 68 65 0a 58 74 6f 70 20 |, from t|he.Xtop |
|000013d0| 72 6f 77 29 2e 0a 58 2e | 53 48 20 22 53 45 45 20 |row)..X.|SH "SEE |
|000013e0| 41 4c 53 4f 22 0a 58 70 | 6b 74 6f 70 62 6d 28 31 |ALSO".Xp|ktopbm(1|
|000013f0| 29 2c 20 70 62 6d 28 35 | 29 0a 58 2e 53 48 20 41 |), pbm(5|).X.SH A|
|00001400| 55 54 48 4f 52 0a 58 41 | 64 61 70 74 65 64 20 66 |UTHOR.XA|dapted f|
|00001410| 72 6f 6d 20 54 6f 6d 20 | 52 6f 6b 69 63 6b 69 27 |rom Tom |Rokicki'|
|00001420| 73 20 70 78 74 6f 70 6b | 20 62 79 20 41 6e 67 75 |s pxtopk| by Angu|
|00001430| 73 20 44 75 67 67 61 6e | 20 3c 61 6a 63 64 40 75 |s Duggan| <ajcd@u|
|00001440| 6b 2e 61 63 2e 65 64 2e | 6c 66 63 73 3e 2e 0a 0a |k.ac.ed.|lfcs>...|
|00001450| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 0a 65 63 68 6f |END_OF_F|ILE.echo|
|00001460| 20 73 68 61 72 3a 20 4e | 45 57 4c 49 4e 45 20 61 | shar: N|EWLINE a|
|00001470| 70 70 65 6e 64 65 64 20 | 74 6f 20 5c 22 27 70 62 |ppended |to \"'pb|
|00001480| 6d 74 6f 70 6b 2e 31 27 | 5c 22 0a 69 66 20 74 65 |mtopk.1'|\".if te|
|00001490| 73 74 20 32 39 34 35 20 | 2d 6e 65 20 60 77 63 20 |st 2945 |-ne `wc |
|000014a0| 2d 63 20 3c 27 70 62 6d | 74 6f 70 6b 2e 31 27 60 |-c <'pbm|topk.1'`|
|000014b0| 3b 20 74 68 65 6e 0a 20 | 20 20 20 65 63 68 6f 20 |; then. | echo |
|000014c0| 73 68 61 72 3a 20 5c 22 | 27 70 62 6d 74 6f 70 6b |shar: \"|'pbmtopk|
|000014d0| 2e 31 27 5c 22 20 75 6e | 70 61 63 6b 65 64 20 77 |.1'\" un|packed w|
|000014e0| 69 74 68 20 77 72 6f 6e | 67 20 73 69 7a 65 21 0a |ith wron|g size!.|
|000014f0| 66 69 0a 23 20 65 6e 64 | 20 6f 66 20 27 70 62 6d |fi.# end| of 'pbm|
|00001500| 74 6f 70 6b 2e 31 27 0a | 66 69 0a 69 66 20 74 65 |topk.1'.|fi.if te|
|00001510| 73 74 20 2d 66 20 27 70 | 62 6d 74 6f 70 6b 2e 63 |st -f 'p|bmtopk.c|
|00001520| 27 20 2d 61 20 22 24 7b | 31 7d 22 20 21 3d 20 22 |' -a "${|1}" != "|
|00001530| 2d 63 22 20 3b 20 74 68 | 65 6e 20 0a 20 20 65 63 |-c" ; th|en . ec|
|00001540| 68 6f 20 73 68 61 72 3a | 20 57 69 6c 6c 20 6e 6f |ho shar:| Will no|
|00001550| 74 20 63 6c 6f 62 62 65 | 72 20 65 78 69 73 74 69 |t clobbe|r existi|
|00001560| 6e 67 20 66 69 6c 65 20 | 5c 22 27 70 62 6d 74 6f |ng file |\"'pbmto|
|00001570| 70 6b 2e 63 27 5c 22 0a | 65 6c 73 65 0a 65 63 68 |pk.c'\".|else.ech|
|00001580| 6f 20 73 68 61 72 3a 20 | 45 78 74 72 61 63 74 69 |o shar: |Extracti|
|00001590| 6e 67 20 5c 22 27 70 62 | 6d 74 6f 70 6b 2e 63 27 |ng \"'pb|mtopk.c'|
|000015a0| 5c 22 20 5c 28 32 34 35 | 32 33 20 63 68 61 72 61 |\" \(245|23 chara|
|000015b0| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|000015c0| 58 2f 2f 22 20 3e 27 70 | 62 6d 74 6f 70 6b 2e 63 |X//" >'p|bmtopk.c|
|000015d0| 27 20 3c 3c 27 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |' <<'END|_OF_FILE|
|000015e0| 27 0a 58 2f 2a 0a 58 20 | 20 70 62 6d 74 6f 70 6b |'.X/*.X | pbmtopk|
|000015f0| 2c 20 61 64 61 70 74 65 | 64 20 66 72 6f 6d 20 22 |, adapte|d from "|
|00001600| 70 78 74 6f 70 6b 2e 63 | 20 62 79 20 74 6f 6d 61 |pxtopk.c| by toma|
|00001610| 73 20 72 6f 6b 69 63 6b | 69 22 20 62 79 20 41 4a |s rokick|i" by AJ|
|00001620| 43 44 20 31 2f 38 2f 39 | 30 0a 58 20 20 0a 58 20 |CD 1/8/9|0.X .X |
|00001630| 20 63 6f 6d 70 69 6c 65 | 20 77 69 74 68 3a 20 63 | compile| with: c|
|00001640| 63 20 2d 6f 20 70 62 6d | 74 6f 70 6b 20 70 62 6d |c -o pbm|topk pbm|
|00001650| 74 6f 70 6b 2e 63 20 2d | 6c 6d 20 2d 6c 70 62 6d |topk.c -|lm -lpbm|
|00001660| 0a 58 20 20 2a 2f 0a 58 | 0a 58 23 69 6e 63 6c 75 |.X */.X|.X#inclu|
|00001670| 64 65 20 3c 73 74 64 69 | 6f 2e 68 3e 0a 58 23 69 |de <stdi|o.h>.X#i|
|00001680| 6e 63 6c 75 64 65 20 3c | 70 62 6d 2e 68 3e 0a 58 |nclude <|pbm.h>.X|
|00001690| 23 69 6e 63 6c 75 64 65 | 20 3c 6d 61 74 68 2e 68 |#include| <math.h|
|000016a0| 3e 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 63 74 79 |>.X#incl|ude <cty|
|000016b0| 70 65 2e 68 3e 0a 58 0a | 58 23 64 65 66 69 6e 65 |pe.h>.X.|X#define|
|000016c0| 20 4d 41 58 50 4b 43 48 | 41 52 20 32 35 36 0a 58 | MAXPKCH|AR 256.X|
|000016d0| 23 64 65 66 69 6e 65 20 | 4d 41 58 4f 50 54 4c 49 |#define |MAXOPTLI|
|000016e0| 4e 45 20 32 30 30 0a 58 | 23 64 65 66 69 6e 65 20 |NE 200.X|#define |
|000016f0| 4d 41 58 57 49 44 54 48 | 54 41 42 20 32 35 36 0a |MAXWIDTH|TAB 256.|
|00001700| 58 23 64 65 66 69 6e 65 | 20 4d 41 58 48 45 49 47 |X#define| MAXHEIG|
|00001710| 48 54 54 41 42 20 31 36 | 0a 58 23 64 65 66 69 6e |HTTAB 16|.X#defin|
|00001720| 65 20 4d 41 58 44 45 50 | 54 48 54 41 42 20 31 36 |e MAXDEP|THTAB 16|
|00001730| 0a 58 23 64 65 66 69 6e | 65 20 4d 41 58 49 54 41 |.X#defin|e MAXITA|
|00001740| 4c 49 43 54 41 42 20 36 | 34 0a 58 23 64 65 66 69 |LICTAB 6|4.X#defi|
|00001750| 6e 65 20 4d 41 58 50 41 | 52 41 4d 53 20 33 30 0a |ne MAXPA|RAMS 30.|
|00001760| 58 23 64 65 66 69 6e 65 | 20 4e 41 4d 45 4c 45 4e |X#define| NAMELEN|
|00001770| 47 54 48 20 38 30 0a 58 | 0a 58 23 64 65 66 69 6e |GTH 80.X|.X#defin|
|00001780| 65 20 74 72 75 65 20 28 | 31 29 0a 58 23 64 65 66 |e true (|1).X#def|
|00001790| 69 6e 65 20 66 61 6c 73 | 65 20 28 30 29 0a 58 23 |ine fals|e (0).X#|
|000017a0| 64 65 66 69 6e 65 20 63 | 68 72 28 61 29 20 61 0a |define c|hr(a) a.|
|000017b0| 58 20 20 0a 58 23 64 65 | 66 69 6e 65 20 72 6f 75 |X .X#de|fine rou|
|000017c0| 6e 64 28 61 29 20 28 28 | 69 6e 74 29 28 61 2b 2e |nd(a) ((|int)(a+.|
|000017d0| 35 29 29 0a 58 23 64 65 | 66 69 6e 65 20 66 69 78 |5)).X#de|fine fix|
|000017e0| 77 6f 72 64 28 64 29 20 | 28 28 69 6e 74 29 61 69 |word(d) |((int)ai|
|000017f0| 6e 74 28 28 64 6f 75 62 | 6c 65 29 28 28 64 29 2a |nt((doub|le)((d)*|
|00001800| 31 30 34 38 35 37 36 29 | 29 29 0a 58 23 64 65 66 |1048576)|)).X#def|
|00001810| 69 6e 65 20 75 6e 66 69 | 78 77 6f 72 64 28 66 29 |ine unfi|xword(f)|
|00001820| 20 28 28 64 6f 75 62 6c | 65 29 28 66 29 20 2f 20 | ((doubl|e)(f) / |
|00001830| 31 30 34 38 35 37 36 29 | 0a 58 23 64 65 66 69 6e |1048576)|.X#defin|
|00001840| 65 20 66 69 78 72 61 6e | 67 65 28 66 29 20 28 28 |e fixran|ge(f) ((|
|00001850| 66 29 20 3c 20 31 36 37 | 37 37 32 31 36 20 26 26 |f) < 167|77216 &&|
|00001860| 20 28 66 29 20 3e 20 2d | 31 36 37 37 37 32 31 36 | (f) > -|16777216|
|00001870| 29 0a 58 23 64 65 66 69 | 6e 65 20 64 65 73 69 67 |).X#defi|ne desig|
|00001880| 6e 75 6e 69 74 73 28 70 | 29 20 28 28 70 29 2a 37 |nunits(p|) ((p)*7|
|00001890| 32 2e 32 37 2f 28 64 6f | 75 62 6c 65 29 72 65 73 |2.27/(do|uble)res|
|000018a0| 6f 6c 75 74 69 6f 6e 2f | 75 6e 66 69 78 77 6f 72 |olution/|unfixwor|
|000018b0| 64 28 64 65 73 69 67 6e | 73 69 7a 65 29 29 0a 58 |d(design|size)).X|
|000018c0| 0a 58 2f 2a 20 63 68 61 | 72 61 63 74 65 72 20 66 |.X/* cha|racter f|
|000018d0| 6c 61 67 73 3a 20 69 6e | 20 6f 72 64 65 72 20 6f |lags: in| order o|
|000018e0| 66 20 61 70 70 65 61 72 | 61 6e 63 65 20 69 6e 20 |f appear|ance in |
|000018f0| 6f 70 74 69 6f 6e 20 66 | 69 6c 65 73 2e 20 2a 2f |option f|iles. */|
|00001900| 0a 58 23 64 65 66 69 6e | 65 20 58 4f 46 46 53 45 |.X#defin|e XOFFSE|
|00001910| 54 20 20 20 20 20 31 0a | 58 23 64 65 66 69 6e 65 |T 1.|X#define|
|00001920| 20 59 4f 46 46 53 45 54 | 20 20 20 20 20 32 0a 58 | YOFFSET| 2.X|
|00001930| 23 64 65 66 69 6e 65 20 | 48 4f 52 5a 45 53 43 20 |#define |HORZESC |
|00001940| 20 20 20 20 34 0a 58 23 | 64 65 66 69 6e 65 20 56 | 4.X#|define V|
|00001950| 45 52 54 45 53 43 20 20 | 20 20 20 38 0a 58 23 64 |ERTESC | 8.X#d|
|00001960| 65 66 69 6e 65 20 54 46 | 4d 57 49 44 54 48 20 20 |efine TF|MWIDTH |
|00001970| 20 31 36 0a 58 23 64 65 | 66 69 6e 65 20 54 46 4d | 16.X#de|fine TFM|
|00001980| 48 45 49 47 48 54 20 20 | 33 32 0a 58 23 64 65 66 |HEIGHT |32.X#def|
|00001990| 69 6e 65 20 54 46 4d 44 | 45 50 54 48 20 20 20 36 |ine TFMD|EPTH 6|
|000019a0| 34 0a 58 23 64 65 66 69 | 6e 65 20 54 46 4d 49 54 |4.X#defi|ne TFMIT|
|000019b0| 41 4c 49 43 20 31 32 38 | 0a 58 0a 58 74 79 70 65 |ALIC 128|.X.Xtype|
|000019c0| 64 65 66 20 69 6e 74 20 | 69 6e 74 65 67 65 72 20 |def int |integer |
|000019d0| 3b 0a 58 74 79 70 65 64 | 65 66 20 63 68 61 72 20 |;.Xtyped|ef char |
|000019e0| 71 75 61 72 74 65 72 77 | 6f 72 64 20 3b 0a 58 74 |quarterw|ord ;.Xt|
|000019f0| 79 70 65 64 65 66 20 63 | 68 61 72 20 62 6f 6f 6c |ypedef c|har bool|
|00001a00| 65 61 6e 20 3b 0a 58 74 | 79 70 65 64 65 66 20 71 |ean ;.Xt|ypedef q|
|00001a10| 75 61 72 74 65 72 77 6f | 72 64 20 41 53 43 49 49 |uarterwo|rd ASCII|
|00001a20| 63 6f 64 65 20 3b 0a 58 | 74 79 70 65 64 65 66 20 |code ;.X|typedef |
|00001a30| 71 75 61 72 74 65 72 77 | 6f 72 64 20 65 69 67 68 |quarterw|ord eigh|
|00001a40| 74 62 69 74 73 20 3b 0a | 58 74 79 70 65 64 65 66 |tbits ;.|Xtypedef|
|00001a50| 20 46 49 4c 45 20 2a 62 | 79 74 65 66 69 6c 65 20 | FILE *b|ytefile |
|00001a60| 3b 0a 58 74 79 70 65 64 | 65 66 20 75 6e 73 69 67 |;.Xtyped|ef unsig|
|00001a70| 6e 65 64 20 63 68 61 72 | 20 62 79 74 65 20 3b 0a |ned char| byte ;.|
|00001a80| 58 0a 58 69 6e 74 65 67 | 65 72 20 72 65 73 6f 6c |X.Xinteg|er resol|
|00001a90| 75 74 69 6f 6e 2c 20 64 | 65 73 69 67 6e 73 69 7a |ution, d|esignsiz|
|00001aa0| 65 20 3b 0a 58 63 68 61 | 72 20 2a 66 69 6c 65 6e |e ;.Xcha|r *filen|
|00001ab0| 61 6d 65 5b 4d 41 58 50 | 4b 43 48 41 52 5d 20 3b |ame[MAXP|KCHAR] ;|
|00001ac0| 0a 58 0a 58 69 6e 74 65 | 67 65 72 20 78 6f 66 66 |.X.Xinte|ger xoff|
|00001ad0| 73 65 74 5b 4d 41 58 50 | 4b 43 48 41 52 5d 20 3b |set[MAXP|KCHAR] ;|
|00001ae0| 0a 58 69 6e 74 65 67 65 | 72 20 79 6f 66 66 73 65 |.Xintege|r yoffse|
|00001af0| 74 5b 4d 41 58 50 4b 43 | 48 41 52 5d 20 3b 0a 58 |t[MAXPKC|HAR] ;.X|
|00001b00| 69 6e 74 65 67 65 72 20 | 68 6f 72 7a 65 73 63 5b |integer |horzesc[|
|00001b10| 4d 41 58 50 4b 43 48 41 | 52 5d 20 3b 0a 58 69 6e |MAXPKCHA|R] ;.Xin|
|00001b20| 74 65 67 65 72 20 76 65 | 72 74 65 73 63 5b 4d 41 |teger ve|rtesc[MA|
|00001b30| 58 50 4b 43 48 41 52 5d | 20 3b 0a 58 0a 58 62 79 |XPKCHAR]| ;.X.Xby|
|00001b40| 74 65 20 74 66 6d 69 6e | 64 65 78 5b 4d 41 58 50 |te tfmin|dex[MAXP|
|00001b50| 4b 43 48 41 52 5d 20 3b | 0a 58 62 79 74 65 20 68 |KCHAR] ;|.Xbyte h|
|00001b60| 67 74 69 6e 64 65 78 5b | 4d 41 58 50 4b 43 48 41 |gtindex[|MAXPKCHA|
|00001b70| 52 5d 20 3b 0a 58 62 79 | 74 65 20 64 65 70 69 6e |R] ;.Xby|te depin|
|00001b80| 64 65 78 5b 4d 41 58 50 | 4b 43 48 41 52 5d 20 3b |dex[MAXP|KCHAR] ;|
|00001b90| 0a 58 62 79 74 65 20 69 | 74 61 6c 69 6e 64 65 78 |.Xbyte i|talindex|
|00001ba0| 5b 4d 41 58 50 4b 43 48 | 41 52 5d 20 3b 0a 58 62 |[MAXPKCH|AR] ;.Xb|
|00001bb0| 79 74 65 20 63 68 61 72 | 66 6c 61 67 73 5b 4d 41 |yte char|flags[MA|
|00001bc0| 58 50 4b 43 48 41 52 5d | 20 3b 0a 58 0a 58 62 69 |XPKCHAR]| ;.X.Xbi|
|00001bd0| 74 20 2a 2a 62 69 74 6d | 61 70 20 3b 0a 58 69 6e |t **bitm|ap ;.Xin|
|00001be0| 74 65 67 65 72 20 73 6d | 61 6c 6c 65 73 74 63 68 |teger sm|allestch|
|00001bf0| 2c 20 6c 61 72 67 65 73 | 74 63 68 20 3b 0a 58 69 |, larges|tch ;.Xi|
|00001c00| 6e 74 65 67 65 72 20 65 | 6d 77 69 64 74 68 20 3b |nteger e|mwidth ;|
|00001c10| 0a 58 69 6e 74 65 67 65 | 72 20 63 68 65 63 6b 73 |.Xintege|r checks|
|00001c20| 75 6d 20 3b 0a 58 63 68 | 61 72 20 2a 63 6f 64 69 |um ;.Xch|ar *codi|
|00001c30| 6e 67 73 63 68 65 6d 65 | 20 3d 20 22 47 52 41 50 |ngscheme| = "GRAP|
|00001c40| 48 49 43 22 20 3b 0a 58 | 63 68 61 72 20 2a 66 61 |HIC" ;.X|char *fa|
|00001c50| 6d 69 6c 79 6e 61 6d 65 | 20 3d 20 22 50 42 4d 22 |milyname| = "PBM"|
|00001c60| 20 3b 0a 58 0a 58 69 6e | 74 65 67 65 72 20 77 69 | ;.X.Xin|teger wi|
|00001c70| 64 74 68 74 61 62 5b 4d | 41 58 57 49 44 54 48 54 |dthtab[M|AXWIDTHT|
|00001c80| 41 42 5d 20 3b 20 2f 2a | 20 54 46 4d 20 77 69 64 |AB] ; /*| TFM wid|
|00001c90| 74 68 73 20 2a 2f 0a 58 | 69 6e 74 65 67 65 72 20 |ths */.X|integer |
|00001ca0| 6e 75 6d 77 69 64 74 68 | 20 3b 20 20 20 20 20 20 |numwidth| ; |
|00001cb0| 2f 2a 20 6e 75 6d 62 65 | 72 20 6f 66 20 65 6e 74 |/* numbe|r of ent|
|00001cc0| 72 69 65 73 20 69 6e 20 | 77 69 64 74 68 20 74 61 |ries in |width ta|
|00001cd0| 62 6c 65 20 2a 2f 0a 58 | 69 6e 74 65 67 65 72 20 |ble */.X|integer |
|00001ce0| 68 65 69 67 68 74 74 61 | 62 5b 4d 41 58 48 45 49 |heightta|b[MAXHEI|
|00001cf0| 47 48 54 54 41 42 5d 20 | 3b 0a 58 69 6e 74 65 67 |GHTTAB] |;.Xinteg|
|00001d00| 65 72 20 6e 75 6d 68 65 | 69 67 68 74 20 3b 0a 58 |er numhe|ight ;.X|
|00001d10| 69 6e 74 65 67 65 72 20 | 64 65 70 74 68 74 61 62 |integer |depthtab|
|00001d20| 5b 4d 41 58 44 45 50 54 | 48 54 41 42 5d 20 3b 0a |[MAXDEPT|HTAB] ;.|
|00001d30| 58 69 6e 74 65 67 65 72 | 20 6e 75 6d 64 65 70 74 |Xinteger| numdept|
|00001d40| 68 20 3b 0a 58 69 6e 74 | 65 67 65 72 20 69 74 61 |h ;.Xint|eger ita|
|00001d50| 6c 69 63 74 61 62 5b 4d | 41 58 49 54 41 4c 49 43 |lictab[M|AXITALIC|
|00001d60| 54 41 42 5d 20 3b 0a 58 | 69 6e 74 65 67 65 72 20 |TAB] ;.X|integer |
|00001d70| 6e 75 6d 69 74 61 6c 69 | 63 20 3b 0a 58 69 6e 74 |numitali|c ;.Xint|
|00001d80| 65 67 65 72 20 70 61 72 | 61 6d 65 74 65 72 73 5b |eger par|ameters[|
|00001d90| 4d 41 58 50 41 52 41 4d | 53 5d 20 3b 0a 58 69 6e |MAXPARAM|S] ;.Xin|
|00001da0| 74 65 67 65 72 20 6e 75 | 6d 70 61 72 61 6d 20 3b |teger nu|mparam ;|
|00001db0| 0a 58 0a 58 41 53 43 49 | 49 63 6f 64 65 20 78 6f |.X.XASCI|Icode xo|
|00001dc0| 72 64 5b 31 32 38 5d 20 | 3b 0a 58 63 68 61 72 20 |rd[128] |;.Xchar |
|00001dd0| 78 63 68 72 5b 32 35 36 | 5d 20 3b 0a 58 62 79 74 |xchr[256|] ;.Xbyt|
|00001de0| 65 66 69 6c 65 20 74 66 | 6d 66 69 6c 65 2c 20 70 |efile tf|mfile, p|
|00001df0| 6b 66 69 6c 65 20 3b 0a | 58 63 68 61 72 20 74 66 |kfile ;.|Xchar tf|
|00001e00| 6d 6e 61 6d 65 5b 4e 41 | 4d 45 4c 45 4e 47 54 48 |mname[NA|MELENGTH|
|00001e10| 2b 31 5d 2c 20 70 6b 6e | 61 6d 65 5b 4e 41 4d 45 |+1], pkn|ame[NAME|
|00001e20| 4c 45 4e 47 54 48 2b 31 | 5d 20 3b 0a 58 69 6e 74 |LENGTH+1|] ;.Xint|
|00001e30| 65 67 65 72 20 70 6b 6c | 6f 63 20 3b 0a 58 69 6e |eger pkl|oc ;.Xin|
|00001e40| 74 65 67 65 72 20 62 69 | 74 77 65 69 67 68 74 20 |teger bi|tweight |
|00001e50| 3b 0a 58 69 6e 74 65 67 | 65 72 20 6f 75 74 70 75 |;.Xinteg|er outpu|
|00001e60| 74 62 79 74 65 20 3b 0a | 58 69 6e 74 65 67 65 72 |tbyte ;.|Xinteger|
|00001e70| 20 63 61 72 20 3b 0a 58 | 69 6e 74 65 67 65 72 20 | car ;.X|integer |
|00001e80| 68 70 70 70 20 3b 0a 58 | 69 6e 74 65 67 65 72 20 |hppp ;.X|integer |
|00001e90| 77 69 64 74 68 20 3b 0a | 58 69 6e 74 65 67 65 72 |width ;.|Xinteger|
|00001ea0| 20 68 65 69 67 68 74 20 | 3b 0a 58 69 6e 74 65 67 | height |;.Xinteg|
|00001eb0| 65 72 20 70 6f 77 65 72 | 5b 33 32 5d 20 3b 0a 58 |er power|[32] ;.X|
|00001ec0| 0a 58 69 6e 74 65 67 65 | 72 0a 58 63 6f 6d 70 75 |.Xintege|r.Xcompu|
|00001ed0| 74 65 5f 63 68 65 63 6b | 73 75 6d 28 29 0a 58 7b |te_check|sum().X{|
|00001ee0| 0a 58 20 20 2f 2a 0a 58 | 20 20 20 20 62 65 67 69 |.X /*.X| begi|
|00001ef0| 6e 0a 58 20 20 20 20 20 | 20 63 30 3a 3d 62 63 3b |n.X | c0:=bc;|
|00001f00| 20 63 31 3a 3d 65 63 3b | 20 63 32 3a 3d 62 63 3b | c1:=ec;| c2:=bc;|
|00001f10| 20 63 33 3a 3d 65 63 3b | 0a 58 20 20 20 20 20 20 | c3:=ec;|.X |
|00001f20| 66 6f 72 20 63 3a 3d 62 | 63 20 74 6f 20 65 63 20 |for c:=b|c to ec |
|00001f30| 64 6f 20 69 66 20 63 68 | 61 72 5f 77 64 5b 63 5d |do if ch|ar_wd[c]|
|00001f40| 3e 30 20 74 68 65 6e 0a | 58 09 62 65 67 69 6e 0a |>0 then.|X.begin.|
|00001f50| 58 09 20 20 74 65 6d 70 | 5f 77 69 64 74 68 3a 3d |X. temp|_width:=|
|00001f60| 6d 65 6d 6f 72 79 5b 63 | 68 61 72 5f 77 64 5b 63 |memory[c|har_wd[c|
|00001f70| 5d 5d 3b 0a 58 09 20 20 | 69 66 20 64 65 73 69 67 |]];.X. |if desig|
|00001f80| 6e 5f 75 6e 69 74 73 3c | 3e 75 6e 69 74 79 20 74 |n_units<|>unity t|
|00001f90| 68 65 6e 0a 58 09 20 20 | 20 20 74 65 6d 70 5f 77 |hen.X. | temp_w|
|00001fa0| 69 64 74 68 3a 3d 72 6f | 75 6e 64 28 28 74 65 6d |idth:=ro|und((tem|
|00001fb0| 70 5f 77 69 64 74 68 2f | 64 65 73 69 67 6e 5f 75 |p_width/|design_u|
|00001fc0| 6e 69 74 73 29 2a 31 30 | 34 38 35 37 36 2e 30 29 |nits)*10|48576.0)|
|00001fd0| 3b 0a 58 09 20 20 74 65 | 6d 70 5f 77 69 64 74 68 |;.X. te|mp_width|
|00001fe0| 3a 3d 74 65 6d 70 5f 77 | 69 64 74 68 20 2b 20 28 |:=temp_w|idth + (|
|00001ff0| 63 2b 34 29 2a 40 27 32 | 30 30 30 30 30 30 30 3b |c+4)*@'2|0000000;|
|00002000| 20 7b 74 68 69 73 20 73 | 68 6f 75 6c 64 20 62 65 | {this s|hould be|
|00002010| 20 70 6f 73 69 74 69 76 | 65 7d 0a 58 09 20 20 63 | positiv|e}.X. c|
|00002020| 30 3a 3d 28 63 30 2b 63 | 30 2b 74 65 6d 70 5f 77 |0:=(c0+c|0+temp_w|
|00002030| 69 64 74 68 29 20 6d 6f | 64 20 32 35 35 3b 0a 58 |idth) mo|d 255;.X|
|00002040| 09 20 20 63 31 3a 3d 28 | 63 31 2b 63 31 2b 74 65 |. c1:=(|c1+c1+te|
|00002050| 6d 70 5f 77 69 64 74 68 | 29 20 6d 6f 64 20 32 35 |mp_width|) mod 25|
|00002060| 33 3b 0a 58 09 20 20 63 | 32 3a 3d 28 63 32 2b 63 |3;.X. c|2:=(c2+c|
|00002070| 32 2b 74 65 6d 70 5f 77 | 69 64 74 68 29 20 6d 6f |2+temp_w|idth) mo|
|00002080| 64 20 32 35 31 3b 0a 58 | 09 20 20 63 33 3a 3d 28 |d 251;.X|. c3:=(|
|00002090| 63 33 2b 63 33 2b 74 65 | 6d 70 5f 77 69 64 74 68 |c3+c3+te|mp_width|
|000020a0| 29 20 6d 6f 64 20 32 34 | 37 3b 0a 58 09 65 6e 64 |) mod 24|7;.X.end|
|000020b0| 3b 0a 58 20 20 20 20 20 | 20 68 65 61 64 65 72 5f |;.X | header_|
|000020c0| 62 79 74 65 73 5b 63 68 | 65 63 6b 5f 73 75 6d 5f |bytes[ch|eck_sum_|
|000020d0| 6c 6f 63 5d 3a 3d 63 30 | 3b 0a 58 20 20 20 20 20 |loc]:=c0|;.X |
|000020e0| 20 68 65 61 64 65 72 5f | 62 79 74 65 73 5b 63 68 | header_|bytes[ch|
|000020f0| 65 63 6b 5f 73 75 6d 5f | 6c 6f 63 2b 31 5d 3a 3d |eck_sum_|loc+1]:=|
|00002100| 63 31 3b 0a 58 20 20 20 | 20 20 20 68 65 61 64 65 |c1;.X | heade|
|00002110| 72 5f 62 79 74 65 73 5b | 63 68 65 63 6b 5f 73 75 |r_bytes[|check_su|
|00002120| 6d 5f 6c 6f 63 2b 32 5d | 3a 3d 63 32 3b 0a 58 20 |m_loc+2]|:=c2;.X |
|00002130| 20 20 20 20 20 68 65 61 | 64 65 72 5f 62 79 74 65 | hea|der_byte|
|00002140| 73 5b 63 68 65 63 6b 5f | 73 75 6d 5f 6c 6f 63 2b |s[check_|sum_loc+|
|00002150| 33 5d 3a 3d 63 33 3b 0a | 58 20 20 20 20 65 6e 64 |3]:=c3;.|X end|
|00002160| 0a 58 20 20 20 20 2a 2f | 0a 58 7d 0a 58 0a 58 23 |.X */|.X}.X.X#|
|00002170| 64 65 66 69 6e 65 20 61 | 64 64 5f 74 66 6d 77 69 |define a|dd_tfmwi|
|00002180| 64 74 68 28 76 29 20 28 | 61 64 64 5f 74 66 6d 74 |dth(v) (|add_tfmt|
|00002190| 61 62 6c 65 28 77 69 64 | 74 68 74 61 62 2c 20 26 |able(wid|thtab, &|
|000021a0| 6e 75 6d 77 69 64 74 68 | 2c 20 76 2c 20 4d 41 58 |numwidth|, v, MAX|
|000021b0| 57 49 44 54 48 54 41 42 | 2c 5c 0a 58 09 09 09 09 |WIDTHTAB|,\.X....|
|000021c0| 20 20 20 20 20 20 22 54 | 46 4d 20 77 69 64 74 68 | "T|FM width|
|000021d0| 22 29 29 0a 58 23 64 65 | 66 69 6e 65 20 61 64 64 |")).X#de|fine add|
|000021e0| 5f 74 66 6d 68 65 69 67 | 68 74 28 76 29 20 28 61 |_tfmheig|ht(v) (a|
|000021f0| 64 64 5f 74 66 6d 74 61 | 62 6c 65 28 68 65 69 67 |dd_tfmta|ble(heig|
|00002200| 68 74 74 61 62 2c 20 26 | 6e 75 6d 68 65 69 67 68 |httab, &|numheigh|
|00002210| 74 2c 20 76 2c 20 4d 41 | 58 48 45 49 47 48 54 54 |t, v, MA|XHEIGHTT|
|00002220| 41 42 2c 5c 0a 58 09 09 | 09 09 20 20 20 20 20 20 |AB,\.X..|.. |
|00002230| 20 22 54 46 4d 20 68 65 | 69 67 68 74 22 29 29 0a | "TFM he|ight")).|
|00002240| 58 23 64 65 66 69 6e 65 | 20 61 64 64 5f 74 66 6d |X#define| add_tfm|
|00002250| 64 65 70 74 68 28 76 29 | 20 28 61 64 64 5f 74 66 |depth(v)| (add_tf|
|00002260| 6d 74 61 62 6c 65 28 64 | 65 70 74 68 74 61 62 2c |mtable(d|epthtab,|
|00002270| 20 26 6e 75 6d 64 65 70 | 74 68 2c 20 76 2c 20 4d | &numdep|th, v, M|
|00002280| 41 58 44 45 50 54 48 54 | 41 42 2c 5c 0a 58 09 09 |AXDEPTHT|AB,\.X..|
|00002290| 09 09 20 20 20 20 20 20 | 22 54 46 4d 20 64 65 70 |.. |"TFM dep|
|000022a0| 74 68 22 29 29 0a 58 23 | 64 65 66 69 6e 65 20 61 |th")).X#|define a|
|000022b0| 64 64 5f 74 66 6d 69 74 | 61 6c 69 63 28 76 29 20 |dd_tfmit|alic(v) |
|000022c0| 28 61 64 64 5f 74 66 6d | 74 61 62 6c 65 28 69 74 |(add_tfm|table(it|
|000022d0| 61 6c 69 63 74 61 62 2c | 20 26 6e 75 6d 69 74 61 |alictab,| &numita|
|000022e0| 6c 69 63 2c 20 76 2c 20 | 4d 41 58 49 54 41 4c 49 |lic, v, |MAXITALI|
|000022f0| 43 54 41 42 2c 5c 0a 58 | 09 09 09 09 20 20 20 20 |CTAB,\.X|.... |
|00002300| 20 20 20 22 49 74 61 6c | 69 63 20 63 6f 72 72 65 | "Ital|ic corre|
|00002310| 63 74 69 6f 6e 22 29 29 | 0a 58 62 79 74 65 0a 58 |ction"))|.Xbyte.X|
|00002320| 61 64 64 5f 74 66 6d 74 | 61 62 6c 65 28 74 61 62 |add_tfmt|able(tab|
|00002330| 6c 65 2c 20 63 6f 75 6e | 74 2c 20 76 61 6c 75 65 |le, coun|t, value|
|00002340| 2c 20 6d 61 78 2c 20 6e | 61 6d 65 29 0a 58 20 20 |, max, n|ame).X |
|00002350| 20 20 20 69 6e 74 65 67 | 65 72 20 2a 74 61 62 6c | integ|er *tabl|
|00002360| 65 2c 20 2a 63 6f 75 6e | 74 2c 20 76 61 6c 75 65 |e, *coun|t, value|
|00002370| 2c 20 6d 61 78 3b 0a 58 | 20 20 20 20 20 63 68 61 |, max;.X| cha|
|00002380| 72 20 2a 6e 61 6d 65 3b | 0a 58 7b 0a 58 20 20 69 |r *name;|.X{.X i|
|00002390| 6e 74 65 67 65 72 20 69 | 3b 0a 58 20 20 66 6f 72 |nteger i|;.X for|
|000023a0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 2a 63 6f | (i = 0;| i < *co|
|000023b0| 75 6e 74 3b 20 69 2b 2b | 29 20 2f 2a 20 73 65 61 |unt; i++|) /* sea|
|000023c0| 72 63 68 20 66 6f 72 20 | 76 61 6c 75 65 20 69 6e |rch for |value in|
|000023d0| 20 74 66 6d 20 74 61 62 | 6c 65 20 2a 2f 0a 58 20 | tfm tab|le */.X |
|000023e0| 20 20 20 69 66 20 28 74 | 61 62 6c 65 5b 69 5d 20 | if (t|able[i] |
|000023f0| 3d 3d 20 76 61 6c 75 65 | 29 20 72 65 74 75 72 6e |== value|) return|
|00002400| 20 28 62 79 74 65 29 69 | 3b 0a 58 20 20 69 66 20 | (byte)i|;.X if |
|00002410| 28 2a 63 6f 75 6e 74 20 | 3e 3d 20 6d 61 78 29 20 |(*count |>= max) |
|00002420| 7b 0a 58 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 |{.X f|printf(s|
|00002430| 74 64 65 72 72 2c 20 22 | 54 6f 6f 20 6d 61 6e 79 |tderr, "|Too many|
|00002440| 20 76 61 6c 75 65 73 20 | 69 6e 20 25 73 20 74 61 | values |in %s ta|
|00002450| 62 6c 65 21 5c 6e 22 2c | 20 6e 61 6d 65 29 20 3b |ble!\n",| name) ;|
|00002460| 0a 58 20 20 20 20 6a 75 | 6d 70 6f 75 74 28 29 3b |.X ju|mpout();|
|00002470| 0a 58 20 20 7d 0a 58 20 | 20 69 66 20 28 21 66 69 |.X }.X | if (!fi|
|00002480| 78 72 61 6e 67 65 28 76 | 61 6c 75 65 29 29 20 7b |xrange(v|alue)) {|
|00002490| 0a 58 20 20 20 20 66 70 | 72 69 6e 74 66 28 73 74 |.X fp|rintf(st|
|000024a0| 64 65 72 72 2c 20 22 20 | 25 73 20 25 66 20 66 6f |derr, " |%s %f fo|
|000024b0| 72 20 63 68 61 72 20 25 | 64 20 6f 75 74 20 6f 66 |r char %|d out of|
|000024c0| 20 72 61 6e 67 65 21 5c | 6e 22 2c 0a 58 09 20 20 | range!\|n",.X. |
|000024d0| 20 20 6e 61 6d 65 2c 20 | 75 6e 66 69 78 77 6f 72 | name, |unfixwor|
|000024e0| 64 28 76 61 6c 75 65 29 | 2c 20 63 61 72 29 3b 0a |d(value)|, car);.|
|000024f0| 58 20 20 20 20 6a 75 6d | 70 6f 75 74 28 29 3b 0a |X jum|pout();.|
|00002500| 58 20 20 7d 0a 58 20 20 | 74 61 62 6c 65 5b 2a 63 |X }.X |table[*c|
|00002510| 6f 75 6e 74 5d 20 3d 20 | 76 61 6c 75 65 20 3b 0a |ount] = |value ;.|
|00002520| 58 20 20 72 65 74 75 72 | 6e 20 28 2a 63 6f 75 6e |X retur|n (*coun|
|00002530| 74 29 2b 2b 20 3b 0a 58 | 7d 0a 58 0a 58 61 64 64 |t)++ ;.X|}.X.Xadd|
|00002540| 5f 73 75 66 66 69 78 28 | 6e 61 6d 65 2c 20 73 75 |_suffix(|name, su|
|00002550| 66 66 69 78 29 0a 58 20 | 20 20 20 20 63 68 61 72 |ffix).X | char|
|00002560| 20 2a 6e 61 6d 65 2c 20 | 2a 73 75 66 66 69 78 20 | *name, |*suffix |
|00002570| 3b 0a 58 7b 0a 58 20 20 | 69 6e 74 20 68 61 76 65 |;.X{.X |int have|
|00002580| 65 78 74 20 3d 20 30 3b | 0a 58 20 20 69 66 20 28 |ext = 0;|.X if (|
|00002590| 6e 61 6d 65 20 26 26 20 | 73 74 72 63 6d 70 28 6e |name && |strcmp(n|
|000025a0| 61 6d 65 2c 20 22 2d 22 | 29 29 20 7b 0a 58 20 20 |ame, "-"|)) {.X |
|000025b0| 20 20 77 68 69 6c 65 20 | 28 2a 6e 61 6d 65 29 20 | while |(*name) |
|000025c0| 7b 0a 58 20 20 20 20 20 | 20 69 66 20 28 2a 6e 61 |{.X | if (*na|
|000025d0| 6d 65 20 3d 3d 20 27 2f | 27 29 20 68 61 76 65 65 |me == '/|') havee|
|000025e0| 78 74 20 3d 20 30 20 3b | 0a 58 20 20 20 20 20 20 |xt = 0 ;|.X |
|000025f0| 65 6c 73 65 20 69 66 20 | 28 2a 6e 61 6d 65 20 3d |else if |(*name =|
|00002600| 3d 20 27 2e 27 29 20 68 | 61 76 65 65 78 74 20 3d |= '.') h|aveext =|
|00002610| 20 31 20 3b 0a 58 20 20 | 20 20 20 20 6e 61 6d 65 | 1 ;.X | name|
|00002620| 2b 2b 20 3b 0a 58 20 20 | 20 20 7d 0a 58 20 20 20 |++ ;.X | }.X |
|00002630| 20 69 66 20 28 21 68 61 | 76 65 65 78 74 29 20 7b | if (!ha|veext) {|
|00002640| 0a 58 20 20 20 20 20 20 | 2a 6e 61 6d 65 2b 2b 20 |.X |*name++ |
|00002650| 3d 20 27 2e 27 3b 0a 58 | 20 20 20 20 20 20 73 74 |= '.';.X| st|
|00002660| 72 63 70 79 28 6e 61 6d | 65 2c 73 75 66 66 69 78 |rcpy(nam|e,suffix|
|00002670| 29 20 3b 0a 58 20 20 20 | 20 7d 0a 58 20 20 7d 0a |) ;.X | }.X }.|
|00002680| 58 7d 0a 58 0a 58 69 6e | 69 74 69 61 6c 69 7a 65 |X}.X.Xin|itialize|
|00002690| 28 29 0a 58 7b 0a 58 20 | 20 69 6e 74 65 67 65 72 |().X{.X | integer|
|000026a0| 20 69 20 3b 0a 58 20 20 | 66 70 72 69 6e 74 66 28 | i ;.X |fprintf(|
|000026b0| 73 74 64 65 72 72 2c 20 | 22 54 68 69 73 20 69 73 |stderr, |"This is|
|000026c0| 20 50 42 4d 74 6f 50 4b | 2c 20 43 20 56 65 72 73 | PBMtoPK|, C Vers|
|000026d0| 69 6f 6e 20 32 2e 33 5c | 6e 22 29 20 3b 0a 58 20 |ion 2.3\|n") ;.X |
|000026e0| 20 66 6f 72 20 28 69 20 | 3d 20 30 20 3b 20 69 20 | for (i |= 0 ; i |
|000026f0| 3c 3d 20 33 31 20 3b 20 | 69 20 2b 2b 29 20 78 63 |<= 31 ; |i ++) xc|
|00002700| 68 72 5b 69 5d 20 3d 20 | 27 3f 27 20 3b 0a 58 20 |hr[i] = |'?' ;.X |
|00002710| 20 78 63 68 72 5b 33 32 | 5d 20 3d 20 27 20 27 20 | xchr[32|] = ' ' |
|00002720| 3b 0a 58 20 20 78 63 68 | 72 5b 33 33 5d 20 3d 20 |;.X xch|r[33] = |
|00002730| 27 21 27 20 3b 0a 58 20 | 20 78 63 68 72 5b 33 34 |'!' ;.X | xchr[34|
|00002740| 5d 20 3d 20 27 22 27 20 | 3b 0a 58 20 20 78 63 68 |] = '"' |;.X xch|
|00002750| 72 5b 33 35 5d 20 3d 20 | 27 23 27 20 3b 0a 58 20 |r[35] = |'#' ;.X |
|00002760| 20 78 63 68 72 5b 33 36 | 5d 20 3d 20 27 24 27 20 | xchr[36|] = '$' |
|00002770| 3b 0a 58 20 20 78 63 68 | 72 5b 33 37 5d 20 3d 20 |;.X xch|r[37] = |
|00002780| 27 25 27 20 3b 0a 58 20 | 20 78 63 68 72 5b 33 38 |'%' ;.X | xchr[38|
|00002790| 5d 20 3d 20 27 26 27 20 | 3b 0a 58 20 20 78 63 68 |] = '&' |;.X xch|
|000027a0| 72 5b 33 39 5d 20 3d 20 | 27 5c 27 27 20 3b 0a 58 |r[39] = |'\'' ;.X|
|000027b0| 20 20 78 63 68 72 5b 34 | 30 5d 20 3d 20 27 28 27 | xchr[4|0] = '('|
|000027c0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 34 31 5d 20 3d | ;.X xc|hr[41] =|
|000027d0| 20 27 29 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 34 | ')' ;.X| xchr[4|
|000027e0| 32 5d 20 3d 20 27 2a 27 | 20 3b 0a 58 20 20 78 63 |2] = '*'| ;.X xc|
|000027f0| 68 72 5b 34 33 5d 20 3d | 20 27 2b 27 20 3b 0a 58 |hr[43] =| '+' ;.X|
|00002800| 20 20 78 63 68 72 5b 34 | 34 5d 20 3d 20 27 2c 27 | xchr[4|4] = ','|
|00002810| 20 3b 0a 58 20 20 78 63 | 68 72 5b 34 35 5d 20 3d | ;.X xc|hr[45] =|
|00002820| 20 27 2d 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 34 | '-' ;.X| xchr[4|
|00002830| 36 5d 20 3d 20 27 2e 27 | 20 3b 0a 58 20 20 78 63 |6] = '.'| ;.X xc|
|00002840| 68 72 5b 34 37 5d 20 3d | 20 27 2f 27 20 3b 0a 58 |hr[47] =| '/' ;.X|
|00002850| 20 20 78 63 68 72 5b 34 | 38 5d 20 3d 20 27 30 27 | xchr[4|8] = '0'|
|00002860| 20 3b 0a 58 20 20 78 63 | 68 72 5b 34 39 5d 20 3d | ;.X xc|hr[49] =|
|00002870| 20 27 31 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 35 | '1' ;.X| xchr[5|
|00002880| 30 5d 20 3d 20 27 32 27 | 20 3b 0a 58 20 20 78 63 |0] = '2'| ;.X xc|
|00002890| 68 72 5b 35 31 5d 20 3d | 20 27 33 27 20 3b 0a 58 |hr[51] =| '3' ;.X|
|000028a0| 20 20 78 63 68 72 5b 35 | 32 5d 20 3d 20 27 34 27 | xchr[5|2] = '4'|
|000028b0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 35 33 5d 20 3d | ;.X xc|hr[53] =|
|000028c0| 20 27 35 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 35 | '5' ;.X| xchr[5|
|000028d0| 34 5d 20 3d 20 27 36 27 | 20 3b 0a 58 20 20 78 63 |4] = '6'| ;.X xc|
|000028e0| 68 72 5b 35 35 5d 20 3d | 20 27 37 27 20 3b 0a 58 |hr[55] =| '7' ;.X|
|000028f0| 20 20 78 63 68 72 5b 35 | 36 5d 20 3d 20 27 38 27 | xchr[5|6] = '8'|
|00002900| 20 3b 0a 58 20 20 78 63 | 68 72 5b 35 37 5d 20 3d | ;.X xc|hr[57] =|
|00002910| 20 27 39 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 35 | '9' ;.X| xchr[5|
|00002920| 38 5d 20 3d 20 27 3a 27 | 20 3b 0a 58 20 20 78 63 |8] = ':'| ;.X xc|
|00002930| 68 72 5b 35 39 5d 20 3d | 20 27 3b 27 20 3b 0a 58 |hr[59] =| ';' ;.X|
|00002940| 20 20 78 63 68 72 5b 36 | 30 5d 20 3d 20 27 3c 27 | xchr[6|0] = '<'|
|00002950| 20 3b 0a 58 20 20 78 63 | 68 72 5b 36 31 5d 20 3d | ;.X xc|hr[61] =|
|00002960| 20 27 3d 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 36 | '=' ;.X| xchr[6|
|00002970| 32 5d 20 3d 20 27 3e 27 | 20 3b 0a 58 20 20 78 63 |2] = '>'| ;.X xc|
|00002980| 68 72 5b 36 33 5d 20 3d | 20 27 3f 27 20 3b 0a 58 |hr[63] =| '?' ;.X|
|00002990| 20 20 78 63 68 72 5b 36 | 34 5d 20 3d 20 27 40 27 | xchr[6|4] = '@'|
|000029a0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 36 35 5d 20 3d | ;.X xc|hr[65] =|
|000029b0| 20 27 41 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 36 | 'A' ;.X| xchr[6|
|000029c0| 36 5d 20 3d 20 27 42 27 | 20 3b 0a 58 20 20 78 63 |6] = 'B'| ;.X xc|
|000029d0| 68 72 5b 36 37 5d 20 3d | 20 27 43 27 20 3b 0a 58 |hr[67] =| 'C' ;.X|
|000029e0| 20 20 78 63 68 72 5b 36 | 38 5d 20 3d 20 27 44 27 | xchr[6|8] = 'D'|
|000029f0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 36 39 5d 20 3d | ;.X xc|hr[69] =|
|00002a00| 20 27 45 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 37 | 'E' ;.X| xchr[7|
|00002a10| 30 5d 20 3d 20 27 46 27 | 20 3b 0a 58 20 20 78 63 |0] = 'F'| ;.X xc|
|00002a20| 68 72 5b 37 31 5d 20 3d | 20 27 47 27 20 3b 0a 58 |hr[71] =| 'G' ;.X|
|00002a30| 20 20 78 63 68 72 5b 37 | 32 5d 20 3d 20 27 48 27 | xchr[7|2] = 'H'|
|00002a40| 20 3b 0a 58 20 20 78 63 | 68 72 5b 37 33 5d 20 3d | ;.X xc|hr[73] =|
|00002a50| 20 27 49 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 37 | 'I' ;.X| xchr[7|
|00002a60| 34 5d 20 3d 20 27 4a 27 | 20 3b 0a 58 20 20 78 63 |4] = 'J'| ;.X xc|
|00002a70| 68 72 5b 37 35 5d 20 3d | 20 27 4b 27 20 3b 0a 58 |hr[75] =| 'K' ;.X|
|00002a80| 20 20 78 63 68 72 5b 37 | 36 5d 20 3d 20 27 4c 27 | xchr[7|6] = 'L'|
|00002a90| 20 3b 0a 58 20 20 78 63 | 68 72 5b 37 37 5d 20 3d | ;.X xc|hr[77] =|
|00002aa0| 20 27 4d 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 37 | 'M' ;.X| xchr[7|
|00002ab0| 38 5d 20 3d 20 27 4e 27 | 20 3b 0a 58 20 20 78 63 |8] = 'N'| ;.X xc|
|00002ac0| 68 72 5b 37 39 5d 20 3d | 20 27 4f 27 20 3b 0a 58 |hr[79] =| 'O' ;.X|
|00002ad0| 20 20 78 63 68 72 5b 38 | 30 5d 20 3d 20 27 50 27 | xchr[8|0] = 'P'|
|00002ae0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 38 31 5d 20 3d | ;.X xc|hr[81] =|
|00002af0| 20 27 51 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 38 | 'Q' ;.X| xchr[8|
|00002b00| 32 5d 20 3d 20 27 52 27 | 20 3b 0a 58 20 20 78 63 |2] = 'R'| ;.X xc|
|00002b10| 68 72 5b 38 33 5d 20 3d | 20 27 53 27 20 3b 0a 58 |hr[83] =| 'S' ;.X|
|00002b20| 20 20 78 63 68 72 5b 38 | 34 5d 20 3d 20 27 54 27 | xchr[8|4] = 'T'|
|00002b30| 20 3b 0a 58 20 20 78 63 | 68 72 5b 38 35 5d 20 3d | ;.X xc|hr[85] =|
|00002b40| 20 27 55 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 38 | 'U' ;.X| xchr[8|
|00002b50| 36 5d 20 3d 20 27 56 27 | 20 3b 0a 58 20 20 78 63 |6] = 'V'| ;.X xc|
|00002b60| 68 72 5b 38 37 5d 20 3d | 20 27 57 27 20 3b 0a 58 |hr[87] =| 'W' ;.X|
|00002b70| 20 20 78 63 68 72 5b 38 | 38 5d 20 3d 20 27 58 27 | xchr[8|8] = 'X'|
|00002b80| 20 3b 0a 58 20 20 78 63 | 68 72 5b 38 39 5d 20 3d | ;.X xc|hr[89] =|
|00002b90| 20 27 59 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 39 | 'Y' ;.X| xchr[9|
|00002ba0| 30 5d 20 3d 20 27 5a 27 | 20 3b 0a 58 20 20 78 63 |0] = 'Z'| ;.X xc|
|00002bb0| 68 72 5b 39 31 5d 20 3d | 20 27 5b 27 20 3b 0a 58 |hr[91] =| '[' ;.X|
|00002bc0| 20 20 78 63 68 72 5b 39 | 32 5d 20 3d 20 27 5c 5c | xchr[9|2] = '\\|
|00002bd0| 27 20 3b 0a 58 20 20 78 | 63 68 72 5b 39 33 5d 20 |' ;.X x|chr[93] |
|00002be0| 3d 20 27 5d 27 20 3b 0a | 58 20 20 78 63 68 72 5b |= ']' ;.|X xchr[|
|00002bf0| 39 34 5d 20 3d 20 27 5e | 27 20 3b 0a 58 20 20 78 |94] = '^|' ;.X x|
|00002c00| 63 68 72 5b 39 35 5d 20 | 3d 20 27 5f 27 20 3b 0a |chr[95] |= '_' ;.|
|00002c10| 58 20 20 78 63 68 72 5b | 39 36 5d 20 3d 20 27 60 |X xchr[|96] = '`|
|00002c20| 27 20 3b 0a 58 20 20 78 | 63 68 72 5b 39 37 5d 20 |' ;.X x|chr[97] |
|00002c30| 3d 20 27 61 27 20 3b 0a | 58 20 20 78 63 68 72 5b |= 'a' ;.|X xchr[|
|00002c40| 39 38 5d 20 3d 20 27 62 | 27 20 3b 0a 58 20 20 78 |98] = 'b|' ;.X x|
|00002c50| 63 68 72 5b 39 39 5d 20 | 3d 20 27 63 27 20 3b 0a |chr[99] |= 'c' ;.|
|00002c60| 58 20 20 78 63 68 72 5b | 31 30 30 5d 20 3d 20 27 |X xchr[|100] = '|
|00002c70| 64 27 20 3b 0a 58 20 20 | 78 63 68 72 5b 31 30 31 |d' ;.X |xchr[101|
|00002c80| 5d 20 3d 20 27 65 27 20 | 3b 0a 58 20 20 78 63 68 |] = 'e' |;.X xch|
|00002c90| 72 5b 31 30 32 5d 20 3d | 20 27 66 27 20 3b 0a 58 |r[102] =| 'f' ;.X|
|00002ca0| 20 20 78 63 68 72 5b 31 | 30 33 5d 20 3d 20 27 67 | xchr[1|03] = 'g|
|00002cb0| 27 20 3b 0a 58 20 20 78 | 63 68 72 5b 31 30 34 5d |' ;.X x|chr[104]|
|00002cc0| 20 3d 20 27 68 27 20 3b | 0a 58 20 20 78 63 68 72 | = 'h' ;|.X xchr|
|00002cd0| 5b 31 30 35 5d 20 3d 20 | 27 69 27 20 3b 0a 58 20 |[105] = |'i' ;.X |
|00002ce0| 20 78 63 68 72 5b 31 30 | 36 5d 20 3d 20 27 6a 27 | xchr[10|6] = 'j'|
|00002cf0| 20 3b 0a 58 20 20 78 63 | 68 72 5b 31 30 37 5d 20 | ;.X xc|hr[107] |
|00002d00| 3d 20 27 6b 27 20 3b 0a | 58 20 20 78 63 68 72 5b |= 'k' ;.|X xchr[|
|00002d10| 31 30 38 5d 20 3d 20 27 | 6c 27 20 3b 0a 58 20 20 |108] = '|l' ;.X |
|00002d20| 78 63 68 72 5b 31 30 39 | 5d 20 3d 20 27 6d 27 20 |xchr[109|] = 'm' |
|00002d30| 3b 0a 58 20 20 78 63 68 | 72 5b 31 31 30 5d 20 3d |;.X xch|r[110] =|
|00002d40| 20 27 6e 27 20 3b 0a 58 | 20 20 78 63 68 72 5b 31 | 'n' ;.X| xchr[1|
|00002d50| 31 31 5d 20 3d 20 27 6f | 27 20 3b 0a 58 20 20 78 |11] = 'o|' ;.X x|
|00002d60| 63 68 72 5b 31 31 32 5d | 20 3d 20 27 70 27 20 3b |chr[112]| = 'p' ;|
|00002d70| 0a 58 20 20 78 63 68 72 | 5b 31 31 33 5d 20 3d 20 |.X xchr|[113] = |
|00002d80| 27 71 27 20 3b 0a 58 20 | 20 78 63 68 72 5b 31 31 |'q' ;.X | xchr[11|
|00002d90| 34 5d 20 3d 20 27 72 27 | 20 3b 0a 58 20 20 78 63 |4] = 'r'| ;.X xc|
|00002da0| 68 72 5b 31 31 35 5d 20 | 3d 20 27 73 27 20 3b 0a |hr[115] |= 's' ;.|
|00002db0| 58 20 20 78 63 68 72 5b | 31 31 36 5d 20 3d 20 27 |X xchr[|116] = '|
|00002dc0| 74 27 20 3b 0a 58 20 20 | 78 63 68 72 5b 31 31 37 |t' ;.X |xchr[117|
|00002dd0| 5d 20 3d 20 27 75 27 20 | 3b 0a 58 20 20 78 63 68 |] = 'u' |;.X xch|
|00002de0| 72 5b 31 31 38 5d 20 3d | 20 27 76 27 20 3b 0a 58 |r[118] =| 'v' ;.X|
|00002df0| 20 20 78 63 68 72 5b 31 | 31 39 5d 20 3d 20 27 77 | xchr[1|19] = 'w|
|00002e00| 27 20 3b 0a 58 20 20 78 | 63 68 72 5b 31 32 30 5d |' ;.X x|chr[120]|
|00002e10| 20 3d 20 27 78 27 20 3b | 0a 58 20 20 78 63 68 72 | = 'x' ;|.X xchr|
|00002e20| 5b 31 32 31 5d 20 3d 20 | 27 79 27 20 3b 0a 58 20 |[121] = |'y' ;.X |
|00002e30| 20 78 63 68 72 5b 31 32 | 32 5d 20 3d 20 27 7a 27 | xchr[12|2] = 'z'|
|00002e40| 20 3b 0a 58 20 20 78 63 | 68 72 5b 31 32 33 5d 20 | ;.X xc|hr[123] |
|00002e50| 3d 20 27 7b 27 20 3b 0a | 58 20 20 78 63 68 72 5b |= '{' ;.|X xchr[|
|00002e60| 31 32 34 5d 20 3d 20 27 | 7c 27 20 3b 0a 58 20 20 |124] = '||' ;.X |
|00002e70| 78 63 68 72 5b 31 32 35 | 5d 20 3d 20 27 7d 27 20 |xchr[125|] = '}' |
|00002e80| 3b 0a 58 20 20 78 63 68 | 72 5b 31 32 36 5d 20 3d |;.X xch|r[126] =|
|00002e90| 20 27 7e 27 20 3b 0a 58 | 20 20 66 6f 72 20 28 69 | '~' ;.X| for (i|
|00002ea0| 20 3d 20 31 32 37 20 3b | 20 69 20 3c 3d 20 32 35 | = 127 ;| i <= 25|
|00002eb0| 35 20 3b 20 69 20 2b 2b | 29 20 78 63 68 72 5b 69 |5 ; i ++|) xchr[i|
|00002ec0| 5d 20 3d 20 27 3f 27 20 | 3b 0a 58 20 20 66 6f 72 |] = '?' |;.X for|
|00002ed0| 20 28 69 20 3d 20 30 20 | 3b 20 69 20 3c 3d 20 31 | (i = 0 |; i <= 1|
|00002ee0| 32 37 20 3b 20 69 20 2b | 2b 29 20 78 6f 72 64 5b |27 ; i +|+) xord[|
|00002ef0| 63 68 72 28 69 29 5d 20 | 3d 20 33 32 20 3b 0a 58 |chr(i)] |= 32 ;.X|
|00002f00| 20 20 66 6f 72 20 28 69 | 20 3d 20 33 32 20 3b 20 | for (i| = 32 ; |
|00002f10| 69 20 3c 3d 20 31 32 36 | 20 3b 20 69 20 2b 2b 29 |i <= 126| ; i ++)|
|00002f20| 20 78 6f 72 64 5b 78 63 | 68 72 5b 69 5d 5d 20 3d | xord[xc|hr[i]] =|
|00002f30| 20 69 20 3b 0a 58 20 20 | 66 6f 72 20 28 69 20 3d | i ;.X |for (i =|
|00002f40| 20 30 20 3b 20 69 20 3c | 20 33 32 20 3b 20 69 2b | 0 ; i <| 32 ; i+|
|00002f50| 2b 29 20 70 6f 77 65 72 | 5b 69 5d 20 3d 20 31 20 |+) power|[i] = 1 |
|00002f60| 3c 3c 20 69 20 3b 0a 58 | 20 20 66 6f 72 20 28 69 |<< i ;.X| for (i|
|00002f70| 20 3d 20 30 3b 20 69 20 | 3c 20 4d 41 58 50 4b 43 | = 0; i |< MAXPKC|
|00002f80| 48 41 52 3b 20 69 2b 2b | 29 20 7b 0a 58 20 20 20 |HAR; i++|) {.X |
|00002f90| 20 66 69 6c 65 6e 61 6d | 65 5b 69 5d 20 3d 20 4e | filenam|e[i] = N|
|00002fa0| 55 4c 4c 3b 0a 58 20 20 | 20 20 63 68 61 72 66 6c |ULL;.X | charfl|
|00002fb0| 61 67 73 5b 69 5d 20 3d | 20 30 3b 0a 58 20 20 7d |ags[i] =| 0;.X }|
|00002fc0| 0a 58 20 20 70 6b 6c 6f | 63 20 3d 20 30 20 3b 0a |.X pklo|c = 0 ;.|
|00002fd0| 58 20 20 64 65 73 69 67 | 6e 73 69 7a 65 20 3d 20 |X desig|nsize = |
|00002fe0| 66 69 78 77 6f 72 64 28 | 31 2e 30 29 20 3b 0a 58 |fixword(|1.0) ;.X|
|00002ff0| 20 20 6e 75 6d 70 61 72 | 61 6d 20 3d 20 30 3b 0a | numpar|am = 0;.|
|00003000| 58 20 20 77 69 64 74 68 | 74 61 62 5b 30 5d 20 3d |X width|tab[0] =|
|00003010| 20 68 65 69 67 68 74 74 | 61 62 5b 30 5d 20 3d 20 | heightt|ab[0] = |
|00003020| 64 65 70 74 68 74 61 62 | 5b 30 5d 20 3d 20 69 74 |depthtab|[0] = it|
|00003030| 61 6c 69 63 74 61 62 5b | 30 5d 20 3d 20 30 20 3b |alictab[|0] = 0 ;|
|00003040| 0a 58 20 20 6e 75 6d 77 | 69 64 74 68 20 3d 20 6e |.X numw|idth = n|
|00003050| 75 6d 68 65 69 67 68 74 | 20 3d 20 6e 75 6d 64 65 |umheight| = numde|
|00003060| 70 74 68 20 3d 20 6e 75 | 6d 69 74 61 6c 69 63 20 |pth = nu|mitalic |
|00003070| 3d 20 31 3b 0a 58 20 20 | 73 6d 61 6c 6c 65 73 74 |= 1;.X |smallest|
|00003080| 63 68 20 3d 20 4d 41 58 | 50 4b 43 48 41 52 20 3b |ch = MAX|PKCHAR ;|
|00003090| 0a 58 20 20 6c 61 72 67 | 65 73 74 63 68 20 3d 20 |.X larg|estch = |
|000030a0| 2d 31 20 3b 0a 58 20 20 | 65 6d 77 69 64 74 68 20 |-1 ;.X |emwidth |
|000030b0| 3d 20 30 20 3b 0a 58 7d | 0a 58 0a 58 6a 75 6d 70 |= 0 ;.X}|.X.Xjump|
|000030c0| 6f 75 74 28 29 0a 58 7b | 0a 58 20 20 65 78 69 74 |out().X{|.X exit|
|000030d0| 28 31 29 20 3b 0a 58 7d | 0a 58 0a 58 70 6b 62 79 |(1) ;.X}|.X.Xpkby|
|000030e0| 74 65 28 62 29 0a 58 20 | 20 20 20 20 69 6e 74 65 |te(b).X | inte|
|000030f0| 67 65 72 20 62 20 3b 0a | 58 7b 0a 58 20 20 69 66 |ger b ;.|X{.X if|
|00003100| 20 28 62 20 3c 20 30 29 | 20 62 20 3d 20 62 20 2b | (b < 0)| b = b +|
|00003110| 20 32 35 36 20 3b 0a 58 | 20 20 70 75 74 63 28 62 | 256 ;.X| putc(b|
|00003120| 2c 20 70 6b 66 69 6c 65 | 29 20 3b 0a 58 20 20 70 |, pkfile|) ;.X p|
|00003130| 6b 6c 6f 63 2b 2b 20 3b | 0a 58 7d 0a 58 0a 58 70 |kloc++ ;|.X}.X.Xp|
|00003140| 6b 68 61 6c 66 77 6f 72 | 64 28 61 29 0a 58 20 20 |khalfwor|d(a).X |
|00003150| 20 20 20 69 6e 74 65 67 | 65 72 20 61 20 3b 0a 58 | integ|er a ;.X|
|00003160| 7b 0a 58 20 20 69 66 20 | 28 61 20 3c 20 30 29 20 |{.X if |(a < 0) |
|00003170| 61 20 3d 20 61 20 2b 20 | 36 35 35 33 36 20 3b 0a |a = a + |65536 ;.|
|00003180| 58 20 20 70 6b 62 79 74 | 65 28 61 20 3e 3e 20 38 |X pkbyt|e(a >> 8|
|00003190| 29 20 3b 0a 58 20 20 70 | 6b 62 79 74 65 28 61 20 |) ;.X p|kbyte(a |
|000031a0| 26 20 32 35 35 29 20 3b | 0a 58 7d 0a 58 0a 58 70 |& 255) ;|.X}.X.Xp|
|000031b0| 6b 74 68 72 65 65 62 79 | 74 65 73 28 61 29 0a 58 |kthreeby|tes(a).X|
|000031c0| 20 20 20 20 20 69 6e 74 | 65 67 65 72 20 61 20 3b | int|eger a ;|
|000031d0| 0a 58 7b 0a 58 20 20 70 | 6b 62 79 74 65 28 28 61 |.X{.X p|kbyte((a|
|000031e0| 3e 3e 31 36 29 20 26 20 | 32 35 35 29 20 3b 0a 58 |>>16) & |255) ;.X|
|000031f0| 20 20 70 6b 62 79 74 65 | 28 28 61 3e 3e 38 29 20 | pkbyte|((a>>8) |
|00003200| 26 20 32 35 35 29 20 3b | 0a 58 20 20 70 6b 62 79 |& 255) ;|.X pkby|
|00003210| 74 65 28 61 20 26 20 32 | 35 35 29 20 3b 0a 58 7d |te(a & 2|55) ;.X}|
|00003220| 0a 58 0a 58 70 6b 77 6f | 72 64 28 61 29 0a 58 20 |.X.Xpkwo|rd(a).X |
|00003230| 20 20 20 20 69 6e 74 65 | 67 65 72 20 61 20 3b 0a | inte|ger a ;.|
|00003240| 58 7b 0a 58 20 20 70 6b | 62 79 74 65 28 28 61 3e |X{.X pk|byte((a>|
|00003250| 3e 32 34 29 20 26 20 32 | 35 35 29 20 3b 0a 58 20 |>24) & 2|55) ;.X |
|00003260| 20 70 6b 62 79 74 65 28 | 28 61 3e 3e 31 36 29 20 | pkbyte(|(a>>16) |
|00003270| 26 20 32 35 35 29 20 3b | 0a 58 20 20 70 6b 62 79 |& 255) ;|.X pkby|
|00003280| 74 65 28 28 61 3e 3e 38 | 29 20 26 20 32 35 35 29 |te((a>>8|) & 255)|
|00003290| 20 3b 0a 58 20 20 70 6b | 62 79 74 65 28 61 20 26 | ;.X pk|byte(a &|
|000032a0| 20 32 35 35 29 20 3b 0a | 58 7d 0a 58 0a 58 70 6b | 255) ;.|X}.X.Xpk|
|000032b0| 6e 79 62 28 61 29 0a 58 | 20 20 20 20 20 69 6e 74 |nyb(a).X| int|
|000032c0| 65 67 65 72 20 61 20 3b | 0a 58 7b 0a 58 20 20 69 |eger a ;|.X{.X i|
|000032d0| 66 20 28 62 69 74 77 65 | 69 67 68 74 20 3d 3d 20 |f (bitwe|ight == |
|000032e0| 31 36 29 20 7b 0a 58 20 | 20 20 20 6f 75 74 70 75 |16) {.X | outpu|
|000032f0| 74 62 79 74 65 20 3d 20 | 28 61 3c 3c 34 29 20 3b |tbyte = |(a<<4) ;|
|00003300| 0a 58 20 20 20 20 62 69 | 74 77 65 69 67 68 74 20 |.X bi|tweight |
|00003310| 3d 20 31 20 3b 0a 58 20 | 20 7d 20 65 6c 73 65 20 |= 1 ;.X | } else |
|00003320| 7b 0a 58 20 20 20 20 70 | 6b 62 79 74 65 28 6f 75 |{.X p|kbyte(ou|
|00003330| 74 70 75 74 62 79 74 65 | 20 2b 20 61 29 20 3b 0a |tputbyte| + a) ;.|
|00003340| 58 20 20 20 20 62 69 74 | 77 65 69 67 68 74 20 3d |X bit|weight =|
|00003350| 20 31 36 20 3b 0a 58 20 | 20 7d 0a 58 7d 0a 58 0a | 16 ;.X | }.X}.X.|
|00003360| 58 77 72 69 74 65 70 72 | 65 61 6d 62 6c 65 28 29 |Xwritepr|eamble()|
|00003370| 0a 58 7b 0a 58 20 20 69 | 6e 74 65 67 65 72 20 69 |.X{.X i|nteger i|
|00003380| 20 3b 0a 58 20 20 63 68 | 61 72 20 2a 63 6f 6d 6d | ;.X ch|ar *comm|
|00003390| 65 6e 74 20 3d 20 22 50 | 42 4d 74 6f 50 4b 20 32 |ent = "P|BMtoPK 2|
|000033a0| 2e 33 20 6f 75 74 70 75 | 74 22 20 3b 0a 58 20 20 |.3 outpu|t" ;.X |
|000033b0| 0a 58 20 20 70 6b 62 79 | 74 65 28 32 34 37 29 20 |.X pkby|te(247) |
|000033c0| 3b 0a 58 20 20 70 6b 62 | 79 74 65 28 38 39 29 20 |;.X pkb|yte(89) |
|000033d0| 3b 0a 58 20 20 70 6b 62 | 79 74 65 28 73 74 72 6c |;.X pkb|yte(strl|
|000033e0| 65 6e 28 63 6f 6d 6d 65 | 6e 74 29 29 20 3b 0a 58 |en(comme|nt)) ;.X|
|000033f0| 20 20 66 6f 72 20 28 69 | 20 3d 20 30 20 3b 20 69 | for (i| = 0 ; i|
|00003400| 20 3c 20 73 74 72 6c 65 | 6e 28 63 6f 6d 6d 65 6e | < strle|n(commen|
|00003410| 74 29 3b 20 69 2b 2b 29 | 20 70 6b 62 79 74 65 28 |t); i++)| pkbyte(|
|00003420| 78 6f 72 64 5b 63 6f 6d | 6d 65 6e 74 5b 69 5d 5d |xord[com|ment[i]]|
|00003430| 29 20 3b 0a 58 20 20 70 | 6b 77 6f 72 64 28 64 65 |) ;.X p|kword(de|
|00003440| 73 69 67 6e 73 69 7a 65 | 29 20 3b 0a 58 20 20 70 |signsize|) ;.X p|
|00003450| 6b 77 6f 72 64 28 63 68 | 65 63 6b 73 75 6d 29 20 |kword(ch|ecksum) |
|00003460| 3b 20 2f 2a 20 63 68 65 | 63 6b 73 75 6d 3b 20 63 |; /* che|cksum; c|
|00003470| 61 6c 63 75 6c 61 74 65 | 20 69 66 20 70 6f 73 73 |alculate| if poss|
|00003480| 69 62 6c 65 20 2a 2f 0a | 58 20 20 70 6b 77 6f 72 |ible */.|X pkwor|
|00003490| 64 28 68 70 70 70 29 20 | 3b 0a 58 20 20 70 6b 77 |d(hppp) |;.X pkw|
|000034a0| 6f 72 64 28 68 70 70 70 | 29 20 3b 0a 58 7d 0a 58 |ord(hppp|) ;.X}.X|
|000034b0| 0a 58 77 72 69 74 65 70 | 6f 73 74 61 6d 62 6c 65 |.Xwritep|ostamble|
|000034c0| 28 29 0a 58 7b 0a 58 20 | 20 70 6b 62 79 74 65 28 |().X{.X | pkbyte(|
|000034d0| 32 34 35 29 20 3b 0a 58 | 20 20 77 68 69 6c 65 20 |245) ;.X| while |
|000034e0| 28 28 70 6b 6c 6f 63 20 | 25 20 34 20 21 3d 20 30 |((pkloc |% 4 != 0|
|000034f0| 29 29 20 70 6b 62 79 74 | 65 28 32 34 36 29 20 3b |)) pkbyt|e(246) ;|
|00003500| 0a 58 20 20 66 70 72 69 | 6e 74 66 28 73 74 64 65 |.X fpri|ntf(stde|
|00003510| 72 72 2c 20 22 25 64 20 | 62 79 74 65 73 20 77 72 |rr, "%d |bytes wr|
|00003520| 69 74 74 65 6e 20 74 6f | 20 70 61 63 6b 65 64 20 |itten to| packed |
|00003530| 66 69 6c 65 2e 5c 6e 22 | 2c 20 70 6b 6c 6f 63 29 |file.\n"|, pkloc)|
|00003540| 20 3b 0a 58 7d 0a 58 0a | 58 74 66 6d 62 79 74 65 | ;.X}.X.|Xtfmbyte|
|00003550| 28 62 29 0a 58 20 20 20 | 20 20 69 6e 74 65 67 65 |(b).X | intege|
|00003560| 72 20 62 20 3b 0a 58 7b | 0a 58 20 20 69 66 20 28 |r b ;.X{|.X if (|
|00003570| 62 20 3c 20 30 29 20 62 | 20 3d 20 62 20 2b 20 32 |b < 0) b| = b + 2|
|00003580| 35 36 20 3b 0a 58 20 20 | 70 75 74 63 28 62 2c 20 |56 ;.X |putc(b, |
|00003590| 74 66 6d 66 69 6c 65 29 | 20 3b 0a 58 7d 0a 58 0a |tfmfile)| ;.X}.X.|
|000035a0| 58 74 66 6d 68 61 6c 66 | 77 6f 72 64 28 61 29 0a |Xtfmhalf|word(a).|
|000035b0| 58 20 20 20 20 20 69 6e | 74 65 67 65 72 20 61 20 |X in|teger a |
|000035c0| 3b 0a 58 7b 0a 58 20 20 | 69 66 20 28 61 20 3c 20 |;.X{.X |if (a < |
|000035d0| 30 29 20 61 20 3d 20 61 | 20 2b 20 36 35 35 33 36 |0) a = a| + 65536|
|000035e0| 20 3b 0a 58 20 20 74 66 | 6d 62 79 74 65 28 61 20 | ;.X tf|mbyte(a |
|000035f0| 3e 3e 20 38 29 20 3b 0a | 58 20 20 74 66 6d 62 79 |>> 8) ;.|X tfmby|
|00003600| 74 65 28 61 20 26 20 32 | 35 35 29 20 3b 0a 58 7d |te(a & 2|55) ;.X}|
|00003610| 0a 58 0a 58 74 66 6d 77 | 6f 72 64 28 61 29 0a 58 |.X.Xtfmw|ord(a).X|
|00003620| 20 20 20 20 20 69 6e 74 | 65 67 65 72 20 61 20 3b | int|eger a ;|
|00003630| 0a 58 7b 0a 58 20 20 74 | 66 6d 62 79 74 65 28 28 |.X{.X t|fmbyte((|
|00003640| 61 3e 3e 32 34 29 20 26 | 20 32 35 35 29 20 3b 0a |a>>24) &| 255) ;.|
|00003650| 58 20 20 74 66 6d 62 79 | 74 65 28 28 61 3e 3e 31 |X tfmby|te((a>>1|
|00003660| 36 29 20 26 20 32 35 35 | 29 20 3b 0a 58 20 20 74 |6) & 255|) ;.X t|
|00003670| 66 6d 62 79 74 65 28 28 | 61 3e 3e 38 29 20 26 20 |fmbyte((|a>>8) & |
|00003680| 32 35 35 29 20 3b 0a 58 | 20 20 74 66 6d 62 79 74 |255) ;.X| tfmbyt|
|00003690| 65 28 61 20 26 20 32 35 | 35 29 20 3b 0a 58 7d 0a |e(a & 25|5) ;.X}.|
|000036a0| 58 0a 58 77 72 69 74 65 | 74 66 6d 66 69 6c 65 28 |X.Xwrite|tfmfile(|
|000036b0| 29 0a 58 7b 0a 58 20 20 | 69 6e 74 65 67 65 72 20 |).X{.X |integer |
|000036c0| 74 6f 74 61 6c 6c 65 6e | 67 74 68 20 3b 0a 58 20 |totallen|gth ;.X |
|000036d0| 20 69 6e 74 65 67 65 72 | 20 68 65 61 64 65 72 73 | integer| headers|
|000036e0| 69 7a 65 20 3d 20 31 37 | 3b 0a 58 20 20 69 6e 74 |ize = 17|;.X int|
|000036f0| 65 67 65 72 20 69 20 3b | 0a 58 0a 58 20 20 69 66 |eger i ;|.X.X if|
|00003700| 20 28 73 6d 61 6c 6c 65 | 73 74 63 68 20 3c 20 30 | (smalle|stch < 0|
|00003710| 20 7c 7c 20 6c 61 72 67 | 65 73 74 63 68 20 3e 3d | || larg|estch >=|
|00003720| 20 4d 41 58 50 4b 43 48 | 41 52 29 20 7b 0a 58 20 | MAXPKCH|AR) {.X |
|00003730| 20 20 20 66 70 72 69 6e | 74 66 28 73 74 64 65 72 | fprin|tf(stder|
|00003740| 72 2c 20 22 20 4e 6f 20 | 63 68 61 72 61 63 74 65 |r, " No |characte|
|00003750| 72 73 20 72 65 61 64 21 | 5c 6e 22 29 20 3b 0a 58 |rs read!|\n") ;.X|
|00003760| 20 20 20 20 6a 75 6d 70 | 6f 75 74 28 29 20 3b 0a | jump|out() ;.|
|00003770| 58 20 20 7d 0a 58 20 20 | 69 66 20 28 6e 75 6d 70 |X }.X |if (nump|
|00003780| 61 72 61 6d 20 3c 20 37 | 29 20 2f 2a 20 73 65 74 |aram < 7|) /* set|
|00003790| 20 64 65 66 61 75 6c 74 | 20 70 61 72 61 6d 65 74 | default| paramet|
|000037a0| 65 72 73 20 2a 2f 0a 58 | 20 20 20 20 73 77 69 74 |ers */.X| swit|
|000037b0| 63 68 20 28 6e 75 6d 70 | 61 72 61 6d 29 20 7b 0a |ch (nump|aram) {.|
|000037c0| 58 20 20 20 20 63 61 73 | 65 20 30 3a 20 2f 2a 20 |X cas|e 0: /* |
|000037d0| 73 6c 61 6e 74 20 2a 2f | 0a 58 20 20 20 20 20 20 |slant */|.X |
|000037e0| 70 61 72 61 6d 65 74 65 | 72 73 5b 6e 75 6d 70 61 |paramete|rs[numpa|
|000037f0| 72 61 6d 2b 2b 5d 20 3d | 20 30 20 3b 0a 58 20 20 |ram++] =| 0 ;.X |
|00003800| 20 20 63 61 73 65 20 31 | 3a 20 2f 2a 20 73 70 61 | case 1|: /* spa|
|00003810| 63 65 20 2a 2f 0a 58 20 | 20 20 20 20 20 70 61 72 |ce */.X | par|
|00003820| 61 6d 65 74 65 72 73 5b | 6e 75 6d 70 61 72 61 6d |ameters[|numparam|
|00003830| 2b 2b 5d 20 3d 20 66 69 | 78 77 6f 72 64 28 64 65 |++] = fi|xword(de|
|00003840| 73 69 67 6e 75 6e 69 74 | 73 28 65 6d 77 69 64 74 |signunit|s(emwidt|
|00003850| 68 2f 33 2e 30 29 29 3b | 0a 58 20 20 20 20 63 61 |h/3.0));|.X ca|
|00003860| 73 65 20 32 3a 20 2f 2a | 20 73 70 61 63 65 5f 73 |se 2: /*| space_s|
|00003870| 74 72 65 74 63 68 20 2a | 2f 0a 58 20 20 20 20 20 |tretch *|/.X |
|00003880| 20 70 61 72 61 6d 65 74 | 65 72 73 5b 6e 75 6d 70 | paramet|ers[nump|
|00003890| 61 72 61 6d 2b 2b 5d 20 | 3d 20 66 69 78 77 6f 72 |aram++] |= fixwor|
|000038a0| 64 28 75 6e 66 69 78 77 | 6f 72 64 28 70 61 72 61 |d(unfixw|ord(para|
|000038b0| 6d 65 74 65 72 73 5b 31 | 5d 29 2f 32 2e 30 29 20 |meters[1|])/2.0) |
|000038c0| 3b 0a 58 20 20 20 20 63 | 61 73 65 20 33 3a 20 2f |;.X c|ase 3: /|
|000038d0| 2a 20 73 70 61 63 65 5f | 73 68 72 69 6e 6b 20 2a |* space_|shrink *|
|000038e0| 2f 0a 58 20 20 20 20 20 | 20 70 61 72 61 6d 65 74 |/.X | paramet|
|000038f0| 65 72 73 5b 6e 75 6d 70 | 61 72 61 6d 2b 2b 5d 20 |ers[nump|aram++] |
|00003900| 3d 20 66 69 78 77 6f 72 | 64 28 75 6e 66 69 78 77 |= fixwor|d(unfixw|
|00003910| 6f 72 64 28 70 61 72 61 | 6d 65 74 65 72 73 5b 31 |ord(para|meters[1|
|00003920| 5d 29 2f 33 2e 30 29 20 | 3b 0a 58 20 20 20 20 63 |])/3.0) |;.X c|
|00003930| 61 73 65 20 34 3a 20 2f | 2a 20 78 5f 68 65 69 67 |ase 4: /|* x_heig|
|00003940| 68 74 20 2a 2f 0a 58 20 | 20 20 20 20 20 70 61 72 |ht */.X | par|
|00003950| 61 6d 65 74 65 72 73 5b | 6e 75 6d 70 61 72 61 6d |ameters[|numparam|
|00003960| 2b 2b 5d 20 3d 20 66 69 | 78 77 6f 72 64 28 30 2e |++] = fi|xword(0.|
|00003970| 34 35 29 3b 0a 58 20 20 | 20 20 63 61 73 65 20 35 |45);.X | case 5|
|00003980| 3a 20 2f 2a 20 71 75 61 | 64 20 2a 2f 0a 58 20 20 |: /* qua|d */.X |
|00003990| 20 20 20 20 70 61 72 61 | 6d 65 74 65 72 73 5b 6e | para|meters[n|
|000039a0| 75 6d 70 61 72 61 6d 2b | 2b 5d 20 3d 20 66 69 78 |umparam+|+] = fix|
|000039b0| 77 6f 72 64 28 64 65 73 | 69 67 6e 75 6e 69 74 73 |word(des|ignunits|
|000039c0| 28 65 6d 77 69 64 74 68 | 29 29 20 3b 0a 58 20 20 |(emwidth|)) ;.X |
|000039d0| 20 20 63 61 73 65 20 36 | 3a 20 2f 2a 20 65 78 74 | case 6|: /* ext|
|000039e0| 72 61 5f 73 70 61 63 65 | 20 2a 2f 0a 58 20 20 20 |ra_space| */.X |
|000039f0| 20 20 20 70 61 72 61 6d | 65 74 65 72 73 5b 6e 75 | param|eters[nu|
|00003a00| 6d 70 61 72 61 6d 2b 2b | 5d 20 3d 20 66 69 78 77 |mparam++|] = fixw|
|00003a10| 6f 72 64 28 75 6e 66 69 | 78 77 6f 72 64 28 70 61 |ord(unfi|xword(pa|
|00003a20| 72 61 6d 65 74 65 72 73 | 5b 31 5d 29 2f 33 2e 30 |rameters|[1])/3.0|
|00003a30| 29 20 3b 0a 58 20 20 20 | 20 7d 0a 58 20 20 74 6f |) ;.X | }.X to|
|00003a40| 74 61 6c 6c 65 6e 67 74 | 68 20 3d 20 36 20 2b 20 |tallengt|h = 6 + |
|00003a50| 68 65 61 64 65 72 73 69 | 7a 65 20 2b 20 28 6c 61 |headersi|ze + (la|
|00003a60| 72 67 65 73 74 63 68 2b | 31 2d 73 6d 61 6c 6c 65 |rgestch+|1-smalle|
|00003a70| 73 74 63 68 29 20 2b 0a | 58 20 20 20 20 6e 75 6d |stch) +.|X num|
|00003a80| 77 69 64 74 68 20 2b 20 | 6e 75 6d 68 65 69 67 68 |width + |numheigh|
|00003a90| 74 20 2b 20 6e 75 6d 64 | 65 70 74 68 20 2b 20 6e |t + numd|epth + n|
|00003aa0| 75 6d 69 74 61 6c 69 63 | 20 2b 20 6e 75 6d 70 61 |umitalic| + numpa|
|00003ab0| 72 61 6d 20 3b 0a 58 20 | 20 2f 2a 20 6c 65 6e 67 |ram ;.X | /* leng|
|00003ac0| 74 68 73 20 2a 2f 0a 58 | 20 20 74 66 6d 68 61 6c |ths */.X| tfmhal|
|00003ad0| 66 77 6f 72 64 28 74 6f | 74 61 6c 6c 65 6e 67 74 |fword(to|tallengt|
|00003ae0| 68 29 20 3b 0a 58 20 20 | 74 66 6d 68 61 6c 66 77 |h) ;.X |tfmhalfw|
|00003af0| 6f 72 64 28 68 65 61 64 | 65 72 73 69 7a 65 29 20 |ord(head|ersize) |
|00003b00| 3b 0a 58 20 20 74 66 6d | 68 61 6c 66 77 6f 72 64 |;.X tfm|halfword|
|00003b10| 28 73 6d 61 6c 6c 65 73 | 74 63 68 29 20 3b 0a 58 |(smalles|tch) ;.X|
|00003b20| 20 20 74 66 6d 68 61 6c | 66 77 6f 72 64 28 6c 61 | tfmhal|fword(la|
|00003b30| 72 67 65 73 74 63 68 29 | 20 3b 0a 58 20 20 74 66 |rgestch)| ;.X tf|
|00003b40| 6d 68 61 6c 66 77 6f 72 | 64 28 6e 75 6d 77 69 64 |mhalfwor|d(numwid|
|00003b50| 74 68 29 20 3b 0a 58 20 | 20 74 66 6d 68 61 6c 66 |th) ;.X | tfmhalf|
|00003b60| 77 6f 72 64 28 6e 75 6d | 68 65 69 67 68 74 29 20 |word(num|height) |
|00003b70| 3b 0a 58 20 20 74 66 6d | 68 61 6c 66 77 6f 72 64 |;.X tfm|halfword|
|00003b80| 28 6e 75 6d 64 65 70 74 | 68 29 20 3b 0a 58 20 20 |(numdept|h) ;.X |
|00003b90| 74 66 6d 68 61 6c 66 77 | 6f 72 64 28 6e 75 6d 69 |tfmhalfw|ord(numi|
|00003ba0| 74 61 6c 69 63 29 20 3b | 0a 58 20 20 74 66 6d 68 |talic) ;|.X tfmh|
|00003bb0| 61 6c 66 77 6f 72 64 28 | 30 29 20 3b 20 2f 2a 20 |alfword(|0) ; /* |
|00003bc0| 6c 69 67 2f 6b 65 72 6e | 20 74 61 62 6c 65 20 2a |lig/kern| table *|
|00003bd0| 2f 0a 58 20 20 74 66 6d | 68 61 6c 66 77 6f 72 64 |/.X tfm|halfword|
|00003be0| 28 30 29 20 3b 20 2f 2a | 20 6b 65 72 6e 20 74 61 |(0) ; /*| kern ta|
|00003bf0| 62 6c 65 20 2a 2f 0a 58 | 20 20 74 66 6d 68 61 6c |ble */.X| tfmhal|
|00003c00| 66 77 6f 72 64 28 30 29 | 20 3b 20 2f 2a 20 65 78 |fword(0)| ; /* ex|
|00003c10| 74 65 6e 73 69 62 6c 65 | 20 63 68 61 72 20 74 61 |tensible| char ta|
|00003c20| 62 6c 65 20 2a 2f 0a 58 | 20 20 74 66 6d 68 61 6c |ble */.X| tfmhal|
|00003c30| 66 77 6f 72 64 28 6e 75 | 6d 70 61 72 61 6d 29 20 |fword(nu|mparam) |
|00003c40| 3b 0a 58 20 20 2f 2a 20 | 68 65 61 64 65 72 20 2a |;.X /* |header *|
|00003c50| 2f 0a 58 20 20 74 66 6d | 77 6f 72 64 28 63 68 65 |/.X tfm|word(che|
|00003c60| 63 6b 73 75 6d 29 20 3b | 0a 58 20 20 74 66 6d 77 |cksum) ;|.X tfmw|
|00003c70| 6f 72 64 28 64 65 73 69 | 67 6e 73 69 7a 65 29 20 |ord(desi|gnsize) |
|00003c80| 3b 0a 58 20 20 69 66 20 | 28 73 74 72 6c 65 6e 28 |;.X if |(strlen(|
|00003c90| 63 6f 64 69 6e 67 73 63 | 68 65 6d 65 29 20 3e 20 |codingsc|heme) > |
|00003ca0| 33 39 29 20 74 66 6d 62 | 79 74 65 28 33 39 29 20 |39) tfmb|yte(39) |
|00003cb0| 3b 0a 58 20 20 65 6c 73 | 65 20 74 66 6d 62 79 74 |;.X els|e tfmbyt|
|00003cc0| 65 28 73 74 72 6c 65 6e | 28 63 6f 64 69 6e 67 73 |e(strlen|(codings|
|00003cd0| 63 68 65 6d 65 29 29 20 | 3b 0a 58 20 20 66 6f 72 |cheme)) |;.X for|
|00003ce0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 33 39 3b | (i = 0;| i < 39;|
|00003cf0| 20 69 2b 2b 29 0a 58 20 | 20 20 20 69 66 20 28 2a | i++).X | if (*|
|00003d00| 63 6f 64 69 6e 67 73 63 | 68 65 6d 65 29 20 74 66 |codingsc|heme) tf|
|00003d10| 6d 62 79 74 65 28 78 6f | 72 64 5b 2a 63 6f 64 69 |mbyte(xo|rd[*codi|
|00003d20| 6e 67 73 63 68 65 6d 65 | 2b 2b 5d 29 20 3b 0a 58 |ngscheme|++]) ;.X|
|00003d30| 20 20 20 20 65 6c 73 65 | 20 74 66 6d 62 79 74 65 | else| tfmbyte|
|00003d40| 28 30 29 20 3b 0a 58 20 | 20 69 66 20 28 73 74 72 |(0) ;.X | if (str|
|00003d50| 6c 65 6e 28 66 61 6d 69 | 6c 79 6e 61 6d 65 29 20 |len(fami|lyname) |
|00003d60| 3e 20 31 39 29 20 74 66 | 6d 62 79 74 65 28 31 39 |> 19) tf|mbyte(19|
|00003d70| 29 20 3b 0a 58 20 20 65 | 6c 73 65 20 74 66 6d 62 |) ;.X e|lse tfmb|
|00003d80| 79 74 65 28 73 74 72 6c | 65 6e 28 66 61 6d 69 6c |yte(strl|en(famil|
|00003d90| 79 6e 61 6d 65 29 29 20 | 3b 0a 58 20 20 66 6f 72 |yname)) |;.X for|
|00003da0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 31 39 3b | (i = 0;| i < 19;|
|00003db0| 20 69 2b 2b 29 0a 58 20 | 20 20 20 69 66 20 28 2a | i++).X | if (*|
|00003dc0| 66 61 6d 69 6c 79 6e 61 | 6d 65 29 20 74 66 6d 62 |familyna|me) tfmb|
|00003dd0| 79 74 65 28 78 6f 72 64 | 5b 2a 66 61 6d 69 6c 79 |yte(xord|[*family|
|00003de0| 6e 61 6d 65 2b 2b 5d 29 | 20 3b 0a 58 20 20 20 20 |name++])| ;.X |
|00003df0| 65 6c 73 65 20 74 66 6d | 62 79 74 65 28 30 29 20 |else tfm|byte(0) |
|00003e00| 3b 0a 58 20 20 2f 2a 20 | 63 68 61 72 5f 69 6e 66 |;.X /* |char_inf|
|00003e10| 6f 20 2a 2f 0a 58 20 20 | 66 6f 72 20 28 63 61 72 |o */.X |for (car|
|00003e20| 20 3d 20 73 6d 61 6c 6c | 65 73 74 63 68 3b 20 63 | = small|estch; c|
|00003e30| 61 72 20 3c 3d 20 6c 61 | 72 67 65 73 74 63 68 3b |ar <= la|rgestch;|
|00003e40| 20 63 61 72 2b 2b 29 0a | 58 20 20 20 20 69 66 20 | car++).|X if |
|00003e50| 28 66 69 6c 65 6e 61 6d | 65 5b 63 61 72 5d 29 20 |(filenam|e[car]) |
|00003e60| 7b 0a 58 20 20 20 20 20 | 20 74 66 6d 62 79 74 65 |{.X | tfmbyte|
|00003e70| 28 74 66 6d 69 6e 64 65 | 78 5b 63 61 72 5d 29 20 |(tfminde|x[car]) |
|00003e80| 3b 0a 58 20 20 20 20 20 | 20 74 66 6d 62 79 74 65 |;.X | tfmbyte|
|00003e90| 28 28 68 67 74 69 6e 64 | 65 78 5b 63 61 72 5d 3c |((hgtind|ex[car]<|
|00003ea0| 3c 34 29 20 2b 20 64 65 | 70 69 6e 64 65 78 5b 63 |<4) + de|pindex[c|
|00003eb0| 61 72 5d 29 20 3b 0a 58 | 20 20 20 20 20 20 74 66 |ar]) ;.X| tf|
|00003ec0| 6d 62 79 74 65 28 69 74 | 61 6c 69 6e 64 65 78 5b |mbyte(it|alindex[|
|00003ed0| 63 61 72 5d 3c 3c 32 29 | 20 3b 0a 58 20 20 20 20 |car]<<2)| ;.X |
|00003ee0| 20 20 74 66 6d 62 79 74 | 65 28 30 29 20 3b 0a 58 | tfmbyt|e(0) ;.X|
|00003ef0| 20 20 20 20 7d 20 65 6c | 73 65 20 74 66 6d 77 6f | } el|se tfmwo|
|00003f00| 72 64 28 30 29 20 3b 0a | 58 20 20 2f 2a 20 77 69 |rd(0) ;.|X /* wi|
|00003f10| 64 74 68 20 2a 2f 0a 58 | 20 20 66 6f 72 20 28 69 |dth */.X| for (i|
|00003f20| 20 3d 20 30 3b 20 69 20 | 3c 20 6e 75 6d 77 69 64 | = 0; i |< numwid|
|00003f30| 74 68 3b 20 69 2b 2b 29 | 20 74 66 6d 77 6f 72 64 |th; i++)| tfmword|
|00003f40| 28 77 69 64 74 68 74 61 | 62 5b 69 5d 29 20 3b 0a |(widthta|b[i]) ;.|
|00003f50| 58 20 20 2f 2a 20 68 65 | 69 67 68 74 20 2a 2f 0a |X /* he|ight */.|
|00003f60| 58 20 20 66 6f 72 20 28 | 69 20 3d 20 30 3b 20 69 |X for (|i = 0; i|
|00003f70| 20 3c 20 6e 75 6d 68 65 | 69 67 68 74 3b 20 69 2b | < numhe|ight; i+|
|00003f80| 2b 29 20 74 66 6d 77 6f | 72 64 28 68 65 69 67 68 |+) tfmwo|rd(heigh|
|00003f90| 74 74 61 62 5b 69 5d 29 | 20 3b 0a 58 20 20 2f 2a |ttab[i])| ;.X /*|
|00003fa0| 20 64 65 70 74 68 20 2a | 2f 0a 58 20 20 66 6f 72 | depth *|/.X for|
|00003fb0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 6e 75 6d | (i = 0;| i < num|
|00003fc0| 64 65 70 74 68 3b 20 69 | 2b 2b 29 20 74 66 6d 77 |depth; i|++) tfmw|
|00003fd0| 6f 72 64 28 64 65 70 74 | 68 74 61 62 5b 69 5d 29 |ord(dept|htab[i])|
|00003fe0| 20 3b 0a 58 20 20 2f 2a | 20 69 74 61 6c 69 63 20 | ;.X /*| italic |
|00003ff0| 2a 2f 0a 58 20 20 66 6f | 72 20 28 69 20 3d 20 30 |*/.X fo|r (i = 0|
|00004000| 3b 20 69 20 3c 20 6e 75 | 6d 69 74 61 6c 69 63 3b |; i < nu|mitalic;|
|00004010| 20 69 2b 2b 29 20 74 66 | 6d 77 6f 72 64 28 69 74 | i++) tf|mword(it|
|00004020| 61 6c 69 63 74 61 62 5b | 69 5d 29 20 3b 0a 58 20 |alictab[|i]) ;.X |
|00004030| 20 2f 2a 20 6e 6f 20 6c | 69 67 5f 6b 65 72 6e 2c | /* no l|ig_kern,|
|00004040| 20 6b 65 72 6e 2c 20 6f | 72 20 65 78 74 65 6e 20 | kern, o|r exten |
|00004050| 2a 2f 0a 58 20 20 2f 2a | 20 70 61 72 61 6d 20 2a |*/.X /*| param *|
|00004060| 2f 0a 58 20 20 66 6f 72 | 20 28 69 20 3d 20 30 3b |/.X for| (i = 0;|
|00004070| 20 69 20 3c 20 6e 75 6d | 70 61 72 61 6d 3b 20 69 | i < num|param; i|
|00004080| 2b 2b 29 0a 58 20 20 20 | 20 69 66 20 28 69 20 26 |++).X | if (i &|
|00004090| 26 20 28 21 66 69 78 72 | 61 6e 67 65 28 70 61 72 |& (!fixr|ange(par|
|000040a0| 61 6d 65 74 65 72 73 5b | 69 5d 29 29 29 20 7b 0a |ameters[|i]))) {.|
|000040b0| 58 20 20 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 |X f|printf(s|
|000040c0| 74 64 65 72 72 2c 20 22 | 20 50 61 72 61 6d 65 74 |tderr, "| Paramet|
|000040d0| 65 72 20 25 64 20 6f 75 | 74 20 6f 66 20 72 61 6e |er %d ou|t of ran|
|000040e0| 67 65 20 28 2d 70 29 21 | 5c 6e 22 2c 20 69 29 3b |ge (-p)!|\n", i);|
|000040f0| 0a 58 20 20 20 20 20 20 | 6a 75 6d 70 6f 75 74 28 |.X |jumpout(|
|00004100| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 20 20 20 20 65 |);.X |}.X e|
|00004110| 6c 73 65 20 74 66 6d 77 | 6f 72 64 28 70 61 72 61 |lse tfmw|ord(para|
|00004120| 6d 65 74 65 72 73 5b 69 | 5d 29 20 3b 0a 58 20 20 |meters[i|]) ;.X |
|00004130| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00004140| 22 25 64 20 62 79 74 65 | 73 20 77 72 69 74 74 65 |"%d byte|s writte|
|00004150| 6e 20 74 6f 20 74 66 6d | 20 66 69 6c 65 2e 5c 6e |n to tfm| file.\n|
|00004160| 22 2c 20 74 6f 74 61 6c | 6c 65 6e 67 74 68 2a 34 |", total|length*4|
|00004170| 29 20 3b 0a 58 7d 0a 58 | 0a 58 72 65 61 64 63 68 |) ;.X}.X|.Xreadch|
|00004180| 61 72 61 63 74 65 72 28 | 29 0a 58 7b 0a 58 20 20 |aracter(|).X{.X |
|00004190| 46 49 4c 45 20 2a 66 70 | 3b 0a 58 0a 58 20 20 69 |FILE *fp|;.X.X i|
|000041a0| 66 20 28 21 73 74 72 63 | 6d 70 28 66 69 6c 65 6e |f (!strc|mp(filen|
|000041b0| 61 6d 65 5b 63 61 72 5d | 2c 20 22 2d 22 29 29 20 |ame[car]|, "-")) |
|000041c0| 66 70 20 3d 20 73 74 64 | 69 6e 3b 0a 58 20 20 65 |fp = std|in;.X e|
|000041d0| 6c 73 65 20 69 66 20 28 | 28 66 70 20 3d 20 66 6f |lse if (|(fp = fo|
|000041e0| 70 65 6e 28 66 69 6c 65 | 6e 61 6d 65 5b 63 61 72 |pen(file|name[car|
|000041f0| 5d 2c 20 22 72 22 29 29 | 20 3d 3d 20 4e 55 4c 4c |], "r"))| == NULL|
|00004200| 29 20 7b 0a 58 20 20 20 | 20 66 70 72 69 6e 74 66 |) {.X | fprintf|
|00004210| 28 73 74 64 65 72 72 2c | 20 22 20 43 61 6e 27 74 |(stderr,| " Can't|
|00004220| 20 6f 70 65 6e 20 70 62 | 6d 20 66 69 6c 65 20 25 | open pb|m file %|
|00004230| 73 21 5c 6e 22 2c 20 66 | 69 6c 65 6e 61 6d 65 5b |s!\n", f|ilename[|
|00004240| 63 61 72 5d 29 3b 0a 58 | 20 20 20 20 6a 75 6d 70 |car]);.X| jump|
|00004250| 6f 75 74 28 29 3b 0a 58 | 20 20 7d 0a 58 20 20 62 |out();.X| }.X b|
|00004260| 69 74 6d 61 70 20 3d 20 | 70 62 6d 5f 72 65 61 64 |itmap = |pbm_read|
|00004270| 70 62 6d 28 66 70 2c 20 | 26 77 69 64 74 68 2c 20 |pbm(fp, |&width, |
|00004280| 26 68 65 69 67 68 74 29 | 20 3b 0a 58 20 20 69 66 |&height)| ;.X if|
|00004290| 20 28 66 70 20 21 3d 20 | 73 74 64 69 6e 29 20 66 | (fp != |stdin) f|
|000042a0| 63 6c 6f 73 65 28 66 70 | 29 20 3b 0a 58 20 20 0a |close(fp|) ;.X .|
|000042b0| 58 20 20 69 66 20 28 28 | 63 68 61 72 66 6c 61 67 |X if ((|charflag|
|000042c0| 73 5b 63 61 72 5d 20 26 | 20 48 4f 52 5a 45 53 43 |s[car] &| HORZESC|
|000042d0| 29 20 3d 3d 20 30 29 20 | 68 6f 72 7a 65 73 63 5b |) == 0) |horzesc[|
|000042e0| 63 61 72 5d 20 3d 20 77 | 69 64 74 68 20 3b 0a 58 |car] = w|idth ;.X|
|000042f0| 20 20 69 66 20 28 28 63 | 68 61 72 66 6c 61 67 73 | if ((c|harflags|
|00004300| 5b 63 61 72 5d 20 26 20 | 56 45 52 54 45 53 43 29 |[car] & |VERTESC)|
|00004310| 20 3d 3d 20 30 29 20 76 | 65 72 74 65 73 63 5b 63 | == 0) v|ertesc[c|
|00004320| 61 72 5d 20 3d 20 30 3b | 0a 58 20 20 69 66 20 28 |ar] = 0;|.X if (|
|00004330| 28 63 68 61 72 66 6c 61 | 67 73 5b 63 61 72 5d 20 |(charfla|gs[car] |
|00004340| 26 20 58 4f 46 46 53 45 | 54 29 20 3d 3d 20 30 29 |& XOFFSE|T) == 0)|
|00004350| 20 78 6f 66 66 73 65 74 | 5b 63 61 72 5d 20 3d 20 | xoffset|[car] = |
|00004360| 30 3b 0a 58 20 20 69 66 | 20 28 28 63 68 61 72 66 |0;.X if| ((charf|
|00004370| 6c 61 67 73 5b 63 61 72 | 5d 20 26 20 59 4f 46 46 |lags[car|] & YOFF|
|00004380| 53 45 54 29 20 3d 3d 20 | 30 29 20 79 6f 66 66 73 |SET) == |0) yoffs|
|00004390| 65 74 5b 63 61 72 5d 20 | 3d 20 68 65 69 67 68 74 |et[car] |= height|
|000043a0| 2d 31 3b 0a 58 20 20 69 | 66 20 28 28 63 68 61 72 |-1;.X i|f ((char|
|000043b0| 66 6c 61 67 73 5b 63 61 | 72 5d 20 26 20 54 46 4d |flags[ca|r] & TFM|
|000043c0| 57 49 44 54 48 29 20 3d | 3d 20 30 29 0a 58 20 20 |WIDTH) =|= 0).X |
|000043d0| 20 20 74 66 6d 69 6e 64 | 65 78 5b 63 61 72 5d 20 | tfmind|ex[car] |
|000043e0| 3d 20 61 64 64 5f 74 66 | 6d 77 69 64 74 68 28 66 |= add_tf|mwidth(f|
|000043f0| 69 78 77 6f 72 64 28 64 | 65 73 69 67 6e 75 6e 69 |ixword(d|esignuni|
|00004400| 74 73 28 77 69 64 74 68 | 29 29 29 3b 0a 58 20 20 |ts(width|)));.X |
|00004410| 69 66 20 28 28 63 68 61 | 72 66 6c 61 67 73 5b 63 |if ((cha|rflags[c|
|00004420| 61 72 5d 20 26 20 54 46 | 4d 48 45 49 47 48 54 29 |ar] & TF|MHEIGHT)|
|00004430| 20 3d 3d 20 30 29 0a 58 | 20 20 20 20 68 67 74 69 | == 0).X| hgti|
|00004440| 6e 64 65 78 5b 63 61 72 | 5d 20 3d 20 61 64 64 5f |ndex[car|] = add_|
|00004450| 74 66 6d 68 65 69 67 68 | 74 28 66 69 78 77 6f 72 |tfmheigh|t(fixwor|
|00004460| 64 28 64 65 73 69 67 6e | 75 6e 69 74 73 28 79 6f |d(design|units(yo|
|00004470| 66 66 73 65 74 5b 63 61 | 72 5d 2b 31 29 29 29 3b |ffset[ca|r]+1)));|
|00004480| 0a 58 20 20 69 66 20 28 | 28 63 68 61 72 66 6c 61 |.X if (|(charfla|
|00004490| 67 73 5b 63 61 72 5d 20 | 26 20 54 46 4d 44 45 50 |gs[car] |& TFMDEP|
|000044a0| 54 48 29 20 3d 3d 20 30 | 29 0a 58 20 20 20 20 64 |TH) == 0|).X d|
|000044b0| 65 70 69 6e 64 65 78 5b | 63 61 72 5d 20 3d 20 61 |epindex[|car] = a|
|000044c0| 64 64 5f 74 66 6d 64 65 | 70 74 68 28 66 69 78 77 |dd_tfmde|pth(fixw|
|000044d0| 6f 72 64 28 64 65 73 69 | 67 6e 75 6e 69 74 73 28 |ord(desi|gnunits(|
|000044e0| 68 65 69 67 68 74 2d 31 | 2d 79 6f 66 66 73 65 74 |height-1|-yoffset|
|000044f0| 5b 63 61 72 5d 29 29 29 | 3b 0a 58 20 20 69 66 20 |[car])))|;.X if |
|00004500| 28 28 63 68 61 72 66 6c | 61 67 73 5b 63 61 72 5d |((charfl|ags[car]|
|00004510| 20 26 20 54 46 4d 49 54 | 41 4c 49 43 29 20 3d 3d | & TFMIT|ALIC) ==|
|00004520| 20 30 29 20 69 74 61 6c | 69 6e 64 65 78 5b 63 61 | 0) ital|index[ca|
|00004530| 72 5d 20 3d 20 30 3b 0a | 58 0a 58 20 20 69 66 20 |r] = 0;.|X.X if |
|00004540| 28 63 61 72 20 3c 20 73 | 6d 61 6c 6c 65 73 74 63 |(car < s|mallestc|
|00004550| 68 29 20 73 6d 61 6c 6c | 65 73 74 63 68 20 3d 20 |h) small|estch = |
|00004560| 63 61 72 3b 0a 58 20 20 | 69 66 20 28 63 61 72 20 |car;.X |if (car |
|00004570| 3e 20 6c 61 72 67 65 73 | 74 63 68 29 20 6c 61 72 |> larges|tch) lar|
|00004580| 67 65 73 74 63 68 20 3d | 20 63 61 72 3b 0a 58 20 |gestch =| car;.X |
|00004590| 20 69 66 20 28 77 69 64 | 74 68 20 3e 20 65 6d 77 | if (wid|th > emw|
|000045a0| 69 64 74 68 29 20 65 6d | 77 69 64 74 68 20 3d 20 |idth) em|width = |
|000045b0| 77 69 64 74 68 20 3b 0a | 58 7d 0a 58 0a 58 69 6e |width ;.|X}.X.Xin|
|000045c0| 74 0a 58 65 71 75 61 6c | 28 72 6f 77 31 2c 20 72 |t.Xequal|(row1, r|
|000045d0| 6f 77 32 29 0a 58 20 20 | 20 20 20 62 69 74 20 2a |ow2).X | bit *|
|000045e0| 72 6f 77 31 2c 20 2a 72 | 6f 77 32 20 3b 0a 58 7b |row1, *r|ow2 ;.X{|
|000045f0| 0a 58 20 20 69 6e 74 65 | 67 65 72 20 69 20 3b 0a |.X inte|ger i ;.|
|00004600| 58 20 20 0a 58 20 20 66 | 6f 72 20 28 69 20 3d 20 |X .X f|or (i = |
|00004610| 30 3b 20 69 20 3c 20 77 | 69 64 74 68 3b 20 69 2b |0; i < w|idth; i+|
|00004620| 2b 29 0a 58 20 20 20 20 | 69 66 20 28 72 6f 77 31 |+).X |if (row1|
|00004630| 5b 69 5d 20 21 3d 20 72 | 6f 77 32 5b 69 5d 29 20 |[i] != r|ow2[i]) |
|00004640| 72 65 74 75 72 6e 20 28 | 30 29 20 3b 0a 58 20 20 |return (|0) ;.X |
|00004650| 72 65 74 75 72 6e 28 31 | 29 20 3b 0a 58 7d 0a 58 |return(1|) ;.X}.X|
|00004660| 0a 58 73 68 69 70 63 68 | 61 72 61 63 74 65 72 28 |.Xshipch|aracter(|
|00004670| 29 0a 58 7b 0a 58 20 20 | 69 6e 74 65 67 65 72 20 |).X{.X |integer |
|00004680| 63 6f 6d 70 73 69 7a 65 | 20 3b 0a 58 20 20 69 6e |compsize| ;.X in|
|00004690| 74 65 67 65 72 20 69 2c | 20 6a 2c 20 6b 20 3b 0a |teger i,| j, k ;.|
|000046a0| 58 20 20 62 69 74 20 2a | 7a 65 72 6f 72 6f 77 2c |X bit *|zerorow,|
|000046b0| 20 2a 6f 6e 65 73 72 6f | 77 20 3b 0a 58 20 20 69 | *onesro|w ;.X i|
|000046c0| 6e 74 65 67 65 72 20 2a | 72 65 70 65 61 74 70 74 |nteger *|repeatpt|
|000046d0| 72 2c 20 2a 62 69 74 63 | 6f 75 6e 74 73 20 3b 0a |r, *bitc|ounts ;.|
|000046e0| 58 20 20 69 6e 74 65 67 | 65 72 20 63 6f 75 6e 74 |X integ|er count|
|000046f0| 20 3b 0a 58 20 20 69 6e | 74 65 67 65 72 20 74 65 | ;.X in|teger te|
|00004700| 73 74 20 3b 0a 58 20 20 | 69 6e 74 65 67 65 72 20 |st ;.X |integer |
|00004710| 63 75 72 70 74 72 2c 20 | 72 6f 77 70 74 72 20 3b |curptr, |rowptr ;|
|00004720| 0a 58 20 20 69 6e 74 65 | 67 65 72 20 62 69 74 76 |.X inte|ger bitv|
|00004730| 61 6c 20 3b 0a 58 20 20 | 69 6e 74 65 67 65 72 20 |al ;.X |integer |
|00004740| 72 65 70 65 61 74 66 6c | 61 67 20 3b 0a 58 20 20 |repeatfl|ag ;.X |
|00004750| 69 6e 74 65 67 65 72 20 | 63 6f 6c 70 74 72 20 3b |integer |colptr ;|
|00004760| 0a 58 20 20 69 6e 74 65 | 67 65 72 20 63 75 72 72 |.X inte|ger curr|
|00004770| 65 70 65 61 74 20 3b 0a | 58 20 20 69 6e 74 65 67 |epeat ;.|X integ|
|00004780| 65 72 20 64 79 6e 66 20 | 3b 0a 58 20 20 69 6e 74 |er dynf |;.X int|
|00004790| 65 67 65 72 20 64 65 72 | 69 76 5b 31 34 5d 20 3b |eger der|iv[14] ;|
|000047a0| 0a 58 20 20 69 6e 74 65 | 67 65 72 20 62 63 6f 6d |.X inte|ger bcom|
|000047b0| 70 73 69 7a 65 20 3b 0a | 58 20 20 62 6f 6f 6c 65 |psize ;.|X boole|
|000047c0| 61 6e 20 66 69 72 73 74 | 6f 6e 20 3b 0a 58 20 20 |an first|on ;.X |
|000047d0| 69 6e 74 65 67 65 72 20 | 66 6c 61 67 62 79 74 65 |integer |flagbyte|
|000047e0| 20 3b 0a 58 20 20 62 6f | 6f 6c 65 61 6e 20 73 74 | ;.X bo|olean st|
|000047f0| 61 74 65 20 3b 0a 58 20 | 20 62 6f 6f 6c 65 61 6e |ate ;.X | boolean|
|00004800| 20 6f 6e 20 3b 0a 58 20 | 20 69 6e 74 65 67 65 72 | on ;.X | integer|
|00004810| 20 68 62 69 74 20 3b 0a | 58 20 20 69 6e 74 65 67 | hbit ;.|X integ|
|00004820| 65 72 20 70 62 69 74 20 | 3b 0a 58 20 20 62 6f 6f |er pbit |;.X boo|
|00004830| 6c 65 61 6e 20 72 6f 6e | 2c 20 73 6f 6e 20 3b 0a |lean ron|, son ;.|
|00004840| 58 20 20 69 6e 74 65 67 | 65 72 20 72 63 6f 75 6e |X integ|er rcoun|
|00004850| 74 2c 20 73 63 6f 75 6e | 74 20 3b 0a 58 20 20 69 |t, scoun|t ;.X i|
|00004860| 6e 74 65 67 65 72 20 72 | 69 2c 20 73 69 20 3b 0a |nteger r|i, si ;.|
|00004870| 58 20 20 69 6e 74 65 67 | 65 72 20 6d 61 78 32 20 |X integ|er max2 |
|00004880| 3b 0a 58 20 20 69 6e 74 | 65 67 65 72 20 70 72 65 |;.X int|eger pre|
|00004890| 64 70 6b 6c 6f 63 20 3b | 0a 58 20 20 69 6e 74 65 |dpkloc ;|.X inte|
|000048a0| 67 65 72 20 62 75 66 66 | 20 3b 0a 58 0a 58 20 20 |ger buff| ;.X.X |
|000048b0| 69 6e 74 65 67 65 72 20 | 74 66 77 69 64 20 3d 20 |integer |tfwid = |
|000048c0| 77 69 64 74 68 74 61 62 | 5b 74 66 6d 69 6e 64 65 |widthtab|[tfminde|
|000048d0| 78 5b 63 61 72 5d 5d 20 | 3b 0a 58 20 20 69 6e 74 |x[car]] |;.X int|
|000048e0| 65 67 65 72 20 68 65 73 | 63 20 3d 20 68 6f 72 7a |eger hes|c = horz|
|000048f0| 65 73 63 5b 63 61 72 5d | 20 3b 0a 58 20 20 69 6e |esc[car]| ;.X in|
|00004900| 74 65 67 65 72 20 76 65 | 73 63 20 3d 20 76 65 72 |teger ve|sc = ver|
|00004910| 74 65 73 63 5b 63 61 72 | 5d 20 3b 0a 58 20 20 69 |tesc[car|] ;.X i|
|00004920| 6e 74 65 67 65 72 20 78 | 6f 66 66 20 3d 20 78 6f |nteger x|off = xo|
|00004930| 66 66 73 65 74 5b 63 61 | 72 5d 20 3b 0a 58 20 20 |ffset[ca|r] ;.X |
|00004940| 69 6e 74 65 67 65 72 20 | 79 6f 66 66 20 3d 20 79 |integer |yoff = y|
|00004950| 6f 66 66 73 65 74 5b 63 | 61 72 5d 20 3b 0a 58 0a |offset[c|ar] ;.X.|
|00004960| 58 20 20 7a 65 72 6f 72 | 6f 77 20 3d 20 70 62 6d |X zeror|ow = pbm|
|00004970| 5f 61 6c 6c 6f 63 72 6f | 77 28 77 69 64 74 68 29 |_allocro|w(width)|
|00004980| 20 3b 0a 58 20 20 6f 6e | 65 73 72 6f 77 20 3d 20 | ;.X on|esrow = |
|00004990| 70 62 6d 5f 61 6c 6c 6f | 63 72 6f 77 28 77 69 64 |pbm_allo|crow(wid|
|000049a0| 74 68 29 20 3b 0a 58 20 | 20 72 65 70 65 61 74 70 |th) ;.X | repeatp|
|000049b0| 74 72 20 3d 0a 58 20 20 | 20 20 28 69 6e 74 65 67 |tr =.X | (integ|
|000049c0| 65 72 20 2a 29 6d 61 6c | 6c 6f 63 28 28 75 6e 73 |er *)mal|loc((uns|
|000049d0| 69 67 6e 65 64 20 69 6e | 74 29 28 28 68 65 69 67 |igned in|t)((heig|
|000049e0| 68 74 2b 31 29 2a 73 69 | 7a 65 6f 66 28 69 6e 74 |ht+1)*si|zeof(int|
|000049f0| 65 67 65 72 29 29 29 20 | 3b 0a 58 20 20 62 69 74 |eger))) |;.X bit|
|00004a00| 63 6f 75 6e 74 73 20 3d | 0a 58 20 20 20 20 28 69 |counts =|.X (i|
|00004a10| 6e 74 65 67 65 72 20 2a | 29 6d 61 6c 6c 6f 63 28 |nteger *|)malloc(|
|00004a20| 28 75 6e 73 69 67 6e 65 | 64 20 69 6e 74 29 28 28 |(unsigne|d int)((|
|00004a30| 68 65 69 67 68 74 2a 77 | 69 64 74 68 29 2a 73 69 |height*w|idth)*si|
|00004a40| 7a 65 6f 66 28 69 6e 74 | 65 67 65 72 29 29 29 20 |zeof(int|eger))) |
|00004a50| 3b 0a 58 20 20 66 6f 72 | 20 28 69 20 3d 20 30 20 |;.X for| (i = 0 |
|00004a60| 3b 20 69 20 3c 20 77 69 | 64 74 68 20 3b 20 69 2b |; i < wi|dth ; i+|
|00004a70| 2b 29 20 7b 0a 58 20 20 | 20 20 7a 65 72 6f 72 6f |+) {.X | zeroro|
|00004a80| 77 5b 69 5d 20 3d 20 50 | 42 4d 5f 57 48 49 54 45 |w[i] = P|BM_WHITE|
|00004a90| 20 3b 0a 58 20 20 20 20 | 6f 6e 65 73 72 6f 77 5b | ;.X |onesrow[|
|00004aa0| 69 5d 20 3d 20 50 42 4d | 5f 42 4c 41 43 4b 20 3b |i] = PBM|_BLACK ;|
|00004ab0| 0a 58 20 20 7d 0a 58 20 | 20 66 6f 72 20 28 69 3d |.X }.X | for (i=|
|00004ac0| 30 3b 20 69 20 3c 20 68 | 65 69 67 68 74 3b 20 69 |0; i < h|eight; i|
|00004ad0| 2b 2b 29 20 7b 0a 58 20 | 20 20 20 69 66 20 28 65 |++) {.X | if (e|
|00004ae0| 71 75 61 6c 28 62 69 74 | 6d 61 70 5b 69 5d 2c 20 |qual(bit|map[i], |
|00004af0| 7a 65 72 6f 72 6f 77 29 | 29 0a 58 20 20 20 20 20 |zerorow)|).X |
|00004b00| 20 72 65 70 65 61 74 70 | 74 72 5b 69 5d 20 3d 20 | repeatp|tr[i] = |
|00004b10| 30 20 3b 0a 58 20 20 20 | 20 65 6c 73 65 20 69 66 |0 ;.X | else if|
|00004b20| 20 28 65 71 75 61 6c 28 | 62 69 74 6d 61 70 5b 69 | (equal(|bitmap[i|
|00004b30| 5d 2c 20 6f 6e 65 73 72 | 6f 77 29 29 20 0a 58 20 |], onesr|ow)) .X |
|00004b40| 20 20 20 20 20 72 65 70 | 65 61 74 70 74 72 5b 69 | rep|eatptr[i|
|00004b50| 5d 20 3d 20 30 20 3b 0a | 58 20 20 20 20 65 6c 73 |] = 0 ;.|X els|
|00004b60| 65 20 69 66 20 28 69 20 | 2b 20 31 20 3c 20 68 65 |e if (i |+ 1 < he|
|00004b70| 69 67 68 74 20 26 26 20 | 65 71 75 61 6c 28 62 69 |ight && |equal(bi|
|00004b80| 74 6d 61 70 5b 69 5d 2c | 62 69 74 6d 61 70 5b 69 |tmap[i],|bitmap[i|
|00004b90| 2b 31 5d 29 29 0a 58 20 | 20 20 20 20 20 72 65 70 |+1])).X | rep|
|00004ba0| 65 61 74 70 74 72 5b 69 | 5d 20 3d 20 31 20 3b 0a |eatptr[i|] = 1 ;.|
|00004bb0| 58 20 20 20 20 65 6c 73 | 65 0a 58 20 20 20 20 20 |X els|e.X |
|00004bc0| 20 72 65 70 65 61 74 70 | 74 72 5b 69 5d 20 3d 20 | repeatp|tr[i] = |
|00004bd0| 30 20 3b 0a 58 20 20 7d | 0a 58 20 20 69 20 3d 20 |0 ;.X }|.X i = |
|00004be0| 30 20 3b 0a 58 20 20 77 | 68 69 6c 65 20 28 69 20 |0 ;.X w|hile (i |
|00004bf0| 3c 20 68 65 69 67 68 74 | 29 20 7b 0a 58 20 20 20 |< height|) {.X |
|00004c00| 20 6b 20 3d 20 69 20 3b | 0a 58 20 20 20 20 77 68 | k = i ;|.X wh|
|00004c10| 69 6c 65 20 28 72 65 70 | 65 61 74 70 74 72 5b 6b |ile (rep|eatptr[k|
|00004c20| 5d 20 3d 3d 20 31 29 20 | 6b 2b 2b 20 3b 0a 58 20 |] == 1) |k++ ;.X |
|00004c30| 20 20 20 72 65 70 65 61 | 74 70 74 72 5b 69 5d 20 | repea|tptr[i] |
|00004c40| 3d 20 6b 20 2d 20 69 20 | 3b 0a 58 20 20 20 20 69 |= k - i |;.X i|
|00004c50| 20 3d 20 6b 20 2b 20 31 | 20 3b 0a 58 20 20 7d 0a | = k + 1| ;.X }.|
|00004c60| 58 20 20 72 65 70 65 61 | 74 70 74 72 5b 69 5d 20 |X repea|tptr[i] |
|00004c70| 3d 20 30 20 3b 0a 58 20 | 20 63 6f 6c 70 74 72 20 |= 0 ;.X | colptr |
|00004c80| 3d 20 77 69 64 74 68 20 | 2d 20 31 20 3b 0a 58 20 |= width |- 1 ;.X |
|00004c90| 20 72 65 70 65 61 74 66 | 6c 61 67 20 3d 20 63 75 | repeatf|lag = cu|
|00004ca0| 72 72 65 70 65 61 74 20 | 3d 20 63 75 72 70 74 72 |rrepeat |= curptr|
|00004cb0| 20 3d 20 63 6f 75 6e 74 | 20 3d 20 72 6f 77 70 74 | = count| = rowpt|
|00004cc0| 72 20 3d 20 30 20 3b 0a | 58 20 20 74 65 73 74 20 |r = 0 ;.|X test |
|00004cd0| 3d 20 50 42 4d 5f 57 48 | 49 54 45 20 3b 0a 58 20 |= PBM_WH|ITE ;.X |
|00004ce0| 20 64 6f 20 7b 0a 58 20 | 20 20 20 63 6f 6c 70 74 | do {.X | colpt|
|00004cf0| 72 2b 2b 20 3b 0a 58 20 | 20 20 20 69 66 20 28 63 |r++ ;.X | if (c|
|00004d00| 6f 6c 70 74 72 20 3d 3d | 20 77 69 64 74 68 29 20 |olptr ==| width) |
|00004d10| 7b 0a 58 20 20 20 20 20 | 20 63 6f 6c 70 74 72 20 |{.X | colptr |
|00004d20| 3d 20 30 20 3b 0a 58 20 | 20 20 20 20 20 72 6f 77 |= 0 ;.X | row|
|00004d30| 70 74 72 20 3d 20 63 75 | 72 72 65 70 65 61 74 20 |ptr = cu|rrepeat |
|00004d40| 3b 0a 58 20 20 20 20 20 | 20 69 66 20 28 72 65 70 |;.X | if (rep|
|00004d50| 65 61 74 70 74 72 5b 63 | 75 72 72 65 70 65 61 74 |eatptr[c|urrepeat|
|00004d60| 5d 20 3e 20 30 29 20 7b | 0a 58 09 72 65 70 65 61 |] > 0) {|.X.repea|
|00004d70| 74 66 6c 61 67 20 3d 20 | 72 65 70 65 61 74 70 74 |tflag = |repeatpt|
|00004d80| 72 5b 63 75 72 72 65 70 | 65 61 74 5d 20 3b 0a 58 |r[currep|eat] ;.X|
|00004d90| 09 63 75 72 72 65 70 65 | 61 74 20 2b 3d 20 72 65 |.currepe|at += re|
|00004da0| 70 65 61 74 66 6c 61 67 | 20 3b 0a 58 09 72 6f 77 |peatflag| ;.X.row|
|00004db0| 70 74 72 20 2b 3d 20 72 | 65 70 65 61 74 66 6c 61 |ptr += r|epeatfla|
|00004dc0| 67 20 3b 0a 58 20 20 20 | 20 20 20 7d 0a 58 20 20 |g ;.X | }.X |
|00004dd0| 20 20 20 20 63 75 72 72 | 65 70 65 61 74 2b 2b 20 | curr|epeat++ |
|00004de0| 3b 0a 58 20 20 20 20 7d | 0a 58 20 20 20 20 69 66 |;.X }|.X if|
|00004df0| 20 28 72 6f 77 70 74 72 | 20 3e 3d 20 68 65 69 67 | (rowptr| >= heig|
|00004e00| 68 74 29 20 62 69 74 76 | 61 6c 20 3d 20 2d 31 20 |ht) bitv|al = -1 |
|00004e10| 3b 0a 58 20 20 20 20 65 | 6c 73 65 20 62 69 74 76 |;.X e|lse bitv|
|00004e20| 61 6c 20 3d 20 62 69 74 | 6d 61 70 5b 72 6f 77 70 |al = bit|map[rowp|
|00004e30| 74 72 5d 5b 63 6f 6c 70 | 74 72 5d 20 3b 0a 58 20 |tr][colp|tr] ;.X |
|00004e40| 20 20 20 69 66 20 28 62 | 69 74 76 61 6c 20 3d 3d | if (b|itval ==|
|00004e50| 20 74 65 73 74 29 20 63 | 6f 75 6e 74 2b 2b 20 3b | test) c|ount++ ;|
|00004e60| 0a 58 20 20 20 20 65 6c | 73 65 20 7b 0a 58 20 20 |.X el|se {.X |
|00004e70| 20 20 20 20 62 69 74 63 | 6f 75 6e 74 73 5b 63 75 | bitc|ounts[cu|
|00004e80| 72 70 74 72 2b 2b 5d 20 | 3d 20 63 6f 75 6e 74 20 |rptr++] |= count |
|00004e90| 3b 0a 58 20 20 20 20 20 | 20 69 66 20 28 63 75 72 |;.X | if (cur|
|00004ea0| 70 74 72 2b 33 20 3e 3d | 20 68 65 69 67 68 74 2a |ptr+3 >=| height*|
|00004eb0| 77 69 64 74 68 29 20 7b | 0a 58 09 66 70 72 69 6e |width) {|.X.fprin|
|00004ec0| 74 66 28 73 74 64 65 72 | 72 2c 20 22 20 4f 75 74 |tf(stder|r, " Out|
|00004ed0| 20 6f 66 20 6d 65 6d 6f | 72 79 20 77 68 69 6c 65 | of memo|ry while|
|00004ee0| 20 73 61 76 69 6e 67 20 | 63 68 61 72 61 63 74 65 | saving |characte|
|00004ef0| 72 20 63 6f 75 6e 74 73 | 21 5c 6e 22 29 3b 0a 58 |r counts|!\n");.X|
|00004f00| 09 6a 75 6d 70 6f 75 74 | 28 29 20 3b 0a 58 20 20 |.jumpout|() ;.X |
|00004f10| 20 20 20 20 7d 0a 58 20 | 20 20 20 20 20 63 6f 75 | }.X | cou|
|00004f20| 6e 74 20 3d 20 31 20 3b | 0a 58 20 20 20 20 20 20 |nt = 1 ;|.X |
|00004f30| 74 65 73 74 20 3d 20 62 | 69 74 76 61 6c 20 3b 0a |test = b|itval ;.|
|00004f40| 58 20 20 20 20 20 20 69 | 66 20 28 72 65 70 65 61 |X i|f (repea|
|00004f50| 74 66 6c 61 67 20 3e 20 | 30 29 20 7b 0a 58 09 62 |tflag > |0) {.X.b|
|00004f60| 69 74 63 6f 75 6e 74 73 | 5b 63 75 72 70 74 72 2b |itcounts|[curptr+|
|00004f70| 2b 5d 20 3d 20 2d 72 65 | 70 65 61 74 66 6c 61 67 |+] = -re|peatflag|
|00004f80| 20 3b 0a 58 09 72 65 70 | 65 61 74 66 6c 61 67 20 | ;.X.rep|eatflag |
|00004f90| 3d 20 30 20 3b 0a 58 20 | 20 20 20 20 20 7d 0a 58 |= 0 ;.X | }.X|
|00004fa0| 20 20 20 20 7d 0a 58 20 | 20 7d 20 77 68 69 6c 65 | }.X | } while|
|00004fb0| 20 28 74 65 73 74 20 21 | 3d 20 2d 31 29 20 3b 0a | (test !|= -1) ;.|
|00004fc0| 58 20 20 62 69 74 63 6f | 75 6e 74 73 5b 63 75 72 |X bitco|unts[cur|
|00004fd0| 70 74 72 5d 20 3d 20 30 | 20 3b 0a 58 20 20 62 69 |ptr] = 0| ;.X bi|
|00004fe0| 74 63 6f 75 6e 74 73 5b | 63 75 72 70 74 72 20 2b |tcounts[|curptr +|
|00004ff0| 20 31 5d 20 3d 20 30 20 | 3b 0a 58 20 20 66 6f 72 | 1] = 0 |;.X for|
|00005000| 20 28 69 20 3d 20 31 20 | 3b 20 69 20 3c 3d 20 31 | (i = 1 |; i <= 1|
|00005010| 33 20 3b 20 69 20 2b 2b | 29 20 64 65 72 69 76 5b |3 ; i ++|) deriv[|
|00005020| 69 5d 20 3d 20 30 20 3b | 0a 58 20 20 69 20 3d 20 |i] = 0 ;|.X i = |
|00005030| 66 69 72 73 74 6f 6e 20 | 3d 20 28 62 69 74 63 6f |firston |= (bitco|
|00005040| 75 6e 74 73 5b 30 5d 20 | 3d 3d 20 30 29 20 3b 0a |unts[0] |== 0) ;.|
|00005050| 58 20 20 63 6f 6d 70 73 | 69 7a 65 20 3d 20 30 20 |X comps|ize = 0 |
|00005060| 3b 0a 58 20 20 77 68 69 | 6c 65 20 28 62 69 74 63 |;.X whi|le (bitc|
|00005070| 6f 75 6e 74 73 5b 69 5d | 20 21 3d 20 30 29 20 7b |ounts[i]| != 0) {|
|00005080| 0a 58 20 20 20 20 6a 20 | 3d 20 62 69 74 63 6f 75 |.X j |= bitcou|
|00005090| 6e 74 73 5b 69 5d 20 3b | 0a 58 20 20 20 20 69 66 |nts[i] ;|.X if|
|000050a0| 20 28 6a 20 3d 3d 20 2d | 31 29 20 63 6f 6d 70 73 | (j == -|1) comps|
|000050b0| 69 7a 65 2b 2b 20 3b 0a | 58 20 20 20 20 65 6c 73 |ize++ ;.|X els|
|000050c0| 65 20 7b 0a 58 20 20 20 | 20 20 20 69 66 20 28 6a |e {.X | if (j|
|000050d0| 20 3c 20 30 29 20 7b 0a | 58 09 63 6f 6d 70 73 69 | < 0) {.|X.compsi|
|000050e0| 7a 65 2b 2b 20 3b 0a 58 | 09 6a 20 3d 20 2d 6a 20 |ze++ ;.X|.j = -j |
|000050f0| 3b 0a 58 20 20 20 20 20 | 20 7d 0a 58 20 20 20 20 |;.X | }.X |
|00005100| 20 20 69 66 20 28 6a 20 | 3c 20 32 30 39 29 20 63 | if (j |< 209) c|
|00005110| 6f 6d 70 73 69 7a 65 20 | 2b 3d 20 32 20 3b 0a 58 |ompsize |+= 2 ;.X|
|00005120| 20 20 20 20 20 20 65 6c | 73 65 20 7b 0a 58 09 6b | el|se {.X.k|
|00005130| 20 3d 20 6a 20 2d 20 31 | 39 33 20 3b 0a 58 09 77 | = j - 1|93 ;.X.w|
|00005140| 68 69 6c 65 20 28 6b 20 | 3e 3d 20 31 36 29 20 7b |hile (k |>= 16) {|
|00005150| 0a 58 09 20 20 6b 20 3e | 3e 3d 20 34 20 3b 0a 58 |.X. k >|>= 4 ;.X|
|00005160| 09 20 20 63 6f 6d 70 73 | 69 7a 65 20 2b 3d 20 32 |. comps|ize += 2|
|00005170| 20 3b 0a 58 09 7d 0a 58 | 09 63 6f 6d 70 73 69 7a | ;.X.}.X|.compsiz|
|00005180| 65 2b 2b 20 3b 0a 58 20 | 20 20 20 20 20 7d 0a 58 |e++ ;.X | }.X|
|00005190| 20 20 20 20 20 20 69 66 | 20 28 6a 20 3c 20 31 34 | if| (j < 14|
|000051a0| 29 20 28 64 65 72 69 76 | 5b 6a 5d 29 2d 2d 20 3b |) (deriv|[j])-- ;|
|000051b0| 0a 58 20 20 20 20 20 20 | 65 6c 73 65 20 69 66 20 |.X |else if |
|000051c0| 28 6a 20 3c 20 32 30 39 | 29 20 28 64 65 72 69 76 |(j < 209|) (deriv|
|000051d0| 5b 28 32 32 33 20 2d 20 | 6a 29 20 2f 20 31 35 5d |[(223 - |j) / 15]|
|000051e0| 29 2b 2b 20 3b 0a 58 20 | 20 20 20 20 20 65 6c 73 |)++ ;.X | els|
|000051f0| 65 20 7b 0a 58 09 6b 20 | 3d 20 31 36 20 3b 0a 58 |e {.X.k |= 16 ;.X|
|00005200| 09 77 68 69 6c 65 20 28 | 28 28 6b 3c 3c 34 29 20 |.while (|((k<<4) |
|00005210| 3c 20 6a 20 2b 20 33 29 | 29 20 6b 20 3c 3c 3d 20 |< j + 3)|) k <<= |
|00005220| 34 20 3b 0a 58 09 69 66 | 20 28 6a 20 2d 20 6b 20 |4 ;.X.if| (j - k |
|00005230| 3c 3d 20 31 39 32 29 0a | 58 09 20 20 64 65 72 69 |<= 192).|X. deri|
|00005240| 76 5b 28 32 30 37 20 2d | 20 6a 20 2b 20 6b 29 20 |v[(207 -| j + k) |
|00005250| 2f 20 31 35 5d 20 2b 3d | 20 32 20 3b 0a 58 20 20 |/ 15] +=| 2 ;.X |
|00005260| 20 20 20 20 7d 0a 58 20 | 20 20 20 7d 0a 58 20 20 | }.X | }.X |
|00005270| 20 20 69 2b 2b 20 3b 0a | 58 20 20 7d 0a 58 20 20 | i++ ;.|X }.X |
|00005280| 62 63 6f 6d 70 73 69 7a | 65 20 3d 20 63 6f 6d 70 |bcompsiz|e = comp|
|00005290| 73 69 7a 65 20 3b 0a 58 | 20 20 64 79 6e 66 20 3d |size ;.X| dynf =|
|000052a0| 20 30 20 3b 0a 58 20 20 | 66 6f 72 20 28 69 20 3d | 0 ;.X |for (i =|
|000052b0| 20 31 20 3b 20 69 20 3c | 3d 20 31 33 20 3b 20 69 | 1 ; i <|= 13 ; i|
|000052c0| 20 2b 2b 29 20 7b 0a 58 | 20 20 20 20 63 6f 6d 70 | ++) {.X| comp|
|000052d0| 73 69 7a 65 20 2b 3d 20 | 64 65 72 69 76 5b 69 5d |size += |deriv[i]|
|000052e0| 20 3b 0a 58 20 20 20 20 | 69 66 20 28 63 6f 6d 70 | ;.X |if (comp|
|000052f0| 73 69 7a 65 20 3c 3d 20 | 62 63 6f 6d 70 73 69 7a |size <= |bcompsiz|
|00005300| 65 29 20 7b 0a 58 20 20 | 20 20 20 20 62 63 6f 6d |e) {.X | bcom|
|00005310| 70 73 69 7a 65 20 3d 20 | 63 6f 6d 70 73 69 7a 65 |psize = |compsize|
|00005320| 20 3b 0a 58 20 20 20 20 | 20 20 64 79 6e 66 20 3d | ;.X | dynf =|
|00005330| 20 69 20 3b 0a 58 20 20 | 20 20 7d 0a 58 20 20 7d | i ;.X | }.X }|
|00005340| 0a 58 20 20 63 6f 6d 70 | 73 69 7a 65 20 3d 20 28 |.X comp|size = (|
|00005350| 28 62 63 6f 6d 70 73 69 | 7a 65 20 2b 20 31 29 3e |(bcompsi|ze + 1)>|
|00005360| 3e 31 29 20 3b 0a 58 20 | 20 69 66 20 28 28 63 6f |>1) ;.X | if ((co|
|00005370| 6d 70 73 69 7a 65 20 3e | 20 28 28 68 65 69 67 68 |mpsize >| ((heigh|
|00005380| 74 2a 77 69 64 74 68 2b | 37 29 3e 3e 33 29 29 20 |t*width+|7)>>3)) |
|00005390| 7c 7c 20 28 68 65 69 67 | 68 74 2a 77 69 64 74 68 ||| (heig|ht*width|
|000053a0| 20 3d 3d 20 30 29 29 20 | 7b 0a 58 20 20 20 20 63 | == 0)) |{.X c|
|000053b0| 6f 6d 70 73 69 7a 65 20 | 3d 20 28 28 68 65 69 67 |ompsize |= ((heig|
|000053c0| 68 74 2a 77 69 64 74 68 | 2b 37 29 3e 3e 33 29 20 |ht*width|+7)>>3) |
|000053d0| 3b 0a 58 20 20 20 20 64 | 79 6e 66 20 3d 20 31 34 |;.X d|ynf = 14|
|000053e0| 20 3b 0a 58 20 20 7d 0a | 58 20 20 66 6c 61 67 62 | ;.X }.|X flagb|
|000053f0| 79 74 65 20 3d 20 28 64 | 79 6e 66 3c 3c 34 29 20 |yte = (d|ynf<<4) |
|00005400| 3b 0a 58 20 20 69 66 20 | 28 66 69 72 73 74 6f 6e |;.X if |(firston|
|00005410| 29 20 66 6c 61 67 62 79 | 74 65 20 7c 3d 20 38 20 |) flagby|te |= 8 |
|00005420| 3b 0a 58 20 20 69 66 20 | 28 28 74 66 77 69 64 20 |;.X if |((tfwid |
|00005430| 3e 20 31 36 37 37 37 32 | 31 35 29 20 7c 7c 20 28 |> 167772|15) || (|
|00005440| 74 66 77 69 64 20 3c 20 | 30 29 20 7c 7c 20 28 68 |tfwid < |0) || (h|
|00005450| 65 73 63 20 3c 20 30 29 | 20 7c 7c 20 28 76 65 73 |esc < 0)| || (ves|
|00005460| 63 20 21 3d 20 30 29 20 | 7c 7c 0a 58 20 20 20 20 |c != 0) |||.X |
|00005470| 20 20 28 63 6f 6d 70 73 | 69 7a 65 20 3e 20 31 39 | (comps|ize > 19|
|00005480| 36 35 37 39 29 20 7c 7c | 20 28 77 69 64 74 68 20 |6579) ||| (width |
|00005490| 3e 20 36 35 35 33 35 29 | 20 7c 7c 20 28 68 65 69 |> 65535)| || (hei|
|000054a0| 67 68 74 20 3e 20 36 35 | 35 33 35 29 20 7c 7c 0a |ght > 65|535) ||.|
|000054b0| 58 20 20 20 20 20 20 28 | 78 6f 66 66 20 3e 20 33 |X (|xoff > 3|
|000054c0| 32 37 36 37 29 20 7c 7c | 20 28 79 6f 66 66 20 3e |2767) ||| (yoff >|
|000054d0| 20 33 32 37 36 37 29 20 | 7c 7c 20 28 78 6f 66 66 | 32767) ||| (xoff|
|000054e0| 20 3c 20 2d 33 32 37 36 | 38 29 20 7c 7c 20 28 79 | < -3276|8) || (y|
|000054f0| 6f 66 66 20 3c 20 2d 33 | 32 37 36 38 29 29 20 7b |off < -3|2768)) {|
|00005500| 0a 58 20 20 20 20 66 6c | 61 67 62 79 74 65 20 7c |.X fl|agbyte ||
|00005510| 3d 20 37 20 3b 0a 58 20 | 20 20 20 70 6b 62 79 74 |= 7 ;.X | pkbyt|
|00005520| 65 28 66 6c 61 67 62 79 | 74 65 29 20 3b 0a 58 20 |e(flagby|te) ;.X |
|00005530| 20 20 20 63 6f 6d 70 73 | 69 7a 65 20 2b 3d 20 32 | comps|ize += 2|
|00005540| 38 20 3b 0a 58 20 20 20 | 20 70 6b 77 6f 72 64 28 |8 ;.X | pkword(|
|00005550| 63 6f 6d 70 73 69 7a 65 | 29 20 3b 0a 58 20 20 20 |compsize|) ;.X |
|00005560| 20 70 6b 77 6f 72 64 28 | 63 61 72 29 20 3b 0a 58 | pkword(|car) ;.X|
|00005570| 20 20 20 20 70 72 65 64 | 70 6b 6c 6f 63 20 3d 20 | pred|pkloc = |
|00005580| 70 6b 6c 6f 63 20 2b 20 | 63 6f 6d 70 73 69 7a 65 |pkloc + |compsize|
|00005590| 20 3b 0a 58 20 20 20 20 | 70 6b 77 6f 72 64 28 74 | ;.X |pkword(t|
|000055a0| 66 77 69 64 29 20 3b 0a | 58 20 20 20 20 70 6b 77 |fwid) ;.|X pkw|
|000055b0| 6f 72 64 28 68 65 73 63 | 3c 3c 31 36 29 20 3b 0a |ord(hesc|<<16) ;.|
|000055c0| 58 20 20 20 20 70 6b 77 | 6f 72 64 28 76 65 73 63 |X pkw|ord(vesc|
|000055d0| 3c 3c 31 36 29 20 3b 0a | 58 20 20 20 20 70 6b 77 |<<16) ;.|X pkw|
|000055e0| 6f 72 64 28 77 69 64 74 | 68 29 20 3b 0a 58 20 20 |ord(widt|h) ;.X |
|000055f0| 20 20 70 6b 77 6f 72 64 | 28 68 65 69 67 68 74 29 | pkword|(height)|
|00005600| 20 3b 0a 58 20 20 20 20 | 70 6b 77 6f 72 64 28 78 | ;.X |pkword(x|
|00005610| 6f 66 66 29 20 3b 0a 58 | 20 20 20 20 70 6b 77 6f |off) ;.X| pkwo|
|00005620| 72 64 28 79 6f 66 66 29 | 20 3b 0a 58 20 20 7d 20 |rd(yoff)| ;.X } |
|00005630| 65 6c 73 65 20 69 66 20 | 28 28 68 65 73 63 20 3e |else if |((hesc >|
|00005640| 20 32 35 35 29 20 7c 7c | 20 28 77 69 64 74 68 20 | 255) ||| (width |
|00005650| 3e 20 32 35 35 29 20 7c | 7c 20 28 68 65 69 67 68 |> 255) ||| (heigh|
|00005660| 74 20 3e 20 32 35 35 29 | 20 7c 7c 0a 58 09 20 20 |t > 255)| ||.X. |
|00005670| 20 28 78 6f 66 66 20 3e | 20 31 32 37 29 20 7c 7c | (xoff >| 127) |||
|00005680| 20 28 79 6f 66 66 20 3e | 20 31 32 37 29 20 7c 7c | (yoff >| 127) |||
|00005690| 20 28 78 6f 66 66 20 3c | 20 2d 31 32 38 29 20 7c | (xoff <| -128) ||
|000056a0| 7c 0a 58 09 20 20 20 28 | 79 6f 66 66 20 3c 20 2d ||.X. (|yoff < -|
|000056b0| 31 32 38 29 20 7c 7c 20 | 28 63 6f 6d 70 73 69 7a |128) || |(compsiz|
|000056c0| 65 20 3e 20 31 30 31 36 | 29 29 20 7b 0a 58 20 20 |e > 1016|)) {.X |
|000056d0| 20 20 63 6f 6d 70 73 69 | 7a 65 20 2b 3d 20 31 33 | compsi|ze += 13|
|000056e0| 20 3b 0a 58 20 20 20 20 | 66 6c 61 67 62 79 74 65 | ;.X |flagbyte|
|000056f0| 20 2b 3d 20 28 63 6f 6d | 70 73 69 7a 65 3e 3e 31 | += (com|psize>>1|
|00005700| 36 29 20 2b 20 34 20 3b | 0a 58 20 20 20 20 70 6b |6) + 4 ;|.X pk|
|00005710| 62 79 74 65 28 66 6c 61 | 67 62 79 74 65 29 20 3b |byte(fla|gbyte) ;|
|00005720| 0a 58 20 20 20 20 70 6b | 68 61 6c 66 77 6f 72 64 |.X pk|halfword|
|00005730| 28 63 6f 6d 70 73 69 7a | 65 20 26 20 36 35 35 33 |(compsiz|e & 6553|
|00005740| 35 29 20 3b 0a 58 20 20 | 20 20 70 6b 62 79 74 65 |5) ;.X | pkbyte|
|00005750| 28 63 61 72 29 20 3b 0a | 58 20 20 20 20 70 72 65 |(car) ;.|X pre|
|00005760| 64 70 6b 6c 6f 63 20 3d | 20 70 6b 6c 6f 63 20 2b |dpkloc =| pkloc +|
|00005770| 20 63 6f 6d 70 73 69 7a | 65 20 3b 0a 58 20 20 20 | compsiz|e ;.X |
|00005780| 20 70 6b 74 68 72 65 65 | 62 79 74 65 73 28 74 66 | pkthree|bytes(tf|
|00005790| 77 69 64 29 20 3b 0a 58 | 20 20 20 20 70 6b 68 61 |wid) ;.X| pkha|
|000057a0| 6c 66 77 6f 72 64 28 68 | 65 73 63 29 20 3b 0a 58 |lfword(h|esc) ;.X|
|000057b0| 20 20 20 20 70 6b 68 61 | 6c 66 77 6f 72 64 28 77 | pkha|lfword(w|
|000057c0| 69 64 74 68 29 20 3b 0a | 58 20 20 20 20 70 6b 68 |idth) ;.|X pkh|
|000057d0| 61 6c 66 77 6f 72 64 28 | 68 65 69 67 68 74 29 20 |alfword(|height) |
|000057e0| 3b 0a 58 20 20 20 20 70 | 6b 68 61 6c 66 77 6f 72 |;.X p|khalfwor|
|000057f0| 64 28 78 6f 66 66 29 20 | 3b 0a 58 20 20 20 20 70 |d(xoff) |;.X p|
|00005800| 6b 68 61 6c 66 77 6f 72 | 64 28 79 6f 66 66 29 20 |khalfwor|d(yoff) |
|00005810| 3b 0a 58 20 20 7d 20 65 | 6c 73 65 20 7b 0a 58 20 |;.X } e|lse {.X |
|00005820| 20 20 20 63 6f 6d 70 73 | 69 7a 65 20 2b 3d 20 38 | comps|ize += 8|
|00005830| 20 3b 0a 58 20 20 20 20 | 66 6c 61 67 62 79 74 65 | ;.X |flagbyte|
|00005840| 20 3d 20 66 6c 61 67 62 | 79 74 65 20 2b 20 28 63 | = flagb|yte + (c|
|00005850| 6f 6d 70 73 69 7a 65 3e | 3e 38 29 20 3b 0a 58 20 |ompsize>|>8) ;.X |
|00005860| 20 20 20 70 6b 62 79 74 | 65 28 66 6c 61 67 62 79 | pkbyt|e(flagby|
|00005870| 74 65 29 20 3b 0a 58 20 | 20 20 20 70 6b 62 79 74 |te) ;.X | pkbyt|
|00005880| 65 28 63 6f 6d 70 73 69 | 7a 65 20 26 20 32 35 35 |e(compsi|ze & 255|
|00005890| 29 20 3b 0a 58 20 20 20 | 20 70 6b 62 79 74 65 28 |) ;.X | pkbyte(|
|000058a0| 63 61 72 29 20 3b 0a 58 | 20 20 20 20 70 72 65 64 |car) ;.X| pred|
|000058b0| 70 6b 6c 6f 63 20 3d 20 | 70 6b 6c 6f 63 20 2b 20 |pkloc = |pkloc + |
|000058c0| 63 6f 6d 70 73 69 7a 65 | 20 3b 0a 58 20 20 20 20 |compsize| ;.X |
|000058d0| 70 6b 74 68 72 65 65 62 | 79 74 65 73 28 74 66 77 |pkthreeb|ytes(tfw|
|000058e0| 69 64 29 20 3b 0a 58 20 | 20 20 20 70 6b 62 79 74 |id) ;.X | pkbyt|
|000058f0| 65 28 68 65 73 63 29 20 | 3b 0a 58 20 20 20 20 70 |e(hesc) |;.X p|
|00005900| 6b 62 79 74 65 28 77 69 | 64 74 68 29 20 3b 0a 58 |kbyte(wi|dth) ;.X|
|00005910| 20 20 20 20 70 6b 62 79 | 74 65 28 68 65 69 67 68 | pkby|te(heigh|
|00005920| 74 29 20 3b 0a 58 20 20 | 20 20 70 6b 62 79 74 65 |t) ;.X | pkbyte|
|00005930| 28 78 6f 66 66 29 20 3b | 0a 58 20 20 20 20 70 6b |(xoff) ;|.X pk|
|00005940| 62 79 74 65 28 79 6f 66 | 66 29 20 3b 0a 58 20 20 |byte(yof|f) ;.X |
|00005950| 7d 0a 58 20 20 69 66 20 | 28 64 79 6e 66 20 21 3d |}.X if |(dynf !=|
|00005960| 20 31 34 29 20 7b 0a 58 | 20 20 20 20 62 69 74 77 | 14) {.X| bitw|
|00005970| 65 69 67 68 74 20 3d 20 | 31 36 20 3b 0a 58 20 20 |eight = |16 ;.X |
|00005980| 20 20 6d 61 78 32 20 3d | 20 32 30 38 20 2d 20 31 | max2 =| 208 - 1|
|00005990| 35 20 2a 20 64 79 6e 66 | 20 3b 0a 58 20 20 20 20 |5 * dynf| ;.X |
|000059a0| 69 20 3d 20 66 69 72 73 | 74 6f 6e 20 3b 0a 58 20 |i = firs|ton ;.X |
|000059b0| 20 20 20 77 68 69 6c 65 | 20 28 62 69 74 63 6f 75 | while| (bitcou|
|000059c0| 6e 74 73 5b 69 5d 20 21 | 3d 20 30 29 20 7b 0a 58 |nts[i] !|= 0) {.X|
|000059d0| 20 20 20 20 20 20 6a 20 | 3d 20 62 69 74 63 6f 75 | j |= bitcou|
|000059e0| 6e 74 73 5b 69 5d 20 3b | 0a 58 20 20 20 20 20 20 |nts[i] ;|.X |
|000059f0| 69 66 20 28 6a 20 3d 3d | 20 2d 20 31 29 20 70 6b |if (j ==| - 1) pk|
|00005a00| 6e 79 62 28 31 35 29 20 | 3b 0a 58 20 20 20 20 20 |nyb(15) |;.X |
|00005a10| 20 65 6c 73 65 20 7b 0a | 58 09 69 66 20 28 6a 20 | else {.|X.if (j |
|00005a20| 3c 20 30 29 20 7b 0a 58 | 09 20 20 70 6b 6e 79 62 |< 0) {.X|. pknyb|
|00005a30| 28 31 34 29 20 3b 0a 58 | 09 20 20 6a 20 3d 20 2d |(14) ;.X|. j = -|
|00005a40| 6a 20 3b 0a 58 09 7d 0a | 58 09 69 66 20 28 6a 20 |j ;.X.}.|X.if (j |
|00005a50| 3c 3d 20 64 79 6e 66 29 | 20 70 6b 6e 79 62 28 6a |<= dynf)| pknyb(j|
|00005a60| 29 20 3b 0a 58 09 65 6c | 73 65 20 69 66 20 28 6a |) ;.X.el|se if (j|
|00005a70| 20 3c 3d 20 6d 61 78 32 | 29 20 7b 0a 58 09 20 20 | <= max2|) {.X. |
|00005a80| 6a 20 2d 3d 20 64 79 6e | 66 20 2b 20 31 20 3b 0a |j -= dyn|f + 1 ;.|
|00005a90| 58 09 20 20 70 6b 6e 79 | 62 28 28 6a 20 3e 3e 20 |X. pkny|b((j >> |
|00005aa0| 34 29 20 2b 20 64 79 6e | 66 20 2b 20 31 29 20 3b |4) + dyn|f + 1) ;|
|00005ab0| 0a 58 09 20 20 70 6b 6e | 79 62 28 28 6a 20 26 20 |.X. pkn|yb((j & |
|00005ac0| 31 35 29 29 20 3b 0a 58 | 09 7d 20 65 6c 73 65 20 |15)) ;.X|.} else |
|00005ad0| 7b 0a 58 09 20 20 6a 20 | 2d 3d 20 6d 61 78 32 20 |{.X. j |-= max2 |
|00005ae0| 2d 20 31 35 20 3b 0a 58 | 09 20 20 6b 20 3d 20 31 |- 15 ;.X|. k = 1|
|00005af0| 36 20 3b 0a 58 09 20 20 | 77 68 69 6c 65 20 28 6b |6 ;.X. |while (k|
|00005b00| 20 3c 3d 20 6a 29 20 7b | 0a 58 09 20 20 20 20 6b | <= j) {|.X. k|
|00005b10| 20 3c 3c 3d 20 34 20 3b | 0a 58 09 20 20 20 20 70 | <<= 4 ;|.X. p|
|00005b20| 6b 6e 79 62 28 30 29 20 | 3b 0a 58 09 20 20 7d 0a |knyb(0) |;.X. }.|
|00005b30| 58 09 20 20 77 68 69 6c | 65 20 28 6b 20 3e 20 31 |X. whil|e (k > 1|
|00005b40| 29 20 7b 0a 58 09 20 20 | 20 20 6b 20 3e 3e 3d 20 |) {.X. | k >>= |
|00005b50| 34 20 3b 0a 58 09 20 20 | 20 20 70 6b 6e 79 62 28 |4 ;.X. | pknyb(|
|00005b60| 6a 20 2f 20 6b 29 20 3b | 0a 58 09 20 20 20 20 6a |j / k) ;|.X. j|
|00005b70| 20 3d 20 6a 20 25 20 6b | 20 3b 0a 58 09 20 20 7d | = j % k| ;.X. }|
|00005b80| 0a 58 09 7d 0a 58 20 20 | 20 20 20 20 7d 0a 58 20 |.X.}.X | }.X |
|00005b90| 20 20 20 20 20 69 2b 2b | 20 3b 0a 58 20 20 20 20 | i++| ;.X |
|00005ba0| 7d 0a 58 20 20 20 20 69 | 66 20 28 62 69 74 77 65 |}.X i|f (bitwe|
|00005bb0| 69 67 68 74 20 21 3d 20 | 31 36 29 20 70 6b 62 79 |ight != |16) pkby|
|00005bc0| 74 65 28 6f 75 74 70 75 | 74 62 79 74 65 29 20 3b |te(outpu|tbyte) ;|
|00005bd0| 0a 58 20 20 7d 20 65 6c | 73 65 20 7b 0a 58 20 20 |.X } el|se {.X |
|00005be0| 20 20 62 75 66 66 20 3d | 20 30 20 3b 0a 58 20 20 | buff =| 0 ;.X |
|00005bf0| 20 20 70 62 69 74 20 3d | 20 38 20 3b 0a 58 20 20 | pbit =| 8 ;.X |
|00005c00| 20 20 69 20 3d 20 66 69 | 72 73 74 6f 6e 20 3b 0a | i = fi|rston ;.|
|00005c10| 58 20 20 20 20 68 62 69 | 74 20 3d 20 77 69 64 74 |X hbi|t = widt|
|00005c20| 68 20 3b 0a 58 20 20 20 | 20 6f 6e 20 3d 20 21 20 |h ;.X | on = ! |
|00005c30| 66 69 72 73 74 6f 6e 20 | 3b 0a 58 20 20 20 20 73 |firston |;.X s|
|00005c40| 74 61 74 65 20 3d 20 66 | 61 6c 73 65 20 3b 0a 58 |tate = f|alse ;.X|
|00005c50| 20 20 20 20 63 6f 75 6e | 74 20 3d 20 72 65 70 65 | coun|t = repe|
|00005c60| 61 74 66 6c 61 67 20 3d | 20 30 20 3b 0a 58 20 20 |atflag =| 0 ;.X |
|00005c70| 20 20 77 68 69 6c 65 20 | 28 28 62 69 74 63 6f 75 | while |((bitcou|
|00005c80| 6e 74 73 5b 69 5d 20 21 | 3d 20 30 29 20 7c 7c 20 |nts[i] !|= 0) || |
|00005c90| 73 74 61 74 65 20 7c 7c | 20 28 63 6f 75 6e 74 20 |state ||| (count |
|00005ca0| 3e 20 30 29 29 20 7b 0a | 58 20 20 20 20 20 20 69 |> 0)) {.|X i|
|00005cb0| 66 20 28 73 74 61 74 65 | 29 20 7b 0a 58 09 63 6f |f (state|) {.X.co|
|00005cc0| 75 6e 74 20 3d 20 72 63 | 6f 75 6e 74 20 3b 0a 58 |unt = rc|ount ;.X|
|00005cd0| 09 69 20 3d 20 72 69 20 | 3b 0a 58 09 6f 6e 20 3d |.i = ri |;.X.on =|
|00005ce0| 20 72 6f 6e 20 3b 0a 58 | 09 72 65 70 65 61 74 66 | ron ;.X|.repeatf|
|00005cf0| 6c 61 67 2d 2d 20 3b 0a | 58 20 20 20 20 20 20 7d |lag-- ;.|X }|
|00005d00| 20 65 6c 73 65 20 7b 0a | 58 09 72 63 6f 75 6e 74 | else {.|X.rcount|
|00005d10| 20 3d 20 63 6f 75 6e 74 | 20 3b 0a 58 09 72 69 20 | = count| ;.X.ri |
|00005d20| 3d 20 69 20 3b 0a 58 09 | 72 6f 6e 20 3d 20 6f 6e |= i ;.X.|ron = on|
|00005d30| 20 3b 0a 58 20 20 20 20 | 20 20 7d 0a 58 20 20 20 | ;.X | }.X |
|00005d40| 20 20 20 64 6f 20 7b 0a | 58 09 69 66 20 28 63 6f | do {.|X.if (co|
|00005d50| 75 6e 74 20 3d 3d 20 30 | 29 20 7b 0a 58 09 20 20 |unt == 0|) {.X. |
|00005d60| 69 66 20 28 62 69 74 63 | 6f 75 6e 74 73 5b 69 5d |if (bitc|ounts[i]|
|00005d70| 20 3c 20 30 29 20 7b 0a | 58 09 20 20 20 20 69 66 | < 0) {.|X. if|
|00005d80| 20 28 21 20 73 74 61 74 | 65 29 20 72 65 70 65 61 | (! stat|e) repea|
|00005d90| 74 66 6c 61 67 20 3d 20 | 2d 62 69 74 63 6f 75 6e |tflag = |-bitcoun|
|00005da0| 74 73 5b 69 5d 20 3b 0a | 58 09 20 20 20 20 69 2b |ts[i] ;.|X. i+|
|00005db0| 2b 20 3b 0a 58 09 20 20 | 7d 0a 58 09 20 20 63 6f |+ ;.X. |}.X. co|
|00005dc0| 75 6e 74 20 3d 20 62 69 | 74 63 6f 75 6e 74 73 5b |unt = bi|tcounts[|
|00005dd0| 69 5d 20 3b 0a 58 09 20 | 20 69 2b 2b 20 3b 0a 58 |i] ;.X. | i++ ;.X|
|00005de0| 09 20 20 6f 6e 20 3d 20 | 21 6f 6e 20 3b 0a 58 09 |. on = |!on ;.X.|
|00005df0| 7d 0a 58 09 69 66 20 28 | 28 63 6f 75 6e 74 20 3e |}.X.if (|(count >|
|00005e00| 3d 20 70 62 69 74 29 20 | 26 26 20 28 70 62 69 74 |= pbit) |&& (pbit|
|00005e10| 20 3c 20 68 62 69 74 29 | 29 20 7b 0a 58 09 20 20 | < hbit)|) {.X. |
|00005e20| 69 66 20 28 6f 6e 29 20 | 62 75 66 66 20 2b 3d 20 |if (on) |buff += |
|00005e30| 70 6f 77 65 72 5b 70 62 | 69 74 5d 20 2d 20 31 20 |power[pb|it] - 1 |
|00005e40| 3b 0a 58 09 20 20 70 6b | 62 79 74 65 28 62 75 66 |;.X. pk|byte(buf|
|00005e50| 66 29 20 3b 0a 58 09 20 | 20 62 75 66 66 20 3d 20 |f) ;.X. | buff = |
|00005e60| 30 20 3b 0a 58 09 20 20 | 68 62 69 74 20 2d 3d 20 |0 ;.X. |hbit -= |
|00005e70| 70 62 69 74 20 3b 0a 58 | 09 20 20 63 6f 75 6e 74 |pbit ;.X|. count|
|00005e80| 20 2d 3d 20 70 62 69 74 | 20 3b 0a 58 09 20 20 70 | -= pbit| ;.X. p|
|00005e90| 62 69 74 20 3d 20 38 20 | 3b 0a 58 09 7d 20 65 6c |bit = 8 |;.X.} el|
|00005ea0| 73 65 20 69 66 20 28 28 | 63 6f 75 6e 74 20 3c 20 |se if ((|count < |
|00005eb0| 70 62 69 74 29 20 26 26 | 20 28 63 6f 75 6e 74 20 |pbit) &&| (count |
|00005ec0| 3c 20 68 62 69 74 29 29 | 20 7b 0a 58 09 20 20 69 |< hbit))| {.X. i|
|00005ed0| 66 20 28 6f 6e 29 20 62 | 75 66 66 20 2b 3d 20 70 |f (on) b|uff += p|
|00005ee0| 6f 77 65 72 5b 70 62 69 | 74 5d 20 2d 20 70 6f 77 |ower[pbi|t] - pow|
|00005ef0| 65 72 5b 70 62 69 74 20 | 2d 20 63 6f 75 6e 74 5d |er[pbit |- count]|
|00005f00| 20 3b 0a 58 09 20 20 70 | 62 69 74 20 2d 3d 20 20 | ;.X. p|bit -= |
|00005f10| 63 6f 75 6e 74 20 3b 0a | 58 09 20 20 68 62 69 74 |count ;.|X. hbit|
|00005f20| 20 2d 3d 20 63 6f 75 6e | 74 20 3b 0a 58 09 20 20 | -= coun|t ;.X. |
|00005f30| 63 6f 75 6e 74 20 3d 20 | 30 20 3b 0a 58 09 7d 20 |count = |0 ;.X.} |
|00005f40| 65 6c 73 65 20 7b 0a 58 | 09 20 20 69 66 20 28 6f |else {.X|. if (o|
|00005f50| 6e 29 20 62 75 66 66 20 | 2b 3d 20 70 6f 77 65 72 |n) buff |+= power|
|00005f60| 5b 70 62 69 74 5d 20 2d | 20 70 6f 77 65 72 5b 70 |[pbit] -| power[p|
|00005f70| 62 69 74 20 2d 20 68 62 | 69 74 5d 20 3b 0a 58 09 |bit - hb|it] ;.X.|
|00005f80| 20 20 63 6f 75 6e 74 20 | 2d 3d 20 68 62 69 74 20 | count |-= hbit |
|00005f90| 3b 0a 58 09 20 20 70 62 | 69 74 20 2d 3d 20 68 62 |;.X. pb|it -= hb|
|00005fa0| 69 74 20 3b 0a 58 09 20 | 20 68 62 69 74 20 3d 20 |it ;.X. | hbit = |
|00005fb0| 77 69 64 74 68 20 3b 0a | 58 09 20 20 69 66 20 28 |width ;.|X. if (|
|00005fc0| 70 62 69 74 20 3d 3d 20 | 30 29 20 7b 0a 58 09 20 |pbit == |0) {.X. |
|00005fd0| 20 20 20 70 6b 62 79 74 | 65 28 62 75 66 66 29 20 | pkbyt|e(buff) |
|00005fe0| 3b 0a 58 09 20 20 20 20 | 62 75 66 66 20 3d 20 30 |;.X. |buff = 0|
|00005ff0| 20 3b 0a 58 09 20 20 20 | 20 70 62 69 74 20 3d 20 | ;.X. | pbit = |
|00006000| 38 20 3b 0a 58 09 20 20 | 7d 0a 58 09 7d 0a 58 20 |8 ;.X. |}.X.}.X |
|00006010| 20 20 20 20 20 7d 20 77 | 68 69 6c 65 20 28 68 62 | } w|hile (hb|
|00006020| 69 74 20 21 3d 20 77 69 | 64 74 68 29 20 3b 0a 58 |it != wi|dth) ;.X|
|00006030| 20 20 20 20 20 20 69 66 | 20 28 73 74 61 74 65 20 | if| (state |
|00006040| 26 26 20 28 72 65 70 65 | 61 74 66 6c 61 67 20 3d |&& (repe|atflag =|
|00006050| 3d 20 30 29 29 20 7b 0a | 58 09 63 6f 75 6e 74 20 |= 0)) {.|X.count |
|00006060| 3d 20 73 63 6f 75 6e 74 | 20 3b 0a 58 09 69 20 3d |= scount| ;.X.i =|
|00006070| 20 73 69 20 3b 0a 58 09 | 6f 6e 20 3d 20 73 6f 6e | si ;.X.|on = son|
|00006080| 20 3b 0a 58 09 73 74 61 | 74 65 20 3d 20 66 61 6c | ;.X.sta|te = fal|
|00006090| 73 65 20 3b 0a 58 20 20 | 20 20 20 20 7d 20 65 6c |se ;.X | } el|
|000060a0| 73 65 20 69 66 20 28 21 | 20 73 74 61 74 65 20 26 |se if (!| state &|
|000060b0| 26 20 28 72 65 70 65 61 | 74 66 6c 61 67 20 3e 20 |& (repea|tflag > |
|000060c0| 30 29 29 20 7b 0a 58 09 | 73 63 6f 75 6e 74 20 3d |0)) {.X.|scount =|
|000060d0| 20 63 6f 75 6e 74 20 3b | 0a 58 09 73 69 20 3d 20 | count ;|.X.si = |
|000060e0| 69 20 3b 0a 58 09 73 6f | 6e 20 3d 20 6f 6e 20 3b |i ;.X.so|n = on ;|
|000060f0| 0a 58 09 73 74 61 74 65 | 20 3d 20 74 72 75 65 20 |.X.state| = true |
|00006100| 3b 0a 58 20 20 20 20 20 | 20 7d 0a 58 20 20 20 20 |;.X | }.X |
|00006110| 7d 0a 58 20 20 20 20 69 | 66 20 28 70 62 69 74 20 |}.X i|f (pbit |
|00006120| 21 3d 20 38 29 20 70 6b | 62 79 74 65 28 62 75 66 |!= 8) pk|byte(buf|
|00006130| 66 29 20 3b 0a 58 20 20 | 7d 0a 58 20 20 69 66 20 |f) ;.X |}.X if |
|00006140| 28 70 72 65 64 70 6b 6c | 6f 63 20 21 3d 20 70 6b |(predpkl|oc != pk|
|00006150| 6c 6f 63 29 20 7b 0a 58 | 20 20 20 20 66 70 72 69 |loc) {.X| fpri|
|00006160| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 20 42 61 |ntf(stde|rr, " Ba|
|00006170| 64 20 70 72 65 64 69 63 | 74 65 64 20 63 68 61 72 |d predic|ted char|
|00006180| 61 63 74 65 72 20 6c 65 | 6e 67 74 68 3a 20 63 68 |acter le|ngth: ch|
|00006190| 61 72 61 63 74 65 72 20 | 25 64 21 5c 6e 22 2c 20 |aracter |%d!\n", |
|000061a0| 63 61 72 29 3b 0a 58 20 | 20 20 20 6a 75 6d 70 6f |car);.X | jumpo|
|000061b0| 75 74 28 29 20 3b 0a 58 | 20 20 7d 0a 58 20 20 70 |ut() ;.X| }.X p|
|000061c0| 62 6d 5f 66 72 65 65 72 | 6f 77 28 7a 65 72 6f 72 |bm_freer|ow(zeror|
|000061d0| 6f 77 29 3b 20 0a 58 20 | 20 70 62 6d 5f 66 72 65 |ow); .X | pbm_fre|
|000061e0| 65 72 6f 77 28 6f 6e 65 | 73 72 6f 77 29 3b 20 0a |erow(one|srow); .|
|000061f0| 58 20 20 66 72 65 65 28 | 28 63 68 61 72 20 2a 29 |X free(|(char *)|
|00006200| 72 65 70 65 61 74 70 74 | 72 29 3b 0a 58 20 20 66 |repeatpt|r);.X f|
|00006210| 72 65 65 28 28 63 68 61 | 72 20 2a 29 62 69 74 63 |ree((cha|r *)bitc|
|00006220| 6f 75 6e 74 73 29 3b 0a | 58 7d 0a 58 0a 58 75 73 |ounts);.|X}.X.Xus|
|00006230| 61 67 65 28 29 0a 58 7b | 0a 58 20 20 66 70 72 69 |age().X{|.X fpri|
|00006240| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 20 55 73 |ntf(stde|rr, " Us|
|00006250| 61 67 65 3a 20 70 62 6d | 74 6f 70 6b 20 70 6b 66 |age: pbm|topk pkf|
|00006260| 69 6c 65 5b 2e 70 6b 5d | 20 74 66 6d 66 69 6c 65 |ile[.pk]| tfmfile|
|00006270| 5b 2e 74 66 6d 5d 20 64 | 70 69 5c 6e 22 29 20 3b |[.tfm] d|pi\n") ;|
|00006280| 0a 58 20 20 66 70 72 69 | 6e 74 66 28 73 74 64 65 |.X fpri|ntf(stde|
|00006290| 72 72 2c 20 22 20 20 20 | 20 20 20 20 20 20 20 20 |rr, " | |
|000062a0| 20 20 20 20 20 5b 2d 73 | 20 64 65 73 69 67 6e 73 | [-s| designs|
|000062b0| 69 7a 65 5d 20 5b 2d 70 | 20 6e 75 6d 20 70 61 72 |ize] [-p| num par|
|000062c0| 61 6d 2e 2e 2e 5d 5c 6e | 22 29 3b 0a 58 20 20 66 |am...]\n|");.X f|
|000062d0| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|000062e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000062f0| 5b 2d 43 20 63 6f 64 69 | 6e 67 73 63 68 65 6d 65 |[-C codi|ngscheme|
|00006300| 20 5d 20 5b 2d 46 20 66 | 61 6d 69 6c 79 5d 5c 6e | ] [-F f|amily]\n|
|00006310| 22 29 3b 0a 58 20 20 66 | 70 72 69 6e 74 66 28 73 |");.X f|printf(s|
|00006320| 74 64 65 72 72 2c 20 22 | 20 20 20 20 20 20 20 20 |tderr, "| |
|00006330| 20 20 20 20 20 20 20 20 | 5b 2d 63 20 6e 75 6d 20 | |[-c num |
|00006340| 7c 20 3c 63 68 61 72 3e | 5d 2e 2e 2e 5c 6e 22 29 || <char>|]...\n")|
|00006350| 3b 0a 58 20 20 66 70 72 | 69 6e 74 66 28 73 74 64 |;.X fpr|intf(std|
|00006360| 65 72 72 2c 20 22 20 3c | 63 68 61 72 3e 20 69 73 |err, " <|char> is|
|00006370| 3a 20 20 20 20 20 5b 2d | 57 20 74 66 6d 77 69 64 |: [-|W tfmwid|
|00006380| 74 68 5d 20 5b 2d 48 20 | 74 66 6d 68 65 69 67 68 |th] [-H |tfmheigh|
|00006390| 74 5d 20 5b 2d 44 20 74 | 66 6d 64 65 70 74 68 5d |t] [-D t|fmdepth]|
|000063a0| 5c 6e 22 29 3b 0a 58 20 | 20 66 70 72 69 6e 74 66 |\n");.X | fprintf|
|000063b0| 28 73 74 64 65 72 72 2c | 20 22 20 20 20 20 20 20 |(stderr,| " |
|000063c0| 20 20 20 20 20 20 20 20 | 20 20 5b 2d 49 20 69 74 | | [-I it|
|000063d0| 61 6c 5f 63 6f 72 72 5d | 20 5b 2d 68 20 68 6f 72 |al_corr]| [-h hor|
|000063e0| 69 7a 5d 20 5b 2d 76 20 | 76 65 72 74 5d 5c 6e 22 |iz] [-v |vert]\n"|
|000063f0| 29 20 3b 0a 58 20 20 66 | 70 72 69 6e 74 66 28 73 |) ;.X f|printf(s|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
