$ od -c -N 50000 [phylum]<LISP>Lyric>LIBRARY>TCPFTP.LCOM!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 P A C K A G E " I N T E
0000040 R L I S P " 247 R E A D T A B L
0000060 E " I N T E R L I S P " 247 B
0000100 A S E 1 0 ) \r ( F I L E C R E
0000120 A T E D " 2 - A p r - 8 7
0000140 1 2 : 1 1 : 1 7 " ( " c o m p
0000160 i l e d o n " { E R I S }
0000200 < L I S P C O R E > L I B R A R
0000220 Y > T C P F T P . ; 4 2 ) \r "
0000240 3 1 - M a r - 8 7 2 1 : 3 3 :
0000260 3 5 " b r e c o m p i l e d
0000300 c h a n g e s % : n o t h i n
0000320 g i n " X e r o x L i s p
0000340 3 1 - M a r - 8 7 . . . "
0000360 d a t e d \r " 3 1 - M a r - 8
0000400 7 2 1 : 5 8 : 3 0 " ) \r ( F I
0000420 L E C R E A T E D " 2 - A p
0000440 r - 8 7 1 2 : 0 7 : 1 6 " {
0000460 E R I S } < L I S P C O R E > L
0000500 I B R A R Y > T C P F T P . ; 4
0000520 2 5 9 7 2 0 c h a n g e s
0000540 t o % : ( V A R S \r T C P F
0000560 T P C O M S ) p r e v i o u s
0000600 d a t e % : " 8 - J a n -
0000620 8 7 1 6 : 4 0 : 2 5 " { E R
0000640 I S } < L I S P C O R E > L I B
0000660 R A R Y > T C P F T P . ; 4 1 )
0000700 \r A R P A C M D A 0 0 0 1 A 0 0
0000720 0 2 : D 4 \r ( N A M E S I :
0000740 : * U N W I N D - P R O T E C T
0000760 * I 0 S I : : * C L E A N
0001000 U P - F O R M S * F 0 C M
0001020 D F 1 I N C F 2 O U
0001040 T C F 3 A R G F 4 D
0001060 I S C A R D F 5 W A N T A
0001100 R G F 6 W A N T F 7
0001120 S I : : * R E S E T F O R M S *
0001140 ) 001 M \0 \b \0 001 g \0 \0 g \0 \0 g \0
0001160 \0 g \0 \0 Q o \0 \0 \0 032 032 g \0 \0 Q h
0001200 032 032 h 032 032 032 g \0 \0 g \0 \0 R o \0 \0
0001220 \0 032 032 g \0 \0 R h 032 032 h 032 032 032 h 032
0001240 032 032 h 032 032 h d 032 032 W 016 032 c 016 P 262
0001260 R ` \0 \0 262 P ` \0 \0 \n \0 \0 277 S 262
0001300 025 o \0 \0 \0 ` \0 \0 \n \0 \0 277 S ` \0 \0
0001320 \n \0 \0 277 P R \n \0 \0 277 S 236 o \0 \0 \0
0001340 R \n \0 \0 277 S R \n \0 \0 277 R \t \0 \0 277
0001360 R \t \0 \0 277 ` \0 \0 262 030 ` \0 \0 \t \0 \0
0001400 277 ` \0 \0 232 o \0 \0 \0 ` \0 \0 \n \0 \0 277
0001420 Q \t \0 \0 c \0 277 ` \0 \0 262 025 P ` \0 \0
0001440 \n \0 \0 277 o \0 \0 \0 ` \0 \0 \n \0 \0 277 P
0001460 U 360 246 U 003 237 P U 034 233 Q l - 360 223
0001500 P \t \0 \0 P 020 Q l - 360 234 Q \t \0 \0
0001520 277 Q \t \0 \0 P 360 262 365 P V 360 250 V 003 233
0001540 P d V 034 227 277 Q \t \0 \0 P 020 P T 360 250
0001560 T 003 233 P d T 034 227 277 Q \t \0 \0 260 203 P
0001600 3 264 006 P l d 333 d l 002 360 244 d l 003
0001620 360 226 277 P \t \0 \0 260 025 d l 004 360 244 d l
0001640 005 360 230 277 Q i \n \0 \0 \t \0 \0 277 Q \t \0
0001660 \0 261 377 O \0 ( 3 2 8 D I S C A R
0001700 D L I N E 3 2 3 E R R O R
0001720 3 2 0 G E T L I N E 3 0 2
0001740 F T P H E L P 2 7 6 D I S C
0001760 A R D L I N E 2 5 7 D I S C
0002000 A R D L I N E 2 3 6 \ T C P
0002020 F T P . I N P U T 2 3 1 D I
0002040 S C A R D L I N E 2 1 9 F T
0002060 P H E L P 1 9 7 P R I N 1
0002100 1 8 6 P R I N 1 1 7 1 \ T
0002120 C P F T P . I N P U T 1 6 6
0002140 P R I N 1 1 5 1 T E R P R I
0002160 1 3 9 F O R C E O U T P U T
0002200 1 3 4 T E L N E T . E O L
0002220 1 2 9 P R I N 3 1 2 3 P R
0002240 I N 3 1 1 2 P R I N 3 1 0
0002260 6 P R I N 1 9 8 P R I N 1
0002300 8 4 P R I N 1 ) \r ( 1 9 4
0002320 F T P D E B U G L O G 1 8 3
0002340 F T P D E B U G L O G 1 7 7
0002360 F T P D E B U G F L G 1 6 3
0002400 F T P D E B U G L O G 1 5 5
0002420 F T P D E B U G F L G 1 4 8
0002440 F T P D E B U G L O G 1 4 3
0002460 F T P D E B U G F L G 1 0 3
0002500 F T P D E B U G L O G 9 5 F
0002520 T P D E B U G L O G 8 1 F T
0002540 P D E B U G L O G 7 5 F T P
0002560 D E B U G F L G 4 5 C L O S
0002600 E F 3 5 O P E N P 3 2 A
0002620 N D 2 1 C L O S E F 1 1
0002640 O P E N P 8 A N D 5 R E
0002660 S E T S T A T E 2 C O N D )
0002700 \r ( 1 9 1 " " 1 6 0 "
0002720 < " 1 1 9 " " 9 2 "
0002740 " 4 0 ( ( Q U O T E O U
0002760 T P U T ) ) 1 6 ( ( Q U O T
0003000 E I N P U T ) ) ) \r A R P A C
0003020 M D A 0 0 0 1 : D 4 \r ( N A M
0003040 E S I : : * U N W I N D - P R
0003060 O T E C T * P 3 S I : : *
0003100 R E S E T F O R M S * P 2
0003120 L I S P X H I S T P 1 O U
0003140 T C P 0 I N C I 0 S
0003160 I : : * C L E A N U P - F O R M
0003200 S * F 4 T C P F T P C O N
0003220 F 5 L I S P X H I S T )
0003240 \0 ( 004 002 \0 001 ` \0 \0 h g \0 \0 \v \0 \0
0003260 T 001 T 002 001 021 002 001 U 021 021 003 g \0 \0 \t
0003300 \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020 \0 ( 3
0003320 7 C L : V A L U E S - L I S T
0003340 3 3 S I : : R E S E T U N W
0003360 I N D 3 0 \ M V L I S T 2
0003400 7 A R P A C M D A 0 0 0 1 A 0
0003420 0 0 2 9 O B T A I N . M O N
0003440 I T O R L O C K ) \r ( 2 4 S I
0003460 : : R E S E T U N W I N D 6
0003500 W I T H . M O N I T O R 2 \
0003520 T C P F T P . A R P A C M D . L
0003540 O C K ) \r ( ) \r A R P A C M D
0003560 : D 4 \r ( P 1 S I : : * R E
0003600 S E T F O R M S * P 0 S I
0003620 : : * L O C K E D - M O N I T O
0003640 R * I 5 W A N T A R G I
0003660 4 D I S C A R D I 3 W
0003700 A N T I 2 A R G I 1
0003720 C M D I 0 T C P F T P C O
0003740 N ) \0 025 002 \0 \0 006 021 001 g \0 \0 \t
0003760 \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020 \0 ( 1
0004000 8 C L : V A L U E S - L I S T
0004020 1 4 S I : : M O N I T O R -
0004040 U N W I N D 1 1 \ M V L I S
0004060 T 8 A R P A C M D A 0 0 0 1
0004100 ) \r ( 5 S I : : M O N I T O R
0004120 - U N W I N D ) \r ( ) \r F T P H
0004140 E L P : D 4 \r ( I 0 A R G
0004160 ) \0 \n \0 \0 \0 001 @ o \0 \0 \0 \n \0 \0
0004200 020 \0 ( 7 E R R O R ) \r N I L \r
0004220 ( 4 " u n r e c o g n i z
0004240 e d r e s p o n s e f r o m
0004260 r e m o t e F T P s e r v
0004300 e r " ) \r C M D R E A D C O D E
0004320 : D 4 \r ( I 0 I N ) \0 021
0004340 \0 \0 \0 001 @ \t \0 \0 @ \t \0 \0 @ \t \0 \0
0004360 \v \0 \0 020 \0 ( 1 4 P A C K * 1
0004400 1 C M D R E A D 7 C M D R
0004420 E A D 3 C M D R E A D ) \r N
0004440 I L \r ( ) \r C M D R E A D : D
0004460 4 \r ( P 0 C H I 0 I N
0004500 ) \0 023 001 \0 \0 001 @ 021 001 \0 ` \0 \0
0004520 226 H ` \0 \0 \n \0 \0 H 020 \0 ( 1 5 B
0004540 O U T ) \r ( 1 2 F T P D E B U
0004560 G L O G 7 F T P D E B U G F
0004600 L G ) \r ( ) \r D I S C A R D L I
0004620 N E : D 4 \r ( P 0 C H I
0004640 0 I N ) \0 > 001 \0 \0 001 ` \0 \0
0004660 262 * @ \t \0 \0 021 020 \0 @ X l \n 360 243
0004700 H j 360 227 ` \0 \0 \t \0 \0 h 020 ` \0 \0 H
0004720 \n \0 \0 277 260 345 277 h 263 362 @ d l \n 360
0004740 244 d j 360 262 362 277 i 260 360 \0 ( 3 7 B
0004760 O U T 2 8 T E R P R I 8
0005000 \ B A C K F I L E P T R ) \r ( 3
0005020 3 F T P D E B U G L O G 2 5
0005040 F T P D E B U G L O G 2 F
0005060 T P D E B U G F L G ) \r ( ) \r G
0005100 E T L I N E : D 4 \r ( P 2
0005120 C H P 1 S T R I N G P
0005140 0 P O S I 1 F L G I
0005160 0 I N ) \0 / 003 \0 \0 002 k l P \t
0005200 \0 \0 021 022 002 @ Z l \n 360 263 026 H d l
0005220 P 363 250 277 I H J \v \0 \0 277 H k 324 270 260
0005240 346 I k H k 331 \v \0 \0 020 \0 ( 4 4 S
0005260 U B S T R I N G 2 9 R P L C
0005300 H A R C O D E 5 A L L O C S
0005320 T R I N G ) \r N I L \r ( ) \r \ T
0005340 C P F T P . I N P U T : D 4 \r
0005360 ( P 1 C H P 0 C O D E
0005400 I 0 S T R E A M ) \0 c 002
0005420 \0 \0 001 j 021 021 001 I d l - 360 253 277 I d
0005440 j 360 245 l 360 262 2 I l - 360 262 * ` \0
0005460 \0 262 034 ` \0 \0 \t \0 \0 277 o \0 \0 \0 ` \0
0005500 \0 \n \0 \0 277 H ` \0 \0 \n \0 \0 277 @ \t \0
0005520 \0 277 @ \t \0 \0 H 020 @ 271 l 0 I 361 263
0005540 270 I d l 9 361 263 262 277 H l \n 332 I l 0
0005560 331 330 270 260 244 \0 ( 6 6 \ T C P F T
0005600 P . I N P U T 6 1 D I S C A
0005620 R D L I N E 5 6 P R I N 1
0005640 4 8 P R I N 1 3 7 T E R P
0005660 R I ) \r ( 5 3 F T P D E B U G
0005700 L O G 4 5 F T P D E B U G L
0005720 O G 3 4 F T P D E B U G L O
0005740 G 2 9 F T P D E B U G F L G
0005760 ) \r ( 4 2 " < " ) \r T E L
0006000 N E T . E O L : D 4 \r ( I 0
0006020 S T R E A M ) \0 022 \0 \0 \0 001 @
0006040 l \r \n \0 \0 @ l \n \n \0 \0 @ \t \0 \0 020
0006060 \0 ( 1 5 F O R C E O U T P U T
0006100 1 1 B O U T 5 B O U T )
0006120 \r N I L \r ( ) \r \ T C P F T P .
0006140 C O N T R O L . C L O S E D :
0006160 D 4 \r ( P 3 T C P F T P C O
0006200 N P 0 D E V I C E I 1
0006220 O U T S T R E A M I 0 I
0006240 N S T R E A M ) \0 D 005 \0 \0 002 @
0006260 006 \0 \0 311 \n 021 A 004 H 006 \0 \0 311 002 Y 003
0006300 265 " h [ 264 035 @ A h \n \0 \0 \n \0 \0 H
0006320 006 \0 \0 K H 006 \0 \0 311 002 \n \0 \0 \ 024 002
0006340 L 020 001 Z 001 @ 360 225 J 265 332 i 260 327 I 002
0006360 260 316 \0 ( 4 5 D R E M O V E 3
0006400 1 \ S E T A C C E S S 2 8
0006420 \ S E T A C C E S S ) \r ( 4 0
0006440 F D E V 3 5 F D E V 1 2
0006460 F D E V 3 S T R E A M ) \r (
0006500 ) \r \ T C P F T P . G E T . O S
0006520 T Y P E : D 4 \r ( P 1 E N
0006540 T R Y P 0 H O S T I 0
0006560 D E V I C E F 2 \ H O S
0006600 T N A M E S ) \0 ' 002 001 \0 001 @ 006
0006620 \0 \0 311 \0 021 021 001 H R 026 230 H g \0 \0 \n
0006640 \0 \0 265 021 H ` \0 \0 \n \0 \0 Y d 224 006 \0
0006660 \0 311 \b 020 \0 ( 2 8 G E T H A S H
0006700 1 9 G E T H O S T I N F O )
0006720 \r ( 3 4 H O S T S . T X T . E
0006740 N T R Y 2 5 \ I P . H O S T
0006760 N A M E S 1 6 O S T Y P E
0007000 3 F D E V ) \r ( ) \r \ T C P F
0007020 T P . E V E N T F N : D 4 \r (
0007040 P 4 D A T A S T R E A M P
0007060 3 T C P O U T P 2 T C
0007100 P I N P 1 T C P F T P C O
0007120 N I 1 F L G I 0 F D
0007140 E V ) \0 Y 005 \0 \0 002 A g \0 \0 360 254
0007160 A g \0 \0 360 246 A g \0 \0 360 264 020 @ 006 \0
0007200 \0 311 002 021 A 004 H 003 265 004 h 020 001 Y 001 272
0007220 I 002 001 273 I 002 002 001 274 J g \0 \0 \n \0 \0
0007240 224 J \t \0 \0 277 K g \0 \0 \n \0 \0 224 K \t
0007260 \0 \0 277 L \t \0 \0 224 L \t \0 \0 277 H 002 X
0007300 260 307 \0 ( 8 1 C L O S E F 7 6
0007320 O P E N P 7 1 C L O S E F
0007340 6 6 O P E N P 5 8 C L O
0007360 S E F 5 3 O P E N P ) \r ( 6
0007400 3 O U T P U T 5 0 I N P U
0007420 T 2 2 F D E V 1 5 B E F
0007440 O R E M A K E S Y S 9 B E F
0007460 O R E S Y S O U T 3 B E F O
0007500 R E L O G O U T ) \r ( ) \r \ T C
0007520 P F T P . H O S T N A M E P :
0007540 D 4 \r ( P 2 F I L I N G N A
0007560 M E P 1 F U L L H O S T N
0007600 A M E P 0 S E R V E R I
0007620 1 D E V I C E I 0 H O
0007640 S T ) \0 245 003 \0 \0 002 @ \t \0 \0 265 006
0007660 @ \t \0 \0 021 ! 002 H 241 h 020 @ \t \0 \0 \t
0007700 \0 \0 Y i d \v \0 \0 265 003 202 261 \0 202 @ o
0007720 \0 \0 \0 \n \0 \0 Z I ` \0 \0 ` \0 \0 \n \0
0007740 \0 d I 024 \0 277 d g \0 \0 024 \f 277 d g \0
0007760 \0 024 030 277 d g \0 \0 024 020 277 d g \0 \0 024
0010000 B 277 d g \0 \0 024 D 277 d g \0 \0 024 N 277
0010020 d g \0 \0 024 024 277 d g \0 \0 024 006 277 d g
0010040 \0 \0 024 022 277 d g \0 \0 024 \n 277 d g \0 \0
0010060 024 026 277 d g \0 \0 024 \b 277 d h 024 002 277 b
0010100 002 \n \0 \0 A ` \0 \0 032 027 \0 \0 A 020 \0 (
0010120 1 5 3 \ D E F I N E D E V I C
0010140 E 5 4 N C R E A T E 2 4 3
0010160 P A C K * 2 9 \ G E T D E
0010200 V I C E F R O M N A M E 2 3
0010220 M K A T O M 2 0 U - C A S E
0010240 9 \ I P . R E A D . S T R I
0010260 N G . A D D R E S S 3 D O D
0010300 I P . H O S T P ) \r ( 1 6 1 \
0010320 T C P F T P . D E V I C E S 1
0010340 5 7 \ T C P F T P . D E V I C
0010360 E S 1 4 0 N I L L 1 3 3
0010400 \ T C P F T P . G E N E R A T E
0010420 F I L E S 1 2 6 \ T C P F T
0010440 P . D I R E C T O R Y N A M E P
0010460 1 1 9 \ T C P F T P . G E T
0010500 F I L E N A M E 1 1 2 N I L
0010520 L 1 0 5 \ T C P F T P . D E
0010540 L E T E F I L E 9 8 \ T C P
0010560 F T P . G E T E O F P T R 9 1
0010600 \ T C P F T P . S E T F I L E
0010620 I N F O 8 4 \ T C P F T P .
0010640 G E T F I L E I N F O 7 7 N
0010660 I L L 7 0 \ T C P F T P . R
0010700 E N A M E F I L E 6 3 \ T C
0010720 P F T P . O P E N F I L E 5 1
0010740 \ T C P . D E V I C E 4 8
0010760 | 004 003 F D E V T Y P E # | ) \r (
0011000 4 0 " F i l i n g " ) \r \
0011020 G E T . T C P F T P . C O N N E
0011040 C T I O N A 0 0 0 1 : D 4 \r (
0011060 N A M E S I : : * U N W I N D
0011100 - P R O T E C T * I 0 S I
0011120 : : * C L E A N U P - F O R M S
0011140 * F 2 T C P F T P C O N
0011160 F 3 I N S T R E A M F 4
0011200 D E V I C E F 5 O U T S
0011220 T R E A M F 6 C O N N E C
0011240 T I O N S ) \0 p 002 005 \0 001 ` \0 \0
0011260 h g \0 \0 \v \0 \0 V 021 021 001 H 003 265 \r h
0011300 022 c 004 265 031 T \t \0 \0 020 001 Y 002 002 002 001
0011320 245 I 265 356 i 260 353 H 002 X 260 342 001 c 006 262
0011340 3 R 002 001 c \n 262 , S g \0 \0 \n \0 \0 262
0011360 # U g \0 \0 \n \0 \0 262 032 S \t \0 \0 263 024
0011400 S \t \0 \0 224 S 277 260 370 R 002 002 002 i 030
0011420 R 020 R T \n \0 \0 T \t \0 \0 020 \0 ( 1 0
0011440 9 \ T C P F T P . O P E N . C
0011460 O N N E C T I O N 1 0 5 \ T
0011500 C P F T P . D E L E T E . C O N
0011520 N E C T I O N 8 6 R E A D P
0011540 8 0 E O F P 7 4 O P E N
0011560 P 6 5 O P E N P 2 7 \ T
0011600 C P F T P . O P E N . C O N N E
0011620 C T I O N 9 O B T A I N . M
0011640 O N I T O R L O C K ) \r ( 7 1
0011660 O U T P U T 6 2 I N P U T
0011700 6 W I T H . M O N I T O R 2
0011720 \ T C P F T P . C O N N E C T
0011740 I O N . L O C K ) \r ( ) \r \ G E
0011760 T . T C P F T P . C O N N E C T
0012000 I O N : D 4 \r ( P 5 S I :
0012020 : * R E S E T F O R M S * P
0012040 4 S I : : * L O C K E D - M O
0012060 N I T O R * P 3 O U T S T
0012100 R E A M P 2 I N S T R E A
0012120 M P 1 T C P F T P C O N
0012140 P 0 C O N N E C T I O N S
0012160 I 0 D E V I C E ) \0 033 006 \0
0012200 \0 001 @ 006 \0 \0 311 002 021 Q 005 g \0 \0 \t \0
0012220 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020 \0 ( 2 4
0012240 C L : V A L U E S - L I S T
0012260 2 0 S I : : M O N I T O R - U
0012300 N W I N D 1 7 \ M V L I S T
0012320 1 4 \ G E T . T C P F T P .
0012340 C O N N E C T I O N A 0 0 0 1 )
0012360 \r ( 1 1 S I : : M O N I T O R
0012400 - U N W I N D 3 F D E V ) \r
0012420 ( ) \r \ T C P F T P . O P E N .
0012440 C O N N E C T I O N A 0 0 0 1
0012460 : D 4 \r ( I 0 S T R E A M )
0012500 \0 005 \0 \0 \0 001 \b \0 \0 020 \0 ( 2 Z
0012520 E R O ) \r N I L \r ( ) \r \ T C P
0012540 F T P . O P E N . C O N N E C T
0012560 I O N : D 4 \r ( P 3 O U T
0012600 S T R E A M P 2 I N S T R
0012620 E A M P 1 T C P F T P C O
0012640 N P 0 H O S T I 0 D
0012660 E V I C E ) \0 235 004 \0 \0 001 @ 006 \0
0012700 \0 311 \0 \t \0 \0 021 021 001 h d d i h d d
0012720 032 032 032 032 032 032 271 H l 025 h g \0 \0 g \0
0012740 \0 h o \0 \0 \0 \r \a \0 \0 021 001 002 J d 222
0012760 \t \0 \0 021 001 003 J d 262 Y 006 \0 \0 g \0 \0
0013000 024 * J 006 \0 \0 @ 024 \n K 006 \0 \0 @ 024 \n
0013020 I J 030 I 002 K 030 J \t \0 \0 l 334 360 262 4
0013040 ` \0 \0 262 032 ` \0 \0 \t \0 \0 277 o \0 \0 \0
0013060 ` \0 \0 \n \0 \0 277 I 001 \t \0 \0 277 @ I \n
0013100 \0 \0 @ 006 \0 \0 I @ 006 \0 \0 311 002 032 024 002
0013120 I 020 I @ \n \0 \0 h 020 \0 ( 1 5 3 \
0013140 T C P F T P . D E L E T E . C O
0013160 N N E C T I O N 1 3 2 \ T C
0013200 P F T P . L O G I N 1 2 6 D
0013220 I S C A R D L I N E 1 2 0 P
0013240 R I N 1 1 0 9 T E R P R I
0013260 9 3 \ T C P F T P . I N P U T
0013300 5 3 T C P . O T H E R . S T
0013320 R E A M 4 4 T C P . O P E N
0013340 8 D O D I P . H O S T P ) \r
0013360 ( 1 4 1 F D E V 1 3 6 F D
0013400 E V 1 1 7 F T P D E B U G L
0013420 O G 1 0 6 F T P D E B U G L
0013440 O G 1 0 1 F T P D E B U G F
0013460 L G 7 9 S T R E A M 7 2
0013500 S T R E A M 6 6 \ T C P F T
0013520 P . O P E N . C O N N E C T I O
0013540 N A 0 0 0 1 6 3 S T R E A M
0013560 3 5 I N P U T 3 2 A C T
0013600 I V E 3 F D E V ) \r ( 1 1
0013620 4 " < 2 2 0 " 4 0 ( W
0013640 H E N C L O S E D F N \ T C P
0013660 F T P . C O N T R O L . C L O S
0013700 E D ) ) \r \ T C P F T P . A S S
0013720 U R E . C L E A N U P : D 4 \r
0013740 N I L \0 # \0 \0 \0 \0 ` \0 \0 \t \0 \0
0013760 231 ` \0 \0 \t \0 \0 h 360 265 022 o \0 \0 \0 g
0014000 \0 \0 g \0 \0 \v \0 \0 027 \0 \0 020 \0 ( 2 9
0014020 A D D . P R O C E S S 1 2
0014040 P R O C E S S . F I N I S H E D
0014060 P 5 P R O C E S S P ) \r ( 3
0014100 2 \ T C P F T P . C L E A N U
0014120 P . P R O C E S S 2 6 N O
0014140 2 3 R E S T A R T A B L E 9
0014160 \ T C P F T P . C L E A N U P
0014200 . P R O C E S S 2 \ T C P F
0014220 T P . C L E A N U P . P R O C E
0014240 S S ) \r ( 2 0 ( \ T C P F T
0014260 P . C L E A N U P ) ) \r \ T C P
0014300 F T P . C L E A N U P A 0 0 0 1
0014320 A 0 0 0 2 : D 4 \r ( P 1 S
0014340 I : : * C A T C H - R E T U R N
0014360 - F R O M * P 0 S I : : *
0014400 D U M M Y - F O R - C A T C H *
0014420 F 2 C O N N E C T I O N
0014440 F 3 C O N N E C T I O N S P
0014460 F 4 D E V I C E F 5
0014500 S I : : N L S E T Q - V A L U E
0014520 ) \0 r 002 004 002 \0 i @ 021 002 001 R d 002
0014540 002 002 001 263 6 002 002 002 002 001 \t \0 \0 262 + R
0014560 001 \t \0 \0 277 R 002 001 \t \0 \0 277 R 002 002 001
0014600 227 R 002 002 001 \t \0 \0 277 S m 377 324 c 006 277
0014620 R T i \v \0 \0 260 + R 001 g \0 \0 \n \0 \0
0014640 262 023 R 001 006 \0 \0 311 024 006 \0 \0 311 002 g \0
0014660 \0 360 254 S m 377 324 c 006 277 R T \n \0 \0 200
0014700 h h 032 c \n g \0 \0 020 \0 ( 1 0 2 \
0014720 T C P F T P . D E L E T E . C O
0014740 N N E C T I O N 7 1 O P E N
0014760 P 6 1 \ T C P F T P . D E L
0015000 E T E . C O N N E C T I O N 4
0015020 7 C L O S E F ? 3 4 C L O
0015040 S E F ? 2 7 C L O S E F ?
0015060 2 0 T I M E R E X P I R E D ?
0015100 ) \r ( 1 1 1 : N O R M A L 8
0015120 8 E S T A B L I S H E D 8 3
0015140 T C P . C O N T R O L . B L O
0015160 C K 7 8 S T R E A M 6 8
0015200 I N P U T ) \r ( ) \r \ T C P F T
0015220 P . C L E A N U P A 0 0 0 1 :
0015240 D 4 \r ( N A M E S I : : * U N
0015260 W I N D - P R O T E C T * P
0015300 3 * C O N D I T I O N - H A N
0015320 D L E R - B I N D I N G S * P
0015340 2 S I : : * N L S E T Q F L
0015360 A G * P 1 * P R O C E E D
0015400 - C A S E S * P 0 S I : :
0015420 N L S E T Q - V A L U E I 0
0015440 S I : : * C L E A N U P - F O
0015460 R M S * F 4 * P R O C E E
0015500 D - C A S E S * F 5 * C O
0015520 N D I T I O N - H A N D L E R -
0015540 B I N D I N G S * ) \0 * 004 002 \0
0015560 001 ` \0 \0 h g \0 \0 \v \0 \0 021 020 \0 ` \0
0015600 \0 T 032 i o \0 \0 \0 U 032 021 003 003 I \t \0
0015620 \0 022 g \0 \0 360 264 003 H 020 \0 ( 3 1 \
0015640 T C P F T P . C L E A N U P A 0
0015660 0 0 1 A 0 0 0 2 9 O B T A I
0015700 N . M O N I T O R L O C K ) \r (
0015720 3 5 : N O R M A L 1 5 S I
0015740 : : N L S E T Q - P R O C E E D
0015760 - C A S E 6 W I T H . M O N
0016000 I T O R 2 \ T C P F T P . C
0016020 O N N E C T I O N . L O C K ) \r
0016040 ( 2 2 ( C L : E R R O R .
0016060 S I : : N L S E T Q H A N D L
0016100 E R ) ) \r \ T C P F T P . C L E
0016120 A N U P : D 4 \r ( P 5 S I
0016140 : : * R E S E T F O R M S * P
0016160 4 S I : : * L O C K E D - M
0016200 O N I T O R * P 3 C O N N
0016220 E C T I O N P 2 D E V I C
0016240 E P 1 C O N N E C T I O N
0016260 S P P 0 I N T E R V A L )
0016300 \0 p 006 \0 \0 \0 ` \0 \0 l 004 327 021 021 001
0016320 j 271 ` \0 \0 260 ; d 001 021 001 002 J 006 \0 \0
0016340 311 002 h \n \0 \0 260 $ d 001 021 001 003 I k 324
0016360 271 021 005 g \0 \0 \t \0 \0 \t \0 \0 \b \0 \0
0016400 277 \t \0 \0 023 \b \0 \0 023 002 003 265 335 h 023 002
0016420 003 265 306 I d j 360 255 005 003 224 I \t \0 \0 244
0016440 H \t \0 \0 277 I j 360 252 I 005 003 262 244 I \t
0016460 \0 \0 262 236 h 020 \0 ( 1 0 6 \ F Z E
0016500 R O P 9 2 B L O C K 8 7
0016520 \ F Z E R O P 6 4 B L O C K
0016540 6 0 C L : V A L U E S - L I
0016560 S T 5 6 S I : : M O N I T O
0016600 R - U N W I N D 5 3 \ M V L
0016620 I S T 5 0 \ T C P F T P . C
0016640 L E A N U P A 0 0 0 1 3 0 \
0016660 A P P E N D 2 ) \r ( 4 7 S I :
0016700 : M O N I T O R - U N W I N D
0016720 2 4 F D E V 1 3 \ T C P F
0016740 T P . D E V I C E S 2 \ T C
0016760 P F T P . I D L E . T I M E O U
0017000 T ) \r ( ) \r \ T C P F T P . R E
0017020 L E A S E . C O N N E C T I O N
0017040 : D 4 \r ( I 0 T C P F T P
0017060 C O N ) \0 # \0 \0 \0 001 @ d 262 037 002
0017100 002 002 h 030 @ 002 002 h 030 @ 002 002 002 002 l 002
0017120 037 \t \0 \0 ` \0 \0 366 030 \b \0 \0 020 \0 ( 3
0017140 2 \ T C P F T P . A S S U R E
0017160 . C L E A N U P 2 4 \ C L O
0017200 C K 0 ) \r ( 2 7 \ T C P F T P
0017220 . I D L E . T I M E O U T ) \r (
0017240 ) \r \ T C P F T P . L O G I N
0017260 : D 4 \r ( P 3 I N F O P
0017300 2 L O G I N R E T R Y C O U N
0017320 T P 1 H O S T P 0 O
0017340 S T Y P E I 1 T C P F T P
0017360 C O N I 0 D E V I C E )
0017400 001 035 004 \0 \0 002 @ \t \0 \0 @ 006 \0 \0 311 \0
0017420 j 021 023 003 I \t \0 \0 [ 262 025 K 001 \t \0 \0
0017440 j 360 252 K 002 \t \0 \0 j 360 242 261 \0 257 I \t
0017460 \0 \0 277 260 341 K 001 o \0 \0 \0 \f \0 \0 d l
0017500 346 360 222 261 \0 215 d l 312 360 222 261 \0 205 d n
0017520 001 K 360 262 Z 277 A o \0 \0 \0 K 002 \t \0 \0
0017540 o \0 \0 \0 \f \0 \0 d l 346 360 263 e d n 001
0017560 L 360 262 ! 277 A o \0 \0 \0 o \0 \0 \0 I \n
0017600 \0 \0 \t \0 \0 o \0 \0 \0 \f \0 \0 l 346 360 262
0017620 K i 020 d n 001 K 360 246 d n 002 022 360 262 ~
0017640 277 I \t \0 \0 277 J k 324 272 261 377 j d n 001
0017660 L 360 262 277 A o \0 \0 \0 o \0 \0 \0 I \n
0017700 \0 \0 \t \0 \0 o \0 \0 \0 \f \0 \0 l 346 360 231
0017720 i 020 d n 001 367 360 262 , 277 A o \0 \0 \0 H
0017740 g \0 \0 360 242 261 377 P K 001 K 001 \t \0 \0 360
0017760 242 261 377 D J j 360 242 261 377 = K 001 \t \0 \0
0020000 261 377 7 d n 001 364 360 245 d n 002 022 360 234 277
0020020 I \t \0 \0 277 J k 324 272 261 376 373 277 \b \0 \0
0020040 h 020 \0 ( 2 8 1 F T P H E L P
0020060 2 6 9 L O G I N 2 4 9 L -
0020100 C A S E 2 3 2 U - C A S E
0020120 1 9 7 A R P A C M D 1 9 0
0020140 P R O M P T F O R W O R D 1 8
0020160 7 C O N C A T 1 5 8 L O G
0020200 I N 1 3 3 A R P A C M D 1
0020220 2 6 P R O M P T F O R W O R D
0020240 1 2 3 C O N C A T 9 6 A
0020260 R P A C M D 8 9 \ D E C R Y
0020300 P T . P W D 5 5 A R P A C M
0020320 D 4 3 L O G I N 3 3 N C
0020340 H A R S 2 5 N C H A R S 1
0020360 7 \ I N T E R N A L / G E T P
0020400 A S S W O R D 3 \ T C P F T
0020420 P . G E T . O S T Y P E ) \r ( 2
0020440 2 0 U N I X 7 F D E V ) \r
0020460 ( 2 1 6 " U S E R " 1 9 4
0020500 ( 2 3 0 2 0 2 5 3 0 ) 1
0020520 8 3 " A c c o u n t f o r
0020540 l o g g i n g i n t o " 1
0020560 7 9 " A C C T " 1 3 0 ( 2
0020600 3 0 2 0 2 5 3 0 ) 1 1 9
0020620 " A c c o u n t f o r l o g
0020640 g i n g i n t o " \r 1 1 5
0020660 " A C C T " 9 3 ( 2 3 0
0020700 3 3 1 3 3 2 5 3 0 ) 8 4
0020720 " P A S S " 5 2 ( 2 0 2 2
0020740 3 0 3 3 1 3 3 2 5 0 0 5
0020760 0 3 5 3 0 ) ) \r \ T C P F T P
0021000 . D E L E T E F I L E A 0 0 0 1
0021020 : D 4 \r ( P 1 S I : : * C
0021040 A T C H - R E T U R N - F R O M
0021060 * P 0 S I : : * D U M M Y
0021100 - F O R - C A T C H * F 2
0021120 T C P F T P C O N F 3 N A
0021140 M E F 4 O S T Y P E F
0021160 5 S I : : N L S E T Q - V A L
0021200 U E ) \0 ) 002 004 002 \0 i @ 021 002 001 R
0021220 o \0 \0 \0 g \0 \0 h g \0 \0 S \f \0 \0 T
0021240 \n \0 \0 o \0 \0 \0 \f \0 \0 h 032 c \n g \0
0021260 \0 020 \0 ( 3 1 A R P A C M D 2
0021300 4 R E P A C K F I L E N A M E
0021320 . S T R I N G 2 0 P A C K F
0021340 I L E N A M E . S T R I N G ) \r
0021360 ( 3 8 : N O R M A L 1 6 B
0021400 O D Y 1 2 H O S T ) \r ( 2
0021420 8 ( 2 0 0 2 2 6 2 5 0 4
0021440 5 0 5 5 0 ) 9 " D E L E "
0021460 ) \r \ T C P F T P . D E L E T E
0021500 F I L E : D 4 \r ( P 6 C O
0021520 D E P 5 * C O N D I T I O
0021540 N - H A N D L E R - B I N D I N
0021560 G S * P 4 S I : : * N L S
0021600 E T Q F L A G * P 3 * P R
0021620 O C E E D - C A S E S * P 2
0021640 S I : : N L S E T Q - V A L U
0021660 E P 1 O S T Y P E P 0
0021700 T C P F T P C O N I 1 D
0021720 E V I C E I 0 N A M E F
0021740 7 * P R O C E E D - C A S E
0021760 S * F 8 * C O N D I T I O
0022000 N - H A N D L E R - B I N D I N
0022020 G S * ) \0 J \a 002 \0 002 A \t \0 \0 021
0022040 001 \0 A \t \0 \0 021 001 001 021 020 002 ` \0 \0 W
0022060 016 032 i o \0 \0 \0 W 020 032 021 003 005 K \t \0
0022100 \0 022 g \0 \0 360 264 003 J 022 001 021 001 006 H \t
0022120 \0 \0 N l 372 360 252 N l 342 360 245 N l 310 360
0022140 264 003 @ 020 \0 ( 5 4 \ T C P F T P
0022160 . R E L E A S E . C O N N E C T
0022200 I O N 3 7 \ T C P F T P . D
0022220 E L E T E F I L E A 0 0 0 1 1
0022240 0 \ T C P F T P . G E T . O S
0022260 T Y P E 3 \ G E T . T C P F
0022300 T P . C O N N E C T I O N ) \r (
0022320 4 1 : N O R M A L 1 9 S I
0022340 : : N L S E T Q - P R O C E E D
0022360 - C A S E ) \r ( 2 7 ( C L :
0022400 E R R O R . S I : : N L S E
0022420 T Q H A N D L E R ) ) \r \ T C P
0022440 F T P . D I R E C T O R Y N A M
0022460 E P A 0 0 0 1 A 0 0 0 2 : D 4
0022500 \r ( I 0 T C P F T P C O N
0022520 F 0 R E S E T S T A T E )
0022540 \0 + \0 001 \0 001 @ \t \0 \0 P 264 $ @ 001 \t
0022560 \0 \0 225 @ 001 \t \0 \0 277 @ h 030 @ 002 001 \t
0022600 \0 \0 226 @ 002 001 \t \0 \0 277 @ 002 h 030 001 020
0022620 \0 ( 3 4 C L O S E F 2 7 O
0022640 P E N P 1 7 C L O S E F 1
0022660 1 O P E N P 3 \ T C P F T
0022700 P . R E L E A S E . C O N N E C
0022720 T I O N ) \r N I L \r ( ) \r \ T C
0022740 P F T P . D I R E C T O R Y N A
0022760 M E P A 0 0 0 1 : D 4 \r ( N A
0023000 M E S I : : * U N W I N D - P
0023020 R O T E C T * I 0 S I : :
0023040 * C L E A N U P - F O R M S *
0023060 F 0 T C P F T P C O N F
0023100 1 S I : : * R E S E T F O R M
0023120 S * F 2 D E V I C E F
0023140 3 H O S T / D I R ) \0 035 \0 004
0023160 \0 001 g \0 \0 P h 032 032 h d 032 032 Q 032 c
0023200 002 R P S g \0 \0 \n \0 \0 \v \0 \0 020 \0 (
0023220 2 6 \ T C P F T P . C O N N E
0023240 C T 2 3 F I L E N A M E F I
0023260 E L D ) \r ( 2 0 D I R E C T O
0023300 R Y 2 \ T C P F T P . D I R
0023320 E C T O R Y N A M E P A 0 0 0 1
0023340 A 0 0 0 2 ) \r ( ) \r \ T C P F T
0023360 P . D I R E C T O R Y N A M E P
0023400 : D 4 \r ( P 2 S I : : * R
0023420 E S E T F O R M S * P 1 L
0023440 I S P X H I S T P 0 T C P
0023460 F T P C O N I 1 D E V I C
0023500 E I 0 H O S T / D I R F
0023520 3 L I S P X H I S T ) \0 035
0023540 003 001 \0 002 A \t \0 \0 021 001 \0 S 021 021 002 g
0023560 \0 \0 \t \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020
0023600 \0 ( 2 6 C L : V A L U E S - L
0023620 I S T 2 2 S I : : R E S E T
0023640 U N W I N D 1 9 \ M V L I S
0023660 T 1 6 \ T C P F T P . D I R
0023700 E C T O R Y N A M E P A 0 0 0 1
0023720 3 \ G E T . T C P F T P . C
0023740 O N N E C T I O N ) \r ( 1 3 S
0023760 I : : R E S E T U N W I N D ) \r
0024000 ( ) \r \ T C P F T P . E N D O F
0024020 S T R E A M O P : D 4 \r ( I
0024040 1 S I L E N T L Y I 0 S
0024060 T R E A M ) \0 \r \0 \0 \0 002 @ \t \0
0024100 \0 A 265 006 @ \t \0 \0 020 \0 ( 1 0 \ E
0024120 O S E R R O R 3 \ T C P F T
0024140 P . T R A N S F E R . C O M P L
0024160 E T E ) \r N I L \r ( ) \r \ T C P
0024200 F T P . G E N E R A T E F I L E
0024220 S A 0 0 0 1 : D 4 \r ( P 1
0024240 S I : : * C A T C H - R E T U R
0024260 N - F R O M * P 0 S I : :
0024300 * D U M M Y - F O R - C A T C H
0024320 * F 2 P A T T E R N F
0024340 3 O S T Y P E F 4 T C P
0024360 F T P C O N F 5 S I : : N
0024400 L S E T Q - V A L U E ) \0 272 002
0024420 004 002 \0 i @ 021 002 001 T o \0 \0 \0 S d g
0024440 \0 \0 360 262 | 277 R g \0 \0 \n \0 \0 g \0 \0
0024460 360 262 < R g \0 \0 \n \0 \0 g \0 \0 360 262 /
0024500 R g \0 \0 \n \0 \0 g \0 \0 360 262 " g \0 \0
0024520 h g \0 \0 h g \0 \0 h g \0 \0 o \0 \0 \0
0024540 g \0 \0 R \r \n \0 \0 g \0 \0 260 Q R g \0
0024560 \0 \n \0 \0 g \0 \0 360 262 027 g \0 \0 h g \0
0024600 \0 h g \0 \0 R \r 006 \0 \0 g \0 \0 260 / g
0024620 \0 \0 h g \0 \0 R \f \0 \0 g \0 \0 260 037 g
0024640 \0 \0 360 233 g \0 \0 h g \0 \0 R \f \0 \0 216
0024660 g \0 \0 h g \0 \0 R \f \0 \0 S \n \0 \0 l
0024700 226 \f \0 \0 h 032 c \n g \0 \0 020 \0 ( 1 7
0024720 6 A R P A C M D 1 7 1 R E
0024740 P A C K F I L E N A M E . S T R
0024760 I N G 1 6 7 P A C K F I L E
0025000 N A M E . S T R I N G 1 5 5
0025020 P A C K F I L E N A M E . S T R
0025040 I N G 1 3 4 P A C K F I L E
0025060 N A M E . S T R I N G 1 1 8
0025100 P A C K F I L E N A M E . S T R
0025120 I N G 9 6 F I L E N A M E F
0025140 I E L D 8 4 P A C K F I L E
0025160 N A M E . S T R I N G 5 1 F
0025200 I L E N A M E F I E L D 3 8
0025220 F I L E N A M E F I E L D 2 5
0025240 F I L E N A M E F I E L D ) \r
0025260 ( 1 8 3 : N O R M A L 1 6 3
0025300 B O D Y 1 5 9 H O S T 1
0025320 5 1 B O D Y 1 4 7 H O S T
0025340 1 4 2 I N T E R L I S P 1
0025360 3 7 U N I X 1 3 0 B O D Y
0025400 1 2 6 H O S T 1 2 1 U N
0025420 I X 1 1 3 B O D Y 1 0 9
0025440 V E R S I O N 1 0 5 H O S T
0025460 9 9 * 9 3 V E R S I O N
0025500 8 7 U N I X 7 9 B O D Y
0025520 7 2 N A M E 6 8 E X T E
0025540 N S I O N 6 4 V E R S I O N
0025560 6 0 H O S T 5 4 * 4 8
0025600 N A M E 4 1 * 3 5 E X
0025620 T E N S I O N 2 8 * 2 2
0025640 V E R S I O N 1 4 U N I X )
0025660 \r ( 7 6 " * " 9 " N L S
0025700 T " ) \r \ T C P F T P . G E N E
0025720 R A T E F I L E S : D 4 \r ( P
0025740 8 * C O N D I T I O N - H A
0025760 N D L E R - B I N D I N G S *
0026000 P 7 S I : : * N L S E T Q F
0026020 L A G * P 6 * P R O C E E
0026040 D - C A S E S * P 5 S I :
0026060 : N L S E T Q - V A L U E P
0026100 4 C O D E P 3 D A T A S
0026120 T R E A M P 2 D A T A S T
0026140 R E A M E V E N T P 1 O S
0026160 T Y P E P 0 T C P F T P C
0026200 O N I 3 O P T I O N S I
0026220 2 D E S I R E D P R O P S
0026240 I 1 P A T T E R N I 0
0026260 D E V I C E F 9 * P R O C
0026300 E E D - C A S E S * F 1 0
0026320 * C O N D I T I O N - H A N D L
0026340 E R - B I N D I N G S * ) \0 |
0026360 \t 002 \0 004 @ \t \0 \0 021 001 \0 @ \t \0 \0 021
0026400 1 004 H g \0 \0 \n \0 \0 Z \b \0 \0 021 020 005
0026420 ` \0 \0 W 022 032 i o \0 \0 \0 W 024 032 021 003
0026440 \b N \t \0 \0 022 g \0 \0 360 264 003 M 022 001 \
0026460 d l 226 360 262 . @ H J g \0 \0 \f \0 \0 [
0026500 262 032 H 002 002 002 002 002 A g \0 \0 \n \0 \0 030
0026520 g \0 \0 g \0 \0 H 032 032 020 o \0 \0 \0 \t \0
0026540 \0 020 J 001 \t \0 \0 H \t \0 \0 \b \0 \0 020 \0
0026560 ( 1 2 1 \ N U L L F I L E G E
0026600 N E R A T O R 1 1 8 \ T C P
0026620 F T P . R E L E A S E . C O N N
0026640 E C T I O N 1 1 4 D E L . P
0026660 R O C E S S 1 0 8 E R R O R
0026700 9 0 F I L E N A M E F I E L
0026720 D 7 4 \ T C P F T P . W A I
0026740 T . F O R . D A T A C O N N E C
0026760 T I O N 4 8 \ T C P F T P .
0027000 G E N E R A T E F I L E S A 0 0
0027020 0 1 2 4 B L O C K 2 0 \
0027040 T C P F T P . S P A W N . D A T
0027060 A C O N N E C T I O N 1 0 \
0027100 T C P F T P . G E T . O S T Y P
0027120 E 3 \ G E T . T C P F T P .
0027140 C O N N E C T I O N ) \r ( 9 7
0027160 N I L L 9 4 \ T C P F T P .
0027200 G E N E R A T E N E X T F I L E
0027220 8 7 D I R E C T O R Y 7 1
0027240 I N P U T 5 2 : N O R M A
0027260 L 3 0 S I : : N L S E T Q -
0027300 P R O C E E D - C A S E 1 7
0027320 I N P U T ) \r ( 1 0 5 " C o
0027340 u l d n ' t o p e n d a t a
0027360 c o n n e c t i o n t o r
0027400 e m o t e T C P F T P s e r
0027420 v e r " 3 8 ( C L : E R R O
0027440 R . S I : : N L S E T Q H A
0027460 N D L E R ) ) \r \ T C P F T P .
0027500 G E N E R A T E N E X T F I L E
0027520 A 0 0 0 1 : D 4 \r ( P 1 S
0027540 I : : * C A T C H - R E T U R N
0027560 - F R O M * P 0 S I : : *
0027600 D U M M Y - F O R - C A T C H *
0027620 F 2 D A T A S T R E A M
0027640 F 3 F I L E N A M E R D T B
0027660 L F 4 S I : : N L S E T Q
0027700 - V A L U E ) \0 023 002 003 002 \0 i @
0027720 021 002 001 R S \n \0 \0 h 032 c \b g \0 \0 020
0027740 \0 ( 9 R E A D ) \r ( 1 6 : N
0027760 O R M A L ) \r ( ) \r \ T C P F T
0030000 P . G E N E R A T E N E X T F I
0030020 L E A 0 0 0 2 : D 4 \r ( P 1
0030040 S I : : * C A T C H - R E T U
0030060 R N - F R O M * P 0 S I :
0030100 : * D U M M Y - F O R - C A T C
0030120 H * F 2 D A T A S T R E A
0030140 M F 3 S I : : N L S E T Q
0030160 - V A L U E F 4 F I L E N
0030200 A M E R D T B L ) \0 034 002 003 002 \0
0030220 i @ 021 002 001 R \t \0 \0 230 h d 032 c 006 g
0030240 \0 \0 020 R T \n \0 \0 277 260 354 \0 ( 2 3
0030260 R E A D 8 E O F P ) \r ( 1 7
0030300 : N O R M A L ) \r ( ) \r \ T C
0030320 P F T P . G E N E R A T E N E X
0030340 T F I L E : D 4 \r ( P 1 4
0030360 * C O N D I T I O N - H A N D L
0030400 E R - B I N D I N G S * P 1
0030420 3 S I : : * N L S E T Q F L A
0030440 G * P 1 2 * P R O C E E D
0030460 - C A S E S * P 1 1 S I :
0030500 : N L S E T Q - V A L U E P
0030520 1 0 * C O N D I T I O N - H A
0030540 N D L E R - B I N D I N G S *
0030560 P 9 S I : : * N L S E T Q F
0030600 L A G * P 8 * P R O C E E
0030620 D - C A S E S * P 7 S I :
0030640 : N L S E T Q - V A L U E P
0030660 6 N A M E P 5 C O D E
0030700 P 4 F I L E N A M E R D T B
0030720 L P 3 O S T Y P E P 2
0030740 D A T A S T R E A M P 1
0030760 R I 1 N A M E O N L Y I
0031000 0 T C P F T P C O N F 1
0031020 5 * P R O C E E D - C A S E S
0031040 * F 1 6 * C O N D I T I O
0031060 N - H A N D L E R - B I N D I N
0031100 G S * ) 001 Z 017 002 \0 002 @ 002 002 001 @
0031120 001 006 \0 \0 311 \n \t \0 \0 o \0 \0 \0 021 001 \0
0031140 H d 002 263 . g \0 \0 \t \0 \0 021 001 001 h d
0031160 I \v \0 \0 277 g \0 \0 g \0 \0 I \v \0 \0 277
0031200 o \0 \0 \0 h I \v \0 \0 277 I 022 030 i 031 277
0031220 H 022 001 021 # 006 J g \0 \0 \n \0 \0 242 261 \0
0031240 325 J \t \0 \0 222 261 \0 315 021 020 \a ` \0 \0 W
0031260 036 032 i o \0 \0 \0 W 032 021 003 \n O 020 \t
0031300 \0 \0 022 g \0 \0 360 264 004 O 016 022 001 ^ 242 261
0031320 \0 244 K g \0 \0 360 246 K g \0 \0 360 262 d o
0031340 \0 \0 \0 N h d d d ` \0 \0 \r \a \0 \0 262
0031360 R 021 020 \v ` \0 \0 W 036 032 i o \0 \0 \0 W
0031400 032 021 003 016 O 030 \t \0 \0 022 023 J \t \0 \0
0031420 224 J \t \0 \0 277 @ h d o \0 \0 \0 \f \0 \0
0031440 ] l 372 360 247 M d l 342 360 262 023 277 J \t \0
0031460 \0 224 J \t \0 \0 277 @ \t \0 \0 h 020 \t \0 \0
0031500 020 A 227 N g \0 \0 \n \0 \0 020 g \0 \0 @ 001
0031520 006 \0 \0 311 \n 006 \0 \0 311 \0 g \0 \0 @ 002 002
0031540 002 002 002 001 g \0 \0 N g \0 \0 \n \0 \0 \r 006
0031560 \0 \0 020 J \t \0 \0 224 J \t \0 \0 277 @ h d
0031600 o \0 \0 \0 \f \0 \0 ] l 372 360 247 M d l 342
0031620 360 262 254 277 J \t \0 \0 224 J \t \0 \0 277 @ \t
0031640 \0 \0 h 020 \0 ( 3 4 2 \ T C P F T
0031660 P . R E L E A S E . C O N N E C
0031700 T I O N 3 3 7 C L O S E F
0031720 3 3 2 O P E N P 3 1 5 A R
0031740 P A C M D 3 0 4 C L O S E F
0031760 2 9 9 O P E N P 2 9 4 P
0032000 A C K F I L E N A M E . S T R I
0032020 N G 2 9 0 R E P A C K F I L
0032040 E N A M E . S T R I N G 2 5 4
0032060 R E P A C K F I L E N A M E .
0032100 S T R I N G 2 4 4 F T P H E
0032120 L P 2 3 9 \ T C P F T P . R
0032140 E L E A S E . C O N N E C T I O
0032160 N 2 3 4 C L O S E F 2 2 9
0032200 O P E N P 2 1 2 A R P A C
0032220 M D 2 0 1 C L O S E F 1 9
0032240 6 O P E N P 1 9 0 \ T C P
0032260 F T P . G E N E R A T E N E X T
0032300 F I L E A 0 0 0 2 1 6 3 S T
0032320 R P O S 1 1 8 \ T C P F T P
0032340 . G E N E R A T E N E X T F I L
0032360 E A 0 0 0 1 8 9 E O F P 8
0032400 1 O P E N P 6 1 S E T S E
0032420 P R 5 1 S E T S Y N T A X
0032440 4 0 S E T B R K 3 1 C O P
0032460 Y R E A D T A B L E 1 3 \ T
0032500 C P F T P . G E T . O S T Y P E
0032520 ) \r ( 2 8 7 I N T E R L I S P
0032540 2 8 3 B O D Y 2 7 3 D I
0032560 R E C T O R Y 2 6 8 F D E V
0032600 2 6 3 S T R E A M 2 5 8
0032620 H O S T 2 5 1 I N T E R L I
0032640 S P 1 7 1 S I : : N L S E T
0032660 Q - P R O C E E D - C A S E 1
0032700 5 9 U P P E R C A S E A R R A
0032720 Y 1 4 4 T O P S 2 0 1 3 8
0032740 T O P S - 2 0 1 2 2 : N O
0032760 R M A L 9 9 S I : : N L S E
0033000 T Q - P R O C E E D - C A S E
0033020 7 8 I N P U T 4 7 O T H E
0033040 R 4 4 % % 2 8 O R I G
0033060 8 S T R E A M ) \r ( 3 1 2
0033100 ( 2 2 6 2 5 0 ) 2 0 9 ( 2
0033120 2 6 2 5 0 ) 1 7 9 ( C L :
0033140 E R R O R . S I : : N L S E
0033160 T Q H A N D L E R ) 1 5 1 "
0033200 ? N o t f o u n d " 1 0 7
0033220 ( C L : E R R O R . S I :
0033240 : N L S E T Q H A N D L E R ) \r
0033260 5 6 ( 1 3 1 0 3 1 ) 1
0033300 7 ( N I L ) ) \r \ T C P F T P
0033320 . G E T F I L E N A M E A 0 0 0
0033340 1 : D 4 \r ( P 1 S I : : *
0033360 C A T C H - R E T U R N - F R O
0033400 M * P 0 S I : : * D U M M
0033420 Y - F O R - C A T C H * F 2
0033440 O S T Y P E F 3 N A M E
0033460 F 4 T C P F T P C O N F
0033500 5 S I : : N L S E T Q - V A
0033520 L U E ) \0 9 002 004 002 \0 i @ 021 002 001
0033540 T o \0 \0 \0 R g \0 \0 360 233 g \0 \0 h g
0033560 \0 \0 S \f \0 \0 216 g \0 \0 h g \0 \0 S \f
0033600 \0 \0 R \n \0 \0 l 226 \f \0 \0 h 032 c \n g
0033620 \0 \0 020 \0 ( 4 7 A R P A C M D
0033640 4 2 R E P A C K F I L E N A M
0033660 E . S T R I N G 3 8 P A C K
0033700 F I L E N A M E . S T R I N G
0033720 2 6 P A C K F I L E N A M E .
0033740 S T R I N G ) \r ( 5 4 : N O R
0033760 M A L 3 4 B O D Y 3 0 H
0034000 O S T 2 2 B O D Y 1 8 H
0034020 O S T 1 3 I N T E R L I S P
0034040 ) \r ( 9 " N L S T " ) \r \ T
0034060 C P F T P . G E T F I L E N A M
0034100 E : D 4 \r ( P 1 4 F I L E
0034120 P 1 0 * C O N D I T I O N
0034140 - H A N D L E R - B I N D I N G
0034160 S * P 9 S I : : * N L S E
0034200 T Q F L A G * P 8 * P R O
0034220 C E E D - C A S E S * P 7
0034240 S I : : N L S E T Q - V A L U E
0034260 P 6 A L L P O S S I B I L
0034300 I T I E S P 5 G E N E R A
0034320 T O R P 4 C O D E P 3
0034340 D A T A S T R E A M P 2
0034360 D A T A S T R E A M E V E N T
0034400 P 1 O S T Y P E P 0 T
0034420 C P F T P C O N I 2 D E V
0034440 I C E I 1 R E C O G I
0034460 0 N A M E F 1 5 * P R O
0034500 C E E D - C A S E S * F 1 6
0034520 * C O N D I T I O N - H A N D
0034540 L E R - B I N D I N G S * ) \0
0034560 264 017 002 \0 003 A g \0 \0 360 221 @ 020 B \t \0
0034600 \0 B \t \0 \0 021 R 006 H g \0 \0 \n \0 \0 Z
0034620 \b \0 \0 021 020 \a ` \0 \0 W 036 032 i o \0 \0
0034640 \0 W 032 021 003 \n O 020 \t \0 \0 022 g \0 \0
0034660 360 264 004 O 016 022 001 \ d l 226 360 262 a B H
0034700 J g \0 \0 \f \0 \0 [ 262 M g \0 \0 g \0 \0
0034720 H 032 032 ] 262 A H 002 002 002 002 002 @ g \0 \0
0034740 \n \0 \0 030 021 @ 016 M \t \0 \0 _ 034 265 \f O
0034760 026 022 ^ d 001 \t \0 \0 020 _ 032 277 O 030 265 \r
0035000 O 032 h 032 _ 030 _ 026 277 260 336 O 032 h 032 _
0035020 030 031 277 260 324 o \0 \0 \0 \t \0 \0 020 J 001 \t
0035040 \0 \0 H \t \0 \0 h 020 \0 ( 1 7 6 \ T
0035060 C P F T P . R E L E A S E . C O
0035100 N N E C T I O N 1 7 2 D E L
0035120 . P R O C E S S 1 6 6 E R R
0035140 O R 1 3 0 M K A T O M 1 1
0035160 7 \ G E N E R A T E N E X T F
0035200 I L E 1 0 9 F I L E N A M E
0035220 F I E L D 8 1 \ T C P F T P
0035240 . W A I T . F O R . D A T A C O
0035260 N N E C T I O N 5 4 \ T C P
0035300 F T P . G E T F I L E N A M E A
0035320 0 0 0 1 2 9 B L O C K 2 5
0035340 \ T C P F T P . S P A W N . D
0035360 A T A C O N N E C T I O N 1 5
0035400 \ T C P F T P . G E T . O S T
0035420 Y P E 1 1 \ G E T . T C P F
0035440 T P . C O N N E C T I O N ) \r (
0035460 1 0 6 D I R E C T O R Y 9 0
0035500 N I L L 8 7 \ T C P F T P
0035520 . G E N E R A T E N E X T F I L
0035540 E 7 8 I N P U T 5 8 : N
0035560 O R M A L 3 5 S I : : N L S
0035600 E T Q - P R O C E E D - C A S E
0035620 2 2 I N P U T 3 N E W )
0035640 \r ( 1 6 3 " C o u l d n ' t
0035660 o p e n d a t a c o n n e
0035700 c t i o n t o r e m o t e
0035720 T C P F T P s e r v e r . "
0035740 4 3 ( C L : E R R O R . S
0035760 I : : N L S E T Q H A N D L E R
0036000 ) ) \r \ T C P F T P . G E T F I
0036020 L E I N F O : D 4 \r ( I 2
0036040 D E V I C E I 1 A T T R I
0036060 B I 0 S T R E A M ) \0 027
0036100 \0 \0 \0 003 @ 303 \0 \0 225 @ A \n \0 \0 020 A
0036120 g \0 \0 360 264 005 g \0 \0 020 \0 ( 9 S T
0036140 R E A M P R O P ) \r ( 2 0 C R
0036160 L F 1 4 E O L 3 S T R E
0036200 A M ) \r ( ) \r \ T C P F T P . S
0036220 E T F I L E I N F O : D 4 \r (
0036240 I 3 D E V I C E I 2 V
0036260 A L U E I 1 A T T R I B
0036300 I 0 S T R E A M ) \0 \b \0 \0
0036320 \0 004 @ A B \v \0 \0 020 \0 ( 5 S T R
0036340 E A M P R O P ) \r N I L \r ( ) \r
0036360 \ T C P F T P . R E N A M E F I
0036400 L E A 0 0 0 1 A 0 0 0 2 : D 4
0036420 \r ( I 0 C O N ) \0 006 \0 \0 \0
0036440 001 @ \t \0 \0 020 \0 ( 3 \ T C P F T
0036460 P . R E L E A S E . C O N N E C
0036500 T I O N ) \r N I L \r ( ) \r \ T C
0036520 P F T P . R E N A M E F I L E A
0036540 0 0 0 1 A 0 0 0 3 : D 4 \r ( P
0036560 1 S I : : * C A T C H - R E
0036600 T U R N - F R O M * P 0 S
0036620 I : : * D U M M Y - F O R - C A
0036640 T C H * F 2 T C P F T P C
0036660 O N F 3 O L D N A M E F
0036700 4 O S T Y P E F 5 S I
0036720 : : N L S E T Q - V A L U E )
0036740 \0 ) 002 004 002 \0 i @ 021 002 001 R o \0 \0 \0
0036760 g \0 \0 h g \0 \0 S \f \0 \0 T \n \0 \0 o
0037000 \0 \0 \0 \f \0 \0 h 032 c \n g \0 \0 020 \0 (
0037020 3 1 A R P A C M D 2 4 R E
0037040 P A C K F I L E N A M E . S T R
0037060 I N G 2 0 P A C K F I L E N
0037100 A M E . S T R I N G ) \r ( 3 8
0037120 : N O R M A L 1 6 B O D Y
0037140 1 2 H O S T ) \r ( 2 8 ( 3
0037160 5 0 4 5 0 5 5 0 ) 9 " R
0037200 N F R " ) \r \ T C P F T P . R E
0037220 N A M E F I L E A 0 0 0 1 A 0 0
0037240 0 4 : D 4 \r ( P 1 S I : :
0037260 * C A T C H - R E T U R N - F R
0037300 O M * P 0 S I : : * D U M
0037320 M Y - F O R - C A T C H * F
0037340 2 T C P F T P C O N F 3
0037360 N E W N A M E F 4 O S T Y
0037400 P E F 5 S I : : N L S E T
0037420 Q - V A L U E ) \0 ) 002 004 002 \0 i
0037440 @ 021 002 001 R o \0 \0 \0 g \0 \0 h g \0 \0
0037460 S \f \0 \0 T \n \0 \0 o \0 \0 \0 \f \0 \0 h
0037500 032 c \n g \0 \0 020 \0 ( 3 1 A R P A
0037520 C M D 2 4 R E P A C K F I L
0037540 E N A M E . S T R I N G 2 0
0037560 P A C K F I L E N A M E . S T R
0037600 I N G ) \r ( 3 8 : N O R M A L
0037620 1 6 B O D Y 1 2 H O S T
0037640 ) \r ( 2 8 ( 2 5 0 5 5 3 )
0037660 9 " R N T O " ) \r \ T C P F
0037700 T P . R E N A M E F I L E A 0 0
0037720 0 1 : D 4 \r ( N A M E S I :
0037740 : * U N W I N D - P R O T E C T
0037760 * P 3 * C O N D I T I O N
0040000 - H A N D L E R - B I N D I N G
0040020 S * P 2 S I : : * N L S E
0040040 T Q F L A G * P 1 * P R O
0040060 C E E D - C A S E S * P 0
0040100 S I : : N L S E T Q - V A L U E
0040120 I 0 S I : : * C L E A N U
0040140 P - F O R M S * F 4 S I :
0040160 : * R E S E T F O R M S * F
0040200 5 * P R O C E E D - C A S E S
0040220 * F 6 * C O N D I T I O N
0040240 - H A N D L E R - B I N D I N G
0040260 S * F 7 C O D E F 8
0040300 O L D N A M E F 9 T C P F
0040320 T P C O N F 1 0 N E W N A
0040340 M E ) \0 o 004 \a \0 001 g \0 \0 W 022 h
0040360 032 032 h d 032 032 T 032 c \b 021 020 \0 ` \0 \0
0040400 U 032 i o \0 \0 \0 V 032 021 003 003 I \t \0 \0
0040420 022 g \0 \0 360 264 003 H 022 001 c 016 n 001 ^ 360
0040440 262 , 021 020 \0 ` \0 \0 U 032 i o \0 \0 \0 V
0040460 032 021 003 003 I \t \0 \0 022 g \0 \0 360 264 003 H
0040500 022 001 c 016 l 372 360 264 004 W 024 020 W 020 l 027
0040520 \n \0 \0 c 020 277 260 244 \0 ( 1 0 4 \ L
0040540 I S P E R R O R 7 7 \ T C P
0040560 F T P . R E N A M E F I L E A 0
0040600 0 0 1 A 0 0 0 4 3 7 \ T C P
0040620 F T P . R E N A M E F I L E A 0
0040640 0 0 1 A 0 0 0 3 ) \r ( 8 1 : N
0040660 O R M A L 6 1 S I : : N L S
0040700 E T Q - P R O C E E D - C A S E
0040720 4 1 : N O R M A L 2 1 S
0040740 I : : N L S E T Q - P R O C E E
0040760 D - C A S E 2 \ T C P F T P
0041000 . R E N A M E F I L E A 0 0 0 1
0041020 A 0 0 0 2 ) \r ( 6 8 ( C L :
0041040 E R R O R . S I : : N L S E
0041060 T Q H A N D L E R ) 2 8 ( C
0041100 L : E R R O R . S I : : N L
0041120 S E T Q H A N D L E R ) ) \r \ T
0041140 C P F T P . R E N A M E F I L E
0041160 : D 4 \r ( P 4 S I : : * R
0041200 E S E T F O R M S * P 3 L
0041220 I S P X H I S T P 2 C O D
0041240 E P 1 T C P F T P C O N
0041260 P 0 O S T Y P E I 2 D
0041300 E V I C E I 1 N E W N A M
0041320 E I 0 O L D N A M E F
0041340 5 L I S P X H I S T ) \0 ! 005
0041360 001 \0 003 B \t \0 \0 B \t \0 \0 021 022 002 U 021
0041400 021 004 g \0 \0 \t \0 \0 \t \0 \0 \b \0 \0 277 \t
0041420 \0 \0 020 \0 ( 3 0 C L : V A L U E
0041440 S - L I S T 2 6 S I : : R E
0041460 S E T U N W I N D 2 3 \ M V
0041500 L I S T 2 0 \ T C P F T P .
0041520 R E N A M E F I L E A 0 0 0 1
0041540 7 \ G E T . T C P F T P . C O
0041560 N N E C T I O N 3 \ T C P F
0041600 T P . G E T . O S T Y P E ) \r (
0041620 1 7 S I : : R E S E T U N W I
0041640 N D ) \r ( ) \r \ T C P F T P . C
0041660 O N N E C T : D 4 \r ( P 0
0041700 D I R E C T O R Y N A M E I
0041720 2 D I R E C T O R Y I 1
0041740 T C P F T P C O N I 0 D E
0041760 V I C E ) \0 4 001 \0 \0 003 g \0 \0 B
0042000 \n \0 \0 @ \t \0 \0 \n \0 \0 021 001 \0 H \t \0
0042020 \0 j 360 263 032 A o \0 \0 \0 H o \0 \0 \0 \f
0042040 \0 \0 d l 310 360 245 d l 372 360 264 003 i 020 \0
0042060 ( 3 7 A R P A C M D 2 0 N
0042100 C H A R S 1 3 R E P A C K F
0042120 I L E N A M E . S T R I N G 1
0042140 0 \ T C P F T P . G E T . O S
0042160 T Y P E 6 P A C K F I L E N
0042200 A M E . S T R I N G ) \r ( 2 D
0042220 I R E C T O R Y ) \r ( 3 4 (
0042240 2 0 0 2 5 0 4 5 0 5 5 0 )
0042260 2 9 " C W D " ) \r \ T C P F
0042300 T P . O P E N F I L E A 0 0 0 1
0042320 : D 4 \r ( P 1 S I : : * C
0042340 A T C H - R E T U R N - F R O M
0042360 * P 0 S I : : * D U M M Y
0042400 - F O R - C A T C H * F 2
0042420 T C P F T P C O N F 3 F T
0042440 P C M D F 4 F I L E N A M
0042460 E F 5 S I : : N L S E T Q
0042500 - V A L U E ) \0 030 002 004 002 \0 i @
0042520 021 002 001 R S T o \0 \0 \0 \f \0 \0 h 032 c
0042540 \n g \0 \0 020 \0 ( 1 4 A R P A C M
0042560 D ) \r ( 2 1 : N O R M A L ) \r
0042600 ( 1 1 ( 1 2 5 1 5 0 2 2
0042620 6 2 5 0 4 2 5 4 2 6 4 5
0042640 0 4 5 1 5 5 0 ) ) \r \ T C P
0042660 F T P . O P E N F I L E : D 4
0042700 \r ( P 1 4 * C O N D I T I O
0042720 N - H A N D L E R - B I N D I N
0042740 G S * P 1 3 S I : : * N L
0042760 S E T Q F L A G * P 1 2 *
0043000 P R O C E E D - C A S E S * P
0043020 1 1 S I : : N L S E T Q - V
0043040 A L U E P 1 0 S T R E A M
0043060 D E V P 9 F T P C M D P
0043100 8 C O D E P 7 D A T A
0043120 S T R E A M P 6 D A T A S
0043140 T R E A M E V E N T P 5 T
0043160 Y P E P 4 T C P F T P C O
0043200 N P 3 F I L E N A M E . E
0043220 X T E N S I O N P 2 F I L
0043240 E N A M E P 1 O S T Y P E
0043260 P 0 H O S T I 4 D E
0043300 V I C E I 3 P A R A M E T
0043320 E R S I 2 R E C O G I
0043340 1 A C C E S S I 0 N A M
0043360 E F 1 5 * P R O C E E D -
0043400 C A S E S * F 1 6 * C O N
0043420 D I T I O N - H A N D L E R - B
0043440 I N D I N G S * ) 001 344 017 002 \0 005
0043460 D 006 \0 \0 311 \0 021 001 \0 D \t \0 \0 021 001 001
0043500 I g \0 \0 360 233 g \0 \0 h g \0 \0 @ \f \0
0043520 \0 216 g \0 \0 h g \0 \0 @ \f \0 \0 I \n \0
0043540 \0 021 001 002 J g \0 \0 \n \0 \0 021 001 003 D \t
0043560 \0 \0 021 001 004 g \0 \0 C 026 002 001 265 030 K `
0043600 \0 \0 026 002 265 020 K \t \0 \0 ` \0 \0 026 002 265
0043620 005 ` \0 \0 021 Q \n M g \0 \0 360 231 L o \0
0043640 \0 \0 o \0 \0 \0 210 L o \0 \0 \0 o \0 \0 \0
0043660 l 310 \f \0 \0 277 L A d g \0 \0 360 223 277 g
0043700 \0 \0 i \v \0 \0 ^ \b \0 \0 A d g \0 \0 360
0043720 226 277 o \0 \0 \0 260 g \0 \0 360 225 o \0 \0
0043740 \0 260 025 A g \0 \0 360 224 o \0 \0 \0 207 o \0
0043760 \0 \0 A \n \0 \0 _ 022 277 021 020 \v ` \0 \0 W
0044000 036 032 i o \0 \0 \0 W 032 021 003 016 O 030 \t
0044020 \0 \0 022 g \0 \0 360 264 004 O 026 022 001 _ 020 l
0044040 } 360 252 O 020 d l 226 360 242 261 \0 227 277 D L
0044060 N A d g \0 \0 360 223 277 g \0 \0 \f \0 \0 _
0044100 016 265 \f o \0 \0 \0 \t \0 \0 261 \0 307 006 \0 \0
0044120 g \0 \0 024 * 277 O 016 006 \0 \0 @ 024 \b 277 O
0044140 016 006 \0 \0 ` \0 \0 223 l 002 260 025 I d g \0
0044160 \0 360 222 277 k 210 g \0 \0 360 222 l 002 200 j 317
0044200 \b Q 277 O 016 g \0 \0 M \v \0 \0 277 O 016 006
0044220 \0 \0 L 024 034 277 O 016 006 \0 \0 311 \n _ 024 006
0044240 \0 \0 g \0 \0 024 022 277 O 024 006 \0 \0 g \0 \0
0044260 024 B 277 O 016 g \0 \0 g \0 \0 \v \0 \0 O 016
0044300 020 n 001 251 360 262 . o \0 \0 \0 \t \0 \0 277 N
0044320 001 \t \0 \0 277 n 023 210 \t \0 \0 277 L A d g
0044340 \0 \0 360 223 277 g \0 \0 \n \0 \0 276 \b \0 \0 277
0044360 261 376 332 O 020 n 001 302 360 250 O 020 d n 002 &
0044400 360 233 277 N 001 \t \0 \0 277 L \t \0 \0 202 \t \0
0044420 \0 h 020 \0 ( 4 8 0 F T P H E L P
0044440 4 7 6 \ T C P F T P . R E L
0044460 E A S E . C O N N E C T I O N
0044500 4 7 1 D E L . P R O C E S S
0044520 4 4 6 B L O C K 4 4 2 \ T
0044540 C P F T P . S P A W N . D A T A
0044560 C O N N E C T I O N 4 2 6 D
0044600 I S M I S S 4 1 9 D E L . P
0044620 R O C E S S 4 1 3 P R O M P
0044640 T P R I N T 3 9 7 S T R E A
0044660 M A D D P R O P 3 4 7 S T R
0044700 E A M P R O P 2 8 1 E R R O
0044720 R 2 7 0 \ T C P F T P . W A
0044740 I T . F O R . D A T A C O N N E
0044760 C T I O N 2 2 5 \ T C P F T
0045000 P . O P E N F I L E A 0 0 0 1
0045020 1 9 7 E R R O R 1 5 3 B L
0045040 O C K 1 4 9 \ T C P F T P .
0045060 S P A W N . D A T A C O N N E C
0045100 T I O N 1 3 2 A R P A C M D
0045120 8 9 U - C A S E 6 5 \ G
0045140 E T . T C P F T P . C O N N E C
0045160 T I O N 5 8 F I L E N A M E
0045200 F I E L D 4 8 R E P A C K F
0045220 I L E N A M E . S T R I N G 4
0045240 4 P A C K F I L E N A M E . S
0045260 T R I N G 3 2 P A C K F I L
0045300 E N A M E . S T R I N G 1 2
0045320 \ T C P F T P . G E T . O S T Y
0045340 P E ) \r ( 4 3 9 A P P E N D
0045360 4 3 3 O U T P U T 3 9 4 \
0045400 T C P F T P . T R A N S F E R .
0045420 C O M P L E T E 3 9 1 A F T
0045440 E R C L O S E 3 8 3 \ T C P
0045460 F T P . G E T F I L E I N F O
0045500 3 8 0 F D E V 3 7 2 N I L
0045520 L 3 6 9 F D E V 3 6 2 S
0045540 T R E A M 3 5 3 S T R E A M
0045560 3 4 3 T Y P E 3 2 8 T O
0045600 P S - 2 0 3 2 0 U N I X 3
0045620 1 0 T C P . U S E . S T A N D
0045640 A R D . E O L 3 0 7 S T R E
0045660 A M 2 9 8 S T R E A M 2 9
0045700 0 \ T C P F T P . E N D O F S
0045720 T R E A M O P 2 8 7 S T R E
0045740 A M 2 6 7 A P P E N D 2 6
0045760 1 O U T P U T 2 2 9 : N O
0046000 R M A L 2 0 6 S I : : N L S
0046020 E T Q - P R O C E E D - C A S E
0046040 1 8 2 A P P E N D 1 7 0
0046060 O U T P U T 1 5 8 I N P U T
0046100 1 4 5 A P P E N D 1 3 9
0046120 O U T P U T 1 0 6 T E X T
0046140 9 9 T C P . D E F A U L T F I
0046160 L E T Y P E 9 2 T C P F T P
0046200 . D E F A U L T . F I L E T Y P
0046220 E S 8 1 T C P F T P . D E F
0046240 A U L T . F I L E T Y P E S 7
0046260 1 T Y P E 5 5 E X T E N S
0046300 I O N 4 0 B O D Y 3 6 H
0046320 O S T 2 8 B O D Y 2 4 H
0046340 O S T 1 9 I N T E R L I S P
0046360 3 F D E V ) \r ( 4 1 0 "
0046400 T C P F T P : P l e a s e w
0046420 a i t ; t h e r e m o t e
0046440 f t p s e r v e r i s b u
0046460 s y . " 2 7 8 " C o u l d n
0046500 ' t o p e n d a t a c o n
0046520 n e c t i o n t o r e m o t
0046540 e T C P F T P s e r v e r "
0046560 \r 2 1 4 ( C L : E R R O R
0046600 . S I : : N L S E T Q H A N D
0046620 L E R ) 1 9 3 " A C C E S S
0046640 m u s t b e o n e o f
0046660 I N P U T , O U T P U T , o
0046700 r A P P E N D " 1 8 8 " A
0046720 P P E " 1 7 6 \r " S T O R "
0046740 1 6 5 " R E T R " 1 2 7
0046760 " L 8 " 1 2 3 " T Y P E "
0047000 1 1 7 " A N " 1 1 3 "
0047020 T Y P E " ) \r \ T C P F T P . C
0047040 L O S E : D 4 \r ( P 0 D E
0047060 V I N F O I 0 D E V I C E
0047100 ) \0 , 001 \0 \0 001 @ 006 \0 \0 311 002 021 001
0047120 \0 H 002 001 g \0 \0 \n \0 \0 226 H 002 001 \t \0
0047140 \0 277 H 001 g \0 \0 \n \0 \0 264 \b H 001 \t \0
0047160 \0 h 020 \0 ( 4 0 C L O S E F 3
0047200 3 O P E N P 2 4 C L O S E
0047220 F 1 7 O P E N P ) \r ( 3 0
0047240 I N P U T 1 4 O U T P U T
0047260 3 F D E V ) \r ( ) \r \ T C P F
0047300 T P . F L U S H : D 4 \r ( P
0047320 0 I N S T R E A M I 0 D
0047340 E V I C E ) \0 035 001 \0 \0 001 @ 006 \0
0047360 \0 311 002 001 021 001 \0 H \t \0 \0 264 \r H \t \0
0047400 \0 264 \a H 277 260 367 020 \0 ( 1 9 R E
0047420 A D P 1 3 R E A D P ) \r ( 3
0047440 F D E V ) \r ( ) \r \ T C P F T
0047460 P . I N I T : D 4 \r N I L \0
0047500 244 \0 \0 \0 \0 h ` \0 \0 037 d g \0 \0 024 \0
0047520 277 d g \0 \0 024 006 277 d g \0 \0 024 \b 277 d
0047540 g \0 \0 024 P 277 d g \0 \0 024 N 277 d g \0
0047560 \0 024 L 277 d g \0 \0 024 F 277 d g \0 \0 024
0047600 @ 277 d g \0 \0 024 > 277 d g \0 \0 024 < 277
0047620 d g \0 \0 024 : 277 d g \0 \0 024 8 277 d g
0047640 \0 \0 024 6 277 d g \0 \0 024 4 277 d g \0 \0
0047660 024 2 277 d g \0 \0 024 0 277 d g \0 \0 024 (
0047700 277 d g \0 \0 024 036 277 d g \0 \0 024 034 277 d
0047720 g \0 \0 024 032 277 d g \0 \0 024 030 277 d g \0
0047740 \0 024 \n 277 \n \0 \0 020 \0 ( 1 6 1 \ D
0047760 E F I N E D E V I C E ) \r ( 1 5
0050000 5 N I L L 1 4 8 \ G E N E
0050020 R I C . R E N A M E F I L E 1
0050040 4 1 N I L L 1 3 4 N I L L
0050060 1 2 7 N I L L 1 2 0 N I
0050100 L L 1 1 3 \ G E N E R I C .
0050120 R E A D C H A R 1 0 6 \ G E
0050140 N E R I C . W R I T E C H A R
0050160 9 9 \ G E N E R I C . P E E K
0050200 C H A R 9 2 \ G E N E R I C
0050220 . U N R E A D C H A R 8 5 \
0050240 G E N E R I C . R E A D P 7 8
0050260 \ I L L E G A L . D E V I C E
0050300 O P 7 1 \ G E N E R I C . B
0050320 I N S 6 4 \ G E N E R I C .
0050340 B O U T S 5 7 N I L L 5 0
0050360 \ G E N E R I C . C H A R S E
0050400 T 4 3 \ I L L E G A L . D E
0050420 V I C E O P 3 6 \ I S . N O
0050440 T . R A N D A C C E S S P 2 9
0050460 \ I S . N O T . R A N D A C C
0050500 E S S P 2 2 \ T C P F T P .
0050520 E V E N T F N 1 5 \ T C P F
0050540 T P . H O S T N A M E P 8 T
0050560 C P F T P 3 | 004 003 F D E V T
0050600 Y P E # | ) \r ( ) \r \ T C P . B
0050620 Y E A 0 0 0 1 : D 4 \r ( P 1
0050640 S I : : * C A T C H - R E T U
0050660 R N - F R O M * P 0 S I :
0050700 : * D U M M Y - F O R - C A T C
0050720 H * F 2 T C P F T P C O N
0050740 F 3 S I : : N L S E T Q -
0050760 V A L U E ) \0 033 002 002 002 \0 i @ 021
0051000 002 001 R o \0 \0 \0 h o \0 \0 \0 \f \0 \0 h
0051020 032 c 006 g \0 \0 020 \0 ( 1 7 A R P A
0051040 C M D ) \r ( 2 4 : N O R M A L
0051060 ) \r ( 1 4 ( 2 2 1 5 0 0 )
0051100 9 " Q U I T " ) \r \ T C P .
0051120 B Y E : D 4 \r ( P 8 * C O
0051140 N D I T I O N - H A N D L E R -
0051160 B I N D I N G S * P 7 S I
0051200 : : * N L S E T Q F L A G * P
0051220 6 * P R O C E E D - C A S E
0051240 S * P 5 S I : : N L S E T
0051260 Q - V A L U E P 4 I N S T
0051300 R E A M P 3 T C P F T P C
0051320 O N P 1 C O N N E C T I O
0051340 N S P 0 D E V I C E I
0051360 0 H O S T F 9 * P R O C
0051400 E E D - C A S E S * F 1 0
0051420 * C O N D I T I O N - H A N D L
0051440 E R - B I N D I N G S * ) \0 m
0051460 \t 002 \0 001 @ h i \v \0 \0 021 021 001 H d 224
0051500 006 \0 \0 311 002 Y 021 ! 004 J 003 265 \f 023 H 006
0051520 \0 \0 h 024 002 h 020 001 [ 001 \ 277 L g \0 \0
0051540 \n \0 \0 230 L \t \0 \0 223 L 260 360 021 020 005
0051560 ` \0 \0 W 022 032 i o \0 \0 \0 W 024 032 021 003
0051600 \b N \t \0 \0 022 023 K 002 002 001 \t \0 \0 277 L
0051620 \t \0 \0 277 K 002 001 \t \0 \0 277 J 002 Z 260 254
0051640 \0 ( 1 0 1 C L O S E F ? 9 4
0051660 C L O S E F ? 8 9 C L O S
0051700 E F ? 8 0 \ T C P . B Y E A
0051720 0 0 0 1 5 1 R E A D P 4 6
0051740 O P E N P 5 \ G E T D E V
0051760 I C E F R O M N A M E ) \r ( 6 2
0052000 S I : : N L S E T Q - P R O C
0052020 E E D - C A S E 4 3 I N P U
0052040 T 2 9 F D E V 1 4 F D E
0052060 V ) \r ( 7 0 ( C L : E R R O
0052100 R . S I : : N L S E T Q H A
0052120 N D L E R ) ) \r \ T C P F T P .
0052140 M A Y B E . A B O R T : D 4 \r
0052160 ( P 1 T C P O U T S T R E A
0052200 M P 0 T C P F T P C O N
0052220 I 0 D A T A S T R E A M )
0052240 \0 Q 002 \0 \0 001 @ 006 \0 \0 311 034 021 021 001 H
0052260 002 001 271 @ g \0 \0 h \v \0 \0 @ 006 \0 \0 311
0052300 032 263 3 @ g \0 \0 \n \0 \0 264 + @ \t \0 \0
0052320 \t \0 \0 \b \0 \0 I l 364 \n \0 \0 I l 362 \n
0052340 \0 \0 I \t \0 \0 H o \0 \0 \0 h o \0 \0 \0
0052360 \f \0 \0 020 h 020 \0 ( 7 6 A R P A C
0052400 M D 6 3 T C P . U R G E N T
0052420 . M A R K 5 9 B O U T 5 3
0052440 B O U T 4 7 B L O C K 4
0052460 4 T C P . C L O S E . S E N D
0052500 E R 4 1 T C P . O T H E R .
0052520 S T R E A M 3 5 O P E N P
0052540 2 0 S T R E A M P R O P ) \r (
0052560 3 2 I N P U T 2 4 S T R E
0052600 A M 1 6 B E F O R E C L O S
0052620 E 3 S T R E A M ) \r ( 7 3
0052640 ( 2 2 6 4 2 6 2 5 0 ) 6
0052660 8 " A B O R " ) \r \ T C P F T
0052700 P . D A T A . C L O S E D : D
0052720 4 \r ( P 0 S T R E A M I
0052740 1 O U T S T R E A M I 0
0052760 I N S T R E A M ) \0 016 001 \0 \0 002
0053000 @ 265 003 A 021 001 \0 H h \n \0 \0 020 \0 ( 1
0053020 1 \ S E T A C C E S S ) \r N I
0053040 L \r ( ) \r \ T C P F T P . O P E
0053060 N . D A T A . C O N N E C T I O
0053100 N A 0 0 0 1 : D 4 \r ( N A M E
0053120 S I : : * U N W I N D - P R O
0053140 T E C T * P 3 S T R E A M
0053160 P 2 P O R T P 1 I
0053200 I 0 S I : : * C L E A N U P
0053220 - F O R M S * F 4 T C P F
0053240 T P C O N F 5 E V E N T
0053260 F 6 A C C E S S F 7 F
0053300 O R . F I L E . T R A N S F E R
0053320 ) \0 a 004 004 \0 001 ` \0 \0 h g \0 \0 \v
0053340 \0 \0 l 005 k 021 " 003 I H 363 263 8 \b \0 \0
0053360 272 T o \0 \0 \0 J \t \0 \0 o \0 \0 \0 \f \0
0053400 \0 277 h d J g \0 \0 V h W 016 264 006 o \0
0053420 \0 \0 \r \a \0 \0 [ 224 T 002 002 K 211 I k 324
0053440 Y 260 310 T 002 002 h 030 023 U 303 \0 \0 224 U \t
0053460 \0 \0 277 T 002 002 001 020 \0 ( 8 9 N O T
0053500 I F Y . E V E N T 6 1 T C P
0053520 . O P E N 4 0 A R P A C M D
0053540 3 3 \ T C P F T P . P O R T
0053560 . S T R I N G 2 3 \ T C P .
0053600 S E L E C T . P O R T 9 O B
0053620 T A I N . M O N I T O R L O C K
0053640 ) \r ( 8 4 E V E N T 4 7 P
0053660 A S S I V E 6 W I T H . M O
0053700 N I T O R 2 \ T C P F T P .
0053720 D A T A C O N N E C T I O N . L
0053740 O C K ) \r ( 5 7 ( M A X S E
0053760 G 5 1 2 W H E N C L O S E D
0054000 F N \ T C P F T P . D A T A .
0054020 C L O S E D ) 3 7 ( 2 0 0 )
0054040 2 9 " P O R T " ) \r \ T C P
0054060 F T P . O P E N . D A T A . C O
0054100 N N E C T I O N : D 4 \r ( P
0054120 1 S I : : * R E S E T F O R M
0054140 S * P 0 S I : : * L O C K
0054160 E D - M O N I T O R * I 3
0054200 F O R . F I L E . T R A N S F E
0054220 R I 2 E V E N T I 1
0054240 A C C E S S I 0 T C P F T
0054260 P C O N ) \0 025 002 \0 \0 004 021 001 g
0054300 \0 \0 \t \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020
0054320 \0 ( 1 8 C L : V A L U E S - L
0054340 I S T 1 4 S I : : M O N I T
0054360 O R - U N W I N D 1 1 \ M V
0054400 L I S T 8 \ T C P F T P . O
0054420 P E N . D A T A . C O N N E C T
0054440 I O N A 0 0 0 1 ) \r ( 5 S I :
0054460 : M O N I T O R - U N W I N D )
0054500 \r ( ) \r \ T C P F T P . P O R T
0054520 . S T R I N G : D 4 \r ( P 0
0054540 I P A D D R E S S I 0 P
0054560 O R T ) \0 L 001 \0 \0 001 \b \0 \0 021 001
0054600 \0 H l 030 \n \0 \0 l 377 345 o \0 \0 \0 H l
0054620 020 \n \0 \0 l 377 345 o \0 \0 \0 H l \b \n \0
0054640 \0 l 377 345 o \0 \0 \0 H l 377 345 o \0 \0 \0
0054660 @ l \b \n \0 \0 l 377 345 o \0 \0 \0 @ l 377
0054700 345 \r \v \0 \0 020 \0 ( 7 3 C O N C A
0054720 T 5 8 R S H 3 7 R S H
0054740 2 4 R S H 1 1 R S H 2
0054760 \ L O C A L . I P . A D D R E S
0055000 S ) \r N I L \r ( 6 5 " , "
0055020 5 2 " , " 4 4 " , " 3 1
0055040 " , " 1 8 " , " ) \r \ T C
0055060 P F T P . S P A W N . D A T A C
0055100 O N N E C T I O N A 0 0 0 1 :
0055120 D 4 \r ( I 2 O U T S T R E A
0055140 M I 1 I N S T R E A M I
0055160 0 P R O C E S S ) \0 \a \0 \0
0055200 \0 003 @ \t \0 \0 h 020 \0 ( 3 D E L .
0055220 P R O C E S S ) \r N I L \r ( ) \r
0055240 \ T C P F T P . S P A W N . D A
0055260 T A C O N N E C T I O N : D 4
0055300 \r ( P 0 E V E N T I 2
0055320 F O R . F I L E . T R A N S F E
0055340 R I 1 A C C E S S I 0
0055360 T C P F T P C O N F 2 S
0055400 I : : * R E S E T F O R M S * )
0055420 \0 > 002 001 \0 003 \b \0 \0 021 021 001 g \0 \0
0055440 g \0 \0 @ h 032 032 g \0 \0 A h 032 032 H B
0055460 h 032 032 032 032 032 \t \0 \0 271 g \0 \0 I @ 001
0055500 @ 002 001 h 032 032 032 032 h d 032 032 R 032 c 004
0055520 I H 032 020 \0 ( 3 3 A D D . P R O
0055540 C E S S 2 C R E A T E . E V
0055560 E N T ) \r ( 3 7 \ T C P F T P
0055600 . S P A W N . D A T A C O N N E
0055620 C T I O N A 0 0 0 1 1 8 Q U
0055640 O T E 1 1 Q U O T E 8 \
0055660 T C P F T P . O P E N . D A T A
0055700 . C O N N E C T I O N ) \r ( ) \r
0055720 \ T C P F T P . T R A N S F E R
0055740 . C O M P L E T E : D 4 \r ( P
0055760 0 T C P F T P C O N I 0
0056000 D A T A S T R E A M ) \0 S 001
0056020 \0 \0 001 @ 006 \0 \0 311 034 021 001 \0 @ g \0 \0
0056040 h \v \0 \0 H 264 ? @ 006 \0 \0 311 032 263 6 @
0056060 g \0 \0 \n \0 \0 227 @ \t \0 \0 \t \0 \0 277 H
0056100 h d o \0 \0 \0 \f \0 \0 @ 006 \0 \0 i 024 032
0056120 @ 006 \0 \0 h 024 030 @ 006 \0 \0 h 024 034 H \t
0056140 \0 \0 020 h 020 \0 ( 7 8 \ T C P F T
0056160 P . R E L E A S E . C O N N E C
0056200 T I O N 5 3 A R P A C M D
0056220 4 2 T C P . C L O S E . S E N
0056240 D E R 3 9 T C P . O T H E R
0056260 . S T R E A M 3 4 O P E N P
0056300 1 6 S T R E A M P R O P ) \r
0056320 ( 7 1 S T R E A M 6 4 S T
0056340 R E A M 5 7 S T R E A M 3
0056360 1 I N P U T 2 3 S T R E A
0056400 M 1 2 A F T E R C L O S E
0056420 3 S T R E A M ) \r ( 5 0 (
0056440 2 2 6 4 2 6 2 5 0 ) ) \r \ T
0056460 C P F T P . W A I T . F O R . D
0056500 A T A C O N N E C T I O N : D
0056520 4 \r ( P 0 S T R E A M I
0056540 3 A C C E S S I 2 P R O
0056560 C E S S . A N D . E V E N T I
0056600 1 T C P F T P C O N I 0
0056620 D E V I C E ) \0 # 001 \0 \0 004 021
0056640 020 \0 B 002 o \0 \0 \0 \n \0 \0 A 002 002 001 X
0056660 d 235 C \n \0 \0 264 \n H 006 \0 \0 @ 024 030 H
0056700 020 \0 ( 2 2 O P E N P 1 1 A
0056720 W A I T . E V E N T ) \r ( 2 8
0056740 S T R E A M ) \r ( 8 1 2 0 0
0056760 0 0 ) \r \ T C P F T P . D E L E
0057000 T E . C O N N E C T I O N A 0 0
0057020 0 1 : D 4 \r ( P 1 S I : :
0057040 * C A T C H - R E T U R N - F R
0057060 O M * P 0 S I : : * D U M
0057100 M Y - F O R - C A T C H * F
0057120 2 T C P F T P C O N F 3
0057140 S I : : N L S E T Q - V A L U E
0057160 ) \0 033 002 002 002 \0 i @ 021 002 001 R o \0
0057200 \0 \0 h o \0 \0 \0 \f \0 \0 h 032 c 006 g \0
0057220 \0 020 \0 ( 1 7 A R P A C M D ) \r
0057240 ( 2 4 : N O R M A L ) \r ( 1
0057260 4 ( 2 2 1 5 0 0 ) 9 " B
0057300 Y E " ) \r \ T C P F T P . D E L
0057320 E T E . C O N N E C T I O N :
0057340 D 4 \r ( P 5 * C O N D I T I
0057360 O N - H A N D L E R - B I N D I
0057400 N G S * P 4 S I : : * N L
0057420 S E T Q F L A G * P 3 * P
0057440 R O C E E D - C A S E S * P
0057460 2 S I : : N L S E T Q - V A L
0057500 U E P 0 I N S T R E A M
0057520 I 2 S E N D B Y E I 1
0057540 D E V I C E I 0 T C P F T
0057560 P C O N F 6 * P R O C E E
0057600 D - C A S E S * F 7 * C O
0057620 N D I T I O N - H A N D L E R -
0057640 B I N D I N G S * ) \0 H 006 002 \0
0057660 003 @ 001 021 021 001 B 262 033 021 020 002 ` \0 \0 V
0057700 032 i o \0 \0 \0 W 016 032 021 003 005 K \t \0 \0
0057720 022 023 H 265 025 A 006 \0 \0 @ A 006 \0 \0 311 002
0057740 \n \0 \0 Y 024 002 I 020 006 \0 \0 311 024 006 \0 \0
0057760 311 R \t \0 \0 277 260 337 \0 ( 6 7 D E L
0060000 . P R O C E S S 4 9 D R E M
0060020 O V E 3 0 \ T C P F T P . D
0060040 E L E T E . C O N N E C T I O N
0060060 A 0 0 0 1 ) \r ( 6 2 T C P . C
0060100 O N T R O L . B L O C K 5 7
0060120 S T R E A M 4 4 F D E V 3
0060140 9 F D E V 1 3 S I : : N L
0060160 S E T Q - P R O C E E D - C A S
0060200 E ) \r ( 2 0 ( C L : E R R O
0060220 R . S I : : N L S E T Q H A
0060240 N D L E R ) ) \r ( P R E T T Y C
0060260 O M P R I N T T C P F T P C O
0060300 M S ) \r ( R P A Q Q T C P F T
0060320 P C O M S ( ( C O M S ( *
0060340 ; ; " F N S f r o m L a r
0060360 r y ' s I n t e r l i s p - 1
0060400 0 L I S P U S E R S p a c k
0060420 a g e " ) ( F N S A R P A C
0060440 M D F T P H E L P \r C M D R
0060460 E A D C O D E C M D R E A D
0060500 D I S C A R D L I N E G E T L
0060520 I N E \ T C P F T P . I N P U
0060540 T T E L N E T . E O L ) ( I
0060560 N I T V A R S ( \ T C P F T P
0060600 . A R P A C M D . L O C K ( \r
0060620 C R E A T E . M O N I T O R L O
0060640 C K " A R P A C M D L o c k
0060660 " ) ) ) ( G L O B A L V A R S
0060700 \ T C P F T P . A R P A C M D
0060720 . L O C K ) ( D E C L A R E %
0060740 : D O N T E V A L @ L O A D
0060760 \r D O E V A L @ C O M P I L E
0061000 D O N T C O P Y C O M P I L E
0061020 R V A R S ( A D D V A R S (
0061040 N L A M A ) ( N L A M L ) (
0061060 L A M A F T P H E L P ) ) ) )
0061100 ( C O M S ( * ; ; \r " F
0061120 N S f o r t h e I n t e r
0061140 l i s p - D s t r e a m s f
0061160 a c i l i t y " ) ( F N S \
0061200 T C P F T P . C O N T R O L . C
0061220 L O S E D \ T C P F T P . G E
0061240 T . O S T Y P E \r \ T C P F T
0061260 P . E V E N T F N \ T C P F T
0061300 P . H O S T N A M E P \ G E T
0061320 . T C P F T P . C O N N E C T I
0061340 O N \ T C P F T P . O P E N .
0061360 C O N N E C T I O N \r \ T C P
0061400 F T P . A S S U R E . C L E A N
0061420 U P \ T C P F T P . C L E A N
0061440 U P \ T C P F T P . R E L E A
0061460 S E . C O N N E C T I O N \ T
0061500 C P F T P . L O G I N \ T C P
0061520 F T P . D E L E T E F I L E \r
0061540 \ T C P F T P . D I R E C T O R
0061560 Y N A M E P \ T C P F T P . E
0061600 N D O F S T R E A M O P \ T C
0061620 P F T P . G E N E R A T E F I L
0061640 E S \ T C P F T P . G E N E R
0061660 A T E N E X T F I L E \r \ T C
0061700 P F T P . G E T F I L E N A M E
0061720 \ T C P F T P . G E T F I L E
0061740 I N F O \ T C P F T P . S E T
0061760 F I L E I N F O \ T C P F T P
0062000 . R E N A M E F I L E \ T C P
0062020 F T P . C O N N E C T \r \ T C
0062040 P F T P . O P E N F I L E \ T
0062060 C P F T P . C L O S E \ T C P
0062100 F T P . F L U S H \ T C P F T
0062120 P . I N I T ) ( D E C L A R E
0062140 % : E V A L @ C O M P I L E
0062160 D O N T C O P Y ( E X P O R T
0062200 ( \r R E C O R D S T C P D A
0062220 T A S T R E A M T C P F T P C
0062240 O N ) ) ) ( A D D V A R S (
0062260 T C P F T P . D E F A U L T . F
0062300 I L E T Y P E S ( N I L .
0062320 T E X T ) ( D C O M . B I
0062340 N A R Y ) ( \r d c o m . B
0062360 I N A R Y ) ( L I S P . T
0062400 E X T ) ( l i s p . T E X
0062420 T ) ( L S P . T E X T )
0062440 ( l s p . T E X T ) ( R S
0062460 T . B I N A R Y ) ( r s t
0062500 . B I N A R Y ) ( \r B I N
0062520 . B I N A R Y ) ( b i n
0062540 . B I N A R Y ) ) ) ( I N I
0062560 T V A R S ( T C P . D E F A U
0062600 L T F I L E T Y P E ( Q U O T
0062620 E B I N A R Y ) ) ( T C P .
0062640 U S E . S T A N D A R D . E O L
0062660 T ) \r ( \ T C P F T P . D E
0062700 V I C E S ) ( \ T C P F T P .
0062720 C L E A N U P . P R O C E S S )
0062740 ) ( G L O B A L V A R S \ T
0062760 C P F T P . D E V I C E S \ T
0063000 C P F T P . C L E A N U P . P R
0063020 O C E S S \r T C P . D E F A U
0063040 L T F I L E T Y P E T C P . U
0063060 S E . S T A N D A R D . E O L )
0063100 ) ( C O M S ( * ; ; " D
0063120 a t a c o n n e c t i o n h
0063140 a n d l i n g " ) ( F N S \
0063160 T C P . B Y E \r \ T C P F T P
0063200 . M A Y B E . A B O R T \ T C
0063220 P F T P . D A T A . C L O S E D
0063240 \ T C P F T P . O P E N . D A
0063260 T A . C O N N E C T I O N \ T
0063300 C P F T P . P O R T . S T R I N
0063320 G \r \ T C P F T P . S P A W N
0063340 . D A T A C O N N E C T I O N
0063360 \ T C P F T P . T R A N S F E R
0063400 . C O M P L E T E \ T C P F T
0063420 P . W A I T . F O R . D A T A C
0063440 O N N E C T I O N \r \ T C P F
0063460 T P . D E L E T E . C O N N E C
0063500 T I O N ) ( I N I T V A R S
0063520 ( \ T C P F T P . D A T A C O N
0063540 N E C T I O N . L O C K ( C R
0063560 E A T E . M O N I T O R L O C K
0063600 \r " T C P F T P D a t a C
0063620 o n n e c t i o n L o c k " )
0063640 ) ( \ T C P F T P . C O N N E
0063660 C T I O N . L O C K ( C R E A
0063700 T E . M O N I T O R L O C K "
0063720 T C P F T P C o n n e c t i o
0063740 n L o c k " ) \r ) ( \ T C P
0063760 F T P . I D L E . T I M E O U T
0064000 ( T I M E S 1 0 6 0 1 0
0064020 0 0 ) ) ) ( G L O B A L V A R
0064040 S \ T C P F T P . D A T A C O
0064060 N N E C T I O N . L O C K \r \
0064100 T C P F T P . C O N N E C T I O
0064120 N . L O C K \ T C P F T P . I
0064140 D L E . T I M E O U T ) ) ( F
0064160 I L E S ( S Y S L O A D ) T
0064200 C P N A M E S T C P ) ( P
0064220 ( \ T C P F T P . I N I T ) )
0064240 ( \r D E C L A R E % : D O N T
0064260 E V A L @ L O A D D O E V A L
0064300 @ C O M P I L E D O N T C O P
0064320 Y C O M P I L E R V A R S (
0064340 A D D V A R S ( N L A M A )
0064360 ( N L A M L ) ( L A M A ) ) )
0064400 ) ) \r ( R P A Q ? \ T C P F T
0064420 P . A R P A C M D . L O C K (
0064440 C R E A T E . M O N I T O R L O
0064460 C K " A R P A C M D L o c k
0064500 " ) ) \r ( A D D T O V A R T C
0064520 P F T P . D E F A U L T . F I L
0064540 E T Y P E S ( N I L . T E
0064560 X T ) ( D C O M . B I N A
0064600 R Y ) ( d c o m . B I N A
0064620 R Y ) ( L I S P . T E X T
0064640 ) ( l i s p . \r T E X T )
0064660 ( L S P . T E X T ) ( l
0064700 s p . T E X T ) ( R S T
0064720 . B I N A R Y ) ( r s t .
0064740 B I N A R Y ) ( B I N .
0064760 B I N A R Y ) ( b i n . B
0065000 I N A R Y ) ) \r ( R P A Q ? T
0065020 C P . D E F A U L T F I L E T Y
0065040 P E ( Q U O T E B I N A R Y
0065060 ) ) \r ( R P A Q ? T C P . U S
0065100 E . S T A N D A R D . E O L T
0065120 ) \r ( R P A Q ? \ T C P F T P
0065140 . D E V I C E S ) \r ( R P A Q ?
0065160 \ T C P F T P . C L E A N U P
0065200 . P R O C E S S ) \r ( R P A Q ?
0065220 \ T C P F T P . D A T A C O N
0065240 N E C T I O N . L O C K ( C R
0065260 E A T E . M O N I T O R L O C K
0065300 " T C P F T P D a t a C o
0065320 n n e c t i o n L o c k " ) )
0065340 \r ( R P A Q ? \ T C P F T P .
0065360 C O N N E C T I O N . L O C K
0065400 ( C R E A T E . M O N I T O R L
0065420 O C K " T C P F T P C o n n
0065440 e c t i o n L o c k " ) ) \r (
0065460 R P A Q ? \ T C P F T P . I D
0065500 L E . T I M E O U T ( T I M E
0065520 S 1 0 6 0 1 0 0 0 ) ) \r (
0065540 F I L E S L O A D ( S Y S L O
0065560 A D ) T C P N A M E S T C P
0065600 ) \r ( \ T C P F T P . I N I T )
0065620 \r ( P U T P R O P S T C P F T
0065640 P C O P Y R I G H T ( " X e
0065660 r o x C o r p o r a t i o n "
0065700 1 9 8 5 1 9 8 6 1 9 0 0
0065720 1 9 8 7 ) ) \r N I L \r
0065733