// Copyright 2015 PingCAP, Inc.
//
// 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 domain

import (
	"context"
	"crypto/tls"
	"encoding/json"
	"fmt"
	"net"
	"runtime"
	"testing"
	"time"

	"github.com/ngaut/pools"
	"github.com/pingcap/errors"
	"github.com/pingcap/failpoint"
	"github.com/pingcap/kvproto/pkg/metapb"
	"github.com/pingcap/tidb/pkg/config"
	"github.com/pingcap/tidb/pkg/ddl"
	"github.com/pingcap/tidb/pkg/domain/infosync"
	"github.com/pingcap/tidb/pkg/kv"
	"github.com/pingcap/tidb/pkg/metaservice"
	"github.com/pingcap/tidb/pkg/metrics"
	"github.com/pingcap/tidb/pkg/parser/ast"
	"github.com/pingcap/tidb/pkg/parser/model"
	"github.com/pingcap/tidb/pkg/parser/mysql"
	"github.com/pingcap/tidb/pkg/sessionctx/variable"
	"github.com/pingcap/tidb/pkg/store/mockstore"
	"github.com/pingcap/tidb/pkg/types"
	"github.com/pingcap/tidb/pkg/util/mock"
	dto "github.com/prometheus/client_model/go"
	"github.com/stretchr/testify/require"
	pd "github.com/tikv/pd/client"
	"go.etcd.io/etcd/tests/v3/integration"
)

func TestInfo(t *testing.T) {
	t.Skip("TestInfo will hang currently, it should be fixed later")

	if runtime.GOOS == "windows" {
		t.Skip("integration.NewClusterV3 will create file contains a colon which is not allowed on Windows")
	}

	integration.BeforeTestExternal(t)

	if !unixSocketAvailable() {
		t.Skip("ETCD use ip:port as unix socket address, skip when it is unavailable.")
	}

	// NOTICE: this failpoint has been REMOVED, be aware of this if you want to reopen this test.
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/infosync/FailPlacement", `return(true)`))

	s, err := mockstore.NewMockStore()
	require.NoError(t, err)

	cluster := integration.NewClusterV3(t, &integration.ClusterConfig{Size: 1})
	defer cluster.Terminate(t)

	mockStore := &mockEtcdBackend{
		Storage: s,
		pdAddrs: []string{cluster.Members[0].GRPCURL()}}
	ddlLease := 80 * time.Millisecond
	dom := NewDomain(mockStore, ddlLease, 0, 0, mockFactory)
	defer func() {
		dom.Close()
		err := s.Close()
		require.NoError(t, err)
	}()

	client := cluster.RandClient()
	dom.keyspaceEtcdClient = client
	// Mock new DDL and init the schema syncer with etcd client.
	goCtx := context.Background()
	dom.ddl, dom.ddlExecutor = ddl.NewDDL(
		goCtx,
		ddl.WithEtcdClient(dom.GetEtcdClient()),
		ddl.WithStore(s),
		ddl.WithInfoCache(dom.infoCache),
		ddl.WithLease(ddlLease),
		ddl.WithSchemaLoader(dom),
	)
	ddl.DisableTiFlashPoll(dom.ddl)
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/MockReplaceDDL", `return(true)`))
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/ddl/NoDDLDispatchLoop", `return(true)`))
	require.NoError(t, dom.Init(sysMockFactory, nil))
	require.NoError(t, dom.Start(ddl.Bootstrap))
	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/ddl/NoDDLDispatchLoop"))
	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/domain/MockReplaceDDL"))

	// Test for GetServerInfo and GetServerInfoByID.
	ddlID := dom.ddl.GetID()
	serverInfo, err := infosync.GetServerInfo()
	require.NoError(t, err)

	info, err := infosync.GetServerInfoByID(goCtx, ddlID)
	require.NoError(t, err)

	if serverInfo.ID != info.ID {
		t.Fatalf("server self info %v, info %v", serverInfo, info)
	}

	_, err = infosync.GetServerInfoByID(goCtx, "not_exist_id")
	require.Error(t, err)
	require.Equal(t, "[info-syncer] get /tidb/server/info/not_exist_id failed", err.Error())

	// Test for GetAllServerInfo.
	infos, err := infosync.GetAllServerInfo(goCtx)
	require.NoError(t, err)
	require.Lenf(t, infos, 1, "server one info %v, info %v", infos[ddlID], info)
	require.Equalf(t, info.ID, infos[ddlID].ID, "server one info %v, info %v", infos[ddlID], info)

	// Test the scene where syncer.Done() gets the information.
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/ddl/schemaver/ErrorMockSessionDone", `return(true)`))
	<-dom.ddl.SchemaSyncer().Done()
	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/ddl/schemaver/ErrorMockSessionDone"))
	time.Sleep(15 * time.Millisecond)
	syncerStarted := false
	for i := 0; i < 1000; i++ {
		if dom.SchemaValidator.IsStarted() {
			syncerStarted = true
			break
		}
		time.Sleep(5 * time.Millisecond)
	}
	require.True(t, syncerStarted)

	stmt := &ast.CreateDatabaseStmt{
		Name: model.NewCIStr("aaa"),
		// Make sure loading schema is normal.
		Options: []*ast.DatabaseOption{
			{
				Tp:    ast.DatabaseOptionCharset,
				Value: "utf8",
			},
			{
				Tp:    ast.DatabaseOptionCollate,
				Value: "utf8_bin",
			},
		},
	}
	ctx := mock.NewContext()
	require.NoError(t, dom.ddlExecutor.CreateSchema(ctx, stmt))
	require.NoError(t, dom.Reload())
	require.Equal(t, int64(1), dom.InfoSchema().SchemaMetaVersion())

	// Test for RemoveServerInfo.
	dom.info.RemoveServerInfo()
	infos, err = infosync.GetAllServerInfo(goCtx)
	require.NoError(t, err)
	require.Len(t, infos, 0)

	// Test for acquireServerID & refreshServerIDTTL
	err = dom.acquireServerID(goCtx)
	require.NoError(t, err)
	require.NotEqual(t, 0, dom.ServerID())

	err = dom.refreshServerIDTTL(goCtx)
	require.NoError(t, err)

	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/domain/infosync/FailPlacement"))
}

func TestStatWorkRecoverFromPanic(t *testing.T) {
	store, err := mockstore.NewMockStore()
	require.NoError(t, err)

	ddlLease := 80 * time.Millisecond
	dom := NewDomain(store, ddlLease, 0, 0, mockFactory)

	metrics.PanicCounter.Reset()
	// Since the stats lease is 0 now, so create a new ticker will panic.
	// Test that they can recover from panic correctly.
	dom.gcStatsWorker()
	dom.autoAnalyzeWorker()
	counter := metrics.PanicCounter.WithLabelValues(metrics.LabelDomain)
	pb := &dto.Metric{}
	err = counter.Write(pb)
	require.NoError(t, err)
	require.Equal(t, float64(2), pb.GetCounter().GetValue())

	scope := dom.GetScope("status")
	require.Equal(t, variable.DefaultStatusVarScopeFlag, scope)

	// default expiredTimeStamp4PC = "0000-00-00 00:00:00"
	ts := types.NewTime(types.ZeroCoreTime, mysql.TypeTimestamp, types.DefaultFsp)
	expiredTimeStamp := dom.ExpiredTimeStamp4PC()
	require.Equal(t, expiredTimeStamp, ts)

	// set expiredTimeStamp4PC to "2023-08-02 12:15:00"
	ts, _ = types.ParseTimestamp(types.DefaultStmtNoWarningContext, "2023-08-02 12:15:00")
	dom.SetExpiredTimeStamp4PC(ts)
	expiredTimeStamp = dom.ExpiredTimeStamp4PC()
	require.Equal(t, expiredTimeStamp, ts)

	err = store.Close()
	require.NoError(t, err)

	isClose := dom.isClose()
	require.False(t, isClose)

	dom.Close()
	isClose = dom.isClose()
	require.True(t, isClose)
}

// ETCD use ip:port as unix socket address, however this address is invalid on windows.
// We have to skip some of the test in such case.
// https://github.com/etcd-io/etcd/blob/f0faa5501d936cd8c9f561bb9d1baca70eb67ab1/pkg/types/urls.go#L42
func unixSocketAvailable() bool {
	c, err := net.Listen("unix", "127.0.0.1:0")
	if err == nil {
		_ = c.Close()
		return true
	}
	return false
}

func mockFactory() (pools.Resource, error) {
	return nil, errors.New("mock factory should not be called")
}

func sysMockFactory(*Domain) (pools.Resource, error) {
	return nil, nil
}

type mockEtcdBackend struct {
	kv.Storage
	pdAddrs []string
}

func (mebd *mockEtcdBackend) GetPDAddrs() ([]string, error) {
	return mebd.pdAddrs, nil
}

func (mebd *mockEtcdBackend) MetaServiceInfo() (*metaservice.Info, error) {
	return nil, nil
}

func (mebd *mockEtcdBackend) TLSConfig() *tls.Config { return nil }

func (mebd *mockEtcdBackend) StartGCWorker() error {
	panic("not implemented")
}

func TestClosestReplicaReadChecker(t *testing.T) {
	store, err := mockstore.NewMockStore()
	require.NoError(t, err)

	ddlLease := 80 * time.Millisecond
	dom := NewDomain(store, ddlLease, 0, 0, mockFactory)
	defer func() {
		dom.Close()
		require.Nil(t, store.Close())
	}()
	dom.sysVarCache.Lock()
	dom.sysVarCache.global = map[string]string{
		variable.TiDBReplicaRead: "closest-adaptive",
	}
	dom.sysVarCache.Unlock()

	makeFailpointRes := func(v any) string {
		bytes, err := json.Marshal(v)
		require.NoError(t, err)
		return fmt.Sprintf("return(`%s`)", string(bytes))
	}

	mockedAllServerInfos := map[string]*infosync.ServerInfo{
		"s1": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s1",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone1",
				},
			},
		},
		"s2": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s2",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone2",
				},
			},
		},
	}

	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetAllServerInfo", makeFailpointRes(mockedAllServerInfos)))
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetServerInfo", makeFailpointRes(mockedAllServerInfos["s2"])))

	stores := []*metapb.Store{
		{
			Labels: []*metapb.StoreLabel{
				{
					Key:   "zone",
					Value: "zone1",
				},
			},
		},
		{
			Labels: []*metapb.StoreLabel{
				{
					Key:   "zone",
					Value: "zone2",
				},
			},
		},
		{
			Labels: []*metapb.StoreLabel{
				{
					Key:   "zone",
					Value: "zone3",
				},
			},
		},
	}

	enabled := variable.IsAdaptiveReplicaReadEnabled()

	ctx := context.Background()
	pdClient := &mockInfoPdClient{}

	// check error
	pdClient.err = errors.New("mock error")
	err = dom.checkReplicaRead(ctx, pdClient)
	require.Error(t, err)
	require.Equal(t, enabled, variable.IsAdaptiveReplicaReadEnabled())

	// labels matches, should be enabled
	pdClient.err = nil
	pdClient.stores = stores[:2]
	variable.SetEnableAdaptiveReplicaRead(false)
	err = dom.checkReplicaRead(ctx, pdClient)
	require.Nil(t, err)
	require.True(t, variable.IsAdaptiveReplicaReadEnabled())

	// labels don't match, should disable the flag
	for _, i := range []int{0, 1, 3} {
		pdClient.stores = stores[:i]
		variable.SetEnableAdaptiveReplicaRead(true)
		err = dom.checkReplicaRead(ctx, pdClient)
		require.Nil(t, err)
		require.False(t, variable.IsAdaptiveReplicaReadEnabled())
	}

	// partial matches
	mockedAllServerInfos = map[string]*infosync.ServerInfo{
		"s1": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s1",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone1",
				},
			},
		},
		"s2": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s2",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone2",
				},
			},
		},
		"s22": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s22",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone2",
				},
			},
		},
		"s3": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s3",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone3",
				},
			},
		},
		"s4": {
			StaticServerInfo: infosync.StaticServerInfo{
				ID: "s4",
			},
			DynamicServerInfo: infosync.DynamicServerInfo{
				Labels: map[string]string{
					"zone": "zone4",
				},
			},
		},
	}
	pdClient.stores = stores
	require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetAllServerInfo", makeFailpointRes(mockedAllServerInfos)))
	cases := []struct {
		id      string
		matches bool
	}{
		{
			id:      "s1",
			matches: true,
		},
		{
			id:      "s2",
			matches: true,
		},
		{
			id:      "s22",
			matches: false,
		},
		{
			id:      "s3",
			matches: true,
		},
		{
			id:      "s4",
			matches: false,
		},
	}
	for _, c := range cases {
		require.NoError(t, failpoint.Enable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetServerInfo", makeFailpointRes(mockedAllServerInfos[c.id])))
		variable.SetEnableAdaptiveReplicaRead(!c.matches)
		err = dom.checkReplicaRead(ctx, pdClient)
		require.Nil(t, err)
		require.Equal(t, c.matches, variable.IsAdaptiveReplicaReadEnabled())
	}

	variable.SetEnableAdaptiveReplicaRead(true)
	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetAllServerInfo"))
	require.NoError(t, failpoint.Disable("github.com/pingcap/tidb/pkg/domain/infosync/mockGetServerInfo"))
}

type mockInfoPdClient struct {
	pd.Client
	stores []*metapb.Store
	err    error
}

func (c *mockInfoPdClient) GetAllStores(context.Context, ...pd.GetStoreOption) ([]*metapb.Store, error) {
	return c.stores, c.err
}

func TestIsAnalyzeTableSQL(t *testing.T) {
	tests := []struct {
		name string
		sql  string
	}{
		{
			name: "normal sql",
			sql:  "analyze table test.t",
		},
		{
			name: "normal sql with extra space",
			sql:  " analyze table test.t ",
		},
		{
			name: "normal capital sql with extra space",
			sql:  " ANALYZE TABLE test.t ",
		},
		{
			name: "single line comment",
			sql:  "/* axxxx */ analyze table test.t",
		},
		{
			name: "multi-line comment",
			sql: `/*
		/*> this is a
		/*> multiple-line comment
		/*> */ analyze table test.t`,
		},
		{
			name: "hint comment",
			sql:  "/*+ hint */ analyze table test.t",
		},
		{
			name: "no space",
			sql:  "/*+ hint */analyze table test.t",
		},
	}

	for _, tt := range tests {
		require.True(t, isAnalyzeTableSQL(tt.sql))
	}
}

func TestDeferFn(t *testing.T) {
	var df deferFn
	var a, b, c, d bool
	df.add(func() { a = true }, time.Now().Add(50*time.Millisecond))
	df.add(func() { b = true }, time.Now().Add(100*time.Millisecond))
	df.add(func() { c = true }, time.Now().Add(10*time.Minute))
	df.add(func() { d = true }, time.Now().Add(150*time.Millisecond))
	time.Sleep(300 * time.Millisecond)
	df.check()

	require.True(t, a)
	require.True(t, b)
	require.False(t, c)
	require.True(t, d)
	require.Len(t, df.data, 1)
}

// TestRunAutoAnalyzeConfigFlag verifies that performance.run-auto-analyze=false in the config
// disables auto analyze regardless of the tidb_enable_auto_analyze system variable, and that
// when it is true (the default), auto analyze follows the system variable.
func TestRunAutoAnalyzeConfigFlag(t *testing.T) {
	origCfg := config.GetGlobalConfig()
	origSysVar := variable.RunAutoAnalyze.Load()
	defer func() {
		config.StoreGlobalConfig(origCfg)
		variable.RunAutoAnalyze.Store(origSysVar)
	}()

	shouldRun := func() bool {
		return config.GetGlobalConfig().Performance.RunAutoAnalyze && variable.RunAutoAnalyze.Load()
	}

	// config=false disables auto analyze even when the system variable is ON
	cfg := *origCfg
	cfg.Performance.RunAutoAnalyze = false
	config.StoreGlobalConfig(&cfg)
	variable.RunAutoAnalyze.Store(true)
	require.False(t, shouldRun(), "auto analyze should be disabled when config.RunAutoAnalyze=false")

	// config=true, sysvar=OFF → disabled
	cfg.Performance.RunAutoAnalyze = true
	config.StoreGlobalConfig(&cfg)
	variable.RunAutoAnalyze.Store(false)
	require.False(t, shouldRun(), "auto analyze should be disabled when system variable is OFF")

	// config=true, sysvar=ON → enabled
	variable.RunAutoAnalyze.Store(true)
	require.True(t, shouldRun(), "auto analyze should run when config allows and system variable is ON")

	// default config value must be true so that "unset" behaves like "follows system variable"
	require.True(t, origCfg.Performance.RunAutoAnalyze, "default config.RunAutoAnalyze must be true")
}

func TestInitLogBackupDisabled(t *testing.T) {
	dom := &Domain{}
	require.NoError(t, dom.initLogBackup(context.Background(), nil))
	require.Nil(t, dom.brOwnerMgr)
	require.Nil(t, dom.logBackupAdvancer)
}