diff --git a/programs/develop/mtdbg/README b/programs/develop/mtdbg/README index e4cb2cbf2e..217002c6a1 100644 --- a/programs/develop/mtdbg/README +++ b/programs/develop/mtdbg/README @@ -17,7 +17,7 @@ Also long term goals: 6. Improve disassembly engine 7. Split out context handling and kernel interface 8. Split out commands handler and tables in cmd.inc -8. Restrurize and refactor data section +8. Restructurize and refactor data section 9. Add disassembler listing export into file 10. Record trace log 11. Improve FPU/MMX/SSE/AVX debugging diff --git a/programs/develop/mtdbg/cmd_hist.inc b/programs/develop/mtdbg/cmd_hist.inc new file mode 100644 index 0000000000..feefefd9cf --- /dev/null +++ b/programs/develop/mtdbg/cmd_hist.inc @@ -0,0 +1,257 @@ +init_cmd_hist_buffer: +;------------------------------------------------------------------------------- + push eax ebx ecx + + mcall 68, 12, 4096 ;allocate 4KB block + mov [cmd_hist_buffer.ptr], eax + mov [cmd_hist_buffer.size], ecx + + mov edi, eax + xor eax, eax + stosd + stosd + mov [cmd_hist_buffer.new_node_offset], eax + mov [cmd_hist_buffer.last_node_offset], eax + mov [cmd_hist_buffer.cur_node_offset], eax + mov [cmd_hist_buffer.tmp_line_flag], al + mov [cmd_hist_buffer.n_flag], al + + pop ecx ebx eax + ret +;------------------------------------------------------------------------------- + +enlarge_cmd_hist_buffer: +;------------------------------------------------------------------------------- + pusha + + mov ecx, [cmd_hist_buffer.size] + add ecx, 4096 + mov edx, [cmd_hist_buffer.ptr] + mcall 68, 20 ;reallocate the buffer (prev. size + 4KB) + test eax, eax + jz .err + mov [cmd_hist_buffer.ptr], eax + mov [cmd_hist_buffer.size], ecx + +.ok: + clc + popa + ret + +.err: + stc + popa + ret +;------------------------------------------------------------------------------- + +add_cmd_hist_line: +;------------------------------------------------------------------------------- +;in: +;eax = ptr to ASCIIZ string of line +;------------------------------------------------------------------------------- + pusha + + mov esi, eax + mov edx, eax + xor ecx, ecx + +@@: + inc ecx + lodsb + test al, al + jz @f + jmp @b + +@@: + dec ecx + jz .ok + + inc ecx + + mov eax, [cmd_hist_buffer.new_node_offset] + lea eax, [eax+ecx+2*4] + cmp [cmd_hist_buffer.size], eax + jae @f + call enlarge_cmd_hist_buffer + jc .err + +@@: + mov edi, [cmd_hist_buffer.new_node_offset] + mov eax, [cmd_hist_buffer.ptr] + add edi, eax + cmp eax, edi ;if eax = edi, then it's the first node + jne @f + xor eax, eax + dec eax + stosd ;save previous node link = -1 for the first node + stosd ;save next node link = -1 for the first node + jmp .cp_str + +@@: + mov ebx, [cmd_hist_buffer.last_node_offset] + mov [edi], ebx ;save previous node link for a new node + add ebx, eax + mov eax, [cmd_hist_buffer.new_node_offset] + mov [ebx+4], eax ;update next node link for a last node + mov [cmd_hist_buffer.last_node_offset], eax + mov [cmd_hist_buffer.cur_node_offset], eax + add edi, 4 + xor eax, eax + dec eax + stosd + +.cp_str: + mov esi, edx + + push ecx + rep movsb + pop ecx + + add ecx, 2*4 + add [cmd_hist_buffer.new_node_offset], ecx + + +.ok: + clc + +.err: + mov [cmd_hist_buffer.tmp_line_flag], 0 + + popa + ret +;------------------------------------------------------------------------------- + +add_cmd_hist_tmp_line: +;------------------------------------------------------------------------------- +;in: +;eax = ptr to ASCIIZ string of line +;------------------------------------------------------------------------------- + pusha + + mov esi, eax + mov edx, eax + xor ecx, ecx + +@@: + inc ecx + lodsb + test al, al + jz @f + jmp @b + +@@: + mov eax, [cmd_hist_buffer.new_node_offset] + lea eax, [eax+ecx+2*4] + cmp [cmd_hist_buffer.size], eax + jae @f + call enlarge_cmd_hist_buffer + jc .err + +@@: + mov edi, [cmd_hist_buffer.new_node_offset] + mov [cmd_hist_buffer.tmp_line_flag], 1 + mov eax, [cmd_hist_buffer.ptr] + add edi, eax + xor eax, eax + stosd + stosd ;two zeroes - marker (prefix) of tmp line + +.cp_str: + mov esi, edx + + rep movsb + +.ok: + clc + +.err: + popa + ret +;------------------------------------------------------------------------------- + +get_cmd_hist_line: +;------------------------------------------------------------------------------- +;out: +;eax = ptr to ASCIIZ string of current line +;------------------------------------------------------------------------------- + push ebx + + mov eax, [cmd_hist_buffer.ptr] + mov ebx, [cmd_hist_buffer.cur_node_offset] + + lea eax, [eax + ebx + 2*4] + + pop ebx + ret +;------------------------------------------------------------------------------- + +get_cmd_hist_tmp_line: +;------------------------------------------------------------------------------- +;out: +;eax = ptr to ASCIIZ string of current line or 0 (no tmp line) +;------------------------------------------------------------------------------- + cmp [cmd_hist_buffer.tmp_line_flag], 0 + je @f + + mov eax, [cmd_hist_buffer.new_node_offset] + add eax, [cmd_hist_buffer.ptr] + add eax, 2*4 + +@@: + ret +;------------------------------------------------------------------------------- + +prev_cmd_hist_line: +;------------------------------------------------------------------------------- +;out: +;CF = 0 - OK, CF = 1 (no previous lines) +;------------------------------------------------------------------------------- + push eax ebx + + mov eax, [cmd_hist_buffer.ptr] + mov ebx, [cmd_hist_buffer.cur_node_offset] + + lea eax, [eax+ebx] + mov eax, [eax] + inc eax + jz .ret_cf + dec eax + mov [cmd_hist_buffer.cur_node_offset], eax + + clc + pop ebx eax + ret + +.ret_cf: + stc + pop ebx eax + ret +;------------------------------------------------------------------------------- + +next_cmd_hist_line: +;------------------------------------------------------------------------------- +;out: +;CF = 0 - OK, CF = 1 (no next lines) +;------------------------------------------------------------------------------- + push eax ebx + + mov eax, [cmd_hist_buffer.ptr] + mov ebx, [cmd_hist_buffer.cur_node_offset] + + lea eax, [eax+ebx] + mov eax, [eax+4] + inc eax + jz .ret_cf + dec eax + mov [cmd_hist_buffer.cur_node_offset], eax + + clc + pop ebx eax + ret + +.ret_cf: + stc + pop ebx eax + ret +;------------------------------------------------------------------------------- + diff --git a/programs/develop/mtdbg/gui.inc b/programs/develop/mtdbg/gui.inc index c732f30891..cf4b393503 100644 --- a/programs/develop/mtdbg/gui.inc +++ b/programs/develop/mtdbg/gui.inc @@ -133,6 +133,8 @@ start: ; initialize process heap mcall 68, 11 + call init_cmd_hist_buffer + push eax fstcw word [esp] pop eax @@ -210,7 +212,7 @@ waitevent: pop edx mov edx, [btn2_tab+edx*4] mov edi, COLOR_BG_NORMAL - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) mov esi, 7 mov ebx, [registers_x_pos_dd] add ebx, 4*10000h+REGISTERS_Y_POS @@ -251,6 +253,7 @@ keypressed: jz F7 cmp ah, 0x42 jz F8 + mov [cmd_hist_buffer.tmp_line_flag], 0 cmp [cmdline_len], CMD_WIDTH jae waitevent push eax @@ -269,14 +272,17 @@ keypressed: call draw_cmdline_end inc [cmdline_pos] call draw_cursor + jmp waitevent .backspace: + mov [cmd_hist_buffer.tmp_line_flag], 0 cmp [cmdline_pos], 0 jz waitevent dec [cmdline_pos] .delchar: + mov [cmd_hist_buffer.tmp_line_flag], 0 call clear_cmdline_end mov edi, [cmdline_pos] dec [cmdline_len] @@ -324,9 +330,71 @@ keypressed: mov [cmdline_pos], eax call draw_cursor - .up: - .down: - jmp waitevent + .up: + xor edx, edx + jmp .hist + + .down: + xor edx, edx + inc edx + + .hist: + cmp [cmd_hist_buffer.tmp_line_flag], 1 + je @f + mov eax, cmdline + mov ecx, [cmdline_len] + mov byte [eax + ecx], 0 + call add_cmd_hist_tmp_line + + @@: + test edx, edx + jnz .hist.next + cmp [cmd_hist_buffer.n_flag], 0 + jne @f + call get_cmd_hist_line + inc [cmd_hist_buffer.n_flag] + jmp .hist.cp_line + + @@: + call prev_cmd_hist_line + jc waitevent + call get_cmd_hist_line + inc [cmd_hist_buffer.n_flag] + jmp .hist.cp_line + + .hist.next: + cmp [cmd_hist_buffer.n_flag], 0 + je waitevent + + call next_cmd_hist_line + call get_cmd_hist_line + jnc .hist.cp_line + call get_cmd_hist_tmp_line + mov [cmd_hist_buffer.tmp_line_flag], 0 + mov [cmd_hist_buffer.n_flag], 0 + + .hist.cp_line: + + mov esi, eax + mov edi, cmdline + xor ecx, ecx + + @@: + inc ecx + lodsb + stosb + test al, al + jnz @b + + dec ecx + mov [cmdline_pos], 0 + call clear_cmdline_end + mov [cmdline_len], ecx + mov [cmdline_pos], ecx + call draw_cmdline + call draw_cursor + + jmp waitevent ; We also trying to execute previous command, if empty command_line .enter: @@ -346,6 +414,11 @@ keypressed: .exec: mov byte [esi+ecx], 0 + + mov eax, esi + call add_cmd_hist_line + mov [cmd_hist_buffer.n_flag], 0 + and [cmdline_pos], 0 push esi call clear_cmdline_end @@ -438,6 +511,8 @@ z1: ; Cmdline handling clear_cmdline_end: + pusha + mov ebx, [cmdline_pos] mov ecx, [cmdline_len] sub ecx, ebx @@ -452,6 +527,8 @@ clear_cmdline_end: mov edx, COLOR_BG_NORMAL ; draw container rectangle/box for cmdline mcall 13 + + popa ret draw_cmdline: @@ -466,7 +543,7 @@ draw_cmdline_end: mov esi, [cmdline_len] sub esi, ebx - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov ecx, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL lea edx, [cmdline+ebx] imul ebx, FONT_X_SIZE add ebx, CMD_X_POS @@ -587,7 +664,7 @@ draw_messages: mov edx, messages push MSG_WIDTH pop esi - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov ecx, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL mov ebx, MSG_X_POS*10000h mov bx, word[messages_y_pos_dd+4] @@ -605,6 +682,8 @@ draw_messages: ; TODO: make it cursor.draw and cursor.hide ??? draw_cursor: + pusha + mov ecx, [cmdline_y_pos_dd+2] add cx, CMD_Y_SIZE-1 mov ebx, [cmdline_pos] @@ -613,9 +692,11 @@ draw_cursor: mov edx, ebx shl ebx, 16 or ebx, edx - mov edx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov edx, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL ; draw line mcall 38 + + popa ret hide_cursor: @@ -633,7 +714,7 @@ hide_cursor: cmp ebx, [cmdline_len] jae .ret ; setting up text color scheme and attributes - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov ecx, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL lea edx, [cmdline+ebx] imul ebx, FONT_X_SIZE add ebx, CMD_X_POS @@ -686,7 +767,7 @@ draw_title: mov al, 4 mov ebx, TITLE_X_POS*10000h+TITLE_Y_POS ; setting up text color scheme and attributes - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov ecx, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL mov edx, NoPrgLoaded_str cmp [debuggee_pid], 0 jz @f @@ -710,7 +791,7 @@ draw_title: @@: ; draw line with COLOR_LINE (in edx) in one case - ; and draw text string with color (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL (in ecx) in another + ; and draw text string with color (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL (in ecx) in another mcall ret @@ -742,16 +823,16 @@ draw_register: mov eax, [esi] - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) cmp [debuggee_pid], 0 jz .cd cmp [bSuspended], 0 jz .cd - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) cmp eax, dword [esi+oldcontext-context] je .cd - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) .cd: push eax ;store reg value @@ -1025,13 +1106,13 @@ draw_fpu_register_2: .display: - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) cmp [debuggee_pid], 0 jz .do_label cmp [bSuspended], 0 jz .do_label - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) mov eax, dword [_st0+ebp] cmp eax, dword [_st0+(oldcontext-context)+ebp] @@ -1046,7 +1127,7 @@ draw_fpu_register_2: je .do_label .scol: - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) .do_label: ; draw a text string in the window @@ -1091,13 +1172,13 @@ draw_mmx_register_2: stosb call .hex_2_str - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) cmp [debuggee_pid], 0 jz .cd cmp [bSuspended], 0 jz .cd - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) mov eax, dword [_mm0+ebp] cmp eax, dword [_mm0+(oldcontext-context)+ebp] @@ -1108,7 +1189,7 @@ draw_mmx_register_2: je .cd .scol: - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) .cd: ; draw a text string in the window @@ -1200,20 +1281,20 @@ draw_flag: and byte [edx], not 20h .onoff: - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) cmp [debuggee_pid], 0 jz .doit cmp [bSuspended], 0 jz .doit - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) bt [_eflags], edi lahf bt dword [_eflags + oldcontext - context], edi rcl ah, 1 test ah, 3 jp .doit - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_CHANGED or 0x40000000) .doit: mov ah, 0 @@ -1230,11 +1311,11 @@ draw_flag: ; Also show current register set (common + MMX, SSE or AVX) draw_reg_title: mov edi, COLOR_BG_NORMAL - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) mov esi, 7 cmp [reg_mode], REG_MODE_CPU jz @f - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) @@: movzx edx, [fpu_mode] mov edx, [btn2_tab+edx*4] @@ -1246,7 +1327,7 @@ draw_reg_title: cmp [reg_mode], REG_MODE_SSE jz @f - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) @@: mov edx, aSSE ; draw a text string in the window @@ -1256,7 +1337,7 @@ draw_reg_title: cmp [reg_mode], REG_MODE_AVX jz @f - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) @@: mov edx, aAVX ; draw a text string in the window @@ -1324,12 +1405,12 @@ draw_main_registers: .fpu: call draw_fpu_regs @@: - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE + mov ecx, (0 and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE cmp [debuggee_pid], 0 jz @f cmp [bSuspended], 0 jz @f - mov ecx, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov ecx, (0 and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL @@: mov edx, aColon xor esi, esi @@ -1404,12 +1485,12 @@ draw_dump: mov edx, DATA_X_POS*10000h + DUMP_Y_POS mov ecx, [dumppos] mov edi, COLOR_BG_NORMAL - mov esi, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) + mov esi, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_INACTIVE or 0x40000000) cmp [debuggee_pid], 0 jz @f cmp [bSuspended], 0 jz @f - mov esi, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) + mov esi, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL or 0x40000000) @@: ; draw a number in the window mcall 47 @@ -1541,7 +1622,7 @@ draw_disasm: push ebx lea ecx, [ebx+DISASM_Y_POS-1] shl ecx, 16 - mov cl, 11 + mov cl, FONT_Y_SIZE+TEXT_Y_CLEARANCE ; setting up background color for disassembled text mov edx, COLOR_BG_NORMAL ; draw container rectangle/box with color COLOR_BG_NORMAL (was 0xFFFFFF - white) @@ -1562,26 +1643,26 @@ draw_disasm: sub esi, edx ; normal color ; was 0x40000000 - mov ecx, ((FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_LABEL or 0x40000000) + mov ecx, ((FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_LABEL or 0x40000000) mov al, 4 ; draw a text string in the window with color COLOR_TXT_NORMAL in ecx mcall mov byte [esi+edx-1], 0 - lea esi, [esi*3] - movzx ecx, bx - shr ebx, 16 - lea ebx, [ebx+esi*2] - shl ecx, 16 - mov cl, 10 - imul ebx, 10001h - sub bx, DATA_X_POS - sub bx, word[data_x_size_dd+4] - neg bx - mov al, 13 - ; copy color value from edi - mov edx, edi - ; draw container rectangle/box for disassembled text, color in edx - mcall +; lea esi, [esi*3] +; movzx ecx, bx +; shr ebx, 16 +; lea ebx, [ebx+esi*2] +; shl ecx, 16 +; mov cl, 10 +; imul ebx, 10001h +; sub bx, DATA_X_POS +; sub bx, word[data_x_size_dd+4] +; neg bx +; mov al, 13 +; copy color value from edi +; mov edx, edi +; draw container rectangle/box for disassembled text, color in edx +; mcall inc [disasm_cur_str] mov eax, [disasm_height_dd] cmp [disasm_cur_str], eax @@ -1593,7 +1674,7 @@ draw_disasm: pop ebp jc .loopend mov edx, COLOR_BG_NORMAL - mov esi, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL + mov esi, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_NORMAL mov ebx, DATA_X_POS*10000h add ebx, [data_x_size_dd+4] mov ecx, [disasm_cur_str] @@ -1605,14 +1686,14 @@ draw_disasm: popad jnz .nobp mov edx, COLOR_BG_BREAKPOINT - mov esi, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_BREAKPOINT + mov esi, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_BREAKPOINT .nobp: mov eax, [_eip] cmp eax, ebp jnz .notcurrent mov edx, COLOR_BG_SELECTED - mov esi, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_SELECTED + mov esi, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_SELECTED .notcurrent: push esi ; Save color value for disassembled text @@ -1640,11 +1721,11 @@ draw_disasm: sub ecx, [disasm_start_pos] add ecx, disasm_buffer - mov esi, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_HEX + mov esi, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_HEX mov eax, [_eip] cmp eax, ebp jnz @f - mov esi, (FONT and 11b) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_SELECTED + mov esi, (FONT) shl 28 or ((FONT_MULTIPLIER - 1) and 111b) shl 24 or COLOR_TXT_SELECTED @@: .drawhex: ; draw a number in the window, color in esi @@ -1936,4 +2017,3 @@ draw_window: ret ; vim: ft=fasm tabstop=4 - diff --git a/programs/develop/mtdbg/mtdbg.asm b/programs/develop/mtdbg/mtdbg.asm index b9184cd282..adc26d0c92 100644 --- a/programs/develop/mtdbg/mtdbg.asm +++ b/programs/develop/mtdbg/mtdbg.asm @@ -1853,6 +1853,11 @@ include 'symbols.inc' include 'disasm.inc' +;----------------------------------------------------------------------------- +; Include command history functions + + include "cmd_hist.inc" + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DATA ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -2484,6 +2489,15 @@ messages_y_pos_dd dd ?, ? cmdline_y_pos_dd dd ?, ? registers_y_size_dd dd ?, ? +cmd_hist_buffer: + .ptr dd ? + .size dd ? + .last_node_offset dd ? + .new_node_offset dd ? + .cur_node_offset dd ? + .tmp_line_flag db ? + .n_flag db ? + i_param rb 256 ; stack diff --git a/programs/develop/mtdbg/mtdbg.txt b/programs/develop/mtdbg/mtdbg.txt index c5a4d72f36..dc7561b8fe 100644 --- a/programs/develop/mtdbg/mtdbg.txt +++ b/programs/develop/mtdbg/mtdbg.txt @@ -1,94 +1,44 @@ Введение. -mtdbg представляет собой отладчик для операционной системы Kolibri. Данная -документация описывает возможности отладчика и работу с ним. Если нужны -какие-то возможности отладчика, которых ещё нет, либо обращайтесь на форум -meos.sysbin.com (раздел "Программы"), либо мыльте мне на адрес, указанный в -конце данного файла. +mtdbg представляет собой интерактивный отладчик для операционной системы KolibriOS. Автор программы - Евгений Гречников (Diamond). Данная документация описывает возможности отладчика и работу с ним. Если у вас есть какие-либо вопросы по работе с программой или нужны какие-то возможности отладчика, которых ещё нет, обращайтесь на форум board.kolibrios.org в соответствующую тему - http://board.kolibrios.org/viewtopic.php?f=45&t=358, или по адресу автора - mailto:diamondz@land.ru. Общее описание. -В каждый момент времени mtdbg может отлаживать только одну программу. Назовём -такую программу загруженной для отладки. Если никакая программа не загружена, -абсолютное большинство действий по отладке недоступно. +В каждый момент времени mtdbg может отлаживать только одну программу. Назовём такую программу загруженной для отладки. Если никакая программа не загружена, абсолютное большинство действий по отладке недоступно. -mtdbg управляется командной строкой, вводимой с клавиатуры. Командная строка -изображается в нижней части окна отладчика. Обрабатываются стандартные клавиши -ввода Backspace,Delete,Home,End,стрелки влево/вправо. -Команды нечувствительны к регистру символов. В качестве разделителя -используется произвольное ненулевое число пробелов. +mtdbg управляется командной строкой, вводимой с клавиатуры. Командная строка изображается в нижней части окна отладчика. Обрабатываются стандартные клавиши ввода Backspace, Delete, Home, End, стрелки влево/вправо, стрелки вверх/вниз (прокручивание истории команд). Команды нечувствительны к регистру символов. В качестве разделителя используется произвольное ненулевое число пробелов. -В любой момент отладчик можно завершить командой "quit" (без аргументов). -Впрочем, можно и просто нажать на кнопку закрытия в левом верхнем углу окна. +В любой момент отладчик можно завершить командой "quit" (без аргументов). Впрочем, можно и просто нажать на кнопку закрытия в правом верхнем углу окна. -Запуск отладчика без параметров командной строки приводит к тому, что -никакая программа не загружена. Также mtdbg можно запускать с командной -строкой, в этом случае он попытается загрузить программу с именем, указанным -как первый аргумент командной строки, и параметрами, указанными как +Запуск отладчика без параметров командной строки приводит к тому, что никакая программа не загружена. Также mtdbg можно запускать с командной +строкой, в этом случае он попытается загрузить программу с именем, указанным как первый аргумент командной строки, и параметрами, указанными как последующие (если они есть). -Если никакая программа не загружена, то можно загрузить программу командой +Если никакая программа не загружена, то можно загрузить программу командой load: load <полное имя исполняемого файла> [<аргументы>] Например: load /rd/1/example LOAD /rd/1/aclock w200 h200 - LoaD /hd0/1/menuetos/dosbox/dosbox -Всё, что стоит после первого пробела после имени исполняемого файла, дословно -передаётся программе в качестве командной строки. -Команда load сообщает о результате в окне сообщений (немного выше окна -командной строки). Если программу удалось загрузить, то об этом появится -соответствующее сообщение; если не удалось, то в сообщении будет указана -причина ошибки. Наиболее вероятная - "file not found", если неправильно указано -имя файла. + LoaD /hd0/1/menuetos/dosbox/dosbox +Всё, что стоит после первого пробела после имени исполняемого файла, дословно передаётся программе в качестве командной строки. +Команда load сообщает о результате в окне сообщений (немного выше окна командной строки). Если программу удалось загрузить, то об этом появится соответствующее сообщение; если не удалось, то в сообщении будет указана причина ошибки. Наиболее вероятная - "file not found", если неправильно указано имя файла. -Отладчик может загружать файлы с информацией об именах в программе (метки, -глобальные переменные) - текстовые файлы, каждая строка которых имеет вид -0x <имя> -(строки, не имеющие такой вид, игнорируются). Такой файл может быть создан -вручную или сгенерирован автоматически при компиляции исходника fasm'ом. -Явная загрузка осуществляется командой +Отладчик может загружать файлы с информацией об именах в программе (метки, глобальные переменные) - текстовые файлы, каждая строка которых имеет вид 0x <имя> (строки, не имеющие такой вид, игнорируются). Такой файл может быть создан вручную или сгенерирован автоматически при компиляции исходника fasm'ом. +Явная загрузка осуществляется командой load-symbols: load-symbols <полное имя файла символов> -Кроме того, при выполнении команды load отладчик проверяет наличие файла -с таким же именем, как загружаемый бинарник, и расширением .dbg -(/rd/1/example.dbg для первом из примеров выше), и если такой есть, -загружает его автоматически (выдавая сообщение "Symbols loaded", если всё в +Кроме того, при выполнении команды load отладчик проверяет наличие файла с таким же именем, как загружаемый бинарник, и расширением .dbg (/rd/1/example.dbg для первого из примеров выше), и если такой есть, загружает его автоматически (выдавая сообщение "Symbols loaded", если всё в порядке). -Может случиться так, что загруженная программа упакована. Общий принцип -упаковки программ следующий: сначала исходный файл пакуется (каким-нибудь -алгоритмом сжатия), потом приписывается небольшой по размеру код, который -получает управление при запуске программы, распаковывает в памяти исходный код, -после чего передаёт ему управление. Если программа упакована, то её "настоящий" -код не виден и для отладки нужно предварительно пройти код распаковщика. -mtdbg определяет большинство существующих упаковщиков (mxp,mxp_lzo,mxp_nrv, -mtappack) и в этом случае предлагает автоматически пройти до "настоящего" кода. -Рекомендуется согласиться (нажать 'y' или ), но можно и отказаться. -При отказе и в случае, когда программа упакована чем-то неизвестным, можно -использовать команду "unpack" (без аргументов). Вызывайте её только в случае, -когда вы уверены, что программа упакована и что управление ещё не дошло до -основного кода! [Начиная с версии Kolibri 0.6.5.0, весь этот абзац уже -неактуален, поскольку приложения можно упаковывать как любые двоичные файлы -kpack'ом и при этом код распаковщика находится в ядре и распаковка прозрачна -для отладки.] +Может случиться так, что загруженная программа упакована. Общий принцип упаковки программ следующий: сначала исходный файл пакуется (каким-нибудь алгоритмом сжатия), потом приписывается небольшой по размеру код, который получает управление при запуске программы, распаковывает в памяти исходный код, после чего передаёт ему управление. Если программа упакована, то её "настоящий" код не виден и для отладки нужно предварительно пройти код распаковщика. mtdbg определяет большинство существующих упаковщиков (mxp, mxp_lzo, mxp_nrv, mtappack) и в этом случае предлагает автоматически пройти до "настоящего" кода. Рекомендуется согласиться (нажать 'y' или ), но можно и отказаться. При отказе и в случае, когда программа упакована чем-то неизвестным, можно использовать команду "unpack" (без аргументов). Вызывайте её только в случае, +когда вы уверены, что программа упакована и что управление ещё не дошло до основного кода! [Начиная с версии Kolibri 0.6.5.0, весь этот абзац уже неактуален, поскольку приложения можно упаковывать как и любые двоичные файлы kpack'ом и при этом код распаковщика находится в ядре и распаковка прозрачна для отладки.] -Загруженную программу можно прибить командой "terminate" (без аргументов). -Команда "detach" (без аргументов) отключается от программы, после чего -программа продолжает выполняться нормально, как если бы отладчика не было. -После обеих этих команд программа перестаёт быть отлаживаемой. +Загруженную программу можно прибить командой "terminate" (без аргументов). Команда "detach" (без аргументов) отключается от программы, после чего программа продолжает выполняться нормально, как если бы отладчика не было. После обеих этих команд программа перестаёт быть отлаживаемой. -Можно заново загрузить программу для отладки командой "reload" (без -аргументов). Если уже есть загруженная программа, то она прибивается и -запускается (с самого начала) новый экземпляр (с той же командной строкой), -в этом случае команда аналогична командам +Можно заново загрузить программу для отладки командой "reload" (без аргументов). Если уже есть загруженная программа, то она прибивается и +запускается (с самого начала) новый экземпляр (с той же командной строкой), в этом случае команда аналогична командам: terminate load -В противном случае заново загружается программа, которую отлаживали последней -(в текущем сеансе работы с mtdbg) (с той же командной строкой), т.е. почти то -же самое, что и -load , -но команда reload в обоих случаях короче и удобнее; кроме того, load считает, -что загружается новая программа, и переводит окно данных (см. ниже) на -нулевой адрес, а reload сохраняет текущий адрес. +В противном случае заново загружается программа, которую отлаживали последней (в текущем сеансе работы с mtdbg) (с той же командной строкой), т.е. почти то же самое, что и load , но команда reload в обоих случаях короче и удобнее; кроме того, load считает, что загружается новая программа, и переводит окно данных (см. ниже) на нулевой адрес, а reload сохраняет текущий адрес. Всегда доступна команда "help", которую можно сокращать до "h". Все команды разбиты на группы. @@ -102,39 +52,26 @@ help control h LoaD Окно отладчика состоит из следующих элементов, перечисляемых сверху вниз: -- строка состояния. При наличии загруженной программы показывает ее имя и - состояние ("Running"/"Paused"), при отсутствии сообщает "No program loaded". -- окно регистров - показывает значения регистров общего назначения, регистра - eip и регистра флагов. Последний записан двумя способами: полное hex-значение - и состояния отдельных флагов: CF,PF,AF,ZF,SF,DF,OF: если флаг сброшен, то - изображается маленькая буква, если установлен, то заглавная. - Регистры, изменившиеся с предыдущего момента, подсвечиваются зеленым. +- строка состояния. При наличии загруженной программы показывает ее имя и состояние ("Running"/"Paused"), при отсутствии сообщает "No program loaded". +- окно регистров - показывает значения регистров общего назначения, регистра eip, регистра флагов и регистров FPU/MMX. Регистр флагов отображается двумя способами: полное hex-значение и состояния отдельных флагов: CF,PF,AF,ZF,SF,DF,OF: если флаг сброшен, то изображается маленькая буква, если установлен, то заглавная. Регистры, изменившиеся с предыдущего момента, подсвечиваются оранжевым. - окно данных (окно дампа) - показывает содержимое памяти загруженной программы -- окно кода (окно дизассемблера) - показывает код программы в виде - дизассемблированных инструкций +- окно кода (окно дизассемблера) - показывает код программы в виде дизассемблированных инструкций - окно сообщений - окно командной строки -В окне дампа можно просматривать данные, начиная с любого адреса, для этого -есть команда +В окне дампа можно просматривать данные, начиная с любого адреса, для этого есть команда: d <выражение> -Команда d без аргументов пролистывает окно дампа вниз. -То же самое относится к окну кода и команде -u <выражение> -или просто u. +Команда d без аргументов пролистывает окно дампа вниз. То же самое относится к окну кода и команде u <выражение> или просто u. Например: -d esi - показывает данные, находящиеся по адресу esi (например, полезна перед - выполнением инструкции rep movsb) +d esi - показывает данные, находящиеся по адресу esi (например, полезна перед выполнением инструкции rep movsb) d esp - показывает стек u eip - дизассемблирует инструкции, начиная с текущей Выражения в mtdbg могут включать - шестнадцатеричные константы -- имена всех регистров общего назначения (8 32-битных, 8 16-битных и - 8 8-битных) и регистра eip; значения 16- и 8-битных регистров расширяются +- имена всех регистров общего назначения (8 32-битных, 8 16-битных и 8 8-битных) и регистра eip; значения 16- и 8-битных регистров расширяются нулями до 32 бит -- четыре арифметические операции +,-,*,/ (со стандартными приоритетами) и - скобки +- четыре арифметические операции +,-,*,/ (со стандартными приоритетами) и скобки - [если есть информация о символах] имена, загруженные из dbg-файла Все вычисления производятся по модулю 2^32. Примеры выражений: @@ -145,80 +82,39 @@ al+AH*bl ax + 2* bH*(eip+a73) 3*esi*di/EAX Команда -? <выражение> -вычисляет значение указанного выражения. +? <выражение> вычисляет значение указанного выражения. -Значения регистров загруженной программы можно изменять командой r, имеющей -две абсолютно эквивалентные формы: +Значения регистров загруженной программы можно изменять командой r, имеющей две абсолютно эквивалентные формы: r <регистр> <выражение> r <регистр>=<выражение> -(в обоих случаях можно расставлять пробелы по вкусу). В качестве регистра можно -указывать любой из вышеупомянутых - 24 регистра общего назначения и eip. +(в обоих случаях можно расставлять пробелы по вкусу). В качестве регистра можно указывать любой из вышеупомянутых - 24 регистра общего назначения и eip. -Допустим, команда load успешно загрузила программу для отладки. -Сразу после загрузки программа приостановлена и не выполняется. -Нажатие F7 (аналог командной строки - команда "s") делает один шаг в -загруженной программе, после чего управление возвращается отладчику, который -показывает новое содержимое регистров и памяти. Системный вызов int 40h -(а также инструкции sysenter и syscall) при этом считается одним шагом. -Нажатие F8 (аналог командной строки - команда "p") также делает шаг в -загруженной программе, но при этом вызовы процедур, строковые операции с +Допустим, команда load успешно загрузила программу для отладки. Сразу после загрузки программа приостановлена и не выполняется. +Нажатие F7 (аналог командной строки - команда "s") делает один шаг в загруженной программе, после чего управление возвращается отладчику, который показывает новое содержимое регистров и памяти. Системный вызов int 40h (а также инструкции sysenter и syscall) при этом считается одним шагом. +Нажатие F8 (аналог командной строки - команда "p") также делает шаг в загруженной программе, но при этом вызовы процедур, строковые операции с префиксом rep/repz/repnz и циклы loop выполняются как один шаг. -Команды пошагового выполнения используются, как правило, на отдельных участках -программы, когда нужно, например, регулярно отслеживать значения регистров -и/или каких-то переменных в памяти. -Команда -g <выражение> -возобновляет выполнение программы и ждёт, пока управление дойдёт до -eip=соответствующему адресу, а в этот момент приостанавливает программу. -Команда "g" без аргументов просто возобновляет выполнение программы. +Команды пошагового выполнения используются, как правило, на отдельных участках программы, когда нужно, например, регулярно отслеживать значения регистров и/или каких-то переменных в памяти. +Команда g <выражение> возобновляет выполнение программы и ждёт, пока управление дойдёт до eip=соответствующему адресу, и в этот момент приостанавливает программу. Команда "g" без аргументов просто возобновляет выполнение программы. Приостановить выполнение программы можно командой "stop" (без аргументов). -Обычно требуется, чтобы программа нормально выполнялась, но при наступлении -определённых условий программа приостанавалась и управление получал отладчик. -Соответствующие условия называются точками останова, breakpoint(s), в -просторечии - бряками. Простейший тип точек останова - на конкретный адрес, -т.е. прерывать выполнение при eip=<заданное значение>. Такие точки останова -устанавливаются командой +Обычно требуется, чтобы программа нормально выполнялась, но при наступлении определённых условий программа приостанавалась и управление получал отладчик. Соответствующие условия называются точками останова, breakpoint(s), в просторечии - бряками. Простейший тип точек останова - на конкретный адрес, т.е. прерывать выполнение при eip=<заданное значение>. Такие точки останова устанавливаются командой: bp <выражение> -Замечание. Если есть только одна такая точка останова, удобнее вместо неё -использовать команду "g" с аргументом. +Замечание. Если есть только одна такая точка останова, удобнее вместо неё использовать команду "g" с аргументом. -Другой тип точек останова - по обращению к заданному участку памяти. -Таких точек останова может быть не больше четырёх (поскольку используются +Другой тип точек останова - по обращению к заданному участку памяти. Таких точек останова может быть не больше четырёх (поскольку используются аппаратные возможности процессоров x86, где допускаются только 4 таких точки). bpm <выражение> - брякается на любой доступ к байту по указанному адресу bpm w <выражение> - брякается на запись байта по указанному адресу -bpmb,bpmw,bpmd <выражение> - брякаются на доступ к соответственно байту, слову -и двойному слову по указанному адресу. bpm и bpmb - синонимы. При использовании -bpmw,bpmd адрес должен быть выровнен соответственно на границу слова (т.е. быть -чётным) или на границу двойного слова (т.е. делиться на 4). +bpmb/bpmw/bpmd <выражение> - брякаются на доступ к соответственно байту, слову и двойному слову по указанному адресу. bpm и bpmb - синонимы. При использовании bpmw/bpmd адрес должен быть выровнен соответственно на границу слова (т.е. быть чётным) или на границу двойного слова (т.е. делиться на 4). bpmb,bpmw,bpmd w <выражение> - аналогично для бряка на запись. -Список установленных точек останова можно просмотреть командой "bl", информацию -о конкретной точке останова можно получить с помощью "bl <номер>". Ненужные -точки останова удаляются командой "bc <номер>", временно ненужные можно -запретить командой "bd <номер>", когда они станут снова нужны, используйте -команду "be <номер>". +Список установленных точек останова можно просмотреть командой "bl", информацию о конкретной точке останова можно получить с помощью "bl <номер>". Ненужные точки останова удаляются командой "bc <номер>", временно ненужные можно запретить командой "bd <номер>", когда они станут снова нужны, используйте команду "be <номер>". Замечания. -1. При отладке собственных программ можно вставлять в код инструкции - int3 (обратите внимание на отсутствие пробела!). Такая инструкция вызывает - исключение при нормальном запуске, что приведёт к завершению процесса, - но при работе под отладчиком просто активизируется отладчик (с сообщением - "int3 command at xxx"). Это позволяет не думать о том, какие адреса - использовать в командах g и/или bp. Можно также генерировать файл с - информацией о символах и загружать его, тогда не только нет нужды - самостоятельно вычислять адреса для "g" и "bp", но и "u","d","?" будут - понимать указание имени метки/переменной. +1. При отладке собственных программ можно вставлять в код инструкции int3 (обратите внимание на отсутствие пробела!). Такая инструкция вызывает исключение при нормальном запуске, что приведёт к завершению процесса, но при работе под отладчиком просто активизируется отладчик (с сообщением "int3 command at xxx"). Это позволяет не думать о том, какие адреса использовать в командах g и/или bp. Можно также генерировать файл с информацией о символах и загружать его, тогда не только нет нужды самостоятельно вычислять адреса для "g" и "bp", но и "u","d","?" будут понимать указание имени метки/переменной. 2. Весь вывод и весь ввод ориентирован на 16-ричную систему счисления. -3. Когда программа выполняется, окна регистров и данных показывают информацию, - относящуюся к моменту до возобновления; установка значений регистров в - этом режиме невозможна. Впрочем, команда "d" в этом режиме показывает - информацию, верную в момент выдачи команды. +3. Когда программа выполняется, окна регистров и данных показывают информацию, относящуюся к моменту до возобновления; установка значений регистров в этом режиме невозможна. Впрочем, команда "d" в этом режиме показывает информацию, верную в момент выдачи команды. - diamond - mailto:diamondz@land.ru