Что нового
Автор:
Фильтры

Поиск и замена строк в бинарном файле

CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,673
Репутация
2,486
Снова столкнулся с проблемой замены в бинарном файле.

Имеется бинарная строка:
Код: 
64 65 66 6C 61 74 65 2C 20 67 7A 69 70 2C 20 78 2D 67 7A 69 70 2C 20 69 64 65 6E 74 69 74 79 2C 20 2A 3B 71 3D 30
её нужно заменить на такую:
Код: 
67 7A 69 70 2C 20 64 65 66 6C 61 74 65 2C 20 69 64 65 6E 74 69 74 79 2C 20 2A 3B 71 3D 30 00 00 00 00 00 00 00 00

Как это сдлелать?
Пробовал по разному, вот одна вариация из моих попыток:
Код: 
$sDll = "C:\Opera\opera.dll"

$hFile = FileOpen($sDll, 16)
$sRead = FileRead($hFile)
FileClose($hFile)

$sFind = Binary("6465666C6174652C20677A69702C20782D677A69702C206964656E746974792C202A3B713D30")
$sReplace = Binary("677A69702C206465666C6174652C206964656E746974792C202A3B713D300000000000000000")

$sRead = StringReplace($sRead, $sFind, $sReplace)

$hFile = FileOpen($sDll, 16+2)
FileWrite($hFile, $sRead)
FileClose($hFile)


Сама Dll'ка лежит тут. В архиве кроме Dll'ки имеется патч который делает то что мне нужно, но естественно нужно это сделать без патча.
 
snoitaleR

snoitaleR

AutoIT Гуру
Сообщения
855
Репутация
223
CreatoR

У меня версия библиотеки 10.63.3516.0...
Подстрока не найдена...
Но вот такая замена выполняется...

Код: 
; НАЧАЛО

 $sDll = "opera.dll"

 $hFile = FileOpen($sDll)
 $sRead = FileRead($hFile)
 FileClose($hFile)

 $sFind = BinaryToString("0x64656667C9")
 $sReplace = BinaryToString("0x1111111111")

 $sRead = StringReplace($sRead, $sFind, $sReplace)

 $hFile = FileOpen($sDll,2)
 FileWrite($hFile, $sRead)
 FileClose($hFile)

; КОНЕЦ
 
Автор
CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,673
Репутация
2,486
snoitaleR [?]
У меня версия библиотеки 10.63.3516.0
Нажмите, чтобы раскрыть...
Dll'ка должна быть распакована (Upx'ом).


snoitaleR [?]
вот такая замена выполняется
Нажмите, чтобы раскрыть...
Спасибо, оказывается можно просто делать замену по файлу:

Код: 
$sDll = "C:\Opera\opera.dll"

$hFile = FileOpen($sDll)
$sRead = FileRead($hFile)
FileClose($hFile)

$sFind = BinaryToString("0x6465666C6174652C20677A69702C20782D677A69702C206964656E746974792C202A3B713D30")
$sReplace = BinaryToString("0x677A69702C206465666C6174652C206964656E746974792C202A3B713D300000000000000000")

$sRead = StringReplace($sRead, $sFind, $sReplace)

$hFile = FileOpen($sDll, 2)
FileWrite($hFile, $sRead)
FileClose($hFile)
 
G

gregaz

AutoIT Гуру
Сообщения
1,166
Репутация
299
Как вариант :
Код: 
#include<String.au3>
#include<File.au3>
$hexFind="6465666C6174652C20677A69702C20782D677A69702C206964656E746974792C202A3B713D30"
$hexReplace ="677A69702C206465666C6174652C206964656E746974792C202A3B713D300000000000000000"

_ReplaceStringInFile($sFile,_HexToString($hexFind),_HexToString($hexReplace))
 
Yoy

Yoy

Новичок
Сообщения
1
Репутация
0
Всем привет!

Как раз искал решение этой проблемы, и благодаря этой теме, смог ее найти.

Однако хочется немного усовершенствовать скрипт, дополнив его выводов сообщения о том, была ли произведена замена или нет:

Код: 
MsgBox(0, "Ура!", "Вхождение найдено, файл пропатчен")


Т.е. нужно проверить, существует ли вхождение, и если да, то вывести об этом сообщение. В общем, тут нужен цикл, но я с AutoIt практически не знаком, поэтому рассчитываю на вашу помощь.
 
Вам необходимо войти или зарегистрироваться, чтобы здесь отвечать.
Автор темы Похожие темы Форум Ответы Дата
Regnits [Данные, строки] поиск вхождений и замена Общие вопросы по AutoIt 4
S [Данные, строки] поиск и замена слова в файле Общие вопросы по AutoIt 2
madmasles Перенесено: [Данные, строки] Поиск+замена с использованием wildcards/шаблона (* + ?) Общие вопросы по AutoIt 0
I [Данные, строки] Поиск+замена с использованием wildcards/шаблона (* + ?) Регулярные выражения и прочее 1
A [Данные, строки] Поиск и замена текста с парметрами Общие вопросы по AutoIt 2
Похожие темы
[Данные, строки] поиск вхождений и замена
[Данные, строки] поиск и замена слова в файле
Перенесено: [Данные, строки] Поиск+замена с использованием wildcards/шаблона (* + ?)
[Данные, строки] Поиск+замена с использованием wildcards/шаблона (* + ?)
[Данные, строки] Поиск и замена текста с парметрами
Верх