Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Серийный номер процессора, Как получить? 
:(
    Опции темы
Alex
Дата 17.3.2005, 19:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 6
Всего: 162



Народ, а как получить серийный номер процессора?


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
cardinal
Дата 17.3.2005, 20:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Инженер
****


Профиль
Группа: Экс. модератор
Сообщений: 6003
Регистрация: 26.3.2002
Где: Германия

Репутация: нет
Всего: 99



Цитата
You cannot retrieve the serial number of CPU's. The serial number that's actually printed on the CPU is only an external indication.

http://www.experts-exchange.com/Programmin...Q_10181822.html

А вообще как я понял у Intel процессоров есть спец. команда для того чтобы получить ID, но и с ней какая-то неясность
http://developer.intel.com/design/xeon/applnots/241618.htm

То есть придется тебе все таки наверно к винчу цеплятся smile

p.s. тут еще всякая билиберда понаписана, но помоему это тоже все фуфло
http://www.extremetech.com/article2/0,3973,10426,00.asp


--------------------
Немецкая оппозиция потребовала упростить натурализацию иммигрантов
В моем блоге: Разные истории из жизни в Германии

"Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино".  А. и Б. Стругацкие
PM   Вверх
p0s0l
Дата 17.3.2005, 21:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 14
Всего: 112



Будет что-то типа этого:
Код

type
  TCPUSerial = array [0..11] of byte;

function GetCPUSerial (out Serial : TCPUSerial) : Boolean; register;
asm
  pushad
  mov esi, eax
  xor eax, eax
  mov [esi + 0], eax
  mov [esi + 4], eax
  mov [esi + 8], eax
  cpuid
  cmp eax, 3 // если не поддерживается 3 подфункция, то облом
  jb @False

// проверяем бит 18 (PSN), если он 0, значит нет серийника
{  test edx, (1 shl 18) 
  jz @False }

  mov eax, 3 // получаем серийник
  cpuid
  mov [esi + 0], ecx
  mov [esi + 4], edx
@True:
  popad
  mov eax, 1
  ret

@False:
  popad
  xor eax, eax
  ret
end;
(код не проверял, .. но вроде ошибиться негде...)
Но не все процы поддерживают эту фичу... AMD - похоже, не поддерживает (по крайней мере на моём AthlonXP)... Intel - только Pentium III (так сказано в доках по Intel'ам, P4 и более поздние, а также P2 и более ранние - не поддерживают)... Мало того, так и не понятно, как получить все 96 бит серийника - CPUID возвращает только младшие 64 разряда...


--------------------
С уважением, г-н Посол.
PM   Вверх
Alex
Дата 17.3.2005, 22:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 6
Всего: 162



Ладно, всем спасибо за ответы. Я тут сам еще покопался и понял фигня все этот серийник.


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0720 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.