/*
 * Copyright The WildFly Authors
 * SPDX-License-Identifier: Apache-2.0
 */

package org.jboss.as.test.shared;

import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.FAILED;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.NAME;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.OP;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.OP_ADDR;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.OUTCOME;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.READ_ATTRIBUTE_OPERATION;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.RESULT;
import static org.jboss.as.controller.descriptions.ModelDescriptionConstants.SUCCESS;
import static org.junit.Assert.fail;

import java.io.IOException;
import java.net.UnknownHostException;
import java.util.concurrent.CancellationException;
import java.util.concurrent.ExecutionException;

import org.jboss.as.arquillian.api.ServerSetupTask;
import org.jboss.as.arquillian.container.ManagementClient;
import org.jboss.as.controller.client.ModelControllerClient;
import org.jboss.as.controller.client.helpers.ClientConstants;
import org.jboss.dmr.ModelNode;
import org.jboss.logging.Logger;
import org.junit.Assert;
import org.xnio.IoUtils;

/**
 * Utilities for correctly reloading a server process.
 * @author Stuart Douglas
 */
public class ServerReload {

    private static final Logger log = Logger.getLogger(ServerReload.class);

    /** Default time in ms to wait for a server process to return to started state following a reload */
    public static final int TIMEOUT = 100000;

    /**
     * @deprecated Use {@link #executeReloadAndWaitForCompletion(ManagementClient)} which will allow completion
     *             waiting to check on the correct address for reload completion if the server is not using the
     *             default management address or port
     */
    @Deprecated
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client) {
        executeReloadAndWaitForCompletion(client, TIMEOUT, false, null, -1, null);
    }

    /**
     * @deprecated Use {@link #executeReloadAndWaitForCompletion(ManagementClient String)} which will allow completion
     *             waiting to check on the correct address for reload completion if the server is not using the
     *             default management address or port
     */
    @Deprecated
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, String serverConfig) {
        executeReloadAndWaitForCompletion(client, TIMEOUT, false, null, -1, serverConfig);
    }

    /**
     * @deprecated Use {@link #executeReloadAndWaitForCompletion(ManagementClient boolean)} which will allow completion
     *             waiting to check on the correct address for reload completion if the server is not using the
     *             default management address or port
     */
    @Deprecated
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, boolean adminOnly) {
        executeReloadAndWaitForCompletion(client, TIMEOUT, adminOnly, null, -1, null);
    }

    /**
     * @deprecated Use {@link #executeReloadAndWaitForCompletion(ManagementClient int)} which will allow completion
     *             waiting to check on the correct address for reload completion if the server is not using the
     *             default management address or port
     */
    @Deprecated
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, int timeout) {
        executeReloadAndWaitForCompletion(client, timeout, false, null, -1, null);
    }

    /**
     * Reload the server and wait for it to reach running state. Reloaded server will not be in admin-only mode.
     *
     * @param managementClient client to use to execute the reload and to provide host and port information for
     *                         reconnecting to wait for completion of the reload
     */
    public static void executeReloadAndWaitForCompletion(ManagementClient managementClient) {
        executeReloadAndWaitForCompletion(managementClient.getControllerClient(), TIMEOUT, false,
                managementClient.getMgmtAddress(), managementClient.getMgmtPort(), null);
    }

    /**
     * Reload the server and wait for it to reach running state, instructing the server to use the configuration file
     * with the given name once it reloads. Reloaded server will not be in admin-only mode.
     *
     * @param managementClient client to use to execute the reload and to provide host and port information for
     *      *                         reconnecting to wait for completion of the reload
     * @param serverConfig the configuration file the server should use following reload. May be {@code null} in which
     *                     case the server will use the same configuration file it used before the reload.
     */
    public static void executeReloadAndWaitForCompletion(ManagementClient managementClient, String serverConfig) {
        executeReloadAndWaitForCompletion(managementClient.getControllerClient(), TIMEOUT, false,
                managementClient.getMgmtAddress(), managementClient.getMgmtPort(), serverConfig);
    }

    /**
     * Reload the server and wait for it to reach running state, optionally reloading into admin-only mode.
     * @param managementClient client to use to execute the reload and to provide host and port information for
     *                         reconnecting to wait for completion of the reload
     * @param adminOnly {@code} true if the server should be in admin-only mode following the reload
     */
    public static void executeReloadAndWaitForCompletion(ManagementClient managementClient, boolean adminOnly) {
        executeReloadAndWaitForCompletion(managementClient.getControllerClient(), TIMEOUT, adminOnly,
                managementClient.getMgmtAddress(), managementClient.getMgmtPort(), null);
    }

    /**
     * Reload the server and wait for it to reach running state. Reloaded server will not be in admin-only mode.
     *
     * @param managementClient client to use to execute the reload and to provide host and port information for
     *      *                         reconnecting to wait for completion of the reload
     * @param timeout time in ms to wait for a server process to return to running state following the reload
     */
    public static void executeReloadAndWaitForCompletion(ManagementClient managementClient, int timeout) {
        executeReloadAndWaitForCompletion(managementClient.getControllerClient(), timeout, false,
                managementClient.getMgmtAddress(), managementClient.getMgmtPort(), null);
    }

    /**
     *
     * @param client client to use to instruct the server to reload
     * @param timeout time in ms to wait for a server process to return to running state following the reload
     * @param adminOnly if {@code true}, the server will be reloaded in admin-only mode
     * @param serverAddress if {@code null}, use {@code TestSuiteEnvironment.getServerAddress()} to create the ModelControllerClient
     * @param serverPort if {@code -1}, use {@code TestSuiteEnvironment.getServerPort()} to create the ModelControllerClient
     */
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, int timeout, boolean adminOnly, String serverAddress, int serverPort) {
        executeReloadAndWaitForCompletion(client, timeout, adminOnly, serverAddress, serverPort, null);
    }

    /**
     *
     * @param client client to use to instruct the server to reload
     * @param timeout time in ms to wait for a server process to return to running state following the reload
     * @param adminOnly if {@code true}, the server will be reloaded in admin-only mode
     * @param serverAddress if {@code null}, use {@code TestSuiteEnvironment.getServerAddress()} to create the ModelControllerClient
     * @param serverPort if {@code -1}, use {@code TestSuiteEnvironment.getServerPort()} to create the ModelControllerClient
     */
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, int timeout, boolean adminOnly, String serverAddress, int serverPort, String serverConfig) {
        executeReloadAndWaitForCompletion(client, timeout, adminOnly, false, serverAddress, serverPort, serverConfig);
    }

    /**
     *
     * @param client client to use to instruct the server to reload
     * @param timeout time in ms to wait for a server process to return to running state following the reload
     * @param adminOnly if {@code true}, the server will be reloaded in admin-only mode
     * @param startSuspended if {@code true}, the service will be reloaded in suspended state
     * @param serverAddress if {@code null}, use {@code TestSuiteEnvironment.getServerAddress()} to create the ModelControllerClient
     * @param serverPort if {@code -1}, use {@code TestSuiteEnvironment.getServerPort()} to create the ModelControllerClient
     */
    public static void executeReloadAndWaitForCompletion(ModelControllerClient client, int timeout, boolean adminOnly, boolean startSuspended, String serverAddress, int serverPort, String serverConfig) {
        executeReload(client, adminOnly, startSuspended, serverConfig);
        waitForLiveServerToReload(timeout,
                serverAddress != null ? serverAddress : TestSuiteEnvironment.getServerAddress(),
                serverPort != -1 ? serverPort : TestSuiteEnvironment.getServerPort());
    }

    private static void executeReload(ModelControllerClient client, boolean adminOnly, String serverConfig) {
        executeReload(client, adminOnly, false, serverConfig);
    }

    private static void executeReload(ModelControllerClient client, boolean adminOnly, boolean startSuspended, String serverConfig) {
        ModelNode operation = new ModelNode();
        operation.get(OP_ADDR).setEmptyList();
        operation.get(OP).set("reload");
        if (adminOnly) {
            operation.get("admin-only").set(adminOnly);
        }
        if (startSuspended) {
            operation.get("start-mode").set("suspend");
        }
        if(serverConfig != null) {
            operation.get("server-config").set(serverConfig);
        }
        try {
            ModelNode result = client.execute(operation);
            if (!"success".equals(result.get(ClientConstants.OUTCOME).asString())) {
                fail("Reload operation didn't finish successfully: " + result.asString());
            }
        } catch(IOException e) {
            final Throwable cause = e.getCause();
            if (!(cause instanceof ExecutionException) && !(cause instanceof CancellationException)) {
                throw new RuntimeException(e);
            } // else ignore, this might happen if the channel gets closed before we got the response
        }
    }

    private static void waitForLiveServerToReload(int timeout, String serverAddress, int serverPort) {
        int adjustedTimeout = TimeoutUtil.adjust(timeout);
        long start = System.currentTimeMillis();
        ModelNode operation = new ModelNode();
        operation.get(OP_ADDR).setEmptyList();
        operation.get(OP).set(READ_ATTRIBUTE_OPERATION);
        operation.get(NAME).set("server-state");
        while (System.currentTimeMillis() - start < adjustedTimeout) {
            //do the sleep before we check, as the attribute state may not change instantly
            //also reload generally takes longer than 100ms anyway
            try {
                Thread.sleep(100);
            } catch (InterruptedException e) {
            }
            try {
                ModelControllerClient liveClient = ModelControllerClient.Factory.create(
                        serverAddress, serverPort);
                try {
                    ModelNode result = liveClient.execute(operation);
                    if ("running" .equals(result.get(RESULT).asString())) {
                        log.debugf("Server %s:%d was reloaded in %d milliseconds",
                                serverAddress, serverPort, System.currentTimeMillis() - start);
                        return;
                    }
                } catch (IOException e) {
                    // ignore
                } finally {
                    IoUtils.safeClose(liveClient);
                }
            } catch (UnknownHostException e) {
                throw new RuntimeException(e);
            }
        }
        fail("Live Server did not reload in the imparted time of " +
                adjustedTimeout + "(" + timeout + ") milliseconds");
    }

    /**
     * Gets the current value of the server root resource's {@code server-state} attribute.
     * @param managementClient client to use to read the state
     * @return the server state. Will not be {@code null}.
     * @throws IOException if there is an IO problem reading the state
     */
    public static String getContainerRunningState(ManagementClient managementClient) throws IOException {
        return getContainerRunningState(managementClient.getControllerClient());
    }

    /**
     * Gets the current value of the server root resource's {@code server-state} attribute.
     * @param modelControllerClient client to use to read the state
     * @return the server state. Will not be {@code null}.
     * @throws IOException if there is an IO problem reading the state
     */
    public static String getContainerRunningState(ModelControllerClient modelControllerClient) throws IOException {
        ModelNode operation = new ModelNode();
        operation.get(OP_ADDR).setEmptyList();
        operation.get(OP).set(READ_ATTRIBUTE_OPERATION);
        operation.get(NAME).set("server-state");
        ModelNode rsp = modelControllerClient.execute(operation);
        return SUCCESS.equals(rsp.get(OUTCOME).asString()) ? rsp.get(RESULT).asString() : FAILED;
    }


    /**
     * Checks if the container status is "reload-required" and if it's the case executes reload and waits for completion.
     * Otherwise
     *
     * @deprecated Use {@link #reloadIfRequired(ManagementClient)} which will allow completion waiting to check on
     *             the correct address for reload completion if the server is not using the default management
     *             address or port
     */
    @Deprecated
    public static void reloadIfRequired(final ModelControllerClient controllerClient) throws Exception {
        String runningState = getContainerRunningState(controllerClient);
        if ("reload-required".equalsIgnoreCase(runningState)) {
            log.trace("Server reload is required. The reload will be executed.");
            executeReloadAndWaitForCompletion(controllerClient);
        } else {
            log.debugf("Server reload is not required; server-state is %s", runningState);
            Assert.assertEquals("Server state 'running' is expected", "running", runningState);
        }
    }

    /**
     * Check if the server is in reload-required state and if it is, execute {@link #executeReloadAndWaitForCompletion(ManagementClient)}.
     *
     * @param managementClient client to use to execute the reload and to provide host and port information for
     *      *                         reconnecting to wait for completion of the reload
     * @throws Exception if a failure occurs when checking if reload is required.
     */
    public static void reloadIfRequired(final ManagementClient managementClient) throws Exception {
        String runningState = getContainerRunningState(managementClient);
        if ("reload-required".equalsIgnoreCase(runningState)) {
            log.trace("Server reload is required. The reload will be executed.");
            executeReloadAndWaitForCompletion(managementClient);
        } else {
            log.debugf("Server reload is not required; server-state is %s", runningState);
            Assert.assertEquals("Server state 'running' is expected", "running", runningState);
        }
    }

    /**
     * {@link ServerSetupTask} that calls {@link #reloadIfRequired(ManagementClient)} in the {@code setup} method
     */
    public static class BeforeSetupTask implements ServerSetupTask {

        public static final BeforeSetupTask INSTANCE = new BeforeSetupTask();

        /**
         * Calls {@link #reloadIfRequired(ManagementClient)}.
         *
         * {@inheritDoc}
         */
        @Override
        public void setup(ManagementClient managementClient, String containerId) throws Exception {
            reloadIfRequired(managementClient);
        }

        /** A no-op */
        @Override
        public void tearDown(ManagementClient managementClient, String containerId) throws Exception {

        }
    }

    /**
     * {@link ServerSetupTask} that calls {@link #reloadIfRequired(ManagementClient)} in the {@code tearDown} method
     */
    public static class AfterSetupTask implements ServerSetupTask {

        public static final AfterSetupTask INSTANCE = new AfterSetupTask();

        /** A no-op */
        @Override
        public void setup(ManagementClient managementClient, String containerId) throws Exception {

        }

        /**
         * Calls {@link #reloadIfRequired(ManagementClient)}.
         *
         * {@inheritDoc}
         */
        @Override
        public void tearDown(ManagementClient managementClient, String containerId) throws Exception {
            reloadIfRequired(managementClient);
        }
    }
}
