ADSM-L

Re: Ye ole "missing tape" problem

1997-06-23 11:55:57
Subject: Re: Ye ole "missing tape" problem
From: "Dwight E. Cook" <decook AT AMOCO DOT COM>
Date: Mon, 23 Jun 1997 10:55:57 -0500
Item Subject: 1.txt "internet headers"
Could not convert BINARY FILE item to text.
Will attempt to 'shar' item as file '02l6ikl' at end of msg.

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

Item Subject: Ye ole "missing tape" problem
     Update the tape "access=destroyed"
     This will then let you do a "delete volume" on it
     If you have a copy of your tape pool you will want to recover the lost
     data from your copy BEFORE you delete the volume but you have to do
     the access=destroyed before you can recover the info...
     We don't run with the tape info copied so in such situations I just do
     an update vol blah acc=destroyed, q contents blah (and dump it to a
     file), then follow it with a delete vol blah.

     Oh, this is V2... is the access=destroyed available under V1 ?

     hope this helps...
     later
          Dwight



______________________________ Reply Separator _________________________________
Subject: Ye ole "missing tape" problem
Author:  ADSM-L (ADSM-L AT VM.MARIST DOT EDU) at unix,sh
Date:    6/23/97 10:29 AM


I'm sure this has come up before, but I can't remember how to solve the
problem.  One of our tape pools started to do a reclaimation last week until
one of the tapes it requested turned up missing.  An extensive search was
conducted, but the tape is just gone.  It was probably not labeled properly
and was reused by another process.

Our problem is, what to do with the reclaimation?  We have marked the tape
as unavailable, but the process asks for it anyway.  We can't seem to get
ADSM to understand that the tape and its contents are gone.  Any suggestions?
We are running ADSM v1 under VM.

Martha


# 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 Mon Jun 23 10:56:28 1997
#
# This archive contains:
#       02l6ikl
#
# 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 - 02l6ikl '[non-ascii]'
$unpacker <<'@eof'
begin 660 02l6ikl
M4F5C96EV960Z(&9R;VT@8V]R<&UX,#$@*&-O<G!M># Q+G1D8RYA;6]C;RYCX
M;VTI(&)Y('1U;&5O<VTQ('=I=&@@15--5% -"@DH,2XS-RXQ,#DN,C O,38NX
M,BD@:60@04$R-S4R-C S,#4[($UO;BP@,C,@2G5N(#$Y.3<@,3 Z,S@Z,C4@X
M+3 U,# -"E)E8V5I=F5D.B!F<F]M(&AO<VTQ,C)A(&)Y(&-O<G!M># Q("A3X
M34DM."XV+U--22TT+C I#0H):60@2T%!,C,W,C@[($UO;BP@,C,@2G5N(#$YX
M.3<@,3 Z,C@Z,S8@+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%!,#@W,3D[($UO;BP@,C,@2G5N(#$Y.3<@,3 Z-#$Z-3,@+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,#8Y-0T*(" H26YT97),;V-K(%--5% @1V%TX
M97=A>2 S+C I.R!-;VXL(#(S($IU;B Q.3DW(#$P.C,W.C,S("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(#0X-S([($UOX
M;BP@,C,@2G5N(#DW(#$Q.C,T.C(S($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-3,T,CL@36]N+" R,R!*=6X@,3DY-R Q,3HS-#HR,2 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@,S0QX
M-"!F;W(@041332U,0%9-+DU!4DE35"Y%1%4[($UO;BP@,C,@2G5N(#$Y.3<@X
M,3$Z,S0Z,3@@+3 T,# -"E)E8V5I=F5D.B!F<F]M(%9-+DU!4DE35"Y%1%4@X
M*$Y*12!O<FEG:6X@55)-34!-05))4U0I(&)Y(%9-+DU!4DE35"Y%1%4@*$Q-X
M86EL#0H@(" @(" @(" @5C$N,F(O,2XX8BD@=VET:"!"4TU44"!I9" U,S(XX
M.R!-;VXL(#(S($IU;B Q.3DW(#$Q.C,T.C$X("TP-# P#0I-97-S86=E+4EDX
M.B @/#DW,#8R,RXQ,3,T,3<N1414+E5234U 5DTN34%225-4+D5$53X-"D1AX
M=&4Z(" @(" @(" @36]N+" R,R!*=6X@,3DY-R Q,3HR.3HU.2!%1%0-"E)EX
M<&QY+51O.B B041333H@1&ES="!3=&]R($UA;F%G97(B(#Q!1%--+4Q 5DTNX
M34%225-4+D5$53X-"E-E;F1E<CH@(D%$4TTZ($1I<W0@4W1O<B!-86YA9V5RX
M(B \041332U,0%9-+DU!4DE35"Y%1%4^#0I&<F]M.B!-87)T:&$@36-#;VYAX
M9VAY(#Q54DU-0%9-+DU!4DE35"Y%1%4^#0I3=6)J96-T.B @(" @(%EE(&]LX
M92 B;6ES<VEN9R!T87!E(B!P<F]B;&5M#0I4;SH@041332U,0%9-+DU!4DE3X
'5"Y%1%4-"FEN                                                X
                                                             X
end
@eof
set `wc -lwc <02l6ikl`
if test $1$2$3 != 221761402
then
        echo ERROR: wc results of 02l6ikl are $* should be 22 176 1402
fi

chmod 660 02l6ikl

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