braner@batcomputer.tn.cornell.edu (braner) (01/04/87)
[] Contrary to some advice posted here, I uudecode stuff on a VAX (running BSD 4.2), and THEN transfer the (smaller) file to the ST using Kermit Image. Since plain Kermit is faster, this may not save any time... - but uudecoding on the VAX is fast and reliable. Unfortunately for some of us, they don't have uudecode on their mainframe. And it seems that the available programs for uudecoding on the ST are not so good. Here is one that is based on the code posted by David Moews <MOEWS@UCONNVM.BITNET> a while ago. I made it faster and more robust to missing or added spaces at the end of lines, null padding, linefeed with or without carriage return, etc. It also digests graves (````, ASCII 60 hex) OK. And assembled (using A-Seka) it is very small too... (Source code available upon request.) You DO have to make sure that there are no extra spaces at the BEGINNING of a line, and you will still suffer if your big blue mainframe translates some characters to others... (How do you uudecode this if you still don't have uudecode? Bootstrap :-) (or ask me for a hex dump... or get it on disk via real, physical mail...) - Moshe Braner ~~~~~~~~~~~~~~~~~~ cut here ~~~~~~~~~~~~~~~~~ begin 644 UUDECODE.TOS M8!H```,0`````````````````````````````"IO``0@/```3``O`"\-0F<_ M/`!*3D'?_`````Q*@&8``<I(>0```M8_/``)3D%<CT/Y```#$"0\````,F$` M`A!"9TAY```#$#\\`#U.05"/2D!K``&6,@!A``#\0D)A``$0#`<`(&8`__9A M``$$#`<`(&8`__9#^0```T1A``#R#`<`"F<``!0,!P`-9P``"!+'8`#_Z&$` M`-A"$4)G2'D```-$/SP`/$Y!4(]*0&L``4(T`&$``+H,!P`*9P`!6`P'``UG M``%0#`<`(&T`_^8$!P`@`@<`/V<``3Q"0Q8'4T-"1$I$9RP>!>&=4T2YS614 M&,=1R__N80``=@P'``IG`/^R#`<`#68`_^YA``!B8`#_HG@#0H7MC;7+9#`, M$@`@;18>&@0'`"`"!P`_B@=1S/_F2$5X`V"N0@51S/_:2$5X`V"B80``=&`` M_Z)A```R8`#_QD7Y```#>$?Y```G>$GY```G>$OY``!+>$YUM<MD```&'AI. M=6$```9@`/_P2'D```-X+SP``"0`/P$_/``_3D'?_`````Q*@&<``'9K```. M1?D```-X1_((`$YU2D)G```\8```1$OY```G>"\-F<TO##\"/SP`0$Y!W_P` M```,2H!K```D2?D``"=X2_D``$MX3G5A```Z8```&F$``#)A```^8```#F$` M`"9A```R80``.C\\``=.052/8```#F$`_Z1A```:80``(D)G3D%(>0```O@_ M/``)3D%<CTYU/P$_/``^3D%8CTYU/P(_/``^3D%8CTYU2.>`@$*!/SP`!TY! M5(\,```(9P``+@P``']G```F#```#6<``$(,```@;0#_VK2!9P#_U!.`&`!2 M@6$``$!@`/_&2H%G`/_`4X$0/``(80``+!`\`"!A```D$#P`"&$``!Q@`/^B M80``%!`\``IA```,0C$8`$S?`0%.=3\`/SP``DY!6(].=0T*"D5N=&5R(&YA M;64@;V8@9FEL92!T;R!D96-O9&4Z(``-"@I43U,@97)R;W(@;V-C=7)R960A 5(``````D#A(T*+@&!@8:)!8@!D0` ` end
braner@batcomputer.tn.cornell.edu (braner) (01/05/87)
[]
Here is a debugged version of my UUDECODE from yesterday, plus
a companion UUENCODE. They are here uudecoded using this uudecode...
Hopefully this is debugged enough...
BTW, this program uudecodes a long file in less time than it takes
to type in the filename (on a RAMdisk, of course). Therefore I don't
see any need for a "background" uudecoder...
- Moshe Braner
~~~~~~~~~~~~~~ cut here and also later ~~~~~~~~~~~~~~~
begin 644 uudecode.tos
M8!H ,Z "IO 0@/ 3 O "\-0F<_
M/ !*3D'?_ Q*@&8 >Q(>0 P _/ )3D%<CT/Y #/B0\ ,F$
M CI"9TAY #/C\\ #U.05"/2D!K &X,\ ,Z80 !!$)Y #/&$ 10,
M!P @9@#_]F$ 0@,!P @9@#_]D/Y #<F$ /8,!P *9P % P' UG (
M$L=@ /_H80 W$(10F=(>0 W(_/ \3D%0CTI :P !7#/ #/&$ +H,
M!P *9P !;@P' UG %F# < (&T _^8$!P @ @< /V< 5)"0Q8'4T-"1$I$
M9RP>!>&=4T2YS614&,=1R__N80 =@P' IG /^R# < #68 _^YA !B8 #_
MHG@#0H7MC;7+9# ,$@ @;18>&@0' " "!P _B@=1S/_F2$5X V"N0@51S/_:
M2$5X V"B80 ?& _Z)A R8 #_QD7Y GID?Y GIDGY GIDOY !+
MIDYUM<MD &'AI.=6$ 9@ /_P2'D .F+SP "0 /SD ,Z/SP /TY!
MW_P ,2H!G "(:P #D7Y #ID?R" !.=4IY #/&< $I@ !2( P$
M@ )Z9G D*$!(>0 )Z8O #\Y #/#\\ $!.0=_\ #+",9@ )$GY
M GIDOY !+IDYU80 .F !IA R80 /F YA F80 ,F$ #X_
M/ '3D%4CV YA /^680 &F$ "9"9TY!2'D ,B/SP "4Y!7(].=3\Y
M #.C\\ #Y.05B/3G4_.0 SP_/ ^3D%8CTYU2.> @$*!/SP !TY!5(\,
M (9P +@P ']G F# #6< $(, @;0#_VK2!9P#_U!. & !2@6$
M $!@ /_&2H%G /_ 4X$0/ (80 +! \ "!A D$#P "&$ !Q@ /^B80
M%! \ IA ,0C$8 $S? 0%.=3\ /SP DY!6(].=0T*"D5N=&5R(&YA;64@
M;V8@9FEL92!T;R!D96-O9&4Z( -"@I43U,@97)R;W(@;V-C=7)R960A(
; D#A(4"AXH%*@&!@8:#!P,$ P(& 9$$!
end
~~~~~~~~~~~~ second cut here ~~~~~~~~~~~~~~~
begin 644 uuencode.tos
M8!H -F "IO 0@/ 3 O "\-0F<_
M/ !*3D'?_ Q*@&8 A9(>0 O _/ )3D%<CT/Y #:B0\ ,F$
M C)(>0 ](_/ :3D%<CT)G2'D -J/SP 3DY!4(]*0&8 =1"9TAY #
M:C\\ #U.05"/2D!K &^,\ -F2'D ,2/SP "4Y!7(]#^0 YXD/
M #)A '40F=(>0 YX_/ \3D%0CTI :P !@#/ #:$7Y $1D?Y $
M1DGY H1DOY !,1D)'0_D ,T$!EG (&,!@ /_V0_D -J$!EG (
M&,!@ /_V&/P #1C\ HV/ .0D9-^0 _Y2CG@"0H6URV0,BAKAC5)&4<S_
M]& <80 ?&8 _^X^/ !#$0 F< "1"!>&-4<S_^G@#[9T0!0( #\& @
M',!1S/_P2D=6R_^X2D=G"$/Y #0F &0_D ,_'-EF_$WY #_C &9P@&
M @'(!@ E*.'!YG#+G-901A !:&,9@\$I'9P#_:F$ $Q@ "$2KD /L
M9P /$AY $1B\\ D #\Y #9C\\ #].0=_\ #$J :P 8F< %Z1
MN0 ^Q%^0 !$9'\@@ 2H!.=2 ,!( "A&9P )"A 2'D "A&+P _.0
M V@_/ ! 3D'?_ RPC&8 !Q)^0 *$9+^0 3$9.=6$ #QA H8
M(&$ #!A <2'D --/SP "4Y!7(\_/ '3D%4CT)G3D$_.0 V8_/ ^
M3D%8CTYU/SD -H/SP /DY!6(].=4*!/SP !TY!5(\, (9P +@P ']G
M F# #6< $(, @;0#_VK2!9P#_U!. & !2@6$ #Q@ /_&2H%G /_
M4X$0/ (80 *! \ "!A @$#P "&$ !A@ /^B80 $! \ IA (0C$8
M $YU/P _/ "3D%8CTYU#0H*16YT97(@;F%M92!O9B!F:6QE('1O(&5N8V]D
M93H@ T*"D5N=&5R(&YA;64@;V8@;W5T<'5T(&9I;&4Z(" @( !B96=I;B V
M-#0@ T* T*( T*96YD#0H #0H*5$]3(&5R<F]R(&]C8W5R<F5D(2
C "0.$! 6% 8.$A0&!@8&"!(@5@@*,@H,' 80# @8!AP:$
end