$ od -c -N 50000 [Indigo]<IFS>IfsCopyDisk.dm!2
0000000  377  \0  \0   I   f   s   C   o   p   y   D   i   s   k   .   d
0000020    e   c   l  \0 373 230   A   Y 312  \0  \0 376 001  \0   w 357
0000040    /   /       I   f   s   C   o   p   y   D   i   s   k   .   d
0000060    e   c   l  \r   /   /       C   o   p   y   r   i   g   h   t
0000100        X   e   r   o   x       C   o   r   p   o   r   a   t   i
0000120    o   n       1   9   7   9   ,       1   9   8   0   ,       1
0000140    9   8   1  \r   /   /       L   a   s   t       m   o   d   i
0000160    f   i   e   d       D   e   c   e   m   b   e   r       1   1
0000200    ,       1   9   8   1           5   :   0   0       P   M    
0000220    b   y       T   a   f   t  \r  \r   /   /   -   -   -   -   -
0000240    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0000340    -   -   -   -   -   -   -  \r   m   a   n   i   f   e   s   t
0000360   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0000400    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0000440  376 001  \0 350   <   -   -   -   -   -   -   -   -   -   -   -
0000460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0000500    -   -   -   -  \r   [  \r   s   o   c   k   e   t   C   o   p
0000520    y   D   i   s   k       =       2   5   b  \t  \t   /   /    
0000540    w   e   l   l   -   k   n   o   w   n       s   o   c   k   e
0000560    t  \r   c   d   V   e   r   s   i   o   n       =       3  \t
0000600   \t  \t   /   /       p   r   o   t   o   c   o   l       v   e
0000620    r   s   i   o   n  \r  \r   /   /       I   f   s       e   r
0000640    r   o   r       c   o   d   e   s  \r   e   c   U   n   k   n
0000660    o   w   n   C   m   d       =       1   1   0   0  \t  \t   /
0000700    /       U   n   k   n   o   w   n       c   o   m   m   a   n
0000720    d  \r   e   c   N   o   D   i   s   k       =       1   1   0
0000740    1  \t  \t  \t   /   /       P   r   o   t   o   c   o   l    
0000760    e   r   r   o   r   :       n   o       d   i   s   k       s
0001000    p   e   c   i   f   i   e   d  \r   e   c   N   o   D   i   s
0001020    k   P   a   r   a   m   s       =       1   1   0   2  \t  \t
0001040    /   /       P   r 376 001  \0   F 341   o   t   o   c   o   l
0001060        e   r   r   o   r   :       n   o       d   i   s   k    
0001100    p   a   r   a   m   s  \r   e   c   R   e   a   d   y   F   o
0001120    r   D   i   s   k       =       1   1   0   3  \t  \t   /   /
0001140        I   '   m       r   e   a   d   y       f   o   r       y
0001160    o   u   r       d   i   s   k  \r   e   c   H   e   r   e   I
0001200    s   D   i   s   k       =       1   1   0   4  \t  \t   /   /
0001220        H   e   r   e       c   o   m   e   s       t   h   e    
0001240    d   i   s   k  \r   e   c   L   o   g   C   o   n   n       =
0001260        1   1   0   5  \t  \t   /   /       L   o   g   i   n   /
0001300    c   o   n   n   e   c   t       o   k  \r   e   c   B   a   d
0001320    F   o   r   m   a   t       =       1   1   0   6  \t  \t   /
0001340    /       F   i   l   e       i   s       n   o   t       i   n
0001360        C   o   p   y   D   i   s   k       f   o   r   m   a   t
0001400   \r  \r   /   /       c   o   m   m   a   n   d       b   l   o
0001420    c   k       t   y   p   e   s  \r   v   e   r   s   i   o   n
0001440        =       1  \t  \t  \t   /   /     376 001  \0 233       d
0001460    a   t   a       i   s       a       v   e   r   s   i   o   n
0001500        a   n   d       a       B   C   P   L       s   t   r   i
0001520    n   g  \r   s   e   n   d   D   i   s   k   P   a   r   a   m
0001540    s   R       =       2  \t  \t   /   /       d   a   t   a    
0001560    i   s       a       B   C   P   L       s   t   r   i   n   g
0001600   \r   s   e   n   d   D   i   s   k   P   a   r   a   m   s   W
0001620        =       1   6   b  \t  \t   /   /       d   a   t   a    
0001640    i   s       a       B   C   P   L       s   t   r   i   n   g
0001660   \r   h   e   r   e   A   r   e   D   i   s   k   P   a   r   a
0001700    m   s       =       3  \t  \t   /   /       d   a   t   a    
0001720    i   s       a       D   P       (   s   e   m   i   -   p   r
0001740    i   v   a   t   e       f   o   r   m   a   t   )  \r   s   t
0001760    o   r   e   D   i   s   k       =       4  \t  \t  \t   /   /
0002000        d   a   t   a       i   s       a       T   P       (   p
0002020    r   i   v   a   t   e       f   o   r   m   a   t   )  \r   r
0002040    e   t   r   i   e   v   e   D   i   s   k       =       5 376
0002060  001  \0   7 006  \t  \t   /   /       d   a   t   a       i   s
0002100        a       T   P       (   p   r   i   v   a   t   e       f
0002120    o   r   m   a   t   )  \r   h   e   r   e   I   s   D   i   s
0002140    k   P   a   g   e       =       6  \t  \t   /   /       d   a
0002160    t   a       i   s       a       p   a   g   e       (   p   r
0002200    i   v   a   t   e       f   o   r   m   a   t   )  \r   e   n
0002220    d   O   f   T   r   a   n   s   f   e   r       =       7  \t
0002240   \t   /   /       n   o       d   a   t   a  \r   s   e   n   d
0002260    E   r   r   o   r   s       =       1   0   b  \t  \t   /   /
0002300        n   o       d   a   t   a  \r   h   e   r   e   A   r   e
0002320    E   r   r   o   r   s       =       1   1   b  \t  \t   /   /
0002340        d   a   t   a       i   s       E   r   r   o   r   s    
0002360    (   p   r   i   v   a   t   e       f   o   r   m   a   t   )
0002400   \r   n   o       =       1   2   b  \t  \t  \t   /   /       d
0002420    a   t   a       i   s       a       c   o   d   e       a   n
0002440    d       a       B   C   P   L       s   t   r   i   n   g  \r
0002460    y   e   s     376 001  \0 344 343   =       1   3   b  \t  \t
0002500   \t   /   /       d   a   t   a       i   s       a       c   o
0002520    d   e       a   n   d       a       B   C   P   L       s   t
0002540    r   i   n   g  \r   c   o   m   m   e   n   t       =       1
0002560    4   b  \t  \t  \t   /   /       d   a   t   a       i   s    
0002600    a       B   C   P   L       s   t   r   i   n   g  \r   l   o
0002620    g   i   n       =       1   5   b  \t  \t  \t   /   /       d
0002640    a   t   a       i   s       4       B   C   P   L       s   t
0002660    r   i   n   g   s  \r   ]  \r  \r   /   /   -   -   -   -   -
0002700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003000    -   -   -   -   -   -   -  \r   s   t   r   u   c   t   u   r
0003020    e       C   D   C   t   x   :  \t  \t   /   /       C   o   p
0003040    y   D   i   s   k       C   o   n   t   e   x   t  \r   /   /
0003060    -   -   -   -   -   -   -   -   - 376 001  \0  \v   ;   -   -
0003100    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003200    -  \r   [  \r   @   R   S   C   t   x  \r   d   i   s   k   S
0003220    t   r   e   a   m       w   o   r   d  \t  \t  \t   /   /    
0003240    -   >       d   i   s   k       s   t   r   e   a   m  \r   d
0003260    i   s   k   P   a   r   a   m   s       w   o   r   d  \t  \t
0003300   \t   /   /       -   >       c   u   r   r   e   n   t       d
0003320    i   s   k       p   a   r   a   m   s  \r   d   e   l   e   t
0003340    e       w   o   r   d  \t  \t  \t   /   /       =   >       f
0003360    i   l   e       b   e   h   i   n   d       s   t   r   e   a
0003400    m       s   h   o   u   l   d       b   e       d   e   l   e
0003420    t   e   d  \r   e   r   r   o   r   C   o   d   e       w   o
0003440    r   d  \t  \t  \t   /   /       I   F   S       e   r   r   o
0003460    r       c   o   d   e       f   o   r       l   a   s 376 001
0003500   \0   \ 250   t       t   r   a   n   s   f   e   r  \r   ]  \r
0003520   \f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0003540    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0003640   \r   s   t   r   u   c   t   u   r   e       C   B   :  \t  \t
0003660   \t   /   /       C   o   m   m   a   n   d       B   l   o   c
0003700    k  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0003720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0004020   \r   [  \r   l   e   n   g   t   h       w   o   r   d  \t  \t
0004040   \t   /   /       b   l   o   c   k       l   e   n   g   t   h
0004060        i   n       W   O   R   D   S       i   n   c   l   u   d
0004100    i   n   g 376 001  \0   s 233       t   h   i   s       w   o
0004120    r   d  \r   t   y   p   e       w   o   r   d  \r   c   o   d
0004140    e   S   t   r   i   n   g   :  \t  \t  \t   /   /       v   e
0004160    r   s   i   o   n   ,       y   e   s   ,       n   o  \r    
0004200            [  \r               c   o   d   e       w   o   r   d
0004220   \r               s   t   r   i   n   g       w   o   r   d  \r
0004240                ]       =  \r   s   t   r   i   n   g   :  \t  \t
0004260   \t  \t   /   /       l   o   g   i   n   ,       c   o   m   m
0004300    e   n   t   ,       s   e   n   d   D   i   s   k   P   a   r
0004320    a   m   s   (   R   ,   W   )  \r               [  \r        
0004340        s   t   r   i   n   g       w   o   r   d  \r            
0004360    /   /       3       m   o   r   e       s   t   r   i   n   g
0004400    s       i   f       l   o   g   i   n  \r               ]    
0004420    =  \r   d   i   s   k   P   a   r   a   m   s   :  \t  \t  \t
0004440    /   /       h   e   r   e   A   r   e   D   i   s   k   P   a
0004460    r   a   m   s  \r               [  \r               d   i   s
0004500    k   T   y   p   e       w   o 376 001  \0   \ 363   r   d  \t
0004520   \t   /   /       0       i   f       u   n   k   n   o   w   n
0004540   \r               p   a   r   a   m   s       w   o   r   d  \t
0004560   \t  \t   /   /       d   i   s   k       p   a   r   a   m   s
0004600        (   p   r   i   v   a   t   e       f   o   r   m   a   t
0004620    )  \r               ]       =  \r   x   f   e   r   P   a   r
0004640    a   m   s   :  \t  \t  \t   /   /       s   t   o   r   e   D
0004660    i   s   k   ,       r   e   t   r   i   e   v   e   D   i   s
0004700    k  \r               [  \r               p   a   r   a   m   s
0004720        w   o   r   d  \t  \t  \t   /   /       t   r   a   n   s
0004740    f   e   r       p   a   r   a   m   s       (   p   r   i   v
0004760    a   t   e       f   o   r   m   a   t   )  \r               ]
0005000        =  \r   e   r   r   o   r   s   :  \t  \t  \t  \t   /   /
0005020        h   e   r   e   A   r   e   E   r   r   o   r   s  \r    
0005040            [  \r               d   i   s   k   T   y   p   e    
0005060    w   o   r   d  \t  \t   /   /       0       i   f       u   n
0005100    k   n   o   w   n  \r               e   r   r   o 376 001  \0
0005120  002 276   r   s       w   o   r   d  \t  \t  \t   /   /       e
0005140    r   r   o   r       b   l   o   c   k       (   p   r   i   v
0005160    a   t   e       f   o   r   m   a   t   )  \r               ]
0005200   \r   ]  \r  \r   m   a   n   i   f   e   s   t  \r   [  \r   /
0005220    /       b   l   o   c   k       l   e   n   g   t   h   s  \r
0005240    l   e   n   C   o   d   e   S   t   r   i   n   g       =    
0005260    o   f   f   s   e   t       C   B   .   c   o   d   e   S   t
0005300    r   i   n   g   .   s   t   r   i   n   g   /   1   6        
0005320    /   /       +       l   e   n   g   t   h       o   f       s
0005340    t   r   i   n   g  \r   l   e   n   D   i   s   k   P   a   r
0005360    a   m   s       =       o   f   f   s   e   t       C   B   .
0005400    d   i   s   k   P   a   r   a   m   s   .   p   a   r   a   m
0005420    s   /   1   6           /   /       +       l   e   n   g   t
0005440    h       o   f       p   a   r   a   m   s  \r   l   e   n   X
0005460    f   e   r   P   a   r   a   m   s       =       o   f   f   s
0005500    e   t       C   B   .   x   f   e   r   P   a   r   a   m   s
0005520    .   p 376  \0 236 220  \v   a   r   a   m   s   /   1   6    
0005540        /   /       +       l   e   n   g   t   h       o   f    
0005560    p   a   r   a   m   s  \r   l   e   n   E   r   r   o   r   s
0005600        =       o   f   f   s   e   t       C   B   .   e   r   r
0005620    o   r   s   .   e   r   r   o   r   s   /   1   6           /
0005640    /       +       l   e   n   g   t   h       o   f       e   r
0005660    r   o   r   s  \r   l   e   n   S   t   r   i   n   g       =
0005700        o   f   f   s   e   t       C   B   .   s   t   r   i   n
0005720    g   .   s   t   r   i   n   g   /   1   6           /   /    
0005740    +       l   e   n   g   t   h       o   f       s   t   r   i
0005760    n   g  \r   ]  \r 377  \0  \0   I   f   s   C   o   p   y   D
0006000    i   s   k   I   n   i   t   .   b   c   p   l  \0 373 230 035
0006020  267   b  \0  \0 376 001  \0   * 360   /   /       I   f   s   C
0006040    o   p   y   D   i   s   k   I   n   i   t   .   b   c   p   l
0006060   \r   /   /       C   o   p   y   r   i   g   h   t       X   e
0006100    r   o   x       C   o   r   p   o   r   a   t   i   o   n    
0006120    1   9   8   0   ,       1   9   8   1  \r   /   /       L   a
0006140    s   t       m   o   d   i   f   i   e   d       N   o   v   e
0006160    m   b   e   r       1   4   ,       1   9   8   1           4
0006200    :   1   6       P   M       b   y       T   a   f   t  \r  \r
0006220    g   e   t       "   I   f   s   R   s   .   d   e   c   l   "
0006240   \r   g   e   t       "   I   f   s   C   o   p   y   D   i   s
0006260    k   .   d   e   c   l   "  \r  \r   e   x   t   e   r   n   a
0006300    l  \r   [  \r   /   /       o   u   t   g   o   i   n   g    
0006320    p   r   o   c   e   d   u   r   e   s  \r   E   n   a   b   l
0006340    e   C   o   p   y   D   i   s   k  \r  \r   /   /       i   n
0006360    c   o   m   i   n   g       p   r   o   c   e   d   u   r   e
0006400    s  \r   C   o   p   y   D   i   s   k   J   o   b  \r   O   p
0006420    e   n   L   e   v   e   l   1   S 376 001  \0   X   |   o   c
0006440    k   e   t   ;       C   l   o   s   e   L   e   v   e   l   1
0006460    S   o   c   k   e   t  \r   S   y   s   A   l   l   o   c   a
0006500    t   e   ;       S   y   s   A   l   l   o   c   a   t   e   Z
0006520    e   r   o   ;       F   r   e   e   P   o   i   n   t   e   r
0006540    ;       E   n   q   u   e   u   e   ;       U   n   q   u   e
0006560    u   e  \r  \r   /   /       o   u   t   g   o   i   n   g    
0006600    s   t   a   t   i   c   s  \r   c   d   r   s  \r  \r   /   /
0006620        i   n   c   o   m   i   n   g       s   t   a   t   i   c
0006640    s  \r   r   s   Q   ;       l   P   u   p   S   o   c  \r   ]
0006660   \r  \r   s   t   a   t   i   c       [       c   d   r   s    
0006700    =       0       ]  \t   /   /       z   e   r   o       i   f
0006720        n   o   t       e   n   a   b   l   e   d  \r  \r   /   /
0006740    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0007020    -   -   -   -   -   -   -   -   -   -   -   -   -   - 376 001
0007040   \0   r 240   -   -   -   -   -   -   -   -   -   -   -   -   -
0007060    -  \r   l   e   t       E   n   a   b   l   e   C   o   p   y
0007100    D   i   s   k   (   e   n   a   b   l   e   )       b   e  \r
0007120    /   /   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0007140    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0007220    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   [
0007240   \r   i   f       e   n   a   b   l   e       n   e       0    
0007260    &       c   d   r   s       e   q       0       t   h   e   n
0007300   \r               [  \r               c   d   r   s       =    
0007320    S   y   s   A   l   l   o   c   a   t   e   Z   e   r   o   (
0007340    l   e   n   R   S   )  \r               c   d   r   s   >   >
0007360    R   S   .   p   r   o   c       =       C   o   p   y   D   i
0007400    s   k   J   o   b  \r               c   d   r   s   >   >   R
0007420    S   .   s   o   c       =       S   y   s   A   l   l   o   c
0007440    a   t   e 376 001  \0   o 214   (   l   P   u   p   S   o   c
0007460    )  \r               O   p   e   n   L   e   v   e   l   1   S
0007500    o   c   k   e   t   (   c   d   r   s   >   >   R   S   .   s
0007520    o   c   ,       t   a   b   l   e       [       0   ;       0
0007540    ;       s   o   c   k   e   t   C   o   p   y   D   i   s   k
0007560        ]   )  \r               c   d   r   s   >   >   R   S   .
0007600    t   y   p   e       =       j   o   b   T   y   p   e   C   o
0007620    p   y   D   i   s   k  \r               c   d   r   s   >   >
0007640    R   S   .   e   x   t   r   a   S   p   a   c   e       =    
0007660    s   i   z   e       C   D   C   t   x   /   1   6       -   3
0007700   \r               E   n   q   u   e   u   e   (   r   s   Q   ,
0007720        c   d   r   s   )  \r               ]  \r  \r   i   f    
0007740    e   n   a   b   l   e       e   q       0       &       c   d
0007760    r   s       n   e       0       t   h   e   n  \r            
0010000    [  \r               C   l   o   s   e   L   e   v   e   l   1
0010020    S   o   c   k   e   t   (   c   d   r   s   >   >   R   S   .
0010040    s   o   c   )  \r             376  \0   C   v 317   U   n   q
0010060    u   e   u   e   (   r   s   Q   ,       c   d   r   s   )  \r
0010100                F   r   e   e   P   o   i   n   t   e   r   (   l
0010120    v       c   d   r   s   >   >   R   S   .   s   o   c   ,    
0010140    l   v       c   d   r   s   )  \r               ]  \r   ]  \r
0010160  377  \0  \0   I   f   s   C   o   p   y   D   i   s   k   J   o
0010200    b   .   b   c   p   l  \0 373 230   A   n   E  \0  \0 376 001
0010220   \0 344   >   /   /       I   f   s   C   o   p   y   D   i   s
0010240    k   J   o   b   .   b   c   p   l  \r   /   /       C   o   p
0010260    y   r   i   g   h   t       X   e   r   o   x       C   o   r
0010300    p   o   r   a   t   i   o   n       1   9   8   0   ,       1
0010320    9   8   1  \r   /   /       L   a   s   t       m   o   d   i
0010340    f   i   e   d       D   e   c   e   m   b   e   r       1   1
0010360    ,       1   9   8   1           6   :   2   6       P   M    
0010400    b   y       T   a   f   t  \r  \r   g   e   t       K   D   H
0010420    ,       f   r   e   e   P   a   g   e   s   ,       F   A   ,
0010440        p   a   g   e   N   u   m   b   e   r   ,       l   F   A
0010460        f   r   o   m       "   A   l   t   o   F   i   l   e   S
0010500    y   s   .   d   "  \r   g   e   t       D   S   K   ,       d
0010520    i   s   k   K   d       f   r   o   m       "   D   i   s   k
0010540    s   .   d   "  \r   g   e   t       e   c   F   i   l   e   S
0010560    y   s   t   e   m   F   u   l   l   ,       e   c   D   i   s
0010600    k   E   r   r   o   r       f   r   o   m       "   I   f   s
0010620    D   i   r 376 001  \0 270 350   s   .   d   e   c   l   "  \r
0010640    g   e   t       "   I   f   s   .   d   e   c   l   "  \r   g
0010660    e   t       "   I   f   s   S   y   s   t   e   m   I   n   f
0010700    o   .   d   e   c   l   "  \r   g   e   t       "   S   t   r
0010720    e   a   m   s   .   d   "  \r   g   e   t       "   I   f   s
0010740    R   S   .   d   e   c   l   "  \r   g   e   t       "   I   f
0010760    s   C   o   p   y   D   i   s   k   .   d   e   c   l   "  \r
0011000   \r   e   x   t   e   r   n   a   l  \r   [  \r   /   /       o
0011020    u   t   g   o   i   n   g       p   r   o   c   e   d   u   r
0011040    e   s  \r   C   o   p   y   D   i   s   k   J   o   b  \r   P
0011060    u   t   S   t   r   i   n   g   ;       P   u   t   I   f   s
0011100    E   c   ;       P   u   t   B   l   o   c   k  \r  \r   /   /
0011120        i   n   c   o   m   i   n   g       p   r   o   c   e   d
0011140    u   r   e   s  \r   C   D   V   e   r   s   i   o   n   ;    
0011160    C   D   L   o   g   i   n   ;       C   D   S   e   n   d   E
0011200    r   r   o   r   s   ;       C   D   C   l   o   s   e   F   i
0011220    l   e  \r   C   D   S   e   n 376 001  \0 356   C   d   D   i
0011240    s   k   P   a   r   a   m   s   ;       C   D   H   e   r   e
0011260    A   r   e   D   i   s   k   P   a   r   a   m   s  \r  \r   C
0011300    r   e   a   t   e   U   s   e   r   I   n   f   o   ;       D
0011320    e   s   t   r   o   y   U   s   e   r   I   n   f   o   ;    
0011340    D   e   s   t   r   o   y   J   o   b  \r   B   S   P   R   e
0011360    a   d   B   l   o   c   k   ;       B   S   P   W   r   i   t
0011400    e   B   l   o   c   k   ;       B   S   P   F   o   r   c   e
0011420    O   u   t   p   u   t  \r   L   n   P   a   g   e   S   i   z
0011440    e   ;       K   s   B   u   f   f   e   r   A   d   d   r   e
0011460    s   s   ;       C   u   r   r   e   n   t   P   o   s   ;    
0011500    T   r   u   n   c   a   t   e   D   i   s   k   S   t   r   e
0011520    a   m  \r   C   l   e   a   n   u   p   D   i   s   k   S   t
0011540    r   e   a   m   ;       S   e   t   D   i   r   t   y   ;    
0011560    P   o   s   i   t   i   o   n   P   t   r   ;       W   r   i
0011600    t   e   B   l   o   c   k  \r   K   s   G   e   t   D   i   s
0011620    k   ;       G   e   t   C   u   r   r   e   n   t 376 001  \0
0011640    K 264   F   a   ;       J   u   m   p   T   o   F   a   ;    
0011660    P   o   s   i   t   i   o   n   P   a   g   e  \r   C   r   e
0011700    a   t   e   S   t   r   i   n   g   S   t   r   e   a   m   ;
0011720        P   u   t   T   e   m   p   l   a   t   e   ;       L   o
0011740    o   k   u   p   E   r   r   o   r   C   o   d   e  \r   M   o
0011760    v   e   B   l   o   c   k   ;       M   i   n   ;       R   e
0012000    t   u   r   n   F   r   o   m   ;       S   y   s   E   r   r
0012020    ;       G   o   t   o   F   r   a   m   e   ;       M   y   F
0012040    r   a   m   e   ;       N   o   o   p  \r   G   e   t   s   ;
0012060        P   u   t   s   ;       C   l   o   s   e   s   ;       R
0012100    e   s   e   t   s   ;       E   n   d   o   f   s   ;       S
0012120    y   s   A   l   l   o   c   a   t   e   ;       S   y   s   F
0012140    r   e   e  \r  \r   /   /       i   n   c   o   m   i   n   g
0012160        s   t   a   t   i   c   s  \r   o   f   f   s   e   t   B
0012200    S   P   S   t   r   ;       C   t   x   R   u   n   n   i   n
0012220    g  \r   ]  \r  \r   m   a   n   i   f   e   s   t  \r   [  \r
0012240    e   c 376 001  \0   t   p   U   n   R   e   c   o   v   D   i
0012260    s   k   E   r   r   o   r       =       2   4   1   2        
0012300    /   /       f   o   r       T   r   i   d   e   n   t       d
0012320    i   s   k   s       o   n   l   y  \r   e   c   D   i   s   k
0012340    F   u   l   l       =       2   4   1   3           /   /    
0012360    f   o   r       T   r   i   d   e   n   t       d   i   s   k
0012400    s       o   n   l   y  \r   c   u   r   s   o   r   B   i   t
0012420    M   a   p       =       4   3   1   b  \r   p   a   g   e   s
0012440    P   e   r   B   a   t   c   h       =       1   9   *   9    
0012460        /   /       p   r   e   a   l   l   o   c   a   t   e    
0012500    1       c   y   l   i   n   d   e   r   '   s       w   o   r
0012520    t   h       o   f       p   a   g   e   s       a   t       a
0012540        t   i   m   e  \r   ]  \r  \r   /   /   -   -   -   -   -
0012560    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0012640    -   -   -   -   -   -   - 376 001  \0   - 021   -   -   -   -
0012660    -   -   -   -   -   -   -   -   -   -   -   -  \r   l   e   t
0012700        C   o   p   y   D   i   s   k   J   o   b   (   c   t   x
0012720    )       b   e  \t  \t   /   /       a   n       I   F   S    
0012740    j   o   b  \r   /   /   -   -   -   -   -   -   -   -   -   -
0012760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0013060    -   -  \r   [  \r   l   e   t       b   s   p   S   t   r   e
0013100    a   m       =       c   t   x   >   >   R   S   C   t   x   .
0013120    b   s   p   S   o   c       +       o   f   f   s   e   t   B
0013140    S   P   S   t   r  \r   c   t   x   >   >   R   S   C   t   x
0013160    .   u   s   e   r   I   n   f   o       =       C   r   e   a
0013200    t   e   U   s   e   r   I   n   f   o   (   )  \r  \r   C   o
0013220    p   y   D   i   s   k   S   e   r   v   e   r   (   b   s   p
0013240    S   t   r   e   a   m   )           /   /   t 376 001  \0   s
0013260    I   h   e       w   o   r   k       h   a   p   p   e   n   s
0013300        i   n       h   e   r   e  \r  \r   i   f       c   t   x
0013320    >   >   R   S   C   t   x   .   c   o   n   n   F   l   a   g
0013340        n   e       0       t   h   e   n       C   l   o   s   e
0013360    s   (   b   s   p   S   t   r   e   a   m   )  \r   C   D   C
0013400    l   o   s   e   F   i   l   e   (   )  \r   D   e   s   t   r
0013420    o   y   U   s   e   r   I   n   f   o   (   c   t   x   >   >
0013440    R   S   C   t   x   .   u   s   e   r   I   n   f   o   )  \r
0013460    D   e   s   t   r   o   y   J   o   b   (   )           /   /
0013500    s   u   i   c   i   d   e  \r   ]  \r  \f  \r   /   /   -   -
0013520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0013620    -   -   -   -   -   -   -   -   -   -  \r   a   n   d       C
0013640    o   p   y   D   i   s   k   S   e   r   v   e   r   (   b   s
0013660    p 376 001  \0   ! 025   S   t   r   e   a   m   )       b   e
0013700   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0013720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0014000    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0014020    [  \r   l   e   t       l   e   n   g   t   h       =       G
0014040    e   t   s   (   b   s   p   S   t   r   e   a   m   ,       1
0014060    8   0   0   0   )       l   s   h   i   f   t       8        
0014100    /   /       3       m   i   n   u   t   e       t   o   p    
0014120    l   e   v   e   l       t   i   m   e   o   u   t  \r   l   e
0014140    n   g   t   h       =       G   e   t   s   (   b   s   p   S
0014160    t   r   e   a   m   )       +       l   e   n   g   t   h  \r
0014200    i   f       l   e   n   g   t   h       u   g   r       1   5
0014220    0       r   e   t   u   r   n           /   /       d   o   n
0014240    '   t       b   e       t   o   o       g   u   l   l   i   b
0014260    l   e  \r   l   e   t 376 001  \0 364 321       c   b       =
0014300        S   y   s   A   l   l   o   c   a   t   e   (   l   e   n
0014320    g   t   h   )  \r   c   b   >   >   C   B   .   l   e   n   g
0014340    t   h       =       l   e   n   g   t   h  \r   i   f       B
0014360    S   P   R   e   a   d   B   l   o   c   k   (   b   s   p   S
0014400    t   r   e   a   m   ,       l   v       c   b   >   >   C   B
0014420    .   t   y   p   e   ,       0   ,  \r       (   l   e   n   g
0014440    t   h   -   1   )       l   s   h   i   f   t       1   )    
0014460    n   e       (   l   e   n   g   t   h   -   1   )       l   s
0014500    h   i   f   t       1       t   h   e   n           /   /    
0014520    s   t   r   e   a   m       f   a   i   l   e   d  \r        
0014540        [       S   y   s   F   r   e   e   (   c   b   )   ;    
0014560    r   e   t   u   r   n       ]  \r  \r   s   w   i   t   c   h
0014600    o   n       c   b   >   >   C   B   .   t   y   p   e       i
0014620    n   t   o  \r               [  \r               c   a   s   e
0014640        v   e   r   s   i   o   n   :  \r                        
0014660    [       C   D   V   e   r   s   i   o   n 376 001  \0 316 275
0014700    (   c   b   )   ;       e   n   d   c   a   s   e       ]  \r
0014720                c   a   s   e       l   o   g   i   n   :  \r    
0014740                        [       C   D   L   o   g   i   n   (   c
0014760    b   )   ;       e   n   d   c   a   s   e       ]  \r        
0015000        c   a   s   e       s   e   n   d   D   i   s   k   P   a
0015020    r   a   m   s   R   :       c   a   s   e       s   e   n   d
0015040    D   i   s   k   P   a   r   a   m   s   W   :  \r            
0015060                [       C   D   S   e   n   d   D   i   s   k   P
0015100    a   r   a   m   s   (   c   b   )   ;       e   n   d   c   a
0015120    s   e       ]  \r               c   a   s   e       h   e   r
0015140    e   A   r   e   D   i   s   k   P   a   r   a   m   s   :  \r
0015160                            [       C   D   H   e   r   e   A   r
0015200    e   D   i   s   k   P   a   r   a   m   s   (   c   b   )   ;
0015220        e   n   d   c   a   s   e       ]  \r               c   a
0015240    s   e       s   t   o   r   e   D   i   s   k   :  \r        
0015260                    [       C   D   S   t   o   r   e   D   i   s
0015300  376 001  \0   r 210   k   (   c   b   )   ;       e   n   d   c
0015320    a   s   e       ]  \r               c   a   s   e       r   e
0015340    t   r   i   e   v   e   D   i   s   k   :  \r                
0015360            [       C   D   R   e   t   r   i   e   v   e   D   i
0015400    s   k   (   c   b   )   ;       e   n   d   c   a   s   e    
0015420    ]  \r               c   a   s   e       s   e   n   d   E   r
0015440    r   o   r   s   :  \r                           [       C   D
0015460    S   e   n   d   E   r   r   o   r   s   (   c   b   )   ;    
0015500    e   n   d   c   a   s   e       ]  \r               c   a   s
0015520    e       c   o   m   m   e   n   t   :  \r                    
0015540        e   n   d   c   a   s   e  \r               d   e   f   a
0015560    u   l   t   :  \r                           [       P   u   t
0015600    I   f   s   E   c   (   n   o   ,       e   c   U   n   k   n
0015620    o   w   n   C   m   d   )   ;       e   n   d   c   a   s   e
0015640        ]  \r               ]  \r   S   y   s   F   r   e   e   (
0015660    c   b   )  \r   ]       r   e   p   e   a   t  \r  \r   /   /
0015700    -   -   -   -   - 376 001  \0 336 026   -   -   -   -   -   -
0015720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0016020    -  \r   a   n   d       C   D   S   t   o   r   e   D   i   s
0016040    k   (   c   b   )       b   e  \r   /   /   -   -   -   -   -
0016060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0016160    -   -   -   -   -   -   -  \r   /   /       C   o   p   i   e
0016200    s       d   a   t   a       f   r   o   m       b   s   p   S
0016220    t   r   e   a   m       t   o       d   i   s   k   S   t   r
0016240    e   a   m   .  \r   [  \r   t   e   s   t       C   t   x   R
0016260    u   n   n   i   n   g   >   >   C   D   C   t   x   .   d   i
0016300    s   k   S   t   r   e   a   m       e 376 001  \0 340   :   q
0016320        0  \r               i   f   s   o       [       P   u   t
0016340    I   f   s   E   c   (   n   o   ,       e   c   N   o   D   i
0016360    s   k   )   ;       r   e   t   u   r   n       ]  \r        
0016400        i   f   n   o   t       t   e   s   t       C   t   x   R
0016420    u   n   n   i   n   g   >   >   C   D   C   t   x   .   d   i
0016440    s   k   P   a   r   a   m   s       e   q       0  \r        
0016460                    i   f   s   o       [       P   u   t   I   f
0016500    s   E   c   (   n   o   ,       e   c   N   o   D   i   s   k
0016520    P   a   r   a   m   s   )   ;       r   e   t   u   r   n    
0016540    ]  \r                           i   f   n   o   t       P   u
0016560    t   I   f   s   E   c   (   y   e   s   ,       e   c   R   e
0016600    a   d   y   F   o   r   D   i   s   k   )  \r  \r   l   e   t
0016620        b   s   p   S   t   r   e   a   m       =       C   t   x
0016640    R   u   n   n   i   n   g   >   >   R   S   C   t   x   .   b
0016660    s   p   S   o   c   +   o   f   f   s   e   t   B   S   P   S
0016700    t   r  \r   l   e   t       d   i   s   k   S   t   r   e 376
0016720  001  \0 273   /   a   m       =       C   t   x   R   u   n   n
0016740    i   n   g   >   >   C   D   C   t   x   .   d   i   s   k   S
0016760    t   r   e   a   m  \r   l   e   t       c   h   a   r   s   P
0017000    e   r   P   a   g   e       =       2       l   s   h   i   f
0017020    t       L   n   P   a   g   e   S   i   z   e   (   d   i   s
0017040    k   S   t   r   e   a   m   )  \r   l   e   t       k   s   B
0017060    u   f   f   e   r       =       K   s   B   u   f   f   e   r
0017100    A   d   d   r   e   s   s   (   d   i   s   k   S   t   r   e
0017120    a   m   )  \r  \r   l   e   t       s   a   v   e   d   E   r
0017140    r   o   r   P   r   o   c       =       d   i   s   k   S   t
0017160    r   e   a   m   >   >   S   T   .   e   r   r   o   r  \r   d
0017200    i   s   k   S   t   r   e   a   m   >   >   S   T   .   e   r
0017220    r   o   r       =       C   D   S   t   o   r   e   D   i   s
0017240    k   E   r   r   o   r  \r   d   i   s   k   S   t   r   e   a
0017260    m   >   >   S   T   .   p   a   r   2       =       M   y   F
0017300    r   a   m   e   (   )  \r  \r   R   e   s   e   t   s   (   d
0017320    i   s   k   S 376 001  \0 260   !   t   r   e   a   m   )  \r
0017340    l   e   t       d   p       =       C   t   x   R   u   n   n
0017360    i   n   g   >   >   C   D   C   t   x   .   d   i   s   k   P
0017400    a   r   a   m   s  \r   W   r   i   t   e   B   l   o   c   k
0017420    (   d   i   s   k   S   t   r   e   a   m   ,       d   p   ,
0017440        d   p   >   >   C   B   .   l   e   n   g   t   h   )  \r
0017460   \r   l   e   t       c   b   T   y   p   e       =       n   i
0017500    l  \r   l   e   t       p   a   g   e   s   P   r   e   a   l
0017520    l   o   c   a   t   e   d       =       0  \r   C   t   x   R
0017540    u   n   n   i   n   g   >   >   C   D   C   t   x   .   d   e
0017560    l   e   t   e       =       f   a   l   s   e  \r  \f  \r   /
0017600    /       C   D   S   t   o   r   e   D   i   s   k       (   c
0017620    o   n   t   '   d   )  \r  \r               [       /   /    
0017640    r   e   p   e   a   t       -   -       t   r   a   n   s   f
0017660    e   r       b   l   o   c   k   s       t   o       a   n   d
0017700        i   n   c   l   u   d   i   n   g       e   n   d   O   f
0017720    T   r   a   n   s   f   e   r     376 001  \0 374 361   b   l
0017740    o   c   k  \r               l   e   t       c   b   L   e   n
0017760    g   t   h       =       G   e   t   s   (   b   s   p   S   t
0020000    r   e   a   m   )       l   s   h   i   f   t       8  \r    
0020020            c   b   L   e   n   g   t   h       =       G   e   t
0020040    s   (   b   s   p   S   t   r   e   a   m   )       +       c
0020060    b   L   e   n   g   t   h  \r               i   f       (   c
0020100    b   L   e   n   g   t   h   -   2   )       u   g   r       1
0020120    5   0   0       t   h   e   n  \r                           [
0020140        C   t   x   R   u   n   n   i   n   g   >   >   C   D   C
0020160    t   x   .   d   e   l   e   t   e       =       t   r   u   e
0020200    ;       b   r   e   a   k       ]               /   /       b
0020220    a   d       b   l   o   c   k       s   i   z   e  \r        
0020240        c   b   T   y   p   e       =       G   e   t   s   (   b
0020260    s   p   S   t   r   e   a   m   )       l   s   h   i   f   t
0020300        8  \r               c   b   T   y   p   e       =       G
0020320    e   t   s   (   b   s   p   S   t   r   e   a   m   ) 376 001
0020340   \0   ^ 257       +       c   b   T   y   p   e  \r            
0020360    P   u   t   s   (   d   i   s   k   S   t   r   e   a   m   ,
0020400        c   b   L   e   n   g   t   h   )           /   /       w
0020420    o   r   d   I   t   e   m       s   t   r   e   a   m  \r    
0020440            P   u   t   s   (   d   i   s   k   S   t   r   e   a
0020460    m   ,       c   b   T   y   p   e   )  \r  \r               l
0020500    e   t       c   b   B   y   t   e   s       =       (   c   b
0020520    L   e   n   g   t   h   -   2   )       l   s   h   i   f   t
0020540        1           /   /       r   e   m   a   i   n   i   n   g
0020560        b   y   t   e   s       i   n       b   l   o   c   k  \r
0020600                w   h   i   l   e       c   b   B   y   t   e   s
0020620        n   e       0       d   o  \r                           [
0020640   \r                           l   e   t       p   o   s       =
0020660        C   u   r   r   e   n   t   P   o   s   (   d   i   s   k
0020700    S   t   r   e   a   m   )  \r                           l   e
0020720    t       n   e   t   B   y   t   e   s       =       M   i   n
0020740    (   c   b 376 001  \0 324 276   B   y   t   e   s   ,       c
0020760    h   a   r   s   P   e   r   P   a   g   e   -   p   o   s   )
0021000   \r                           i   f       B   S   P   R   e   a
0021020    d   B   l   o   c   k   (   b   s   p   S   t   r   e   a   m
0021040    ,       k   s   B   u   f   f   e   r   ,       p   o   s   ,
0021060        n   e   t   B   y   t   e   s   )       n   e       n   e
0021100    t   B   y   t   e   s       t   h   e   n  \r                
0021120                        [       C   t   x   R   u   n   n   i   n
0021140    g   >   >   C   D   C   t   x   .   d   e   l   e   t   e    
0021160    =       t   r   u   e   ;       b   r   e   a   k       ]    
0021200        /   /       s   t   r   e   a   m       d   i   e   d  \r
0021220                            i   f       n   e   t   B   y   t   e
0021240    s       n   e       0       t   h   e   n       S   e   t   D
0021260    i   r   t   y   (   d   i   s   k   S   t   r   e   a   m   ,
0021300        t   r   u   e   )  \r                           P   o   s
0021320    i   t   i   o   n   P   t   r   (   d   i   s   k   S   t   r
0021340    e   a   m   ,       p   o   s 376 001  \0 227   ,   +   n   e
0021360    t   B   y   t   e   s   )  \r                           c   b
0021400    B   y   t   e   s       =       c   b   B   y   t   e   s   -
0021420    n   e   t   B   y   t   e   s  \r  \r                        
0021440    i   f       p   o   s   +   n   e   t   B   y   t   e   s    
0021460    e   q       c   h   a   r   s   P   e   r   P   a   g   e    
0021500    t   h   e   n  \r                                       [  \r
0021520                                        t   e   s   t       C   t
0021540    x   R   u   n   n   i   n   g   >   >   C   D   C   t   x   .
0021560    d   e   l   e   t   e  \r                                    
0021600                i   f   s   o       P   o   s   i   t   i   o   n
0021620    P   t   r   (   d   i   s   k   S   t   r   e   a   m   ,    
0021640    0   )  \r                                                   i
0021660    f   n   o   t       C   l   e   a   n   u   p   D   i   s   k
0021700    S   t   r   e   a   m   (   d   i   s   k   S   t   r   e   a
0021720    m   )           /   /       w   r   i   t   e       o   u   t
0021740        s   t   r   e   a   m       b   u   f   f   e 376 001  \0
0021760    D   q   r  \r                                       f   o   r
0022000        i       =       0       t   o       1   5       d   o    
0022020    c   u   r   s   o   r   B   i   t   M   a   p   !   i       =
0022040        n   o   t       c   u   r   s   o   r   B   i   t   M   a
0022060    p   !   i  \r                                       p   a   g
0022100    e   s   P   r   e   a   l   l   o   c   a   t   e   d       =
0022120        p   a   g   e   s   P   r   e   a   l   l   o   c   a   t
0022140    e   d   -   1  \r                                       i   f
0022160        p   a   g   e   s   P   r   e   a   l   l   o   c   a   t
0022200    e   d       l   e       0       &       n   o   t       C   t
0022220    x   R   u   n   n   i   n   g   >   >   C   D   C   t   x   .
0022240    d   e   l   e   t   e       t   h   e   n  \r                
0022260                                    [  \r                        
0022300                            /   /       P   r   e   a   l   l   o
0022320    c   a   t   e       a       n   e   w       b   a   t   c   h
0022340        o   f       p   a   g   e   s   ,       s   o       l   o
0022360    n   g 376 001  \0 354   t       a   s       t   h   a   t    
0022400    d   o   e   s   n   '   t       r   u   n  \r                
0022420                                    /   /       t   h   e       f
0022440    i   l   e       s   y   s   t   e   m       t   o   o       c
0022460    l   o   s   e       t   o       e   x   h   a   u   s   t   i
0022500    o   n   .  \r                                                
0022520    p   a   g   e   s   P   r   e   a   l   l   o   c   a   t   e
0022540    d       =       p   a   g   e   s   P   e   r   B   a   t   c
0022560    h  \r                                                   i   f
0022600        E   n   d   o   f   s   (   d   i   s   k   S   t   r   e
0022620    a   m   )       &  \r                                        
0022640                K   s   G   e   t   D   i   s   k   (   d   i   s
0022660    k   S   t   r   e   a   m   )   >   >   D   S   K   .   d   i
0022700    s   k   K   d   >   >   K   D   H   .   f   r   e   e   P   a
0022720    g   e   s       u   g   r  \r                                
0022740                        p   a   g   e   s   P   e   r   B   a   t
0022760    c   h   +   2   5   0     376 001  \0 266 022   t   h   e   n
0023000   \r                                                            
0023020    [  \r                                                        
0023040        l   e   t       c   u   r   r   e   n   t   F   A       =
0023060        v   e   c       l   F   A   ;       G   e   t   C   u   r
0023100    r   e   n   t   F   a   (   d   i   s   k   S   t   r   e   a
0023120    m   ,       c   u   r   r   e   n   t   F   A   )  \r        
0023140                                                        P   o   s
0023160    i   t   i   o   n   P   a   g   e   (   d   i   s   k   S   t
0023200    r   e   a   m   ,       c   u   r   r   e   n   t   F   A   >
0023220    >   F   A   .   p   a   g   e   N   u   m   b   e   r       +
0023240        p   a   g   e   s   P   e   r   B   a   t   c   h   )  \r
0023260                                                                J
0023300    u   m   p   T   o   F   a   (   d   i   s   k   S   t   r   e
0023320    a   m   ,       c   u   r   r   e   n   t   F   A   )  \r    
0023340                                                            ]  \r
0023360                                                  376 001  \0 223
0023400  375   ]  \r                                       ]  \r        
0023420                    ]  \r  \r               i   f       c   b   T
0023440    y   p   e       e   q       e   n   d   O   f   T   r   a   n
0023460    s   f   e   r       b   r   e   a   k  \r               ]    
0023500    r   e   p   e   a   t  \r  \r   d   i   s   k   S   t   r   e
0023520    a   m   >   >   S   T   .   e   r   r   o   r       =       s
0023540    a   v   e   d   E   r   r   o   r   P   r   o   c  \r   t   e
0023560    s   t       C   t   x   R   u   n   n   i   n   g   >   >   C
0023600    D   C   t   x   .   d   e   l   e   t   e  \r               i
0023620    f   s   o       [       S   e   t   D   i   r   t   y   (   d
0023640    i   s   k   S   t   r   e   a   m   ,       f   a   l   s   e
0023660    )   ;       C   D   C   l   o   s   e   F   i   l   e   (   )
0023700        ]  \r               i   f   n   o   t       T   r   u   n
0023720    c   a   t   e   D   i   s   k   S   t   r   e   a   m   (   d
0023740    i   s   k   S   t   r   e   a   m   )  \r   ]  \r  \r   /   /
0023760    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0024000    - 376 001  \0   d 205   -   -   -   -   -   -   -   -   -   -
0024020    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0024100   \r   a   n   d       C   D   S   t   o   r   e   D   i   s   k
0024120    E   r   r   o   r   (   s   ,       e   c   ,       p   a   r
0024140    )       b   e  \r   /   /   -   -   -   -   -   -   -   -   -
0024160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0024260    -   -  \r   /   /       I   f       l   o   c   a   l       d
0024300    i   s   k       b   e   c   o   m   e   s       f   u   l   l
0024320        t   h   e   n       s   e   t       d   i   s   c   a   r
0024340    d       f   l   a   g       i   n       S   T   .   p   a   r
0024360    3   ,       w   h   i   c   h       w   i   l   l  \r   /   /
0024400        c   a   u   s   e 376 001  \0 224 373       t   h   e    
0024420    r   e   m   a   i   n   d   e   r       o   f       t   h   e
0024440        i   n   c   o   m   i   n   g       d   i   s   k       i
0024460    m   a   g   e       t   o       b   e       t   h   r   o   w
0024500    n       a   w   a   y   .  \r   [  \r   i   f       e   c    
0024520    e   q       e   c   D   i   s   k   F   u   l   l       t   h
0024540    e   n  \r               [  \r               S   e   t   D   i
0024560    r   t   y   (   s   ,       f   a   l   s   e   )  \r        
0024600        s   >   >   S   T   .   p   u   t   s       =       N   o
0024620    o   p  \r               C   t   x   R   u   n   n   i   n   g
0024640    >   >   C   D   C   t   x   .   d   e   l   e   t   e       =
0024660        t   r   u   e  \r               C   t   x   R   u   n   n
0024700    i   n   g   >   >   C   D   C   t   x   .   e   r   r   o   r
0024720    C   o   d   e       =       e   c   F   i   l   e   S   y   s
0024740    t   e   m   F   u   l   l  \r               G   o   t   o   F
0024760    r   a   m   e   (   s   >   >   S   T   .   p   a   r   2   )
0025000   \r               ]  \r   S   y   s   E   r 376 001  \0   ( 016
0025020    r   (   s   ,       e   c   ,       p   a   r   )  \r   ]  \r
0025040   \f  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0025060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0025160   \r   a   n   d       C   D   R   e   t   r   i   e   v   e   D
0025200    i   s   k   (   c   b   )       b   e  \r   /   /   -   -   -
0025220    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0025320    -   -   -   -   -   -   -   -   -  \r   /   /       C   o   p
0025340    i   e   s       d   a   t   a       f   r   o   m       d   i
0025360    s   k   S   t   r   e   a   m       t   o       b   s   p   S
0025400    t   r   e   a   m   .  \r   /   /       S   t   o   p   s    
0025420  376 001  \0 274   r   i   f       t   h   e       s   t   r   e
0025440    a   m       g   o   e   s       b   a   d       o   r       e
0025460    n   d       o   f       f   i   l   e   .  \r   [  \r   t   e
0025500    s   t       C   t   x   R   u   n   n   i   n   g   >   >   C
0025520    D   C   t   x   .   d   i   s   k   S   t   r   e   a   m    
0025540    e   q       0  \r               i   f   s   o  \r            
0025560                [  \r                           P   u   t   I   f
0025600    s   E   c   (   n   o   ,       (   C   t   x   R   u   n   n
0025620    i   n   g   >   >   C   D   C   t   x   .   e   r   r   o   r
0025640    C   o   d   e       n   e       0   ?  \r                    
0025660            C   t   x   R   u   n   n   i   n   g   >   >   C   D
0025700    C   t   x   .   e   r   r   o   r   C   o   d   e   ,       e
0025720    c   N   o   D   i   s   k   )   )  \r                        
0025740    r   e   t   u   r   n  \r                           ]  \r    
0025760            i   f   n   o   t       P   u   t   I   f   s   E   c
0026000    (   y   e   s   ,       e   c   H   e   r   e   I   s   D   i
0026020    s   k   )  \r  \r 376 001  \0   ) 240   l   e   t       b   s
0026040    p   S   t   r   e   a   m       =       C   t   x   R   u   n
0026060    n   i   n   g   >   >   R   S   C   t   x   .   b   s   p   S
0026100    o   c   +   o   f   f   s   e   t   B   S   P   S   t   r  \r
0026120    l   e   t       d   i   s   k   S   t   r   e   a   m       =
0026140        C   t   x   R   u   n   n   i   n   g   >   >   C   D   C
0026160    t   x   .   d   i   s   k   S   t   r   e   a   m  \r   l   e
0026200    t       c   h   a   r   s   P   e   r   P   a   g   e       =
0026220        2       l   s   h   i   f   t       L   n   P   a   g   e
0026240    S   i   z   e   (   d   i   s   k   S   t   r   e   a   m   )
0026260   \r   l   e   t       k   s   B   u   f   f   e   r       =    
0026300    K   s   B   u   f   f   e   r   A   d   d   r   e   s   s   (
0026320    d   i   s   k   S   t   r   e   a   m   )  \r  \r   l   e   t
0026340        s   a   v   e   d   E   r   r   o   r   P   r   o   c    
0026360    =       d   i   s   k   S   t   r   e   a   m   >   >   S   T
0026400    .   e   r   r   o   r  \r   d   i   s   k   S   t   r   e   a
0026420    m   >   >   S   T   .   e   r   r   o 376 001  \0   X 321   r
0026440        =       C   D   R   e   t   r   i   e   v   e   D   i   s
0026460    k   E   r   r   o   r  \r  \r   /   /       s   k   i   p    
0026500    d   i   s   k       p   a   r   a   m       b   l   o   c   k
0026520        -       a   s   s   u   m   e   d       t   o       b   e
0026540        s   m   a   l   l   e   r       t   h   a   n       k   s
0026560    B   u   f   f   e   r  \r   R   e   s   e   t   s   (   d   i
0026600    s   k   S   t   r   e   a   m   )  \r   P   o   s   i   t   i
0026620    o   n   P   t   r   (   d   i   s   k   S   t   r   e   a   m
0026640    ,       k   s   B   u   f   f   e   r   >   >   C   B   .   l
0026660    e   n   g   t   h   *   2   ,       f   a   l   s   e   )  \r
0026700   \r               [  \r               l   e   t       p   o   s
0026720        =       C   u   r   r   e   n   t   P   o   s   (   d   i
0026740    s   k   S   t   r   e   a   m   )  \r               P   o   s
0026760    i   t   i   o   n   P   t   r   (   d   i   s   k   S   t   r
0027000    e   a   m   ,       c   h   a   r   s   P   e   r   P   a   g
0027020    e   ,       f   a   l   s   e   )  \r               l   e 376
0027040  001  \0 001 264   t       f   i   l   e   B   y   t   e   s    
0027060    =       C   u   r   r   e   n   t   P   o   s   (   d   i   s
0027100    k   S   t   r   e   a   m   )   -   p   o   s  \r            
0027120    i   f       B   S   P   W   r   i   t   e   B   l   o   c   k
0027140    (   b   s   p   S   t   r   e   a   m   ,       k   s   B   u
0027160    f   f   e   r   ,       p   o   s   ,       f   i   l   e   B
0027200    y   t   e   s   )       n   e       f   i   l   e   B   y   t
0027220    e   s       b   r   e   a   k  \r               i   f       p
0027240    o   s   +   f   i   l   e   B   y   t   e   s       l   s    
0027260    c   h   a   r   s   P   e   r   P   a   g   e       b   r   e
0027300    a   k  \r               C   l   e   a   n   u   p   D   i   s
0027320    k   S   t   r   e   a   m   (   d   i   s   k   S   t   r   e
0027340    a   m   )  \r               f   o   r       i       =       0
0027360        t   o       1   5       d   o       c   u   r   s   o   r
0027400    B   i   t   M   a   p   !   i       =       n   o   t       c
0027420    u   r   s   o   r   B   i   t   M   a   p   !   i  \r        
0027440        ]       r 376 001  \0 232   (   e   p   e   a   t  \r  \r
0027460    B   S   P   F   o   r   c   e   O   u   t   p   u   t   (   C
0027500    t   x   R   u   n   n   i   n   g   >   >   R   S   C   t   x
0027520    .   b   s   p   S   o   c   )  \r   d   i   s   k   S   t   r
0027540    e   a   m   >   >   S   T   .   e   r   r   o   r       =    
0027560    s   a   v   e   d   E   r   r   o   r   P   r   o   c  \r   ]
0027600   \r  \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -
0027620    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0027700    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0027720    a   n   d       C   D   R   e   t   r   i   e   v   e   D   i
0027740    s   k   E   r   r   o   r   (   s   ,       e   c   ,       p
0027760    a   r   )       b   e  \r   /   /   -   -   -   -   -   -   -
0030000    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0030040    -   -   -   -   -   -   -   -   - 376 001  \0 254 301   -   -
0030060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0030100    -   -   -   -   -   -   -   -   -  \r   /   /       I   f    
0030120    h   a   r   d       e   r   r   o   r       o   n       l   o
0030140    c   a   l       d   i   s   k   ,       r   e   m   e   m   b
0030160    e   r       e   r   r   o   r       c   o   d   e       a   n
0030200    d       p   r   o   c   e   e   d   .  \r   [  \r   i   f    
0030220    e   c       e   q       e   c   U   n   R   e   c   o   v   D
0030240    i   s   k   E   r   r   o   r       t   h   e   n  \r        
0030260        [  \r               C   t   x   R   u   n   n   i   n   g
0030300    >   >   C   D   C   t   x   .   e   r   r   o   r   C   o   d
0030320    e       =       e   c   D   i   s   k   E   r   r   o   r  \r
0030340                r   e   t   u   r   n           /   /       T   F
0030360    S       w   i   l   l       i   g   n   o   r   e       t   h
0030400    e       e   r   r   o   r  \r               ]  \r   S   y   s
0030420    E   r   r   (   s   ,       e   c   ,       p   a   r   )  \r
0030440    ]  \r  \f  \r   /   /   -   -   -   -   -   -   -   - 376 001
0030460   \0 225   _   -   -   -   -   -   -   -   -   -   -   -   -   -
0030500    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0030560    -   -   -   -   -   -   -  \r   a   n   d       P   u   t   B
0030600    l   o   c   k   (   c   b   ,       t   y   p   e   ,       l
0030620    e   n   g   t   h   )       b   e  \r   /   /   -   -   -   -
0030640    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0030740    -   -   -   -   -   -   -   -  \r   [  \r   c   b   >   >   C
0030760    B   .   t   y   p   e       =       t   y   p   e  \r   c   b
0031000    >   >   C   B   .   l   e   n   g   t   h       =       l   e
0031020    n   g   t   h  \r   l   e   t       b   s   p   S   t   r   e
0031040    a   m       =       C   t   x   R   u   n   n   i   n   g   >
0031060    >   R   S 376 001  \0 214   9   C   t   x   .   b   s   p   S
0031100    o   c   +   o   f   f   s   e   t   B   S   P   S   t   r  \r
0031120    i   f       B   S   P   W   r   i   t   e   B   l   o   c   k
0031140    (   b   s   p   S   t   r   e   a   m   ,       c   b   ,    
0031160    0   ,       l   e   n   g   t   h   *   2   )       e   q    
0031200    l   e   n   g   t   h   *   2       t   h   e   n  \r        
0031220        B   S   P   F   o   r   c   e   O   u   t   p   u   t   (
0031240    C   t   x   R   u   n   n   i   n   g   >   >   R   S   C   t
0031260    x   .   b   s   p   S   o   c   )  \r   ]  \r  \r   /   /   -
0031300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0031400    -   -   -   -   -   -   -   -   -   -   -  \r   a   n   d    
0031420    P   u   t   S   t   r   i   n   g   (   t   y   p   e   ,    
0031440    c   o   d   e   ,       s   t   r   i   n   g   ,       a   0
0031460    ,       a   1   ,       a   2 376 001  \0 021 365   ,       a
0031500    3   ,       a   4   )       b   e  \r   /   /   -   -   -   -
0031520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0031620    -   -   -   -   -   -   -   -  \r   [  \r   l   e   t       c
0031640    b       =       S   y   s   A   l   l   o   c   a   t   e   (
0031660    l   e   n   C   o   d   e   S   t   r   i   n   g   +   1   2
0031700    8   )  \r   c   b   >   >   C   B   .   c   o   d   e   S   t
0031720    r   i   n   g   .   c   o   d   e       =       c   o   d   e
0031740   \r   l   e   t       s   t   r       =       l   v       c   b
0031760    >   >   C   B   .   c   o   d   e   S   t   r   i   n   g   .
0032000    s   t   r   i   n   g  \r   l   e   t       s   s       =    
0032020    C   r   e   a   t   e   S   t   r   i   n   g   S   t   r   e
0032040    a   m   (   s   t   r   ,       2   5   5   )  \r   P   u   t
0032060    T   e   m   p   l   a   t   e   (   s   s   ,     376 001  \0
0032100    j 036   s   t   r   i   n   g   ,       a   0   ,       a   1
0032120    ,       a   2   ,       a   3   ,       a   4   )  \r   C   l
0032140    o   s   e   s   (   s   s   )  \r   P   u   t   B   l   o   c
0032160    k   (   c   b   ,       t   y   p   e   ,       l   e   n   C
0032200    o   d   e   S   t   r   i   n   g       +       s   t   r   >
0032220    >   S   t   r   i   n   g   .   l   e   n   g   t   h       r
0032240    s   h   i   f   t       1       +   1   )  \r   S   y   s   F
0032260    r   e   e   (   c   b   )  \r   ]  \r  \r   /   /   -   -   -
0032300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0032400    -   -   -   -   -   -   -   -   -  \r   a   n   d       P   u
0032420    t   I   f   s   E   c   (   t   y   p   e   ,       e   c   )
0032440        b   e  \r   /   /   -   -   -   -   -   -   -   -   -   -
0032460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0032500    -   - 376  \0 253 003 215   -   -   -   -   -   -   -   -   -
0032520    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0032560    -   -   -   -   -   -   -  \r   [  \r   l   e   t       e   r
0032600    r   R   e   c       =       L   o   o   k   u   p   E   r   r
0032620    o   r   C   o   d   e   (   e   c   )  \r   P   u   t   S   t
0032640    r   i   n   g   (   t   y   p   e   ,       e   r   r   R   e
0032660    c   >   >   E   r   r   R   e   c   .   f   t   p   E   c   ,
0032700        l   v       e   r   r   R   e   c   >   >   E   r   r   R
0032720    e   c   .   e   r   r   o   r   S   t   r   i   n   g   )  \r
0032740    S   y   s   F   r   e   e   (   e   r   r   R   e   c   )  \r
0032760    ]  \r 377  \0  \0   I   f   s   C   o   p   y   D   i   s   k
0033000    R   a   r   e   .   b   c   p   l  \0 373 233 236 021   Q  \0
0033020   \0 376 001  \0 217 230   /   /       I   f   s   C   o   p   y
0033040    D   i   s   k   R   a   r   e   .   b   c   p   l  \r   /   /
0033060        C   o   p   y   r   i   g   h   t       X   e   r   o   x
0033100        C   o   r   p   o   r   a   t   i   o   n       1   9   8
0033120    0   ,       1   9   8   1   ,       1   9   8   2  \r   /   /
0033140        L   a   s   t       m   o   d   i   f   i   e   d       S
0033160    e   p   t   e   m   b   e   r       2   5   ,       1   9   8
0033200    3           2   :   5   3       P   M       b   y       T   a
0033220    f   t  \r  \r   g   e   t       "   S   t   r   e   a   m   s
0033240    .   d   "  \r   g   e   t       "   I   f   s   .   d   e   c
0033260    l   "  \r   g   e   t       "   I   f   s   R   S   .   d   e
0033300    c   l   "  \r   g   e   t       "   I   f   s   D   i   r   s
0033320    .   d   e   c   l   "  \r   g   e   t       "   I   f   s   F
0033340    i   l   e   s   .   d   e   c   l   "  \r   g   e   t       "
0033360    I   f   s   C   o   p   y   D   i   s   k   .   d   e   c   l
0033400    "  \r  \r   e   x   t   e   r   n   a   l  \r   [  \r   /   /
0033420        o   u   t   g   o 376 001  \0 323 001   i   n   g       p
0033440    r   o   c   e   d   u   r   e   s  \r   C   D   V   e   r   s
0033460    i   o   n   ;       C   D   L   o   g   i   n   ;       C   D
0033500    S   e   n   d   E   r   r   o   r   s   ;       C   D   C   l
0033520    o   s   e   F   i   l   e  \r   C   D   S   e   n   d   D   i
0033540    s   k   P   a   r   a   m   s   ;       C   D   H   e   r   e
0033560    A   r   e   D   i   s   k   P   a   r   a   m   s  \r  \r   /
0033600    /       i   n   c   o   m   i   n   g       p   r   o   c   e
0033620    d   u   r   e   s  \r   P   u   t   S   t   r   i   n   g   ;
0033640        P   u   t   I   f   s   E   c   ;       P   u   t   B   l
0033660    o   c   k  \r   C   l   o   s   e   I   F   S   S   t   r   e
0033700    a   m   ;       C   l   o   s   e   I   F   S   F   i   l   e
0033720    ;       L   o   o   k   u   p   F   D   ;       D   e   l   e
0033740    t   e   F   i   l   e   F   r   o   m   F   D   ;       G   e
0033760    t   B   u   f   f   e   r   F   o   r   F   D  \r   D   e   s
0034000    t   r   o   y   F   D   ;       S   t   r   e   a   m   s   F
0034020    D   ;       T   r   a   n   s   f   e   r 376 001  \0   I   @
0034040    L   e   a   d   e   r   P   a   g   e  \r   I   F   S   O   p
0034060    e   n   F   i   l   e   ;       R   e   a   d   B   l   o   c
0034100    k   ;       W   r   i   t   e   B   l   o   c   k   ;       C
0034120    l   o   s   e   s  \r   L   o   g   i   n   ;       C   o   n
0034140    n   e   c   t   ;       A   c   t   i   v   e   J   o   b   s
0034160    ;       C   r   e   a   t   e   S   t   r   i   n   g   S   t
0034200    r   e   a   m  \r   P   r   i   n   t   I   F   S   V   e   r
0034220    s   i   o   n   ;       W   r   i   t   e   P   a   c   k   e
0034240    d   D   T   ;       P   u   t   T   e   m   p   l   a   t   e
0034260   \r   S   y   s   A   l   l   o   c   a   t   e   ;       S   y
0034300    s   F   r   e   e   ;       F   r   e   e   P   o   i   n   t
0034320    e   r   ;       M   o   v   e   B   l   o   c   k  \r  \r   /
0034340    /       i   n   c   o   m   i   n   g       s   t   a   t   i
0034360    c   s  \r   m   a   x   J   o   b   s   ;       C   t   x   R
0034400    u   n   n   i   n   g  \r   ]  \r  \f  \r   /   /   -   -   -
0034420    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0034440  376 001  \0 363 256   -   -   -   -   -   -   -   -   -   -   -
0034460    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0034520    -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r   l
0034540    e   t       C   D   V   e   r   s   i   o   n   (   c   b   )
0034560        b   e  \r   /   /   -   -   -   -   -   -   -   -   -   -
0034600    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0034700    -   -  \r   [  \r   l   e   t       a   c   t   i   v   e   J
0034720    o   b   s       =       A   c   t   i   v   e   J   o   b   s
0034740    (   )  \r   P   u   t   S   t   r   i   n   g   (   v   e   r
0034760    s   i   o   n   ,       c   d   V   e   r   s   i   o   n   ,
0035000        "   $   P   ;       $   D       u   s   e   r   $   S    
0035020    o   u   t       o   f       $   D   "   ,  \r       P   r   i
0035040    n   t   I   F   S 376 001  \0   !   e   V   e   r   s   i   o
0035060    n   ,       "   C   o   p   y   D   i   s   k       s   e   r
0035100    v   e   r   "   ,       a   c   t   i   v   e   J   o   b   s
0035120    ,       (   a   c   t   i   v   e   J   o   b   s       e   q
0035140        1   ?       "   "   ,       "   s   "   )   ,       m   a
0035160    x   J   o   b   s   )  \r   ]  \r  \r   /   /   -   -   -   -
0035200    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0035300    -   -   -   -   -   -   -   -  \r   a   n   d       C   D   L
0035320    o   g   i   n   (   c   b   )       b   e  \r   /   /   -   -
0035340    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0035440    -   -   -   -   -   -   -   -   -   - 376 001  \0 245 323  \r
0035460    [  \r   l   e   t       u   N   a   m       =       l   v    
0035500    c   b   >   >   C   B   .   s   t   r   i   n   g   .   s   t
0035520    r   i   n   g  \r   l   e   t       u   P   s   w       =    
0035540    u   N   a   m       +       u   N   a   m   >   >   S   t   r
0035560    i   n   g   .   l   e   n   g   t   h       r   s   h   i   f
0035600    t       1       +   1  \r   l   e   t       c   N   a   m    
0035620    =       u   P   s   w       +       u   P   s   w   >   >   S
0035640    t   r   i   n   g   .   l   e   n   g   t   h       r   s   h
0035660    i   f   t       1       +   1  \r   l   e   t       c   P   s
0035700    w       =       c   N   a   m       +       c   N   a   m   >
0035720    >   S   t   r   i   n   g   .   l   e   n   g   t   h       r
0035740    s   h   i   f   t       1       +   1  \r  \r   l   e   t    
0035760    e   c       =       L   o   g   i   n   (   u   N   a   m   ,
0036000        u   P   s   w   ,       C   t   x   R   u   n   n   i   n
0036020    g   >   >   R   S   C   t   x   .   u   s   e   r   I   n   f
0036040    o   )  \r   i   f       e   c       e   q       0       t 376
0036060  001  \0 364 233   h   e   n  \r               e   c       =    
0036100    C   o   n   n   e   c   t   (   c   N   a   m   ,       c   P
0036120    s   w   ,       C   t   x   R   u   n   n   i   n   g   >   >
0036140    R   S   C   t   x   .   u   s   e   r   I   n   f   o   )  \r
0036160   \r   t   e   s   t       e   c       e   q       0  \r        
0036200        i   f   s   o       P   u   t   I   f   s   E   c   (   y
0036220    e   s   ,       e   c   L   o   g   C   o   n   n   )  \r    
0036240            i   f   n   o   t       P   u   t   I   f   s   E   c
0036260    (   n   o   ,       e   c   )  \r   ]  \r  \r   /   /   -   -
0036300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0036400    -   -   -   -   -   -   -   -   -   -  \r   a   n   d       C
0036420    D   S   e   n   d   E   r   r   o   r   s   (   c   b   )    
0036440    b   e  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0036460    -   -   -   - 376 001  \0 031 340   -   -   -   -   -   -   -
0036500    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0036560    -   -   -   -   -   -  \r   [  \r   t   e   s   t       C   t
0036600    x   R   u   n   n   i   n   g   >   >   C   D   C   t   x   .
0036620    e   r   r   o   r   C   o   d   e       n   e       0  \r    
0036640            i   f   s   o  \r                           P   u   t
0036660    I   f   s   E   c   (   n   o   ,       C   t   x   R   u   n
0036700    n   i   n   g   >   >   C   D   C   t   x   .   e   r   r   o
0036720    r   C   o   d   e   )  \r               i   f   n   o   t  \r
0036740                            [  \r                           l   e
0036760    t       c   b       =       v   e   c       l   e   n   E   r
0037000    r   o   r   s  \r                           c   b   >   >   C
0037020    B   .   e   r   r   o   r   s   .   d   i   s   k   T   y   p
0037040    e       =       0  \r                           P   u   t   B
0037060    l   o   c   k   (   c   b   ,     376 001  \0 211   n   h   e
0037100    r   e   A   r   e   E   r   r   o   r   s   ,       l   e   n
0037120    E   r   r   o   r   s   )  \r                           ]  \r
0037140    ]  \r  \r   /   /   -   -   -   -   -   -   -   -   -   -   -
0037160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0037260    -  \r   a   n   d       C   D   H   e   r   e   A   r   e   D
0037300    i   s   k   P   a   r   a   m   s   (   c   b   )       b   e
0037320   \r   /   /   -   -   -   -   -   -   -   -   -   -   -   -   -
0037340    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0037420    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0037440    [  \r   F   r   e   e   P   o   i   n   t   e   r   (   l   v
0037460        C   t   x   R   u   n   n   i   n   g   >   >   C 376 001
0037500   \0 024 366   D   C   t   x   .   d   i   s   k   P   a   r   a
0037520    m   s   )  \r   C   t   x   R   u   n   n   i   n   g   >   >
0037540    C   D   C   t   x   .   d   i   s   k   P   a   r   a   m   s
0037560        =       S   y   s   A   l   l   o   c   a   t   e   (   c
0037600    b   >   >   C   B   .   l   e   n   g   t   h   )  \r   M   o
0037620    v   e   B   l   o   c   k   (   C   t   x   R   u   n   n   i
0037640    n   g   >   >   C   D   C   t   x   .   d   i   s   k   P   a
0037660    r   a   m   s   ,       c   b   ,       c   b   >   >   C   B
0037700    .   l   e   n   g   t   h   )  \r   ]  \r  \f  \r   /   /   -
0037720    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0040020    -   -   -   -   -   -   -   -   -   -   -  \r   a   n   d    
0040040    C   D   S   e   n   d   D   i   s   k   P   a   r   a   m   s
0040060    (   c   b   )       b   e  \r   /   /   -   -   -   -   -   -
0040100    -   -   - 376 001  \0   ?   a   -   -   -   -   -   -   -   -
0040120    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0040200    -   -   -   -   -   -   -   -   -   -   -  \r   [  \r   C   D
0040220    C   l   o   s   e   F   i   l   e   (   )  \r   C   t   x   R
0040240    u   n   n   i   n   g   >   >   C   D   C   t   x   .   e   r
0040260    r   o   r   C   o   d   e       =       0  \r   l   e   t    
0040300    e   c   ,       r   e   a   d       =       n   i   l   ,    
0040320    c   b   >   >   C   B   .   t   y   p   e       e   q       s
0040340    e   n   d   D   i   s   k   P   a   r   a   m   s   R  \r   l
0040360    e   t       s   t   r   e   a   m       =       I   F   S   O
0040400    p   e   n   F   i   l   e   (   l   v       c   b   >   >   C
0040420    B   .   s   t   r   i   n   g   .   s   t   r   i   n   g   ,
0040440        l   v       e   c   ,  \r       (   r   e   a   d   ?    
0040460    m   o   d   e   R   e   a   d   ,       m   o   d   e   R   e
0040500    a   d   W   r   i   t   e   ) 376 001  \0   T 363   ,       w
0040520    o   r   d   I   t   e   m   ,       (   r   e   a   d   ?    
0040540    0   ,       l   c   C   r   e   a   t   e   +   l   c   V   N
0040560    e   x   t   )   )  \r   i   f       s   t   r   e   a   m    
0040600    e   q       0       t   h   e   n       [       P   u   t   I
0040620    f   s   E   c   (   n   o   ,       e   c   )   ;       r   e
0040640    t   u   r   n       ]  \r   t   e   s   t       r   e   a   d
0040660   \r               i   f   s   o           /   /       r   e   a
0040700    d   i   n   g  \r                           [  \r            
0040720                m   a   n   i   f   e   s   t       m   a   x   L
0040740    e   n   D   i   s   k   P   a   r   a   m   s       =       2
0040760    0           /   /       g   u   a   r   d   ;       c   u   r
0041000    r   e   n   t   l   y       6  \r                           l
0041020    e   t       c   b       =       v   e   c       m   a   x   L
0041040    e   n   D   i   s   k   P   a   r   a   m   s  \r            
0041060                R   e   a   d   B   l   o   c   k   (   s   t   r
0041100    e   a   m   ,       c   b   ,       m   a   x   L 376 001  \0
0041120  213 033   e   n   D   i   s   k   P   a   r   a   m   s   )  \r
0041140                            t   e   s   t       c   b   >   >   C
0041160    B   .   t   y   p   e       e   q       h   e   r   e   A   r
0041200    e   D   i   s   k   P   a   r   a   m   s       &  \r        
0041220                        c   b   >   >   C   B   .   l   e   n   g
0041240    t   h       l   e       m   a   x   L   e   n   D   i   s   k
0041260    P   a   r   a   m   s  \r                                    
0041300    i   f   s   o  \r                                            
0041320        [  \r                                                   l
0041340    e   t       f   d       =       S   t   r   e   a   m   s   F
0041360    D   (   s   t   r   e   a   m   )  \r                        
0041400                            l   e   t       i   l   d       =    
0041420    G   e   t   B   u   f   f   e   r   F   o   r   F   D   (   f
0041440    d   )  \r                                                   T
0041460    r   a   n   s   f   e   r   L   e   a   d   e   r   P   a   g
0041500    e   (   f   d   ,       i   l   d   )           /   /       r
0041520    e   a 376 001  \0   ;   ?   d  \r                            
0041540                        l   e   t       c       =       l   v    
0041560    i   l   d   >   >   I   L   D   .   f   l   a   g   s  \r    
0041600                                                l   e   t       s
0041620    s       =       C   r   e   a   t   e   S   t   r   i   n   g
0041640    S   t   r   e   a   m   (   l   v       c   >   >   C   B   .
0041660    s   t   r   i   n   g   ,       2   5   5   )  \r            
0041700                                        P   u   t   T   e   m   p
0041720    l   a   t   e   (   s   s   ,       "   $   S       c   r   e
0041740    a   t   e   d       $   P       b   y       $   S   "   ,    
0041760    l   v       i   l   d   >   >   I   L   D   .   p   a   t   h
0042000    N   a   m   e   ,  \r                                        
0042020                W   r   i   t   e   P   a   c   k   e   d   D   T
0042040    ,       l   v       i   l   d   >   >   I   L   D   .   c   r
0042060    e   a   t   e   d   ,       l   v       i   l   d   >   >   I
0042100    L   D   .   a   u   t   h   o   r   )  \r                    
0042120                              376 001  \0 351 231   C   l   o   s
0042140    e   s   (   s   s   )  \r                                    
0042160                S   y   s   F   r   e   e   (   i   l   d   )  \r
0042200                                                    P   u   t   B
0042220    l   o   c   k   (   c   ,       c   o   m   m   e   n   t   ,
0042240        l   e   n   S   t   r   i   n   g   +   s   s   >   >   S
0042260    t   r   i   n   g   .   l   e   n   g   t   h   /   2       +
0042300    1   )  \r                                                   P
0042320    u   t   B   l   o   c   k   (   c   b   ,       h   e   r   e
0042340    A   r   e   D   i   s   k   P   a   r   a   m   s   ,       c
0042360    b   >   >   C   B   .   l   e   n   g   t   h   )  \r        
0042400                                            ]  \r                
0042420                        i   f   n   o   t  \r                    
0042440                                [  \r                            
0042460                        P   u   t   I   f   s   E   c   (   n   o
0042500    ,       e   c   B   a   d   F   o   r   m   a   t   )  \r    
0042520                                                C 376 001  \0 213
0042540    !   l   o   s   e   s   (   s   t   r   e   a   m   )  \r    
0042560                                                s   t   r   e   a
0042600    m       =       0  \r                                        
0042620            ]  \r                           ]  \r               i
0042640    f   n   o   t           /   /       w   r   i   t   i   n   g
0042660   \r                           [  \r                           C
0042700    t   x   R   u   n   n   i   n   g   >   >   C   D   C   t   x
0042720    .   d   e   l   e   t   e       =       S   t   r   e   a   m
0042740    s   F   D   (   s   t   r   e   a   m   )   >   >   F   D   .
0042760    o   l   d   P   a   g   e   N   u   m   b   e   r       e   q
0043000        -   1  \r                           l   e   t       d   p
0043020        =       v   e   c       l   e   n   D   i   s   k   P   a
0043040    r   a   m   s  \r                           d   p   >   >   C
0043060    B   .   d   i   s   k   P   a   r   a   m   s   .   d   i   s
0043100    k   T   y   p   e       =       0  \r                        
0043120    P   u   t   B   l   o   c   k   (   d   p   ,       h   e   r
0043140    e 376 001  \0   e 227   A   r   e   D   i   s   k   P   a   r
0043160    a   m   s   ,       l   e   n   D   i   s   k   P   a   r   a
0043200    m   s   )  \r                           ]  \r   C   t   x   R
0043220    u   n   n   i   n   g   >   >   C   D   C   t   x   .   d   i
0043240    s   k   S   t   r   e   a   m       =       s   t   r   e   a
0043260    m  \r   ]  \r  \r   /   /   -   -   -   -   -   -   -   -   -
0043300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0043400    -   -   -  \r   a   n   d       C   D   C   l   o   s   e   F
0043420    i   l   e   (   )       b   e  \r   /   /   -   -   -   -   -
0043440    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0043540    -   -   -   -   -   - 376 001  \0 226 337   -  \r   /   /    
0043560    R   e   l   e   a   s   e   s       d   i   s   k   P   a   r
0043600    a   m   s   ,       C   l   o   s   e   s       t   h   e    
0043620    d   i   s   k       s   t   r   e   a   m   ,       a   n   d
0043640        m   a   y       d   e   l   e   t   e       t   h   e    
0043660    f   i   l   e   .  \r   [  \r   F   r   e   e   P   o   i   n
0043700    t   e   r   (   l   v       C   t   x   R   u   n   n   i   n
0043720    g   >   >   C   D   C   t   x   .   d   i   s   k   P   a   r
0043740    a   m   s   )  \r   i   f       C   t   x   R   u   n   n   i
0043760    n   g   >   >   C   D   C   t   x   .   d   i   s   k   S   t
0044000    r   e   a   m       e   q       0       r   e   t   u   r   n
0044020   \r   l   e   t       d   e   l   e   t   e       =       C   t
0044040    x   R   u   n   n   i   n   g   >   >   C   D   C   t   x   .
0044060    d   e   l   e   t   e       n   e       0  \r   /   /       l
0044100    e   a   v   e       f   i   l   e       l   o   c   k   e   d
0044120        i   f       w   e       a   r   e       a   b   o   u   t
0044140        t   o       d   e   l   e   t   e     376  \0 305 220 351
0044160    i   t   .  \r   l   e   t       f   d       =       C   l   o
0044200    s   e   I   F   S   S   t   r   e   a   m   (   C   t   x   R
0044220    u   n   n   i   n   g   >   >   C   D   C   t   x   .   d   i
0044240    s   k   S   t   r   e   a   m   ,       d   e   l   e   t   e
0044260    )  \r   i   f       d   e   l   e   t   e       t   h   e   n
0044300   \r               i   f       D   e   l   e   t   e   F   i   l
0044320    e   F   r   o   m   F   D   (   f   d   ,       f   a   l   s
0044340    e   ,       t   r   u   e   )       n   e       0       t   h
0044360    e   n       C   l   o   s   e   I   F   S   F   i   l   e   (
0044400    f   d   )  \r   D   e   s   t   r   o   y   F   D   (   f   d
0044420    )  \r   C   t   x   R   u   n   n   i   n   g   >   >   C   D
0044440    C   t   x   .   d   i   s   k   S   t   r   e   a   m       =
0044460        0  \r   ]  \r 377  \0  \0   I   f   s   C   o   p   y   D
0044500    i   s   k   O   E   P   .   b   c   p   l  \0 373 226 227   f
0044520    #  \0  \0 376 001  \0   6 273   /   /       I   f   s   C   o
0044540    p   y   D   i   s   k   O   E   P   .   b   c   p   l  \r   /
0044560    /       C   o   p   y   r   i   g   h   t       X   e   r   o
0044600    x       C   o   r   p   o   r   a   t   i   o   n       1   9
0044620    8   1  \r   /   /       L   a   s   t       m   o   d   i   f
0044640    i   e   d       J   a   n   u   a   r   y       2   2   ,    
0044660    1   9   8   1           2   :   4   4       P   M       b   y
0044700        B   o   g   g   s  \r  \r   e   x   t   e   r   n   a   l
0044720   \r   [  \r   /   /       o   u   t   g   o   i   n   g       p
0044740    r   o   c   e   d   u   r   e  \r   I   n   i   t   C   o   p
0044760    y   D   i   s   k   O   E   P  \r  \r   /   /       i   n   c
0045000    o   m   i   n   g       p   r   o   c   e   d   u   r   e   s
0045020   \r   D   e   c   l   a   r   e   O   E   P   ;       C   o   p
0045040    y   D   i   s   k   J   o   b  \r   ]  \r  \r   /   /   -   -
0045060    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0045120    -   -   -   -   -   -   -   - 376  \0 257 033 346   -   -   -
0045140    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
0045160    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -  \r
0045200    l   e   t       I   n   i   t   C   o   p   y   D   i   s   k
0045220    O   E   P   (   o   e   v   )       b   e       D   e   c   l
0045240    a   r   e   O   E   P   (   o   e   v   ,       l   v       C
0045260    o   p   y   D   i   s   k   J   o   b   )  \r   /   /   -   -
0045300    -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
*
0045400    -   -   -   -   -   -   -   -   -   -  \r  \r 377  \0  \0   C
0045420    o   m   p   i   l   e   I   f   s   C   o   p   y   D   i   s
0045440    k   .   c   m  \0 373 230 025 272   $  \0  \0 376  \0   Z   e
0045460  220   B   c   p   l   /   f   o       I   f   s   C   o   p   y
0045500    D   i   s   k   I   n   i   t   .   b   c   p   l       I   f
0045520    s   C   o   p   y   D   i   s   k   J   o   b   .   b   c   p
0045540    l       I   f   s   C   o   p   y   D   i   s   k   R   a   r
0045560    e   .   b   c   p   l       I   f   s   C   o   p   y   D   i
0045600    s   k   O   E   P   .   b   c   p   l  \r 377  \0  \0   I   f
0045620    s   C   o   p   y   D   i   s   k   .   c   m  \0 373 226 227
0045640    f 002  \0  \0 376  \0 207 260 037   I   f   s   C   o   p   y
0045660    D   i   s   k   .   d   e   c   l       I   f   s   C   o   p
0045700    y   D   i   s   k   I   n   i   t   .   b   c   p   l       I
0045720    f   s   C   o   p   y   D   i   s   k   J   o   b   .   b   c
0045740    p   l       I   f   s   C   o   p   y   D   i   s   k   R   a
0045760    r   e   .   b   c   p   l       I   f   s   C   o   p   y   D
0046000    i   s   k   O   E   P   .   b   c   p   l       C   o   m   p
0046020    i   l   e   I   f   s   C   o   p   y   D   i   s   k   .   c
0046040    m       I   f   s   C   o   p   y   D   i   s   k   .   c   m
0046060  374                                                            
0046061