[comp.binaries.amiga] arc_rename

ain@j.cc.purdue.edu (Patrick White) (07/28/88)

Submitted by:	barrett@crabcake.cs.JHU.EDU (Dan Barrett)
Summary:	renames files to less than 12 char and creates execute script to convert it back.
Poster Boy:	Patrick White	(ain@j.cc.purdue.edu)
Archive Name:	sources/amiga/volume5/arc_rename.d.sh.Z binaries/amiga/volume8/arc_rename.d.sh.Z
tested but not compiled.
 
NOTES:
   Had to burst the arc to get the files out.
 
 
-- Pat White   (co-moderator comp.sources/binaries.amiga)
ARPA/UUCP: j.cc.purdue.edu!ain  BITNET: PATWHITE@PURCCVM  PHONE: (317) 743-8421
U.S.  Mail:  320 Brown St. apt. 406,    West Lafayette, IN 47906
[archives at: j.cc.purdue.edu.ARPA]
 
========================================
 
#	This is a shell archive.
#	Remove everything above and including the cut line.
#	Then run the rest of the file through sh.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar:	Shell Archiver
#	Run the following text with /bin/sh to create:
#	README
#	ARCre.doc
# This archive created: Fri Jul 22 18:41:27 1988
# By:	Patrick White (PUCC Land, USA)
cat << \SHAR_EOF > README
	Here is ARCre.  This is a utility that renames Amigados files to
MSDOS compatible names for use with ARC and creates a file  called 
EXECUTE.ME to rename them back.  This uuencoded file is in ARC format.
Not written by me, but in the public domain.  It comes with source too...

----------------------------------------------------------------------------
	"Isn't fun the best thing to have?"

			lachac@topaz.rutgers.edu
SHAR_EOF
cat << \SHAR_EOF > ARCre.doc

ARCre - Create rename scripts so that files with long names can be
        easily put into ARChives.

Here's how to use it:

  ARCre [file(s) to be ARCed...]         : Create the rename scripts.
  execute ARCre.bat                      : Rename the files to be ARCed.
  ARC a ARChive ARCfile.* execute.me     : Create the ARChive.
  execute execute.me                     : Rename the files back.

  ARCre takes file names like the ARC program does.  (It will accept
  the '*' wildcard.)  Two scripts are produced: "ARCre.bat" and
  "execute.me".  The first one will rename the files to "ARCfile.#",
  where '#' is 1,2,3,...  The second one will rename the files back
  to their original names.

Copyright (c) 1987 John R. Hoffman

This program is placed in the public domain as long as the above
copyright is included.  Sale of this program except for REASONABLE 
media costs is prohibited.

The credit for the idea for this program goes to John Foust.

To create with MANX: cc ARCre.c
                     ln ARCre.o -lc

                                     John Hoffman (Plink: JRH)
SHAR_EOF
#	End of shell archive
exit 0

ain@j.cc.purdue.edu (Patrick White) (07/29/88)

Submitted by:	barrett@crabcake.cs.JHU.EDU (Dan Barrett)
Summary:	renames files to less than 12 char and creates execute script to convert it back.
Poster Boy:	Patrick White	(ain@j.cc.purdue.edu)
Archive Name:	binaries/amiga/volume8/arc_rename.b.sh.Z
tested but not compiled.
 
NOTES:
   Had to burst the arc to get the files out.
 
 
-- Pat White   (co-moderator comp.sources/binaries.amiga)
ARPA/UUCP: j.cc.purdue.edu!ain  BITNET: PATWHITE@PURCCVM  PHONE: (317) 743-8421
U.S.  Mail:  320 Brown St. apt. 406,    West Lafayette, IN 47906
[archives at: j.cc.purdue.edu.ARPA]
 
========================================
 
#	This is a shell archive.
#	Remove everything above and including the cut line.
#	Then run the rest of the file through sh.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar:	Shell Archiver
#	Run the following text with /bin/sh to create:
#	README
#	ARCre.uu
# This archive created: Fri Jul 22 18:40:17 1988
# By:	Patrick White (PUCC Land, USA)
cat << \SHAR_EOF > README
	Here is ARCre.  This is a utility that renames Amigados files to
MSDOS compatible names for use with ARC and creates a file  called 
EXECUTE.ME to rename them back.  This uuencoded file is in ARC format.
Not written by me, but in the public domain.  It comes with source too...

----------------------------------------------------------------------------
	"Isn't fun the best thing to have?"

			lachac@topaz.rutgers.edu
SHAR_EOF
cat << \SHAR_EOF > ARCre.uu
begin 644 ARCre
M   #\P         #          (   5K    VP        /I   %:TZY   %
M2D-O<'ER:6=H=" H8RD@,3DX-R!*;VAN(%(N($AO9F9M86X  $Y5_[Y"K?_"
M0JW_OCM\  '__ QM  $ "&X22'H!4DAL@'Q.N@2H4$].N@_*.WP  ?_^8   
M[#8M__Y(P^6#+&T "B\V. !.N@'P6$\K0/_X2H!G  #(2JW_PF8N2'H!,DAZ
M 21.N@/&4$\K0/_"2H!F&$AZ 3I(>@$:2&R ?$ZZ!$Q/[P ,3KH/;$JM_[YF
M/DAZ 3%(>@$B3KH#DE!/*T#_ODJ 9BA(>@$Y2'H!&4AL@'Q.N@083^\ #$JM
M_\)G"B\M_\).N@LJ6$].N@\H-BW__%)M__P_ TAZ 1)(;?_&3KH%^$_O  I(
M;?_&+RW_^$AZ 04O+?_"3KH#TD_O ! O+?_X2&W_QDAZ /TO+?^^3KH#ND_O
M !!@ /\<4FW__C8M__ZV;0 (;0#_# QM  '__&822'H X4AL@'Q.N@..4$].
MN@ZP2JW_PF<*+RW_PDZZ"IY83TJM_[YG"B\M_[Y.N@J.6$].N@Z,3EU.=55S
M86=E.B!!4D-R92!F:6QE<R N+BX* $%20W)E+F)A= !W $%20W)E.B!%<G)O
M<B!O<&5N:6YG("(E<R(N"@!!4D-R92YB870 15A%0U5412Y-10!W $%20W)E
M.B!%<G)O<B!O<&5N:6YG("(E<R(N"@!%6$5#551%+DU% $%20V9I;&4N)60 
M<F5N86UE("(E<R(@)7,* ')E;F%M92 E<R B)7,B"@!!4D-R93H@3F\@;6%T
M8VAI;F<@9FEL97,@9F]U;F0N"@!.50  +PI.N@U@2FR !F8,84PD0#E\  & 
M!F &3KH @B1 )@IF#$)L@ 9P "1?3EU.=4AJ  A(;(*23KH1)%!/+RT "$AL
M@I).N@"&4$]*0&8(3>R"DB .8-)@JF#.3E4  "\*/SP!!$ZZ"\Y43RE @KI"
MITZZ$FA83R1 +RR"NBEJ )B"OB\J )A.NA&,4$]*@&8(<  D7TY=3G5A F#V
M3E4  "\L@KHO+(*^3KH1B%!/2H!G%BQL@KH,K@      !&[@("R"NDY=3G5P
M &#X3E4  "\*+&T "!862(,_ TZZ /I43S\ +&T #!862(,_ TZZ .A43S8?
MMD!F'BQM  A2K0 (%A9(@TI#9@AP "1?3EU.=5*M  Q@)BQM  P6%DB#MGP 
M/V86+&T "!862(-*0V<*4JT "%*M  Q@ F "8)(L;0 ,%A9(@[9\ "IG!' !
M8+HL;0 ,%A9(@[9\ "IF%E*M  PL;0 ,%A9(@TI#9@1P &"88-PO+0 (3KH/
M\%A/2,#0K0 ()$!3BF H%A)(@RQM  P4%DB"MD)F%B\M  PO"DZZ_RA03TI 
M9@9P &  _UQ3BK7M  ADTG !8 #_3G  $"\ !; \ &!C"K \ 'IB!) \ "!.
M=7  $"\ !; \ $!C"K \ %IB!- \ "!.=4Y5   O"DZZ"3@D0$J 9@AP "1?
M3EU.=2\*+RT #"\M  AA!D_O  Q@Z$Y5  !(YP@@+RT $$ZZ!XQ83TWL@ @D
M3A822(-*0V80.7P !H+>< !,WP003EU.=2\M  PO"DZZ -A03TI 9P1<BF#4
M/RH !"\M  A.N@$*7$\X +!\__]F!'  8,HL;0 0'40 #2QM ! =?  !  P@
M+0 08+).50  *6T "(+"2&T $"\M  Q(>@ .3KH"VD_O  Q.74YU3E4  "\L
M@L(_+0 (3KH "%Q/3EU.=4Y5   O!#@M  @O+0 */P1.N@9V7$\H'TY=3G4B
M7Y+\  HB$=*!TH$H0=G\  "  D/L@I)%[(*2M<EF#C(\ #9K"'0 (L)1R?_\
M*4^"X"QX  0I3H+D2.> @$ZZ"K)03TYU,#Q__V $,"\ #%- :Q0@;P $(F\ 
M"+$)9@Q32$H85\C_]G  3G5C!' !3G5P_TYU3E4  #\M  P_/ ,!+RT "&$&
M4$].74YU3E4  $CG#C D;0 (3KH)Y$WL@N@F3GH -@7'_  &2K,X &<.4D6Z
M?  4;>Q\"&   +0V+0 ,QGP" &<R2'C__R\*3KH.IE!/* !*@&<@+P1.N@[*
M6$\O"DZZ#CQ83TJ 9@Q.N@YR/ "P? #-9G9(> /M+PI.N@Z"4$\H $J$9DPV
M+0 ,QGP! &8$? %@5DAX ^XO"DZZ#F)03R@ 2H!F"$ZZ#C0\ & \2'@  4AZ
M 'PO!$ZZ#G1/[P ,2'C__T*G+P1.N@Y*3^\ #& F-BT #,9\!0"V? 4 9A@O
M!$ZZ#:!83WP%.4:"WG#_3-\,<$Y=3G4V!<?\  8GA#@ -@7'_  &+$/=RSUM
M  P !#8M  S&? @ 9Q!(>  !0J<O!$ZZ#>Y/[P ,, 5@P   3E4  "\$*6T 
M"(+&2&T $"\M  Q(>@ :3KH RD_O  PX "QL@L9"%C $*!].74YU3E4  "QL
M@L92K(+&$"T "1R 2(# ? #_3EU.=4Y5  !(YP@@)&T #@QM  0 $F8(+&T 
M""@68!X,;0    QO#"QM  AV #86* -@"BQM  @V%DC#* -";0 2#&T    ,
M;!1$;0 ,N+P     ; A$A#M\  $ $E.*( 0R+0 ,2,%.N@.<3>R /A2V   @
M!#(M  Q(P4ZZ XXH $J 9MA*;0 29P93BA2\ "T@"DS?!!!.74YU3E7_(DCG
M"# D;0 ()FT #$)M__HK;0 0__PL2U*+%A9(@S@#2D-G  +\N'P )68  MI"
M+?\P.WP  ?_X.WP (/_V.WPG$/_T+$M2BQ862(,X [9\ "UF#D)M__@L2U*+
M%A9(@S@#N'P ,&80.WP ,/_V+$M2BQ862(,X [A\ "IF&"QM__Q4K?_\.U;_
M\BQ+4HL6%DB#. -@-D)M__)@'#8M__+&_  *UD26?  P.T/_\BQ+4HL6%DB#
M. ,V!%)#3>R"$!0V, !(@L1\  1FT+A\ "YF7BQ+4HL6%DB#. .V?  J9A@L
M;?_\5*W__#M6__0L2U*+%A9(@S@#8#9";?_T8!PV+?_TQOP "M9$EGP ,#M#
M__0L2U*+%A9(@S@#-@120TWL@A 4-C  2(+$?  $9M [?  "__"X? !L9A(L
M2U*+%A9(@S@#.WP !/_P8!"X? !H9@HL2U*+%A9(@S@#, 1(P&!X.WP "/_N
M8!8[?  *_^Y@#CM\ !#_[F &.WS_]O_N/RW_\$AM_S _+?_N+RW__$ZZ_=!/
M[P ,*T#_ZC8M__!(P]>M__Q@6BQM__Q8K?_\*U;_ZB\M_^I.N@HJ6$\[0/_P
M8$HL;?_\5*W__#@63>W_+RM._^H<A& HD+P   !C9^)3@&>4D+P    +9P#_
M=%F 9[15@&< _W)7@&< _W1@S$WM_S"=[?_J.T[_\#8M__"V;?_T;P8[;?_T
M__!*;?_X9W L;?_J%A9(@[9\ "UG#BQM_^H6%DB#MGP *V8N#&T ,/_V9B93
M;?_R+&W_ZE*M_^H6%DB#/P-.DE1/L'S__V8*</],WPP03EU.=6 6/RW_]DZ2
M5$^P?/__9@1P_V#D4FW_^C8M__)3;?_RMFW_\&[<0FW_[F @+&W_ZE*M_^H6
M%DB#/P-.DE1/L'S__V8$</]@L%)M_^XL;?_J2A9G"C8M_^ZV;?_T;<XV+?_N
MUVW_^DIM__AF*& 8/SP ($Z25$^P?/__9@9P_V  _WA2;?_Z-BW_\E-M__*V
M;?_P;MI@%C\$3I)43[!\__]F!G#_8 #_4E)M__I@ /SX,"W_^F  _T(O!$*$
M2H!J!$2 4D1*@6H&1($*1  !82Q*1&<"1( H'TYU+P1"A$J :@1$@%)$2H%J
M!D2!"D0  6$*( %@VF$$( %.=4CG, !(04I!9BA(04)#@,%H#C0 0D!(0(#!
M-@ P H#!(@!(0# #2$!"04A!3-\ #$YU2$%"@G8?XX#CDI2!:Q!2@%'+__1@
M#N. XY+4@6KP4<O_]M2!(@),WP ,3G5.50  +PHD;0 *+%*]Z@ $91@V+0 (
MQGP _S\#+PI.N@#67$\D7TY=3G4L4E*2$"T "1R 2(# ? #_8.A.50  +PI-
M[(!0)$XL2M7\    %B\.81!83TWL@@BUSF7J)%].74YU3E4  $CG"" D;0 (
M>  F"F8*</],WP003EU.=4HJ  QG7A8J  Q(@\9\  1G##\\__\O"F%<7$\X
M !8J  U(@S\#3KH'IE1/B$ 6*@ ,2(/&?  "9PHO*@ (3KH".%A/%BH #$B#
MQGP (&<4+RH $DZZ IA83R\J !).N@(86$]"DD*J  1"J@ (0BH ## $8().
M5?_^2.<(("1M  A-^O\X*4Z""!8J  Q(@\9\ !!G"G#_3-\$$$Y=3G46*@ ,
M2(/&?  $9S F$I:J  @X S\$+RH "!8J  U(@S\#3KH"3E!/L$1G$  J !  
M#$*20JH !'#_8+P,;?__  QF$ (J /L #$*20JH !'  8*1*J@ (9@@O"DZZ
M )I83PQJ  $ $&8J&VT #?__/SP  4AM__\6*@ -2(,_ TZZ ?!03[!\  %F
MH# M  Q@ /]F)*H "#8J !!(P]:J  @E0P $ "H !  ,+%)2DA M  T<@$B 
MP'P _V  _SI.50  +PI-[(!0)$Y**@ ,9QC5_    !9-[(((M<YE"'  )%].
M74YU8.)"DD*J  1"J@ (( I@ZDY5__PO"B1M  @6*@ -2(,_ TZZ 1A43TI 
M9Q@U?  ! ! F"M:\    #B5#  @D7TY=3G4_/ 0 3KH DE1/*T#__$J 9]8U
M? 0  !  *@ "  PE;?_\  A@U$Y5  !(YP P)&R"RF 4)E(L:@ $2&X ""\*
M3KH'%%!/)$LF"F;H0JR"RDS?# !.74YU3E4  "\*3?K_QBE.@@Q"IRQM  A(
M;@ (3KH&OE!/)$!*@&8(<  D7TY=3G4DK(+*)6T "  $*4J"RB *4(!@YDY5
M  !V #8M  @O V&R6$].74YU3E4  $CG #"7RR1L@LI@#BQM  A1CKW*9Q(F
M2B12)@IF[G#_3-\, $Y=3G4F"V<$)I)@!"E2@LHL:@ $2&X ""\*3KH&9E!/
M< !@V$Y5   V+0 (Q_P !DWL@N@O-C@ 3KH%IEA/2H!G!C \  %@ D) 3EU.
M=4Y5   O+0 (3KH%0%A/2H!F#DZZ!78Y0(+></].74YU< !@^$Y5  !(YPP@
M."T "$ZZ '0V!,?\  9-[(+H)$/5SKA\  !M"KA\ !-N!$J29A Y?  #@MYP
M_TS?!#!.74YU-BH !,9\  -F"CE\  :"WG#_8.1V #8M  XO R\M  HO$DZZ
M!59/[P ,*@"PO/____]F#$ZZ!/(Y0(+></]@N" %8+1.5?_\2'@0 $*G3KH%
MNE!/*T#__,"\   0 &8&< !.74YU2FR#8&8&("W__&#P2'@ !$AZ !Q.N@3<
M+P!.N@3X3^\ ##\\  %.N@ *5$]@SEY#"@!.50  2JR""&<&+&R""$Z6/RT 
M"$ZZ L)43TY=3G5.5?_\2.<.,$AX !](>@*.3KH%)E!/*4"#8DJ 9A1"ITAY
M  . !TZZ!*I03RYL@N!.=4AX !](>@)P3KH$_%!/*4"#9DJ 9A!"ITAY  . 
M!4ZZ!(!03V#40J=.N@2L6$\F0$JK *QG  &2)BL K.6#*@,L128N !#E@R1#
M%A)(@TC#UJT "%2#.4."T$*G-BR"T$C#+P-.N@1>4$\I0(+6%A)(@S\#2&H 
M 2\L@M9.N@+X3^\ "DAZ @ 6$DB#2,/6K(+6+P-.N@*^4$\V+0 *4D,_ R\M
M  PO+(+63KH"AD_O  I";(+.)&R"UA822(-20TWL@A 4-C  2(+$?  09P12
MBF#F%A)(@[9\ "!M,A822(,X TI#9Q@V!%)#3>R"$!0V, !(@L1\ !!F!%**
M8-XL2E**0A9*1&<&4FR"SF"J0A)"IS8L@LY20TC#Y8,O TZZ Z)03RE @M)X
M "1L@M9@.!822(-20TWL@A 4-C  2(+$?  09P12BF#F=@ V!.6#+&R"TBV*
M.  O"DZZ @983U) 2,#5P%)$N&R"SF7"=@ V!.6#+&R"TD*V. !.N@*X*4""
MZ#E\@ ""[$ZZ N(I0(+N.7R  8+R3KH"U"E @O0Y?( !@O@Y?  !@V O+(+2
M/RR"SDZZ[@1<3T)G3KH R%1/8   G$AK %Q.N@-B6$](:P!<3KH#(EA/*4""
MVBQL@MI*K@ D9Q L;(+:(FX )"\13KH!_EA/+&R"VDJN "!G3$AX ^TL;(+:
M+RX ($ZZ E!03RE @NA*@&<R*6R"Z(+T*6R"Z(+N.7R  (+L.7R  8+X.7R 
M 8+R)BR"Z.6#*T/__"QM__PG;@ ( *0O+(+:0F=.NNUD7$]"9V$H5$],WPQP
M3EU.=61O<RYL:6)R87)Y &UA=&AF9G N;&EB<F%R>0 @ $Y5__Y";?_^/RW_
M_DZZ 0!43U)M__X,;0 *__YMZDJL@@QG!BQL@@Q.EDJL@VIG"B\L@VI.N@'Z
M6$]*K(-F9PHO+(-F3KH!ZEA/2JR"VF8X-BR"T$C#+P,O+(+63KH"!%!/-BR"
MSE)#2,/E@R\#+RR"TDZZ >Y03S8M  A(PR\#3KH!%%A/8!A.N@'0+RR"VDZZ
M ?Q83R M  @N;(+@3G5.74YU,#Q__V $,"\ #"!O  1*&&;\4T@B;P (4T 0
MV5?(__Q"(" O  1.=2!O  0@"")O  @0V6;\3G4@;P $( A*&&;\D< @"%. 
M3G5,[P,   0@"#(O  Q@ A#95\G__%)!8 )"&%')__Q.=4Y5  !(YPX@."T 
M"#8$Q_P !DWL@N@D0]7.N'P  &T*N'P $VX$2I)F$#E\  ."WG#_3-\$<$Y=
M3G4V*@ $QGR  &8(+Q).N@ *6$]"DG  8. B+P $+&R#8D[N_]PB+P $+&R#
M8D[N_X(B+P $+&R#8D[N_[A.^@ "3.\ !@ $+&R#8D[N_YHB+P $+&R#8D[N
M_W!,[P &  0L;(-B3N[_E"QL@V).[O_*+&R#8D[N_WPB+P $+&R#8D[N_RA,
M[P &  0L;(-B3N[_K$SO  8 !"QL@V).[O_B+&R#8D[N_\1,[P .  0L;(-B
M3N[_OB(O  0L;(-B3N[_IDSO  X !"QL@V).[O_02.<!!$SO((  #"QL@N1.
MKO^43-\@@$YU(F\ !"QL@N1.[OYB3.\  P $+&R"Y$[N_SI.^@ "(F\ !"QL
M@N1.[O[:+&R"Y$[N_WPB;P $("\ ""QL@N1.[O\N(&\ !"QL@N1.[OZ,+&R"
MY")O  0@+P (3N[]V")O  0L;(+D3N[^ADSO  , !"QL@N1.[O[.(&\ !"QL
M@N1.[OZ       /L     0         "         _$    "            
M  /R   #Z@   *0    &  !R      !R*P    )W     P%W*P   P)A    
M"0%A*P  "0)X    !0%X*P  !0(        P,3(S-#4V-S@Y86)C9&5F    
M               !      $                      0$    !        
M              $"     0                                      
M                                                            
M                                                            
M                                                            
M                                                            
M                                                            
M                                                            
M                                                            
M                                                         " @
M(" @(" @(# P,# P(" @(" @(" @(" @(" @(" @D$! 0$! 0$! 0$! 0$! 
M0 P,# P,# P,# Q 0$! 0$! "0D)"0D) 0$! 0$! 0$! 0$! 0$! 0$! 0% 
M0$! 0$ *"@H*"@H" @(" @(" @(" @(" @(" @(" D! 0$ @     ^P    !
L                   #\0    (              _(   /K         _(!
 
end
SHAR_EOF
#	End of shell archive
exit 0