из асм в паскаль

Discussion in 'Реверсинг' started by AET, 17 Mar 2008.

  1. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    народ нужна подсказка при переводе из асм кода в код паскаль
     
  2. gold-goblin

    gold-goblin Elder - Старейшина

    Joined:
    26 Mar 2007
    Messages:
    918
    Likes Received:
    172
    Reputations:
    3
    ... Зная только паскаль в реверсе делать нечего (мое мнение)
    Такой программы точно нет... если переводить то только в ручную
     
  3. zythar

    zythar Elder - Старейшина

    Joined:
    16 Feb 2008
    Messages:
    517
    Likes Received:
    109
    Reputations:
    5
    HexRays – декомпилятор нового поколения: превращаем любой бинарник в C-код
    http://www.xakep.ru/post/42769/default.asp

    не паскаль конечно но.. подойдет наверна
     
  4. ProTeuS

    ProTeuS --

    Joined:
    26 Nov 2004
    Messages:
    1,239
    Likes Received:
    541
    Reputations:
    445
    и где бинарник? опять телепатией заниматься? если нужен совет - показывай файл или задавай конкретный вопрос, а асбстракно - дизассемблируй и руками реверси в паскаль-код...
     
  5. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    вот сылка на сому программу http://karkarschool5.narod.ru/10/main_pro.rar
    а вот на дизасамблированую http://karkarschool5.narod.ru/10/program.rar
    вот приблизительно что получилась http://karkarschool5.narod.ru/10/MAINPROG.rar но дальше никак не могу разобрать а конкретнее нужен процедуры sub_2E4 и loc_0 это программа распаковает на фаилы R0 до Rn где n число блоков считывает из фаиля
    вот сылка на фаил http://karkarschool5.narod.ru/10/main1.rar
     
  6. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    а откуда скачать можно
     
  7. ProTeuS

    ProTeuS --

    Joined:
    26 Nov 2004
    Messages:
    1,239
    Likes Received:
    541
    Reputations:
    445
    http://cracklab.ru/download.php?action=get&n=MjE1
     
  8. desTiny

    desTiny Elder - Старейшина

    Joined:
    4 Feb 2007
    Messages:
    1,005
    Likes Received:
    444
    Reputations:
    94
    м-м-м... а может ТС хочет DeDe?
     
  9. s0lar

    s0lar Elder - Старейшина

    Joined:
    16 Mar 2008
    Messages:
    63
    Likes Received:
    7
    Reputations:
    1
    такой проги однозначно нет, если кода немного переведи вручную, если листинг огромный смотри в сторону декомпилеров
     
  10. zythar

    zythar Elder - Старейшина

    Joined:
    16 Feb 2008
    Messages:
    517
    Likes Received:
    109
    Reputations:
    5
    а ты статью прочитал? вам только готовое подавать...
     
  11. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    я это и имел виду чтобы мне подсказали тоесть я его сабираю сам но чтото крива получается в двух процедурах здесь sub_2E4 и здесь loc_0 просто подсказать
     
  12. ProTeuS

    ProTeuS --

    Joined:
    26 Nov 2004
    Messages:
    1,239
    Likes Received:
    541
    Reputations:
    445
    функцийка sub_102E4 proc near объямная по коду, но не по смыслу, никто кроме тебя самого просто так киорбайты листинга ковырять не будет - отлад4ик в руки и сиди смотри 4то куда кладется, функции все вызываемые ида распознала, т.е. за тобой осталась тупо машинальная ру4ная работа, но объемная и длительная по времени

    ЗЫ советую посмотреть это, может помо4ь уменьшить времчя портирования в разы: http://www.cracklab.ru/f/index.php?action=vthread&forum=6&topic=9818&page=0
     
  13. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    нет я просто буду сам расматривать а вы просто подправте что правельна а что нет
    Code:
    		mov	al, byte ptr [bp+var_202+1]
    		xor	ah, ah
    		xor	dx, dx
    		mov	word_2364, ax
    		mov	word_2366, dx
    		les	di, [bp+arg_0]
    		push	es
    		push	di
    		push	word_2392
    		push	word_2390
    		call	@Seek$qm4File7Longint ;	Seek(var f; n: Longint)
    
    а на паскале выглядит помоему так
    Code:
    word_2364:=Var_202[1];
    seec (arg_0,word_2390)
    
     
  14. X-FRITS

    X-FRITS Elder - Старейшина

    Joined:
    24 Jun 2007
    Messages:
    57
    Likes Received:
    81
    Reputations:
    7
    есть переходи из паскаля в асм:

    var ...
    begin
    asm
    {тело кода асм}
    end;
    {тело проги}
    end.

    можешь так попробывать прописать))
     
  15. AET

    AET New Member

    Joined:
    17 Mar 2008
    Messages:
    23
    Likes Received:
    1
    Reputations:
    -2
    блогодарен но мне нужен просто перевести из асм а паскаль