package httpapi

import (
	"compress/gzip"
	"errors"
	"io"
	"net/http"
	"strings"

	"git.vakhrushev.me/av/healthlog/internal/ingest"
)

// ingestResponse — что видит Health Auto Export в ответ на принятый пакет.
type ingestResponse struct {
	DeliveryID string `json:"delivery_id"`
	Bytes      int64  `json:"bytes"`
	SHA256     string `json:"sha256"`
}

// handleIngest принимает пакет от Health Auto Export.
//
// Код ответа отражает ДОСТАВКУ, а не разбор: 200 означает «тело сохранено в
// архив», и этого достаточно, потому что разобрать сохранённое можно всегда.
func (a *api) handleIngest(w http.ResponseWriter, r *http.Request) {
	body, err := readBody(w, r, a.maxBody)
	if err != nil {
		writeReadError(w, err)
		return
	}

	res, err := a.ingest.Accept(r.Context(), body, a.metaFromHeaders(r))
	if err != nil {
		// Ошибку уже залогировал use-case; транспорт только переводит её в ответ.
		if errors.Is(err, ingest.ErrMalformed) {
			writeError(w, http.StatusBadRequest, "некорректный формат пакета")
			return
		}
		writeError(w, http.StatusInternalServerError, "внутренняя ошибка")
		return
	}

	writeJSON(w, http.StatusOK, ingestResponse{
		DeliveryID: res.DeliveryID,
		Bytes:      res.Bytes,
		SHA256:     res.SHA256,
	})
}

// metaFromHeaders достаёт то, что автоматизация Health Auto Export
// рассказывает о себе своими заголовками. Именованные поля — те, по которым
// ходят запросы; полный набор кладётся рядом, потому что документация HAE
// заведомо неполна.
func (a *api) metaFromHeaders(r *http.Request) ingest.Meta {
	return ingest.Meta{
		AutomationName: r.Header.Get("automation-name"),
		AutomationID:   r.Header.Get("automation-id"),
		Aggregation:    r.Header.Get("automation-aggregation"),
		Period:         r.Header.Get("automation-period"),
		SessionID:      r.Header.Get("session-id"),
		Headers:        a.safeHeaders(r),
	}
}

// secretHeaders — заголовки, которые не сохраняем никогда, как бы ни был
// настроен отправитель.
var secretHeaders = map[string]bool{
	"authorization":       true,
	"proxy-authorization": true,
	"cookie":              true,
	"x-api-key":           true,
	"api-key":             true,
	"x-auth-token":        true,
}

// redacted подменяет значение, которое оказалось секретом.
const redacted = "[redacted]"

// safeHeaders собирает заголовки запроса для хранения, вычищая секреты.
//
// Двойная защита: имя из чёрного списка вырезается всегда, а любое значение,
// совпавшее с настроенным токеном, подменяется — токен можно положить в
// заголовок с произвольным именем, и угадать его мы не можем.
func (a *api) safeHeaders(r *http.Request) map[string][]string {
	out := make(map[string][]string, len(r.Header)+1)
	for name, values := range r.Header {
		if secretHeaders[strings.ToLower(name)] {
			out[name] = []string{redacted}
			continue
		}
		safe := make([]string, len(values))
		for i, v := range values {
			if tokenAllowed(v, a.writeTokens) || tokenAllowed(strings.TrimPrefix(v, "Bearer "), a.writeTokens) {
				safe[i] = redacted
				continue
			}
			safe[i] = v
		}
		out[name] = safe
	}
	// Host в r.Header не попадает — а знать, на какое имя пришёл запрос,
	// полезно, когда перед сервисом появится прокси.
	if r.Host != "" {
		out["Host"] = []string{r.Host}
	}
	return out
}

func readBody(w http.ResponseWriter, r *http.Request, maxBody int64) ([]byte, error) {
	var src io.Reader = http.MaxBytesReader(w, r.Body, maxBody)

	if strings.Contains(strings.ToLower(r.Header.Get("Content-Encoding")), "gzip") {
		gz, err := gzip.NewReader(src)
		if err != nil {
			return nil, errBadGzip
		}
		defer func() { _ = gz.Close() }()
		src = gz
	}

	body, err := io.ReadAll(src)
	if err != nil {
		return nil, err //nolint:wrapcheck // разбирается writeReadError по типу
	}
	return body, nil
}

var errBadGzip = errors.New("тело не распаковывается как gzip")

func writeReadError(w http.ResponseWriter, err error) {
	var tooLarge *http.MaxBytesError
	switch {
	case errors.As(err, &tooLarge):
		writeError(w, http.StatusRequestEntityTooLarge, "пакет больше допустимого размера")
	case errors.Is(err, errBadGzip):
		writeError(w, http.StatusBadRequest, "тело не распаковывается как gzip")
	default:
		writeError(w, http.StatusBadRequest, "не удалось прочитать тело запроса")
	}
}