ADSM-L

Re: CHECKIN LIBV in 3494 robot - optimising

1997-04-24 11:37:55
Subject: Re: CHECKIN LIBV in 3494 robot - optimising
From: "Dwight E. Cook" <decook AT AMOCO DOT COM>
Date: Thu, 24 Apr 1997 10:37:55 -0500
Item Subject: 1.txt "internet headers"
Could not convert BINARY FILE item to text.
Will attempt to 'shar' item as file '02b9e8p' at end of msg.

.......................................................................

     Ahhhh as Tim points out, use "checklabel=no" 'cause if you remembered
     to do the label and they are in the library everything is known.  If
     something is messed up it will show up with time and can be corrected
     then.  (just the opnion of Dwight E. Cook)

     NOW... along the lines of the "dsmlabel" what you can do is:
     1) enter the volsers of 'to be labeled tapes' into a data set
     2) split that data set into subsets, as many as you care to use drives
     3) initiate multiple "dsmlabel" jobs and redirect input from the data
     sets and push them into the background...

     Example: 8 drives and 80 tapes vols: ABC001-ABC080
     file ABC001010 contains :
     ABC001
     ABC002
     ...
     ABC010
     file ABC011020 contains...... and so on for 8 files then just do...
     nohup dsmlabel -drive=/dev/rmt1 -libr=/dev/lmcp1 -keep < ABC001010 &
     nohup dsmlabel -drive=/dev/rmt2 -libr=/dev/lmcp1 -keep < ABC011020 &
     and so on... I got a real kick out of watching the ATL the first time
     I did this with about 50 tapes on 4 drives... they were for a 2nd ADSM
     server using the same 3494 so search=yes was out of the question... to
     this day I haven't seen the ATL work any harder!

     REMEMBER THE "-keep"... I forgot on a server a few thousand miles away
     AND I initiated multiple dsmlabel's with a script... by the time I
     even figured out what I had done it already had the output station
     filled, sigh! It then backlogged 10 tapes for ejection, then aborted
     the dsmlabel jobs... You can use "mtlib" to reset the tapes that
     didn't make it to the output station but I never figured out how to
     make the ATL yank back the ones already in the door...
     ANYONE KNOW THE ANSWER TO THAT ONE, PLEASE EDUCATE ME !
     I ended up waiting for another person in our group to go to Chicago
     and I ask him to correct my error while he was there. (I didn't dare
     let the folks there know what I did ;-) )
     later
          Dwight




______________________________ Reply Separator _________________________________
Subject: Re: CHECKIN LIBV in 3494 robot - optimising
Author:  ADSM-L (ADSM-L AT VM.MARIST DOT EDU) at unix,sh
Date:    4/24/97 10:08 AM


I use the following command to check scratch tapes into the library and
the 3494 doesn't mount any of the tapes...

checkin libvolume 3494LIB01 status=scratch search=yes checklabel=no
devtype=3590

Tim Pittson
tpittson AT himail.hcc DOT com

>----------
>From:  Sheelagh
>Treweek[SMTP:sheelagh.treweek AT COMPUTING-SERVICES.OXFORD.AC DOT UK]
>Sent:  Thursday, April 24, 1997 10:28 AM
>To:    ADSM-L AT VM.MARIST DOT EDU
>Subject:       CHECKIN LIBV in 3494 robot - optimising
>
>Hi, A couple of 3494 ATL/3590/AIX 4.1.5/ADSM 2.1.5.12 puzzles ...
>
>1. Can anyone tell me please how to make better use of multiple drives
>when checking in tapes into a 3494 robot? I have 60 tapes being checked
>in, 8 drives available and it appears to be mounting one tape on one
>drive, the next tape on the next drive and so on, but won't have more
>than one process going at once? [I'd like to be able to say - use 6
>drives please and hurry up.]
>
>2. I also wonder whether I am correct is noticing that CHECKIN LIBV appears
>to be blocking a mount request from a restore ...
>
>- q sess f=d shows 'waiting for mount of tape xxxxxx (lots of secs)'
>- q drive/mount/devc shows decks are available
>- q req says 'no match found for this query' (i.e. no request pending)
>- q act sea=xxxxxx for the tape being waited for shows nothing - i.e. no
>  mount message in the log
>
>Are these bugs or features?
>
>Are there any plans to change/fix?
>
>Thanks a lot. Regards, Sheelagh
>
>-----------------------------------------------------------------------------
>-
>Sheelagh Treweek                         Email:
>sheelagh.treweek AT oucs.ox.ac DOT uk
>Oxford University Computing Services     Tel:   +44 (0)1865 273205
>13 Banbury Road, Oxford, OX2 6NN, UK     Fax:   +44 (0)1865 273275
>-----------------------------------------------------------------------------
>-
>


# This is a shell archive.  Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file".
#
# Wrapped by Openmail for HP9000 <openmail@tuleosm1> on Thu Apr 24 10:38:36 1997
#
# This archive contains:
#       02b9e8p
#
# Error checking via wc(1) will be performed.

LANG=""; export LANG
PATH=/bin:/usr/bin:$PATH; export PATH


rm -f /tmp/uud$$
(echo "begin 666 /tmp/uud$$\n#;VL*n#6%@x\n \nend" | uudecode) >/dev/null 2>&1
if [ X"`cat /tmp/uud$$ 2>&1`" = Xok ]
then
        unpacker=uudecode
else
        echo Compiling unpacker for non-ascii files
        pwd=`pwd`; cd /tmp
        cat >unpack$$.c <<'EOF'
#include <stdio.h>
#define C (*p++ - ' ' & 077)
main()
{
        int n;
        char buf[128], *p, a,b;

        scanf("begin %o ", &n);
        gets(buf);

        if (freopen(buf, "w", stdout) == NULL) {
                perror(buf);
                exit(1);
        }

        while (gets(p=buf) && (n=C)) {
                while (n>0) {
                        a = C;
                        if (n-- > 0) putchar(a << 2 | (b=C) >> 4);
                        if (n-- > 0) putchar(b << 4 | (a=C) >> 2);
                        if (n-- > 0) putchar(a << 6 | C);
                }
        }
        exit(0);
}
EOF
        cc -o unpack$$ unpack$$.c
        rm unpack$$.c
        cd $pwd
        unpacker=/tmp/unpack$$
fi
rm -f /tmp/uud$$

echo x - 02b9e8p '[non-ascii]'
$unpacker <<'@eof'
begin 660 02b9e8p
M4F5C96EV960Z(&9R;VT@8V]R<&UX,#(@*&-O<G!M># R+FAO=2YA;6]C;RYCX
M;VTI(&)Y('1U;&5O<VTQ('=I=&@@15--5% -"@DH,2XS-RXQ,#DN,C O,38NX
M,BD@:60@04$P.3,X,C0Y-3$[(%1H=2P@,C0@07!R(#$Y.3<@,3 Z,34Z-3$@X
M+3 U,# -"E)E8V5I=F5D.B!F<F]M(&AO<VTQ,C)A(&)Y(&-O<G!M># R("A3X
M34DM."XV+U--22TT+C I#0H):60@2T%!,#$R,30[(%1H=2P@,C0@07!R(#$YX
M.3<@,3 Z,#8Z,C0@+3 U,# -"E)E8V5I=F5D.B!F<F]M(&EN=&5R;&]C:RYAX
M;6]C;RYC;VT@8GD@:&]S;3$R,F$@*%--22TX+C8O4TU)+5-64C0I#0H):60@X
M2T%!,# U.#D[(%1H=2P@,C0@07!R(#$Y.3<@,3 Z,3DZ-#D@+3 U,# -"E)EX
M8V5I=F5D.B!F<F]M('9M+FUA<FES="YE9'4@8GD@<&]R=&%L+F%M;V-O+F-OX
M;2!W:71H(%--5% @:60@04$P,3 R, T*(" H26YT97),;V-K(%--5% @1V%TX
M97=A>2 S+C I.R!4:'4L(#(T($%P<B Q.3DW(#$P.C$U.C,P("TP-3 P#0I2X
M96-E:79E9#H@9G)O;2!632Y-05))4U0N1415(&)Y(%9-+DU!4DE35"Y%1%4@X
M*$E"32!632!33510(%8R4C,I#0H@("!W:71H($)33510(&ED(#,W,S@[(%1HX
M=2P@,C0@07!R(#DW(#$Q.C X.C(P($5$5 T*4F5C96EV960Z(&9R;VT@5DTNX
M34%225-4+D5$52 H3DI%(&]R:6=I;B!,25-44T525D!-05))4U0I(&)Y(%9-X
M+DU!4DE35"Y%1%4@*$Q-86EL(%8Q+C)B+S$N.&(I('=I=&@@0E--5% @:60@X
M,C@U-SL@5&AU+" R-"!!<'(@,3DY-R Q,3HP.#HQ." M,#0P, T*4F5C96EVX
M960Z(&9R;VT@5DTN34%225-4+D5$52!B>2!632Y-05))4U0N1415("A,25-4X
M4T525B!R96QE87-E(#$N.&,I('=I=&@@3DI%#0H@(" @(" @(" @:60@-S8WX
M,"!F;W(@041332U,0%9-+DU!4DE35"Y%1%4[(%1H=2P@,C0@07!R(#$Y.3<@X
M,3$Z,#@Z,3,@+3 T,# -"E)E8V5I=F5D.B!F<F]M($U!4DE35" H3DI%(&]RX
M:6=I;B!335100$U!4DE35"D@8GD@5DTN34%225-4+D5$52 H3$UA:6P-"B @X
M(" @(" @("!6,2XR8B\Q+CAB*2!W:71H($)33510(&ED(#(X-#,[(%1H=2P@X
M,C0@07!R(#$Y.3<@,3$Z,#@Z,3,@+3 T,# -"E)E8V5I=F5D.B!F<F]M(&UAX
M:6QG871E+FAC8RYC;VT@8GD@5DTN34%225-4+D5$52 H24)-(%9-(%--5% @X
M5C)2,RD@=VET:"!40U [#0H@(" @(" @(" @5&AU+" R-"!!<'(@.3<@,3$ZX
M,#@Z,#8@1414#0I296-E:79E9#H@9G)O;2!B<G<M97AC+3 R+F)R:61G97=AX
M=&5R+FYE+FAC8RYC;VT-"B @(" @(" @(" H8G)W+65X8RTP,BYB<FED9V5WX
M871E<BYN92YH8V,N8V]M(%LQ-3DN,C(S+C@T+C$W72D@8GD-"B @(" @(" @X
M("!M86EL9V%T92YH8V,N8V]M('=I=&@@4TU44" H."XW+C$O."XW+C$I(&EDX
M($Q!03$Q,C<Q(&9O<@T*(" @(" @(" @(#Q!1%--+4Q 5DTN34%225-4+D5$X
M53X[(%1H=2P@,C0@07!R(#$Y.3<@,3$Z,#<Z-3(@+3 T,# @*$5$5"D-"E)EX
M8V5I=F5D.B!B>2!B<G<M97AC+3 R+F)R:61G97=A=&5R+FYE+FAC8RYC;VT@X
M=VET:"!33510("A-:6-R;W-O9G0@17AC:&%N9V4-"B @(" @(" @("!397)VX
M97(@26YT97)N970@36%I;"!#;VYN96-T;W(@5F5R<VEO;B T+C N.3DT+C8SX
M*2!I9 T*(" @(" @(" @(#PP,4)#-3 Y1BY#,3E%0S T,$!B<G<M97AC+3 RX
M+F)R:61G97=A=&5R+FYE+FAC8RYC;VT^.R!4:'4L(#(T($%P<@T*(" @(" @X
M(" @(#$Y.3<@,3$Z,#<Z-3,@+3 T,# -"E@M36%I;&5R.B @36EC<F]S;V9TX
M($5X8VAA;F=E(%-E<G9E<B!);G1E<FYE="!-86EL($-O;FYE8W1O<B!697)SX
M:6]N(#0N,"XY.30N-C,-"DUE<W-A9V4M260Z(" \8SU54R5A/4%45$U!24PEX
M<#U(3T5#2%-4)6P]0E)7+4580RTP,RTY-S T,C0Q-3 X,#!:+3$W-SDY-T!BX
M<G<M97AC+3 R+F)R:61G97=A=&5R+FYE+FAC8RYC;VT^#0I$871E.B @(" @X
M(" @(%1H=2P@,C0@07!R(#$Y.3<@,3$Z,#@Z,# @+3 T,# -"E)E<&QY+51OX
M.B B041333H@1&ES="!3=&]R($UA;F%G97(B(#Q!1%--+4Q 5DTN34%225-4X
M+D5$53X-"E-E;F1E<CH@(D%$4TTZ($1I<W0@4W1O<B!-86YA9V5R(B \0413X
M32U,0%9-+DU!4DE35"Y%1%4^#0I&<F]M.B B4&ET='-O;BP@5&EM;W1H>2 LX
M2&E397)V+TY!(B \='!I='1S;VY 2$E-04E,+DA#0RY#3TT^#0I3=6)J96-TX
M.B @(" @(%)E.B!#2$5#2TE.($Q)0E8@:6X@,S0Y-"!R;V)O=" M(&]P=&EMX
A:7-I;F<-"E1O.B!!1%--+4Q 5DTN34%225-4+D5$50T*                X
                                                             X
end
@eof
set `wc -lwc <02b9e8p`
if test $1$2$3 != 332482193
then
        echo ERROR: wc results of 02b9e8p are $* should be 33 248 2193
fi

chmod 660 02b9e8p

rm -f /tmp/unpack$$
exit 0
<Prev in Thread] Current Thread [Next in Thread>