KeyBindProfiles/Commands.lua at master · RodiScheele/KeyBindProfiles · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
local addonName, addon = ...


function addon:ParseArgs(message)
    local arg, pos = self:GetArgs(message, 1, 1)

    if arg then
        if pos <= #message then
            return arg, message:sub(pos)
        else
            return arg
        end
    end
end


function addon:OnChatCommand(message)
    local cmd, param = self:ParseArgs(message)

    if not cmd then
        Settings.OpenToCategory(optionsId)
        return
    end


    if cmd == "list" then
        self:Print("=========Profiles=========")
        for k, v in pairs(self.db.profiles) do
            self:Print(k)
        end
        self:Print("==========================")
        return
    elseif cmd == "save" then
        if param then
            local exists = self:ProfileExists(param)
            self.db:SetProfile(param)
            self:SaveProfile()
            self.db:SetDualSpecProfile(param)
            if not exists then
                self:Print("Created new profile " .. param)
            else
                self:Print("Saved to profile " .. param)
            end
        else
            local profile_name = self.db:GetCurrentProfile()
            self:SaveProfile()
            self:Print("Saved to current profile " .. profile_name)
        end
        return
    elseif cmd == "delete" then
        if param then
            if (self.db:GetCurrentProfile() == param) then
                self:Print("Can't delete the active profile")
                return
            end
            local exists = self:ProfileExists(param)
            if exists then
                self.db:DeleteProfile(param)
                self:Print(param .. " was deleted")
            else
                self:Print("Profile '" .. param .. "'' doesn't exist, nothing was deleted. (Hint: Profiles are case sensitive)")
            end
        else
            self:Print("No parameter given, try /kbp delete <profilename>")
        end
        return
    elseif cmd == "load" then
        if param then
            local exists = self:ProfileExists(param)
            if exists then
                self.db:SetProfile(param)
                self.db:SetDualSpecProfile(param)
                self:Print("Loaded profile " .. param)
            else
                self:Print("Could not find profile '" .. param .."'. (Hint: Profiles are case sensitive)")
            end
        else
            self:Print("No parameter given, try /kbp load <profilename>")
        end
        return
    elseif cmd == "help" then
        self:ShowHelp()
        return
    else
        self:Print("Command was not found, type '/kbp help' for a list of commands.")
        return
    end
end

function addon:ProfileExists(param)
    local profiles, i = self.db:GetProfiles()

    for i, v in pairs(profiles) do
        if (param == v) then
            return true
        end
    end

    return false
end

function addon:ShowHelp()
    local commands = {
        "KeyBindProfiles Commands:",
        " /kbp save -- Saves the current profile",
        " /kbp save <profilename>  -- Save to the specified profile. Overwrites existing profiles or creates a new profile if specified profile doesn't exist",
        " /kbp load <profilename>  -- Loads an existing profile",
        " /kbp delete <profilename>  -- Deletes an existing profile",
        " /kbp list -- Lists all existing profiles"
    }
    for index, line in ipairs(commands) do
        DEFAULT_CHAT_FRAME:AddMessage(line, 1, 1, 0)
    end
  end