package v1

import (
	"encoding/json"
	"fmt"
	"net/http"
	"os"
	"strings"

	"github.com/gorilla/mux"
	"gopkg.in/yaml.v3"

	"github.com/wild-cloud/wild-central/daemon/internal/contracts"
	"github.com/wild-cloud/wild-central/daemon/internal/operations"
	"github.com/wild-cloud/wild-central/daemon/internal/services"
	"github.com/wild-cloud/wild-central/daemon/internal/tools"
)

// ServicesList lists all base services
func (api *API) ServicesList(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// List services
	servicesMgr := services.NewManager(api.dataDir)
	svcList, err := servicesMgr.List(instanceName)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to list services: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, map[string]interface{}{
		"services": svcList,
	})
}

// ServicesGet returns a specific service
func (api *API) ServicesGet(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Get service
	servicesMgr := services.NewManager(api.dataDir)
	service, err := servicesMgr.Get(instanceName, serviceName)
	if err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Service not found: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, service)
}

// ServicesInstall installs a service
func (api *API) ServicesInstall(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Parse request
	var req struct {
		Name   string `json:"name"`
		Fetch  bool   `json:"fetch"`
		Deploy bool   `json:"deploy"`
	}

	if err := json.NewDecoder(r.Body).Decode(&req); err != nil {
		respondError(w, http.StatusBadRequest, "Invalid request body")
		return
	}

	if req.Name == "" {
		respondError(w, http.StatusBadRequest, "service name is required")
		return
	}

	// Start install operation
	opsMgr := operations.NewManager(api.dataDir)
	opID, err := opsMgr.Start(instanceName, "install_service", req.Name)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to start operation: %v", err))
		return
	}

	// Install in background
	go func() {
		// Recover from panics to prevent goroutine crashes
		defer func() {
			if r := recover(); r != nil {
				fmt.Printf("[ERROR] Service install goroutine panic: %v\n", r)
				_ = opsMgr.Update(instanceName, opID, "failed", fmt.Sprintf("Internal error: %v", r), 0)
			}
		}()

		fmt.Printf("[DEBUG] Service install goroutine started: service=%s instance=%s opID=%s\n", req.Name, instanceName, opID)
		servicesMgr := services.NewManager(api.dataDir)
		_ = opsMgr.UpdateStatus(instanceName, opID, "running")

		if err := servicesMgr.Install(instanceName, req.Name, req.Fetch, req.Deploy, opID, api.broadcaster); err != nil {
			fmt.Printf("[DEBUG] Service install failed: %v\n", err)
			_ = opsMgr.Update(instanceName, opID, "failed", err.Error(), 0)
		} else {
			fmt.Printf("[DEBUG] Service install completed successfully\n")
			_ = opsMgr.Update(instanceName, opID, "completed", "Service installed", 100)
		}
	}()

	respondJSON(w, http.StatusAccepted, map[string]string{
		"operation_id": opID,
		"message":      "Service installation initiated",
	})
}

// ServicesInstallAll installs all base services
func (api *API) ServicesInstallAll(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Parse request
	var req struct {
		Fetch  bool `json:"fetch"`
		Deploy bool `json:"deploy"`
	}

	if err := json.NewDecoder(r.Body).Decode(&req); err != nil {
		// Use defaults if no body
		req.Deploy = true
	}

	// Start install operation
	opsMgr := operations.NewManager(api.dataDir)
	opID, err := opsMgr.Start(instanceName, "install_all_services", "all")
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to start operation: %v", err))
		return
	}

	// Install in background
	go func() {
		servicesMgr := services.NewManager(api.dataDir)
		_ = opsMgr.UpdateStatus(instanceName, opID, "running")

		if err := servicesMgr.InstallAll(instanceName, req.Fetch, req.Deploy, opID, api.broadcaster); err != nil {
			_ = opsMgr.Update(instanceName, opID, "failed", err.Error(), 0)
		} else {
			_ = opsMgr.Update(instanceName, opID, "completed", "All services installed", 100)
		}
	}()

	respondJSON(w, http.StatusAccepted, map[string]string{
		"operation_id": opID,
		"message":      "Services installation initiated",
	})
}

// ServicesDelete deletes a service
func (api *API) ServicesDelete(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Start delete operation
	opsMgr := operations.NewManager(api.dataDir)
	opID, err := opsMgr.Start(instanceName, "delete_service", serviceName)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to start operation: %v", err))
		return
	}

	// Delete in background
	go func() {
		servicesMgr := services.NewManager(api.dataDir)
		_ = opsMgr.UpdateStatus(instanceName, opID, "running")

		if err := servicesMgr.Delete(instanceName, serviceName); err != nil {
			_ = opsMgr.Update(instanceName, opID, "failed", err.Error(), 0)
		} else {
			_ = opsMgr.Update(instanceName, opID, "completed", "Service deleted", 100)
		}
	}()

	respondJSON(w, http.StatusAccepted, map[string]string{
		"operation_id": opID,
		"message":      "Service deletion initiated",
	})
}

// ServicesGetStatus returns detailed service status
func (api *API) ServicesGetStatus(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Get detailed status
	servicesMgr := services.NewManager(api.dataDir)
	status, err := servicesMgr.GetDetailedStatus(instanceName, serviceName)
	if err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Failed to get status: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, status)
}

// ServicesGetManifest returns the manifest for a service
func (api *API) ServicesGetManifest(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	serviceName := vars["service"]

	servicesMgr := services.NewManager(api.dataDir)
	manifest, err := servicesMgr.GetManifest(serviceName)
	if err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Service not found: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, manifest)
}

// ServicesGetConfig returns the service configuration schema
func (api *API) ServicesGetConfig(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	serviceName := vars["service"]

	servicesMgr := services.NewManager(api.dataDir)

	// Get manifest
	manifest, err := servicesMgr.GetManifest(serviceName)
	if err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Service not found: %v", err))
		return
	}

	// Return config schema
	response := map[string]interface{}{
		"configReferences": manifest.ConfigReferences,
		"serviceConfig":    manifest.ServiceConfig,
	}

	respondJSON(w, http.StatusOK, response)
}

// ServicesGetInstanceConfig returns current config values for a service instance
func (api *API) ServicesGetInstanceConfig(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	servicesMgr := services.NewManager(api.dataDir)

	// Get manifest to know which config paths to read
	manifest, err := servicesMgr.GetManifest(serviceName)
	if err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Service not found: %v", err))
		return
	}

	// Load instance config as map for dynamic path extraction
	configPath := tools.GetInstanceConfigPath(api.dataDir, instanceName)
	configData, err := os.ReadFile(configPath)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to read instance config: %v", err))
		return
	}

	var instanceConfig map[string]interface{}
	if err := yaml.Unmarshal(configData, &instanceConfig); err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to parse instance config: %v", err))
		return
	}

	// Extract values for all config paths
	configValues := make(map[string]interface{})

	// Add config references
	for _, path := range manifest.ConfigReferences {
		if value := getNestedValue(instanceConfig, path); value != nil {
			configValues[path] = value
		}
	}

	// Add service config
	for _, cfg := range manifest.ServiceConfig {
		if value := getNestedValue(instanceConfig, cfg.Path); value != nil {
			configValues[cfg.Path] = value
		}
	}

	respondJSON(w, http.StatusOK, map[string]interface{}{
		"config": configValues,
	})
}

// getNestedValue retrieves a value from nested map using dot notation path
func getNestedValue(data map[string]interface{}, path string) interface{} {
	keys := strings.Split(path, ".")
	current := data

	for i, key := range keys {
		if i == len(keys)-1 {
			return current[key]
		}

		if next, ok := current[key].(map[string]interface{}); ok {
			current = next
		} else {
			return nil
		}
	}

	return nil
}

// ServicesFetch handles fetching service files to instance
func (api *API) ServicesFetch(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if !api.instance.InstanceExists(instanceName) {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance '%s' not found", instanceName))
		return
	}

	// Fetch service files
	servicesMgr := services.NewManager(api.dataDir)
	if err := servicesMgr.Fetch(instanceName, serviceName); err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to fetch service: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, map[string]string{
		"message": fmt.Sprintf("Service %s files fetched successfully", serviceName),
	})
}

// ServicesCompile handles template compilation
func (api *API) ServicesCompile(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if !api.instance.InstanceExists(instanceName) {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance '%s' not found", instanceName))
		return
	}

	// Compile templates
	servicesMgr := services.NewManager(api.dataDir)
	if err := servicesMgr.Compile(instanceName, serviceName); err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to compile templates: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, map[string]string{
		"message": fmt.Sprintf("Templates compiled successfully for %s", serviceName),
	})
}

// ServicesDeploy handles service deployment
func (api *API) ServicesDeploy(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if !api.instance.InstanceExists(instanceName) {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance '%s' not found", instanceName))
		return
	}

	// Deploy service (without operation tracking for standalone deploy)
	servicesMgr := services.NewManager(api.dataDir)
	if err := servicesMgr.Deploy(instanceName, serviceName, "", nil); err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to deploy service: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, map[string]string{
		"message": fmt.Sprintf("Service %s deployed successfully", serviceName),
	})
}

// ServicesGetLogs retrieves or streams service logs
func (api *API) ServicesGetLogs(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Parse query parameters
	query := r.URL.Query()
	logsReq := contracts.ServiceLogsRequest{
		Container: query.Get("container"),
		Follow:    query.Get("follow") == "true",
		Previous:  query.Get("previous") == "true",
		Since:     query.Get("since"),
	}

	// Parse tail parameter
	if tailStr := query.Get("tail"); tailStr != "" {
		var tail int
		if _, err := fmt.Sscanf(tailStr, "%d", &tail); err == nil {
			logsReq.Tail = tail
		}
	}

	// Validate parameters
	if logsReq.Tail < 0 {
		respondError(w, http.StatusBadRequest, "tail parameter must be positive")
		return
	}
	if logsReq.Tail > 5000 {
		respondError(w, http.StatusBadRequest, "tail parameter cannot exceed 5000")
		return
	}
	if logsReq.Previous && logsReq.Follow {
		respondError(w, http.StatusBadRequest, "previous and follow cannot be used together")
		return
	}

	servicesMgr := services.NewManager(api.dataDir)

	// Stream logs with SSE if follow=true
	if logsReq.Follow {
		// Set SSE headers
		w.Header().Set("Content-Type", "text/event-stream")
		w.Header().Set("Cache-Control", "no-cache")
		w.Header().Set("Connection", "keep-alive")
		w.Header().Set("X-Accel-Buffering", "no")

		// Stream logs
		if err := servicesMgr.StreamLogs(instanceName, serviceName, logsReq, w); err != nil {
			// Log error but can't send response (SSE already started)
			fmt.Printf("Error streaming logs: %v\n", err)
		}
		return
	}

	// Get buffered logs
	logsResp, err := servicesMgr.GetLogs(instanceName, serviceName, logsReq)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to get logs: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, logsResp)
}

// ServicesUpdateConfig updates service configuration
func (api *API) ServicesUpdateConfig(w http.ResponseWriter, r *http.Request) {
	vars := mux.Vars(r)
	instanceName := vars["name"]
	serviceName := vars["service"]

	// Validate instance exists
	if err := api.instance.ValidateInstance(instanceName); err != nil {
		respondError(w, http.StatusNotFound, fmt.Sprintf("Instance not found: %v", err))
		return
	}

	// Parse request body
	var update contracts.ServiceConfigUpdate
	if err := json.NewDecoder(r.Body).Decode(&update); err != nil {
		respondError(w, http.StatusBadRequest, fmt.Sprintf("Invalid request body: %v", err))
		return
	}

	// Validate request
	if len(update.Config) == 0 {
		respondError(w, http.StatusBadRequest, "config field is required and must not be empty")
		return
	}

	// Update config
	servicesMgr := services.NewManager(api.dataDir)
	response, err := servicesMgr.UpdateConfig(instanceName, serviceName, update, api.broadcaster)
	if err != nil {
		respondError(w, http.StatusInternalServerError, fmt.Sprintf("Failed to update config: %v", err))
		return
	}

	respondJSON(w, http.StatusOK, response)
}