package rushlink

import (
	"fmt"
	"log"
	"net/http"
	"runtime/debug"
	"strconv"
	"time"

	"gitea.hashru.nl/dsprenkels/rushlink/internal/db"
	"github.com/gorilla/mux"
)

const urlKeyExpr = "{key:[A-Za-z0-9-_]{4,}}"
const urlKeyWithExtExpr = urlKeyExpr + "{ext:\\.[A-Za-z0-9-_]+}"

type rushlink struct {
	db *db.Database
	fs *db.FileStore
}

func recoveryMiddleware(next http.Handler) http.Handler {
	return http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
		defer func() {
			defer func() {
				if err := recover(); err != nil {
					log.Printf("error: panic while recovering from another panic: %v\n", err)
					debug.PrintStack()
					fmt.Fprintf(w, "internal server error: %v\n", err)
				}
			}()

			if err := recover(); err != nil {
				log.Printf("error: %v\n", err)
				debug.PrintStack()
				renderInternalServerError(w, r, err)
			}
		}()
		next.ServeHTTP(w, r)
	})
}

type statusResponseWriter struct {
	Inner      http.ResponseWriter
	StatusCode int
}

func (w *statusResponseWriter) Header() http.Header {
	return w.Inner.Header()
}

func (w *statusResponseWriter) Write(buf []byte) (int, error) {
	if w.StatusCode == 0 {
		w.WriteHeader(http.StatusOK)
	}
	return w.Inner.Write(buf)
}

func (w *statusResponseWriter) WriteHeader(statusCode int) {
	w.StatusCode = statusCode
	w.Inner.WriteHeader(statusCode)
}

func metricsMiddleware(next http.Handler) http.Handler {
	return http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
		srw := statusResponseWriter{Inner: w}
		next.ServeHTTP(&srw, r)
		status := strconv.Itoa(srw.StatusCode)
		metricRequestsTotalCounter.WithLabelValues(status, r.Method).Inc()
	})
}

// StartMainServer starts the main http server listening on addr.
func StartMainServer(addr string, db *db.Database, fs *db.FileStore) {
	rl := rushlink{
		db: db,
		fs: fs,
	}

	// Initialize Gorilla router
	router := mux.NewRouter()
	router.Use(recoveryMiddleware)
	router.Use(metricsMiddleware)
	router.HandleFunc("/uploads/{id:[A-Za-z0-9-_]+}/{filename:.+}", rl.uploadFileGetHandler).Methods("GET", "HEAD")
	router.HandleFunc("/", rl.indexGetHandler).Methods("GET", "HEAD")
	router.HandleFunc("/", rl.newPasteHandler).Methods("POST")
	router.HandleFunc("/"+urlKeyExpr, rl.viewPasteHandler).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyWithExtExpr, rl.viewPasteHandler).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyExpr+"/nr", rl.viewPasteHandlerNoRedirect).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyWithExtExpr+"/nr", rl.viewPasteHandlerNoRedirect).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyExpr+"/meta", rl.viewPasteHandlerMeta).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyWithExtExpr+"/meta", rl.viewPasteHandlerMeta).Methods("GET", "HEAD")
	router.HandleFunc("/"+urlKeyExpr, rl.deletePasteHandler).Methods("DELETE")
	router.HandleFunc("/"+urlKeyWithExtExpr, rl.deletePasteHandler).Methods("DELETE")
	router.HandleFunc("/"+urlKeyExpr+"/delete", rl.deletePasteHandler).Methods("POST")
	router.HandleFunc("/"+urlKeyWithExtExpr+"/delete", rl.deletePasteHandler).Methods("POST")

	srv := &http.Server{
		Handler:      router,
		Addr:         addr,
		WriteTimeout: 15 * time.Second,
		ReadTimeout:  15 * time.Second,
	}
	log.Fatal(srv.ListenAndServe())
}