/*
 *  Licensed to the Apache Software Foundation (ASF) under one
 *  or more contributor license agreements.  See the NOTICE file
 *  distributed with this work for additional information
 *  regarding copyright ownership.  The ASF licenses this file
 *  to you 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.apache.causeway.core.metamodel.object;

import java.util.Optional;

import org.jspecify.annotations.Nullable;

import org.apache.causeway.applib.value.semantics.Renderer;
import org.apache.causeway.applib.value.semantics.TemporalSupport;
import org.apache.causeway.applib.value.semantics.TemporalSupport.TemporalDecomposition;
import org.apache.causeway.applib.value.semantics.ValueSemanticsProvider;
import org.apache.causeway.commons.internal.exceptions._Exceptions;
import org.apache.causeway.core.metamodel.facets.object.value.ValueFacet;
import org.apache.causeway.core.metamodel.spec.ObjectSpecification;
import org.apache.causeway.core.metamodel.spec.feature.ObjectFeature;

import org.jspecify.annotations.NonNull;
import lombok.experimental.UtilityClass;

@UtilityClass
public class MmValueUtils {

    // -- CONTEXT FACTORIES

    public Optional<ValueSemanticsProvider.Context> createValueSemanticsContext(
            final @Nullable ObjectFeature feature,
            final @Nullable ObjectSpecification elementType) {
        return valueFacet(elementType, Object.class)
                .map(valueFacet->valueFacet.createValueSemanticsContext(feature));
    }

    public Optional<ValueSemanticsProvider.Context> createValueSemanticsContext(
            final @Nullable ObjectFeature feature,
            final @Nullable ManagedObject valueObject) {
        return valueFacet(valueObject, Object.class)
                .map(valueFacet->valueFacet.createValueSemanticsContext(feature));
    }

    // -- RENDERER

    public String htmlStringForValueType(
            final @Nullable ObjectFeature feature,
            final @Nullable ManagedObject adapter) {

        if(!ManagedObjects.isSpecified(adapter)) return "";

        var spec = adapter.objSpec();
        var valueFacet = spec.valueFacet().orElse(null);
        if(valueFacet==null) {
            return String.format("missing ValueFacet %s", spec.getCorrespondingClass());
        }

        @SuppressWarnings("unchecked")
        var renderer = (Renderer<Object>) valueFacet.selectRendererForFeature(feature).orElse(null);
        if(renderer==null) {
            return String.format("missing Renderer %s", spec.getCorrespondingClass());
        }

        return renderer.htmlPresentation(valueFacet.createValueSemanticsContext(feature), adapter.getPojo());
    }

    // -- TEMPORAL SUPPORT

    public Optional<TemporalSupport<?>> temporalSupport(
            final @Nullable ObjectFeature objectFeature,
            final @Nullable ObjectSpecification elementType) {
        return valueFacet(elementType, Object.class)
                .flatMap(valueFacet->selectTemporalSupportForFeature(valueFacet, objectFeature));
    }

    public TemporalSupport<?> temporalSupportElseFail(
            final @Nullable ObjectFeature objectFeature,
            final @NonNull ObjectSpecification elementType) {
        return temporalSupport(objectFeature, elementType)
                .orElseThrow(()->_Exceptions.illegalState("no temporal support found for %s",
                        elementType));
    }

    public Optional<TemporalDecomposition> temporalDecomposition(
            final @Nullable ObjectFeature objectFeature,
            final @Nullable ManagedObject valueObject) {
        return valueFacet(valueObject, Object.class)
                .filter(valueFacet->!ManagedObjects.isNullOrUnspecifiedOrEmpty(valueObject))
                .flatMap(valueFacet->selectTemporalSupportForFeature(valueFacet, objectFeature))
                .flatMap(temporalDecomposer->
                    temporalDecomposer.decomposeTemporal(MmUnwrapUtils.single(valueObject)));
    }

    // -- HELPER

    @SuppressWarnings("unchecked")
    private <T> Optional<ValueFacet<T>> valueFacet(final @Nullable ObjectSpecification elementType, final Class<T> valueClass) {
        return elementType!=null
                ? elementType.valueFacet().map((final ValueFacet<?> v)->(ValueFacet<T>)v)
                : Optional.empty();
    }

    private <T> Optional<ValueFacet<T>> valueFacet(final @Nullable ManagedObject valueObject, final Class<T> valueClass) {
        return ManagedObjects.isSpecified(valueObject)
            ? valueFacet(valueObject.objSpec(), valueClass)
            : Optional.empty();
    }

    private <T> Optional<TemporalSupport<T>> selectTemporalSupportForFeature(
            final ValueFacet<T> valueFacet,
            final ObjectFeature objectFeature) {
        return valueFacet.selectTemporalSupportForFeature(objectFeature);
    }

}
