Mensajes

muchas gracias a los dos por responder, si era el problema de la estructura, el unico problema que tengo ahora es, que no termina el proceso, pero eso debe ser un error de logica (me perdi entre tantos saltos  ). De eso me encargo yo.

saludos y de nuevo gracias 

Hola tengo un problema, este programa pide el nombre de un proceso y despues procede a terminarlo, pero no lo hace la funcion Process32First me devuelve nul y no se porque, yo creo que pase bien los parametros, por favor ayudenme a encontrar el error, esta un poco enredado porque soy novato, lo organize lo mejor que pude

Código (asm) [Seleccionar] Expandir


format pe console
entry main
include 'c:\fasm\include\win32ax.inc'
.data
;Data begin--------------------------------------------------\
struct PROCESSENTRY32                                        ;
       dwSize                    dd              ?           ;
       cntUsage                  dd              ?           ;
       th32ProcessID             dd              ?           ;
       th32DefaultHeapID         dw              ?           ;
       th32ModuleID              dd              ?           ;
       cntThreads                dd              ?           ;
       th32ParentProcessID       dd              ?           ;
       pcPriClassBase            dd              ?           ;
       dwFlags                   dd              ?           ;
       szExeFile                 rb              MAX_PATH    ;
ends                                                         ;
pInfo                   PROCESSENTRY32                       ;
hProcess                dd              ?                    ;
hProcesses              dd              ?                    ;
TH32CS_SNAPPROCESS      equ             0x00000002           ;
NORM_IGNORECASE         equ             0x00000001           ;
LOCALE_USER_DEFAULT     equ             0x0400               ;
CSTR_EQUAL              equ             0x2                  ;
PROCESS_TERMINATE       equ             0x0001               ;
lpExe                   db              256 dup(0)           ;
;Data ends---------------------------------------------------/
.code
;Code Begins-------------------------------------------------\
main:                                                        ;
        invoke printf,"Escriba el proceso a terminar: "      ;
        invoke scanf,"%s",addr lpExe                         ;
        xor eax,eax                                          ;
        push eax                                             ;
        push TH32CS_SNAPPROCESS                              ;
        call [CreateToolhelp32Snapshot]                      ;
        cmp eax,INVALID_HANDLE_VALUE                         ;
        jne NoE1                                             ;
        push 1                                               ;
        call ErrorReport                                     ;
        jmp main@Salir                                       ;
   NoE1:                                                     ;
        mov [hProcesses],eax                                 ;
        push pInfo                                           ;
        push [hProcesses]                                    ;
        call [Process32First]                                ;
        cmp eax,FALSE                                        ;
        jne NoE2                                             ;
        push 2                                               ;
        call ErrorReport                                     ;
        jmp main@Salir                                       ;
   NoE2:                                                     ;
        bucle1:                                              ;
                push 0xFFFFFFFF                              ;
                push lpExe                                   ;
                push 0xFFFFFFFF                              ;
                push pInfo.szExeFile                         ;
                push NORM_IGNORECASE                         ;
                push LOCALE_USER_DEFAULT                     ;
                call [CompareString]                         ;
                cmp eax,CSTR_EQUAL                           ;
                jne Next                                     ;
                push pInfo.th32ProcessID                     ;
                push FALSE                                   ;
                push PROCESS_TERMINATE                       ;
                call [OpenProcess]                           ;
                cmp eax,0                                    ;
                je Next                                      ;
                mov [hProcess],eax                           ;
                push 0                                       ;
                push [hProcess]                              ;
                call [TerminateProcess]                      ;
                push [hProcess]                              ;
                call [CloseHandle]                           ;
                                                             ;
           Next:                                             ;
                push pInfo                                   ;
                push [hProcesses]                            ;
                call [Process32Next]                         ;
                cmp eax,FALSE                                ;
                je FinBucle1                                 ;
        jmp bucle1                                           ;
        FinBucle1:                                           ;
        push [hProcesses]                                    ;
        call [CloseHandle]                                   ;
main@Salir:                                                  ;
                                                             ;
leave                                                        ;
ret                                                          ;
;Main Ends''''''''''''''''''''''''''''''''''''''''''''''''''';
;ErrorReport Begins'''''''''''''''''''''''''''''''''''''''''';                                                             ;
proc ErrorReport,raz                                         ;
call [GetLastError]                                          ;
cmp [raz],1                                                  ;
je @0                                                        ;
cmp [raz],2                                                  ;
je @1                                                        ;
cmp [raz],3                                                  ;
je @2                                                        ;
jmp @def                                                     ;
@0:                                                          ;
        invoke printf,"Error Handle Invalido code %d ",eax    ;
        jmp Error@Salir                                      ;
@1:                                                          ;
        invoke printf,"Error cannot open the process ",eax    ;
        jmp Error@Salir                                      ;
@2:                                                          ;
        jmp Error@Salir                                      ;
@def:                                                        ;
        invoke printf,"Error desconocido code %d ",eax        ;
Error@Salir:                                                 ;
call [GetLastError]                                          ;
invoke printf,"%d",eax                                       ;
leave                                                        ;
ret                                                          ;
endp                                                         ;
;ErrorReports ends''''''''''''''''''''''''''''''''''''''''''';
;.code ends--------------------------------------------------/
section '.idata' import data readable
library k32,'kernel32.dll',msv,'msvcrt.dll'
import k32,CreateToolhelp32Snapshot,'CreateToolhelp32Snapshot',\
GetLastError,'GetLastError',Process32First,'Process32First',\
       CompareString,'CompareStringA', OpenProcess,'OpenProcess',\
       TerminateProcess,'TerminateProcess', \
       CloseHandle,'CloseHandle',Process32Next,'Process32Next'
import msv,printf,'printf',scanf,'scanf'


saludos

porque odias a los que hacen virus? deberias odiar a aquellos que no hacen los sistemas lo suficientemente seguros, como para prevenir este tipo de cosas.
Yo personalmente he perdido varios trabajos por culpa de los virus, pero no por eso voy a odiarlos, al contrario los admiro por poder burlar un sistema que segun es muy seguro, y a los avs por los que tanto te cobrarn y que segun son lo ultimo en tecnologia.
Claro cada quien debe tener una etica personal a la hora de que hacer con sus codigos.

P.D Aunque paresca no estoy a favor de la creacion de virus, porque causan daños a las personas que menos saben pero me parecen interesantwes

lo unico que puedo decir es...estas fumado ny0x.

estas viviendo en Alicia y el mundo al revés...a mi no me gusta la gente que hace los virus...(!!! por Dios a quien le gusta??) es como admirar a la gente maligna que hace los misiles y culpar a la gente inocente que no hace las casas totalmente seguras para afrontar un misilazo...esta pagina se llamara elhacker.net sera para estudiar los metodos de creación de virus y demas y es lindo aprenderlo, probar... lo admito...pero no digas que admiras al que hacen los virus...no es lindo padecer un virus...supogamos que me entre un virus a mi maquina ¿ en vez de maldecirlo,entonces voy a tener que admirar al creador?  ..que tonteria...se ve que nunca te entro uno de verdad.y no es verdad que causa daño a las personas que menos saben...causa daño a cualquiera que lo padezca...cualquier usuario que sabe como manejarse y como evitar los virus, le puede entrar tambien uno..por mas que este sepa un monton...y decis que perdiste varios trabajos por los virus...y admiras al que creo los virus que te hicieron perder el trabajo  ??...o no tenias ganas de trabajar??

saludos.

sabes porque los admiro, porque gracias a los virus que me han entrado me hedado cuenta, de lo inseguro que era mi sistema y me llevo a mejorar, es cierto perdi mis trabajos pero no fue culpa del creador del virus fue mi culpa por no estar atento y abrir cualquier cosa que descargo.
yo creo que xcryptor tienes razon puedes aprender a programar con cualquier cursillo barato, pero programar un virus o un antivirus requiere mucho ingenio y habilidad, a la vez que mejora tus capacidades como programador. En cuanto a la seguridad me canse de regalarle mi dinero a los antivirus y me mejor me cambie a ubuntu, ahora windows solo lo tengo en una maquina virtual por el photoshop que estoy a aprendiendo si no tambien le digo bye.

Reflexiona si te entra un virus quien se tiene la culpa el que lo programo o tu que abres cualquier cosa sin saber de donde vino, o que no te extraña que el icono de tu usb cambio, al igual que su menu contextual y que curiosamente tiene una carpeta llamada recycler...

Pero ya no sigo no quiero armar una tormenta en un vaso de agua, ni parecer que solo busco problemas

[Por eso si lo haces para aprender te doy todo mi apollo.. si quieres usarlo para mal o molestar te deseo todo lo peor ...]

De verdad esas mierdas joden a gente que usa eso para trabajar como a mi madre
que le entro una p**a ***** de esas.. odio.. rotundamente odio a la gente que usa estos codigos para usarlos maliciosamente.. quizas no seas vos el caso que lo use para mal sino para aprender pero de verdad odio y mataria a la gente que lo usa para hacer mal o simplemente molestar... Para que lo hacen? tienen alguna carencia familiar? Son de naturaleza maldosa?...
Porque la gente no les hace nada para que hagan esa *****!!!!
De verdad no pierdan el tiempo haciendo eso...
Yo lo mas malo que he echo es un espiador de WebCam pero nunca, nunca lo saque a la luz ni siquiera done el Source como Hizo el de MSN Kiker que se hizo un escandalo tremendo cuando llego a las manos de los niñatos ...

Por eso si lo haces para aprender te doy todo mi apollo.. si quieres usarlo para mal o molestar te deseo todo lo peor ...
Porque gente como mi madre que usan eso para trabajar, llevar facturas en ellos y todo eso no tienen la culpa de carencias mentales de la gente que hacen esos virus para la finalidad que le quieran dar

Salu2

Ranslsad

porque odias a los que hacen virus? deberias odiar a aquellos que no hacen los sistemas lo suficientemente seguros, como para prevenir este tipo de cosas.
Yo personalmente he perdido varios trabajos por culpa de los virus, pero no por eso voy a odiarlos, al contrario los admiro por poder burlar un sistema que segun es muy seguro, y a los avs por los que tanto te cobrarn y que segun son lo ultimo en tecnologia.
Claro cada quien debe tener una etica personal a la hora de que hacer con sus codigos.

P.D Aunque paresca no estoy a favor de la creacion de virus, porque causan daños a las personas que menos saben pero me parecen interesantwes

yo hice algo parecido con c pero como ahi no hay el App.Path... es algo sencillo pero cuando lo haces por primera vez... es otra historia. Pero imaginense como se hari aen ensamblador  , que rompedura de cabeza ...

igual puedes usar:

Código:

shell\explore\Command=TuEXE

Código [Seleccionar] Expandir



y de igual forma en las demas opciones solo debes aprender a leer el regitro de windows, para saber identificar estas lineas...¡!



el problema con esto es que no funciona en vista, bueno lo otro si funciona pero te aparece el autorun de un cd cuando vas a instalar un programa

lo que me confunde son los terminos, eso de numeros reales, naturales, conjunto no se que ...
en cuanto a la resolucion de problemas creo que lo lei en un libro de C++, creo que es la edicion especial de "El lenguaje de programacion c++" por bjarne stroupstrup. Ahi recomienda lo que tu dices, pero como cuando yo lei eso ya tenia el mal habito de escribir lo que se me ocurra sin planearlo antes. A causa de eso me he dado una de roturas de cabeza ...  . Pero bueh cuando aprendes solo no tienes muchas opciones, ni quien te guie 
gracias, por los links saludos
P.D A practicar algoritmos ... 

dos naturales consecutivos A y B tales que K €[A!,B!]
(P-Q) mientras sea menor que K, donde:
P=(-1)E*E*F
Q=(-1)E+1*(E+1)*F
E = 0, 1, ...

WTF? demasiadas matematicas para mi cerebro  , a mi todavia no me enseñan calculo (creo que eso es) o si no si me animo 

un keylogger no es tan facil como parece, me parece que tienes que hacer un hook al mensaje WH_KEYBOARD de windows, para poder capturar todas las teclas que se pulsen, porque si no lo haces asi solo se capturaran cuando tu app este enfocada. Por que? Windows captura los mensajes del teclado, raton ,etc y se los pasa a la ventana activa entonces el hook lo que hace es interceptar el mensaje antes que se pase a la ventana activa.
Bueno es todo lo que puedo decirte porque no se mucho de la api de window

P.D no se si en java se puedan acceder a las apis de windows, lo que te dije es aplicable a lenguajes como c, c++, vb, delphi.
Java no se

error de principiante, vengo de c y no estoy acostumbrado a que el valor de retorno se devuelva en un lugar especifico. No me habia dado cuenta, parece ser que lo que yo puse segun para comprobar que el code iba bien me lo echo a perder .
Y nadie puede desanimarme (creo  ) , si yo me propongo algo lo logro aunque me cueste la cordura.
Cuando empece con c estaba peor, no sabia ni que era una variable 

P.D Gracias por contestar

Hola graicas por responder, intente hacer un code pero me surgen unas dudas, el lea solo me funciona dentro de main y no dentro len, bueno si compila pero se supone que debe mostrar holamundo pero no muestra nada (un messagebox vacio), y creo que a eso se deba que tarde tanto en salir de la funcion, los messagebox los puse para poder llevar un seguimiento de las variables.

Código (asm) [Seleccionar] Expandir


include 'c:\fasm\include\win32ax.inc'
entry main
section '.code' code readable executable
main:

invoke MessageBoxA,0,Hello,0,0
push Hello
call len
invoke MessageBoxA,0,0,0,0
mov eax,0
ret

proc len,cad
lea edx,[cad]
invoke MessageBoxA,0,edx,edx,0
mov ecx,0
buc:
cmp edx,0
je salir
inc edx
inc ecx
jmp buc
salir:
mov eax,ecx
ret
endp



section '.data' data readable writeable
        Hello     db   'holamundo',0
        var       rb   256
section '.idata' import data readable
library u32,'user32.dll'
import u32,MessageBoxA,'MessageBoxA'

ayuda, ya se que puede ser desesperante explicarle algo a quien no entiende mucho sobre el tema, pero por favor sean pacientes por cierto uso fasm, lo de offset es tambien valido para fasm?

gracias