Upload

lua/stormfox2/framework/sh_date.lua

@@ -0,0 +1,175 @@
+--[[
+| This file was obtained through the combined efforts
+| of Madbluntz & Plymouth Antiquarian Society.
+|
+| Credits: lifestorm, Gregory Wayne Rossel JR.,
+| 	Maloy, DrPepper10 @ RIP, Atle!
+|
+| Visit for more: https://plymouth.thetwilightzone.ru/
+--]]
+
+--[[
+	Date
+
+	SV	StormFox2.Date.SetYearDay( nDay )		Sets the yearday.
+	SH	StormFox2.Date.GetYearDay()				Gets the yearday.
+	SH	StormFox2.Date.GetWeekDay( bNumbers )	Returns the weekday. Returns a number if bNumbers is true.
+	SH	StormFox2.Date.GetMonth( bNumbers )		Returns the month. Returns a number if bNumbers is true.
+	SH	StormFox2.Date.GetShortMonth()			Returns the month in a 3-letter string.
+	Sh	StormFox2.Date.GetDay()					Returns the day within the month.
+	Sh	StormFox2.Date.Get( bNumbers )			Returns the date in string format. MM/DD or DD/MM depending on location and settings. Returns in numbers if bNumbers is true.
+]]
+
+StormFox2.Setting.AddSV("real_time",false)
+StormFox2.Date = {}
+
+if SERVER then
+	---Sets the yearday. [0-365]
+	---@param nDay number
+	---@server
+	function StormFox2.Date.SetYearDay( nDay )
+		StormFox2.Network.Set("day", nDay % 365)
+	end
+end
+
+---Returns the day within the year. [0 - 364]
+---@return number
+---@shared
+function StormFox2.Date.GetYearDay()
+	return StormFox2.Data.Get("day",0)
+end
+
+local day, month, weekday = -1,-1,-1
+local function calcDate( nDay )
+	local t = string.Explode("-", os.date( "%d-%m-%w", nDay * 86400 ), false)
+	return tonumber(t[1]),tonumber(t[2]),tonumber(t[3])
+end
+hook.Add("StormFox2.data.change", "StormFox2.date.update", function(sKey, nDay)
+	if sKey ~= "day" then return end
+	day,month,weekday = calcDate( nDay )
+end)
+do
+	local t = {
+		[0] = "Sunday",
+		[1] = "Monday",
+		[2] = "Tuesday",
+		[3] = "Wednesday",
+		[4] = "Thursday",
+		[5] = "Friday",
+		[6] = "Saturday"
+	}
+
+	---Returns the current weekday ["Monday" - "Sunday"]. Does also accept a number between 0 - 6.
+	---@param number nil|number
+	---@return string
+	---@shared
+	function StormFox2.Date.GetWeekDay( number )
+		if type(number) == "number" then -- FFS people
+			return t[ number % 7 ] or "Unknown"
+		end
+		return t[ weekday ] or "Unknown"
+	end
+end
+do
+	local t = {
+		[1] = "January",
+		[2] = "February",
+		[3] = "March",
+		[4] = "April",
+		[5] = "May",
+		[6] = "June",
+		[7] = "July",
+		[8] = "August",
+		[9] = "September",
+		[10] = "October",
+		[11] = "November",
+		[12] = "December"
+	}
+	---Returns the current month ["January" - "December"]. Also accepts a number between 1 - 12.
+	---@param number nil|number
+	---@return string
+	---@shared
+	function StormFox2.Date.GetMonth( number )
+		if type(number) == "number" then -- FFS people
+			return t[ number % 13 ] or "Unknown"
+		end
+		return t[ month ] or "Unknown"
+	end
+end
+
+---Returns the current month in short ["Jan" - "Dec"]. Also accepts a number between 1 - 12.
+---@param number nil|number
+---@return string
+---@shared
+function StormFox2.Date.GetShortMonth( number )
+	return string.sub(StormFox2.Date.GetMonth( number ),0,3)
+end
+
+--- Returns the day of the month: 1 - 31.
+---@return number
+---@shared
+function StormFox2.Date.GetDay()
+	return day
+end
+
+local country = system.GetCountry() or "UK"
+local crazy_countries = {"AS", "BT", "CN", "FM", "GU", "HU", "JP", "KP", "KR", "LT", "MH", "MN", "MP", "TW", "UM", "US", "VI"}
+local default = table.HasValue(crazy_countries, country)
+if CLIENT then
+	StormFox2.Setting.AddCL("use_monthday",default,"Display MM/DD instead of DD/MM.")
+end
+
+local tOrdinal = {"st", "nd", "rd"}
+local function ordinal(n)
+	local digit = tonumber(string.sub(n, -1))
+	local two_dig = tonumber(string.sub(n,-2))
+	if digit > 0 and digit <= 3 and two_dig ~= 11 and two_dig ~= 12 and two_dig ~= 13 then
+		return n .. tOrdinal[digit]
+	else
+		return n .. "th"
+	end
+end
+
+---Returns the current date-format: "6/11/22". Based on systems country location or clients setting.
+---@return string
+---@shared
+function StormFox2.Date.Get( )
+	local m = StormFox2.Date.GetMonth(  )
+	local d = StormFox2.Date.GetDay()
+	if bNumbers and m < 10 then
+		m = "0" .. m
+	elseif not bNumbers then
+		d = ordinal(d)
+	end
+	local rev
+	if CLIENT then
+		rev = StormFox2.Setting.GetCache("use_monthday",default)
+	else
+		rev = default
+	end
+	local e = bNumbers and " / " or " "
+
+	if not rev then
+		return d .. e .. m
+	else
+		return m .. e .. d
+	end
+end
+
+if SERVER then
+	-- Sets the starting day.
+	if StormFox2.Setting.Get("real_time", false) then
+		StormFox2.Network.Set("day", tonumber(os.date("%j")))
+	else
+		StormFox2.Network.Set("day", cookie.GetNumber("sf_date", math.random(0,364)))
+	end
+	-- Saves the day for next start.
+	hook.Add("ShutDown","StormFox2.Day.Save",function()
+		cookie.Set("sf_date",StormFox2.Date.GetYearDay())
+	end)
+	-- Sets the day to the current day, if real_time gets switched on.
+	StormFox2.Setting.Callback("real_time",function(switch)
+		if not switch then return end
+		StormFox2.Network.Set("day", os.date("%j"))
+	end,"sf_convar_data")
+end