$ od -c -N 50000 [_CD8_]<ifs>IfsFtp.dm!2
0000000  377  \0  \0   I   f   s   F   t   p   P   r   o   t   .   d   e
0000020    c   l  \0 373 231  \f 034 273  \0  \0 376 001  \0 265 355   /
0000040    /       I   f   s   F   t   p   P   r   o   t   .   d   e   c
0000060    l       -   -       D   e   c   l   a   r   a   t   i   o   n
0000100    s       f   o   r       t   h   e       I   f   s       i   m
0000120    p   l   e   m   e   n   t   a   t   i   o   n       o   f    
0000140    F   t   p  \r   /   /       C   o   p   y   r   i   g   h   t
0000160        X   e   r   o   x       C   o   r   p   o   r   a   t   i
0000200    o   n       1   9   7   9   ,       1   9   8   0   ,       1
0000220    9   8   1   ,       1   9   8   2  \r   /   /       L   a   s
0000240    t       m   o   d   i   f   i   e   d       M   a   y       1
0000260    4   ,       1   9   8   2           1   :   1   0       P   M
0000300        b   y       B   o   g   g   s  \r  \r   g   e   t       "
0000320    I   f   s   R   s   .   d   e   c   l   "  \r  \r   /   /    
0000340    N   o   t   e       t   h   a   t       t   h   i   s       i
0000360    s       s   u   b   s   t   a   n   t   i   a   l   l   y    
0000400    d   i   f   f   e   r   e   n   t       f   r   o   m       t
0000420    h   e       s   t   a   n   d   a   r   d       p   a   c 376
0000440  001  \0 017 335   k   a   g   e   .  \r   /   /       R   e   n
0000460    a   m   e       t   h   i   s       f   i   l   e       t   o
0000500        F   t   p   P   r   o   t   .   d   e   c   l       t   h
0000520    e   n       c   o   m   p   i   l   e       t   h   e       F
0000540    t   p       p   a   c   k   a   g   e       f   o   r       I
0000560    f   s   .  \r  \r   /   /   -   -   -   -   -   -   -   -   -
0000600    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0000700    -   -  \r   m   a   n   i   f   e   s   t  \t  \t   /   /    
0000720    p   a   c   k   a   g   e       w   i   d   e       d   e   c
0000740    l   a   r   a   t   i   o   n   s  \r   /   /   -   -   -   -
0000760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0001040    -   -   -   - 376 001  \0   i 212   -   -   -   -   -   -   -
0001060    -   -   -   -   -   -   -   -   -   -   -   -  \r   [  \r   s
0001100    o   c   k   e   t   F   T   P       =       3  \t  \t   /   /
0001120        w   e   l   l       k   n   o   w   n       P   u   p    
0001140    s   o   c   k   e   t  \r  \r   F   T   P   V   e   r   s   i
0001160    o   n       =       1  \t  \t   /   /       F   T   P       p
0001200    r   o   t   o   c   o   l       v   e   r   s   i   o   n  \r
0001220    M   T   P       =       t   r   u   e  \t  \t   /   /       c
0001240    o   n   t   r   o   l   s       c   o   m   p   i   l   a   t
0001260    i   o   n       o   f       M   T   P       c   o   d   e  \r
0001300   \r   Q   u   o   t   e   C   h   a   r       =       $   '  \t
0001320   \t   /   /       s   t   r   i   n   g       q   u   o   t   e
0001340        c   h   a   r   a   c   t   e   r  \r  \r   /   /       d
0001360    a   t   a       t   y   p   e   s  \r   U   n   s   p   e   c
0001400    i   f   i   e   d       =       0  \r   T   e   x   t       =
0001420        1  \r   B   i   n   a   r   y       =       2  \r  \r   /
0001440    /       e   n   d       o   f     376 001  \0  \n   s   l   i
0001460    n   e       c   o   n   v   e   n   t   i   o   n   s  \r   C
0001500    R       =       1  \r   C   R   L   F       =       2  \r   T
0001520    r   a   n   s   p   a   r   e   n   t       =       3  \r   ]
0001540   \r  \f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0001560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0001660   \r   m   a   n   i   f   e   s   t  \r   /   /   -   -   -   -
0001700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0002000    -   -   -   -   -   -   -  \r   [  \r   /   /       F   T   P
0002020        &       M   T   P       m   a   r   k       b   y   t   e
0002040    s  \r   m   a   r   k   R   e   t   r   i   e   v   e 376 001
0002060   \0   } 373       =       1  \r   m   a   r   k   S   t   o   r
0002100    e       =       2  \t  \t  \t   /   /   '   o   l   d   '    
0002120    s   t   o   r   e       p   r   o   t   o   c   o   l  \r   m
0002140    a   r   k   Y   e   s       =       3  \r   m   a   r   k   N
0002160    o       =       4  \r   m   a   r   k   H   e   r   e   I   s
0002200    F   i   l   e       =       5  \r   m   a   r   k   E   n   d
0002220    O   f   C   o   m   m   a   n   d       =       6  \r   m   a
0002240    r   k   C   o   m   m   e   n   t       =       7  \r   m   a
0002260    r   k   V   e   r   s   i   o   n       =       1   0   b  \r
0002300    m   a   r   k   N   e   w   S   t   o   r   e       =       1
0002320    1   b  \t  \t   /   /   '   n   e   w   '       s   t   o   r
0002340    e       p   r   o   t   o   c   o   l  \r   m   a   r   k   D
0002360    i   r   e   c   t   o   r   y       =       1   2   b  \t  \t
0002400    /   /   '   o   l   d   '       d   i   r   e   c   t   o   r
0002420    y       p   r   o   t   o   c   o   l  \r   m   a   r   k   H
0002440    e   r   e   I   s   P   L   i   s   t       =       1   3   b
0002460   \r   m   a 376 001  \0 202 206   r   k   N   e   w   D   i   r
0002500    e   c   t   o   r   y       =       1   4   b  \t  \t   /   /
0002520    '   n   e   w   '       d   i   r   e   c   t   o   r   y    
0002540    p   r   o   t   o   c   o   l  \r   /   /       1   5   b    
0002560    i   s       a   v   a   i   l   a   b   l   e  \r   m   a   r
0002600    k   D   e   l   e   t   e       =       1   6   b  \r   m   a
0002620    r   k   R   e   n   a   m   e       =       1   7   b  \r   m
0002640    a   r   k   S   t   o   r   e   M   a   i   l       =       2
0002660    0   b  \r   m   a   r   k   R   e   t   r   i   e   v   e   M
0002700    a   i   l       =       2   1   b  \r   m   a   r   k   F   l
0002720    u   s   h   M   a   i   l   B   o   x       =       2   2   b
0002740   \r   m   a   r   k   M   a   i   l   b   o   x   E   x   c   e
0002760    p   t   i   o   n       =       2   3   b  \r   n   u   m   M
0003000    a   r   k   s       =       M   T   P   ?       2   3   b   ,
0003020        1   7   b  \r   ]  \r  \r   /   /   -   -   -   -   -   -
0003040    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0003060    -   -   -   -   -   -   -   - 376 001  \0  \r 213   -   -   -
0003100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003140    -   -   -   -   -   -   -   -   -   -  \r   s   t   r   u   c
0003160    t   u   r   e       M   a   r   k       [       s   u   b   C
0003200    o   d   e       b   y   t   e   ;       m   a   r   k       b
0003220    y   t   e       ]  \r   /   /   -   -   -   -   -   -   -   -
0003240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003340    -   -   -  \r  \r   /   /   -   -   -   -   -   -   -   -   -
0003360    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003460    -   -  \r   s   t   r   u   c   t   u   r   e     376 001  \0
0003500    0 004   M   T   :  \t   /   /       M   a   r   k       T   a
0003520    b   l   e  \r   /   /   -   -   -   -   -   -   -   -   -   -
0003540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003640    -  \r   [  \r   s   t   r   i   n   g       w   o   r   d  \t
0003660    /   /       -   >       s   t   r   i   n   g  \r   c   o   d
0003700    e       b   y   t   e  \t   /   /       m   a   r   k       b
0003720    y   t   e       v   a   l   u   e  \r   q   B   i   t   s    
0003740    b   y   t   e       =  \t   /   /       q   u   a   l   i   f
0003760    y   i   n   g       b   i   t   s  \r               [  \r    
0004000            b   l   a   n   k       b   i   t       5  \r        
0004020        p   t   x       b   i   t  \t   /   /       p   r   i   n
0004040    t       t   e   x   t       a   f   t   e   r       t   h   i
0004060    s       m   a   r   k  \r               n   f       b   i   t
0004100   \t   / 376 001  \0 370 233   /       d   o   n   t       f   e
0004120    t   c   h       b   y   t   e   s       p   a   s   t       t
0004140    h   i   s       m   a   r   k  \r               s   c       b
0004160    i   t  \t   /   /       s   u   b   c   o   d   e       b   y
0004200    t   e       f   o   l   l   o   w   s       t   h   i   s    
0004220    m   a   r   k  \r               ]  \r   ]       ^   1   ,   n
0004240    u   m   M   a   r   k   s  \r   m   a   n   i   f   e   s   t
0004260        l   e   n   M   T       =       s   i   z   e       M   T
0004300    /   1   6  \r  \r   m   a   n   i   f   e   s   t  \r   [  \r
0004320    /   /       M   T       q   u   a   l   i   f   y   i   n   g
0004340        b   i   t   s  \r   p   t   x       =       1   b   1   5
0004360        r   s   h   i   f   t       (   o   f   f   s   e   t    
0004400    M   T   .   p   t   x   ^   1       r   e   m       1   6   )
0004420   \r   n   f       =       1   b   1   5       r   s   h   i   f
0004440    t       (   o   f   f   s   e   t       M   T   .   n   f   ^
0004460    1       r   e   m       1   6   )  \r   s   c       =       1
0004500    b   1   5       r   s   h 376 001  \0   = 246   i   f   t    
0004520    (   o   f   f   s   e   t       M   T   .   s   c   ^   1    
0004540    r   e   m       1   6   )  \r   ]  \r  \f  \r   /   /   -   -
0004560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0004660    -   -   -   -   -   -   -   -   -  \r   s   t   r   u   c   t
0004700    u   r   e       T   i   m   e       [       h       w   o   r
0004720    d   ;       l       w   o   r   d       ]  \r   /   /   -   -
0004740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0005040    -   -   -   -   -   -   -   -   -  \r  \r   /   /   -   -   -
0005060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0005100    -   -   -   -   -   -   -   -   -   -   -   - 376 001  \0  \f
0005120  332   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0005140    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0005200    -   -   -   -   -   -   -   -   -   -   -  \r   s   t   r   u
0005220    c   t   u   r   e       D   P   R   P   :  \r   /   /   -   -
0005240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0005360    -   -   -   -   -   -   -  \r   [  \r   b   l   a   n   k    
0005400    b   i   t       2  \r   S   F   I   L       b   i   t  \t   /
0005420    /       S   e   r   v   e   r   -   F   i   l   e   n   a   m
0005440    e  \r   D   E   V   I       b   i   t  \t   /   /       D   e
0005460    v   i   c   e  \r   D   I   R   E       b   i   t  \t   /   /
0005500        D   i   r   e   c   t   o   r   y  \r   N   A   M   B    
0005520    b 376 001  \0 351   ;   i   t  \t   /   /       N   a   m   e
0005540    -   B   o   d   y  \r   V   E   R   S       b   i   t  \t   /
0005560    /       V   e   r   s   i   o   n  \r   T   Y   P   E       b
0005600    i   t  \t   /   /       T   y   p   e  \r   B   Y   T   E    
0005620    b   i   t  \t   /   /       B   y   t   e   -   s   i   z   e
0005640   \r   E   O   L   C       b   i   t  \t   /   /       E   n   d
0005660    -   o   f   -   l   i   n   e   -   c   o   n   v   e   n   t
0005700    i   o   n  \r   S   I   Z   E       b   i   t  \t   /   /    
0005720    S   i   z   e  \r   A   U   T   H       b   i   t  \t   /   /
0005740        A   u   t   h   o   r  \r   C   D   A   T       b   i   t
0005760   \t   /   /       C   r   e   a   t   i   o   n   -   d   a   t
0006000    e  \r   R   D   A   T       b   i   t  \t   /   /       R   e
0006020    a   d   -   d   a   t   e  \r   W   D   A   T       b   i   t
0006040   \t   /   /       W   r   i   t   e   -   d   a   t   e  \r   C
0006060    S   U   M       b   i   t  \t   /   /       C   h   e   c   k
0006100    s   u   m  \r   ]  \r  \r   /   /   -   -   -   -   -   -   -
0006120    -   -   -   -   -   - 376 001  \0 210   Y   -   -   -   -   -
0006140    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0006220    -   -   -   -   -   -   -   -   -  \r   s   t   r   u   c   t
0006240    u   r   e       F   P   L   :           /   /       F   i   l
0006260    e       P   r   o   p   e   r   t   y       L   i   s   t  \r
0006300    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0006320    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0006400    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [  \r
0006420    U   N   A   M       w   o   r   d  \t   /   /       U   s   e
0006440    r   -   N   a   m   e       <   S   t   r   i   n   g   >  \r
0006460    U   P   S   W       w   o   r   d  \t   /   /       U   s   e
0006500    r   -   P   a   s   s   w   o   r   d       <   S   t   r   i
0006520    n   g   >  \r   C   N   A   M       w   o 376 001  \0  \r 377
0006540    r   d  \t   /   /       C   o   n   n   e   c   t   -   n   a
0006560    m   e       <   S   t   r   i   n   g   >  \r   C   P   S   W
0006600        w   o   r   d  \t   /   /       C   o   n   n   e   c   t
0006620    -   p   a   s   s   w   o   r   d       <   S   t   r   i   n
0006640    g   >  \r   S   F   I   L       w   o   r   d  \t   /   /    
0006660    S   e   r   v   e   r   -   F   i   l   e   n   a   m   e    
0006700    <   S   t   r   i   n   g   >  \r   D   E   V   I       w   o
0006720    r   d  \t   /   /       D   e   v   i   c   e       <   S   t
0006740    r   i   n   g   >  \r   D   I   R   E       w   o   r   d  \t
0006760    /   /       D   i   r   e   c   t   o   r   y       <   S   t
0007000    r   i   n   g   >  \r   N   A   M   B       w   o   r   d  \t
0007020    /   /       N   a   m   e   -   B   o   d   y       <   S   t
0007040    r   i   n   g   >  \r   V   E   R   S       w   o   r   d  \t
0007060    /   /       v   e   r   s   i   o   n       <   S   t   r   i
0007100    n   g   >  \r   T   Y   P   E       w   o   r   d  \t   /   /
0007120        T   y   p   e       <   T   e   x   t   |   B   i   n   a
0007140  376 001  \0 217 332   r   y   |   U   n   s   p   e   c   i   f
0007160    e   d   >  \r   B   Y   T   E       w   o   r   d  \t   /   /
0007200        B   y   t   e   -   s   i   z   e       <   N   u   m   b
0007220    e   r   >  \r   E   O   L   C       w   o   r   d  \t   /   /
0007240        E   n   d   -   o   f   -   l   i   n   e   -   c   o   n
0007260    v   e   n   t   i   o   n       <   C   R   |   C   R   L   F
0007300    |   T   r   a   n   s   p   a   r   e   n   t   >  \r   S   I
0007320    Z   E       w   o   r   d       2  \t   /   /       S   i   z
0007340    e       <   N   u   m   b   e   r   >  \r   A   U   T   H    
0007360    w   o   r   d  \t   /   /       A   u   t   h   o   r       <
0007400    S   t   r   i   n   g   >  \r   C   D   A   T       @   T   i
0007420    m   e  \t   /   /       c   r   e   a   t   i   o   n   -   d
0007440    a   t   e       <   A   l   t   o       f   o   r   m   a   t
0007460        d   a   t   e   >  \r   R   D   A   T       @   T   i   m
0007500    e  \t   /   /       r   e   a   d   -   d   a   t   e       <
0007520    A   l   t   o       f   o   r   m   a   t       d   a   t   e
0007540    >  \r   W   D   A 376 001  \0 016 333   T       @   T   i   m
0007560    e  \t   /   /       w   r   i   t   e   -   d   a   t   e    
0007600    <   A   l   t   o       f   o   r   m   a   t       d   a   t
0007620    e   >  \r   C   S   U   M       w   o   r   d  \t   /   /    
0007640    C   h   e   c   k   s   u   m       <   N   u   m   b   e   r
0007660    >  \r   D   P   R   P       @   D   P   R   P  \t   /   /    
0007700    D   e   s   i   r   e   d   -   P   r   o   p   e   r   t   y
0007720        <   p   r   o   p   e   r   t   y       n   a   m   e   >
0007740   \r   ]  \r  \r   /   /   -   -   -   -   -   -   -   -   -   -
0007760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0010060    -  \r   s   t   r   u   c   t   u   r   e       M   P   L   :
0010100   \t   /   /       M   a   i   l       P   r   o   p   e   r   t
0010120    y       L   i   s   t  \r   /   /   -   -   -   -   -   -   -
0010140    -   -   -   -   -   -   -   -   -   - 376 001  \0 002   0   -
0010160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0010240    -   -   -   -   -   -   -   -   -  \r   [  \r   M   L   B   X
0010260        w   o   r   d  \t   /   /       M   a   i   l   b   o   x
0010300        <   s   t   r   i   n   g   >  \r   L   G   T   H       w
0010320    o   r   d       2  \t   /   /       L   e   n   g   t   h    
0010340    <   N   u   m   b   e   r   >  \r   R   C   V   D       @   T
0010360    i   m   e  \t   /   /       D   a   t   e   -   R   e   c   e
0010400    i   v   e   d       <   A   l   t   o       f   o   r   m   a
0010420    t       d   a   t   e   >  \r   S   N   D   R       w   o   r
0010440    d  \t   /   /       S   e   n   d   e   r       <   s   t   r
0010460    i   n   g   >  \r   ]  \r  \r   /   /   -   -   -   -   -   -
0010500    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0010540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   - 376
0010560  001  \0 375 216   -   -   -   -   -   -   -   -   -   -   -   -
0010600    -   -   -   -   -   -   -   -   -   -  \r   c   o   m   p   i
0010620    l   e   t   e   s   t       M   T   P  \r               i   f
0010640    s   o           [       s   t   r   u   c   t   u   r   e    
0010660    P   L       [       @   F   P   L   ;       @   M   P   L    
0010700    ]       ]  \r               i   f   n   o   t       [       s
0010720    t   r   u   c   t   u   r   e       P   L       [       @   F
0010740    P   L       ]       ]  \r   /   /   -   -   -   -   -   -   -
0010760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0011060    -   -   -   -  \r   m   a   n   i   f   e   s   t       l   e
0011100    n   P   L       =       s   i   z   e       P   L   /   1   6
0011120   \r  \f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0011140    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0011160    -   -   -   - 376 001  \0 252   8   -   -   -   -   -   -   -
0011200    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0011240    -   -   -   -   -  \r   s   t   r   u   c   t   u   r   e    
0011260    P   r   o   p   :  \t  \t   /   /       a   n       o   b   j
0011300    e   c   t  \r   /   /   -   -   -   -   -   -   -   -   -   -
0011320    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0011420    -  \r   [  \r   S   c   a   n       w   o   r   d  \t  \t   /
0011440    /       c   a   l   l       0  \r   G   e   n       w   o   r
0011460    d  \t  \t   /   /       c   a   l   l       1  \r   F   r   e
0011500    e       w   o   r   d  \t  \t   /   /       c   a   l   l    
0011520    2  \r   I   n   i   t       w   o   r   d  \t  \t   /   /    
0011540    c   a   l   l       3  \r   p   O   f   f   s   e   t       w
0011560    o   r   d  \t  \t   /   /       w 376 001  \0   G 354   o   r
0011600    d       o   f   f   s   e   t       i   n   t   o       p   L
0011620    i   s   t  \r   p   E   r   r   S   u   b   C   o   d   e    
0011640    w   o   r   d  \t   /   /       m   a   r   k   N   o       s
0011660    u   b   c   o   d   e  \r   p   D   P   R   P       w   o   r
0011700    d  \t  \t   /   /       D   P   R   P       b   i   t       v
0011720    e   c   t   o   r  \r   p   E   x   t   r   a       w   o   r
0011740    d  \t  \t   /   /       o   b   j   e   c   t       p   r   i
0011760    v   a   t   e       i   n   t   e   r   p   r   e   t   a   t
0012000    i   o   n  \r   ]  \r   m   a   n   i   f   e   s   t       l
0012020    e   n   P   r   o   p       =       s   i   z   e       P   r
0012040    o   p   /   1   6  \r  \r   /   /   -   -   -   -   -   -   -
0012060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0012160    -   -   -   -  \r   s   t   r   u   c   t   u   r   e 376 001
0012200   \0 325   ]       F   T   P   S   F   I   :  \t   /   /       F
0012220    t   p       S   e   r   v   e   r       F   i   l   e       I
0012240    n   t   e   r   f   a   c   e  \r   /   /   -   -   -   -   -
0012260    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0012360    -   -   -   -   -   -  \r   [  \r   V   e   r   s   i   o   n
0012400        w   o   r   d  \t  \t   /   /       V   e   r   s   i   o
0012420    n   (   b   s   p   S   t   r   e   a   m   ,   n   i   l   )
0012440   \r   S   t   o   r   e       w   o   r   d  \t  \t   /   /    
0012460    S   t   o   r   e   (   p   L   i   s   t   )       =       t
0012500    r   u   e   |   f   a   l   s   e  \r   S   t   o   r   e   F
0012520    i   l   e       w   o   r   d  \t  \t   /   /       S   t   o
0012540    r   e   F   i   l   e   (   p   L   i   s   t   )       =    
0012560    t   r   u   e   |   f   a   l   s   e  \r   S   t   o   r   e
0012600    C   l   e 376 001  \0 254 371   a   n   u   p       w   o   r
0012620    d  \t   /   /       S   t   o   r   e   C   l   e   a   n   u
0012640    p   (   p   L   i   s   t   ,   o   k   )  \r   R   e   t   r
0012660    i   e   v   e       w   o   r   d  \t  \t   /   /       R   e
0012700    t   r   i   e   v   e   (   l   o   c   a   l   P   L   i   s
0012720    t   ,   r   e   m   o   t   e   P   L   i   s   t   )       =
0012740        t   r   u   e   |   f   a   l   s   e  \r   R   e   t   r
0012760    i   e   v   e   F   i   l   e       w   o   r   d  \t   /   /
0013000        R   e   t   r   i   e   v   e   F   i   l   e   (   l   o
0013020    c   a   l   P   L   i   s   t   )       =       t   r   u   e
0013040    |   f   a   l   s   e  \r   R   e   t   r   i   e   v   e   C
0013060    l   e   a   n   u   p       w   o   r   d  \t   /   /       R
0013100    e   t   r   i   e   v   e   C   l   e   a   n   u   p   (   l
0013120    o   c   a   l   P   L   i   s   t   ,   o   k   )  \r   D   e
0013140    l   e   t   e       w   o   r   d  \t  \t   /   /       D   e
0013160    l   e   t   e   (   l   o   c   a   l   P   L   i   s   t   ,
0013200    r   e   m   o   t   e   P   L 376 001  \0   D   d   i   s   t
0013220    )       =       t   r   u   e   |   f   a   l   s   e  \r   D
0013240    e   l   e   t   e   F   i   l   e       w   o   r   d  \t  \t
0013260    /   /       D   e   l   e   t   e   F   i   l   e   (   l   o
0013300    c   a   l   P   L   i   s   t   )       =       t   r   u   e
0013320    |   f   a   l   s   e  \r   D   i   r   e   c   t   o   r   y
0013340        w   o   r   d  \t  \t   /   /       D   i   r   e   c   t
0013360    o   r   y   (   l   o   c   a   l   P   L   i   s   t   ,   r
0013400    e   m   o   t   e   P   L   i   s   t   )       =       t   r
0013420    u   e   |   f   a   l   s   e  \r   R   e   n   a   m   e    
0013440    w   o   r   d  \t  \t   /   /       R   e   n   a   m   e   (
0013460    o   l   d   P   L   i   s   t   ,   n   e   w   P   L   i   s
0013500    t   )       =       t   r   u   e   |   f   a   l   s   e  \r
0013520    ]  \r  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0013540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0013600    -   -   -   -   -   -   -   -   -   -   -   -   - 376 001  \0
0013620  253 305   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0013640    -   -   -   -   -  \r   s   t   r   u   c   t   u   r   e    
0013660    F   T   P   S   M   I   :  \t   /   /       F   t   p       S
0013700    e   r   v   e   r       M   a   i   l       I   n   t   e   r
0013720    f   a   c   e  \r   /   /   -   -   -   -   -   -   -   -   -
0013740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0014040    -   -  \r   [  \r   S   t   o   r   e   M   a   i   l       w
0014060    o   r   d  \t  \t   /   /       S   t   o   r   e   M   a   i
0014100    l   (   p   L   i   s   t   )       =       t   r   u   e   |
0014120    f   a   l   s   e  \r   S   t   o   r   e   M   a   i   l   M
0014140    e   s   s   a   g   e       w   o   r   d  \t   /   /       S
0014160    t   o   r   e   M   a   i   l   M   e   s   s   a   g   e   (
0014200    )       =       t   r   u   e   |   f   a   l   s   e  \r   S
0014220    t   o 376 001  \0   p 336   r   e   M   a   i   l   C   l   e
0014240    a   n   u   p       w   o   r   d  \t   /   /       S   t   o
0014260    r   e   M   a   i   l   C   l   e   a   n   u   p   (   o   k
0014300    )  \r   R   e   t   r   i   e   v   e   M   a   i   l       w
0014320    o   r   d  \t   /   /       R   e   t   r   i   e   v   e   M
0014340    a   i   l   (   p   L   i   s   t   )       =       p   L   i
0014360    s   t   |   f   a   l   s   e  \r   R   e   t   r   i   e   v
0014400    e   M   a   i   l   M   e   s   s   a   g   e       w   o   r
0014420    d       /   /       R   e   t   r   i   e   v   e   M   a   i
0014440    l   M   e   s   s   a   g   e   (   l   o   c   a   l   P   L
0014460    i   s   t   ,   r   e   m   o   t   e   P   L   i   s   t   )
0014500        =       t   |   f  \r   R   e   t   r   i   e   v   e   M
0014520    a   i   l   C   l   e   a   n   u   p       w   o   r   d    
0014540    /   /       R   e   t   r   i   e   v   e   M   a   i   l   C
0014560    l   e   a   n   u   p   (   r   e   m   o   t   e   P   L   i
0014600    s   t   ,   o   k   )  \r   ]  \r  \r   /   /   -   -   -   -
0014620    -   -   -   -   -   -   - 376 001  \0   =   <   -   -   -   -
0014640    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0014720    -   -   -   -   -   -   -   -   -   -   -   -  \r   c   o   m
0014740    p   i   l   e   t   e   s   t       M   T   P  \t  \t   /   /
0014760        F   t   p       S   e   r   v   e   r       I   n   t   e
0015000    r   f   a   c   e  \r               i   f   s   o           [
0015020        s   t   r   u   c   t   u   r   e       F   T   P   S   I
0015040        [       @   F   T   P   S   F   I   ;       @   F   T   P
0015060    S   M   I       ]       ]  \r               i   f   n   o   t
0015100        [       s   t   r   u   c   t   u   r   e       F   T   P
0015120    S   I       [       @   F   T   P   S   F   I       ]       ]
0015140   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0015160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0015220    -   -   -   -   -   -   -   -   -   -   -   - 376 001  \0   ]
0015240  023   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0015260    -   -   -  \r   m   a   n   i   f   e   s   t       l   e   n
0015300    F   T   P   S   I       =       s   i   z   e       F   T   P
0015320    S   I   /   1   6  \r  \f  \r   /   /   -   -   -   -   -   -
0015340    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0015440    -   -   -   -   -  \r   s   t   r   u   c   t   u   r   e    
0015460    F   T   P   I   :  \t  \t   /   /       F   t   p       I   n
0015500    t   e   r   f   a   c   e  \r   /   /   -   -   -   -   -   -
0015520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0015620    -   -   -   -   -  \r   [  \r   d   s   p   S   t   r   e   a
0015640    m 376 001  \0 366 305       w   o   r   d  \t  \t   /   /    
0015660    -   >       d   i   s   p   l   a   y       s   t   r   e   a
0015700    m  \r   b   s   p   S   t   r   e   a   m       w   o   r   d
0015720   \t  \t   /   /       -   >       b   s   p       S   t   r   e
0015740    a   m  \r   l   s   t       w   o   r   d  \t  \t   /   /    
0015760    -   >       l   o   g       s   t   r   e   a   m  \r   d   l
0016000    s       w   o   r   d  \t  \t   /   /       -   >       d   e
0016020    b   u   g   g   i   n   g       s   t   r   e   a   m  \r   d
0016040    b   l   s       w   o   r   d  \t  \t   /   /       -   >    
0016060    b   s   p       a   n   d       d   e   b   u   g   g   i   n
0016100    g       s   t   r   e   a   m  \r   g   e   t   C   m   d   S
0016120    t   r   i   n   g       w   o   r   d  \t   /   /       -   >
0016140        l   a   s   t       s   t   r   i   n   g       r   e   a
0016160    d       b   y       G   e   t   C   o   m   m   a   n   d  \r
0016200    f   l   a   g   s       w   o   r   d       =  \r            
0016220    [  \r               d   e   b   u   g   F   l   a   g       b
0016240    i   t  \t   /   /     376 001  \0 245   #   t   r   u   e    
0016260    e   n   a   b   l   e   s       l   o   t   s       o   f    
0016300    e   x   t   r   a       p   r   i   n   t   o   u   t  \r    
0016320            s   e   r   v   e   r   F   l   a   g       b   i   t
0016340   \t   /   /       t   r   u   e       i   f       t   h   i   s
0016360        i   s       a       s   e   r   v   e   r  \r            
0016400    n   e   w   D   i   r   e   c   t   o   r   y       b   i   t
0016420   \t   /   /       s   e   r   v   e   r       i   m   p   l   e
0016440    m   e   n   t   s       m   a   r   k   N   e   w   D   i   r
0016460    e   c   t   o   r   y  \r               n   e   w   S   t   o
0016500    r   e       b   i   t  \t  \t   /   /       s   e   r   v   e
0016520    r       i   m   p   l   e   m   e   n   t   s       m   a   r
0016540    k   N   e   w   S   t   o   r   e  \r               b   l   a
0016560    n   k       b   i   t       1   2  \r               ]  \r   @
0016600    F   T   P   S   I  \t  \t  \t   /   /       s   e   r   v   e
0016620    r       i   n   t   e   r   f   a   c   e  \r   ]  \r   m   a
0016640    n   i   f   e   s   t       l   e   n   F 376 001  \0 321 372
0016660    T   P   I       =       s   i   z   e       F   T   P   I   /
0016700    1   6  \r  \r   /   /   -   -   -   -   -   -   -   -   -   -
0016720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0017020    -  \r   s   t   r   u   c   t   u   r   e       F   t   p   C
0017040    t   x   :  \t   /   /       F   t   p       C   o   n   t   e
0017060    x   t  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0017100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0017200   \r   [  \r   @   R   S   C   t   x  \r   f   t   p   i       w
0017220    o   r   d       =       @   F   T   P   I  \r               [
0017240   \r               d   i   s   k   S   t   r   e   a   m       w
0017260  376 001  \0   x 016   o   r   d  \t   /   /       -   >       d
0017300    i   s   k       s   t   r   e   a   m  \r               f   d
0017320        w   o   r   d  \t  \t   /   /       -   >       I   F   S
0017340        f   i   l   e       d   e   s   c   r   i   p   t   o   r
0017360   \r               ]       =  \r               [  \r            
0017400    m   s   g       w   o   r   d  \t  \t   /   /       -   >    
0017420    M   s   g       d   e   s   c   r   i   p   t   o   r  \r    
0017440            i   n   d   e   x       w   o   r   d  \t  \t   /   /
0017460        m   a   i   l   b   o   x       i   n   d   e   x  \r    
0017500            ]  \r   ]  \r   m   a   n   i   f   e   s   t       l
0017520    e   n   E   x   t   r   a   F   t   p   C   t   x       =    
0017540    s   i   z   e       F   t   p   C   t   x   /   1   6   -   3
0017560   \r  \r   m   a   n   i   f   e   s   t  \r   [  \r   /   /    
0017600    F   i   l   e       S   e   r   v   e   r       e   r   r   o
0017620    r       c   o   d   e   s  \r   e   c   B   i   n   a   r   y
0017640    N   o   t   T   e   x   t       =       6   0   1  \t   /   /
0017660        1   0   2     376 001  \0 234  \b   f   i   l   e       t
0017700    y   p   e       i   s       B   i   n   a   r   y       n   o
0017720    t       T   e   x   t  \r   e   c   M   a   y   B   e   T   e
0017740    x   t       =       6   0   2  \t   /   /       W   a   r   n
0017760    i   n   g   :       $   S       m   a   y       b   e       t
0020000    y   p   e       T   e   x   t  \r   e   c   C   R   L   F   C
0020020    o   n   v   e   r   s   i   o   n       =       6   0   3  \t
0020040    /   /       1   0   2       C   R   L   F       c   o   n   v
0020060    e   r   s   i   o   n       n   o   t       s   u   p   p   o
0020100    r   t   e   d  \r   e   c   B   y   t   e   S   i   z   e    
0020120    =       6   0   4  \t   /   /       1   0   2       r   e   q
0020140    u   e   s   t   e   d       b   y   t   e       s   i   z   e
0020160        n   o   t       e   q   u   a   l       t   o       f   i
0020200    l   e       b   y   t   e       s   i   z   e  \r   e   c   T
0020220    y   p   e   R   e   q   u   i   r   e   d       =       6   0
0020240    5  \t   /   /       1   0   2       T   Y   P   E       p   r
0020260    o   p   e   r   t   y       r   e   q 376 001  \0 255 233   u
0020300    i   r   e   d  \r   e   c   B   y   t   e   R   e   q   u   i
0020320    r   e   d       =       6   0   6  \t   /   /       1   0   2
0020340        B   Y   T   E   -   S   I   Z   E       p   r   o   p   e
0020360    r   t   y       r   e   q   u   i   r   e   d  \r   e   c   N
0020400    o   t   R   e   t   r   i   e   v   e   d       =       6   0
0020420    7  \t   /   /       1   1   0       $   S       n   o   t    
0020440    r   e   t   r   i   e   v   e   d   :       $   P  \r   e   c
0020460    N   o   t   I   m   p   l   e   m   e   n   t   e   d       =
0020500        6   0   8  \t   /   /       1       U   n   i   m   p   l
0020520    e   m   e   n   t   e   d       c   o   m   m   a   n   d  \r
0020540    e   c   N   o   t   S   t   o   r   e   d       =       6   0
0020560    9  \t   /   /       1   0   7       n   o   t       s   t   o
0020600    r   e   d   :       $   P  \r   e   c   N   e   t   T   o   D
0020620    i   s   k       =       6   1   0  \t   /   /       1   1   0
0020640        B   S   P   R   e   a   d   B   l   o   c   k       f   a
0020660    i   l   e   d  \r   e   c   D   i   s   k   T   o   N   e 376
0020700   \0   Y   d   f   t       =       6   1   1  \t   /   /       1
0020720    1   0       B   S   P   W   r   i   t   e   B   l   o   c   k
0020740        f   a   i   l   e   d  \r   e   c   F   i   l   e   D   a
0020760    m   a   g   e   d       =       6   1   2  \t   /   /       C
0021000    a   u   t   i   o   n   :       f   i   l   e       $   S    
0021020    i   s       d   a   m   a   g   e   d  \r   ]  \r 377  \0  \0
0021040    I   f   s   F   t   p   I   n   i   t   .   b   c   p   l  \0
0021060  373 231  \n 331 275  \0  \0 376 001  \0 345 340   /   /       I
0021100    f   s   F   t   p   I   n   i   t   .   b   c   p   l       -
0021120        F   i   l   e       S   e   r   v   e   r       i   n   i
0021140    t   i   a   l   i   z   a   t   i   o   n  \r   /   /       C
0021160    o   p   y   r   i   g   h   t       X   e   r   o   x       C
0021200    o   r   p   o   r   a   t   i   o   n       1   9   7   9   ,
0021220        1   9   8   0   ,       1   9   8   2  \r   /   /       L
0021240    a   s   t       m   o   d   i   f   i   e   d       M   a   y
0021260        1   3   ,       1   9   8   2           2   :   1   0    
0021300    P   M       b   y       B   o   g   g   s  \r  \r   g   e   t
0021320        "   I   f   s   F   t   p   P   r   o   t   .   d   e   c
0021340    l   "  \r   g   e   t       "   S   t   r   e   a   m   s   .
0021360    d   "  \r  \r   e   x   t   e   r   n   a   l  \r   [  \r   /
0021400    /       o   u   t   g   o   i   n   g       p   r   o   c   e
0021420    d   u   r   e   s  \r   I   n   i   t   F   t   p   S   e   r
0021440    v  \r  \r   /   /       i   n   c   o   m   i   n   g       p
0021460    r   o   c   e   d   u   r   e   s  \r   I   f 376 001  \0 223
0021500  200   s   F   t   p   S   e   r   v  \r   A   l   l   o   c   a
0021520    t   e   ;       E   n   q   u   e   u   e   ;       O   p   e
0021540    n   L   e   v   e   l   1   S   o   c   k   e   t  \r   I   n
0021560    i   t   F   t   p   U   t   i   l   ;       I   n   i   t   F
0021600    t   p   P   L   i   s   t  \r   S   e   t   B   l   o   c   k
0021620    ;       Z   e   r   o   ;       N   o   o   p   ;       S   y
0021640    s   E   r   r  \r  \r   /   /       p   r   o   c   e   d   u
0021660    r   e   s       e   x   t   e   r   n   a   l       o   n   l
0021700    y       f   o   r       O   E   P       d   e   c   l   a   r
0021720    a   t   i   o   n   s  \r   F   t   p   S   V   e   r   s   i
0021740    o   n   ;       F   t   p   S   D   i   r   e   c   t   o   r
0021760    y   ;       F   t   p   S   R   e   n   a   m   e  \r   F   t
0022000    p   S   R   e   t   r   i   e   v   e   ;       F   t   p   S
0022020    R   e   t   r   i   e   v   e   F   i   l   e  \r   F   t   p
0022040    S   S   t   o   r   e   ;       F   t   p   S   S   t   o   r
0022060    e   F   i   l   e   ;       F   t   p   S   S   t   o   r   e
0022100    C 376 001  \0     235   l   e   a   n   u   p  \r   F   t   p
0022120    S   D   e   l   e   t   e   ;       F   t   p   S   D   e   l
0022140    e   t   e   F   i   l   e   ;       F   t   p   S   N   o   t
0022160    I   m   p   l  \r  \r   /   /       o   u   t   g   o   i   n
0022200    g       s   t   a   t   i   c   s  \r   d   F   T   P   I  \r
0022220   \r   /   /       i   n   c   o   m   i   n   g       s   t   a
0022240    t   i   c   s  \r   s   y   s   Z   o   n   e   ;       r   s
0022260    Q   ;       l   P   u   p   S   o   c  \r   ]  \r  \r   s   t
0022300    a   t   i   c       d   F   T   P   I  \r  \f  \r   /   /   -
0022320    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0022420    -   -   -   -   -   -   -   -   -   -  \r   l   e   t       I
0022440    n   i   t   F   t   p   S   e   r   v   (   )       b   e  \r
0022460    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0022500    -   -   -   -   -   - 376 001  \0 017 275   -   -   -   -   -
0022520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0022600    -   -  \r   [  \r   /   /       r   e   g   i   s   t   e   r
0022620        t   h   e       F   T   P       s   o   c   k   e   t    
0022640    w   i   t   h       t   h   e       s   o   c   k   e   t    
0022660    m   a   n   a   g   e   r  \r   l   e   t       r   s       =
0022700        A   l   l   o   c   a   t   e   (   s   y   s   Z   o   n
0022720    e   ,       l   e   n   R   S   )   ;       Z   e   r   o   (
0022740    r   s   ,       l   e   n   R   S   )  \r   r   s   >   >   R
0022760    S   .   p   r   o   c       =       I   f   s   F   t   p   S
0023000    e   r   v  \r   r   s   >   >   R   S   .   s   o   c       =
0023020        A   l   l   o   c   a   t   e   (   s   y   s   Z   o   n
0023040    e   ,       l   P   u   p   S   o   c   )  \r   O   p   e   n
0023060    L   e   v   e   l   1   S   o   c   k   e   t   (   r   s   >
0023100    >   R   S   .   s   o   c   ,       t   a 376 001  \0 226 301
0023120    b   l   e       [       0   ;       0   ;       s   o   c   k
0023140    e   t   F   T   P       ]   )  \r   r   s   >   >   R   S   .
0023160    e   x   t   r   a   S   p   a   c   e       =       l   e   n
0023200    E   x   t   r   a   F   t   p   C   t   x  \r   r   s   >   >
0023220    R   S   .   t   y   p   e       =       j   o   b   T   y   p
0023240    e   F   T   P  \r   E   n   q   u   e   u   e   (   r   s   Q
0023260    ,       r   s   )  \r  \r   /   /       F   t   p       p   a
0023300    c   k   a   g   e       i   n   i   t   i   a   l   i   z   a
0023320    t   i   o   n  \r   I   n   i   t   F   t   p   U   t   i   l
0023340    (   )  \r   I   n   i   t   F   t   p   P   L   i   s   t   (
0023360    )  \r  \r   /   /       b   u   i   l   d       t   h   e    
0023400    d   e   f   a   u   l   t       F   t   p       I   n   t   e
0023420    r   f   a   c   e  \r   d   F   T   P   I       =       A   l
0023440    l   o   c   a   t   e   (   s   y   s   Z   o   n   e   ,    
0023460    l   e   n   F   T   P   I   )   ;       Z   e   r   o   (   d
0023500    F   T   P   I   ,       l   e   n   F   T   P   I   )  \r   d
0023520  376 001  \0   Y   $   F   T   P   I   >   >   F   T   P   I   .
0023540    d   s   p   S   t   r   e   a   m       =       l   v       N
0023560    o   o   p       -       o   f   f   s   e   t       S   T   .
0023600    p   u   t   s   /   1   6  \r   d   F   T   P   I   >   >   F
0023620    T   P   I   .   l   s   t       =       l   v       N   o   o
0023640    p       -       o   f   f   s   e   t       S   T   .   p   u
0023660    t   s   /   1   6  \r   d   F   T   P   I   >   >   F   T   P
0023700    I   .   d   l   s       =       l   v       N   o   o   p    
0023720    -       o   f   f   s   e   t       S   T   .   p   u   t   s
0023740    /   1   6  \r   d   F   T   P   I   >   >   F   T   P   I   .
0023760    V   e   r   s   i   o   n       =       F   t   p   S   V   e
0024000    r   s   i   o   n  \r   d   F   T   P   I   >   >   F   T   P
0024020    I   .   S   t   o   r   e       =       F   t   p   S   S   t
0024040    o   r   e  \r   d   F   T   P   I   >   >   F   T   P   I   .
0024060    S   t   o   r   e   F   i   l   e       =       F   t   p   S
0024100    S   t   o   r   e   F   i   l   e  \r   d   F   T   P   I   >
0024120    >   F   T   P   I 376 001  \0   I 031   .   S   t   o   r   e
0024140    C   l   e   a   n   u   p       =       F   t   p   S   S   t
0024160    o   r   e   C   l   e   a   n   u   p  \r   d   F   T   P   I
0024200    >   >   F   T   P   I   .   R   e   t   r   i   e   v   e    
0024220    =       F   t   p   S   R   e   t   r   i   e   v   e  \r   d
0024240    F   T   P   I   >   >   F   T   P   I   .   R   e   t   r   i
0024260    e   v   e   F   i   l   e       =       F   t   p   S   R   e
0024300    t   r   i   e   v   e   F   i   l   e  \r   d   F   T   P   I
0024320    >   >   F   T   P   I   .   R   e   t   r   i   e   v   e   C
0024340    l   e   a   n   u   p       =       N   o   o   p  \r   d   F
0024360    T   P   I   >   >   F   T   P   I   .   D   e   l   e   t   e
0024400        =       F   t   p   S   D   e   l   e   t   e  \r   d   F
0024420    T   P   I   >   >   F   T   P   I   .   D   e   l   e   t   e
0024440    F   i   l   e       =       F   t   p   S   D   e   l   e   t
0024460    e   F   i   l   e  \r   d   F   T   P   I   >   >   F   T   P
0024500    I   .   D   i   r   e   c   t   o   r   y       =       F   t
0024520    p   S   D   i   r   e   c   t   o   r 376  \0   w   4   y   y
0024540   \r   d   F   T   P   I   >   >   F   T   P   I   .   R   e   n
0024560    a   m   e       =       F   t   p   S   R   e   n   a   m   e
0024600   \r   d   F   T   P   I   >   >   F   T   P   I   .   S   t   o
0024620    r   e   M   a   i   l       =       F   t   p   S   N   o   t
0024640    I   m   p   l  \r   d   F   T   P   I   >   >   F   T   P   I
0024660    .   R   e   t   r   i   e   v   e   M   a   i   l       =    
0024700    F   t   p   S   N   o   t   I   m   p   l  \r   ]  \r 032   (
0024720    1   8   0   0   )  \r 377  \0  \0   I   f   s   F   t   p   S
0024740    e   r   v   .   b   c   p   l  \0 373 231  \n 332 005  \0  \0
0024760  376 001  \0 205   =   /   /       I   f   s   F   t   p   S   e
0025000    r   v   .   b   c   p   l       -       I   F   S       F   t
0025020    p       S   e   r   v   e   r  \r   /   /       C   o   p   y
0025040    r   i   g   h   t       X   e   r   o   x       C   o   r   p
0025060    o   r   a   t   i   o   n       1   9   7   9   ,       1   9
0025100    8   0   ,       1   9   8   1   ,       1   9   8   2  \r   /
0025120    /       L   a   s   t       m   o   d   i   f   i   e   d    
0025140    M   a   y       1   3   ,       1   9   8   2           2   :
0025160    1   3       P   M       b   y       B   o   g   g   s  \r  \r
0025200    g   e   t       "   I   f   s   F   t   p   P   r   o   t   .
0025220    d   e   c   l   "  \r   g   e   t       "   I   f   s   F   i
0025240    l   e   s   .   d   e   c   l   "  \r  \r   e   x   t   e   r
0025260    n   a   l  \r   [  \r   /   /       o   u   t   g   o   i   n
0025300    g       p   r   o   c   e   d   u   r   e   s  \r   I   f   s
0025320    F   t   p   S   e   r   v  \r  \r   /   /       i   n   c   o
0025340    m   i   n   g       p   r   o   c   e   d   u   r   e   s  \r
0025360    F   t   p   S   e 376 001  \0 220 330   r   v   P   r   o   t
0025400   \r   C   r   e   a   t   e   U   s   e   r   I   n   f   o   ;
0025420        D   e   s   t   r   o   y   U   s   e   r   I   n   f   o
0025440   \r   F   r   e   e   P   o   i   n   t   e   r   ;       D   e
0025460    s   t   r   o   y   J   o   b   ;       M   o   v   e   B   l
0025500    o   c   k  \r  \r   /   /       i   n   c   o   m   i   n   g
0025520        s   t   a   t   i   c   s  \r   d   F   T   P   I   ;    
0025540    o   f   f   s   e   t   B   S   P   S   t   r  \r   ]  \r  \r
0025560    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0025600    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0025660    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   l   e
0025700    t       I   f   s   F   t   p   S   e   r   v   (   c   t   x
0025720    )       b   e           /   /   a       c   o   n   t   e   x
0025740    t  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0025760    -   -   -   -   -   -   -   -   -   - 376 001  \0 346 200   -
0026000    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0026060    -   -   -   -  \r   [  \r   M   o   v   e   B   l   o   c   k
0026100    (   l   v       c   t   x   >   >   F   t   p   C   t   x   .
0026120    f   t   p   i   ,       d   F   T   P   I   ,       l   e   n
0026140    F   T   P   I   )  \r   c   t   x   >   >   F   t   p   C   t
0026160    x   .   b   s   p   S   t   r   e   a   m       =       c   t
0026200    x   >   >   F   t   p   C   t   x   .   b   s   p   S   o   c
0026220        +       o   f   f   s   e   t   B   S   P   S   t   r  \r
0026240    c   t   x   >   >   F   t   p   C   t   x   .   d   b   l   s
0026260        =       c   t   x   >   >   F   t   p   C   t   x   .   b
0026300    s   p   S   t   r   e   a   m  \r   c   t   x   >   >   F   t
0026320    p   C   t   x   .   u   s   e   r   I   n   f   o       =    
0026340    C   r   e   a   t   e   U   s   e   r   I   n   f   o   (   )
0026360   \r   c   t   x   >   >   F   t   p   C   t   x   .   f   d 376
0026400   \0 204 301 310       =       0  \r   F   t   p   S   e   r   v
0026420    P   r   o   t   (   1   8   0   0   0   )           /   /   m
0026440    a   i   n       l   o   o   p       i   s       i   n       h
0026460    e   r   e   .           1   8   0   0   0       =       3    
0026500    m   i   n   u   t   e   s  \r   D   e   s   t   r   o   y   U
0026520    s   e   r   I   n   f   o   (   c   t   x   >   >   F   t   p
0026540    C   t   x   .   u   s   e   r   I   n   f   o   )  \r   D   e
0026560    s   t   r   o   y   J   o   b   (   )           /   /   s   u
0026600    i   c   i   d   e  \r   ]  \r 377  \0  \0   I   f   s   F   t
0026620    p   S   t   o   r   e   .   b   c   p   l  \0 373 233 236  \t
0026640    ?  \0  \0 376 001  \0 256 355   /   /       I   f   s   F   t
0026660    p   S   t   o   r   e   .   b   c   p   l       -   -       I
0026700    F   S       F   t   p       S   t   o   r   e       c   o   m
0026720    m   a   n   d  \r   /   /       C   o   p   y   r   i   g   h
0026740    t       X   e   r   o   x       C   o   r   p   o   r   a   t
0026760    i   o   n       1   9   7   9   ,       1   9   8   0   ,    
0027000    1   9   8   1   ,       1   9   8   2   ,       1   9   8   3
0027020   \r   /   /       L   a   s   t       m   o   d   i   f   i   e
0027040    d       S   e   p   t   e   m   b   e   r       2   3   ,    
0027060    1   9   8   3           6   :   0   9       P   M       b   y
0027100        T   a   f   t  \r  \r   g   e   t       "   I   f   s   .
0027120    d   e   c   l   "  \r   g   e   t       "   I   f   s   D   i
0027140    r   s   .   d   e   c   l   "  \r   g   e   t       "   I   f
0027160    s   F   i   l   e   s   .   d   e   c   l   "  \r   g   e   t
0027200        "   I   f   s   F   t   p   P   r   o   t   .   d   e   c
0027220    l   "  \r  \r   e   x   t   e   r   n   a   l  \r   [  \r   /
0027240    /       o   u   t   g   o   i 376 001  \0   7 317   n   g    
0027260    p   r   o   c   e   d   u   r   e   s  \r   F   t   p   S   S
0027300    t   o   r   e   ;       F   t   p   S   S   t   o   r   e   F
0027320    i   l   e   ;       F   t   p   S   S   t   o   r   e   C   l
0027340    e   a   n   u   p   ;       F   t   p   S   S   e   t   P   r
0027360    o   p   s  \r  \r   /   /       i   n   c   o   m   i   n   g
0027400        p   r   o   c   e   d   u   r   e   s       f   r   o   m
0027420        o   t   h   e   r       F   t   p       f   i   l   e   s
0027440   \r   F   t   p   S   M   a   k   e   S   F   I   L   ;       F
0027460    t   p   S   S   e   n   d   M   a   r   k  \r   F   t   p   S
0027500    C   h   e   c   k   A   c   c   e   s   s   ;       F   t   p
0027520    S   F   i   l   l   P   L   F   r   o   m   L   D  \r   N   e
0027540    t   T   o   D   i   s   k   ;       F   r   e   e   P   L   i
0027560    s   t  \r  \r   /   /       i   n   c   o   m   i   n   g    
0027600    p   r   o   c   e   d   u   r   e   s       f   r   o   m    
0027620    I   F   S       D   i   r   s  \r   I   F   S   O   p   e   n
0027640    F   i   l   e   ;       D   e   l   e   t   e   F 376 001  \0
0027660    ` 232   i   l   e   F   r   o   m   F   D   ;       G   e   t
0027700    B   u   f   f   e   r   F   o   r   F   D  \r   S   t   r   e
0027720    a   m   s   F   D   ;       D   e   s   t   r   o   y   F   D
0027740   \r   C   l   o   s   e   I   F   S   S   t   r   e   a   m   ;
0027760        C   l   o   s   e   I   F   S   F   i   l   e   ;       T
0030000    r   a   n   s   f   e   r   L   e   a   d   e   r   P   a   g
0030020    e  \r  \r   /   /       i   n   c   o   m   i   n   g       p
0030040    r   o   c   e   d   u   r   e   s       -       m   i   s   c
0030060    e   l   l   a   n   e   o   u   s  \r   S   y   s   F   r   e
0030100    e   ;       M   o   v   e   B   l   o   c   k   ;       I   F
0030120    S   P   r   i   n   t   E   r   r   o   r   ;       C   o   p
0030140    y   S   t   r   i   n   g   ;       F   r   e   e   P   o   i
0030160    n   t   e   r   ;       E   x   t   r   a   c   t   S   u   b
0030200    s   t   r   i   n   g  \r  \r   /   /       i   n   c   o   m
0030220    i   n   g       s   t   a   t   i   c   s  \r   C   t   x   R
0030240    u   n   n   i   n   g  \r   ]  \r  \f  \r   /   /   -   -   -
0030260    -   - 376 001  \0 035 325   -   -   -   -   -   -   -   -   -
0030300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0030360    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   l   e
0030400    t       F   t   p   S   S   t   o   r   e   (   r   e   m   o
0030420    t   e   P   L   )       =       v   a   l   o   f  \r   /   /
0030440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0030540    -   -   -   -   -   -   -   -   -   -   -  \r   [  \r   u   n
0030560    l   e   s   s       F   t   p   S   C   h   e   c   k   A   c
0030600    c   e   s   s   (   r   e   m   o   t   e   P   L   )       r
0030620    e   s   u   l   t   i   s       f   a   l   s   e  \r  \r   s
0030640    w   i   t   c   h   o   n       r   e   m   o   t   e   P   L
0030660    >   >   P   L   .   T   Y 376 001  \0   *   B   P   E       i
0030700    n   t   o  \r               [  \r               c   a   s   e
0030720        U   n   s   p   e   c   i   f   i   e   d   :  \r        
0030740                    r   e   s   u   l   t   i   s       F   t   p
0030760    S   S   e   n   d   M   a   r   k   (   m   a   r   k   N   o
0031000    ,       e   c   T   y   p   e   R   e   q   u   i   r   e   d
0031020    )  \r               c   a   s   e       T   e   x   t   :  \r
0031040                            i   f       r   e   m   o   t   e   P
0031060    L   >   >   P   L   .   E   O   L   C       e   q       C   R
0031100    L   F       t   h   e   n  \r                                
0031120        r   e   s   u   l   t   i   s       F   t   p   S   S   e
0031140    n   d   M   a   r   k   (   m   a   r   k   N   o   ,       e
0031160    c   C   R   L   F   C   o   n   v   e   r   s   i   o   n   )
0031200   \r                           e   n   d   c   a   s   e  \r    
0031220            c   a   s   e       B   i   n   a   r   y   :  \r    
0031240                        i   f       r   e   m   o   t   e   P   L
0031260    >   >   P   L   .   B   Y   T   E       e   q 376 001  \0   b
0031300  026       0       t   h   e   n  \r                            
0031320            r   e   s   u   l   t   i   s       F   t   p   S   S
0031340    e   n   d   M   a   r   k   (   m   a   r   k   N   o   ,    
0031360    e   c   B   y   t   e   R   e   q   u   i   r   e   d   )  \r
0031400                            e   n   d   c   a   s   e  \r        
0031420        ]  \r  \r   F   t   p   S   M   a   k   e   S   F   I   L
0031440    (   r   e   m   o   t   e   P   L   )  \r   l   e   t       e
0031460    c       =       n   i   l  \r   C   t   x   R   u   n   n   i
0031500    n   g   >   >   F   t   p   C   t   x   .   d   i   s   k   S
0031520    t   r   e   a   m       =       I   F   S   O   p   e   n   F
0031540    i   l   e   (   r   e   m   o   t   e   P   L   >   >   P   L
0031560    .   S   F   I   L   ,       l   v       e   c   ,  \r       m
0031600    o   d   e   W   r   i   t   e   ,       0   ,       0   ,    
0031620    0   ,       r   e   m   o   t   e   P   L   >   >   P   L   .
0031640    D   I   R   E   )  \r   i   f       C   t   x   R   u   n   n
0031660    i   n   g   >   >   F   t   p   C   t   x   .   d   i   s   k
0031700    S 376 001  \0 374 016   t   r   e   a   m       e   q       0
0031720        t   h   e   n       r   e   s   u   l   t   i   s       F
0031740    t   p   S   S   e   n   d   M   a   r   k   (   m   a   r   k
0031760    N   o   ,       e   c   )  \r  \r   /   /       o   b   t   a
0032000    i   n       p   r   o   p   e   r   t   i   e   s       f   o
0032020    r       t   h   e       a   c   t   u   a   l       f   i   l
0032040    e       t   h   a   t       w   a   s       c   r   e   a   t
0032060    e   d  \r   C   t   x   R   u   n   n   i   n   g   >   >   F
0032100    t   p   C   t   x   .   f   d       =       S   t   r   e   a
0032120    m   s   F   D   (   C   t   x   R   u   n   n   i   n   g   >
0032140    >   F   t   p   C   t   x   .   d   i   s   k   S   t   r   e
0032160    a   m   )  \r   l   e   t       l   o   c   a   l   P   L    
0032200    =       F   t   p   S   F   i   l   l   P   L   F   r   o   m
0032220    L   D   (   r   e   m   o   t   e   P   L   )           /   /
0032240        c   a   n   '   t       f   a   i   l   ,       f   i   l
0032260    e       i   s       l   o   c   k   e   d  \r  \r   /   /    
0032300    n   o   w       c   o 376 001  \0 004 255   p   y       u   s
0032320    e   r   '   s       p   r   o   p   e   r   t   i   e   s    
0032340    t   h   a   t       w   e       w   i   l   l       p   u   t
0032360        i   n       f   i   l   e       o   n   c   e       i   t
0032400        g   e   t   s       s   t   o   r   e   d   .  \r   /   /
0032420        N   o   t   e       t   h   a   t       w   e       d   o
0032440    n   '   t       s   e   t       t   h   e   s   e       p   r
0032460    o   p   e   r   t   i   e   s       n   o   w   ,       b   e
0032500    c   a   u   s   e       t   h   e       u   s   e   r       s
0032520    t   i   l   l       h   a   s  \r   /   /       a       c   h
0032540    a   n   c   e       t   o       a   b   a   n   d   o   n    
0032560    t   h   e       s   t   o   r   e       a   n   d       w   e
0032600        d   o   n   '   t       w   a   n   t       t   o       m
0032620    o   d   i   f   y       t   h   e       f   i   l   e       y
0032640    e   t   .  \r   l   o   c   a   l   P   L   >   >   P   L   .
0032660    T   Y   P   E       =       r   e   m   o   t   e   P   L   >
0032700    >   P   L   .   T   Y   P   E  \r   l   o 376 001  \0 201  \t
0032720    c   a   l   P   L   >   >   P   L   .   B   Y   T   E       =
0032740        r   e   m   o   t   e   P   L   >   >   P   L   .   B   Y
0032760    T   E  \r   i   f       r   e   m   o   t   e   P   L   >   >
0033000    P   L   .   C   D   A   T   .   h       n   e       0       t
0033020    h   e   n  \r               M   o   v   e   B   l   o   c   k
0033040    (   l   v       l   o   c   a   l   P   L   >   >   P   L   .
0033060    C   D   A   T   ,       l   v       r   e   m   o   t   e   P
0033100    L   >   >   P   L   .   C   D   A   T   ,       2   )  \r   M
0033120    o   v   e   B   l   o   c   k   (   l   v       l   o   c   a
0033140    l   P   L   >   >   P   L   .   S   I   Z   E   ,       l   v
0033160        r   e   m   o   t   e   P   L   >   >   P   L   .   S   I
0033200    Z   E   ,       2   )           /   /       t   h   i   s    
0033220    i   s       a       l   i   e       -   -  \r               /
0033240    /       s   i   z   e       w   i   l   l       b   e       d
0033260    e   t   e   r   m   i   n   e   d       b   y       t   h   e
0033300        n   u   m   b   e   r       o   f       b   y   t   e   s
0033320  376 001  \0 245   \       t   h   e       u   s   e   r       a
0033340    c   t   u   a   l   l   y       s   e   n   d   s   .  \r   i
0033360    f       r   e   m   o   t   e   P   L   >   >   P   L   .   A
0033400    U   T   H       n   e       0       t   h   e   n  \r        
0033420        [  \r               F   r   e   e   P   o   i   n   t   e
0033440    r   (   l   v       l   o   c   a   l   P   L   >   >   P   L
0033460    .   A   U   T   H   )  \r               l   o   c   a   l   P
0033500    L   >   >   P   L   .   A   U   T   H       =       E   x   t
0033520    r   a   c   t   S   u   b   s   t   r   i   n   g   (   r   e
0033540    m   o   t   e   P   L   >   >   P   L   .   A   U   T   H   )
0033560   \r               ]  \r   l   o   c   a   l   P   L   >   >   P
0033600    L   .   C   S   U   M       =       r   e   m   o   t   e   P
0033620    L   >   >   P   L   .   C   S   U   M  \r  \r   r   e   s   u
0033640    l   t   i   s       l   o   c   a   l   P   L  \r   ]  \r  \f
0033660   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0033700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0033720    -   -   -   -   - 376 001  \0 340 254   -   -   -   -   -   -
0033740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0034000    -   -   -  \r   a   n   d       F   t   p   S   S   t   o   r
0034020    e   F   i   l   e   (   r   e   m   o   t   e   P   L   ,    
0034040    l   o   c   a   l   P   L   )       =       v   a   l   o   f
0034060   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0034100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0034160    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [
0034200   \r   /   /       S   e   t       a   n   y       f   i   l   e
0034220        p   r   o   p   e   r   t   i   e   s       t   h   a   t
0034240        a   r   e       s   u   p   p   l   i   e   d       i   n
0034260        r   e   m   o   t   e   P   L   .  \r   /   /       T   h
0034300    e       f   i   l   e       i   s       l   o   c   k   e   d
0034320    ,       s   o       t   h   e   r   e 376 001  \0 245  \0    
0034340    i   s       n   o       n   e   e   d       t   o       l   o
0034360    c   k       t   h   e       d   i   r   e   c   t   o   r   y
0034400        f   o   r       t   h   i   s   .  \r   l   e   t       f
0034420    d       =       S   t   r   e   a   m   s   F   D   (   C   t
0034440    x   R   u   n   n   i   n   g   >   >   F   t   p   C   t   x
0034460    .   d   i   s   k   S   t   r   e   a   m   )  \r   l   e   t
0034500        i   l   d       =       G   e   t   B   u   f   f   e   r
0034520    F   o   r   F   D   (   f   d   )  \r   T   r   a   n   s   f
0034540    e   r   L   e   a   d   e   r   P   a   g   e   (   f   d   ,
0034560        i   l   d   )  \r   F   t   p   S   S   e   t   P   r   o
0034600    p   s   (   i   l   d   ,       r   e   m   o   t   e   P   L
0034620    )  \r   T   r   a   n   s   f   e   r   L   e   a   d   e   r
0034640    P   a   g   e   (   f   d   ,       i   l   d   ,       t   r
0034660    u   e   )  \r   S   y   s   F   r   e   e   (   i   l   d   )
0034700   \r  \r   /   /       T   r   a   n   s   f   e   r       t   h
0034720    e       f   i   l   e   .  \r   l   e   t       e   c     376
0034740  001  \0   \ 211   =       N   e   t   T   o   D   i   s   k   (
0034760    C   t   x   R   u   n   n   i   n   g   >   >   F   t   p   C
0035000    t   x   .   d   i   s   k   S   t   r   e   a   m   ,  \r    
0035020    C   t   x   R   u   n   n   i   n   g   >   >   F   t   p   C
0035040    t   x   .   b   s   p   S   t   r   e   a   m   ,       l   v
0035060        r   e   m   o   t   e   P   L   >   >   P   L   .   S   I
0035100    Z   E   )  \r   i   f       e   c       e   q       0       r
0035120    e   s   u   l   t   i   s       t   r   u   e  \r   r   e   s
0035140    u   l   t   i   s       F   t   p   S   S   e   n   d   M   a
0035160    r   k   (   m   a   r   k   N   o   ,       e   c   N   o   t
0035200    S   t   o   r   e   d   ,       I   F   S   P   r   i   n   t
0035220    E   r   r   o   r   ,       e   c   )  \r   ]  \r  \r   /   /
0035240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0035340    -   -   -   - 376 001  \0   1   Y   -   -   -   -   -   -   -
0035360   \r   a   n   d       F   t   p   S   S   t   o   r   e   C   l
0035400    e   a   n   u   p   (   r   e   m   o   t   e   P   L   ,    
0035420    o   k   ,       l   o   c   a   l   P   L   )       b   e  \r
0035440    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0035460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0035540    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [  \r
0035560    C   t   x   R   u   n   n   i   n   g   >   >   F   t   p   C
0035600    t   x   .   f   d       =       0  \r   F   r   e   e   P   L
0035620    i   s   t   (   l   o   c   a   l   P   L   )  \r   /   /    
0035640    d   e   s   t   r   o   y       s   t   r   e   a   m       u
0035660    n   c   o   n   d   i   t   i   o   n   a   l   l   y   ,    
0035700    b   u   t       c   l   o   s   e       f   i   l   e       o
0035720    n   l   y       i   f       t   r   a   n   s   f   e   r    
0035740    w   e   n   t       o   k  \r   l 376 001  \0 022 307   e   t
0035760        f   d       =       C   l   o   s   e   I   F   S   S   t
0036000    r   e   a   m   (   C   t   x   R   u   n   n   i   n   g   >
0036020    >   F   t   p   C   t   x   .   d   i   s   k   S   t   r   e
0036040    a   m   ,       n   o   t       o   k   )  \r   u   n   l   e
0036060    s   s       o   k       d   o  \r               /   /       T
0036100    h   e       f   i   l   e       i   s       d   a   m   a   g
0036120    e   d   ,       a   n   d       w   e       m   u   s   t    
0036140    d   e   s   t   r   o   y       i   t       i   f       w   e
0036160        c   a   n  \r               i   f       D   e   l   e   t
0036200    e   F   i   l   e   F   r   o   m   F   D   (   f   d   ,    
0036220    f   a   l   s   e   ,       t   r   u   e   )       n   e    
0036240    0       t   h   e   n       C   l   o   s   e   I   F   S   F
0036260    i   l   e   (   f   d   )  \r   D   e   s   t   r   o   y   F
0036300    D   (   f   d   )  \r   ]  \r  \r   /   /   -   -   -   -   -
0036320    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0036340    -   -   -   -   -   -   -   -   -   -   -   -   -   - 376 001
0036360   \0 245   u   -   -   -   -   -   -   -   -   -   -   -   -   -
0036400    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0036420    -   -   -   -   -   -   -   -   -   -   -  \r   a   n   d    
0036440    F   t   p   S   S   e   t   P   r   o   p   s   (   i   l   d
0036460    ,       r   e   m   o   t   e   P   L   )       b   e  \r   /
0036500    /   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0036520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0036600    -   -   -   -   -   -   -   -   -   -   -   -  \r   /   /    
0036620    C   o   p   i   e   s       f   i   l   e       p   r   o   p
0036640    e   r   t   i   e   s       f   r   o   m       r   e   m   o
0036660    t   e   P   L       i   n   t   o       l   e   a   d   e   r
0036700        p   a   g   e       s   u   p   p   l   i   e   d       b
0036720    y       c   a   l   l   e   r   ,  \r   /   /       w   h   o
0036740        i   s       e   x   p   e   c   t   e   d       t   o    
0036760    r   e   w 376 001  \0   ! 322   r   i   t   e       i   t    
0037000    a   f   t   e   r   w   a   r   d   .           (   C   a   l
0037020    l   e   d       b   y       S   t   o   r   e       a   n   d
0037040        R   e   n   a   m   e   .   )  \r   [  \r   i   f       r
0037060    e   m   o   t   e   P   L   >   >   P   L   .   T   Y   P   E
0037100        n   e       0       t   h   e   n       i   l   d   >   >
0037120    I   L   D   .   t   y   p   e       =       r   e   m   o   t
0037140    e   P   L   >   >   P   L   .   T   Y   P   E  \r   i   f    
0037160    r   e   m   o   t   e   P   L   >   >   P   L   .   B   Y   T
0037200    E       n   e       0       t   h   e   n       i   l   d   >
0037220    >   I   L   D   .   b   y   t   e   S   i   z   e       =    
0037240    r   e   m   o   t   e   P   L   >   >   P   L   .   B   Y   T
0037260    E  \r   i   f       r   e   m   o   t   e   P   L   >   >   P
0037300    L   .   C   D   A   T   .   h       n   e       0       t   h
0037320    e   n  \r               M   o   v   e   B   l   o   c   k   (
0037340    l   v       i   l   d   >   >   I   L   D   .   c   r   e   a
0037360    t   e   d   ,       l   v     376  \0 347 023   P   r   e   m
0037400    o   t   e   P   L   >   >   P   L   .   C   D   A   T   ,    
0037420    2   )  \r   i   f       r   e   m   o   t   e   P   L   >   >
0037440    P   L   .   A   U   T   H       n   e       0       &       r
0037460    e   m   o   t   e   P   L   >   >   P   L   .   A   U   T   H
0037500    >   >   S   t   r   i   n   g   .   l   e   n   g   t   h    
0037520    l   e       m   a   x   D   i   r   N   a   m   e   C   h   a
0037540    r   s       t   h   e   n  \r               C   o   p   y   S
0037560    t   r   i   n   g   (   l   v       i   l   d   >   >   I   L
0037600    D   .   a   u   t   h   o   r   ,       r   e   m   o   t   e
0037620    P   L   >   >   P   L   .   A   U   T   H   )  \r   i   f    
0037640    i   l   d   >   >   I   L   D   .   c   h   e   c   k   s   u
0037660    m       n   e       0       t   h   e   n       i   l   d   >
0037700    >   I   L   D   .   c   h   e   c   k   s   u   m       =    
0037720    r   e   m   o   t   e   P   L   >   >   P   L   .   C   S   U
0037740    M  \r   ]  \r 377  \0  \0   I   f   s   F   t   p   R   e   t
0037760    r   i   e   v   e   .   b   c   p   l  \0 373 231  \b 021 273
0040000   \0  \0 376 001  \0 332 361   /   /       I   f   s   F   t   p
0040020    R   e   t   r   i   e   v   e   .   b   c   p   l       -   -
0040040        I   F   S       F   t   p       R   e   t   r   i   e   v
0040060    e       c   o   m   m   a   n   d  \r   /   /       C   o   p
0040100    y   r   i   g   h   t       X   e   r   o   x       C   o   r
0040120    p   o   r   a   t   i   o   n       1   9   7   9   ,       1
0040140    9   8   0   ,       1   9   8   1  \r   /   /       L   a   s
0040160    t       m   o   d   i   f   i   e   d       M   a   y       1
0040200    1   ,       1   9   8   2           1   1   :   3   3       A
0040220    M       b   y       T   a   f   t  \r  \r   g   e   t       "
0040240    I   f   s   D   i   r   s   .   d   e   c   l   "  \r   g   e
0040260    t       "   I   f   s   F   i   l   e   s   .   d   e   c   l
0040300    "  \r   g   e   t       "   I   f   s   F   t   p   P   r   o
0040320    t   .   d   e   c   l   "  \r  \r   e   x   t   e   r   n   a
0040340    l  \r   [  \r   /   /       o   u   t   g   o   i   n   g    
0040360    p   r   o   c   e   d   u   r   e   s  \r   F   t   p   S   R
0040400    e   t   r   i   e   v   e 376 001  \0 344 005   ;       F   t
0040420    p   S   R   e   t   r   i   e   v   e   F   i   l   e  \r  \r
0040440    /   /       i   n   c   o   m   i   n   g       p   r   o   c
0040460    e   d   u   r   e   s       f   r   o   m       o   t   h   e
0040500    r       F   t   p       f   i   l   e   s  \r   F   t   p   S
0040520    M   a   k   e   S   F   I   L   ;       F   t   p   S   S   e
0040540    n   d   M   a   r   k  \r   F   t   p   S   C   h   e   c   k
0040560    A   c   c   e   s   s   ;       F   t   p   S   F   i   l   l
0040600    P   L   F   r   o   m   L   D  \r   M   t   p   S   A   n   o
0040620    n   y   m   o   u   s   A   c   c   e   s   s   ;       F   t
0040640    p   S   C   h   e   c   k   C   o   n   n   e   c   t   i   o
0040660    n  \r   D   i   s   k   T   o   N   e   t   ;       F   i   l
0040700    e   T   y   p   e   ;       F   r   e   e   P   L   i   s   t
0040720   \r  \r   /   /       i   n   c   o   m   i   n   g       p   r
0040740    o   c   e   d   u   r   e   s       f   r   o   m       I   F
0040760    S       D   i   r   s  \r   N   e   x   t   F   D   ;       D
0041000    e   s   t   r   o   y   F   D  \r   L   o   o 376 001  \0   H
0041020    z   k   u   p   I   F   S   F   i   l   e   ;       O   p   e
0041040    n   I   F   S   S   t   r   e   a   m   ;       C   l   o   s
0041060    e   I   F   S   S   t   r   e   a   m  \r  \r   /   /       i
0041100    n   c   o   m   i   n   g       p   r   o   c   e   d   u   r
0041120    e   s       -       m   i   s   c   e   l   l   a   n   e   o
0041140    u   s  \r   I   F   S   P   r   i   n   t   E   r   r   o   r
0041160   \r  \r   /   /       i   n   c   o   m   i   n   g       s   t
0041200    a   t   i   c   s  \r   C   t   x   R   u   n   n   i   n   g
0041220   \r   ]  \r  \f  \r   /   /   -   -   -   -   -   -   -   -   -
0041240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0041340    -   -  \r   l   e   t       F   t   p   S   R   e   t   r   i
0041360    e   v   e   (   r   e   m   o   t   e   P   L   ,       l   o
0041400    c   a   l   P   L   )       =       v   a   l   o   f  \r   /
0041420    / 376 001  \0   - 311   -   -   -   -   -   -   -   -   -   -
0041440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0041540    -  \r   [       /   /       r   e   p   e   a   t  \r   l   o
0041560    c   a   l   P   L       =       F   r   e   e   P   L   i   s
0041600    t   (   l   o   c   a   l   P   L   )  \r   u   n   l   e   s
0041620    s       F   t   p   S   C   h   e   c   k   C   o   n   n   e
0041640    c   t   i   o   n   (   )       r   e   s   u   l   t   i   s
0041660        f   a   l   s   e  \r   l   e   t       e   c       =    
0041700    n   i   l  \r   t   e   s   t       C   t   x   R   u   n   n
0041720    i   n   g   >   >   F   t   p   C   t   x   .   f   d       e
0041740    q       0  \r               i   f   s   o  \r                
0041760            [           /   /       f   i   r   s   t       t   i
0042000    m   e       f   o   r       t   h   i   s       R   e   t   r
0042020    i   e   v   e       r 376 001  \0 354 352   e   q   u   e   s
0042040    t  \r                           F   t   p   S   M   a   k   e
0042060    S   F   I   L   (   r   e   m   o   t   e   P   L   )  \r    
0042100                        t   e   s   t       C   t   x   R   u   n
0042120    n   i   n   g   >   >   F   t   p   C   t   x   .   t   y   p
0042140    e       e   q       j   o   b   T   y   p   e   F   T   P  \r
0042160                                        i   f   s   o       u   n
0042200    l   e   s   s       F   t   p   S   C   h   e   c   k   A   c
0042220    c   e   s   s   (   r   e   m   o   t   e   P   L   )       r
0042240    e   s   u   l   t   i   s       f   a   l   s   e  \r        
0042260                                i   f   n   o   t       u   n   l
0042300    e   s   s       M   t   p   S   A   n   o   n   y   m   o   u
0042320    s   A   c   c   e   s   s   (   r   e   m   o   t   e   P   L
0042340    )       r   e   s   u   l   t   i   s       f   a   l   s   e
0042360   \r                           C   t   x   R   u   n   n   i   n
0042400    g   >   >   F   t   p   C   t   x   .   f   d       =       L
0042420    o   o   k   u   p   I   F   S   F   i   l 376 001  \0   9 326
0042440    e   (   r   e   m   o   t   e   P   L   >   >   P   L   .   S
0042460    F   I   L   ,  \r                               l   c   M   u
0042500    l   t   i   p   l   e   +   l   c   V   H   i   g   h   e   s
0042520    t   ,       l   v       e   c   ,       0   ,       r   e   m
0042540    o   t   e   P   L   >   >   P   L   .   D   I   R   E   )  \r
0042560                            i   f       C   t   x   R   u   n   n
0042600    i   n   g   >   >   F   t   p   C   t   x   .   f   d       e
0042620    q       0       r   e   s   u   l   t   i   s       F   t   p
0042640    S   S   e   n   d   M   a   r   k   (   m   a   r   k   N   o
0042660    ,       e   c   )  \r                           ]  \r        
0042700        i   f   n   o   t       u   n   l   e   s   s       N   e
0042720    x   t   F   D   (   C   t   x   R   u   n   n   i   n   g   >
0042740    >   F   t   p   C   t   x   .   f   d   ,       f   a   l   s
0042760    e   )       d   o  \r                           [           /
0043000    /       f   a   i   l   e   d       -       n   o       m   o
0043020    r   e       f   i   l   e   s  \r                           C
0043040  376 001  \0 354 271   t   x   R   u   n   n   i   n   g   >   >
0043060    F   t   p   C   t   x   .   f   d       =       D   e   s   t
0043100    r   o   y   F   D   (   C   t   x   R   u   n   n   i   n   g
0043120    >   >   F   t   p   C   t   x   .   f   d   )  \r            
0043140                r   e   s   u   l   t   i   s       f   a   l   s
0043160    e  \r                           ]  \r   l   e   t       f   d
0043200        =       C   t   x   R   u   n   n   i   n   g   >   >   F
0043220    t   p   C   t   x   .   f   d  \r  \r   /   /       S   e   t
0043240        u   p       o   u   t   g   o   i   n   g       p   r   o
0043260    p   e   r   t   y       l   i   s   t  \r   l   o   c   a   l
0043300    P   L       =       F   t   p   S   F   i   l   l   P   L   F
0043320    r   o   m   L   D   (   r   e   m   o   t   e   P   L   ,    
0043340    t   r   u   e   )  \r   i   f       l   o   c   a   l   P   L
0043360        e   q       0       t   h   e   n       l   o   o   p    
0043400        /   /       f   i   l   e       w   e   n   t       a   w
0043420    a   y   ?  \r  \r   /   /       I   f       w   e       e   n
0043440    c   o   u   n   t 376 001  \0 016 342   e   r       p   r   o
0043460    b   l   e   m   s       w   i   t   h       t   h   e       p
0043500    L   i   s   t   ,       r   e   s   p   o   n   d       w   i
0043520    t   h       e   i   t   h   e   r  \r   /   /           m   a
0043540    r   k   N   o       o   r       m   a   r   k   C   o   m   m
0043560    e   n   t       d   e   p   e   n   d   i   n   g       o   n
0043600        w   h   e   t   h   e   r       t   h   e       r   e   t
0043620    r   i   e   v   e       r   e   q   u   e   s   t  \r   /   /
0043640            s   p   e   c   i   f   i   e   d       m   u   l   t
0043660    i   p   l   e       f   i   l   e   s       (   s   e   r   v
0043700    e   r   F   i   l   e   n   a   m   e       c   o   n   t   a
0043720    i   n   e   d       a       w   i   l   d   c   a   r   d    
0043740    c   h   a   r   )   .  \r   l   e   t       m   a   r   k   F
0043760    a   i   l       =       f   d   >   >   F   D   .   t   e   m
0044000    p   l   a   t   e       e   q       0   ?       m   a   r   k
0044020    N   o   ,       m   a   r   k   C   o   m   m   e   n   t  \r
0044040   \r   i   f       l   o   c   a   l   P 376 001  \0 312   m   L
0044060    >   >   P   L   .   T   Y   P   E       e   q       U   n   s
0044100    p   e   c   i   f   i   e   d       t   h   e   n  \r        
0044120        [           /   /       d   o       i   t       t   h   e
0044140        h   a   r   d       w   a   y  \r               l   e   t
0044160        d   i   s   k   S   t   r   e   a   m       =       O   p
0044200    e   n   I   F   S   S   t   r   e   a   m   (   f   d   ,    
0044220    l   v       e   c   )  \r               t   e   s   t       d
0044240    i   s   k   S   t   r   e   a   m       n   e       0  \r    
0044260                        i   f   s   o  \r                        
0044300                [  \r                                       l   o
0044320    c   a   l   P   L   >   >   P   L   .   T   Y   P   E       =
0044340        F   i   l   e   T   y   p   e   (   d   i   s   k   S   t
0044360    r   e   a   m   )   ?       T   e   x   t   ,       B   i   n
0044400    a   r   y  \r                                       C   l   o
0044420    s   e   I   F   S   S   t   r   e   a   m   (   d   i   s   k
0044440    S   t   r   e   a   m   )  \r                             376
0044460  001  \0   '   m           ]  \r                           i   f
0044500    n   o   t       l   o   c   a   l   P   L   >   >   P   L   .
0044520    T   Y   P   E       =       r   e   m   o   t   e   P   L   >
0044540    >   P   L   .   T   Y   P   E       n   e       0   ?  \r    
0044560                            r   e   m   o   t   e   P   L   >   >
0044600    P   L   .   T   Y   P   E   ,       B   i   n   a   r   y  \r
0044620                ]  \r  \r   i   f       r   e   m   o   t   e   P
0044640    L   >   >   P   L   .   T   Y   P   E       n   e       0    
0044660    &  \r       l   o   c   a   l   P   L   >   >   P   L   .   T
0044700    Y   P   E       n   e       r   e   m   o   t   e   P   L   >
0044720    >   P   L   .   T   Y   P   E       t   h   e   n  \r        
0044740        t   e   s   t       l   o   c   a   l   P   L   >   >   P
0044760    L   .   T   Y   P   E       e   q       B   i   n   a   r   y
0045000   \r                           i   f   s   o  \r                
0045020                        [  \r                                    
0045040    F   t   p   S   S   e   n   d   M   a   r   k   (   m   a   r
0045060    k   F   a   i 376 001  \0 272 222   l   ,       e   c   N   o
0045100    t   R   e   t   r   i   e   v   e   d   ,       l   v       f
0045120    d   >   >   F   D   .   d   r   >   >   D   R   .   p   a   t
0045140    h   N   a   m   e   ,  \r                                    
0045160        I   F   S   P   r   i   n   t   E   r   r   o   r   ,    
0045200    e   c   B   i   n   a   r   y   N   o   t   T   e   x   t   )
0045220   \r                                       l   o   o   p  \r    
0045240                                    ]  \r                        
0045260    i   f   n   o   t  \r                                       [
0045300   \r                                       F   t   p   S   S   e
0045320    n   d   M   a   r   k   (   m   a   r   k   C   o   m   m   e
0045340    n   t   ,       e   c   M   a   y   B   e   T   e   x   t   ,
0045360        l   v       f   d   >   >   F   D   .   d   r   >   >   D
0045400    R   .   p   a   t   h   N   a   m   e   )  \r                
0045420                        l   o   c   a   l   P   L   >   >   P   L
0045440    .   T   Y   P   E       =       B   i   n   a   r   y  \r    
0045460                                    ] 376 001  \0 306 203  \r  \f
0045500   \r   /   /       F   t   p   S   R   e   t   r   i   e   v   e
0045520        (   c   o   n   t   '   d   )  \r  \r   t   e   s   t    
0045540    l   o   c   a   l   P   L   >   >   P   L   .   T   Y   P   E
0045560        e   q       T   e   x   t  \r               i   f   s   o
0045600   \r                           [  \r                           l
0045620    o   c   a   l   P   L   >   >   P   L   .   E   O   L   C    
0045640    =       C   R  \r                           i   f       r   e
0045660    m   o   t   e   P   L   >   >   P   L   .   E   O   L   C    
0045700    e   q       C   R   L   F       t   h   e   n  \r            
0045720                            [  \r                                
0045740        F   t   p   S   S   e   n   d   M   a   r   k   (   m   a
0045760    r   k   F   a   i   l   ,       e   c   N   o   t   R   e   t
0046000    r   i   e   v   e   d   ,       l   v       f   d   >   >   F
0046020    D   .   d   r   >   >   D   R   .   p   a   t   h   N   a   m
0046040    e   ,  \r                                           I   F   S
0046060    P   r   i   n   t   E   r   r   o   r   ,       e   c 376 001
0046100   \0   @ 021   C   R   L   F   C   o   n   v   e   r   s   i   o
0046120    n   )  \r                                       l   o   o   p
0046140   \r                                       ]  \r                
0046160            ]  \r               i   f   n   o   t       t   e   s
0046200    t       r   e   m   o   t   e   P   L   >   >   P   L   .   B
0046220    Y   T   E       e   q       0  \r                           i
0046240    f   s   o       i   f       l   o   c   a   l   P   L   >   >
0046260    P   L   .   B   Y   T   E       e   q       0       t   h   e
0046300    n       l   o   c   a   l   P   L   >   >   P   L   .   B   Y
0046320    T   E       =       8  \r                           i   f   n
0046340    o   t       t   e   s   t       l   o   c   a   l   P   L   >
0046360    >   P   L   .   B   Y   T   E       e   q       0  \r        
0046400                                i   f   s   o       l   o   c   a
0046420    l   P   L   >   >   P   L   .   B   Y   T   E       =       r
0046440    e   m   o   t   e   P   L   >   >   P   L   .   B   Y   T   E
0046460   \r                                       i   f   n   o   t    
0046500    i   f     376 001  \0   ;   4   l   o   c   a   l   P   L   >
0046520    >   P   L   .   B   Y   T   E       n   e       r   e   m   o
0046540    t   e   P   L   >   >   P   L   .   B   Y   T   E       t   h
0046560    e   n  \r                                                   [
0046600   \r                                                   F   t   p
0046620    S   S   e   n   d   M   a   r   k   (   m   a   r   k   F   a
0046640    i   l   ,       e   c   N   o   t   R   e   t   r   i   e   v
0046660    e   d   ,       l   v       f   d   >   >   F   D   .   d   r
0046700    >   >   D   R   .   p   a   t   h   N   a   m   e   ,  \r    
0046720                                                    I   F   S   P
0046740    r   i   n   t   E   r   r   o   r   ,       e   c   B   y   t
0046760    e   S   i   z   e   )  \r                                    
0047000                l   o   o   p  \r                                
0047020                    ]  \r  \r   r   e   s   u   l   t   i   s    
0047040    l   o   c   a   l   P   L  \r   ]       r   e   p   e   a   t
0047060   \r  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0047100    -   -   -   -   -   -   -   - 376 001  \0 363 016   -   -   -
0047120    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0047200    -   -   -   -  \r   a   n   d       F   t   p   S   R   e   t
0047220    r   i   e   v   e   F   i   l   e   (   p   L   i   s   t   )
0047240        =       v   a   l   o   f  \r   /   /   -   -   -   -   -
0047260    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0047360    -   -   -   -   -   -  \r   [  \r   l   e   t       e   c    
0047400    =       n   i   l  \r   l   e   t       d   i   s   k   S   t
0047420    r   e   a   m       =       O   p   e   n   I   F   S   S   t
0047440    r   e   a   m   (   C   t   x   R   u   n   n   i   n   g   >
0047460    >   F   t   p   C   t   x   .   f   d   ,       l   v       e
0047500    c   ,       m   o   d   e   R   e   a   d   )  \r 376  \0 257
0047520  244   t   i   f       d   i   s   k   S   t   r   e   a   m    
0047540    n   e       0       t   h   e   n  \r               [  \r    
0047560            e   c       =       D   i   s   k   T   o   N   e   t
0047600    (   C   t   x   R   u   n   n   i   n   g   >   >   F   t   p
0047620    C   t   x   .   b   s   p   S   t   r   e   a   m   ,       d
0047640    i   s   k   S   t   r   e   a   m   )  \r               C   l
0047660    o   s   e   I   F   S   S   t   r   e   a   m   (   d   i   s
0047700    k   S   t   r   e   a   m   )  \r               ]  \r   r   e
0047720    s   u   l   t   i   s       e   c       e   q       0   ?    
0047740    t   r   u   e   ,       F   t   p   S   S   e   n   d   M   a
0047760    r   k   (   m   a   r   k   N   o   ,       e   c   )  \r   ]
0050000   \r 377  \0  \0   I   f   s   F   t   p   C   m   d   .   b   c
0050020    p   l  \0 373 233 240 314  \f  \0  \0 376 001  \0 210   \   /
0050040    /       I   f   s   F   t   p   C   m   d   .   b   c   p   l
0050060        -       M   o   r   e       I   F   S       F   t   p    
0050100    s   e   r   v   e   r       c   o   m   m   a   n   d   s  \r
0050120    /   /       C   o   p   y   r   i   g   h   t       X   e   r
0050140    o   x       C   o   r   p   o   r   a   t   i   o   n       1
0050160    9   7   9   ,       1   9   8   0   ,       1   9   8   1   ,
0050200        1   9   8   2   ,       1   9   8   3  \r   /   /       L
0050220    a   s   t       m   o   d   i   f   i   e   d       S   e   p
0050240    t   e   m   b   e   r       2   7   ,       1   9   8   3    
0050260        4   :   3   3       P   M       b   y       T   a   f   t
0050300   \r  \r   g   e   t       "   I   f   s   D   i   r   s   .   d
0050320    e   c   l   "  \r   g   e   t       "   I   f   s   F   i   l
0050340    e   s   .   d   e   c   l   "  \r   g   e   t       "   I   f
0050360    s   F   t   p   P   r   o   t   .   d   e   c   l   "  \r  \r
0050400    e   x   t   e   r   n   a   l  \r   [  \r   /   /       o   u
0050420    t   g   o   i   n   g       p   r   o   c   e   d   u   r 376
0050440  001  \0 006 216   e   s  \r   F   t   p   S   V   e   r   s   i
0050460    o   n   ;       F   t   p   S   R   e   n   a   m   e   ;    
0050500    F   t   p   S   D   i   r   e   c   t   o   r   y  \r   F   t
0050520    p   S   D   e   l   e   t   e   ;       F   t   p   S   D   e
0050540    l   e   t   e   F   i   l   e   ;       F   t   p   S   N   o
0050560    t   I   m   p   l  \r  \r   /   /       i   n   c   o   m   i
0050600    n   g       p   r   o   c   e   d   u   r   e   s       f   r
0050620    o   m       I   f   s   F   t   p   S   e   r   v   U   t   i
0050640    l   .   b   c   p   l  \r   F   t   p   S   M   a   k   e   S
0050660    F   I   L   ;       F   t   p   S   S   e   n   d   M   a   r
0050700    k   ;       F   t   p   S   C   h   e   c   k   C   o   n   n
0050720    e   c   t   i   o   n  \r   F   t   p   S   C   h   e   c   k
0050740    A   c   c   e   s   s   ;       F   t   p   S   F   i   l   l
0050760    P   L   F   r   o   m   L   D  \r  \r   /   /       i   n   c
0051000    o   m   i   n   g       p   r   o   c   e   d   u   r   e   s
0051020        f   r   o   m       I   F   S       D   i   r   s  \r   L
0051040    o   o   k   u 376 001  \0 353 273   p   I   F   S   F   i   l
0051060    e   ;       D   e   l   e   t   e   F   i   l   e   F   r   o
0051100    m   F   D   ;       R   e   n   a   m   e   F   i   l   e   F
0051120    r   o   m   F   D  \r   N   e   x   t   F   D   ;       D   e
0051140    s   t   r   o   y   F   D   ;       L   o   o   k   u   p   F
0051160    D  \r  \r   /   /       i   n   c   o   m   i   n   g       p
0051200    r   o   c   e   d   u   r   e   s       -       m   i   s   c
0051220    e   l   l   a   n   e   o   u   s  \r   F   r   e   e   P   L
0051240    i   s   t   ;       P   r   i   n   t   I   F   S   V   e   r
0051260    s   i   o   n   ;       P   u   t   T   e   m   p   l   a   t
0051300    e   ;       A   c   t   i   v   e   J   o   b   s   ;       F
0051320    t   p   S   S   e   t   P   r   o   p   s  \r  \r   /   /    
0051340    i   n   c   o   m   i   n   g       s   t   a   t   i   c   s
0051360   \r   C   t   x   R   u   n   n   i   n   g   ;       m   a   x
0051400    J   o   b   s  \r   ]  \r  \r   /   /   -   -   -   -   -   -
0051420    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0051440    -   -   -   -   -   -   -   -   - 376 001  \0 305 363   -   -
0051460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0051520    -   -   -   -   -   -   -   -   -   -  \r   l   e   t       F
0051540    t   p   S   V   e   r   s   i   o   n   (   )       b   e  \r
0051560    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0051600    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0051660    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [  \r
0051700    P   r   i   n   t   I   F   S   V   e   r   s   i   o   n   (
0051720    C   t   x   R   u   n   n   i   n   g   >   >   F   t   p   C
0051740    t   x   .   b   s   p   S   t   r   e   a   m   ,  \r       (
0051760    C   t   x   R   u   n   n   i   n   g   >   >   F   t   p   C
0052000    t   x   .   t   y   p   e       e   q       j   o   b   T   y
0052020    p   e   M   T   P   ?       "   M   a   i   l       s   e   r
0052040    v   e   r   "   ,       "   F   i   l   e       s   e 376 001
0052060   \0   j 353   r   v   e   r   "   )   )  \r   l   e   t       a
0052100    c   t   i   v   e   J   o   b   s       =       A   c   t   i
0052120    v   e   J   o   b   s   (   )  \r   P   u   t   T   e   m   p
0052140    l   a   t   e   (   C   t   x   R   u   n   n   i   n   g   >
0052160    >   F   t   p   C   t   x   .   b   s   p   S   t   r   e   a
0052200    m   ,       "   ;       $   D       u   s   e   r   $   S    
0052220    o   u   t       o   f       $   D   "   ,  \r       a   c   t
0052240    i   v   e   J   o   b   s   ,       (   a   c   t   i   v   e
0052260    J   o   b   s       e   q       1   ?       "   "   ,       "
0052300    s   "   )   ,       m   a   x   J   o   b   s   )  \r   ]  \r
0052320   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0052340    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0052420    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   a
0052440    n   d       F   t   p   S   N   o   t   I   m   p   l   (   )
0052460        =     376 001  \0   z 020   F   t   p   S   S   e   n   d
0052500    M   a   r   k   (   m   a   r   k   N   o   ,       e   c   N
0052520    o   t   I   m   p   l   e   m   e   n   t   e   d   )  \r   /
0052540    /   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0052560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0052640    -   -   -   -   -   -   -   -   -   -   -   -  \r  \f  \r   /
0052660    /   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0052700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0052760    -   -   -   -   -   -   -   -   -   -   -   -  \r   a   n   d
0053000        F   t   p   S   D   i   r   e   c   t   o   r   y   (   r
0053020    e   m   o   t   e   P   L   ,       l   o   c   a   l   P   L
0053040    )       =       v   a   l   o   f  \r   /   /   -   -   -   -
0053060    -   -   -   -   -   -   -   - 376 001  \0   Z 222   -   -   -
0053100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0053160    -   -   -   -   -   -   -   -   -   -   -   -  \r   [       /
0053200    /       r   e   p   e   a   t  \r   l   o   c   a   l   P   L
0053220        =       F   r   e   e   P   L   i   s   t   (   l   o   c
0053240    a   l   P   L   )  \r   u   n   l   e   s   s       F   t   p
0053260    S   C   h   e   c   k   C   o   n   n   e   c   t   i   o   n
0053300    (   )       r   e   s   u   l   t   i   s       f   a   l   s
0053320    e  \r   t   e   s   t       C   t   x   R   u   n   n   i   n
0053340    g   >   >   F   t   p   C   t   x   .   f   d       e   q    
0053360    0  \r               i   f   s   o  \r                        
0053400    [           /   /       f   i   r   s   t       t   i   m   e
0053420        f   o   r       t   h   i   s       D   i   r   e   c   t
0053440    o   r   y       r   e   q   u   e   s   t  \r                
0053460            u   n   l   e   s   s       F   t   p   S 376 001  \0
0053500    5   *   C   h   e   c   k   A   c   c   e   s   s   (   r   e
0053520    m   o   t   e   P   L   )       r   e   s   u   l   t   i   s
0053540        f   a   l   s   e  \r                           F   t   p
0053560    S   M   a   k   e   S   F   I   L   (   r   e   m   o   t   e
0053600    P   L   )  \r                           l   e   t       e   c
0053620        =       n   i   l  \r                           C   t   x
0053640    R   u   n   n   i   n   g   >   >   F   t   p   C   t   x   .
0053660    f   d       =       L   o   o   k   u   p   I   F   S   F   i
0053700    l   e   (   r   e   m   o   t   e   P   L   >   >   P   L   .
0053720    S   F   I   L   ,  \r                               l   c   M
0053740    u   l   t   i   p   l   e   +   l   c   V   A   l   l   ,    
0053760    l   v       e   c   ,       0   ,       r   e   m   o   t   e
0054000    P   L   >   >   P   L   .   D   I   R   E   )  \r            
0054020                i   f       C   t   x   R   u   n   n   i   n   g
0054040    >   >   F   t   p   C   t   x   .   f   d       e   q       0
0054060        r   e   s   u   l   t   i   s       F   t   p   S   S   e
0054100    n   d 376 001  \0   '   )   M   a   r   k   (   m   a   r   k
0054120    N   o   ,       e   c   )  \r                           ]  \r
0054140                i   f   n   o   t       u   n   l   e   s   s    
0054160    N   e   x   t   F   D   (   C   t   x   R   u   n   n   i   n
0054200    g   >   >   F   t   p   C   t   x   .   f   d   )       d   o
0054220   \r                           [           /   /       f   a   i
0054240    l   e   d       -       n   o       m   o   r   e       f   i
0054260    l   e   s  \r                           C   t   x   R   u   n
0054300    n   i   n   g   >   >   F   t   p   C   t   x   .   f   d    
0054320    =       D   e   s   t   r   o   y   F   D   (   C   t   x   R
0054340    u   n   n   i   n   g   >   >   F   t   p   C   t   x   .   f
0054360    d   )  \r                           r   e   s   u   l   t   i
0054400    s       f   a   l   s   e  \r                           ]  \r
0054420   \r   l   o   c   a   l   P   L       =       F   t   p   S   F
0054440    i   l   l   P   L   F   r   o   m   L   D   (   r   e   m   o
0054460    t   e   P   L   )  \r   i   f       l   o   c   a   l   P   L
0054500        n   e       0       r 376 001  \0   $ 222   e   s   u   l
0054520    t   i   s       l   o   c   a   l   P   L  \r   ]       r   e
0054540    p   e   a   t  \r  \r   /   /   -   -   -   -   -   -   -   -
0054560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0054660    -   -   -  \r   a   n   d       F   t   p   S   R   e   n   a
0054700    m   e   (   o   l   d   P   L   ,       n   e   w   P   L   )
0054720        =       v   a   l   o   f  \r   /   /   -   -   -   -   -
0054740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0055040    -   -   -   -   -   -  \r   [  \r   u   n   l   e   s   s    
0055060    F   t   p   S   C   h   e   c   k   A   c   c   e   s   s   (
0055100    o   l   d   P   L   )       r   e   s   u   l 376 001  \0   j
0055120    6   t   i   s       f   a   l   s   e  \r   F   t   p   S   M
0055140    a   k   e   S   F   I   L   (   o   l   d   P   L   )  \r   F
0055160    t   p   S   M   a   k   e   S   F   I   L   (   n   e   w   P
0055200    L   )  \r   l   e   t       e   c       =       0  \r   l   e
0055220    t       f   d       =       L   o   o   k   u   p   I   F   S
0055240    F   i   l   e   (   o   l   d   P   L   >   >   P   L   .   S
0055260    F   I   L   ,       l   c   V   H   i   g   h   e   s   t   ,
0055300        l   v       e   c   ,       0   ,       o   l   d   P   L
0055320    >   >   P   L   .   D   I   R   E   )  \r   i   f       f   d
0055340        n   e       0       t   h   e   n  \r               [  \r
0055360                e   c       =       R   e   n   a   m   e   F   i
0055400    l   e   F   r   o   m   F   D   (   f   d   ,       n   e   w
0055420    P   L   >   >   P   L   .   S   F   I   L   ,       n   e   w
0055440    P   L   >   >   P   L   .   D   I   R   E   ,       F   t   p
0055460    S   S   e   t   P   r   o   p   s   ,       n   e   w   P   L
0055500    )  \r               D   e   s   t   r   o   y   F   D   (   f
0055520    d 376 001  \0 005   G   )  \r               ]  \r   r   e   s
0055540    u   l   t   i   s       e   c       e   q       0   ?       t
0055560    r   u   e   ,       F   t   p   S   S   e   n   d   M   a   r
0055600    k   (   m   a   r   k   N   o   ,       e   c   )  \r   ]  \r
0055620   \f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0055640    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0055720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0055740    a   n   d       F   t   p   S   D   e   l   e   t   e   (   r
0055760    e   m   o   t   e   P   L   ,       l   o   c   a   l   P   L
0056000    )       =       v   a   l   o   f  \r   /   /   -   -   -   -
0056020    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0056120    -   -   -   -   -   - 376 001  \0 245 341   -  \r   [       /
0056140    /       r   e   p   e   a   t  \r   l   o   c   a   l   P   L
0056160        =       F   r   e   e   P   L   i   s   t   (   l   o   c
0056200    a   l   P   L   )  \r   u   n   l   e   s   s       F   t   p
0056220    S   C   h   e   c   k   C   o   n   n   e   c   t   i   o   n
0056240    (   )       r   e   s   u   l   t   i   s       f   a   l   s
0056260    e  \r   t   e   s   t       C   t   x   R   u   n   n   i   n
0056300    g   >   >   F   t   p   C   t   x   .   f   d       e   q    
0056320    0  \r               i   f   s   o  \r                        
0056340    [           /   /       f   i   r   s   t       t   i   m   e
0056360        f   o   r       t   h   i   s       D   e   l   e   t   e
0056400        r   e   q   u   e   s   t  \r                           u
0056420    n   l   e   s   s       F   t   p   S   C   h   e   c   k   A
0056440    c   c   e   s   s   (   r   e   m   o   t   e   P   L   )    
0056460    r   e   s   u   l   t   i   s       f   a   l   s   e  \r    
0056500                        F   t   p   S   M   a   k   e   S   F   I
0056520    L   (   r   e   m   o   t   e   P   L   ) 376 001  \0 242 303
0056540   \r                           l   e   t       e   c       =    
0056560    n   i   l  \r                           C   t   x   R   u   n
0056600    n   i   n   g   >   >   F   t   p   C   t   x   .   f   d    
0056620    =       L   o   o   k   u   p   I   F   S   F   i   l   e   (
0056640    r   e   m   o   t   e   P   L   >   >   P   L   .   S   F   I
0056660    L   ,  \r                               l   c   M   u   l   t
0056700    i   p   l   e   +   l   c   V   L   o   w   e   s   t   ,    
0056720    l   v       e   c   ,       0   ,       r   e   m   o   t   e
0056740    P   L   >   >   P   L   .   D   I   R   E   )  \r            
0056760                i   f       C   t   x   R   u   n   n   i   n   g
0057000    >   >   F   t   p   C   t   x   .   f   d       e   q       0
0057020        r   e   s   u   l   t   i   s       F   t   p   S   S   e
0057040    n   d   M   a   r   k   (   m   a   r   k   N   o   ,       e
0057060    c   )  \r                           ]  \r               i   f
0057100    n   o   t       u   n   l   e   s   s       N   e   x   t   F
0057120    D   (   C   t   x   R   u   n   n   i   n   g   >   >   F   t
0057140  376 001  \0 232 200   p   C   t   x   .   f   d   )       d   o
0057160   \r                           [           /   /       f   a   i
0057200    l   e   d       -       n   o       m   o   r   e       f   i
0057220    l   e   s  \r                           C   t   x   R   u   n
0057240    n   i   n   g   >   >   F   t   p   C   t   x   .   f   d    
0057260    =       D   e   s   t   r   o   y   F   D   (   C   t   x   R
0057300    u   n   n   i   n   g   >   >   F   t   p   C   t   x   .   f
0057320    d   )  \r                           r   e   s   u   l   t   i
0057340    s       f   a   l   s   e  \r                           ]  \r
0057360   \r   l   o   c   a   l   P   L       =       F   t   p   S   F
0057400    i   l   l   P   L   F   r   o   m   L   D   (   r   e   m   o
0057420    t   e   P   L   )  \r   i   f       l   o   c   a   l   P   L
0057440        n   e       0       r   e   s   u   l   t   i   s       l
0057460    o   c   a   l   P   L  \r   ]       r   e   p   e   a   t  \r
0057500   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0057520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0057540    -   -   -   -   - 376  \0 375 374 214   -   -   -   -   -   -
0057560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0057620    -   -   -  \r   a   n   d       F   t   p   S   D   e   l   e
0057640    t   e   F   i   l   e   (   p   l   )       =       v   a   l
0057660    o   f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0057700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0060000   \r   [  \r   l   e   t       e   c       =       D   e   l   e
0060020    t   e   F   i   l   e   F   r   o   m   F   D   (   C   t   x
0060040    R   u   n   n   i   n   g   >   >   F   t   p   C   t   x   .
0060060    f   d   )  \r   r   e   s   u   l   t   i   s       e   c    
0060100    e   q       0   ?       t   r   u   e   ,       F   t   p   S
0060120    S   e   n   d   M   a   r   k   (   m   a   r   k   N   o   ,
0060140        e   c   )  \r   ]  \r 377  \0  \0   I   f   s   F   t   p
0060160    X   f   e   r   .   b   c   p   l  \0 373 230   ( 031 350  \0
0060200   \0 376 001  \0   4       /   /       I   f   s   F   t   p   X
0060220    f   e   r   .   b   c   p   l       -       B   l   o   c   k
0060240        I   O       r   o   u   t   i   n   e   s  \r   /   /    
0060260    C   o   p   y   r   i   g   h   t       X   e   r   o   x    
0060300    C   o   r   p   o   r   a   t   i   o   n       1   9   7   9
0060320    ,       1   9   8   0   ,       1   9   8   1  \r   /   /    
0060340    L   a   s   t       m   o   d   i   f   i   e   d       N   o
0060360    v   e   m   b   e   r       2   2   ,       1   9   8   1    
0060400        1   2   :   2   2       P   M       b   y       T   a   f
0060420    t  \r  \r   g   e   t       "   P   u   p   .   d   e   c   l
0060440    "  \r   g   e   t       "   I   f   s   F   t   p   P   r   o
0060460    t   .   d   e   c   l   "  \r   g   e   t       e   c   F   i
0060500    l   e   S   y   s   t   e   m   F   u   l   l   ,       e   c
0060520    D   i   s   k   E   r   r   o   r       f   r   o   m       "
0060540    I   f   s   D   i   r   s   .   d   e   c   l   "  \r   g   e
0060560    t       K   D   H   ,       f   r   e   e   P   a   g   e   s
0060600    ,       l   F   A     376 001  \0 304 021   f   r   o   m    
0060620    "   A   l   t   o   F   i   l   e   S   y   s   .   d   "  \r
0060640    g   e   t       D   S   K   ,       d   i   s   k   K   d    
0060660    f   r   o   m       "   D   i   s   k   s   .   d   "  \r  \r
0060700    e   x   t   e   r   n   a   l  \r   [  \r   /   /       o   u
0060720    t   g   o   i   n   g       p   r   o   c   e   d   u   r   e
0060740    s  \r   D   i   s   k   T   o   D   i   s   k   ;       N   e
0060760    t   T   o   D   i   s   k   ;       D   i   s   k   T   o   N
0061000    e   t  \r   F   i   l   e   T   y   p   e   ;       F   l   i
0061020    p   C   u   r   s   o   r  \r  \r   /   /       i   n   c   o
0061040    m   i   n   g       p   r   o   c   e   d   u   r   e   s  \r
0061060    F   T   P   M  \r   L   n   P   a   g   e   S   i   z   e   ;
0061100        K   s   B   u   f   f   e   r   A   d   d   r   e   s   s
0061120    ;       K   s   G   e   t   D   i   s   k   ;       F   i   l
0061140    e   P   o   s   ;       S   e   t   F   i   l   e   P   o   s
0061160   \r   S   e   t   D   i   r   t   y   ;       C   l   e   a   n
0061200    u   p   D   i   s   k   S   t   r   e   a 376 001  \0 305 021
0061220    m   ;       C   u   r   r   e   n   t   P   o   s   ;       G
0061240    e   t   C   u   r   r   e   n   t   F   a   ;       J   u   m
0061260    p   T   o   F   a  \r   E   n   d   o   f   s   ;       R   e
0061300    s   e   t   s   ;       P   o   s   i   t   i   o   n   P   t
0061320    r  \r   B   S   P   W   r   i   t   e   B   l   o   c   k   ;
0061340        B   S   P   R   e   a   d   B   l   o   c   k  \r   D   a
0061360    t   a   I   s   B   i   n   a   r   y   ;       M   i   n   ;
0061400        D   o   u   b   l   e   A   d   d   ;       D   o   u   b
0061420    l   e   I   n   c   r   e   m   e   n   t   ;       B   y   t
0061440    e   B   l   t  \r   R   e   t   u   r   n   F   r   o   m   ;
0061460        S   y   s   E   r   r   ;       M   o   v   e   B   l   o
0061500    c   k  \r  \r   /   /       i   n   c   o   m   i   n   g    
0061520    s   t   a   t   i   c   s  \r   o   f   f   s   e   t   B   S
0061540    P   S   t   r   ;       C   t   x   R   u   n   n   i   n   g
0061560   \r   ]  \r  \r   m   a   n   i   f   e   s   t  \r   [  \r   e
0061600    c   D   i   s   k   F   u   l   l       =       2   4   1   3
0061620  376 001  \0 355  \f           /   /       c   o   p   i   e   d
0061640        f   r   o   m       T   f   s   .   d   ,       f   o   r
0061660        T   r   i   d   e   n   t       d   i   s   k   s       o
0061700    n   l   y  \r   e   c   U   n   R   e   c   o   v   D   i   s
0061720    k   E   r   r   o   r       =       2   4   1   2  \r   ]  \r
0061740   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0061760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0062040    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0062060    l   e   t       D   i   s   k   T   o   D   i   s   k   (   d
0062100    S   t   r   e   a   m   ,       s   S   t   r   e   a   m   ,
0062120        l   v   B   y   t   e   s   ;       n   u   m   a   r   g
0062140    s       n   a   )       =       v   a   l   o   f  \r   /   /
0062160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0062220    -   -   -   -   - 376 001  \0   I   X   -   -   -   -   -   -
0062240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0062300    -  \r   /   /       C   o   p   i   e   s       d   a   t   a
0062320        f   r   o   m       d   i   s   k       s   t   r   e   a
0062340    m       s   S   t   r   e   a   m       t   o       a   n   o
0062360    t   h   e   r       d   i   s   k       s   t   r   e   a   m
0062400        d   S   t   r   e   a   m   .  \r   /   /       l   v   B
0062420    y   t   e   s   ,       i   f       s   u   p   p   l   i   e
0062440    d   ,       p   o   i   n   t   s       t   o       a       3
0062460    2   -   b   i   t       m   a   x   i   m   u   m       b   y
0062500    t   e       c   o   u   n   t   .  \r   /   /       R   e   t
0062520    u   r   n   s       t   r   u   e       n   o   r   m   a   l
0062540    l   y   ,       f   a   l   s   e       i   f       t   h   e
0062560        s   o   u   r   c   e       s   t   r   e   a   m       r
0062600    a   n       o   u   t       b   e   f   o   r   e  \r   /   /
0062620            t   h   e       r   e   q   u 376 001  \0   3 350   e
0062640    s   t   e   d       n   u   m   b   e   r       o   f       b
0062660    y   t   e   s       w   e   r   e       t   r   a   n   f   e
0062700    r   r   e   d   .  \r   /   /       L   e   a   v   e   s    
0062720    t   h   e       b   y   t   e       c   o   u   n   t       e
0062740    q   u   a   l       t   o       t   h   e       n   u   m   b
0062760    e   r       o   f       b   y   t   e   s       l   e   f   t
0063000        t   o       t   r   a   n   s   f   e   r   .  \r   [  \r
0063020    l   e   t       d   e   f   B   y   t   e   s       =       v
0063040    e   c       1   ;       d   e   f   B   y   t   e   s   !   0
0063060        =       -   1  \r   i   f       n   a       l   s       3
0063100        t   h   e   n       l   v   B   y   t   e   s       =    
0063120    d   e   f   B   y   t   e   s  \r  \r   l   e   t       d   P
0063140    a   g   e   B   y   t   e   s       =       2       l   s   h
0063160    i   f   t       L   n   P   a   g   e   S   i   z   e   (   d
0063200    S   t   r   e   a   m   )  \r   l   e   t       s   P   a   g
0063220    e   B   y   t   e   s       =       2       l   s   h   i 376
0063240  001  \0 376 211   f   t       L   n   P   a   g   e   S   i   z
0063260    e   (   s   S   t   r   e   a   m   )  \r   l   e   t       d
0063300    K   s   B   u   f   f   e   r       =       K   s   B   u   f
0063320    f   e   r   A   d   d   r   e   s   s   (   d   S   t   r   e
0063340    a   m   )  \r   l   e   t       s   K   s   B   u   f   f   e
0063360    r       =       K   s   B   u   f   f   e   r   A   d   d   r
0063400    e   s   s   (   s   S   t   r   e   a   m   )  \r  \r   w   h
0063420    i   l   e       l   v   B   y   t   e   s   !   0       n   e
0063440        0       %       l   v   B   y   t   e   s   !   1       n
0063460    e       0       d   o  \r               [  \r               i
0063500    f       E   n   d   o   f   s   (   s   S   t   r   e   a   m
0063520    )       r   e   s   u   l   t   i   s       f   a   l   s   e
0063540   \r               l   e   t       d   P   o   s   ,       s   P
0063560    o   s       =       C   u   r   r   e   n   t   P   o   s   (
0063600    d   S   t   r   e   a   m   )   ,       C   u   r   r   e   n
0063620    t   P   o   s   (   s   S   t   r   e   a   m   )  \r        
0063640        l   e   t 376 001  \0 342 346       c   o   u   n   t    
0063660    =       M   i   n   (   d   P   a   g   e   B   y   t   e   s
0063700    -   d   P   o   s   ,       s   P   a   g   e   B   y   t   e
0063720    s   -   s   P   o   s   )  \r               i   f       l   v
0063740    B   y   t   e   s   !   0       e   q       0       &       l
0063760    v   B   y   t   e   s   !   1       g   e       0       t   h
0064000    e   n       c   o   u   n   t       =       M   i   n   (   c
0064020    o   u   n   t   ,       l   v   B   y   t   e   s   !   1   )
0064040   \r               P   o   s   i   t   i   o   n   P   t   r   (
0064060    s   S   t   r   e   a   m   ,       s   P   o   s   +   c   o
0064100    u   n   t   ,       f   a   l   s   e   )  \r               c
0064120    o   u   n   t       =       C   u   r   r   e   n   t   P   o
0064140    s   (   s   S   t   r   e   a   m   )   -   s   P   o   s  \r
0064160                P   o   s   i   t   i   o   n   P   t   r   (   d
0064200    S   t   r   e   a   m   ,       d   P   o   s   +   c   o   u
0064220    n   t   )  \r               B   y   t   e   B   l   t   (   d
0064240    K   s   B   u   f   f   e   r   , 376 001  \0   H   G       d
0064260    P   o   s   ,       s   K   s   B   u   f   f   e   r   ,    
0064300    s   P   o   s   ,       c   o   u   n   t   )  \r            
0064320    i   f       d   P   o   s   +   c   o   u   n   t       e   q
0064340        d   P   a   g   e   B   y   t   e   s       t   h   e   n
0064360        C   l   e   a   n   u   p   D   i   s   k   S   t   r   e
0064400    a   m   (   d   S   t   r   e   a   m   )  \r               i
0064420    f       s   P   o   s   +   c   o   u   n   t       e   q    
0064440    s   P   a   g   e   B   y   t   e   s       t   h   e   n    
0064460    C   l   e   a   n   u   p   D   i   s   k   S   t   r   e   a
0064500    m   (   s   S   t   r   e   a   m   )  \r               D   o
0064520    u   b   l   e   I   n   c   r   e   m   e   n   t   (   l   v
0064540    B   y   t   e   s   ,       -   c   o   u   n   t   )  \r    
0064560            ]  \r  \r   r   e   s   u   l   t   i   s       t   r
0064600    u   e  \r   ]  \r  \f  \r   /   /   -   -   -   -   -   -   -
0064620    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0064640    -   -   -   -   -   -   -   -   -   -   -   -   -   - 376 001
0064660   \0 347 202   -   -   -   -   -   -   -   -   -   -   -   -   -
0064700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0064720    -   -   -   -   -   -   -   -   -  \r   a   n   d       N   e
0064740    t   T   o   D   i   s   k   (   d   i   s   k   S   t   r   e
0064760    a   m   ,       b   s   p   S   t   r   e   a   m   ,       l
0065000    v   E   x   p   e   c   t   e   d   B   y   t   e   s   ;    
0065020    n   u   m   a   r   g   s       n   a   )       =       v   a
0065040    l   o   f  \r   /   /   -   -   -   -   -   -   -   -   -   -
0065060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0065160    -  \r   /   /       C   o   p   i   e   s       d   a   t   a
0065200        f   r   o   m       b   s   p   S   t   r   e   a   m    
0065220    t   o       d   i   s   k   S   t   r   e   a   m   .  \r   /
0065240    /       R   e   t   u   r   n   s       I   F   S       e   r
0065260    r   o   r 376 001  \0 252 321       c   o   d   e   ,       o
0065300    r       z   e   r   o       i   f       O   K   .  \r   /   /
0065320        l   v   E   x   p   e   c   t   e   d   B   y   t   e   s
0065340    ,       i   f       s   u   p   p   l   i   e   d   ,       i
0065360    s       a       p   o   i   n   t   e   r       t   o       a
0065400        3   2   -   b   i   t       c   o   u   n   t       o   f
0065420        t   h   e  \r   /   /       n   u   m   b   e   r       o
0065440    f       b   y   t   e   s       e   x   p   e   c   t   e   d
0065460    ;       t   h   i   s       i   s       u   s   e   d       a
0065500    s       a       h   i   n   t       t   o       e   x   t   e
0065520    n   d       t   h   e       f   i   l   e  \r   /   /       t
0065540    o       t   h   e       p   r   o   p   e   r       l   e   n
0065560    g   t   h       (   t   o       s   p   e   e   d       d   a
0065600    t   a       t   r   a   n   s   f   e   r   )       a   n   d
0065620        n   e   e   d       n   o   t       b   e       c   o   r
0065640    r   e   c   t   .  \r   [  \r   d   i   s   k   S   t   r   e
0065660    a   m   >   >   S   T   .   e 376 001  \0   V 032   r   r   o
0065700    r       =       N   e   t   T   o   D   i   s   k   E   r   r
0065720    o   r  \r   l   e   t       l   n   C   h   a   r   s   P   e
0065740    r   P   a   g   e       =       L   n   P   a   g   e   S   i
0065760    z   e   (   d   i   s   k   S   t   r   e   a   m   )   +   1
0066000   \r   l   e   t       c   h   a   r   s   P   e   r   P   a   g
0066020    e       =       1       l   s   h   i   f   t       l   n   C
0066040    h   a   r   s   P   e   r   P   a   g   e  \r   l   e   t    
0066060    k   s   B   u   f   f   e   r       =       K   s   B   u   f
0066100    f   e   r   A   d   d   r   e   s   s   (   d   i   s   k   S
0066120    t   r   e   a   m   )  \r  \r   i   f       n   a       g   e
0066140        3       &       l   v   E   x   p   e   c   t   e   d   B
0066160    y   t   e   s       n   e       0       t   h   e   n  \r    
0066200            [  \r               /   /       e   x   t   e   n   d
0066220        f   i   l   e       t   o       t   h   e       p   r   o
0066240    p   e   r       l   e   n   g   t   h       i   f       t   h
0066260    e       e   x   p   e   c   t   e   d       a   m 376 001  \0
0066300  265   ~   o   u   n   t       o   f       d   a   t   a  \r    
0066320            /   /       i   s       w   o   r   t   h       o   u
0066340    r       w   h   i   l   e       a   n   d       i   s       n
0066360    o   t       s   o       g   r   e   a   t       t   h   a   t
0066400        w   e       w   o   u   l   d       r   i   s   k  \r    
0066420            /   /       e   x   h   a   u   s   t   i   n   g    
0066440    t   h   e       f   i   l   e       s   y   s   t   e   m   .
0066460   \r               l   e   t       e   x   p   e   c   t   e   d
0066500    P   a   g   e   s       =       l   v   E   x   p   e   c   t
0066520    e   d   B   y   t   e   s   !   0       l   s   h   i   f   t
0066540        (   1   6   -   l   n   C   h   a   r   s   P   e   r   P
0066560    a   g   e   )       +  \r                   l   v   E   x   p
0066600    e   c   t   e   d   B   y   t   e   s   !   1       r   s   h
0066620    i   f   t       l   n   C   h   a   r   s   P   e   r   P   a
0066640    g   e  \r               i   f       e   x   p   e   c   t   e
0066660    d   P   a   g   e   s       u   g   e       3       &       e
0066700    x   p 376 001  \0   2   ,   e   c   t   e   d   P   a   g   e
0066720    s       u   l   s       1   0   0   0       &       e   x   p
0066740    e   c   t   e   d   P   a   g   e   s   +   2   5   0       u
0066760    l   s  \r                   K   s   G   e   t   D   i   s   k
0067000    (   d   i   s   k   S   t   r   e   a   m   )   >   >   D   S
0067020    K   .   d   i   s   k   K   d   >   >   K   D   H   .   f   r
0067040    e   e   P   a   g   e   s       t   h   e   n  \r            
0067060                [  \r                           l   e   t       f
0067100    i   l   e   P   o   s       =       v   e   c       1   ;    
0067120    F   i   l   e   P   o   s   (   d   i   s   k   S   t   r   e
0067140    a   m   ,       f   i   l   e   P   o   s   )  \r            
0067160                D   o   u   b   l   e   A   d   d   (   f   i   l
0067200    e   P   o   s   ,       l   v   E   x   p   e   c   t   e   d
0067220    B   y   t   e   s   )  \r                           l   e   t
0067240        c   u   r   r   e   n   t   F   A       =       v   e   c
0067260        l   F   A   ;       G   e   t   C   u   r   r   e   n   t
0067300    F   a   (   d   i   s   k 376 001  \0 270 264   S   t   r   e
0067320    a   m   ,       c   u   r   r   e   n   t   F   A   )  \r    
0067340                        S   e   t   F   i   l   e   P   o   s   (
0067360    d   i   s   k   S   t   r   e   a   m   ,       f   i   l   e
0067400    P   o   s   )  \r                           J   u   m   p   T
0067420    o   F   a   (   d   i   s   k   S   t   r   e   a   m   ,    
0067440    c   u   r   r   e   n   t   F   A   )  \r                    
0067460        ]  \r               ]  \r  \r               [       /   /
0067500        r   e   p   e   a   t  \r               l   e   t       p
0067520    o   s       =       C   u   r   r   e   n   t   P   o   s   (
0067540    d   i   s   k   S   t   r   e   a   m   )  \r               l
0067560    e   t       n   e   t   B   y   t   e   s       =       B   S
0067600    P   R   e   a   d   B   l   o   c   k   (   b   s   p   S   t
0067620    r   e   a   m   ,       k   s   B   u   f   f   e   r   ,    
0067640    p   o   s   ,       c   h   a   r   s   P   e   r   P   a   g
0067660    e   -   p   o   s   )  \r               F   l   i   p   C   u
0067700    r   s   o   r   (   )  \r               i   f 376 001  \0 005
0067720    Z       n   e   t   B   y   t   e   s       n   e       0    
0067740    t   h   e   n       S   e   t   D   i   r   t   y   (   d   i
0067760    s   k   S   t   r   e   a   m   ,       t   r   u   e   )  \r
0070000                P   o   s   i   t   i   o   n   P   t   r   (   d
0070020    i   s   k   S   t   r   e   a   m   ,       p   o   s   +   n
0070040    e   t   B   y   t   e   s   )  \r               i   f       p
0070060    o   s   +   n   e   t   B   y   t   e   s       n   e       c
0070100    h   a   r   s   P   e   r   P   a   g   e       b   r   e   a
0070120    k  \r               C   l   e   a   n   u   p   D   i   s   k
0070140    S   t   r   e   a   m   (   d   i   s   k   S   t   r   e   a
0070160    m   )  \r               ]       r   e   p   e   a   t  \r  \r
0070200    d   i   s   k   S   t   r   e   a   m   >   >   S   T   .   e
0070220    r   r   o   r       =       S   y   s   E   r   r  \r   r   e
0070240    s   u   l   t   i   s       (   b   s   p   S   t   r   e   a
0070260    m   -   o   f   f   s   e   t   B   S   P   S   t   r   )   >
0070300    >   B   S   P   S   o   c   .   m   a   r   k   P   e   n   d
0070320    i 376 001  \0 236 211   n   g   ?       0   ,       e   c   N
0070340    e   t   T   o   D   i   s   k  \r   ]  \r  \r   /   /   -   -
0070360    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0070460    -   -   -   -   -   -   -   -   -  \r   a   n   d       N   e
0070500    t   T   o   D   i   s   k   E   r   r   o   r   (   s   ,    
0070520    e   c   ,       p   a   r   )       b   e  \r   /   /   -   -
0070540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0070640    -   -   -   -   -   -   -   -   -  \r   /   /       I   f    
0070660    d   i   s   k       b   e   c   o   m   e   s       f   u   l
0070700    l       t   h   e   n       j   u   s   t       a   b   o   r
0070720    t       t   h   e     376 001  \0 212 245   t   r   a   n   s
0070740    f   e   r   .  \r   /   /       N   o   t   e       t   h   a
0070760    t       N   e   t   T   o   D   i   s   k       i   s   n   '
0071000    t       t   h   e       o   n   l   y       c   o   n   t   e
0071020    x   t       i   n       w   h   i   c   h       t   h   e    
0071040    d   i   s   k       c   a   n  \r   /   /           o   v   e
0071060    r   f   l   o   w   ,       b   u   t       i   t       i   s
0071100        b   y       f   a   r       t   h   e       m   o   s   t
0071120        l   i   k   e   l   y       o   n   e       a   n   d    
0071140    i   s       t   h   e   r   e   f   o   r   e       w   o   r
0071160    t   h  \r   /   /           p   r   o   t   e   c   t   i   n
0071200    g   .           (   I   n       o   t   h   e   r       c   a
0071220    s   e   s   ,       I   F   S       w   i   l   l       j   u
0071240    s   t       g   o       i   n   t   o       S   w   a   t   .
0071260    )  \r   [  \r   i   f       e   c       e   q       e   c   D
0071300    i   s   k   F   u   l   l       t   h   e   n  \r            
0071320    [           /   /       F   l   u   s   h 376 001  \0 304   =
0071340        t   h   e       s   t   r   e   a   m       u   p       t
0071360    o       t   h   e       n   e   x   t       m   a   r   k  \r
0071400                l   e   t       k   s   B   u   f   f   e   r    
0071420    =       K   s   B   u   f   f   e   r   A   d   d   r   e   s
0071440    s   (   s   )  \r               l   e   t       c   h   a   r
0071460    s   P   e   r   P   a   g   e       =       2       l   s   h
0071500    i   f   t       L   n   P   a   g   e   S   i   z   e   (   s
0071520    )  \r               w   h   i   l   e       B   S   P   R   e
0071540    a   d   B   l   o   c   k   (   C   t   x   R   u   n   n   i
0071560    n   g   >   >   F   t   p   C   t   x   .   b   s   p   S   t
0071600    r   e   a   m   ,       k   s   B   u   f   f   e   r   ,    
0071620    0   ,       c   h   a   r   s   P   e   r   P   a   g   e   )
0071640        l   o   o   p  \r               s   >   >   S   T   .   e
0071660    r   r   o   r       =       S   y   s   E   r   r  \r        
0071700        S   e   t   D   i   r   t   y   (   s   ,       f   a   l
0071720    s   e   )  \r               R   e   t   u   r   n   F   r   o
0071740  376 001  \0 374   t   m   (   N   e   t   T   o   D   i   s   k
0071760    ,       e   c   F   i   l   e   S   y   s   t   e   m   F   u
0072000    l   l   )  \r               ]  \r   S   y   s   E   r   r   (
0072020    s   ,       e   c   ,       p   a   r   )  \r   ]  \r  \f  \r
0072040    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0072060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0072140    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   a   n
0072160    d       D   i   s   k   T   o   N   e   t   (   b   s   p   S
0072200    t   r   e   a   m   ,       d   i   s   k   S   t   r   e   a
0072220    m   ,       l   v   B   y   t   e   s   ;       n   u   m   a
0072240    r   g   s       n   a   )       =       v   a   l   o   f  \r
0072260    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0072300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0072340    -   -   -   -   - 376 001  \0 225 021   -   -   -   -   -   -
0072360    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0072400    -   -  \r   /   /       C   o   p   i   e   s       d   a   t
0072420    a       f   r   o   m       d   i   s   k   S   t   r   e   a
0072440    m       t   o       b   s   p   S   t   r   e   a   m   .  \r
0072460    /   /       R   e   t   u   r   n   s       I   F   S       e
0072500    r   r   o   r       c   o   d   e   ,       o   r       z   e
0072520    r   o       i   f       O   K   .  \r   /   /       l   v   B
0072540    y   t   e   s   ,       i   f       s   u   p   p   l   i   e
0072560    d       p   o   i   n   t   s       t   o       a       3   2
0072600    -   b   i   t       m   a   x   i   m   u   m       b   y   t
0072620    e       c   o   u   n   t   .  \r   /   /       L   e   a   v
0072640    e   s       t   h   e       b   y   t   e       c   o   u   n
0072660    t       e   q   u   a   l       t   o       t   h   e       n
0072700    u   m   b   e   r       o   f       b   y   t   e   s       l
0072720    e   f   t       t   o       t   r   a   n   s   f   e   r   .
0072740   \r   [  \r   l   e   t       d   e   f 376 001  \0 017 371   B
0072760    y   t   e   s       =       v   e   c       1   ;       d   e
0073000    f   B   y   t   e   s   !   0       =       -   1  \r   i   f
0073020        n   a       l   s       3       t   h   e   n       l   v
0073040    B   y   t   e   s       =       d   e   f   B   y   t   e   s
0073060   \r   d   i   s   k   S   t   r   e   a   m   >   >   S   T   .
0073100    e   r   r   o   r       =       D   i   s   k   T   o   N   e
0073120    t   E   r   r   o   r  \r   l   e   t       c   h   a   r   s
0073140    P   e   r   P   a   g   e       =       2       l   s   h   i
0073160    f   t       L   n   P   a   g   e   S   i   z   e   (   d   i
0073200    s   k   S   t   r   e   a   m   )  \r   l   e   t       k   s
0073220    B   u   f   f   e   r       =       K   s   B   u   f   f   e
0073240    r   A   d   d   r   e   s   s   (   d   i   s   k   S   t   r
0073260    e   a   m   )  \r  \r   F   T   P   M   (   m   a   r   k   H
0073300    e   r   e   I   s   F   i   l   e   )  \r   w   h   i   l   e
0073320        l   v   B   y   t   e   s   !   0       n   e       0    
0073340    %       l   v   B   y   t   e   s   !   1       n   e     376
0073360  001  \0 315 017   0       d   o  \r               [  \r        
0073400        l   e   t       p   o   s       =       C   u   r   r   e
0073420    n   t   P   o   s   (   d   i   s   k   S   t   r   e   a   m
0073440    )  \r               l   e   t       f   i   l   e   B   y   t
0073460    e   s       =       c   h   a   r   s   P   e   r   P   a   g
0073500    e   -   p   o   s  \r               i   f       l   v   B   y
0073520    t   e   s   !   0       e   q       0       &       l   v   B
0073540    y   t   e   s   !   1       g   e       0       t   h   e   n
0073560   \r                           f   i   l   e   B   y   t   e   s
0073600        =       M   i   n   (   f   i   l   e   B   y   t   e   s
0073620    ,       l   v   B   y   t   e   s   !   1   )  \r            
0073640    P   o   s   i   t   i   o   n   P   t   r   (   d   i   s   k
0073660    S   t   r   e   a   m   ,       p   o   s   +   f   i   l   e
0073700    B   y   t   e   s   ,       f   a   l   s   e   )  \r        
0073720        f   i   l   e   B   y   t   e   s       =       C   u   r
0073740    r   e   n   t   P   o   s   (   d   i   s   k   S   t   r   e
0073760    a   m   )   - 376 001  \0   ] 001   p   o   s  \r            
0074000    i   f       B   S   P   W   r   i   t   e   B   l   o   c   k
0074020    (   b   s   p   S   t   r   e   a   m   ,       k   s   B   u
0074040    f   f   e   r   ,       p   o   s   ,       f   i   l   e   B
0074060    y   t   e   s   )       n   e       f   i   l   e   B   y   t
0074100    e   s       t   h   e   n  \r                           r   e
0074120    s   u   l   t   i   s       e   c   D   i   s   k   T   o   N
0074140    e   t  \r               F   l   i   p   C   u   r   s   o   r
0074160    (   )  \r               D   o   u   b   l   e   I   n   c   r
0074200    e   m   e   n   t   (   l   v   B   y   t   e   s   ,       -
0074220    f   i   l   e   B   y   t   e   s   )  \r               i   f
0074240        p   o   s   +   f   i   l   e   B   y   t   e   s       l
0074260    s       c   h   a   r   s   P   e   r   P   a   g   e       b
0074300    r   e   a   k  \r               C   l   e   a   n   u   p   D
0074320    i   s   k   S   t   r   e   a   m   (   d   i   s   k   S   t
0074340    r   e   a   m   )  \r               ]  \r  \r   d   i   s   k
0074360    S   t   r   e   a   m   >   >   S 376 001  \0 033   A   T   .
0074400    e   r   r   o   r       =       S   y   s   E   r   r  \r   r
0074420    e   s   u   l   t   i   s       0  \r   ]  \r  \r   /   /   -
0074440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0074540    -   -   -   -   -   -   -   -   -   -  \r   a   n   d       D
0074560    i   s   k   T   o   N   e   t   E   r   r   o   r   (   s   ,
0074600        e   c   ,       p   a   r   )       b   e  \r   /   /   -
0074620    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0074720    -   -   -   -   -   -   -   -   -   -  \r   /   /       I   f
0074740        a       h   a   r   d       d   a   t   a       e   r   r
0074760    o   r       o   c   c   u   r   s       t   h   e   n 376 001
0075000   \0   6 237       j   u   s   t       a   b   o   r   t       t
0075020    h   e       t   r   a   n   s   f   e   r   .  \r   [  \r   i
0075040    f       e   c       e   q       e   c   U   n   R   e   c   o
0075060    v   D   i   s   k   E   r   r   o   r       t   h   e   n  \r
0075100                [  \r               s   >   >   S   T   .   e   r
0075120    r   o   r       =       S   y   s   E   r   r  \r            
0075140    R   e   t   u   r   n   F   r   o   m   (   D   i   s   k   T
0075160    o   N   e   t   ,       e   c   D   i   s   k   E   r   r   o
0075200    r   )  \r               ]  \r   S   y   s   E   r   r   (   s
0075220    ,       e   c   ,       p   a   r   )  \r   ]  \r  \f  \r   /
0075240    /   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0075260    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0075340    -   -   -   -   -   -   -   -   -   -   -  \r   a   n   d    
0075360    F   i   l   e   T   y   p   e   (   d   i   s   k   S   t   r
0075400    e   a   m 376 001  \0 312 213   )       =       v   a   l   o
0075420    f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0075440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0075520    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   /
0075540    /       t   r   u   e       =       t   e   x   t   ;       f
0075560    a   l   s   e       =       b   i   n   a   r   y  \r   [  \r
0075600    l   e   t       t   e   x   t       =       t   r   u   e  \r
0075620    l   e   t       c   h   a   r   s   P   e   r   P   a   g   e
0075640        =       2       l   s   h   i   f   t       L   n   P   a
0075660    g   e   S   i   z   e   (   d   i   s   k   S   t   r   e   a
0075700    m   )  \r   l   e   t       k   s   B   u   f   f   e   r    
0075720    =       K   s   B   u   f   f   e   r   A   d   d   r   e   s
0075740    s   (   d   i   s   k   S   t   r   e   a   m   )  \r   R   e
0075760    s   e   t   s   (   d   i   s   k   S   t   r   e   a   m   )
0076000   \r  \r               [  \r     376 001  \0 343 344           P
0076020    o   s   i   t   i   o   n   P   t   r   (   d   i   s   k   S
0076040    t   r   e   a   m   ,       c   h   a   r   s   P   e   r   P
0076060    a   g   e   ,       f   a   l   s   e   )  \r               l
0076100    e   t       f   i   l   e   B   y   t   e   s       =       C
0076120    u   r   r   e   n   t   P   o   s   (   d   i   s   k   S   t
0076140    r   e   a   m   )  \r               i   f       D   a   t   a
0076160    I   s   B   i   n   a   r   y   (   k   s   B   u   f   f   e
0076200    r   ,       f   i   l   e   B   y   t   e   s   )       t   h
0076220    e   n       [       t   e   x   t       =       f   a   l   s
0076240    e   ;       b   r   e   a   k       ]  \r               i   f
0076260        f   i   l   e   B   y   t   e   s       l   s       c   h
0076300    a   r   s   P   e   r   P   a   g   e       b   r   e   a   k
0076320   \r               C   l   e   a   n   u   p   D   i   s   k   S
0076340    t   r   e   a   m   (   d   i   s   k   S   t   r   e   a   m
0076360    )  \r               ]       r   e   p   e   a   t  \r  \r   R
0076400    e   s   e   t   s   (   d   i   s   k   S   t   r 376 001  \0
0076420  306 033   e   a   m   )  \r   r   e   s   u   l   t   i   s    
0076440    t   e   x   t  \r   ]  \r  \r   /   /   -   -   -   -   -   -
0076460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0076560    -   -   -   -   -  \r   a   n   d       F   l   i   p   C   u
0076600    r   s   o   r   (   )       b   e  \r   /   /   -   -   -   -
0076620    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0076720    -   -   -   -   -   -   -  \r   [  \r   m   a   n   i   f   e
0076740    s   t       c   u   r   s   o   r   B   i   t   M   a   p    
0076760    =       4   3   1   b  \r   f   o   r       i       =       0
0077000        t   o       1   5       d   o       c   u   r   s   o   r
0077020    B   i 376  \0 036 017 371   t   M   a   p   !   i       =    
0077040    n   o   t       c   u   r   s   o   r   B   i   t   M   a   p
0077060    !   i  \r   ]  \r 377  \0  \0   I   f   s   F   t   p   U   t
0077100    i   l   .   b   c   p   l  \0 373 231  \b   V 202  \0  \0 376
0077120  001  \0 356   %   /   /       I   f   s   F   t   p   U   t   i
0077140    l   .   b   c   p   l       -   -       U   t   i   l   i   t
0077160    y       r   o   u   t   i   n   e   s  \r   /   /       C   o
0077200    p   y   r   i   g   h   t       X   e   r   o   x       C   o
0077220    r   p   o   r   a   t   i   o   n       1   9   7   9   ,    
0077240    1   9   8   0   ,       1   9   8   1   ,       1   9   8   2
0077260   \r   /   /       L   a   s   t       m   o   d   i   f   i   e
0077300    d       M   a   y       1   1   ,       1   9   8   2        
0077320    4   :   2   6       P   M       b   y       T   a   f   t  \r
0077340   \r   g   e   t       "   P   u   p   0   .   d   e   c   l   "
0077360   \r   g   e   t       "   P   u   p   1   .   d   e   c   l   "
0077400   \r   g   e   t       "   P   u   p   R   T   P   .   d   e   c
0077420    l   "  \r   g   e   t       "   I   f   s   .   d   e   c   l
0077440    "  \r   g   e   t       E   r   r   R   e   c   ,       f   t
0077460    p   E   c   ,       e   r   r   o   r   S   t   r   i   n   g
0077500        f   r   o   m       "   I   f   s   S   y   s   t   e   m
0077520    I   n   f   o 376 001  \0 363 274   .   d   e   c   l   "  \r
0077540    g   e   t       "   I   f   s   F   i   l   e   s   .   d   e
0077560    c   l   "  \r   g   e   t       "   I   f   s   D   i   r   s
0077600    .   d   e   c   l   "  \r   g   e   t       "   I   f   s   F
0077620    t   p   P   r   o   t   .   d   e   c   l   "  \r  \r   e   x
0077640    t   e   r   n   a   l  \r   [  \r   /   /       o   u   t   g
0077660    o   i   n   g       p   r   o   c   e   d   u   r   e   s  \r
0077700    F   t   p   S   M   a   k   e   S   F   I   L   ;       F   t
0077720    p   S   S   e   n   d   M   a   r   k  \r   F   t   p   S   F
0077740    i   l   l   P   L   F   r   o   m   L   D   ;       F   t   p
0077760    S   C   h   e   c   k   A   c   c   e   s   s   ;       F   t
0100000    p   S   C   h   e   c   k   C   o   n   n   e   c   t   i   o
0100020    n  \r  \r   /   /       i   n   c   o   m   i   n   g       p
0100040    r   o   c   e   d   u   r   e   s  \r   E   x   t   r   a   c
0100060    t   S   u   b   s   t   r   i   n   g   ;       S   t   r   i
0100100    n   g   C   o   m   p   a   r   e   ;       E   x   p   a   n
0100120    d   T   e   m   p   l   a   t   e 376 001  \0   & 360  \r   I
0100140    F   S   P   r   i   n   t   E   r   r   o   r   ;       L   o
0100160    g   i   n   ;       C   o   n   n   e   c   t   ;       M   o
0100200    v   e   B   l   o   c   k  \r   S   y   s   F   r   e   e   ;
0100220        F   r   e   e   P   o   i   n   t   e   r  \r   L   o   c
0100240    k   T   r   a   n   s   f   e   r   L   e   a   d   e   r   P
0100260    a   g   e   ;       G   e   t   B   u   f   f   e   r   F   o
0100300    r   F   D   ;       D   e   s   t   r   o   y   F   D  \r   F
0100320    T   P   M   ;       F   r   e   e   P   L   i   s   t   ;    
0100340    I   n   i   t   P   L   i   s   t  \r   L   o   o   k   u   p
0100360    E   r   r   o   r   C   o   d   e  \r  \r   /   /       i   n
0100400    c   o   m   i   n   g       s   t   a   t   i   c   s  \r   C
0100420    t   x   R   u   n   n   i   n   g  \r   ]  \r  \r   /   /   -
0100440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0100520    -   -   -   -   -   -   -   -   -   -   -   -   -   - 376 001
0100540   \0 201   h   -   -   -   -   -   -   -   -   -   -   -   -  \r
0100560    l   e   t       F   t   p   S   S   e   n   d   M   a   r   k
0100600    (   m   a   r   k   ,       e   c   ,       a   r   g   0   ,
0100620        a   r   g   1   ,       a   r   g   2   ,       a   r   g
0100640    3   ,       a   r   g   4   )       =       v   a   l   o   f
0100660   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0100700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0100760    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   /
0101000    /       E   x   p   a   n   d   s       e   c       i   n   t
0101020    o       a   n       F   t   p       e   r   r   o   r       c
0101040    o   d   e       a   n   d       s   t   r   i   n   g   .  \r
0101060    /   /       T   h   e       n   e   x   t       s   t   e   p
0101100        i   s       u   s   u   a   l   l   y       t   o       r
0101120    e   t   u   r   n       f   a   l   s   e   ,  \r   /   /    
0101140        s   o 376 001  \0 277 322       t   h   i   s       r   o
0101160    u   t   i   n   e       s   u   p   p   l   i   e   s       t
0101200    h   e       '   f   a   l   s   e   '       v   a   l   u   e
0101220        a   l   l   o   w   i   n   g       y   o   u       t   o
0101240        s   a   y   :  \r   /   /               u   n   l   e   s
0101260    s       I   F   S   D   e   l   e   t   e   F   i   l   e   (
0101300    .   .   .   )       r   e   s   u   l   t   i   s       F   t
0101320    p   S   S   e   n   d   M   a   r   k   (   .   .   .   )  \r
0101340    [  \r   l   e   t       e   r   r   R   e   c       =       L
0101360    o   o   k   u   p   E   r   r   o   r   C   o   d   e   (   e
0101400    c   )  \r   F   T   P   M   (   m   a   r   k   ,       e   r
0101420    r   R   e   c   >   >   E   r   r   R   e   c   .   f   t   p
0101440    E   c   ,       l   v       e   r   r   R   e   c   >   >   E
0101460    r   r   R   e   c   .   e   r   r   o   r   S   t   r   i   n
0101500    g   ,  \r       f   a   l   s   e   ,       a   r   g   0   ,
0101520        a   r   g   1   ,       a   r   g   2   ,       a   r   g
0101540    3   ,       a   r   g   4   ) 376 001  \0 214   g  \r   S   y
0101560    s   F   r   e   e   (   e   r   r   R   e   c   )  \r   r   e
0101600    s   u   l   t   i   s       f   a   l   s   e  \r   ]  \r  \r
0101620    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0101640    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0101720    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   a   n
0101740    d       F   t   p   S   C   h   e   c   k   C   o   n   n   e
0101760    c   t   i   o   n   (   )       =       v   a   l   o   f  \r
0102000    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0102020    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0102100    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   /   /
0102120        D   o       n   o   t       c   a   l   l       f   r   o
0102140    m       M   T   P       s   e   r   v   e   r   ; 376 001  \0
0102160    _ 227       o   n   l   y       F   T   P       s   e   r   v
0102200    e   r  \r   [  \r   i   f       C   t   x   R   u   n   n   i
0102220    n   g   >   >   F   t   p   C   t   x   .   b   s   p   S   o
0102240    c   >   >   R   T   P   S   o   c   .   s   t   a   t   e    
0102260    n   e       s   t   a   t   e   O   p   e   n       t   h   e
0102300    n  \r               [  \r               i   f       C   t   x
0102320    R   u   n   n   i   n   g   >   >   F   t   p   C   t   x   .
0102340    f   d       n   e       0       t   h   e   n  \r            
0102360                C   t   x   R   u   n   n   i   n   g   >   >   F
0102400    t   p   C   t   x   .   f   d       =       D   e   s   t   r
0102420    o   y   F   D   (   C   t   x   R   u   n   n   i   n   g   >
0102440    >   F   t   p   C   t   x   .   f   d   )  \r               r
0102460    e   s   u   l   t   i   s       f   a   l   s   e  \r        
0102500        ]  \r   r   e   s   u   l   t   i   s       t   r   u   e
0102520   \r   ]  \r  \f  \r   /   /   -   -   -   -   -   -   -   -   -
0102540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0102560    -   - 376 001  \0 377   Z   -   -   -   -   -   -   -   -   -
0102600    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0102640    -   -   -   -   -   -   -  \r   a   n   d       F   t   p   S
0102660    C   h   e   c   k   A   c   c   e   s   s   (   p   l   )    
0102700    =       v   a   l   o   f  \r   /   /   -   -   -   -   -   -
0102720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0103020    -   -   -   -   -  \r   /   /       C   h   e   c   k       l
0103040    o   g   i   n   /   c   o   n   n   e   c   t       p   a   r
0103060    a   m   e   t   e   r   s       i   n       p   l   .  \r   [
0103100   \r   l   e   t       u   i       =       C   t   x   R   u   n
0103120    n   i   n   g   >   >   F   t   p   C   t   x   .   u   s   e
0103140    r   I   n   f   o  \r  \r   /   /       L   o   g   i   n    
0103160    p   a   r   a   m   e   t 376 001  \0 021   ?   e   r   s  \r
0103200    l   e   t       e   c       =       L   o   g   i   n   (   p
0103220    l   >   >   P   L   .   U   N   A   M   ,       p   l   >   >
0103240    P   L   .   U   P   S   W   ,       u   i   )  \r  \r   /   /
0103260        C   o   n   n   e   c   t       p   a   r   a   m   e   t
0103300    e   r   s  \r   i   f       e   c       e   q       0       t
0103320    h   e   n  \r               e   c       =       C   o   n   n
0103340    e   c   t   (   p   l   >   >   P   L   .   C   N   A   M   ,
0103360        p   l   >   >   P   L   .   C   P   S   W   ,       u   i
0103400    )  \r  \r   r   e   s   u   l   t   i   s       e   c       e
0103420    q       0   ?       t   r   u   e   ,       F   t   p   S   S
0103440    e   n   d   M   a   r   k   (   m   a   r   k   N   o   ,    
0103460    e   c   )  \r   ]  \r  \r   /   /   -   -   -   -   -   -   -
0103500    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0103560    -   -   -   -   -   -   -   -   -   -   -   - 376 001  \0 005
0103600  207   -   -   -   -   -   -   -   -  \r   a   n   d       F   t
0103620    p   S   M   a   k   e   S   F   I   L   (   p   l   )       b
0103640    e  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0103660    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0103740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0103760    /   /       B   u   i   l   d   s       a       s   e   r   v
0104000    e   r   F   i   l   e   n   a   m   e       f   r   o   m    
0104020    t   h   e       i   n   f   o   r   m   a   t   i   o   n    
0104040    i   n       p   l   .  \r   /   /       T   h   e       r   e
0104060    s   u   l   t       i   s       l   e   f   t       i   n    
0104100    p   l   >   >   P   L   .   S   F   I   L   .  \r   [  \r   /
0104120    /       I   f       t   h   e   r   e       i   s       n   o
0104140        n   a   m   e       b   o   d   y   ,       c   o   n   s
0104160    t   r   u   c   t       a       b   l   a   n   k       o   n
0104200    e 376 001  \0   a 312  \r   i   f       p   l   >   >   P   L
0104220    .   N   A   M   B       e   q       0       t   h   e   n  \r
0104240                p   l   >   >   P   L   .   N   A   M   B       =
0104260        E   x   t   r   a   c   t   S   u   b   s   t   r   i   n
0104300    g   (   "   "   )  \r  \r   /   /       I   f       t   h   e
0104320    r   e       i   s       n   o       s   e   r   v   e   r    
0104340    f   i   l   e   n   a   m   e   ,       c   o   n   s   t   r
0104360    u   c   t       o   n   e   .  \r   /   /       T   h   e    
0104400    V   e   r   s   i   o   n       p   r   o   p   e   r   t   y
0104420        i   s   n   '   t       c   o   r   r   e   c   t   l   y
0104440        h   a   n   d   l   e   d   .           A       v   e   r
0104460    s   i   o   n       s   u   p   p   l   i   e   d  \r   /   /
0104500            i   n       a       P   L       w   i   l   l       o
0104520    n   l   y       b   e       u   s   e   d       a   s       a
0104540        d   e   f   a   u   l   t       i   f       n   o       S
0104560    e   r   v   e   r   F   i   l   e   n   a   m   e       w   a
0104600    s  \r   /   /         376 001  \0   8   H   s   u   p   p   l
0104620    i   e   d   .           T   h   e       p   r   o   p   e   r
0104640        i   m   p   l   e   m   e   n   t   a   t   i   o   n    
0104660    i   s       t   o       h   a   n   d   l   e       i   t    
0104700    t   h   e       w   a   y  \r   /   /           d   e   f   a
0104720    u   l   t       d   i   r   e   c   t   o   r   i   e   s    
0104740    a   r   e   :       p   a   s   s       t   h   e       d   e
0104760    f   a   u   l   t       v   e   r   s   i   o   n       f   r
0105000    o   m       t   h   e       P   L       t   o  \r   /   /    
0105020        t   h   e       d   i   r   e   c   t   o   r   y       m
0105040    o   d   u   l   e   ,       w   h   e   r   e       C   r   e
0105060    a   t   e   F   D       c   a   n       d   e   c   i   d   e
0105100        w   h   e   t   h   e   r       i   t       i   s       n
0105120    e   e   d   e   d   .  \r   i   f       p   l   >   >   P   L
0105140    .   S   F   I   L       e   q       0       t   h   e   n  \r
0105160                p   l   >   >   P   L   .   S   F   I   L       =
0105200        E   x   p   a   n   d   T   e   m   p 376 001  \0   8 323
0105220    l   a   t   e   (   (   p   l   >   >   P   L   .   V   E   R
0105240    S       e   q       0   ?       "   $   S   "   ,       "   $
0105260    S   !   $   S   "   )   ,  \r                   p   l   >   >
0105300    P   L   .   N   A   M   B   ,       p   l   >   >   P   L   .
0105320    V   E   R   S   )  \r  \r   /   /       I   f       a       d
0105340    i   r   e   c   t   o   r   y       i   s       s   p   e   c
0105360    i   f   i   e   d   ,       s   t   r   i   p       o   f   f
0105400        t   h   e       o   u   t   e   r       <       >       i
0105420    f       p   r   e   s   e   n   t  \r   i   f       p   l   >
0105440    >   P   L   .   D   I   R   E       n   e       0       t   h
0105460    e   n  \r               [  \r               l   e   t       d
0105500    i   r       =       p   l   >   >   P   L   .   D   I   R   E
0105520   \r               i   f       d   i   r   >   >   S   t   r   i
0105540    n   g   .   c   h   a   r   ^   (   d   i   r   >   >   S   t
0105560    r   i   n   g   .   l   e   n   g   t   h   )       e   q    
0105600    $   >       t   h   e   n  \r                           d   i
0105620  376 001  \0 267 177   r   >   >   S   t   r   i   n   g   .   l
0105640    e   n   g   t   h       =       d   i   r   >   >   S   t   r
0105660    i   n   g   .   l   e   n   g   t   h       -   1  \r        
0105700        i   f       d   i   r   >   >   S   t   r   i   n   g   .
0105720    c   h   a   r   ^   1       e   q       $   <       t   h   e
0105740    n  \r                           [  \r                        
0105760    p   l   >   >   P   L   .   D   I   R   E       =       E   x
0106000    t   r   a   c   t   S   u   b   s   t   r   i   n   g   (   d
0106020    i   r   ,       2   )  \r                           S   y   s
0106040    F   r   e   e   (   d   i   r   )  \r                        
0106060    ]  \r               ]  \r   ]  \r  \f  \r   /   /   -   -   -
0106100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0106200    -   -   -   -   -   -   -   -  \r   a   n   d       F   t   p
0106220    S   F   i   l   l 376 001  \0 326 267   P   L   F   r   o   m
0106240    L   D   (   r   e   m   o   t   e   P   L   ,       r   e   p
0106260    o   r   t   D   a   m   a   g   e   ;       n   u   m   a   r
0106300    g   s       n   a   )       =       v   a   l   o   f  \r   /
0106320    /   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0106340    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0106420    -   -   -   -   -   -   -   -   -   -   -   -  \r   /   /    
0106440    C   r   e   a   t   e   s       a   n   d       r   e   t   u
0106460    r   n   s       a       P   L       f   r   o   m       t   h
0106500    e       p   r   o   p   e   r   t   i   e   s       o   f    
0106520    t   h   e       f   i   l   e       d   e   s   c   r   i   b
0106540    e   d       b   y       F   t   p   C   t   x   .   f   d   .
0106560   \r   /   /       R   e   t   u   r   n   s       z   e   r   o
0106600        i   f       t   h   e       f   i   l   e       h   a   s
0106620        g   o   n   e       a   w   a   y 376 001  \0   h   "   .
0106640   \r   [  \r   l   e   t       d   p   r   p       =       r   e
0106660    m   o   t   e   P   L   >   >   P   L   .   D   P   R   P    
0106700        /   /       d   e   s   i   r   e   d       p   r   o   p
0106720    e   r   t   i   e   s  \r   i   f       d   p   r   p       e
0106740    q       0       t   h   e   n       d   p   r   p       =    
0106760    -   1           /   /       i   f       n   o   n   e       s
0107000    p   e   c   i   f   i   e   d   ,       r   e   q   u   e   s
0107020    t       a   l   l       p   r   o   p   e   r   t   i   e   s
0107040   \r   l   e   t       p   l       =       I   n   i   t   P   L
0107060    i   s   t   (   )  \r   l   e   t       f   d       =       C
0107100    t   x   R   u   n   n   i   n   g   >   >   F   t   p   C   t
0107120    x   .   f   d  \r   l   e   t       d   r       =       f   d
0107140    >   >   F   D   .   d   r  \r  \r   /   /       f   i   r   s
0107160    t       g   e   n   e   r   a   t   e       p   r   o   p   e
0107200    r   t   i   e   s       t   h   a   t       c   a   n       b
0107220    e       e   x   t   r   a   c   t   e   d       f   r   o 376
0107240  001  \0   l 224   m       t   h   e       F   D  \r   i   f    
0107260    d   p   r   p   <   <   D   P   R   P   .   S   F   I   L    
0107300    t   h   e   n       p   l   >   >   P   L   .   S   F   I   L
0107320        =       E   x   t   r   a   c   t   S   u   b   s   t   r
0107340    i   n   g   (   l   v       d   r   >   >   D   R   .   p   a
0107360    t   h   N   a   m   e   )  \r   i   f       d   p   r   p   <
0107400    <   D   P   R   P   .   D   E   V   I       t   h   e   n    
0107420    p   l   >   >   P   L   .   D   E   V   I       =       E   x
0107440    t   r   a   c   t   S   u   b   s   t   r   i   n   g   (   f
0107460    d   >   >   F   D   .   f   s   >   >   I   F   S   .   i   d
0107500    )  \r   i   f       d   p   r   p   <   <   D   P   R   P   .
0107520    D   I   R   E       t   h   e   n       p   l   >   >   P   L
0107540    .   D   I   R   E       =       E   x   t   r   a   c   t   S
0107560    u   b   s   t   r   i   n   g   (   l   v       d   r   >   >
0107600    D   R   .   p   a   t   h   N   a   m   e   ,  \r            
0107620        2   ,       f   d   >   >   F   D   .   l   e   n   S   u
0107640    b   D   i   r 376 001  \0   A 311   S   t   r   i   n   g   -
0107660    1   )  \r   i   f       d   p   r   p   <   <   D   P   R   P
0107700    .   N   A   M   B       t   h   e   n       p   l   >   >   P
0107720    L   .   N   A   M   B       =       E   x   t   r   a   c   t
0107740    S   u   b   s   t   r   i   n   g   (   l   v       d   r   >
0107760    >   D   R   .   p   a   t   h   N   a   m   e   ,  \r        
0110000            f   d   >   >   F   D   .   l   e   n   S   u   b   D
0110020    i   r   S   t   r   i   n   g   +   1   ,       f   d   >   >
0110040    F   D   .   l   e   n   B   o   d   y   S   t   r   i   n   g
0110060    -   1   )  \r   i   f       d   p   r   p   <   <   D   P   R
0110100    P   .   V   E   R   S       t   h   e   n       p   l   >   >
0110120    P   L   .   V   E   R   S       =       E   x   t   r   a   c
0110140    t   S   u   b   s   t   r   i   n   g   (   l   v       d   r
0110160    >   >   D   R   .   p   a   t   h   N   a   m   e   ,  \r    
0110200                f   d   >   >   F   D   .   l   e   n   B   o   d
0110220    y   S   t   r   i   n   g   +   1   )  \r  \r   /   /       i
0110240    f       n   o       o   t   h   e 376 001  \0  \f   h   r    
0110260    p   r   o   p   e   r   t   i   e   s       d   e   s   i   r
0110300    e   d   ,       d   o   n   '   t       n   e   e   d       t
0110320    o       r   e   a   d       t   h   e       l   e   a   d   e
0110340    r       p   a   g   e  \r   m   a   n   i   f   e   s   t    
0110360    r   e   q   u   i   r   e   s   L   e   a   d   e   r   P   a
0110400    g   e       =       1   0   0   0   0   0   B       r   s   h
0110420    i   f   t       o   f   f   s   e   t       D   P   R   P   .
0110440    T   Y   P   E       %  \r       1   0   0   0   0   0   B    
0110460    r   s   h   i   f   t       o   f   f   s   e   t       D   P
0110500    R   P   .   B   Y   T   E       %       1   0   0   0   0   0
0110520    B       r   s   h   i   f   t       o   f   f   s   e   t    
0110540    D   P   R   P   .   S   I   Z   E       %  \r       1   0   0
0110560    0   0   0   B       r   s   h   i   f   t       o   f   f   s
0110600    e   t       D   P   R   P   .   A   U   T   H       %       1
0110620    0   0   0   0   0   B       r   s   h   i   f   t       o   f
0110640    f   s   e   t       D   P   R   P   .   C   D   A   T 376 001
0110660   \0 004   ]       %  \r       1   0   0   0   0   0   B       r
0110700    s   h   i   f   t       o   f   f   s   e   t       D   P   R
0110720    P   .   R   D   A   T       %       1   0   0   0   0   0   B
0110740        r   s   h   i   f   t       o   f   f   s   e   t       D
0110760    P   R   P   .   W   D   A   T       %  \r       1   0   0   0
0111000    0   0   B       r   s   h   i   f   t       o   f   f   s   e
0111020    t       D   P   R   P   .   C   S   U   M  \r   i   f       (
0111040    d   p   r   p       &       r   e   q   u   i   r   e   s   L
0111060    e   a   d   e   r   P   a   g   e   )       n   e       0    
0111100    t   h   e   n  \r               [  \r               l   e   t
0111120        i   l   d       =       G   e   t   B   u   f   f   e   r
0111140    F   o   r   F   D   (   f   d   )  \r               l   e   t
0111160        e   c       =       L   o   c   k   T   r   a   n   s   f
0111200    e   r   L   e   a   d   e   r   P   a   g   e   (   f   d   ,
0111220        i   l   d   )           /   /       r   e   a   d  \r    
0111240            i   f       e   c       n   e       0       t   h   e
0111260    n       [ 376 001  \0 363   }       S   y   s   F   r   e   e
0111300    (   i   l   d   )   ;       r   e   s   u   l   t   i   s    
0111320    F   r   e   e   P   L   i   s   t   (   p   l   )       ]  \r
0111340   \r               i   f       d   p   r   p   <   <   D   P   R
0111360    P   .   T   Y   P   E       t   h   e   n       p   l   >   >
0111400    P   L   .   T   Y   P   E       =       i   l   d   >   >   I
0111420    L   D   .   t   y   p   e  \r               i   f       d   p
0111440    r   p   <   <   D   P   R   P   .   B   Y   T   E       t   h
0111460    e   n       p   l   >   >   P   L   .   B   Y   T   E       =
0111500        i   l   d   >   >   I   L   D   .   b   y   t   e   S   i
0111520    z   e  \r               i   f       d   p   r   p   <   <   D
0111540    P   R   P   .   A   U   T   H       t   h   e   n       p   l
0111560    >   >   P   L   .   A   U   T   H       =       E   x   t   r
0111600    a   c   t   S   u   b   s   t   r   i   n   g   (   l   v    
0111620    i   l   d   >   >   I   L   D   .   a   u   t   h   o   r   )
0111640   \r  \r               i   f       d   p   r   p   <   <   D   P
0111660    R   P   .   C   D   A   T     376 001  \0 221 262   t   h   e
0111700    n       M   o   v   e   B   l   o   c   k   (   l   v       p
0111720    l   >   >   P   L   .   C   D   A   T   ,       l   v       i
0111740    l   d   >   >   L   D   .   c   r   e   a   t   e   d   ,    
0111760    2   )  \r               i   f       d   p   r   p   <   <   D
0112000    P   R   P   .   R   D   A   T       t   h   e   n       M   o
0112020    v   e   B   l   o   c   k   (   l   v       p   l   >   >   P
0112040    L   .   R   D   A   T   ,       l   v       i   l   d   >   >
0112060    L   D   .   r   e   a   d   ,       2   )  \r               i
0112100    f       d   p   r   p   <   <   D   P   R   P   .   W   D   A
0112120    T       t   h   e   n       M   o   v   e   B   l   o   c   k
0112140    (   l   v       p   l   >   >   P   L   .   W   D   A   T   ,
0112160        l   v       i   l   d   >   >   L   D   .   w   r   i   t
0112200    t   e   n   ,       2   )  \r  \r               i   f       d
0112220    p   r   p   <   <   D   P   R   P   .   S   I   Z   E       t
0112240    h   e   n  \r                           [  \r                
0112260            l   e   t       s   i   z       =       l 376 001  \0
0112300  034   N   v       p   l   >   >   P   L   .   S   I   Z   E  \r
0112320                            l   e   t       f   a       =       l
0112340    v       i   l   d   >   >   L   D   .   h   i   n   t   L   a
0112360    s   t   P   a   g   e   F   a  \r                           l
0112400    e   t       l   n   B   y   t   e   s       =       f   d   >
0112420    >   F   D   .   f   s   >   >   I   F   S   .   l   o   g   P
0112440    a   g   e   L   e   n   g   t   h       +   1  \r            
0112460                l   e   t       n   u   m   P   a   g   e   s    
0112500    =       f   a   >   >   F   A   .   p   a   g   e   N   u   m
0112520    b   e   r       -   1           /   /       d   o   n   '   t
0112540        c   o   u   n   t       l   e   a   d   e   r       p   a
0112560    g   e  \r                           u   n   l   e   s   s    
0112600    n   u   m   P   a   g   e   s       e   q       -   1       d
0112620    o  \r                                       [  \r            
0112640                            s   i   z   !   0       =       n   u
0112660    m   P   a   g   e   s       r   s   h   i   f   t       (   1
0112700    6   - 376 001  \0 331   l   l   n   B   y   t   e   s   )  \r
0112720                                        s   i   z   !   1       =
0112740        n   u   m   P   a   g   e   s       l   s   h   i   f   t
0112760        l   n   B   y   t   e   s       +       f   a   >   >   F
0113000    A   .   c   h   a   r   P   o   s  \r                        
0113020                ]  \r                           ]  \r  \r        
0113040        i   f       d   p   r   p   <   <   D   P   R   P   .   C
0113060    S   U   M       t   h   e   n       p   l   >   >   P   L   .
0113100    C   S   U   M       =       i   l   d   >   >   I   L   D   .
0113120    c   h   e   c   k   s   u   m  \r  \r               i   f    
0113140    n   a       g   r       1       &       r   e   p   o   r   t
0113160    D   a   m   a   g   e       &       i   l   d   >   >   I   L
0113200    D   .   d   a   m   a   g   e   d       t   h   e   n  \r    
0113220                        F   t   p   S   S   e   n   d   M   a   r
0113240    k   (   m   a   r   k   C   o   m   m   e   n   t   ,       e
0113260    c   F   i   l   e   D   a   m   a   g   e   d   ,       l   v
0113300        d   r   >   >   D   R 376  \0   0 342   q   .   p   a   t
0113320    h   N   a   m   e   )  \r  \r               S   y   s   F   r
0113340    e   e   (   i   l   d   )  \r               ]  \r  \r   r   e
0113360    s   u   l   t   i   s       p   l  \r   ]  \r 377  \0  \0   I
0113400    f   s   F   t   p   O   E   P   .   b   c   p   l  \0 373 233
0113420  236 005   m  \0  \0 376 001  \0 307 371   /   /       I   f   s
0113440    F   t   p   S   e   r   v   O   E   P   .   b   c   p   l  \r
0113460    /   /       C   o   p   y   r   i   g   h   t       X   e   r
0113500    o   x       C   o   r   p   o   r   a   t   i   o   n       1
0113520    9   7   9   ,       1   9   8   3  \r   /   /       L   a   s
0113540    t       m   o   d   i   f   i   e   d       S   e   p   t   e
0113560    m   b   e   r       2   5   ,       1   9   8   3           2
0113600    :   0   2       P   M       b   y       T   a   f   t  \r  \r
0113620    e   x   t   e   r   n   a   l  \r   [  \r   /   /       o   u
0113640    t   g   o   i   n   g       p   r   o   c   e   d   u   r   e
0113660    s  \r   I   n   i   t   F   t   p   S   e   r   v   O   E   P
0113700   \r  \r   /   /       i   n   c   o   m   i   n   g       p   r
0113720    o   c   e   d   u   r   e   s  \r   D   e   c   l   a   r   e
0113740    O   E   P   ;       I   f   s   F   t   p   S   e   r   v  \r
0113760    F   t   p   S   V   e   r   s   i   o   n   ;       F   t   p
0114000    S   N   o   t   I   m   p   l   ;       F   t   p   S   R   e
0114020    n   a   m   e  \r   F   t   p   S   S 376 001  \0   X   w   t
0114040    o   r   e   ;       F   t   p   S   S   t   o   r   e   F   i
0114060    l   e   ;       F   t   p   S   S   t   o   r   e   C   l   e
0114100    a   n   u   p  \r   F   t   p   S   R   e   t   r   i   e   v
0114120    e   ;       F   t   p   S   R   e   t   r   i   e   v   e   F
0114140    i   l   e  \r   F   t   p   S   D   e   l   e   t   e   ;    
0114160    F   t   p   S   D   e   l   e   t   e   F   i   l   e   ;    
0114200    F   t   p   S   D   i   r   e   c   t   o   r   y   ;       F
0114220    t   p   S   S   e   t   P   r   o   p   s  \r   ]  \r  \r  \r
0114240    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0114260    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0114340    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   l
0114360    e   t       I   n   i   t   F   t   p   S   e   r   v   O   E
0114400    P   (   o   e   v   )       b   e  \r   /   /   -   -   -   -
0114420    -   -   -   -   -   -   -   -   -   -   -   -   -   -   - 376
0114440  001  \0 241 213   -   -   -   -   -   -   -   -   -   -   -   -
0114460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0114520    -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [  \r
0114540    D   e   c   l   a   r   e   O   E   P   (   o   e   v   ,    
0114560    l   v       I   f   s   F   t   p   S   e   r   v   ,       l
0114600    v       F   t   p   S   V   e   r   s   i   o   n   ,  \r    
0114620    l   v       F   t   p   S   S   t   o   r   e   ,       l   v
0114640        F   t   p   S   S   t   o   r   e   F   i   l   e   ,    
0114660    l   v       F   t   p   S   S   t   o   r   e   C   l   e   a
0114700    n   u   p   ,  \r       l   v       F   t   p   S   R   e   t
0114720    r   i   e   v   e   ,       l   v       F   t   p   S   R   e
0114740    t   r   i   e   v   e   F   i   l   e   )  \r   D   e   c   l
0114760    a   r   e   O   E   P   (   o   e   v   ,       l   v       F
0115000    t   p   S   D   e   l   e   t   e   ,       l   v       F   t
0115020    p   S   D   e   l   e   t   e   F   i   l   e   ,  \r       l
0115040    v       F   t 376  \0   ? 277   R   p   S   D   i   r   e   c
0115060    t   o   r   y   ,       l   v       F   t   p   S   R   e   n
0115100    a   m   e   ,       l   v       F   t   p   S   N   o   t   I
0115120    m   p   l   ,       l   v       F   t   p   S   S   e   t   P
0115140    r   o   p   s   )  \r   ]  \r 377  \0  \0   C   o   m   p   i
0115160    l   e   I   f   s   F   t   p   .   c   m  \0 373 230 025 272
0115200  002  \0  \0 376  \0 213   . 205   B   c   p   l   /   f   o    
0115220    I   f   s   F   t   p   I   n   i   t   .   b   c   p   l    
0115240    I   f   s   F   t   p   S   e   r   v   .   b   c   p   l    
0115260    I   f   s   F   t   p   S   t   o   r   e   .   b   c   p   l
0115300        I   f   s   F   t   p   R   e   t   r   i   e   v   e   .
0115320    b   c   p   l       I   f   s   F   t   p   C   m   d   .   b
0115340    c   p   l       I   f   s   F   t   p   X   f   e   r   .   b
0115360    c   p   l       I   f   s   F   t   p   U   t   i   l   .   b
0115400    c   p   l       I   f   s   F   t   p   O   E   P   .   b   c
0115420    p   l  \r 377  \0  \0   I   f   s   F   t   p   .   c   m  \0
0115440  373 223 361 317 306  \0  \0 376  \0 255   f 327   I   f   s   F
0115460    t   p   P   r   o   t   .   d   e   c   l       I   f   s   F
0115500    t   p   I   n   i   t   .   b   c   p   l       I   f   s   F
0115520    t   p   S   e   r   v   .   b   c   p   l       I   f   s   F
0115540    t   p   S   t   o   r   e   .   b   c   p   l       I   f   s
0115560    F   t   p   R   e   t   r   i   e   v   e   .   b   c   p   l
0115600        I   f   s   F   t   p   C   m   d   .   b   c   p   l    
0115620    I   f   s   F   t   p   X   f   e   r   .   b   c   p   l    
0115640    I   f   s   F   t   p   U   t   i   l   .   b   c   p   l    
0115660    I   f   s   F   t   p   O   E   P   .   b   c   p   l       C
0115700    o   m   p   i   l   e   I   f   s   F   t   p   .   c   m    
0115720    I   f   s   F   t   p   .   c   m 374                        
0115732