package routes

import (
	"database/sql"
	"net/http"
	"strconv"
	"time"

	c "git.tuxpa.in/a/gosora/common"
)

func BanUserSubmit(w http.ResponseWriter, r *http.Request, u *c.User, suid string) c.RouteError {
    if !u.Perms.BanUsers {
        return c.NoPermissions(w, r, u)
    }
    uid, err := strconv.Atoi(suid)
    if err != nil {
        return c.LocalError("The provided UserID is not a valid number.", w, r, u)
    }
    if uid == -2 {
        return c.LocalError("Why don't you like Merlin?", w, r, u)
    }

    targetUser, err := c.Users.Get(uid)
    if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to ban no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    // TODO: Is there a difference between IsMod and IsSuperMod? Should we delete the redundant one?
    if targetUser.IsMod {
        return c.LocalError("You may not ban another staff member.", w, r, u)
    }
    if uid == u.ID {
        return c.LocalError("Why are you trying to ban yourself? Stop that.", w, r, u)
    }
    if targetUser.IsBanned {
        return c.LocalError("The user you're trying to unban is already banned.", w, r, u)
    }

    durDays, err := strconv.Atoi(r.FormValue("dur-days"))
    if err != nil {
        return c.LocalError("You can only use whole numbers for the number of days", w, r, u)
    }
    durWeeks, err := strconv.Atoi(r.FormValue("dur-weeks"))
    if err != nil {
        return c.LocalError("You can only use whole numbers for the number of weeks", w, r, u)
    }
    durMonths, err := strconv.Atoi(r.FormValue("dur-months"))
    if err != nil {
        return c.LocalError("You can only use whole numbers for the number of months", w, r, u)
    }
    deletePosts := false
    switch r.FormValue("delete-posts") {
    case "1":
        deletePosts = true
    }

    var dur time.Duration
    if durDays > 1 && durWeeks > 1 && durMonths > 1 {
        dur, _ = time.ParseDuration("0")
    } else {
        var secs int
        secs += durDays * int(c.Day)
        secs += durWeeks * int(c.Week)
        secs += durMonths * int(c.Month)
        dur, _ = time.ParseDuration(strconv.Itoa(secs) + "s")
    }

    err = targetUser.Ban(dur, u.ID)
    if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to ban no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    err = c.ModLogs.Create("ban", uid, "user", u.GetIP(), u.ID)
    if err != nil {
        return c.InternalError(err, w, r)
    }

    if deletePosts {
        err = targetUser.DeletePosts()
        if err == sql.ErrNoRows {
            return c.LocalError("The user you're trying to ban no longer exists.", w, r, u)
        } else if err != nil {
            return c.InternalError(err, w, r)
        }
        err = c.ModLogs.Create("delete-posts", uid, "user", u.GetIP(), u.ID)
        if err != nil {
            return c.InternalError(err, w, r)
        }
    }

    // TODO: Trickle the hookTable down from the router
    hTbl := c.GetHookTable()
    skip, rerr := hTbl.VhookSkippable("action_end_ban_user", targetUser.ID, u)
    if skip || rerr != nil {
        return rerr
    }

    http.Redirect(w, r, "/user/"+strconv.Itoa(uid), http.StatusSeeOther)
    return nil
}

func UnbanUser(w http.ResponseWriter, r *http.Request, u *c.User, suid string) c.RouteError {
    if !u.Perms.BanUsers {
        return c.NoPermissions(w, r, u)
    }
    uid, err := strconv.Atoi(suid)
    if err != nil {
        return c.LocalError("The provided UserID is not a valid number.", w, r, u)
    }

    targetUser, err := c.Users.Get(uid)
    if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to unban no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    if !targetUser.IsBanned {
        return c.LocalError("The user you're trying to unban isn't banned.", w, r, u)
    }

    err = targetUser.Unban()
    if err == c.ErrNoTempGroup {
        return c.LocalError("The user you're trying to unban is not banned", w, r, u)
    } else if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to unban no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }

    err = c.ModLogs.Create("unban", uid, "user", u.GetIP(), u.ID)
    if err != nil {
        return c.InternalError(err, w, r)
    }

    // TODO: Trickle the hookTable down from the router
    hTbl := c.GetHookTable()
    skip, rerr := hTbl.VhookSkippable("action_end_unban_user", targetUser.ID, u)
    if skip || rerr != nil {
        return rerr
    }

    http.Redirect(w, r, "/user/"+strconv.Itoa(uid), http.StatusSeeOther)
    return nil
}

func ActivateUser(w http.ResponseWriter, r *http.Request, u *c.User, suid string) c.RouteError {
    if !u.Perms.ActivateUsers {
        return c.NoPermissions(w, r, u)
    }
    uid, err := strconv.Atoi(suid)
    if err != nil {
        return c.LocalError("The provided UserID is not a valid number.", w, r, u)
    }

    targetUser, err := c.Users.Get(uid)
    if err == sql.ErrNoRows {
        return c.LocalError("The account you're trying to activate no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    if targetUser.Active {
        return c.LocalError("The account you're trying to activate has already been activated.", w, r, u)
    }
    err = targetUser.Activate()
    if err != nil {
        return c.InternalError(err, w, r)
    }

    targetUser, err = c.Users.Get(uid)
    if err == sql.ErrNoRows {
        return c.LocalError("The account you're trying to activate no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    err = c.GroupPromotions.PromoteIfEligible(targetUser, targetUser.Level, targetUser.Posts, targetUser.CreatedAt)
    if err != nil {
        return c.InternalError(err, w, r)
    }
    targetUser.CacheRemove()

    err = c.ModLogs.Create("activate", targetUser.ID, "user", u.GetIP(), u.ID)
    if err != nil {
        return c.InternalError(err, w, r)
    }

    // TODO: Trickle the hookTable down from the router
    hTbl := c.GetHookTable()
    skip, rerr := hTbl.VhookSkippable("action_end_activate_user", targetUser.ID, u)
    if skip || rerr != nil {
        return rerr
    }

    http.Redirect(w, r, "/user/"+strconv.Itoa(targetUser.ID), http.StatusSeeOther)
    return nil
}

func DeletePostsSubmit(w http.ResponseWriter, r *http.Request, u *c.User, suid string) c.RouteError {
    if !u.Perms.BanUsers {
        return c.NoPermissions(w, r, u)
    }
    uid, err := strconv.Atoi(suid)
    if err != nil {
        return c.LocalError("The provided UserID is not a valid number.", w, r, u)
    }

    targetUser, err := c.Users.Get(uid)
    if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to purge posts of no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    // TODO: Is there a difference between IsMod and IsSuperMod? Should we delete the redundant one?
    if targetUser.IsMod {
        return c.LocalError("You may not purge the posts of another staff member.", w, r, u)
    }

    err = targetUser.DeletePosts()
    if err == sql.ErrNoRows {
        return c.LocalError("The user you're trying to purge posts of no longer exists.", w, r, u)
    } else if err != nil {
        return c.InternalError(err, w, r)
    }
    err = c.ModLogs.Create("delete-posts", uid, "user", u.GetIP(), u.ID)
    if err != nil {
        return c.InternalError(err, w, r)
    }

    // TODO: Trickle the hookTable down from the router
    hTbl := c.GetHookTable()
    skip, rerr := hTbl.VhookSkippable("action_end_delete_posts", targetUser.ID, u)
    if skip || rerr != nil {
        return rerr
    }

    http.Redirect(w, r, "/user/"+strconv.Itoa(uid), http.StatusSeeOther)
    return nil
}