Discussion :

[MiJack]

Bonjour,

Afin de mieux protéger mes logiciels (au niveau du nombre de licences vendues), j'aimerais éviter que l'on puisse les installer à l'infini via des machines virtuelles (si c'est possible).

Si c'est possible, j'aimerais ne pas forcément bloquer l'installation de mon logiciel sur une MV, mais le rendre utilisable uniquement sur un seul ordinateur, et qu'il se bloque si la MV se trouve sur un autre ordi.

Donc ma questions :

Au sein de la machine virtuelle, est-il possible de détecter que l'on se trouve sur un ordinateur différent ? (je pense à utiliser les MAC adresses, mais pas encore sûr).

Avez-vous déjà eu des problèmes de ce genre ? Je ne trouve pratiquement rien à ce sujet sur le forum et même sur le web, mais je comprends que ça ne doit pas être évident...

Merci d'avance

[ShaiLeTroll]

Sache que dans une VM de chez Sun Innotek Virtual Box, il y a un ensemble de processus qui tourne, si ces process existe, tu es dans une machine virtuel

pour VMWare, je ne l'ai pas sous la main, lorsque je l'avais utilisé, il me semble aussi avoir vu des process

l'Adresse MAC, pourquoi pas ... le problème c'est sur quel critère éliminé une adresse ?

[Franck SORIANO]

J'ai déjà vu des applis refuser de s'installer dans des machines virtuelles (Essaie d'installer VMWare dans une machine virtuelle...) donc tu peux détecter si tu te trouves dans une machine virtuelle.
Par contre, la technique à utiliser pour celà risque d'être spécifique à chaque type de machine virtuelle. Donc tu risques d'en oublier...

Afin de mieux protéger mes logiciels (au niveau du nombre de licences vendues), j'aimerais éviter que l'on puisse les installer à l'infini via des machines virtuelles (si c'est possible).

Bon courage.
Déjà, ça ne sert à rien de contrôler quoi que ce soit à l'installation (sauf pour interdire purement et simplement l'installation dans une VM). En effet, l'intérêt d'utiliser une VM, c'est tu fais l'installation une et une seule fois, et ensuite tu copies la machine complète, pour avoir un nouvel environnement pré-installé.

je pense à utiliser les MAC adresses, mais pas encore sûr

Le problème c'est que la carte réseau elle-même est virtualisée par la VM. En d'autres termes, il est tout à fait possible que toutes les VM possèdent la même adresse MAC.
Par exemple, installe un VMWare avec une config réseau en Host-only (où même en NAT). Dans ce cas, l'adresse MAC n'est pas nécessaire pour que la trame ethernet arrive jusqu'à la machine hôte. Ensuite, c'est la VM qui l'acheminera jusqu'à la carte réseau virtuelle.
Je crois que tu peux même aller jusqu'à définir manuellement l'adresse MAC de la carte virtuelle...

[MiJack]

Effectivement, d'après la continuation de mes recherches, je ne trouve rien pour différencier la machine physique sur laquelle est installée la machine virtuelle.

Je me contenterai donc pour l'instant de bloquer l'installation des logiciels sur une machine virtuelle.

Le code que j'ai déniché pour contrôler si l'on se trouve dans VMWare ou VPC

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
program IsInVM;
 
{$APPTYPE CONSOLE}
 
uses
  windows;
 
function InVMware: Boolean;
asm
    XOR     EAX, EAX
 
    PUSH    OFFSET @@Handler
    PUSH    DWORD PTR FS:[EAX]
    MOV     DWORD PTR FS:[EAX], ESP
    MOV     EAX, 564D5868h
    MOV     EBX, 3c6cf712h
    MOV     ECX, 0Ah
    MOV     DX, 5658h
    IN      EAX, DX
    MOV     EAX, True
    JMP     @@NotHandle
@@Handler:
    MOV     EAX, [ESP+$C]
    MOV     TContext(EAX).EIP, OFFSET @@Handled
    XOR     EAX, EAX
    RET
@@Handled:
    XOR     EAX, EAX
@@NotHandle:
    XOR     EBX, EBX
    POP     DWORD PTR FS:[EBX]
    ADD     ESP, 4
end;
 
 function IsInVPC: boolean; assembler;
asm
  push ebp
 
  mov  ecx, offset @@exception_handler
  mov  ebp, esp
 
  push ebx
  push ecx
  push dword ptr fs:[0]
  mov  dword ptr fs:[0], esp
 
  mov  ebx, 0 // flag
  mov  eax, 1 // VPC function number
 
  // call VPC
  db 00Fh, 03Fh, 007h, 00Bh
 
  mov eax, dword ptr ss:[esp]
  mov dword ptr fs:[0], eax
  add esp, 8
 
  test ebx, ebx
  setz al
  lea esp, dword ptr ss:[ebp-4]
  mov ebx, dword ptr ss:[esp]
  mov ebp, dword ptr ss:[esp+4]
  add esp, 8
  jmp @@ret
  @@exception_handler:
  mov ecx, [esp+0Ch]
  mov dword ptr [ecx+0A4h], -1
  add dword ptr [ecx+0B8h], 4
  xor eax, eax
  ret
  @@ret:
end;
 
begin
 
 
if IsInVPC then writeln('Virtual PC detected') else writeln('Virtual Pc not detected');
if InVMware then writeln('VMWare Machine detected') else writeln('VMWare Machine not detected');
 
readln;
 
end.

[backmorda]

Bonjour, jusqu'à présent j'utilisais ces deux fonctions pour détecter les machine virtuelle les plus utilisées et cela fonctionnait bien. Malheureusement cela n'a pas l'air de fonctionner avec la nouvelle version de delphi que nous vennons d'acquérir (delphi 10 seattle). Quelqun peu m'aider ? comment puis-je détecter que l'exécutable tourne dans une machine virtuelle autrement, ou corriger ce code pour delphi 10 ? merci