/*
 * Copyright (c) 2015 Cisco Systems, Inc. and others.  All rights reserved.
 *
 * This program and the accompanying materials are made available under the
 * terms of the Eclipse Public License v1.0 which accompanies this distribution,
 * and is available at http://www.eclipse.org/legal/epl-v10.html
 */
package org.opendaylight.protocol.bgp.rib.impl;

import static java.util.Objects.requireNonNull;

import java.util.Collection;
import java.util.Collections;
import java.util.List;
import java.util.Optional;
import java.util.concurrent.atomic.LongAdder;
import java.util.stream.Collectors;
import javax.annotation.Nonnull;
import javax.annotation.concurrent.NotThreadSafe;
import org.opendaylight.controller.md.sal.common.api.data.LogicalDatastoreType;
import org.opendaylight.controller.md.sal.dom.api.ClusteredDOMDataTreeChangeListener;
import org.opendaylight.controller.md.sal.dom.api.DOMDataTreeChangeService;
import org.opendaylight.controller.md.sal.dom.api.DOMDataTreeIdentifier;
import org.opendaylight.protocol.bgp.rib.impl.spi.Codecs;
import org.opendaylight.protocol.bgp.rib.impl.spi.CodecsRegistry;
import org.opendaylight.protocol.bgp.rib.impl.state.peer.PrefixesSentCounters;
import org.opendaylight.protocol.bgp.rib.spi.IdentifierUtils;
import org.opendaylight.protocol.bgp.rib.spi.RIBSupport;
import org.opendaylight.protocol.bgp.rib.spi.RibSupportUtils;
import org.opendaylight.yang.gen.v1.urn.ietf.params.xml.ns.yang.ietf.inet.types.rev130715.Ipv4Prefix;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.inet.rev180329.ipv4.routes.ipv4.routes.Ipv4Route;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.PathId;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.Update;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.UpdateBuilder;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.path.attributes.Attributes;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.update.message.Nlri;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.update.message.NlriBuilder;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.update.message.WithdrawnRoutes;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.message.rev180329.update.message.WithdrawnRoutesBuilder;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.rib.rev180329.PeerId;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.rib.rev180329.bgp.rib.rib.Peer;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.rib.rev180329.bgp.rib.rib.peer.AdjRibOut;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.rib.rev180329.rib.Tables;
import org.opendaylight.yang.gen.v1.urn.opendaylight.params.xml.ns.yang.bgp.rib.rev180329.rib.TablesKey;
import org.opendaylight.yangtools.concepts.ListenerRegistration;
import org.opendaylight.yangtools.yang.common.QName;
import org.opendaylight.yangtools.yang.data.api.YangInstanceIdentifier;
import org.opendaylight.yangtools.yang.data.api.YangInstanceIdentifier.PathArgument;
import org.opendaylight.yangtools.yang.data.api.schema.ContainerNode;
import org.opendaylight.yangtools.yang.data.api.schema.DataContainerChild;
import org.opendaylight.yangtools.yang.data.api.schema.MapEntryNode;
import org.opendaylight.yangtools.yang.data.api.schema.NormalizedNodes;
import org.opendaylight.yangtools.yang.data.api.schema.tree.DataTreeCandidate;
import org.opendaylight.yangtools.yang.data.api.schema.tree.DataTreeCandidateNode;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

/**
 * Instantiated for each peer and table, listens on a particular peer's adj-rib-out,
 * performs transcoding to BA form (message) and sends it down the channel.
 */
@NotThreadSafe
final class AdjRibOutListener implements ClusteredDOMDataTreeChangeListener, PrefixesSentCounters {

    private static final Logger LOG = LoggerFactory.getLogger(AdjRibOutListener.class);

    static final QName PREFIX_QNAME = QName.create(Ipv4Route.QNAME, "prefix").intern();
    static final QName PATHID_QNAME = QName.create(Ipv4Route.QNAME, "path-id").intern();
    private final YangInstanceIdentifier.NodeIdentifier routeKeyPrefixLeaf = new YangInstanceIdentifier
            .NodeIdentifier(PREFIX_QNAME);
    private final YangInstanceIdentifier.NodeIdentifier routeKeyPathIdLeaf = new YangInstanceIdentifier
            .NodeIdentifier(PATHID_QNAME);

    private final ChannelOutputLimiter session;
    private final Codecs codecs;
    private final RIBSupport support;
    private final boolean mpSupport;
    private final ListenerRegistration<AdjRibOutListener> registerDataTreeChangeListener;
    private final LongAdder prefixesSentCounter = new LongAdder();

    private AdjRibOutListener(final PeerId peerId, final TablesKey tablesKey, final YangInstanceIdentifier ribId,
            final CodecsRegistry registry, final RIBSupport support, final DOMDataTreeChangeService service,
            final ChannelOutputLimiter session, final boolean mpSupport) {
        this.session = requireNonNull(session);
        this.support = requireNonNull(support);
        this.codecs = registry.getCodecs(this.support);
        this.mpSupport = mpSupport;
        final YangInstanceIdentifier adjRibOutId = ribId.node(Peer.QNAME).node(IdentifierUtils.domPeerId(peerId))
                .node(AdjRibOut.QNAME).node(Tables.QNAME).node(RibSupportUtils.toYangTablesKey(tablesKey));
        this.registerDataTreeChangeListener = service.registerDataTreeChangeListener(
                new DOMDataTreeIdentifier(LogicalDatastoreType.OPERATIONAL, adjRibOutId), this);
    }

    static AdjRibOutListener create(
            @Nonnull final PeerId peerId,
            @Nonnull final TablesKey tablesKey,
            @Nonnull final YangInstanceIdentifier ribId,
            @Nonnull final CodecsRegistry registry,
            @Nonnull final RIBSupport support,
            @Nonnull final DOMDataTreeChangeService service,
            @Nonnull final ChannelOutputLimiter session,
            final boolean mpSupport) {
        return new AdjRibOutListener(peerId, tablesKey, ribId, registry, support, service, session, mpSupport);
    }

    @Override
    public void onDataTreeChanged(final Collection<DataTreeCandidate> changes) {
        LOG.debug("Data change received for AdjRibOut {}", changes);
        for (final DataTreeCandidate tc : changes) {
            LOG.trace("Change {} type {}", tc.getRootNode(), tc.getRootNode().getModificationType());
            for (final DataTreeCandidateNode child : tc.getRootNode().getChildNodes()) {
                processSupportedFamilyRoutes(child);
            }
        }
        this.session.flush();
    }

    private void processSupportedFamilyRoutes(final DataTreeCandidateNode child) {
        final Collection<DataTreeCandidateNode> changedRoutes = this.support.changedRoutes(child);
        for (final DataTreeCandidateNode route : changedRoutes) {
            processRouteChange(route);
        }
    }

    private void processRouteChange(final DataTreeCandidateNode route) {
        final Update update;
        switch (route.getModificationType()) {
            case UNMODIFIED:
                LOG.debug("Skipping unmodified route {}", route.getIdentifier());
                return;
            case DELETE:
            case DISAPPEARED:
                // FIXME: we can batch deletions into a single batch
                update = withdraw((MapEntryNode) route.getDataBefore().get());
                LOG.debug("Withdrawing routes {}", update);
                break;
            case APPEARED:
            case SUBTREE_MODIFIED:
            case WRITE:
                update = advertise((MapEntryNode) route.getDataAfter().get());
                LOG.debug("Advertising routes {}", update);
                break;
            default:
                LOG.warn("Ignoring unhandled modification type {}", route.getModificationType());
                return;
        }
        this.session.write(update);
    }

    private Attributes routeAttributes(final MapEntryNode route) {
        if (LOG.isDebugEnabled()) {
            LOG.debug("AdjRibOut parsing route {}", NormalizedNodes.toStringTree(route));
        }
        final ContainerNode advertisedAttrs = (ContainerNode) NormalizedNodes.findNode(route,
                this.support.routeAttributesIdentifier()).orElse(null);
        return this.codecs.deserializeAttributes(advertisedAttrs);
    }

    private Update withdraw(final MapEntryNode route) {
        if (!this.mpSupport) {
            return buildUpdate(Collections.emptyList(), Collections.singleton(route), routeAttributes(route));
        }
        return this.support.buildUpdate(Collections.emptyList(), Collections.singleton(route), routeAttributes(route));
    }

    private Update advertise(final MapEntryNode route) {
        this.prefixesSentCounter.increment();
        if (!this.mpSupport) {
            return buildUpdate(Collections.singleton(route), Collections.emptyList(), routeAttributes(route));
        }
        return this.support.buildUpdate(Collections.singleton(route), Collections.emptyList(), routeAttributes(route));
    }

    private Update buildUpdate(
            @Nonnull final Collection<MapEntryNode> advertised,
            @Nonnull final Collection<MapEntryNode> withdrawn,
            @Nonnull final Attributes attr) {
        final UpdateBuilder ub = new UpdateBuilder().setWithdrawnRoutes(extractWithdrawnRoutes(withdrawn))
                .setNlri(extractNlris(advertised));
        ub.setAttributes(attr);
        return ub.build();
    }

    private List<Nlri> extractNlris(final Collection<MapEntryNode> routes) {
        return routes.stream().map(ipv4Route -> new NlriBuilder().setPrefix(new Ipv4Prefix(extractPrefix(ipv4Route)))
                .setPathId(extractPathId(ipv4Route)).build()).collect(Collectors.toList());
    }

    private List<WithdrawnRoutes> extractWithdrawnRoutes(final Collection<MapEntryNode> routes) {
        return routes.stream().map(ipv4Route -> new WithdrawnRoutesBuilder()
                .setPrefix(new Ipv4Prefix(extractPrefix(ipv4Route))).setPathId(extractPathId(ipv4Route)).build())
                .collect(Collectors.toList());
    }

    private String extractPrefix(final MapEntryNode ipv4Route) {
        return (String) ipv4Route.getChild(this.routeKeyPrefixLeaf).get().getValue();
    }

    private PathId extractPathId(final MapEntryNode ipv4Route) {
        final Optional<DataContainerChild<? extends PathArgument, ?>> pathId = ipv4Route
                .getChild(this.routeKeyPathIdLeaf);
        return pathId.map(dataContainerChild -> new PathId((Long) dataContainerChild.getValue())).orElse(null);
    }

    public void close() {
        this.registerDataTreeChangeListener.close();
    }

    boolean isMpSupported() {
        return this.mpSupport;
    }

    @Override
    public long getPrefixesSentCount() {
        return this.prefixesSentCounter.longValue();
    }
}