Új hozzászólás Aktív témák

• #2955 Rover623 félisten doc #2954

  Új Válasz 2007-09-27 19:11:59 #2955

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Rover623

  félisten

  válasz doc #2954 üzenetére

  Már mondtam: lószart írtál te olyat...

  1. 25 éve programozok...ha megkérdeznek, írtam-e x. vagy y. progit/szubrutint/stb, a mai napig meg tudom mondani hogy igen vagy sem...és azt is hogy milyen nyelven írtam...az elvével együtt...
  2. a BIOS-t tutira nem mentetted le...az egy kezemen meg tudom számolni, hány ember fért hozzá a BIOS-hoz DOS alatt...a világon! És még ők sem mindegyikhez...
  3. a BIOS-t hiába mentetted le, abból ugyan nem törölted a jelszót, mert semmi köze hozzá! A CMOS memóriában van tárolva, kódolva...gyártónként más helyen, más hosszban, más kódolással.
  A CMOS-ból a jelszóvédelem törlése amúgy "egyszerű" dolog...csak be kell azonosítani a BIOS jellegét és tudni kell, melyik flag-et kell törölni...általában egyetlen bitet kell arréblökni...csak tudni kell melyiket.
  Egy egyszerű törlőprogi főprogramja pld. így nézett ki...pont 10 évvel ezelőtt, tehát akkor amikor állítólag te is ilyet írtál...

  Program ClrPswd;

  {$M 8192,16384,65536}

  Uses
  CRT,
  CMOS,
  CMOSUtil,
  Azonosit;

  Const
  CopyRight = 'BIOS (AMI/AWARD/PS2/PHOENIX) password cleaner V1.02 Agis(C) 1997';

  Var
  Helye,
  Maszk : Byte;
  Begin

  HighVideo;
  WriteLn (Copyright);
  LowVideo;
  WriteLn;

  Helye := 0;
  Case BIOSTyp Of
  bAwardOld.. { a teljesen régi ‚és a 4.50 }
  {bAward,} { 4.50G }
  bAwardNew: { 4.50G 11/23/94 ‚és utána }
  Begin
  Helye := $11;
  Maszk := $FD;
  If (BIOSTyp > bAwardOld) Then Begin
  WriteCMOSWithCRC ($4F, (ReadCMOS ($4F) And $FE) );
  End; {}
  End; {Award}
  bAMI: { a "sima" AMI BIOS }
  {bAMINew:} { a "szines" AMI Hi-Flex BIOS }
  {lehet hogy ezt is itt kell ?}
  Begin
  Helye := $34;
  Maszk := $3F;
  End; {AMI}
  bAMINew.. { a "szines" AMI Hi-Flex BIOS }
  {bAMIEXTRA,} { a "zöld" AMI ‚és az AMI WINBIOS }
  bAMIWIN4: { a 4 HDD-s AMI WINBIOS }
  Begin
  Helye := $37;
  Maszk := $8F;
  WriteCMOSWithCRC($67, (ReadCMOS ($67) And $0F));
  End; {uj AMI}
  bPS2:
  Begin
  Helye := $13;
  Maszk := $FC;
  End; {PS2}
  bPhoenix:
  Begin
  For Maszk := $2A to $2C do WriteCMOSWithCRC(Maszk,$00);
  Helye := $55;
  Maszk := $FE;
  End; {Phoenix}
  Else Begin
  HighVideo;
  WriteLn ('Sajnálom, ezt BIOS-t nem ismeri a program !');
  LowVideo;
  Exit;
  End; {ha nem kezelt BIOS}
  End; {case}

  If (Helye <> 0) Then begin
  WriteCMOSWithCRC (Helye, (ReadCMOS (Helye) And Maszk) );
  End;{if}

  Write ('A BIOS jelszóvédelem ');
  HighVideo;
  Write ('ki');
  LowVideo;
  WriteLn (' van kapcsolva !');

  End.

  Szóval a hamukálást hagyjuk más fórumokra...ez itt egy programozás topic, nem mesedélután...

  P.S.:
  A lényeg (a BIOS pontos beazonosítása) egyébként az "Azonosit" unitban van...alig ezer sor...

Új hozzászólás Aktív témák