package results

import (
	"strconv"
	"testing"

	"github.com/samber/lo"
	"github.com/stretchr/testify/require"
	"github.com/stretchr/testify/suite"
	"pgregory.net/rapid"

	"github.com/confluentinc/cli/v3/pkg/flink/test/generators"
	"github.com/confluentinc/cli/v3/pkg/flink/types"
)

type MaterializedStatementResultsTestSuite struct {
	suite.Suite
}

func TestMaterializedStatementResultsTestSuite(t *testing.T) {
	suite.Run(t, new(MaterializedStatementResultsTestSuite))
}

func (s *MaterializedStatementResultsTestSuite) TestChangelogMode() {
	rapid.Check(s.T(), func(t *rapid.T) {
		// generate some results
		numColumns := rapid.IntRange(1, 10).Draw(t, "max nesting depth")
		results := generators.MockResults(numColumns, -1).Draw(t, "mock results")
		statementResults := results.StatementResults.Results.GetData()
		convertedResults, err := ConvertToInternalResults(statementResults, results.ResultSchema)
		require.NotNil(t, convertedResults)
		require.NoError(t, err)

		// test if in changelog mode all the rows are there and in the correct order
		materializedStatementResults := types.NewMaterializedStatementResults(convertedResults.GetHeaders(), 100)
		materializedStatementResults.SetTableMode(false)
		materializedStatementResults.Append(convertedResults.GetRows()...)
		// in changelog mode we have an additional column "Operation"
		require.Equal(t, append([]string{"Operation"}, convertedResults.GetHeaders()...), materializedStatementResults.GetHeaders())
		require.Equal(t, len(convertedResults.GetRows()), materializedStatementResults.GetChangelogSize())
		iterator := materializedStatementResults.Iterator(false)
		for _, expectedRow := range convertedResults.GetRows() {
			actualRow := iterator.GetNext()
			operationField := types.AtomicStatementResultField{
				Type:  "VARCHAR",
				Value: expectedRow.Operation.String(),
			}
			require.Equal(t, expectedRow.Operation, actualRow.Operation)
			// in changelog mode we have an additional column "Operation"
			require.Equal(t, append([]types.StatementResultField{operationField}, expectedRow.Fields...), actualRow.Fields)
		}
	})
}

func (s *MaterializedStatementResultsTestSuite) TestTableMode() {
	headers := []string{"Count"}
	previousRow := types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10000)
	materializedStatementResults.Append(previousRow)
	require.Equal(s.T(), headers, materializedStatementResults.GetHeaders())
	require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
	iterator := materializedStatementResults.Iterator(false)
	require.Equal(s.T(), previousRow, *iterator.GetNext())
	changelogSize := 1
	for count := 1; count <= 10; count++ {
		// remove previous row
		previousRow.Operation = types.UpdateBefore
		materializedStatementResults.Append(previousRow)
		require.Equal(s.T(), 0, materializedStatementResults.GetTableSize())

		// add new row
		previousRow = types.StatementResultRow{
			Operation: types.UpdateAfter,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}
		materializedStatementResults.Append(previousRow)
		iterator = materializedStatementResults.Iterator(false)
		require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
		require.Equal(s.T(), previousRow, *iterator.GetNext())
		changelogSize += 2
	}

	require.Equal(s.T(), changelogSize, materializedStatementResults.GetChangelogSize())
}

func (s *MaterializedStatementResultsTestSuite) TestKeyCountIncreases() {
	rapid.Check(s.T(), func(t *rapid.T) {
		keys := rapid.SliceOfNDistinct(rapid.IntRange(0, 11), 10, 10, rapid.ID[int]).Draw(t, "keys")

		// object under test
		headers := []string{"Key", "Count"}
		materializedStatementResults := types.NewMaterializedStatementResults(headers, 10000)

		for _, key := range keys {
			row := types.StatementResultRow{
				Operation: types.Insert,
				Fields: []types.StatementResultField{
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(key),
					},
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(1),
					},
				},
			}
			materializedStatementResults.Append(row)
			materializedStatementResults.Append(row)
		}
		// check if the number of keys is correct
		require.Equal(t, 2*len(keys), materializedStatementResults.GetTableSize())
		require.Equal(t, 2*len(keys), materializedStatementResults.GetChangelogSize())

		for _, key := range keys {
			// Updates to group by are sent the following way
			// We get retraction for the previous groupby value
			// Then we get an update for the new groupby value
			row := types.StatementResultRow{
				Operation: types.UpdateBefore,
				Fields: []types.StatementResultField{
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(key),
					},
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(1),
					},
				},
			}

			materializedStatementResults.Append(row)

			row = types.StatementResultRow{
				Operation: types.UpdateAfter,
				Fields: []types.StatementResultField{
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(key),
					},
					types.AtomicStatementResultField{
						Type:  types.Integer,
						Value: strconv.Itoa(0),
					},
				},
			}

			materializedStatementResults.Append(row)
		}
		// check if the number of keys is correct
		require.Equal(t, 2*len(keys), materializedStatementResults.GetTableSize())
		require.Equal(t, 4*len(keys), materializedStatementResults.GetChangelogSize())

		// zeros
		table := materializedStatementResults.GetTable().ToSlice()
		zerosValues := lo.Filter(table, func(item types.StatementResultRow, _ int) bool {
			return item.Fields[1].ToString() == "0"
		})
		onesValues := lo.Filter(table, func(item types.StatementResultRow, _ int) bool {
			return item.Fields[1].ToString() == "1"
		})

		require.Equal(t, 10, len(zerosValues), "expected 10 zeros in table")
		require.Equal(t, 10, len(onesValues), "expected 10 ones in table")
	})
}

func (s *MaterializedStatementResultsTestSuite) TestChangelogIsCleanedUpWhenOverCapacity() {
	headers := []string{"Count"}
	previousRow := types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}
	var expectedRows []types.StatementResultRow
	expectedRows = append(expectedRows, previousRow)

	materializedStatementResults := types.NewMaterializedStatementResults(headers, 3)
	materializedStatementResults.Append(previousRow)
	materializedStatementResults.SetTableMode(false)
	for count := 1; count <= 10; count++ {
		// remove previous row
		previousRow.Operation = types.UpdateBefore
		materializedStatementResults.Append(previousRow)
		expectedRows = append(expectedRows, previousRow)

		// add new row
		previousRow = types.StatementResultRow{
			Operation: types.UpdateAfter,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}
		materializedStatementResults.Append(previousRow)
		expectedRows = append(expectedRows, previousRow)
	}

	require.Equal(s.T(), 3, materializedStatementResults.GetChangelogSize())
	expectedRows = expectedRows[len(expectedRows)-materializedStatementResults.GetChangelogSize():]
	materializedStatementResults.ForEach(func(rowIdx int, row *types.StatementResultRow) {
		expectedRow := &expectedRows[rowIdx]
		require.Equal(s.T(), expectedRow.Operation, row.Operation)
		require.Equal(s.T(), expectedRow.Fields, row.Fields[1:])
	})
}

func (s *MaterializedStatementResultsTestSuite) TestTableIsCleanedUpWhenOverCapacity() {
	headers := []string{"Count"}
	var expectedRows []types.StatementResultRow

	materializedStatementResults := types.NewMaterializedStatementResults(headers, 3)
	for count := 1; count <= 10; count++ {
		row := types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}
		materializedStatementResults.Append(row)
		expectedRows = append(expectedRows, row)
	}

	require.Equal(s.T(), 3, materializedStatementResults.GetTableSize())
	expectedRows = expectedRows[len(expectedRows)-materializedStatementResults.GetTableSize():]
	materializedStatementResults.ForEach(func(rowIdx int, row *types.StatementResultRow) {
		expectedRow := &expectedRows[rowIdx]
		require.Equal(s.T(), expectedRow.Operation, row.Operation)
		require.Equal(s.T(), expectedRow.Fields, row.Fields)
	})
}

func (s *MaterializedStatementResultsTestSuite) TestTableDoesNotCleanupEventsThatWereRemovedFromChangelog() {
	headers := []string{"Count"}
	row := types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "100",
			},
		},
	}

	materializedStatementResults := types.NewMaterializedStatementResults(headers, 2)
	materializedStatementResults.Append(row)
	for count := 0; count <= 10; count++ {
		// add new row
		operation := types.UpdateAfter
		if count == 0 {
			operation = types.Insert
		}
		newRow := types.StatementResultRow{
			Operation: operation,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}
		materializedStatementResults.Append(newRow)

		// remove previous row
		newRow.Operation = types.UpdateBefore
		materializedStatementResults.Append(newRow)
	}

	require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
	materializedStatementResults.ForEach(func(rowIdx int, row *types.StatementResultRow) {
		require.Equal(s.T(), row.Operation, row.Operation)
		require.Equal(s.T(), row.Fields, row.Fields)
	})
}

func (s *MaterializedStatementResultsTestSuite) TestCleanup() {
	headers := []string{"Count"}
	row := types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 1)
	materializedStatementResults.Append(row)
	iterator := materializedStatementResults.Iterator(false)
	require.Equal(s.T(), row, *iterator.GetNext())
	for count := 1; count <= 10; count++ {
		// add new row
		row = types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}
		materializedStatementResults.Append(row)
		iterator = materializedStatementResults.Iterator(false)
		require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
		require.Equal(s.T(), row, *iterator.GetNext())
	}

	require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
}

func (s *MaterializedStatementResultsTestSuite) TestOnlyAllowAppendWithSameSchema() {
	invalidHeaders := []string{"Count"}
	row := types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}
	materializedStatementResults := types.NewMaterializedStatementResults(invalidHeaders, 1)
	valuesInserted := materializedStatementResults.Append(row)
	require.False(s.T(), valuesInserted)
	require.Empty(s.T(), materializedStatementResults.GetTableSize())

	validHeaders := []string{"Count", "Count2"}
	materializedStatementResults = types.NewMaterializedStatementResults(validHeaders, 1)
	valuesInserted = materializedStatementResults.Append(row)
	require.True(s.T(), valuesInserted)
	require.Equal(s.T(), 1, materializedStatementResults.GetTableSize())
}

func (s *MaterializedStatementResultsTestSuite) TestIteratorForwardResetThenBackward() {
	headers := []string{"Count"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)

	for i := 0; i < 10; i++ {
		materializedStatementResults.Append(types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(i),
				},
			},
		})
	}
	require.Equal(s.T(), 10, materializedStatementResults.GetTableSize())

	iterator := materializedStatementResults.Iterator(false)
	count := 0
	for !iterator.HasReachedEnd() {
		row := iterator.GetNext()
		require.Equal(s.T(), &types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}, row)
		count++
	}
	require.Equal(s.T(), materializedStatementResults.GetTableSize(), count)

	iterator = materializedStatementResults.Iterator(true)
	for !iterator.HasReachedEnd() {
		row := iterator.GetPrev()
		count--
		require.Equal(s.T(), &types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(count),
				},
			},
		}, row)
	}
	require.Equal(s.T(), 0, count)
}

func (s *MaterializedStatementResultsTestSuite) TestIteratorForwardAndBackward() {
	headers := []string{"Count"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)

	for i := 0; i < 10; i++ {
		materializedStatementResults.Append(types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(i),
				},
			},
		})
	}
	require.Equal(s.T(), 10, materializedStatementResults.GetTableSize())

	iterator := materializedStatementResults.Iterator(false)
	row := iterator.GetNext()
	require.Equal(s.T(), "0", row.Fields[0].(types.AtomicStatementResultField).Value)
	row = iterator.GetNext()
	require.Equal(s.T(), "1", row.Fields[0].(types.AtomicStatementResultField).Value)
	row = iterator.GetPrev()
	require.Equal(s.T(), "2", row.Fields[0].(types.AtomicStatementResultField).Value)
	row = iterator.GetPrev()
	require.Equal(s.T(), "1", row.Fields[0].(types.AtomicStatementResultField).Value)
	row = iterator.GetPrev()
	require.Equal(s.T(), "0", row.Fields[0].(types.AtomicStatementResultField).Value)
}

func (s *MaterializedStatementResultsTestSuite) TestIteratorMoveToEndThenMoveToStart() {
	headers := []string{"Count"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)

	for i := 0; i < 10; i++ {
		materializedStatementResults.Append(types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(i),
				},
			},
		})
	}
	require.Equal(s.T(), 10, materializedStatementResults.GetTableSize())

	iterator := materializedStatementResults.Iterator(false)
	iterator.Move(9)
	require.Equal(s.T(), &types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "9",
			},
		},
	}, iterator.Value())

	iterator.Move(-9)
	require.Equal(s.T(), &types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}, iterator.Value())
}

func (s *MaterializedStatementResultsTestSuite) TestIteratorMoveDoesNotWorkOnceEndWasReached() {
	headers := []string{"Count"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)

	for i := 0; i < 10; i++ {
		materializedStatementResults.Append(types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(i),
				},
			},
		})
	}
	require.Equal(s.T(), 10, materializedStatementResults.GetTableSize())

	var expected *types.StatementResultRow
	iterator := materializedStatementResults.Iterator(false)
	iterator.Move(10)
	require.Equal(s.T(), expected, iterator.Value())

	iterator.Move(-9)
	require.Equal(s.T(), expected, iterator.Value())

	iterator = materializedStatementResults.Iterator(true)
	iterator.Move(-9)
	require.Equal(s.T(), &types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Integer,
				Value: "0",
			},
		},
	}, iterator.Value())
}

func (s *MaterializedStatementResultsTestSuite) TestForEach() {
	headers := []string{"Count"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)

	for i := 0; i < 10; i++ {
		materializedStatementResults.Append(types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(i),
				},
			},
		})
	}

	idx := 0
	materializedStatementResults.ForEach(func(rowIdx int, row *types.StatementResultRow) {
		expectedRow := &types.StatementResultRow{
			Operation: types.Insert,
			Fields: []types.StatementResultField{
				types.AtomicStatementResultField{
					Type:  types.Integer,
					Value: strconv.Itoa(idx),
				},
			},
		}

		require.Equal(s.T(), idx, rowIdx)
		require.Equal(s.T(), expectedRow, row)
		idx++
	})
}

func (s *MaterializedStatementResultsTestSuite) TestGetColumnWidths() {
	headers := []string{"1234", "12"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "12345",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1",
			},
		},
	})

	require.Equal(s.T(), []int{5, 2}, materializedStatementResults.GetMaxWidthPerColumn())
}

func (s *MaterializedStatementResultsTestSuite) TestGetColumnWidthsWithMultiLineValues() {
	headers := []string{"1234", "12"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "12345 \n 123456789",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1\n123",
			},
		},
	})

	require.Equal(s.T(), []int{10, 3}, materializedStatementResults.GetMaxWidthPerColumn())
}

func (s *MaterializedStatementResultsTestSuite) TestGetColumnWidthsChangelogMode() {
	headers := []string{"1234", "12"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)
	materializedStatementResults.SetTableMode(false)
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "12345",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1",
			},
		},
	})

	require.Equal(s.T(), []int{len("Operation"), 5, 2}, materializedStatementResults.GetMaxWidthPerColumn())
}

func (s *MaterializedStatementResultsTestSuite) TestToggleTableMode() {
	headers := []string{"column1", "column2"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Delete,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "12345",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1",
			},
		},
	})

	require.True(s.T(), materializedStatementResults.IsTableMode())
	require.Equal(s.T(), headers, materializedStatementResults.GetHeaders())
	require.Equal(s.T(), 0, materializedStatementResults.Size())

	materializedStatementResults.SetTableMode(false)

	require.False(s.T(), materializedStatementResults.IsTableMode())
	require.Equal(s.T(), append([]string{"Operation"}, headers...), materializedStatementResults.GetHeaders())
	require.Equal(s.T(), 1, materializedStatementResults.Size())
}

func (s *MaterializedStatementResultsTestSuite) TestRowKeysShouldNotCollide() {
	headers := []string{"column1", "column2"}
	materializedStatementResults := types.NewMaterializedStatementResults(headers, 10)
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "23",
			},
		},
	})
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.Insert,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "12",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "3",
			},
		},
	})
	materializedStatementResults.Append(types.StatementResultRow{
		Operation: types.UpdateBefore,
		Fields: []types.StatementResultField{
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "1",
			},
			types.AtomicStatementResultField{
				Type:  types.Varchar,
				Value: "23",
			},
		},
	})

	expected := [][]string{{"12", "3"}}

	var actual [][]string
	materializedStatementResults.ForEach(func(rowIdx int, row *types.StatementResultRow) {
		var fields []string
		for _, field := range row.GetFields() {
			fields = append(fields, field.ToString())
		}
		actual = append(actual, fields)
	})

	require.Equal(s.T(), expected, actual)
}
