/ Garbo / Garbo.cdr / mac / source / pfb2ps

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 23 21 20 2f 62 69 6e | 2f 73 68 0a 23 20 54 68 |.#! /bin|/sh.# Th|
|00000010| 69 73 20 69 73 20 61 20 | 73 68 65 6c 6c 20 61 72 |is is a |shell ar|
|00000020| 63 68 69 76 65 2c 20 6d | 65 61 6e 69 6e 67 3a 0a |chive, m|eaning:.|
|00000030| 23 20 31 2e 20 52 65 6d | 6f 76 65 20 65 76 65 72 |# 1. Rem|ove ever|
|00000040| 79 74 68 69 6e 67 20 61 | 62 6f 76 65 20 74 68 65 |ything a|bove the|
|00000050| 20 23 21 20 2f 62 69 6e | 2f 73 68 20 6c 69 6e 65 | #! /bin|/sh line|
|00000060| 2e 0a 23 20 32 2e 20 53 | 61 76 65 20 74 68 65 20 |..# 2. S|ave the |
|00000070| 72 65 73 75 6c 74 69 6e | 67 20 74 65 78 74 20 69 |resultin|g text i|
|00000080| 6e 20 61 20 66 69 6c 65 | 2e 0a 23 20 33 2e 20 45 |n a file|..# 3. E|
|00000090| 78 65 63 75 74 65 20 74 | 68 65 20 66 69 6c 65 20 |xecute t|he file |
|000000a0| 77 69 74 68 20 2f 62 69 | 6e 2f 73 68 20 28 6e 6f |with /bi|n/sh (no|
|000000b0| 74 20 63 73 68 29 20 74 | 6f 20 63 72 65 61 74 65 |t csh) t|o create|
|000000c0| 3a 0a 23 09 75 6e 66 6f | 6e 74 2e 63 0a 23 09 75 |:.#.unfo|nt.c.#.u|
|000000d0| 6e 66 6f 6e 74 2e 70 61 | 74 63 68 0a 23 09 70 72 |nfont.pa|tch.#.pr|
|000000e0| 6f 6c 6f 61 64 2e 70 73 | 0a 23 20 54 68 69 73 20 |oload.ps|.# This |
|000000f0| 61 72 63 68 69 76 65 20 | 63 72 65 61 74 65 64 3a |archive |created:|
|00000100| 20 54 68 75 20 4d 61 72 | 20 32 38 20 31 30 3a 34 | Thu Mar| 28 10:4|
|00000110| 32 3a 33 30 20 31 39 39 | 31 0a 23 20 42 79 3a 09 |2:30 199|1.# By:.|
|00000120| 4a 6f 73 20 56 6f 73 20 | 28 29 0a 65 78 70 6f 72 |Jos Vos |().expor|
|00000130| 74 20 50 41 54 48 3b 20 | 50 41 54 48 3d 2f 62 69 |t PATH; |PATH=/bi|
|00000140| 6e 3a 2f 75 73 72 2f 62 | 69 6e 3a 24 50 41 54 48 |n:/usr/b|in:$PATH|
|00000150| 0a 69 66 20 74 65 73 74 | 20 2d 66 20 27 75 6e 66 |.if test| -f 'unf|
|00000160| 6f 6e 74 2e 63 27 0a 74 | 68 65 6e 0a 09 65 63 68 |ont.c'.t|hen..ech|
|00000170| 6f 20 73 68 61 72 3a 20 | 22 77 69 6c 6c 20 6e 6f |o shar: |"will no|
|00000180| 74 20 6f 76 65 72 2d 77 | 72 69 74 65 20 65 78 69 |t over-w|rite exi|
|00000190| 73 74 69 6e 67 20 66 69 | 6c 65 20 27 75 6e 66 6f |sting fi|le 'unfo|
|000001a0| 6e 74 2e 63 27 22 0a 65 | 6c 73 65 0a 63 61 74 20 |nt.c'".e|lse.cat |
|000001b0| 3c 3c 20 5c 53 48 41 52 | 5f 45 4f 46 20 3e 20 27 |<< \SHAR|_EOF > '|
|000001c0| 75 6e 66 6f 6e 74 2e 63 | 27 0a 2f 2a 0a 20 2a 20 |unfont.c|'./*. * |
|000001d0| 4e 4f 54 49 43 45 0a 20 | 2a 0a 20 2a 20 43 6f 70 |NOTICE. |*. * Cop|
|000001e0| 79 72 69 67 68 74 20 31 | 39 38 38 2c 20 31 39 38 |yright 1|988, 198|
|000001f0| 39 20 62 79 20 68 2d 74 | 68 72 65 65 20 53 79 73 |9 by h-t|hree Sys|
|00000200| 74 65 6d 73 20 43 6f 72 | 70 6f 72 61 74 69 6f 6e |tems Cor|poration|
|00000210| 2e 0a 20 2a 0a 20 2a 20 | 50 65 72 6d 69 73 73 69 |.. *. * |Permissi|
|00000220| 6f 6e 20 69 73 20 68 65 | 72 65 62 79 20 67 72 61 |on is he|reby gra|
|00000230| 6e 74 65 64 20 66 6f 72 | 20 74 68 69 73 20 73 6f |nted for| this so|
|00000240| 66 74 77 61 72 65 27 73 | 20 66 72 65 65 20 72 65 |ftware's| free re|
|00000250| 70 72 6f 64 75 63 74 69 | 6f 6e 0a 20 2a 20 61 6e |producti|on. * an|
|00000260| 64 20 6d 6f 64 69 66 69 | 63 61 74 69 6f 6e 20 66 |d modifi|cation f|
|00000270| 6f 72 20 6e 6f 6e 2d 63 | 6f 6d 6d 65 72 63 69 61 |or non-c|ommercia|
|00000280| 6c 20 70 75 72 70 6f 73 | 65 73 2c 20 70 72 6f 76 |l purpos|es, prov|
|00000290| 69 64 65 64 20 74 68 61 | 74 20 74 68 69 73 0a 20 |ided tha|t this. |
|000002a0| 2a 20 6e 6f 74 69 63 65 | 20 69 73 20 72 65 74 61 |* notice| is reta|
|000002b0| 69 6e 65 64 2e 20 43 6f | 6d 6d 65 72 63 69 61 6c |ined. Co|mmercial|
|000002c0| 20 65 6e 74 65 72 70 72 | 69 73 65 73 20 6d 61 79 | enterpr|ises may|
|000002d0| 20 67 69 76 65 20 61 77 | 61 79 20 63 6f 70 69 65 | give aw|ay copie|
|000002e0| 73 0a 20 2a 20 61 73 20 | 70 61 72 74 20 6f 66 20 |s. * as |part of |
|000002f0| 74 68 65 69 72 20 70 72 | 6f 64 75 63 74 73 20 70 |their pr|oducts p|
|00000300| 72 6f 76 69 64 65 64 20 | 74 68 61 74 20 74 68 65 |rovided |that the|
|00000310| 79 20 64 6f 20 73 6f 20 | 77 69 74 68 6f 75 74 20 |y do so |without |
|00000320| 63 68 61 72 67 65 2c 0a | 20 2a 20 74 68 61 74 20 |charge,.| * that |
|00000330| 74 68 65 79 20 72 65 74 | 61 69 6e 20 74 68 69 73 |they ret|ain this|
|00000340| 20 6e 6f 74 69 63 65 2c | 20 61 6e 64 20 74 68 61 | notice,| and tha|
|00000350| 74 20 74 68 65 79 20 61 | 63 6b 6e 6f 77 6c 65 64 |t they a|cknowled|
|00000360| 67 65 20 74 68 65 20 73 | 6f 75 72 63 65 0a 20 2a |ge the s|ource. *|
|00000370| 20 6f 66 20 74 68 65 20 | 73 6f 66 74 77 61 72 65 | of the |software|
|00000380| 2e 0a 20 2a 0a 20 2a 09 | 50 6f 73 74 53 63 72 69 |.. *. *.|PostScri|
|00000390| 70 74 20 69 73 20 61 20 | 72 65 67 69 73 74 65 72 |pt is a |register|
|000003a0| 65 64 20 74 72 61 64 65 | 6d 61 72 6b 20 6f 66 20 |ed trade|mark of |
|000003b0| 41 64 6f 62 65 20 53 79 | 73 74 65 6d 73 20 49 6e |Adobe Sy|stems In|
|000003c0| 63 6f 72 70 6f 72 61 74 | 65 64 2e 0a 20 2a 09 49 |corporat|ed.. *.I|
|000003d0| 42 4d 20 69 73 20 61 20 | 72 65 67 69 73 74 65 72 |BM is a |register|
|000003e0| 65 64 20 74 72 61 64 65 | 6d 61 72 6b 20 6f 66 20 |ed trade|mark of |
|000003f0| 49 6e 74 65 72 6e 61 74 | 69 6f 6e 61 6c 20 42 75 |Internat|ional Bu|
|00000400| 73 69 6e 65 73 73 20 4d | 61 63 68 69 6e 65 73 0a |siness M|achines.|
|00000410| 20 2a 09 20 20 43 6f 72 | 70 6f 72 61 74 69 6f 6e | *.  Cor|poration|
|00000420| 2e 0a 20 2a 0a 20 2a 09 | 68 2d 74 68 72 65 65 20 |.. *. *.|h-three |
|00000430| 53 79 73 74 65 6d 73 20 | 43 6f 72 70 6f 72 61 74 |Systems |Corporat|
|00000440| 69 6f 6e 0a 20 2a 09 31 | 30 30 20 50 61 72 6b 20 |ion. *.1|00 Park |
|00000450| 44 72 69 76 65 20 53 75 | 69 74 65 20 32 30 34 2f |Drive Su|ite 204/|
|00000460| 20 50 2e 4f 2e 20 42 6f | 78 20 31 32 35 35 37 0a | P.O. Bo|x 12557.|
|00000470| 20 2a 09 52 65 73 65 61 | 72 63 68 20 54 72 69 61 | *.Resea|rch Tria|
|00000480| 6e 67 6c 65 20 50 61 72 | 6b 2c 20 4e 43 20 20 32 |ngle Par|k, NC  2|
|00000490| 37 37 30 39 0a 20 2a 2f | 0a 0a 23 69 66 64 65 66 |7709. */|..#ifdef|
|000004a0| 20 4e 4f 57 48 41 54 0a | 73 74 61 74 69 63 20 63 | NOWHAT.|static c|
|000004b0| 68 61 72 20 2a 73 63 63 | 73 69 64 20 3d 20 22 25 |har *scc|sid = "%|
|000004c0| 57 25 20 2d 20 25 45 25 | 22 3b 0a 23 65 6e 64 69 |W% - %E%|";.#endi|
|000004d0| 66 0a 0a 2f 2a 0a 20 2a | 20 75 6e 66 6f 6e 74 2e |f../*. *| unfont.|
|000004e0| 63 0a 20 2a 0a 20 2a 20 | 75 73 61 67 65 3a 20 75 |c. *. * |usage: u|
|000004f0| 6e 66 6f 6e 74 20 5b 20 | 2d 76 20 5d 20 5b 20 66 |nfont [ |-v ] [ f|
|00000500| 69 6c 65 73 20 5d 0a 20 | 2a 09 2d 76 20 09 50 72 |iles ]. |*.-v .Pr|
|00000510| 69 6e 74 73 20 65 78 65 | 63 75 74 69 6f 6e 20 69 |ints exe|cution i|
|00000520| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 6f 6e 20 74 68 |nformati|on on th|
|00000530| 65 20 73 74 61 6e 64 61 | 72 64 20 65 72 72 6f 72 |e standa|rd error|
|00000540| 2e 0a 20 2a 0a 20 2a 20 | 55 6e 70 61 63 6b 73 20 |.. *. * |Unpacks |
|00000550| 49 42 4d 20 50 43 2d 66 | 6f 72 6d 61 74 20 50 6f |IBM PC-f|ormat Po|
|00000560| 73 74 53 63 72 69 70 74 | 20 66 6f 6e 74 73 20 69 |stScript| fonts i|
|00000570| 6e 74 6f 20 61 20 64 6f | 77 6e 6c 6f 61 64 61 62 |nto a do|wnloadab|
|00000580| 6c 65 20 66 6f 72 6d 2e | 0a 20 2a 0a 20 2a 2f 0a |le form.|. *. */.|
|00000590| 0a 63 68 61 72 20 2a 55 | 53 41 47 45 20 3d 20 22 |.char *U|SAGE = "|
|000005a0| 5c 0a 75 73 61 67 65 3a | 20 75 6e 66 6f 6e 74 20 |\.usage:| unfont |
|000005b0| 5b 20 2d 3f 20 5d 20 5b | 20 2d 76 20 5d 20 20 5b |[ -? ] [| -v ]  [|
|000005c0| 66 69 6c 65 73 20 5d 5c | 6e 5c 0a 09 2d 3f 09 50 |files ]\|n\..-?.P|
|000005d0| 72 69 6e 74 73 20 74 68 | 69 73 20 6d 65 73 73 61 |rints th|is messa|
|000005e0| 67 65 2e 5c 6e 5c 0a 09 | 2d 76 20 09 50 72 69 6e |ge.\n\..|-v .Prin|
|000005f0| 74 73 20 65 78 65 63 75 | 74 69 6f 6e 20 69 6e 66 |ts execu|tion inf|
|00000600| 6f 72 6d 61 74 69 6f 6e | 20 6f 6e 20 74 68 65 20 |ormation| on the |
|00000610| 73 74 61 6e 64 61 72 64 | 20 65 72 72 6f 72 2e 5c |standard| error.\|
|00000620| 6e 5c 0a 22 3b 0a 0a 23 | 69 6e 63 6c 75 64 65 20 |n\.";..#|include |
|00000630| 3c 73 74 64 69 6f 2e 68 | 3e 0a 23 69 6e 63 6c 75 |<stdio.h|>.#inclu|
|00000640| 64 65 20 3c 66 63 6e 74 | 6c 2e 68 3e 0a 23 69 6e |de <fcnt|l.h>.#in|
|00000650| 63 6c 75 64 65 20 3c 63 | 74 79 70 65 2e 68 3e 0a |clude <c|type.h>.|
|00000660| 23 69 6e 63 6c 75 64 65 | 20 3c 76 61 72 61 72 67 |#include| <vararg|
|00000670| 73 2e 68 3e 0a 0a 23 64 | 65 66 69 6e 65 20 4f 4b |s.h>..#d|efine OK|
|00000680| 09 30 0a 23 64 65 66 69 | 6e 65 20 46 41 49 4c 55 |.0.#defi|ne FAILU|
|00000690| 52 45 20 28 2d 31 29 0a | 23 64 65 66 69 6e 65 20 |RE (-1).|#define |
|000006a0| 46 61 69 6c 65 64 28 78 | 29 09 28 28 78 29 20 3d |Failed(x|).((x) =|
|000006b0| 3d 20 46 41 49 4c 55 52 | 45 29 0a 23 64 65 66 69 |= FAILUR|E).#defi|
|000006c0| 6e 65 20 54 52 55 45 09 | 31 0a 23 64 65 66 69 6e |ne TRUE.|1.#defin|
|000006d0| 65 20 46 41 4c 53 45 09 | 30 0a 74 79 70 65 64 65 |e FALSE.|0.typede|
|000006e0| 66 20 63 68 61 72 20 62 | 6f 6f 6c 3b 0a 23 64 65 |f char b|ool;.#de|
|000006f0| 66 69 6e 65 20 53 54 52 | 45 51 28 61 2c 62 29 09 |fine STR|EQ(a,b).|
|00000700| 28 73 74 72 63 6d 70 28 | 61 2c 62 29 20 3d 3d 20 |(strcmp(|a,b) == |
|00000710| 30 29 0a 0a 46 49 4c 45 | 20 2a 66 70 3b 0a 0a 2f |0)..FILE| *fp;../|
|00000720| 2a 0a 20 2a 20 75 73 65 | 64 20 74 6f 20 63 6f 6e |*. * use|d to con|
|00000730| 76 65 72 74 20 6e 69 62 | 62 6c 65 73 20 28 6e 30 |vert nib|bles (n0|
|00000740| 20 69 73 20 6c 65 61 73 | 74 20 73 69 67 29 20 74 | is leas|t sig) t|
|00000750| 6f 20 61 73 63 69 69 2d | 68 65 78 0a 20 2a 2f 0a |o ascii-|hex. */.|
|00000760| 0a 23 64 65 66 69 6e 65 | 20 4e 30 28 63 29 09 20 |.#define| N0(c). |
|00000770| 20 20 20 68 65 78 62 79 | 74 5b 28 28 63 29 20 26 |   hexby|t[((c) &|
|00000780| 20 30 78 30 30 30 66 29 | 5d 0a 23 64 65 66 69 6e | 0x000f)|].#defin|
|00000790| 65 20 4e 31 28 63 29 09 | 20 20 20 20 4e 30 28 28 |e N1(c).|    N0((|
|000007a0| 63 29 20 3e 3e 20 34 29 | 0a 0a 63 68 61 72 20 68 |c) >> 4)|..char h|
|000007b0| 65 78 62 79 74 5b 5d 20 | 3d 20 22 30 31 32 33 34 |exbyt[] |= "01234|
|000007c0| 35 36 37 38 39 41 42 43 | 44 45 46 22 3b 0a 0a 2f |56789ABC|DEF";../|
|000007d0| 2a 0a 20 2a 20 76 61 72 | 73 20 63 6f 6e 74 72 6f |*. * var|s contro|
|000007e0| 6c 6c 65 64 20 62 79 20 | 63 6f 6d 6d 61 6e 64 20 |lled by |command |
|000007f0| 6c 69 6e 65 20 6f 70 74 | 69 6f 6e 73 0a 20 2a 2f |line opt|ions. */|
|00000800| 0a 0a 62 6f 6f 6c 20 76 | 65 72 62 6f 73 65 20 3d |..bool v|erbose =|
|00000810| 20 46 41 4c 53 45 3b 09 | 09 09 2f 2a 20 62 65 20 | FALSE;.|../* be |
|00000820| 76 65 72 62 6f 73 65 20 | 2a 2f 0a 0a 65 78 74 65 |verbose |*/..exte|
|00000830| 72 6e 20 63 68 61 72 20 | 2a 6f 70 74 61 72 67 3b |rn char |*optarg;|
|00000840| 09 09 09 2f 2a 20 67 65 | 74 6f 70 74 28 33 29 20 |.../* ge|topt(3) |
|00000850| 63 6f 6e 74 72 6f 6c 20 | 76 61 72 73 20 2a 2f 0a |control |vars */.|
|00000860| 65 78 74 65 72 6e 20 69 | 6e 74 20 6f 70 74 69 6e |extern i|nt optin|
|00000870| 64 3b 0a 65 78 74 65 72 | 6e 20 69 6e 74 20 65 72 |d;.exter|n int er|
|00000880| 72 6e 6f 3b 0a 0a 63 68 | 61 72 20 2a 69 6e 66 69 |rno;..ch|ar *infi|
|00000890| 6c 65 3b 0a 0a 63 68 61 | 72 20 2a 70 72 6f 67 6e |le;..cha|r *progn|
|000008a0| 61 6d 65 3b 09 09 09 09 | 2f 2a 20 66 6f 72 20 65 |ame;....|/* for e|
|000008b0| 72 72 6f 72 28 29 20 2a | 2f 0a 0a 63 68 61 72 20 |rror() *|/..char |
|000008c0| 2a 73 74 72 63 68 72 28 | 29 2c 20 2a 73 74 72 72 |*strchr(|), *strr|
|000008d0| 63 68 72 28 29 3b 0a 6c | 6f 6e 67 20 73 74 6f 6c |chr();.l|ong stol|
|000008e0| 28 29 2c 20 67 65 74 70 | 61 72 6d 28 29 3b 0a 0a |(), getp|arm();..|
|000008f0| 69 6e 74 20 6d 79 67 65 | 74 63 28 29 3b 0a 76 6f |int myge|tc();.vo|
|00000900| 69 64 20 64 6f 75 6e 66 | 6f 6e 74 28 29 3b 0a 6c |id dounf|ont();.l|
|00000910| 6f 6e 67 20 67 65 74 63 | 6f 75 6e 74 28 29 3b 0a |ong getc|ount();.|
|00000920| 76 6f 69 64 20 62 69 6e | 74 6f 68 65 78 28 29 3b |void bin|tohex();|
|00000930| 0a 0a 6d 61 69 6e 28 61 | 72 67 63 2c 20 61 72 67 |..main(a|rgc, arg|
|00000940| 76 29 0a 69 6e 74 20 61 | 72 67 63 3b 0a 63 68 61 |v).int a|rgc;.cha|
|00000950| 72 20 2a 2a 61 72 67 76 | 3b 0a 7b 0a 20 20 20 20 |r **argv|;.{.    |
|00000960| 72 65 67 69 73 74 65 72 | 20 69 6e 74 20 63 3b 0a |register| int c;.|
|00000970| 20 20 20 20 62 6f 6f 6c | 20 73 68 6f 77 75 73 61 |    bool| showusa|
|00000980| 67 65 20 3d 20 46 41 4c | 53 45 3b 09 09 09 2f 2a |ge = FAL|SE;.../*|
|00000990| 20 75 73 61 67 65 20 65 | 72 72 6f 72 3f 20 2a 2f | usage e|rror? */|
|000009a0| 0a 0a 20 20 20 20 2f 2a | 0a 20 20 20 20 20 2a 20 |..    /*|.     * |
|000009b0| 66 69 67 75 72 65 20 6f | 75 74 20 69 6e 76 6f 63 |figure o|ut invoc|
|000009c0| 61 74 69 6f 6e 20 6c 65 | 61 66 2d 6e 61 6d 65 0a |ation le|af-name.|
|000009d0| 20 20 20 20 20 2a 2f 0a | 0a 20 20 20 20 69 66 20 |     */.|.    if |
|000009e0| 28 28 70 72 6f 67 6e 61 | 6d 65 20 3d 20 73 74 72 |((progna|me = str|
|000009f0| 72 63 68 72 28 61 72 67 | 76 5b 30 5d 2c 20 27 2f |rchr(arg|v[0], '/|
|00000a00| 27 29 29 20 3d 3d 20 28 | 63 68 61 72 20 2a 29 20 |')) == (|char *) |
|00000a10| 4e 55 4c 4c 29 0a 09 70 | 72 6f 67 6e 61 6d 65 20 |NULL)..p|rogname |
|00000a20| 3d 20 61 72 67 76 5b 30 | 5d 3b 0a 20 20 20 20 65 |= argv[0|];.    e|
|00000a30| 6c 73 65 0a 09 70 72 6f | 67 6e 61 6d 65 2b 2b 3b |lse..pro|gname++;|
|00000a40| 0a 0a 20 20 20 20 61 72 | 67 76 5b 30 5d 20 3d 20 |..    ar|gv[0] = |
|00000a50| 70 72 6f 67 6e 61 6d 65 | 3b 09 09 09 09 2f 2a 20 |progname|;..../* |
|00000a60| 66 6f 72 20 67 65 74 6f | 70 74 20 65 72 72 20 72 |for geto|pt err r|
|00000a70| 65 70 6f 72 74 69 6e 67 | 20 2a 2f 0a 0a 20 20 20 |eporting| */..   |
|00000a80| 20 2f 2a 0a 20 20 20 20 | 20 2a 09 43 68 65 63 6b | /*.    | *.Check|
|00000a90| 20 6f 70 74 69 6f 6e 73 | 20 61 6e 64 20 61 72 67 | options| and arg|
|00000aa0| 75 6d 65 6e 74 73 2e 0a | 20 20 20 20 20 2a 2f 0a |uments..|     */.|
|00000ab0| 0a 20 20 20 20 70 72 6f | 67 6e 61 6d 65 20 3d 20 |.    pro|gname = |
|00000ac0| 61 72 67 76 5b 30 5d 3b | 0a 20 20 20 20 77 68 69 |argv[0];|.    whi|
|00000ad0| 6c 65 20 28 28 63 20 3d | 20 67 65 74 6f 70 74 28 |le ((c =| getopt(|
|00000ae0| 61 72 67 63 2c 20 61 72 | 67 76 2c 20 22 76 22 29 |argc, ar|gv, "v")|
|00000af0| 29 20 21 3d 20 45 4f 46 | 29 0a 09 73 77 69 74 63 |) != EOF|)..switc|
|00000b00| 68 20 28 63 29 0a 09 7b | 0a 09 20 20 20 20 63 61 |h (c)..{|..    ca|
|00000b10| 73 65 20 27 76 27 3a 09 | 09 09 09 2f 2a 20 74 6f |se 'v':.|.../* to|
|00000b20| 67 67 6c 65 20 76 65 72 | 62 6f 73 65 20 2a 2f 0a |ggle ver|bose */.|
|00000b30| 09 09 76 65 72 62 6f 73 | 65 20 3d 20 21 20 76 65 |..verbos|e = ! ve|
|00000b40| 72 62 6f 73 65 3b 0a 09 | 09 62 72 65 61 6b 3b 0a |rbose;..|.break;.|
|00000b50| 0a 09 20 20 20 20 63 61 | 73 65 20 27 3f 27 3a 0a |..    ca|se '?':.|
|00000b60| 09 09 73 68 6f 77 75 73 | 61 67 65 20 3d 20 54 52 |..showus|age = TR|
|00000b70| 55 45 3b 0a 09 7d 0a 0a | 20 20 20 20 69 66 20 28 |UE;..}..|    if (|
|00000b80| 73 68 6f 77 75 73 61 67 | 65 29 0a 20 20 20 20 7b |showusag|e).    {|
|00000b90| 0a 09 28 76 6f 69 64 29 | 20 66 70 72 69 6e 74 66 |..(void)| fprintf|
|00000ba0| 28 73 74 64 65 72 72 2c | 20 22 25 73 22 2c 20 55 |(stderr,| "%s", U|
|00000bb0| 53 41 47 45 29 3b 0a 09 | 65 78 69 74 28 31 29 3b |SAGE);..|exit(1);|
|00000bc0| 0a 20 20 20 20 7d 0a 0a | 2f 2a 20 75 6e 66 6f 6e |.    }..|/* unfon|
|00000bd0| 74 20 73 74 75 66 66 09 | 09 2a 2f 0a 0a 20 20 20 |t stuff.|.*/..   |
|00000be0| 20 69 66 20 28 61 72 67 | 76 5b 6f 70 74 69 6e 64 | if (arg|v[optind|
|00000bf0| 5d 29 0a 20 20 20 20 7b | 0a 20 20 20 20 20 20 20 |]).    {|.       |
|00000c00| 20 66 6f 72 20 28 20 3b | 20 61 72 67 76 5b 6f 70 | for ( ;| argv[op|
|00000c10| 74 69 6e 64 5d 3b 20 6f | 70 74 69 6e 64 2b 2b 29 |tind]; o|ptind++)|
|00000c20| 0a 09 7b 0a 09 20 20 20 | 20 69 66 20 28 21 28 66 |..{..   | if (!(f|
|00000c30| 70 20 3d 20 66 6f 70 65 | 6e 28 61 72 67 76 5b 6f |p = fope|n(argv[o|
|00000c40| 70 74 69 6e 64 5d 2c 20 | 22 72 22 29 29 29 20 7b |ptind], |"r"))) {|
|00000c50| 0a 09 09 65 72 72 6f 72 | 28 30 2c 20 22 63 61 6e |...error|(0, "can|
|00000c60| 27 74 20 6f 70 65 6e 20 | 69 6e 70 75 74 20 66 69 |'t open |input fi|
|00000c70| 6c 65 20 27 25 73 27 22 | 2c 20 61 72 67 76 5b 6f |le '%s'"|, argv[o|
|00000c80| 70 74 69 6e 64 5d 29 3b | 09 0a 09 09 63 6f 6e 74 |ptind]);|....cont|
|00000c90| 69 6e 75 65 3b 0a 09 20 | 20 20 20 7d 0a 0a 09 20 |inue;.. |   }... |
|00000ca0| 20 20 20 69 6e 66 69 6c | 65 20 3d 20 61 72 67 76 |   infil|e = argv|
|00000cb0| 5b 6f 70 74 69 6e 64 5d | 3b 0a 09 20 20 20 20 64 |[optind]|;..    d|
|00000cc0| 6f 75 6e 66 6f 6e 74 28 | 29 3b 0a 09 20 20 20 20 |ounfont(|);..    |
|00000cd0| 63 6c 6f 73 65 28 66 70 | 29 3b 0a 09 7d 0a 20 20 |close(fp|);..}.  |
|00000ce0| 20 20 7d 0a 20 20 20 20 | 65 6c 73 65 0a 20 20 20 |  }.    |else.   |
|00000cf0| 20 7b 0a 09 69 6e 66 69 | 6c 65 20 3d 20 22 3c 73 | {..infi|le = "<s|
|00000d00| 74 64 69 6e 3e 22 3b 0a | 09 66 70 20 3d 20 73 74 |tdin>";.|.fp = st|
|00000d10| 64 69 6e 3b 0a 20 20 20 | 20 20 20 20 20 64 6f 75 |din;.   |     dou|
|00000d20| 6e 66 6f 6e 74 28 29 3b | 0a 20 20 20 20 7d 0a 20 |nfont();|.    }. |
|00000d30| 20 20 20 65 78 69 74 28 | 30 29 3b 0a 7d 0a 0a 6c |   exit(|0);.}..l|
|00000d40| 6f 6e 67 20 67 65 74 63 | 6f 75 6e 74 28 29 3b 0a |ong getc|ount();.|
|00000d50| 0a 76 6f 69 64 20 0a 64 | 6f 75 6e 66 6f 6e 74 28 |.void .d|ounfont(|
|00000d60| 29 0a 7b 0a 20 20 20 20 | 72 65 67 69 73 74 65 72 |).{.    |register|
|00000d70| 20 69 6e 74 20 63 3b 20 | 0a 20 20 20 20 72 65 67 | int c; |.    reg|
|00000d80| 69 73 74 65 72 20 69 6e | 74 20 63 68 3b 0a 20 20 |ister in|t ch;.  |
|00000d90| 20 20 20 20 20 20 20 20 | 20 20 20 6c 6f 6e 67 20 |        |   long |
|00000da0| 63 6f 75 6e 74 3b 0a 20 | 20 20 20 72 65 67 69 73 |count;. |   regis|
|00000db0| 74 65 72 20 69 6e 74 20 | 69 3b 0a 0a 20 20 20 20 |ter int |i;..    |
|00000dc0| 66 6f 72 20 28 3b 3b 29 | 0a 20 20 20 20 7b 0a 09 |for (;;)|.    {..|
|00000dd0| 69 66 20 28 28 63 20 3d | 20 6d 79 67 65 74 63 28 |if ((c =| mygetc(|
|00000de0| 29 29 20 21 3d 20 30 78 | 38 30 29 20 7b 0a 09 09 |)) != 0x|80) {...|
|00000df0| 65 72 72 6f 72 28 30 2c | 20 22 6e 6f 74 20 61 20 |error(0,| "not a |
|00000e00| 70 72 6f 70 65 72 20 66 | 6f 6e 74 20 64 61 74 61 |proper f|ont data|
|00000e10| 20 73 65 67 6d 65 6e 74 | 20 27 25 73 27 22 2c 20 | segment| '%s'", |
|00000e20| 69 6e 66 69 6c 65 29 3b | 0a 09 09 65 72 72 6f 72 |infile);|...error|
|00000e30| 28 30 2c 20 22 66 6f 6f | 62 61 72 20 63 68 61 72 |(0, "foo|bar char|
|00000e40| 20 69 73 20 30 78 25 78 | 22 2c 20 63 29 3b 0a 09 | is 0x%x|", c);..|
|00000e50| 09 65 78 69 74 28 31 29 | 3b 0a 09 7d 0a 09 63 20 |.exit(1)|;..}..c |
|00000e60| 3d 20 6d 79 67 65 74 63 | 28 29 3b 0a 09 73 77 69 |= mygetc|();..swi|
|00000e70| 74 63 68 20 28 63 29 20 | 7b 0a 09 63 61 73 65 20 |tch (c) |{..case |
|00000e80| 31 3a 09 09 0a 09 09 2f | 2a 20 67 65 74 20 63 6f |1:...../|* get co|
|00000e90| 75 6e 74 2c 20 6f 75 74 | 70 75 74 20 63 6f 75 6e |unt, out|put coun|
|00000ea0| 74 20 62 79 74 65 73 20 | 74 6f 20 73 74 64 6f 75 |t bytes |to stdou|
|00000eb0| 74 09 2a 2f 0a 09 09 63 | 6f 75 6e 74 20 3d 20 67 |t.*/...c|ount = g|
|00000ec0| 65 74 63 6f 75 6e 74 28 | 29 3b 0a 09 09 69 66 20 |etcount(|);...if |
|00000ed0| 28 76 65 72 62 6f 73 65 | 29 0a 09 09 20 20 20 20 |(verbose|)...    |
|00000ee0| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00000ef0| 22 63 61 73 65 31 20 63 | 6f 75 6e 74 20 69 73 20 |"case1 c|ount is |
|00000f00| 25 6c 64 5c 6e 22 2c 20 | 63 6f 75 6e 74 29 3b 0a |%ld\n", |count);.|
|00000f10| 09 09 66 6f 72 20 28 69 | 3d 30 3b 20 69 3c 63 6f |..for (i|=0; i<co|
|00000f20| 75 6e 74 3b 20 69 2b 2b | 29 0a 20 20 20 20 09 09 |unt; i++|).    ..|
|00000f30| 09 70 75 74 63 68 61 72 | 28 6d 79 67 65 74 63 28 |.putchar|(mygetc(|
|00000f40| 29 29 3b 0a 09 09 62 72 | 65 61 6b 3b 0a 09 63 61 |));...br|eak;..ca|
|00000f50| 73 65 20 32 3a 09 09 0a | 09 09 2f 2a 20 67 65 74 |se 2:...|../* get|
|00000f60| 20 63 6f 75 6e 74 2c 20 | 63 6f 6e 76 65 72 74 20 | count, |convert |
|00000f70| 63 6f 75 6e 74 20 62 79 | 74 65 73 20 74 6f 20 68 |count by|tes to h|
|00000f80| 65 78 2c 20 6f 75 74 70 | 75 74 09 2a 2f 0a 09 09 |ex, outp|ut.*/...|
|00000f90| 2f 2a 20 74 6f 20 73 74 | 64 6f 75 74 09 09 09 09 |/* to st|dout....|
|00000fa0| 09 09 2a 2f 0a 09 09 63 | 6f 75 6e 74 20 3d 20 67 |..*/...c|ount = g|
|00000fb0| 65 74 63 6f 75 6e 74 28 | 29 3b 0a 09 09 69 66 20 |etcount(|);...if |
|00000fc0| 28 76 65 72 62 6f 73 65 | 29 0a 09 09 20 20 20 20 |(verbose|)...    |
|00000fd0| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00000fe0| 22 63 61 73 65 32 20 63 | 6f 75 6e 74 20 69 73 20 |"case2 c|ount is |
|00000ff0| 25 6c 64 5c 6e 22 2c 20 | 63 6f 75 6e 74 29 3b 0a |%ld\n", |count);.|
|00001000| 09 09 62 69 6e 74 6f 68 | 65 78 28 63 6f 75 6e 74 |..bintoh|ex(count|
|00001010| 29 3b 0a 09 09 62 72 65 | 61 6b 3b 0a 09 63 61 73 |);...bre|ak;..cas|
|00001020| 65 20 33 3a 09 09 0a 09 | 09 2f 2a 20 72 65 61 63 |e 3:....|./* reac|
|00001030| 68 65 64 20 45 4f 46 3b | 20 6e 65 78 74 20 66 69 |hed EOF;| next fi|
|00001040| 6c 65 2c 20 70 6c 65 61 | 73 65 20 09 09 09 2a 2f |le, plea|se ...*/|
|00001050| 0a 09 09 69 66 20 28 76 | 65 72 62 6f 73 65 29 0a |...if (v|erbose).|
|00001060| 09 09 20 20 20 20 66 70 | 72 69 6e 74 66 28 73 74 |..    fp|rintf(st|
|00001070| 64 65 72 72 2c 20 22 6c | 6f 67 69 63 61 6c 20 65 |derr, "l|ogical e|
|00001080| 6f 66 20 65 6e 63 6f 75 | 6e 74 65 72 65 64 5c 6e |of encou|ntered\n|
|00001090| 22 29 3b 0a 09 09 72 65 | 74 75 72 6e 3b 0a 0a 09 |");...re|turn;...|
|000010a0| 64 65 66 61 75 6c 74 3a | 0a 09 09 65 72 72 6f 72 |default:|...error|
|000010b0| 28 30 2c 20 22 6e 6f 74 | 20 61 20 76 61 6c 69 64 |(0, "not| a valid|
|000010c0| 20 73 65 67 6d 65 6e 74 | 20 74 79 70 65 20 27 25 | segment| type '%|
|000010d0| 73 27 22 2c 20 69 6e 66 | 69 6c 65 29 3b 09 0a 09 |s'", inf|ile);...|
|000010e0| 09 72 65 74 75 72 6e 3b | 0a 09 7d 0a 20 20 20 20 |.return;|..}.    |
|000010f0| 7d 0a 7d 0a 0a 2f 2a 20 | 0a 20 2a 20 67 65 74 63 |}.}../* |. * getc|
|00001100| 20 66 6f 72 20 65 72 72 | 6f 72 2d 63 68 65 63 6b | for err|or-check|
|00001110| 69 6e 67 09 0a 20 2a 2f | 0a 0a 69 6e 74 0a 6d 79 |ing.. */|..int.my|
|00001120| 67 65 74 63 28 29 0a 7b | 0a 09 69 6e 74 20 63 68 |getc().{|..int ch|
|00001130| 3b 0a 20 20 20 20 09 69 | 66 20 28 28 63 68 20 3d |;.    .i|f ((ch =|
|00001140| 20 67 65 74 63 28 66 70 | 29 29 20 3d 3d 20 2d 31 | getc(fp|)) == -1|
|00001150| 29 20 7b 0a 09 20 20 20 | 20 65 72 72 6f 72 28 2d |) {..   | error(-|
|00001160| 31 2c 20 22 75 6e 65 78 | 70 65 63 74 65 64 20 65 |1, "unex|pected e|
|00001170| 6f 66 20 6f 6e 20 69 6e | 70 75 74 20 69 6e 20 27 |of on in|put in '|
|00001180| 25 73 27 22 2c 20 69 6e | 66 69 6c 65 29 3b 0a 09 |%s'", in|file);..|
|00001190| 20 20 20 20 65 78 69 74 | 28 31 29 3b 0a 09 7d 0a |    exit|(1);..}.|
|000011a0| 20 20 20 20 09 72 65 74 | 75 72 6e 28 63 68 29 3b |    .ret|urn(ch);|
|000011b0| 0a 7d 0a 0a 2f 2a 0a 20 | 2a 20 67 65 74 20 63 6f |.}../*. |* get co|
|000011c0| 75 6e 74 20 6f 66 20 62 | 79 74 65 73 20 66 72 6f |unt of b|ytes fro|
|000011d0| 6d 20 73 65 67 6d 65 6e | 74 20 68 65 61 64 65 72 |m segmen|t header|
|000011e0| 0a 20 2a 2f 0a 0a 6c 6f | 6e 67 0a 67 65 74 63 6f |. */..lo|ng.getco|
|000011f0| 75 6e 74 28 29 0a 7b 0a | 09 69 6e 74 20 69 3b 0a |unt().{.|.int i;.|
|00001200| 09 6c 6f 6e 67 20 63 6f | 75 6e 74 20 3d 20 30 3b |.long co|unt = 0;|
|00001210| 0a 0a 20 20 20 20 09 66 | 6f 72 20 28 69 3d 30 3b |..    .f|or (i=0;|
|00001220| 20 69 3c 34 3b 20 69 2b | 2b 29 0a 20 20 20 20 20 | i<4; i+|+).     |
|00001230| 20 20 09 09 63 6f 75 6e | 74 20 2b 3d 20 28 28 6c |  ..coun|t += ((l|
|00001240| 6f 6e 67 29 20 6d 79 67 | 65 74 63 28 29 29 20 3c |ong) myg|etc()) <|
|00001250| 3c 20 28 69 20 2a 20 38 | 29 3b 0a 09 72 65 74 75 |< (i * 8|);..retu|
|00001260| 72 6e 28 63 6f 75 6e 74 | 29 3b 0a 7d 0a 0a 2f 2a |rn(count|);.}../*|
|00001270| 20 0a 20 2a 20 63 6f 6e | 76 65 72 74 20 62 69 6e | . * con|vert bin|
|00001280| 61 72 79 20 74 6f 20 41 | 53 43 49 49 20 68 65 78 |ary to A|SCII hex|
|00001290| 20 61 6e 64 20 77 72 69 | 74 65 20 69 74 20 74 6f | and wri|te it to|
|000012a0| 20 73 74 64 6f 75 74 0a | 20 2a 2f 0a 0a 76 6f 69 | stdout.| */..voi|
|000012b0| 64 0a 62 69 6e 74 6f 68 | 65 78 28 63 6f 75 6e 74 |d.bintoh|ex(count|
|000012c0| 29 0a 6c 6f 6e 67 20 63 | 6f 75 6e 74 3b 0a 7b 0a |).long c|ount;.{.|
|000012d0| 09 69 6e 74 20 63 68 3b | 0a 09 6c 6f 6e 67 20 69 |.int ch;|..long i|
|000012e0| 3b 0a 0a 09 66 6f 72 20 | 28 69 3d 30 3b 20 69 3c |;...for |(i=0; i<|
|000012f0| 63 6f 75 6e 74 3b 20 69 | 2b 2b 29 20 7b 0a 09 20 |count; i|++) {.. |
|00001300| 20 20 20 20 20 20 20 69 | 66 20 28 28 69 20 25 20 |       i|f ((i % |
|00001310| 33 30 29 20 3d 3d 20 30 | 29 0a 09 09 20 20 20 20 |30) == 0|)...    |
|00001320| 70 75 74 63 68 61 72 28 | 27 5c 6e 27 29 3b 0a 20 |putchar(|'\n');. |
|00001330| 20 20 09 09 63 68 20 3d | 20 6d 79 67 65 74 63 28 |  ..ch =| mygetc(|
|00001340| 29 3b 0a 20 20 20 20 09 | 09 70 75 74 63 68 61 72 |);.    .|.putchar|
|00001350| 28 4e 31 28 63 68 29 29 | 3b 0a 20 20 20 20 09 09 |(N1(ch))|;.    ..|
|00001360| 70 75 74 63 68 61 72 28 | 4e 30 28 63 68 29 29 3b |putchar(|N0(ch));|
|00001370| 0a 09 7d 0a 7d 0a 0a 2f | 2a 20 65 6e 64 20 6f 66 |..}.}../|* end of|
|00001380| 20 75 6e 66 6f 6e 74 20 | 73 74 75 66 66 0a 0a 2f | unfont |stuff../|
|00001390| 2a 0a 20 2a 20 65 72 72 | 6f 72 28 65 72 72 6e 2c |*. * err|or(errn,|
|000013a0| 20 61 72 67 6c 69 73 74 | 29 0a 20 2a 09 72 65 70 | arglist|). *.rep|
|000013b0| 6f 72 74 20 61 6e 20 65 | 72 72 6f 72 20 74 6f 20 |ort an e|rror to |
|000013c0| 73 74 64 65 72 72 20 75 | 73 69 6e 67 20 70 72 69 |stderr u|sing pri|
|000013d0| 6e 74 66 28 33 29 20 63 | 6f 6e 76 65 6e 74 69 6f |ntf(3) c|onventio|
|000013e0| 6e 73 2e 0a 20 2a 09 41 | 6e 79 20 6f 75 74 70 75 |ns.. *.A|ny outpu|
|000013f0| 74 20 69 73 20 70 72 65 | 63 65 64 65 64 20 62 79 |t is pre|ceded by|
|00001400| 20 27 3c 70 72 6f 67 6e | 61 6d 65 3e 3a 20 27 0a | '<progn|ame>: '.|
|00001410| 20 2a 09 49 66 20 27 65 | 72 72 6e 27 20 69 73 20 | *.If 'e|rrn' is |
|00001420| 6e 6f 6e 2d 7a 65 72 6f | 2c 20 69 74 20 69 73 20 |non-zero|, it is |
|00001430| 61 73 73 75 6d 65 64 20 | 74 6f 20 62 65 20 61 6e |assumed |to be an|
|00001440| 20 27 65 72 72 6e 6f 27 | 20 61 6e 64 20 69 74 73 | 'errno'| and its|
|00001450| 0a 20 2a 09 61 73 73 6f | 63 69 61 74 65 64 20 65 |. *.asso|ciated e|
|00001460| 72 72 6f 72 20 6d 65 73 | 73 61 67 65 20 69 73 20 |rror mes|sage is |
|00001470| 61 70 70 65 6e 64 65 64 | 20 74 6f 20 74 68 65 20 |appended| to the |
|00001480| 6f 75 74 70 75 74 2e 0a | 20 2a 2f 0a 0a 2f 2a 56 |output..| */../*V|
|00001490| 41 52 41 52 47 53 2a 2f | 0a 65 72 72 6f 72 28 65 |ARARGS*/|.error(e|
|000014a0| 72 72 6e 2c 20 76 61 5f | 61 6c 69 73 74 29 0a 69 |rrn, va_|alist).i|
|000014b0| 6e 74 20 65 72 72 6e 3b | 0a 76 61 5f 64 63 6c 0a |nt errn;|.va_dcl.|
|000014c0| 7b 0a 20 20 20 20 76 61 | 5f 6c 69 73 74 20 61 72 |{.    va|_list ar|
|000014d0| 67 6c 69 73 74 3b 0a 20 | 20 20 20 72 65 67 69 73 |glist;. |   regis|
|000014e0| 74 65 72 20 63 68 61 72 | 20 2a 66 6f 72 6d 61 74 |ter char| *format|
|000014f0| 3b 0a 20 20 20 20 65 78 | 74 65 72 6e 20 63 68 61 |;.    ex|tern cha|
|00001500| 72 20 2a 73 79 73 5f 65 | 72 72 6c 69 73 74 5b 5d |r *sys_e|rrlist[]|
|00001510| 3b 0a 20 20 20 20 65 78 | 74 65 72 6e 20 69 6e 74 |;.    ex|tern int|
|00001520| 20 73 79 73 5f 6e 65 72 | 72 3b 0a 20 20 20 20 65 | sys_ner|r;.    e|
|00001530| 78 74 65 72 6e 20 69 6e | 74 20 65 72 72 6e 6f 3b |xtern in|t errno;|
|00001540| 0a 0a 20 20 20 20 69 66 | 20 28 65 72 72 6e 20 3d |..    if| (errn =|
|00001550| 3d 20 2d 31 29 09 09 09 | 20 20 20 20 2f 2a 20 75 |= -1)...|    /* u|
|00001560| 73 65 20 65 72 72 6e 6f | 20 69 66 20 2d 31 20 2a |se errno| if -1 *|
|00001570| 2f 0a 09 65 72 72 6e 20 | 3d 20 65 72 72 6e 6f 3b |/..errn |= errno;|
|00001580| 0a 0a 20 20 20 20 76 61 | 5f 73 74 61 72 74 28 61 |..    va|_start(a|
|00001590| 72 67 6c 69 73 74 29 3b | 0a 20 20 20 20 66 6f 72 |rglist);|.    for|
|000015a0| 6d 61 74 20 3d 20 76 61 | 5f 61 72 67 28 61 72 67 |mat = va|_arg(arg|
|000015b0| 6c 69 73 74 2c 20 63 68 | 61 72 20 2a 29 3b 0a 20 |list, ch|ar *);. |
|000015c0| 20 20 20 28 76 6f 69 64 | 29 20 66 70 72 69 6e 74 |   (void|) fprint|
|000015d0| 66 28 73 74 64 65 72 72 | 2c 20 22 25 73 3a 20 22 |f(stderr|, "%s: "|
|000015e0| 2c 20 70 72 6f 67 6e 61 | 6d 65 29 3b 0a 20 20 20 |, progna|me);.   |
|000015f0| 20 28 76 6f 69 64 29 20 | 76 66 70 72 69 6e 74 66 | (void) |vfprintf|
|00001600| 28 73 74 64 65 72 72 2c | 20 66 6f 72 6d 61 74 2c |(stderr,| format,|
|00001610| 20 61 72 67 6c 69 73 74 | 29 3b 0a 20 20 20 20 76 | arglist|);.    v|
|00001620| 61 5f 65 6e 64 28 61 72 | 67 6c 69 73 74 29 3b 0a |a_end(ar|glist);.|
|00001630| 0a 20 20 20 20 69 66 20 | 28 65 72 72 6e 29 0a 09 |.    if |(errn)..|
|00001640| 69 66 20 28 28 65 72 72 | 6e 20 3e 20 30 29 20 26 |if ((err|n > 0) &|
|00001650| 26 20 28 65 72 72 6e 20 | 3c 3d 20 73 79 73 5f 6e |& (errn |<= sys_n|
|00001660| 65 72 72 29 29 0a 09 20 | 20 20 20 28 76 6f 69 64 |err)).. |   (void|
|00001670| 29 20 66 70 72 69 6e 74 | 66 28 73 74 64 65 72 72 |) fprint|f(stderr|
|00001680| 2c 20 22 20 28 25 73 29 | 5c 6e 22 2c 20 73 79 73 |, " (%s)|\n", sys|
|00001690| 5f 65 72 72 6c 69 73 74 | 5b 65 72 72 6e 5d 29 3b |_errlist|[errn]);|
|000016a0| 0a 09 65 6c 73 65 0a 09 | 20 20 20 20 28 76 6f 69 |..else..|    (voi|
|000016b0| 64 29 20 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |d) fprin|tf(stder|
|000016c0| 72 2c 20 22 20 28 75 6e | 6b 6e 6f 77 6e 20 65 72 |r, " (un|known er|
|000016d0| 72 6e 6f 3d 25 64 29 5c | 6e 22 2c 20 65 72 72 6e |rno=%d)\|n", errn|
|000016e0| 29 3b 0a 20 20 20 20 65 | 6c 73 65 0a 09 28 76 6f |);.    e|lse..(vo|
|000016f0| 69 64 29 20 66 70 72 69 | 6e 74 66 28 73 74 64 65 |id) fpri|ntf(stde|
|00001700| 72 72 2c 20 22 5c 6e 22 | 29 3b 0a 7d 0a 53 48 41 |rr, "\n"|);.}.SHA|
|00001710| 52 5f 45 4f 46 0a 66 69 | 0a 69 66 20 74 65 73 74 |R_EOF.fi|.if test|
|00001720| 20 2d 66 20 27 75 6e 66 | 6f 6e 74 2e 70 61 74 63 | -f 'unf|ont.patc|
|00001730| 68 27 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |h'.then.|.echo sh|
|00001740| 61 72 3a 20 22 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |ar: "wil|l not ov|
|00001750| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|00001760| 67 20 66 69 6c 65 20 27 | 75 6e 66 6f 6e 74 2e 70 |g file '|unfont.p|
|00001770| 61 74 63 68 27 22 0a 65 | 6c 73 65 0a 63 61 74 20 |atch'".e|lse.cat |
|00001780| 3c 3c 20 5c 53 48 41 52 | 5f 45 4f 46 20 3e 20 27 |<< \SHAR|_EOF > '|
|00001790| 75 6e 66 6f 6e 74 2e 70 | 61 74 63 68 27 0a 2a 2a |unfont.p|atch'.**|
|000017a0| 2a 20 75 6e 66 6f 6e 74 | 2e 63 2d 09 54 68 75 20 |* unfont|.c-.Thu |
|000017b0| 4a 61 6e 20 31 32 20 31 | 31 3a 33 34 3a 32 35 20 |Jan 12 1|1:34:25 |
|000017c0| 31 39 38 39 0a 2d 2d 2d | 20 75 6e 66 6f 6e 74 2e |1989.---| unfont.|
|000017d0| 63 09 46 72 69 20 41 70 | 72 20 32 37 20 30 36 3a |c.Fri Ap|r 27 06:|
|000017e0| 35 35 3a 34 38 20 31 39 | 39 30 0a 2a 2a 2a 2a 2a |55:48 19|90.*****|
|000017f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 31 |********|**.*** 1|
|00001800| 37 34 2c 31 38 31 20 2a | 2a 2a 2a 0a 20 20 09 09 |74,181 *|***.  ..|
|00001810| 63 6f 75 6e 74 20 3d 20 | 67 65 74 63 6f 75 6e 74 |count = |getcount|
|00001820| 28 29 3b 0a 20 20 09 09 | 69 66 20 28 76 65 72 62 |();.  ..|if (verb|
|00001830| 6f 73 65 29 0a 20 20 09 | 09 20 20 20 20 66 70 72 |ose).  .|.    fpr|
|00001840| 69 6e 74 66 28 73 74 64 | 65 72 72 2c 20 22 63 61 |intf(std|err, "ca|
|00001850| 73 65 31 20 63 6f 75 6e | 74 20 69 73 20 25 6c 64 |se1 coun|t is %ld|
|00001860| 5c 6e 22 2c 20 63 6f 75 | 6e 74 29 3b 0a 21 20 09 |\n", cou|nt);.! .|
|00001870| 09 66 6f 72 20 28 69 3d | 30 3b 20 69 3c 63 6f 75 |.for (i=|0; i<cou|
|00001880| 6e 74 3b 20 69 2b 2b 29 | 0a 21 20 20 20 20 20 09 |nt; i++)|.!     .|
|00001890| 09 09 70 75 74 63 68 61 | 72 28 6d 79 67 65 74 63 |..putcha|r(mygetc|
|000018a0| 28 29 29 3b 0a 20 20 09 | 09 62 72 65 61 6b 3b 0a |());.  .|.break;.|
|000018b0| 20 20 09 63 61 73 65 20 | 32 3a 09 09 0a 20 20 09 |  .case |2:...  .|
|000018c0| 09 2f 2a 20 67 65 74 20 | 63 6f 75 6e 74 2c 20 63 |./* get |count, c|
|000018d0| 6f 6e 76 65 72 74 20 63 | 6f 75 6e 74 20 62 79 74 |onvert c|ount byt|
|000018e0| 65 73 20 74 6f 20 68 65 | 78 2c 20 6f 75 74 70 75 |es to he|x, outpu|
|000018f0| 74 09 2a 2f 0a 2d 2d 2d | 20 31 37 34 2c 31 38 33 |t.*/.---| 174,183|
|00001900| 20 2d 2d 2d 2d 0a 20 20 | 09 09 63 6f 75 6e 74 20 | ----.  |..count |
|00001910| 3d 20 67 65 74 63 6f 75 | 6e 74 28 29 3b 0a 20 20 |= getcou|nt();.  |
|00001920| 09 09 69 66 20 28 76 65 | 72 62 6f 73 65 29 0a 20 |..if (ve|rbose). |
|00001930| 20 09 09 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 | ..    f|printf(s|
|00001940| 74 64 65 72 72 2c 20 22 | 63 61 73 65 31 20 63 6f |tderr, "|case1 co|
|00001950| 75 6e 74 20 69 73 20 25 | 6c 64 5c 6e 22 2c 20 63 |unt is %|ld\n", c|
|00001960| 6f 75 6e 74 29 3b 0a 21 | 20 09 09 66 6f 72 20 28 |ount);.!| ..for (|
|00001970| 69 3d 30 3b 20 69 3c 63 | 6f 75 6e 74 3b 20 69 2b |i=0; i<c|ount; i+|
|00001980| 2b 29 20 7b 0a 21 20 09 | 09 09 63 20 3d 20 6d 79 |+) {.! .|..c = my|
|00001990| 67 65 74 63 28 29 3b 0a | 21 20 20 20 20 20 09 09 |getc();.|!     ..|
|000019a0| 09 70 75 74 63 68 61 72 | 28 63 20 3d 3d 20 27 5c |.putchar|(c == '\|
|000019b0| 72 27 20 3f 20 27 5c 6e | 27 20 3a 20 63 29 3b 0a |r' ? '\n|' : c);.|
|000019c0| 21 20 09 09 7d 0a 20 20 | 09 09 62 72 65 61 6b 3b |! ..}.  |..break;|
|000019d0| 0a 20 20 09 63 61 73 65 | 20 32 3a 09 09 0a 20 20 |.  .case| 2:...  |
|000019e0| 09 09 2f 2a 20 67 65 74 | 20 63 6f 75 6e 74 2c 20 |../* get| count, |
|000019f0| 63 6f 6e 76 65 72 74 20 | 63 6f 75 6e 74 20 62 79 |convert |count by|
|00001a00| 74 65 73 20 74 6f 20 68 | 65 78 2c 20 6f 75 74 70 |tes to h|ex, outp|
|00001a10| 75 74 09 2a 2f 0a 53 48 | 41 52 5f 45 4f 46 0a 66 |ut.*/.SH|AR_EOF.f|
|00001a20| 69 0a 69 66 20 74 65 73 | 74 20 2d 66 20 27 70 72 |i.if tes|t -f 'pr|
|00001a30| 6f 6c 6f 61 64 2e 70 73 | 27 0a 74 68 65 6e 0a 09 |oload.ps|'.then..|
|00001a40| 65 63 68 6f 20 73 68 61 | 72 3a 20 22 77 69 6c 6c |echo sha|r: "will|
|00001a50| 20 6e 6f 74 20 6f 76 65 | 72 2d 77 72 69 74 65 20 | not ove|r-write |
|00001a60| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 27 70 |existing| file 'p|
|00001a70| 72 6f 6c 6f 61 64 2e 70 | 73 27 22 0a 65 6c 73 65 |roload.p|s'".else|
|00001a80| 0a 63 61 74 20 3c 3c 20 | 5c 53 48 41 52 5f 45 4f |.cat << |\SHAR_EO|
|00001a90| 46 20 3e 20 27 70 72 6f | 6c 6f 61 64 2e 70 73 27 |F > 'pro|load.ps'|
|00001aa0| 0a 25 21 0a 30 20 73 65 | 72 76 65 72 64 69 63 74 |.%!.0 se|rverdict|
|00001ab0| 20 62 65 67 69 6e 20 65 | 78 69 74 73 65 72 76 65 | begin e|xitserve|
|00001ac0| 72 0a 25 20 28 25 73 74 | 64 69 6e 29 20 28 72 29 |r.% (%st|din) (r)|
|00001ad0| 20 66 69 6c 65 20 63 76 | 78 20 65 78 65 63 0a 53 | file cv|x exec.S|
|00001ae0| 48 41 52 5f 45 4f 46 0a | 66 69 0a 65 78 69 74 20 |HAR_EOF.|fi.exit |
|00001af0| 30 0a 23 09 45 6e 64 20 | 6f 66 20 73 68 65 6c 6c |0.#.End |of shell|
|00001b00| 20 61 72 63 68 69 76 65 | 0a 0a 2d 2d 20 0a 2d 2d | archive|..-- .--|
|00001b10| 20 20 20 20 4a 6f 73 20 | 56 6f 73 20 3c 6a 6f 73 |    Jos |Vos <jos|
|00001b20| 40 62 75 6c 6c 2e 6e 6c | 3e 20 20 20 20 28 55 55 |@bull.nl|>    (UU|
|00001b30| 43 50 3a 20 2e 2e 2e 21 | 7b 75 75 6e 65 74 2c 6d |CP: ...!|{uunet,m|
|00001b40| 63 73 75 6e 2c 68 70 34 | 6e 6c 7d 21 6e 6c 62 75 |csun,hp4|nl}!nlbu|
|00001b50| 6c 6c 21 6a 6f 73 29 0a | 2d 2d 20 20 20 20 42 75 |ll!jos).|--    Bu|
|00001b60| 6c 6c 20 4e 65 64 65 72 | 6c 61 6e 64 20 4e 56 2c |ll Neder|land NV,|
|00001b70| 20 50 72 6f 64 75 63 74 | 20 53 75 70 70 6f 72 74 | Product| Support|
|00001b80| 20 55 6e 69 78 2c 20 41 | 6d 73 74 65 72 64 61 6d | Unix, A|msterdam|
|00001b90| 2c 20 54 68 65 20 4e 65 | 74 68 65 72 6c 61 6e 64 |, The Ne|therland|
|00001ba0| 73 0a 0a 0a             |                         |s...    |        |
+--------+-------------------------+-------------------------+--------+--------+