Help with binary

The Kandie Man · October 16, 2006

I have been working on an autoit patcher. You compare two executables, the old version, and the new version.

Once it gets the difference between the two, it then writes the byte differences to the old version to make it the new version. The only problem is that it seems that autoit doesn't have a native binary read or write method. It has been writing in binary, but it hasn't written any null values(Hexidecimal 00?). Everything else seems to get written ok, but it doesn't write the null values. I am not sure what i am doing wrong or if autoit can even do what i am trying to get it to do.

http://www.thekandieman.com/applications/P...er/download.php

There is the source and two executables that it compares and patches.

SmOke_N · October 16, 2006

Figured it out TKC ... I'll either work up the entire interface later while your in school, or send you what I did, and you can take care of it.

2 functions 35 lines total ... :lmao:

The Kandie Man · October 17, 2006

I think you SmOke_N. He helped me with it and was able to make a working version. Unfortunately it isn't very fast at patching large files and cannot create a portable database that is smaller than the file to be patched itself. Any help from any senior programmers would be most appreciated.

I can PM you my latest updates of my source code if you would like me to, simply PM me or reply to this thread.

Any help would be appreciated, whenever i write to file it seems to write a string of ASCII binary characters to the file instead of actual binary. :S

-The Kandie Man

Edited October 17, 2006 by The Kandie Man

SmOke_N · October 17, 2006

I think you SmOke_N. He helped me with it and was able to make a working version. Unfortunately it isn't very fast at patching large files and cannot create a portable database that is smaller than the file to be patched itself. Any help from any senior programmers would be most appreciated.

I can PM you my latest updates of my source code if you would like me to, simply PM me or reply to this thread.

Any help would be appreciated, whenever i write to file it seems to write a string of ASCII binary characters to the file instead of actual binary. :S

-The Kandie Man

I tried to IM you, guess you are going torrent crazy again.

This is what I did to speed it up 10x's as fast. But, there's an issue in my logic, or I'm just not seeing something.

It reads the Old to be patched exe and the new exe and compares their binary. Writes the Chr Number / Chr / and remaining difference of chrs if the new file is greater than the old in String Length each to their seperate file.

Then it outputs a GUI with the function to patch the old exe on the end-users computer, using FileInstall to install the 3 files for this and outputs them to the pre-destined name and temp file and then reads them to an array.

I was initially, as you know, using StringLeft()/StringTrimLeft() for the changing of the file, but it proved for large changes to be quite tedious. It now reads the end-users exe into an array, and changes only the necessary items, this sped it up alot, and then it re-writes all the info back to a temp var, and then writes that temp var to a file and FileMoves to the old exe with the old exe name.

Anyone that uses this, should make a folder, put the .au3 of this in that folder, then make an OldExe SubFolder.. Put the OldExe in it, and a NewExe SubFolder and put the new exe in it.

If anyone wants to play with it feel free, I kind of gave up on it because the output was genrally more in size then just replacing the actual exe itself.

CODE

Global $hNewExe, $hOldExe, $aExeArray

$GUIMain = GUICreate("AutoPatchIt: AutoIt Exe Patch Creator", 355, 150)

GUICtrlCreateLabel("New Release:", 110, 10, 110, 22)

GUICtrlSetFont(-1, 8, 800, 0, "Verdana")

$B1 = GUICtrlCreateButton("www", 192, 2, 30, 25, 0)

GUICtrlSetFont(-1, 8, 800, 0, "Wingdings")

GUICtrlCreateLabel("Old Release:", 115, 60, 110, 22)

GUICtrlSetFont(-1, 8, 800, 0, "Verdana")

$B2 = GUICtrlCreateButton("www", 192, 52, 30, 25, 0)

GUICtrlSetFont(-1, 8, 800, 0, "Wingdings")

$B3 = GUICtrlCreateButton("Create Patch", 120, 115, 115, 25, 0)

GUICtrlSetFont(-1, 8, 800, 0, "Verdana")

$I1 = GUICtrlCreateEdit("", 10, 30, 340, 20, BitOR(0x0800, 0x0080))

$I2 = GUICtrlCreateEdit("", 10, 80, 340, 20, BitOR(0x0800, 0x0080))

GUISetState()

While 1

Switch GUIGetMsg()

Case - 3

Exit

Case $B1

$hNewExe = FileOpenDialog('New Release', @ScriptDir, 'Exe (*.exe)')

If Not @error Then

GUICtrlSetData($I1, '')

GUICtrlSetData($I1, $hNewExe)

EndIf

Case $B2

$hOldExe = FileOpenDialog('Old Release', @ScriptDir, 'Exe (*.exe)')

If Not @error Then

GUICtrlSetData($I2, '')

GUICtrlSetData($I2, $hOldExe)

EndIf

Case $B3

If $hOldExe <> $hNewExe Then

$aExeArray = _CompareExe2Exe($hNewExe, $hOldExe)

MsgBox(64, 'Info', 'Finished!' & @CR & _

'Your Patch .Au3 file is here: ' & @CR & _

_CreatePatchAu3($hOldExe, $aExeArray))

$hOldExe = ''

$hNewExe = ''

EndIf

EndSwitch

WEnd

Func _CompareExe2Exe($hNew, $hOld)

Local $sOld = String(FileRead($hOld)), $aOld = StringSplit($sOld, '')

Local $sNew = String(FileRead($hNew)), $aNew = StringSplit($sNew, '')

Local $iUBOld = UBound($aOld) - 1, $iUBNew = UBound($aNew) - 1, $iUBound = $iUBOld

If $iUBNew < $iUBOld Then $iUBound = $iUBNew

Local $aOutNC[$iUBound + 1][5], $iAdd = 1, $nNCC, $nXCC

ProgressOn("Comparing Both Exe's", "", "", -1, -1, 18)

For $iCC = 1 To $iUBound Step 5

If $aNew[$iCC] <> $aOld[$iCC] Then

$iAdd += 1

$aOutNC[$iAdd - 1][0] = $iCC