@rbxts/uiblox 0.2.0-alpha.36 → 0.2.0-alpha.5

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

@@ -1,459 +0,0 @@
--- 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/reorder/index.d.ts

@@ -1,2 +0,0 @@
-export { DragRect, hitRect, isReorderMove, isReorderPress, isReorderRelease, passedDragThreshold, placeItem, REORDER_THRESHOLD, transferId } from "./reorder";
-export { ReorderDragHandle, ReorderDragState, useReorderDrag } from "./useReorderDrag";

package/out/ui/packages/reorder/init.luau

@@ -1,14 +0,0 @@
--- Compiled with roblox-ts v3.0.0
-local TS = _G[script]
-local exports = {}
-local _reorder = TS.import(script, script, "reorder")
-exports.hitRect = _reorder.hitRect
-exports.isReorderMove = _reorder.isReorderMove
-exports.isReorderPress = _reorder.isReorderPress
-exports.isReorderRelease = _reorder.isReorderRelease
-exports.passedDragThreshold = _reorder.passedDragThreshold
-exports.placeItem = _reorder.placeItem
-exports.REORDER_THRESHOLD = _reorder.REORDER_THRESHOLD
-exports.transferId = _reorder.transferId
-exports.useReorderDrag = TS.import(script, script, "useReorderDrag").useReorderDrag
-return exports

package/out/ui/packages/reorder/reorder.d.ts

@@ -1,24 +0,0 @@
-export declare const REORDER_THRESHOLD = 6;
-export interface DragRect {
-    id: string;
-    x: number;
-    y: number;
-    width: number;
-    height: number;
-}
-export declare function isReorderPress(kind: Enum.UserInputType): boolean;
-export declare function isReorderMove(kind: Enum.UserInputType): boolean;
-export declare function isReorderRelease(kind: Enum.UserInputType): boolean;
-export declare function passedDragThreshold(startX: number, startY: number, x: number, y: number, threshold?: number): boolean;
-/** Smallest rect containing the point wins, so a card beats the column behind it. */
-export declare function hitRect(rects: readonly DragRect[], x: number, y: number): string | undefined;
-/** Final index after the move. Out-of-range or a no-op returns a copy. */
-export declare function placeItem<T extends defined>(items: readonly T[], from: number, to: number): T[];
-/**
- * Insert `id` at `index` in `dest` and remove it from `source`.
- * The same list uses placeItem, where index is the final index.
- */
-export declare function transferId(source: readonly string[], dest: readonly string[], id: string, index: number): {
-    source: string[];
-    dest: string[];
-};

package/out/ui/packages/reorder/reorder.luau

@@ -1,178 +0,0 @@
--- Compiled with roblox-ts v3.0.0
-local REORDER_THRESHOLD = 6
-local function isReorderPress(kind)
-	return kind == Enum.UserInputType.MouseButton1 or kind == Enum.UserInputType.Touch
-end
-local function isReorderMove(kind)
-	return kind == Enum.UserInputType.MouseMovement or kind == Enum.UserInputType.Touch
-end
-local function isReorderRelease(kind)
-	return kind == Enum.UserInputType.MouseButton1 or kind == Enum.UserInputType.Touch
-end
-local function passedDragThreshold(startX, startY, x, y, threshold)
-	if threshold == nil then
-		threshold = REORDER_THRESHOLD
-	end
-	local dx = x - startX
-	local dy = y - startY
-	return dx * dx + dy * dy >= threshold * threshold
-end
---* Smallest rect containing the point wins, so a card beats the column behind it. 
-local function hitRect(rects, x, y)
-	local best
-	local bestArea = math.huge
-	for _, rect in rects do
-		if x < rect.x or y < rect.y or x > rect.x + rect.width or y > rect.y + rect.height then
-			continue
-		end
-		local area = rect.width * rect.height
-		if area < bestArea then
-			best = rect
-			bestArea = area
-		end
-	end
-	local _result = best
-	if _result ~= nil then
-		_result = _result.id
-	end
-	return _result
-end
---* Final index after the move. Out-of-range or a no-op returns a copy. 
-local function placeItem(items, from, to)
-	local listed = {}
-	for _, item in items do
-		table.insert(listed, item)
-	end
-	local count = #listed
-	if from < 0 or to < 0 or from >= count or to >= count or from == to then
-		return listed
-	end
-	local moved = listed[from + 1]
-	if from < to then
-		do
-			local index = from
-			local _shouldIncrement = false
-			while true do
-				if _shouldIncrement then
-					index += 1
-				else
-					_shouldIncrement = true
-				end
-				if not (index < to) then
-					break
-				end
-				listed[index + 1] = listed[index + 2]
-			end
-		end
-	else
-		do
-			local index = from
-			local _shouldIncrement = false
-			while true do
-				if _shouldIncrement then
-					index -= 1
-				else
-					_shouldIncrement = true
-				end
-				if not (index > to) then
-					break
-				end
-				listed[index + 1] = listed[index]
-			end
-		end
-	end
-	listed[to + 1] = moved
-	return listed
-end
-local function indexOfId(ids, id)
-	for index = 0, #ids - 1 do
-		if ids[index + 1] == id then
-			return index
-		end
-	end
-	return -1
-end
---[[
-	*
-	 * Insert `id` at `index` in `dest` and remove it from `source`.
-	 * The same list uses placeItem, where index is the final index.
-	 
-]]
-local function transferId(source, dest, id, index)
-	if source == dest then
-		local placed = placeItem(source, indexOfId(source, id), math.clamp(index, 0, math.max(0, #source - 1)))
-		return {
-			source = placed,
-			dest = placed,
-		}
-	end
-	local nextSource = {}
-	local found = false
-	for _, item in source do
-		if item == id then
-			found = true
-		else
-			table.insert(nextSource, item)
-		end
-	end
-	local nextDest = {}
-	for _, item in dest do
-		table.insert(nextDest, item)
-	end
-	if not found then
-		return {
-			source = nextSource,
-			dest = nextDest,
-		}
-	end
-	local at = math.clamp(math.floor(index), 0, #nextDest)
-	local inserted = {}
-	do
-		local cursor = 0
-		local _shouldIncrement = false
-		while true do
-			if _shouldIncrement then
-				cursor += 1
-			else
-				_shouldIncrement = true
-			end
-			if not (cursor < at) then
-				break
-			end
-			local _arg0 = nextDest[cursor + 1]
-			table.insert(inserted, _arg0)
-		end
-	end
-	local _id = id
-	table.insert(inserted, _id)
-	do
-		local cursor = at
-		local _shouldIncrement = false
-		while true do
-			if _shouldIncrement then
-				cursor += 1
-			else
-				_shouldIncrement = true
-			end
-			if not (cursor < #nextDest) then
-				break
-			end
-			local _arg0 = nextDest[cursor + 1]
-			table.insert(inserted, _arg0)
-		end
-	end
-	return {
-		source = nextSource,
-		dest = inserted,
-	}
-end
-return {
-	isReorderPress = isReorderPress,
-	isReorderMove = isReorderMove,
-	isReorderRelease = isReorderRelease,
-	passedDragThreshold = passedDragThreshold,
-	hitRect = hitRect,
-	placeItem = placeItem,
-	transferId = transferId,
-	REORDER_THRESHOLD = REORDER_THRESHOLD,
-}

package/out/ui/packages/reorder/useReorderDrag.d.ts

@@ -1,15 +0,0 @@
-import { DragRect } from "./reorder";
-export interface ReorderDragState {
-    active: boolean;
-    id?: string;
-    overId?: string;
-    x: number;
-    y: number;
-}
-export interface ReorderDragHandle {
-    drag: ReorderDragState;
-    begin: (id: string, input: InputObject) => boolean;
-    cancel: () => void;
-    suppressClick: () => boolean;
-}
-export declare function useReorderDrag(onDrop: (fromId: string, overId?: string) => void, getRects: () => readonly DragRect[]): ReorderDragHandle;