package dav

import (
	"encoding/xml"
	"fmt"
	"log"
	"net/http"
	"path"
	"strings"

	"github.com/debridmediamanager.com/zurg/internal/config"
	"github.com/debridmediamanager.com/zurg/internal/torrent"
	"github.com/debridmediamanager.com/zurg/pkg/dav"
)

// HandlePropfindRequest handles a PROPFIND request
func HandlePropfindRequest(w http.ResponseWriter, r *http.Request, t *torrent.TorrentManager, c config.ConfigInterface) {
	var output []byte
	var err error

	requestPath := path.Clean(r.URL.Path)
	pathSegments := strings.Split(requestPath, "/")

	// Remove empty segments caused by leading or trailing slashes
	filteredSegments := pathSegments[:0]
	for _, segment := range pathSegments {
		if segment != "" {
			filteredSegments = append(filteredSegments, segment)
		}
	}

	switch len(filteredSegments) {
	case 0:
		output, err = handleRoot(w, r, c)
	case 1:
		output, err = handleListOfTorrents(requestPath, w, r, t, c)
	case 2:
		output, err = handleSingleTorrent(requestPath, w, r, t)
	default:
		http.Error(w, "Not Found", http.StatusNotFound)
		return
	}

	if err != nil {
		log.Printf("Error processing request: %v\n", err)
		http.Error(w, "Server error", http.StatusInternalServerError)
		return
	}

	if output != nil {
		w.Header().Set("Content-Type", "text/xml; charset=\"utf-8\"")
		w.WriteHeader(http.StatusMultiStatus)
		fmt.Fprintf(w, "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n%s\n", output)
	}
}

func handleRoot(w http.ResponseWriter, r *http.Request, c config.ConfigInterface) ([]byte, error) {
	var responses []dav.Response
	responses = append(responses, dav.Directory("/"))
	for _, directory := range c.GetDirectories() {
		responses = append(responses, dav.Directory("/"+directory))
	}
	rootResponse := dav.MultiStatus{
		XMLNS:    "DAV:",
		Response: responses,
	}
	return xml.MarshalIndent(rootResponse, "", "  ")
}

func handleListOfTorrents(requestPath string, w http.ResponseWriter, r *http.Request, t *torrent.TorrentManager, c config.ConfigInterface) ([]byte, error) {
	basePath := path.Base(requestPath)

	directories := c.GetDirectories()
	for _, directory := range directories {
		if basePath == directory {
			torrents := t.GetByDirectory(basePath)
			resp, err := createMultiTorrentResponse("/"+basePath, torrents)
			if err != nil {
				log.Printf("Cannot read directory (%s): %v\n", basePath, err)
				http.Error(w, "Cannot read directory", http.StatusInternalServerError)
				return nil, nil
			}
			return xml.MarshalIndent(resp, "", "  ")
		}
	}

	log.Println("Cannot find directory when generating list", requestPath)
	http.Error(w, "Cannot find directory", http.StatusNotFound)
	return nil, nil
}

func handleSingleTorrent(requestPath string, w http.ResponseWriter, r *http.Request, t *torrent.TorrentManager) ([]byte, error) {
	directory := strings.TrimPrefix(path.Dir(requestPath), "/")
	torrentName := path.Base(requestPath)

	sameNameTorrents := findAllTorrentsWithName(t, directory, torrentName)
	if len(sameNameTorrents) == 0 {
		log.Println("Cannot find directory when generating single torrent", requestPath)
		http.Error(w, "Cannot find directory", http.StatusNotFound)
		return nil, nil
	}

	resp, err := createSingleTorrentResponse("/"+directory, sameNameTorrents, t)
	if err != nil {
		log.Printf("Cannot read directory (%s): %v\n", requestPath, err)
		http.Error(w, "Cannot read directory", http.StatusInternalServerError)
		return nil, nil
	}
	return xml.MarshalIndent(resp, "", "  ")
}