/*
 * 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
 *
 *  https://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.
 *
 * Other licenses:
 * -----------------------------------------------------------------------------
 * Commercial licenses for this work are available. These replace the above
 * Apache-2.0 license and offer limited warranties, support, maintenance, and
 * commercial database integrations.
 *
 * For more information, please visit: https://www.jooq.org/legal/licensing
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 *
 */
package org.jooq.impl;

import static org.jooq.impl.DSL.*;
import static org.jooq.impl.Internal.*;
import static org.jooq.impl.Keywords.*;
import static org.jooq.impl.Names.*;
import static org.jooq.impl.SQLDataType.*;
import static org.jooq.impl.Tools.*;
import static org.jooq.impl.Tools.BooleanDataKey.*;
import static org.jooq.impl.Tools.ExtendedDataKey.*;
import static org.jooq.impl.Tools.SimpleDataKey.*;
import static org.jooq.SQLDialect.*;

import org.jooq.*;
import org.jooq.Function1;
import org.jooq.Record;
import org.jooq.conf.ParamType;
import org.jooq.tools.StringUtils;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.HashSet;
import java.util.LinkedHashSet;
import java.util.List;
import java.util.Objects;
import java.util.Set;



/**
 * The <code>OVERLAY</code> statement.
 */
@SuppressWarnings({ "rawtypes", "unchecked", "unused" })
final class Overlay
extends
    AbstractField<String>
implements
    QOM.Overlay
{

    final Field<String>           in;
    final Field<String>           placing;
    final Field<? extends Number> startIndex;
    final Field<? extends Number> length;

    Overlay(
        Field<String> in,
        Field<String> placing,
        Field<? extends Number> startIndex
    ) {
        super(
            N_OVERLAY,
            allNotNull(VARCHAR, in, placing, startIndex)
        );

        this.in = nullSafeNotNull(in, VARCHAR);
        this.placing = nullSafeNotNull(placing, VARCHAR);
        this.startIndex = nullSafeNotNull(startIndex, INTEGER);
        this.length = null;
    }

    Overlay(
        Field<String> in,
        Field<String> placing,
        Field<? extends Number> startIndex,
        Field<? extends Number> length
    ) {
        super(
            N_OVERLAY,
            allNotNull(VARCHAR, in, placing, startIndex, length)
        );

        this.in = nullSafeNotNull(in, VARCHAR);
        this.placing = nullSafeNotNull(placing, VARCHAR);
        this.startIndex = nullSafeNotNull(startIndex, INTEGER);
        this.length = nullSafeNotNull(length, INTEGER);
    }

    // -------------------------------------------------------------------------
    // XXX: QueryPart API
    // -------------------------------------------------------------------------



    private static final Set<SQLDialect> NO_SUPPORT        = SQLDialect.supportedBy(CLICKHOUSE, DERBY, DUCKDB, HSQLDB, IGNITE, MARIADB, MYSQL, SQLITE, TRINO);




    private static final Set<SQLDialect> SUPPORT_INSERT    = SQLDialect.supportedBy(H2, MARIADB, MYSQL);

    @Override
    public final void accept(Context<?> ctx) {








        accept0(ctx,
            in, placing, startIndex, length,
            DSL::length, (f1, f2) -> DSL.concat(f1, f2), DSL::substring, DSL::substring
        );
    }

    static final <T> void accept0(
        Context<?> ctx,
        Field<T> in,
        Field<T> placing,
        Field<? extends Number> startIndex,
        Field<? extends Number> length,
        Function1<? super Field<T>, ? extends Field<? extends Number>> fLength,
        Function2<? super Field<T>, ? super Field<T>, ? extends Field<T>> fConcat,
        Function2<? super Field<T>, ? super Field<? extends Number>, ? extends Field<T>> fSubstring2,
        Function3<? super Field<T>, ? super Field<? extends Number>, ? super Field<? extends Number>, ? extends Field<T>> fSubstring3
    ) {

        Field<? extends Number> l = length;







        if (l != null) {
            if (SUPPORT_INSERT.contains(ctx.dialect())) {
                ctx.visit(function(N_INSERT, in.getDataType(), in, startIndex, l, placing));
            }
            else if (



                NO_SUPPORT.contains(ctx.dialect())
            ) {

                // [#16101] TODO: Use binaryConcat() if necessary
                ctx.visit(
                    fConcat.apply(
                        fConcat.apply(
                            fSubstring3.apply(in, inline(1), isub(startIndex, inline(1))),
                            placing
                        ),
                        fSubstring2.apply(in, iadd(startIndex, l))
                    )
                );
            }
            else {
                ctx.visit(N_OVERLAY).sql('(').visit(in).sql(' ')
                   .visit(K_PLACING).sql(' ').visit(placing).sql(' ')
                   .visit(K_FROM).sql(' ').visit(startIndex).sql(' ')
                   .visit(K_FOR).sql(' ').visit(l).sql(')');
            }
        }
        else {
            if (SUPPORT_INSERT.contains(ctx.dialect())) {
                ctx.visit(function(N_INSERT, in.getDataType(), in, startIndex, fLength.apply(placing), placing));
            }
            else if (



                NO_SUPPORT.contains(ctx.dialect())
            ) {

                ctx.visit(
                    fConcat.apply(
                        fConcat.apply(
                            fSubstring3.apply(in, inline(1), isub(startIndex, inline(1))),
                            placing
                        ),
                        fSubstring2.apply(in, iadd(startIndex, fLength.apply(placing)))
                    )
                );
            }
            else {
                ctx.visit(N_OVERLAY).sql('(').visit(in).sql(' ')
                   .visit(K_PLACING).sql(' ').visit(placing).sql(' ')
                   .visit(K_FROM).sql(' ').visit(startIndex).sql(')');
            }
        }
    }


















    // -------------------------------------------------------------------------
    // XXX: Query Object Model
    // -------------------------------------------------------------------------

    @Override
    public final Field<String> $arg1() {
        return in;
    }

    @Override
    public final Field<String> $arg2() {
        return placing;
    }

    @Override
    public final Field<? extends Number> $arg3() {
        return startIndex;
    }

    @Override
    public final Field<? extends Number> $arg4() {
        return length;
    }

    @Override
    public final QOM.Overlay $arg1(Field<String> newValue) {
        return $constructor().apply(newValue, $arg2(), $arg3(), $arg4());
    }

    @Override
    public final QOM.Overlay $arg2(Field<String> newValue) {
        return $constructor().apply($arg1(), newValue, $arg3(), $arg4());
    }

    @Override
    public final QOM.Overlay $arg3(Field<? extends Number> newValue) {
        return $constructor().apply($arg1(), $arg2(), newValue, $arg4());
    }

    @Override
    public final QOM.Overlay $arg4(Field<? extends Number> newValue) {
        return $constructor().apply($arg1(), $arg2(), $arg3(), newValue);
    }

    @Override
    public final Function4<? super Field<String>, ? super Field<String>, ? super Field<? extends Number>, ? super Field<? extends Number>, ? extends QOM.Overlay> $constructor() {
        return (a1, a2, a3, a4) -> new Overlay(a1, a2, a3, a4);
    }

    // -------------------------------------------------------------------------
    // XXX: The Object API
    // -------------------------------------------------------------------------

    @Override
    public boolean equals(Object that) {
        if (that instanceof QOM.Overlay o) {
            return
                Objects.equals($in(), o.$in()) &&
                Objects.equals($placing(), o.$placing()) &&
                Objects.equals($startIndex(), o.$startIndex()) &&
                Objects.equals($length(), o.$length())
            ;
        }
        else
            return super.equals(that);
    }
}
