/**
 * 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.yangtools.yang.parser.stmt.rfc6020.effective;

import com.google.common.collect.ImmutableList;
import java.util.ArrayDeque;
import java.util.ArrayList;
import java.util.Deque;
import java.util.List;
import java.util.Objects;
import org.opendaylight.yangtools.yang.common.QName;
import org.opendaylight.yangtools.yang.model.api.ExtensionDefinition;
import org.opendaylight.yangtools.yang.model.api.SchemaPath;
import org.opendaylight.yangtools.yang.model.api.UnknownSchemaNode;
import org.opendaylight.yangtools.yang.model.api.meta.EffectiveStatement;
import org.opendaylight.yangtools.yang.model.api.stmt.ExtensionStatement;
import org.opendaylight.yangtools.yang.parser.spi.meta.StmtContext;

public class ExtensionEffectiveStatementImpl extends AbstractEffectiveDocumentedNode<QName, ExtensionStatement>
        implements ExtensionDefinition {
    private static final class RecursionDetector extends ThreadLocal<Deque<ExtensionEffectiveStatementImpl>> {
        boolean check(final ExtensionEffectiveStatementImpl current) {
            final Deque<ExtensionEffectiveStatementImpl> stack = get();
            if (stack != null) {
                for (ExtensionEffectiveStatementImpl s : stack) {
                    if (s == current) {
                        return true;
                    }
                }
            }
            return false;
        }

        void push(final ExtensionEffectiveStatementImpl current) {
            Deque<ExtensionEffectiveStatementImpl> stack = get();
            if (stack == null) {
                stack = new ArrayDeque<>(1);
                set(stack);
            }

            stack.push(current);
        }

        void pop() {
            Deque<ExtensionEffectiveStatementImpl> stack = get();
            stack.pop();
            if (stack.isEmpty()) {
                remove();
            }
        }
    }

    private static final RecursionDetector TOSTRING_DETECTOR = new RecursionDetector();

    private final QName qname;
    private final String argument;
    private final SchemaPath schemaPath;

    private final List<UnknownSchemaNode> unknownNodes;
    private final boolean yin;

    public ExtensionEffectiveStatementImpl(
            final StmtContext<QName, ExtensionStatement, EffectiveStatement<QName, ExtensionStatement>> ctx) {
        super(ctx);
        this.qname = ctx.getStatementArgument();
        this.schemaPath = ctx.getSchemaPath().get();

        final List<UnknownSchemaNode> unknownNodesInit = new ArrayList<>();
        for (EffectiveStatement<?, ?> unknownNode : effectiveSubstatements()) {
            if (unknownNode instanceof UnknownSchemaNode) {
                unknownNodesInit.add((UnknownSchemaNode) unknownNode);
            }
        }
        this.unknownNodes = ImmutableList.copyOf(unknownNodesInit);

        // initFields
        ArgumentEffectiveStatementImpl argumentSubstatement = firstEffective(ArgumentEffectiveStatementImpl.class);
        if (argumentSubstatement != null) {
            this.argument = argumentSubstatement.argument().getLocalName();

            YinElementEffectiveStatementImpl yinElement = argumentSubstatement
                    .firstEffective(YinElementEffectiveStatementImpl.class);
            if (yinElement != null) {
                this.yin = yinElement.argument();
            } else {
                this.yin = false;
            }
        } else {
            this.argument = null;
            this.yin = false;
        }
    }

    @Override
    public QName getQName() {
        return qname;
    }

    @Override
    public SchemaPath getPath() {
        return schemaPath;
    }

    @Override
    public List<UnknownSchemaNode> getUnknownSchemaNodes() {
        return unknownNodes;
    }

    @Override
    public String getArgument() {
        return argument;
    }

    @Override
    public boolean isYinElement() {
        return yin;
    }

    @Override
    public int hashCode() {
        final int prime = 31;
        int result = 1;
        result = prime * result + Objects.hashCode(qname);
        result = prime * result + Objects.hashCode(schemaPath);
        return result;
    }

    @Override
    public boolean equals(final Object obj) {
        if (this == obj) {
            return true;
        }
        if (obj == null) {
            return false;
        }
        if (getClass() != obj.getClass()) {
            return false;
        }
        ExtensionEffectiveStatementImpl other = (ExtensionEffectiveStatementImpl) obj;
        return Objects.equals(qname, other.qname) && Objects.equals(schemaPath, other.schemaPath);
    }

    @Override
    public String toString() {
        if (TOSTRING_DETECTOR.check(this)) {
            return recursedToString();
        }

        TOSTRING_DETECTOR.push(this);
        try {
            StringBuilder sb = new StringBuilder(ExtensionEffectiveStatementImpl.class.getSimpleName());
            sb.append("[");
            sb.append("argument=").append(argument);
            sb.append(", qname=").append(qname);
            sb.append(", schemaPath=").append(schemaPath);
            sb.append(", extensionSchemaNodes=").append(unknownNodes);
            sb.append(", yin=").append(yin);
            sb.append("]");
            return sb.toString();
        } finally {
            TOSTRING_DETECTOR.pop();
        }
    }

    private String recursedToString() {
        return ExtensionEffectiveStatementImpl.class.getSimpleName() + "[" +
                "argument=" + argument +
                ", qname=" + qname +
                ", schemaPath=" + schemaPath +
                ", yin=" + yin +
                " <RECURSIVE> ]";
    }
}