// Copyright 2025 Google LLC
//
// 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.

package cel

import (
	_ "embed"
	"strings"
	"sync"
	"testing"

	"cel.dev/cel-go/common"
	"cel.dev/cel-go/common/env"
	"github.com/google/go-cmp/cmp"

	"google.golang.org/protobuf/proto"
	dpb "google.golang.org/protobuf/types/descriptorpb"
)

//go:embed testdata/basic.prompt.txt
var wantBasicPrompt string

//go:embed testdata/macros.prompt.txt
var wantMacrosPrompt string

//go:embed testdata/standard_env.prompt.txt
var wantStandardEnvPrompt string

//go:embed testdata/field_paths.prompt.txt
var wantFieldPathsPrompt string

//go:embed testdata/test_fds_with_source_info-transitive-descriptor-set-source-info.proto.bin
var testFdsWithSourceInfo []byte

var onceFds sync.Once
var fds *dpb.FileDescriptorSet

func testFds(t *testing.T) *dpb.FileDescriptorSet {
	onceFds.Do(func() {
		fds = &dpb.FileDescriptorSet{}
		err := proto.Unmarshal(testFdsWithSourceInfo, fds)
		if err != nil {
			t.Fatalf("failed to unmarshal testFdsWithSourceInfo: %v", err)
		}
	})
	return fds
}

func TestPromptTemplate(t *testing.T) {
	tests := []struct {
		name    string
		envOpts []EnvOption
		out     string
	}{
		{
			name: "basic",
			out:  wantBasicPrompt,
		},
		{
			name:    "macros",
			envOpts: []EnvOption{Macros(StandardMacros...)},
			out:     wantMacrosPrompt,
		},
		{
			name:    "standard_env",
			envOpts: []EnvOption{StdLib(StdLibSubset(env.NewLibrarySubset().SetDisableMacros(true)))},
			out:     wantStandardEnvPrompt,
		},
	}

	for _, tst := range tests {
		tc := tst
		t.Run(tc.name, func(t *testing.T) {
			envOpts := append([]EnvOption{TypeDescs(testFds(t))}, tc.envOpts...)

			env, err := NewCustomEnv(
				envOpts...,
			)
			if err != nil {
				t.Fatalf("cel.NewCustomEnv() failed: %v", err)
			}
			prompt, err := AuthoringPrompt(env)
			if err != nil {
				t.Fatalf("cel.AuthoringPrompt() failed: %v", err)
			}
			out := prompt.Render("<USER_PROMPT>")
			if diff := cmp.Diff(tc.out, out); diff != "" {
				t.Errorf("got %s, diff (-want +got): %s", out, diff)
			}
		})
	}
}

func TestPromptTemplateFieldPaths(t *testing.T) {
	tests := []struct {
		name    string
		envOpts []EnvOption
		out     string
	}{
		{
			name: "standard_env",
			envOpts: []EnvOption{
				VariableWithDoc("team", ObjectType("cel.testdata.Team"),
					common.MultilineDescription("A team of gifted youngsters")),
				StdLib(StdLibSubset(env.NewLibrarySubset().SetDisableMacros(true))),
			},
			out: wantFieldPathsPrompt,
		},
	}

	for _, tst := range tests {
		tc := tst
		t.Run(tc.name, func(t *testing.T) {
			envOpts := append([]EnvOption{TypeDescs(testFds(t))}, tc.envOpts...)

			env, err := NewCustomEnv(
				envOpts...,
			)
			if err != nil {
				t.Fatalf("cel.NewCustomEnv() failed: %v", err)
			}
			prompt, err := AuthoringPromptWithFieldPaths(env)
			if err != nil {
				t.Fatalf("cel.AuthoringPromptWithFieldPaths() failed: %v", err)
			}
			out := prompt.Render("<USER_PROMPT>")
			if diff := cmp.Diff(tc.out, out); diff != "" {
				t.Errorf("got %s, diff (-want +got): %s", out, diff)
			}
		})
	}
}

// TestRenderSanitizesTemplateDirectives verifies that user-supplied input containing
// Go text/template action delimiters is rendered as literal text and never executed
// as template directives.
//
// Go's text/template renders struct field values (such as .UserPrompt) as literal
// strings — it does not re-parse or re-evaluate them as template syntax. This means
// a caller passing "{{.Persona}}" as the user prompt will see that exact string in
// the output, not the expanded persona content.
func TestRenderSanitizesTemplateDirectives(t *testing.T) {
	env, err := NewEnv()
	if err != nil {
		t.Fatalf("cel.NewEnv() failed: %v", err)
	}
	prompt, err := AuthoringPrompt(env)
	if err != nil {
		t.Fatalf("cel.AuthoringPrompt() failed: %v", err)
	}

	tests := []struct {
		name        string
		input       string
		wantLiteral string
		wantAbsent  string
	}{
		{
			name:        "template_field_not_executed",
			input:       "{{.Persona}} should be literal",
			wantLiteral: "{{.Persona}} should be literal",
		},
		{
			name:        "closing_delimiters_escaped",
			input:       "hello }} world",
			wantLiteral: "hello }} world",
		},
		{
			name:        "format_rules_field_not_executed",
			input:       "{{.FormatRules}} injected",
			wantLiteral: "{{.FormatRules}} injected",
		},
		{
			name:        "persona_not_duplicated_via_injection",
			input:       "{{.Persona}}",
			wantLiteral: "{{.Persona}}",
			// Persona text appears once legitimately at the top of the rendered output.
			// A second occurrence would mean the injected directive executed and dumped
			// the persona content again into the user prompt section.
			wantAbsent: "software engineer\nauthoring boolean",
		},
	}

	for _, tst := range tests {
		tc := tst
		t.Run(tc.name, func(t *testing.T) {
			out := prompt.Render(tc.input)
			if !strings.Contains(out, tc.wantLiteral) {
				t.Errorf("Render(%q):\n  want literal substring: %q\n  got output:\n%s",
					tc.input, tc.wantLiteral, out)
			}
			if tc.wantAbsent != "" {
				if strings.Count(out, tc.wantAbsent) > 1 {
					t.Errorf("Render(%q): template injection detected — %q appears multiple times in output:\n%s",
						tc.input, tc.wantAbsent, out)
				}
			}
		})
	}
}
