warscript 0.0.1-dev.008d8ef

package/property.lua

@@ -0,0 +1,374 @@
+local ____lualib = require("lualib_bundle")
+local __TS__Class = ____lualib.__TS__Class
+local __TS__New = ____lualib.__TS__New
+local __TS__SetDescriptor = ____lualib.__TS__SetDescriptor
+local __TS__ClassExtends = ____lualib.__TS__ClassExtends
+local ____exports = {}
+local savePropertyValues
+local ____binaryreader = require("binaryreader")
+local BinaryReader = ____binaryreader.BinaryReader
+local ____binarywriter = require("binarywriter")
+local BinaryWriter = ____binarywriter.BinaryWriter
+local ____player = require("core.types.player")
+local Player = ____player.Player
+local ____timer = require("core.types.timer")
+local Timer = ____timer.Timer
+local ____event = require("event")
+local Event = ____event.Event
+local file = require("file")
+local ____network = require("network")
+local synchronize = ____network.synchronize
+local base64 = require("utility.base64")
+local lzw = require("utility.lzw")
+local ____preconditions = require("utility.preconditions")
+local ____require = ____preconditions.require
+local invoke = Event.invoke
+____exports.PersistentPropertiesConfig = __TS__Class()
+local PersistentPropertiesConfig = ____exports.PersistentPropertiesConfig
+PersistentPropertiesConfig.name = "PersistentPropertiesConfig"
+function PersistentPropertiesConfig.prototype.____constructor(self)
+end
+PersistentPropertiesConfig.defaultFileName = ""
+____exports.Property = __TS__Class()
+local Property = ____exports.Property
+Property.name = "Property"
+function Property.prototype.____constructor(self, defaultValue)
+    self.valueChangeEvent = __TS__New(Event)
+    self[0] = defaultValue
+    self[1] = defaultValue
+end
+function Property.prototype.reset(self)
+    if self[2] then
+        self[2] = nil
+        local defaultValue = self[0]
+        local oldValue = self[1]
+        if defaultValue ~= oldValue then
+            self[1] = defaultValue
+            invoke(self.valueChangeEvent, defaultValue, oldValue)
+        end
+        return true
+    end
+    return false
+end
+function Property.prototype.set(self, value)
+    self[2] = true
+    local oldValue = self[1]
+    self[1] = value
+    if value ~= oldValue then
+        invoke(self.valueChangeEvent, value, oldValue)
+        return true
+    end
+    return false
+end
+function Property.prototype.get(self)
+    return self[1]
+end
+__TS__SetDescriptor(
+    Property.prototype,
+    "defaultValue",
+    {
+        get = function(self)
+            return self[0]
+        end,
+        set = function(self, defaultValue)
+            local oldDefaultValue = self[0]
+            if defaultValue ~= oldDefaultValue then
+                self[0] = defaultValue
+                if not self[2] then
+                    self[1] = defaultValue
+                    invoke(self.valueChangeEvent, defaultValue, oldDefaultValue)
+                end
+            end
+        end
+    },
+    true
+)
+__TS__SetDescriptor(
+    Property.prototype,
+    "value",
+    {
+        get = function(self)
+            return self:get()
+        end,
+        set = function(self, value)
+            self:set(value)
+        end
+    },
+    true
+)
+__TS__SetDescriptor(
+    Property.prototype,
+    "isChanged",
+    {get = function(self)
+        return self[2] == true
+    end},
+    true
+)
+____exports.PlayerProperty = __TS__Class()
+local PlayerProperty = ____exports.PlayerProperty
+PlayerProperty.name = "PlayerProperty"
+function PlayerProperty.prototype.____constructor(self, defaultValue)
+    self.valueChangeEvent = __TS__New(Event)
+    self[0] = defaultValue
+    self[1] = {}
+    self[2] = {}
+end
+function PlayerProperty.prototype.isChanged(self, player)
+    return self[2][player] ~= nil
+end
+function PlayerProperty.prototype.reset(self, player)
+    if self[2][player] ~= nil then
+        self[2][player] = nil
+        local initialValue = self[0]
+        local oldValue = self[1][player]
+        self[1][player] = nil
+        if initialValue ~= oldValue then
+            invoke(self.valueChangeEvent, player, initialValue, oldValue)
+        end
+        return true
+    end
+    return false
+end
+function PlayerProperty.prototype.set(self, player, value)
+    self[2][player] = true
+    local oldValue = self[1][player]
+    self[1][player] = value
+    if value ~= oldValue then
+        invoke(self.valueChangeEvent, player, value, oldValue)
+        return true
+    end
+    return false
+end
+function PlayerProperty.prototype.get(self, player)
+    local ____table_PlayerPropertyPropertyKey_IS_CHANGED_BY_PLAYER_has_result_0
+    if self[2][player] ~= nil then
+        ____table_PlayerPropertyPropertyKey_IS_CHANGED_BY_PLAYER_has_result_0 = self[1][player]
+    else
+        ____table_PlayerPropertyPropertyKey_IS_CHANGED_BY_PLAYER_has_result_0 = self[0]
+    end
+    return ____table_PlayerPropertyPropertyKey_IS_CHANGED_BY_PLAYER_has_result_0
+end
+local NULL_VALUE = {}
+local loadedValueById
+local loadedValueByIdByPlayer = {}
+local localValueById = {}
+local persistentPropertyById = {}
+local persistentPlayerPropertyById = {}
+____exports.PersistentProperty = __TS__Class()
+local PersistentProperty = ____exports.PersistentProperty
+PersistentProperty.name = "PersistentProperty"
+__TS__ClassExtends(PersistentProperty, ____exports.Property)
+function PersistentProperty.prototype.____constructor(self, id, defaultValue, valueChangeEventListener)
+    PersistentProperty.____super.prototype.____constructor(self, defaultValue)
+    self.id = id
+    ____require(not (persistentPropertyById[id] ~= nil) and not (persistentPlayerPropertyById[id] ~= nil))
+    persistentPropertyById[id] = self
+    if valueChangeEventListener ~= nil then
+        self.valueChangeEvent:addListener(valueChangeEventListener)
+    end
+    local value = loadedValueById and loadedValueById[id]
+    if value ~= nil then
+        local ____self_set_4 = self.set
+        local ____temp_3
+        if value == NULL_VALUE then
+            ____temp_3 = nil
+        else
+            ____temp_3 = value
+        end
+        ____self_set_4(self, ____temp_3)
+    end
+end
+function PersistentProperty.prototype.reset(self)
+    if PersistentProperty.____super.prototype.reset(self) then
+        localValueById[self.id] = nil
+        savePropertyValues()
+        return true
+    end
+    return false
+end
+function PersistentProperty.prototype.set(self, value)
+    if PersistentProperty.____super.prototype.set(self, value) then
+        localValueById[self.id] = value == nil and NULL_VALUE or value
+        savePropertyValues()
+        return true
+    end
+    return false
+end
+____exports.PersistentPlayerProperty = __TS__Class()
+local PersistentPlayerProperty = ____exports.PersistentPlayerProperty
+PersistentPlayerProperty.name = "PersistentPlayerProperty"
+__TS__ClassExtends(PersistentPlayerProperty, ____exports.PlayerProperty)
+function PersistentPlayerProperty.prototype.____constructor(self, id, initialValue, valueChangeEventListener)
+    PersistentPlayerProperty.____super.prototype.____constructor(self, initialValue)
+    self.id = id
+    ____require(not (persistentPropertyById[id] ~= nil) and not (persistentPlayerPropertyById[id] ~= nil))
+    persistentPlayerPropertyById[id] = self
+    if valueChangeEventListener ~= nil then
+        self.valueChangeEvent:addListener(valueChangeEventListener)
+    end
+    for ____, player in ipairs(Player.all) do
+        local ____opt_5 = loadedValueByIdByPlayer and loadedValueByIdByPlayer[player]
+        local value = ____opt_5 and ____opt_5[id]
+        if value ~= nil then
+            local ____self_set_10 = self.set
+            local ____temp_9
+            if value == NULL_VALUE then
+                ____temp_9 = nil
+            else
+                ____temp_9 = value
+            end
+            ____self_set_10(self, player, ____temp_9)
+        end
+    end
+end
+function PersistentPlayerProperty.prototype.reset(self, player)
+    if PersistentPlayerProperty.____super.prototype.reset(self, player) then
+        if player.isLocal then
+            localValueById[self.id] = nil
+        end
+        savePropertyValues(player)
+        return true
+    end
+    return false
+end
+function PersistentPlayerProperty.prototype.set(self, player, value)
+    if PersistentPlayerProperty.____super.prototype.set(self, player, value) then
+        if player.isLocal then
+            localValueById[self.id] = value
+        end
+        savePropertyValues(player)
+        return true
+    end
+    return false
+end
+savePropertyValues = function(player)
+    if player ~= nil and not player.isLocal or loadedValueById == nil or loadedValueByIdByPlayer[Player["local"]] == nil then
+        return
+    end
+    local writer = __TS__New(BinaryWriter)
+    writer:writeUInt32(0)
+    local size = 0
+    for ____ in pairs(localValueById) do
+        size = size + 1
+    end
+    writer:writeUInt32(size)
+    for id, value in pairs(localValueById) do
+        writer:writeInt32(id)
+        if value == NULL_VALUE then
+            writer:writeUInt8(0)
+        elseif value == false then
+            writer:writeUInt8(1)
+        elseif value == true then
+            writer:writeUInt8(2)
+        elseif type(value) == "number" then
+            if math.type(value) == "integer" then
+                writer:writeUInt8(3)
+                writer:writeInt32(value)
+            else
+                writer:writeUInt8(4)
+                writer:writeFloat(value)
+            end
+        else
+            writer:writeUInt8(5)
+            writer:writeUInt32(#value)
+            writer:writeBytes(value)
+        end
+    end
+    file.write(
+        ____exports.PersistentPropertiesConfig.defaultFileName,
+        base64.encode(lzw.compress(tostring(writer)))
+    )
+end
+local function loadPropertyValues(fileData, player)
+    do
+        local function ____catch(_)
+            return true, {}
+        end
+        local ____try, ____hasReturned, ____returnValue = pcall(function()
+            local valueById = {}
+            local reader = __TS__New(
+                BinaryReader,
+                lzw.decompress(base64.decode(fileData))
+            )
+            reader:readUInt32()
+            local size = reader:readUInt32()
+            for _ = 1, size do
+                local id = reader:readInt32()
+                local dataType = reader:readUInt8()
+                if dataType == 0 then
+                    valueById[id] = NULL_VALUE
+                elseif dataType == 1 then
+                    valueById[id] = false
+                elseif dataType == 2 then
+                    valueById[id] = true
+                elseif dataType == 3 then
+                    valueById[id] = reader:readInt32()
+                elseif dataType == 4 then
+                    valueById[id] = reader:readFloat()
+                elseif dataType == 5 then
+                    valueById[id] = reader:readBytes(reader:readUInt32())
+                end
+            end
+            for id, value in pairs(valueById) do
+                local persistentProperty = persistentPropertyById[id]
+                if persistentProperty ~= nil then
+                    if not persistentProperty.isChanged then
+                        local ____persistentProperty_set_12 = persistentProperty.set
+                        local ____temp_11
+                        if value == NULL_VALUE then
+                            ____temp_11 = nil
+                        else
+                            ____temp_11 = value
+                        end
+                        ____persistentProperty_set_12(persistentProperty, ____temp_11)
+                    end
+                elseif player ~= nil then
+                    local persistentPlayerProperty = persistentPlayerPropertyById[id]
+                    if persistentPlayerProperty ~= nil then
+                        if not persistentPlayerProperty:isChanged(player) then
+                            local ____persistentPlayerProperty_set_15 = persistentPlayerProperty.set
+                            local ____player_14 = player
+                            local ____temp_13
+                            if value == NULL_VALUE then
+                                ____temp_13 = nil
+                            else
+                                ____temp_13 = value
+                            end
+                            ____persistentPlayerProperty_set_15(persistentPlayerProperty, ____player_14, ____temp_13)
+                        end
+                    elseif player.isLocal then
+                        localValueById[id] = value
+                    end
+                else
+                    localValueById[id] = value
+                end
+            end
+            return true, valueById
+        end)
+        if not ____try then
+            ____hasReturned, ____returnValue = ____catch(____hasReturned)
+        end
+        if ____hasReturned then
+            return ____returnValue
+        end
+    end
+end
+Timer:run(function()
+    local data = file.read(____exports.PersistentPropertiesConfig.defaultFileName) or ""
+    loadedValueById = loadPropertyValues(data)
+    for ____, player in ipairs(Player.all) do
+        local ____self_16 = synchronize(player, data)
+        ____self_16["then"](
+            ____self_16,
+            function(____, synchronizedData)
+                loadedValueByIdByPlayer[player] = loadPropertyValues(synchronizedData, player)
+                savePropertyValues(player)
+            end,
+            function()
+                loadedValueByIdByPlayer[player] = {}
+                savePropertyValues(player)
+            end
+        )
+    end
+end)
+return ____exports

package/string.d.ts

@@ -0,0 +1,136 @@
+/** @noSelfInFile */
+declare global {
+    interface String {
+        /**
+         * If this string starts with the given prefix, returns a copy of this string with the prefix removed.
+         * Otherwise, returns this string.
+         */
+        removePrefix(prefix: string): string;
+    }
+    namespace string {
+        /**
+         * If the string starts with the given prefix, returns a copy of the string with the prefix removed.
+         * Otherwise, returns the string.
+         */
+        function removePrefix(string: string, prefix: string): string;
+    }
+}
+declare global {
+    namespace string {
+        /**
+         * If the string ends with the given suffix, returns a copy of the string with the suffix removed.
+         * Otherwise, returns the string.
+         */
+        function removeSuffix(string: string, prefix: string): string;
+    }
+    interface String {
+        /**
+         * If this string ends with the given suffix, returns a copy of this string with the suffix removed.
+         * Otherwise, returns this string.
+         */
+        removeSuffix(suffix: string): string;
+    }
+}
+declare global {
+    interface String {
+        /**
+         * Parses the string as a number and returns the result or null if the string is not a valid representation of a number.
+         */
+        toNumberOrNull(): number | undefined;
+    }
+    namespace string {
+        /**
+         * Parses the string as a number and returns the result or null if the string is not a valid representation of a number.
+         */
+        function toNumberOrNull(string: string): number | undefined;
+    }
+}
+declare global {
+    interface String {
+        /**
+         * Parses the string as a number and returns the result.
+         */
+        toNumber(): number;
+    }
+    namespace string {
+        /**
+         * Parses the string as a number and returns the result.
+         */
+        function toNumber(string: string): number;
+    }
+}
+declare global {
+    namespace string {
+        /**
+         * Returns the index within the string of the first occurrence of the specified substring, starting from the specified `startIndex`,
+         * or -1 if the string does not contain such substring.
+         */
+        function indexOf(string: string, substring: string, startIndex?: number): number;
+    }
+    interface String {
+        /**
+         * Returns the index within this string of the first occurrence of the specified substring, starting from the specified `startIndex`,
+         * or -1 if the string does not contain such substring.
+         */
+        indexOf(substring: string, startIndex?: number): number;
+    }
+}
+declare global {
+    interface String {
+        /**
+         * Returns index of the last character matching the given predicate,
+         * or -1 if the char sequence does not contain such character.
+         */
+        indexOfLast(predicate: (char: string) => boolean): number;
+    }
+    namespace string {
+        /**
+         * Returns index of the last character matching the given predicate,
+         * or -1 if the char sequence does not contain such character.
+         */
+        function indexOfLast(string: string, predicate: (char: string) => boolean): number;
+    }
+}
+declare global {
+    interface String {
+        /**
+         * Returns `true` if this string is empty or consists solely of whitespace characters.
+         */
+        isBlank(): boolean;
+    }
+    namespace string {
+        /**
+         * Returns `true` if this string is empty or consists solely of whitespace characters.
+         */
+        function isBlank(string: string): boolean;
+    }
+}
+declare global {
+    interface String {
+        /**
+         * Returns `true` if this string is not empty and contains some characters except of whitespace characters.
+         */
+        isNotBlank(): boolean;
+    }
+    namespace string {
+        /**
+         * Returns `true` if this string is not empty and contains some characters except of whitespace characters.
+         */
+        function isNotBlank(string: string): boolean;
+    }
+}
+declare global {
+    namespace string {
+        /**
+         * Returns the number of characters matching the given predicate.
+         */
+        function count(string: string, predicate: (char: string) => boolean): number;
+    }
+    interface String {
+        /**
+         * Returns the number of characters matching the given predicate.
+         */
+        count(predicate: (char: string) => boolean): number;
+    }
+}
+export {};

package/string.lua

@@ -0,0 +1,48 @@
+local ____exports = {}
+local ____error = _G.error
+local tonumber = _G.tonumber
+local match = string.match
+local find = string.find
+local sub = string.sub
+_G.string.removePrefix = function(____string, prefix)
+    local prefixLength = #prefix
+    return sub(____string, 1, prefixLength) == prefix and sub(____string, prefixLength + 1) or ____string
+end
+_G.string.removeSuffix = function(____string, suffix)
+    local suffixLength = #suffix
+    return sub(____string, -suffixLength) == suffix and sub(____string, 1, -suffixLength - 1) or ____string
+end
+_G.string.toNumberOrNull = function(____string)
+    return tonumber(____string)
+end
+_G.string.toNumber = function(____string)
+    return tonumber(____string) or ____error(("'" .. ____string) .. "' is not a valid representation of a number.")
+end
+_G.string.indexOf = function(____string, substring, startIndex)
+    local index = find(____string, substring, (startIndex or 0) + 1, true)
+    return (index or 0) - 1
+end
+_G.string.indexOfLast = function(____string, predicate)
+    for i = #____string, 1, -1 do
+        if predicate(sub(____string, i, i)) then
+            return i - 1
+        end
+    end
+    return -1
+end
+_G.string.isBlank = function(____string)
+    return (match(____string, "^%s*$")) ~= nil
+end
+_G.string.isNotBlank = function(____string)
+    return (match(____string, "^%s*$")) == nil
+end
+_G.string.count = function(____string, predicate)
+    local result = 0
+    for i = 1, #____string do
+        if predicate(sub(____string, i, i)) then
+            result = result + 1
+        end
+    end
+    return result
+end
+return ____exports

package/time/dayOfWeek.d.ts

@@ -0,0 +1,97 @@
+/** @noSelfInFile */
+import { BinaryReader } from "../binaryreader";
+import { BinaryWriter } from "../binarywriter";
+/**
+ * A day-of-week, such as 'Tuesday'.
+ * <p>
+ * {@code DayOfWeek} is a class representing the 7 days of the week -
+ * Monday, Tuesday, Wednesday, Thursday, Friday, Saturday and Sunday.
+ * <p>
+ * This class represents a common concept that is found in many calendar systems.
+ * As such, this class may be used by any calendar system that has the day-of-week
+ * concept defined exactly equivalent to the ISO calendar system.
+ */
+export declare class DayOfWeek {
+    readonly value: number;
+    /**
+     * The singleton instance for the day-of-week of Monday.
+     * This has the numeric value of {@code 1}.
+     */
+    static readonly MONDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Tuesday.
+     * This has the numeric value of {@code 2}.
+     */
+    static readonly TUESDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Wednesday.
+     * This has the numeric value of {@code 3}.
+     */
+    static readonly WEDNESDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Thursday.
+     * This has the numeric value of {@code 4}.
+     */
+    static readonly THURSDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Friday.
+     * This has the numeric value of {@code 5}.
+     */
+    static readonly FRIDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Saturday.
+     * This has the numeric value of {@code 6}.
+     */
+    static readonly SATURDAY: DayOfWeek;
+    /**
+     * The singleton instance for the day-of-week of Sunday.
+     * This has the numeric value of {@code 7}.
+     */
+    static readonly SUNDAY: DayOfWeek;
+    private constructor();
+    /**
+     * Obtains an instance of {@code DayOfWeek} from an {@code int} value.
+     * <p>
+     * {@code DayOfWeek} is a class representing the 7 days of the week.
+     * This factory allows the class to be obtained from the {@code int} value.
+     * The {@code int} value follows the ISO-8601 standard, from 1 (Monday) to 7 (Sunday).
+     *
+     * @param dayOfWeek  the day-of-week to represent, from 1 (Monday) to 7 (Sunday)
+     * @return the day-of-week singleton
+     */
+    static of(dayOfWeek: number): DayOfWeek;
+    static deserialize(reader: BinaryReader): DayOfWeek;
+    serialize(writer: BinaryWriter): void;
+    /**
+     * Returns the day-of-week that is the specified number of days after this one.
+     * <p>
+     * The calculation rolls around the end of the week from Sunday to Monday.
+     * The specified period may be negative.
+     * <p>
+     * This instance is immutable and unaffected by this method call.
+     *
+     * @param days  the days to add, positive or negative
+     * @return the resulting day-of-week
+     */
+    plus(days: number): DayOfWeek;
+    /**
+     * Returns the day-of-week that is the specified number of days before this one.
+     * <p>
+     * The calculation rolls around the start of the year from Monday to Sunday.
+     * The specified period may be negative.
+     * <p>
+     * This instance is immutable and unaffected by this method call.
+     *
+     * @param days  the days to subtract, positive or negative
+     * @return the resulting day-of-week
+     */
+    minus(days: number): DayOfWeek;
+    /**
+     * Outputs this day-of-week as a {@code string}.
+     *
+     * @return a string representation of this day-of-week
+     */
+    toString(): string;
+    private __lt;
+    private __le;
+}