local imgui = require("mimgui")
local ffi = require("ffi")
local enc = require("encoding")
enc.default = 'CP1251'
local u8 = enc.UTF8
local new = imgui.new
ffi.cdef[[
typedef unsigned char RwUInt8;
typedef int RwInt32;
typedef struct RwLLLink { struct RwLLLink *next; struct RwLLLink *prev; } RwLLLink;
typedef struct RwLinkList { RwLLLink link; } RwLinkList;
typedef struct RwTexDictionary {
void* object;
RwLinkList texturesInDict;
RwLinkList lInInstance;
} RwTexDictionary;
typedef struct RwTextureFull {
void* raster;
void* dict;
RwLLLink inDictionary;
char name[32];
char mask[32];
int refCount;
unsigned int filterAddressing;
} RwTextureFull;
typedef struct RwRaster {
void* parent;
RwUInt8* cpPixels;
RwUInt8* palette;
RwInt32 width, height, depth;
RwInt32 stride;
short nOffsetX, nOffsetY;
RwUInt8 cType, cFlags, privateFlags, cFormat;
RwUInt8* originalPixels;
RwInt32 originalWidth, originalHeight, originalStride;
void* texture_ptr;
} RwRaster;
typedef enum RwStreamType {
rwNASTREAM = 0,
rwSTREAMFILE,
rwSTREAMFILENAME,
rwSTREAMMEMORY,
rwSTREAMCUSTOM
} RwStreamType;
typedef enum RwStreamAccessType {
rwNASTREAMACCESS = 0,
rwSTREAMREAD,
rwSTREAMWRITE,
rwSTREAMAPPEND
} RwStreamAccessType;
typedef struct RwStream RwStream;
typedef struct TxdDef {
RwTexDictionary *txd_ptr;
unsigned short ref_count;
unsigned short flags;
int name_hash;
} TxdDef;
RwStream* (*RwStreamOpen)(int type, int accessType, const void *pData);
bool (*RwStreamClose)(RwStream *stream, void *pData);
bool (*RwStreamFindChunk)(RwStream *stream, unsigned int type, unsigned int *lengthOut, unsigned int *versionOut);
RwTexDictionary* (*RwTexDictionaryStreamRead)(RwStream *stream);
bool (*RwTexDictionaryDestroy)(RwTexDictionary *txd);
int (*CTxdStore_FindTxdSlot)(const char *name);
TxdDef ***CTxdStore_ms_pTxdPool;
]]
local addresses = {
RwStreamOpen = 0x7ECEF0,
RwStreamClose = 0x7ECE20,
RwStreamFindChunk = 0x7ED2D0,
RwTexDictionaryStreamRead = 0x804C30,
RwTexDictionaryDestroy = 0x7F36A0,
CTxdStore_FindTxdSlot = 0x731850,
CTxdStore_ms_pTxdPool = 0xC8800C
}
local RwStreamOpen = ffi.cast("RwStream* (*)(int, int, const void*)", addresses.RwStreamOpen)
local RwStreamClose = ffi.cast("bool (*)(RwStream*, void*)", addresses.RwStreamClose)
local RwStreamFindChunk = ffi.cast("bool (*)(RwStream*, unsigned int, unsigned int*, unsigned int*)", addresses.RwStreamFindChunk)
local RwTexDictionaryStreamRead = ffi.cast("RwTexDictionary* (*)(RwStream*)", addresses.RwTexDictionaryStreamRead)
local RwTexDictionaryDestroy = ffi.cast("bool (*)(RwTexDictionary*)", addresses.RwTexDictionaryDestroy)
local CTxdStore_FindTxdSlot = ffi.cast("int (*)(const char*)", addresses.CTxdStore_FindTxdSlot)
local CTxdStore_ms_pTxdPool = ffi.cast("TxdDef***", addresses.CTxdStore_ms_pTxdPool)[0]
local rwSTREAMFILENAME = 2
local rwSTREAMREAD = 1
local rpTEXDICTIONARY = 0x16
local RwTexDictionary_texturesInDict_offset = 0x0C
local State = {
WinState = new.bool(false),
currentTXD = new.int(1),
currentTexture = new.int(1),
imageZoom = new.float(1.0),
txdList = {},
loadedTextures = {},
didInitialAutoload = false,
loadingStatus = u8"Какашки..."
}
local function isValidTextureName(name)
if not name or #name == 0 or #name > 31 then return false end
for i = 1, #name do
if name:byte(i) < 32 then return false end
end
return true
end
local function getFilesInPath(path, mask)
local res = {}
local h, f = findFirstFile(path .. "\\" .. mask)
if not h then return res end
while f do
if not f:match("^%.") then table.insert(res, f) end
f = findNextFile(h)
end
findClose(h)
return res
end
local function loadTxd(filePath)
local stream = RwStreamOpen(rwSTREAMFILENAME, rwSTREAMREAD, filePath)
if stream == ffi.NULL then return nil end
local found = pcall(function()
return RwStreamFindChunk(stream, rpTEXDICTIONARY, nil, nil)
end)
if found then
local txd_ptr = RwTexDictionaryStreamRead(stream)
RwStreamClose(stream, nil)
if txd_ptr ~= ffi.NULL then
return txd_ptr
end
else
RwStreamClose(stream, nil)
end
return nil
end
local function getTxdByName(name)
local slot = CTxdStore_FindTxdSlot(name)
if slot ~= -1 and CTxdStore_ms_pTxdPool then
local pool = CTxdStore_ms_pTxdPool[0]
if pool ~= ffi.NULL then
local txd_def = pool[slot]
if txd_def ~= ffi.NULL and txd_def.txd_ptr ~= ffi.NULL then
return txd_def.txd_ptr
end
end
end
return nil
end
local function extractAllTexturesData(dict)
if not dict or dict == ffi.NULL then return {} end
local list_head = ffi.cast("RwLLLink*", ffi.cast("char*", dict) + RwTexDictionary_texturesInDict_offset)
local current_link = list_head.next
if current_link == ffi.NULL then return {} end
local texturesData, visited = {}, {}
while current_link ~= list_head and current_link ~= ffi.NULL do
local addr = tonumber(ffi.cast("uintptr_t", current_link))
if visited[addr] then break end
visited[addr] = true
local tex = ffi.cast("RwTextureFull*", ffi.cast("char*", current_link) - ffi.offsetof("RwTextureFull", "inDictionary"))
if tex ~= ffi.NULL then
local ok, name = pcall(ffi.string, tex.name)
if ok and isValidTextureName(name) and tex.raster ~= ffi.NULL then
local raster = ffi.cast("RwRaster*", tex.raster)
if raster.texture_ptr ~= ffi.NULL then
table.insert(texturesData, {
texture_ptr = raster.texture_ptr,
width = raster.width,
height = raster.height,
name = name
})
end
end
end
current_link = current_link.next
end
return texturesData
end
local function scanTXD(folder)
local files = getFilesInPath(folder, "*.txd")
table.sort(files)
local totalFiles = #files
for i, file in ipairs(files) do
State.loadingStatus = string.format(u8"Загрузка... (%d / %d): %s", i, totalFiles, file)
local fullPath = folder .. "\\" .. file
local name = file:gsub("%.txd$", "")
local txd_ptr = getTxdByName(name)
local loaded_by_script = false
if not txd_ptr then
txd_ptr = loadTxd(fullPath)
loaded_by_script = true
end
if txd_ptr and txd_ptr ~= ffi.NULL then
local textures = extractAllTexturesData(txd_ptr)
if #textures > 0 then
table.insert(State.txdList, {
name = file,
textures = textures,
ptr = txd_ptr,
loaded_by_script = loaded_by_script
})
elseif loaded_by_script then
RwTexDictionaryDestroy(txd_ptr)
end
end
wait(10)
end
State.loadingStatus = nil
end
local function rebuildLoadedTexturesFor(index)
State.loadedTextures = {}
local rec = State.txdList[index]
if rec and rec.textures then
State.loadedTextures = rec.textures
end
State.currentTexture[0] = #State.loadedTextures > 0 and 1 or 0
State.imageZoom[0] = 1.0
end
imgui.OnFrame(function() return State.WinState[0] end, function()
imgui.SetNextWindowSize(imgui.ImVec2(640, 520), imgui.Cond.FirstUseEver)
imgui.Begin(u8'TXD Browser', State.WinState)
if State.loadingStatus then
imgui.Text(State.loadingStatus)
elseif #State.txdList == 0 then
imgui.Text(u8"TXD файлы не найдены в папке")
else
if not State.didInitialAutoload then
rebuildLoadedTexturesFor(State.currentTXD[0])
State.didInitialAutoload = true
end
local currentTxdData = State.txdList[State.currentTXD[0]]
if currentTxdData and imgui.BeginCombo("TXD", currentTxdData.name) then
for i, rec in ipairs(State.txdList) do
local isSelected = (State.currentTXD[0] == i)
if imgui.Selectable(string.format("%s (%d)", rec.name, #rec.textures), isSelected) then
State.currentTXD[0] = i
rebuildLoadedTexturesFor(i)
end
if isSelected then imgui.SetItemDefaultFocus() end
end
imgui.EndCombo()
end
imgui.Separator()
if #State.loadedTextures > 0 then
local texIdx = State.currentTexture[0]
if texIdx >= 1 and State.loadedTextures[texIdx] then
local tex = State.loadedTextures[texIdx]
local availableSpace = imgui.GetContentRegionAvail()
local imageRegionHeight = availableSpace.y - 120
local aspect = tex.width / tex.height
local display_w, display_h = availableSpace.x, availableSpace.x / aspect
if display_h > imageRegionHeight then
display_h = imageRegionHeight
display_w = display_h * aspect
end
local final_w, final_h = display_w * State.imageZoom[0], display_h * State.imageZoom[0]
local pos_x = (availableSpace.x - final_w) / 2
imgui.SetCursorPosX(imgui.GetCursorPosX() + pos_x)
imgui.Image(tex.texture_ptr, imgui.ImVec2(final_w, final_h))
imgui.Separator()
if imgui.CollapsingHeader(u8'Информация', imgui.TreeNodeFlags.DefaultOpen) then
imgui.Text(string.format(u8"Имя: %s", tex.name))
imgui.Text(string.format(u8"Размер: %d x %d", tex.width, tex.height))
if imgui.Button(u8"Копировать имя") then setClipboardText(tex.name) end
imgui.Separator()
imgui.SliderFloat(u8"Масштаб", State.imageZoom, 0.1, 5.0)
if imgui.Button(u8"Сбросить масштаб") then State.imageZoom[0] = 1.0 end
end
imgui.Separator()
if imgui.Button(u8"Предыдущая") then State.currentTexture[0] = math.max(1, texIdx - 1) end
imgui.SameLine()
if imgui.Button(u8"Следующая") then State.currentTexture[0] = math.min(#State.loadedTextures, texIdx + 1) end
imgui.SameLine()
imgui.Text(string.format("%d / %d", texIdx, #State.loadedTextures))
end
else
imgui.Text(u8"В этом TXD-архиве нет доступных для чтения текстур")
end
end
imgui.End()
end)
function main()
while not isSampAvailable() do wait(100) end
lua_thread.create(scanTXD, getGameDirectory() .. "\\models")
sampRegisterChatCommand('txd', function()
State.WinState[0] = not State.WinState[0]
end)
wait(-1)
end
function cleanShit()
local count = 0
for _, txdData in ipairs(State.txdList) do
if txdData.loaded_by_script and txdData.ptr ~= ffi.NULL then
RwTexDictionaryDestroy(txdData.ptr)
txdData.ptr = ffi.NULL
count = count + 1
end
end
end
function onScriptTerminate(script, quitGame)
if script == thisScript() then
cleanShit()
end
end
-- full folder models (без папок внутри) = 0.17 секунд на загрузку 170 текстур
