Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-02-2008
lostprophets lostprophets is offline
Miembro
 
Registrado: sep 2006
Posts: 33
Poder: 0
lostprophets Va por buen camino
Ayuda Matar un proceso aunque cambie de nombre

weno actualmente uso esto:

Código Delphi [-]
function KillTask(FileName:String):integer;
var 
ContinueLoop:BOOL;
FSnapshotHandle:THandle;
FProcessEntry32:TProcessEntry32;
const 
PROCESS_TERMINATE=$0001;
begin 
FSnapshotHandle:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
FProcessEntry32.dwSize:=Sizeof(FProcessEntry32);
ContinueLoop:=Process32First(FSnapshotHandle,FProcessEntry32);
while integer(ContinueLoop)<>0 do 
begin 
if 
((UpperCase(ExtractFileName(FProcessEntry32.szExeFile))=UpperCase(FileName))
or (UpperCase(FProcessEntry32.szExeFile)=UpperCase(FileName)))
then 

Result:=Integer(TerminateProcess(OpenProcess(PROCESS_TERMINATE,BOOL(0),

FProcessEntry32.th32ProcessID),0));
ContinueLoop:=Process32Next(FSnapshotHandle,FProcessEntry32);
end; 
CloseHandle(FSnapshotHandle);
end; 


begin 
KillTask('Notepad.exe');
end

pero si le cambio de nombre al archivo se va a poder ejecutar no?

algo fijo y unico del archivo aparte del CRC ? PID? ayuda?

Última edición por lostprophets fecha: 06-02-2008 a las 21:14:15.
Responder Con Cita
  #2  
Antiguo 06-02-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 20
cHackAll Va por buen camino
Cita:
Empezado por lostprophets
...pero si le cambio de nombre al archivo se va a poder ejecutar no?
Pues dijiste CRC verdad? si obtienes el CRC o cualquier Hash podras identificar el ejecutable... es más, si haces un virus como muchos quieren y llegas a un nivel de polimorfismo; lamentablemente hay secciones únicas en el ejecutable que lo "delatan"

PD: No dejes de utilizar las etiquetas... para algo las han echo! [ delphi ]

Suerte.
Responder Con Cita
  #3  
Antiguo 06-02-2008
lostprophets lostprophets is offline
Miembro
 
Registrado: sep 2006
Posts: 33
Poder: 0
lostprophets Va por buen camino
tonces para detectar un proceso de acuerdo al CRC seria???????? =SSS
Responder Con Cita
  #4  
Antiguo 06-02-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 20
cHackAll Va por buen camino
Cita:
Empezado por lostprophets Ver Mensaje
tonces para detectar un proceso de acuerdo al CRC seria???????? =SSS
Es una pregunta? te pido escribas en forma adecuada.
Responder Con Cita
  #5  
Antiguo 06-02-2008
lostprophets lostprophets is offline
Miembro
 
Registrado: sep 2006
Posts: 33
Poder: 0
lostprophets Va por buen camino
entonces para detectar un proceso de acuerdo a su crc como seria






no abuses de tu poder...
Responder Con Cita
  #6  
Antiguo 06-02-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 20
cHackAll Va por buen camino
Cita:
Empezado por lostprophets Ver Mensaje
entonces para detectar un proceso de acuerdo a su crc como seria
Te explico; debes obtener la matriz del CRC32... luego al enumerar los procesos obtienes la ruta de la aplicación, abres el ejecutable y lo procesas para obtener su CRC; lo comparas con una lista que tengas de procesos "negros" y de acuerdo con el resultado de la comparación lo dejas o finalizas.

El anterior método es aplicable obteniendo la CRC desde la memoria... esto para el caso de que hayan renombrado la aplicacion; para ello en lugar de obtener la ruta y abrir el ejecutable; debes abrir la memoria virtual del proceso ajeno despues de haber habilitado el privilegio de Debugger en tu proceso.

En ambos casos la idea es comparar una "ID" en una lista.

Cita:
Empezado por lostprophets Ver Mensaje
no abuses de tu poder...
Poder? ehh bueno me alagas, pero dudo tener el poder de un dios griego o el poder de un volcan; pero en todas mis participaciones he respetado nuestra Guia de estilo. Simplemente mira mis respuestas y mira que tanto tiempo dedicas a tus preguntas para percatarte la desigualdad que existe. Lo de "alcarar tu pregunta" solo fue un consejo, si querias lo podías haber dejado como estaba y el destino del hilo hubiese sido otro.


Edito PD CRC32, en el Club hay ejemplos para abrir los archivos y "recorrerlos"

Saludos

Última edición por cHackAll fecha: 06-02-2008 a las 21:59:55. Razón: URLs
Responder Con Cita
  #7  
Antiguo 06-02-2008
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Cita:
Empezado por lostprophets Ver Mensaje
no abuses de tu poder...

¿cuál es el abuso de poder según vos aquí?
__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Matar proceso CB6 meme API de Windows 0 13-12-2007 12:39:52
Como listo el grupo de administradores, aunque le cambien el nombre l30 API de Windows 0 03-12-2007 21:56:47
Matar proceso raugadel API de Windows 9 05-10-2006 19:23:49
Evitar matar mi proceso acertij022 API de Windows 4 11-11-2005 16:20:21
Matar Proceso anitra_cattivo API de Windows 2 10-09-2003 19:10:55


La franja horaria es GMT +2. Ahora son las 11:11:29.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi