Exemple #1
0
static void viewreg_lock_alloc(NP2VIEW_T *view, void *src)	{

	if (view->lock) {
		if (view->buf1.type != ALLOCTYPE_REG) {
			if (viewcmn_alloc(&view->buf1, view->memsize)) {
				view->lock = FALSE;
				viewmenu_lock(view);
			}
			else {
				view->buf1.type = ALLOCTYPE_REG;
				CopyMemory(view->buf1.ptr, src, view->memsize);
			}
			viewcmn_putcaption(view);
		}
	}
}
Exemple #2
0
static void viewasm_paint(NP2VIEW_T *view, RECT *rc, HDC hdc) {

	LONG	x, y, i;
	UINT32	seg4;
	UINT16	off, prevoff;
	UINT32	pos;
	UINT8	*p;
	UINT8	buf[16];
	TCHAR	str[16];
	_UNASM	una;
	int		step;
#if defined(UNICODE)
	TCHAR	cnv[64];
#endif
	COLORREF	bkcol;

	if (view->lock) {
		if ((view->buf1.type != ALLOCTYPE_SEG) ||
			(view->buf1.arg != view->seg)) {
			if (viewcmn_alloc(&view->buf1, view->memsize)) {
				view->lock = FALSE;
				viewmenu_lock(view);
			}
			else {
				view->buf1.type = ALLOCTYPE_SEG;
				view->buf1.arg = view->seg;
				viewmem_read(&view->dmem, seg_to_real(view->buf1.arg), (BYTE *)view->buf1.ptr, view->memsize);
				view->buf2.type = ALLOCTYPE_NONE;
			}
			viewcmn_putcaption(view);
		}
	}

	seg4 = seg_to_real(view->seg);
	pos = view->pos;
	
	if ((view->buf2.type != ALLOCTYPE_ASM) ||
		(view->buf2.arg != (seg4 + view->off))) {
		if (viewcmn_alloc(&view->buf2, view->maxline*2)) {
			pos = 0;
		}
		else {
			DWORD i;
			UINT16 *r;
			r = (UINT16 *)view->buf2.ptr;
			view->buf2.type = ALLOCTYPE_ASM;
			view->buf2.arg = seg4 + view->off;
			off = view->off;
			for (i=0; i<(view->maxline - 1); i++) {
				*r++ = off;
				step = viewasm_unasm_next(NULL, buf, view, off);
				off += (UINT16)step;
			}
			*r = off;
		}
	}

	prevoff = off = viewasm_line_to_off(view, view->pos);

	for (y=0; y<rc->bottom; y+=viewcfg.font_height) {
		x = 0;
		// Emphasize wrapping
		if(prevoff > off)	{
			viewpaint_line_fill(rc, hdc, y, 2, viewcfg.color_hilite);
		}
		
		bkcol = viewpaint_line_set_colors(view, rc, hdc, y, off, CPU_CS, CPU_IP);

		viewpaint_print_addr(hdc, x, y, view->seg, off, TRUE);

		SetBkColor(hdc, bkcol);
		step = viewasm_unasm_next(&una, buf, view, off);
		p = buf;
		if (!step) {
			break;
		}
		x += 11 * np2viewfontwidth;
		for(i = 0; i < step; i++)	{
			wsprintf(str + (i*2), _T("%02x"), *p);
			p++;
		}
		TextOut(hdc, x, y, str, i * 2);
		x += 15 * np2viewfontwidth;
#if defined(UNICODE)
		TextOut(hdc, x, y, cnv, MultiByteToWideChar(CP_ACP, 
					MB_PRECOMPOSED, una.mnemonic, -1, cnv, NELEMENTS(cnv)));
#else
		TextOut(hdc,x, y, una.mnemonic, lstrlen(una.mnemonic));
#endif
		x += 7 * np2viewfontwidth;
		if (una.operand[0]) {
#if defined(UNICODE)
			TextOut(hdc, x, y, cnv, MultiByteToWideChar(CP_ACP,
					MB_PRECOMPOSED, una.operand, -1, cnv, NELEMENTS(cnv)));
#else
			TextOut(hdc, x, y, una.operand, lstrlen(una.operand));
#endif
		}
		prevoff = off;
		off += (UINT16)step;
	}
}
Exemple #3
0
LRESULT CALLBACK viewasm_proc(NP2VIEW_T *view, HWND hwnd, UINT msg, WPARAM wp, LPARAM lp) {

	UINT step = 0;
	LONG newcursor = view->cursor;

	switch (msg) {
		case WM_SYSKEYDOWN:
		case WM_KEYDOWN:
			switch(wp)
			{
			case VK_UP:
				view->cursorline--;
				break;
			case VK_DOWN:
				view->cursorline++;
				break;
			case VK_PRIOR:
				view->cursorline -= view->step;
				break;
			case VK_NEXT:
				view->cursorline += view->step;
				break;
			}
			// Clamp
			if(view->cursorline < 0) {
				view->cursorline = 0;
			} else if((UINT32)view->cursorline > (view->maxline - 1)) {
				view->cursorline = view->maxline - 1;
			}

			viewer_scroll_fit_line(view, view->cursorline);
			newcursor = viewasm_line_to_off(view, view->cursorline);
			break;

		case WM_COMMAND:
			switch(LOWORD(wp)) {
				case IDM_EDIT_MEMORY:
					viewer_edit_dlg(view, hwnd);
					break;

				case IDM_BREAK_TOGGLE:
					viewasm_toggle_breakpoint(view);
					break;

				case IDM_SEGCS:
					set_viewseg(hwnd, view, CPU_CS);
					break;

				case IDM_SEGDS:
					set_viewseg(hwnd, view, CPU_DS);
					break;

				case IDM_SEGES:
					set_viewseg(hwnd, view, CPU_ES);
					break;

				case IDM_SEGSS:
					set_viewseg(hwnd, view, CPU_SS);
					break;

				case IDM_SEGTEXT:
					set_viewseg(hwnd, view, 0xa000);
					break;

				case IDM_VIEWMODELOCK:
					view->lock ^= 1;
					viewmenu_lock(view);
					viewcmn_putcaption(view);
					InvalidateRect(hwnd, NULL, TRUE);
					break;

				case IDM_GOTO:
					view->seg = lp >> 16;
					view->off = lp & 0xffff;
					break;
			}
			break;

		case WM_LBUTTONDOWN:	{
				POINTS mpos = MAKEPOINTS(lp);
				view->cursorline = view->pos + (mpos.y / viewcfg.font_height);
				newcursor = viewasm_line_to_off(view, view->cursorline);
			}
			break;

		case WM_PAINT:
			viewcmn_paint(view, viewasm_paint);
			break;

		default:
			return(DefWindowProc(hwnd, msg, wp, lp));
	}
	if(newcursor != view->cursor)	{
		view->cursor = newcursor + seg_to_real(view->seg);
		InvalidateRect(hwnd, NULL, TRUE);
	}
	return(0L);
}
Exemple #4
0
static void viewsnd_paint(NP2VIEW_T *view, RECT *rc, HDC hdc) {

	int		x;
	LONG	y;
	UINT	pos;
const UINT8	*p;
	TCHAR	str[16];
	HFONT	hfont;
	UINT	reg;
	UINT16	mask;

	hfont = CreateFont(16, 0, 0, 0, 0, 0, 0, 0, 
					SHIFTJIS_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,
					DEFAULT_QUALITY, FIXED_PITCH, np2viewfont);
	SetTextColor(hdc, 0xffffff);
	SetBkColor(hdc, 0x400000);
	hfont = (HFONT)SelectObject(hdc, hfont);

	if (view->lock) {
		if (view->buf1.type != ALLOCTYPE_SND) {
			if (viewcmn_alloc(&view->buf1, 0x400)) {
				view->lock = FALSE;
				viewmenu_lock(view);
			}
			else {
				view->buf1.type = ALLOCTYPE_SND;
				CopyMemory(view->buf1.ptr, opn.reg, 0x400);
				CopyMemory(view->buf1.ptr, &psg1.reg, 0x10);
				CopyMemory(((UINT8 *)view->buf1.ptr) + 0x200, &psg2.reg, 0x10);
			}
			viewcmn_putcaption(view);
		}
	}

	pos = view->pos;
	for (y=0; (y<rc->bottom) && (pos<NELEMENTS(fmsndtbl)); y+=16, pos++) {
		if (fmsndtbl[pos].str) {
			TextOut(hdc, 0, y, fmsndtbl[pos].str,
												lstrlen(fmsndtbl[pos].str));
		}
		else {
			reg = fmsndtbl[pos].reg;
			mask = fmsndtbl[pos].mask;

			wsprintf(str, _T("%04x"), reg & 0x1ff);
			TextOut(hdc, 0, y, str, 4);

			if (view->lock) {
				p = (UINT8 *)view->buf1.ptr;
				p += reg;
			}
			else if (reg & 0x1ff) {
				p = opn.reg + reg;
			}
			else if (reg & 0x200) {
				p = (UINT8 *)&psg2.reg;
			}
			else {
				p = (UINT8 *)&psg1.reg;
			}
			for (x=0; x<16; x++) {
				if (mask & 1) {
					str[0] = viewcmn_hex[*p >> 4];
					str[1] = viewcmn_hex[*p & 15];
					str[2] = 0;
					TextOut(hdc, (6 + x*3) * 8, y, str, 2);
				}
				p++;
				mask >>= 1;
			}
		}
	}