Buscar

programa que diga el ID. de red de una ip


 
 Old 30 nov 2005, 16:07   #1 (permalink)  
Miembro activo
 
Avatar de Shirkkan
 
Registrado: febrero 2005
Ubicación: búscame y me encontrarás
Mensajes: 1.943

Predeterminado programa que diga el ID. de red de una ip

A ver si me se explicar. jeje

Resulta que yo estoy en una residencia de estudiantes, y tenemos un horario para enchufar el emule. Es de 12 de la noche a 9 de la mañana, por la sencilla razón de que si se enchufa durante el dia, el que quiere trabajar y necesita internet no puede navegar. Entonces se puso el convenio de poder enchufarlo al horario que he dicho.

Pero hay quien se salta las reglas. Mi grupo (que somos los informáticos mas veteranos) somos a los que siempre preguntan a ver quien tiene enchufado el emule durante el dia (quien dice emule dice cualkier p2p).

Entonces, yo abro el programa Ethereal y me dice las ips de la red que están consumiendo ancho de banda. Y con el programa WinPcap también dice si se trata del edonkey / emule, bittorrent, etc...

Ahora, sabiendo que ip's están usando un p2p a una hora que no se puede, pongo la ip en el programa "Angry IP Scanner" y me dice el identificador de la red que tiene asociada esa ip. Es decir, si por ejemplo pongo mi ip, en el programa saldría: Shirkkan, porque es el nombre que uso en la red de esta residencia.

Pues bien, desde hace unos dias, la mayoría de ip's no las reconoce. Solo reconoce unas pocas.
Entonces, después de esta parrafada, mi pregunta es: sabeis de algun programa como el angry ip scanner que al darle la ip de una red, te diga el nombre que usa esa ip en la red?

Es que vamos a tomar medidas drásticas. El director ya nos ha encomendado la tarea .

Y otra cosa. El primer año usábamos un programa llamado Net Send Spoofer que enviaba mensajes de texto a una cierta ip dentro de una red.
Ese programa ahora no funciona, es decir, no envía ningun sms. Como si hubiesen desactivado la opción de envio de mensajes por la red.
Sabeis de algun programa que permita el envio de estos mensajes para avisar a la peña que tienen que apagar el p2p?


Y ya con esto, acabo. El que lo lea todo....bravo.

Un saludo, y gracias

___.-·*·-.___ S H I R K K A N ___.-·*·-.___


___.-·*·-.___ B Ý ___.-·*·-.___
Shirkkan is offline   Citar y responder
 
 Old 30 nov 2005, 17:21   #2 (permalink)  
Moderador
 
Avatar de the_ma3x
 
Registrado: febrero 2005
Ubicación: México
Mensajes: 4.325

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
Shirkkan escribió:
A ver si me se explicar. jeje

Resulta que yo estoy en una residencia de estudiantes, y tenemos un horario para enchufar el emule. Es de 12 de la noche a 9 de la mañana, por la sencilla razón de que si se enchufa durante el dia, el que quiere trabajar y necesita internet no puede navegar. Entonces se puso el convenio de poder enchufarlo al horario que he dicho.

Pero hay quien se salta las reglas. Mi grupo (que somos los informáticos mas veteranos) somos a los que siempre preguntan a ver quien tiene enchufado el emule durante el dia (quien dice emule dice cualkier p2p).

Entonces, yo abro el programa Ethereal y me dice las ips de la red que están consumiendo ancho de banda. Y con el programa WinPcap también dice si se trata del edonkey / emule, bittorrent, etc...

Ahora, sabiendo que ip's están usando un p2p a una hora que no se puede, pongo la ip en el programa "Angry IP Scanner" y me dice el identificador de la red que tiene asociada esa ip. Es decir, si por ejemplo pongo mi ip, en el programa saldría: Shirkkan, porque es el nombre que uso en la red de esta residencia.

Pues bien, desde hace unos dias, la mayoría de ip's no las reconoce. Solo reconoce unas pocas.
Entonces, después de esta parrafada, mi pregunta es: sabeis de algun programa como el angry ip scanner que al darle la ip de una red, te diga el nombre que usa esa ip en la red?

Es que vamos a tomar medidas drásticas. El director ya nos ha encomendado la tarea .

Y otra cosa. El primer año usábamos un programa llamado Net Send Spoofer que enviaba mensajes de texto a una cierta ip dentro de una red.
Ese programa ahora no funciona, es decir, no envía ningun sms. Como si hubiesen desactivado la opción de envio de mensajes por la red.
Sabeis de algun programa que permita el envio de estos mensajes para avisar a la peña que tienen que apagar el p2p?


Y ya con esto, acabo. El que lo lea todo....bravo.

Un saludo, y gracias

Shirkkan,

Hay una forma sin necesidad de usar ningun programa.

Manda un mensaje con el Net Send al usuario que tenga mayor ancho de banda ocupado.

Hecho esto, se ha creado una conexión a su maquina la cual puedes identificar facilmente con el siguiente comando.

netstat /a

Entonces, si abres el Net Stat veras cuantas conexiones tienes abiertas o establecidas.

Mandas el mensaje y se abre o establece una conexión más.

Otra vez con el netstat, puedes ver el nombre de la maquina.


Espero te sirva.

O en el último de los casos, te puedo pasar un código hecho en VB que devuelve el nombre de la maquina en base a su IP.

Si tienes VB, solo basta que agregues en un Formulario un textbox, un commandbutton y el Winsock y con esto:

Código:
Private Declare Function WSAStartup Lib "wsock32" (ByVal VersionReq As Long, WSADataReturn As WSADATA) As Long
Private Declare Function WSACleanup Lib "wsock32" () As Long

Private Declare Function inet_addr Lib "wsock32" (ByVal s As String) As Long
Private Declare Function gethostbyaddr Lib "wsock32" (haddr As Long, ByVal hnlen As Long, ByVal addrtype As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (xDest As Any, xSource As Any, ByVal nbytes As Long)
Private Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As Any) As Long

Private Const INT_PORT_MAX As Long = 65535
Private Const INT_PORT_START As Long = 2235
Private Const WSADescription_Len As Long = 256
Private Const WSASYS_Status_Len As Long = 128
Private Const WS_VERSION_REQD As Long = &H101
Private Const IP_SUCCESS As Long = 0
Private Const SOCKET_ERROR As Long = -1
Private Const AF_INET As Long = 2

Private Type WSADATA
    wVersion As Integer
    wHighVersion As Integer
    szDescription(0 To WSADescription_Len) As Byte
    szSystemStatus(0 To WSASYS_Status_Len) As Byte
    imaxsockets As Integer
    imaxudp As Integer
    lpszvenderinfo As Long
End Type

Private Sub Command1_Click()
Call Bind(INT_PORT_START)
Text1.Text = GetHostNameFromIP("10.12.94.XXX")

End Sub

Private Function Bind(ByVal lPort As Long)
    On Error Resume Next
    If Socket.State <> sckClosed Then Socket.Close
    Socket.Bind lPort
    If Err.Number <> 0 Then
        MsgBox "Error occured: " & vbNewLine & Err.Description, vbExclamation + vbOKOnly, "Failure"
    End If
End Function



Private Function GetHostNameFromIP(ByVal sAddress As String) As String
Dim ptrHosent As Long
Dim hAddress As Long
Dim nbytes As Long
    If SocketsInitialize() Then
        'convert string address to long
        hAddress = inet_addr(sAddress)
        If hAddress <> SOCKET_ERROR Then
            'obtain a pointer to the HOSTENT structure
            'that contains the name and address
            'corresponding to the given network address.
            ptrHosent = gethostbyaddr(hAddress, 4, AF_INET)
            If ptrHosent <> 0 Then

                'convert address and
                'get resolved hostname
                CopyMemory ptrHosent, ByVal ptrHosent, 4
                nbytes = lstrlen(ByVal ptrHosent)

                If nbytes > 0 Then
                    sAddress = Space$(nbytes)
                    CopyMemory ByVal sAddress, ByVal ptrHosent, nbytes
                    GetHostNameFromIP = sAddress
                End If

            Else
                MsgBox "Call to gethostbyaddr failed."
            End If    'If ptrHosent

            SocketsCleanup

        Else
            MsgBox "String passed is an invalid IP."
        End If    'If hAddress

    Else
        MsgBox "Sockets failed to initialize."
    End If  'If SocketsInitialize
End Function
Private Function SocketsInitialize() As Boolean
Dim WSAD As WSADATA
    SocketsInitialize = WSAStartup(WS_VERSION_REQD, WSAD) = IP_SUCCESS
End Function

Private Sub SocketsCleanup()
    If WSACleanup() <> 0 Then
        MsgBox "Windows Sockets error occurred in Cleanup.", vbExclamation
    End If
End Sub
Listo... obtienes su nombre...

Si no tienes VB, podemos ver como hacerle...
Un saludo

Editado por the_ma3x en 01 dic 2005 a las 17:38.

Every wall is a door. Ralph Waldo Emerson
the_ma3x is offline   Citar y responder
 
 Old 01 dic 2005, 09:07   #3 (permalink)  
Miembro activo
 
Avatar de Hooker
 
Registrado: febrero 2005
Mensajes: 391

Predeterminado Re: programa que diga el ID. de red de una ip

Y no sera mas facil gastarse 10000 pesetas y poner un router-fw de conceptronic que permite poner 10 reglas ???????.

Les capas las salidas del emule, del msn, de icq y de lo que quieras a la hora que quieras. Yo en el curro lo tengo asi.

Hooker
Hooker is offline   Citar y responder
 
 Old 01 dic 2005, 14:06   #4 (permalink)  
Miembro activo
 
Avatar de liceto
 
Registrado: octubre 2004
Ubicación: ESPAÑA
Mensajes: 1.768

Predeterminado Re: programa que diga el ID. de red de una ip

Código:
Manda un mensaje con el Net Send al usuario que tenga mayor ancho de banda ocupado.
bueno eso con el sp2 creo recordar esta desavilitado pero bueno un saludoi y me interesa saver de este tema si lo escrivis todas las preguntas y respuestas quime aria ilusion
Cita:
Shirkkan si te a servido lo de the_ma3x me gustaria que dijeras el resultado
muchas gracias

En esta vida siempre es importante tener una mano cerca, que te la ofrezca Y BRINDE SU APOYO para cuando caigas....

Te tiendo mi mano


haz que tu sonrrisa cambie el mundo... pero no dejes que el mundo camvie tu sonrrisa
liceto is offline   Citar y responder
 
 Old 01 dic 2005, 17:39   #5 (permalink)  
Moderador
 
Avatar de the_ma3x
 
Registrado: febrero 2005
Ubicación: México
Mensajes: 4.325

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
liceto escribió:
Código:
Manda un mensaje con el Net Send al usuario que tenga mayor ancho de banda ocupado.
bueno eso con el sp2 creo recordar esta desavilitado pero bueno un saludoi y me interesa saver de este tema si lo escrivis todas las preguntas y respuestas quime aria ilusion


muchas gracias
En XP SP2, yo he utilizado el Net send sin problemas, no sabía que estuviera deshabilitado?

Un saludo

Every wall is a door. Ralph Waldo Emerson
the_ma3x is offline   Citar y responder
 
 Old 01 dic 2005, 17:56   #6 (permalink)  
Miembro activo
 
Avatar de Shirkkan
 
Registrado: febrero 2005
Ubicación: búscame y me encontrarás
Mensajes: 1.943

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
the_ma3x escribió:
Manda un mensaje con el Net Send al usuario que tenga mayor ancho de banda ocupado.
El problema es que con el Net Send no llegan los mensajes, por eso no los puedo enviar. Me dice que no encuentra el alias de red.

___.-·*·-.___ S H I R K K A N ___.-·*·-.___


___.-·*·-.___ B Ý ___.-·*·-.___
Shirkkan is offline   Citar y responder
 
 Old 01 dic 2005, 20:18   #7 (permalink)  
Moderador
 
Avatar de the_ma3x
 
Registrado: febrero 2005
Ubicación: México
Mensajes: 4.325

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
Shirkkan escribió:
El problema es que con el Net Send no llegan los mensajes, por eso no los puedo enviar. Me dice que no encuentra el alias de red.

Es factible que estas personas hayan deshabilitado el servicio de Mensajeria de Windows, por eso no les llegan.

Te manda el mensaje de:

No se puede encontrar el alias de mensajes en la red.

Verdad?

MMm... ahí si no se puede hacer nada... al menos no para enviarles mensajes...

Cita:
Explicación

No se puede encontrar este alias de mensajes.

Acción

Compruebe si ha escrito bien el alias de mensajes. Si es correcto, es posible
que el equipo que recibe mensajes esté ocupado. Vuelva a intentar mandar el
mensaje más tarde.
Un saludo

Every wall is a door. Ralph Waldo Emerson
the_ma3x is offline   Citar y responder
 
 Old 01 dic 2005, 23:16   #8 (permalink)  
Ex-miembro
 
Avatar de Tinertronic
 
Registrado: marzo 2005
Mensajes: 8.817

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
the_ma3x escribió:
Shirkkan,

Hay una forma sin necesidad de usar ningun programa.

Manda un mensaje con el Net Send al usuario que tenga mayor ancho de banda ocupado.

Hecho esto, se ha creado una conexión a su maquina la cual puedes identificar facilmente con el siguiente comando.

netstat /a

Entonces, si abres el Net Stat veras cuantas conexiones tienes abiertas o establecidas.

Mandas el mensaje y se abre o establece una conexión más.

Otra vez con el netstat, puedes ver el nombre de la maquina.


Espero te sirva.

O en el último de los casos, te puedo pasar un código hecho en VB que devuelve el nombre de la maquina en base a su IP.

Si tienes VB, solo basta que agregues en un Formulario un textbox, un commandbutton y el Winsock y con esto:

Código:
Private Declare Function WSAStartup Lib "wsock32" (ByVal VersionReq As Long, WSADataReturn As WSADATA) As Long
Private Declare Function WSACleanup Lib "wsock32" () As Long

Private Declare Function inet_addr Lib "wsock32" (ByVal s As String) As Long
Private Declare Function gethostbyaddr Lib "wsock32" (haddr As Long, ByVal hnlen As Long, ByVal addrtype As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (xDest As Any, xSource As Any, ByVal nbytes As Long)
Private Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As Any) As Long

Private Const INT_PORT_MAX As Long = 65535
Private Const INT_PORT_START As Long = 2235
Private Const WSADescription_Len As Long = 256
Private Const WSASYS_Status_Len As Long = 128
Private Const WS_VERSION_REQD As Long = &H101
Private Const IP_SUCCESS As Long = 0
Private Const SOCKET_ERROR As Long = -1
Private Const AF_INET As Long = 2

Private Type WSADATA
    wVersion As Integer
    wHighVersion As Integer
    szDescription(0 To WSADescription_Len) As Byte
    szSystemStatus(0 To WSASYS_Status_Len) As Byte
    imaxsockets As Integer
    imaxudp As Integer
    lpszvenderinfo As Long
End Type

Private Sub Command1_Click()
Call Bind(INT_PORT_START)
Text1.Text = GetHostNameFromIP("10.12.94.XXX")

End Sub

Private Function Bind(ByVal lPort As Long)
    On Error Resume Next
    If Socket.State <> sckClosed Then Socket.Close
    Socket.Bind lPort
    If Err.Number <> 0 Then
        MsgBox "Error occured: " & vbNewLine & Err.Description, vbExclamation + vbOKOnly, "Failure"
    End If
End Function



Private Function GetHostNameFromIP(ByVal sAddress As String) As String
Dim ptrHosent As Long
Dim hAddress As Long
Dim nbytes As Long
    If SocketsInitialize() Then
        'convert string address to long
        hAddress = inet_addr(sAddress)
        If hAddress <> SOCKET_ERROR Then
            'obtain a pointer to the HOSTENT structure
            'that contains the name and address
            'corresponding to the given network address.
            ptrHosent = gethostbyaddr(hAddress, 4, AF_INET)
            If ptrHosent <> 0 Then

                'convert address and
                'get resolved hostname
                CopyMemory ptrHosent, ByVal ptrHosent, 4
                nbytes = lstrlen(ByVal ptrHosent)

                If nbytes > 0 Then
                    sAddress = Space$(nbytes)
                    CopyMemory ByVal sAddress, ByVal ptrHosent, nbytes
                    GetHostNameFromIP = sAddress
                End If

            Else
                MsgBox "Call to gethostbyaddr failed."
            End If    'If ptrHosent

            SocketsCleanup

        Else
            MsgBox "String passed is an invalid IP."
        End If    'If hAddress

    Else
        MsgBox "Sockets failed to initialize."
    End If  'If SocketsInitialize
End Function
Private Function SocketsInitialize() As Boolean
Dim WSAD As WSADATA
    SocketsInitialize = WSAStartup(WS_VERSION_REQD, WSAD) = IP_SUCCESS
End Function

Private Sub SocketsCleanup()
    If WSACleanup() <> 0 Then
        MsgBox "Windows Sockets error occurred in Cleanup.", vbExclamation
    End If
End Sub
Listo... obtienes su nombre...

Si no tienes VB, podemos ver como hacerle...
Un saludo

este the_ma3x sabe mas que los cangrejos el muy jodio
Tinertronic is offline   Citar y responder
 
 Old 02 dic 2005, 12:17   #9 (permalink)  
Miembro activo
 
Avatar de Shirkkan
 
Registrado: febrero 2005
Ubicación: búscame y me encontrarás
Mensajes: 1.943

Predeterminado Re: programa que diga el ID. de red de una ip

A lo mejor la solución mas eficaz será decirselo al director y que les desconecte de internet. jejeje

___.-·*·-.___ S H I R K K A N ___.-·*·-.___


___.-·*·-.___ B Ý ___.-·*·-.___
Shirkkan is offline   Citar y responder
 
 Old 02 dic 2005, 18:29   #10 (permalink)  
Moderador
 
Avatar de the_ma3x
 
Registrado: febrero 2005
Ubicación: México
Mensajes: 4.325

Predeterminado Re: programa que diga el ID. de red de una ip

Cita:
Shirkkan escribió:
A lo mejor la solución mas eficaz será decirselo al director y que les desconecte de internet. jejeje

Puede ser... a veces la respuesta más obvia es la correcta...

Saludos

Every wall is a door. Ralph Waldo Emerson
the_ma3x is offline   Citar y responder
Página 1 de 2 | 1 | 2 | >

« Nuestros diputados y el Software Libre | Windows blind.... para windows ME???????? »

Herramientas
Estilo


 

Tema Iniciado por Foro Respuestas Último mensaje
que alguien me diga algo del programa CCleaner thepiles Software 13 24 dic 2007 10:55
Ayuda con un programa oseas600 Software 1 21 jun 2006 17:38
Quitar Programa pelopollatrix Software 4 21 nov 2005 17:33
Programa para hacer radio rogeryerro Software 2 29 mar 2005 02:44
Bloqueo al instalar un programa Claudiavm Software 5 17 mar 2005 20:25



Buscar