/*
 * Copyright (c) 2000, 2020 Oracle and/or its affiliates. All rights reserved.
 * Copyright (c) 2021 Contributors to the Eclipse Foundation
 *
 * 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.ums.service;

import com.sun.messaging.ums.common.Constants;
import com.sun.messaging.xml.MessageTransformer;
import com.sun.messaging.ums.common.MessageUtil;
import com.sun.messaging.ums.simple.SimpleMessage;
import java.util.Map;

import java.util.logging.Level;
import java.util.logging.Logger;
import jakarta.jms.Destination;
import jakarta.jms.JMSException;
import jakarta.jms.Message;
import jakarta.jms.MessageProducer;

import jakarta.jms.Session;
import jakarta.xml.soap.SOAPException;
import jakarta.xml.soap.SOAPMessage;

public class SendServiceImpl implements SendService {

    // private Lock lock = null;
    private ClientPool cache = null;
    private Logger logger = UMSServiceImpl.logger;

    public SendServiceImpl(ClientPool cache) throws JMSException {

        // lock = new Lock();

        // cache = new JMSCache(MY_NAME, props, lock, logger);
        // cache = new ClientPool(provider, SERVICE_NAME, props, lock);

        // add my cache to the sweeper
        // sweeper.addClientPool(cache);
        this.cache = cache;
    }

    // public String authenticate (String user, String password) throws JMSException {
    // return cache.authenticate(user, password);
    // }

    // public void authenticateUUID (String clientId) throws JMSException {
    // cache.authenticateUUID (clientId);
    // }

    @Override
    public void send(SOAPMessage sm) throws JMSException {

        Client client = null;
        Message message = null;

        try {

            /**
             * String clientId = MessageUtil.getServiceClientId(sm);
             *
             * if (clientId == null) { user = MessageUtil.getServiceAttribute(sm, Constants.USER); pass =
             * MessageUtil.getServiceAttribute(sm, Constants.PASSWORD); }
             *
             * client = cache.getClient(clientId, user, pass);
             **/

            client = cache.getClient(sm);

            // Object syncObj = lock.getLock(client.getId());
            Object syncObj = client.getLock();

            if (UMSServiceImpl.debug) {
                logger.info("*** SendServiceImpl sending message: " + sm);
            }

            synchronized (syncObj) {

                // client = cache.getClient(clientId);

                Session session = client.getSession();

                String destName = MessageUtil.getServiceDestinationName(sm);
                boolean isTopic = MessageUtil.isServiceTopicDomain(sm);

                Destination dest = cache.getJMSDestination(destName, isTopic);

                // XXX remove message header element
                MessageUtil.removeMessageHeaderElement(sm);

                if (UMSServiceImpl.debug) {
                    logger.info("*** SendServiceImpl sending message: " + sm);
                }
                // sm.writeTo(System.out);

                message = MessageTransformer.SOAPMessageIntoJMSMessage(sm, session);

                MessageProducer producer = client.getProducer();

                producer.send(dest, message);
            }

            if (UMSServiceImpl.debug) {
                logger.info("*** SendServiceImpl sent message: " + message);
            }

        } catch (Exception ex) {

            if (ex instanceof JMSException) {
                throw (JMSException) ex;
            } else {
                JMSException jmse = new JMSException(ex.getMessage());
                jmse.setLinkedException(ex);
                throw jmse;
            }

        } finally {
            cache.returnClient(client);
        }
    }

    /**
     * Send a Text message to MQ.
     *
     */
    public void sendText(String sid, boolean isTopic, String destName, String text, Map map) throws JMSException {

        Client client = null;
        Message message = null;

        try {

            client = cache.getClient(sid, map);

            // Object syncObj = lock.getLock(client.getId());
            Object syncObj = client.getLock();

            if (UMSServiceImpl.debug) {
                logger.info("*** SendServiceImpl sending simple message: sid = " + sid + ", text=" + text);
            }

            synchronized (syncObj) {

                // client = cache.getClient(clientId);

                Session session = client.getSession();

                Destination dest = cache.getJMSDestination(destName, isTopic);

                message = session.createTextMessage(text);

                MessageProducer producer = client.getProducer();

                producer.send(dest, message);
            }

            if (UMSServiceImpl.debug) {
                logger.info("*** SendServiceImpl sent text message... ");
            }

        } catch (Exception ex) {

            logger.log(Level.WARNING, ex.getMessage(), ex);

            if (ex instanceof JMSException) {
                throw (JMSException) ex;
            } else {
                JMSException jmse = new JMSException(ex.getMessage());
                jmse.setLinkedException(ex);
                throw jmse;
            }

        } finally {
            cache.returnClient(client);
        }
    }

    @Override
    public void commit(SimpleMessage sm) throws JMSException {

        String sid = sm.getMessageProperty(Constants.CLIENT_ID);
        Map map = sm.getMessageProperties();

        if (sid == null) {
            throw new JMSException("Cannot commit a transaction because sid is null.");
        }

        Client client = cache.getClient(sid, map);

        this.commit(client);
    }

    @Override
    public void rollback(SimpleMessage sm) throws JMSException {

        String sid = sm.getMessageProperty(Constants.CLIENT_ID);
        Map map = sm.getMessageProperties();

        if (sid == null) {
            throw new JMSException("Cannot rollback a transaction because sid is null.");
        }

        Client client = cache.getClient(sid, map);

        this.rollback(client);
    }

    @Override
    public void commit(SOAPMessage sm) throws JMSException {

        try {

            String sid = MessageUtil.getServiceClientId(sm);

            if (sid == null) {
                throw new JMSException("Cannot commit a transaction because sid is null.");
            }

            Client client = cache.getClient(sm);

            this.commit(client);

        } catch (SOAPException soape) {
            JMSException jmse = new JMSException(soape.getMessage());

            jmse.setLinkedException(soape);
            throw jmse;
        }
    }

    @Override
    public void rollback(SOAPMessage sm) throws JMSException {

        try {

            String sid = MessageUtil.getServiceClientId(sm);

            if (sid == null) {
                throw new JMSException("Cannot rollback a transaction because sid is null.");
            }

            Client client = cache.getClient(sm);

            this.rollback(client);
        } catch (SOAPException soape) {
            JMSException jmse = new JMSException(soape.getMessage());

            jmse.setLinkedException(soape);
            throw jmse;
        }
    }

    private void commit(Client client) throws JMSException {

        try {

            // client = cache.getClient(sm);

            // Object syncObj = lock.getLock(client.getId());
            Object syncObj = client.getLock();

            if (UMSServiceImpl.debug) {
                logger.info("*** Commiting transaction, sid = " + client.getId());
            }

            synchronized (syncObj) {

                Session session = client.getSession();
                session.commit();
            }

            if (UMSServiceImpl.debug) {
                logger.info("*** Transaction committed. sid=" + client.getId());
            }

        } catch (Exception ex) {

            if (ex instanceof JMSException) {
                throw (JMSException) ex;
            } else {
                JMSException jmse = new JMSException(ex.getMessage());
                jmse.setLinkedException(ex);
                throw jmse;
            }

        } finally {
            cache.returnClient(client);
        }
    }

    private void rollback(Client client) throws JMSException {

        try {

            // client = cache.getClient(sm);

            // Object syncObj = lock.getLock(client.getId());
            Object syncObj = client.getLock();

            if (UMSServiceImpl.debug) {
                logger.info("*** rolling back transaction, sid = " + client.getId());
            }

            synchronized (syncObj) {

                Session session = client.getSession();
                session.rollback();
            }

            if (UMSServiceImpl.debug) {
                logger.info("*** Transaction rolled back. sid=" + client.getId());
            }

        } catch (Exception ex) {

            if (ex instanceof JMSException) {
                throw (JMSException) ex;
            } else {
                JMSException jmse = new JMSException(ex.getMessage());
                jmse.setLinkedException(ex);
                throw jmse;
            }

        } finally {
            cache.returnClient(client);
        }
    }

    @Override
    public void close() {

        try {
            // sweeper.removeClientPool(cache);
            cache.close();
        } catch (Exception e) {
            logger.log(Level.WARNING, e.getMessage(), e);
        }

    }

}
