<commit_before>/*
 * Copyright (C) 2016 Singular Studios (a.k.a Atom Tecnologia) - www.opensingular.com
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

package org.opensingular.form;

import com.google.common.base.Preconditions;
import org.opensingular.form.internal.PathReader;
import org.opensingular.form.processor.ClassInspectionCache;
import org.opensingular.form.processor.ClassInspectionCache.CacheKey;
import org.opensingular.form.processor.TypeProcessorAttributeReadFromFile;
import org.opensingular.form.processor.TypeProcessorBeanInjector;
import org.opensingular.form.processor.TypeProcessorPublicFieldsReferences;

import javax.annotation.Nonnull;
import javax.annotation.Nullable;
import java.io.IOException;
import java.util.Collection;
import java.util.Collections;
import java.util.LinkedHashMap;
import java.util.Map;
import java.util.Objects;
import java.util.Optional;
import java.util.logging.Level;
import java.util.logging.Logger;

public abstract class SScopeBase implements SScope {

    private Map<String, SType<?>> localTypes;

    private static final Logger LOGGER = Logger.getLogger(SScopeBase.class.getName());

    /**
     * Indica que o escopo têm uma referência recursiva para ele mesmo. Somente é marcado true na referência interna, ou
     * seja, a primeira definição do tipo não será marcado como recursivo, mas o campo filho que aponta para ele mesmo,
     * será.
     */
    private boolean recursiveReference;

    /**
     * Retorna os tipos criados localmente. Se for um pacote, retorna o tipos do
     * pacote. Se for um tipo, então retorna o tipo criados no escopo local do
     * tipo (tipo dentro de tipo).
     */
    @Nonnull
    public Collection<SType<?>> getLocalTypes() {
        return getLocalTypesMap().values();
    }

    private Map<String, SType<?>> getLocalTypesMap() {
        if (isRecursiveReference()) {
            //Se é uma referência recursiva, não deve criar um novo mapa local e sim usar o mapa do tipo original
            // para o qual aponta
            if (this instanceof SType) {
                SType<?> superType = ((SType<?>) this).getSuperType();
                if (superType == null || superType.getClass() != getClass()) {
                    //Verificação de sanidade
                    throw new SingularFormException(
                            "Erro interno: uma referência recursiva não extende um tipo que é da mesma classe " +
                                    "(superType()=" + superType + ")", this);
                } else {
                    return ((SScopeBase) superType).getLocalTypesMap();
                }
            }
        }
        return localTypes == null ? Collections.emptyMap() : localTypes;
    }

    @Override
    @Nonnull
    public Optional<SType<?>> getLocalTypeOptional(@Nonnull String path) {
        return getLocalTypeOptional(new PathReader(path));
    }

    @Nonnull
    final Optional<SType<?>> getLocalTypeOptional(@Nonnull PathReader pathReader) {
        SType<?> type = getLocalTypesMap().get(pathReader.getToken());
        if (type == null) {
            return Optional.empty();
        } else if (pathReader.isLast()) {
            return Optional.of(type);
        }
        return type.getLocalTypeOptional(pathReader.next());
    }


    @Override
    @Nonnull
    public SType<?> getLocalType(@Nonnull String path) {
        // Não utiliza getTipoLocalOpcional, pois da forma abaixo é possível
        // apontar precisamente onde deu erro no path passado.
        return getLocalType(new PathReader(path));
    }

    @Nonnull
    final SType<?> getLocalType(@Nonnull PathReader pathReader) {
        SType<?> type = getLocalTypesMap().get(pathReader.getToken());
        if (type != null) {
            if (pathReader.isLast()) {
                return type;
            }
            return type.getLocalType(pathReader.next());
        }
        throw new SingularFormException(pathReader.getErrorMsg(this,
                "Não foi encontrado o tipo '" + pathReader.getToken() + "' em '" + getName() + "'"), this);
    }

    /** Registro o tipo informado neste escopo. */
    @Nonnull
    final <T extends SType<?>> T registerType(@Nonnull Class<T> typeClass) {
        Objects.requireNonNull(typeClass);
        T t;
        try {
            t = typeClass.newInstance();
        } catch (InstantiationException | IllegalAccessException e) {
            throw new SingularFormException("Erro instanciando " + typeClass.getName(), e);
        }
        t = registerTypeInternal(t, typeClass);
        TypeProcessorAttributeReadFromFile.INSTANCE.onRegisterTypeByClass(t, typeClass);
        return t;
    }

    @Nonnull
    final <T extends SType<?>> T registerTypeInternal(@Nonnull T newType, @Nullable Class<T> typeClass) {
        getDictionary().registerType(this, newType, typeClass);
        /*
        (by <NAME>) O If abaixo impede que o onLoadType seja chamado mais de uma vezes caso o novo tipo seja
        apenas uma extensão da classe já carregada anteriormente, ou seja, impede que o mesmo onLoadType seja
        invocado múltiplas vezes. Esse controle é especialmente importante para eveitar entrar em loop quando
        um tipo tem uma referência para ele mesmo, além de evitar recargas e duplicação de atributos.
        */
        newType.setRecursiveReference(isRecursiveReference(newType));
        SType<?> superType = newType.getSuperType();
        if (superType == null || superType.getClass() != newType.getClass()) {
            newType.extendSubReference();
            TypeProcessorPublicFieldsReferences.INSTANCE.processTypePreOnLoadTypeCall(newType);
            newType.setCallingOnLoadType(true);
            if (typeClass != null) {
                TypeProcessorBeanInjector.INSTANCE.onRegisterTypeByClass(newType, typeClass);
            }
            callOnLoadTypeIfNecessary(newType);
            newType.setCallingOnLoadType(false);
            TypeProcessorPublicFieldsReferences.INSTANCE.processTypePosRegister(newType, true);
            getDictionary().runPendingTypeProcessorExecution(newType);
        } else {
            if (newType.isRecursiveReference()) {<commit_msg>correção na injeção nos stypes<commit_after>/*
 * Copyright (C) 2016 Singular Studios (a.k.a Atom Tecnologia) - www.opensingular.com
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

package org.opensingular.form;

import com.google.common.base.Preconditions;
import org.opensingular.form.internal.PathReader;
import org.opensingular.form.processor.ClassInspectionCache;
import org.opensingular.form.processor.ClassInspectionCache.CacheKey;
import org.opensingular.form.processor.TypeProcessorAttributeReadFromFile;
import org.opensingular.form.processor.TypeProcessorBeanInjector;
import org.opensingular.form.processor.TypeProcessorPublicFieldsReferences;

import javax.annotation.Nonnull;
import javax.annotation.Nullable;
import java.io.IOException;
import java.util.Collection;
import java.util.Collections;
import java.util.LinkedHashMap;
import java.util.Map;
import java.util.Objects;
import java.util.Optional;
import java.util.logging.Level;
import java.util.logging.Logger;

public abstract class SScopeBase implements SScope {

    private Map<String, SType<?>> localTypes;

    private static final Logger LOGGER = Logger.getLogger(SScopeBase.class.getName());

    /**
     * Indica que o escopo têm uma referência recursiva para ele mesmo. Somente é marcado true na referência interna, ou
     * seja, a primeira definição do tipo não será marcado como recursivo, mas o campo filho que aponta para ele mesmo,
     * será.
     */
    private boolean recursiveReference;

    /**
     * Retorna os tipos criados localmente. Se for um pacote, retorna o tipos do
     * pacote. Se for um tipo, então retorna o tipo criados no escopo local do
     * tipo (tipo dentro de tipo).
     */
    @Nonnull
    public Collection<SType<?>> getLocalTypes() {
        return getLocalTypesMap().values();
    }

    private Map<String, SType<?>> getLocalTypesMap() {
        if (isRecursiveReference()) {
            //Se é uma referência recursiva, não deve criar um novo mapa local e sim usar o mapa do tipo original
            // para o qual aponta
            if (this instanceof SType) {
                SType<?> superType = ((SType<?>) this).getSuperType();
                if (superType == null || superType.getClass() != getClass()) {
                    //Verificação de sanidade
                    throw new SingularFormException(
                            "Erro interno: uma referência recursiva não extende um tipo que é da mesma classe " +
                                    "(superType()=" + superType + ")", this);
                } else {
                    return ((SScopeBase) superType).getLocalTypesMap();
                }
            }
        }
        return localTypes == null ? Collections.emptyMap() : localTypes;
    }

    @Override
    @Nonnull
    public Optional<SType<?>> getLocalTypeOptional(@Nonnull String path) {
        return getLocalTypeOptional(new PathReader(path));
    }

    @Nonnull
    final Optional<SType<?>> getLocalTypeOptional(@Nonnull PathReader pathReader) {
        SType<?> type = getLocalTypesMap().get(pathReader.getToken());
        if (type == null) {
            return Optional.empty();
        } else if (pathReader.isLast()) {
            return Optional.of(type);
        }
        return type.getLocalTypeOptional(pathReader.next());
    }


    @Override
    @Nonnull
    public SType<?> getLocalType(@Nonnull String path) {
        // Não utiliza getTipoLocalOpcional, pois da forma abaixo é possível
        // apontar precisamente onde deu erro no path passado.
        return getLocalType(new PathReader(path));
    }

    @Nonnull
    final SType<?> getLocalType(@Nonnull PathReader pathReader) {
        SType<?> type = getLocalTypesMap().get(pathReader.getToken());
        if (type != null) {
            if (pathReader.isLast()) {
                return type;
            }
            return type.getLocalType(pathReader.next());
        }
        throw new SingularFormException(pathReader.getErrorMsg(this,
                "Não foi encontrado o tipo '" + pathReader.getToken() + "' em '" + getName() + "'"), this);
    }

    /** Registro o tipo informado neste escopo. */
    @Nonnull
    final <T extends SType<?>> T registerType(@Nonnull Class<T> typeClass) {
        Objects.requireNonNull(typeClass);
        T t;
        try {
            t = typeClass.newInstance();
        } catch (InstantiationException | IllegalAccessException e) {
            throw new SingularFormException("Erro instanciando " + typeClass.getName(), e);
        }
        t = registerTypeInternal(t, typeClass);
        TypeProcessorAttributeReadFromFile.INSTANCE.onRegisterTypeByClass(t, typeClass);
        return t;
    }

    @SuppressWarnings("unchecked")
    @Nonnull
    final <T extends SType<?>> T registerTypeInternal(@Nonnull T newType, @Nullable Class<T> typeClass) {
        getDictionary().registerType(this, newType, typeClass);
        TypeProcessorBeanInjector.INSTANCE.onRegisterTypeByClass(newType, (Class)newType.getClass());
        /*
        (by <NAME>) O If abaixo impede que o onLoadType seja chamado mais de uma vezes caso o novo tipo seja
        apenas uma extensão da classe já carregada anteriormente, ou seja, impede que o mesmo onLoadType seja
        invocado múltiplas vezes. Esse controle é especialmente importante para eveitar entrar em loop quando
        um tipo tem uma referência para ele mesmo, além de evitar recargas e duplicação de atributos.
        */
        newType.setRecursiveReference(isRecursiveReference(newType));
        SType<?> superType = newType.getSuperType();
        if (superType == null || superType.getClass() != newType.getClass()) {
            newType.extendSubReference();
            TypeProcessorPublicFieldsReferences.INSTANCE.processTypePreOnLoadTypeCall(newType);
            newType.setCallingOnLoadType(true);
            callOnLoadTypeIfNecessary(newType);
            newType.setCallingOnLoadType(false);
            TypeProcessorPublicFieldsReferences.INSTANCE.processTypePosRegister(newType, true);
            getDictionary().runPendingTypeProcessorExecution(newType);
        } else {
            if (newType.isRecursiveReference()) {
{'fraction_non_alphanumeric': 0.09271028037383178, 'fraction_numerical': 0.0011962616822429907, 'mean_word_length': 2.855866243874315, 'pattern_counts': {'":': 0, '<': 51, '<?xml version=': 0, '>': 51, 'https://': 0, 'lorem ipsum': 0, 'www.': 4, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 2, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '2651388', 'n_tokens_mistral': 3700, 'n_tokens_neox': 3642, 'n_words': 1062}