Эксклюзив RakLua — RakNet hooks, functions for MoonLoader [UPDATE 2.13 | OPEN-SOURCE]

Представляю вам RakLua.
RakLua — это новая библиотека, которая служит заменой событиям и функциям SAMPFUNCS для взаимодействия с RakNet'ом и BitStream — классом, позволяющим SAMPy отправлять/получать данные от сервера. Библиотека использует sol3 для биндинга C++ (самой библиотеки) и самого Lua. Библиотека включает почти все возможности взаимодействия с RakNet'ом и его событиями, а ключевым моментом является одновременная поддержка SAMP 0.3.7-R1, SAMP 0.3.7-R2, SAMP 0.3.7-R3-1, SAMP 0.3.7-R4-2 и SAMP 0.3.7-R5-1, а так же отсутствие зависимости от SAMPFUNCS и CLEO (потому что SAMPFUNCS не используется).

Содержание:


GitHub: Northn/RakLua
Версия RakLua: 2.13; состояние: Stable

Установка: файлы RakLuaDll.dll, RakLua.lua из архива RakLua2.1.zip, приложенного к теме, перетащить в папку *Корневая папка с игрой*/moonloader/lib

Использованные материалы: mod_s0beit_sa; sol3; RakHook
Отдельное спасибо: @FYP ; @RTD




Список имеющихся функций и событий
Важная заметка: вам может быть неудобно переписывать исходный код в формат RakLua, если это так, то прочтите
данный пост.

ОписаниеПрименение в RakLuaПрименение в SAMPFUNCS
Создание BitStream; удаление BitStream
Lua:
local bs = RakLuaBitStream.new()
-- Обратите внимание, что это новый класс, а не тот самый BitStream
-- Получить сам BitStream можно через bs:getBitStream()
-- Удаление недоступно, сборщик мусора сам удалит
Lua:
local bs = raknetNewBitStream()
raknetDeleteBitStream(bs)
Получение оффсета для чтения/записи данных
Lua:
local offset = bs:getReadOffset()
local offset = bs:getWriteOffset()
Lua:
raknetBitStreamGetReadOffset(bs)
raknetBitStreamGetWriteOffset(bs)
Установка оффсета для чтения/записи данных
Lua:
bs:setReadOffset(offset)
bs:setWriteOffset(offset)
Lua:
raknetBitStreamSetReadOffset(bs, offset)
raknetBitStreamSetWriteOffset(bs, offset)
Сброс указателя для чтения/записи данных
Lua:
bs:resetReadPointer()
bs:resetWritePointer()
Lua:
raknetBitStreamResetReadPointer(bs)
raknetBitStreamResetWritePointer(bs)
Игнор битов/байтов для чтения данных
Lua:
bs:ignoreBits(amount)
bs:ignoreBytes(amount)
-- Альтернатива (вспоминается проще)
bs:skipBits(amount)
bs:skipBytes(amount)
Lua:
raknetBitStreamIgnoreBits(bs, amount)
-- Игнор байтов не имеется
Получение количества использованных битов/байтов
и количества непрочитанных битов/байтов
Lua:
local value = bs:getNumberOfBitsUsed()
local value = bs:getNumberOfBytesUsed()
local value = bs:getNumberOfUnreadBits()
local value = bs:getNumberOfUnreadBytes()
Lua:
local value = raknetBitStreamGetNumberOfBitsUsed(bs)
local value = raknetBitStreamGetNumberOfBytesUsed(bs)
local value = raknetBitStreamGetNumberOfUnreadBits(bs)
-- Получение количества непрочитанных байтов недоступно
Чтение данных
Lua:
local value = bs:readBool() -- bool
local value = bs:readUInt(8/16/32)() -- uint8/16/32; bs:readUInt16()
local value = bs:readInt(8/16/32)() -- int8/16/32; bs:readInt16()
local value = bs:readFloat() -- float
local value = bs:readString(length) -- string
local value = bs:readEncoded(size) -- encodedString
local result = bs:readBuffer(dest, size)
Lua:
local value = raknetBitStreamReadBool(bs) -- bool
local value = raknetBitStreamReadInt8(bs) -- uint8
local value = raknetBitStreamReadInt16(bs) -- uint16
local value = raknetBitStreamReadInt32(bs) -- int32
local value = raknetBitStreamReadFloat(bs) -- float
local value = raknetBitStreamReadString(bs, length) -- string
local value = raknetBitStreamDecodeString(bs, size) -- encodedString
raknetBitStreamReadBuffer(bs, dest, size)
Запись значений
Lua:
bs:writeBool(value)
bs:writeUInt(8/16/32)(value) -- bs:writeUInt16(value)
bs:writeInt(8/16/32)(value) -- bs:writeInt16(value)
bs:writeFloat(value)
bs:writeString(value)
bs:writeEncoded(value)
bs:writeBuffer(dest, size)
bs:writeBitStream(bitStream)
Lua:
raknetBitStreamWriteBool(bs, value)
raknetBitStreamWriteInt8(bs, value)
raknetBitStreamWriteInt16(bs, value)
raknetBitStreamWriteInt32(bs, value)
raknetBitStreamWriteFloat(bs,value)
raknetBitStreamWriteString(bs, value)
raknetBitStreamEncodeString(bs, value)
raknetBitStreamWriteBuffer(bs, dest, size)
raknetBitStreamWriteBitStream(bs, bitStream)
Отправка RPC/пакетов;
Эмуляция входящих RPC/пакетов
Lua:
bs:sendRPC(rpcId)
bs:sendPacket()
bs:emulIncomingRPC(rpcId)
bs:emulIncomingPacket(packetİd)
Lua:
raknetSendRpc(rpcId, bs)
raknetSendBitStream(bs)
raknetEmulRpcReceiveBitStream(rpcId, bs)
raknetEmulPacketReceiveBitStream(packetId, bs)
Установка обработчиков на
входящие/исходящие RPC и пакеты
Lua:
RakLua.registerHandler(RakLuaEvents.INCOMING_RPC, func)
RakLua.registerHandler(RakLuaEvents.INCOMING_PACKET, func)
RakLua.registerHandler(RakLuaEvents.OUTGOING_RPC, func)
RakLua.registerHandler(RakLuaEvents.OUTGOING_PACKET, func)
Lua:
addEventHandler("onReceiveRPC", func)
addEventHandler("onReceivePacket", func)
addEventHandler("onSendRPC", func)
addEventHandler("onSendPacket", func)


СобытиеИндекс
Входящие RPC​
RakLuaEvents.INCOMING_RPC
Исходящие RPC​
RakLuaEvents.OUTGOING_RPC
Входящие пакеты​
RakLuaEvents.INCOMING_PACKET
Исходящие пакеты​
RakLuaEvents.OUTGOING_PACKET

Дополнительная функция: RakLua.getSampVersion(), возвращает индекс исходя из перечисления:
ОписаниеИндекс
SAMP не загружен (одиночная игра / SAMP не установлен)​
RakLuaSampVersions.SAMP_NOT_LOADED
Неизвестная версия SAMP (неподдерживаемая)​
RakLuaSampVersions.SAMP_UNKNOWN
Версия SAMP 0.3.7-R1
RakLuaSampVersions.SAMP_037_R1
Версия SAMP 0.3.7-R3-1
RakLuaSampVersions.SAMP_037_R3_1




Примеры эмуляции исходящих RPC/пакетов
Для начала, хочу подметить, что работа с BitStream производится через новый класс, предоставляемый этой библиотекой — RakLuaBitStream, однако вы можете получить оригинальный BitStream через local bitStream = bs:getBitStream(), но он, скорее всего, для вас является бесполезным.

Давайте начнём с простого: эмуляция отправки, например, команды.

Lua:
function send_rpc_command(text)
    local bs = RakLuaBitStream.new()
    bs:writeInt32(text:len())
    bs:writeString(text)
    if bs:sendRPC(50) --[[RPC_ServerCommand в 0.3.7-R3]] then
        print("RPC was sent!")
    else
        print("We couldn't send RPC.")
    end
end

Довольно просто, не так ли? Вы также можете убрать проверку на успешность отправки RPC, поскольку если вы всё правильно записали, то оно, вероятнее всего, отправится. Также обратите внимание, что мы не удаляем BitStream, нам этого не нужно делать, этим сам SAMP позаботится.

Можем отправить какое-либо сообщение просто в чат:

Lua:
function send_text(text)
    local bs = RakLuaBitStream.new()
    bs:writeUInt8(text:len())
    bs:writeString(text)
    if bs:sendRPC(101) --[[RPC_Chat в 0.3.7-R3]] then
        print("RPC was sent!")
    else
        print("We couldn't send RPC.")
    end
end

Или написать целый sampSendChat(text):
Lua:
function send_rpc_command(text)
    local bs = RakLuaBitStream.new()
    bs:writeInt32(text:len())
    bs:writeString(text)
    return bs:sendRPC(50) --[[RPC_ServerCommand в 0.3.7-R3]]
end

function send_text(text)
    local bs = RakLuaBitStream.new()
    bs:writeUInt8(text:len())
    bs:writeString(text)
    return bs:sendRPC(101) --[[RPC_Chat в 0.3.7-R3]]
end

function sampSendChat(text)
    text = tostring(text)
    return text:sub(1, 1) == "/" and send_rpc_command(text) or send_text(text)
end

Мы также можем отправлять пакеты, достаточно лишь заполнить его и отправить:
Lua:
local bs = RakLuaBitStream.new()
bs:writeUInt8(id) -- ID пакета
-- И заполняем необходимыми данными
bs:sendPacket()




Отлавливание и обработка входящих/исходящих RPC и пакетов
Давайте хукнем, например, всеми известные onServerMessage, onSetPlayerHealth и onSetPlayerPos из входящих RPC:
Lua:
local RakLua = require 'RakLua'

function main()
    RakLua.registerHandler(RakLuaEvents.INCOMING_RPC,
        function(id, bs)
            if id == 93 then -- RPC_ClientMessage
                local color = bs:readInt32() -- Читаем цвет
                local textLen = bs:readInt32() -- Читаем длину текста
                local text = bs:readString(textLen) -- Читаем сам текст
                local res = onServerMessage(color, text) -- Вызываем свою функцию
                if type(res) == "boolean" then -- Если тип возвращаемого значения bool
                    return res -- Возвращаем значение, сам обработчик уже обработает/не обработает
                    -- исходя из возвращаемого значения
                elseif type(res) == "table" then
                    bs:resetWritePointer() -- Сбросим указатель записи, чтобы перезаписать всё
                    bs:writeInt32(res[1]) -- Запишем цвет
                    bs:writeInt32(res[2]:len()) -- Запишем длину текста
                    bs:writeString(res[2]) -- Запишем сам текст
                end
            elseif id == 14 then -- RPC_SetPlayerHealth
                local health = bs:readFloat() -- Получим количество HP, которое сервер
                -- Хочет нам установить
                if health < 5 then
                    return false
                end
            elseif id == 12 then -- RPC_SetPlayerPos
                local x, y, z = bs:readFloat(), bs:readFloat(), bs:readFloat()
                print(string.format("Server tried to set your position at %.2f; %.2f; %.2f", x, y, z))
                return false -- Проигнорируем телепортацию
            end
        end
    )
end

function onServerMessage(color, text)
    if color == -1 then
        return false
    elseif text == "hello" then
        return true
    end
    return {color, "hello"}
end

Мы написали обработчик, который при получении RPC ClientMessage будет вызывать функцию onServerMessage, при получении RPC SetPlayerHealth, если сервер попытается установить HP ниже пяти, будет игнорировать, и RPC SetPlayerPos, который будет всегда игнорировать попытку сервера телепортировать нас и будет писать в moonloader.log соответствующую информацию.

Давайте напишем обработчик на исходящие RPC:

Lua:
RakLua.registerHandler(RakLuaEvents.OUTGOING_RPC,
    function(id, bs, priority, reliability, orderingChannel, shiftTimestamp)
        if id == 101 then -- RPC_Chat
            local textLen = bs:readUInt8()
            local text = bs:readString(textLen)
            local res = onSendChat(text)
            if type(res) == "boolean" then
                return res
            elseif type(res) == "table" then
                bs:resetWritePointer()
                bs:writeUInt8(res[1]:len())
                bs:writeString(res[1])
            end
        elseif id == 50 then -- RPC_ServerCommand
            local cmdLen = bs:readInt32()
            local cmd = bs:readString(cmdLen)
            local res = onSendCommand(cmd)
            if type(res) == "boolean" then
                return res
            elseif type(res) == "table" then
                bs:resetWritePointer()
                bs:writeInt32(res[1]:len())
                bs:writeString(res[1])
            end
        end
    end
)

function onSendChat(text)
    if text == "hello" then
        text = "bye"
    elseif text == "privet" then
        return false
    end
    return {"[Префикс] "..text}
end

function onSendCommand(cmd)
    if cmd == "/help" then
        cmd = "/mm"
    elseif cmd == "/admins" then
        return false
    end
    return {cmd}
end

Обработчик, при получении RPC Chat; ServerCommand, будет вызывать соответствующие функции и исходя из их возвращаемых аргументов действовать.

Обработка исходящих пакетов:

Lua:
RakLua.registerHandler(RakLuaEvents.OUTGOING_PACKET,
    function(id, bs, priority, reliability, orderingChannel)
        if id == 207 then -- ID_PLAYER_SYNC
            bs:ignoreBytes(35) -- or bs:skipBytes(35); пропускаем 35 байт
            local hp, armor = bs:readUInt8(), bs:readUInt8()
            print(string.format("I sent %d HP; %d armor.", hp, armor))
        end
    end
)

Если отправляем Packet PLAYER_SYNC, то пропускаем первые 35 байт, читаем количество здоровья, брони и выводим в moonloader.log.




Вот и всё, мы научились работать с RakLua, возможно даже что и с BitStream, раз ранее не работали.
Также хочу отметить, что поддержка с SAMP.Lua в наличии, но только начиная с версии 2.0. Для совместимости с SAMP.Lua необходимо вызвать функцию RakLua.defineSampLuaCompatibility()
до подгрузки SAMP.Lua.
 

Вложения

  • RakLua.zip
    156.6 KB · Просмотры: 231
  • RakLua1.1.zip
    157.2 KB · Просмотры: 35
  • RakLua1.2.zip
    156.8 KB · Просмотры: 27
  • RakLua1.3.zip
    172.7 KB · Просмотры: 129
  • RakLua2.0.zip
    176.6 KB · Просмотры: 48
  • RakLua2.01.zip
    176.4 KB · Просмотры: 84
  • RakLua2.1.zip
    89 KB · Просмотры: 575
  • RakLua2.11.zip
    103.6 KB · Просмотры: 47
  • RakLua2.12.zip
    104.3 KB · Просмотры: 381
  • RakLua2.13.zip
    104.8 KB · Просмотры: 1,381
Последнее редактирование:

#Northn

Pears Project — уже запущен!
Автор темы
Всефорумный модератор
2,649
2,499
Библиотека обновлена до версии 2.0. Изменения:
  • Open-source
  • Первый стабильный билд.
  • Добавлена функция RakLua.defineSampLuaCompatibility(), которая обеспечивает совместимость SAMP.Lua с RakLua. Её следует вызывать до подгрузки SAMP.Lua.
  • Добавлена эмуляция входящих RPC и пакетов.
  • Переписаны хуки RakClientInterface, теперь вместо хука всей таблицы хукаются только необходимые методы.
  • Битстримы, созданные через raknetNewBitStream(), теперь автоматически чистятся без необходимости использования raknetDeleteBitStream(). Функция удаления битстрима оставлена для обратной совместимости, но она теперь ничего не делает.
  • Добавлено огромное количество недостающих методов и функций. Список будет ниже.
  • Исправлено неопределённое поведение в RakLua.destroyHandlers()
  • Теперь библиотека состоит из двух файлов: самого исполняемого RakLua RakLuaDll.dll и Lua библиотеки RakLua.lua.
  • Теперь не нужно добавлять обработчик завершения работы скрипта, который вызывал destroyHandlers(), библиотека сама это сделает за вас.
  • Исправлены все возможные краши/баги/вылеты, в текущей реализации я не сомневаюсь.
  • Исправлена функция sampSendRconCommand(), ранее ID RPC записывался некорректно.
Список добавленных методов:
RakLuaBitStream::getReadOffset();
RakLuaBitStream::getWriteOffset();

RakLuaBitStream::readBuffer(uintptr_t destination, int size);

RakLuaBitStream::writeBuffer(uintptr_t destinationFrom, int size);
RakLuaBitStream::writeBitStream(RakLuaBitStream* writeBs);

RakLuaBitStream::getDataPtr();

RakLuaBitStream::emulIncomingRPC(uint8_t rpcId);
RakLuaBitStream::emulIncomingPacket();

Аналогичный список функций, но в процедурном стиле:
int raknetBitStreamGetReadOffset(RakLuaBitStream* bs);
int raknetBitStreamGetWriteOffset(RakLuaBitStream* bs);

bool raknetBitStreamReadBuffer(RakLuaBitStream* bs, uintptr_t destination, int size);

void raknetBitStreamWriteBuffer(RakLuaBitStream* bs, uintptr_t destinationFrom, int size);
void raknetBitStreamWriteBitStream(RakLuaBitStream* bs, RakLuaBitStream* writeBs);

uintptr_t raknetBitStreamGetDataPtr(RakLuaBitStream* bs);

bool raknetEmulRpcReceiveBitStream(uint8_t rpcId, RakLuaBitStream* bs);
bool raknetEmulPacketReceiveBitStream(uint8_t packetId, RakLuaBitStream* bs);

Дополнительно было добавлено::
RakLuaState RakLua.getState(); -- Возвращает состояние RakLua.
RakLua.defineSampLuaCompatibility() -- Обеспечивает совместимость SAMP.Lua с RakLua без необходимости использования SAMPFUNCS.

-- Новое перечисление:
RakLuaState.OK;
RakLuaState.SAMP_NOT_LOADED;
RakLuaState.SAMP_UNKNOWN;
RakLuaState.INITIALIZING;
 

#Northn

Pears Project — уже запущен!
Автор темы
Всефорумный модератор
2,649
2,499
Библиотека обновлена до версии 2.01. Изменения:
  • Исправлено жирное нарушение логики работоспособности библиотеки. Подробнее тут.
  • Исправлена совместимость с SAMP 0.3.7-R1, до этого она была сломана из-за пункта выше.
  • Исправлен адрес handleIncomingRpc для SAMP 0.3.7-R1.
  • Добавлено больше проверок на инициализацию библиотеки.

Рекомендую обновиться до данной версии.​
 
  • Нравится
Реакции: ollydbg, etereon и Hatiko

horacy

Известный
102
92
Библиотека обновлена до версии 2.01. Изменения:
  • Исправлено жирное нарушение логики работоспособности библиотеки. Подробнее тут.
  • Исправлена совместимость с SAMP 0.3.7-R1, до этого она была сломана из-за пункта выше.
  • Исправлен адрес handleIncomingRpc для SAMP 0.3.7-R1.
  • Добавлено больше проверок на инициализацию библиотеки.

Рекомендую обновиться до данной версии.
Будет ли поддержка 0.3dl в будущем?
 

horacy

Известный
102
92
Я полностью согласен.
Было бы неплохо, некоторые проекты работают на 0.3дл
Трудно писать на lua на 03dl, когда библиотеки отсутствуют, есть rakhook, написанный на c ++ для 03dl, так что, возможно, это упростит написание raklua для 0,3dl.
Rakhook
samp api
Без понятия, стоит ли добавлять его поддержку или нет. Эта версия крайне непопулярна
 

#Northn

Pears Project — уже запущен!
Автор темы
Всефорумный модератор
2,649
2,499
Библиотека обновлена до версии 2.1. Изменения:
  • Добавлена поддержка SAMP 0.3.7-R4-2. (не протестировано, но должно работать)
  • Исправлена совместимость с лаунчерами на подобии Diamond Launcher.
  • Рефакторинг нескольких участков кода.
  • Установка хука виртуальных методов теперь воспроизводится в конструкторе RakClientInterface.
  • Исправлена функция sampSendEnterVehicle.
  • Дополнены все имеющиеся типы для RPC. (inline with SAMP.Lua)
  • Исправлена рекурсия в одной из имеющихся функций.
  • Исправлено восстановление протекции после снятия.
  • Исправлена конфигурация 'Debug'.

Рекомендую обновиться до данной версии.
Коммит: https://github.com/Northn/RakLua/commit/f089088650257908026fd266b45ba36720d2c746
 

Leatington

Известный
257
71
Я так понимаю, что из-за необходимости загружаться вместе с SA:MP загрузить его из интернета при отстутствии библиотеки у пользователя не получиться? Пробовал останавливать загрузку с помощью нулевой задержки, но, всё равно библиотека выдаёт предупреждение в лог, чтобы перезапустили игру.
 

#Northn

Pears Project — уже запущен!
Автор темы
Всефорумный модератор
2,649
2,499
Я так понимаю, что из-за необходимости загружаться вместе с SA:MP загрузить его из интернета при отстутствии библиотеки у пользователя не получиться? Пробовал останавливать загрузку с помощью нулевой задержки, но, всё равно библиотека выдаёт предупреждение в лог, чтобы перезапустили игру.
Не получится
 

IT clown

Участник
45
2
Привет, я могу отправить на сервер свои значения например у меня есть 2 патрона на дигле, а я хочу отправить серверу что у меня есть 100, такое возможно?
Lua:
local RakLua = require 'RakLua'

RakLua.registerHandler(RakLuaEvents.OUTGOING_PACKET,
    function(id, bs, priority, reliability, orderingChannel)
        if id == 204 then
            bs:skipBytes(3)
            local iTarget, slot, weapon, ammo = bs:readUInt16(), bs:readUInt8(), bs:readUInt8(), bs:readUInt16()
            print(string.format(" %d iTarget, %d slot, %d weapon, %d ammo", iTarget, slot, weapon, ammo))
            
            local bs = RakLuaBitStream.new()
            bs:writeUInt8(204) -- ID пакета
            iTarget = 65535
            slot = 2
            weapon = 24
            ammo = 100
            bs:sendPacket()
            
            
        end
    end
)
 

#Northn

Pears Project — уже запущен!
Автор темы
Всефорумный модератор
2,649
2,499
Привет, я могу отправить на сервер свои значения например у меня есть 2 патрона на дигле, а я хочу отправить серверу что у меня есть 100, такое возможно?
Lua:
local RakLua = require 'RakLua'

RakLua.registerHandler(RakLuaEvents.OUTGOING_PACKET,
    function(id, bs, priority, reliability, orderingChannel)
        if id == 204 then
            bs:skipBytes(3)
            local iTarget, slot, weapon, ammo = bs:readUInt16(), bs:readUInt8(), bs:readUInt8(), bs:readUInt16()
            print(string.format(" %d iTarget, %d slot, %d weapon, %d ammo", iTarget, slot, weapon, ammo))
           
            local bs = RakLuaBitStream.new()
            bs:writeUInt8(204) -- ID пакета
            iTarget = 65535
            slot = 2
            weapon = 24
            ammo = 100
            bs:sendPacket()
           
           
        end
    end
)
Возможно, но ты делаешь неправильно
 

RTD

Потужно
Модератор
394
455
Беспонтовая модификация
Основные отличия от офишл версион
- RakLua.VERSION возращает "2.1 unoff"
- Переделано вычисление rakpeer, больше не требуется чтобы библиотека грузилась прям вместе с сампом
Я так понимаю, что из-за необходимости загружаться вместе с SA:MP загрузить его из интернета при отстутствии библиотеки у пользователя не получиться? Пробовал останавливать загрузку с помощью нулевой задержки, но, всё равно библиотека выдаёт предупреждение в лог, чтобы перезапустили игру.
.
 

Вложения

  • RakLuaDll.dll
    307.5 KB · Просмотры: 9

SKIP_CRMP

Участник
93
8
Здравствуйте. А как можно изменить структуру пакета, samp r3, Logger+ от FYP не подойдёт.