$ od -c -N 50000 [phylum]<LISP>Lyric>Internal>Library>NSMAIL!1
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 006
0000100 001 ( F I L E C R E A T E D " 1
0000120 7 - D e c - 8 6 1 9 : 5 3 : 5
0000140 4 " 006 004 { E R I S } < L A F I
0000160 T E > S O U R C E S > N S M A I
0000200 L . ; 7 006 001 8 8 7 9 2 \r \r
0000220 c h a n g e s t o
0000240 % : ( F N S \ N S M A I L
0000260 . A U T H E N T I C A T E ) \r \r
0000300 p r e v i o u s d
0000320 a t e % : " 7 - O c t - 8 6
0000340 1 8 : 4 2 : 0 7 " { E R I S
0000360 } < L A F I T E > S O U R C E S
0000400 > N S M A I L . ; 6 ) \r \r \r ( *
0000420 " \r C o p y r i g h t ( c )
0000440 1 9 8 4 , 1 9 8 5 , 1 9 8
0000460 6 b y X e r o x C o r p o
0000500 r a t i o n . A l l r i g
0000520 h t s r e s e r v e d . \r " )
0000540 \r \r ( P R E T T Y C O M P R I N
0000560 T N S M A I L C O M S ) \r \r (
0000600 R P A Q Q 006 002 N S M A I L C O
0000620 M S 006 001 [ ( C O U R I E R P R
0000640 O G R A M S M A I L T R A N S
0000660 P O R T I N B A S K E T ) \r
0000700
0000720 ( F N S \ N S M A I L . A
0000740 U T H E N T I C A T E N S . F
0000760 I N D M A I L B O X E S ) \r
0001000
0001020 ( F N S N S . P O L L N E W
0001040 M A I L N S . O P E N M A I L
0001060 B O X \ N S M A I L . C H E C
0001100 K N S . N E X T M E S S A G E
0001120 \r
0001140 \ N S M A I
0001160 L . R E A D . E N V E L O P E S
0001200 N S . R E T R I E V E M E S S
0001220 A G E \ N S M A I L . R E T R
0001240 I E V E . C O N T E N T \r
0001260
0001300 \ N S M A I L . E O
0001320 F . O N . R E T R I E V E \ N
0001340 S M A I L . R E A D . S E R I A
0001360 L I Z E D . T R E E \r
0001400
0001420 \ N S M A I L . R E A D
0001440 . S E R I A L I Z E D . C O N T
0001460 E N T \ N S M A I L . R E A D
0001500 . A T T R . S E Q U E N C E \r
0001520
0001540 \ N S M A I L .
0001560 R E A D . S T R I N G . A S . S
0001600 T R E A M \ N S M A I L . P R
0001620 I N T . H E A D E R F I E L D S
0001640 \ N S M A I L . P R I N T . N
0001660 A M E S ) \r
0001700 ( F N S N S
0001720 . C L O S E M A I L B O X \ N
0001740 S M A I L . D I S C O N N E C T
0001760 \ N S M A I L . C H A N G E .
0002000 S T A T U S ) \r
0002020 ( F N S
0002040 \ N S M A I L . S E N D . P A R
0002060 S E \ N S M A I L . P A R S E
0002100 \ N S M A I L . P A R S E 1
0002120 N S . R E M O V E D U P L I C A
0002140 T E S \r
0002160 \ N S
0002200 M A I L . S E N D \ N S M A I
0002220 L . S E N D . M E S S A G E . C
0002240 O N T E N T C O U R I E R . W
0002260 R I T E . S T R E A M . U N S P
0002300 E C I F I E D \r
0002320
0002340 \ N S M A I L . S E N D . S T
0002360 R E A M . A S . S T R I N G \
0002400 N S M A I L . W R I T E . A T T
0002420 R I B U T E \ N S M A I L . F
0002440 I N D S E R V E R \r
0002460
0002500 \ N S M A I L . C H E C K
0002520 S E R V E R ) \r
0002540 ( F N S
0002560 \ N S M A I L . M A K E A N S W
0002600 E R F O R M ) \r
0002620 ( C O M S
0002640 ( P R O P C O U R I E R D E
0002660 F E N V E L O P E . I T E M )
0002700 \r
0002720 ( F N S \
0002740 N S . R E A D . E N V E L O P E
0002760 . I T E M \ N S . W R I T E .
0003000 E N V E L O P E . I T E M ) \r
0003020
0003040 ( V A R S \ N
0003060 S M A I L . E N V E L O P E . I
0003100 T E M . T Y P E S ) \r
0003120
0003140 ( D E C L A R E % : E
0003160 V A L @ C O M P I L E D O C O
0003200 P Y ( V A R S \ N S M A I L
0003220 . A T T R I B U T E S ) ) ) \r
0003240
0003260 ( D E C L A R E % : E V A
0003300 L @ C O M P I L E D O N T C O
0003320 P Y ( R E C O R D S N S M A
0003340 I L B O X N S M A I L S T A T
0003360 E N S M A I L P A R S E ) \r
0003400
0003420 ( C O N S T A
0003440 N T S \ N S M A I L . S O C K
0003460 E T \ S E R I A L I Z E D . F
0003500 I L E . V E R S I O N \r
0003520
0003540 \ N
0003560 S M A I L . C T S T A N D A R D
0003600 . M E S S A G E \ N S M A I L
0003620 . T E X T . B O D Y T Y P E \r
0003640
*
0003700 \ N S M A I L . E M P T Y . B
0003720 O D Y T Y P E \ N S M A I L .
0003740 M A X . N O T E . L E N G T H
0003760 \r
0004000
0004020 M A X . B U L K . S E G M E
0004040 N T . L E N G T H \ N U L L .
0004060 C A C H E . V E R I F I E R ) \r
0004100
0004120 ( M A C R O
0004140 S \ N S M A I L . A T T R I B
0004160 U T E . T Y P E \ N S M A I L
0004200 . W R I T E . A T T R I B U T E
0004220 \r
0004240
0004260 \ N S M A I L . W R I T E
0004300 . A T T R I B U T E . M A C R O
0004320 ) \r
0004340 ( P R O
0004360 P I N F O \ N S M A I L . A
0004400 T T R I B U T E . T Y P E ) \r
0004420
0004440 ( G L O B A L
0004460 V A R S N S M A I L . N E T .
0004500 H I N T \ N S M A I L . E N V
0004520 E L O P E . I T E M . T Y P E S
0004540 \ N S M A I L . A T T R I B U
0004560 T E S \r
0004600
0004620 \ N S M A I L . S E
0004640 R V E R . C A C H E N S M A I
0004660 L D E B U G F L G N S W I Z A
0004700 R D F L G N S M A I L . R E T
0004720 R I E V E . O L D \r
0004740
0004760 \ N S M
0005000 A I L . G O O D . B O D Y T Y P
0005020 E S ) ) \r
0005040 ( I N I T V A R
0005060 S ( \ N S M A I L . S E R V E
0005100 R . C A C H E ) \r
0005120
0005140 ( N S M A I L D E B U G F
0005160 L G ) \r
0005200 ( N
0005220 S M A I L . N E T . H I N T ) \r
0005240
0005260 ( N S M A I
0005300 L . R E T R I E V E . O L D ) )
0005320 \r
0005340 ( A D D V A R S ( \ S
0005360 Y S T E M C A C H E V A R S \
0005400 N S M A I L . S E R V E R . C A
0005420 C H E ) \r
0005440 (
0005460 \ N S M A I L . G O O D . B O D
0005500 Y T Y P E S 2 4 ) ) \r
0005520
0005540 ( A L I S T S ( L A F I T E M
0005560 O D E L S T N S S T A R ) )
0005600 \r
0005620 ( C O M S ( D E C L A
0005640 R E % : E V A L @ C O M P I L
0005660 E D O N T C O P Y ( F I L E
0005700 S ( S O U R C E ) \r
0005720
*
0006000 L A F I
0006020 T E D E C L S ) \r
0006040
0006060 ( F I L E S
0006100 ( L O A D C O M P ) \r
0006120
*
0006160 C L E A R I N G H O U S E ]
0006200 ) \r \r ( C O U R I E R P R O G R
0006220 A M 006 002 M A I L T R A N S P O
0006240 R T 006 001 ( 1 7 4 ) \r
0006260 006 002 T Y P E S 006 001 \r
0006300 [ ( C R E D E N T I A L S ( A
0006320 U T H E N T I C A T I O N .
0006340 C R E D E N T I A L S ) ) \r
0006360 ( V E R I F I E R (
0006400 A U T H E N T I C A T I O N .
0006420 V E R I F I E R ) ) \r
0006440 ( E N V E L O P E . I T E
0006460 M . T Y P E L O N G C A R D I
0006500 N A L ) \r ( E N V
0006520 E L O P E ( S E Q U E N C E
0006540 E N V E L O P E . I T E M ) ) \r
0006560 ( I N V A L I D .
0006600 N A M E ( R E C O R D ( R E
0006620 A S O N I N V A L I D . N A M
0006640 E . R E A S O N ) \r
0006660
0006700 ( N A M E R N A M
0006720 E ) ) ) \r ( I N V
0006740 A L I D . N A M E . L I S T (
0006760 S E Q U E N C E I N V A L I D
0007000 . N A M E ) ) \r (
0007020 I N V A L I D . N A M E . R E A
0007040 S O N ( E N U M E R A T I O N
0007060 ( N o S u c h R e c i p i e n
0007100 t 0 ) \r
0007120
0007140 ( C a n t V a l
0007160 i d a t e N o w 1 ) \r
0007200
0007220 (
0007240 I l l e g a l N a m e 2 ) \r
0007260
*
0007320 ( R e f u s e d 3 ) \r
0007340
*
0007400 ( N o A c c e s s T o D l 4
0007420 ) \r
0007440
0007460 ( T i m e o u t 5 )
0007500 \r
0007520
0007540 ( N o D l s A l l o w e
0007560 d 6 ) \r
0007600
0007620 ( M e s s a g e
0007640 T o o L o n g 7 ) ) ) \r
0007660 ( N A M E ( C L E A R
0007700 I N G H O U S E . N A M E )
0007720 ) \r ( N A M E . L
0007740 I S T ( S E Q U E N C E N A
0007760 M E ) ) \r ( R N A
0010000 M E N A M E ) \r
0010020 ( R N A M E . L I S T ( S E Q
0010040 U E N C E R N A M E ) ) \r
0010060 ( W I L L I N G N E S
0010100 S C A R D I N A L ) \r
0010120 ( C O N T E N T S . T Y P
0010140 E L O N G C A R D I N A L ) \r
0010160 ( M E S S A G E I
0010200 D ( A R R A Y 5 U N S P E
0010220 C I F I E D ) ) \r
0010240 ( P O S T M A R K ( R E C O R
0010260 D ( P O S T E D . A T N A M
0010300 E ) \r
0010320 ( T I M E
0010340 T I M E ) ) ) \r
0010360 ( P R O B L E M ( R E C O R D
0010400 ( U N D E L I V E R A B L E S
0010420 I N V A L I D . N A M E . L I
0010440 S T ) \r
0010460 ( R E T U
0010500 R N E D . E N V E L O P E E N
0010520 V E L O P E ) ) ) \r
0010540 ( C O N N E C T I O N . P R O
0010560 B L E M ( F I L I N G . C
0010600 O N N E C T I O N . P R O B L E
0010620 M ) ) \r ( S E R V
0010640 I C E . P R O B L E M ( E N U
0010660 M E R A T I O N ( C a n n o t
0010700 A u t h e n t i c a t e 0 ) \r
0010720
0010740 (
0010760 S e r v i c e F u l l 1 ) \r
0011000
0011020 ( S
0011040 e r v i c e U n a v a i l a b l
0011060 e 2 ) \r
0011100
0011120 ( M e d i u m F u l l
0011140 3 ) ) ) \r ( T R A
0011160 N S F E R . P R O B L E M ( E
0011200 N U M E R A T I O N ( A b o r
0011220 t e d 0 ) \r
0011240
0011260 ( N o R e n d e z
0011300 v o u s 1 ) \r
0011320
0011340 ( W r o n g D i
0011360 r e c t i o n 4 ] \r 006
0011400 002 P R O C E D U R E S 006 001 \r
0011420 ( ( S E R V E R . P O L
0011440 L 0 ( C R E D E N T I A L S
0011460 V E R I F I E R ) \r
0011500 R E T U R N S
0011520 \r (
0011540 W I L L I N G N E S S ( C L E
0011560 A R I N G H O U S E . N E T
0011600 W O R K . A D D R E S S . L I S
0011620 T ) \r
0011640 V E R I F I E R
0011660 N A M E ) ) \r (
0011700 P O S T 1 ( C R E D E N T I
0011720 A L S V E R I F I E R R N A
0011740 M E . L I S T B O O L E A N
0011760 B O O L E A N C O N T E N T S
0012000 . T Y P E E N V E L O P E \r
0012020
0012040 B U L K . D A T A .
0012060 S O U R C E ) \r
0012100 R E T U R N S \r
0012120 ( I N V A L
0012140 I D . N A M E . L I S T M E S
0012160 S A G E I D ) \r
0012200 R E P O R T S \r
0012220 ( A U T H E
0012240 N T I C A T I O N . E R R O R
0012260 C O N N E C T I O N . E R R O R
0012300 I N V A L I D . R E C I P I E
0012320 N T S S E R V I C E . E R R O
0012340 R T R A N S F E R . E R R O R
0012360 \r
0012400 U N D E F I N E D .
0012420 E R R O R ) ) ) \r 006 002 E
0012440 R R O R S 006 001 \r ( (
0012460 A U T H E N T I C A T I O N . E
0012500 R R O R 1 ( ( A U T H E N T
0012520 I C A T I O N . P R O B L E
0012540 M ) ) ) \r ( C O N
0012560 N E C T I O N . E R R O R 2
0012600 ( C O N N E C T I O N . P R O B
0012620 L E M ) ) \r ( I N
0012640 V A L I D . R E C I P I E N T S
0012660 3 ( I N V A L I D . N A M E
0012700 . L I S T ) ) \r (
0012720 S E R V I C E . E R R O R 4
0012740 ( S E R V I C E . P R O B L E M
0012760 ) ) \r ( T R A N S
0013000 F E R . E R R O R 5 ( T R A
0013020 N S F E R . P R O B L E M ) ) \r
0013040 ( U N D E F I N E
0013060 D . E R R O R 6 ( C A R D I
0013100 N A L ) ) ) ) \r \r ( C O U R I E
0013120 R P R O G R A M 006 002 I N B A S
0013140 K E T 006 001 ( 1 8 1 ) \r
0013160 006 002 I N H E R I T S 006 001 \r
0013200 ( M A I L T R A N S P O
0013220 R T ) \r 006 002 T Y P E S 006
0013240 001 \r [ ( C R E D E N
0013260 T I A L S ( A U T H E N T I C
0013300 A T I O N . C R E D E N T I
0013320 A L S ) ) \r ( V E
0013340 R I F I E R ( A U T H E N T I
0013360 C A T I O N . V E R I F I E
0013400 R ) ) \r ( S E S S
0013420 I O N ( R E C O R D ( H A N
0013440 D L E ( A R R A Y 2 U N S
0013460 P E C I F I E D ) ) \r
0013500
0013520 ( V E R I F I E R V E R I
0013540 F I E R ) ) ) \r (
0013560 E N V E L O P E . I T E M . T Y
0013600 P E L O N G C A R D I N A L )
0013620 \r ( E N V E L O P
0013640 E ( S E Q U E N C E E N V E
0013660 L O P E . I T E M ) ) \r
0013700 ( I N V A L I D . N A M E
0013720 ( R E C O R D ( R E A S O N
0013740 I N V A L I D . N A M E . R E
0013760 A S O N ) \r
0014000
0014020 ( N A M E R N A M E ) ) )
0014040 \r ( I N V A L I D
0014060 . N A M E . L I S T ( S E Q U
0014100 E N C E I N V A L I D . N A M
0014120 E ) ) \r ( I N V A
0014140 L I D . N A M E . R E A S O N
0014160 ( E N U M E R A T I O N ( N o
0014200 S u c h R e c i p i e n t 0 )
0014220 \r
0014240
0014260 ( C a n t V a l i d a t
0014300 e N o w 1 ) \r
0014320
0014340 ( I l l e
0014360 g a l N a m e 2 ) \r
0014400
0014420 ( R
0014440 e f u s e d 3 ) \r
0014460
0014500 ( N o
0014520 A c c e s s T o D l 4 ) \r
0014540
*
0014600 ( T i m e o u t 5 ) \r
0014620
*
0014660 ( N o D l s A l l o w e d 6 )
0014700 \r
0014720
0014740 ( M e s s a g e T o o L
0014760 o n g 7 ) ) ) \r
0015000 ( N A M E ( C L E A R I N G H
0015020 O U S E . N A M E ) ) \r
0015040 ( N A M E . L I S T
0015060 ( S E Q U E N C E N A M E ) )
0015100 \r ( R N A M E N
0015120 A M E ) \r ( R N A
0015140 M E . L I S T ( S E Q U E N C
0015160 E R N A M E ) ) \r
0015200 ( C O N T E N T S . T Y P E
0015220 L O N G C A R D I N A L ) \r
0015240 ( I N D E X C A R D
0015260 I N A L ) \r ( I N
0015300 B A S K E T . S T A T E ( R E
0015320 C O R D ( L A S T I N D E X
0015340 I N D E X ) \r
0015360
0015400 ( N E W C O U N T C
0015420 A R D I N A L ) \r
0015440
0015460 ( I S P R I M A R
0015500 Y B O O L E A N ) \r
0015520
0015540 ( I S P R I M
0015560 A R Y U P B O O L E A N ) ) )
0015600 \r ( R A N G E (
0015620 R E C O R D ( F I R S T I N
0015640 D E X ) \r
0015660 ( L A S T
0015700 I N D E X ) ) ) \r
0015720 ( M A I L . A T T R I B U T E .
0015740 T Y P E L O N G C A R D I N A
0015760 L ) \r [ M A I L .
0016000 A T T R I B U T E ( R E C O R
0016020 D ( T Y P E M A I L . A T T
0016040 R I B U T E . T Y P E ) \r
0016060
0016100 ( V A L U
0016120 E ( S E Q U E N C E U N S P
0016140 E C I F I E D ] \r
0016160 [ S E L E C T I O N S ( R E C
0016200 O R D ( T R A N S P O R T . E
0016220 N V E L O P E B O O L E A N )
0016240 \r
0016260 ( I N B A
0016300 S K E T . E N V E L O P E B O
0016320 O L E A N ) \r
0016340
0016360 ( M A I L . A T T R I B U T E
0016400 S ( S E Q U E N C E M A I L
0016420 . A T T R I B U T E . T Y P E ]
0016440 \r ( C A C H E . V
0016460 E R I F I E R ( A R R A Y 4
0016500 U N S P E C I F I E D ) ) \r
0016520 ( M E S S A G E . D
0016540 E S C R I P T I O N ( R E C O
0016560 R D ( M E S S A G E . I N D E
0016600 X I N D E X ) \r
0016620
0016640 ( T R A
0016660 N S P O R T . E N V E L O P E
0016700 E N V E L O P E ) \r
0016720
0016740 ( I N
0016760 B A S K E T . E N V E L O P E
0017000 E N V E L O P E ) \r
0017020
0017040 ( C O
0017060 N T E N T . A T T R I B U T E S
0017100 E N V E L O P E ) ) ) \r
0017120 ( C A C H E . S T A T U
0017140 S U N S P E C I F I E D ) \r
0017160 ( S T A T U S ( E
0017200 N U M E R A T I O N ( N E W
0017220 0 ) \r
0017240 ( K N O W N
0017260 1 ) \r
0017300 ( R E C E I V
0017320 E D 2 ) ) ) \r (
0017340 A C C E S S . P R O B L E M (
0017360 E N U M E R A T I O N ( A c c
0017400 e s s R i g h t s I n s u f f i
0017420 c i e n t 0 ) \r
0017440
0017460 ( A c c e s s R i
0017500 g h t s I n d e t e r m i n a t
0017520 e 1 ) \r
0017540
0017560 ( I n b a s k e t I n U s
0017600 e 2 ) \r
0017620
0017640 ( N o S u c h R e c i p i
0017660 e n t s 3 ) \r
0017700
0017720 ( R e c i p i e n t
0017740 N a m e I n d e t e r m i n a t
0017760 e 4 ) ) ) \r ( C
0020000 O N N E C T I O N . P R O B L E
0020020 M ( F I L I N G . C O N N
0020040 E C T I O N . P R O B L E M ) )
0020060 \r ( S E R V I C E
0020100 . P R O B L E M ( E N U M E R
0020120 A T I O N ( C a n n o t A u t
0020140 h e n t i c a t e 0 ) \r
0020160
0020200 ( S e r
0020220 v i c e F u l l 1 ) \r
0020240
0020260 ( S e r v
0020300 i c e U n a v a i l a b l e 2
0020320 ) \r
0020340
0020360 ( M e d i u m F u l l 3 ) )
0020400 ) \r ( T R A N S F
0020420 E R . P R O B L E M ( E N U M
0020440 E R A T I O N ( A b o r t e d
0020460 0 ) \r
0020500
0020520 ( N o R e n d e z v o u
0020540 s 1 ) \r
0020560
0020600 ( W r o n g D i r e c
0020620 t i o n 4 ) ) ) \r
0020640 ( S E S S I O N . P R O B L E
0020660 M ( E N U M E R A T I O N (
0020700 T o k e n I n v a l i d 0 ) \r
0020720
0020740 (
0020760 S e s s i o n I n U s e 1 ) )
0021000 ) \r ( C A L L . P
0021020 R O B L E M ( E N U M E R A T
0021040 I O N ( U S E . C O U R I E R
0021060 0 ] \r 006 002 P R O C E D
0021100 U R E S 006 001 \r ( ( L
0021120 O G O N 5 ( C R E D E N T I
0021140 A L S V E R I F I E R N A M
0021160 E C A C H E . V E R I F I E R
0021200 B O O L E A N ) \r
0021220 R E T U R N S \r
0021240 ( S
0021260 E S S I O N C A C H E . S T A
0021300 T U S ) \r
0021320 R E P O R T S \r
0021340 ( A C C E S S
0021360 . E R R O R A U T H E N T I C
0021400 A T I O N . E R R O R S E R V
0021420 I C E . E R R O R U N D E F I
0021440 N E D . E R R O R ) ) \r
0021460 ( L O G O F F 4 ( S E
0021500 S S I O N ) \r
0021520 R E T U R N S \r
0021540 ( C A C H
0021560 E . V E R I F I E R ) \r
0021600 R E P O R T
0021620 S \r
0021640 ( A U T H E N T I C A T I O N .
0021660 E R R O R S E S S I O N . E R
0021700 R O R U N D E F I N E D . E R
0021720 R O R ) ) \r ( M A
0021740 I L P O L L 7 ( C R E D E N
0021760 T I A L S V E R I F I E R N
0022000 A M E ) \r
0022020 R E T U R N S \r
0022040 ( I N B A S K
0022060 E T . S T A T E ) \r
0022100 R E P O R T S \r
0022120 ( A
0022140 C C E S S . E R R O R A U T H
0022160 E N T I C A T I O N . E R R O R
0022200 S E R V I C E . E R R O R U
0022220 N D E F I N E D . E R R O R ) )
0022240 \r ( M A I L C H E
0022260 C K 6 ( S E S S I O N ) \r
0022300 R E T
0022320 U R N S \r
0022340 ( I N B A S K E T . S T A
0022360 T E C A R D I N A L ) \r
0022400 R E P O R
0022420 T S \r
0022440 ( A C C E S S . E R R O R A
0022460 U T H E N T I C A T I O N . E R
0022500 R O R S E R V I C E . E R R O
0022520 R U N D E F I N E D . E R R O
0022540 R ) ) \r ( C H A N
0022560 G E . S T A T U S 0 ( S E S
0022600 S I O N R A N G E S T A T U
0022620 S ) \r
0022640 R E T U R N S N I L R E P
0022660 O R T S ( A U T H E N T I C A
0022700 T I O N . E R R O R I N V A L
0022720 I D . I N D E X S E S S I O N
0022740 . E R R O R U N D E F I N E D
0022760 . E R R O R ) ) \r
0023000 ( D E L E T E 1 ( S E S S I
0023020 O N R A N G E ) \r
0023040 R E T U R N S
0023060 N I L R E P O R T S ( A U T
0023100 H E N T I C A T I O N . E R R O
0023120 R I N V A L I D . I N D E X
0023140 S E S S I O N . E R R O R U N
0023160 D E F I N E D . E R R O R ) ) \r
0023200 ( L I S T 2 (
0023220 S E S S I O N R A N G E S E
0023240 L E C T I O N S B U L K . D A
0023260 T A . S I N K ) \r
0023300 R E T U R N S N I
0023320 L R E P O R T S ( A U T H E
0023340 N T I C A T I O N . E R R O R
0023360 C O N N E C T I O N . E R R O R
0023400 I N V A L I D . I N D E X S
0023420 E S S I O N . E R R O R \r
0023440
*
0023500 T R A N S F E R . E
0023520 R R O R U N D E F I N E D . E
0023540 R R O R ) ) \r ( L
0023560 O C A T E 3 ( S E S S I O N
0023600 S T A T U S ) \r
0023620 R E T U R N S \r
0023640 ( I N
0023660 D E X ) \r
0023700 R E P O R T S \r
0023720 ( A U T H E N
0023740 T I C A T I O N . E R R O R S
0023760 E S S I O N . E R R O R U N D
0024000 E F I N E D . E R R O R ) ) \r
0024020 ( R E T R I E V E
0024040 8 ( S E S S I O N I N D E X
0024060 C O N T E N T S . T Y P E B
0024100 U L K . D A T A . S I N K ) \r
0024120 R E T
0024140 U R N S \r
0024160 ( E N V E L O P E E N V
0024200 E L O P E ) \r
0024220 R E P O R T S \r
0024240 ( A U T H
0024260 E N T I C A T I O N . E R R O R
0024300 C O N N E C T I O N . E R R O
0024320 R C O N T E N T S . T Y P E .
0024340 M I S M A T C H I N V A L I D
0024360 . I N D E X \r
0024400 S E S
0024420 S I O N . E R R O R T R A N S
0024440 F E R . E R R O R U N D E F I
0024460 N E D . E R R O R ) ) ) \r
0024500 006 002 E R R O R S 006 001 \r
0024520 ( ( A C C E S S . E R R O R
0024540 0 ( A C C E S S . P R O B L
0024560 E M ) ) \r ( A U T
0024600 H E N T I C A T I O N . E R R O
0024620 R 1 ( ( A U T H E N T I C A
0024640 T I O N . P R O B L E M ) )
0024660 ) \r ( C O N N E C
0024700 T I O N . E R R O R 2 ( C O
0024720 N N E C T I O N . P R O B L E M
0024740 ) ) \r ( C O N T E
0024760 N T S . T Y P E . M I S M A T C
0025000 H 3 ( C O N T E N T S . T Y
0025020 P E ) ) \r ( S E S
0025040 S I O N . E R R O R 5 ( S E
0025060 S S I O N . P R O B L E M ) ) \r
0025100 ( I N V A L I D .
0025120 I N D E X 4 ( I N D E X ) )
0025140 \r ( S E R V I C E
0025160 . E R R O R 6 ( S E R V I C
0025200 E . P R O B L E M ) ) \r
0025220 ( T R A N S F E R . E R R
0025240 O R 7 ( T R A N S F E R . P
0025260 R O B L E M ) ) \r
0025300 ( U N D E F I N E D . E R R O R
0025320 8 ( C A L L . P R O B L E M
0025340 ) ) ) ) \r ( D E F I N E Q \r \r (
0025360 006 004 \ N S M A I L . A U T H E N
0025400 T I C A T E 006 001 \r [ L A M B
0025420 D A N I L 006 003 006 001
0025440
*
0025500 006 003 ( * ;
0025520 " E d i t e d 1 7 - D e c -
0025540 8 6 1 9 : 5 3 b y b v m :
0025560 " ) 006 001 \r ( P R O G (
0025600 ( I N F O ( \ I N T E R N A L
0025620 / G E T P A S S W O R D ' | N
0025640 S : : | ) ) \r
0025660 N S U S E R N A M E F U L
0025700 L N A M E M S E R V E R S A
0025720 U T H E N T I C A T E D ? C R
0025740 E D E N T I A L S M S G ) \r
0025760 ( C O N D \r
0026000 ( \ L A
0026020 F I T E U S E R D A T A ( R E
0026040 T U R N \ L A F I T E U S E R
0026060 D A T A ) ) ) \r R E
0026100 T R Y \r ( S
0026120 E T Q N S U S E R N A M E (
0026140 P A R S E . N S N A M E ( C A
0026160 R I N F O ) ) ) \r
0026200 ( C O N D \r
0026220 ( ( N E Q [ S E
0026240 T Q A U T H E N T I C A T E D
0026260 ? ( C O N D \r
0026300
*
0026340 ( ( N U L L ( S E T Q
0026360 N S U S E R N A M E ( C H . L
0026400 O O K U P . O B J E C T N S U
0026420 S E R N A M E ) ) ) \r
0026440
*
0026500 ' N O N E ) \r
0026520
*
0026560 ( T ( N S .
0026600 A U T H E N T I C A T E ( S E
0026620 T Q C R E D E N T I A L S \r
0026640
*
0026720 (
0026740 N S . M A K E . S I M P L E . C
0026760 R E D E N T I A L S \r
0027000
*
0027060 ( C O N
0027100 S N S U S E R N A M E ( C D
0027120 R I N F O ] \r
0027140 T ) \r
0027160 ( C O N
0027200 D \r
0027220 ( ( A N D ( S E T Q M
0027240 S G ( S E L E C T Q A U T H
0027260 E N T I C A T E D ? \r
0027300
*
0027340 ( C r e d e n t i a l s I n v a
0027360 l i d \r
0027400
0027420 "
0027440 L o g i n i n c o r r e c t "
0027460 ) \r
0027500
0027520 ( K e y s U n a v
0027540 a i l a b l e \r
0027560
*
0027620 ( C O N C A T " A u t h
0027640 e n t i c a t i o n s e r v e
0027660 r u n a v a i l a b l e f o
0027700 r d o m a i n " \r
0027720
*
0027760 ( 006 002 f
0030000 e t c h 006 001 N S D O M A I N
0030020 006 002 o f 006 001 N S U S E R N A M
0030040 E ) ) ) \r
0030060
0030100 ( N O N E
0030120 " N o s u c h u s e r " ) \r
0030140
*
0030200 N I L ) ) \r
0030220
0030240 ( S E T Q I N F O ( \ I
0030260 N T E R N A L / G E T P A S S W
0030300 O R D ' | N S : : | T N I
0030320 L M S G ) ) ) \r
0030340 ( G O R
0030360 E T R Y ) ) ) \r
0030400 ( p r i n t o u t
0030420 P R O M P T W I N D O W T "
0030440 C a n n o t a u t h e n t i c
0030460 a t e u s e r " ( N S N A
0030500 M E . T O . S T R I N G N S U
0030520 S E R N A M E T ) \r
0030540
0030560 " b e c a u s e : " \r
0030600
0030620 ( S E T Q \ L A F I T E .
0030640 A U T H E N T I C A T I O N . F
0030660 A I L U R E A U T H E N T I C
0030700 A T E D ? ) \r
0030720 " . " )
0030740 ) \r (
0030760 ( N U L L ( S E T Q M S E R
0031000 V E R S ( 006 002 N S . F I N D M
0031020 A I L B O X E S 006 001 N S U S E
0031040 R N A M E ) ) ) \r
0031060 ( p r i n t o u t
0031100 P R O M P T W I N D O W T
0031120 " T h e r e a r e n o m a
0031140 i l s e r v e r s f o r u
0031160 s e r " ( N S N A M E . T O
0031200 . S T R I N G \r
0031220
*
0031320 N S U
0031340 S E R N A M E T ) ) ) \r
0031360 ( T [ S E
0031400 T Q \ L A F I T E U S E R D A
0031420 T A ( 006 002 c r e a t e 006 001 \r
0031440
*
0031500 L A F I T E U S E R
0031520 D A T A \r
0031540
0031560 F U L L
0031600 U S E R N A M E _ ( N S N A
0031620 M E . T O . S T R I N G N S U
0031640 S E R N A M E T ) \r
0031660
*
0031720 U N P A C K E D U S E R N A
0031740 M E _ N S U S E R N A M E \r
0031760
*
0032020 E N C R Y P T E D
0032040 P A S S W O R D _ C R E D E
0032060 N T I A L S \r
0032100
0032120 S H
0032140 O R T U S E R N A M E _ ( C
0032160 O N C A T ( 006 002 f e t c h 006 001
0032200 N S O B J E C T 006 002 o f 006 001
0032220 N S U S E R N A M E ) \r
0032240
*
0032320 ' % : \r
0032340
*
0032420 ( C O
0032440 N D \r
0032460
*
0032540 ( ( N O T ( S T R I N
0032560 G . E Q U A L ( 006 002 f e t c h
0032600 006 001 N S D O M A I N \r
0032620
*
0032740 006 002 o f 006 001 N S U S E
0032760 R N A M E \r
0033000
*
0033120 ) \r
0033140
*
0033240 C H . D E F A U L T . D O M
0033260 A I N ) ) \r
0033300
*
0033360 ( 006 002 f e t c h
0033400 006 001 N S D O M A I N 006 002 o f
0033420 006 001 N S U S E R N A M E ) ) \r
0033440
*
0033540 ( T " " ) ) ) \r
0033560
*
0033620 M A I L S E R V E R S _ \r
0033640
*
0033700 ( 006 002 f o r 006 001 M
0033720 A I L S E R V E R 006 002 i n 006 001
0033740 M S E R V E R S \r
0033760
*
0034020 006 002 c o l l e c t 006 001
0034040 006 003 ( *
0034060 ; " M A I L S E R V E R =
0034100 ( n a m e ( a d d r e s s e s
0034120 ) ) " ) 006 001 \r
0034140
*
0034200 ( 006 002 c r e a t e
0034220 006 001 M A I L S E R V E R \r
0034240
*
0034320 M A I L P O R T _
0034340 ( C A A D R M A I L S E R V E
0034360 R ) \r
0034400
*
0034440 M A I L S E
0034460 R V E R N A M E _ ( C A R
0034500 M A I L S E R V E R ) \r
0034520
*
0034600 M A I L S E R V E R O P S
0034620 _ \r
0034640
*
0034700 ( C O N S T
0034720 A N T ( L I S T ( F U N C T
0034740 I O N N S . P O L L N E W M A
0034760 I L ) \r
0035000
*
0035060 ( F U N C
0035100 T I O N N S . O P E N M A I L
0035120 B O X ) \r
0035140
*
0035220 ( F U N
0035240 C T I O N N S . N E X T M E S
0035260 S A G E ) \r
0035300
*
0035360 ( F U
0035400 N C T I O N N S . R E T R I E
0035420 V E M E S S A G E ) \r
0035440
*
0035540 ( F U N C T I O N N S . C
0035560 L O S E M A I L B O X ] \r
0035600 ( R E
0035620 T U R N \ L A F I T E U S E R
0035640 D A T A ] ) \r \r ( 006 004 N S . F I
0035660 N D M A I L B O X E S 006 001 \r
0035700 [ L A M B D A ( U S E R N A M
0035720 E ) 006 003 006 001
0035740
0035760 006
0036000 003 ( * b v m % : " 2 8 - J u
0036020 n - 8 4 1 6 : 3 7 " ) 006 001 \r
0036040 ( P R O G [ ( M A I L B
0036060 O X E N T R Y ( C H . R E T R
0036100 I E V E . I T E M ( P A R S E
0036120 . N S N A M E U S E R N A M E
0036140 ) \r
0036160
0036200 ( C H . P R O P E R T Y '
0036220 M A I L B O X E S ) \r
0036240
0036260 ' M A I L
0036300 B O X . V A L U E S ] \r
0036320 ( R E T U R N ( 006
0036340 002 f o r 006 001 M B 006 002 i n 006 001
0036360 ( C O U R I E R . F E T C H
0036400 ( C L E A R I N G H O U S E .
0036420 M A I L B O X . V A L U E S )
0036440 \r
0036460
0036500 M A I L . S E R V I C
0036520 E o f ( C A D R M A I L B
0036540 O X E N T R Y ) ) \r
0036560 006
0036600 002 c o l l e c t 006 001 ( C H . R
0036620 E T R I E V E . I T E M M B
0036640 ( C H . P R O P E R T Y ' A D
0036660 D R E S S . L I S T ) \r
0036700
*
0036740 ' N E T W O R K . A D D R E S S
0036760 . L I S T ] ) \r ) \r ( D E F I N
0037000 E Q \r \r ( 006 004 N S . P O L L N E
0037020 W M A I L 006 001 \r [ L A M B D
0037040 A ( A D D R E S S R E G I S
0037060 T E R E D N A M E C R E D E N
0037100 T I A L S M A I L S E R V E R
0037120 ) 006 003 006 001 006 003 ( * b v
0037140 m % : " 2 2 - M a y - 8 5 1
0037160 1 : 4 0 " ) 006 001 \r ( P R
0037200 O G ( R E S U L T N ) \r
0037220 ( R E T U R N
0037240 ( C O N D \r
0037260 ( ( S E T
0037300 Q R E S U L T ( 006 002 \ N S M
0037320 A I L . C H E C K 006 001 A D D R
0037340 E S S R E G I S T E R E D N A
0037360 M E C R E D E N T I A L S M
0037400 A I L S E R V E R ) ) \r
0037420
0037440 ( A N D ( N E Q ( S E T
0037460 Q N ( 006 002 f e t c h 006 001 S
0037500 T A T E F I R S T N E W 006 002 o
0037520 f 006 001 ( 006 002 f e t c h 006 001 M
0037540 A I L S T A T E 006 002 o f 006 001
0037560 M A I L S E R V E R ) ) ) \r
0037600
0037620 0 )
0037640 \r
0037660 ( I G E
0037700 Q ( C O U R I E R . F E T C H
0037720 ( I N B A S K E T . I N B
0037740 A S K E T . S T A T E ) \r
0037760
*
0040020 L A S T I N D E X o
0040040 f R E S U L T ) \r
0040060
0040100 N ) ) ) \r
0040120
0040140 ( T ' ? ] ) \r \r ( 006
0040160 004 N S . O P E N M A I L B O X 006
0040200 001 \r [ L A M B D A ( A D D
0040220 R E S S R E G I S T E R E D N
0040240 A M E C R E D E N T I A L S
0040260 M A I L S E R V E R ) 006 003 006 001
0040300 006 003 ( * b v m % : " 1
0040320 5 - N o v - 8 4 0 0 : 2 3 " )
0040340 006 001 \r ( P R O G ( ( S
0040360 T R E A M ( C O U R I E R . O
0040400 P E N A D D R E S S N I L
0040420 T ' N S M A I L ) ) \r
0040440 ( N S M A I L S T
0040460 A T E ( 006 002 f e t c h 006 001 M
0040500 A I L S T A T E 006 002 o f 006 001
0040520 M A I L S E R V E R ) ) \r
0040540 I N B A S K E T
0040560 S T A T E F I R S T I N D E X
0040600 L A S T I N D E X N ) \r
0040620 ( R E T U R N
0040640 ( C O N D \r
0040660 ( ( N U L
0040700 L S T R E A M ) \r
0040720
0040740 N I L ) \r
0040760 ( ( N U L L
0041000 ( S E T Q I N B A S K E T S
0041020 T A T E ( 006 002 \ N S M A I L .
0041040 C H E C K 006 001 A D D R E S S
0041060 R E G I S T E R E D N A M E C
0041100 R E D E N T I A L S \r
0041120
*
0041200 M A I L S E R V E R S T
0041220 R E A M ) ) ) \r
0041240 ( C
0041260 L O S E F S T R E A M ) \r
0041300
0041320 N I L ) \r
0041340 ( (
0041360 E Q [ S E T Q N ( C O N D
0041400 \r
0041420
0041440 ( N I L
0041460 006 003
0041500 ( * ; \r 006 001
0041520
*
0041560 006 003 " T h i s i s
0041600 a p p a r e n t l y n o t
0041620 y e t i m p l e m e n t e d
0041640 - - a l w a y s z e r o " )
0041660 006 001 \r
0041700
0041720 ( C O
0041740 U R I E R . F E T C H ( I N B
0041760 A S K E T . I N B A S K E T
0042000 . S T A T E ) \r
0042020
*
0042060 N E W C O U N
0042100 T o f I N B A S K E T S T A
0042120 T E ) ) \r
0042140
0042160 ( ( E Q (
0042200 S E T Q F I R S T I N D E X
0042220 ( 006 002 f e t c h 006 001 S T A T E
0042240 F I R S T N E W 006 002 o f 006 001
0042260 N S M A I L S T A T E ) ) \r
0042300
*
0042340 0 )
0042360 006 003 ( *
0042400 ; " N o N E W m e s s a g
0042420 e s a t a l l " ) 006 001 \r
0042440
*
0042500 0 ) \r
0042520
0042540 ( T (
0042560 A D D 1 ( I D I F F E R E N C
0042600 E ( S E T Q L A S T I N D E
0042620 X ( C O U R I E R . F E T C H
0042640 \r
0042660
*
0042740 ( I N
0042760 B A S K E T . I N B A S K E
0043000 T . S T A T E \r
0043020
*
0043120 ) \r
0043140
*
0043240 L A S T I N D E X o f
0043260 \r
0043300
*
0043360 I N B
0043400 A S K E T S T A T E ) ) \r
0043420
*
0043500 F I R S T I N D E X ] \r
0043520
0043540 0 ) \r
0043560
0043600 ( C L O S E F S T R E A M )
0043620 \r
0043640 ' E M P T Y ) \r
0043660
0043700 ( T
0043720
0043740 006 003 ( *
0043760 ; " R e t u r n ( M A I L
0044000 B O X . p r o p e r t i e
0044020 s ) " ) 006 001 \r
0044040 (
0044060 C O N S ( 006 002 c r e a t e 006 001
0044100 N S M A I L B O X \r
0044120
*
0044160 N S M A I L S T R E A M _ S
0044200 T R E A M \r
0044220
0044240 N S M A I
0044260 L L A S T I N D E X _ L A S
0044300 T I N D E X \r
0044320
0044340 N S M A
0044360 I L S T A T E _ N S M A I L
0044400 S T A T E ) \r
0044420
0044440 ( L I S T ' % # O F
0044460 M E S S A G E S N ] ) \r \r ( 006
0044500 004 \ N S M A I L . C H E C K 006 001
0044520 \r [ L A M B D A ( A D D R
0044540 E S S R E G I S T E R E D N A
0044560 M E C R E D E N T I A L S M
0044600 A I L S E R V E R S T R E A M
0044620 S T A T E ) 006 003 006 001 \r
0044640
*
0044720 006 003 ( * b v
0044740 m % : " 6 - J u n - 8 5 1
0044760 4 : 2 2 " ) 006 001 \r \r 006 003 ( * ;
0045000 ; ; " P e r f o r m s a m
0045020 a i l c h e c k f o r u s
0045040 e r R E G I S T E R E D N A M
0045060 E a t A D D R E S S , r e
0045100 t u r n i n g I N B A S K E T
0045120 S T A T E i f s u c c e s s
0045140 f u l , N I L i f n o t .
0045160 U p d a t e s t h e M A
0045200 I L S T A T E o f M A I L S
0045220 E R V E R a s a p p r o p r
0045240 i a t e t o r e f l e c t
0045260 c u r r e n t S E S S I O N
0045300 a n d S T A T E F I R S T N E
0045320 W ( f i r s t n e w m e s
0045340 s a g e ) " ) 006 001 \r \r (
0045360 R E S E T L S T ( P R O G (
0045400 ( J U S T C H E C K I N G ( N
0045420 U L L S T R E A M ) ) \r
0045440
0045460 S E S S I O N P O L L R E
0045500 S U L T L A S T I N D E X F
0045520 I R S T N E W O L D L A S T )
0045540 \r
0045560 [ C O N D \r
0045600
0045620 ( [ A N D ( N U L L S T
0045640 A T E ) \r
0045660
0045700 ( N U L L ( S E T Q S T
0045720 A T E ( 006 002 f e t c h 006 001 M
0045740 A I L S T A T E 006 002 o f 006 001
0045760 M A I L S E R V E R ] \r
0046000
0046020 ( 006 002 r e p l a c e 006 001
0046040 M A I L S T A T E 006 002 o f 006
0046060 001 M A I L S E R V E R \r
0046100
0046120 006 002 w i t h 006 001
0046140 ( S E T Q S T A T E ( 006 002
0046160 c r e a t e 006 001 N S M A I L S
0046200 T A T E \r
0046220
*
0046260 S T A T E N A M
0046300 E _ ( P A R S E . N S N A M
0046320 E R E G I S T E R E D N A M E
0046340 ) \r
0046360
*
0046420 S T A T E A D D R E S
0046440 S _ A D D R E S S \r
0046460
*
0046520 S
0046540 T A T E C R E D E N T I A L S
0046560 _ C R E D E N T I A L S ] \r
0046600
0046620 ( S E T Q S E S S I O N
0046640 ( 006 002 f e t c h 006 001 S T A T
0046660 E S E S S I O N 006 002 o f 006 001
0046700 S T A T E ) ) \r
0046720 ( S E T
0046740 Q F I R S T N E W ( 006 002 f e
0046760 t c h 006 001 S T A T E F I R S T
0047000 N E W 006 002 o f 006 001 S T A T E
0047020 ) ) \r
0047040 ( S E T Q O L D
0047060 L A S T ( 006 002 f e t c h 006 001
0047100 S T A T E O L D L A S T 006 002 o
0047120 f 006 001 S T A T E ) ) \r
0047140 R E T R
0047160 Y \r
0047200 [ C O N D \r
0047220
0047240 ( ( N U L L S E S S I O
0047260 N )
0047300 006 003 ( * ( *
0047320 ; \r 006 001
0047340
0047360 006 003 " W o
0047400 u l d b e n i c e t o b
0047420 e a b l e t o d o a s
0047440 i m p l e c h e c k w i t h
0047460 o u t s e s s i o n " ) \r 006
0047500 001
0047520
*
0047560 006 003
0047600 ( C O N D ( ( A N D J U S T
0047620 C H E C K I N G \r 006 001
0047640
*
0047720 006 003 ( E Q F I
0047740 R S T N E W 1 ) ) ( R E T U
0047760 R N \r 006 001
0050000
*
0050060 006 003 ( A N D ( L I S T P
0050100 ( S E T Q P O L L R E S U L T
0050120 \r 006 001
0050140
*
0050220 006 003 ( C O U R I E R . E X P E D
0050240 I T E D . C A L L A D D R E S
0050260 S \r 006 001
0050300
*
0050360 006 003 \ N S M A I L . S O C K
0050400 E T ( Q U O T E I N B A S K
0050420 E T ) \r 006 001
0050440
*
0050520 006 003 ( Q U O T E M A I L
0050540 P O L L ) ( C A R C R E D E
0050560 N T I A L S ) \r 006 001
0050600
*
0050660 006 003 ( C D R C R
0050700 E D E N T I A L S ) ( f e t c
0050720 h S T A T E N A M E o f \r
0050740 006 001
0050760
*
0051020 006
0051040 003 S T A T E ) ( Q U O T E R
0051060 E T U R N E R R O R S ) ) ) ) \r
0051100 006 001
0051120
*
0051160 006
0051200 003 ( N E Q ( C A R P O L L R
0051220 E S U L T ) \r 006 001
0051240
*
0051320 006 003 ( Q U O T E E
0051340 R R O R ) ) P O L L R E S U L
0051360 T ) ) ) ) ) 006 001 \r
0051400
0051420 [ C O N D \r
0051440
0051460 ( ( N U L L S T R E A M )
0051500
0051520 006 003 ( * ; \r 006 001
0051540
*
0051620 006 003 " N e e d a r e a l
0051640 C o u r i e r s t r e a m
0051660 f o r s o m e r e a s o n
0051700 h e r e " ) 006 001 \r
0051720
0051740 ( C O N D \r
0051760
0052000 ( ( S E T Q
0052020 S T R E A M ( C O U R I E R
0052040 . O P E N A D D R E S S N I
0052060 L T ' N S M A I L ) ) \r
0052100
0052120 ( R
0052140 E S E T S A V E N I L ( L I
0052160 S T ' C L O S E F S T R E A
0052200 M ) ) ) \r
0052220
0052240 ( T ( R E T U R N ] \r
0052260
0052300 ( C O N D \r
0052320
0052340 ( ( E Q [ C
0052360 A R ( S E T Q S E S S I O N
0052400 ( C O N D \r
0052420
*
0052460 ( ( O
0052500 R T S T R E A M ) \r
0052520
*
0052600 006 003 ( * ;
0052620 \r 006 001
0052640 006 003 " W o u l d b e n
0052660 i c e t o d o t h i s e
0052700 x p e d i t e d , b u t t h
0052720 i s a b i l i t y w a s t
0052740 a k e n o u t i n S e r v
0052760 i c e s 8 . 1 ! " ) 006 001 \r
0053000
*
0053060 ( C O U R I E R . C A
0053100 L L S T R E A M ' I N B A S
0053120 K E T ' L O G O N \r
0053140
*
0053220 ( C A R C R
0053240 E D E N T I A L S ) \r
0053260
*
0053340 ( C D R C R
0053360 E D E N T I A L S ) \r
0053400
*
0053460 ( 006 002 f e t c
0053500 h 006 001 S T A T E N A M E 006 002
0053520 o f 006 001 S T A T E ) \r
0053540
*
0053620 \ N U L L .
0053640 C A C H E . V E R I F I E R T
0053660 ' R E T U R N E R R O R S ) )
0053700 \r
0053720
*
0053760 ( T ( C O U R I
0054000 E R . E X P E D I T E D . C A L
0054020 L A D D R E S S \r
0054040
*
0054120 \ N S M A
0054140 I L . S O C K E T ' I N B A S
0054160 K E T ' L O G O N \r
0054200
*
0054260 ( C A R
0054300 C R E D E N T I A L S ) \r
0054320
*
0054400 ( C D
0054420 R C R E D E N T I A L S ) \r
0054440
*
0054520 (
0054540 006 002 f e t c h 006 001 S T A T E N
0054560 A M E 006 002 o f 006 001 S T A T E
0054600 ) \r
0054620
*
0054700 \ N U L L . C A C H E . V E
0054720 R I F I E R T ' R E T U R N
0054740 E R R O R S ] \r
0054760
0055000 ' E R R O R ) \r
0055020
0055040 ( G O
0055060 E R R O R ) ) ) \r
0055100
0055120 ( 006 002 r e p l a c e 006 001 S T
0055140 A T E S E S S I O N 006 002 o f 006
0055160 001 S T A T E 006 002 w i t h 006 001
0055200 ( S E T Q S E S S I O N (
0055220 C A R S E S S I O N ] \r
0055240
0055260 [ S E T Q P O L L R E S U L
0055300 T ( C O N D \r
0055320
*
0055360 ( ( N U L L S T R E A M )
0055400 006 003 ( * ; " J u s
0055420 t c h e c k i n g " ) 006 001 \r
0055440
*
0055500 ( C O U R I E R
0055520 . E X P E D I T E D . C A L L
0055540 A D D R E S S \ N S M A I L .
0055560 S O C K E T ' I N B A S K E T
0055600 \r
0055620
*
0055660 ' M A I L C H E C K S E S S
0055700 I O N ' R E T U R N E R R O R
0055720 S ) ) \r
0055740
0055760 ( T (
0056000 C O U R I E R . C A L L S T R
0056020 E A M ' I N B A S K E T ' M
0056040 A I L C H E C K S E S S I O N
0056060 \r
0056100
*
0056140 ' R E T U R N E R R O R S
0056160 ] \r
0056200 ( C O N D \r
0056220
0056240 ( ( N U L L P O L L R E
0056260 S U L T ) \r
0056300 ( R
0056320 E T U R N ) ) ) \r
0056340 [ C O
0056360 N D \r
0056400 ( ( E Q (
0056420 C A R ( L I S T P P O L L R
0056440 E S U L T ) ) \r
0056460
0056500 ' E R R O R ) \r
0056520
0056540 ( C O N D \r
0056560
0056600 ( ( E Q ( C A D R
0056620 P O L L R E S U L T ) \r
0056640
0056660 ' S E S
0056700 S I O N . E R R O R )
0056720 006 003 ( * ;
0056740 \r 006 001
0056760
*
0057040 006 003 " S e s s i o n t i m e d
0057060 o u t , s t a r t a n e
0057100 w o n e " ) 006 001 \r
0057120
0057140 ( 006 002 r e p l a c e
0057160 006 001 S T A T E S E S S I O N
0057200 006 002 o f 006 001 S T A T E 006 002 w
0057220 i t h 006 001 ( S E T Q S E S S
0057240 I O N N I L ) ) \r
0057260
0057300 ( 006 002 r e p l a c e
0057320 006 001 S T A T E F I R S T N E W
0057340 006 002 o f 006 001 S T A T E 006 002
0057360 w i t h 006 001 ( S E T Q F I R
0057400 S T N E W N I L ) ) \r
0057420
0057440 ( 006 002 r e p l a
0057460 c e 006 001 S T A T E O L D L A S
0057500 T 006 002 o f 006 001 S T A T E 006
0057520 002 w i t h 006 001 ( S E T Q O L
0057540 D L A S T N I L ) ) \r
0057560
0057600 ( G O R E T R
0057620 Y ) ) \r
0057640 (
0057660 T ( S E T Q S E S S I O N
0057700 P O L L R E S U L T ) \r
0057720
0057740 ( G O E R
0057760 R O R ] \r
0060000 ( S E T Q L
0060020 A S T I N D E X ( C O U R I E
0060040 R . F E T C H ( I N B A S K E
0060060 T . I N B A S K E T . S T A
0060100 T E ) \r
0060120
0060140 L
0060160 A S T I N D E X o f ( C A R
0060200 P O L L R E S U L T ) ) ) \r
0060220
0060240 ( C O N D \r
0060260
0060300 ( ( E Q L A S T I N D E X 0
0060320 ) \r
0060340 ( 006 002 r e p
0060360 l a c e 006 001 S T A T E F I R S
0060400 T N E W 006 002 o f 006 001 S T A T
0060420 E 006 002 w i t h 006 001 0 ) ) \r
0060440
0060460 ( ( O R ( N U L L
0060500 O L D L A S T ) \r
0060520
0060540 ( I L E S S P O L
0060560 D L A S T L A S T I N D E X )
0060600 \r
0060620 ( N O
0060640 T J U S T C H E C K I N G ) \r
0060660
0060700 ( N U L
0060720 L F I R S T N E W ) )
0060740 006 003 (
0060760 * ; \r 006 001
0061000
*
0061040 006
0061060 003 " N e e d t o a c c u r a
0061100 t e l y l o c a t e f i r s
0061120 t N E W m e s s a g e " ) 006
0061140 001 \r
0061160 [ 006 002 r e p
0061200 l a c e 006 001 S T A T E F I R S
0061220 T N E W 006 002 o f 006 001 S T A T
0061240 E 006 002 w i t h 006 001 ( C O N D
0061260 \r
0061300
*
0061360 ( N S M A I L . R E T R I E V
0061400 E . O L D \r
0061420
*
0061500 006 003 ( * ; " R e t r
0061520 i e v e e v e n O L D m e
0061540 s s a g e s " ) 006 001 \r
0061560
*
0061660 1 ) \r
0061700
*
0061760 ( S T R E A M ( C O
0062000 U R I E R . C A L L S T R E A
0062020 M \r
0062040
*
0062140 ' I N B A S K E T \r
0062160
*
0062260 ' L O C A T
0062300 E S E S S I O N \r
0062320
*
0062420 ' N E W \r
0062440
*
0062540 ' N O
0062560 E R R O R ) ) \r
0062600
*
0062660 ( T ( C O U R
0062700 I E R . E X P E D I T E D . C A
0062720 L L \r
0062740
*
0063020 A D D R E S S \
0063040 N S M A I L . S O C K E T \r
0063060
*
0063160 ' I N B A S K E T \r
0063200
*
0063300 ' L O C A T E S E S S I O N
0063320 ' N E W ' \r
0063340
*
0063420 R E T U R
0063440 N E R R O R S ] \r
0063460
0063500 ( 006 002 r e p l a c e 006 001 S T
0063520 A T E O L D L A S T 006 002 o f 006
0063540 001 S T A T E 006 002 w i t h 006 001
0063560 L A S T I N D E X ) ) ) \r
0063600
0063620 ( 006 002 r e p l a c e 006 001 (
0063640 M A I L S E R V E R C O N T I
0063660 N U A N C E ) 006 002 o f 006 001 M
0063700 A I L S E R V E R \r
0063720
0063740 006 002 w i t h 006 001 ( I T I M E
0063760 S 1 0 0 0 ( I Q U O T I E N
0064000 T ( I T I M E S ( C A D R
0064020 P O L L R E S U L T ) \r
0064040
*
0064120 4 ) \r
0064140
*
0064200 5 ) ) )
0064220 006 003 ( * ; \r 006
0064240 001
0064260
0064300 006 003 " T e l l
0064320 p o l l e r t o c a l l
0064340 a g a i n s o o n e n o u g
0064360 h t o k e e p s e s s i o
0064400 n a l i v e " ) 006 001 \r
0064420
0064440 ( R E T U R N ( C A R P O L
0064460 L R E S U L T ) ) \r
0064500 E R R O R \r
0064520
0064540 ( P R I N T O U T P R
0064560 O M P T W I N D O W T " M a
0064600 i l S e r v e r E r r o r :
0064620 " ( C D R S E S S I O N )
0064640 ) \r
0064660 ( C O N D \r
0064700
0064720 ( N S W I Z A R D F L G
0064740 ( H E L P S E S S I O N ) ) )
0064760 \r
0065000 ( R E T U R N ] ) \r \r
0065020 ( 006 004 N S . N E X T M E S S A G
0065040 E 006 001 \r [ L A M B D A ( M
0065060 A I L B O X ) 006 003 006 001
0065100
*
0065140 006 003 ( * b v m % :
0065160 " 1 4 - N o v - 8 4 2 3 : 3 0
0065200 " ) 006 001 \r ( P R O G (
0065220 ( E N V E L O P E S ( 006 002 f e
0065240 t c h 006 001 N S M A I L E N V T
0065260 A I L 006 002 o f 006 001 M A I L B
0065300 O X ) ) ) \r
0065320 ( S E L E C T Q E N V E L O P
0065340 E S \r
0065360 ( N I L
0065400
*
0065440 006 003 ( * ; " F i r s t t i
0065460 m e , r e a d a l l e n v
0065500 e l o p e s " ) 006 001 \r
0065520 ( C
0065540 O N D \r
0065560 ( [ O R (
0065600 006 002 f e t c h 006 001 N S M A I L
0065620 E N V E L O P E S 006 002 o f 006 001
0065640 M A I L B O X ) \r
0065660
0065700 ( N U L L ( S E T Q
0065720 E N V E L O P E S ( 006 002 \ N
0065740 S M A I L . R E A D . E N V E L
0065760 O P E S 006 001 M A I L B O X ] \r
0066000
0066020 ( R E T U R N ) )
0066040 ) \r
0066060 ( 006 002 r e p l a c e 006
0066100 001 N S M A I L E N V E L O P E
0066120 S 006 002 o f 006 001 M A I L B O X
0066140 006 002 w i t h 006 001 E N V E L O
0066160 P E S ) \r
0066200 ( 006 002 r e p l a
0066220 c e 006 001 N S M A I L E N V T A
0066240 I L 006 002 o f 006 001 M A I L B O
0066260 X 006 002 w i t h 006 001 E N V E L
0066300 O P E S ) ) \r
0066320 ( T
0066340
*
0066400 006 003 ( * ; " F i n i
0066420 s h e d " ) 006 001 \r
0066440 ( R E T U R
0066460 N ) ) \r
0066500 N I L ) \r
0066520 ( R E T U R N ( C A R E N
0066540 V E L O P E S ] ) \r \r ( 006 004 \ N
0066560 S M A I L . R E A D . E N V E L
0066600 O P E S 006 001 \r [ L A M B D A
0066620 ( M A I L B O X ) 006 003 006 001
0066640
*
0066700 006 003 ( * b v m
0066720 % : " 1 6 - M a y - 8 5 1 2
0066740 : 4 7 " ) 006 001 \r ( P R O
0066760 G ( E N V E L O P E S ) \r
0067000 [ S E T Q E N
0067020 V E L O P E S ( C O U R I E R
0067040 . C A L L ( 006 002 f e t c h 006 001
0067060 N S M A I L S T R E A M 006 002
0067100 o f 006 001 M A I L B O X ) \r
0067120
0067140 '
0067160 I N B A S K E T \r
0067200
0067220 ' L I S T \r
0067240
*
0067300 ( 006 002 f e t c h 006 001 N S M A
0067320 I L S E S S I O N 006 002 o f 006 001
0067340 M A I L B O X ) \r
0067360
0067400 ( C O U R
0067420 I E R . C R E A T E ( I N B A
0067440 S K E T . R A N G E ) \r
0067460
*
0067520 F I R S T _ ( 006
0067540 002 f e t c h 006 001 N S M A I L F
0067560 I R S T I N D E X 006 002 o f 006 001
0067600 M A I L B O X ) \r
0067620
*
0067660 L A S T _ ( 006 002 f e t c
0067700 h 006 001 N S M A I L L A S T I N
0067720 D E X 006 002 o f 006 001 M A I L B
0067740 O X ) ) \r
0067760
0070000 ( C O U R I E R . C
0070020 R E A T E ( I N B A S K E T
0070040 . S E L E C T I O N S ) \r
0070060
*
0070120 T R A N S P O R T .
0070140 E N V E L O P E _ T I N B
0070160 A S K E T . E N V E L O P E _
0070200 T M A I L . A T T R I B U T
0070220 E S \r
0070240
0070260 _ ( L
0070300 I S T ( \ N S M A I L . A T T
0070320 R I B U T E . T Y P E B o d y
0070340 T y p e ) ) ) \r
0070360
0070400 ' ( I N B A S
0070420 K E T . M E S S A G E . D E
0070440 S C R I P T I O N ] \r
0070460 ( R E T U R N ( 006 002
0070500 f o r 006 001 E 006 002 i n 006 001 E
0070520 N V E L O P E S 006 002 c o l l e
0070540 c t 006 001 ( C O N S ( C O U R
0070560 I E R . F E T C H ( I N B A S
0070600 K E T . M E S S A G E . D E
0070620 S C R I P T I O N ) \r
0070640
*
0070720 M E S S A G E . I N
0070740 D E X o f E ) \r
0070760
*
0071020 ( A
0071040 P P E N D ( C O U R I E R . F
0071060 E T C H ( I N B A S K E T .
0071100 M E S S A G E . D E S C R I P
0071120 T I O N \r
0071140
*
0071240 ) \r
0071260
*
0071340 C O N T E N T . A T
0071360 T R I B U T E S o f E ) \r
0071400
*
0071460 ( C O U R I
0071500 E R . F E T C H ( I N B A S K
0071520 E T . M E S S A G E . D E S
0071540 C R I P T I O N \r
0071560
*
0071660 ) \r
0071700
*
0071760 T R A N S P O R
0072000 T . E N V E L O P E o f E )
0072020 \r
0072040
*
0072100 ( C O U
0072120 R I E R . F E T C H ( I N B A
0072140 S K E T . M E S S A G E . D
0072160 E S C R I P T I O N \r
0072200
*
0072300 ) \r
0072320
*
0072400 I N B A S K
0072420 E T . E N V E L O P E o f E
0072440 ] ) \r \r ( 006 004 N S . R E T R I E
0072460 V E M E S S A G E 006 001 \r [ L
0072500 A M B D A ( M A I L B O X M
0072520 S G O U T F I L E ) 006 003 006 001
0072540
0072560 006 003 (
0072600 * b v m % : " 1 4 - N o v -
0072620 8 4 2 3 : 3 0 " ) 006 001 \r
0072640 ( 006 002 D E C L A R E 006 001 ( S
0072660 P E C V A R S M S G O U T F I
0072700 L E E N V E L O P E ) ) \r
0072720 ( P R O G [ ( E N V E L O
0072740 P E ( 006 002 p o p 006 001 ( 006 002 f
0072760 e t c h 006 001 N S M A I L E N V
0073000 T A I L 006 002 o f 006 001 M A I L
0073020 B O X ] \r (
0073040 C O U R I E R . C A L L ( 006 002
0073060 f e t c h 006 001 N S M A I L S T
0073100 R E A M 006 002 o f 006 001 M A I L
0073120 B O X ) \r
0073140 ' I N B A S K E T \r
0073160
0073200 ' R E T R I E V E \r
0073220 ( 006 002 f
0073240 e t c h 006 001 N S M A I L S E S
0073260 S I O N 006 002 o f 006 001 M A I L
0073300 B O X ) \r
0073320 ( C A R E N V E L
0073340 O P E ) \r
0073360 \ N S M A I L . C T
0073400 S T A N D A R D . M E S S A G E
0073420 \r
0073440 ( F U N C T I O N \ N S M
0073460 A I L . R E T R I E V E . C O N
0073500 T E N T ) ) \r
0073520 ( C O N D \r
0073540 ( ( N E Q ( C A D R
0073560 E N V E L O P E ) \r
0073600 ' N O
0073620 )
0073640
0073660 006 003 ( * ; \r 006
0073700 001
0073720
*
0073760 006 003 " R e a
0074000 d o k a y , t e l l c l o
0074020 s e m a i l b o x t o d e
0074040 l e t e i t " ) 006 001 \r
0074060 ( R P L A C
0074100 A ( C D R E N V E L O P E )
0074120 \r
0074140 ' D E L E T E ] ) \r
0074160 \r ( 006 004 \ N S M A I L . R E T R
0074200 I E V E . C O N T E N T 006 001 \r
0074220 [ L A M B D A ( M S G S T R
0074240 E A M ) \r ( 006 002 D E C L
0074260 A R E 006 001 ( S P E C V A R S
0074300 R E T R I E V A L E R R O R ) \r
0074320 ( U S E D
0074340 F R E E E N V E L O P E M S
0074360 G O U T F I L E ) ) 006 003 006 001
0074400
0074420 006 003 ( * b v m % : " 8 -
0074440 N o v - 8 4 1 2 : 1 1 " ) 006 001
0074460 \r ( P R O G ( R E T R
0074500 I E V A L E R R O R C T T Y P
0074520 E ) \r ( S E
0074540 T F I L E I N F O M S G S T R
0074560 E A M ' E N D O F S T R E A M
0074600 O P ( F U N C T I O N \ N S
0074620 M A I L . E O F . O N . R E T R
0074640 I E V E ) ) \r
0074660 ( O R ( E Q ( C O U R I E
0074700 R . R E A D M S G S T R E A M
0074720 N I L ' L O N G C A R D I N
0074740 A L ) \r
0074760 \ S E R I A L I Z E
0075000 D . F I L E . V E R S I O N ) \r
0075020 ( H
0075040 E L P " W r o n g s e r i a
0075060 l i z e d f i l e v e r s i
0075100 o n " ) ) 006 003 (
0075120 * ; \r 006 001
0075140 006 003 " M S G S
0075160 T R E A M i s a b u l k
0075200 d a t a s t r e a m c o n t
0075220 a i n i n g c o n t e n t o
0075240 f m s g , a s a ' s e r
0075260 i a l i z e d f i l e ' " ) 006
0075300 001 \r ( 006 002 \
0075320 N S M A I L . R E A D . S E R I
0075340 A L I Z E D . T R E E 006 001 M S
0075360 G S T R E A M M S G O U T F I
0075400 L E ( C D R E N V E L O P E
0075420 ) ) \r ( C O
0075440 N D \r
0075460 ( R E T R I E V A L E R R O R
0075500 ( p r i n t o u t M S G O U T
0075520 F I L E T " * * W a r n i n
0075540 g : e r r o r s i n m e s
0075560 s a g e f o r m a t * * " T
0075600 ] ) \r \r ( 006 004 \ N S M A I L . E
0075620 O F . O N . R E T R I E V E 006 001
0075640 \r [ L A M B D A ( S T R E
0075660 A M ) \r ( 006 002 D E C L A
0075700 R E 006 001 ( U S E D F R E E R
0075720 E T R I E V A L E R R O R ) ) 006
0075740 003 006 001
0075760 006 003 ( * b v
0076000 m % : " 3 1 - J u l - 8 4 2
0076020 2 : 2 6 " ) 006 001 \r ( S E
0076040 T Q R E T R I E V A L E R R O
0076060 R T ) \r ( C O N D \r
0076100 ( L A F I T E D E B
0076120 U G F L G ( H E L P " E O F
0076140 d u r i n g r e t r i e v e
0076160 " ) ) ) \r ( P R O G (
0076200 P O S ) \r (
0076220 C O N D \r
0076240 ( ( S E T Q P O S ( S T
0076260 K P O S ( F U N C T I O N \
0076300 N S M A I L . R E A D . A T T R
0076320 . S E Q U E N C E ) ) ) \r
0076340 ( R E T T
0076360 O P O S ' * E R R O R * T
0076400 ) ) \r
0076420 ( ( S E T Q P O S ( S T K P
0076440 O S ( F U N C T I O N \ N S
0076460 M A I L . R E A D . S E R I A L
0076500 I Z E D . T R E E ) ) ) \r
0076520 ( R E T F
0076540 R O M P O S N I L T ) ) \r
0076560 ( T
0076600 0 ] ) \r \r ( 006 004 \ N S M A I L .
0076620 R E A D . S E R I A L I Z E D .
0076640 T R E E 006 001 \r [ L A M B D A
0076660 ( M S G S T R E A M M S G O
0076700 U T F I L E E N V E L O P E )
0076720 006 003 006 001
0076740 006 003 ( * b v m
0076760 % : " 1 6 - M a y - 8 5 1 6
0077000 : 5 7 " ) 006 001 \r \r 006 003 ( * ; ;
0077020 ; " R e a d a m e s s a g
0077040 e , w h i c h i s i n t
0077060 h e f o r m a t o f a N
0077100 S F i l i n g S e r i a l i
0077120 z e d F i l e . T h i s
0077140 i s t h e r e c u r s i v e
0077160 p a r t , S e r i a l i z e
0077200 d T r e e . F o r m a t i
0077220 s - - - S e q u e n c e o
0077240 f A t t r i b u t e ; C o
0077260 n t e n t ; c h i l d r e n
0077300 = S e q u e n c e o f S
0077320 e r i a l i z e d T r e e " ) 006
0077340 001 \r \r ( P R O G ( F O
0077360 R M A T T E D ? T Y P E V A
0077400 L U E H E A D E R F I E L D S
0077420 L E N G T H N O T E B O D Y
0077440 H E A D E R S S E N D E R
0077460 T Y P E I N F O C O E R C E D
0077500 \r
0077520 F O R M A T S T R E A M
0077540 B O D Y S T R E A M ) \r
0077560 ( 006 002 f o r 006 001 N
0077600 006 002 f r o m 006 001 ( \ W I N
0077620 M S G S T R E A M ) 006 002 t o 006
0077640 001 1 006 002 b y 006 001 - 1 \r
0077660 006 002 d o 006
0077700 001 ( S E T Q T Y P E ( C O
0077720 U R I E R . R E A D M S G S T
0077740 R E A M N I L ' L O N G C A
0077760 R D I N A L ) ) \r
0100000 [ C O N D \r
0100020
0100040 ( ( N O T ( 006 002 f i n d 006
0100060 001 006 002 o l d 006 001 T Y P E I N
0100100 F O 006 002 i n 006 001 \ N S M A I
0100120 L . A T T R I B U T E S 006 002 s
0100140 u c h t h a t 006 001 ( E Q ( C
0100160 A D R T Y P E I N F O ) \r
0100200
*
0100300 T Y P
0100320 E ) ) ) \r
0100340 ( A N D N S
0100360 M A I L D E B U G F L G ( p r
0100400 i n t o u t P R O M P T W I N
0100420 D O W T " U n r e c o g n i
0100440 z e d a t t r i b u t e "
0100460 T Y P E ) ) \r
0100500 ( C O U R
0100520 I E R . R E A D . S E Q U E N C
0100540 E M S G S T R E A M N I L
0100560 ' U N S P E C I F I E D ) ) \r
0100600
0100620 [ ( E Q ( S E T Q T Y P
0100640 E ( C A R T Y P E I N F O )
0100660 ) \r
0100700 ' N o t e )
0100720 \r \r
0100740 006 003 ( * ; ; " T
0100760 h i s i s a s t a r m a
0101000 i l n o t e . T r e a t
0101020 a s b o d y o f m e s s a
0101040 g e . I f i t i s n ' t
0101060 t h e l a s t a t t r i b
0101100 u t e , s a v e i t f o r
0101120 t h e e n d " ) 006 001 \r \r
0101140
0101160 ( C O N D \r
0101200 (
0101220 ( N E Q N 1 ) \r
0101240
0101260 [ C O N D \r
0101300
0101320 ( N O T E B O D Y ( T E
0101340 R P R I N O T E B O D Y ) ) \r
0101360
0101400 ( T ( S
0101420 E T Q N O T E B O D Y ( O P
0101440 E N S T R E A M ' { N O D I R
0101460 C O R E } ' B O T H ] \r
0101500
0101520 ( 006 002 \ N S M A I L .
0101540 R E A D . S T R I N G . A S . S
0101560 T R E A M 006 001 M S G S T R E A
0101600 M N O T E B O D Y ) ) \r
0101620
0101640 ( T ( 006 002 \ N S M A I
0101660 L . P R I N T . H E A D E R F I
0101700 E L D S 006 001 M S G O U T F I L
0101720 E H E A D E R F I E L D S E
0101740 N V E L O P E S E N D E R \r
0101760
*
0102020 N O T E B O D Y )
0102040 006 003 (
0102060 * ; " P r i n t a c c u m
0102100 u l a t e d h e a d e r f i
0102120 e l d s " ) 006 001 \r
0102140
0102160 ( T E R P R I M S G O U
0102200 T F I L E ) \r
0102220
0102240 ( 006 002 \ N S M A I L . R E A D
0102260 . S T R I N G . A S . S T R E A
0102300 M 006 001 M S G S T R E A M M S
0102320 G O U T F I L E ) \r
0102340
0102360 ( R E T U R N ] \r
0102400
0102420 [ ( O R ( E Q T Y P E ' L
0102440 i s p F o r m a t t i n g ) \r
0102460
0102500 ( E Q T Y P E
0102520 ' O l d L i s p F o r m a t t i
0102540 n g ) ) 006 003 ( *
0102560 ; \r 006 001
0102600
*
0102660 006 003 " N o t e t h a t t h i
0102700 s M U S T b e t h e l a
0102720 s t a t t r i b u t e " ) 006 001
0102740 \r
0102760 ( C O N D \r
0103000
0103020 ( ( E Q N 1 ) \r
0103040
0103060 ( C O N D \r
0103100
0103120 ( N O T E B O D Y
0103140
0103160 006 003 ( * ; \r 006
0103200 001
0103220
*
0103260 006 003
0103300 " A l r e a d y g o t N o t
0103320 e s o b o d y m u s t b
0103340 e n u l l " ) 006 001 \r
0103360
0103400 ( 006 002
0103420 \ N S M A I L . R E A D . S T R
0103440 I N G . A S . S T R E A M 006 001
0103460 M S G S T R E A M N O T E B O
0103500 D Y ) ) \r
0103520
0103540 ( T
0103560
0103600 006 003 ( * ; \r 006 001
0103620
*
0103660 006 003 " H a v e
0103700 t o s a v e F o r m a t
0103720 i n f o u n t i l a f t e r
0103740 w e h a v e r e a d B o
0103760 d y " ) 006 001 \r
0104000
0104020 ( S E T Q F O R M A
0104040 T S T R E A M ( O P E N S T R
0104060 E A M ' { N O D I R C O R E }
0104100 ' B O T H ) ) \r
0104120
0104140 ( 006 002 \ N S M A I
0104160 L . R E A D . S T R I N G . A S
0104200 . S T R E A M 006 001 M S G S T R
0104220 E A M F O R M A T S T R E A M
0104240 ) ) ) \r
0104260 ( R E T
0104300 U R N ( S E T Q F O R M A T
0104320 T E D ? T ) ) ) \r
0104340
0104360 ( T ( P R I N T O U T P R
0104400 O M P T W I N D O W T " B a
0104420 d f o r m a t t e d m e s s
0104440 a g e " ) \r
0104460
0104500 ( 006 002 \ N S M A I L . R E A D .
0104520 S T R I N G . A S . S T R E A M
0104540 006 001 M S G S T R E A M ( O P
0104560 E N S T R E A M ' { N U L L }
0104600 ' O U T P U T ] \r
0104620 ( T
0104640 [ S E T Q V A L U E ( P R O
0104660 G N ( \ W I N M S G S T R E
0104700 A M ) \r
0104720
0104740 ( C O
0104760 U R I E R . R E A D M S G S T
0105000 R E A M ' M A I L T R A N S P
0105020 O R T ( C A D D R T Y P E I
0105040 N F O ] \r
0105060 ( C O N D
0105100 \r
0105120 ( ( S E L E
0105140 C T Q T Y P E \r
0105160
0105200 ( ( B o d y T y p
0105220 e B o d y S i z e ) \r
0105240
*
0105300 N I L ) \r
0105320
0105340 ( S e n d e r ( S E T Q
0105360 S E N D E R V A L U E ) ) \r
0105400
0105420 ( F
0105440 r o m [ C O N D \r
0105460
*
0105520 ( ( A N D ( N U L L S E N
0105540 D E R ) \r
0105560
*
0105620 ( N U L L ( C D R V A L
0105640 U E ) ) ) \r
0105660
0105700 ( S
0105720 E T Q S E N D E R ( C A R
0105740 V A L U E ] \r
0105760
0106000 T ) \r
0106020
0106040 T ) \r
0106060
0106100 ( 006 002 p u s h
0106120 006 001 H E A D E R F I E L D S
0106140 ( C O N S T Y P E V A L U E
0106160 ] \r 006
0106200 002 f i n a l l y 006 001
0106220
*
0106260 006 003 ( * ; \r 006 001
0106300
0106320 006 003 " N o t e w a s n o t
0106340 t h e f i n a l a t t r i b
0106360 u t e . P r i n t h e a d
0106400 e r s a c c u m u l a t e d ,
0106420 t h e n t h e N o t e l
0106440 a s t " ) 006 001 \r
0106460 ( 006 002 \ N
0106500 S M A I L . P R I N T . H E A D
0106520 E R F I E L D S 006 001 M S G O U
0106540 T F I L E H E A D E R F I E L
0106560 D S E N V E L O P E S E N D
0106600 E R N O T E B O D Y ) ) \r
0106620 ( C O N D \r
0106640 [ F O R M
0106660 A T T E D ? ( C O N D \r
0106700
0106720 ( F O R M A T
0106740 S T R E A M ( S E T Q B O D
0106760 Y S T R E A M ( O P E N S T R
0107000 E A M ' { N O D I R C O R E }
0107020 ' B O T H ) ) \r
0107040
0107060 ( 006 002 \
0107100 N S M A I L . R E A D . S E R I
0107120 A L I Z E D . C O N T E N T 006 001
0107140 M S G S T R E A M B O D Y S
0107160 T R E A M ) \r
0107200
0107220 ( S E T F I
0107240 L E P T R F O R M A T S T R E
0107260 A M 0 ) \r
0107300
0107320 ( C O P Y B Y
0107340 T E S F O R M A T S T R E A M
0107360 B O D Y S T R E A M ) ) \r
0107400
0107420 ( T
0107440
0107460 006 003 ( *
0107500 ; " A l r e a d y h a v e
0107520 n o t e b o d y " ) 006 001 \r
0107540
0107560 ( S E
0107600 T Q B O D Y S T R E A M N O
0107620 T E B O D Y ) \r
0107640
0107660 ( 006 002 \ N S M A I
0107700 L . R E A D . S E R I A L I Z E
0107720 D . C O N T E N T 006 001 M S G S
0107740 T R E A M N O T E B O D Y ) \r
0107760
*
0110040 006 003 (
0110060 * ; " T h i s c o n t e n
0110100 t b e t t e r b e e m p t
0110120 y " ) 006 001 \r
0110140
0110160 ) ) \r
0110200 ( S E T
0110220 Q H E A D E R S ( O P E N S
0110240 T R E A M ' { N O D I R C O R
0110260 E } ' B O T H ) ) \r
0110300 (
0110320 006 002 \ N S M A I L . P R I N T .
0110340 H E A D E R F I E L D S 006 001 H
0110360 E A D E R S H E A D E R F I E
0110400 L D S E N V E L O P E S E N
0110420 D E R N I L ) \r
0110440 ( T E
0110460 R P R I H E A D E R S ) \r
0110500
0110520 ( S E T F I L E P T R H E
0110540 A D E R S 0 ) \r
0110560 ( S E
0110600 T Q B O D Y S T R E A M ( O
0110620 P E N T E X T S T R E A M B O
0110640 D Y S T R E A M ) ) \r
0110660 (
0110700 T E D I T . S E T S E L B O D
0110720 Y S T R E A M 1 0 ' L E F
0110740 T ) \r
0110760 ( T E D I T . I N
0111000 C L U D E B O D Y S T R E A M
0111020 H E A D E R S ) \r
0111040 ( P
0111060 R O G N
0111100
0111120 006 003 ( * ; \r 006
0111140 001 006 003 " W o u l d
0111160 l i k e t h i s t o b e
0111200 ( C O E R C E T E X T O B J
0111220 B O D Y S T R E A M ( Q U O T
0111240 E F I L E ) M S G O U T F I
0111260 L E ) b u t T e d i t h a
0111300 s a b u g " ) 006 001 \r
0111320
0111340 ( C O P Y B Y T E
0111360 S ( S E T Q C O E R C E D
0111400 ( O P E N S T R E A M ( C O E
0111420 R C E T E X T O B J B O D Y S
0111440 T R E A M \r
0111460
*
0111540 ' F I
0111560 L E ) \r
0111600
*
0111640 '
0111660 I N P U T ) ) \r
0111700
0111720 M S G O U T
0111740 F I L E ) \r
0111760
0112000 ( D E L F I L E ( C L O S E
0112020 F C O E R C E D ] \r
0112040 ( T
0112060
*
0112120 006 003 ( * ; \r
0112140 006 001
0112160
*
0112220 006
0112240 003 " N o f o r m a t t i n g ,
0112260 p o s s i b l y r e a d b
0112300 o d y n o w " ) 006 001 \r
0112320 ( T E R
0112340 P R I M S G O U T F I L E )
0112360
0112400 006 003 ( * ;
0112420 " S e t o f f h e a d e r "
0112440 ) 006 001 \r
0112460 ( C O N D \r
0112500 ( ( E
0112520 Q ( C A R E N V E L O P E )
0112540 \r
0112560 ' N O )
0112600
0112620 006 003
0112640 ( * ; \r 006 001
0112660
*
0112720 006
0112740 003 " C a n ' t r e a d t h i
0112760 s a t t a c h m e n t , l e
0113000 a v e i n m a i l b o x " )
0113020 006 001 \r
0113040 ( p r i n t o u t
0113060 M S G O U T F I L E T T
0113100 \r
0113120 " * * *
0113140 A t t a c h m e n t r e t a
0113160 i n e d i n m a i l b o x
0113200 f o r r e t r i e v a l b y
0113220 o t h e r m e a n s * * *
0113240 " T ) \r
0113260 ( E R R O R !
0113300 ) ) ) \r
0113320 ( 006 002 \ N S M A I L . R
0113340 E A D . S E R I A L I Z E D . C
0113360 O N T E N T 006 001 M S G S T R E
0113400 A M M S G O U T F I L E ) ) )
0113420 \r ( R P T Q
0113440 ( \ W I N M S G S T R E A M
0113460 )
0113500 006 003
0113520 ( * ; " R e a d c h i l d
0113540 r e n " ) 006 001 \r
0113560 ( 006 002 \ N S M A
0113600 I L . R E A D . S E R I A L I Z
0113620 E D . T R E E 006 001 M S G S T R
0113640 E A M M S G O U T F I L E ] )
0113660 \r \r ( 006 004 \ N S M A I L . R E A
0113700 D . S E R I A L I Z E D . C O N
0113720 T E N T 006 001 \r [ L A M B D A
0113740 ( I N S T R E A M O U T S T
0113760 R E A M ) 006 003 006 001
0114000
0114020 006 003 ( * b v m
0114040 % : " 1 6 - M a y - 8 5 1 4
0114060 : 2 9 " ) 006 001 \r \r 006 003 ( * ; ;
0114100 ; " I n t e r p r e t s I N
0114120 S T R E A M a s S e r i a l
0114140 i z e d T r e e . C o n t e n t
0114160 , i . e . , a s a B u l
0114200 k d a t a . S t r e a m O f U n
0114220 s p e c i f i e d f o l l o w
0114240 e d b y t h e l a s t B y
0114260 t e I s S i g n i f i c a n t
0114300 f l a g . C o p i e s t h
0114320 e r a w d a t a t h e r e
0114340 i n t o O U T S T R E A M "
0114360 ) 006 001 \r \r ( 006 002 b i n d
0114400 006 001 L A S T S E G M E N T ?
0114420 B Y T E W O R D C O U N T 006
0114440 002 d o 006 001 ( S E T Q L A S T
0114460 S E G M E N T ? ( N E Q ( \
0114500 W I N I N S T R E A M ) \r
0114520
*
0114600 0
0114620 ) ) \r
0114640
0114660 ( C O N
0114700 D \r
0114720
0114740 [ (
0114760 N E Q ( S E T Q W O R D C O
0115000 U N T ( U N F O L D ( \ W I
0115020 N I N S T R E A M ) \r
0115040
*
0115140 B Y T E S P E R W O R
0115160 D ) ) \r
0115200
*
0115240 0 ) \r
0115260
*
0115320 ( R P T Q ( S U B
0115340 1 W O R D C O U N T ) \r
0115360
*
0115440 ( \ B O U T O U T S T R E A M
0115460 ( \ B I N I N S T R E A M )
0115500 ) ) \r
0115520
*
0115560 ( S E T Q B Y T E ( \ B I N
0115600 I N S T R E A M ) ) \r
0115620
*
0115700 006 003 ( * ;
0115720 \r 006 001
0115740 006 003 " F i n a l
0115760 b y t e o f t h i s s e
0116000 g m e n t . D o n ' t c o
0116020 p y u n t i l w e k n o w
0116040 w h e t h e r i t ' s s i
0116060 g n i f i c a n t " ) 006 001 \r
0116100
*
0116140 ( C O N D
0116160 \r
0116200
*
0116240 ( ( O R ( N U L L L A S T
0116260 S E G M E N T ? ) \r
0116300
*
0116340 (
0116360 N E Q ( \ W I N I N S T R E
0116400 A M ) \r
0116420
*
0116460 0 )
0116500 ) 006 003 ( * ; \r 006 001
0116520
0116540 006 003 " N o t l a
0116560 s t s e g m e n t , o r t
0116600 h e w o r d a f t e r s a
0116620 y s t h e f i n a l b y t
0116640 e w a s s i g n i f i c a n
0116660 t " ) 006 001 \r
0116700
*
0116740 ( \ B O U T O U
0116760 T S T R E A M B Y T E ] \r
0117000
*
0117040 ( T
0117060 006 003 ( *
0117100 ; \r 006 001
0117120
*
0117160 006 003 " N u l l b o d y
0117200 . T h r o w o u t t h e
0117220 l a s t B y t e I s S i g n i
0117240 f i c a n t f l a g " ) 006 001 \r
0117260
*
0117320 (
0117340 \ W I N I N S T R E A M ) ) )
0117360 006 002 r e p e a t u n t i l 006 001
0117400 L A S T S E G M E N T ? ] ) \r
0117420 \r ( 006 004 \ N S M A I L . R E A D
0117440 . A T T R . S E Q U E N C E 006 001
0117460 \r [ L A M B D A ( M S G S
0117500 T R E A M M S G O U T F I L E
0117520 E N V E L O P E ) 006 003 006 001
0117540
0117560 006 003 ( * b v m % : " 1 3
0117600 - M a y - 8 5 1 2 : 3 0 " ) 006
0117620 001 \r \r
0117640 006 003 ( * ; ; "
0117660 G i v e n a n A T T R I B U
0117700 T E . S E Q U E N C E o b j e
0117720 c t , d e c o d e t h e v
0117740 a l u e s b a s e d o n t
0117760 h e a t t r i b u t e t y p
0120000 e s a n d r e t u r n a
0120020 l i s t o f a t t r i b u t
0120040 e t y p e / v a l u e p a i
0120060 r s . " ) 006 001 \r \r ( P R
0120100 O G ( F O R M A T T E D ? T
0120120 Y P E V A L U E H E A D E R
0120140 F I E L D S L E N G T H N O
0120160 T E B O D Y H E A D E R S S
0120200 E N D E R T Y P E I N F O C
0120220 O E R C E D ) \r
0120240 ( 006 002 f o r 006 001 N 006 002 f
0120260 r o m 006 001 ( \ W I N M S G S
0120300 T R E A M ) 006 002 t o 006 001 1
0120320 006 002 b y 006 001 - 1 \r
0120340 006 002 d o 006 001 ( S
0120360 E T Q T Y P E ( C O U R I E
0120400 R . R E A D M S G S T R E A M
0120420 N I L ' L O N G C A R D I N
0120440 A L ) ) \r
0120460 [ C O N D \r
0120500 ( (
0120520 N O T ( 006 002 f i n d 006 001 006 002
0120540 o l d 006 001 T Y P E I N F O 006
0120560 002 i n 006 001 \ N S M A I L . A T
0120600 T R I B U T E S 006 002 s u c h t
0120620 h a t 006 001 ( E Q ( C A D R
0120640 T Y P E I N F O ) \r
0120660
*
0120760 T Y P E ) ) )
0121000 \r
0121020 ( A N D N S M A I L
0121040 D E B U G F L G ( p r i n t o
0121060 u t P R O M P T W I N D O W
0121100 T " U n r e c o g n i z e d
0121120 a t t r i b u t e " T Y P E
0121140 ) ) \r
0121160 ( C O U R I E R .
0121200 R E A D . S E Q U E N C E M S
0121220 G S T R E A M N I L ' U N S
0121240 P E C I F I E D ) ) \r
0121260 [ (
0121300 E Q ( S E T Q T Y P E ( C
0121320 A R T Y P E I N F O ) ) \r
0121340
0121360 ' N o t e ) \r
0121400 \r
0121420 006 003 ( * ; ; " T h i s
0121440 i s a s t a r m a i l n
0121460 o t e . T r e a t a s b
0121500 o d y o f m e s s a g e .
0121520 I f i t i s n ' t t h e
0121540 l a s t a t t r i b u t e ,
0121560 s a v e i t f o r t h e
0121600 e n d " ) 006 001 \r \r
0121620 ( C
0121640 O N D \r
0121660 ( ( N E Q
0121700 N 1 ) \r
0121720 [ C
0121740 O N D \r
0121760 (
0122000 N O T E B O D Y ( T E R P R I
0122020 N O T E B O D Y ) ) \r
0122040
0122060 ( T ( S E T Q
0122100 N O T E B O D Y ( O P E N S T
0122120 R E A M ' { N O D I R C O R E
0122140 } ' B O T H ] \r
0122160
0122200 ( 006 002 \ N S M A I L . R E A D
0122220 . S T R I N G . A S . S T R E A
0122240 M 006 001 M S G S T R E A M N O
0122260 T E B O D Y ) ) \r
0122300
0122320 ( T ( 006 002 \ N S M A I L . P R
0122340 I N T . H E A D E R F I E L D S
0122360 006 001 M S G O U T F I L E H E
0122400 A D E R F I E L D S E N V E L
0122420 O P E S E N D E R \r
0122440
0122460 N O T
0122500 E B O D Y )
0122520 006 003 ( * ;
0122540 " P r i n t a c c u m u l a t
0122560 e d h e a d e r f i e l d s
0122600 " ) 006 001 \r
0122620 (
0122640 T E R P R I M S G O U T F I L
0122660 E ) \r
0122700 ( 006 002
0122720 \ N S M A I L . R E A D . S T R
0122740 I N G . A S . S T R E A M 006 001
0122760 M S G S T R E A M M S G O U T
0123000 F I L E ) \r
0123020
0123040 ( R E T U R N ] \r
0123060 [ ( E Q
0123100 T Y P E ' L i s p F o r m a
0123120 t t i n g )
0123140 006 003 ( * ; \r 006 001
0123160
*
0123240 006 003 " N
0123260 o t e t h a t t h i s M U
0123300 S T b e p r e c e d e d b
0123320 y N o t e " ) 006 001 \r
0123340 (
0123360 C O N D \r
0123400 ( N O T
0123420 E B O D Y ( 006 002 \ N S M A I L
0123440 . R E A D . S T R I N G . A S .
0123460 S T R E A M 006 001 M S G S T R E
0123500 A M N O T E B O D Y ) \r
0123520
0123540 ( S E T Q
0123560 H E A D E R S ( O P E N S T
0123600 R E A M ' { N O D I R C O R E
0123620 } ' B O T H ) ) \r
0123640
0123660 ( 006 002 \ N S M A
0123700 I L . P R I N T . H E A D E R F
0123720 I E L D S 006 001 H E A D E R S
0123740 H E A D E R F I E L D S E N V
0123760 E L O P E S E N D E R N I L
0124000 ) \r
0124020
0124040 ( T E R P R I H E A D E R S )
0124060 \r
0124100 (
0124120 S E T F I L E P T R H E A D E
0124140 R S 0 ) \r
0124160
0124200 ( S E T Q N O T E B O
0124220 D Y ( O P E N T E X T S T R E
0124240 A M N O T E B O D Y ) ) \r
0124260
0124300 ( T E D
0124320 I T . S E T S E L N O T E B O
0124340 D Y 1 0 ' L E F T ) \r
0124360
0124400 ( T E D
0124420 I T . I N C L U D E N O T E B
0124440 O D Y H E A D E R S ) \r
0124460
0124500 ( P R O G
0124520 N
0124540 006 003 ( * ;
0124560 \r 006 001 006 003 "
0124600 W o u l d l i k e t h i s
0124620 t o b e ( C O E R C E T E X
0124640 T O B J N O T E B O D Y ( Q
0124660 U O T E F I L E ) M S G O U
0124700 T F I L E ) b u t T e d i t
0124720 h a s a b u g " ) 006 001 \r
0124740
*
0125000 ( C O P Y B Y T E S (
0125020 S E T Q C O E R C E D ( O P
0125040 E N S T R E A M ( C O E R C E
0125060 T E X T O B J N O T E B O D Y
0125100 \r
0125120
*
0125220 ' F I L E ) \r
0125240
*
0125320 ' I
0125340 N P U T ) ) \r
0125360
*
0125420 M S G O U T F I L E ) \r
0125440
*
0125500 ( D E L F I L E ( C L
0125520 O S E F C O E R C E D ) ) ) \r
0125540
0125560 ( R
0125600 E T U R N ( S E T Q F O R M
0125620 A T T E D ? T ) ) ) \r
0125640
0125660 ( T ( 006 002 p u s h 006 001
0125700 H E A D E R F I E L D S ( C O
0125720 N S ' L i s p F o r m a t t i
0125740 n g " I n v a l i d f o r m
0125760 a t t i n g " ] \r
0126000 ( T [
0126020 S E T Q V A L U E ( P R O G
0126040 N ( \ W I N M S G S T R E A
0126060 M ) \r
0126100
0126120 ( C O U
0126140 R I E R . R E A D M S G S T R
0126160 E A M ' M A I L T R A N S P O
0126200 R T ( C A D D R T Y P E I N
0126220 F O ] \r
0126240 ( C O N D \r
0126260
0126300 ( ( S E L E C
0126320 T Q T Y P E \r
0126340
0126360 ( ( B o d y T y p e
0126400 B o d y S i z e ) \r
0126420
0126440 N
0126460 I L ) \r
0126500
0126520 ( S e n d e r ( S E T Q
0126540 S E N D E R V A L U E ) ) \r
0126560
0126600 ( F r
0126620 o m [ C O N D \r
0126640
*
0126700 ( ( A N D ( N U L L S E N D
0126720 E R ) \r
0126740
*
0127000 ( N U L L ( C D R V A L U
0127020 E ) ) ) \r
0127040
0127060 ( S E
0127100 T Q S E N D E R ( C A R V
0127120 A L U E ] \r
0127140
0127160 T ) \r
0127200
0127220 T ) \r
0127240
0127260 ( 006 002 p u s h 006
0127300 001 H E A D E R F I E L D S (
0127320 C O N S T Y P E V A L U E ]
0127340 \r 006 002
0127360 f i n a l l y 006 001
0127400
*
0127440 006 003 ( * ; \r 006 001
0127460 006
0127500 003 " N o t e w a s n o t t
0127520 h e f i n a l a t t r i b u
0127540 t e . P r i n t h e a d e
0127560 r s a c c u m u l a t e d ,
0127600 t h e n t h e N o t e l a
0127620 s t " ) 006 001 \r
0127640 ( 006 002 \ N S
0127660 M A I L . P R I N T . H E A D E
0127700 R F I E L D S 006 001 M S G O U T
0127720 F I L E H E A D E R F I E L D
0127740 S E N V E L O P E S E N D E
0127760 R N O T E B O D Y ) ) \r
0130000 ( C O N D \r
0130020 ( ( E Q (
0130040 C A R E N V E L O P E ) \r
0130060
0130100 ' N O )
0130120
0130140 006 003 ( *
0130160 ; \r 006 001
0130200
*
0130240 006 003 " C
0130260 a n ' t r e a d t h i s a
0130300 t t a c h m e n t , l e a v e
0130320 i n m a i l b o x " ) 006 001 \r
0130340 ( p
0130360 r i n t o u t M S G O U T F I
0130400 L E T T \r
0130420 " * *
0130440 * A t t a c h m e n t r e t
0130460 a i n e d i n m a i l b o x
0130500 f o r r e t r i e v a l b
0130520 y o t h e r m e a n s * *
0130540 * " T ) \r
0130560 ( E R R O R ! ) ) \r
0130600 ( T ( R
0130620 E T U R N F O R M A T T E D ?
0130640 ] ) \r \r ( 006 004 \ N S M A I L . R
0130660 E A D . S T R I N G . A S . S T
0130700 R E A M 006 001 \r [ L A M B D A
0130720 ( I N S T R E A M O U T S T
0130740 R E A M ) 006 003 006 001
0130760
0131000 006 003 ( * b v m
0131020 % : " 3 0 - J u l - 8 4 1 6
0131040 : 1 3 " ) 006 001 \r
0131060 \r 006 003 (
0131100 * ; ; " C o n s i d e r s
0131120 I N S T R E A M t o b e p
0131140 o s i t i o n e d a t a s
0131160 e q u e n c e o f u n s p e
0131200 c i f i e d , a n d r e a d
0131220 s i t a s i f i t s d
0131240 a t a t y p e w e r e s t r
0131260 i n g , a n d c o p i e s
0131300 s a i d b y t e s t o O U
0131320 T S T R E A M " ) 006 001 \r \r
0131340 ( P R O G ( L E N G T H ) \r
0131360 ( \ W I N
0131400 I N S T R E A M )
0131420
0131440 006 003 (
0131460 * ; " S k i p s e q u e n
0131500 c e c o u n t " ) 006 001 \r
0131520 ( C O P Y B Y T E
0131540 S I N S T R E A M O U T S T
0131560 R E A M ( S E T Q L E N G T
0131600 H ( \ W I N I N S T R E A M
0131620 ) ) ) \r ( C
0131640 O N D \r
0131660 ( ( O D D P L E N G T H ) \r
0131700 ( \
0131720 B I N I N S T R E A M ] ) \r \r
0131740 ( 006 004 \ N S M A I L . P R I N T
0131760 . H E A D E R F I E L D S 006 001 \r
0132000 [ L A M B D A ( M S G O U
0132020 T F I L E H E A D E R F I E L
0132040 D S E N V E L O P E S E N D
0132060 E R N O T E B O D Y ) 006 003 006 001
0132100 006 003 ( * b v m % : " 2 4 -
0132120 M a y - 8 5 1 8 : 2 6 " ) 006 001
0132140 \r ( P R O G ( T Y P E
0132160 V A L U E I D ) \r
0132200 ( S E T Q H E A D E
0132220 R F I E L D S ( R E V E R S E
0132240 H E A D E R F I E L D S ) ) \r
0132260 [ C O N D \r
0132300 ( E N
0132320 V E L O P E \r
0132340 \r 006 003 (
0132360 * ; ; " P r e s c a n H E
0132400 A D E R F I E L D S t o s e
0132420 e i f t h e r e i s a n
0132440 y a d d i t i o n a l i n f
0132460 o w e s h o u l d s u p p
0132500 l y t h a t w a s n ' t i
0132520 n t h e m e s s a g e " ) 006
0132540 001 \r \r
0132560 ( 006 002 f o r 006 001
0132600 P A I R 006 002 i n 006 001 E N V E
0132620 L O P E \r
0132640 006 002 d o
0132660 006 001 ( S E T Q V A L U E (
0132700 C A D R P A I R ) ) \r
0132720
0132740 ( S E L E C T Q (
0132760 S E T Q T Y P E ( C A R P
0133000 A I R ) ) \r
0133020
0133040 ( ( T r a n s p o r t P
0133060 r o b l e m P r e v i o u s R
0133100 e c i p i e n t s ) \r
0133120
0133140 (
0133160 006 002 p u s h 006 001 H E A D E R F
0133200 I E L D S ( C O N S T Y P E
0133220 V A L U E ) ) ) \r
0133240
0133260 ( P o s t m a r
0133300 k [ C O N D \r
0133320
*
0133360 ( ( N U L L ( A S S O C
0133400 ' D a t e H E A D E R F I E
0133420 L D S ) ) \r
0133440
*
0133500 ( 006 002 p u s h 006 001 H E A D
0133520 E R F I E L D S ( C O N S '
0133540 D a t e ( C O U R I E R . F E
0133560 T C H \r
0133600
*
0133700 ( M A I L T R A N S P O R T .
0133720 P O S T M A R K \r
0133740
*
0134040 ) \r
0134060
*
0134160 T I M E o f V A L
0134200 U E ] ) \r
0134220
0134240 ( O r i g i n a t o r [
0134260 C O N D \r
0134300
*
0134340 [ ( N U L L S E N D E R )
0134360 \r
0134400
0134420 (
0134440 006 002 p u s h 006 001 H E A D E R F
0134460 I E L D S ( C O N S ' S e n
0134500 d e r ( S E T Q S E N D E R
0134520 V A L U E ] \r
0134540
*
0134600 ( ( N O T ( E Q U A
0134620 L . C H . N A M E S S E N D E
0134640 R V A L U E ) ) \r
0134660
*
0134740 006 003 ( * ; \r 006
0134760 001
0135000
0135020 006 003 " M e s s a g e h a s
0135040 a S e n d e r f i e l d ,
0135060 b u t i t ' s n o t t h e
0135100 s a m e a s t h e O r i
0135120 g i n a t o r " ) 006 001 \r
0135140
*
0135200 ( 006 002 p u s
0135220 h 006 001 H E A D E R F I E L D S
0135240 ( C O N S T Y P E V A L U
0135260 E ] ) \r
0135300
0135320 ( B o d y T y p e [ C O N
0135340 D \r
0135360
0135400 ( ( N
0135420 O T ( M E M B V A L U E \
0135440 N S M A I L . G O O D . B O D Y
0135460 T Y P E S ) ) \r
0135500
*
0135540 ( N C O N C 1 H E A D
0135560 E R F I E L D S ( C O N S '
0135600 A t t a c h m e n t V A L U E
0135620 ] ) \r
0135640
0135660 ( M e s s a g e - I D ( S E
0135700 T Q I D V A L U E ) ) \r
0135720
0135740 N I L ]
0135760 \r ( 006 002 f o
0136000 r 006 001 P A I R 006 002 i n 006 001
0136020 H E A D E R F I E L D S 006 002 w
0136040 h e n 006 001 ( S E T Q V A L U
0136060 E ( C D R P A I R ) ) \r
0136100 006 002 d o 006
0136120 001 ( p r i n t o u t M S G O
0136140 U T F I L E ( S E T Q T Y P
0136160 E ( C A R P A I R ) ) \r
0136200
0136220 " : " ) \r
0136240 ( S E L E
0136260 C T Q T Y P E \r
0136300 ( D a
0136320 t e ( p r i n t o u t M S G
0136340 O U T F I L E ( G D A T E V
0136360 A L U E ( D A T E F O R M A T
0136400 N O . S E C O N D S S P A C
0136420 E S ) ) ) ) \r
0136440 ( ( F r o
0136460 m T o c c R e p l y - t o
0136500 ) \r
0136520 ( 006 002 \
0136540 N S M A I L . P R I N T . N A M
0136560 E S 006 001 V A L U E M S G O U
0136600 T F I L E ( S E L E C T Q T
0136620 Y P E \r
0136640
*
0136720 ( ( F r o m R e
0136740 p l y - t o ) \r
0136760
*
0137060 N I L ) \r
0137100
*
0137160 S E N D E R )
0137200 ) ) \r
0137220 ( ( S e n d e r
0137240 O r i g i n a t o r ) \r
0137260
0137300 ( p r i n t o u t
0137320 M S G O U T F I L E ( N S N A
0137340 M E . T O . S T R I N G V A L
0137360 U E T ) ) ) \r
0137400 ( A t t
0137420 a c h m e n t ( p r i n t o u
0137440 t M S G O U T F I L E " % "
0137460 T y p e " | . I 1 | V A L
0137500 U E " I D " | . P 2 |
0137520 I D " % " " ) \r
0137540
0137560 ( R P L A C A
0137600 E N V E L O P E ' N O ) ) \r
0137620
0137640 ( P R I N 1 V A L U E
0137660 M S G O U T F I L E ) ) \r
0137700 ( T
0137720 E R P R I M S G O U T F I L E
0137740 ) ) \r ( C O
0137760 N D \r
0140000 ( N O T E B O D Y ( T E R P R
0140020 I M S G O U T F I L E ) \r
0140040
0140060 ( C O P Y B Y T E S N O T
0140100 E B O D Y M S G O U T F I L E
0140120 0 - 1 ) \r
0140140 ( T E R P
0140160 R I M S G O U T F I L E ] ) \r
0140200 \r ( 006 004 \ N S M A I L . P R I N
0140220 T . N A M E S 006 001 \r [ L A M
0140240 B D A ( N S N A M E S O U T
0140260 S T R E A M D E F A U L T N A
0140300 M E ) 006 003 006 001
0140320 006 003 ( *
0140340 b v m % : " 3 - J u l - 8 4
0140360 1 2 : 5 3 " ) 006 001 \r (
0140400 006 002 f o r 006 001 N A M E 006 002 i
0140420 n 006 001 N S N A M E S 006 002 b i
0140440 n d 006 001 ( F I R S T T I M E
0140460 _ T ) 006 002 d o 006 001 ( C O N
0140500 D \r
0140520
*
0140560 ( F I R S T T I M E
0140600 ( S E T Q F I R S T T I M E
0140620 N I L ) ) \r
0140640
*
0140700 ( T ( p
0140720 r i n t o u t O U T S T R E A
0140740 M " , " ) ) ) \r
0140760
*
0141020 ( P R I N
0141040 1 ( N S N A M E . T O . S T R
0141060 I N G N A M E T ) \r
0141100
*
0141160 O U T S T R E A M ] ) \r
0141200 ) \r ( D E F I N E Q \r \r ( 006 004 N
0141220 S . C L O S E M A I L B O X 006 001
0141240 \r [ L A M B D A ( M A I L
0141260 B O X F L U S H ? ) 006 003 006 001
0141300
*
0141340 006 003 ( * b v m % : " 2 2
0141360 - M a y - 8 5 1 2 : 5 8 " ) 006
0141400 001 \r ( P R O G ( ( S T
0141420 A T E ( 006 002 f e t c h 006 001 N
0141440 S M A I L S T A T E 006 002 o f 006
0141460 001 M A I L B O X ) ) \r
0141500 R E S U L T ) \r
0141520