EVMS2TARV2.1-329-JUL-1995 14:52DEC C V4.1-001  $ABS$i%$CODE$ $LITERAL$X$LINK$$DATA$$BSS$ $READONLY$  EMPTYTRAILER DECC$FCLOSE DECC$FOPEN DECC$GPRINTF DECC$GSCANF DECC$GSPRINTF DECC$FGETS DECC$FREAD DECC$REWIND DECC$PERROR DECC$MALLOC DECC$EXIT DECC$STAT DECC$STRNCPY DECC$STRCAT DECC$STRNCMP DECC$STRCHR DECC$STRRCHR DECC$STRLEN DECC$STRCPY DECC$TOLOWERDECC$GA___CTYPE DECC$CTIME DECC$CLOSE DECC$CREAT DECC$OPEN DECC$WRITE DECC$GETGID DECC$GETUIDDECC$GA_RMS_NAMDECC$GA_RMS_FABDECC$GA_RMS_RAB DECC$GA_RMS_XABFHC SYS$CLOSE SYS$CONNECTSYS$GETSYS$OPEN SYS$PARSE SYS$SEARCH LIB$GETDVI LIB$MOVC5VERBOSETHE_WAITDOTTARFILEFORCEPADDING BLOCK_FACTORHEADERBUFFERPATHNAMECURDIR NEW_DIRECTORYNEWFILEOUTFILETEMPCREATIONLINKNAME0J0 INITSEARCH(JSEARCH0JP SCAN_NAME0J8 CLEANUP_DIRE0J GET_ATTRIBUTES0Jh FILL_HEADER0J@x  WRITE_HEADER0JH WRITE_TRAILER(JhADDFILE0J@OUT_FILE0J FLUSHOUT0J LOWERCASE0JP OUTFILE_RMS0Jh8#GET_VARFILESIZE0  EMPTYTRAILER(J0VMS2TAR0J((STRINDEX PFBLOCK(FBLOCK `NBLOCK( NBLOCKOTS$MOVE OTS$REM_I =GkG;F!0@a/aK$Dk#$~c ^G^~޴>^~޵GG ¤&XB"Gx  `b ݰt@ZkGBbp@ZkBGhGl@Zk=sHB"b"2?J"SF]"GG@Zk=HBh"" tG!v HPbC@Zk xBbb"8"G4G_"G@Zk GhBB"pb8b"G?"G@ZkC|"B"bG1"tG@Zk"B4Gb@ZkB4Gb4G@Zk }G=`(G(0"BTGG @Zk0"BTGb@Zk4GGB0"btGTG@Zk , HDDC0"hb#@0="BTGbh"@Zk ?%HbPBʂ)! G .G+ XBqH`bPJK"F>k." IwISrJr>.G.4G%V JUJFF>>!@Zk GE+  .+"&"JEAE.UJ> `"$ E"BGbTG@ZkGXB4G`b@Zk GE?ÈGBTGb"@ZkG(BG¥0G@ZkGb#@GGGGb#b@BGGG@ZkGBGbTG@ZkGxb#(@Bb4G4G@Zk4G,¥,@H<.,.H8/D! .GTGJ FBx"b@ZkB "bGTG@Zk- B4G bPIJ@Zk-aHOIE=.J8F...J5/B]8`D `"hGxb#G@Өb#|@x&#`hG |FGb#@G GP4GhBtpb17IC@Zkt BGbTGP"@ZkB4Gb4G@Zkx桮@G ATGE Bb8"@Zk4GBb"@Zkxơ"4G C5`@EBb@ZkGBGG@Zk--"B"bGOI=xF@ZkG(}0@c (} @|0b#@XB4G|`b@ZkG]]}ݤ=]}ݥ #k#G~^^~ G{G#c  Cpb#@" 0B!8b17!HC@Zk4GG]]} 0#kG#~^^~ (0޴8@H>PGGGH¤G@G (b#F5B 氕B&PFG 泱@@GG$FGG&Gb#@@ӺPB`""XbGTG@ZkG GBTGb"@Zk G0Bp"8b?"GtGG@ZkGpBp"?"G@ZkA0BG8bp"tG@Zk'G4G !"D B(b@ZkGBTGb"@Zk4GBb"@Zk yGpBGb4Gxb@Zk(b# G)@b#@&G0Bp"8b?"GtG@Zkpp!D _$A Gb# Gb@,).HQ)Jr H!2F)>h.)!hJGGb#Q@G<GPBh""XbGTG@ZkG GBTGb"@Zk /G(b#@b#\@"  B @bGD4GGGG@Zk$@Gb#$@ BG(b4G@ZkGTGBb"@Zk G B(b4G@ZkGG]]} (0ݤ8@H=P`#kG# ;_"~^tG^GG0B8b@Zk 0@B4GHb("@Zk4G@B4GHb@ZkG]"]  #0@ k# ;_"~^tG^ GGBb@ZkC" B4GbH"@Zk4GB4Gb@ZkH" 0@ G]] 0#kG#TG~@^H^P~XGGG B="(bG@ZkGxb TG Bc (bh"@Zk  $0=" 5"xb*]#1$H]!%H'J'H3ВJ32v@J"=.%.*}/-},5/ J8=/T JzKSKY 7KC zH4FGcGsGG@]H]P}X`#kG#G~^^~ (0GGG""P.p""d0#RPJP>.ep#@TJ>".VJ>"P.p.c.PJtJ.c"xTJWJJF>d.zyJtJ"VJ"F>eP."f0#R[JTF[>/"GXK?p.fP/"vJZYKryJRGY?/"u"U#XK?U.`C "RVJV>5/#GY3K3?5.Q:J:>."PJ>Gx.8#X#" =SxJx>8.x"x#@BQ9J9>,@H< .8..JQ3J.yJJ9F3>X/wJJx#Z@KqJWG@?.x"""PJ"F>8/2"a#Y3K3?,X/#HZWKpHPGW??5/Y5K5?.,J@HpJD<. U/JZUKvJVGU?5.U.5JRUJx5JXFU>"B?.xb# PJ>G_Gxb#_($ 47!H8BC@bG@Zk @ Gxb#_% 7HC @G]4G]} (0@#kG#TG~^^~ (0޴8@GGG0BG8bGG GTG@Zk "BG("@Zk?Bp""G@ZkG.JG.!/J!KF!  .J F.FJPF!  .JA/AK .VJ>G/&#XKK<C7u C @BGHbtGTG@Zk.GPJ> PBXbGGTG@ZkB'"G@Zk0BG8bGTG@Zk .Gr HQ J 2F >.TJ>0B8bGGTG@Zk "BGG@Zkh""GW@y`H/ XbGXKGG?TGF/ZFKF?PB@Zk,FH<0GBGGTG@ZkG@BtGHbG@Zk",4G`BhbFH<%,P0HJ@Zk,aHFHD<.J`'. G"`Bhb4GP2JJ@ZkaHg,CgHaDg<.J$.G`BC"hbP2J4GJ@Zk,aHGHD<.J#.c C"`Bhb4GP2JJ@ZkaH,FHD<.J$. $J Gd.GwJdJeF`.VJF>/ K`BG@ZkG 4GG!1 @`b@,CHD@,GH<GG]]} (0ݤ8@P#k#~^^~ (0޴8GGG(""G@ 4G0B8b8"@Zk @G0$`BТGG@Zk¤G`BGG@Zk 5% 3/,E"0.urH JBX KyJWJGF3?0> rH@ZkqH5.GB4# HVJF>/.G,e. "T JSrJF>uFr>@ZkaH4%/s6JwH "Y8K!G8?4G F.RVJSFV>+.(.U JTJFbF+>(> F/f/c pH`pH[ pKZPKaGp?@GP?@BGHb@Zk?$&! J"DD G TG"G 4G"0B8b@Zk  &, "G`B0HG`@C.RCJC>G@Zk H+.xH(.W JVJFF+>(>G]]} (0ݤ8@#kG#4G~^^~ (0޴8@HGGG ($0Bʂ ,"a0J8bD"@H%D< d. `Hq`H!SrJr>.$,P JA HF>1D <G@ZkGD% G.$"&"JDp@D.TJ>&@`"$ D"`"pBGxbTG@ZkG0B4G8b@ZkGD?GG_G]]} (0ݤ8@HP#k. J`GpBTGxb"@Zkð#G~ ^(^0~8@GGG"hB=""pb]"}"G@ZkGHBP""G btG@Zk{(B0bG@Zkd"(BH""CtG0bc @Zkl"(BH""CtG0b@Zk(Bt"CH""0btG@Zk"(BX""CtG0b@Zk8B|"@b="GtG@Zk"(BX""CtG0bd @Zk"8B="@bGtG@Zk8Bx""@bGGtG@Zk $,"(BP""0bB"A H <tG@Zk "G@G& @@`."."/0#P/TJVJJXKp#JZ[KKTBGKVB"XBBZB?B `G,""BDHHDB(B`""0bGtG@ZkG ](]G0}8@P#kG,H"Q.QJCGG@Gp..pJJuF`! ".J .JtF`! ".J.J p."pJGkG#4G~^^~ (GGG. (B0bGPJJ@ZkqH.PJF>C.CJ Gc.c "(B0b4GPtJ0@J@Zk.qHPJF>C.CJ?G] 1@]} (0#kG#G~G^87"GG_ (W "G@ZkG]4G #kG@7"G_" (W "@ZkG]4G #kG]G #k#~^^~޴>^ ~(08GGGHhBGG =80G"GG@ZkGB}B@Zk=`H"r1%JuՠJbs`JFhB FR4J G2GJTFSF]{G@Zk"XB4G`b@ZkG=(BG0JbR H4G1HC@Zk' B!!HbGC4G@Zk G "8"hBG!G@ZkxHXݦ B8"b4G7JFX\t@ZkG8B4G(@b@ZkG(TG8B@bp"@Zk n(pb#U_GHb#_ӘB$b8"4Gzc _%@Zk@J! D DGEC_XRJAq"Q.SJAF@.1"JX!F 61BATG5/#zJY8K:G8?hB'A@GGG@Zk' $@  G GhBGG?"@ZkGb#f_ '@' `A!?hB +AGGG@ZkB8"b4G@Zk@ DE hB B?"G@ZkhBGGG@ZkGb#B_B"b4G@ZkGG]]}ݤ=] }(08@#kG#G~^^~޴GG8=""GB!G@ZkHBG b@Zk`H="C1%J}tՀJ8Br@JF F#3cJ G!'H3D2D=ZGB@ZkB"b4GG@ZkG=hB4GpbR H0HC@ZkG"@"BG!G@ZkxH`ݦ xB@"b4G7JF`dݰ|@ZkGB4Gb@Zk ;G(B@"0b4G$@ZkG D "G,%8}z!D@DC`RJ @".41BJF/"KXF (B0b@@"4G@Zk@D D"GXB"`b4G@ZkGG]]}ݤ #k4AG DECC$GETGID4Bb# DECC$GETGID4A@ DECC$GETGID4=G DECC$GETUID4>b# DECC$GETUID4=@ DECC$GETUID4 G DECC$STRLEN4 @ DECC$STRLEN4;G0 LIB$GETDVI4<b# LIB$GETDVI4;,@0 LIB$GETDVI4?8GX DECC$STRNCMP4@Lb# DECC$STRNCMP4?T@X DECC$STRNCMP4C\G DECC$OPEN4D`b# DECC$OPEN4C|@ DECC$OPEN49G DECC$CREAT4:b# DECC$CREAT49@ DECC$CREAT4G DECC$GSPRINTF4b# DECC$GSPRINTF4@ DECC$GSPRINTF4IG DECC$PERROR4Jb# DECC$PERROR4I@ DECC$PERROR4G DECC$EXIT4b# DECC$EXIT4@ DECC$EXIT4G, DECC$STRCPY4(@, DECC$STRCPY4%0G@ DECC$STRCHR4&8b# DECC$STRCHR4%<@@ DECC$STRCHR4%PGh DECC$STRCHR4&Xb# DECC$STRCHR4%d@h DECC$STRCHR4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4GD SYS$SEARCH4 b# SYS$SEARCH4@@D SYS$SEARCH4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G SYS$SEARCH 4 b# SYS$SEARCH4@ SYS$SEARCH4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G  DECC$STRCPY4@  DECC$STRCPY4HG\ DECC$STRCPY4X@\ DECC$STRCPY4'`Gt DECC$STRCAT4(hb# DECC$STRCAT4'p@t DECC$STRCAT4G DECC$EXIT4b# DECC$EXIT4@ DECC$EXIT4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4EG DECC$GSCANF4Fb# DECC$GSCANF4E@ DECC$GSCANF4G( DECC$TOLOWER4b# DECC$TOLOWER4$@( DECC$TOLOWER4)G OTS$REM_I4*b# OTS$REM_I4)@ OTS$REM_I4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G DECC$EXIT4b# DECC$EXIT4@ DECC$EXIT4<GL DECC$GPRINTF4@b# DECC$GPRINTF4H@L DECC$GPRINTF4TGd DECC$GPRINTF4Xb# DECC$GPRINTF4`@d DECC$GPRINTF4GG DECC$CTIME4Hb# DECC$CTIME4G@ DECC$CTIME4G DECC$STRCPY4@ DECC$STRCPY4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF47G DECC$CLOSE48b# DECC$CLOSE47@ DECC$CLOSE4)G OTS$REM_I4*b# OTS$REM_I4)@ OTS$REM_I41G DECC$FOPEN42b#@ DECC$FOPEN41@ DECC$FOPEN4G DECC$GPRINTF4b#@ DECC$GPRINTF4@ DECC$GPRINTF4/ G( DECC$FGETS40 b#@ DECC$FGETS4/$ @( DECC$FGETS4 0 GD DECC$STRLEN4 @ @D DECC$STRLEN4/H G` DECC$FGETS40P b#@ DECC$FGETS4/\ @` DECC$FGETS4-| G DECC$FCLOSE4. b#@ DECC$FCLOSE4- @ DECC$FCLOSE4 G DECC$GPRINTF4 b#@ DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b#@ DECC$GPRINTF4 @ DECC$GPRINTF43 G DECC$REWIND44 b#@ DECC$REWIND 43 @ DECC$REWIND4/ G$ DECC$FGETS40 b#@ DECC$FGETS4/ @$ DECC$FGETS41 G DECC$FOPEN42 b#@ DECC$FOPEN41 @ DECC$FOPEN4 G DECC$GPRINTF4 b#@ DECC$GPRINTF4 @ DECC$GPRINTF45 G< DECC$FREAD46 b#@ DECC$FREAD458 @< DECC$FREAD4-X Gl DECC$FCLOSE4.` b#@ DECC$FCLOSE4-h @l DECC$FCLOSE4x G DECC$GPRINTF4| b#@ DECC$GPRINTF4 @ DECC$GPRINTF4- G DECC$FCLOSE4. b#@ DECC$FCLOSE4- @ DECC$FCLOSE4 G DECC$WRITE4 b# DECC$WRITE4 @ DECC$WRITE4 G4 DECC$GPRINTF4( b# DECC$GPRINTF40 @4 DECC$GPRINTF48 GH DECC$EXIT4@ b# DECC$EXIT4D @H DECC$EXIT4 G DECC$WRITE4 b#@ DECC$WRITE4 @ DECC$WRITE4 G DECC$GPRINTF4 b#@ DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$EXIT4 b#@ DECC$EXIT4 @ DECC$EXIT4+H G\ DECC$STAT4,P b# DECC$STAT4+X @\ DECC$STAT4p G DECC$GPRINTF4x b# DECC$GPRINTF4 @ DECC$GPRINTF4)`Gt OTS$REM_I4*hb# OTS$REM_I4)p@t OTS$REM_I4#G, DECC$STRRCHR4$b#P DECC$STRRCHR4#(@, DECC$STRRCHR40G@ DECC$STRCPY4<@@ DECC$STRCPY4DGT DECC$STRCPY4P@T DECC$STRCPY4%G DECC$STRCHR4&b#P DECC$STRCHR4% @ DECC$STRCHR4'$G< DECC$STRCAT4((b#P DECC$STRCAT4'8@< DECC$STRCAT4@GP DECC$STRCPY4L@P DECC$STRCPY4#PGh DECC$STRRCHR4$Xb#P DECC$STRRCHR4#d@h DECC$STRRCHR4#G DECC$STRRCHR4$b#P DECC$STRRCHR4#@ DECC$STRRCHR4G DECC$STRCPY4@ DECC$STRCPY4(b#P DECC$STRCAT4'G  DECC$STRCAT4'@  DECC$STRCAT4 G4 DECC$STRCPY40@4 DECC$STRCPY4%8GL DECC$STRCHR 4&@b#P DECC$STRCHR4%H@L DECC$STRCHR4XGx DECC$TOLOWER4\b#P DECC$TOLOWER4t@x DECC$TOLOWER4G DECC$TOLOWER4b#P DECC$TOLOWER4@ DECC$TOLOWER4G DECC$TOLOWER4b#P DECC$TOLOWER4@ DECC$TOLOWER4,GD DECC$TOLOWER40b#P DECC$TOLOWER4@@D DECC$TOLOWER4 G DECC$STRLEN4 @ DECC$STRLEN4xG DECC$GPRINTF4|b# DECC$GPRINTF4@ DECC$GPRINTF4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4 G DECC$STRLEN4 @ DECC$STRLEN4  Gd DECC$STRLEN4 `@d DECC$STRLEN4!G SYS$PARSE4"b# SYS$PARSE4!@ SYS$PARSE4<GH DECC$GPRINTF4@b# DECC$GPRINTF4D@H DECC$GPRINTF4`GOTS$MOVE4@OTS$MOVE4 G SYS$SEARCH4 4b# SYS$SEARCH4@ SYS$SEARCH4G  DECC$GPRINTF4b# DECC$GPRINTF4@  DECC$GPRINTF4G  SYS$SEARCH4 b# SYS$SEARCH4@  SYS$SEARCH4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G LIB$MOVC54b#h LIB$MOVC54@ LIB$MOVC54 G DECC$STRLEN4  @ DECC$STRLEN4G$ DECC$GSPRINTF4b#h DECC$GSPRINTF4 @$ DECC$GSPRINTF4(GD DECC$GSPRINTF48b#h DECC$GSPRINTF4@@D DECC$GSPRINTF4HG` DECC$GSPRINTF4Xb#h DECC$GSPRINTF4\@` DECC$GSPRINTF4`G| DECC$GSPRINTF4pb#h DECC$GSPRINTF4x@| DECC$GSPRINTF4G DECC$GSPRINTF4b#h DECC$GSPRINTF4@ DECC$GSPRINTF4G DECC$STRNCPY4b#h DECC$STRNCPY4@ DECC$STRNCPY4G DECC$GSPRINTF4b#h DECC$GSPRINTF4@ DECC$GSPRINTF4G DECC$STRNCPY4b#h DECC$STRNCPY4@ DECC$STRNCPY4G  DECC$STRNCPY4b#h DECC$STRNCPY 4@  DECC$STRNCPY4G8 DECC$GSPRINTF4 b#h DECC$GSPRINTF44@8 DECC$GSPRINTF4G DECC$GSPRINTF4b#h DECC$GSPRINTF4@ DECC$GSPRINTF4G DECC$TOLOWER4b# DECC$TOLOWER4@ DECC$TOLOWER4DG` DECC$TOLOWER4Hb# DECC$TOLOWER4\@` DECC$TOLOWER4G DECC$STRCPY4@ DECC$STRCPY4G  DECC$STRCPY4@  DECC$STRCPY4GOTS$MOVE4@OTS$MOVE4 G DECC$STRLEN4 @ DECC$STRLEN4 G< OTS$MOVE48 @< OTS$MOVE4@ GT SYS$OPEN4H b#SYS$OPEN4P @T SYS$OPEN4 ` G DECC$MALLOC4l b# DECC$MALLOC4  @ DECC$MALLOC4  G DECC$MALLOC4 b# DECC$MALLOC4  @ DECC$MALLOC4 G OTS$MOVE4 @ OTS$MOVE4 G SYS$CONNECT4 b# SYS$CONNECT4 @ SYS$CONNECT4!G! DECC$GPRINTF4 !b# DECC$GPRINTF4!@! DECC$GPRINTF4 !G0! DECC$GPRINTF4$!b# DECC$GPRINTF4,!@0! DECC$GPRINTF,P!Gp!SYS$GET,X!b#SYS$GET,l!@p!SYS$GET4!G"OTS$MOVE4"@"OTS$MOVE4("G<"OTS$MOVE48"@<"OTS$MOVE4`"Gx"OTS$MOVE4t"@x"OTS$MOVE,x"G"SYS$GET,"b#SYS$GET,"@"SYS$GET4"G"OTS$MOVE4"@"OTS$MOVE4"G"OTS$MOVE4"@"OTS$MOVE4 "G" SYS$CLOSE4 "b# SYS$CLOSE4 "@" SYS$CLOSE4#G#OTS$MOVE4#@#OTS$MOVE4 #G# DECC$STRLEN4 #@# DECC$STRLEN4$G$OTS$MOVE4$@$OTS$MOVE4$G$$SYS$OPEN4$b#hSYS$OPEN4 $@$$SYS$OPEN4 0$GL$ DECC$MALLOC48$b#h DECC$MALLOC4 H$@L$ DECC$MALLOC4X$Gl$OTS$MOVE4h$@l$OTS$MOVE4x$G$ SYS$CONNECT4$b#h SYS$CONNECT4$@$ SYS$CONNECT D4$G$ DECC$GPRINTF4$b#h DECC$GPRINTF4$@$ DECC$GPRINTF,$G$SYS$GET,$b#hSYS$GET,$@$SYS$GET,\%Gt%SYS$GET,`%b#hSYS$GET,p%@t%SYS$GET4 %G% SYS$CLOSE4 %b#h SYS$CLOSE4 %@% SYS$CLOSE =0' Unable to define RMS structures ... (=(tar: error writing tarfile. H=H=tar: error writing header in tarfile. Skipping file %s =0"tar: error in SYS$SEARCH for %s =(tar: file not found %s =0!tar: no privilege to access %s =(tar: error in SYS$PARSE. =(tar: directory not found %s 8=8,tar: DECnet file access is not supported. h=0#tar: can't get file status on %s =@4 record too large or incorrect RMS attributes =0#tar: error reading input file %s =0#tar: error opening input file %s =(*** unsupported format 8= *** skipped %s P=@4tar: error copying %s tar: no files matching %s =.&tar: error opening output tarfile %s =0 ;7DECC$GA___CTYPE7DECC$GA_RMS_RAB;0 DECC$GPRINTF7DECC$GA_RMS_FABPSYS$OPEN8OTS$MOVE=0 8#;=   ;SYS$GET7DECC$GA_RMS_XABFHC DECC$STRLEN SYS$CLOSE DECC$MALLOC SYS$CONNECT=0  ;=  7BUFFER  DECC$WRITE DECC$EXIT=0 x ;=0 7HEADER=0 ;=P  DECC$GSPRINTF DECC$STRNCPY=%6o =%s=%11o =%6o LIB$MOVC5= ==0 P;=@? ;7PATHNAME=0 (;=0 ;= ` DECC$STRCPY=][x= [000000.=0 ;=0  DECC$TOLOWER=0 ;=P 7NBLOCK7FBLOCK SYS$SEARCH=0 0;=@| ;=::07DECC$GA_RMS_NAM@! SYS$PARSE=0 ;=P 7TEMP7CURDIR# DECC$STRRCHR% DECC$STRCHR' DECC$STRCAT7DOT= .DIR;1./=0 H;=@< 7 BLOCK_FACTOR7PADDING) OTS$REM_I=0@  ;=` + DECC$STAT=0 ;=` - DECC$FCLOSE/ DECC$FGETS7FORCE1 DECC$FOPEN=r=rb3 DECC$REWIND5 DECC$FREAD=0 h;=0 7 DECC$CLOSE9 DECC$CREAT=%s (y/n) ?  = %s %8d %s 07VERBOSE@; LIB$GETDVI=B`= DECC$GETUID= rfm=fix7OUTFILE7CREATION7TARFILE=0 0;=  7NEWFILE7LINKNAME7 NEW_DIRECTORY= mrs=512? DECC$STRNCMPA DECC$GETGID= UNKNOWNC DECC$OPENE DECC$GSCANFG DECC$CTIMEI DECC$PERROR7THE_WAIT %= *.*; 9=6  ==-%$VMS2TARDEC C V4.1-001 P=LD>9JA7z%INST:[LEVITTE.WRK.VMSTAR]VMS2TAR.C;61 O=KCB=+$hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STDIO P=LDC>_”hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STDLIB N=JBA<c.hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STAT P=LDC>kƔhl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STRING O=KCB=Pehl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2CTYPE N=JBA<K˔hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2TIME N=JBA<hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2FILE P=LDC> whl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2PERROR P=LDC> Ӕhl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2UNIXIO O=KCB= +$hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STDIO N=JBA< c.hl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2STAT Q=MED? ߓՔhl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2UNIXLIB Q=MED?}ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1SSDEF O=KCB=:ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1RMS R=NFE@Eŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1NAMDEF R=NFE@ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1FABDEF R=NFE@~ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1RABDEF O=KCB=ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1XAB U=QIHCztzŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABALLDEF U=QIHC"ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABCXFDEF U=QIHCJŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABCXRDEF U=QIHCZrŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABDATDEF R=NFE@zŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1XABDEF U=QIHC:;ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABFHCDEF U=QIHC:pŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABITMDEF U=QIHC`ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABJNLDEF U=QIHCڕŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABKEYDEF U=QIHCZŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABPRODEF U=QIHC ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABRDTDEF T=PHGB:ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1XABRUDEF U=QIHC ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABSUMDEF U=QIHC!z ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 XABTRMDEF R=NFE@"cŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1RMSDEF S=OGFA#.ŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1STARLET X=TLKF$Zŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1 LIB$ROUTINES Q=MED?%Zhl$SYS$COMMON:[SYSLIB]DECC$RTLDEF.TLB;2DESCRIP R=NFE@&ݬŗ&SYS$COMMON:[SYSLIB]SYS$STARLET_C.TLB;1DVIDEF R=NFE@'R0c,INST:[LEVITTE.WRK.VMSTAR]VMSTAR_CMDLINE.H;14 I=E=<7( /c#INST:[LEVITTE.WRK.VMSTAR]VMSTAR.H;8 J=F>=8)=$INST:[LEVITTE.WRK.VMSTAR]VMSTARP.H;4 I=E=<7* /c#INST:[LEVITTE.WRK.VMSTAR]VMSTAR.H;8 =  }    q  }    F G f g  +     }'  (  q  7   ` a    & m  R S I   z   a  u  H@ A B  y  b` a ]    Y Z >  J   >" #! Dg j k" Q S T# `, a,$ Q2 2% 4 4& 5 5' 5( *5' #6 6) 6* *D6) Z6!  4= mode 4= uid 4= gid 4= bufferpointer4= bytecount4= outfd4= vmsmrs4= vmstime 4= vmsrat$4= vmsorg(4=C;vmsrfm. 4= EmptyTrailer e4= $"fabdef$$_fill_1" "" fab$v_ppf_rat" "" fab$v_ppf_ind"  " fab$v_ppifi"   fab$w_ififab$r_ifi_bits e4=OG " fab$v_asy" " fab$v_mxv" " fab$v_sup" " fab$v_tmp" " fab$v_tmd" " fab$v_dfw" " fab$v_sqo" " fab$v_rwo" " fab$v_pos" " fab$v_wck" " fab$v_nef" " fab$v_rwc" " fab$v_dmo" " fab$v_spl" " fab$v_scf" " fab$v_dlt" " fab$v_nfs" " fab$v_ufo" " fab$v_ppf" " fab$v_inp" " fab$v_ctg" " fab$v_cbt" "" fab$v_syncsts" " fab$v_rck" " fab$v_nam" " fab$v_cif" $"fabdef$$_fill_3" " fab$v_esc" " fab$v_tef" " fab$v_ofp" " fab$v_kfo" $"fabdef$$_fill_4"   fab$l_fopfab$r_fop_bits e4=WO " fab$v_put" " fab$v_get" " fab$v_del" " fab$v_upd" " fab$v_trn" " fab$v_bio" " fab$v_bro" " fab$v_exe"   fab$b_facfab$r_fac_bits 9e4=F> !" fab$v_shrput" !" =( fab$v_shrget" !" fab$v_shrdel" !" fab$v_shrupd" " fab$v_mse" " fab$v_nil" " fab$v_upi" !" fab$v_fill_0"   fab$b_shrfab$r_shr_bits e4= $"fabdef$$_fill_5" " fab$v_org"   fab$b_orgfab$r_org_bits e4= " fab$v_ftn" " fab$v_cr" " fab$v_prn" " fab$v_blk" " fab$v_msb" !" fab$v_fill_1"   fab$b_ratfab$r_rat_bits e4=ph "" fab$v_only_ru" " fab$v_ru" " fab$v_bi" " fab$v_ai" " fab$v_at" #"fab$v_never_ru" '"fab$v_journal_file" !" fab$v_fill_2"   fab$b_journalfab$r_journal_bits e4=A9 fab$r_journal_overlay e4=fab$b_ru_facilityfabdef$$_fill_7  fab$l_jnlfab$r_jnl_real_stuff e4=$ char e4=  e4=nf " nam$v_pwd" !" nam$v_fill_1" !" nam$v_fill_2" !" nam$v_synchk" $"nam$v_noconceal" "" nam$v_slparse" #"nam$v_srchxabs" !" nam$v_fill_5"   nam$b_nopnam$r_nop_bits e4= e4= . .   nam$b_fid_rvn nam$b_fid_nmx  nam$w_fid_rvnnam$r_fid_rvn_fields  e4=og 0 nam$w_fid_num nam$w_fid_seq nam$r_fid_rvn_overlay %!e4=5- 0 nam$w_fid  e4=*"nam$r_fid_fields x!e4=.   nam$b_did_rvn nam$b_did_nmx  nam$w_did_rvnnam$r_did_rvn_fields i"e4=og 0 nam$w_did_num nam$w_did_seq nam$r_did_rvn_overlay "e4=5- 0 nam$w_did :"e4=*"nam$r_did_fields "e4=  $"namdef$$_fill_1" " nam$v_ifi" $"namdef$$_fill_2 " "" nam$v_srchnmf"  " nam$v_svctx"   nam$l_wccnam$r_wcc_bits #e4= "" nam$v_exp_ver" #"nam$v_exp_type" #"nam$v_exp_name" #"nam$v_wild_ver" $"nam$v_wild_type" $"nam$v_wild_name" "" nam$v_exp_dir" "" nam$v_exp_dev" #"nam$v_wildcard" $"namdef$$_fill_3" &"nam$v_search_list" #"nam$v_cncl_dev" #"nam$v_root_dir" !" nam$v_lowver" "" nam$v_highver" " nam$v_ppf" " nam$v_node" !" nam$v_quoted =" "" nam$v_grp_mbr" #"nam$v_wild_dir" #"nam$v_dir_lvls"  $"namdef$$_fill_4" #"nam$v_wild_ufd" $"nam$v_wild_sfd1" $"nam$v_wild_sfd2" $"nam$v_wild_sfd3" $"nam$v_wild_sfd4" $"nam$v_wild_sfd5" $"nam$v_wild_sfd6" $"nam$v_wild_sfd7"  $"namdef$$_fill_5" #"nam$v_wild_grp" #"nam$v_wild_mbr" !" nam$v_fill_6"   nam$l_fnbnam$r_fnb_bits0 $e4=)!nam$r_fnb_bits1 'e4=)!nam$r_fnb_bits2 )e4=F>.  e4=  e4=  e4=  e4=  e4=  e4=. namdef nam$b_bid nam$b_bln nam$b_rss nam$b_rsl nam$l_rsa e4=+#@nam$r_nop_overlay  e4=\TH nam$b_rfsP nam$b_essX nam$b_esl` nam$l_esa i e4=# nam$l_rlf x e4=# nam$t_dvi  e4=+# nam$r_fid_overlay !e4=+#Pnam$r_did_overlay g#e4=+#nam$r_wcc_overlay }$e4=+#nam$r_fnb_overlay )e4= nam$b_node nam$b_dev nam$b_dir nam$b_name nam$b_type nam$b_vernamdef$$_fill_6 S*e4=$ nam$l_node *e4=#  nam$l_dev *e4=#@ nam$l_dir *e4=$` nam$l_name *e4=$ nam$l_type *e4=# nam$l_ver *e4=)!namdef$$_fill_7 *e4=   +e4=   +e4=  e4=  e4= #"fab$v_lnm_mode" $"fab$v_chan_mode" $"fab$v_file_mode" '"fab$v_callers_mode"   fab$b_acmodesfab$r_acmodes_bits .e4= !" fab$v_rcf_ru" !" fab$v_rcf_ai" !" fab$v_rcf_bi" !" fab$v_fill_3"   fab$b_rcffab$r_rcf_bits /e4=iafabdef fab$b_bid fab$b_blnfab$r_ifi_overlay e4=+# fab$r_fop_overlay e4=wo@ fab$l_sts` fab$l_stv fab$l_alq fab$w_deqfab$r_fac_overlay Ce4=+#fab$r_shr_overlay e4=QI fab$l_ctx fab$b_rtvfab$r_org_overlay De4=+#fab$r_rat_overlay [e4=>6 fab$b_rfmfab$r_jnl_overlay  )e4=#  fab$l_xab e4=#@ fab$l_nam c.e4=#` fab$l_fna r.e4=# fab$l_dna .e4= fab$b_fns fab$b_dns fab$w_mrs fab$l_mrn fab$w_bls fab$b_bks fab$b_fsz fab$l_dev  fab$l_sdc@ fab$w_gbcPfab$r_acmodes_overlay 8/e4=+#Xfab$r_rcf_overlay #0e4=*"`fabdef$$_fill_9FBLOCK4=fblock l0e4= NBLOCK4=nblock  +e4 v= 44= __iscntrl4= L0 $= 4 = __c := (4= 0 = 044= vms2tar04=ZR ~6 ~6 ~6  ~6  6 6 ~6  6 6 6 6 6 6 6 6 6 6 6 6 6 6 8 6 8 8 8 8 8 8 8 8 8 8 8 8  6 6 6 6 6 6 64 6 6" 6 6 6 6E 6 6 6 6 6 6GL $= 44 =! argc e4=  6e4= argv 7e4= argiprocess file_typeabsolute. c0string t7e4=  e4= cp 7e4=  e4= dp 7e4=  e4= wp  8e4=PH res_length. 4= res_string H8e4=  e4=}dsc$descriptor_s@ dsc$w_length dsc$b_dtype dsc$b_class dsc$a_pointer 8e4=' dev_descr 8e4=# res_descr 8e4=IAvmsnameunixname buffmaxlen .=  /4=  l=LD.  ٘buf 9e4 =  .=  /4=  = ind =  .=  /4=  =status =  := 4= 8 = h44= addfileh4=4,+ 6 6 6 6$ $= l4 =  e4=!vmsname :e4=  e4="unixname :e4= ind := 4=  = 4@4=out_file4=80 7  7e 7 X 7 7 7Y .7> l7 m7 p7 7 7 7 7 7 7 7 7 7 7 7 7  7- 7 7 7< $= 44 =  e4="filename <e4=UMnbytesfdout i n pos e4= bufp <e4=  e4=linep =e4=  e4=  e4=@8_iobuf _cnt _ptr E=e4=@_base T=e4=SK`_flagh_filep_pad1x_pad2 c=e4=  =e4= filein  >e4=<4. 4=dbuffer 4>e4=r_value :=  4=  =  44=flushout 4=D<; 7 7 7 7 7 7 $=  4 =fdout := p 4=  = x 4@4= write_headerx 4=/'& 7 7 7 $= | 4 #= fd n :=  4=  :=  44=get_attributes 4= 7 7 7 7 7 7 7 7 7 7 7 7 7 7E 7 7 7 7 7 7 7$ $= $ 4 =  e4=fname @e4=  e4=aY. statst_dev @e4=  st_ino @e4=d\Pst_mode`st_nlinkst_uidst_gidst_rdev @e4=st_sizest_atimest_mtime0st_ctimeP st_fab_rfmX st_fab_rat` st_fab_fszh st_fab_mrssblock  Ae4 := $4= ( Z= H44= write_trailerH4= 7 7( 7 7$ 7 7 7 7 7 7 7 7 7 7$ 7 7 7c 7 7 7 7 7 74 7  7 7 8, $= L4 &="fdout i := 4=  o= 4P4= scan_name4=  8 8 8 8 %8 ,8 ,8 88 H8 I8 K8 K8 L8 R8 S8 S8 S8x Y8 [8 \8 [8 a8 a80 $= 4 p=  e4= line De4=  e4= dire Ee4=  e4=fname FEe4=%absolute e4= cp1 Ee4=  e4= cp2 Ee4=NF len len2 istringstring .=  4=  = i =  .=  4=  = i =  := 4= ` I= 044= initsearch04= q8 ~8 ~8 8 8 8 8 8 8 8 8 8 8 8Y 8 8 8 8 8 8 8 8, $= `4 =  e4= string oGe4=LDstatus. c04= searchname Ge4=<4. 4= default_name Ge4 := 4=  = 44= search4= 8 8 8 8 8 8 8 8 8 8 8 8 8 88 8 $= 4 =  e4= buff Ie4=( maxlenstatus := 44=  = 4h4= fill_header4= 8 8 8 8 8 8 8 8H 8 8 8 8 8( $= 4 w=  e4= name $Je4=ME ichksum zerohdrsize e4= ptr Je4=LD.  tem Je4 :=  4=  = (4(4=strindex(4=& 8 8 8 $= (4 =  e4=!string1 RKe4=  e4=!string2 ~Ke4=  e4= c1 Ke4=  e4= c2 Ke4=  e4= cp Ke4 := 4=  = 44= lowercase4=! 8 8( $= 4 =  e4= string vLe4= i := 4=  = 484= cleanup_dire4=KCB 8 8 9 9 9 9 $= 4 =  e4= string 0Me4=  e4= ptr [Me4 := D4=  = P44= outfile_rmsP4=LD 9 9 9 %9 &9 '9 '9 *9 (9 (9 ,9 *9 -9 09 49 59 99  [9 [9 Z9 ^9 `9 f9 e9 m99 n9 n9 \9! y9L $= 4 =  e4="filename Oe4=qinbytesfdout check_text n rms_statusـmyfab l0e4=  e4= " xab$v_ftn" " xab$v_cr" " xab$v_prn" " xab$v_blk" !" xab$v_fill_9"   xab$b_atr xab$r_fill_8 Oe4=  xab$w_hbk0 xab$w_hbk2  xab$l_hbkxab$r_hbk_fields Pe4=  xab$w_ebk0 xab$w_ebk2  xab$l_ebkxab$r_ebk_fields +Qe4=.  xabfhcdef` xab$b_cod xab$b_blnxabfhcdef$$_fill_1 xab$l_nxt Oe4=91@ xab$b_rfoH xab$r_fill_7 _Pe4=>6P xab$w_lrl`xab$r_hbk_overlay Pe4=+#xab$r_ebk_overlay eQe4= xab$w_ffb xab$b_bkz xab$b_hsz xab$w_mrz xab$w_dxq xab$w_gbcxabfhcdef$$_fill_6 Qe4=NF0xab$w_verlimit@ xab$l_sbnmyxab Qe4= $"rabdef$$_fill_1" "" rab$v_ppf_rat" "" rab$v_ppf_ind"  " rab$v_ppisi"   rab$w_isirab$r_isi_bits Se4=D< " rab$v_asy" " rab$v_tpt" " rab$v_rea" " rab$v_rrl" " rab$v_uif" " rab$v_mas" " rab$v_fdl" " rab$v_rev" " rab$v_eof" " rab$v_rah" " rab$v_wbh" " rab$v_bio" " rab$v_cdk" " rab$v_loa" " rab$v_lim" "" rab$v_syncsts" " rab$v_loc" " rab$v_wat" " rab$v_ulk" " rab$v_rlk" " rab$v_nlk" " rab$v_kge" " rab$v_kgt" " rab$v_nxr" " rab$v_rne" " rab$v_tmo" " rab$v_cvt" " rab$v_rnf" " rab$v_eto" " rab$v_pta" " rab$v_pmt" " rab$v_cco"  $"rabdef$$_fill_6" " rab$v_eqnxt" " rab$v_nxt" !" rab$v_fill_4"  rabdef$$_fill_3 rab$b_rop1 rab$b_rop2 rab$b_rop3  rab$l_roprab$r_rop_bits0 Te4=)!rab$r_rop_bits1 Xe4=*"rab$r_rop_fields GYe4=  rab$w_stv0 rab$w_stv2  rab$l_stvrab$r_stv_fields CZe4=.  0 rab$l_rfa0 rab$w_rfa4 0 rab$w_rfa Ze4=*"rab$r_rfa_fields Ze4= e4=  e4=  e4=  e4=  e4 #=1)  rab$l_kbf [e4=# rab$l_pbf [e4=  rab$b_ksz rab$b_psz  rab$l_bkt rab$l_dct l0e4=  e4=e]rabdef  rab$b_bid rab$b_blnrab$r_isi_overlay oTe4=+# rab$r_rop_overlay Ye4=>6@ rab$l_sts`rab$r_stv_overlay }Ze4=+#rab$r_rfa_overlay 1[e4=rabdef$$_fill_4 rab$l_ctxrabdef$$_fill_5 rab$b_rac rab$b_tmo rab$w_usz rab$w_rsz  rab$l_ubf [e4=#@ rab$l_rbf [e4=#` rab$l_rhb [e4=+#rab$r_kbf_overlay [e4=+#rab$r_ksz_overlay #\e4=d\ rab$b_krf rab$b_mbf rab$b_mbcrab$r_bkt_overlay [\e4=# rab$l_fab \e4=# rab$l_xab \e4=#8myrab \e4=#b_size e4=$ UserBuffer _e4=  e4=% TransBuffer _e4=PH BytesRead TransBufSize i TotalBytes := "4=  d= 8#4h4=get_varfilesize8#4= 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9l 9 9 9 9 9 9  9 94 $= t#4 =  e4="filename ae4=RJ check_text n rms_statusوmyfab l0e4=myxab Qe4=@myrab \e4=#b_size e4=$ UserBuffer Abe4=/' BytesRead TotalBytes := %4=  =  %