// 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 dataflowlib

import (
	"context"
	"fmt"
	"reflect"
	"testing"

	"encoding/json"

	"github.com/apache/beam/sdks/v2/go/pkg/beam/core/runtime"
	"github.com/apache/beam/sdks/v2/go/pkg/beam/core/runtime/graphx"
	"github.com/apache/beam/sdks/v2/go/pkg/beam/core/util/protox"
	pipepb "github.com/apache/beam/sdks/v2/go/pkg/beam/model/pipeline_v1"
	"github.com/google/go-cmp/cmp"
	"github.com/google/go-cmp/cmp/cmpopts"
	df "google.golang.org/api/dataflow/v1b3"
	"google.golang.org/protobuf/testing/protocmp"
)

func TestValidateWorkerSettings(t *testing.T) {
	ctx := context.Background()
	testsWithErr := []struct {
		name       string
		jobOptions JobOptions
		errMessage string
	}{
		{
			name: "test_zone_and_worker_region_mutual_exclusion",
			jobOptions: JobOptions{
				Zone:         "foo",
				WorkerRegion: "bar",
			},
			errMessage: "cannot use option zone with workerRegion; prefer either workerZone or workerRegion",
		},
		{
			name: "test_zone_and_worker_zone_mutual_exclusion",
			jobOptions: JobOptions{
				Zone:       "foo",
				WorkerZone: "bar",
			},
			errMessage: "cannot use option zone with workerZone; prefer workerZone",
		},
		{
			name: "test_worker_zone_and_worker_region_mutual_exclusion",
			jobOptions: JobOptions{
				WorkerRegion: "foo",
				WorkerZone:   "bar",
			},
			errMessage: "workerRegion and workerZone options are mutually exclusive",
		},
		{
			name: "test_experiment_worker_region_and_worker_region_mutual_exclusion",
			jobOptions: JobOptions{
				Experiments:  []string{"worker_region"},
				WorkerRegion: "bar",
			},
			errMessage: "experiment worker_region and option workerRegion are mutually exclusive",
		},
		{
			name: "test_experiment_worker_region_and_worker_zone_mutual_exclusion",
			jobOptions: JobOptions{
				Experiments: []string{"worker_region"},
				WorkerZone:  "bar",
			},
			errMessage: "experiment worker_region and option workerZone are mutually exclusive",
		},
		{
			name: "test_experiment_worker_region_and_zone_mutual_exclusion",
			jobOptions: JobOptions{
				Experiments: []string{"worker_region"},
				Zone:        "foo",
			},
			errMessage: "experiment worker_region and option Zone are mutually exclusive",
		},
		{
			name: "test_num_workers_cannot_be_negative",
			jobOptions: JobOptions{
				NumWorkers: -1,
			},
			errMessage: "num_workers (-1) cannot be negative",
		},
		{
			name: "test_max_num_workers_cannot_be_negative",
			jobOptions: JobOptions{
				MaxNumWorkers: -1,
			},
			errMessage: "max_num_workers (-1) cannot be negative",
		},
		{
			name: "test_num_workers_cannot_exceed_max_num_workers",
			jobOptions: JobOptions{
				NumWorkers:    43,
				MaxNumWorkers: 42,
			},
			errMessage: "num_workers (43) cannot exceed max_num_workers (42)",
		},
	}

	for _, test := range testsWithErr {
		t.Run(test.name, func(t *testing.T) {
			err := validateWorkerSettings(ctx, &test.jobOptions)
			if err == nil {
				t.Fatalf("expect error: %v, got no error", test.errMessage)
			}
			if err.Error() != test.errMessage {
				t.Fatalf("expect error: %v, got error: %v", test.errMessage, err.Error())
			}
		})
	}

	tests := []struct {
		name     string
		opts     JobOptions
		expected JobOptions
	}{
		{
			name:     "test_replace_worker_zone_with_zone",
			opts:     JobOptions{Zone: "foo"},
			expected: JobOptions{WorkerZone: "foo"},
		},
		{
			name:     "test_single_worker_zone",
			opts:     JobOptions{WorkerZone: "foo"},
			expected: JobOptions{WorkerZone: "foo"},
		},
		{
			name:     "test_single_worker_region",
			opts:     JobOptions{WorkerRegion: "foo"},
			expected: JobOptions{WorkerRegion: "foo"},
		},
		{
			name: "test_num_workers_can_equal_max_num_workers",
			opts: JobOptions{
				NumWorkers:    42,
				MaxNumWorkers: 42,
			},
			expected: JobOptions{
				NumWorkers:    42,
				MaxNumWorkers: 42,
			},
		},
	}

	for _, test := range tests {
		t.Run(test.name, func(t *testing.T) {
			err := validateWorkerSettings(ctx, &test.opts)
			if err != nil {
				t.Fatal(err)
			}
			if !reflect.DeepEqual(test.expected, test.opts) {
				t.Fatalf("expected job options: %v, got job options: %v", test.expected, test.opts)
			}
		})
	}
}

func TestCurrentStateMessage(t *testing.T) {
	tests := []struct {
		state   string
		term    bool
		want    string
		wantErr error
	}{
		{state: "JOB_STATE_DONE", want: "Job JorbID-09876 succeeded!", term: true},
		{state: "JOB_STATE_DRAINED", want: "Job JorbID-09876 drained", term: true},
		{state: "JOB_STATE_UPDATED", want: "Job JorbID-09876 updated", term: true},
		{state: "JOB_STATE_CANCELLED", want: "Job JorbID-09876 cancelled", term: true},
		{state: "JOB_STATE_RUNNING", want: "Job still running ...", term: false},
		{state: "JOB_STATE_FAILED", wantErr: fmt.Errorf("Job JorbID-09876 failed"), term: true},
		{state: "Ossiphrage", want: "Job state: Ossiphrage ...", term: false},
	}
	for _, test := range tests {
		t.Run(test.state, func(t *testing.T) {
			const jobID = "JorbID-09876"
			term, got, err := currentStateMessage(test.state, jobID)
			if term != test.term {
				termGot, termWant := "false (continues)", "true (terminal)"
				if !test.term {
					termGot, termWant = termWant, termGot
				}
				t.Errorf("currentStateMessage(%v, %q) = %v, want %v", test.state, jobID, termGot, termWant)
			}
			if err != nil && err.Error() != test.wantErr.Error() {
				t.Errorf("currentStateMessage(%v, %q) = %v, want %v", test.state, jobID, err, test.wantErr)
			}
			if got != test.want {
				t.Errorf("currentStateMessage(%v, %q) = %v, want %v", test.state, jobID, got, test.want)
			}
		})
	}
}

func Test_containerImages(t *testing.T) {
	type testcase struct {
		name        string
		envs        map[string]*pipepb.Environment
		wantImages  []*df.SdkHarnessContainerImage
		wantDisplay []string
	}

	type img struct {
		id, image string
		single    bool
		caps      []string
	}

	newCase := func(name string, imgs ...img) testcase {
		envs := map[string]*pipepb.Environment{}
		images := []*df.SdkHarnessContainerImage{}
		display := []string{}

		for _, i := range imgs {
			envs[i.id] = &pipepb.Environment{
				Capabilities: i.caps,
				Payload: protox.MustEncode(&pipepb.DockerPayload{
					ContainerImage: i.image,
				}),
			}
			images = append(images, &df.SdkHarnessContainerImage{
				ContainerImage:            i.image,
				UseSingleCorePerContainer: i.single,
				Capabilities:              i.caps,
				EnvironmentId:             i.id,
			})
			display = append(display, i.image)
		}
		return testcase{
			name:        name,
			envs:        envs,
			wantImages:  images,
			wantDisplay: display,
		}
	}

	tests := []testcase{
		newCase("go", img{"go", "goImage", false, []string{graphx.URNMultiCore}}),
		newCase("py", img{"py", "pyImage", true, []string{graphx.URNWorkerStatus}}),
		newCase("multi",
			img{"py", "pyImage", true, []string{graphx.URNWorkerStatus}},
			img{"go", "goImage", false, []string{graphx.URNMultiCore}},
			img{"java", "javaImage", false, []string{graphx.URNMultiCore, graphx.URNExpand}},
		),
	}

	for _, test := range tests {
		t.Run(test.name, func(t *testing.T) {
			pipeline := &pipepb.Pipeline{
				Components: &pipepb.Components{
					Environments: test.envs,
				},
			}
			gotImages, gotDisplay, err := containerImages(pipeline)
			if err != nil {
				t.Fatalf("containerImages(...) error = %v, want nil", err)
			}
			less := func(a, b *df.SdkHarnessContainerImage) bool {
				return a.ContainerImage < b.ContainerImage
			}
			if d := cmp.Diff(test.wantImages, gotImages, protocmp.Transform(), cmpopts.SortSlices(less)); d != "" {
				t.Errorf("containerImages(...) images diff; (-want, +got)\n%v", d)
			}
			if d := cmp.Diff(test.wantDisplay, gotDisplay, cmpopts.SortSlices(func(a, b string) bool { return a < b })); d != "" {
				t.Errorf("containerImages(...) display diff; (-want, +got)\n%v", d)
			}
		})

	}

}

func TestTranslate(t *testing.T) {
	ctx := context.Background()
	p := &pipepb.Pipeline{}
	opts := &JobOptions{
		Project:                        "test-project",
		Name:                           "test-job",
		DiskProvisionedIops:            4000,
		DiskProvisionedThroughputMibps: 200,
		WorkerHash:                     "worker-sha256-hash",
	}
	workerURL := "gs://any-location/temp"
	modelURL := "gs://any-location/temp"

	job, err := Translate(ctx, p, opts, workerURL, modelURL, "dummy-hash-12345")
	if err != nil {
		t.Fatalf("Translate(...) error = %v, want nil", err)
	}

	if len(job.Environment.WorkerPools) == 0 {
		t.Fatal("Translate(...) returned job with no worker pools")
	}

	wp := job.Environment.WorkerPools[0]
	if wp.DiskProvisionedIops != 4000 {
		t.Errorf("DiskProvisionedIops = %v, want 4000", wp.DiskProvisionedIops)
	}
	if wp.DiskProvisionedThroughputMibps != 200 {
		t.Errorf("DiskProvisionedThroughputMibps = %v, want 200", wp.DiskProvisionedThroughputMibps)
	}

	// Verify worker package has Sha256
	found := false
	for _, pkg := range wp.Packages {
		if pkg.Name == "worker" {
			found = true
			if pkg.Sha256 != "worker-sha256-hash" {
				t.Errorf("worker package Sha256 = %q, want %q", pkg.Sha256, "worker-sha256-hash")
			}
			break
		}
	}
	if !found {
		t.Fatalf("worker package not found in wp.Packages")
	}
}

func TestTranslateWithPipelineHash(t *testing.T) {
	p := &pipepb.Pipeline{
		Components: &pipepb.Components{
			Environments: map[string]*pipepb.Environment{
				"env1": {
					Payload: protox.MustEncode(&pipepb.DockerPayload{
						ContainerImage: "dummy_image",
					}),
				},
			},
		},
	}
	opts := &JobOptions{
		Name:    "test-job",
		Project: "test-project",
		Region:  "test-region",
		Options: runtime.RawOptions{
			Options: make(map[string]string),
		},
	}

	expectedHashStr := "dummy-hash-12345"

	job, err := Translate(context.Background(), p, opts, "worker-url", "model-url", expectedHashStr)
	if err != nil {
		t.Fatalf("Translate failed: %v", err)
	}

	// Verify PipelineProtoHash
	var recoveredOptions struct {
		Options struct {
			PipelineURL       string `json:"pipelineUrl"`
			PipelineProtoHash string `json:"pipelineProtoHash"`
		} `json:"options"`
	}

	rawOpts := job.Environment.SdkPipelineOptions
	if err := json.Unmarshal(rawOpts, &recoveredOptions); err != nil {
		t.Fatalf("Failed to unmarshal SdkPipelineOptions: %v", err)
	}

	if recoveredOptions.Options.PipelineProtoHash != expectedHashStr {
		t.Errorf("Expected PipelineProtoHash %v, got %v", expectedHashStr, recoveredOptions.Options.PipelineProtoHash)
	}
}
