判断程序是否在虚拟机vmware内运行

判断程序是否在虚拟机vmware内运行

2012-02-06 08:02:53cnblogs.com-海利鸟-点击数:178

function isruninvmware(out errmsg: string): boolean;beginresult := false;try    asm      push     edx      push     ecx      push     ebx      mov      eax, 'vmxh'      mov      ecx, $0a      mov      edx, 'vx'      in       eax, dx      cmp      ebx, 'vmxh'      setz     [result]      pop      ebx      pop      ecx      pop      edx    end;except    on e: exception do      errmsg := e.message;end;end;

以上代码摘自 橙子