local imgui = require 'mimgui'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local new = imgui.new
local renderWindow = new.bool(false)
imgui.OnInitialize(function()
imgui.GetIO().IniFilename = nil
end)
local newFrame = imgui.OnFrame(
function() return renderWindow[0] end,
function(player)
local resX, resY = getScreenResolution()
local sizeX, sizeY = 300, 300
imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
imgui.Begin('Main Window', renderWindow)
imgui.ImageURL("https://items.shinoa.tech/images/model/2296.png", imgui.ImVec2(256, 256), true)
imgui.End()
end
)
function main()
while not isSampAvailable() do wait(0) end
sampRegisterChatCommand('urlt', function()
renderWindow[0] = not renderWindow[0]
end)
while true do
wait(0)
end
end
function handleAsyncHttpRequestThread(runner, resolve, reject)
local status, err
repeat
status, err = runner:status()
wait(0)
until status ~= 'running'
if not err then
if status == 'completed' then
local result, response = runner:get()
if result then
resolve(response)
else
reject(response)
end
return
elseif status == 'canceled' then
return reject(status)
end
else
return reject(err)
end
end
function asyncHttpRequest(method, url, args, resolve, reject)
assert(type(method) == 'string', '"method" expected string')
assert(type(url) == 'string', '"url" expected string')
assert(type(args) == 'table', '"args" expected table')
local thread = requestRunner()(method, url, encodeJson(args))
if not resolve then resolve = function() end end
if not reject then reject = function() end end
return {
effilRequestThread = thread;
luaHttpHandleThread = lua_thread.create(handleAsyncHttpRequestThread, thread, resolve, reject);
}
end
local md5 = require "md5"
imgui.ImageURL = {
cache_dir = getWorkingDirectory() .. "/resource/cache",
download_statuses = {
INIT = 0,
DOWNLOADING = 1,
ERROR = 2,
SAVED = 3,
NOT_MODIFIED = 4,
CACHE_ONLY = 5
},
pool = {}
}
function imgui.ImageURL:set_cache(url, image_data, headers)
if not doesDirectoryExist(self.cache_dir) then
createDirectory(self.cache_dir)
end
local path = ("%s/%s"):format(self.cache_dir, md5.sumhexa(url))
local file, err = io.open(path, "wb")
if not file then
return nil
end
local data = { Data = tostring(image_data) }
if headers["etag"] then
data["Etag"] = headers["etag"]
end
if headers["last-modified"] then
data["Last-Modified"] = headers["last-modified"]
end
file:write(encodeJson(data))
file:close()
return path
end
function imgui.ImageURL:get_cache(url)
local path = ("%s/%s"):format(self.cache_dir, md5.sumhexa(url))
if not doesFileExist(path) then
return nil, nil
end
local image_data = nil
local cached_headers = {}
local file, err = io.open(path, "rb")
if file then
local cache = decodeJson(file:read("*a"))
if type(cache) ~= "table" then
return nil, nil
end
if cache["Data"] ~= nil then
image_data = cache["Data"]
end
if cache["Last-Modified"] ~= nil then
cached_headers["If-Modified-Since"] = cache["Last-Modified"]
end
if cache["Etag"] ~= nil then
cached_headers["If-None-Match"] = cache["Etag"]
end
file:close()
end
return image_data, cached_headers
end
function imgui.ImageURL:download(url, preload_cache)
local st = self.download_statuses
self.pool[url] = {
status = st.DOWNLOADING,
image = nil,
error = nil
}
local cached_image, cached_headers = imgui.ImageURL:get_cache(url)
local img = self.pool[url]
if preload_cache and cached_image ~= nil then
img.image = imgui.CreateTextureFromMemory(memory.strptr(cached_image), #cached_image)
end
asyncHttpRequest("GET", url, { headers = cached_headers },
function(result)
if result.status_code == 200 then
img.image = imgui.CreateTextureFromMemory(memory.strptr(result.text), #result.text)
img.status = st.SAVED
imgui.ImageURL:set_cache(url, result.text, result.headers)
elseif result.status_code == 304 then
img.image = img.image or imgui.CreateTextureFromMemory(memory.strptr(cached_image), #cached_image)
img.status = st.NOT_MODIFIED
else
img.status = img.image and st.CACHE_ONLY or st.ERROR
img.error = ("Error #%s"):format(result.status_code)
end
end,
function(error)
img.status = img.image and st.CACHE_ONLY or st.ERROR
img.error = error
end
)
end
function imgui.ImageURL:render(url, size, preload, ...)
local st = self.download_statuses
local img = self.pool[url]
if img == nil then
self.pool[url] = {
status = st.INIT,
error = nil,
image = nil
}
img = self.pool[url]
end
if img.status == st.INIT then
imgui.ImageURL:download(url, preload)
end
if img.image ~= nil then
imgui.Image(img.image, size, ...)
else
imgui.Dummy(size)
end
return img.status, img.error
end
setmetatable(imgui.ImageURL, {
__call = imgui.ImageURL.render
})
