/*

 * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

/*

 * @test

 * @build DummyWebSocketServer

 * @run testng/othervm/timeout=600

 *      -Djdk.internal.httpclient.websocket.debug=true

 *       WebSocketTest

 */

import org.testng.annotations.DataProvider;

import org.testng.annotations.Test;

import java.io.IOException;

import java.net.http.WebSocket;

import java.nio.ByteBuffer;

import java.nio.CharBuffer;

import java.nio.charset.StandardCharsets;

import java.util.ArrayList;

import java.util.List;

import java.util.concurrent.CompletableFuture;

import java.util.concurrent.CompletionStage;

import java.util.concurrent.TimeUnit;

import java.util.concurrent.TimeoutException;

import java.util.stream.Collectors;

import static java.net.http.HttpClient.newHttpClient;

import static java.net.http.WebSocket.NORMAL_CLOSURE;

import static org.testng.Assert.assertEquals;

import static org.testng.Assert.assertFalse;

import static org.testng.Assert.assertThrows;

import static org.testng.Assert.assertTrue;

import static org.testng.Assert.fail;

public class WebSocketTest {

    private static final Class<IllegalArgumentException> IAE = IllegalArgumentException.class;

    private static final Class<IllegalStateException> ISE = IllegalStateException.class;

    private static final Class<IOException> IOE = IOException.class;

    /* shortcut */

    private static void assertFails(Class<? extends Throwable> clazz,

                                    CompletionStage<?> stage) {

        Support.assertCompletesExceptionally(clazz, stage);

    }

    @Test

    public void illegalArgument() throws IOException {

        try (DummyWebSocketServer server = new DummyWebSocketServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            assertFails(IAE, ws.sendPing(ByteBuffer.allocate(126)));

            assertFails(IAE, ws.sendPing(ByteBuffer.allocate(127)));

            assertFails(IAE, ws.sendPing(ByteBuffer.allocate(128)));

            assertFails(IAE, ws.sendPing(ByteBuffer.allocate(129)));

            assertFails(IAE, ws.sendPing(ByteBuffer.allocate(256)));

            assertFails(IAE, ws.sendPong(ByteBuffer.allocate(126)));

            assertFails(IAE, ws.sendPong(ByteBuffer.allocate(127)));

            assertFails(IAE, ws.sendPong(ByteBuffer.allocate(128)));

            assertFails(IAE, ws.sendPong(ByteBuffer.allocate(129)));

            assertFails(IAE, ws.sendPong(ByteBuffer.allocate(256)));

            assertFails(IOE, ws.sendText(Support.incompleteString(), true));

            assertFails(IOE, ws.sendText(Support.incompleteString(), false));

            assertFails(IOE, ws.sendText(Support.malformedString(), true));

            assertFails(IOE, ws.sendText(Support.malformedString(), false));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWithNBytes(124)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWithNBytes(125)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWithNBytes(128)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWithNBytes(256)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWithNBytes(257)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.stringWith2NBytes((123 / 2) + 1)));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.malformedString()));

            assertFails(IAE, ws.sendClose(NORMAL_CLOSURE, Support.incompleteString()));

            assertFails(IAE, ws.sendClose(-2, "a reason"));

            assertFails(IAE, ws.sendClose(-1, "a reason"));

            assertFails(IAE, ws.sendClose(0, "a reason"));

            assertFails(IAE, ws.sendClose(1, "a reason"));

            assertFails(IAE, ws.sendClose(500, "a reason"));

            assertFails(IAE, ws.sendClose(998, "a reason"));

            assertFails(IAE, ws.sendClose(999, "a reason"));

            assertFails(IAE, ws.sendClose(1002, "a reason"));

            assertFails(IAE, ws.sendClose(1003, "a reason"));

            assertFails(IAE, ws.sendClose(1006, "a reason"));

            assertFails(IAE, ws.sendClose(1007, "a reason"));

            assertFails(IAE, ws.sendClose(1009, "a reason"));

            assertFails(IAE, ws.sendClose(1010, "a reason"));

            assertFails(IAE, ws.sendClose(1012, "a reason"));

            assertFails(IAE, ws.sendClose(1013, "a reason"));

            assertFails(IAE, ws.sendClose(1015, "a reason"));

            assertFails(IAE, ws.sendClose(5000, "a reason"));

            assertFails(IAE, ws.sendClose(32768, "a reason"));

            assertFails(IAE, ws.sendClose(65535, "a reason"));

            assertFails(IAE, ws.sendClose(65536, "a reason"));

            assertFails(IAE, ws.sendClose(Integer.MAX_VALUE, "a reason"));

            assertFails(IAE, ws.sendClose(Integer.MIN_VALUE, "a reason"));

            assertThrows(IAE, () -> ws.request(Integer.MIN_VALUE));

            assertThrows(IAE, () -> ws.request(Long.MIN_VALUE));

            assertThrows(IAE, () -> ws.request(-1));

            assertThrows(IAE, () -> ws.request(0));

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingTextPingClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            CharBuffer data = CharBuffer.allocate(65536);

            CompletableFuture<WebSocket> cfText;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.printf("begin cycle #%s at %s%n",

                                  i, System.currentTimeMillis());

                cfText = ws.sendText(data, last);

                try {

                    cfText.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                } finally {

                    System.out.printf("end cycle #%s at %s%n",

                                      i, System.currentTimeMillis());

                }

            }

            assertFails(ISE, ws.sendText("", true));

            assertFails(ISE, ws.sendText("", false));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), true));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), false));

            CompletableFuture<WebSocket> cfPing = ws.sendPing(ByteBuffer.allocate(125));

            assertHangs(cfPing);

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfClose = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfText);

            assertFails(IOE, cfPing);

            assertFails(IOE, cfClose);

        }

    }

    /* shortcut */

    public static void assertHangs(CompletionStage<?> stage) {

        Support.assertHangs(stage);

    }

    @Test(dataProvider = "booleans")

    public void pendingTextPongClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            CharBuffer data = CharBuffer.allocate(65536);

            CompletableFuture<WebSocket> cfText;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.printf("begin cycle #%s at %s%n",

                                  i, System.currentTimeMillis());

                cfText = ws.sendText(data, last);

                try {

                    cfText.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                } finally {

                    System.out.printf("end cycle #%s at %s%n",

                                      i, System.currentTimeMillis());

                }

            }

            assertFails(ISE, ws.sendText("", true));

            assertFails(ISE, ws.sendText("", false));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), true));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), false));

            CompletableFuture<WebSocket> cfPong = ws.sendPong(ByteBuffer.allocate(125));

            assertHangs(cfPong);

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfClose = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfText);

            assertFails(IOE, cfPong);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingBinaryPingClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(65536);

            CompletableFuture<WebSocket> cfBinary;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.printf("begin cycle #%s at %s%n",

                                  i, System.currentTimeMillis());

                cfBinary = ws.sendBinary(data, last);

                try {

                    cfBinary.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                } finally {

                    System.out.printf("end cycle #%s at %s%n",

                                      i, System.currentTimeMillis());

                }

            }

            assertFails(ISE, ws.sendText("", true));

            assertFails(ISE, ws.sendText("", false));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), true));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), false));

            CompletableFuture<WebSocket> cfPing = ws.sendPing(ByteBuffer.allocate(125));

            assertHangs(cfPing);

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfClose = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfBinary);

            assertFails(IOE, cfPing);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingBinaryPongClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(65536);

            CompletableFuture<WebSocket> cfBinary;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.printf("begin cycle #%s at %s%n",

                                  i, System.currentTimeMillis());

                cfBinary = ws.sendBinary(data, last);

                try {

                    cfBinary.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                } finally {

                    System.out.printf("end cycle #%s at %s%n",

                                      i, System.currentTimeMillis());

                }

            }

            assertFails(ISE, ws.sendText("", true));

            assertFails(ISE, ws.sendText("", false));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), true));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(0), false));

            CompletableFuture<WebSocket> cfPong = ws.sendPong(ByteBuffer.allocate(125));

            assertHangs(cfPong);

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfClose = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfBinary);

            assertFails(IOE, cfPong);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingPingTextClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(125);

            CompletableFuture<WebSocket> cfPing;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.println("cycle #" + i);

                cfPing = ws.sendPing(data);

                try {

                    cfPing.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                }

            }

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfText = ws.sendText("hello", last);

            assertHangs(cfText);

            CompletableFuture<WebSocket> cfClose

                    = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfPing);

            assertFails(IOE, cfText);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingPingBinaryClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(125);

            CompletableFuture<WebSocket> cfPing;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.println("cycle #" + i);

                cfPing = ws.sendPing(data);

                try {

                    cfPing.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                }

            }

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfBinary

                    = ws.sendBinary(ByteBuffer.allocate(4), last);

            assertHangs(cfBinary);

            CompletableFuture<WebSocket> cfClose

                    = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfPing);

            assertFails(IOE, cfBinary);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingPongTextClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(125);

            CompletableFuture<WebSocket> cfPong;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.println("cycle #" + i);

                cfPong = ws.sendPong(data);

                try {

                    cfPong.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                }

            }

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfText = ws.sendText("hello", last);

            assertHangs(cfText);

            CompletableFuture<WebSocket> cfClose

                    = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfPong);

            assertFails(IOE, cfText);

            assertFails(IOE, cfClose);

        }

    }

    @Test(dataProvider = "booleans")

    public void pendingPongBinaryClose(boolean last) throws Exception {

        try (DummyWebSocketServer server = Support.notReadingServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ByteBuffer data = ByteBuffer.allocate(125);

            CompletableFuture<WebSocket> cfPong;

            for (int i = 0; ; i++) {  // fill up the send buffer

                System.out.println("cycle #" + i);

                cfPong = ws.sendPong(data);

                try {

                    cfPong.get(5, TimeUnit.SECONDS);

                    data.clear();

                } catch (TimeoutException e) {

                    break;

                }

            }

            assertFails(ISE, ws.sendPing(ByteBuffer.allocate(125)));

            assertFails(ISE, ws.sendPong(ByteBuffer.allocate(125)));

            CompletableFuture<WebSocket> cfBinary

                    = ws.sendBinary(ByteBuffer.allocate(4), last);

            assertHangs(cfBinary);

            CompletableFuture<WebSocket> cfClose

                    = ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok");

            assertHangs(cfClose);

            ws.abort();

            assertFails(IOE, cfPong);

            assertFails(IOE, cfBinary);

            assertFails(IOE, cfClose);

        }

    }

    @Test

    public void partialBinaryThenText() throws IOException {

        try (DummyWebSocketServer server = new DummyWebSocketServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ws.sendBinary(ByteBuffer.allocate(16), false).join();

            assertFails(ISE, ws.sendText("text", false));

            assertFails(ISE, ws.sendText("text", true));

            // Pings & Pongs are fine

            ws.sendPing(ByteBuffer.allocate(125)).join();

            ws.sendPong(ByteBuffer.allocate(125)).join();

        }

    }

    @Test

    public void partialTextThenBinary() throws IOException {

        try (DummyWebSocketServer server = new DummyWebSocketServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ws.sendText("text", false).join();

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(16), false));

            assertFails(ISE, ws.sendBinary(ByteBuffer.allocate(16), true));

            // Pings & Pongs are fine

            ws.sendPing(ByteBuffer.allocate(125)).join();

            ws.sendPong(ByteBuffer.allocate(125)).join();

        }

    }

    @Test

    public void sendMethodsThrowIOE1() throws IOException {

        try (DummyWebSocketServer server = new DummyWebSocketServer()) {

            server.open();

            WebSocket ws = newHttpClient()

                    .newWebSocketBuilder()

                    .buildAsync(server.getURI(), new WebSocket.Listener() { })

                    .join();

            ws.sendClose(NORMAL_CLOSURE, "ok").join();

            assertFails(IOE, ws.sendClose(WebSocket.NORMAL_CLOSURE, "ok"));

            assertFails(IOE, ws.sendText("", true));

            assertFails(IOE, ws.sendText("", false));