$ od -c -N 50000 [eris]<Lisp>LIBRARY>GRAPEVINE.DCOM!1
0000000 ( F I L E C R E A T E D " 3
0000020 - N O V - 8 3 2 2 : 5 4 : 1 1
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P C
0000100 O R E > L I B R A R Y > G R A P
0000120 E V I N E . ; 1 ) \r " 2 - N
0000140 O V - 8 3 1 7 : 0 0 : 0 2 "
0000160 r e c o m p i l e d c h a n g
0000200 e s : G V . M A K E K E Y i
0000220 n W O R K d a t e d " 2
0000240 - N O V - 8 3 1 8 : 5 2 : 1 2
0000260 " ) \r ( F I L E C R E A T E D
0000300 " 3 - N O V - 8 3 2 2 : 5 3
0000320 : 2 0 " { P H Y L U M } < L I
0000340 S P C O R E > L I B R A R Y > G
0000360 R A P E V I N E . ; 1 3 8 3 5
0000400 9 c h a n g e s t o : ( F
0000420 N S \r G V . M A K E K E Y )
0000440 p r e v i o u s d a t e : "
0000460 1 7 - S E P - 8 3 1 6 : 0 9 :
0000500 4 3 " { P H Y L U M } < L I S
0000520 P > L I B R A R Y > G R A P E V
0000540 I N E . ; 1 ) \r G V . A U T H E
0000560 N T I C A T E D 1 \r ( I 1
0000600 K E Y I 0 N A M E ) \0 021
0000620 \0 \0 \0 002 l \t @ \t \0 \0 A \t \0 \0 h 032
0000640 \v \0 \0 020 \0 ( 1 6 Q \ G V O P
0000660 1 1 Q \ C H E C K K E Y 5
0000700 \ C H E C K N A M E ) \r N I L \r
0000720 N I L \r G V . C H E C K S T A M
0000740 P D 1 \r ( I 1 O L D S T A
0000760 M P I 0 N A M E ) \0 024 \0
0001000 \0 \0 002 l 006 @ \t \0 \0 A \t \0 \0 h 032 g
0001020 \0 \0 \f \0 \0 020 \0 ( 2 1 Q \ G V O
0001040 P 1 1 Q \ C H E C K S T A M
0001060 P 5 \ C H E C K N A M E ) \r
0001100 ( 1 6 Q \ R E C E I V E S T A
0001120 M P ) \r N I L \r G V . E X P A N
0001140 D D 1 \r ( I 1 O L D S T A
0001160 M P I 0 N A M E ) \0 023 \0
0001200 \0 \0 002 k @ \t \0 \0 A \t \0 \0 h 032 g \0
0001220 \0 \f \0 \0 020 \0 ( 2 0 Q \ G V O P
0001240 1 0 Q \ C H E C K S T A M P
0001260 4 \ C H E C K N A M E ) \r (
0001300 1 5 Q \ R E C E I V E R L I S
0001320 T ) \r N I L \r G V . I D E N T I
0001340 F Y C A L L E R D 1 \r ( I 1
0001360 K E Y I 0 N A M E ) \0
0001400 021 \0 \0 \0 002 l ! @ \t \0 \0 A \t \0 \0 h
0001420 032 \v \0 \0 020 \0 ( 1 6 Q \ G V O P
0001440 1 1 Q \ C H E C K K E Y 5
0001460 \ C H E C K N A M E ) \r N I L
0001500 \r N I L \r G V . I D E N T I F Y
0001520 M E D 1 \r ( P 0 n p w )
0001540 \0 020 001 \0 \0 \0 h \t \0 \0 021 001 \0 H 001 H
0001560 002 \n \0 \0 020 \0 ( 1 5 Q G V . I D
0001600 E N T I F Y C A L L E R 3 \
0001620 I N T E R N A L / G E T P A S S
0001640 W O R D ) \r N I L \r N I L \r G V
0001660 . I S I N L I S T D 1 \r ( I
0001700 4 W H E R E I 3 W H I C
0001720 H I 2 W H A T I 1 S
0001740 T R I N G I 0 N A M E )
0001760 \0 ) \0 \0 \0 005 l . @ \t \0 \0 A \t \0 \0
0002000 ` \0 \0 B 265 003 j C 265 003 j D 265 003 j h
0002020 032 032 032 032 h 032 032 g \0 \0 \f \0 \0 020 \0 (
0002040 4 6 Q \ G V O P 1 1 Q \ C
0002060 H E C K S T R I N G 5 \ C H
0002100 E C K N A M E ) \r ( 4 3 Q \ R
0002120 E C E I V E B O O L 1 4 Q \
0002140 3 B Y T E K L U D G E K E Y ) \r
0002160 N I L \r G V . I S M E M B E R C
0002200 L O S U R E D 1 \r ( I 1 S
0002220 T R I N G I 0 N A M E )
0002240 \0 024 \0 \0 \0 002 l + @ \t \0 \0 A \t \0 \0
0002260 h 032 g \0 \0 \f \0 \0 020 \0 ( 2 1 Q \
0002300 G V O P 1 1 Q \ C H E C K S
0002320 T R I N G 5 \ C H E C K N A
0002340 M E ) \r ( 1 6 Q \ R E C E I V
0002360 E B O O L ) \r N I L \r G V . I S
0002400 M E M B E R D I R E C T D 1 \r
0002420 ( I 1 S T R I N G I 0
0002440 N A M E ) \0 024 \0 \0 \0 002 l ( @ \t
0002460 \0 \0 A \t \0 \0 h 032 g \0 \0 \f \0 \0 020 \0
0002500 ( 2 1 Q \ G V O P 1 1 Q \
0002520 C H E C K S T R I N G 5 \ C
0002540 H E C K N A M E ) \r ( 1 6 Q \
0002560 R E C E I V E B O O L ) \r N I L
0002600 \r G V . R E A D C O N N E C T
0002620 D 1 \r ( I 0 N A M E ) \0 017
0002640 \0 \0 \0 001 l \a @ \t \0 \0 h g \0 \0 \f \0
0002660 \0 020 \0 ( 1 4 Q \ G V O P 5
0002700 \ C H E C K N A M E ) \r ( 1 1 Q
0002720 \ R E C E I V E R N A M E ) \r
0002740 N I L \r G V . R E A D E N T R Y
0002760 D 1 \r ( I 1 O L D S T A M
0003000 P I 0 N A M E ) \0 024 \0 \0
0003020 \0 002 l 005 @ \t \0 \0 A \t \0 \0 h 032 g \0
0003040 \0 \f \0 \0 020 \0 ( 2 1 Q \ G V O P
0003060 1 1 Q \ C H E C K S T A M P
0003100 5 \ C H E C K N A M E ) \r (
0003120 1 6 Q \ R E C E I V E C L I S
0003140 T ) \r N I L \r G V . R E A D F R
0003160 I E N D S D 1 \r ( I 1 O L
0003200 D S T A M P I 0 N A M E )
0003220 \0 024 \0 \0 \0 002 l 004 @ \t \0 \0 A \t \0
0003240 \0 h 032 g \0 \0 \f \0 \0 020 \0 ( 2 1 Q
0003260 \ G V O P 1 1 Q \ C H E C K
0003300 S T A M P 5 \ C H E C K N A
0003320 M E ) \r ( 1 6 Q \ R E C E I V
0003340 E R L I S T ) \r N I L \r G V . R
0003360 E A D M E M B E R S D 1 \r ( I
0003400 1 O L D S T A M P I 0
0003420 N A M E ) \0 024 \0 \0 \0 002 l 002 @ \t
0003440 \0 \0 A \t \0 \0 h 032 g \0 \0 \f \0 \0 020 \0
0003460 ( 2 1 Q \ G V O P 1 1 Q \
0003500 C H E C K S T A M P 5 \ C H
0003520 E C K N A M E ) \r ( 1 6 Q \ R
0003540 E C E I V E R L I S T ) \r N I L
0003560 \r G V . R E A D O W N E R S D
0003600 1 \r ( I 1 O L D S T A M P
0003620 I 0 N A M E ) \0 024 \0 \0 \0 002
0003640 l 003 @ \t \0 \0 A \t \0 \0 h 032 g \0 \0 \f
0003660 \0 \0 020 \0 ( 2 1 Q \ G V O P 1
0003700 1 Q \ C H E C K S T A M P 5
0003720 \ C H E C K N A M E ) \r ( 1 6
0003740 Q \ R E C E I V E R L I S T )
0003760 \r N I L \r G V . R E A D R E M A
0004000 R K D 1 \r ( I 0 N A M E )
0004020 \0 017 \0 \0 \0 001 l \b @ \t \0 \0 h g \0
0004040 \0 \f \0 \0 020 \0 ( 1 4 Q \ G V O P
0004060 5 \ C H E C K N A M E ) \r (
0004100 1 1 Q \ R E C E I V E R N A M
0004120 E ) \r N I L \r G V . A D D F O R
0004140 W A R D D 1 \r ( I 3 P A S
0004160 S W O R D I 2 I D E N T I
0004200 F Y U S E R I 1 S T R I N
0004220 G I 0 N A M E ) \0 030 \0 \0
0004240 \0 004 l 025 @ \t \0 \0 A \t \0 \0 h 032 h B
0004260 265 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q \
0004300 G V O P 1 1 Q \ C H E C K S
0004320 T R I N G 5 \ C H E C K N A
0004340 M E ) \r N I L \r N I L \r G V . A
0004360 D D F R I E N D D 1 \r ( I 3
0004400 P A S S W O R D I 2 I D
0004420 E N T I F Y U S E R I 1 S
0004440 T R I N G I 0 N A M E )
0004460 \0 030 \0 \0 \0 004 l 027 @ \t \0 \0 A \t \0 \0
0004500 h 032 h B 265 003 i C \r 006 \0 \0 020 \0 ( 2
0004520 5 Q \ G V O P 1 1 Q \ C H
0004540 E C K S T R I N G 5 \ C H E
0004560 C K N A M E ) \r N I L \r N I L \r
0004600 G V . A D D L I S T O F M E M B
0004620 E R S D 1 \r ( P 1 p I
0004640 3 P A S S W O R D I 2 I
0004660 D E N T I F Y U S E R I 1
0004700 S T R I N G L I S T I 0 N
0004720 A M E ) \0 ^ 002 \0 \0 004 l 037 @ \t \0
0004740 \0 A 003 265 027 o \0 \0 \0 A \n \0 \0 h 032 h
0004760 B 265 003 i C \r 006 \0 \0 020 001 005 \a 247 A 001
0005000 004 l 004 360 262 341 A 021 021 001 H Y 003 265 \t i
0005020 022 262 324 A 260 331 002 262 035 I 002 001 005 \a 250 I
0005040 002 001 004 l 004 360 264 352 I 001 I 002 001 \n \0 \0
0005060 242 h 260 336 I 002 260 325 \0 ( 1 2 4 Q A
0005100 L P H O R D E R 3 5 Q \ G V
0005120 O P 2 1 Q E R R O R 5 \
0005140 C H E C K N A M E ) \r N I L \r (
0005160 1 5 Q " m u s t h a v e o
0005200 r d e r e d l i s t o f s
0005220 t r i n g s " ) \r G V . A D D M
0005240 A I L B O X D 1 \r ( I 3 P
0005260 A S S W O R D I 2 I D E N
0005300 T I F Y U S E R I 1 S T R
0005320 I N G I 0 N A M E ) \0 030
0005340 \0 \0 \0 004 l 024 @ \t \0 \0 A \t \0 \0 h 032
0005360 h B 265 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q
0005400 \ G V O P 1 1 Q \ C H E C
0005420 K S T R I N G 5 \ C H E C K
0005440 N A M E ) \r N I L \r N I L \r G V
0005460 . A D D M E M B E R D 1 \r ( I
0005500 3 P A S S W O R D I 2
0005520 I D E N T I F Y U S E R I 1
0005540 S T R I N G I 0 N A M E
0005560 ) \0 030 \0 \0 \0 004 l 023 @ \t \0 \0 A \t
0005600 \0 \0 h 032 h B 265 003 i C \r 006 \0 \0 020 \0
0005620 ( 2 5 Q \ G V O P 1 1 Q \
0005640 C H E C K S T R I N G 5 \ C
0005660 H E C K N A M E ) \r N I L \r N I
0005700 L \r G V . A D D O W N E R D 1
0005720 \r ( I 3 P A S S W O R D I
0005740 2 I D E N T I F Y U S E R
0005760 I 1 S T R I N G I 0 N
0006000 A M E ) \0 030 \0 \0 \0 004 l 026 @ \t \0
0006020 \0 A \t \0 \0 h 032 h B 265 003 i C \r 006 \0
0006040 \0 020 \0 ( 2 5 Q \ G V O P 1 1
0006060 Q \ C H E C K S T R I N G 5
0006100 \ C H E C K N A M E ) \r N I L
0006120 \r N I L \r G V . C H A N G E C O
0006140 N N E C T D 1 \r ( I 3 P A
0006160 S S W O R D I 2 I D E N T
0006200 I F Y U S E R I 1 S I T E
0006220 I 0 N A M E ) \0 E \0 \0 \0
0006240 004 l 021 @ \t \0 \0 A 005 \a 265 1 A d 004 l
0006260 004 360 222 d 263 ' 003 263 026 A d d 005 001 245 d
0006300 005 002 241 005 003 247 253 ` \0 \0 b 002 225 A \t \0
0006320 \0 265 \n o \0 \0 \0 A \n \0 \0 h 032 h B C
0006340 \r 006 \0 \0 020 \0 ( 1 0 2 Q \ G V O
0006360 P 7 1 Q E R R O R 5 7 Q
0006400 P O R T S T R I N G 5 \ C H
0006420 E C K N A M E ) \r ( 5 0 Q \ L
0006440 O C A L P U P N E T H O S T ) \r
0006460 ( 6 5 Q " I n v a l i d S i
0006500 t e " ) \r G V . C H A N G E P A
0006520 S S W O R D D 1 \r ( I 3 P
0006540 A S S W O R D I 2 I D E N
0006560 T I F Y U S E R I 1 K E Y
0006600 I 0 N A M E ) \0 030 \0 \0 \0
0006620 004 l 020 @ \t \0 \0 A \t \0 \0 h 032 h B 265
0006640 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q \ G
0006660 V O P 1 1 Q \ C H E C K K E
0006700 Y 5 \ C H E C K N A M E ) \r
0006720 N I L \r N I L \r G V . C H A N G
0006740 E R E M A R K D 1 \r ( I 3
0006760 P A S S W O R D I 2 I D E
0007000 N T I F Y U S E R I 1 S T
0007020 R I N G I 0 N A M E ) \0
0007040 030 \0 \0 \0 004 l 022 @ \t \0 \0 A \t \0 \0 h
0007060 032 h B 265 003 i C \r 006 \0 \0 020 \0 ( 2 5
0007100 Q \ G V O P 1 1 Q \ C H E
0007120 C K S T R I N G 5 \ C H E C
0007140 K N A M E ) \r N I L \r N I L \r G
0007160 V . C R E A T E G R O U P D 1
0007200 \r ( I 2 P A S S W O R D I
0007220 1 I D E N T I F Y U S E R
0007240 I 0 N A M E ) \0 023 \0 \0 \0 003
0007260 l 016 @ \t \0 \0 h d A 265 003 i B \r 006 \0
0007300 \0 020 \0 ( 2 0 Q \ G V O P 5
0007320 \ C H E C K N A M E ) \r N I L \r
0007340 N I L \r G V . C R E A T E I N D
0007360 I V I D U A L D 1 \r ( I 3
0007400 P A S S W O R D I 2 I D E
0007420 N T I F Y U S E R I 1 K E
0007440 Y I 0 N A M E ) \0 030 \0 \0
0007460 \0 004 l \f @ \t \0 \0 A \t \0 \0 h 032 h B
0007500 265 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q \
0007520 G V O P 1 1 Q \ C H E C K K
0007540 E Y 5 \ C H E C K N A M E )
0007560 \r N I L \r N I L \r G V . D E L E
0007600 T E G R O U P D 1 \r ( I 2
0007620 P A S S W O R D I 1 I D E
0007640 N T I F Y U S E R I 0 N A
0007660 M E ) \0 023 \0 \0 \0 003 l 017 @ \t \0 \0
0007700 h d A 265 003 i B \r 006 \0 \0 020 \0 ( 2 0
0007720 Q \ G V O P 5 \ C H E C K
0007740 N A M E ) \r N I L \r N I L \r G V
0007760 . D E L E T E I N D I V I D U A
0010000 L D 1 \r ( I 2 P A S S W O
0010020 R D I 1 I D E N T I F Y U
0010040 S E R I 0 N A M E ) \0 023
0010060 \0 \0 \0 003 l \r @ \t \0 \0 h d A 265 003 i
0010100 B \r 006 \0 \0 020 \0 ( 2 0 Q \ G V O
0010120 P 5 \ C H E C K N A M E ) \r
0010140 N I L \r N I L \r G V . N E W N A
0010160 M E D 1 \r ( I 3 P A S S W
0010200 O R D I 2 I D E N T I F Y
0010220 U S E R I 1 G V . N E W N
0010240 A M E I 0 N A M E ) \0 030
0010260 \0 \0 \0 004 l @ \t \0 \0 A \t \0 \0 h 032
0010300 h B 265 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q
0010320 \ G V O P 1 1 Q \ C H E C
0010340 K N A M E 5 \ C H E C K N A
0010360 M E ) \r N I L \r N I L \r G V . R
0010400 E M O V E F O R W A R D D 1 \r
0010420 ( I 3 P A S S W O R D I
0010440 2 I D E N T I F Y U S E R I
0010460 1 S T R I N G I 0 N A
0010500 M E ) \0 030 \0 \0 \0 004 l 032 @ \t \0 \0
0010520 A \t \0 \0 h 032 h B 265 003 i C \r 006 \0 \0
0010540 020 \0 ( 2 5 Q \ G V O P 1 1 Q
0010560 \ C H E C K S T R I N G 5
0010600 \ C H E C K N A M E ) \r N I L \r
0010620 N I L \r G V . R E M O V E F R I
0010640 E N D D 1 \r ( I 3 P A S S
0010660 W O R D I 2 I D E N T I F
0010700 Y U S E R I 1 S T R I N G
0010720 I 0 N A M E ) \0 030 \0 \0 \0
0010740 004 l 034 @ \t \0 \0 A \t \0 \0 h 032 h B 265
0010760 003 i C \r 006 \0 \0 020 \0 ( 2 5 Q \ G
0011000 V O P 1 1 Q \ C H E C K S T
0011020 R I N G 5 \ C H E C K N A M
0011040 E ) \r N I L \r N I L \r G V . R E
0011060 M O V E M A I L B O X D 1 \r (
0011100 I 3 P A S S W O R D I 2
0011120 I D E N T I F Y U S E R I
0011140 1 S T R I N G I 0 N A M
0011160 E ) \0 030 \0 \0 \0 004 l 031 @ \t \0 \0 A
0011200 \t \0 \0 h 032 h B 265 003 i C \r 006 \0 \0 020
0011220 \0 ( 2 5 Q \ G V O P 1 1 Q
0011240 \ C H E C K S T R I N G 5 \
0011260 C H E C K N A M E ) \r N I L \r N
0011300 I L \r G V . R E M O V E M E M B
0011320 E R D 1 \r ( I 3 P A S S W
0011340 O R D I 2 I D E N T I F Y
0011360 U S E R I 1 S T R I N G
0011400 I 0 N A M E ) \0 030 \0 \0 \0 004
0011420 l 030 @ \t \0 \0 A \t \0 \0 h 032 h B 265 003
0011440 i C \r 006 \0 \0 020 \0 ( 2 5 Q \ G V
0011460 O P 1 1 Q \ C H E C K S T R
0011500 I N G 5 \ C H E C K N A M E
0011520 ) \r N I L \r N I L \r G V . R E M
0011540 O V E O W N E R D 1 \r ( I 3
0011560 P A S S W O R D I 2 I D
0011600 E N T I F Y U S E R I 1 S
0011620 T R I N G I 0 N A M E )
0011640 \0 030 \0 \0 \0 004 l 033 @ \t \0 \0 A \t \0 \0
0011660 h 032 h B 265 003 i C \r 006 \0 \0 020 \0 ( 2
0011700 5 Q \ G V O P 1 1 Q \ C H
0011720 E C K S T R I N G 5 \ C H E
0011740 C K N A M E ) \r N I L \r N I L \r
0011760 G V . M A K E K E Y D 1 \r ( P
0012000 3 C P 2 J P 1 R
0012020 P 0 I I 1 I S C L E
0012040 A R I 0 S T R I N G ) \0
0012060 J 004 \0 \0 002 j l \b o \0 \0 \0 j d \f \0
0012100 \0 021 " 003 @ H k 330 ) [ 262 2 I H l \a
0012120 345 Z I J ( A 244 K l I 346 273 l A K 361
0012140 254 K d l Z 361 247 l A 331 l a 330 200 K 340
0012160 l 377 345 346 * 277 H k 330 270 260 312 I 020 \0 (
0012200 1 3 Q A R R A Y ) \r N I L \r (
0012220 6 ( B I T S 1 0 Q ) ) \r \
0012240 G V O P D 1 \r ( P 0 R C
0012260 I 5 P A S S W O R D I 4
0012300 I D E N T I F Y U S E R I
0012320 3 R E A D F N I 2 i t e
0012340 m L i s t I 1 n a m e I
0012360 0 O P ) \0 N 001 \0 \0 006 021 020 \0
0012400 A @ A B 032 032 C D E \r 005 \0 \0 X d d
0012420 005 001 245 d 005 002 241 005 003 262 0 d l 006 360 223
0012440 g \0 \0 020 k 360 223 g \0 \0 020 H d l 003 360
0012460 223 g \0 \0 020 l \a 360 223 g \0 \0 020 H l \t
0012500 360 223 g \0 \0 020 \b \0 \0 020 \0 ( 1 1 3 Q
0012520 S H O U L D N T 1 7 Q \ E
0012540 N Q U I R E ) \r ( 1 0 7 Q A l
0012560 l D o w n 7 6 Q B a d P a s
0012600 s w o r d 6 6 Q N o t A l l
0012620 o w e d 5 4 Q N o C h a n g
0012640 e 4 5 Q B a d R N a m e ) \r
0012660 N I L \r \ E N Q U I R E D 1 \r
0012700 ( P 3 I N F O P 2 C O
0012720 N N P 1 R E S U L T P
0012740 0 R E G I S T R Y I 4 P
0012760 A S S W O R D I 3 I D E N
0013000 T I F Y U S E R I 2 R E A
0013020 D F N I 1 A R G S I 0
0013040 N A M E F 4 G V N A M E
0013060 T Y P E ) \0 347 004 001 \0 005 ` \0 \0 021
0013100 1 003 H \t \0 \0 Z 243 g \0 \0 020 C 265 026 J
0013120 A \n \0 \0 Y 265 003 202 261 \0 207 J 002 002 h 030
0013140 277 260 341 i 360 227 \b \0 \0 [ 001 b 006 277 J d
0013160 002 002 002 002 002 001 C 360 263 330 002 002 002 002 002 001
0013200 C \n \0 \0 263 313 J l ! C \t \0 \0 D 265 004
0013220 K 002 \t \0 \0 h 032 032 032 \n \0 \0 Y 265 \n J
0013240 002 002 h 030 277 260 235 343 d l 006 360 225 277 g \0
0013260 \0 260 037 d l \a 360 225 277 g \0 \0 260 024 d l
0013300 \t 360 224 277 g \0 \0 207 j 360 221 h 202 \b \0 \0
0013320 Y 265 @ J 002 002 002 002 002 C 030 277 261 377 s l
0013340 377 345 c \b 277 I 343 Y d k 360 263 037 d j 360
0013360 233 277 B 226 J 001 k B 017 016 215 i 213 l \b 360
0013400 231 H ` \0 \0 360 252 l 006 Y 277 J 002 002 h 030
0013420 I 020 J 002 002 h 030 277 @ 002 g \0 \0 032 X 261
0013440 377 $ \0 ( 2 2 3 Q S H O U L D N
0013460 T 1 3 7 Q \ P E R F O R M G
0013500 V O P 1 3 0 Q \ C H E C K K
0013520 E Y 1 2 0 Q \ C H E C K N A
0013540 M E 1 0 7 Q E Q U A L 5 4
0013560 Q \ I N T E R N A L / G E T P
0013600 A S S W O R D 2 7 Q \ P E R
0013620 F O R M G V O P 1 1 Q F I N
0013640 D R E G S E R V E R ) \r ( 3 4 0
0013660 Q G V 3 1 0 Q R E G R O O
0013700 T 2 1 2 Q A l l D o w n 1
0013720 7 7 Q B a d P a s s w o r d
0013740 1 6 4 Q B a d R N a m e 1 6
0013760 Q A l l D o w n 2 R E G R
0014000 O O T ) \r N I L \r \ P E R F O R
0014020 M G V O P A 0 0 2 2 D 1 \r ( N
0014040 A M E E R R O R S E T L (
0014060 2 E R R O R S E T . W 1 E
0014100 R R O R S E T . V 0 E R R O
0014120 R S E T . U ) P 2 e P
0014140 0 S T R E A M F 3 C O N
0014160 N F 4 A R G S ) \0 ) 003 002
0014200 \0 003 S 002 001 021 021 001 T 213 d 001 021 001 002 H
0014220 J \n \0 \0 023 002 003 265 363 H \t \0 \0 277 S 001
0014240 Y 341 I 330 022 h 032 020 \0 ( 3 2 Q
0014260 B S P F O R C E O U T P U T 2
0014300 1 Q \ S E N D I T E M ) \r N I
0014320 L \r N I L \r \ P E R F O R M G V
0014340 O P D 1 \r ( I 1 A R G S
0014360 I 0 C O N N ) \0 \v \0 \0 \0 002
0014400 o \0 \0 \0 i \n \0 \0 001 020 \0 ( 7 \ P
0014420 E R F O R M G V O P A 0 0 2 2 )
0014440 \r N I L \r ( 3 ( D U M M Y . F
0014460 O R . E R R O R S E T ) ) \r F I
0014500 N D R E G S E R V E R D 1 \r (
0014520 P 0 N E W S O C I 1 E
0014540 R R O R F L G I 0 R E G I
0014560 S T R Y ) \0 n 003 \0 \0 002 021 0 002 @
0014600 003 246 @ \t \0 \0 b \0 277 ` \0 \0 Y 003 265 7
0014620 h 265 3 @ A \n \0 \0 l * l ( ` \0 \0 \f
0014640 \0 \0 X 265 016 A 264 036 o \0 \0 \0 @ \n \0 \0
0014660 020 002 002 002 @ 030 H 002 002 i 030 H ` \0 \0 032
0014700 027 \0 \0 H 020 001 Z 002 002 001 263 033 @ ` \0 \0
0014720 360 251 @ J 002 002 002 001 \n \0 \0 230 J 002 002 i
0014740 030 277 J 260 256 I 002 260 245 \0 ( 1 3 6 Q
0014760 E Q U A L 6 3 Q E R R O R
0015000 4 5 Q O P E N C L O S E S T S
0015020 O C K E T 3 3 Q L O C A T E
0015040 S O C K E T S 1 1 Q \ U N P
0015060 A C K R E G ) \r ( 1 2 3 Q R E
0015100 G R O O T 1 0 6 Q \ G V C O
0015120 N N E C T I O N S 1 0 2 Q \
0015140 G V C O N N E C T I O N S 4 2
0015160 Q \ R E G . I O T I M E O U T
0015200 1 7 Q \ G V C O N N E C T I
0015220 O N S ) \r ( 5 7 Q " C o u l d
0015240 n ' t o p e n c o n n e c t
0015260 i o n f o r " ) \r L O C A T E
0015300 S O C K E T S D 1 \r ( P 3
0015320 c n P 2 r N a m e I 1
0015340 E R R O R F L G I 0 S I
0015360 T E ) \0 _ 004 \0 \0 002 @ ` \0 \0 \n \0
0015400 \0 230 ` \0 \0 A i \v \0 \0 020 @ \t \0 \0 003
0015420 265 \r A 264 \n o \0 \0 \0 @ \n \0 \0 002 021 1
0015440 003 H 003 265 004 I 020 001 272 I J \t \0 \0 005 \a
0015460 [ 227 K h i \v \0 \0 265 027 J h i \v \0 \0
0015500 265 017 A 264 \f o \0 \0 \0 J K 032 \n \0 \0 \n
0015520 \0 \0 271 H 002 X 260 314 \0 ( 1 2 7 Q \
0015540 N C O N C 2 1 2 4 Q H E L P
0015560 1 0 5 Q E T H E R P O R T
0015600 7 5 Q E T H E R P O R T 6 3
0015620 Q G V . R E A D C O N N E C T
0015640 4 2 Q E R R O R 2 4 Q G
0015660 V . R E A D M E M B E R S 1 7
0015700 Q E T H E R P O R T 6 E Q
0015720 U A L ) \r ( 1 2 Q R E G R O O
0015740 T N L S N A M E 3 R E G R O
0015760 O T ) \r ( 1 1 6 Q " C a n ' t
0016000 l o o k u p c o n n e c t
0016020 n a m e " 3 6 Q " N o t
0016040 a v a l i d s i t e " ) \r O
0016060 P E N C L O S E S T S O C K E T
0016100 D 1 \r ( P 1 0 Q L O C A L
0016120 F L G P 7 V A L P 6
0016140 P O R T P 5 N E X T P O R
0016160 T P 4 B E T W E E N P R O
0016200 B E P 3 C N T I M E P
0016220 2 S O C P 1 P U P P
0016240 0 M Y N E T I 3 T I M E
0016260 O U T I 2 C O N N S O C
0016300 I 1 P O L L S O C I 0
0016320 P O R T L I S T ) \0 357 016 \0 \0 004
0016340 ` \0 \0 343 021 241 \n 021 0 \r @ 260 , d 001 _
0016360 022 277 A 233 O 022 001 343 H 360 224 i _ 020 263 030
0016400 d 001 _ 026 277 O 030 265 \t O 026 h 032 _ 032 202
0016420 O 026 & _ 030 277 002 003 265 325 O 032 022 b \0 265
0016440 ] O 020 262 a H 341 h 032 @ 032 b \0 277 \b \0
0016460 \0 Z l 002 037 \t \0 \0 ` \0 \0 366 [ @ ] J
0016500 \t \0 \0 L 225 L \t \0 \0 262 K M 001 M 002 265
0016520 003 @ 275 276 \b \0 \0 Y N 001 A 265 \b N 002 265
0016540 004 l 005 k h J g \0 \0 \r \a \0 \0 277 J I
0016560 \n \0 \0 277 L 004 l 002 360 236 L 217 \t \0 \0 b
0016600 \0 277 260 237 @ 263 251 h 020 l 002 037 \t \0 \0 `
0016620 \0 \0 366 274 \b \0 \0 277 J \t \0 \0 Y 262 ' I
0016640 312 037 207 l 002 360 262 036 I 310 % B 265 017 I l
0016660 036 320 _ 024 310 \b O 024 310 \t 365 032 C \n \0 \0
0016700 _ 016 265 \v K \t \0 \0 242 261 377 z h 020 \0 (
0016720 3 4 7 Q T I M E R E X P I R E
0016740 D ? 3 3 7 Q \ O P E N G V C
0016760 O N N E C T I O N 2 7 3 Q G
0017000 E T P U P 2 6 6 Q B L O C K
0017020 2 5 6 Q \ C L O C K 0 2 3
0017040 6 Q S O R T . P U P H O S T S
0017060 . B Y . D I S T A N C E 2 2 2
0017100 Q S E N D P U P 2 1 4 Q S
0017120 E T U P P U P 1 6 6 Q A L L
0017140 O C A T E . P U P 1 5 0 Q T
0017160 I M E R E X P I R E D ? 1 4 2
0017200 Q D I S C A R D P U P S 1 2
0017220 7 Q \ C L O C K 0 1 2 0 Q
0017240 \ G E T M I S C S O C K E T ) \r
0017260 ( 2 6 1 Q \ B E T W E E N P R
0017300 O B E D E L A Y 2 1 0 Q F R
0017320 E E 1 3 2 Q \ C O N N E C T
0017340 T I M E O U T 2 \ L O C A L
0017360 P U P N E T H O S T ) \r N I L \r
0017400 \ O P E N G V C O N N E C T I O
0017420 N D 1 \r ( P 0 I N S T R E
0017440 A M I 1 T I M E O U T I
0017460 0 F R N S O C K E T ) \0 #
0017500 001 \0 \0 002 @ h d A h g \0 \0 \r 006 \0 \0
0017520 021 001 \0 H d 236 d \t \0 \0 h d d d h 032
0017540 032 032 032 032 032 020 \0 ( 2 5 Q B S P O
0017560 U T P U T S T R E A M 1 3 Q
0017600 C R E A T E B S P S T R E A M )
0017620 \r ( 7 \ G V . W H E N C L O S
0017640 E D ) \r N I L \r \ G V . W H E N
0017660 C L O S E D D 1 \r ( P 0 C
0017700 O N N I 0 B S P S T R E A
0017720 M ) \0 , 001 \0 \0 001 ` \0 \0 260 # d 001
0017740 021 001 \0 H 001 @ 360 262 026 H 002 002 002 002 002 h
0017760 030 277 H ` \0 \0 \n \0 \0 027 \0 \0 277 023 002 003
0020000 265 336 h 020 \0 ( 3 7 Q D R E M O V
0020020 E ) \r ( 4 2 Q \ G V C O N N E
0020040 C T I O N S 3 4 Q \ G V C O
0020060 N N E C T I O N S 2 \ G V C
0020100 O N N E C T I O N S ) \r N I L \r
0020120 \ C H E C K K E Y D 1 \r ( I
0020140 0 K E Y ) \0 \v \0 \0 \0 001 @ d 005
0020160 006 220 020 \t \0 \0 020 \0 ( 1 0 Q G V .
0020200 M A K E K E Y ) \r N I L \r N I L
0020220 \r \ C H E C K N A M E D 1 \r (
0020240 I 0 N A M E ) \0 * \0 \0 \0 001
0020260 @ 003 253 @ 265 005 \b \0 \0 \t \0 \0 b \0 277 l
0020300 @ @ 001 \t \0 \0 @ 002 \t \0 \0 330 361 221 @ 020
0020320 o \0 \0 \0 @ \n \0 \0 020 \0 ( 4 7 Q E
0020340 R R O R 3 2 Q N C H A R S
0020360 2 5 Q N C H A R S 1 3 Q \
0020400 U N P A C K R E G 1 0 Q \ N
0020420 O N A M E E R R ) \r N I L \r ( 4
0020440 3 Q " n a m e t o o l o n
0020460 g - m u s t b e < 6 5
0020500 c h a r s " ) \r \ C H E C K S
0020520 T A M P D 1 \r ( I 0 S T A
0020540 M P ) \0 032 \0 \0 \0 001 @ 265 \a ` \0 \0
0020560 037 020 004 ` \0 \0 360 221 @ 020 o \0 \0 \0 @ \n
0020600 \0 \0 020 \0 ( 2 7 Q E R R O R ) \r
0020620 ( 1 3 Q 004 003 T I M E S T A M P
0020640 T Y P E # 5 004 003 T I M E S T
0020660 A M P T Y P E # ) \r ( 2 3 Q "
0020700 n o t a t i m e s t a m p
0020720 " ) \r \ C H E C K S T R I N G
0020740 D 1 \r ( I 0 S T R I N G )
0020760 \0 f \0 \0 \0 001 @ \t \0 \0 d g \0 \0 360 263
0021000 H d g \0 \0 360 262 - 277 @ 001 262 # @ 001 004
0021020 l 004 360 262 033 @ 002 262 027 @ 002 004 l 004 360 235
0021040 @ 001 g \0 \0 @ 002 \v \0 \0 b \0 260 035 o \0
0021060 \0 \0 217 g \0 \0 360 226 @ \t \0 \0 b \0 211 o
0021100 \0 \0 \0 @ \n \0 \0 277 @ \t \0 \0 l @ 361 230
0021120 o \0 \0 \0 @ \n \0 \0 020 @ 020 \0 ( 1 4 1
0021140 Q E R R O R 1 2 5 Q N C H
0021160 A R S 1 2 0 Q E R R O R 1
0021200 0 5 Q M K S T R I N G 6 3 Q
0021220 C O N C A T 3 T Y P E N A
0021240 M E ) \r ( 7 7 Q L I T A T O M
0021260 5 6 Q % . 1 6 Q L I S T
0021300 P 7 S T R I N G P ) \r ( 1 3
0021320 5 Q " s t r i n g t o o l
0021340 o n g " 1 1 4 Q " b a d s
0021360 t r i n g a r g " 7 3 Q "
0021400 b a d s t r i n g a r g " )
0021420 \r \ N O N A M E E R R D 1 \r N
0021440 I L \0 \t \0 \0 \0 \0 o \0 \0 \0 \t \0 \0
0021460 020 \0 ( 6 E R R O R ) \r N I L \r
0021500 ( 3 " m u s t h a v e n a
0021520 m e f o r G V u s e r o
0021540 p " ) \r \ U N P A C K R E G D
0021560 1 \r ( P 0 P P O S I 0
0021600 R E G ) \0 ; 001 \0 \0 001 o \0 \0 \0 @
0021620 \n \0 \0 021 001 \0 H 262 023 @ k H k 331 \v \0
0021640 \0 @ H k 330 \n \0 \0 032 020 o \0 \0 \0 @ \n
0021660 \0 \0 230 @ \t \0 \0 g \0 \0 032 020 @ \t \0 \0
0021700 ` \0 \0 032 020 \0 ( 6 4 Q M K A T O
0021720 M 5 3 Q M K A T O M 4 6 Q
0021740 S T R P O S 3 4 Q S U B A
0021760 T O M 2 5 Q S U B A T O M
0022000 7 S T R P O S ) \r ( 6 7 Q D
0022020 E F A U L T R E G I S T R Y 5
0022040 6 Q A r p a G a t e w a y ) \r
0022060 ( 4 2 Q " @ " 3 " . " ) \r
0022100 \ S E N D I T E M D 1 \r ( P
0022120 1 0 Q e P 5 l e n g t h
0022140 P 4 b P 1 I I 1
0022160 I T E M I 0 O U T S T R
0022200 E A M ) 001 { \t \0 \0 002 A d d 005 001
0022220 241 005 002 237 277 @ A 343 \n \0 \0 @ A l 377 345
0022240 \n \0 \0 020 004 l 004 360 244 A 005 \a 262 025 A 225
0022260 @ A \n \0 \0 020 @ j \n \0 \0 @ j \n \0 \0
0022300 020 A d 005 006 262 036 277 l \a j 021 002 001 I H
0022320 361 222 261 001 1 @ A I ( \n \0 \0 277 I k 330
0022340 Y 260 356 004 ` \0 \0 360 262 T @ A 310 \0 021 002
0022360 003 J K 343 \n \0 \0 277 J K l 377 345 \n \0 \0
0022400 023 @ A 310 001 A 310 002 365 n 377 377 345 021 002 003
0022420 J K 343 \n \0 \0 277 J K l 377 345 \n \0 \0 023
0022440 @ A 310 001 A 310 002 365 343 343 021 002 003 J K 343
0022460 \n \0 \0 J K l 377 345 \n \0 \0 020 A 003 265 006
0022500 \b \0 \0 020 d 001 ` \0 \0 360 262 031 277 A 215 d
0022520 001 021 001 004 @ L l 377 345 \n \0 \0 023 002 003 265
0022540 360 h 020 002 004 l 004 360 262 N 021 006 @ A 001
0022560 \t \0 \0 A 002 \t \0 \0 k 330 330 275 ^ M 343 \n
0022600 \0 \0 277 N M l 377 345 \n \0 \0 277 @ j \n \0
0022620 \0 277 @ j \n \0 \0 A 001 @ \n \0 \0 @ l .
0022640 \n \0 \0 A 002 @ \n \0 \0 M k 345 j 360 244 @
0022660 j \n \0 \0 h 020 @ A j 021 022 \b N 003 265 033
0022700 O 016 022 021 002 003 J K 343 \n \0 \0 277 J K l
0022720 377 345 \n \0 \0 023 A 260 ) 001 _ 020 277 O 016 O
0022740 020 \t \0 \0 k 330 342 l 002 330 330 _ 016 277 N 002
0022760 ^ 260 314 d 001 021 001 \b @ O 020 \n \0 \0 023 002
0023000 003 265 362 h 020 \0 ( 5 6 2 Q \ S E N
0023020 D S T R I N G 5 3 0 Q N C H
0023040 A R S 5 1 1 Q \ B O U T 5
0023060 0 0 Q \ B O U T 4 5 0 Q B
0023100 O U T 4 3 5 Q P R I N 3 4
0023120 2 7 Q B O U T 4 2 1 Q P R
0023140 I N 3 4 1 3 Q \ B O U T 4
0023160 0 5 Q \ B O U T 3 7 7 Q \
0023200 B O U T 3 6 6 Q \ B O U T
0023220 3 5 4 Q N C H A R S 3 4 7 Q
0023240 N C H A R S 3 2 0 Q B O U
0023260 T 2 6 7 Q S H O U L D N T
0023300 2 5 7 Q \ B O U T 2 4 7 Q
0023320 \ B O U T 2 2 3 Q \ B O U T
0023340 2 1 2 Q \ B O U T 1 6 4 Q
0023360 \ B O U T 1 5 3 Q \ B O U
0023400 T 1 2 0 Q B O U T 6 4 Q
0023420 \ B O U T 5 7 Q \ B O U T
0023440 5 1 Q \ S E N D S T R I N G
0023460 2 7 Q \ B O U T 1 7 Q \ B
0023500 O U T ) \r ( 2 7 5 Q \ 3 B Y T
0023520 E K L U D G E K E Y 1 3 3 Q
0023540 004 003 T I M E S T A M P T Y P E #
0023560 ) \r N I L \r \ S E N D S T R I N
0023600 G D 1 \r ( P 0 L I 1
0023620 S T R I N G I 0 S T R E A
0023640 M ) \0 D 001 \0 \0 002 A \t \0 \0 021 001 \0
0023660 H l @ 361 231 o \0 \0 \0 A \n \0 \0 h 020 @
0023700 H 343 \n \0 \0 277 @ H l 377 345 \n \0 \0 @ j
0023720 \n \0 \0 277 @ l @ \n \0 \0 A @ \n \0 \0 H
0023740 k 345 j 360 244 @ j \n \0 \0 h 020 \0 ( 1 0
0023760 0 Q B O U T 6 5 Q P R I N
0024000 3 6 0 Q \ B O U T 5 1 Q
0024020 \ B O U T 4 4 Q \ B O U T
0024040 3 3 Q \ B O U T 2 3 Q E R
0024060 R O R 3 N C H A R S ) \r N I
0024100 L \r ( 1 7 Q " s t r i n g t
0024120 o o l o n g " ) \r \ S E N D W
0024140 O R D D 1 \r ( I 1 W O R D
0024160 I 0 O U T S T R E A M )
0024200 \0 020 \0 \0 \0 002 @ A 343 \n \0 \0 @ A l 377
0024220 345 \n \0 \0 020 \0 ( 1 5 Q \ B O U T
0024240 5 \ B O U T ) \r N I L \r N I
0024260 L \r \ R E C E I V E B O O L D
0024300 1 \r ( I 0 S T R E A M ) \0
0024320 024 \0 \0 \0 001 @ \t \0 \0 d k 360 221 i 020 j
0024340 360 221 h 020 \b \0 \0 020 \0 ( 2 1 Q S H
0024360 O U L D N T 3 B I N ) \r N I
0024400 L \r N I L \r \ R E C E I V E C L
0024420 I S T D 1 \r ( P 2 $ $ T E
0024440 M 3 P 0 $ $ T E M 4 I
0024460 0 S T R E A M ) \0 . 005 \0 \0 001
0024500 @ i \n \0 \0 @ 341 @ 330 021 A 004 k \
0024520 H 361 263 031 @ \t \0 \0 273 J 265 \f K h 032 Z
0024540 271 L k 330 260 353 K & 272 260 370 I 020 \0 ( 2
0024560 7 Q \ R E C E I V E C O M P O
0024600 N E N T 4 \ R E C E I V E S
0024620 T A M P ) \r N I L \r N I L \r \ R
0024640 E C E I V E C O M P O N E N T
0024660 D 1 \r ( P 2 $ $ T E M 3 P
0024700 0 $ $ T E M 4 I 0 S T
0024720 R E A M ) \0 + 005 \0 \0 001 @ 341 @
0024740 330 021 A 004 k \ H 361 263 033 @ 341 @
0024760 330 273 J 265 \f K h 032 Z 271 L k 330 260 351 K
0025000 & 272 260 370 I 020 \0 N I L \r N I L \r N
0025020 I L \r \ R E C E I V E R L I S T
0025040 D 1 \r ( P 5 S T R L E N
0025060 P 1 N W O R D S P 0 S
0025100 T A M P I 0 I N S T R E A
0025120 M ) \0 < 006 \0 \0 001 @ \t \0 \0 @ 341
0025140 @ 330 021 B 005 I j 361 262 ' @ d 341 @
0025160 330 ] \n \0 \0 I M k 330 342 l 002 330 331 271
0025200 274 K 265 \t L h 032 [ 272 260 335 L & 273 260 330
0025220 H J 032 020 \0 ( 3 4 Q \ R E C E I
0025240 V E S T R I N G 3 \ R E C E
0025260 I V E S T A M P ) \r N I L \r N I
0025300 L \r \ R E C E I V E R N A M E
0025320 D 1 \r ( I 0 I N S T R E A M
0025340 ) \0 \f \0 \0 \0 001 @ d 341 @ 330 \n
0025360 \0 \0 020 \0 ( 1 1 Q \ R E C E I V
0025400 E S T R I N G ) \r N I L \r N I L
0025420 \r \ R E C E I V E S T A M P D
0025440 1 \r ( I 1 O L D S T A M P
0025460 I 0 S T R E A M ) \0 I \0 \0
0025500 \0 002 A d i 360 262 026 277 @ 277 @ 277 @
0025520 277 @ 277 @ 277 @ 260 . 004 ` \0 \0
0025540 360 246 ` \0 \0 037 b 002 200 A @ 341 @ 330
0025560 315 \0 277 A k 320 @ 341 @ 330 @ 341 @
0025600 330 341 341 344 \n \0 \0 A 020 \0 ( 1 0 5 Q
0025620 P u t U n b o x e d ) \r ( 4 2
0025640 Q 004 003 T I M E S T A M P T Y P
0025660 E # 3 5 Q 004 003 T I M E S T A
0025700 M P T Y P E # ) \r N I L \r \ R E
0025720 C E I V E S T R I N G D 1 \r (
0025740 P 1 i P 0 $ $ T E M 3
0025760 I 1 L E N G T H I 0
0026000 S T R E A M ) \0 c 006 \0 \0 002 A l
0026020 @ 361 230 o \0 \0 \0 A \n \0 \0 020 @ 277 @
0026040 A k 021 B 005 I H 361 263 6 @ \t \0 \0 ]
0026060 l 9 361 227 ` \0 \0 M l \n 331 215 l 0 M 361
0026100 244 M l 0 331 204 ` \0 \0 M 320 274 K 265 \r L
0026120 h 032 [ 272 I k 330 Y 260 317 L & 273 260 367 A
0026140 k 345 j 360 244 @ \t \0 \0 277 J 022 \t \0 \0 020
0026160 \0 ( 1 4 0 Q C O N C A T L I S
0026200 T 1 3 2 Q B I N 4 0 Q B
0026220 I N 1 4 Q E R R O R ) \r ( 7
0026240 2 Q \ O n e C h a r A t o m B
0026260 a s e 5 0 Q \ O n e C h a r
0026300 A t o m B a s e ) \r ( 1 0 Q "
0026320 s t r e a m m u s t b e c
0026340 o n f u s e d - s t r i n g
0026360 t o o l o n g " ) \r \ R E C
0026400 E I V E W O R D D 1 \r ( I 0
0026420 S O C K E T ) \0 020 \0 \0 \0 001 @
0026440 \t \0 \0 l \b \n \0 \0 @ \t \0 \0 344 020 \0 (
0026460 1 4 Q B S P B I N 1 0 Q L
0026500 S H 3 B S P B I N ) \r N I L
0026520 \r N I L \r ( P R E T T Y C O M P
0026540 R I N T G R A P E V I N E C O
0026560 M S ) \r ( R P A Q Q G R A P E
0026600 V I N E C O M S ( ( C O M S
0026620 ( * H i g h L e v e l G r
0026640 a p e v i n e U s e r O p e
0026660 r a t i o n s a s p e r s
0026700 e c t i o n 4 . 1 o f t h
0026720 e \r G r a p e v i n e I n t
0026740 e r f a c e d o c u m e n t )
0026760 ( * F u n c t i o n s f o
0027000 r i n t e r r o g a t i n g
0027020 t h e d a t a b a s e ) ( F
0027040 N S G V . A U T H E N T I C A
0027060 T E \r G V . C H E C K S T A M
0027100 P G V . E X P A N D G V . I
0027120 D E N T I F Y C A L L E R G V
0027140 . I D E N T I F Y M E G V . I
0027160 S I N L I S T G V . I S M E M
0027200 B E R C L O S U R E \r G V . I
0027220 S M E M B E R D I R E C T G V
0027240 . R E A D C O N N E C T G V .
0027260 R E A D E N T R Y G V . R E A
0027300 D F R I E N D S G V . R E A D
0027320 M E M B E R S G V . R E A D O
0027340 W N E R S \r G V . R E A D R E
0027360 M A R K ) ( * F u n c t i o
0027400 n s w h i c h u p d a t e
0027420 t h e d a t a b a s e ) ( F
0027440 N S G V . A D D F O R W A R D
0027460 G V . A D D F R I E N D \r G
0027500 V . A D D L I S T O F M E M B E
0027520 R S G V . A D D M A I L B O X
0027540 G V . A D D M E M B E R G V
0027560 . A D D O W N E R G V . C H A
0027600 N G E C O N N E C T G V . C H
0027620 A N G E P A S S W O R D \r G V
0027640 . C H A N G E R E M A R K G V
0027660 . C R E A T E G R O U P G V .
0027700 C R E A T E I N D I V I D U A L
0027720 G V . D E L E T E G R O U P
0027740 G V . D E L E T E I N D I V I D
0027760 U A L G V . N E W N A M E \r
0030000 G V . R E M O V E F O R W A R D
0030020 G V . R E M O V E F R I E N D
0030040 G V . R E M O V E M A I L B O
0030060 X G V . R E M O V E M E M B E
0030100 R G V . R E M O V E O W N E R
0030120 ) ( F N S G V . M A K E K E
0030140 Y ) ( \r D E C L A R E : D O
0030160 E V A L @ C O M P I L E D O N
0030200 T C O P Y ( M A C R O S K E
0030220 Y P C R E A T E K E Y G E T
0030240 K E Y B Y T E S E T K E Y B Y
0030260 T E ) ( * C o n s t a n t s
0030300 f o r \r c a l l i n g G V
0030320 . I S I N L I S T ) ( C O N S
0030340 T A N T S * \ G V U . M E M
0030360 B E R O P S ) ) ) ( C O M S
0030400 ( * C o n t a c t i n g R e
0030420 g S e r v e r s ) ( F N S
0030440 \ G V O P \r \ E N Q U I R E
0030460 \ P E R F O R M G V O P F I N
0030500 D R E G S E R V E R L O C A T
0030520 E S O C K E T S ) ( A D D V A
0030540 R S ( \ G V C O N N E C T I O
0030560 N S ) ) ( V A R S ( R E G R
0030600 O O T ( Q U O T E ( \r G V
0030620 . G V ) ) ) ( R E G R O O T
0030640 N L S N A M E " G r a p e v i
0030660 n e R S e r v e r " ) ( \ R E
0030700 G . I O T I M E O U T 3 0 0 0
0030720 0 ) ) ( D E C L A R E : D O
0030740 E V A L @ C O M P I L E \r D O
0030760 N T C O P Y ( * G r a p e v
0031000 i n e U s e r P r o t o c o
0031020 l O p C o d e s ) ( C O N
0031040 S T A N T S * \ G V . O P S
0031060 ) ( * G r a p e v i n e r
0031100 e s p o n s e c o d e s ) (
0031120 \r C O N S T A N T S * \ G V
0031140 . R E S P O N S E S ) ( * R
0031160 e s p o n s e c o d e s t h
0031200 e u s e r s e e s ) ( C O
0031220 N S T A N T S * \ G V U . R
0031240 E S P O N S E S ) ( G L O B A
0031260 L V A R S \r R E G R O O T R
0031300 E G R O O T N L S N A M E \ R
0031320 E G . I O T I M E O U T \ G V
0031340 C O N N E C T I O N S ) ( C O
0031360 N S T A N T S ( \ R E G . S E
0031400 R V E R E N Q U I R Y S O C 4
0031420 0 ) ( \r \ R E G . S E R V E R
0031440 P O L L I N G S O C 4 2 ) ) )
0031460 ) ( C O M S ( * F u n c t
0031500 i o n s f o r t r y i n g
0031520 t o m a k e c o n n e c t i
0031540 o n t o c l o s e s t b y
0031560 h o p c o u n t \r a n d r
0031600 e s p o n s i v e n e s s ) (
0031620 F N S O P E N C L O S E S T S
0031640 O C K E T \ O P E N G V C O N
0031660 N E C T I O N \ G V . W H E N
0031700 C L O S E D ) ( D E C L A R E
0031720 : D O E V A L @ C O M P I L E
0031740 \r D O N T C O P Y ( R E C O
0031760 R D S G V C O N N E C T I O N
0032000 ) ( C O N S T A N T S ( \ D
0032020 E F A U L T P O L L I N G S O C
0032040 5 ) ) ( G L O B A L V A R S
0032060 \ B E T W E E N P R O B E D E
0032100 L A Y \r \ C O N N E C T T I M
0032120 E O U T \ E c h o s F r o m
0032140 \ T I M E O U T K E Y ) ) ( V
0032160 A R S ( \ B E T W E E N P R O
0032200 B E D E L A Y 1 0 0 ) ( \ C
0032220 O N N E C T T I M E O U T 5 0
0032240 0 0 ) ) ( \r D E C L A R E :
0032260 D O N T E V A L @ L O A D D O
0032300 C O P Y ( P ( C O N D ( (
0032320 N O T ( G E T D ( Q U O T E
0032340 S O R T . P U P H O S T S . B
0032360 Y . D I S T A N C E ) ) ) ( F
0032400 I L E S L O A D \r R O U T E R
0032420 ) ( / M O V D ( Q U O T E
0032440 H O P O R D E R ) ( Q U O T E
0032460 S O R T . P U P H O S T S . B
0032500 Y . D I S T A N C E ) ) ) ) ) )
0032520 ) ( C O M S ( * T h e s e
0032540 f u n c t i o n s c h e c k
0032560 \r a n d / o r c o e r c e
0032600 a r g u m e n t s t o s e r
0032620 v e r o p e r a t i o n s )
0032640 ( F N S \ C H E C K K E Y \
0032660 C H E C K N A M E \ C H E C K
0032700 S T A M P \ C H E C K S T R I
0032720 N G \r \ N O N A M E E R R \
0032740 U N P A C K R E G ) ( I N I T
0032760 V A R S ( D E F A U L T R E G
0033000 I S T R Y ) ) ( D E C L A R E
0033020 : D O E V A L @ C O M P I L E
0033040 D O N T C O P Y ( G L O B A
0033060 L V A R S \r D E F A U L T R E
0033100 G I S T R Y ) ( R E C O R D S
0033120 T I M E S T A M P ) ) ( I N
0033140 I T R E C O R D S T I M E S T
0033160 A M P ) ) ( C O M S ( * L
0033200 o w e r - l e v e l G r a p e
0033220 v i n e U s e r \r p r i m i
0033240 t i v e s ) ( F N S \ S E N
0033260 D I T E M \ S E N D S T R I N
0033300 G \ S E N D W O R D ) ( F N
0033320 S \ R E C E I V E B O O L \
0033340 R E C E I V E C L I S T \ R E
0033360 C E I V E C O M P O N E N T \r
0033400 \ R E C E I V E R L I S T \ R
0033420 E C E I V E R N A M E \ R E C
0033440 E I V E S T A M P \ R E C E I
0033460 V E S T R I N G \ R E C E I V
0033500 E W O R D ) ( V A R S ( \ 3
0033520 B Y T E K L U D G E K E Y ( Q
0033540 U O T E \r $ $ 3 b y t e $ $ )
0033560 ) ) ( D E C L A R E : D O E
0033600 V A L @ C O M P I L E D O N T
0033620 C O P Y ( M A C R O S \ R E
0033640 C E I V E W O R D \ S E N D W
0033660 O R D ) ( C O N S T A N T S
0033700 ( \r \ G V . S S L E N G T H 6
0033720 4 ) ( \ M A X G V S T R I N G
0033740 6 4 ) ) ( G L O B A L V A R
0033760 S \ 3 B Y T E K L U D G E K E
0034000 Y ) ) ) ( D E C L A R E : D
0034020 O N T E V A L @ L O A D \r E V
0034040 A L @ C O M P I L E D O N T C
0034060 O P Y ( P ( S E L E C T Q
0034100 ( C O M P I L E M O D E ) ( D
0034120 ( F I L E S L O A D ( L O A
0034140 D C O M P ) P U P B S P ) )
0034160 ( P D P - 1 0 ( F I L E S L
0034200 O A D \r ( L O A D C O M P )
0034220 P U P 1 0 B S P A U X ) ) N
0034240 I L ) ) ) ) ) \r ( A D D T O V A
0034260 R \ G V C O N N E C T I O N S
0034300 ) \r ( R P A Q Q R E G R O O T
0034320 ( G V . G V ) ) \r ( R P A
0034340 Q R E G R O O T N L S N A M E
0034360 " G r a p e v i n e R S e r v
0034400 e r " ) \r ( R P A Q Q \ R E G
0034420 . I O T I M E O U T 3 0 0 0 0
0034440 ) \r ( R P A Q Q \ B E T W E E
0034460 N P R O B E D E L A Y 1 0 0 )
0034500 \r ( R P A Q Q \ C O N N E C T
0034520 T I M E O U T 5 0 0 0 ) \r ( C
0034540 O N D ( ( N O T ( G E T D
0034560 ( Q U O T E S O R T . P U P H
0034600 O S T S . B Y . D I S T A N C E
0034620 ) ) ) ( F I L E S L O A D R
0034640 O U T E R ) ( / M O V D ( Q
0034660 U O T E H O P O R D E R ) (
0034700 \r Q U O T E S O R T . P U P H
0034720 O S T S . B Y . D I S T A N C E
0034740 ) ) ) ) \r ( R P A Q ? D E F A
0034760 U L T R E G I S T R Y ) \r ( / D
0035000 E C L A R E D A T A T Y P E (
0035020 Q U O T E T I M E S T A M P )
0035040 ( Q U O T E ( ( B I T S 1
0035060 6 ) F I X P ) ) ) \r ( R P A Q
0035100 Q \ 3 B Y T E K L U D G E K E
0035120 Y $ $ 3 b y t e $ $ ) \r ( P U
0035140 T P R O P S G R A P E V I N E
0035160 C O P Y R I G H T ( " X e r
0035200 o x C o r p o r a t i o n "
0035220 1 9 8 3 ) ) \r N I L \r
0035233