Как декомпилировать программу?

Question

[Максим]

Всем привет! Необходимо сделать небольшую доработку в программе. Буквально - изменить длину для поля. Исходников нет. Сам знаю только WEB программирование на php... Как можно декомпилировать файл и внести изменения? Программа очень старая. С 2000 годов, так что никаких защит особо нет.

Comments

[key don]

С такими исходными данными
>Сам знаю только WEB программирование на php
>Как разкомплиновать файл?
это вряд ли возможно.
То что ты ищешь называется декомпилятор или дизассемблер, но чтобы подобрать нужный надо знать на каких технологиях была сделана твоя программа.
Если скинешь ссыль на твою программу то могу посмотреть.

[Максим]

key don, без проблем) Загрузил в гугл диск по ссылке: https://drive.google.com/open?id=1_Pp87F3eplXX12sn...

[15432]

Максим Ворожцов, ну здесь в файле просто тонна отладочной информации, так что внести изменения может быть несложно. Что поменять хотите?

[Максим]

15432, подскажите через что можно посмотреть))) Хочу не только изменить, но и подразобраться сам. Возможно, придется чуть-чуть «допилить» необходимые разделы... А вообще есть поле, где вводят ФИО. В нем необходимо сделать длину поля до 255 символов вместо 50 символов.

[Максим]

15432, Если подскажите, как разобрать, чем править и как собрать обратно, то дальше я разберусь и буду очень благодарен!

[15432]

Максим Ворожцов, декомпилировать в IDA Pro, разобрать/собрать - нереально, я наживую ассемблерный код модифицирую.
Можете указать наименование поля? Или скриншот приложить...

[Максим]

15432,

ПОЛЕ: "УЧАСТНИК"
Пароль для входа в программу 12345

В базе данных это поле "ClubName"

[15432]

Максим Ворожцов, так и не понял (за пару минут) как запустить сервер и базу данных, но пофиг. В Delphi программах лимит на длину строки легко меняется простым текстовым поиском по файлу. Заменил все ограничения в 50 и 32 символа на 255 :)
rgho.st/7LBX2STm9

[Максим]

15432, скачал, но выдает ошибку)) Лучше изменить только это поле, которое просил. Чтобы исключить ошибки) Ошибка как раз связана с файлом оплаты, а точнее его описания. Как я понял)) Базу подключать сложно) Там надо запускать сервер в корневую папку диска C и в папку mysql))

Здесь есть

Детали ошибки

MemCheck version 2.73

Total leak: 48 bytes

*** MEMCHK: Blocks STILL allocated ***

Leak #0 Instance of EReadError
Size: 12
1 Occurence
call stack - 0 : Module classes.pas Routine HandleException Line 6351 Find error: 004282CD
call stack - 1 : Module classes.pas(no debug info) Line 6395 Find error: 004284AF
call stack - 2 : Module classes.pas Routine @Classes@TReader@ReadDataInner Line 6202 Find error: 00427DBA
call stack - 3 : Module classes.pas Routine @Classes@TReader@ReadData Line 6195 Find error: 00427D9C
call stack - 4 : Module classes.pas Routine @Classes@TComponent@ReadState Line 9987 Find error: 0042D1CB
call stack - 5 : Module DB.pas Routine @Db@TField@ReadState Line 3879 Find error: 004DD2B7
call stack - 6 : Module classes.pas(no debug info) Line 6156 Find error: 00427C10
call stack - 7 : Module classes.pas Routine @Classes@TReader@ReadDataInner Line 6210 Find error: 00427E33
call stack - 8 : Module classes.pas Routine @Classes@TReader@ReadData Line 6195 Find error: 00427D9C
call stack - 9 : Module classes.pas Routine @Classes@TComponent@ReadState Line 9987 Find error: 0042D1CB
call stack - 10 : Module classes.pas(no debug info) Line 6156 Find error: 00427C10
call stack - 11 : Module classes.pas Routine @Classes@TReader@ReadDataInner Line 6210 Find error: 00427E33
call stack - 12 : Module classes.pas Routine @Classes@TReader@ReadData Line 6189 Find error: 00427D6C
call stack - 13 : Module classes.pas Routine @Classes@TComponent@ReadState Line 9987 Find error: 0042D1CB
call stack - 14 : Module Controls.pas Routine @Controls@TControl@ReadState Line 3357 Find error: 0048E452
call stack - 15 : Module Controls.pas Routine @Controls@TWinControl@ReadState Line 5475 Find error: 00492C5D
call stack - 16 : Module Forms.pas Routine @Forms@TCustomForm@ReadState Line 2724 Find error: 004AEC94
call stack - 17 : Module classes.pas Routine @Classes@TReader@ReadRootComponent Line 6566 Find error: 00428C2E
call stack - 18 : Module classes.pas Routine @Classes@TStream@ReadComponent Line 4975 Find error: 00425A9C
call stack - 19 : Module classes.pas Routine @Classes@InternalReadComponentRes Line 2504 Find error: 00420EB1
call stack - 20 : Module classes.pas Routine InitComponent Line 2561 Find error: 00421085
call stack - 21 : Module classes.pas(no debug info) Line 2573 Find error: 00421117
call stack - 22 : Module Forms.pas Routine @Forms@TCustomForm@Create Line 2561 Find error: 004AE524
call stack - 23 : Module Forms.pas Routine @Forms@TApplication@CreateForm Line 6947 Find error: 004B7A1F
call stack - 24 : Module DanceClient.dpr Routine initialization Line 83 Find error: 006E3FEF
call stack - 25 : (no debug info) Find error: 7C817063
call stack - 26 : (no debug info) Find error: FFFFFFFC

Leak #1 Instance of TStatusBarProgress
Size: 8
1 Occurence
call stack - 0 : Module DanceClientMainForm.pas Routine @Danceclientmainform@TDanceClientForm@FormCreate Line 1595 Find error: 006CE5B1
call stack - 1 : Module Forms.pas Routine @Forms@TCustomForm@DoCreate Line 2648 Find error: 004AE9BB
call stack - 2 : Module Forms.pas Routine @Forms@TCustomForm@AfterConstruction Line 2575 Find error: 004AE62B
call stack - 3 : Routine @System@@AfterConstruction Find error: 00404A6A
call stack - 4 : Module Forms.pas Routine @Forms@TApplication@CreateForm Line 6947 Find error: 004B7A1F
call stack - 5 : Module DanceClient.dpr Routine initialization Line 79 Find error: 006E3F8F
call stack - 6 : (no debug info) Find error: 7C817063
call stack - 7 : (no debug info) Find error: FFFFFFFC

Leak #2 Instance of TMainFormSaveValuesList
Size: 8
1 Occurence
call stack - 0 : Module DanceClientMainForm.pas Routine @Danceclientmainform@TDanceClientForm@FormCreate Line 1565 Find error: 006CE3D3
call stack - 1 : Module Forms.pas Routine @Forms@TCustomForm@DoCreate Line 2648 Find error: 004AE9BB
call stack - 2 : Module Forms.pas Routine @Forms@TCustomForm@AfterConstruction Line 2575 Find error: 004AE62B
call stack - 3 : Routine @System@@AfterConstruction Find error: 00404A6A
call stack - 4 : Module Forms.pas Routine @Forms@TApplication@CreateForm Line 6947 Find error: 004B7A1F
call stack - 5 : Module DanceClient.dpr Routine initialization Line 79 Find error: 006E3F8F
call stack - 6 : (no debug info) Find error: 7C817063
call stack - 7 : (no debug info) Find error: FFFFFFFC

Leak #3 Instance of TObjectList
Size: 20
1 Occurence
call stack - 0 : Module DanceClientMainForm.pas Routine @Danceclientmainform@TDanceClientForm@FormCreate Line 1549 Find error: 006CE2C7
call stack - 1 : Module Forms.pas Routine @Forms@TCustomForm@DoCreate Line 2648 Find error: 004AE9BB
call stack - 2 : Module Forms.pas Routine @Forms@TCustomForm@AfterConstruction Line 2575 Find error: 004AE62B
call stack - 3 : Routine @System@@AfterConstruction Find error: 00404A6A
call stack - 4 : Module Forms.pas Routine @Forms@TApplication@CreateForm Line 6947 Find error: 004B7A1F
call stack - 5 : Module DanceClient.dpr Routine initialization Line 79 Find error: 006E3F8F
call stack - 6 : (no debug info) Find error: 7C817063
call stack - 7 : (no debug info) Find error: FFFFFFFC

*** MEMCHK: End of allocated blocks ***

*** MEMCHK: Chronological leak information ***

* Instance of TObjectList (Leak #3) Size: 20
* Instance of TMainFormSaveValuesList (Leak #2) Size: 8
* Instance of TStatusBarProgress (Leak #1) Size: 8
* Instance of EReadError (Leak #0) Size: 12

*** MEMCHK: End of chronological leak information ***

*** MEMCHK: Blocks written to after destruction ***

Bad blocks count: 0

*** MEMCHK: End of blocks written to after destruction ***

[15432]

Ну не, получается, поменяв в коде программы размер поля, падает чтение этих полей из базы данных. Прога пытается читать 255, а там 50 фиксировано. Надо ещё и базу править)

Посмотрите различия между оригиналом и моим файлом, сразу найдёте три места с ClubName Size, экспериментируйте уже на месте, по-моему, не так всё просто :)

[Максим]

15432, в базе поменяю чуть позже и отпишусь о результатах. Благодарю)

[Максим]

15432, можете ещё подсказать какие поля в базе нужно поменять на 255?)

[15432]

Максим Ворожцов, а как просмотреть какие поля там вообще есть? :)

[Максим]

15432, пройдите по ссылке. Туда добавил базу. В ней все поля. База MYSQL. Я сам попробовал все сделать. Там есть русификатор программы. Без него все работает. С ним почему то обратно вылетает все. Хотя сам русификатор тоже правил на поля) в общем не просто оказалось поменять)))

Answer 1

[Антон Шаманов]

Попробуйте Restorator или что-то вроде этого.