// Package sourcerefs validates location citations against the current source.
package sourcerefs

import (
	"context"
	"fmt"

	"gitea.maximumdirect.net/eric/notarius/internal/core/source"
	"gitea.maximumdirect.net/eric/notarius/internal/framework/contracts"
	"gitea.maximumdirect.net/eric/notarius/internal/framework/pipeline"
	"gitea.maximumdirect.net/eric/notarius/internal/modules/dnd"
	"gitea.maximumdirect.net/eric/notarius/internal/modules/dnd/shared"
	"gitea.maximumdirect.net/eric/notarius/internal/modules/dnd/shared/diagnostics"
	locationshape "gitea.maximumdirect.net/eric/notarius/internal/modules/dnd/validate/locationregistry/shape"
)

const (
	Key        = "extract/dnd/location-registry/source_refs"
	ReasonCode = "invalid_location_source_refs"
	policy     = "dnd.location_registry.validator.source_refs.v3"
)

type Options struct{}
type Validator struct{}

var _ contracts.TypedValidator[dnd.LocationRegistry] = (*Validator)(nil)
var _ pipeline.CheckpointFingerprintProvider = (*Validator)(nil)

func New(Options) *Validator      { return &Validator{} }
func (v *Validator) Name() string { return Key }
func (v *Validator) ExecutionClass() contracts.ExecutionClass {
	return contracts.ExecutionClassDeterministic
}
func (v *Validator) CheckpointFingerprints() []pipeline.CheckpointFingerprint {
	return []pipeline.CheckpointFingerprint{{Name: "policy", Value: policy}}
}

func (v *Validator) Validate(_ context.Context, req contracts.TypedValidationRequest[dnd.LocationRegistry]) (contracts.ValidationResult, error) {
	if req.Stage == string(pipeline.StageExtract) && req.Chunk == nil {
		return contracts.ValidationResult{}, fmt.Errorf("location source-reference validator requires the current extraction chunk")
	}
	if err := locationshape.Validate(req.Value); err != nil {
		return contracts.ValidationResult{Approved: true}, nil
	}
	index := source.NewDocumentIndex(req.Source)
	coverage := shared.NewChunkCoverage(req.Chunk)
	issues := make([]string, 0)
	var corrections diagnostics.Corrections
	normalization := req.Stage == string(pipeline.StageNormalize)
	validRangeRule := "Use positive source range endpoints that occur in the supplied transcript, with the earlier unit first."
	guidancePrefix := "Correct every rejected location citation and return the complete replacement location registry"
	if normalization {
		validRangeRule = "Revise the duplicate-group proposals so every selected canonical location preserves valid transcript evidence; do not reproduce application IDs."
		guidancePrefix = "Correct the duplicate-group proposals and return the complete replacement proposal response"
	}
	for locationIndex, location := range req.Value.Locations {
		for refIndex, ref := range location.SourceRefs {
			record := fmt.Sprintf("Affected location %s, citing %s.", diagnostics.Quote(location.Name), diagnostics.SourceRefRange(ref))
			if err := index.ValidateRef(ref); err != nil {
				issues = append(issues, fmt.Sprintf("locations[%d].source_refs[%d]: %s", locationIndex, refIndex, diagnostics.Truncate(err.Error())))
				corrections.Add("valid-range", validRangeRule, record)
				continue
			}
			if req.Stage == string(pipeline.StageExtract) && !coverage.Contains(index, req.Source, ref) {
				issues = append(issues, fmt.Sprintf("locations[%d].source_refs[%d]: source reference is outside the current extraction chunk", locationIndex, refIndex))
				corrections.Add("chunk-range", "Use only source ranges wholly contained in the supplied extraction chunk.", record)
			}
		}
	}
	if len(issues) == 0 {
		return contracts.ValidationResult{Approved: true}, nil
	}
	return rejection(
		diagnostics.Aggregate("invalid location source references", issues),
		corrections.Guidance(guidancePrefix),
	), nil
}

func Spec() pipeline.ValidatorSpec {
	return pipeline.ValidatorSpec{Key: Key, ExecutionClass: contracts.ExecutionClassDeterministic}
}

func Register(registry *pipeline.ValidatorRegistry) error {
	return pipeline.RegisterTypedValidatorBuilder(registry, dnd.LocationRegistryKind, Spec(), validateOptions, func(request pipeline.BuildRequest) (contracts.TypedValidator[dnd.LocationRegistry], error) {
		options, err := DecodeOptions(request.Options)
		if err != nil {
			return nil, err
		}
		return New(options), nil
	})
}

func DecodeOptions(options map[string]any) (Options, error) {
	if err := pipeline.RejectUnknownOptions(options); err != nil {
		return Options{}, err
	}
	return Options{}, nil
}

func validateOptions(options map[string]any) error { _, err := DecodeOptions(options); return err }

func rejection(message, guidance string) contracts.ValidationResult {
	return contracts.ValidationResult{Approved: false, ReasonCode: ReasonCode, Message: message, CorrectionGuidance: guidance}
}
