merging tests
This commit is contained in:
Michael Freno
@@ -396,11 +396,6 @@ function TestElementFlex:test_element_with_gap()
|
||||
luaunit.assertEquals(element.gap, 10)
|
||||
end
|
||||
|
||||
-- Run tests if this file is executed directly
|
||||
if not _G.RUNNING_ALL_TESTS then
|
||||
os.exit(luaunit.LuaUnit.run())
|
||||
end
|
||||
|
||||
-- Test suite for Element styling properties
|
||||
TestElementStyling = {}
|
||||
|
||||
@@ -532,4 +527,703 @@ function TestElementMethods:test_element_addChild()
|
||||
luaunit.assertEquals(parent.children[1], child)
|
||||
luaunit.assertEquals(child.parent, parent)
|
||||
end
|
||||
-- Test suite for scroll-related functions
|
||||
TestElementScroll = {}
|
||||
|
||||
function TestElementScroll:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementScroll:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollable_element_with_overflow()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
luaunit.assertNotNil(element)
|
||||
luaunit.assertEquals(element.overflow, "scroll")
|
||||
luaunit.assertNotNil(element._scrollManager)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_setScrollPosition()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
element:setScrollPosition(50, 100)
|
||||
local scrollX, scrollY = element:getScrollPosition()
|
||||
|
||||
-- Note: actual scroll may be clamped based on content
|
||||
luaunit.assertNotNil(scrollX)
|
||||
luaunit.assertNotNil(scrollY)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollBy()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
local initialX, initialY = element:getScrollPosition()
|
||||
element:scrollBy(10, 20)
|
||||
local newX, newY = element:getScrollPosition()
|
||||
|
||||
luaunit.assertNotNil(newX)
|
||||
luaunit.assertNotNil(newY)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollToTop()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
element:scrollToTop()
|
||||
local _, scrollY = element:getScrollPosition()
|
||||
luaunit.assertEquals(scrollY, 0)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollToBottom()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
element:scrollToBottom()
|
||||
-- Bottom position depends on content, just verify it doesn't error
|
||||
local _, scrollY = element:getScrollPosition()
|
||||
luaunit.assertNotNil(scrollY)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollToLeft()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
element:scrollToLeft()
|
||||
local scrollX, _ = element:getScrollPosition()
|
||||
luaunit.assertEquals(scrollX, 0)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_scrollToRight()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
element:scrollToRight()
|
||||
local scrollX, _ = element:getScrollPosition()
|
||||
luaunit.assertNotNil(scrollX)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_getMaxScroll()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
local maxX, maxY = element:getMaxScroll()
|
||||
luaunit.assertNotNil(maxX)
|
||||
luaunit.assertNotNil(maxY)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_getScrollPercentage()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
local percentX, percentY = element:getScrollPercentage()
|
||||
luaunit.assertNotNil(percentX)
|
||||
luaunit.assertNotNil(percentY)
|
||||
luaunit.assertTrue(percentX >= 0 and percentX <= 1)
|
||||
luaunit.assertTrue(percentY >= 0 and percentY <= 1)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_hasOverflow()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
local hasOverflowX, hasOverflowY = element:hasOverflow()
|
||||
luaunit.assertNotNil(hasOverflowX)
|
||||
luaunit.assertNotNil(hasOverflowY)
|
||||
end
|
||||
|
||||
function TestElementScroll:test_getContentSize()
|
||||
local element = FlexLove.new({
|
||||
id = "scrollable",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200,
|
||||
overflow = "scroll"
|
||||
})
|
||||
|
||||
local contentWidth, contentHeight = element:getContentSize()
|
||||
luaunit.assertNotNil(contentWidth)
|
||||
luaunit.assertNotNil(contentHeight)
|
||||
end
|
||||
|
||||
-- Test suite for element geometry and bounds
|
||||
TestElementGeometry = {}
|
||||
|
||||
function TestElementGeometry:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementGeometry:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getBounds()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 10,
|
||||
y = 20,
|
||||
width = 100,
|
||||
height = 50
|
||||
})
|
||||
|
||||
local bounds = element:getBounds()
|
||||
luaunit.assertEquals(bounds.x, 10)
|
||||
luaunit.assertEquals(bounds.y, 20)
|
||||
luaunit.assertEquals(bounds.width, 100)
|
||||
luaunit.assertEquals(bounds.height, 50)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_contains_point_inside()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 10,
|
||||
y = 20,
|
||||
width = 100,
|
||||
height = 50
|
||||
})
|
||||
|
||||
luaunit.assertTrue(element:contains(50, 40))
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_contains_point_outside()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 10,
|
||||
y = 20,
|
||||
width = 100,
|
||||
height = 50
|
||||
})
|
||||
|
||||
luaunit.assertFalse(element:contains(200, 200))
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getBorderBoxWidth_no_border()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 50
|
||||
})
|
||||
|
||||
local borderBoxWidth = element:getBorderBoxWidth()
|
||||
luaunit.assertEquals(borderBoxWidth, 100)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getBorderBoxHeight_no_border()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 50
|
||||
})
|
||||
|
||||
local borderBoxHeight = element:getBorderBoxHeight()
|
||||
luaunit.assertEquals(borderBoxHeight, 50)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getBorderBoxWidth_with_border()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 50,
|
||||
border = { left = 2, right = 2, top = 0, bottom = 0 }
|
||||
})
|
||||
|
||||
local borderBoxWidth = element:getBorderBoxWidth()
|
||||
-- Width includes left + right borders
|
||||
luaunit.assertTrue(borderBoxWidth >= 100)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getAvailableContentWidth()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 100,
|
||||
padding = { top = 10, right = 10, bottom = 10, left = 10 }
|
||||
})
|
||||
|
||||
local availWidth = element:getAvailableContentWidth()
|
||||
luaunit.assertNotNil(availWidth)
|
||||
-- Should be less than total width due to padding
|
||||
luaunit.assertTrue(availWidth <= 200)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getAvailableContentHeight()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 100,
|
||||
padding = { top = 10, right = 10, bottom = 10, left = 10 }
|
||||
})
|
||||
|
||||
local availHeight = element:getAvailableContentHeight()
|
||||
luaunit.assertNotNil(availHeight)
|
||||
-- Should be less than total height due to padding
|
||||
luaunit.assertTrue(availHeight <= 100)
|
||||
end
|
||||
|
||||
function TestElementGeometry:test_getScaledContentPadding()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 100,
|
||||
padding = { top = 10, right = 10, bottom = 10, left = 10 }
|
||||
})
|
||||
|
||||
local padding = element:getScaledContentPadding()
|
||||
-- May be nil if no theme component with contentPadding
|
||||
if padding then
|
||||
luaunit.assertNotNil(padding.top)
|
||||
luaunit.assertNotNil(padding.right)
|
||||
luaunit.assertNotNil(padding.bottom)
|
||||
luaunit.assertNotNil(padding.left)
|
||||
end
|
||||
end
|
||||
|
||||
-- Test suite for child management
|
||||
TestElementChildren = {}
|
||||
|
||||
function TestElementChildren:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementChildren:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementChildren:test_addChild()
|
||||
local parent = FlexLove.new({
|
||||
id = "parent",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200
|
||||
})
|
||||
|
||||
local child = FlexLove.new({
|
||||
id = "child",
|
||||
x = 10,
|
||||
y = 10,
|
||||
width = 50,
|
||||
height = 50
|
||||
})
|
||||
|
||||
parent:addChild(child)
|
||||
luaunit.assertEquals(#parent.children, 1)
|
||||
luaunit.assertEquals(parent.children[1], child)
|
||||
luaunit.assertEquals(child.parent, parent)
|
||||
end
|
||||
|
||||
function TestElementChildren:test_removeChild()
|
||||
local parent = FlexLove.new({
|
||||
id = "parent",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200
|
||||
})
|
||||
|
||||
local child = FlexLove.new({
|
||||
id = "child",
|
||||
x = 10,
|
||||
y = 10,
|
||||
width = 50,
|
||||
height = 50
|
||||
})
|
||||
|
||||
parent:addChild(child)
|
||||
parent:removeChild(child)
|
||||
|
||||
luaunit.assertEquals(#parent.children, 0)
|
||||
luaunit.assertNil(child.parent)
|
||||
end
|
||||
|
||||
function TestElementChildren:test_clearChildren()
|
||||
local parent = FlexLove.new({
|
||||
id = "parent",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200
|
||||
})
|
||||
|
||||
local child1 = FlexLove.new({ id = "child1", x = 0, y = 0, width = 50, height = 50 })
|
||||
local child2 = FlexLove.new({ id = "child2", x = 0, y = 0, width = 50, height = 50 })
|
||||
|
||||
parent:addChild(child1)
|
||||
parent:addChild(child2)
|
||||
parent:clearChildren()
|
||||
|
||||
luaunit.assertEquals(#parent.children, 0)
|
||||
end
|
||||
|
||||
function TestElementChildren:test_getChildCount()
|
||||
local parent = FlexLove.new({
|
||||
id = "parent",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200
|
||||
})
|
||||
|
||||
local child1 = FlexLove.new({ id = "child1", x = 0, y = 0, width = 50, height = 50 })
|
||||
local child2 = FlexLove.new({ id = "child2", x = 0, y = 0, width = 50, height = 50 })
|
||||
|
||||
parent:addChild(child1)
|
||||
parent:addChild(child2)
|
||||
|
||||
luaunit.assertEquals(parent:getChildCount(), 2)
|
||||
end
|
||||
|
||||
-- Test suite for element visibility and opacity
|
||||
TestElementVisibility = {}
|
||||
|
||||
function TestElementVisibility:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementVisibility:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementVisibility:test_visibility_visible()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
visibility = "visible"
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.visibility, "visible")
|
||||
end
|
||||
|
||||
function TestElementVisibility:test_visibility_hidden()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
visibility = "hidden"
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.visibility, "hidden")
|
||||
end
|
||||
|
||||
function TestElementVisibility:test_opacity_default()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.opacity, 1)
|
||||
end
|
||||
|
||||
function TestElementVisibility:test_opacity_custom()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
opacity = 0.5
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.opacity, 0.5)
|
||||
end
|
||||
|
||||
-- Test suite for text editing
|
||||
TestElementTextEditing = {}
|
||||
|
||||
function TestElementTextEditing:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementTextEditing:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementTextEditing:test_editable_element()
|
||||
local element = FlexLove.new({
|
||||
id = "input",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 40,
|
||||
editable = true,
|
||||
text = "Edit me"
|
||||
})
|
||||
|
||||
luaunit.assertTrue(element.editable)
|
||||
luaunit.assertNotNil(element._textEditor)
|
||||
end
|
||||
|
||||
function TestElementTextEditing:test_placeholder_text()
|
||||
local element = FlexLove.new({
|
||||
id = "input",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 40,
|
||||
editable = true,
|
||||
placeholder = "Enter text..."
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.placeholder, "Enter text...")
|
||||
end
|
||||
|
||||
-- Test suite for additional element features
|
||||
TestElementAdditional = {}
|
||||
|
||||
function TestElementAdditional:setUp()
|
||||
FlexLove.beginFrame(1920, 1080)
|
||||
end
|
||||
|
||||
function TestElementAdditional:tearDown()
|
||||
FlexLove.endFrame()
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_z_index()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
z = 10
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.z, 10)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_text()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
text = "Hello World"
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.text, "Hello World")
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_text_color()
|
||||
local Color = require("modules.Color")
|
||||
local textColor = Color.new(255, 0, 0, 1)
|
||||
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
text = "Red text",
|
||||
textColor = textColor
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.textColor, textColor)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_background_color()
|
||||
local Color = require("modules.Color")
|
||||
local bgColor = Color.new(0, 0, 255, 1)
|
||||
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
backgroundColor = bgColor
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.backgroundColor, bgColor)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_corner_radius()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
cornerRadius = 10
|
||||
})
|
||||
|
||||
luaunit.assertNotNil(element.cornerRadius)
|
||||
luaunit.assertEquals(element.cornerRadius.topLeft, 10)
|
||||
luaunit.assertEquals(element.cornerRadius.topRight, 10)
|
||||
luaunit.assertEquals(element.cornerRadius.bottomLeft, 10)
|
||||
luaunit.assertEquals(element.cornerRadius.bottomRight, 10)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_margin()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
margin = { top = 5, right = 10, bottom = 5, left = 10 }
|
||||
})
|
||||
|
||||
luaunit.assertNotNil(element.margin)
|
||||
luaunit.assertEquals(element.margin.top, 5)
|
||||
luaunit.assertEquals(element.margin.right, 10)
|
||||
luaunit.assertEquals(element.margin.bottom, 5)
|
||||
luaunit.assertEquals(element.margin.left, 10)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_destroy()
|
||||
local parent = FlexLove.new({
|
||||
id = "parent",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 200,
|
||||
height = 200
|
||||
})
|
||||
|
||||
local child = FlexLove.new({
|
||||
id = "child",
|
||||
parent = parent,
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 50,
|
||||
height = 50
|
||||
})
|
||||
|
||||
luaunit.assertEquals(#parent.children, 1)
|
||||
child:destroy()
|
||||
luaunit.assertNil(child.parent)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_disabled()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
disabled = true
|
||||
})
|
||||
|
||||
luaunit.assertTrue(element.disabled)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_active()
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
active = true
|
||||
})
|
||||
|
||||
luaunit.assertTrue(element.active)
|
||||
end
|
||||
|
||||
function TestElementAdditional:test_element_with_userdata()
|
||||
local customData = { foo = "bar", count = 42 }
|
||||
|
||||
local element = FlexLove.new({
|
||||
id = "test",
|
||||
x = 0,
|
||||
y = 0,
|
||||
width = 100,
|
||||
height = 100,
|
||||
userdata = customData
|
||||
})
|
||||
|
||||
luaunit.assertEquals(element.userdata, customData)
|
||||
luaunit.assertEquals(element.userdata.foo, "bar")
|
||||
luaunit.assertEquals(element.userdata.count, 42)
|
||||
end
|
||||
|
||||
|
||||
if not _G.RUNNING_ALL_TESTS then
|
||||
os.exit(luaunit.LuaUnit.run())
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user