B4J Question HTTP Server: chunked

[wl]

Hi,

I have been trying to keep the HTTP connection open and sending the HTTP response in chunked mode, but it seemsit is not working.

    Dim bc As ByteConverter

    resp.SetHeader("Content-Length", 0)
    resp.SetHeader("Transfer-Encoding", "chunked")

    resp.OutputStream.InitializeToBytesArray(0)

    Do While (1=1)
        Dim ch() As Byte = bc.StringToBytes(CRLF & "1" & CRLF & "A" & CRLF, "ASCII")
        resp.OutputStream.WriteBytes(ch,0 ,ch.Length)
        resp.OutputStream.Flush

        Dim waitUntil As Long = DateTime.Now + 5000
        Do While (waitUntil < DateTime.Now)
        Loop
    Loop

Thanks

 

[Erel]

Such loops never work. Which problem are you trying to solve?

The connection should be kept alive automatically.

 

[wl]

Hi Erel,

I was looking into keeping the HTTP connection open for a while to be able to do some server side pushing.

 

[Erel]

It is not possible to push data to the clients. This requires a solution based on web sockets (which are only partly supported by most browsers).

The solution is to use polling.