package webhook

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

	"github.com/labstack/echo/v5"
	"github.com/pocketbase/dbx"
	"github.com/pocketbase/pocketbase"
	"github.com/pocketbase/pocketbase/apis"
	"github.com/pocketbase/pocketbase/core"
	"github.com/pocketbase/pocketbase/daos"
	"github.com/pocketbase/pocketbase/models"

	"github.com/SecurityBrewery/catalyst/migrations"
	"github.com/SecurityBrewery/catalyst/reaction/action"
	"github.com/SecurityBrewery/catalyst/reaction/action/webhook"
)

type Webhook struct {
	Token string `json:"token"`
	Path  string `json:"path"`
}

const prefix = "/reaction/"

func BindHooks(pb *pocketbase.PocketBase) {
	pb.OnBeforeServe().Add(func(e *core.ServeEvent) error {
		e.Router.Any(prefix+"*", handle(e.App))

		return nil
	})
}

func handle(app core.App) func(c echo.Context) error {
	return func(c echo.Context) error {
		record, payload, apiErr := parseRequest(app.Dao(), c.Request())
		if apiErr != nil {
			return apiErr
		}

		output, err := action.Run(c.Request().Context(), app, record.GetString("action"), record.GetString("actiondata"), string(payload))
		if err != nil {
			return apis.NewApiError(http.StatusInternalServerError, err.Error(), nil)
		}

		return writeOutput(c, output)
	}
}

func parseRequest(dao *daos.Dao, r *http.Request) (*models.Record, []byte, *apis.ApiError) {
	if !strings.HasPrefix(r.URL.Path, prefix) {
		return nil, nil, apis.NewApiError(http.StatusNotFound, "wrong prefix", nil)
	}

	reactionName := strings.TrimPrefix(r.URL.Path, prefix)

	record, trigger, found, err := findByWebhookTrigger(dao, reactionName)
	if err != nil {
		return nil, nil, apis.NewNotFoundError(err.Error(), nil)
	}

	if !found {
		return nil, nil, apis.NewNotFoundError("reaction not found", nil)
	}

	if trigger.Token != "" {
		auth := r.Header.Get("Authorization")

		if !strings.HasPrefix(auth, "Bearer ") {
			return nil, nil, apis.NewUnauthorizedError("missing token", nil)
		}

		if trigger.Token != strings.TrimPrefix(auth, "Bearer ") {
			return nil, nil, apis.NewUnauthorizedError("invalid token", nil)
		}
	}

	body, isBase64Encoded := webhook.EncodeBody(r.Body)

	payload, err := json.Marshal(&Request{
		Method:          r.Method,
		Path:            r.URL.EscapedPath(),
		Headers:         r.Header,
		Query:           r.URL.Query(),
		Body:            body,
		IsBase64Encoded: isBase64Encoded,
	})
	if err != nil {
		return nil, nil, apis.NewApiError(http.StatusInternalServerError, err.Error(), nil)
	}

	return record, payload, nil
}

func findByWebhookTrigger(dao *daos.Dao, path string) (*models.Record, *Webhook, bool, error) {
	records, err := dao.FindRecordsByExpr(migrations.ReactionCollectionName, dbx.HashExp{"trigger": "webhook"})
	if err != nil {
		return nil, nil, false, err
	}

	if len(records) == 0 {
		return nil, nil, false, nil
	}

	for _, record := range records {
		var webhook Webhook
		if err := json.Unmarshal([]byte(record.GetString("triggerdata")), &webhook); err != nil {
			return nil, nil, false, err
		}

		if webhook.Path == path {
			return record, &webhook, true, nil
		}
	}

	return nil, nil, false, nil
}

func writeOutput(c echo.Context, output []byte) error {
	var catalystResponse webhook.Response
	if err := json.Unmarshal(output, &catalystResponse); err == nil && catalystResponse.StatusCode != 0 {
		for key, values := range catalystResponse.Headers {
			for _, value := range values {
				c.Response().Header().Add(key, value)
			}
		}

		if catalystResponse.IsBase64Encoded {
			output, err = base64.StdEncoding.DecodeString(catalystResponse.Body)
			if err != nil {
				return fmt.Errorf("error decoding base64 body: %w", err)
			}
		} else {
			output = []byte(catalystResponse.Body)
		}
	}

	if IsJSON(output) {
		return c.JSON(http.StatusOK, json.RawMessage(output))
	}

	return c.String(http.StatusOK, string(output))
}