@rbxts/uiblox 0.2.0-alpha.3 → 0.2.0-alpha.31

package/out/ui/packages/markdown/parseMarkdown.luau

@@ -0,0 +1,459 @@
+-- Compiled with roblox-ts v3.0.0
+local function trimEnd(value)
+	local stop = #value
+	while stop > 0 do
+		local _value = value
+		local _stop = stop
+		local _stop_1 = stop
+		local ch = string.sub(_value, _stop, _stop_1)
+		if ch ~= " " and ch ~= "\t" and ch ~= "\r" then
+			break
+		end
+		stop -= 1
+	end
+	local _value = value
+	local _stop = stop
+	return string.sub(_value, 1, _stop)
+end
+local function trim(value)
+	local start = 1
+	local stop = #value
+	while start <= stop do
+		local _value = value
+		local _start = start
+		local _start_1 = start
+		local ch = string.sub(_value, _start, _start_1)
+		if ch ~= " " and ch ~= "\t" and ch ~= "\r" then
+			break
+		end
+		start += 1
+	end
+	while stop >= start do
+		local _value = value
+		local _stop = stop
+		local _stop_1 = stop
+		local ch = string.sub(_value, _stop, _stop_1)
+		if ch ~= " " and ch ~= "\t" and ch ~= "\r" then
+			break
+		end
+		stop -= 1
+	end
+	if start > stop then
+		return ""
+	end
+	local _value = value
+	local _start = start
+	local _stop = stop
+	return string.sub(_value, _start, _stop)
+end
+local function headingLevel(line)
+	local n = 0
+	while true do
+		local _condition = n < #line and n < 6
+		if _condition then
+			local _line = line
+			local _arg0 = n + 1
+			local _arg1 = n + 1
+			_condition = string.sub(_line, _arg0, _arg1) == "#"
+		end
+		if not _condition then
+			break
+		end
+		n += 1
+	end
+	if n == 0 then
+		return nil
+	end
+	local _condition = n < #line
+	if _condition then
+		local _line = line
+		local _arg0 = n + 1
+		local _arg1 = n + 1
+		_condition = string.sub(_line, _arg0, _arg1) ~= " "
+	end
+	if _condition then
+		return nil
+	end
+	return n
+end
+local function parseInlines(source)
+	local out = {}
+	local i = 1
+	local n = #source
+	local buf = ""
+	local flush = function()
+		if #buf > 0 then
+			local _arg0 = {
+				kind = "text",
+				text = buf,
+			}
+			table.insert(out, _arg0)
+			buf = ""
+		end
+	end
+	while i <= n do
+		local _source = source
+		local _i = i
+		local _i_1 = i
+		local ch = string.sub(_source, _i, _i_1)
+		if ch == "`" then
+			local _source_1 = source
+			local _arg1 = i + 1
+			local close = { string.find(_source_1, "`", _arg1, true) }
+			local endAt = close[1]
+			if endAt ~= nil then
+				flush()
+				local _object = {
+					kind = "code",
+				}
+				local _left = "text"
+				local _source_2 = source
+				local _arg0 = i + 1
+				local _arg1_1 = endAt - 1
+				_object[_left] = string.sub(_source_2, _arg0, _arg1_1)
+				table.insert(out, _object)
+				i = endAt + 1
+				continue
+			end
+		end
+		if ch == "[" then
+			local _source_1 = source
+			local _arg1 = i + 1
+			local mid = { string.find(_source_1, "](", _arg1, true) }
+			local midAt = mid[1]
+			if midAt ~= nil then
+				local _source_2 = source
+				local _arg1_1 = midAt + 2
+				local closeParen = { string.find(_source_2, ")", _arg1_1, true) }
+				local endAt = closeParen[1]
+				if endAt ~= nil then
+					flush()
+					local _object = {
+						kind = "link",
+					}
+					local _left = "text"
+					local _source_3 = source
+					local _arg0 = i + 1
+					local _arg1_2 = midAt - 1
+					_object[_left] = string.sub(_source_3, _arg0, _arg1_2)
+					local _left_1 = "href"
+					local _source_4 = source
+					local _arg0_1 = midAt + 2
+					local _arg1_3 = endAt - 1
+					_object[_left_1] = string.sub(_source_4, _arg0_1, _arg1_3)
+					table.insert(out, _object)
+					i = endAt + 1
+					continue
+				end
+			end
+		end
+		local _condition = ch == "*" and i + 1 <= n
+		if _condition then
+			local _source_1 = source
+			local _arg0 = i + 1
+			local _arg1 = i + 1
+			_condition = string.sub(_source_1, _arg0, _arg1) == "*"
+		end
+		if _condition then
+			local _source_1 = source
+			local _arg1 = i + 2
+			local close = { string.find(_source_1, "**", _arg1, true) }
+			local endAt = close[1]
+			if endAt ~= nil then
+				flush()
+				local _object = {
+					kind = "bold",
+				}
+				local _left = "text"
+				local _source_2 = source
+				local _arg0 = i + 2
+				local _arg1_1 = endAt - 1
+				_object[_left] = string.sub(_source_2, _arg0, _arg1_1)
+				table.insert(out, _object)
+				i = endAt + 2
+				continue
+			end
+		end
+		local _condition_1 = ch == "*"
+		if _condition_1 then
+			local _condition_2 = i == 1
+			if not _condition_2 then
+				local _source_1 = source
+				local _arg0 = i - 1
+				local _arg1 = i - 1
+				_condition_2 = string.sub(_source_1, _arg0, _arg1) ~= "*"
+			end
+			_condition_1 = _condition_2
+		end
+		if _condition_1 then
+			local _source_1 = source
+			local _arg1 = i + 1
+			local close = { string.find(_source_1, "*", _arg1, true) }
+			local endAt = close[1]
+			local _condition_2 = endAt ~= nil
+			if _condition_2 then
+				local _source_2 = source
+				local _arg0 = endAt + 1
+				local _arg1_1 = endAt + 1
+				_condition_2 = string.sub(_source_2, _arg0, _arg1_1) ~= "*"
+			end
+			if _condition_2 then
+				flush()
+				local _object = {
+					kind = "italic",
+				}
+				local _left = "text"
+				local _source_2 = source
+				local _arg0 = i + 1
+				local _arg1_1 = endAt - 1
+				_object[_left] = string.sub(_source_2, _arg0, _arg1_1)
+				table.insert(out, _object)
+				i = endAt + 1
+				continue
+			end
+		end
+		buf = `{buf}{ch}`
+		i += 1
+	end
+	flush()
+	return if #out > 0 then out else { {
+		kind = "text",
+		text = "",
+	} }
+end
+local function isHr(line)
+	local t = trim(line)
+	if #t < 3 then
+		return false
+	end
+	local ch = string.sub(t, 1, 1)
+	if ch ~= "-" and ch ~= "*" and ch ~= "_" then
+		return false
+	end
+	for i = 1, #t do
+		local _i = i
+		local _i_1 = i
+		local c = string.sub(t, _i, _i_1)
+		if c ~= ch and c ~= " " then
+			return false
+		end
+	end
+	return true
+end
+local function listMarker(line)
+	local t = trim(line)
+	if #t >= 2 and (string.sub(t, 1, 2) == "- " or string.sub(t, 1, 2) == "* ") then
+		return {
+			ordered = false,
+			rest = string.sub(t, 3),
+		}
+	end
+	local i = 1
+	while i <= #t do
+		local _i = i
+		local _i_1 = i
+		local c = string.sub(t, _i, _i_1)
+		if c < "0" or c > "9" then
+			break
+		end
+		i += 1
+	end
+	local _condition = i > 1 and i + 1 <= #t
+	if _condition then
+		local _i = i
+		local _arg1 = i + 1
+		_condition = string.sub(t, _i, _arg1) == ". "
+	end
+	if _condition then
+		local _object = {
+			ordered = true,
+		}
+		local _left = "rest"
+		local _arg0 = i + 2
+		_object[_left] = string.sub(t, _arg0)
+		return _object
+	end
+	return nil
+end
+--* Small markdown subset → blocks. Unsupported syntax stays plain text. 
+local function parseMarkdown(source)
+	local lines = string.split(source, "\n")
+	local blocks = {}
+	local i = 0
+	while i < #lines do
+		local raw = lines[i + 1]
+		local line = trimEnd(raw)
+		if trim(line) == "" then
+			i += 1
+			continue
+		end
+		if #line >= 3 and string.sub(line, 1, 3) == "```" then
+			local body = {}
+			i += 1
+			while i < #lines and not (#lines[i + 1] >= 3 and string.sub(trim(lines[i + 1]), 1, 3) == "```") do
+				local _arg0 = lines[i + 1]
+				table.insert(body, _arg0)
+				i += 1
+			end
+			if i < #lines then
+				i += 1
+			end
+			local _arg0 = {
+				kind = "code",
+				text = table.concat(body, "\n"),
+			}
+			table.insert(blocks, _arg0)
+			continue
+		end
+		if isHr(line) then
+			table.insert(blocks, {
+				kind = "hr",
+			})
+			i += 1
+			continue
+		end
+		local level = headingLevel(line)
+		if level ~= nil then
+			local _object = {
+				kind = "heading",
+				level = level,
+			}
+			local _left = "inlines"
+			local _arg0 = level + 1
+			_object[_left] = parseInlines(trim(string.sub(line, _arg0)))
+			table.insert(blocks, _object)
+			i += 1
+			continue
+		end
+		if string.sub(line, 1, 1) == ">" and (#line == 1 or string.sub(line, 2, 2) == " ") then
+			local parts = {}
+			while i < #lines do
+				local cur = trimEnd(lines[i + 1])
+				if not (string.sub(cur, 1, 1) == ">" and (#cur == 1 or string.sub(cur, 2, 2) == " ")) then
+					break
+				end
+				local _arg0 = if #cur >= 2 then string.sub(cur, 3) else ""
+				table.insert(parts, _arg0)
+				i += 1
+			end
+			local _arg0 = {
+				kind = "blockquote",
+				inlines = parseInlines(table.concat(parts, " ")),
+			}
+			table.insert(blocks, _arg0)
+			continue
+		end
+		local marker = listMarker(line)
+		if marker ~= nil then
+			local ordered = marker.ordered
+			local items = { parseInlines(marker.rest) }
+			i += 1
+			while i < #lines do
+				local following = listMarker(trimEnd(lines[i + 1]))
+				if following == nil or following.ordered ~= ordered then
+					break
+				end
+				local _arg0 = parseInlines(following.rest)
+				table.insert(items, _arg0)
+				i += 1
+			end
+			local _arg0 = {
+				kind = "list",
+				ordered = ordered,
+				items = items,
+			}
+			table.insert(blocks, _arg0)
+			continue
+		end
+		local para = { line }
+		i += 1
+		while i < #lines do
+			local cur = trimEnd(lines[i + 1])
+			if trim(cur) == "" then
+				break
+			end
+			if #cur >= 3 and string.sub(cur, 1, 3) == "```" then
+				break
+			end
+			if isHr(cur) then
+				break
+			end
+			if headingLevel(cur) ~= nil then
+				break
+			end
+			if string.sub(cur, 1, 1) == ">" and (#cur == 1 or string.sub(cur, 2, 2) == " ") then
+				break
+			end
+			if listMarker(cur) ~= nil then
+				break
+			end
+			-- two trailing spaces = hard break
+			local prev = para[#para]
+			local _condition = #prev >= 2
+			if _condition then
+				local _arg0 = #prev - 1
+				_condition = string.sub(prev, _arg0) == "  "
+			end
+			if _condition then
+				local _arg1 = #prev - 2
+				para[#para] = trimEnd(string.sub(prev, 1, _arg1))
+				table.insert(para, cur)
+			else
+				para[#para] = `{prev} {cur}`
+			end
+			i += 1
+		end
+		local _arg0 = {
+			kind = "paragraph",
+			inlines = parseInlines(table.concat(para, "\n")),
+		}
+		table.insert(blocks, _arg0)
+	end
+	return blocks
+end
+local function inlinesToPlain(inlines)
+	local out = ""
+	for _, part in inlines do
+		if part.kind == "link" then
+			out = `{out}{part.text}`
+		else
+			out = `{out}{part.text}`
+		end
+	end
+	return out
+end
+local function escapeRich(text)
+	local out = text
+	for _, _binding in { { "&", "&amp;" }, { "<", "&lt;" }, { ">", "&gt;" } } do
+		local from = _binding[1]
+		local to = _binding[2]
+		local replaced = string.gsub(out, from, to)
+		out = replaced
+	end
+	return out
+end
+--* Turn inline nodes into Roblox RichText. Links become colored label + (url). 
+local function inlinesToRichText(inlines)
+	local out = ""
+	for _, part in inlines do
+		if part.kind == "text" then
+			local chunk = escapeRich(part.text)
+			local withBreaks = string.gsub(chunk, "\n", "<br/>")
+			out = `{out}{withBreaks}`
+		elseif part.kind == "bold" then
+			out = `{out}<b>{escapeRich(part.text)}</b>`
+		elseif part.kind == "italic" then
+			out = `{out}<i>{escapeRich(part.text)}</i>`
+		elseif part.kind == "code" then
+			out = `{out}<font face="RobotoMono">{escapeRich(part.text)}</font>`
+		elseif part.kind == "link" then
+			out = `{out}<font color="#4C9AFF">{escapeRich(part.text)}</font> ({escapeRich(part.href)})`
+		end
+	end
+	return out
+end
+return {
+	parseMarkdown = parseMarkdown,
+	inlinesToPlain = inlinesToPlain,
+	inlinesToRichText = inlinesToRichText,
+}

package/out/ui/packages/menu/components/Menu.d.ts

@@ -1,3 +1,5 @@
+import React from "@rbxts/react";
+import { CustomizedProps } from "../../../../theme/index";
 export interface MenuItem {
     id: string;
     text: string;
@@ -9,6 +11,10 @@ export interface MenuProps {
     items: MenuItem[];
     onSelect: (id: string) => void;
     onClose: () => void;
+    emptyText?: string;
+    empty?: React.Element;
+    dense?: boolean;
+    selected?: string;
 }
-declare function Menu(props: MenuProps): JSX.Element | undefined;
+declare function Menu(props: CustomizedProps<Frame, MenuProps>): JSX.Element | undefined;
 export default Menu;

package/out/ui/packages/menu/components/Menu.luau

@@ -1,10 +1,13 @@
 -- Compiled with roblox-ts v3.0.0
 local TS = _G[script]
 local React = TS.import(script, TS.getModule(script, "@rbxts", "react"))
+local SxHost = TS.import(script, script.Parent.Parent.Parent, "host").SxHost
 local ListItem = TS.import(script, script.Parent.Parent.Parent, "listItem").ListItem
 local Popup = TS.import(script, script.Parent.Parent.Parent, "popup").Popup
+local EmptyListHint = TS.import(script, script.Parent.Parent.Parent, "virtualList").EmptyListHint
 local useMenuStyles = TS.import(script, script.Parent, "Menu.styles").default
 local ROW = 28
+local ROW_DENSE = 22
 local function Menu(props)
 	local _binding = props
 	local anchor = _binding.anchor
@@ -12,47 +15,86 @@ local function Menu(props)
 	local items = _binding.items
 	local onSelect = _binding.onSelect
 	local onClose = _binding.onClose
+	local emptyText = _binding.emptyText
+	local empty = _binding.empty
+	local dense = _binding.dense
+	local selected = _binding.selected
+	local className = _binding.className
+	local sx = _binding.sx
+	local id = _binding.id
+	local ref = _binding.ref
 	local styles = useMenuStyles()
 	if not open then
 		return nil
 	end
+	local vacant = #items == 0
+	local row = if dense == true then ROW_DENSE else ROW
+	local height = if vacant then row else #items * row
 	local _attributes = {
-		key = "Surface",
+		tag = "frame",
 	}
-	for _k, _v in styles.surface do
-		_attributes[_k] = _v
+	local _condition = id
+	if not (_condition ~= 0 and _condition == _condition and _condition ~= "" and _condition) then
+		_condition = "Surface"
 	end
+	_attributes.key = _condition
+	_attributes.hostRef = ref
+	_attributes.base = styles.surface
+	_attributes.className = className
+	_attributes.sx = sx
 	local _attributes_1 = table.clone(styles.corner)
 	setmetatable(_attributes_1, nil)
 	local _exp = React.createElement("uicorner", _attributes_1)
-	local _attributes_2 = table.clone(styles.list)
+	local _attributes_2 = table.clone(styles.stroke)
 	setmetatable(_attributes_2, nil)
-	local _exp_1 = React.createElement("uilistlayout", _attributes_2)
-	-- ▼ ReadonlyArray.map ▼
-	local _newValue = table.create(#items)
-	local _callback = function(item)
-		return React.createElement(ListItem, {
-			key = item.id,
-			text = item.text,
-			disabled = item.disabled,
-			onActivated = function()
-				if item.disabled == true then
-					return nil
-				end
-				onSelect(item.id)
-				onClose()
-			end,
-		})
+	local _exp_1 = React.createElement("uistroke", _attributes_2)
+	local _attributes_3 = table.clone(styles.list)
+	setmetatable(_attributes_3, nil)
+	local _exp_2 = React.createElement("uilistlayout", _attributes_3)
+	local _result
+	if vacant then
+		local _condition_1 = empty
+		if _condition_1 == nil then
+			local _attributes_4 = {}
+			local _condition_2 = emptyText
+			if _condition_2 == nil then
+				_condition_2 = "No options"
+			end
+			_attributes_4.text = _condition_2
+			_attributes_4.height = row
+			_condition_1 = React.createElement(EmptyListHint, _attributes_4)
+		end
+		_result = _condition_1
+	else
+		-- ▼ ReadonlyArray.map ▼
+		local _newValue = table.create(#items)
+		local _callback = function(item)
+			return React.createElement(ListItem, {
+				key = item.id,
+				text = item.text,
+				disabled = item.disabled,
+				dense = dense,
+				selected = item.id == selected,
+				onActivated = function()
+					if item.disabled == true then
+						return nil
+					end
+					onSelect(item.id)
+					onClose()
+				end,
+			})
+		end
+		for _k, _v in items do
+			_newValue[_k] = _callback(_v, _k - 1, items)
+		end
+		-- ▲ ReadonlyArray.map ▲
+		_result = (React.createElement(React.Fragment, nil, _newValue))
 	end
-	for _k, _v in items do
-		_newValue[_k] = _callback(_v, _k - 1, items)
-	end
-	-- ▲ ReadonlyArray.map ▲
 	return React.createElement(Popup, {
 		anchor = anchor,
-		preferredHeight = #items * ROW,
+		preferredHeight = height,
 		onDismiss = onClose,
-	}, React.createElement("frame", _attributes, _exp, _exp_1, _newValue))
+	}, React.createElement(SxHost, _attributes, _exp, _exp_1, _exp_2, _result))
 end
 local default = Menu
 return {

package/out/ui/packages/menu/components/Menu.styles.luau

@@ -8,12 +8,16 @@ local useMenuStyles = componentStyles("Menu", function(theme)
 		surface = {
 			Size = UDim2.new(1, 0, 0, 0),
 			AutomaticSize = Enum.AutomaticSize.Y,
-			BackgroundColor3 = theme.palette.surface.paper,
+			BackgroundColor3 = theme.palette.surface.elevated,
 			BorderSizePixel = 0,
 		},
 		corner = {
 			CornerRadius = UDim.new(0, theme.shape.borderRadius),
 		},
+		stroke = {
+			Color = theme.palette.border,
+			ApplyStrokeMode = Enum.ApplyStrokeMode.Border,
+		},
 		list = {
 			FillDirection = Enum.FillDirection.Vertical,
 			SortOrder = Enum.SortOrder.LayoutOrder,

package/out/ui/packages/modal/components/Modal.d.ts

@@ -1,9 +1,10 @@
 import React from "@rbxts/react";
+import { CustomizedProps } from "../../../../theme/index";
 export interface ModalProps {
     host?: Instance;
     open: boolean;
     onClose: () => void;
     children?: React.ReactNode;
 }
-declare function Modal(props: ModalProps): JSX.Element | undefined;
+declare function Modal(props: CustomizedProps<Frame, ModalProps>): JSX.Element;
 export default Modal;