-- love.graphics


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
------------------------------------OBJECTS-------------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- GraphicsBuffer (love.graphics.newBuffer)
love.test.graphics.Buffer = function(test)

  -- setup vertex data and create some buffers
  local vertexformat = {
    {name="VertexPosition", format="floatvec2", location=0},
    {name="VertexTexCoord", format="floatvec2", location=1},
    {name="VertexColor", format="unorm8vec4", location=2},
  }
  local vertexdata = {
    {0,  0,  0, 0, 1, 0, 1, 1},
    {10, 0,  1, 0, 0, 1, 1, 1},
    {10, 10, 1, 1, 0, 0, 1, 1},
    {0,  10, 0, 1, 1, 0, 0, 1},
  }
  local flatvertexdata = {}
  for i, vert in ipairs(vertexdata) do
    for j, v in ipairs(vert) do
      table.insert(flatvertexdata, v)
    end
  end
  local vertexbuffer1 = love.graphics.newBuffer(vertexformat, 4, {vertex=true, debugname='testvertexbuffer'})
  local vertexbuffer2 = love.graphics.newBuffer(vertexformat, vertexdata, {vertex=true})
  test:assertObject(vertexbuffer1)
  test:assertObject(vertexbuffer2)

  -- check buffer properties
  test:assertEquals(4, vertexbuffer1:getElementCount(), 'check vertex count 1')
  test:assertEquals(4, vertexbuffer2:getElementCount(), 'check vertex count 2')
  -- vertex buffers have their elements tightly packed.
  test:assertEquals(20, vertexbuffer1:getElementStride(), 'check vertex array stride')
  test:assertEquals(20 * 4, vertexbuffer1:getSize(), 'check vertex buffer size')
  vertexbuffer1:setArrayData(vertexdata)
  vertexbuffer1:setArrayData(flatvertexdata)
  vertexbuffer1:clear(8, 8) -- partial clear (the first texcoord)

  -- check buffer types
  test:assertTrue(vertexbuffer1:isBufferType('vertex'), 'check is vertex buffer')
  test:assertFalse(vertexbuffer1:isBufferType('index'), 'check is not index buffer')
  test:assertFalse(vertexbuffer1:isBufferType('texel'), 'check is not texel buffer')
  test:assertFalse(vertexbuffer1:isBufferType('shaderstorage'), 'check is not shader storage buffer')

  -- check debug name
  test:assertEquals('testvertexbuffer', vertexbuffer1:getDebugName(), 'check buffer debug name')

  -- check buffer format and format properties
  local format = vertexbuffer1:getFormat()
  test:assertEquals('table', type(format), 'check buffer format is table')
  test:assertEquals(#vertexformat, #format, 'check buffer format length')
  for i, v in ipairs(vertexformat) do
    test:assertEquals(v.name, format[i].name, string.format('check buffer format %d name', i))
    test:assertEquals(v.format, format[i].format, string.format('check buffer format %d format', i))
    test:assertEquals(0, format[i].arraylength, string.format('check buffer format %d array length', i))
    test:assertNotNil(format[i].offset)
  end

  -- check index buffer
  local indexbuffer = love.graphics.newBuffer('uint16', 128, {index=true})
  test:assertTrue(indexbuffer:isBufferType('index'), 'check is index buffer')

end


-- Shader Storage GraphicsBuffer (love.graphics.newBuffer)
-- Separated from the above test so we can skip it when they aren't supported.
love.test.graphics.ShaderStorageBuffer = function(test)
  if not love.graphics.getSupported().glsl4 then
    test:skipTest('GLSL 4 and shader storage buffers are not supported on this system')
    return
  end

  -- setup buffer
  local format = {
    { name="1", format="float" },
    { name="2", format="floatmat4x4" },
    { name="3", format="floatvec2" }
  }
  local buffer = love.graphics.newBuffer(format, 1, {shaderstorage = true})
  test:assertEquals(96, buffer:getElementStride(), 'check shader storage buffer element stride')

  -- set new data
  local data = {}
  for i = 1, 19 do
    data[i] = 0
  end
  buffer:setArrayData(data)

end


-- Canvas (love.graphics.newCanvas)
love.test.graphics.Canvas = function(test)

  -- create canvas with defaults
  local canvas = love.graphics.newCanvas(100, 100, {
    type = '2d',
    format = 'normal',
    readable = true,
    msaa = 0,
    dpiscale = love.graphics.getDPIScale(),
    mipmaps = 'auto',
    debugname = 'testcanvas'
  })
  test:assertObject(canvas)
  test:assertTrue(canvas:isCanvas(), 'check is canvas')
  test:assertFalse(canvas:isComputeWritable(), 'check not compute writable')

  -- check dpi
  test:assertEquals(love.graphics.getDPIScale(), canvas:getDPIScale(), 'check dpi scale')

  -- check depth
  test:assertEquals(1, canvas:getDepth(), 'check depth is 2d')
  test:assertEquals(nil, canvas:getDepthSampleMode(), 'check depth sample nil')

  local maxanisotropy = love.graphics.getSystemLimits().anisotropy

  -- check fliter
  local min1, mag1, ani1 = canvas:getFilter()
  test:assertEquals('nearest', min1, 'check filter def min')
  test:assertEquals('nearest', mag1, 'check filter def mag')
  test:assertEquals(1, ani1, 'check filter def ani')
  canvas:setFilter('linear', 'linear', 2)
  local min2, mag2, ani2 = canvas:getFilter()
  test:assertEquals('linear', min2, 'check filter changed min')
  test:assertEquals('linear', mag2, 'check filter changed mag')
  test:assertEquals(math.min(maxanisotropy, 2), ani2, 'check filter changed ani')

  -- check layer
  test:assertEquals(1, canvas:getLayerCount(), 'check 1 layer for 2d')

  -- check texture type
  test:assertEquals('2d', canvas:getTextureType(), 'check 2d')

  -- check texture wrap
  local horiz1, vert1 = canvas:getWrap()
  test:assertEquals('clamp', horiz1, 'check def wrap h')
  test:assertEquals('clamp', vert1, 'check def wrap v')
  canvas:setWrap('repeat', 'repeat')
  local horiz2, vert2 = canvas:getWrap()
  test:assertEquals('repeat', horiz2, 'check changed wrap h')
  test:assertEquals('repeat', vert2, 'check changed wrap v')

    -- check readable
  test:assertTrue(canvas:isReadable(), 'check canvas readable')

  -- check msaa
  test:assertEquals(1, canvas:getMSAA(), 'check samples match')

  -- check dimensions
  local cw, ch = canvas:getDimensions()
  test:assertEquals(100, cw, 'check canvas dim w')
  test:assertEquals(100, ch, 'check canvas dim h')
  test:assertEquals(cw, canvas:getWidth(), 'check canvas w matches dim')
  test:assertEquals(ch, canvas:getHeight(), 'check canvas h matches dim')
  local pw, ph = canvas:getPixelDimensions()
  test:assertEquals(100*love.graphics.getDPIScale(), pw, 'check pixel dim w')
  test:assertEquals(100*love.graphics.getDPIScale(), ph, 'check pixel dim h')
  test:assertEquals(pw, canvas:getPixelWidth(), 'check pixel w matches dim')
  test:assertEquals(ph, canvas:getPixelHeight(), 'check pixel h matches dim')

  -- check mipmaps
  local mode, sharpness = canvas:getMipmapFilter()
  test:assertEquals('linear', mode, 'check def minmap filter  mode')
  test:assertEquals(0, sharpness, 'check def minmap filter sharpness')
  local name, version, vendor, device = love.graphics.getRendererInfo()
  canvas:setMipmapFilter('nearest', 1)
  mode, sharpness = canvas:getMipmapFilter()
  test:assertEquals('nearest', mode, 'check changed minmap filter  mode')
  -- @NOTE mipmap sharpness wont work on opengl/metal
  if string.match(name, 'OpenGL ES') == nil and string.match(name, 'Metal') == nil then
    test:assertEquals(1, sharpness, 'check changed minmap filter sharpness')
  end
  test:assertGreaterEqual(2, canvas:getMipmapCount()) -- docs say no mipmaps should return 1
  test:assertEquals('auto', canvas:getMipmapMode())

  -- check debug name
  test:assertEquals('testcanvas', canvas:getDebugName())

  -- check basic rendering
  canvas:renderTo(function()
    love.graphics.setColor(1, 0, 0)
    love.graphics.rectangle('fill', 0, 0, 200, 200)
    love.graphics.setColor(1, 1, 1, 1)
  end)
  local imgdata1 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata1)

  -- check using canvas in love.graphics.draw()
  local xcanvas = love.graphics.newCanvas()
  love.graphics.setCanvas(xcanvas)
    love.graphics.draw(canvas, 0, 0)
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata2)

  -- check y-down
  local shader1 = love.graphics.newShader[[
    vec4 effect(vec4 c, Image tex, vec2 tc, vec2 pc) {
      return tc.y > 0.5 ? vec4(1.0, 0.0, 0.0, 1.0) : vec4(0.0, 1.0, 0.0, 1.0);
    }
  ]]
  local shader2 = love.graphics.newShader[[
    vec4 effect(vec4 c, Image tex, vec2 tc, vec2 pc) {
      // rounding during quantization from float to unorm8 doesn't seem to be
      // totally consistent across devices, lets do it ourselves.
      highp vec2 value = pc / love_ScreenSize.xy;
      highp vec2 quantized = (floor(255.0 * value + 0.5) + 0.1) / 255.0;
      return vec4(quantized, 0.0, 1.0);
    }
  ]]
  local img = love.graphics.newImage(love.image.newImageData(1, 1))

  love.graphics.push("all")
    love.graphics.setCanvas(canvas)
    love.graphics.setShader(shader1)
    love.graphics.draw(img, 0, 0, 0, canvas:getDimensions())
  love.graphics.pop()
  local imgdata3 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata3)

  love.graphics.push("all")
    love.graphics.setCanvas(canvas)
    love.graphics.setShader(shader2)
    love.graphics.draw(img, 0, 0, 0, canvas:getDimensions())
  love.graphics.pop()
  local imgdata4 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata4)


  -- check depth samples
  local dcanvas = love.graphics.newCanvas(100, 100, {
    type = '2d',
    format = 'depth16',
    readable = true
  })
  test:assertEquals(nil, dcanvas:getDepthSampleMode(), 'check depth sample mode nil by def')
  dcanvas:setDepthSampleMode('equal')
  test:assertEquals('equal', dcanvas:getDepthSampleMode(), 'check depth sample mode set')

  -- check compute writeable (wont work on opengl mac)
  if love.graphics.getSupported().glsl4 then
    local ccanvas = love.graphics.newCanvas(100, 100, {
      type = '2d',
      format = 'rgba8',
      computewrite = true
    })
    test:assertTrue(ccanvas:isComputeWritable())
  end

end


-- Font (love.graphics.newFont)
love.test.graphics.Font = function(test)

  -- create obj
  local font = love.graphics.newFont('resources/font.ttf', 8)
  test:assertObject(font)

  -- check ascent/descent
  test:assertEquals(6, font:getAscent(), 'check ascent')
  test:assertEquals(-2, font:getDescent(), 'check descent')

  -- check baseline
  test:assertEquals(6, font:getBaseline(), 'check baseline')

  -- check dpi 
  test:assertEquals(1, font:getDPIScale(), 'check dpi')

  -- check filter
  test:assertEquals('nearest', font:getFilter(), 'check filter def')
  font:setFilter('linear', 'linear')
  test:assertEquals('linear', font:getFilter(), 'check filter change')
  font:setFilter('nearest', 'nearest')

  -- check height + lineheight
  test:assertEquals(8, font:getHeight(), 'check height')
  test:assertEquals(1, font:getLineHeight(), 'check line height')
  font:setLineHeight(2)
  test:assertEquals(2, font:getLineHeight(), 'check changed line height')
  font:setLineHeight(1) -- reset for drawing + wrap later

  -- check width + kerning
  test:assertEquals(0, font:getKerning('a', 'b'), 'check kerning')
  test:assertEquals(24, font:getWidth('test'), 'check data size')

  -- check specific glyphs
  test:assertTrue(font:hasGlyphs('test'), 'check data size')

  -- check font wrapping
  local width, wrappedtext = font:getWrap('LÖVE is an *awesome* framework you can use to make 2D games in Lua.', 50)
  test:assertEquals(48, width, 'check actual wrap width')
  test:assertEquals(8, #wrappedtext, 'check wrapped lines')
  test:assertEquals('LÖVE is an ', wrappedtext[1], 'check wrapped line')

  -- check drawing font 
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.setFont(font)
    love.graphics.print('Aa', 0, 5)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)

  -- check font substitution
  local fontab = love.graphics.newImageFont('resources/font-letters-ab.png', 'AB')
  local fontcd = love.graphics.newImageFont('resources/font-letters-cd.png', 'CD')
  fontab:setFallbacks(fontcd)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 0)
    love.graphics.setFont(fontab)
    love.graphics.print('AB', 0, 0) -- should come from fontab
    love.graphics.print('CD', 0, 9) -- should come from fontcd
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata2)

end


-- Image (love.graphics.newImage)
love.test.graphics.Image = function(test)

  -- create object
  local image = love.graphics.newImage('resources/love.png', {
    dpiscale = 1,
    mipmaps = true
  })
  test:assertObject(image)
  test:assertFalse(image:isCanvas(), 'check not canvas')
  test:assertFalse(image:isComputeWritable(), 'check not compute writable')

  -- check dpi
  test:assertEquals(love.graphics.getDPIScale(), image:getDPIScale(), 'check dpi scale')

  -- check depth
  test:assertEquals(1, image:getDepth(), 'check depth is 2d')
  test:assertEquals(nil, image:getDepthSampleMode(), 'check depth sample nil')

  local maxanisotropy = love.graphics.getSystemLimits().anisotropy

  -- check filter
  local min1, mag1, ani1 = image:getFilter()
  test:assertEquals('nearest', min1, 'check filter def min')
  test:assertEquals('nearest', mag1, 'check filter def mag')
  test:assertEquals(1, ani1, 'check filter def ani')
  image:setFilter('linear', 'linear', 2)
  local min2, mag2, ani2 = image:getFilter()
  test:assertEquals('linear', min2, 'check filter changed min')
  test:assertEquals('linear', mag2, 'check filter changed mag')
  test:assertEquals(math.min(maxanisotropy, 2), ani2, 'check filter changed ani')
  image:setFilter('nearest', 'nearest', 1)

  -- check layers
  test:assertEquals(1, image:getLayerCount(), 'check 1 layer for 2d')

  -- check texture type
  test:assertEquals('2d', image:getTextureType(), 'check 2d')

  -- check texture wrapping
  local horiz1, vert1 = image:getWrap()
  test:assertEquals('clamp', horiz1, 'check def wrap h')
  test:assertEquals('clamp', vert1, 'check def wrap v')
  image:setWrap('repeat', 'repeat')
  local horiz2, vert2 = image:getWrap()
  test:assertEquals('repeat', horiz2, 'check changed wrap h')
  test:assertEquals('repeat', vert2, 'check changed wrap v')

    -- check readable
  test:assertTrue(image:isReadable(), 'check canvas readable')

  -- check msaa
  test:assertEquals(1, image:getMSAA(), 'check samples match')

  -- check dimensions
  local cw, ch = image:getDimensions()
  test:assertEquals(64, cw, 'check canvas dim w')
  test:assertEquals(64, ch, 'check canvas dim h')
  test:assertEquals(cw, image:getWidth(), 'check canvas w matches dim')
  test:assertEquals(ch, image:getHeight(), 'check canvas h matches dim')
  local pw, ph = image:getPixelDimensions()
  test:assertEquals(64*love.graphics.getDPIScale(), pw, 'check pixel dim w')
  test:assertEquals(64*love.graphics.getDPIScale(), ph, 'check pixel dim h')
  test:assertEquals(pw, image:getPixelWidth(), 'check pixel w matches dim')
  test:assertEquals(ph, image:getPixelHeight(), 'check pixel h matches dim')

  -- check mipmaps
  local mode, sharpness = image:getMipmapFilter()
  test:assertEquals('linear', mode, 'check def minmap filter  mode')
  test:assertEquals(0, sharpness, 'check def minmap filter sharpness')
  local name, version, vendor, device = love.graphics.getRendererInfo()
  -- @note mipmap sharpness wont work on opengl/metal
  image:setMipmapFilter('nearest', 1)
  mode, sharpness = image:getMipmapFilter()
  test:assertEquals('nearest', mode, 'check changed minmap filter  mode')
  if string.match(name, 'OpenGL ES') == nil and string.match(name, 'Metal') == nil then
    test:assertEquals(1, sharpness, 'check changed minmap filter sharpness')
  end
  test:assertGreaterEqual(2, image:getMipmapCount()) -- docs say no mipmaps should return 1?

  -- check image properties
  test:assertFalse(image:isCompressed(), 'check not compressed')
  test:assertFalse(image:isFormatLinear(), 'check not linear')
  local cimage = love.graphics.newImage('resources/love.dxt1')
  test:assertObject(cimage)
  test:assertTrue(cimage:isCompressed(), 'check is compressed')

  -- check pixel replacement
  local rimage = love.image.newImageData('resources/loveinv.png')
  image:replacePixels(rimage)
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.draw(image, 0, 0)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  local r1, g1, b1 = imgdata:getPixel(25, 25)
  test:assertEquals(3, r1+g1+b1, 'check back to white')
  test:compareImg(imgdata)

end


-- Mesh (love.graphics.newMesh)
love.test.graphics.Mesh = function(test)

  -- create 2d mesh with pretty colors
  local image = love.graphics.newImage('resources/love.png')
  local vertices = {
		{ 0, 0, 0, 0, 1, 0, 0 },
		{ image:getWidth(), 0, 1, 0, 0, 1, 0 },
		{ image:getWidth(), image:getHeight(), 1, 1, 0, 0, 1 },
		{ 0, image:getHeight(), 0, 1, 1, 1, 0 },
  }
  local mesh1 = love.graphics.newMesh(vertices, 'fan')
  test:assertObject(mesh1)

  -- check draw mode
  test:assertEquals('fan', mesh1:getDrawMode(), 'check draw mode')
  mesh1:setDrawMode('triangles')
  test:assertEquals('triangles', mesh1:getDrawMode(), 'check draw mode set')

  -- check draw range
  local min1, max1 = mesh1:getDrawRange()
  test:assertEquals(nil, min1, 'check draw range not set')
  mesh1:setDrawRange(1, 10)
  local min2, max2 = mesh1:getDrawRange()
  test:assertEquals(1, min2, 'check draw range set min')
  test:assertEquals(10, max2, 'check draw range set max')

  -- check texture pointer
  test:assertEquals(nil, mesh1:getTexture(), 'check no texture')
  mesh1:setTexture(image)
  test:assertEquals(image:getHeight(), mesh1:getTexture():getHeight(), 'check texture match w')
  test:assertEquals(image:getWidth(), mesh1:getTexture():getWidth(), 'check texture match h')

  -- check vertext count
  test:assertEquals(4, mesh1:getVertexCount(), 'check vertex count')

  -- check def vertex format
  local format = mesh1:getVertexFormat()
  test:assertEquals('floatvec2', format[2].format, 'check def vertex format 2')
  test:assertEquals('VertexColor', format[3].name, 'check def vertex format 3')

  -- check vertext attributes
  test:assertTrue(mesh1:isAttributeEnabled('VertexPosition'), 'check def attribute VertexPosition')
  test:assertTrue(mesh1:isAttributeEnabled('VertexTexCoord'), 'check def attribute VertexTexCoord')
  test:assertTrue(mesh1:isAttributeEnabled('VertexColor'), 'check def attribute VertexColor')
  mesh1:setAttributeEnabled('VertexPosition', false)
  mesh1:setAttributeEnabled('VertexTexCoord', false)
  mesh1:setAttributeEnabled('VertexColor', false)
  test:assertFalse(mesh1:isAttributeEnabled('VertexPosition'), 'check disable attribute VertexPosition')
  test:assertFalse(mesh1:isAttributeEnabled('VertexTexCoord'), 'check disable attribute VertexTexCoord')
  test:assertFalse(mesh1:isAttributeEnabled('VertexColor'), 'check disable attribute VertexColor')

  -- check vertex itself
  local x1, y1, u1, v1, r1, g1, b1, a1 = mesh1:getVertex(1)
  test:assertEquals(0, x1, 'check vertex props x')
  test:assertEquals(0, y1, 'check vertex props y')
  test:assertEquals(0, u1, 'check vertex props u')
  test:assertEquals(0, v1, 'check vertex props v')
  test:assertEquals(1, r1, 'check vertex props r')
  test:assertEquals(0, g1, 'check vertex props g')
  test:assertEquals(0, b1, 'check vertex props b')
  test:assertEquals(1, a1, 'check vertex props a')

  -- check setting a specific vertex
  mesh1:setVertex(2, image:getWidth(), 0, 1, 0, 0, 1, 1, 1)
  local x2, y2, u2, v2, r2, g2, b2, a2 = mesh1:getVertex(2)
  test:assertEquals(image:getWidth(), x2, 'check changed vertex props x')
  test:assertEquals(0, y2, 'check changed vertex props y')
  test:assertEquals(1, u2, 'check changed vertex props u')
  test:assertEquals(0, v2, 'check changed vertex props v')
  test:assertEquals(0, r2, 'check changed vertex props r')
  test:assertEquals(1, g2, 'check changed vertex props g')
  test:assertEquals(1, b2, 'check changed vertex props b')
  test:assertEquals(1, a2, 'check changed vertex props a')

  -- check setting a specific vertex attribute 
  local r3, g3, b3, a3  = mesh1:getVertexAttribute(3, 3)
  test:assertEquals(1, b3, 'check specific vertex color')
  mesh1:setVertexAttribute(4, 3, 1, 0, 1)
  local r4, g4, b4, a4  = mesh1:getVertexAttribute(4, 3)
  test:assertEquals(0, g4, 'check changed vertex color')

  -- check setting a vertice
  mesh1:setVertices(vertices)
  local r5, g5, b5, a5  = mesh1:getVertexAttribute(4, 3)
  local x6, y6, u6, v6, r6, g6, b6, a6 = mesh1:getVertex(2)
  test:assertEquals(1, g5, 'check reset vertex color 1')
  test:assertEquals(0, b5, 'check reset vertex color 2')

  -- check setting the vertex map 
  local vmap1 = mesh1:getVertexMap()
  test:assertEquals(nil, vmap1, 'check no map by def')
  mesh1:setVertexMap({4, 1, 2, 3})
  local vmap2 = mesh1:getVertexMap()
  test:assertEquals(4, #vmap2, 'check set map len')
  test:assertEquals(2, vmap2[3], 'check set map val')

  -- check using custom attributes
  local mesh2 = love.graphics.newMesh({
    { name = 'VertexPosition', format = 'floatvec2', location = 0},
    { name = 'VertexTexCoord', format = 'floatvec2', location = 1},
    { name = 'VertexColor', format = 'floatvec4', location = 2},
    { name = 'CustomValue1', format = 'floatvec2', location = 3},
    { name = 'CustomValue2', format = 'uint16', location = 4}
  }, {
		{ 0, 0, 0, 0, 1, 0, 0, 1, 2, 1, 1005 },
		{ image:getWidth(), 0, 1, 0, 0, 1, 0, 0, 2, 2, 2005 },
		{ image:getWidth(), image:getHeight(), 1, 1, 0, 0, 1, 0, 2, 3, 3005 },
		{ 0, image:getHeight(), 0, 1, 1, 1, 0, 0, 2, 4, 4005 },
  }, 'fan')
  local c1, c2 = mesh2:getVertexAttribute(1, 4)
  local c3 = mesh2:getVertexAttribute(1, 5)
  test:assertEquals(2, c1, 'check custom attribute val 1')
  test:assertEquals(1, c2, 'check custom attribute val 2')
  test:assertEquals(1005, c3, 'check custom attribute val 3')

  -- check attaching custom attribute + detaching
  mesh1:attachAttribute('CustomValue1', mesh2)
  test:assertTrue(mesh1:isAttributeEnabled('CustomValue1'), 'check custom attribute attached')
  mesh1:detachAttribute('CustomValue1')
  local obj, err = pcall(mesh1.isAttributeEnabled, mesh1, 'CustomValue1')
  test:assertNotEquals(nil, err, 'check attribute detached')
  mesh1:detachAttribute('VertexPosition')
  test:assertTrue(mesh1:isAttributeEnabled('VertexPosition'), 'check cant detach def attribute')

end


-- ParticleSystem (love.graphics.newParticleSystem)
love.test.graphics.ParticleSystem = function(test)

  -- create new system 
  local image = love.graphics.newImage('resources/pixel.png')
  local quad1 = love.graphics.newQuad(0, 0, 1, 1, image)
  local quad2 = love.graphics.newQuad(0, 0, 1, 1, image)
  local psystem = love.graphics.newParticleSystem(image, 1000)
  test:assertObject(psystem)

  -- check psystem state properties 
  psystem:start()
  psystem:update(1)
  test:assertTrue(psystem:isActive(), 'check active')
  test:assertFalse(psystem:isPaused(), 'checked not paused by def')
  test:assertFalse(psystem:hasRelativeRotation(), 'check rel rot def')
  psystem:pause()
  test:assertTrue(psystem:isPaused(), 'check now paused')
  test:assertFalse(psystem:isStopped(), 'check not stopped by def')
  psystem:stop()
  test:assertTrue(psystem:isStopped(), 'check now stopped')
  psystem:start()
  psystem:reset()
  
  -- check emitting some particles
  -- need to set a lifespan at minimum or none will be counted 
  local min, max = psystem:getParticleLifetime()
  test:assertEquals(0, min, 'check def lifetime min')
  test:assertEquals(0, max, 'check def lifetime max')
  psystem:setParticleLifetime(1, 2)
  psystem:emit(10)
  psystem:update(1)
  test:assertEquals(10, psystem:getCount(), 'check added particles')
  psystem:reset()
  test:assertEquals(0, psystem:getCount(), 'check reset')

  -- check setting colors
  local colors1 = {psystem:getColors()}
  test:assertEquals(1, #colors1, 'check 1 color by def')
  psystem:setColors(1, 1, 1, 1, 1, 0, 0, 1)
  local colors2 = {psystem:getColors()}
  test:assertEquals(2, #colors2, 'check set colors')
  test:assertEquals(1, colors2[2][1], 'check set color')

  -- check setting direction
  test:assertEquals(0, psystem:getDirection(), 'check def direction')
  psystem:setDirection(90 * (math.pi/180))
  test:assertEquals(math.floor(math.pi/2*100), math.floor(psystem:getDirection()*100), 'check set direction')

  -- check emission area options
  psystem:setEmissionArea('normal', 100, 50)
  psystem:setEmissionArea('ellipse', 100, 50)
  psystem:setEmissionArea('borderellipse', 100, 50)
  psystem:setEmissionArea('borderrectangle', 100, 50)
  psystem:setEmissionArea('none', 100, 50)
  psystem:setEmissionArea('uniform', 100, 50)
  local dist, dx, dy, angle, rel = psystem:getEmissionArea()
  test:assertEquals('uniform', dist, 'check emission area dist')
  test:assertEquals(100, dx, 'check emission area dx')
  test:assertEquals(50, dy, 'check emission area dy')
  test:assertEquals(0, angle, 'check emission area angle')
  test:assertFalse(rel, 'check emission area rel')

  -- check emission rate
  test:assertEquals(0, psystem:getEmissionRate(), 'check def emission rate')
  psystem:setEmissionRate(1)
  test:assertEquals(1, psystem:getEmissionRate(), 'check changed emission rate')

  -- check emission lifetime
  test:assertEquals(-1, psystem:getEmitterLifetime(), 'check def emitter life')
  psystem:setEmitterLifetime(10)
  test:assertEquals(10, psystem:getEmitterLifetime(), 'check changed emitter life')

  -- check insert mode
  test:assertEquals('top', psystem:getInsertMode(), 'check def insert mode')
  psystem:setInsertMode('bottom')
  psystem:setInsertMode('random')
  test:assertEquals('random', psystem:getInsertMode(), 'check change insert mode')

  -- check linear acceleration
  local xmin1, ymin1, xmax1, ymax1 = psystem:getLinearAcceleration()
  test:assertEquals(0, xmin1, 'check def lin acceleration xmin')
  test:assertEquals(0, ymin1, 'check def lin acceleration ymin')
  test:assertEquals(0, xmax1, 'check def lin acceleration xmax')
  test:assertEquals(0, ymax1, 'check def lin acceleration ymax')
  psystem:setLinearAcceleration(1, 2, 3, 4)
  local xmin2, ymin2, xmax2, ymax2 = psystem:getLinearAcceleration()
  test:assertEquals(1, xmin2, 'check change lin acceleration xmin')
  test:assertEquals(2, ymin2, 'check change lin acceleration ymin')
  test:assertEquals(3, xmax2, 'check change lin acceleration xmax')
  test:assertEquals(4, ymax2, 'check change lin acceleration ymax')

  -- check linear damping
  local min3, max3 = psystem:getLinearDamping()
  test:assertEquals(0, min3, 'check def lin damping min')
  test:assertEquals(0, max3, 'check def lin damping max')
  psystem:setLinearDamping(1, 2)
  local min4, max4 = psystem:getLinearDamping()
  test:assertEquals(1, min4, 'check change lin damping min')
  test:assertEquals(2, max4, 'check change lin damping max')

  -- check offset
  local ox1, oy1 = psystem:getOffset()
  test:assertEquals(0.5, ox1, 'check def offset x') -- 0.5 cos middle of pixel image which is 1x1
  test:assertEquals(0.5, oy1, 'check def offset y')
  psystem:setOffset(0, 10)
  local ox2, oy2 = psystem:getOffset()
  test:assertEquals(0, ox2, 'check change offset x')
  test:assertEquals(10, oy2, 'check change offset y')

  -- check lifetime (we set it earlier)
  local min5, max5 = psystem:getParticleLifetime()
  test:assertEquals(1, min5, 'check p lifetime min')
  test:assertEquals(2, max5, 'check p lifetime max')

  -- check position
  local x1, y1 = psystem:getPosition()
  test:assertEquals(0, x1, 'check emitter x')
  test:assertEquals(0, y1, 'check emitter y')
  psystem:setPosition(10, 12)
  local x2, y2 = psystem:getPosition()
  test:assertEquals(10, x2, 'check set emitter x')
  test:assertEquals(12, y2, 'check set emitter y')

  -- check quads
  test:assertEquals(0, #psystem:getQuads(), 'check def quads')
  psystem:setQuads({quad1})
  psystem:setQuads(quad1, quad2)
  test:assertEquals(2, #psystem:getQuads(), 'check set quads')

  -- check radial acceleration
  local min6, max6 = psystem:getRadialAcceleration()
  test:assertEquals(0, min6, 'check def rad accel min')
  test:assertEquals(0, max6, 'check def rad accel max')
  psystem:setRadialAcceleration(1, 2)
  local min7, max7 = psystem:getRadialAcceleration()
  test:assertEquals(1, min7, 'check change rad accel min')
  test:assertEquals(2, max7, 'check change rad accel max')

  -- check rotation
  local min8, max8 = psystem:getRotation()
  test:assertEquals(0, min8, 'check def rot min')
  test:assertEquals(0, max8, 'check def rot max')
  psystem:setRotation(90 * (math.pi/180), 180 * (math.pi/180))
  local min8, max8 = psystem:getRotation()
  test:assertEquals(math.floor(math.pi/2*100), math.floor(min8*100), 'check set rot min')
  test:assertEquals(math.floor(math.pi*100), math.floor(max8*100), 'check set rot max')

  -- check variation
  test:assertEquals(0, psystem:getSizeVariation(), 'check def variation')
  psystem:setSizeVariation(1)
  test:assertEquals(1, psystem:getSizeVariation(), 'check change variation')

  -- check sizes
  test:assertEquals(1, #{psystem:getSizes()}, 'check def size')
  psystem:setSizes(1, 2, 4, 1, 3, 2)
  local sizes = {psystem:getSizes()}
  test:assertEquals(6, #sizes, 'check set sizes')
  test:assertEquals(3, sizes[5], 'check set size')

  -- check speed
  local min9, max9 = psystem:getSpeed()
  test:assertEquals(0, min9, 'check def speed min')
  test:assertEquals(0, max9, 'check def speed max')
  psystem:setSpeed(1, 10)
  local min10, max10 = psystem:getSpeed()
  test:assertEquals(1, min10, 'check change speed min')
  test:assertEquals(10, max10, 'check change speed max')

  -- check variation + spin
  local variation = psystem:getSpinVariation()
  test:assertEquals(0, variation, 'check def spin variation')
  psystem:setSpinVariation(1)
  test:assertEquals(1, psystem:getSpinVariation(), 'check change spin variation')
  psystem:setSpin(1, 2)
  local min11, max11 = psystem:getSpin()
  test:assertEquals(1, min11, 'check change spin min')
  test:assertEquals(2, max11, 'check change spin max')

  -- check spread
  test:assertEquals(0, psystem:getSpread(), 'check def spread')
  psystem:setSpread(90 * (math.pi/180))
  test:assertEquals(math.floor(math.pi/2*100), math.floor(psystem:getSpread()*100), 'check change spread')

  -- tangential acceleration
  local min12, max12 = psystem:getTangentialAcceleration()
  test:assertEquals(0, min12, 'check def tan accel min')
  test:assertEquals(0, max12, 'check def tan accel max')
  psystem:setTangentialAcceleration(1, 2)
  local min13, max13 = psystem:getTangentialAcceleration()
  test:assertEquals(1, min13, 'check change tan accel min')
  test:assertEquals(2, max13, 'check change tan accel max')

  -- check texture
  test:assertNotEquals(nil, psystem:getTexture(), 'check texture obj')
  test:assertObject(psystem:getTexture())
  psystem:setTexture(love.graphics.newImage('resources/love.png'))
  test:assertObject(psystem:getTexture())

  -- try a graphics test!
  -- hard to get exactly because of the variation but we can use some pixel 
  -- tolerance and volume to try and cover the randomness
  local psystem2 = love.graphics.newParticleSystem(image, 5000)
  psystem2:setEmissionArea('uniform', 2, 64)
  psystem2:setColors(1, 0, 0, 1)
  psystem2:setDirection(0 * math.pi/180)
  psystem2:setEmitterLifetime(100)
  psystem2:setEmissionRate(5000)
  local psystem3 = psystem2:clone()
  psystem3:setPosition(64, 0)
  psystem3:setColors(0, 1, 0, 1)
  psystem3:setDirection(180 * (math.pi/180))
  psystem2:start()
  psystem3:start()
  psystem2:update(1)
  psystem3:update(1)
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(psystem2, 0, 0)
    love.graphics.draw(psystem3, 0, 0)
  love.graphics.setCanvas()
  -- this should result in a bunch of red pixels on the left 2px of the canvas
  -- and a bunch of green pixels on the right 2px of the canvas
  local imgdata = love.graphics.readbackTexture(canvas)
  test.pixel_tolerance = 1
  test:compareImg(imgdata)
  
end


-- Quad (love.graphics.newQuad)
love.test.graphics.Quad = function(test)

  -- create quad obj
  local texture = love.graphics.newImage('resources/love.png')
  local quad = love.graphics.newQuad(0, 0, 32, 32, texture)
  test:assertObject(quad)

  -- check properties
  test:assertEquals(1, quad:getLayer(), 'check default layer')
  quad:setLayer(2)
  test:assertEquals(2, quad:getLayer(), 'check changed layer')
  local sw, sh = quad:getTextureDimensions()
  test:assertEquals(64, sw, 'check texture w')
  test:assertEquals(64, sh, 'check texture h')

  -- check drawing and viewport changes
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.draw(texture, quad, 0, 0)
    quad:setViewport(32, 32, 32, 32, 64, 64)
    love.graphics.draw(texture, quad, 32, 32)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)

end


-- Shader (love.graphics.newShader)
love.test.graphics.Shader = function(test)

  -- check valid shader
  local pixelcode1 = [[
    uniform Image tex2;
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texturecolor = Texel(tex2, texture_coords); 
      return texturecolor * color;
    }
  ]]
  local vertexcode1 = [[
    vec4 position(mat4 transform_projection, vec4 vertex_position) { 
      return transform_projection * vertex_position; 
    }
  ]]
  local shader1 = love.graphics.newShader(pixelcode1, vertexcode1, {debugname = 'testshader'})
  test:assertObject(shader1)
  test:assertEquals('', shader1:getWarnings(), 'check shader valid')
  test:assertFalse(shader1:hasUniform('tex1'), 'check invalid uniform')
  test:assertTrue(shader1:hasUniform('tex2'), 'check valid uniform')
  test:assertEquals('testshader', shader1:getDebugName())

  -- check invalid shader
  local pixelcode2 = [[
    uniform float ww;
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texturecolor = Texel(tex, texture_coords);
      float unused = ww * 3 * color;
      return texturecolor * color;
    }
  ]]
  local res, err = pcall(love.graphics.newShader, pixelcode2, vertexcode1)
  test:assertNotEquals(nil, err, 'check shader compile fails')

  -- check using a shader to draw + sending uniforms
  -- shader will return a given color if overwrite set to 1, otherwise def. draw
  local pixelcode3 = [[
    uniform vec4 col;
    uniform float overwrite;
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texcol = Texel(tex, texture_coords); 
      if (overwrite == 1.0) {
        return col;
      } else {
        return texcol * color;
      }
    }
  ]]
  local shader3 = love.graphics.newShader(pixelcode3, vertexcode1)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.push("all")
    love.graphics.setCanvas(canvas)
    -- set color to yellow
    love.graphics.setColor(1, 1, 0, 1)
    -- turn shader 'on' and use red to draw
    shader3:send('overwrite', 1)
    shader3:sendColor('col', {1, 0, 0, 1})
    love.graphics.setShader(shader3)
      love.graphics.rectangle('fill', 0, 0, 8, 8)
    love.graphics.setShader()
    -- turn shader 'off' and draw again
    shader3:send('overwrite', 0)
    love.graphics.setShader(shader3)
      love.graphics.rectangle('fill', 8, 8, 8, 8)
  love.graphics.pop()

  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)

  -- test some uncommon paths for shader uniforms
  local shader4 = love.graphics.newShader[[
    uniform bool booleans[5];
    vec4 effect(vec4 vcolor, Image tex, vec2 tc, vec2 pc) {
      return booleans[3] ? vec4(0, 1, 0, 0) : vec4(1, 0, 0, 0);
    }
  ]]

  shader4:send("booleans", false, true, true)

  local shader5 = love.graphics.newShader[[
    uniform sampler2D textures[5];
    vec4 effect(vec4 vcolor, Image tex, vec2 tc, vec2 pc) {
      return Texel(textures[2], tc) + Texel(textures[3], tc);
    }
  ]]

  local canvas2 = love.graphics.newCanvas(1, 1)
  love.graphics.setCanvas(canvas2)
  love.graphics.clear(0, 0.5, 0, 1)
  love.graphics.setCanvas()

  shader5:send("textures", canvas2, canvas2, canvas2, canvas2, canvas2)

  local shader6 = love.graphics.newShader[[
    struct Data {
      bool boolValue;
      float floatValue;
      sampler2D tex;
    };

    uniform Data data;
    uniform Data dataArray[3];

    vec4 effect(vec4 vcolor, Image tex, vec2 tc, vec2 pc) {
      return (data.boolValue && dataArray[1].boolValue) ? Texel(dataArray[0].tex, tc) : vec4(0.0, 0.0, 0.0, 0.0);
    }
  ]]

  shader6:send("data.boolValue", true)
  shader6:send("dataArray[1].boolValue", true)
  shader6:send("dataArray[0].tex", canvas2)

  local shader7 = love.graphics.newShader[[
    uniform vec3 vec3s[3];

    vec4 effect(vec4 vcolor, Image tex, vec2 tc, vec2 pc) {
      return vec4(vec3s[1], 1.0);
    }
  ]]

  shader7:send("vec3s", {0, 0, 1}, {0, 1, 0}, {1, 0, 0})

  local canvas3 = love.graphics.newCanvas(16, 16)
  love.graphics.push("all")
    love.graphics.setCanvas(canvas3)
    love.graphics.setShader(shader7)
    love.graphics.rectangle("fill", 0, 0, 16, 16)
  love.graphics.pop()
  local imgdata2 = love.graphics.readbackTexture(canvas3)
  test:compareImg(imgdata2)

  if love.graphics.getSupported().glsl3 then
    local shader8 = love.graphics.newShader[[
      #pragma language glsl3
      #ifdef GL_ES
        precision highp float;
      #endif

      varying vec4 VaryingUnused1;
      varying mat3 VaryingMatrix;
      flat varying ivec4 VaryingInt;

      #ifdef VERTEX
      layout(location = 0) in vec4 VertexPosition;
      layout(location = 1) in ivec4 IntAttributeUnused;

      void vertexmain()
      {
        VaryingMatrix = mat3(vec3(1, 0, 0), vec3(0, 1, 0), vec3(0, 0, 1));
        VaryingInt = ivec4(1, 1, 1, 1);
        love_Position = TransformProjectionMatrix * VertexPosition;
      }
      #endif

      #ifdef PIXEL
      out ivec4 outData;

      void pixelmain()
      {
        outData = ivec4(VaryingMatrix[1][1] > 0.0 ? 1 : 0, 1, VaryingInt.x, 1);
      }
      #endif
    ]]

    local canvas4 = love.graphics.newCanvas(16, 16, {format="rgba8i"})
      love.graphics.push("all")
      love.graphics.setBlendMode("none")
      love.graphics.setCanvas(canvas4)
      love.graphics.setShader(shader8)
      love.graphics.rectangle("fill", 0, 0, 16, 16)
    love.graphics.pop()

    local intimagedata = love.graphics.readbackTexture(canvas4)
    local imgdata3 = love.image.newImageData(16, 16, "rgba8")
    for y=0, 15 do
      for x=0, 15 do
        local ir, ig, ib, ia = intimagedata:getInt8(4 * (y * 16 + x), 4)
        imgdata3:setPixel(x, y, ir, ig, ib, ia)
      end
    end
    test:compareImg(imgdata3)
  else
    test:assertTrue(true, "skip shader IO test")
  end

  if love.graphics.getSupported().glsl4 and love.graphics.getSupported().vertexwrite and love.graphics.getSupported().pixelwrite then
    local name = love.graphics.getRendererInfo()
    local isGLES = name:match("OpenGL ES") ~= nil

    local success, message = love.graphics.validateShader(isGLES, [[
      #pragma language glsl4

      #ifdef PIXEL
      buffer ColorBuffer
      {
        vec4 colors[];
      };

      void effect()
      {
        colors[0] = VaryingColor;
        love_PixelColor = colors[0];
      }
      #endif

      #ifdef VERTEX
      vec4 position(mat4 m, vec4 p)
      {
        return m * p;
      }
      #endif
    ]])

    test:assertFalse(success, "shader should not validate (SSBO)")
    test:assertEquals("Shader validation error:\nStorage Buffer block 'ColorBuffer' must be marked as readonly in vertex and pixel shaders unless explicitly enabled.", message)

    success, message = love.graphics.validateShader(isGLES, [[
      #pragma language glsl4

      buffer ColorBuffer
      {
        vec4 colors[];
      };

      void effect()
      {
        colors[0] = VaryingColor;
        love_PixelColor = colors[0];
      }
    ]], { write = true })

    test:assertTrue(success, "shader should validate (SSBO)")
    test:assertEquals(nil, message)

    success, message = love.graphics.validateShader(isGLES, [[
        #pragma language glsl4

        layout(rgba32f) uniform readonly highp image2D RGBAImage;

        void effect()
        {
          love_PixelColor = VaryingColor * imageLoad(RGBAImage, ivec2(gl_FragCoord.xy));
        }
    ]])
      
    test:assertFalse(success, "shader should not validate (image)")
    test:assertEquals("Shader validation error:\nStorage Texture uniform variables (image2D, etc) are only allowed in compute shaders unless explicitly enabled.", message)
    
    success, message = love.graphics.validateShader(isGLES, [[
      #pragma language glsl4

      #ifdef GL_ES
        precision highp float;
      #endif

      layout(rgba32f) uniform readonly highp image2D RGBAImage;

      void effect()
      {
        love_PixelColor = VaryingColor * imageLoad(RGBAImage, ivec2(gl_FragCoord.xy));
      }
    ]], { write = true })

    test:assertTrue(success, "shader should validate (image)")
    test:assertEquals(nil, message)
  else
    test:assertTrue(true, "skip feature test")
  end
end


-- SpriteBatch (love.graphics.newSpriteBatch)
love.test.graphics.SpriteBatch = function(test)

  -- create batch
  local texture1 = love.graphics.newImage('resources/cubemap.png')
  local texture2 = love.graphics.newImage('resources/love.png')
  local quad1 = love.graphics.newQuad(32, 12, 1, 1, texture2) -- lovepink
  local quad2 = love.graphics.newQuad(32, 32, 1, 1, texture2) -- white
  local sbatch = love.graphics.newSpriteBatch(texture1, 5000)
  test:assertObject(sbatch)

  -- check initial count
  test:assertEquals(0, sbatch:getCount(), 'check batch size')

  -- check buffer size
  test:assertEquals(5000, sbatch:getBufferSize(), 'check batch size')

  -- check height/width/texture
  test:assertEquals(texture1:getWidth(), sbatch:getTexture():getWidth(), 'check texture match w')
  test:assertEquals(texture1:getHeight(), sbatch:getTexture():getHeight(), 'check texture match h')
  sbatch:setTexture(texture2)
  test:assertEquals(texture2:getWidth(), sbatch:getTexture():getWidth(), 'check texture change w')
  test:assertEquals(texture2:getHeight(), sbatch:getTexture():getHeight(), 'check texture change h')

  -- check colors
  local r1, g1, b1, a1 = sbatch:getColor()
  test:assertEquals(1, r1, 'check initial color r')
  test:assertEquals(1, g1, 'check initial color g')
  test:assertEquals(1, b1, 'check initial color b')
  test:assertEquals(1, a1, 'check initial color a')
  sbatch:setColor(1, 0, 0, 1)
  local r2, g2, b2, a2 = sbatch:getColor()
  test:assertEquals(1, r2, 'check set color r')
  test:assertEquals(0, g2, 'check set color g')
  test:assertEquals(0, b2, 'check set color b')
  test:assertEquals(1, a2, 'check set color a')

  -- check adding sprites
  local offset_x = 0
  local offset_y = 0
  local color = 'white'
  sbatch:setColor(1, 1, 1, 1)
  local sprites = {}
  for s=1,4096 do
    local spr = sbatch:add(quad1, offset_x, offset_y, 0, 1, 1)
    table.insert(sprites, {spr, offset_x, offset_y})
    offset_x = offset_x + 1
    if s % 64 == 0 then
      -- alternate row colors
      if color == 'white' then
        color = 'red'
        sbatch:setColor(1, 0, 0, 1)
      else
        color = 'white'
        sbatch:setColor(1, 1, 1, 1)
      end
      offset_y = offset_y + 1
      offset_x = 0
    end
  end
  test:assertEquals(4096, sbatch:getCount())

  -- test drawing and setting
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(sbatch, 0, 0)
  love.graphics.setCanvas()
  local imgdata1 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata1)

  -- use set to change some sprites
  for s=1,2048 do
    sbatch:set(sprites[s][1], quad2, sprites[s][2], sprites[s][3]+1, 0, 1, 1)
  end
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(sbatch, 0, 0)
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata2)

  -- set drawRange and redraw
  sbatch:setDrawRange(1025, 2048)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(sbatch, 0, 0)
  love.graphics.setCanvas()
  local imgdata3 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata3)

  -- clear and redraw
  sbatch:clear()
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(sbatch, 0, 0)
  love.graphics.setCanvas()
  local imgdata4 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata4)

  -- array texture sbatch
  local texture3 = love.graphics.newArrayImage({
    'resources/love.png',
    'resources/loveinv.png'
  })
  local asbatch = love.graphics.newSpriteBatch(texture3, 4096)
  local quad3 = love.graphics.newQuad(32, 52, 1, 1, texture3) -- loveblue
  sprites = {}
  for s=1,4096 do
    local spr = asbatch:addLayer(1, quad3, 0, s, math.floor(s/64), 1, 1)
    table.insert(sprites, {spr, s, math.floor(s/64)})
  end
  test:assertEquals(4096, asbatch:getCount(), 'check max batch size applies')
  for s=1,2048 do
    asbatch:setLayer(sprites[s][1], 2, sprites[s][2], sprites[s][3], 0, 1, 1)
  end
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(asbatch, 0, 0)
  love.graphics.setCanvas()
  local imgdata5 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata5)

end


-- Text (love.graphics.newTextBatch)
love.test.graphics.Text = function(test)

  -- setup text object
  local font = love.graphics.newFont('resources/font.ttf', 8)
  local plaintext = love.graphics.newTextBatch(font, 'test')
  test:assertObject(plaintext)

  -- check height/width/dimensions
  test:assertEquals(font:getHeight(), plaintext:getFont():getHeight(), 'check font matches')
  local tw, th = plaintext:getDimensions()
  test:assertEquals(24, tw, 'check initial dim w')
  test:assertEquals(8, th, 'check initial dim h')
  test:assertEquals(tw, plaintext:getWidth(), 'check initial dim w')
  test:assertEquals(th, plaintext:getHeight(), 'check initial dim h')

  -- check changing text effects dimensions
  plaintext:add('more text', 100, 0, 0)
  test:assertEquals(49, plaintext:getDimensions(), 'check adding text')
  plaintext:set('test')
  test:assertEquals(24, plaintext:getDimensions(), 'check resetting text')
  plaintext:clear()
  test:assertEquals(0, plaintext:getDimensions(), 'check clearing text')

  -- check drawing + setting more complex text
  local colortext = love.graphics.newTextBatch(font, {{1, 0, 0, 1}, 'test'})
  test:assertObject(colortext)
  colortext:setf('LÖVE is an *awesome* framework you can use to make 2D games in Lua', 60, 'right')
  colortext:addf({{1, 1, 0}, 'overlap'}, 1000, 'left')
  local font2 = love.graphics.newFont('resources/font.ttf', 8)
  colortext:setFont(font2)
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.draw(colortext, 0, 10)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)

end


-- Video (love.graphics.newVideo)
love.test.graphics.Video = function(test)

  -- create video obj
  local video = love.graphics.newVideo('resources/sample.ogv')
  test:assertObject(video)

  -- check dimensions
  local w, h = video:getDimensions()
  test:assertEquals(496, w, 'check vid dim w')
  test:assertEquals(502, h, 'check vid dim h')
  test:assertEquals(w, video:getWidth(), 'check vid width match')
  test:assertEquals(h, video:getHeight(), 'check vid height match')

  -- check filters
  local min1, mag1, ani1 = video:getFilter()
  test:assertEquals('nearest', min1, 'check def filter min')
  test:assertEquals('nearest', mag1, 'check def filter mag')
  test:assertEquals(1, ani1, 'check def filter ani')
  video:setFilter('linear', 'linear', 2)
  local min2, mag2, ani2 = video:getFilter()
  test:assertEquals('linear', min2, 'check changed filter min')
  test:assertEquals('linear', mag2, 'check changed filter mag')
  test:assertEquals(2, ani2, 'check changed filter ani')

  -- check video playing
  test:assertFalse(video:isPlaying(), 'check paused by default')
  test:assertEquals(0, video:tell(), 'check 0:00 by default')

  -- covered by their own obj tests in video but check returns obj
  local source = video:getSource()
  test:assertObject(source)
  local stream = video:getStream()
  test:assertObject(stream)

  -- check playing / pausing / seeking states
  video:play()
  test:waitSeconds(0.25)
  video:pause()
  -- runners can be a bit funny and just not play anything sometimes
  if not GITHUB_RUNNER then
    test:assertRange(video:tell(), 0.2, 0.35, 'check video playing for 0.25s')
  end
  video:seek(0.2)
  test:assertEquals(0.2, video:tell(), 'check video seeking')
  video:rewind()
  test:assertEquals(0, video:tell(), 'check video rewind')
  video:setFilter('nearest', 'nearest', 1)

  -- check actuall drawing with the vid 
  local canvas = love.graphics.newCanvas(500, 500)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(1, 0, 0, 1)
    love.graphics.draw(video, 0, 0)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)

end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
------------------------------------DRAWING-------------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.arc
love.test.graphics.arc = function(test)
  -- draw some arcs using pi format
  local canvas = love.graphics.newCanvas(32, 32)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.arc('line', "pie", 16, 16, 16, 0 * (math.pi/180), 360 * (math.pi/180), 10)
    love.graphics.arc('fill', "pie", 16, 16, 16, 270 * (math.pi/180), 45 * (math.pi/180), 10)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.arc('line', "pie", 16, 16, 16, 0 * (math.pi/180), 90 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.arc('line', "pie", 16, 16, 16, 180 * (math.pi/180), 135 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata1 = love.graphics.readbackTexture(canvas)
  -- draw some arcs with open format
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.arc('line', "open", 16, 16, 16, 0 * (math.pi/180), 315 * (math.pi/180), 10)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.arc('fill', "open", 16, 16, 16, 0 * (math.pi/180), 180 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.arc('fill', "open", 16, 16, 16, 180 * (math.pi/180), 270 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  -- draw some arcs with closed format
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.arc('line', "closed", 16, 16, 16, 0 * (math.pi/180), 315 * (math.pi/180), 10)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.arc('fill', "closed", 16, 16, 16, 0 * (math.pi/180), 180 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.arc('line', "closed", 16, 16, 16, 180 * (math.pi/180), 90 * (math.pi/180), 10)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata3 = love.graphics.readbackTexture(canvas)
  if GITHUB_RUNNER and test:isOS('OS X') then
    -- on macosx runners, the arcs are not drawn as accurately at low res
    -- there's a couple pixels different in the curve of the arc but as we
    -- are at such a low resolution I think that can be expected
    -- on real hardware the test passes fine though  
    test:assertTrue(true, 'skip test')
  else
    test:compareImg(imgdata1)
    test:compareImg(imgdata2)
    test:compareImg(imgdata3)
  end
end


-- love.graphics.circle
love.test.graphics.circle = function(test)
  -- draw some circles
  local canvas = love.graphics.newCanvas(32, 32)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.circle('fill', 16, 16, 16)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.circle('line', 16, 16, 16)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.circle('fill', 16, 16, 8)
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.circle('fill', 16, 16, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end



-- love.graphics.clear
love.test.graphics.clear = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.clear(1, 1, 0, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.discard
love.test.graphics.discard = function(test)
  -- from the docs: "on some desktops this may do nothing"
  test:skipTest('cant test this worked')
end


-- love.graphics.draw
love.test.graphics.draw = function(test)
  local canvas1 = love.graphics.newCanvas(32, 32)
  local canvas2 = love.graphics.newCanvas(32, 32)
  local transform = love.math.newTransform( )
  transform:translate(16, 0)
  transform:scale(0.5, 0.5)
  love.graphics.setCanvas(canvas1)
    love.graphics.clear(0, 0, 0, 1)
    -- img, offset
    love.graphics.draw(Logo.texture, Logo.img, 0, 0, 0, 1, 1, 16, 16)
  love.graphics.setCanvas()
  love.graphics.setCanvas(canvas2)
    love.graphics.clear(1, 0, 0, 1)
    -- canvas, scale, shear, transform obj
    love.graphics.draw(canvas1, 0, 0, 0, 1, 1, 0, 0, 2, 2)
    love.graphics.draw(canvas1, 0, 16, 0, 0.5, 0.5)
    love.graphics.draw(canvas1, 16, 16, 0, 0.5, 0.5)
    love.graphics.draw(canvas1, transform)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas2)
  test:compareImg(imgdata)
end


-- love.graphics.drawInstanced
love.test.graphics.drawInstanced = function(test)
  local image = love.graphics.newImage('resources/love.png')
  local vertices = {
		{ 0, 0, 0, 0, 1, 0, 0 },
		{ image:getWidth(), 0, 1, 0, 0, 1, 0 },
		{ image:getWidth(), image:getHeight(), 1, 1, 0, 0, 1 },
		{ 0, image:getHeight(), 0, 1, 1, 1, 0 },
  }
  local mesh = love.graphics.newMesh(vertices, 'fan')
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.drawInstanced(mesh, 1000, 0, 0, 0, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  -- need 1 tolerance here just cos of the amount of colors
  test.rgba_tolerance = 1
  test:compareImg(imgdata)
end


-- love.graphics.drawLayer
love.test.graphics.drawLayer = function(test)
  local image = love.graphics.newArrayImage({
    'resources/love.png', 'resources/loveinv.png',
    'resources/love.png', 'resources/loveinv.png'
  })
  local canvas = love.graphics.newCanvas(64, 64)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.drawLayer(image, 1, 0, 0, 0, 1, 1)
    love.graphics.drawLayer(image, 2, 32, 0, 0, 0.5, 0.5)
    love.graphics.drawLayer(image, 4, 0, 32, 0, 0.5, 0.5)
    love.graphics.drawLayer(image, 3, 32, 32, 0, 2, 2, 16, 16)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.ellipse
love.test.graphics.ellipse = function(test)
  local canvas = love.graphics.newCanvas(32, 32)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.ellipse('fill', 16, 16, 16, 8)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.ellipse('fill', 24, 24, 10, 24)
    love.graphics.setColor(1, 0, 1, 1)
    love.graphics.ellipse('fill', 16, 0, 8, 16)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.flushBatch
love.test.graphics.flushBatch = function(test)
  love.graphics.flushBatch()
  local initial = love.graphics.getStats()['drawcalls']
  local canvas = love.graphics.newCanvas(32, 32)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 32, 32)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  love.graphics.flushBatch()
  local after = love.graphics.getStats()['drawcalls']
  test:assertEquals(initial+1, after, 'check drawcalls increased')
end


-- love.graphics.line
love.test.graphics.line = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.line(1,1,16,1,16,16,1,16,1,1)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.line({0,0,8,8,16,0,8,8,16,16,8,8,0,16})
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.points
love.test.graphics.points = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.push("all")
    love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.translate(0.5, 0.5) -- draw points at the center of pixels
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.points(0,0,15,0,15,15,0,15,0,0)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.points({1,1,7,7,14,1,7,8,14,14,8,8,1,14,8,7})
  love.graphics.pop()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.polygon
love.test.graphics.polygon = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.polygon("fill", 1, 1, 4, 5, 8, 10, 16, 2, 7, 3, 5, 16, 16, 16, 1, 8)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.polygon("line", {2, 2, 4, 5, 3, 7, 8, 15, 12, 4, 5, 10})
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.print
love.test.graphics.print = function(test)
  love.graphics.setFont(Font)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.print('love', 0, 3, 0, 1, 1, 0, 0)
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.print('ooo', 0, 3, 0, 2, 2, 0, 0)
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.print('hello', 0, 3, 90*(math.pi/180), 1, 1, 0, 8)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.printf
love.test.graphics.printf = function(test)
  love.graphics.setFont(Font)
  local canvas = love.graphics.newCanvas(32, 32)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.printf('love', 0, 0, 8, "left")
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.printf('love', 0, 5, 16, "right")
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.printf('love', 0, 7, 32, "center")
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.rectangle
love.test.graphics.rectangle = function(test)
  -- setup, draw a 16x16 red rectangle with a blue central square
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.rectangle('fill', 6, 6, 4, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata1 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata1)
  -- clear canvas to do some line testing
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('line', 1, 1, 15, 15) -- red border
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.rectangle('line', 1, 1, 2, 15) -- 3x16 left aligned blue outline
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.rectangle('line', 11, 1, 5, 15) -- 6x16 right aligned green outline
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata2)
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
--------------------------------OBJECT CREATION---------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.captureScreenshot
love.test.graphics.captureScreenshot = function(test)
  love.graphics.captureScreenshot('example-screenshot.png')
  test:waitFrames(1)
  -- need to wait until end of the frame for the screenshot
  test:assertTrue(love.filesystem.exists('example-screenshot.png'))
  love.filesystem.remove('example-screenshot.png')
  -- test callback version
  local cbdata = nil
  local prevtextcommand = TextCommand
  TextCommand = "Capturing screenshot"
  love.graphics.captureScreenshot(function (idata)
    test:assertNotEquals(nil, idata, 'check we have image data')
    cbdata = idata
  end)
  test:waitFrames(1)
  TextCommand = prevtextcommand
  test:assertNotNil(cbdata)

  if test:isOS('iOS', 'Android') then
    -- Mobile operating systems don't let us control the window resolution,
    -- so we can't compare the reference image properly.
    test:assertTrue(true, 'skip test')
  else
    test:compareImg(cbdata)
  end
end


-- love.graphics.newArrayImage
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newArrayImage = function(test)
  test:assertObject(love.graphics.newArrayImage({
    'resources/love.png', 'resources/love2.png', 'resources/love3.png'
  }))
end

-- love.graphics.newCanvas
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newCanvas = function(test)
  test:assertObject(love.graphics.newCanvas(16, 16, {
    type = '2d',
    format = 'normal',
    readable = true,
    msaa = 0,
    dpiscale = 1,
    mipmaps = 'none'
  }))
  test:assertObject(love.graphics.newCanvas(1000, 1000))
end


-- love.graphics.newCubeImage
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newCubeImage = function(test)
  test:assertObject(love.graphics.newCubeImage('resources/cubemap.png', {
    mipmaps = false,
    linear = false
  }))
end


-- love.graphics.newFont
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newFont = function(test)
  test:assertObject(love.graphics.newFont('resources/font.ttf'))
  test:assertObject(love.graphics.newFont('resources/font.ttf', 8, "normal", 1))
end


-- love.graphics.newImage
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newImage = function(test)
  test:assertObject(love.graphics.newImage('resources/love.png', {
    mipmaps = false,
    linear = false,
    dpiscale = 1
  }))
end


-- love.graphics.newImageFont
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newImageFont = function(test)
  test:assertObject(love.graphics.newImageFont('resources/love.png', 'ABCD', 1))
end


-- love.graphics.newMesh
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newMesh = function(test)
  test:assertObject(love.graphics.newMesh({{1, 1, 0, 0, 1, 1, 1, 1}}, 'fan', 'dynamic'))
end


-- love.graphics.newParticleSystem
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newParticleSystem = function(test)
  local imgdata = love.graphics.newImage('resources/love.png')
  test:assertObject(love.graphics.newParticleSystem(imgdata, 1000))
end


-- love.graphics.newQuad
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newQuad = function(test)
  local imgdata = love.graphics.newImage('resources/love.png')
  test:assertObject(love.graphics.newQuad(0, 0, 16, 16, imgdata))
end


-- love.graphics.newShader
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newShader = function(test)
  local pixelcode = [[
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texturecolor = Texel(tex, texture_coords); 
      return texturecolor * color;
    }
  ]]
  local vertexcode = [[
    vec4 position(mat4 transform_projection, vec4 vertex_position) { 
      return transform_projection * vertex_position; 
    }
  ]]
  test:assertObject(love.graphics.newShader(pixelcode, vertexcode))
end


-- love.graphics.newSpriteBatch
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newSpriteBatch = function(test)
  local imgdata = love.graphics.newImage('resources/love.png')
  test:assertObject(love.graphics.newSpriteBatch(imgdata, 1000))
end


-- love.graphics.newTextBatch
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newTextBatch = function(test)
  local font = love.graphics.newFont('resources/font.ttf')
  test:assertObject(love.graphics.newTextBatch(font, 'helloworld'))
end


-- love.graphics.newTexture
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newTexture = function(test)
  local imgdata = love.image.newImageData('resources/love.png')
  test:assertObject(love.graphics.newTexture(imgdata))
end


-- love.graphics.newVideo
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newVideo = function(test)
  test:assertObject(love.graphics.newVideo('resources/sample.ogv', {
    audio = false,
    dpiscale = 1
  }))
end


-- love.graphics.newVolumeImage
-- @NOTE this is just basic nil checking, objs have their own test method
love.test.graphics.newVolumeImage = function(test)
  test:assertObject(love.graphics.newVolumeImage({
    'resources/love.png', 'resources/love2.png', 'resources/love3.png'
  }, {
    mipmaps = false,
    linear = false
  }))
end


-- love.graphics.validateShader
love.test.graphics.validateShader = function(test)
  local pixelcode = [[
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texturecolor = Texel(tex, texture_coords); 
      return texturecolor * color;
    }
  ]]
  local vertexcode = [[
    vec4 position(mat4 transform_projection, vec4 vertex_position) { 
      return transform_projection * vertex_position; 
    }
  ]]
  -- check made up code first
  local status, _ = love.graphics.validateShader(true, 'nothing here', 'or here')
  test:assertFalse(status, 'check invalid shader code')
  -- check real code 
  status, _ = love.graphics.validateShader(true, pixelcode, vertexcode)
  test:assertTrue(status, 'check valid shader code')
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
---------------------------------GRAPHICS STATE---------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.getBackgroundColor
love.test.graphics.getBackgroundColor = function(test)
  -- check default bg is black
  local r, g, b, a = love.graphics.getBackgroundColor()
  test:assertEquals(0, r, 'check default background r')
  test:assertEquals(0, g, 'check default background g')
  test:assertEquals(0, b, 'check default background b')
  test:assertEquals(1, a, 'check default background a')
  -- check set value returns correctly
  love.graphics.setBackgroundColor(1, 1, 1, 0)
  r, g, b, a = love.graphics.getBackgroundColor()
  test:assertEquals(1, r, 'check updated background r')
  test:assertEquals(1, g, 'check updated background g')
  test:assertEquals(1, b, 'check updated background b')
  test:assertEquals(0, a, 'check updated background a')
  love.graphics.setBackgroundColor(0, 0, 0, 1) -- reset
end


-- love.graphics.getBlendMode
love.test.graphics.getBlendMode = function(test)
  -- check default blend mode
  local mode, alphamode = love.graphics.getBlendMode()
  test:assertEquals('alpha', mode, 'check default blend mode')
  test:assertEquals('alphamultiply', alphamode, 'check default alpha blend')
  -- check set mode returns correctly
  love.graphics.setBlendMode('add', 'premultiplied')
  mode, alphamode = love.graphics.getBlendMode()
  test:assertEquals('add', mode, 'check changed blend mode')
  test:assertEquals('premultiplied', alphamode, 'check changed alpha blend')
  love.graphics.setBlendMode('alpha', 'alphamultiply') -- reset
end


-- love.graphics.getCanvas
love.test.graphics.getCanvas = function(test)
  -- by default should be nil if drawing to real screen
  test:assertEquals(nil, love.graphics.getCanvas(), 'check no canvas set')
  -- should return not nil when we target a canvas
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
  test:assertObject(love.graphics.getCanvas())
  love.graphics.setCanvas()
end


-- love.graphics.getColor
love.test.graphics.getColor = function(test)
  -- by default should be white
  local r, g, b, a = love.graphics.getColor()
  test:assertEquals(1, r, 'check default color r')
  test:assertEquals(1, g, 'check default color g')
  test:assertEquals(1, b, 'check default color b')
  test:assertEquals(1, a, 'check default color a')
  -- check set color is returned correctly
  love.graphics.setColor(0, 0, 0, 0)
  r, g, b, a = love.graphics.getColor()
  test:assertEquals(0, r, 'check changed color r')
  test:assertEquals(0, g, 'check changed color g')
  test:assertEquals(0, b, 'check changed color b')
  test:assertEquals(0, a, 'check changed color a')
  love.graphics.setColor(1, 1, 1, 1) -- reset
end


-- love.graphics.getColorMask
love.test.graphics.getColorMask = function(test)
  -- by default should all be active
  local r, g, b, a = love.graphics.getColorMask()
  test:assertTrue(r, 'check default color mask r')
  test:assertTrue(g, 'check default color mask g')
  test:assertTrue(b, 'check default color mask b')
  test:assertTrue(a, 'check default color mask a')
  -- check set color mask is returned correctly
  love.graphics.setColorMask(false, false, true, false)
  r, g, b, a = love.graphics.getColorMask()
  test:assertFalse(r, 'check changed color mask r')
  test:assertFalse(g, 'check changed color mask g')
  test:assertTrue( b, 'check changed color mask b')
  test:assertFalse(a, 'check changed color mask a')
  love.graphics.setColorMask(true, true, true, true) -- reset
end


-- love.graphics.getDefaultFilter
love.test.graphics.getDefaultFilter = function(test)
  -- we set this already for testsuite so we know what it should be
  local min, mag, anisotropy = love.graphics.getDefaultFilter()
  test:assertEquals('nearest', min, 'check default filter min')
  test:assertEquals('nearest', mag, 'check default filter mag')
  test:assertEquals(1, anisotropy, 'check default filter mag')
end


-- love.graphics.getDepthMode
love.test.graphics.getDepthMode = function(test)
  -- by default should be always/write
  local comparemode, write = love.graphics.getDepthMode()
  test:assertEquals('always', comparemode, 'check default compare depth')
  test:assertFalse(write, 'check default depth buffer write')
end


-- love.graphics.getFont
love.test.graphics.getFont = function(test)
  test:assertObject(love.graphics.getFont())
end


-- love.graphics.getFrontFaceWinding
love.test.graphics.getFrontFaceWinding = function(test)
  -- check default winding
  test:assertEquals('ccw', love.graphics.getFrontFaceWinding())
  -- check setting value changes it correctly
  love.graphics.setFrontFaceWinding('cw')
  test:assertEquals('cw', love.graphics.getFrontFaceWinding())
  love.graphics.setFrontFaceWinding('ccw') -- reset
end


-- love.graphics.getLineJoin
love.test.graphics.getLineJoin = function(test)
  -- check default line join
  test:assertEquals('miter', love.graphics.getLineJoin())
  -- check set value returned correctly
  love.graphics.setLineJoin('none')
  test:assertEquals('none', love.graphics.getLineJoin())
  love.graphics.setLineJoin('miter') -- reset
end


-- love.graphics.getLineStyle
love.test.graphics.getLineStyle = function(test)
  -- we know this should be as testsuite sets it!
  test:assertEquals('rough', love.graphics.getLineStyle())
  -- check set value returned correctly
  love.graphics.setLineStyle('smooth')
  test:assertEquals('smooth', love.graphics.getLineStyle())
  love.graphics.setLineStyle('rough') -- reset
end


-- love.graphics.getLineWidth
love.test.graphics.getLineWidth = function(test)
  -- we know this should be as testsuite sets it!
  test:assertEquals(1, love.graphics.getLineWidth())
  -- check set value returned correctly
  love.graphics.setLineWidth(10)
  test:assertEquals(10, love.graphics.getLineWidth())
  love.graphics.setLineWidth(1) -- reset
end


-- love.graphics.getMeshCullMode
love.test.graphics.getMeshCullMode = function(test)
  -- get default mesh culling
  test:assertEquals('none', love.graphics.getMeshCullMode())
  -- check set value returned correctly
  love.graphics.setMeshCullMode('front')
  test:assertEquals('front', love.graphics.getMeshCullMode())
  love.graphics.setMeshCullMode('back') -- reset
end


-- love.graphics.getPointSize
love.test.graphics.getPointSize = function(test)
  -- get default point size
  test:assertEquals(1, love.graphics.getPointSize())
  -- check set value returned correctly
  love.graphics.setPointSize(10)
  test:assertEquals(10, love.graphics.getPointSize())
  love.graphics.setPointSize(1) -- reset
end


-- love.graphics.getScissor
love.test.graphics.getScissor = function(test)
  -- should be no scissor atm
  local x, y, w, h = love.graphics.getScissor()
  test:assertEquals(nil, x, 'check no scissor')
  test:assertEquals(nil, y, 'check no scissor')
  test:assertEquals(nil, w, 'check no scissor')
  test:assertEquals(nil, h, 'check no scissor')
  -- check set value returned correctly
  love.graphics.setScissor(0, 0, 16, 16)
  x, y, w, h = love.graphics.getScissor()
  test:assertEquals(0, x, 'check scissor set')
  test:assertEquals(0, y, 'check scissor set')
  test:assertEquals(16, w, 'check scissor set')
  test:assertEquals(16, h, 'check scissor set')
  love.graphics.setScissor() -- reset
end


-- love.graphics.getShader
love.test.graphics.getShader = function(test)
  -- should be no shader active
  test:assertEquals(nil, love.graphics.getShader(), 'check no active shader')
end


-- love.graphics.getStackDepth
love.test.graphics.getStackDepth = function(test)
  -- by default should be none
  test:assertEquals(0, love.graphics.getStackDepth(), 'check no transforms in stack')
  -- now add 3
  love.graphics.push()
  love.graphics.push()
  love.graphics.push()
  test:assertEquals(3, love.graphics.getStackDepth(), 'check 3 transforms in stack')
  -- now remove 2
  love.graphics.pop()
  love.graphics.pop()
  test:assertEquals(1, love.graphics.getStackDepth(), 'check 1 transforms in stack')
  -- now back to 0
  love.graphics.pop()
  test:assertEquals(0, love.graphics.getStackDepth(), 'check no transforms in stack')
end


-- love.graphics.getStencilState
love.test.graphics.getStencilState = function(test)
  -- check default vals
  local action, comparemode, value = love.graphics.getStencilState( )
  test:assertEquals('keep', action, 'check default stencil action')
  test:assertEquals('always', comparemode, 'check default stencil compare')
  test:assertEquals(0, value, 'check default stencil value')
  -- check set stencil values is returned
  love.graphics.setStencilState('replace', 'less', 255)
  local action, comparemode, value = love.graphics.getStencilState()
  test:assertEquals('replace', action, 'check changed stencil action')
  test:assertEquals('less', comparemode, 'check changed stencil compare')
  test:assertEquals(255, value, 'check changed stencil value')
  love.graphics.setStencilState() -- reset
end


-- love.graphics.intersectScissor
love.test.graphics.intersectScissor = function(test)
  -- make a scissor for the left half, then interset to make the top half
  -- then we should be able to fill the canvas with red and only top 4x4 is filled
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    love.graphics.setScissor(0, 0, 8, 16)
    love.graphics.intersectScissor(0, 0, 4, 4)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.setScissor()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.isActive
love.test.graphics.isActive = function(test)
  test:assertTrue(love.graphics.isActive(), 'check graphics is active') -- i mean if you got this far
end


-- love.graphics.isGammaCorrect
love.test.graphics.isGammaCorrect = function(test)
  -- we know the config so know this is false
  test:assertNotNil(love.graphics.isGammaCorrect())
end


-- love.graphics.isWireframe
love.test.graphics.isWireframe = function(test)
  local name, version, vendor, device = love.graphics.getRendererInfo()
  if string.match(name, 'OpenGL ES') then
    test:skipTest('Wireframe not supported on OpenGL ES')
  else
    -- check off by default
    test:assertFalse(love.graphics.isWireframe(), 'check no wireframe by default')
    -- check on when enabled
    love.graphics.setWireframe(true)
    test:assertTrue(love.graphics.isWireframe(), 'check wireframe is set')
    love.graphics.setWireframe(false) -- reset
  end
end


-- love.graphics.reset
love.test.graphics.reset = function(test)
  -- reset should reset current canvas and any colors/scissor
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setBackgroundColor(0, 0, 1, 1)
  love.graphics.setColor(0, 1, 0, 1)
  love.graphics.setCanvas(canvas)
  love.graphics.reset()
  local r, g, b, a = love.graphics.getBackgroundColor()
  test:assertEquals(1, r+g+b+a, 'check background reset')
  r, g, b, a = love.graphics.getColor()
  test:assertEquals(4, r+g+b+a, 'check color reset')
  test:assertEquals(nil, love.graphics.getCanvas(), 'check canvas reset')
  love.graphics.setDefaultFilter("nearest", "nearest")
  love.graphics.setLineStyle('rough')
  love.graphics.setPointSize(1)
  love.graphics.setLineWidth(1)
end


-- love.graphics.setBackgroundColor
love.test.graphics.setBackgroundColor = function(test)
  -- check background is set
  love.graphics.setBackgroundColor(1, 0, 0, 1)
  local r, g, b, a = love.graphics.getBackgroundColor()
  test:assertEquals(1, r, 'check set bg r')
  test:assertEquals(0, g, 'check set bg g')
  test:assertEquals(0, b, 'check set bg b')
  test:assertEquals(1, a, 'check set bg a')
  love.graphics.setBackgroundColor(0, 0, 0, 1)
end


-- love.graphics.setBlendMode
love.test.graphics.setBlendMode = function(test)
  -- create fully white canvas, then draw diff. pixels through blendmodes
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0.5, 0.5, 0.5, 1)
    love.graphics.setBlendMode('add', 'alphamultiply')
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setBlendMode('subtract', 'alphamultiply')
    love.graphics.setColor(1, 1, 1, 0.5)
    love.graphics.rectangle('fill', 15, 0, 1, 1)
    love.graphics.setBlendMode('multiply', 'premultiplied')
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.rectangle('fill', 15, 15, 1, 1)
    love.graphics.setBlendMode('replace', 'premultiplied')
    love.graphics.setColor(0, 0, 1, 0.5)
    love.graphics.rectangle('fill', 0, 15, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  love.graphics.setBlendMode('alpha', 'alphamultiply') -- reset 
  -- need 1rgba tolerance here on some machines
  test.rgba_tolerance = 1
  test:compareImg(imgdata)
end


-- love.graphics.setCanvas
love.test.graphics.setCanvas = function(test)
  -- make 2 canvas, set to each, draw one to the other, check output
  local canvas1 = love.graphics.newCanvas(16, 16)
  local canvas2 = love.graphics.newCanvas(16, 16, {mipmaps = "auto"})
  love.graphics.setCanvas(canvas1)
    test:assertEquals(canvas1, love.graphics.getCanvas(), 'check canvas 1 set')
    love.graphics.clear(1, 0, 0, 1)
  love.graphics.setCanvas(canvas2)
    test:assertEquals(canvas2, love.graphics.getCanvas(), 'check canvas 2 set')
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.draw(canvas1, 0, 0)
  love.graphics.setCanvas()
  test:assertEquals(nil, love.graphics.getCanvas(), 'check no canvas set')
  local imgdata = love.graphics.readbackTexture(canvas2)
  test:compareImg(imgdata)
  local imgdata2 = love.graphics.readbackTexture(canvas2, 1, 2) -- readback mipmap
  test:compareImg(imgdata2)
end


-- love.graphics.setColor
love.test.graphics.setColor = function(test)
  -- set colors, draw rect, check color 
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    local r, g, b, a = love.graphics.getColor()
    test:assertEquals(1, r, 'check r set')
    test:assertEquals(0, g, 'check g set')
    test:assertEquals(0, b, 'check b set')
    test:assertEquals(1, a, 'check a set')

    love.graphics.rectangle('fill', 0, 0, 16, 1)
    love.graphics.setColor(1, 1, 0, 1)
    love.graphics.rectangle('fill', 0, 1, 16, 1)
    love.graphics.setColor(0, 1, 0, 0.5)
    love.graphics.rectangle('fill', 0, 2, 16, 1)
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.rectangle('fill', 0, 3, 16, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setColorMask
love.test.graphics.setColorMask = function(test)
  -- set mask, draw stuff, check output pixels
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    -- mask off blue
    love.graphics.setColorMask(true, true, false, true)
    local r, g, b, a = love.graphics.getColorMask()
    test:assertEquals(r, true, 'check r mask')
    test:assertEquals(g, true, 'check g mask')
    test:assertEquals(b, false, 'check b mask')
    test:assertEquals(a, true, 'check a mask')
    -- draw "black" which should then turn to yellow
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setColorMask(true, true, true, true)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setDefaultFilter
love.test.graphics.setDefaultFilter = function(test)
  -- check setting filter val works
  love.graphics.setDefaultFilter('linear', 'linear', 1)
  local min, mag, anisotropy = love.graphics.getDefaultFilter()
  test:assertEquals('linear', min, 'check default filter min')
  test:assertEquals('linear', mag, 'check default filter mag')
  test:assertEquals(1, anisotropy, 'check default filter mag')
  love.graphics.setDefaultFilter('nearest', 'nearest', 1) -- reset
end


-- love.graphics.setDepthMode
love.test.graphics.setDepthMode = function(test)
  -- check documented modes are valid
  local comparemode, write = love.graphics.getDepthMode()
  local modes = {
    'equal', 'notequal', 'less', 'lequal', 'gequal',
    'greater', 'never', 'always'
  }
  for m=1,#modes do
    love.graphics.setDepthMode(modes[m], true)
    test:assertEquals(modes[m], love.graphics.getDepthMode(), 'check depth mode ' .. modes[m] .. ' set')
  end
  love.graphics.setDepthMode(comparemode, write)
  -- @TODO better graphics drawing specific test
end


-- love.graphics.setFont
love.test.graphics.setFont = function(test)
  -- set font doesnt return anything so draw with the test font
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setFont(Font)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.print('love', 0, 3)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setFrontFaceWinding
love.test.graphics.setFrontFaceWinding = function(test)
  -- check documented modes are valid
  local original = love.graphics.getFrontFaceWinding()
  love.graphics.setFrontFaceWinding('cw')
  test:assertEquals('cw', love.graphics.getFrontFaceWinding(), 'check ffw cw set')
  love.graphics.setFrontFaceWinding('ccw')
  test:assertEquals('ccw', love.graphics.getFrontFaceWinding(), 'check ffw ccw set')
  love.graphics.setFrontFaceWinding(original)
  -- @TODO better graphics drawing specific test

  local shader = love.graphics.newShader[[
vec4 effect(vec4 c, Image tex, vec2 tc, vec2 pc) {
  return gl_FrontFacing ? vec4(0.0, 1.0, 0.0, 1.0) : vec4(1.0, 0.0, 0.0, 1.0); 
}
  ]]
  local dummyimg = love.graphics.newImage(love.image.newImageData(1, 1))

  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.push("all")
    love.graphics.setCanvas(canvas)
    love.graphics.setShader(shader)
    love.graphics.draw(dummyimg, 0, 0, 0, 16, 16)
  love.graphics.pop()

  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setLineJoin
love.test.graphics.setLineJoin = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setFont(Font)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    local line = {0,1,8,1,8,8}
    love.graphics.setLineStyle('rough')
    love.graphics.setLineWidth(2)
    love.graphics.setColor(1, 0, 0)
    love.graphics.setLineJoin('bevel')
    love.graphics.line(line)
    love.graphics.translate(0, 4)
    love.graphics.setColor(1, 1, 0)
    love.graphics.setLineJoin('none')
    love.graphics.line(line)
    love.graphics.translate(0, 4)
    love.graphics.setColor(0, 0, 1)
    love.graphics.setLineJoin('miter')
    love.graphics.line(line)
    love.graphics.setColor(1, 1, 1)
    love.graphics.setLineWidth(1)
    love.graphics.origin()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setLineStyle
love.test.graphics.setLineStyle = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setFont(Font)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0)
    local line = {0,1,16,1}
    love.graphics.setLineStyle('rough')
    love.graphics.line(line)
    love.graphics.translate(0, 4)
    love.graphics.setLineStyle('smooth')
    love.graphics.line(line)
    love.graphics.setLineStyle('rough')
    love.graphics.setColor(1, 1, 1)
    love.graphics.origin()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  -- linux runner needs a 1/255 tolerance for the blend between a rough line + bg 
  if GITHUB_RUNNER and test:isOS('Linux') then
    test.rgba_tolerance = 1
  end
  test:compareImg(imgdata)
end


-- love.graphics.setLineWidth
love.test.graphics.setLineWidth = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setFont(Font)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    local line = {0,1,8,1,8,8}
    love.graphics.setColor(1, 0, 0)
    love.graphics.setLineWidth(2)
    love.graphics.line(line)
    love.graphics.translate(0, 4)
    love.graphics.setColor(1, 1, 0)
    love.graphics.setLineWidth(3)
    love.graphics.line(line)
    love.graphics.translate(0, 4)
    love.graphics.setColor(0, 0, 1)
    love.graphics.setLineWidth(4)
    love.graphics.line(line)
    love.graphics.setColor(1, 1, 1)
    love.graphics.setLineWidth(1)
    love.graphics.origin()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setMeshCullMode
love.test.graphics.setMeshCullMode = function(test)
  -- check documented modes are valid
  local original = love.graphics.getMeshCullMode()
  local modes = {'back', 'front', 'none'}
  for m=1,#modes do
    love.graphics.setMeshCullMode(modes[m])
    test:assertEquals(modes[m], love.graphics.getMeshCullMode(), 'check mesh cull mode ' .. modes[m] .. ' was set')
  end
  love.graphics.setMeshCullMode(original)
  -- @TODO better graphics drawing specific test
end


-- love.graphics.setScissor
love.test.graphics.setScissor = function(test)
  -- make a scissor for the left half
  -- then we should be able to fill the canvas with red and only left is filled
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    love.graphics.setScissor(0, 0, 8, 16)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.setScissor()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setShader
love.test.graphics.setShader = function(test)
  -- make a shader that will only ever draw yellow
  local pixelcode = [[
    vec4 effect(vec4 color, Image tex, vec2 texture_coords, vec2 screen_coords) { 
      vec4 texturecolor = Texel(tex, texture_coords); 
      return vec4(1.0,1.0,0.0,1.0);
    }
  ]]
  local vertexcode = [[
    vec4 position(mat4 transform_projection, vec4 vertex_position) { 
      return transform_projection * vertex_position; 
    }
  ]]
  local shader = love.graphics.newShader(pixelcode, vertexcode)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setShader(shader)
      -- draw red rectangle
      love.graphics.setColor(1, 0, 0, 1)
      love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setShader()
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setStencilState
love.test.graphics.setStencilState = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas({canvas, stencil=true})
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setStencilState('replace', 'always', 1)
    love.graphics.circle('fill', 8, 8, 6)
    love.graphics.setStencilState('keep', 'greater', 0)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 16, 16)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.setStencilState()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.setWireframe
love.test.graphics.setWireframe = function(test)
  local name, version, vendor, device = love.graphics.getRendererInfo()
  if string.match(name, 'OpenGL ES') then
    test:skipTest('Wireframe not supported on OpenGL ES')
  else
    -- check wireframe outlines
    love.graphics.setWireframe(true)
    local canvas = love.graphics.newCanvas(16, 16)
    love.graphics.setCanvas(canvas)
      love.graphics.clear(0, 0, 0, 1)
      love.graphics.setColor(1, 1, 0, 1)
      love.graphics.rectangle('fill', 2, 2, 13, 13)
      love.graphics.setColor(1, 1, 1, 1)
    love.graphics.setCanvas()
    love.graphics.setWireframe(false)
    local imgdata = love.graphics.readbackTexture(canvas)
    -- on macOS runners wireframes are drawn 1px off from the target
    if GITHUB_RUNNER and test:isOS('OS X') then
      test.pixel_tolerance = 1
    end
    test:compareImg(imgdata)
  end
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-------------------------------COORDINATE SYSTEM--------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.applyTransform
love.test.graphics.applyTransform = function(test)
  -- use transform object to translate the drawn rectangle
  local transform = love.math.newTransform()
  transform:translate(10, 0)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.applyTransform(transform)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.inverseTransformPoint
love.test.graphics.inverseTransformPoint = function(test)
  -- start with 0, 0
  local sx, sy = love.graphics.inverseTransformPoint(0, 0)
  test:assertEquals(0, sx, 'check starting x is 0')
  test:assertEquals(0, sy, 'check starting y is 0')
  -- check translation effects the point 
  love.graphics.translate(1, 5)
  sx, sy = love.graphics.inverseTransformPoint(1, 5)
  test:assertEquals(0, sx, 'check transformed x is 0')
  test:assertEquals(0, sy, 'check transformed y is 0')
  love.graphics.origin()
end


-- love.graphics.origin
love.test.graphics.origin = function(test)
  -- if we do some translations and scaling
  -- using .origin() should reset it all and draw the pixel at 0,0
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    love.graphics.translate(10, 10)
    love.graphics.scale(1, 1)
    love.graphics.shear(20, 20)
    love.graphics.origin()
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.pop
love.test.graphics.pop = function(test)
  -- if we push at the start, and then run a pop
  -- it should reset it all and draw the pixel at 0,0
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.push()
    love.graphics.translate(10, 10)
    love.graphics.scale(1, 1)
    love.graphics.shear(20, 20)
    love.graphics.pop()
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.push
love.test.graphics.push = function(test)
  -- if we push at the start, do some stuff, then another push
  -- 1 pop should only go back 1 push and draw the pixel at 1, 1
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.push()
    love.graphics.scale(1, 1)
    love.graphics.shear(20, 20)
    love.graphics.push()
    love.graphics.translate(1, 1)
    love.graphics.pop()
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
    love.graphics.pop()
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.replaceTransform
love.test.graphics.replaceTransform = function(test)
  -- if use transform object to translate
  -- set some normal transforms first which should get overwritten
  local transform = love.math.newTransform()
  transform:translate(10, 0)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.scale(2, 2)
    love.graphics.translate(10, 10)
    love.graphics.replaceTransform(transform)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.rotate
love.test.graphics.rotate = function(test)
  -- starting at 0,0, we rotate by 90deg and then draw
  -- we can then check the drawn rectangle is rotated
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.translate(4, 0)
    love.graphics.rotate(90 * (math.pi/180))
    love.graphics.rectangle('fill', 0, 0, 4, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.scale
love.test.graphics.scale = function(test)
  -- starting at 0,0, we scale by 4x and then draw
  -- we can then check the drawn rectangle covers the whole canvas
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.scale(4, 4)
    love.graphics.rectangle('fill', 0, 0, 4, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.shear
love.test.graphics.shear = function(test)
  -- starting at 0,0, we shear by 2x and then draw
  -- we can then check the drawn rectangle has moved over
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.shear(2, 0)
    love.graphics.rectangle('fill', 0, 0, 4, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata1 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata1)
  -- same again at 0,0, we shear by 2y and then draw
  -- we can then check the drawn rectangle has moved down
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.shear(0, 2)
    love.graphics.rectangle('fill', 0, 0, 4, 4)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata2 = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata2)
end


-- love.graphics.transformPoint
love.test.graphics.transformPoint = function(test)
  -- start with 0, 0
  local sx, sy = love.graphics.transformPoint(0, 0)
  test:assertEquals(0, sx, 'check starting x is 0')
  test:assertEquals(0, sy, 'check starting y is 0')
  -- check translation effects the point 
  love.graphics.translate(1, 5)
  sx, sy = love.graphics.transformPoint(0, 0)
  test:assertEquals(1, sx, 'check transformed x is 0')
  test:assertEquals(5, sy, 'check transformed y is 10')
end


-- love.graphics.translate
love.test.graphics.translate = function(test)
  -- starting at 0,0, we translate 4 times and draw a pixel at each point
  -- we can then check the 4 points are now red
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.translate(5, 0)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.translate(0, 5)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.translate(-5, 0)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.translate(0, -5)
    love.graphics.rectangle('fill', 0, 0, 1, 1)
    love.graphics.setColor(1, 1, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


-- love.graphics.resetProjection
love.test.graphics.resetProjection = function(test)
  local canvas = love.graphics.newCanvas(16, 16)
  love.graphics.setCanvas(canvas)
    love.graphics.clear(0, 0, 0, 1)
    love.graphics.origin()
    -- draw red pixel at (0, 4) using default projection
    love.graphics.setColor(1, 0, 0, 1)
    love.graphics.rectangle('fill', 0, 4, 1, 1)
    love.graphics.setProjection("row", 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0)
    -- draw a green pixel at that should not show on screen after projection.
    -- if setProjection doesn't affect it, the green pixel will show and fail
    -- the test.
    love.graphics.setColor(0, 1, 0, 1)
    love.graphics.rectangle('fill', 2, 2, 1, 1)
    -- draw a blue pixel at (8, 8) after resetting projection
    love.graphics.resetProjection()
    love.graphics.setColor(0, 0, 1, 1)
    love.graphics.rectangle('fill', 8, 8, 1, 1)
  love.graphics.setCanvas()
  local imgdata = love.graphics.readbackTexture(canvas)
  test:compareImg(imgdata)
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-------------------------------------WINDOW-------------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.getDPIScale
-- @NOTE hardware dependent so can't check result
love.test.graphics.getDPIScale = function(test)
  test:assertNotNil(love.graphics.getDPIScale())
end


-- love.graphics.getDimensions
love.test.graphics.getDimensions = function(test)
  -- check graphics dimensions match window dimensions 
  local gwidth, gheight = love.graphics.getDimensions()
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wwidth, gwidth, 'check graphics dimension w matches window w')
  test:assertEquals(wheight, gheight, 'check graphics dimension h matches window h')
end


-- love.graphics.getHeight
love.test.graphics.getHeight = function(test)
  -- check graphics height match window height 
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wheight, love.graphics.getHeight(), 'check graphics h matches window h')
end


-- love.graphics.getPixelDimensions
love.test.graphics.getPixelDimensions = function(test)
  -- check graphics dimensions match window dimensions relative to dpi
  local dpi = love.graphics.getDPIScale()
  local gwidth, gheight = love.graphics.getPixelDimensions()
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wwidth, gwidth/dpi, 'check graphics pixel dpi w matches window w')
  test:assertEquals(wheight, gheight/dpi, 'check graphics pixel dpi h matches window h')
end


-- love.graphics.getPixelHeight
love.test.graphics.getPixelHeight = function(test)
  -- check graphics height match window height relative to dpi
  local dpi = love.graphics.getDPIScale()
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wheight,love.graphics.getPixelHeight()/dpi, 'check graphics pixel dpi h matches window h')
end


-- love.graphics.getPixelWidth
love.test.graphics.getPixelWidth = function(test)
  -- check graphics width match window width relative to dpi
  local dpi = love.graphics.getDPIScale()
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wwidth, love.graphics.getWidth()/dpi, 'check graphics pixel dpi w matches window w')
end


-- love.graphics.getWidth
love.test.graphics.getWidth = function(test)
  -- check graphics width match window width 
  local wwidth, wheight, _ = love.window.getMode()
  test:assertEquals(wwidth, love.graphics.getWidth(), 'check graphics w matches window w')
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-------------------------------SYSTEM INFORMATION-------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


-- love.graphics.getTextureFormats
love.test.graphics.getTextureFormats = function(test)
  local formats = {
    'hdr', 'r8i', 'r8ui', 'r16i', 'r16ui', 'r32i', 'r32ui', 'rg8i', 'rg8ui',
    'rg16i', 'rg16ui', 'rg32i', 'rg32ui', 'bgra8', 'r8', 'rgba8i', 'rgba8ui',
    'rgba16i', 'rg8', 'rgba32i', 'rgba32ui', 'rgba8', 'DXT1', 'r16', 'DXT5',
    'rg16', 'BC4s', 'rgba16', 'BC5s', 'r16f', 'BC6hs', 'BC7', 'PVR1rgb2',
    'rg16f', 'PVR1rgba2', 'rgba16f', 'ETC1', 'r32f', 'ETC2rgba', 'rg32f',
    'EACr', 'rgba32f', 'EACrg', 'rgba4', 'ASTC4x4', 'ASTC5x4', 'rgb5a1',
    'ASTC6x5', 'rgb565', 'ASTC8x5', 'ASTC8x6', 'rgb10a2', 'ASTC10x5',
    'rg11b10f', 'ASTC10x8', 'ASTC10x10', 'ASTC12x10', 'ASTC12x12', 'normal',
    'srgba8', 'la8', 'ASTC10x6', 'ASTC8x8', 'ASTC6x6', 'ASTC5x5', 'EACrgs',
    'EACrs', 'ETC2rgba1', 'ETC2rgb', 'PVR1rgba4', 'PVR1rgb4', 'BC6h',
    'BC5', 'BC4', 'DXT3', 'rgba16ui', 'bgra8srgb',
    'depth16', 'depth24', 'depth32f', 'depth24stencil8', 'depth32fstencil8', 'stencil8'
  }
  local supported = love.graphics.getTextureFormats({ canvas = true })
  test:assertNotNil(supported)
  for f=1,#formats do
    test:assertNotEquals(nil, supported[formats[f] ], 'expected a key for format: ' .. formats[f])
  end
end


-- love.graphics.getRendererInfo
-- @NOTE hardware dependent so best can do is nil checking
love.test.graphics.getRendererInfo = function(test)
  local name, version, vendor, device = love.graphics.getRendererInfo()
  test:assertNotNil(name)
  test:assertNotNil(version)
  test:assertNotNil(vendor)
  test:assertNotNil(device)
end


-- love.graphics.getStats
-- @NOTE cant really predict some of these so just nil check for most
love.test.graphics.getStats = function(test)
  local stattypes = {
    'drawcalls', 'canvasswitches', 'texturememory', 'shaderswitches',
    'drawcallsbatched', 'textures', 'fonts'
  }
  local stats = love.graphics.getStats()
  for s=1,#stattypes do
    test:assertNotEquals(nil, stats[stattypes[s] ], 'expected a key for stat: ' .. stattypes[s])
  end
end


-- love.graphics.getSupported
love.test.graphics.getSupported = function(test)
  -- cant check values as hardware dependent but we can check the keys in the 
  -- table match what the documentation lists
  local gfs = {
    'clampzero', 'lighten', 'glsl3', 'instancing', 'fullnpot', 
    'pixelshaderhighp', 'shaderderivatives', 'indirectdraw',
    'copytexturetobuffer', 'multicanvasformats', 
    'clampone', 'glsl4'
  }
  local features = love.graphics.getSupported()
  for g=1,#gfs do
    test:assertNotEquals(nil, features[gfs[g] ], 'expected a key for graphic feature: ' .. gfs[g])
  end
end


-- love.graphics.getSystemLimits
love.test.graphics.getSystemLimits = function(test)
  -- cant check values as hardware dependent but we can check the keys in the 
  -- table match what the documentation lists
  local glimits = {
    'texelbuffersize', 'shaderstoragebuffersize', 'threadgroupsx', 
    'threadgroupsy', 'pointsize', 'texturesize', 'texturelayers', 'volumetexturesize',
    'cubetexturesize', 'anisotropy', 'texturemsaa', 'multicanvas', 'threadgroupsz'
  }
  local limits = love.graphics.getSystemLimits()
  for g=1,#glimits do
    test:assertNotEquals(nil, limits[glimits[g] ], 'expected a key for system limit: ' .. glimits[g])
  end
end


-- love.graphics.getTextureTypes
love.test.graphics.getTextureTypes = function(test)
  -- cant check values as hardware dependent but we can check the keys in the 
  -- table match what the documentation lists
  local ttypes = {
    '2d', 'array', 'cube', 'volume'
  }
  local types = love.graphics.getTextureTypes()
  for t=1,#ttypes do
    test:assertNotEquals(nil, types[ttypes[t] ], 'expected a key for texture type: ' .. ttypes[t])
  end
end