sslug-teknik team mailing list archive
-
sslug-teknik team
-
Mailing list archive
-
Message #34945
Re: Linux låst fast.
On 27 Mar 2001, Ole Tranberg wrote:
> Mads Bondo Dydensborg <madsdyd@xxxxxxxxxxxx> skrev:
>
> > On 27 Mar 2001, Ole Tranberg wrote:
> >
> > > Mads Bondo Dydensborg <madsdyd@xxxxxxxxxxxx> skrev:
> > >
> >
> > > > Ram fejl kan pludseligt opstå.
> > >
> > > Ja, det har jeg også tænkt på. Hvordan kan jeg tjekke rammen igennem?
> > > Jeg har prøvet med memtest86, som fik lov til at køre i 20-30
> > > minutter, der blev der ikke fundet nogle fejl. Er der andre måder at
> > > tjekke rammen på?
> >
> > Det burde være det rigtige program, men 20-30 minutter er da ikke ret lang
> > tid?
>
> Hvor længe bør den køre?
En nat, vil jeg mene.
>
> > Kan du pinge maskinen når den er låst fast?
>
> Det mener jeg at jeg kunne første gang det skete, men jeg må indrømme
> at jeg er blevet i tvivl. I går prøvede jeg nemlig igen, og der kunne
> jeg ikke. På netværket så det helt ud som om maskinen var blevet
> slukket.
Æv. Har du holdt øje med hukommelsesforbruget når den kører?
Mads
--
Mads Bondo Dydensborg. madsdyd@xxxxxxxxxxxx
#!/usr/bin/perl -w
# 526-byte qrpff, Keith Winstein and Marc Horowitz <sipb-iap-dvd@xxxxxxx>
# MPEG 2 PS VOB file on stdin -> descrambled output on stdout
# arguments: title key bytes in least to most-significant order
$_='while(read+STDIN,$_,2048){$a=29;$c=142;if((@a=unx"C*",$_)[20]&48){$h=5;
$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;$d=
unxV,xb25,$_;$b=73;$e=256|(ord$b[4])<<9|ord$b[3];$d=$d>>8^($f=($t=255)&($d
>>12^$d>>4^$d^$d/8))<<17,$e=$e>>8^($t&($g=($q=$e>>14&7^$e)^$q*8^$q<<6))<<9
,$_=(map{$_%16or$t^=$c^=($m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;$t
^=(72,@z=(64,72,$a^=12*($_%16-2?0:$m&17)),$b^=$_%64?12:0,@z)[$_%8]}(16..271))
[$_]^(($h>>=8)+=$f+(~$g&$t))for@a[128..$#a]}print+x"C*",@a}';s/x/pack+/g;eval
Follow ups
References