amiga-request@ab20.larc.nasa.gov (Amiga Sources/Binaries Moderator) (05/18/91)
Submitted-by: RWALLACE%vax1.tcd.ie@CUNYVM.CUNY.EDU Posting-number: Volume 91, Issue 111 Archive-name: utilities/hd/part01 [ includes uuencoded executable ...tad ] Hex dump utility Usage: HD <filename> or without arg will take data from standard input #!/bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh <file", e.g.. If this archive is complete, you # will see the following message at the end: # "End of archive 1 (of 1)." # Contents: hd.c hd.uu # Wrapped by tadguy@ab20 on Fri May 17 22:04:16 1991 PATH=/bin:/usr/bin:/usr/ucb ; export PATH if test -f 'hd.c' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'hd.c'\" else echo shar: Extracting \"'hd.c'\" \(1395 characters\) sed "s/^X//" >'hd.c' <<'END_OF_FILE' X/* Hex dump utility X by Russell Wallace 15 November 1989 X Usage: HD <filename> X or without arg will take data from standard input X Should compile unchanged on most operating systems X Define a constant if appropriate as follows: XAMIGA_AZTEC X*/ X X#include <stdio.h> X Xint i,bytes[16],column,c; XFILE *fp; X Xmain (argc,argv) Xchar **argv; X{ X if (argc>2 || (argc==2 && !strcmp (argv[1],"?"))) X { X fprintf (stderr, X"Hex dump utility by Russell Wallace 15 November 1989\n\ XUsage: HD <filename> or without arg will take data from standard input\n"); X exit (1); X } X if (argc==2) X { X#ifdef AMIGA_AZTEC X if ((fp=fopen (argv[1],"r"))==0) X#else X if ((fp=fopen (argv[1],"rb"))==0) X#endif X { X fprintf (stderr, X"Error - Can't open %s\n",argv[1]); X exit (1); X } X } X else X fp=stdin; X while (!feof (fp)) X { X c=fgetc (fp); X if (feof (fp)) X break; X bytes[column++]=c; X#ifdef AMIGA_AZTEC X printf ("%02x ",c); X#else X printf ("%02X ",c); X#endif X if (column>=16) X { X printf (" "); X for (column=0;column<16;column++) X { X if (bytes[column]>31 && bytes[column]<127) X putchar (bytes[column]); X else X putchar ('.'); X } X column=0; X putchar ('\n'); X } X } X if (column) X { X for (i=column;i<16;i++) X printf (" "); X printf (" "); X for (i=0;i<column;i++) X { X if (bytes[i]>31 && bytes[i]<127) X putchar (bytes[column]); X else X putchar ('.'); X } X putchar ('\n'); X } X} END_OF_FILE if test 1395 -ne `wc -c <'hd.c'`; then echo shar: \"'hd.c'\" unpacked with wrong size! fi # end of 'hd.c' fi if test -f 'hd.uu' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'hd.uu'\" else echo shar: Extracting \"'hd.uu'\" \(9401 characters\) sed "s/^X//" >'hd.uu' <<'END_OF_FILE' Xbegin 644 hd XM```#\P`````````#``````````(```70````PP````$```/I```%T$[Z!I!.! XM50``#&T``@`(;AX,;0`"``AF+DAZ`?@@;0`*+R@`!$ZZ!%Q03TI`9AA(>@'D> XM2&R`^$ZZ!!)03S\\``%.NA065$\,;0`"``AF/$AZ`D$@;0`*+R@`!$ZZ`TQ0] XM3RE`@KQF(B!M``HO*``$2'H"(TAL@/A.N@/23^\`##\\``%.NA/45$]@"$'L- XM@,PI2(*\(&R"O`@H``,`#&8``,PO+(*\3KH"%EA/.4""NB!L@KP(*``#``QFZ XM``"P,"R"N%)L@KA(P..`0>R"F#&L@KH(`#\L@KI(>@'23KH*,%Q/#&P`$(*X\ XM;7Y(>@'&3KH*'EA/0FR"N#`L@KA(P..`0>R"F`QP`!\(`&\P,"R"N$C`XX!!_ XM[(*8#'``?P@`;!Q(;(#B,"R"N$C`XX!![(*8/S`(`$ZZ#EQ<3V`.2&R`XC\\" XM`"Y.N@Y,7$]2;(*X#&P`$(*X;:)";(*X2&R`XC\\``I.N@XN7$]@`/\J2FR"W XMN&<``)XY;(*X@I9@#DAZ`3A.N@F,6$]2;(*6#&P`$(*6;>I(>@$F3KH)=EA/% XM0FR"EF!6,"R"EDC`XX!![(*8#'``'P@`;S`P+(*62,#C@$'L@I@,<`!_"`!LY XM'$AL@.(P+(*X2,#C@$'L@I@_,`@`3KH-LEQ/8`Y(;(#B/SP`+DZZ#:)<3U)LP XM@I8P+(*6L&R"N&V@2&R`XC\\``I.N@V&7$].74YU/P!(97@@9'5M<"!U=&EL6 XM:71Y(&)Y(%)U<W-E;&P@5V%L;&%C92`Q-2!.;W9E;6)E<B`Q.3@Y"E5S86=E2 XM.B!(1"`\9FEL96YA;64^(&]R('=I=&AO=70@87)G('=I;&P@=&%K92!D871AG XM(&9R;VT@<W1A;F1A<F0@:6YP=70*`'(`17)R;W(@+2!#86XG="!O<&5N("5S_ XM"@`E,#)X(``@("``("`@`"`@(`!.50``+PHD;0`((%*QZ@`$90PO"F$66$\D[ XM7TY=3G4@4E*2$!!(@,!\`/]@[$Y5``!(YP@P)&T`"!`J``S`/``89PIP_TS?: XM#!!.74YU"*H``@`,2JH`"&8(+PI.N@Z\6$\0*@`,2(`(```'9S!![(#,)D@01 XM*P`,2(#`?`"$L'P`A&8,/SS__R\+3KH-=%Q/U_P````60>R"A+?(9=8_*@`07 XM+RH`"!`J``U(@#\`3KH"IC@`2D!03VX42D1F!'`(8`)P$($J``QP_V``_WHP# XM!$C`)*H`"-"J``@E0``$(%)2DA`02(#`?`#_8`#_6DY5```O"DZZ#>PD0$J`* XM9@AP`"1?3EU.=2\*+RT`#"\M``AA!D_O``Q@Z$Y5``!(YP@@+RT`$$ZZ#%9!> XM[(`")$A83TH29A`Y?``%@L!P`$S?!!!.74YU($HB;0`,$!BP&68$2@!F]I`AC XM2(!G!%R*8-(_*@`$+RT`"$ZZ`*@X`+!\__]<3V8$<`!@Q"!M`!`11``-(&T`C XM$!%\``$`#"`M`!!@K$Y5```I;0`(@HY(;0`0+RT`#$AZ``Y.N@=43^\`#$Y=Y XM3G5.50``+RR"CC\M``A.N@L67$].74YU,#Q__V`$,"\`#%-`:Q0@;P`$(F\`V XM"+$)9@Q32$H85\C_]G``3G5C!'`!3G5P_TYU3E4``#\M``P_/`,!+RT`"&$&J XM4$].74YU3E4``$CG#S`D;0`(3KH/)B9L@L)X`&`.,`3!_``&2K,(`&<.4D2XO XM;(*$;>QZ!F```,0(+0`!``QG,$AX__\O"DZZ$1(L`%!/9R`O!DZZ$4HO"DZZ5 XM$-A*@%!/9@Y.NA#B.@"P?`#-9@``C$AX`^TO"DZZ$/`L`$J&4$]F8`@M````K XM#&8$>@%@;$AX`^XO"DZZ$-(L`%!/9@A.NA"F.@!@5$AX`"%(>@"23KH1;BX`@ XM4$]G"B\'3KH1&%A/8!Y(>``!2'H`@B\&3KH0W$AX__]"IR\&3KH0LD_O`!A@F XM)C`M``S`?`4`L'P%`&88+P9.NA`F>@183SE%@L!P_TS?#/!.74YU,`3!_``&2 XM)X8(`#`$P?P`!B!`T<LQ;0`,``0(+0`#``QG$$AX``%"IR\&3KH06$_O``PP: XM!&#"9&]S+FQI8G)A<GD```!.50``2.<,(#@M``A.N@W@,`3!_``&)$#5[(+"/ XM2D1M"KAL@H1L!$J29A`Y?``"@L!P_TS?!#!.74YU,"H`!,!\``.P?``!9@HY9 XM?``%@L!P_V#@<``P+0`.+P`O+0`*+Q).N@_0*@"PO/____]/[P`,9@Q.N@^&U XM.4""P'#_8+0@!6"P87!#[(*.1>R"CK7)9@XR/``?:PAT`"+"4<G__"E/@L8L/ XM>``$*4Z"RDCG@(`(+@`$`2EG$$OZ``A.KO_B8`9"I_-?3G-#^@`@3J[^:"E`] XM@LYF#"X\``.`!TZN_Y1@!$ZZ`!I03TYU9&]S+FQI8G)A<GD`2?D``'_^3G5.F XM50``+PI(>0`!```P+(*$P?P`!B\`3KH/@"E`@L)03V840J=(>0`!``!.N@]$' XM4$\N;(+&3G4@;(+"0F@`!"!L@L(Q?``!`!`@;(+",7P``0`*(&R"QB`L@L:00 XMJ``$4(`I0(+2(&R"TB"\34%.6$*G3KH/-"1`2JH`K%A/9RXO+0`,+RT`""\*B XM3KH`KCE\``&"UB!L@L(`:(````0@;(+"`&B````*3^\`#&!"2&H`7$ZZ#TY(I XM:@!<3KH/$"E`@M@@;(+82J@`)%!/9Q`@;(+8(F@`)"\13KH.!EA/+RR"V"\*' XM3KH":"EL@MB"W%!/3KH.!B!L@L(@@$ZZ#C0@;(+"(4``!F<62'@#[4AZ`"I.2 XMN@X0(&R"PB%```Q03R\L@MP_+(+@3KKWTD)G3KH,(%!/)%].74YU*@!.50``% XM2.<,,"1M`!`@;0`(2J@`K&<8(&T`""`H`*SE@"@`($0@*``0Y8`F0&`$)FR"3 XMAA`32(!(P-"M``Q4@#E`@N)"IS`L@N)(P"\`3KH.$BE`@N103V8(3-\,,$Y=I XM3G40$TB`.@`_!2!+4H@O""\L@N1.N@%^,`5(P"!`T>R"Y$/Z`400V6;\/RT`I XM#B\*+RR"Y$ZZ`3H@;(+D0C!0`#E\``&"X#`%2,#0K(+D)D!2BR1+3^\`%!`3= XM2(`Z`+!\`"!G&+I\``EG$KI\``QG#+I\``UG!KI\``IF!%*+8-@,$P`@;7H,; XM$P`B9BY2BR!+4HL0$$B`.@!G'B!*4HH0A;I\`")F$`P3`")F!%*+8`9"*O__6 XM8`)@UF`X($M2BQ`02(`Z`&<FNGP`(&<@NGP`"6<:NGP`#&<4NGP`#6<.NGP`O XM"F<(($I2BA"%8,X@2E**0A!*168"4XM2;(+@8`#_6D(20J<P+(+@4D!(P.6`" XM+P!.N@SP*4""W%!/9@A";(+@8`#^V'H`)FR"Y&`D,`5(P.6`(&R"W"&+"``@C XM2R`(2AAF_)'`4X@P"%)`2,#7P%)%NFR"X&W6,`5(P.6`(&R"W$*P"`!@`/Z4F XM(``P/'__8`0P+P`,(&\`!$H89OQ32")O``A30!#95\C__&<"0A`@+P`$3G5,7 XM[P,```0@"#(O``Q@`A#95\G__&<&4D%@`D(84<G__$YU3E4``$CG#C`D;0`(N XM0J=(>@".3KH,=BE`@NA03V8(3-\,<$Y=3G4@;0`,(F@`)"\I``1.N@RF*`!85 XM3V=22'H`;2!$+R@`-DZZ#'@F0$J`4$]G-$AX`^TO"TZZ"WHL`%!/9R0@!N6`V XM*@`@125H``@`I"5&`)Q(>`/M2'H`.$ZZ"U8E0`"@4$\O!$ZZ#$183R\L@NA.+ XMN@NH0JR"Z%A/8(!I8V]N+FQI8G)A<GD`5TE.1$]7`"H`3E4``$AM``PO+0`(B XM2'H$8$ZZ`)A/[P`,3EU.=4Y5``!(YP@@)&T`#@QM``0`$F8((&T`""@08!Q*G XM;0`,;PP@;0`(<``P$"@`8`H@;0`(,!!(P"@`0FT`$DIM``QL$$1M``Q*A&P(/ XM1(0[?``!`!(R+0`,2,$@!$ZZ`Y!![(`X4XH4L```,BT`#$C!(`1.N@.&*`!F" XMVDIM`!)G!E.*%+P`+2`*3-\$$$Y=3G5.5?\B2.<(,"1M``@F;0`,0FW_^BMMD XM`!#__"!+4HL0$$B`.`!G``+NN'P`)68``LQ"+?\P.WP``?_X.WP`(/_V.WPG. XM$/_T($M2BQ`02(`X`+!\`"UF#D)M__@@2U*+$!!(@#@`N'P`,&80.WP`,/_V\ XM($M2BQ`02(`X`+A\`"IF&"!M__Q4K?_\.U#_\B!+4HL0$$B`.`!@,D)M__)@^ XM'#`M__+!_``*T$20?``P.T#_\B!+4HL0$$B`.``P!%)`0>R`2@@P``(``&;4& XMN'P`+F9:($M2BQ`02(`X`+!\`"IF&"!M__Q4K?_\.U#_]"!+4HL0$$B`.`!@H XM,D)M__1@'#`M__3!_``*T$20?``P.T#_]"!+4HL0$$B`.``P!%)`0>R`2@@P" XM``(``&;4.WP``O_PN'P`;&82($M2BQ`02(`X`#M\``3_\&`0N'P`:&8*($M2' XMBQ`02(`X`#`$2,!@>CM\``C_[F`6.WP`"O_N8`X[?``0_^Y@!CM\__;_[C\M> XM__!(;?\P/RW_[B\M__Q.NOWD*T#_ZC`M__!(P-&M__Q/[P`,8%P@;?_\6*W_? XM_")0*TG_ZB`)2AEF_)/`4XD[2?_P8$H@;?_\5*W__#@00>W_+RM(_^H0A&`HE XMD+P```!C9^)3@&>2D+P````+9P#_<EF`9[)5@&<`_W!7@&<`_W)@S$'M_S"19 XM[?_J.TC_\#`M__"P;?_T;P8[;?_T__!*;?_X9V@@;?_J#!``+6<*(&W_Z@P0B XM`"MF+@QM`##_]F8F4VW_\B!M_^I2K?_J$!!(@#\`3I*P?/__5$]F"G#_3-\,B XM$$Y=3G5@%C\M__9.DK!\__]43V8$</]@Y%)M__HP+?_R4VW_\K!M__!NW$)M; XM_^Y@("!M_^I2K?_J$!!(@#\`3I*P?/__5$]F!'#_8+!2;?_N(&W_ZDH09PHPE XM+?_NL&W_]&W.,"W_[M%M__I*;?_X9BA@&#\\`"!.DK!\__]43V8&</]@`/]X4 XM4FW_^C`M__)3;?_RL&W_\&[:8!8_!$Z2L'S__U1/9@9P_V``_U)2;?_Z8`#]2 XM"#`M__I@`/]"2.=(`$*$2H!J!$2`4D1*@6H&1($*1``!83Y*1&<"1(!,WP`2T XM2H!.=4CG2`!"A$J`:@1$@%)$2H%J`D2!81H@`6#8+P%A$B`!(A]*@$YU+P%A/ XM!B(?2H!.=4CG,`!(04I!9B!(038!-`!"0$A`@,,B`$A`,@*"PS`!0D%(04S?9 XM``Q.=4A!)@$B`$)!2$%(0$)`=`_0@-.!MH%B!)*#4D!1RO_R3-\`#$YU3E4`+ XM`$AL@.(_+0`(3KH`"%Q/3EU.=4Y5```O!#@M``@O+0`*/P1.N@`PN'P`"EQ/` XM9B0@;0`*$"@`#$B`"```!V<4/SS__R\M``I.N@#T7$\H'TY=3G5@^$Y5```O< XM"B1M``H@4K'J``1E&#`M``C`?`#_/P`O"DZZ`,A<3R1?3EU.=2!24I(0+0`)3 XM$(!(@,!\`/]@Z$Y5```O"D'L@,PD2"!*U?P````6+PAA$%A/0>R"A+7(9>HD? XM7TY=3G5.50``2.<(("1M``AX`"`*9@IP_TS?!!!.74YU2BH`#&=0""H``@`,% XM9PP_//__+PIA4C@`7$\0*@`-2(`_`$ZZ!1R(0`@J``$`#%1/9PHO*@`(3KH"X XM+EA/""H`!0`,9Q(O*@`23KH"P"\J`!).N@(44$]"DD*J``1"J@`(0BH`##`$2 XM8)!.5?_^2.<(("1M``A!^O]&*4B"[`@J``0`#&<*</],WP003EU.=0@J``(`B XM#&<P(%*1Z@`(.`@_!"\J``@0*@`-2(`_`$ZZ`H"P1%!/9Q`(Z@`$``Q"DD*J@ XM``1P_V#`#&W__P`,9A`(J@`"``Q"DD*J``1P`&"H2JH`"&8(+PI.N@":6$\,` XM:@`!`!!F*AMM``W__S\\``%(;?__$"H`#4B`/P!.N@(BL'P``5!/9J`P+0`," XM8`#_:B2J``@P*@`02,#0J@`()4``!`CJ``(`#"!24I(0+0`-$(!(@,!\`/]@/ XM`/\^3E4``"\*0>R`S"1(2BH`#&<8U?P````60>R"A+7(90AP`"1?3EU.=6#BD XM0I)"J@`$0JH`""`*8.I.5?_\+PHD;0`(/SP$`$ZZ`,`K0/_\5$]F\``$`< XM$"!*T?P````.)4@`""1?3EU.=35\!```$`CJ``$`#"5M__P`"!`J``U(@#\`B XM3KH`XDI`5$]G!@`J`(``#&#.3E4``$CG`#`D;(*28!0F4B`J``10@"\`+PI.. XMN@1X4$\D2R`*9NA"K(*23-\,`$Y=3G5.50``+PI!^O_&*4B"\$*G("T`"%"`P XM+P!.N@0F)$!*@%!/9@AP`"1?3EU.=22L@I(E;0`(``0I2H*2(`I0@&#F3E4`I XM`'``,"T`""\`8;)83TY=3G5.50``2.<`,)?+)&R"DF`.(&T`"%&(L<IG$B9*T XM)%(@"F;N</],WPP`3EU.=2`+9P0FDF`$*5*"DB`J``10@"\`+PI.N@/*<`!0D XM3V#83E4``"\*,"T`",'\``8D0-7L@L)*;0`(;0XP+0`(L&R"A&P$2I)F#CE\J XM``*"P'#_)%].74YU,"T`",'\``8@;(+"+S`(`$ZZ`L9*@%A/9P1P`6`"<`!@2 XMV$Y5```O+0`(3KH"D$J`6$]F#DZZ`IHY0(+`</].74YU<`!@^$Y5``!(YPP@@ XM."T`"$ZZ`'`P!,'\``8D0-7L@L)*1&T*N&R"A&P$2I)F$#E\``*"P'#_3-\$- XM,$Y=3G4P*@`$P'P``V8*.7P`!8+`</]@Y'``,"T`#B\`+RT`"B\23KH"D"H`/ XML+S_____3^\`#&8,3KH"&CE`@L!P_V"X(`5@M$Y5__Q(>!``0J=.N@+T*T#_" XM_`@```Q03V<22FR"UF8(("W__$Y=3G5.N@`&<`!@]$Y5``!(>``$2'H`'$ZZY XM`?XO`$ZZ`BP_/``!3KH`#D_O``Y.74YU7D,*`$Y5``!*K(+L9P8@;(+L3I`_F XM+0`(3KH`"%1/3EU.=4Y5__PO!#`M``A(P"M`__Q*K(+"9RAX`&`*/P1.N@#^N XM5$]21+AL@H1M\#`L@H3!_``&+P`O+(+"3KH"%E!/2JR"\&<&(&R"\$Z02JR"; XMBF<*+RR"BDZZ`9)83TJL@O1G""!L@O0@K(+X2JR"_&<*+RR"_$ZZ`:Y83TJL9 XM@P!G"B\L@P!.N@&>6$]*K(,$9PHO+(,$3KH!CEA/2JR#"&<*+RR#"$ZZ`7Y8E XM3RQX``0(+@`$`2EG%"\-2_H`"DZN_^(J7V`&0J?S7TYS2JR"V&8P2JR"Y&<HZ XM,"R"XDC`+P`O+(+D3KH!;C`L@N!20$C`Y8`O`"\L@MQ.N@%:3^\`$&`.3KH!\ XM2"\L@MA.N@%T6$\@+?_\+FR"QDYU*!].74YU3E4``$CG#B`X+0`(,`3!_``&G XM)$#5[(+"2D1M"KAL@H1L!$J29A`Y?``"@L!P_TS?!'!.74YU""H`!P`$9@@OI XM$DZZ``I83T*2<`!@XB(O``0L;(+.3N[_W"(O``0L;(+.3N[_@B(O``0L;(+.< XM3N[_N"QL@LY.[O_*+&R"SD[N_WPB+P`$+&R"SD[N_RA,[P`&``0L;(+.3N[_' XMK$SO``8`!"QL@LY.[O_B+&R"SD[N_\1,[P`.``0L;(+.3N[_UDSO``X`!"QL( XM@LY.[O^^3OH``B(O``0L;(+.3N[_IDSO``X`!"QL@LY.[O_02.<!!$SO((``` XM#"QL@LI.KO^43-\@@$YU3OH``B)O``0L;(+*3N[^8DSO``,`!"QL@LI.[O\Z' XM(F\`!"QL@LI.[O[:+&R"RD[N_WPB;P`$("\`""QL@LI.[O\N(&\`!"QL@LI.F XM[OZ,+&R"RB)O``0@+P`(3N[]V")O``0L;(+*3N[^ADSO``,`!"QL@LI.[O[.` XM(&\`!"QL@LI.[OZ`3.\#```$+&R"Z$[N_Z`@;P`$+&R"Z$[N_Z8@;P`$+&R"S XMZ$[N_[(``````^P````!`````0``!P8````````#\@```^H```"C<@``````* XM<BL````"=P````,!=RL```,"80````D!82L```D">`````4!>"L```4"````K XM````,#$R,S0U-C<X.6%B8V1E9@```"`@("`@("`@(#`P,#`P("`@("`@("`@2 XM("`@("`@("`@D$!`0$!`0$!`0$!`0$!`0`P,#`P,#`P,#`Q`0$!`0$!`"0D)# XM"0D)`0$!`0$!`0$!`0$!`0$!`0$!`0%`0$!`0$`*"@H*"@H"`@("`@("`@("_ XM`@("`@("`@("`D!`0$`@``````````````````$``````0``````````````V XM```````!`0````$``````````````````````0(````!````````````````' XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` XM````````````````````````````````````````````````````````````` X@`````````!0``````````````_(```/K`````0```_(`M X`` Xend Xsize 6692 END_OF_FILE if test 9401 -ne `wc -c <'hd.uu'`; then echo shar: \"'hd.uu'\" unpacked with wrong size! fi # end of 'hd.uu' fi echo shar: End of archive 1 \(of 1\). cp /dev/null ark1isdone MISSING="" for I in 1 ; do if test ! -f ark${I}isdone ; then MISSING="${MISSING} ${I}" fi done if test "${MISSING}" = "" ; then echo You have the archive. rm -f ark[1-9]isdone else echo You still need to unpack the following archives: echo " " ${MISSING} fi ## End of shell archive. exit 0 -- Mail submissions (sources or binaries) to <amiga@uunet.uu.net>. Mail comments to the moderator at <amiga-request@uunet.uu.net>. Post requests for sources, and general discussion to comp.sys.amiga.misc.