$ od -c -N 50000 [eris]<LispCore>LIBRARY>FTPSERVER.DCOM!2
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 R E A D T A B L E " I N
0000040 T E R L I S P " 247 P A C K A G
0000060 E " I N T E R L I S P " ) \r (
0000100 F I L E C R E A T E D " 1 4 -
0000120 O c t - 8 6 1 7 : 0 0 : 3 3 "
0000140 ( " c o m p i l e d o n "
0000160 { E R I S } < L I S P C O R E
0000200 > L I B R A R Y > F T P S E R V
0000220 E R . ; 2 ) \r " 1 2 - O c t -
0000240 8 6 2 3 : 0 4 : 1 5 " t c o
0000260 m p l ' d i n " X e r o x
0000300 L i s p 1 2 - O c t - 8 6 .
0000320 . . " d a t e d " 1 2 - O c
0000340 t - 8 6 2 3 : 4 1 : 0 2 " ) \r
0000360 ( F I L E C R E A T E D " 1 4
0000400 - O c t - 8 6 1 6 : 5 8 : 5 7
0000420 " { E R I S } < L I S P C O R
0000440 E > L I B R A R Y > F T P S E R
0000460 V E R . ; 2 2 4 7 6 0 c h a
0000500 n g e s t o % : ( F N S \r
0000520 \ S F T P . O P E N F I L E . F
0000540 R O M . P L I S T \ S F T P .
0000560 E N U M E R A T E ) ( V A R S
0000600 F T P S E R V E R C O M S )
0000620 p r e v i o u s d a t e % :
0000640 " 1 6 - N o v - 8 4 1 6 : 1 2
0000660 : 1 6 " \r { E R I S } < L I S
0000700 P C O R E > L I B R A R Y > F T
0000720 P S E R V E R . ; 1 ) \r \ F T P
0000740 S E R V E R . T O P A 0 0 0 1
0000760 D 1 \r ( I 0 S O C ) \0 \t \0
0001000 \0 \0 001 @ d 223 j \n \0 \0 020 \0 ( 6 C
0001020 L O S E R T P S O C K E T ) \r N
0001040 I L \r ( ) \r \ F T P S E R V E R
0001060 . T O P A 0 0 0 2 A 0 0 0 3 D
0001100 1 \r ( N A M E E R R O R S E T
0001120 F 0 F T P D E B U G L O G
0001140 F 1 R E S E T V A R S L S
0001160 T F 2 S O C K E T F 3
0001200 I N S T R E A M F 4 S A
0001220 V E R F 5 R E S E T Y )
0001240 \0 f \0 006 002 \0 g \0 \0 S j h 032 032 032 h
0001260 h 032 032 Q 032 c 002 277 T 002 h 030 277 P 265 017
0001300 S d \t \0 \0 P \v \0 \0 c \n i 020 \t \0 \0
0001320 277 o \0 \0 \0 P \n \0 \0 277 R 006 \0 \0 310 \0
0001340 R 310 001 R 310 002 365 \n \0 \0 P \n \0 \0 277 P
0001360 \t \0 \0 277 g \0 \0 d \t \0 \0 032 g \0 \0 i
0001400 \n \0 \0 277 Q 032 c 002 277 260 267 \0 ( 9 2
0001420 S E T T O P V A L 8 4 G E T
0001440 T O P V A L 7 6 T E R P R I
0001460 7 1 P R I N 1 6 7 P O R
0001500 T S T R I N G 5 0 P R I N 1
0001520 4 1 T E R P R I 3 4 \ S
0001540 F T P . C O M M A N D L O O P
0001560 3 0 B S P O U T P U T S T R E
0001600 A M ) \r ( 8 8 F T P D E B U G
0001620 F L G 8 0 F T P D E B U G F
0001640 L G 5 5 B S P S O C 2 C
0001660 L O S E B S P S T R E A M ) \r (
0001700 4 6 " C o n n e c t i o n
0001720 o p e n w i t h " ) \r \ F T
0001740 P S E R V E R . T O P A 0 0 0 2
0001760 D 1 \r ( N A M E E R R O R S
0002000 E T P 2 R E S E T Z P
0002020 1 R E S E T Y P 0 L I S
0002040 P X H I S T F 3 L I S P X
0002060 H I S T F 4 R E S E T V A
0002100 R S L S T ) \0 " 003 002 002 \0 S 021 !
0002120 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g
0002140 \0 \0 Z \n \0 \0 277 J 222 \b \0 \0 i 020 \0 (
0002160 3 0 E R R O R ! 2 4 R E S
0002200 E T R E S T O R E 1 4 \ F T
0002220 P S E R V E R . T O P A 0 0 0 2
0002240 A 0 0 0 3 ) \r ( 2 0 E R R O R
0002260 1 1 I N T E R N A L ) \r (
0002300 8 ( \ F T P S E R V E R . T O
0002320 P A 0 0 0 2 A 0 0 0 3 ) ) \r \ F
0002340 T P S E R V E R . T O P D 1 \r
0002360 ( P 4 S A V E R P 3 E
0002400 V E N T P 2 I N S T R E A
0002420 M P 1 S O C K E T P 0
0002440 P U P S O C I 0 F T P D
0002460 E B U G L O G F 5 R E S E
0002500 T V A R S L S T ) \0 315 005 001 \0 001
0002520 021 P 004 @ 265 e g \0 \0 h h 032 032 \ h h
0002540 032 032 U 032 c \n 277 h o \0 \0 \0 l 003 i \n
0002560 \0 \0 \v \0 \0 271 L 002 I 030 277 I 006 \0 \0 311
0002600 \b [ 277 I 006 \0 \0 312 006 \a l 003 360 242 261 \0
0002620 207 I h g \0 \0 ` \0 \0 d n 377 377 361 223 277
0002640 n 377 377 g \0 \0 g \0 \0 \r 006 \0 \0 Z 264 272
0002660 o \0 \0 \0 \t \0 \0 260 257 d i 360 245 277 @ d
0002700 003 262 - 003 o \0 \0 \0 \n \0 \0 g \0 \0 \n \0
0002720 \0 b \0 g \0 \0 g \0 \0 \v \0 \0 277 g \0 \0
0002740 @ \n \0 \0 277 o \0 \0 \0 @ \n \0 \0 207 g \0
0002760 \0 \n \0 \0 b \0 277 o \0 \0 \0 @ \n \0 \0 277
0003000 \b \0 \0 @ \n \0 \0 277 @ \t \0 \0 277 @ \t \0
0003020 \0 277 261 377 D K \t \0 \0 261 377 i \0 ( 2 0
0003040 0 A W A I T . E V E N T 1 9
0003060 2 T E R P R I 1 8 7 T E R
0003100 P R I 1 8 2 P R I N 1 1 7
0003120 8 D A T E 1 7 4 P R I N 1
0003140 1 6 3 G E T S T R E A M 1
0003160 5 6 D S P F O N T 1 4 7 D
0003200 S P S C R O L L 1 3 9 P U T
0003220 W I N D O W P R O P 1 2 8 G
0003240 E T S T R E A M 1 2 2 C R E
0003260 A T E W 1 0 2 \ F T P S E R
0003300 V E R . T O P A 0 0 0 2 9 2
0003320 C R E A T E B S P S T R E A M
0003340 3 6 O P E N R T P S O C K E T
0003360 3 3 O P E N P U P S O C K E
0003400 T ) \r ( 1 6 0 O U T P U T 1
0003420 4 3 O N 1 3 6 N I L L 1
0003440 3 3 P A G E F U L L F N 1 2
0003460 5 O U T P U T 8 8 \ S F T
0003500 P . W H E N C L O S E D 8 5
0003520 \ S F T P . T I M E O U T F N
0003540 7 2 \ F T P . I D L E . T I M
0003560 E O U T 6 9 \ S F T P . E R
0003600 R O R H A N D L E R 5 4 B S
0003620 P S O C 4 6 B S P S O C 8
0003640 \ F T P S E R V E R . T O P A
0003660 0 0 0 1 ) \r ( 1 7 0 " F T P
0003700 S e r v e r s t a r t e d
0003720 a t " 1 5 2 ( G A C H A
0003740 8 ) 1 1 9 " F T P S e r v
0003760 e r t r a f f i c " 9 9 (
0004000 \ F T P S E R V E R . T O P A 0
0004020 0 0 2 ) 2 7 ( S E R V E R
0004040 R E T U R N ) ) \r F T P S E R V
0004060 E R D 1 \r ( I 0 F T P D E
0004100 B U G L O G ) \0 0 \0 \0 \0 001 g \0
0004120 \0 @ d 262 026 d i 360 257 3 020 221 h 200 i 227
0004140 g \0 \0 @ h 032 032 200 @ h 032 032 g \0 \0 g
0004160 \0 \0 g \0 \0 g \0 \0 \r 005 \0 \0 020 \0 ( 4
0004200 5 A D D . P R O C E S S ) \r (
0004220 4 1 H A R D R E S E T 3 8
0004240 R E S T A R T A B L E 3 5 F
0004260 T P S E R V E R 3 2 N A M E
0004300 2 0 Q U O T E 2 \ F T P
0004320 S E R V E R . T O P ) \r ( ) \r \
0004340 G E T F I L E T Y P E A 0 0 0 1
0004360 D 1 \r ( N A M E E R R O R S
0004400 E T P 0 S T R E A M F
0004420 1 F I L E F 2 R E S E T
0004440 V A R S L S T F 3 F I L E
0004460 O P E N P F 4 R E S E T Y
0004500 ) \0 0 001 004 002 \0 021 020 \0 S 231 Q g \0
0004520 \0 \n \0 \0 X 260 032 g \0 \0 Q g \0 \0 \n \0
0004540 \0 X h 032 032 h h 032 032 R 032 c 004 277 H \t
0004560 \0 \0 022 c \b i 020 \0 ( 4 1 \ I N F
0004600 E R . F I L E . T Y P E 2 4
0004620 O P E N S T R E A M 1 1 G E
0004640 T S T R E A M ) \r ( 2 1 I N P
0004660 U T 1 7 C L O S E F 8 I
0004700 N P U T ) \r ( ) \r \ G E T F I L
0004720 E T Y P E D 1 \r ( P 2 R E
0004740 S E T Z P 1 R E S E T Y
0004760 P 0 L I S P X H I S T I
0005000 1 F I L E O P E N P I 0
0005020 F I L E F 3 L I S P X H I
0005040 S T F 4 R E S E T V A R S
0005060 L S T ) \0 " 003 002 \0 002 S 021 ! 002 T
0005100 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0
0005120 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 2 9
0005140 E R R O R ! 2 4 R E S E T
0005160 R E S T O R E 1 4 \ G E T F
0005200 I L E T Y P E A 0 0 0 1 ) \r ( 2
0005220 0 E R R O R 1 1 I N T E R
0005240 N A L ) \r ( 8 ( \ G E T F I
0005260 L E T Y P E A 0 0 0 1 ) ) \r \ S
0005300 F T P . C O M M A N D L O O P
0005320 D 1 \r ( P 0 M A R K I 2
0005340 F T P D E B U G L O G I 1
0005360 O U T S I 0 I N S ) \0
0005400 307 001 \0 \0 003 021 020 \0 @ \t \0 \0 X d l \b
0005420 360 230 277 @ A \n \0 \0 261 \0 251 k 360 227 @ A
0005440 \n \0 \0 261 \0 236 H d l \t 360 230 277 @ A \n
0005460 \0 \0 261 \0 217 l 002 360 230 @ A i \v \0 \0 261
0005500 \0 202 H d l \f 360 230 277 @ A i \v \0 \0 260
0005520 r l \n 360 226 @ A \n \0 \0 260 g H d l 006
0005540 360 263 ^ d l \a 360 236 277 @ B \n \0 \0 263 T
0005560 @ A \n \0 \0 260 L l 003 360 263 023 H l 004 360
0005600 253 H l \v 360 246 H d l 005 360 227 277 @ A \n
0005620 \0 \0 260 / j 360 222 h 260 ) A l 004 \n \0 \0
0005640 277 A k \n \0 \0 277 o \0 \0 \0 A \n \0 \0 277
0005660 H \t \0 \0 A \n \0 \0 277 A l 006 \n \0 \0 277
0005700 i 221 h 200 i 242 261 377 B h 020 \0 ( 1 8 5
0005720 F T P P U T M A R K 1 7 8
0005740 P R I N 3 1 7 4 M K S T R I
0005760 N G 1 6 9 P R I N 3 1 6 0
0006000 F T P P U T C O D E 1 5 4
0006020 F T P P U T M A R K 1 4 0 \
0006040 S F T P . P R O T O C O L . E R
0006060 R O R 1 1 1 \ S F T P . P R
0006100 O T O C O L . E R R O R 1 0 4
0006120 \ F T P . F L U S H . T O . E
0006140 O C 8 4 \ S F T P . E N U M
0006160 E R A T E 7 3 \ S F T P . E
0006200 N U M E R A T E 5 7 \ S F T
0006220 P . S T O R E 4 4 \ S F T P
0006240 . S T O R E 2 9 \ S F T P .
0006260 R E T R I E V E 1 8 \ S F T
0006300 P . V E R S I O N 6 F T P G
0006320 E T M A R K ) \r N I L \r ( 1 6
0006340 5 " U n i m p l e m e n t e d
0006360 c o m m a n d " ) \r \ S F T
0006400 P . R E T R I E V E A 0 0 0 1
0006420 D 1 \r ( N A M E E R R O R S E
0006440 T P 1 F I L E P 0 P
0006460 L I S T F 6 O U T S F
0006500 7 I N S F 8 R E S E T V
0006520 A R S L S T F 9 F T P D E
0006540 B U G L O G F 1 0 R E S E
0006560 T Y ) \0 324 006 005 002 \0 021 001 W 016 V
0006600 \n \0 \0 d 242 261 \0 273 270 W 016 \t \0 \0 l 006
0006620 360 250 W 016 V \n \0 \0 261 \0 250 H g \0 \0 V
0006640 \v \0 \0 265 005 261 \0 232 271 g \0 \0 I h 032 032
0006660 h h 032 032 W 020 032 c 020 277 I h H 021 1 005
0006700 J 003 265 " K 022 i \f \0 \0 V \n \0 \0 277 W
0006720 016 \t \0 \0 d l 004 360 262 * 277 W 016 W 022 \n
0006740 \0 \0 260 U 001 d 001 g \0 \0 360 232 002 001 275 L
0006760 265 \r M h 032 \ [ 277 J 002 Z 260 306 M & \
0007000 260 367 l 003 360 262 @ W 016 \t \0 \0 277 W 016 W
0007020 022 \n \0 \0 277 V l 005 \n \0 \0 277 I V \n \0
0007040 \0 277 V l 003 \n \0 \0 277 V j \n \0 \0 277 o
0007060 \0 \0 \0 V \n \0 \0 277 V l 006 \n \0 \0 277 i
0007100 022 c 024 i 020 W 016 V \n \0 \0 260 365 \0 ( 2
0007120 0 8 \ S F T P . P R O T O C O
0007140 L . E R R O R 1 9 5 F T P P
0007160 U T M A R K 1 8 8 P R I N 3
0007200 1 7 9 F T P P U T C O D E
0007220 1 7 3 F T P P U T M A R K 1
0007240 6 6 C O P Y B Y T E S 1 6 0
0007260 F T P P U T M A R K 1 5 3
0007300 \ F T P . F L U S H . T O . E O
0007320 C 1 4 5 F T P G E T C O D E
0007340 1 0 3 \ F T P . F L U S H .
0007360 T O . E O C 8 9 F T P G E T
0007400 M A R K 8 3 \ S F T P . S E
0007420 N D P L I S T 7 9 \ S F T P
0007440 . P L I S T . F R O M . F I L E
0007460 4 0 \ S F T P . O P E N F I
0007500 L E . F R O M . P L I S T 2 9
0007520 \ S F T P . P R O T O C O L .
0007540 E R R O R 1 9 F T P G E T M
0007560 A R K 8 \ S F T P . R E A D
0007600 P L I S T ) \r ( 1 1 1 D E S I
0007620 R E D - P R O P E R T Y 4 9
0007640 C L O S E F 3 6 I N P U T )
0007660 \r ( 1 8 4 " F i l e s e n
0007700 t o k " ) \r \ S F T P . R E T
0007720 R I E V E D 1 \r ( P 2 R E
0007740 S E T Z P 1 R E S E T Y
0007760 P 0 L I S P X H I S T I
0010000 1 O U T S I 0 I N S F
0010020 3 L I S P X H I S T F 4
0010040 R E S E T V A R S L S T ) \0
0010060 " 003 002 \0 002 S 021 ! 002 T o \0 \0 \0 g \0
0010100 \0 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0 J 223
0010120 \b \0 \0 020 I 020 \0 ( 2 9 E R R O R
0010140 ! 2 4 R E S E T R E S T O R
0010160 E 1 4 \ S F T P . R E T R I
0010200 E V E A 0 0 0 1 ) \r ( 2 0 E R
0010220 R O R 1 1 I N T E R N A L )
0010240 \r ( 8 ( \ S F T P . R E T R
0010260 I E V E A 0 0 0 1 ) ) \r \ S F T
0010300 P . E N U M E R A T E D 1 \r (
0010320 P 1 1 P A I R P 6 F O
0010340 U N D S O M E P 5 S C R A
0010360 T C H P 4 P A T T E R N
0010400 P 3 G E N E R A T O R P
0010420 2 D E S I R E D P R O P S P
0010440 1 F I L E P 0 P L I S
0010460 T I 2 N E W P I 1 O
0010500 U T S I 0 I N S F 1 7
0010520 F T P S E R V E R . D E F A U
0010540 L T . P R O P S ) 001 \t 021 001 \0 003
0010560 021 p 006 @ A \n \0 \0 d 242 261 \0 244 270 @ \t
0010600 \0 \0 l 006 360 245 @ A \n \0 \0 020 H 021 A \v
0010620 O 016 003 265 027 O 020 022 272 H g \0 \0 A J 265
0010640 004 W " \f \0 \0 265 2 i 020 001 _ 026 d 001 g
0010660 \0 \0 360 262 026 002 001 \t \0 \0 _ 024 277 O 022 265
0010700 022 O 024 h 032 _ 022 _ 020 277 O 016 002 _ 016 260
0010720 303 O 024 & _ 022 260 363 [ 001 \t \0 \0 274 K 002
0010740 273 l 177 k 021 2 020 O 032 O 030 363 264 A O 034
0010760 022 ] 277 K h M \v \0 \0 Y 265 % N 263 032 A
0011000 l 004 \n \0 \0 277 A l @ i \v \0 \0 277 o \0
0011020 \0 \0 A \n \0 \0 277 A l 006 \n \0 \0 i 020 003
0011040 262 - L I \t \0 \0 Y \n \0 \0 260 # _ 277
0011060 O 036 265 023 O h 032 _ 036 _ 034 277 O 032 k
0011100 324 _ 032 260 246 O & _ 036 277 260 362 i 262 245
0011120 B 221 h 200 i 245 N 221 h 200 i 226 A l \v \n
0011140 \0 \0 277 i 276 A I \t \0 \0 h J h K \r 005
0011160 \0 \0 \n \0 \0 261 377 } \0 ( 2 6 0 \ F
0011200 T P . P R I N T P L I S T 2 5
0011220 7 \ S F T P . P L I S T . F R
0011240 O M . F I L E 2 4 9 M K A T
0011260 O M 2 4 1 F T P P U T M A R
0011300 K 1 8 6 D I R E C T O R Y .
0011320 M A T C H 1 8 2 C O N C A T
0011340 C O D E S 1 7 2 F T P P U T
0011360 M A R K 1 6 5 P R I N 3 1
0011400 5 6 F T P P U T C O D E 1 4
0011420 8 F T P P U T M A R K 1 3 6
0011440 \ G E N E R A T E N E X T F I
0011460 L E 1 0 8 D I R E C T O R Y
0011500 . M A T C H . S E T U P 7 3
0011520 M K A T O M 5 3 \ S F T P .
0011540 O P E N F I L E . F R O M . P L
0011560 I S T 2 6 \ S F T P . P R O
0011600 T O C O L . E R R O R 1 7 F
0011620 T P G E T M A R K 7 \ S F T
0011640 P . R E A D P L I S T ) \r ( 6 5
0011660 D E S I R E D - P R O P E R T
0011700 Y 4 4 E N U M E R A T E ) \r
0011720 ( 1 6 1 " F i l e n o t
0011740 f o u n d " ) \r \ S F T P . S T
0011760 O R E A 0 0 0 1 A 0 0 0 2 D 1
0012000 \r ( I 0 S T R E A M ) \0 \t
0012020 \0 \0 \0 001 @ \t \0 \0 \t \0 \0 020 \0 ( 6
0012040 D E L F I L E 3 C L O S E F
0012060 ) \r N I L \r ( ) \r \ S F T P . S
0012100 T O R E A 0 0 0 1 A 0 0 0 3 D
0012120 1 \r ( N A M E E R R O R S E T
0012140 F 0 I N S F 1 F I L
0012160 E ) \0 \t \0 002 002 \0 P Q \n \0 \0 h 032
0012200 020 \0 ( 4 C O P Y B Y T E S ) \r
0012220 N I L \r ( ) \r \ S F T P . S T O
0012240 R E A 0 0 0 1 D 1 \r ( N A M E
0012260 E R R O R S E T P 3 S A
0012300 V E R P 2 S U C C E S S
0012320 P 1 F I L E P 0 P L I
0012340 S T F 8 I N S F 9 O
0012360 U T S F 1 0 F T P D E B U
0012400 G L O G F 1 1 R E S E T V
0012420 A R S L S T F 1 2 O L D S
0012440 T Y L E F 1 3 R E S E T Y
0012460 ) 001 = \b 006 002 \0 021 @ 003 W 020 W 022 \n
0012500 \0 \0 d 242 261 001 + 270 W 020 \t \0 \0 l 006 360
0012520 251 W 020 W 022 \n \0 \0 261 001 027 H g \0 \0 W
0012540 022 \v \0 \0 265 005 261 001 \b 271 g \0 \0 I h 032
0012560 032 [ h h 032 032 W 026 032 c 026 277 W 030 262 032
0012600 W 022 l 003 \n \0 \0 277 W 022 j \n \0 \0 277 W
0012620 022 l 006 \n \0 \0 260 027 I i H 021 1 \a L 003
0012640 265 + M 022 i \f \0 \0 W 022 \n \0 \0 277 W 020
0012660 \t \0 \0 d l 004 360 262 6 277 W 020 i \n \0 \0
0012700 277 W 020 W 024 \n \0 \0 261 \0 235 001 d 001 g \0
0012720 \0 360 235 002 001 _ 016 277 N 265 016 O 016 h 032 ^
0012740 ] 277 L 002 \ 260 272 O 016 & ^ 260 366 l 005 360
0012760 262 n o \0 \0 \0 \t \0 \0 265 \t W 020 \t \0 \0
0013000 277 h 272 W 020 \t \0 \0 d l 003 360 262 ? 277 W
0013020 020 \t \0 \0 277 W 020 W 024 \n \0 \0 277 J 246 W
0013040 022 \t \0 \0 260 A W 022 l 003 \n \0 \0 277 W 022
0013060 j \n \0 \0 277 o \0 \0 \0 W 022 \n \0 \0 277 I
0013100 \t \0 \0 277 K g \0 \0 030 260 034 l 004 360 236 W
0013120 020 i \n \0 \0 277 W 020 W 024 \n \0 \0 206 W 020
0013140 W 022 \n \0 \0 277 W 022 l 006 \n \0 \0 277 i 022
0013160 c 032 i 020 \0 ( 3 0 8 F T P P U T
0013200 M A R K 3 0 0 \ S F T P . P
0013220 R O T O C O L . E R R O R 2 9
0013240 2 \ F T P . F L U S H . T O .
0013260 E O C 2 8 4 F T P G E T C O
0013300 D E 2 6 6 C L O S E F 2 6
0013320 1 P R I N 3 2 5 1 F T P P
0013340 U T C O D E 2 4 4 F T P P U
0013360 T M A R K 2 3 5 \ S F T P .
0013400 M A R K . E R R O R 2 2 7 \
0013420 F T P . F L U S H . T O . E O C
0013440 2 1 9 F T P G E T C O D E
0013460 2 0 7 F T P G E T M A R K 1
0013500 9 9 \ F T P . F L U S H . T O
0013520 . M A R K 1 9 2 \ S F T P .
0013540 S T O R E A 0 0 0 1 A 0 0 0 3
0013560 1 4 3 \ F T P . F L U S H . T
0013600 O . E O C 1 3 5 F T P G E T
0013620 C O D E 1 2 2 F T P G E T M
0013640 A R K 1 1 6 \ S F T P . S E
0013660 N D P L I S T 1 1 1 \ S F T
0013700 P . P L I S T . F R O M . F I L
0013720 E 9 3 F T P P U T M A R K
0013740 8 5 F T P P U T C O D E 7 8
0013760 F T P P U T M A R K 4 3 \
0014000 S F T P . O P E N F I L E . F R
0014020 O M . P L I S T 3 1 \ S F T
0014040 P . P R O T O C O L . E R R O R
0014060 2 0 F T P G E T M A R K 9
0014100 \ S F T P . R E A D P L I S T
0014120 ) \r ( 2 7 1 N I L L 1 5 2
0014140 D E S I R E D - P R O P E R T Y
0014160 5 2 \ S F T P . S T O R E A
0014200 0 0 0 1 A 0 0 0 2 3 8 O U T
0014220 P U T ) \r ( 2 5 6 " F i l e
0014240 s t o r e d o k " 1 8 9
0014260 ( \ S F T P . S T O R E A 0 0 0
0014300 1 A 0 0 0 3 ) ) \r \ S F T P . S
0014320 T O R E D 1 \r ( P 2 R E S
0014340 E T Z P 1 R E S E T Y P
0014360 0 L I S P X H I S T I 2
0014400 O L D S T Y L E I 1 O U
0014420 T S I 0 I N S F 3 L
0014440 I S P X H I S T F 4 R E S
0014460 E T V A R S L S T ) \0 " 003 002 \0
0014500 003 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0
0014520 221 h 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020
0014540 I 020 \0 ( 2 9 E R R O R ! 2 4
0014560 R E S E T R E S T O R E 1 4
0014600 \ S F T P . S T O R E A 0 0 0
0014620 1 ) \r ( 2 0 E R R O R 1 1
0014640 I N T E R N A L ) \r ( 8 ( \
0014660 S F T P . S T O R E A 0 0 0 1 )
0014700 ) \r \ S F T P . V E R S I O N
0014720 D 1 \r ( I 1 O U T S I 0
0014740 I N S F 0 F T P D E B U
0014760 G L O G F 1 \ S F T P . V
0015000 E R S I O N ) \0 % \0 002 \0 002 @ P
0015020 \n \0 \0 A l \b \n \0 \0 A k \n \0 \0 o \0
0015040 \0 \0 A \n \0 \0 Q A \n \0 \0 A l 006 \n \0
0015060 \0 020 \0 ( 3 4 F T P P U T M A R
0015100 K 2 8 P R I N 3 2 3 P R
0015120 I N 3 1 5 F T P P U T C O D
0015140 E 1 0 F T P P U T M A R K
0015160 4 \ F T P . F L U S H . T O .
0015200 E O C ) \r N I L \r ( 1 9 " I
0015220 n t e r l i s p - D F t p S
0015240 e r v e r o f " ) \r \ S F T
0015260 P . O P E N F I L E . F R O M .
0015300 P L I S T A 0 0 0 1 D 1 \r ( N
0015320 A M E E R R O R S E T F 0
0015340 F I L E N A M E F 1 A C
0015360 C E S S F 2 F I L E F
0015400 3 D E S I R E D P R O P S F
0015420 4 M Y P L I S T ) \0 % \0 005
0015440 002 \0 Q g \0 \0 360 234 P \t \0 \0 c \0 d S
0015460 \n \0 \0 032 214 P Q h d g \0 \0 T 032 \r 005
0015500 \0 \0 c 004 i 020 \0 ( 3 1 O P E N S
0015520 T R E A M 1 6 \ G E N E R A
0015540 T E F I L E S 9 D I R E C T
0015560 O R Y . F I L L . P A T T E R N
0015600 ) \r ( 2 5 S E Q U E N T I A L
0015620 3 E N U M E R A T E ) \r ( )
0015640 \r \ S F T P . O P E N F I L E .
0015660 F R O M . P L I S T D 1 \r ( P
0015700 5 P A I R P 4 M Y P L
0015720 I S T P 3 E R R O R P
0015740 2 P I E C E S P 1 F I L
0015760 E N A M E P 0 F I L E I
0016000 3 D E S I R E D P R O P S
0016020 I 2 O U T S I 1 A C C
0016040 E S S I 0 P L I S T F
0016060 6 F T P S E R V E R . D E F A
0016100 U L T . H O S T ) 001 006 001 \0 004
0016120 021 P 004 @ 261 \0 326 d 001 021 001 005 M 001 d g
0016140 \0 \0 360 227 277 M 002 001 271 261 \0 277 d g \0 \0
0016160 360 262 & 277 g \0 \0 M 002 001 m 377 \n \0 \0 l
0016200 : 360 231 M 002 001 k m 376 \v \0 \0 202 M 002 001
0016220 J 032 032 272 261 \0 224 d g \0 \0 360 235 277 g \0
0016240 \0 M 002 001 J 032 032 272 261 \0 200 d g \0 \0 360
0016260 234 277 g \0 \0 M 002 001 J 032 032 272 260 l d g
0016300 \0 \0 360 262 037 277 g \0 \0 M 002 001 o \0 \0 \0
0016320 \n \0 \0 224 o \0 \0 \0 202 M 002 001 J 032 032 272
0016340 260 H d g \0 \0 360 233 277 g \0 \0 M 002 001 \t
0016360 \0 \0 260 - d g \0 \0 360 230 277 g \0 \0 M 002
0016400 001 260 ! d g \0 \0 360 232 277 g \0 \0 M 002 001
0016420 \t \0 \0 215 g \0 \0 360 236 g \0 \0 M 002 001 \t
0016440 \0 \0 h 032 032 L 032 274 023 002 003 265 003 202 261 377
0016460 ) I 265 022 J g \0 \0 V h 032 032 \n \0 \0 \t
0016500 \0 \0 260 026 g \0 \0 \n \0 \0 253 g \0 \0 V g
0016520 \0 \0 I \f \0 \0 200 I Y o \0 \0 \0 \t \0 \0
0016540 221 H 020 B \t \0 \0 B l 006 \n \0 \0 h 020 \0
0016560 ( 2 8 4 F T P P U T M A R K
0016600 2 7 8 \ S F T P . M A R K . E
0016620 R R O R 2 7 1 \ S F T P . O
0016640 P E N F I L E . F R O M . P L I
0016660 S T A 0 0 0 1 2 6 1 P A C K
0016700 F I L E N A M E 2 4 9 F I L
0016720 E N A M E F I E L D 2 4 1 P
0016740 A C K F I L E N A M E 2 3 8
0016760 \ N C O N C 2 2 0 9 M K A T
0017000 O M 1 9 4 U - C A S E 1 6
0017020 1 U - C A S E 1 3 0 S T R
0017040 I N G . E Q U A L 5 9 S U B
0017060 S T R I N G 4 6 N T H C H A
0017100 R C O D E ) \r ( 2 5 7 B O D Y
0017120 2 5 3 H O S T 2 4 6 H O
0017140 S T 2 3 1 H O S T 2 0 3
0017160 L E N G T H 1 9 8 S I Z E
0017200 1 8 8 E O L C O N V E N T I O
0017220 N 1 8 2 E N D - O F - L I N
0017240 E - C O N V E N T I O N 1 7 3
0017260 C R E A T I O N D A T E 1 6
0017300 7 C R E A T I O N - D A T E
0017320 1 5 5 T Y P E 1 4 9 T Y P
0017340 E 1 2 0 V E R S I O N 1 1
0017360 3 V E R S I O N 1 0 0 B O
0017400 D Y 9 4 N A M E - B O D Y
0017420 8 0 D I R E C T O R Y 7 4
0017440 D I R E C T O R Y 3 8 H O S
0017460 T 3 1 D E V I C E 1 7 S
0017500 E R V E R - F I L E N A M E ) \r
0017520 ( 2 6 8 ( \ S F T P . O P E
0017540 N F I L E . F R O M . P L I S T
0017560 A 0 0 0 1 ) 1 3 5 " " 1 2
0017600 7 " H " ) \r \ S F T P . P L I
0017620 S T . F R O M . F I L E D 1 \r
0017640 ( P 2 2 T A I L P 1 0
0017660 P L I S T P 9 T Y P E P
0017700 8 A U T H O R P 7 V E
0017720 R S I O N P 6 E X T P
0017740 5 N A M E P 4 D I R P
0017760 3 H O S T P 2 I N F O
0020000 H A N D L E P 1 I N F O F
0020020 N P 0 P I E C E S I 4
0020040 G E N E R A T O R I 3 F
0020060 I L E O P E N P I 2 D E S
0020100 I R E D P R O P S I 1 N E
0020120 W I 0 F I L E F 2 3
0020140 F T P S E R V E R . D E F A U L
0020160 T . H O S T ) 002 ; 027 001 \0 005 @ 303
0020200 \0 \0 224 @ \t \0 \0 200 @ \t \0 \0 021 361 017 021
0020220 ` 025 D 225 g \0 \0 271 D 204 g \0 \0 271 @ 272
0020240 H 260 b d 021 001 026 O , 001 d g \0 \0 360 262
0020260 034 277 O , 002 001 \t \0 \0 W . 360 226 O , 002
0020300 h 030 260 = O , 002 001 [ 260 6 d g \0 \0 360
0020320 227 277 O , 002 001 \ 260 ( d g \0 \0 360 227 277
0020340 O , 002 001 ] 260 032 d g \0 \0 360 226 277 O ,
0020360 002 001 ^ 212 g \0 \0 360 226 O , 002 001 _ 016 277
0020400 023 002 002 003 265 237 B 226 g \0 \0 B 034 264 024 H
0020420 \t \0 \0 _ 026 264 \f g \0 \0 O 026 h 032 032 h
0020440 032 B 226 g \0 \0 B 034 264 035 N 231 M o \0 \0
0020460 \0 N \v \0 \0 200 M _ 030 264 \f g \0 \0 O 030
0020500 h 032 032 h 032 B 226 g \0 \0 B 034 264 022 O 016
0020520 _ 032 264 \f g \0 \0 O 032 h 032 032 h 032 B 226
0020540 g \0 \0 B 034 264 \r g \0 \0 g \0 \0 h 032 032
0020560 h 032 L 264 032 B 226 g \0 \0 B 034 264 021 L _
0020600 034 264 \f g \0 \0 O 034 h 032 032 h 032 K 264 032
0020620 B 226 g \0 \0 B 034 264 021 K _ 036 264 \f g \0
0020640 \0 O 036 h 032 032 h 032 \n \0 \0 \n \0 \0 \n \0
0020660 \0 \n \0 \0 \n \0 \0 _ 024 A 221 h 200 i 242 261
0020700 \0 366 O 024 B 226 g \0 \0 B 034 264 " J g \0
0020720 \0 l 002 I 017 016 265 \a @ C \n \0 \0 _ 022 _
0020740 264 \f g \0 \0 O h 032 032 h 032 O 022 g
0020760 \0 \0 360 264 \f g \0 \0 l \b h 032 032 h 032 B
0021000 226 g \0 \0 B 034 264 031 J g \0 \0 l 002 I 017
0021020 016 _ " 264 \f g \0 \0 O " h 032 032 h 032 B
0021040 226 g \0 \0 B 034 264 031 J g \0 \0 l 002 I 017
0021060 016 _ $ 264 \f g \0 \0 O $ h 032 032 h 032 B
0021100 226 g \0 \0 B 034 264 031 J g \0 \0 l 002 I 017
0021120 016 _ & 264 \f g \0 \0 O & h 032 032 h 032 B
0021140 226 g \0 \0 B 034 264 031 J g \0 \0 l 002 I 017
0021160 016 _ ( 264 \f g \0 \0 O ( h 032 032 h 032 B
0021200 226 g \0 \0 B 034 264 031 J g \0 \0 l 002 I 017
0021220 016 _ * 264 \f g \0 \0 O * h 032 032 h 032 \n
0021240 \0 \0 \n \0 \0 \n \0 \0 \n \0 \0 \n \0 \0 \n \0
0021260 \0 \n \0 \0 020 O 024 020 \0 ( 5 6 5 \ N
0021300 C O N C 2 5 6 2 \ N C O N C
0021320 2 5 5 9 \ N C O N C 2 5 5
0021340 6 \ N C O N C 2 5 5 3 \ N
0021360 C O N C 2 5 5 0 \ N C O N C
0021400 2 5 4 7 \ N C O N C 2 3 5
0021420 0 \ G E T F I L E T Y P E 3
0021440 1 2 \ N C O N C 2 3 0 9 \
0021460 N C O N C 2 3 0 6 \ N C O N
0021500 C 2 3 0 3 \ N C O N C 2 3
0021520 0 0 \ N C O N C 2 1 8 2 C
0021540 O N C A T 1 4 8 P A C K F I
0021560 L E N A M E . S T R I N G 5 8
0021600 M K A T O M 1 3 U N P A C
0021620 K F I L E N A M E . S T R I N G
0021640 8 F U L L N A M E ) \r ( 5 3
0021660 7 A U T H O R 5 2 5 A U T
0021700 H O R 5 1 7 A U T H O R 5
0021720 0 5 S I Z E 4 9 3 L E N G
0021740 T H 4 8 5 S I Z E 4 7 3
0021760 R E A D - D A T E 4 6 1 R E
0022000 A D D A T E 4 5 3 R E A D -
0022020 D A T E 4 4 1 W R I T E - D
0022040 A T E 4 2 9 W R I T E D A T
0022060 E 4 2 1 W R I T E - D A T E
0022100 4 0 9 C R E A T I O N - D A
0022120 T E 3 9 7 C R E A T I O N D
0022140 A T E 3 8 9 C R E A T I O N
0022160 - D A T E 3 7 7 B Y T E - S
0022200 I Z E 3 7 1 B I N A R Y 3
0022220 5 9 T Y P E 3 3 8 T Y P E
0022240 3 3 0 T Y P E 2 9 0 D E
0022260 V I C E 2 7 8 D E V I C E
0022300 2 6 3 D I R E C T O R Y 2 5
0022320 1 D I R E C T O R Y 2 3 8
0022340 C R 2 3 5 E N D - O F - L I
0022360 N E - C O N V E N T I O N 2 2
0022400 8 E N D - O F - L I N E - C O
0022420 N V E N T I O N 2 1 6 V E R
0022440 S I O N 2 0 3 V E R S I O N
0022460 1 9 1 N A M E - B O D Y 1
0022500 6 7 N A M E - B O D Y 1 5 5
0022520 S E R V E R - F I L E N A M E
0022540 1 4 0 S E R V E R - F I L E
0022560 N A M E 1 2 0 V E R S I O N
0022600 1 0 8 E X T E N S I O N 9
0022620 4 N A M E 8 0 D I R E C T
0022640 O R Y 4 7 H O S T 3 0 G
0022660 E T F I L E I N F O 2 4 \ G
0022700 E N E R A T E F I L E I N F O
0022720 3 S T R E A M ) \r ( 1 7 8
0022740 " . " ) \r \ S F T P . S E N D P
0022760 L I S T D 1 \r ( I 1 O U T
0023000 S I 0 P L I S T ) \0 023 \0
0023020 \0 \0 002 A l \v \n \0 \0 A @ \n \0 \0 A l
0023040 006 \n \0 \0 020 \0 ( 1 6 F T P P U T
0023060 M A R K 1 0 \ F T P . P R I
0023100 N T P L I S T 5 F T P P U T
0023120 M A R K ) \r N I L \r ( ) \r \ S F
0023140 T P . P R O T O C O L . E R R O
0023160 R D 1 \r ( I 1 O U T S I
0023200 0 I N S ) \0 034 \0 \0 \0 002 A l
0023220 004 \n \0 \0 A l 003 \n \0 \0 o \0 \0 \0 A \n
0023240 \0 \0 @ j \n \0 \0 h 020 \0 ( 2 4 C L
0023260 O S E B S P S T R E A M 1 9
0023300 P R I N 3 1 1 F T P P U T C
0023320 O D E 5 F T P P U T M A R K
0023340 ) \r N I L \r ( 1 5 " P r o t
0023360 o c o l E r r o r - A b o
0023400 r t i n g c o n n e c t i o n
0023420 " ) \r \ S F T P . M A R K . E R
0023440 R O R D 1 \r ( P 0 E R N
0023460 I 0 O U T S ) \0 M 001 \0 \0 001
0023500 \b \0 \0 021 001 \0 @ l 004 \n \0 \0 @ H 001 d
0023520 l 005 360 223 277 l C 210 d l \t 360 262 035 277 l
0023540 A \n \0 \0 H 001 \t \0 \0 o \0 \0 \0 H 002 001
0023560 \v \0 \0 @ \n \0 \0 h 020 d l 026 360 224 277 l
0023600 D 260 340 l 027 360 262 331 l @ 260 327 \0 ( 5 4
0023620 P R I N 3 5 0 C O N C A T
0023640 4 0 E R R O R S T R I N G
0023660 3 5 F T P P U T C O D E 1 1
0023700 F T P P U T M A R K 2 E R
0023720 R O R N ) \r N I L \r ( 4 4 "
0023740 : " ) \r \ S F T P . R E A D P
0023760 L I S T A 0 0 0 1 D 1 \r ( N A
0024000 M E E R R O R S E T F 0
0024020 I N S ) \0 \b \0 001 002 \0 P \t \0 \0 h
0024040 032 020 \0 ( 3 R E A D P L I S T )
0024060 \r N I L \r ( ) \r \ S F T P . R E
0024100 A D P L I S T D 1 \r ( P 0
0024120 P L I S T I 1 O U T S I
0024140 0 I N S F 1 F T P D E
0024160 B U G L O G ) \0 ! 001 001 \0 002 o \0
0024200 \0 \0 \t \0 \0 021 001 \0 H 245 @ A \n \0 \0 020
0024220 ` \0 \0 226 H 001 Q \n \0 \0 277 H 001 020 \0 (
0024240 2 7 P R I N 2 1 6 \ S F T
0024260 P . P R O T O C O L . E R R O R
0024300 6 \ S F T P . R E A D P L I
0024320 S T A 0 0 0 1 ) \r ( 2 0 F T P
0024340 D E B U G F L G ) \r ( 3 ( \
0024360 S F T P . R E A D P L I S T A 0
0024400 0 0 1 ) ) \r \ S F T P . T I M E
0024420 O U T F N D 1 \r ( I 0 S T
0024440 R E A M ) \0 033 \0 \0 \0 001 @ g \0 \0
0024460 \n \0 \0 264 022 @ 006 \0 \0 311 \f 006 \0 \0 h 024
0024500 @ @ \t \0 \0 020 \0 ( 2 4 C L O S E
0024520 B S P S T R E A M 6 B S P O
0024540 P E N P ) \r ( 1 7 B S P S O C
0024560 1 2 S T R E A M 3 I N P
0024600 U T ) \r ( ) \r \ S F T P . E R R
0024620 O R H A N D L E R D 1 \r ( I
0024640 1 E R R C O D E I 0 I N
0024660 S T R E A M ) \0 $ 001 \0 \0 002 A g
0024700 \0 \0 360 262 032 @ 006 \0 \0 311 024 235 @ 006 \0 \0
0024720 311 " 021 001 \0 @ k H 016 020 m 377 020 \b \0 \0
0024740 020 \0 ( 3 3 E R R O R ! ) \r ( 1
0024760 7 S T R E A M 1 0 S T R E
0025000 A M 3 M A R K . E N C O U N
0025020 T E R E D ) \r ( ) \r \ S F T P .
0025040 W H E N C L O S E D D 1 \r ( I
0025060 0 S T R E A M ) \0 024 \0 \0 \0
0025100 001 g \0 \0 \t \0 \0 264 \f g \0 \0 o \0 \0 \0
0025120 \n \0 \0 020 \0 ( 1 7 P R O C E S S
0025140 . E V A L 5 F I N D . P R O
0025160 C E S S ) \r ( 1 0 F T P S E R
0025200 V E R 2 F T P S E R V E R )
0025220 \r ( 1 4 ( P R O G N ( A N
0025240 D F T P D E B U G L O G ( p
0025260 r i n t o u t F T P D E B U G
0025300 L O G T " C o n n e c t i o
0025320 n c l o s e d " T ) ( R E
0025340 S E T ) ) ) ) \r ( P R E T T Y C
0025360 O M P R I N T F T P S E R V E
0025400 R C O M S ) \r ( R P A Q Q F T
0025420 P S E R V E R C O M S ( ( F N
0025440 S \ F T P S E R V E R . T O P
0025460 F T P S E R V E R \ G E T F
0025500 I L E T Y P E \ S F T P . C O
0025520 M M A N D L O O P \ S F T P .
0025540 R E T R I E V E \r \ S F T P .
0025560 E N U M E R A T E \ S F T P .
0025600 S T O R E \ S F T P . V E R S
0025620 I O N ) ( F N S \ S F T P .
0025640 O P E N F I L E . F R O M . P L
0025660 I S T \ S F T P . P L I S T .
0025700 F R O M . F I L E \r \ S F T P
0025720 . S E N D P L I S T \ S F T P
0025740 . P R O T O C O L . E R R O R
0025760 \ S F T P . M A R K . E R R O R
0026000 \ S F T P . R E A D P L I S T
0026020 \ S F T P . T I M E O U T F N
0026040 \r \ S F T P . E R R O R H A N
0026060 D L E R \ S F T P . W H E N C
0026100 L O S E D ) ( C O M S * (
0026120 B Q U O T E ( ( V A R S ( \
0026140 S F T P . V E R S I O N ( Q U
0026160 O T E ( \ , ( D A T E ) ) )
0026200 ) ) ) ) ) ( \r I N I T V A R S
0026220 ( F T P S E R V E R . D E F A
0026240 U L T . H O S T ( Q U O T E
0026260 D S K ) ) ( F T P S E R V E R
0026300 . D E F A U L T . P R O P S (
0026320 Q U O T E ( T Y P E C R E A
0026340 T I O N D A T E \r W R I T E D
0026360 A T E R E A D D A T E L E N
0026400 G T H A U T H O R ) ) ) ) (
0026420 D E C L A R E % : D O N T C O
0026440 P Y ( M A C R O S . I F D E
0026460 S I R E D . ) ( F I L E S (
0026500 L O A D C O M P ) \r D P U P F
0026520 T P ) ) ) ) \r ( R P A Q Q \ S
0026540 F T P . V E R S I O N " 1 4 -
0026560 O c t - 8 6 1 6 : 5 9 : 4 5 "
0026600 ) \r ( R P A Q ? F T P S E R V
0026620 E R . D E F A U L T . H O S T
0026640 ( Q U O T E D S K ) ) \r ( R P
0026660 A Q ? F T P S E R V E R . D E
0026700 F A U L T . P R O P S ( Q U O
0026720 T E ( T Y P E C R E A T I O
0026740 N D A T E W R I T E D A T E
0026760 R E A D D A T E L E N G T H
0027000 A U T H O R ) ) ) \r ( P U T P R
0027020 O P S F T P S E R V E R C O
0027040 P Y R I G H T ( " X e r o x
0027060 C o r p o r a t i o n " 1 9 8
0027100 3 1 9 8 4 1 9 8 6 ) ) \r N I
0027120 L \r
0027122