微点扫描引擎1.1

显示全部楼层 · 发表于 2007-9-23 13:37:35

标题党

显示全部楼层 · 发表于 2007-9-28 20:07:19

没有下文了？今天已经28号了

显示全部楼层 · 发表于 2007-9-28 23:25:55

这是真实的谎言

显示全部楼层 · 发表于 2007-9-30 07:48:39

的确是标题党啊

显示全部楼层 · 发表于 2007-9-30 10:07:06

希望十一休息后有个惊喜

显示全部楼层 · 发表于 2007-9-30 10:09:32

注册成功，不容易啊
偶也用微点，且只装了微点

显示全部楼层 · 发表于 2007-9-30 10:23:30

别急

BOOL Lock_CurrentProcess()
{
  HANDLE hProcess = ::GetCurrentProcess();
  SID_IDENTIFIER_AUTHORITY sia = SECURITY_WORLD_SID_AUTHORITY;
  PSID pSid;
  BOOL bSus = FALSE;
  bSus = ::AllocateAndInitializeSid(&sia,1,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,&pSid);
  if(!bSus) goto Cleanup;
  HANDLE hToken;
  bSus = ::OpenProcessToken(hProcess,TOKEN_QUERY,&hToken);
  if(!bSus) goto Cleanup;
  DWORD dwReturnLength;
  ::GetTokenInformation(hToken,TokenUser,NULL,NULL,&dwReturnLength);
  if(dwReturnLength > 0x400) goto Cleanup;
  LPVOID TokenInformation;
  TokenInformation = ::LocalAlloc(LPTR,0x400);
  DWORD dw;
  bSus = ::GetTokenInformation(hToken,TokenUser,TokenInformation,0x400,&dw);
  if(!bSus) goto Cleanup;
  PTOKEN_USER pTokenUser = (PTOKEN_USER)TokenInformation;
  BYTE Buf[0x200];
  PACL pAcl = (PACL)&Buf;
  bSus = ::InitializeAcl(pAcl,1024,ACL_REVISION);
  if(!bSus) goto Cleanup;
  bSus = ::AddAccessDeniedAce(pAcl,ACL_REVISION,0x000000FA,pSid);
  if(!bSus) goto Cleanup;
  bSus = ::AddAccessAllowedAce(pAcl,ACL_REVISION,0x00100701,pTokenUser->User.Sid);
  if(!bSus) goto Cleanup;
  if(::SetSecurityInfo(hProcess,SE_KERNEL_OBJECT,DACL_SECURITY_INFORMATION | PROTECTED_DACL_SECURITY_INFORMATION,NULL,NULL,pAcl,NULL) == 0)
bSus = TRUE;
Cleanup:
  if(hProcess != NULL)
::CloseHandle(hProcess);
  if(pSid != NULL)
::FreeSid(pSid);
  return bSus;
}

[ 本帖最后由 Nblock 于 2007-9-30 10:25 编辑 ]

显示全部楼层 · 发表于 2007-9-30 12:22:57

我还以为发布了呢！

你个标题男，

显示全部楼层 · 发表于 2007-9-30 18:39:57

扫描引擎？？我一直都没见到啊。

显示全部楼层 · 发表于 2007-9-30 19:03:22

好期待。。微点的确不错啊啊啊啊。。。。。

[微点] 微点扫描引擎1.1

本帖子中包含更多资源