package main

import (
	"fmt"
	"net/http"
	"os"

	"github.com/go-chi/chi/v5"
	"github.com/mark3labs/mcp-go/mcp"
	"github.com/mark3labs/mcp-go/server"
	"github.com/urfave/cli/v2"
	"go.skia.org/infra/go/cleanup"
	infraCommon "go.skia.org/infra/go/common"
	"go.skia.org/infra/go/httputils"
	"go.skia.org/infra/go/skerr"
	"go.skia.org/infra/go/sklog"
	"go.skia.org/infra/go/sklog/sklogimpl"
	"go.skia.org/infra/go/sklog/stdlogging"
	"go.skia.org/infra/go/urfavecli"
	"go.skia.org/infra/mcp/auth"
	"go.skia.org/infra/mcp/common"
	"go.skia.org/infra/mcp/services/chromiumbuilder"
	"go.skia.org/infra/mcp/services/crash"
	"go.skia.org/infra/mcp/services/helloworld"
	"go.skia.org/infra/mcp/services/perf"
	"go.skia.org/infra/mcp/services/releaseinfra"
)

type mcpservice string

const (
	ChromiumBuilder mcpservice = "chromiumbuilder"
	Crash           mcpservice = "crash"
	HelloWorld      mcpservice = "helloworld"
	Perf            mcpservice = "perf"
	ReleaseInfra    mcpservice = "releaseinfra"
)

// serviceFactory defines a function that creates a McpService instance.
type serviceFactory func() common.McpService

// serviceRegistry holds the mapping from service names to their factory functions.
// This allows for easier testing by registering mock services.[]
var serviceRegistry = map[mcpservice]serviceFactory{
	ChromiumBuilder: func() common.McpService { return &chromiumbuilder.ChromiumBuilderService{} },
	Crash:           func() common.McpService { return &crash.CrashService{} },
	HelloWorld:      func() common.McpService { return &helloworld.HelloWorldService{} },
	Perf:            func() common.McpService { return &perf.PerfService{} },
	ReleaseInfra:    func() common.McpService { return &releaseinfra.ReleaseInfraService{} },
}

// mcpFlags provides a struct to hold data required by mcp services provided
// via cmdline arguments.
type mcpFlags struct {
	// Name of the service.
	ServiceName string

	// Base url for the server.
	BaseUrl string

	// Specify the port for the server.
	Port int

	// Port for prometheus metrics.
	PromPort int

	// Arguments to pass on to the service.
	ServiceArgs string

	// If true, add liveness and readiness probes.
	AddHealthChecks bool
}

// AsCliFlags provides a list of the flags supported by the mcpserver cmd.
func (flags *mcpFlags) AsCliFlags() []cli.Flag {
	return []cli.Flag{
		&cli.StringFlag{
			Destination: &flags.ServiceName,
			Name:        "service",
			Value:       "helloworld",
			Usage:       "The name of the service to run.",
		},
		&cli.StringFlag{
			Destination: &flags.BaseUrl,
			Name:        "baseurl",
			Value:       "http://localhost:8080",
			Usage:       "The base url for the server.",
		},
		&cli.IntFlag{
			Destination: &flags.Port,
			Name:        "port",
			Value:       8080,
			Usage:       "The port for the server.",
		},
		&cli.IntFlag{
			Destination: &flags.PromPort,
			Name:        "prom_port",
			Value:       20000,
			Usage:       "The prometheus metrics port for the server.",
		},
		&cli.StringFlag{
			Destination: &flags.ServiceArgs,
			Name:        "args",
			Value:       "",
			Usage:       "The arguments for the service.",
		},
		&cli.BoolFlag{
			Destination: &flags.AddHealthChecks,
			Name:        "add_health_checks",
			Value:       false,
			Usage:       "If true, add readiness and liveness probes.",
		},
	}
}

// Cmd execution entry point.
func main() {
	var mcpFlags mcpFlags
	cli.MarkdownDocTemplate = urfavecli.MarkdownDocTemplate

	cliApp := &cli.App{
		Name:  "mcpserver",
		Usage: "Command line tool that runs the MCP service.",
		Before: func(c *cli.Context) error {
			// Log to stdout.
			sklogimpl.SetLogger(stdlogging.New(os.Stdout))

			return nil
		},
		Commands: []*cli.Command{
			{
				Name:        "run",
				Usage:       "mcpserver run --service=helloworld",
				Description: "Runs the process that hosts the mcp service.",
				Flags:       (&mcpFlags).AsCliFlags(),
				Action: func(c *cli.Context) error {
					urfavecli.LogFlags(c)
					sseServer, err := createMcpSSEServer(&mcpFlags)
					if err != nil {
						return err
					}

					if mcpFlags.AddHealthChecks {
						// Run the health checks in a separate thread
						// since the main thread will be hosting the mcp server.
						go addHealthProbes()
					}

					portSpec := fmt.Sprintf(":%d", mcpFlags.Port)
					sklog.Infof("Running MCP server on %s", portSpec)
					if err := sseServer.Start(portSpec); err != nil {
						sklog.Fatalf("Error: %v", err)
					}

					return nil
				},
			},
		},
	}

	promPortSpec := fmt.Sprintf(":%d", mcpFlags.PromPort)
	infraCommon.InitWithMust("mcpserver", infraCommon.PrometheusOpt(&promPortSpec))
	defer infraCommon.Defer()
	err := cliApp.Run(os.Args)
	if err != nil {
		fmt.Printf("\nError: %s\n", err.Error())
		os.Exit(2)
	}
}

// addHealthProbes adds the health check handlers required for kubernetes on a separate port.
func addHealthProbes() {
	router := chi.NewRouter()
	h := httputils.LoggingGzipRequestResponse(router)
	h = httputils.HealthzAndHTTPS(h)
	http.Handle("/", h)
	server := &http.Server{
		Addr:    ":8081",
		Handler: h,
	}
	sklog.Fatal(server.ListenAndServe())
}

// createMcpServer creates a new server that hosts the service based on the
// information in the mcpFlags.
func createMcpSSEServer(mcpFlags *mcpFlags) (*server.SSEServer, error) {
	factory, ok := serviceRegistry[mcpservice(mcpFlags.ServiceName)]
	if !ok {
		return nil, skerr.Fmt("Unknown service: %s", mcpFlags.ServiceName)
	}
	service := factory()

	registerCleanup(service)
	err := service.Init(mcpFlags.ServiceArgs)
	if err != nil {
		return nil, err
	}

	s := server.NewMCPServer(
		"Chrome Infra",
		"0.0.0",
		server.WithResourceCapabilities(true, true),
		server.WithToolCapabilities(true),
	)

	err = RegisterTools(s, service)
	if err != nil {
		return nil, err
	}

	RegisterResources(s, service)

	sseServer := server.NewSSEServer(
		s,
		server.WithBaseURL(mcpFlags.BaseUrl),
		server.WithKeepAlive(true),
		server.WithSSEContextFunc(auth.AuthFromRequest))
	return sseServer, nil
}

// RegisterTools adds the tools from the service to the MCP server.
func RegisterTools(s *server.MCPServer, service common.McpService) error {
	tools := service.GetTools()
	for _, tool := range tools {
		options := []mcp.ToolOption{mcp.WithDescription(tool.Description)}
		for _, arg := range tool.Arguments {
			propOptions := []mcp.PropertyOption{}
			if arg.Required {
				propOptions = append(propOptions, mcp.Required())
			}
			propOptions = append(propOptions, mcp.Description(arg.Description))
			if len(arg.EnumValues) != 0 {
				propOptions = append(propOptions, mcp.Enum(arg.EnumValues...))
			}
			switch arg.ArgumentType {
			case common.StringArgument:
				options = append(options, mcp.WithString(arg.Name, propOptions...))
			case common.BooleanArgument:
				options = append(options, mcp.WithBoolean(arg.Name, propOptions...))
			case common.NumberArgument:
				options = append(options, mcp.WithNumber(arg.Name, propOptions...))
			case common.ObjectArgument:
				options = append(options, mcp.WithObject(arg.Name, propOptions...))
			case common.ArrayArgument:
				if len(arg.ArraySchema) == 0 {
					return skerr.Fmt("Array type argument %s does not have a schema defined", arg.Name)
				}
				propOptions = append(propOptions, mcp.Items(arg.ArraySchema))
				options = append(options, mcp.WithArray(arg.Name, propOptions...))
			default:
				return skerr.Fmt("Invalid argument type %v", arg.ArgumentType)
			}
		}
		mcpToolSpec := mcp.NewTool(tool.Name, options...)
		s.AddTool(mcpToolSpec, tool.Handler)
	}

	return nil
}

// RegisterResources registers the resources from the service to the MCP server.
func RegisterResources(s *server.MCPServer, service common.McpService) {
	resources := service.GetResources()

	for _, resource := range resources {
		resourceSpec := mcp.NewResource(resource.Uri, resource.Name, mcp.WithResourceDescription(resource.Description), mcp.WithMIMEType(resource.MimeType))
		s.AddResource(resourceSpec, resource.Handler)
	}
}

// Adds a hook to run the shutdown procedure on the service when the
// server is being terminated.
func registerCleanup(service common.McpService) {
	cleanup.AtExit(func() {
		err := service.Shutdown()
		if err != nil {
			sklog.Errorf("Error performing shutdown for service: %v", err)
		}
	})
}