wuira 0.2.3 → 0.2.5

package/lib/datasources/MathExpression.lua

@@ -0,0 +1,281 @@
+--[[ Generated with https://github.com/TypeScriptToLua/TypeScriptToLua ]]
+-- Lua Library inline imports
+local function __TS__Class(self)
+    local c = {prototype = {}}
+    c.prototype.__index = c.prototype
+    c.prototype.constructor = c
+    return c
+end
+
+local function __TS__StringAccess(self, index)
+    if index >= 0 and index < #self then
+        return string.sub(self, index + 1, index + 1)
+    end
+end
+
+local function __TS__StringIncludes(self, searchString, position)
+    if not position then
+        position = 1
+    else
+        position = position + 1
+    end
+    local index = string.find(self, searchString, position, true)
+    return index ~= nil
+end
+
+local function __TS__StringSlice(self, start, ____end)
+    if start == nil or start ~= start then
+        start = 0
+    end
+    if ____end ~= ____end then
+        ____end = 0
+    end
+    if start >= 0 then
+        start = start + 1
+    end
+    if ____end ~= nil and ____end < 0 then
+        ____end = ____end - 1
+    end
+    return string.sub(self, start, ____end)
+end
+
+local function __TS__Number(value)
+    local valueType = type(value)
+    if valueType == "number" then
+        return value
+    elseif valueType == "string" then
+        local numberValue = tonumber(value)
+        if numberValue then
+            return numberValue
+        end
+        if value == "Infinity" then
+            return math.huge
+        end
+        if value == "-Infinity" then
+            return -math.huge
+        end
+        local stringWithoutSpaces = string.gsub(value, "%s", "")
+        if stringWithoutSpaces == "" then
+            return 0
+        end
+        return 0 / 0
+    elseif valueType == "boolean" then
+        return value and 1 or 0
+    else
+        return 0 / 0
+    end
+end
+
+local function __TS__NumberIsFinite(value)
+    return type(value) == "number" and value == value and value ~= math.huge and value ~= -math.huge
+end
+
+local function __TS__ArrayIncludes(self, searchElement, fromIndex)
+    if fromIndex == nil then
+        fromIndex = 0
+    end
+    local len = #self
+    local k = fromIndex
+    if fromIndex < 0 then
+        k = len + fromIndex
+    end
+    if k < 0 then
+        k = 0
+    end
+    for i = k + 1, len do
+        if self[i] == searchElement then
+            return true
+        end
+    end
+    return false
+end
+-- End of Lua Library inline imports
+local ____exports = {}
+--- Small bounded arithmetic grammar. Expressions cannot call functions or execute Lua.
+____exports.MathExpression = __TS__Class()
+local MathExpression = ____exports.MathExpression
+MathExpression.name = "MathExpression"
+function MathExpression.prototype.____constructor(self, text)
+    self.text = text
+    self.offset = 0
+    self.token = ""
+    self.tokens = 0
+    if issecretvalue(text) or type(text) ~= "string" or #text == 0 or #text > 256 then
+        error("MathConverter: expression must contain 1–256 characters")
+    end
+    self:Next()
+    self.tree = self:Add(0)
+    if self.token ~= "" then
+        error("MathConverter: unexpected token " .. self.token)
+    end
+end
+function MathExpression.prototype.Next(self)
+    local ____self_0, ____tokens_1 = self, "tokens"
+    local ____self_tokens_2 = ____self_0[____tokens_1] + 1
+    ____self_0[____tokens_1] = ____self_tokens_2
+    if ____self_tokens_2 > 128 then
+        error("MathConverter: expression is too complex")
+    end
+    while __TS__StringIncludes(
+        " \t\r\n",
+        __TS__StringAccess(self.text, self.offset) or "\0"
+    ) do
+        self.offset = self.offset + 1
+    end
+    local char = __TS__StringAccess(self.text, self.offset)
+    if char == nil then
+        self.token = ""
+        return
+    end
+    if __TS__StringSlice(self.text, self.offset, self.offset + 5) == "input" then
+        self.offset = self.offset + 5
+        self.token = "input"
+        return
+    end
+    if __TS__StringIncludes("0123456789.", char) then
+        local ____self_3, ____offset_4 = self, "offset"
+        local ____self_offset_5 = ____self_3[____offset_4]
+        ____self_3[____offset_4] = ____self_offset_5 + 1
+        local start = ____self_offset_5
+        while __TS__StringIncludes(
+            "0123456789.",
+            __TS__StringAccess(self.text, self.offset) or "\0"
+        ) do
+            self.offset = self.offset + 1
+        end
+        if __TS__StringAccess(self.text, self.offset) == "e" or __TS__StringAccess(self.text, self.offset) == "E" then
+            self.offset = self.offset + 1
+            if __TS__StringAccess(self.text, self.offset) == "+" or __TS__StringAccess(self.text, self.offset) == "-" then
+                self.offset = self.offset + 1
+            end
+            while __TS__StringIncludes(
+                "0123456789",
+                __TS__StringAccess(self.text, self.offset) or "\0"
+            ) do
+                self.offset = self.offset + 1
+            end
+        end
+        self.token = __TS__StringSlice(self.text, start, self.offset)
+        if not __TS__NumberIsFinite(__TS__Number(self.token)) then
+            error("MathConverter: invalid number")
+        end
+        return
+    end
+    if __TS__StringIncludes("+-*/%^()", char) then
+        self.offset = self.offset + 1
+        self.token = char
+        if char == "*" and __TS__StringAccess(self.text, self.offset) == "*" then
+            self.offset = self.offset + 1
+            self.token = "^"
+        end
+        return
+    end
+    error("MathConverter: only input, numbers and arithmetic operators are allowed")
+end
+function MathExpression.prototype.Depth(self, depth)
+    if depth > 32 then
+        error("MathConverter: expression nesting is too deep")
+    end
+end
+function MathExpression.prototype.Add(self, depth)
+    local left = self:Multiply(depth)
+    while self.token == "+" or self.token == "-" do
+        local operator = self.token
+        self:Next()
+        left = {
+            kind = "binary",
+            operator = operator,
+            left = left,
+            right = self:Multiply(depth)
+        }
+    end
+    return left
+end
+function MathExpression.prototype.Multiply(self, depth)
+    local left = self:Unary(depth)
+    while __TS__ArrayIncludes({"*", "/", "%"}, self.token) do
+        local operator = self.token
+        self:Next()
+        left = {
+            kind = "binary",
+            operator = operator,
+            left = left,
+            right = self:Unary(depth)
+        }
+    end
+    return left
+end
+function MathExpression.prototype.Unary(self, depth)
+    self:Depth(depth)
+    if self.token == "+" or self.token == "-" then
+        local sign = self.token == "-" and -1 or 1
+        self:Next()
+        return {
+            kind = "unary",
+            sign = sign,
+            child = self:Unary(depth + 1)
+        }
+    end
+    local left = self:Primary(depth)
+    if self.token == "^" then
+        self:Next()
+        left = {
+            kind = "binary",
+            operator = "^",
+            left = left,
+            right = self:Unary(depth + 1)
+        }
+    end
+    return left
+end
+function MathExpression.prototype.Primary(self, depth)
+    self:Depth(depth)
+    if self.token == "input" then
+        self:Next()
+        return {kind = "input"}
+    end
+    if self.token == "(" then
+        self:Next()
+        local value = self:Add(depth + 1)
+        if self.token ~= ")" then
+            error("MathConverter: missing closing parenthesis")
+        end
+        self:Next()
+        return value
+    end
+    if self.token ~= "" and __TS__NumberIsFinite(__TS__Number(self.token)) then
+        local value = __TS__Number(self.token)
+        self:Next()
+        return {kind = "number", value = value}
+    end
+    error("MathConverter: expected input, a number or parentheses")
+end
+function MathExpression.prototype.Evaluate(self, input)
+    if issecretvalue(input) or type(input) ~= "number" or not __TS__NumberIsFinite(input) then
+        error("MathConverter: input must be a readable finite number")
+    end
+    local read
+    read = function(____, node)
+        if node.kind == "input" then
+            return input
+        end
+        if node.kind == "number" then
+            return node.value
+        end
+        if node.kind == "unary" then
+            return node.sign * read(nil, node.child)
+        end
+        local left = read(nil, node.left)
+        local right = read(nil, node.right)
+        if (node.operator == "/" or node.operator == "%") and right == 0 then
+            error("MathConverter: division by zero")
+        end
+        local result = node.operator == "+" and left + right or (node.operator == "-" and left - right or (node.operator == "*" and left * right or (node.operator == "/" and left / right or (node.operator == "%" and left % right or left ^ right))))
+        if not __TS__NumberIsFinite(result) then
+            error("MathConverter: result must be finite")
+        end
+        return result
+    end
+    return read(nil, self.tree)
+end
+return ____exports

package/lib/datasources/Resources.d.ts

@@ -7,13 +7,14 @@ import { ManaRegenTimer } from "./ManaRegenTimer";
 export { Unit } from "./UnitSource";
 /** Direct API-to-widget binding; opaque values are never compared or calculated. */
 declare abstract class Resource extends ProgressSource {
-    private readonly unitToken;
+    private readonly unitReference;
     private readonly events;
     private readonly listeners;
     private eventFrame?;
     private dispatching;
     private eventValue;
-    protected constructor(current: () => number, maximum: () => number, percent: () => number, unitToken: string, events: string[]);
+    private stopUnit?;
+    protected constructor(current: () => number, maximum: () => number, percent: () => number, unitReference: UnitSource, events: string[]);
     protected AddEvents(...events: string[]): void;
     protected GetValue(): number;
     /** Future readable value changes only. Unsubscribe when the consumer is removed. */

package/lib/datasources/Resources.lua

@@ -499,7 +499,7 @@ end
 local Resource = __TS__Class()
 Resource.name = "Resource"
 __TS__ClassExtends(Resource, ProgressSource)
-function Resource.prototype.____constructor(self, current, maximum, percent, unitToken, events)
+function Resource.prototype.____constructor(self, current, maximum, percent, unitReference, events)
     ProgressSource.prototype.____constructor(
         self,
         {
@@ -509,7 +509,7 @@ function Resource.prototype.____constructor(self, current, maximum, percent, uni
             percent = percent
         }
     )
-    self.unitToken = unitToken
+    self.unitReference = unitReference
     self.events = events
     self.listeners = __TS__New(Set)
     self.dispatching = false
@@ -566,30 +566,34 @@ function Resource.prototype.Observe(self, listener)
             self.eventFrame = CreateFrame("Frame", nil, UIParent)
         end
         local frame = self.eventFrame
+        local function dispatch(____, event, payload)
+            self.eventValue = ProgressSource.prototype.GetValue(self)
+            self.dispatching = true
+            do
+                local ____try, ____error = pcall(function()
+                    for ____, callback in __TS__Iterator(self.listeners) do
+                        callback(nil, event, payload, self.eventValue)
+                    end
+                end)
+                do
+                    self.dispatching = false
+                end
+                if not ____try then
+                    error(____error, 0)
+                end
+            end
+        end
         frame:SetScript(
             "OnEvent",
             function(_frame, event, ...)
                 local payload = {...}
-                if event ~= "PLAYER_ENTERING_WORLD" and (issecretvalue(payload[1]) or payload[1] ~= self.unitToken) then
+                if event ~= "PLAYER_ENTERING_WORLD" and (issecretvalue(payload[1]) or payload[1] ~= self.unitReference.Token) then
                     return
                 end
-                self.eventValue = ProgressSource.prototype.GetValue(self)
-                self.dispatching = true
-                do
-                    local ____try, ____error = pcall(function()
-                        for ____, callback in __TS__Iterator(self.listeners) do
-                            callback(nil, event, payload, self.eventValue)
-                        end
-                    end)
-                    do
-                        self.dispatching = false
-                    end
-                    if not ____try then
-                        error(____error, 0)
-                    end
-                end
+                dispatch(nil, event, payload)
             end
         )
+        self.stopUnit = self.unitReference:onChange(function() return dispatch(nil, "UNIT_IDENTITY_CHANGED", {self.unitReference.Token}) end)
         frame:RegisterEvent("PLAYER_ENTERING_WORLD")
         for ____, event in ipairs(self.events) do
             frame:RegisterEvent(event)
@@ -598,13 +602,18 @@ function Resource.prototype.Observe(self, listener)
     return function()
         self.listeners:delete(listener)
         if self.listeners.size == 0 then
-            local ____opt_3 = self.eventFrame
+            local ____opt_3 = self.stopUnit
             if ____opt_3 ~= nil then
-                ____opt_3:UnregisterAllEvents()
+                ____opt_3(self)
             end
+            self.stopUnit = nil
             local ____opt_5 = self.eventFrame
             if ____opt_5 ~= nil then
-                ____opt_5:SetScript("OnEvent", nil)
+                ____opt_5:UnregisterAllEvents()
+            end
+            local ____opt_7 = self.eventFrame
+            if ____opt_7 ~= nil then
+                ____opt_7:SetScript("OnEvent", nil)
             end
         end
     end
@@ -622,8 +631,8 @@ function HealthPrediction.prototype.____constructor(self, read)
     self.read = read
 end
 function HealthPrediction.prototype.GetValue(self)
-    local ____opt_7 = self.read
-    local value = ____opt_7 and ____opt_7(self)
+    local ____opt_9 = self.read
+    local value = ____opt_9 and ____opt_9(self)
     if issecretvalue(value) then
         return value
     end
@@ -665,21 +674,21 @@ function HP.prototype.____constructor(self, unit)
         function() return UnitHealth(target.Token) end,
         function() return UnitHealthMax(target.Token) end,
         function() return UnitHealthPercent(target.Token, true, CurveConstants.ScaleTo100) end,
-        target.Token,
-        {"UNIT_HEALTH", "UNIT_MAXHEALTH"}
+        target,
+        {"UNIT_HEALTH", "UNIT_MAXHEALTH", "UNIT_CONNECTION"}
     )
     self.target = target
 end
 function HP.prototype.UseHealPrediction(self)
     if self.healPrediction == nil then
-        local ____exports_HealthPrediction_10 = ____exports.HealthPrediction
-        local ____temp_9
+        local ____exports_HealthPrediction_12 = ____exports.HealthPrediction
+        local ____temp_11
         if UnitGetIncomingHeals == nil then
-            ____temp_9 = nil
+            ____temp_11 = nil
         else
-            ____temp_9 = function() return UnitGetIncomingHeals(self.unit) end
+            ____temp_11 = function() return UnitGetIncomingHeals(self.unit) end
         end
-        self.healPrediction = __TS__New(____exports_HealthPrediction_10, ____temp_9)
+        self.healPrediction = __TS__New(____exports_HealthPrediction_12, ____temp_11)
         if self.healPrediction.IsAvailable then
             self:AddEvents("UNIT_HEAL_PREDICTION")
         end
@@ -688,14 +697,14 @@ function HP.prototype.UseHealPrediction(self)
 end
 function HP.prototype.UseAbsorbPrediction(self)
     if self.absorbPrediction == nil then
-        local ____exports_HealthPrediction_12 = ____exports.HealthPrediction
-        local ____temp_11
+        local ____exports_HealthPrediction_14 = ____exports.HealthPrediction
+        local ____temp_13
         if UnitGetTotalAbsorbs == nil then
-            ____temp_11 = nil
+            ____temp_13 = nil
         else
-            ____temp_11 = function() return UnitGetTotalAbsorbs(self.unit) end
+            ____temp_13 = function() return UnitGetTotalAbsorbs(self.unit) end
         end
-        self.absorbPrediction = __TS__New(____exports_HealthPrediction_12, ____temp_11)
+        self.absorbPrediction = __TS__New(____exports_HealthPrediction_14, ____temp_13)
         if self.absorbPrediction.IsAvailable then
             self:AddEvents("UNIT_ABSORB_AMOUNT_CHANGED")
         end
@@ -719,23 +728,23 @@ function HP.prototype.BindTo(self, frame, options)
                 if options.healPredictionBar ~= nil or options.absorbPredictionBar ~= nil then
                     local maximum = UnitHealthMax(self.unit)
                     if options.healPredictionBar ~= nil then
-                        local ____opt_13 = self.healPrediction
-                        if ____opt_13 ~= nil then
-                            ____opt_13:ApplyTo(options.healPredictionBar, maximum)
+                        local ____opt_15 = self.healPrediction
+                        if ____opt_15 ~= nil then
+                            ____opt_15:ApplyTo(options.healPredictionBar, maximum)
                         end
                     end
                     if options.absorbPredictionBar ~= nil then
-                        local ____opt_15 = self.absorbPrediction
-                        if ____opt_15 ~= nil then
-                            ____opt_15:ApplyTo(options.absorbPredictionBar, maximum)
+                        local ____opt_17 = self.absorbPrediction
+                        if ____opt_17 ~= nil then
+                            ____opt_17:ApplyTo(options.absorbPredictionBar, maximum)
                         end
                     end
                 end
-                local ____this_18
-                ____this_18 = options
-                local ____opt_17 = ____this_18.onRefresh
-                if ____opt_17 ~= nil then
-                    ____opt_17(____this_18)
+                local ____this_20
+                ____this_20 = options
+                local ____opt_19 = ____this_20.onRefresh
+                if ____opt_19 ~= nil then
+                    ____opt_19(____this_20)
                 end
             end}
         )
@@ -777,8 +786,8 @@ function Mana.prototype.____constructor(self, unit)
         function() return UnitPower(target.Token, 0) end,
         function() return UnitPowerMax(target.Token, 0) end,
         function() return UnitPowerPercent(target.Token, 0, true, CurveConstants.ScaleTo100) end,
-        target.Token,
-        {"UNIT_POWER_UPDATE", "UNIT_MAXPOWER", "UNIT_DISPLAYPOWER"}
+        target,
+        {"UNIT_POWER_UPDATE", "UNIT_MAXPOWER", "UNIT_DISPLAYPOWER", "UNIT_CONNECTION"}
     )
     self.target = target
 end

package/lib/datasources/SourceConverter.d.ts

@@ -0,0 +1,39 @@
+import { DataSource } from "./DataSource";
+import type { ReadResult } from "./DataSource";
+/** Structural contract: converters can consume a shared source without owning it. */
+export interface ValueSource<T> {
+    readonly Value: T;
+    IsSecret(): boolean;
+    TryCompute?<TResult>(compute: (value: T) => TResult): ReadResult<TResult>;
+    onChange?(listener: (value: T) => void): () => void;
+}
+/** Checked value transformation. No timers, native widgets or ownership of the input. */
+export declare class SourceConverter<TInput, TOutput> extends DataSource<TOutput> {
+    private readonly input;
+    private readonly convert;
+    private readonly listeners;
+    private stop?;
+    private disposed;
+    private blocked;
+    private previous?;
+    private readable;
+    constructor(input: ValueSource<TInput>, convert: (value: TInput) => TOutput);
+    protected GetValue(): TOutput;
+    private Convert;
+    protected HasSecretFields(value: TOutput): boolean;
+    /** Future readable changes. The first observer attaches one upstream subscription. */
+    onChange(listener: (value: TOutput) => void): () => void;
+    private Refresh;
+    /** One immediate readable value, followed by event-driven changes when supported. */
+    BindTo(apply: (value: TOutput) => void): () => void;
+    Dispose(): void;
+}
+export type CaseKey = string | number | boolean;
+export interface SourceCase<T> {
+    readonly equals: CaseKey;
+    readonly value: T;
+}
+/** Strict equality, first matching case, then the optional default value. */
+export declare class CaseConverter<TInput, TOutput> extends SourceConverter<TInput, TOutput | undefined> {
+    constructor(input: ValueSource<TInput>, cases: readonly SourceCase<TOutput>[], fallback?: TOutput);
+}