Java Problem: URLConnection

[Dirk]

Ich versuche gerade nen sinnloses kleines programm zu schreiben, das sich auf meinen router einloggt, reconnected und wieder ausloggt, hab dafür auch nen vbs script gefunden, das funktioniert:

Code:

On Error Resume Next
ip = "192.168.2.1"
pwd = "xxx"
Set objHTTP = CreateObject("MSXML2.XMLHTTP")
Call objHTTP.Open("POST", "http://" & ip & "/start.login", False)
objHTTP.Send("P1=" & pwd)
Call objHTTP.Open("GET", "http://" & ip & "/pppctl.cmd?action=0", False)
objHTTP.Send
WScript.Pause 5
Set objHTTP = CreateObject("MSXML2.XMLHTTP")
Call objHTTP.Open("POST", "http://" & ip & "/start.login", False)
objHTTP.Send("P1=" & pwd)
Call objHTTP.Open("GET", "http://" & ip & "/pppctl.cmd?action=1", False)
objHTTP.Send
Call objHTTP.Open("GET", "http://" & ip & "/logout.cmd", False)
objHTTP.Send

aber in java kackt das irgendwie nur ab. scheint auch keine so schön einfache befehle zu geben.

Code:

[size=small]
[align=left]URL url = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] URL([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"http://"[/color][/size][/color][/size][size=small] + ip+ [/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"/start.login"[/color][/size][/color][/size][size=small]);
URLConnection conn = url.openConnection();
conn.setDoOutput([/size][b][size=small][color=#7f0055][size=small][color=#7f0055]true[/b][/color][/size][/color][/size][size=small]);
conn.setRequestProperty([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"connection"[/color][/size][/color][/size][size=small],[/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"Keep-Alive"[/color][/size][/color][/size][size=small]);
OutputStreamWriter wr = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] OutputStreamWriter(conn.getOutputStream());[/align]
wr.write([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"P1="[/color][/size][/color][/size][size=small]+passwort);
[size=small]wr.flush();
[/size][/size]

damit krieg ich schon mal nen POST zugriff auf den router, der loggt auch eine erfolgreiche anmeldung. aber wie gehts jetzt weiter??

Code:

[size=small]
[align=left]url2 = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] URL([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"http://"[/color][/size][/color][/size][size=small] + ip+ [/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"/pppctl.cmd?action=0"[/color][/size][/color][/size][size=small]);[/align]
conn2 = url2.openConnection();
[/size]

so soll angeblich nen GET befehl funktionieren, es passiert aber nichts. hab schon alles mögliche probiert, total nervig. gandro, weißt du rat?

[niwax]

Greift deine Variable auf Port 80 zu? Wenn ja liegt es wahrscheinlich an falschen Headern, die sagen, dass nur POST-Variablen übertragen wurden.

[Dirk]

das heißt? ich glaube ist port 80, kriege nämlich die seite zurück (vermutlich vom login)

[niwax]

Dirk schrieb:  das heißt?

In dem VB-Script wird ja eine XMLHTTP-Verbindugn benutzt. Das bedeutet, dass zwischen dem Programm und dem Socket der Verbindung noch ein HTTP-Protokoll liegt. In HTTP muss geregelt werden, ob Variablen per POST oder GET übergeben werden, da bei POST ein zusätzlicher Header mitgesendet werden muss. Es kann sein, dass Java beim URL-Objekt nur Post implementiert bzw. sich einstellen lässt, ob der zusätzliche POST-Header mitgesendet wird. Wenn der nicht gesendet wird wird die Abfrage als GET interpretiert.

[Dirk]

Ich krieg ne macke, ich habs jetzt wirklich mal basic probiert:

Code:

[size=small]
[align=left]URL [u]url5[/u] = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] URL([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"http://192.168.2.1/"[/color][/size][/color][/size][size=small]);
Socket socket = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] Socket(ip,80);
PrintWriter output = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] PrintWriter(socket.getOutputStream());
output.println([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"POST /start.login HTTP/1.1"[/color][/size][/color][/size][size=small] );
output.println([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"Host: "[/color][/size][/color][/size][size=small]+ip);
output.println([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"Content-Type: application/x-www-form-urlencoded"[/color][/size][/color][/size][size=small]);
output.println([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"Content-Length: 15"[/color][/size][/color][/size][size=small]);
output.println([/size][size=small][color=#2a00ff][size=small][color=#2a00ff]"P1=xxx"[/color][/size][/color][/size][size=small] );
output.flush();
InputStreamReader input = [/size][b][size=small][color=#7f0055][size=small][color=#7f0055]new[/b][/color][/size][/color][/size][size=small] InputStreamReader(socket.getInputStream());[/align]
System.[/size][i][size=small][color=#0000c0][size=small][color=#0000c0]out[/i][/color][/size][/color][/size][size=small].println(input.toString());[/size]
[size=small][size=small][align=left]socket.close();[/align]
[/size][/size]

ergebnis: Der router reagiert garnicht mehr auf port 80, totale blokade...

[niwax]

Mögliche Lösungen:
1. Am Ende zwei Leerzeilen einfügen um zu signaliesieren, dass der Header fertig gesendet ist
2. Vor den Variablen (also P1=xxx) zwei Leerzeilen einfügen, um den Variablenblock zu trennen
3. Firewallausnahme hinzufügen

Was für ein Basic ist das? Sieht immernoch mehr nach Java aus.
Ich verbinde das immer so:

Spoiler anzeigen

Code:

Imports System.Net
Imports System.Net.Sockets
Imports System.Console

Module Client
    Dim TCP As New TcpClient, N As NetworkStream

    Sub Main()
        Dim IP As String = ReadLine()
        Dim Port As String = ReadLine()
        TCP.Connect(New IPAddress({CByte(IP.Split(".")(0)), CByte(IP.Split(".")(1)), CByte(IP.Split(".")(2)), CByte(IP.Split(".")(3))}), Port)
        N = TCP.GetStream
        ' Das Zeug senden
    Write(WasAuchImmer)
        While TCP.Available = 0
        End While
        ' In S ist jetzt die Antwort vom Server
        Dim S As String = Read()
        TCP.Close()
    End Sub

    ' Daten Senden
    Sub Write(ByVal S As String)
        N.Write(SToB(S), 0, S.Length)
    End Sub

    ' Daten Empfangen
    Function Read() As String
        Dim B(TCP.Available - 1) As Byte
        N.Read(B, 0, C.Available)
        Return BToS(B)
    End Function

    ' Byte-To-String
    Function BToS(ByVal B() As Byte) As String
        Dim S As String = ""
        For Each C As Byte In B
            S &= Chr(C)
        Next
        Return S
    End Function

    ' String-To-Byte
    Function SToB(ByVal S As String) As Byte()
        Dim B(S.Length - 1) As Byte
        For I As Integer = 0 To S.Length - 1
            B(I) = Asc(S(I))
        Next
        Return B
    End Function
End Module

Der Code ist btw ein Teil aus meinem Remotedesktop, der auf Port 739 läuft, aber für 80 sollte es auch gehen

[winfreak]

niwax schrieb:  [...]Was für ein Basic...?[...]

Dürfte sich um VB.NET handeln.

[niwax]

winfreak schrieb:  

niwax schrieb:  [...]Was für ein Basic...?[...]

Dürfte sich um VB.NET handeln.

Ich rede von diesem Post: http://www.winhistory-forum.net/161847-post5.html
Das ist doch kein VB.Net. Das was ich gepostet hab ist VB.Net

[Dirk]

Das ist visual basic SCRIPT, kannte ich auch nicht, aber das zeug braucht man nur in ne textdatei fügen, endung vbs, und unter windows doppelklicken. fertig. der interpreter ist wohl mindestens seit 2000 datei, liegt im %windir%/system32/cscript.exe

[winfreak]

Dirk schrieb:  Das ist visual basic SCRIPT, kannte ich auch nicht, aber das zeug braucht man nur in ne textdatei fügen, endung vbs, und unter windows doppelklicken. fertig. der interpreter ist wohl mindestens seit 2000 datei, liegt im %windir%/system32/cscript.exe

Darauf baute doch ILoveYou auf?