web-app-template/service/auth.go

package service

import (
	"context"
	"crypto/rand"
	"crypto/subtle"
	"database/sql"
	"errors"
	"log/slog"
	"net/http"
	"net/mail"
	"net/url"
	"strings"
	"time"

	"me-fit/db"
	"me-fit/template"
	"me-fit/template/auth"
	tempMail "me-fit/template/mail"
	"me-fit/types"
	"me-fit/utils"

	"github.com/a-h/templ"
	"github.com/google/uuid"
	"golang.org/x/crypto/argon2"
)

var (
	ErrInvaidCredentials  = errors.New("Invalid email or password")
	ErrPasswordComplexity = errors.New("Password needs to be 8 characters long, contain at least one number, one special, one uppercase and one lowercase character")
	ErrInvalidEmail       = errors.New("Invalid email")
	ErrAccountExists      = errors.New("Account already exists")
)

type User struct {
	Id            uuid.UUID
	Email         string
	EmailVerified bool
}

func NewUser(user *db.User) *User {
	return &User{
		Id:            user.Id,
		Email:         user.Email,
		EmailVerified: user.EmailVerified,
	}
}

type ServiceAuth interface {
	SignIn(email string, password string) (*User, error)
	SignUp(email string, password string) (*User, error)
	SendVerificationMail(user *User)
}

type ServiceAuthImpl struct {
	dbAuth         db.DbAuth
	serverSettings *types.ServerSettings
	mailService    MailService
}

func NewServiceAuthImpl(dbAuth db.DbAuth, serverSettings *types.ServerSettings) *ServiceAuthImpl {
	return &ServiceAuthImpl{
		dbAuth:         dbAuth,
		serverSettings: serverSettings,
		mailService:    NewMailService(serverSettings),
	}
}

func (service ServiceAuthImpl) SignIn(email string, password string) (*User, error) {
	user, err := service.dbAuth.GetUser(email)
	if err != nil {
		if errors.Is(err, db.ErrUserNotFound) {
			return nil, ErrInvaidCredentials
		} else {
			return nil, types.ErrInternal
		}
	}

	hash := GetHashPassword(password, user.Salt)

	if subtle.ConstantTimeCompare(hash, user.Password) == 0 {
		return nil, ErrInvaidCredentials
	}

	return NewUser(user), nil
}

func (service ServiceAuthImpl) SignUp(email string, password string) (*User, error) {
	_, err := mail.ParseAddress(email)
	if err != nil {
		return nil, ErrInvalidEmail
	}

	err = checkPassword(password)
	if err != nil {
		return nil, err
	}

	userId, err := uuid.NewRandom()
	if err != nil {
		utils.LogError("Could not generate UUID", err)
		return nil, types.ErrInternal
	}

	salt := make([]byte, 16)
	_, err = rand.Read(salt)
	if err != nil {
		utils.LogError("Could not generate salt", err)
		return nil, types.ErrInternal
	}

	hash := GetHashPassword(password, salt)

	dbUser := db.NewUser(userId, email, false, nil, false, hash, salt, time.Now())

	err = service.dbAuth.InsertUser(dbUser)
	if err != nil {
		if err == db.ErrUserExists {
			return nil, ErrAccountExists
		} else {
			return nil, types.ErrInternal
		}
	}

	return NewUser(dbUser), nil
}

func (service ServiceAuthImpl) SendVerificationMail(user *User) {
	var token string

	token, err := service.dbAuth.GetEmailVerificationToken(user.Id)
	if err != nil {
		return
	}

	if token == "" {
		token, err := utils.RandomToken()
		if err != nil {
			utils.LogError("Could not generate token", err)
			return
		}

		err = service.dbAuth.InsertEmailVerificationToken(user.Id, token)
		if err != nil {
			return
		}
	}

	var w strings.Builder
	err = tempMail.Register(service.serverSettings.BaseUrl, token).Render(context.Background(), &w)
	if err != nil {
		utils.LogError("Could not render welcome email", err)
		return
	}

	service.mailService.SendMail(user.Email, "Welcome to ME-FIT", w.String())
}

// TODO

func HandleSignUpVerifyPage(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {
		user := utils.GetUserFromSession(db, r)
		if user == nil {
			utils.DoRedirect(w, r, "/auth/signin")
		} else if user.EmailVerified {
			utils.DoRedirect(w, r, "/")
		} else {
			userComp := UserInfoComp(user)
			signIn := auth.VerifyComp()
			err := template.Layout(signIn, userComp, serverSettings.Environment).Render(r.Context(), w)
			if err != nil {
				utils.LogError("Failed to render verify page", err)
				http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			}
		}
	}
}

func HandleDeleteAccountPage(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {
		// An unverified email should be able to delete their account
		user := utils.GetUserFromSession(db, r)
		if user == nil {
			utils.DoRedirect(w, r, "/auth/signin")
		} else {
			userComp := UserInfoComp(user)
			comp := auth.DeleteAccountComp()
			err := template.Layout(comp, userComp, serverSettings.Environment).Render(r.Context(), w)
			if err != nil {
				utils.LogError("Failed to render delete account page", err)
				http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			}
		}
	}
}

func HandleSignUpVerifyResponsePage(db *sql.DB) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {

		token := r.URL.Query().Get("token")

		if token == "" {
			utils.DoRedirect(w, r, "/auth/verify")
			return
		}

		result, err := db.Exec(`
			UPDATE user
			SET email_verified = true, email_verified_at = datetime()
			WHERE user_uuid = (
				SELECT user_uuid
				FROM user_token
				WHERE type = "email_verify"
				AND token = ?
			);
		`, token)

		if err != nil {
			utils.LogError("Could not update user on verify response", err)
			http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			return
		}

		i, err := result.RowsAffected()
		if err != nil {
			utils.LogError("Could not get rows affected on verify response", err)
			http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			return
		}

		if i == 0 {
			utils.DoRedirect(w, r, "/")
		} else {
			utils.DoRedirect(w, r, "/auth/signin")
		}
	}
}

func HandleChangePasswordPage(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {

		isPasswordReset := r.URL.Query().Has("token")

		user := utils.GetUserFromSession(db, r)
		if user == nil && !isPasswordReset {
			utils.DoRedirect(w, r, "/auth/signin")
		} else {
			userComp := UserInfoComp(user)
			comp := auth.ChangePasswordComp(isPasswordReset)
			err := template.Layout(comp, userComp, serverSettings.Environment).Render(r.Context(), w)
			if err != nil {
				utils.LogError("Failed to render change password page", err)
				http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			}
		}
	}
}

func HandleResetPasswordPage(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {

		user := utils.GetUserFromSession(db, r)
		if user != nil {
			utils.DoRedirect(w, r, "/auth/signin")
		} else {
			userComp := UserInfoComp(nil)
			comp := auth.ResetPasswordComp()
			err := template.Layout(comp, userComp, serverSettings.Environment).Render(r.Context(), w)
			if err != nil {
				utils.LogError("Failed to render change password page", err)
				http.Error(w, "Internal Server Error", http.StatusInternalServerError)
			}
		}
	}
}

func UserInfoComp(user *types.User) templ.Component {

	if user != nil {
		return auth.UserComp(user.Email)
	} else {
		return auth.UserComp("")
	}
}

func HandleSignOutComp(db *sql.DB) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {
		user := utils.GetUserFromSession(db, r)

		if user != nil {
			_, err := db.Exec("DELETE FROM session WHERE session_id = ?", user.SessionId)
			if err != nil {
				utils.LogError("Could not delete session", err)
				utils.TriggerToast(w, r, "error", "Internal Server Error")
				http.Error(w, err.Error(), http.StatusInternalServerError)
				return
			}
		}

		c := http.Cookie{
			Name:     "id",
			Value:    "",
			MaxAge:   -1,
			Secure:   true,
			HttpOnly: true,
			SameSite: http.SameSiteStrictMode,
			Path:     "/",
		}

		http.SetCookie(w, &c)
		utils.DoRedirect(w, r, "/")
	}
}

func HandleDeleteAccountComp(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	mailService := NewMailService(serverSettings)
	return func(w http.ResponseWriter, r *http.Request) {
		user := utils.GetUserFromSession(db, r)
		if user == nil {
			utils.DoRedirect(w, r, "/auth/signin")
			return
		}

		password := r.FormValue("password")
		if password == "" {
			utils.TriggerToast(w, r, "error", "Password is required")
			return
		}

		var (
			storedHash []byte
			salt       []byte
		)

		err := db.QueryRow("SELECT password, salt FROM user WHERE user_uuid = ?", user.Id).Scan(&storedHash, &salt)
		if err != nil {
			utils.LogError("Could not get password", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		currHash := GetHashPassword(password, salt)
		if subtle.ConstantTimeCompare(currHash, storedHash) == 0 {
			utils.TriggerToast(w, r, "error", "Password is not correct")
			return
		}

		_, err = db.Exec("DELETE FROM workout WHERE user_id = ?", user.Id)
		if err != nil {
			utils.LogError("Could not delete workouts", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		_, err = db.Exec("DELETE FROM user_token WHERE user_uuid = ?", user.Id)
		if err != nil {
			utils.LogError("Could not delete user tokens", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		_, err = db.Exec("DELETE FROM session WHERE user_uuid = ?", user.Id)
		if err != nil {
			utils.LogError("Could not delete sessions", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		_, err = db.Exec("DELETE FROM user WHERE user_uuid = ?", user.Id)
		if err != nil {
			utils.LogError("Could not delete user", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		go mailService.SendMail(user.Email, "Account deleted", "Your account has been deleted")

		utils.DoRedirect(w, r, "/")
	}
}

func HandleVerifyResendComp(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {
		user := utils.GetUserFromSession(db, r)
		if user == nil || user.EmailVerified {
			utils.DoRedirect(w, r, "/auth/signin")
			return
		}

		// TODO
		// go sendVerificationEmail(db, user.Id.String(), user.Email, serverSettings)

		w.Write([]byte("<p class=\"mt-8\">Verification email sent</p>"))
	}
}

func HandleChangePasswordComp(db *sql.DB) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {

		user := utils.GetUserFromSession(db, r)
		if user == nil {
			utils.DoRedirect(w, r, "/auth/signin")
			return
		}

		currPass := r.FormValue("current-password")
		newPass := r.FormValue("new-password")

		err := checkPassword(newPass)
		if err != nil {
			utils.TriggerToast(w, r, "error", err.Error())
			return
		}

		if currPass == newPass {
			utils.TriggerToast(w, r, "error", "Please use a new password")
			return
		}

		var (
			storedHash []byte
			salt       []byte
		)

		err = db.QueryRow("SELECT password, salt FROM user WHERE user_uuid = ?", user.Id).Scan(&storedHash, &salt)
		if err != nil {
			utils.LogError("Could not get password", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		currHash := GetHashPassword(currPass, salt)
		if subtle.ConstantTimeCompare(currHash, storedHash) == 0 {
			utils.TriggerToast(w, r, "error", "Current Password is not correct")
			return
		}

		newHash := GetHashPassword(newPass, salt)

		_, err = db.Exec("UPDATE user SET password = ? WHERE user_uuid = ?", newHash, user.Id)
		if err != nil {
			utils.LogError("Could not update password", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		utils.TriggerToast(w, r, "success", "Password changed")
	}
}

func HandleActualResetPasswordComp(db *sql.DB) http.HandlerFunc {
	return func(w http.ResponseWriter, r *http.Request) {

		pageUrl, err := url.Parse(r.Header.Get("HX-Current-URL"))
		if err != nil {
			utils.LogError("Could not get current URL", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		token := pageUrl.Query().Get("token")
		if token == "" {
			utils.TriggerToast(w, r, "error", "No token")
			return
		}

		newPass := r.FormValue("new-password")

		err = checkPassword(newPass)
		if err != nil {
			utils.TriggerToast(w, r, "error", err.Error())
			return
		}

		var (
			userId uuid.UUID
			salt   []byte
		)

		err = db.QueryRow(`
			SELECT u.user_uuid, salt
			FROM user_token t
			INNER JOIN user u ON t.user_uuid = u.user_uuid
			WHERE t.token = ? 
			AND t.type = 'password_reset'
			AND t.expires_at > datetime()
			`, token).Scan(&userId, &salt)
		if err != nil {
			slog.Warn("Could not get user from token: " + err.Error())
			utils.TriggerToast(w, r, "error", "Invalid token")
			return
		}

		_, err = db.Exec("DELETE FROM user_token WHERE token = ? AND type = 'password_reset'", token)
		if err != nil {
			utils.LogError("Could not delete token", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		passHash := GetHashPassword(newPass, salt)

		_, err = db.Exec("UPDATE user SET password = ? WHERE user_uuid = ?", passHash, userId)
		if err != nil {
			utils.LogError("Could not update password", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		utils.TriggerToast(w, r, "success", "Password changed")
	}
}
func HandleResetPasswordComp(db *sql.DB, serverSettings *types.ServerSettings) http.HandlerFunc {
	mailService := NewMailService(serverSettings)
	return func(w http.ResponseWriter, r *http.Request) {

		email := r.FormValue("email")
		if email == "" {
			utils.TriggerToast(w, r, "error", "Please enter an email")
			return
		}

		token, err := utils.RandomToken()
		if err != nil {
			utils.LogError("Could not generate token", err)
			return
		}

		res, err := db.Exec(`
			INSERT INTO user_token (user_uuid, type, token, created_at, expires_at)
			SELECT user_uuid, 'password_reset', ?, datetime(), datetime('now', '+15 minute')
			FROM user
			WHERE email = ?
			`, token, email)
		if err != nil {
			utils.LogError("Could not insert token", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		i, err := res.RowsAffected()
		if err != nil {
			utils.LogError("Could not get rows affected", err)
			utils.TriggerToast(w, r, "error", "Internal Server Error")
			return
		}

		if i != 0 {
			var mail strings.Builder
			err = tempMail.ResetPassword(serverSettings.BaseUrl, token).Render(context.Background(), &mail)
			if err != nil {
				utils.LogError("Could not render reset password email", err)
				utils.TriggerToast(w, r, "error", "Internal Server Error")
				return
			}
			mailService.SendMail(email, "Reset Password", mail.String())
		}

		utils.TriggerToast(w, r, "info", "If the email exists, an email has been sent")
	}
}

func TryCreateSessionAndSetCookie(r *http.Request, w http.ResponseWriter, db *sql.DB, user_uuid uuid.UUID) error {
	sessionId, err := utils.RandomToken()
	if err != nil {
		utils.LogError("Could not generate session ID", err)
		return types.ErrInternal
	}

	// Delete old inactive sessions
	_, err = db.Exec("DELETE FROM session WHERE created_at < datetime('now','-8 hours') AND user_uuid = ?", user_uuid)
	if err != nil {
		utils.LogError("Could not delete old sessions", err)
		return types.ErrInternal
	}

	_, err = db.Exec("INSERT INTO session (session_id, user_uuid, created_at) VALUES (?, ?, datetime())", sessionId, user_uuid)
	if err != nil {
		utils.LogError("Could not insert session", err)
		return types.ErrInternal
	}

	cookie := http.Cookie{
		Name:     "id",
		Value:    sessionId,
		MaxAge:   60 * 60 * 8, // 8 hours
		Secure:   true,
		HttpOnly: true,
		SameSite: http.SameSiteStrictMode,
		Path:     "/",
	}
	http.SetCookie(w, &cookie)

	return nil
}

func GetHashPassword(password string, salt []byte) []byte {
	return argon2.IDKey([]byte(password), salt, 1, 64*1024, 1, 16)
}

func checkPassword(password string) error {

	if len(password) < 8 ||
		!strings.ContainsAny(password, "0123456789") ||
		!strings.ContainsAny(password, "ABCDEFGHIJKLMNOPQRSTUVWXYZ") ||
		!strings.ContainsAny(password, "abcdefghijklmnopqrstuvwxyz") ||
		!strings.ContainsAny(password, "!@#$%^&*()_+-=[]{}\\|;:'\",.<>/?") {
		return ErrPasswordComplexity
	} else {
		return nil
	}
}