From 976aa4fbee8a070f362cab6f6ec84e9251a90cf9 Mon Sep 17 00:00:00 2001
From: William Boman <william@redwill.se>
Date: Fri, 8 Jul 2022 18:34:38 +0200
Subject: refactor: add mason-schemas and mason-core modules (#29)

* refactor: add mason-schemas and move generated filetype map to mason-lspconfig

* refactor: add mason-core module
---
 lua/mason-core/result.lua | 152 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 152 insertions(+)
 create mode 100644 lua/mason-core/result.lua

(limited to 'lua/mason-core/result.lua')

diff --git a/lua/mason-core/result.lua b/lua/mason-core/result.lua
new file mode 100644
index 00000000..132e2758
--- /dev/null
+++ b/lua/mason-core/result.lua
@@ -0,0 +1,152 @@
+---@class Failure
+---@field error any
+local Failure = {}
+Failure.__index = Failure
+
+function Failure.new(error)
+    return setmetatable({ error = error }, Failure)
+end
+
+---@class Result
+---@field value any
+local Result = {}
+Result.__index = Result
+
+function Result.new(value)
+    return setmetatable({
+        value = value,
+    }, Result)
+end
+
+function Result.success(value)
+    return Result.new(value)
+end
+
+function Result.failure(error)
+    return Result.new(Failure.new(error))
+end
+
+function Result:get_or_nil()
+    if self:is_success() then
+        return self.value
+    end
+end
+
+function Result:get_or_else(value)
+    if self:is_success() then
+        return self.value
+    else
+        return value
+    end
+end
+
+---@param exception any @(optional) The exception to throw if the result is a failure.
+function Result:get_or_throw(exception)
+    if self:is_success() then
+        return self.value
+    else
+        if exception ~= nil then
+            error(exception, 2)
+        else
+            error(self.value.error, 2)
+        end
+    end
+end
+
+function Result:err_or_nil()
+    if self:is_failure() then
+        return self.value.error
+    end
+end
+
+function Result:is_failure()
+    return getmetatable(self.value) == Failure
+end
+
+function Result:is_success()
+    return getmetatable(self.value) ~= Failure
+end
+
+---@param mapper_fn fun(value: any): any
+function Result:map(mapper_fn)
+    if self:is_success() then
+        return Result.success(mapper_fn(self.value))
+    else
+        return self
+    end
+end
+
+---@param mapper_fn fun(value: any): any
+function Result:map_err(mapper_fn)
+    if self:is_failure() then
+        return Result.failure(mapper_fn(self.value.error))
+    else
+        return self
+    end
+end
+
+---@param mapper_fn fun(value: any): any
+function Result:map_catching(mapper_fn)
+    if self:is_success() then
+        local ok, result = pcall(mapper_fn, self.value)
+        if ok then
+            return Result.success(result)
+        else
+            return Result.failure(result)
+        end
+    else
+        return self
+    end
+end
+
+---@param recover_fn fun(value: any): any
+function Result:recover(recover_fn)
+    if self:is_failure() then
+        return Result.success(recover_fn(self:err_or_nil()))
+    else
+        return self
+    end
+end
+
+---@param recover_fn fun(value: any): any
+function Result:recover_catching(recover_fn)
+    if self:is_failure() then
+        local ok, value = pcall(recover_fn, self:err_or_nil())
+        if ok then
+            return Result.success(value)
+        else
+            return Result.failure(value)
+        end
+    else
+        return self
+    end
+end
+
+---@param fn fun(value: any): any
+function Result:on_failure(fn)
+    if self:is_failure() then
+        fn(self.value.error)
+    end
+    return self
+end
+
+---@param fn fun(value: any): any
+function Result:on_success(fn)
+    if self:is_success() then
+        fn(self.value)
+    end
+    return self
+end
+
+---@param fn fun(): any
+---@return Result
+function Result.run_catching(fn)
+    local ok, result = pcall(fn)
+    if ok then
+        return Result.success(result)
+    else
+        return Result.failure(result)
+    end
+end
+
+return Result
-- 
cgit v1.2.3-70-g09d2