How to obtain the serial number of a specified CPU in a multi-core, multi-CPU system

How to obtain the serial number of a specified CPU in a multi-core, multi-CPU system
Skyjacker
(Please keep it intact and indicate the author and source)
http://www.cnpack.org
Cnpack IV QQ group:130970
2007-01-23

Thanks: Passion,bahamut, Good morning, air, skyjacker ...
Without the Bahamut, there is no such article.

In multi-CPU and multicore, different serial numbers are randomly obtained. This gives us a lot of trouble to make keygen based on the CPU serial number.
Windows 2000/XP allows you to set the affinity of processes and threads. In other words, you can control which CPU can run certain threads. This is called hard affinity. Windows provides a function setprocessaffinitymask that sets affinity. Use it to control the acquisition of the serial number of the specified CPU.

This article is divided into 2 parts:

1, how to get the serial number of the CPU.
2. How to obtain the serial number of the specified CPU or the specified CPU core.

1, how to get the serial number of the CPU.

Use the CPUID command to get.
Before calling the CPUID, the function code is stored in the EAX. After calling the CPUID, Eax,ebx,ecx,edx stores the various characteristic information of the CPU. This information is what we commonly call CPU serial numbers.

mov eax, 0//Get manufacturer Info
Cpuid

mov eax, 1//Get the serial number of the CPU
Cpuid

The following three functions are available for reference:

[C-sharp]View Plaincopy

2. function Newcpuid: string;
4. Const
6. CPUINFO = ' CPU Manufacturer:%s serial number:%x ';
8. Var
10. S:ARRAY[0..19] of Char;
12. Mycpuid:integer;
14. Begin
16. Fillchar (S, 20, 0);
18. Asm
20. Push EBX
22. Push ECX
24. Push edx
26. mov eax, 0
28. Cpuid
30. mov dword ptr s[0], ebx
32. mov dword ptr s[4], edx
34. mov dword ptr s[8], ecx
36. mov eax, 1
38. Cpuid
40. mov mycpuid, edx
42. Pop edx
44. Pop ecx
46. Pop ebx
48. End
50. Result: = Format (CPUINFO, [S, Mycpuid]);
52. End
56. function Getcpuid:tcpuid; Assembler; Register
58. Asm
60. PUSH EBX {Save affected Register}
62. PUSH EDI
64. MOV EDI, EAX [email={@Resukt]{@Resukt [/email]}
66. MOV EAX, 1
68. DW $A 20F {CPUID Command}
70. STOSD {cpuid[1]}
72. MOV EAX, EBX
74. STOSD {cpuid[2]}
76. MOV EAX, ECX
78. STOSD {cpuid[3]}
80. MOV EAX, EDX
82. STOSD {Cpuid[4]}
84. POP EDI {Restore Registers}
86. POP EBX
88. End
92. Get the serial number of the CPU:
96. function Getcncpuid (): string;
98. Const
100. CPUINFO = '%.8x-%.8x-%.8x-%.8x ';
102. Var
104. Ieax:integer;
106. Iebx:integer;
108. Iecx:integer;
110. Iedx:integer;
112. Begin
114. Asm
116. Push EBX
118. Push ECX
120. Push edx
122. mov eax, 1
124. DW $A 20F//cpuid
126. mov ieax, eax
128. mov iebx, ebx
130. mov iecx, ecx
132. mov iedx, edx
134. Pop edx
136. Pop ecx
138. Pop ebx
140. End
142. Result: = Format (CPUINFO, [Ieax, IEBX, IECX, Iedx]);
144. End

2. How to obtain the serial number of the specified CPU or the specified CPU core.

Depending on how Windows can set the affinity of processes and threads, the Setprocessaffinitymask function is used to control which CPU runs the process that obtains the sequence number, and therefore gets the serial number of the specified CPU. For compatibility with single CPUs, it is recommended to always get the serial number of the first CPU.

[C-sharp]View Plaincopy

2. Procedure SetCPU (H:thandle; Cpuno:integer);
4. Cpuno: Determines the number of serial numbers for the first few CPU cores.
6. Var
8. processaffinity:cardinal;
10. _systemaffinity:cardinal;
12. Begin
14. Getprocessaffinitymask (H, processaffinity, _systemaffinity);
16. Processaffinity: = Cpuno; //this Sets the process to only run on CPU 0
18. //for CPU 1 only use 2 and for CPUs 1 & 2 use 3
20. Setprocessaffinitymask (H, processaffinity)
22. End

How to use:

SetCPU (getcurrentprocess,1); First CPU core of the first CPU
ShowMessage (GETCNCPUID);

PostScript: This article originates from a discussion of the Cnpack group's question about obtaining the ID of a multicore CPU.
Thanks to all the members of the Cnpack group.

BS ' Good morning Air ' says, "You spend a lot of time in your short life doing this worthless thing"-_-!! Super BS, BS, BS ... ^_^
For i:=0 to 10000000000000000000000000000 do
BS;

Appendix "Good Morning Air" quotations:
' Give up, API's not for you '
' You spend a lot of time in your short life doing this worthless thing. '

Reference: http://blog.csdn.net/iseekcode/article/details/5284803

How to obtain the serial number of a specified CPU in a multi-core, multi-CPU system