[m][SRC][Semaforos!] Alternativa a CreateMutex

Foro de elhacker.net

Programación

Programación General

.NET (C#, VB.NET, ASP)

Programación Visual Basic (Moderadores: LeandroA, seba123neo)

[m][SRC][Semaforos!] Alternativa a CreateMutex

0 Usuarios y 1 Visitante están viendo este tema.

Páginas: [1] 2

Autor

Tema: [m][SRC][Semaforos!] Alternativa a CreateMutex (Leído 6,748 veces)

Karcrack

Desconectado

Mensajes: 2.416

Se siente observado ¬¬'

[m][SRC][Semaforos!] Alternativa a CreateMutex

« en: 16 Marzo 2010, 15:58 pm »

Ya puse una alternativa hace un tiempo:

Código:

http://foro.elhacker.net/programacion_vb/srcmaltmutexbas_alternativa_a_createmutex-t243771.0.html

Pues aqui va otra trabajando con Semaforos

Código

Option Explicit
'KERNEL32
Private Declare Function CreateSemaphoreW Lib "kernel32.dll" (ByVal lpSemaphoreAttributes As Long, ByVal lInitialCount As Long, ByVal lMaximumCount As Long, ByVal lpName As Long) As Long
 
Private Const ERROR_ALREADY_EXISTS  As Long = 183&
 
Public Function bWasIOpened(ByVal lpName As String) As Boolean
    bWasIOpened = (CreateSemaphoreW(0&, 0&, 1&, StrPtr(lpName)) > 0) And (Err.LastDllError = ERROR_ALREADY_EXISTS)
End Function

Minimalista, como a mi me gusta >:D

Bueno, para que no sepa para que sirve esto lo explico, es bastante facil. Sirve para que no hayan dos instancias de nuestra aplicacion ejecutandose simultaneamente...
Una mejor explicacion de nuestro amigo MadAntrax

Cita de: ||MadAntrax|| en 19 Mayo 2007, 17:33 pm

sirve para controlar que nuestra aplicación no sea ejecutada 2 veces en un mismo equipo. Algunos pensareis que eso ya se puede hacer con

Código

If App.PrevInstance = True Then End

pero eso no es cierto... si nuestra aplicación se copia en System32 como: programa1.exe y programa2.exe... el usuario podrá ejecutar el programa1.exe y el programa2.exe simultáneamente! Eso puede suponer un problema en el caso de estar programando un troyano o un keylogger (donde lo importante es solo tener una instancia de nuestro malware a la vez).

Ejemplo de uso del code:

Código

Private Sub Form_Load()
    If bWasIOpened("Cualquier_Cosa") = True Then End
End Sub

Nota:Probar solo compilado.

Saludos


« Última modificación: 31 Marzo 2010, 16:18 pm por Karcrack »	En línea

(PGP ID)

Hasseds

Desconectado

Mensajes: 145

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #1 en: 16 Marzo 2010, 16:22 pm »

If App.PrevInstance = True Or App.EXEName <> "Project1" Then End

:silbar:


	En línea

Sergio Desanti

ssccaann43 ©

Desconectado

Mensajes: 792

¬¬

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #2 en: 16 Marzo 2010, 16:24 pm »

Jajaja XD...

Karcrack como dice cobein... Sos un capo...! Me gustó este code...! :


	En línea

- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"

Karcrack

Desconectado

Mensajes: 2.416

Se siente observado ¬¬'

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #3 en: 16 Marzo 2010, 16:24 pm »

Cita de: Hasseds en 16 Marzo 2010, 16:22 pm

If App.PrevInstance = True Or App.EXEName <> "Project1" Then End

:silbar:

Creo que no has leido la cita que he hecho a MadAntrax...
Si se renombra el fichero y se vuelve a ejecutar el proceso eso no sirve para nada

Cita de: ssccaann43 en 16 Marzo 2010, 16:24 pm

Jajaja XD...

Karcrack como dice cobein... Sos un capo...! Me gustó este code...! :

Gracias


	En línea

(PGP ID)

Hasseds

Desconectado

Mensajes: 145

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #4 en: 16 Marzo 2010, 16:33 pm »

Cita de: ssccaann43 en 16 Marzo 2010, 16:24 pm

Jajaja XD...

Karcrack como dice cobein... Sos un capo...! Me gustó este code...! :

+1 , tambien me gustó el code

Cita de: Karcrack en 16 Marzo 2010, 16:24 pm

Si se renombra el fichero y se vuelve a ejecutar el proceso eso no sirve para nada

Como que no sirve, si renombras (en la misma carpeta o ya está corriendo no hay segunda instancia
PD: y app.path en el caso que se renombre en otra carpeta


	En línea

Sergio Desanti

Karcrack

Desconectado

Mensajes: 2.416

Se siente observado ¬¬'

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #5 en: 16 Marzo 2010, 16:38 pm »

Cita de: Hasseds en 16 Marzo 2010, 16:33 pm

Como que no sirve, si renombras (en la misma carpeta o ya está corriendo no hay segunda instancia
PD: y app.path en el caso que se renombre en otra carpeta

1- No es buena idea 'hardcodear' un nombre (de carpeta o fichero, da igual), ya que eso es facilmente modificable...
2- Prueba a usar el metodo de app.PrevInstance haciendo esto:
Compila el ejecutable como "Proyecto1.exe" ejecutalo, ira sin problemas... copia el "Proyecto1.exe" a "Proyecto2.exe" y abrelo... veras que hay dos instancias de la misma aplicacion...


	En línea

(PGP ID)

Hasseds

Desconectado

Mensajes: 145

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #6 en: 16 Marzo 2010, 16:45 pm »

Cita de: Karcrack en 16 Marzo 2010, 16:38 pm

Cita de: Hasseds en 16 Marzo 2010, 16:33 pm

Como que no sirve, si renombras (en la misma carpeta o ya está corriendo no hay segunda instancia
PD: y app.path en el caso que se renombre en otra carpeta

1- No es buena idea 'hardcodear' un nombre (de carpeta o fichero, da igual), ya que eso es facilmente modificable...
2- Prueba a usar el metodo de app.PrevInstance haciendo esto:
Compila el ejecutable como "Proyecto1.exe" ejecutalo, ira sin problemas... copia el "Proyecto1.exe" a "Proyecto2.exe" y abrelo... veras que hay dos instancias de la misma aplicacion...

If App.PrevInstance = True Or App.EXEName <> "Proyecto1" Then End

como va a abrir Proyecto2 si no es = a Proyecto1


	En línea

Sergio Desanti

Karcrack

Desconectado

Mensajes: 2.416

Se siente observado ¬¬'

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #7 en: 16 Marzo 2010, 16:47 pm »

Cita de: Hasseds en 16 Marzo 2010, 16:45 pm

If App.PrevInstance = True Or App.EXEName <> "Proyecto1" Then End

como va a abrir Proyecto2 si no es = a Proyecto1

Si, si, mientras uses esa condicion al cambiar el nombre se cerrará... pero te digo que no es buena idea, porque si cambias el nombre al EXE original... es decir, cambias el nombre al "Proyecto1" por incluso "PROYECTO1" dejara de ir.... Por eso no es buena idea :xD

O si lo pusieses en un AutoExtraible del WinRar tampoco iria, porque a no ser que digas lo contrario el Winrar pone nombres aleatorios


	En línea

(PGP ID)

Sm0kes

Desconectado

Mensajes: 22

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #8 en: 16 Marzo 2010, 17:49 pm »

hey genial Karcrack lo tomare como alternativa vere que otros metodos habra me has motivado xD... Salu2 y thankz


	En línea

cobein

Desconectado

Mensajes: 759

Re: [m][SRC][Semaforos!] Alternativa a CreateMutex

« Respuesta #9 en: 16 Marzo 2010, 18:34 pm »

Muy bueno Karcrack =D

@Hasseds, todo eso que pusiste se puede "saltar" por ejemplo copiando la app a otra unidad, mismo nombre etc y va a correr. Digamos que los semaforos o mutex son alternativas mas "globales"


	En línea

http://www.advancevb.com.ar
Más Argentino que el morcipan
Aguante el Uvita tinto, Tigre, Ford y seba123neo
Karcrack es un capo.

Páginas: [1] 2

Ir a:

Mensajes similares
	Asunto	Iniciado por	Respuestas	Vistas	Último mensaje
	[SRC][mAltMutex.bas] Alternativa a CreateMutex Programación Visual Basic	Karcrack	5	4,999	8 Febrero 2009, 22:27 pm por seba123neo
	Semáforos en C Programación C/C++	masterson	3	11,321	19 Junio 2011, 06:15 am por CorruptedByte
	Consulta semáforos y señales Programación C/C++	NewBe	2	3,153	29 Diciembre 2011, 03:57 am por dooque
	Semaforos en c Programación C/C++	prosebas	5	5,409	25 Junio 2021, 19:26 pm por Eternal Idol