feat: Add function copy (#108)

Signed-off-by: Edmond <edomondja@gmail.com>

Author: Edmond-J-A

src/model/Model.lua

@@ -235,4 +235,21 @@ function Model:sortPoliciesByPriority()
      end
 end
 
+local function deepcopy(object)
+    if type(object) ~= "table" then
+        return object
+    end
+    local newobject = {}
+
+    for key,value in pairs(object) do
+        newobject[key] = deepcopy(value)
+    end
+    setmetatable(newobject,getmetatable(object))
+    return newobject
+end
+
+function Model:copy()
+    return deepcopy(self.model)
+end
+
 return Model

tests/model/model_spec.lua

@@ -235,4 +235,15 @@ describe("model tests", function()
             m:printPolicy()
         end)
     end)
+
+    it("test copy", function ()
+        local m = Model:new()
+        m:loadModel(basic_path)
+
+        local rule = {'admin', 'domain1', 'data1', 'read'}
+        m:addPolicy("p", "p", rule)
+
+        assert.is.same(m.model,m:copy())
+    end)
+
 end)