Получения мак адреса

[linda88]

Получения мак адреса подскажите как получить мак адрес сетевой платы
Есть у материнской платы уникальный id и возможно ли его получить?

[p51x]

Сообщение от linda88

Получения мак адреса подскажите как получить мак адрес сетевой платы

https://docs.microsoft.com/en-us/win...ptersaddresses

Сообщение от linda88

Есть у материнской платы уникальный id и возможно ли его получить?

Смотря, что под этим понимать и для чего. Какую-ту инфу типа названия/серийника/... получить можно, но и поменять их можно.

[Баламут]

Ну я как-то так делал. Давно правда...

uses Windows, WinSock, SysUtils;

type
  TMacAddress = array [1..6] of byte;

...............
function GetMAC(Value: TMacAddress; Length: DWORD): String;
var
  i: integer;
begin
 if Length = 0 then Result := '00-00-00-00-00-00'
 else
 begin
  Result:= '';
  for i:= 1 to Length-1 do
   Result := Result + IntToHex(Value[i], 2) + '-';
  Result := Result + IntToHex(Value[Length], 2)
 end
end;

function GetMacFromIP(IP: string): string;
var
  DestIP, SrcIP: ULONG;
  pMacAddr: TMacAddress;
  PhyAddrLen: ULONG;
  ps: PAnsiChar;
begin
 GetMem(ps, Length(ip)*2);
 strPCopy(ps, AnsiString(ip));
 DestIP:= inet_addr(ps);
 FreeMem(ps);
 PhyAddrLen:= 6;
 SendArp(DestIP, 0, @pMacAddr, PhyAddrLen);
 Result := GetMAC(pMacAddr, PhyAddrLen)
end;

[linda88]

Сообщение от p51x

https://docs.microsoft.com/en-us/win...ptersaddresses


Смотря, что под этим понимать и для чего. Какую-ту инфу типа названия/серийника/... получить можно, но и поменять их можно.

Иметься ввиду привязка программы к мак адресу сетевой платы и материки чтобы нельзя было отвязать. Свое образная идентификация компьютера.

[p51x]

Я так и подумал. Это очень давно прошедший этап. Все эти значения легко меняются, а у легальных пользователей проблемы, например, при замене сетевухи.

[Баламут]

Вот ни один раз уже слышал об этом, но так и не понял... В каком месте у компа может быть УНИКАЛЬНЫЙ ID? И уж тем более который нельзя изменить. Сетевуха не в счет

[p51x]

Ну, теоретически, если собрать имя_материнки, ее серийник, модель системного диска, его серийник, мак адрес, ... то вероятность наткнутся на одинаковый набор уменьшается.
Про неизменить это сложнее, но, теоретически, если использовать всякие TPM и подобные...

[Баламут]

Ну так я об этом и говорю. Где взять серийник материнки? Что это вообще?

[p51x]

Есть несколько вариантов:
1. попроще, получить набор параметров

"BiosMajorRelease"
"BiosMinorRelease"
"ECFirmwareMajorRelease"
"ECFirmwareMinorRelease"
"BaseBoardManufacturer"
"BaseBoardProduct"
"BaseBoardVersion"
"BIOSReleaseDate"
"BIOSVendor"
"BIOSVersion"
"SystemFamily"
"SystemManufacturer"
"SystemProductName"
"SystemSKU"
"SystemVersion"

можно даже из реестра
2. посложнее, брать что-то типа GetSystemFirmwareTable и парсить SMBIOS
конечно, это ничего не гарантирует...

[linda88]

т.е. получается только сетевой платы неизменные параметры?