/*******************************************************************************
 *     ___                  _   ____  ____
 *    / _ \ _   _  ___  ___| |_|  _ \| __ )
 *   | | | | | | |/ _ \/ __| __| | | |  _ \
 *   | |_| | |_| |  __/\__ \ |_| |_| | |_) |
 *    \__\_\\__,_|\___||___/\__|____/|____/
 *
 *  Copyright (c) 2014-2019 Appsicle
 *  Copyright (c) 2019-2023 QuestDB
 *
 *  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 io.questdb.griffin.engine.functions.str;

import io.questdb.cairo.CairoConfiguration;
import io.questdb.cairo.sql.Function;
import io.questdb.cairo.sql.Record;
import io.questdb.griffin.FunctionFactory;
import io.questdb.griffin.PlanSink;
import io.questdb.griffin.SqlExecutionContext;
import io.questdb.griffin.engine.functions.BinaryFunction;
import io.questdb.griffin.engine.functions.IntFunction;
import io.questdb.griffin.engine.functions.UnaryFunction;
import io.questdb.griffin.engine.functions.constants.IntConstant;
import io.questdb.std.IntList;
import io.questdb.std.Numbers;
import io.questdb.std.ObjList;
import org.jetbrains.annotations.NotNull;

public class StrPosFunctionFactory implements FunctionFactory {

    @Override
    public String getSignature() {
        return "strpos(SS)";
    }

    @Override
    public Function newInstance(
            int position,
            ObjList<Function> args,
            IntList argPositions,
            CairoConfiguration configuration,
            SqlExecutionContext sqlExecutionContext
    ) {
        final Function substrFunc = args.getQuick(1);
        if (substrFunc.isConstant()) {
            CharSequence substr = substrFunc.getStr(null);
            if (substr == null) {
                return IntConstant.NULL;
            }
            return new ConstFunc(args.getQuick(0), substr);
        }
        return new Func(args.getQuick(0), substrFunc);
    }

    private static int strpos(@NotNull CharSequence str, @NotNull CharSequence substr) {
        final int substrLen = substr.length();
        if (substrLen < 1) {
            return 1;
        }
        final int strLen = str.length();
        if (strLen < 1) {
            return 0;
        }

        OUTER:
        for (int i = 0, n = strLen - substrLen + 1; i < n; i++) {
            final char c = str.charAt(i);
            if (c == substr.charAt(0)) {
                for (int k = 1; k < substrLen; k++) {
                    if (str.charAt(i + k) != substr.charAt(k)) {
                        continue OUTER;
                    }
                }
                return i + 1;
            }
        }
        return 0;
    }

    public static class ConstFunc extends IntFunction implements UnaryFunction {

        private final Function strFunc;
        private final CharSequence substr;

        public ConstFunc(Function strFunc, CharSequence substr) {
            this.strFunc = strFunc;
            this.substr = substr;
        }

        @Override
        public Function getArg() {
            return strFunc;
        }

        @Override
        public int getInt(Record rec) {
            final CharSequence str = this.strFunc.getStr(rec);
            if (str == null) {
                return Numbers.INT_NaN;
            }
            return strpos(str, substr);
        }

        @Override
        public void toPlan(PlanSink sink) {
            sink.val("strpos(").val(strFunc).val(",'").val(substr).val("')");
        }
    }

    public static class Func extends IntFunction implements BinaryFunction {

        private final Function strFunc;
        private final Function substrFunc;

        public Func(Function strFunc, Function substrFunc) {
            this.strFunc = strFunc;
            this.substrFunc = substrFunc;
        }

        @Override
        public int getInt(Record rec) {
            final CharSequence str = this.strFunc.getStr(rec);
            if (str == null) {
                return Numbers.INT_NaN;
            }
            final CharSequence substr = this.substrFunc.getStr(rec);
            if (substr == null) {
                return Numbers.INT_NaN;
            }
            return strpos(str, substr);
        }

        @Override
        public Function getLeft() {
            return strFunc;
        }

        @Override
        public String getName() {
            return "strpos";
        }

        @Override
        public Function getRight() {
            return substrFunc;
        }
    }
}
