Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   CPUID Test (https://www.delphipraxis.net/32008-cpuid-test.html)

micsie 17. Okt 2004 15:42

Re: CPUID Test
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hier der Screenshot mit den Daten.
Die Taktrate wird wie beim Pentium automatisch geregelt. Ich bezweifle aber, dass die 1,8 GHz CPU im Modus "minimale Batteriebelastung" immer noch mit 1,2 GHz läuft.

mfg

scp 17. Okt 2004 16:08

Re: CPUID Test
 
Habe ihn jetzt mal eingetragen, weis allerdings nicht, ob es dann einen "normalen" Pentium 4 gibt, der diesselbe Family/Model/Ext.Family-Kennzeichnung hat.

EDIT: Habs rausgefunden und eingetragen: der "normale" hat ne andere Brand-ID.

fiasko 17. Okt 2004 16:42

Re: CPUID Test
 
Zitat:

Zitat von scp
Ah, den hatte ich noch nicht in der Liste. Weisst du zufällig den "Codenamen"?
Wie schon gesagt, an der Taktrate werde ich nichts ändern, es sei denn ich finde (zufällig) noch eine andere Funktion dafür.

Hmm, meinst du Pentium-M 755?

scp 17. Okt 2004 18:13

Re: CPUID Test
 
Nein, ich meinte "Dothan", aber jetzt weiss ichs ja :)
Habe diesen CPU jetzt eingetragen und habe jetzt die richtige BrandTable für P4s eingebaut, die Namen dürften jetzt stimmen.

DaBoss 17. Okt 2004 22:31

Re: CPUID Test
 
Wen es interessiert, hier mal ein paar c sourcen, mit denen sich die CPU frequenz exakt bestimmen lässt...

long __stdcall GetCPUFrequency(void)
{
LARGE_INTEGER ulFreq, ulTicks, ulValue, ulStartCounter, ulEAX_EDX;
QueryPerformanceFrequency(&ulFreq);
QueryPerformanceCounter(&ulTicks);
ulValue.QuadPart = ulTicks.QuadPart + ulFreq.QuadPart;
_asm
{
rdtsc
mov ulEAX_EDX.LowPart, EAX
mov ulEAX_EDX.HighPart, EDX
};
ulStartCounter.QuadPart = ulEAX_EDX.QuadPart;
do
{
QueryPerformanceCounter(&ulTicks);
} while (ulTicks.QuadPart <= ulValue.QuadPart);
_asm
{
rdtsc
mov ulEAX_EDX.LowPart, EAX
mov ulEAX_EDX.HighPart, EDX
};
ulFreq.QuadPart = ulEAX_EDX.QuadPart - ulStartCounter.QuadPart;
return (long) ulFreq.QuadPart / 1000000;
};

Das Original ist von Code-Guru, von wem weiß ich nicht. Hab es ein wenig modifiziert... braucht genau :) 1 sekunde und ermittelt immer die selbe frequenz...

Muetze1 17. Okt 2004 22:35

Re: CPUID Test
 
Moin!

@scp: Dein Tool ermittelt falsche Werte beim Cache:

Zitat:

Zitat von TestCPUIDEx
Instruction TLB: 4K, 2M or 4M pages, fully associative
Data Cache: Sectored, 64 byte cache line, 4 way set associative, 8K
L2 unified cache: No L2 cache
Instruction Trace Cache: 4 way set associative, 12K uOps
L1i Cache: Size 0KB, Assoc 0, Lines 0, Line Size 0, TLB 64, TLB Assoc 0

Zitat:

Zitat von mein Tool
cache information
Instruction TLB: 4-KB, 2-MB or 4-MB pages, fully associative, 64 entries
Data TLB: 4-KB or 4-MB pages, fully associative, 64 entries
1st-level data cache: 8-KB, 4-way set associative, sectored cache, 64-byte line size
No 2nd-level cache or, if processor contains a valid 2nd-level cache, no 3rd-level cache
Trace cache: 12K-uops, 8-way set associative
2nd-level cache: 512-KB, 8-way set associative, sectored cache, 64-byte line size

Cache summary...
8 KB L1 cache
-> 0 KB L1 instruction cache
-> 8 KB L1 data cache
512 KB L2 cache
no L3 cache

Wobei ich glaube, das sich dein Tool vor allem beim 2nd Level Cache an dem fett markierten Eintrag in den Cache Deskriptoren verschluckt...

MfG
Muetze1

tn249 17. Okt 2004 22:41

Re: CPUID Test
 
mein p2 , der mit 266Mhz angegeben ist kommt laut deinem programm nur auf 250Mhz

Luckie 21. Sep 2005 17:33

Re: CPUID Test
 
Wenn ich es so aufrufe:
Delphi-Quellcode:
  sl := TStringList.Create;
  CPUInfo := GetCPUInfo(sl);
Dann lande ich wohl irgendwo in einer Endlosschleife.

Deine Demo geht aber bei mir.

Alles, was ich eigentlich brauche ist:
Delphi-Quellcode:
s := CPUInfo.Brandname + ' ' + CPUInfo.Codename;
Nachtrag: Habe Mist gebaut. :wall: Geht jetzt.

Und die Features in eine StringListe zu stecken finde ich etwas unpraktisch.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:08 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz