/*
 * Copyright (c) 2000, 2017 Oracle and/or its affiliates. All rights reserved.
 *
 * This program and the accompanying materials are made available under the
 * terms of the Eclipse Public License v. 2.0, which is available at
 * http://www.eclipse.org/legal/epl-2.0.
 *
 * This Source Code may also be made available under the following Secondary
 * Licenses when the conditions for such availability set forth in the
 * Eclipse Public License v. 2.0 are satisfied: GNU General Public License,
 * version 2 with the GNU Classpath Exception, which is available at
 * https://www.gnu.org/software/classpath/license.html.
 *
 * SPDX-License-Identifier: EPL-2.0 OR GPL-2.0 WITH Classpath-exception-2.0
 */

/*
 */

package com.sun.messaging.jmq.jmsserver.cluster.manager.ha;

import java.util.*;
import java.lang.reflect.Constructor;
import java.net.MalformedURLException;
import java.net.UnknownHostException;

import com.sun.messaging.jmq.io.MQAddress;
import com.sun.messaging.jmq.util.log.*;
import com.sun.messaging.jmq.util.UID;
import com.sun.messaging.jmq.jmsserver.util.BrokerException;
import com.sun.messaging.jmq.jmsserver.persist.api.Store;
import com.sun.messaging.jmq.jmsserver.persist.api.MigratableStoreUtil;
import com.sun.messaging.jmq.jmsserver.cluster.manager.*;
import com.sun.messaging.jmq.jmsserver.cluster.api.*;
import com.sun.messaging.jmq.jmsserver.multibroker.BrokerInfo;
import com.sun.messaging.jmq.jmsserver.resources.*;
import com.sun.messaging.jmq.jmsserver.Globals;
import org.jvnet.hk2.annotations.Service;
import javax.inject.Singleton;

/**
 * This class extends ClusterManagerImpl and is used to obtain and distribute cluster information in an HA cluster.
 */
@Service(name = "com.sun.messaging.jmq.jmsserver.cluster.manager.ha.RepHAClusterManagerImpl")
@Singleton
public class RepHAClusterManagerImpl extends ClusterManagerImpl {

    private UID localStoreSessionUID = null;

    /**
    */
    public RepHAClusterManagerImpl() throws BrokerException {
        super();
    }

    /**
     * Returns if the cluster is "highly available".
     *
     * @return true if the cluster is HA
     * @throws RuntimeException if called before the cluster has been initialized by calling ClusterManager.setMQAddress
     * @see ClusterManager#setMQAddress
     */
    @Override
    public boolean isHA() {
        if (!initialized) {
            throw new RuntimeException("Cluster not initialized");
        }

        return false;
    }

    /**
     * Reload the cluster properties from config
     *
     */
    @Override
    public void reloadConfig() throws BrokerException {
        if (!initialized) {
            throw new RuntimeException("Cluster not initialized");
        }

        String[] props = { CLUSTERURL_PROPERTY };
        config.reloadProps(Globals.getConfigName(), props, false);
    }

    /**
     * Method which initializes the broker cluster. (Called by ClusterManager.setMQAddress()).
     *
     * @param address the address for the portmapper
     *
     * @see ClusterManager#setMQAddress
     * @throws BrokerException if something goes wrong during intialzation
     */
    @Override
    public String initialize(MQAddress address) throws BrokerException {
        logger.log(Logger.DEBUG, "initializingCluster at " + address);

        if (!Globals.isBDBStore()) {
            throw new BrokerException("Store not " + Store.BDB_STORE_TYPE + " type for cluster manage[" + getClass().getSimpleName() + "]");
        }
        String url = super.initialize(address);

        if (getConfigBrokerCount() > 0) {
            if (Globals.getClusterID() == null) {
                throw new BrokerException("imq.cluster.clusterid must set");
            }
        }
        return url;
    }

    @Override
    public ClusteredBroker newClusteredBroker(MQAddress URL, boolean isLocal, UID sid) throws BrokerException {
        ClusteredBroker b = new RepHAClusteredBrokerImpl(this, URL, isLocal, sid);
        if (allBrokers instanceof AutoClusterBrokerMap) {
            ((ClusteredBrokerImpl) b).setConfigBroker(true);
        }
        return b;
    }

    /**
     * Retrieve the broker that creates the specified store session ID.
     *
     * @param uid store session ID
     * @return the broker ID
     */
    @Override
    public String getStoreSessionCreator(UID uid) {
        return null;
    }

    @Override
    protected ClusteredBroker updateBrokerOnActivation(ClusteredBroker broker, Object userData) {
        ((RepHAClusteredBrokerImpl) broker).setStoreSessionUID(((BrokerInfo) userData).getBrokerAddr().getStoreSessionUID());
        return broker;
    }

    @Override
    protected ClusteredBroker updateBrokerOnDeactivation(ClusteredBroker broker, Object userData) {
        return broker;
    }

    @Override
    public ClusteredBroker getBrokerByNodeName(String nodeName) throws BrokerException {

        if (!initialized) {
            throw new RuntimeException("Cluster not initialized");
        }
        RepHAClusteredBrokerImpl cb = null;
        synchronized (allBrokers) {
            Iterator itr = allBrokers.values().iterator();
            while (itr.hasNext()) {

                cb = (RepHAClusteredBrokerImpl) itr.next();
                String instn = cb.getInstanceName();
                UID ss = cb.getStoreSessionUID();
                if (instn != null && ss != null) {
                    if (MigratableStoreUtil.makeEffectiveBrokerID(instn, ss).equals(nodeName)) {
                        return cb;
                    }
                }
            }
        }
        return null;
    }

    /**
     * Gets the session UID associated with the local broker
     *
     * @return the broker session uid (if known)
     */
    @Override
    public UID getStoreSessionUID() {
        if (localStoreSessionUID == null) {
            localStoreSessionUID = ((RepHAClusteredBrokerImpl) getLocalBroker()).getStoreSessionUID();
        }
        return localStoreSessionUID;
    }

    /**
     * Adds an old UID to the list of supported sessions for this broker.
     *
     * @param uid the broker's store session UID that has been taken over
     */
    @Override
    protected void addSupportedStoreSessionUID(UID uid) {
        super.addSupportedStoreSessionUID(uid);
    }

    /***************************************************
     * override super class methods for auto-clustering
     ***************************************************/

    @Override
    protected Map initAllBrokers(MQAddress myaddr) throws BrokerException {

        String cstr = Globals.getConfig().getProperty(Globals.AUTOCLUSTER_BROKERMAP_CLASS_PROP);
        if (cstr == null) {
            return super.initAllBrokers(myaddr);
        }
        try {
            Class c = Class.forName(cstr);
            Class[] paramTypes = { ClusterManagerImpl.class, MQAddress.class };
            Constructor cons = c.getConstructor(paramTypes);
            Object[] paramArgs = { this, myaddr };
            return (Map) cons.newInstance(paramArgs);
        } catch (Exception e) {
            throw new BrokerException(e.getMessage(), e);
        }
    }

    @Override
    protected LinkedHashSet parseBrokerList() throws MalformedURLException, UnknownHostException {

        if (!(allBrokers instanceof AutoClusterBrokerMap)) {
            return super.parseBrokerList();
        }

        String val = config.getProperty(AUTOCONNECT_PROPERTY);
        if (val != null) {
            logger.log(Logger.INFO, BrokerResources.W_IGNORE_PROP_SETTING, AUTOCONNECT_PROPERTY + "=" + val);
        }

        val = config.getProperty(Globals.IMQ + ".cluster.brokerlist.manual");
        if (val != null) {
            logger.log(Logger.INFO, BrokerResources.W_IGNORE_PROP_SETTING, Globals.IMQ + ".cluster.brokerlist.manual" + "=" + val);
        }
        LinkedHashSet brokers = new LinkedHashSet();
        synchronized (allBrokers) {
            Iterator itr = allBrokers.values().iterator();
            while (itr.hasNext()) {
                Object o = itr.next();
                RepHAClusteredBrokerImpl b = (RepHAClusteredBrokerImpl) o;
                if (!b.isLocalBroker()) {
                    brokers.add(b.getBrokerURL());
                }
            }
        }
        return brokers;
    }

    @Override
    public String lookupBrokerID(MQAddress address) {

        if (!initialized) {
            throw new RuntimeException("Cluster manager is not initialized");
        }
        if (allBrokers instanceof AutoClusterBrokerMap) {
            try {
                synchronized (allBrokers) {
                    ((AutoClusterBrokerMap) allBrokers).updateMap();
                }
            } catch (BrokerException e) {
                logger.logStack(logger.WARNING, e.getMessage(), e);
            }
        }
        return super.lookupBrokerID(address);
    }

    @Override
    public Iterator getConfigBrokers() {
        if (allBrokers instanceof AutoClusterBrokerMap) {
            return getKnownBrokers(true);
        }
        return super.getConfigBrokers();
    }

    @Override
    public int getConfigBrokerCount() {
        if (allBrokers instanceof AutoClusterBrokerMap) {
            return super.getKnownBrokerCount();
        }
        return super.getConfigBrokerCount();
    }

    @Override
    public Iterator getKnownBrokers(boolean refresh) {

        if (!initialized) {
            throw new RuntimeException("Cluster manager is not initialized");
        }

        if (refresh && (allBrokers instanceof AutoClusterBrokerMap)) {
            try {
                synchronized (allBrokers) {
                    ((AutoClusterBrokerMap) allBrokers).updateMap(true);
                }
            } catch (BrokerException e) {
                logger.logStack(logger.WARNING, e.getMessage(), e);
            }
        }
        return super.getKnownBrokers(refresh);
    }

    @Override
    public ClusteredBroker getBroker(String brokerid) {

        if (allBrokers instanceof AutoClusterBrokerMap) {
            ClusteredBroker cb = super.getBroker(brokerid);
            if (cb != null) {
                return cb;
            }
            try {
                synchronized (allBrokers) {
                    ((AutoClusterBrokerMap) allBrokers).updateMap(true);
                }
            } catch (BrokerException e) {
                logger.logStack(logger.WARNING, e.getMessage(), e);
            }
        }
        return super.getBroker(brokerid);
    }

    /**
     */
    @Override
    protected String addBroker(MQAddress url, boolean isLocal, boolean isConfig, UID uid) throws NoSuchElementException, BrokerException {

        if (!initialized) {
            throw new RuntimeException("Cluster not initialized");
        }

        if (!(allBrokers instanceof AutoClusterBrokerMap)) {
            return super.addBroker(url, isLocal, isConfig, uid);
        }

        String name = null;
        ClusteredBroker cb = null;
        if (isLocal) {
            synchronized (allBrokers) {
                name = lookupBrokerID(url);
                if (name == null) {
                    cb = newClusteredBroker(url, isLocal, uid);
                    name = cb.getBrokerName();
                } else {
                    cb = getBroker(name);
                }
                synchronized (allBrokers) {
                    allBrokers.put(name, cb);
                }
            }
        } else {
            name = lookupBrokerID(url);
            if (name != null) {
                cb = getBroker(name);
            }
            if (name == null || cb == null) {
                throw new NoSuchElementException("Unknown broker " + url);
            }
        }
        if (uid != null) {
            cb.setBrokerSessionUID(uid);
        }
        if (isLocal) {
            cb.setStatus(BrokerStatus.ACTIVATE_BROKER, null);
        }
        brokerChanged(ClusterReason.ADDED, cb.getBrokerName(), null, cb, uid, null);
        return name;
    }

    @Override
    protected void setupListeners() {
        if (allBrokers instanceof AutoClusterBrokerMap) {
            config.addListener(TRANSPORT_PROPERTY, this);
            config.addListener(HOST_PROPERTY, this);
            config.addListener(PORT_PROPERTY, this);
            return;
        }
        super.setupListeners();
    }
}
