/*
 * Copyright (c) 2020 Alibaba Group Holding Limited. 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. Alibaba designates this
 * particular file as subject to the "Classpath" exception as provided
 * by Oracle in the LICENSE file that accompanied this code.
 *
 * 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.
 */

/*
 * @test
 * @summary Test Wisp engine's NIO support
 * @requires os.family == "linux"
 * @run main/othervm -XX:+EnableCoroutine -Dcom.alibaba.wisp.transparentWispSwitch=true IoTest
 */

import sun.misc.SharedSecrets;

import java.io.IOException;
import java.net.InetAddress;
import java.net.InetSocketAddress;
import java.nio.ByteBuffer;
import java.nio.channels.SelectionKey;
import java.nio.channels.SocketChannel;
import java.util.Properties;

public class IoTest {

    static Properties p;
    static String socketAddr;
    static {
        p = java.security.AccessController.doPrivileged(
                new java.security.PrivilegedAction<Properties>() {
                    public Properties run() {
                        return System.getProperties();
                    }
                }
        );
        socketAddr = (String)p.get("test.wisp.socketAddress");
        if (socketAddr == null) {
            socketAddr = "www.example.com";
        }
    }

    public static void main(String[] args) {
        String result = http();

        System.out.println(result);

        if (!result.startsWith("HTTP") ||
                !result.contains("Content-") ||
                !result.contains("Server:"))
            throw new Error("protocol error");
    }

    static String http() {
        String host = socketAddr;

        try {
            SocketChannel ch = SocketChannel.open();
            ch.configureBlocking(false);

            connect(ch, InetAddress.getByName(host).getHostAddress());
            ByteBuffer bb = ByteBuffer.allocate(1000);
            String request = "HEAD / HTTP/1.0\r\nHost:" + host + "\r\n\r\n";
            bb.put(request.getBytes());
            bb.flip();
            write(ch, bb);
            bb.clear();
            read(ch, bb);

            return new String(bb.array(), 0, bb.remaining());

        } catch (IOException e) {
            throw new Error(e);
        }
    }

    static int read(SocketChannel ch, ByteBuffer bb) throws IOException {
        int n, retry = 0;
        while ((n = ch.read(bb)) == 0) {
            if (retry++ > 3)
                throw new Error("busy loop"); // make sure we're not in a busy loop
            SharedSecrets.getWispEngineAccess().registerEvent(ch, SelectionKey.OP_READ);
            SharedSecrets.getWispEngineAccess().park(-1);
        }
        return n;
    }

    static int write(SocketChannel ch, ByteBuffer bb) throws IOException {
        int n, retry = 0;
        while ((n = ch.write(bb)) == 0) {
            if (retry++ > 3) throw new Error("busy loop");
            SharedSecrets.getWispEngineAccess().registerEvent(ch, SelectionKey.OP_WRITE);
            SharedSecrets.getWispEngineAccess().park(-1);
        }
        return n;
    }

    static void connect(SocketChannel ch, String ip) throws IOException {
        ch.connect(new InetSocketAddress(ip, 80));
        int retry = 0;
        while (!ch.finishConnect()) {
            if (retry++ > 3) throw new Error("busy loop");
            SharedSecrets.getWispEngineAccess().registerEvent(ch, SelectionKey.OP_CONNECT);
            SharedSecrets.getWispEngineAccess().park(-1);
        }
    }
}