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