S.M.A.R.T.-Werte auslesen

[TomDooley]

Hallo

Hat jemand Erfahrung, wie die S.M.A.R.T.-Werte (Self Monitoring, Analysis and Reporting Technology) von Festplatten ausgelesen werden können? Gibt's dazu evlt. Dephi-Komponenten oder API-Funktionen?
Bin um jede Hilfe dankbar.

es dankt und grüsst

Tom

[Luckie]

Ai. Das könnte haarig werden. Ich denke, mal dass Windows davon gar nichts mitbekommt, sondern nur das BIOS. Und in dem Fall dürfte es mit API Funktionen eher schlecht bestellt sein. Wenn es irgendwo greifbar steht, dann im BIOS. Aber wo und wie du da rankommst, .... frag mich bitte nicht. NicoDE ist unser BIOS Spezialist. Falls er den Thread nicht sieht, schreib ihm mal eine PN oder E-Mail.

[ManiacViper]

Hi,

schau mal unter

http://home.earthlink.net/~akonshin/...components.htm

nach. Dort gibt es einen Download IdeInfo2, der zumindest zeigt, wie man die Seriennummer, den Modelnamen und die Firmware-Version mit SMART ausliest. Das Beispiel-Programm verwendet die IOCTL API von Windows. Ein Beispielprogramm in C gibt es auf der Seite von Microsoft :

SAMPLE: SmartApp.exe Accesses SMART Stats in IDE Drives

Vielleicht hilft das ja ein bisschen weiter.

Daniel

[Muetze1]

Moin!

Korrektur: Der Modellname, Revision etc wird nicht über SMART ausgelesen sondern durch einen direkten INQUIRY Befehl an das ATA/ATAPI Gerät ermittelt.

MfG
Muetze1

[ManiacViper]

Hi,

hätte vielleicht dazu schreiben sollen, das ich mir das vorher nur flüchtig angeschaut habe. Hatte den Link in meinen Favoriten (wollte mich selbst mal mit SMART beschäftigen).

mfg Daniel
(der bei dem schönen Wetter gerne an der Ostsee wäre )

[digleu]

Information aus dem Bios:

Zitat von old.quellcodes.de:

Wie kann ich Bios Informationen auslesen?

05.12.2001 00:00

procedure TForm1.Button1Click(Sender: TObject);
begin
try
Label1.Caption := String(Pchar(Ptr($FE061))); // BIOS Name
Label2.Caption := String(Pchar(Ptr($FE091))); // CopyRight
Label3.Caption := String(Pchar(Ptr($FFFF5))); // BIOS Datum
Label4.Caption := String(Pchar(Ptr($FEC71))); // Seriennummer
except
Label1.Caption := 'n/a';
Label2.Caption := 'n/a';
Label3.Caption := 'n/a';
end;
end;

ja gut, hat nix mit SMART zu tun. Aber vielleicht hilft's trotzdem ;)

mfg Lars

[Luckie]

Unter NT ff. ist es sowieso fraglich, ob solche direkten Speicherzugriffe noch funktionieren.

[sCrAPt]

Ich hab XP SP1 und es funktioniert nicht

[Kernel32.DLL]

da gibbet doch bestimmt wat von torry oder swissdelphicenter... ma gucken...

mfg Daniel
(der bei diesem schönen Wetter Glück hat, an der Ostsee zu leben )

[Kernel32.DLL]

(just a little push...)

so schlecht ist der C++ Code von der Microsofty-Seite ja gar net. Man müsste ihn nur nach Delphi übersetzen.

*Visual C++ AutorenEdition + Dokumentation schnapp und Übersetzungsversuch start*