Mercurial > vba-linux

comparison src/win32/GBDisassemble.cpp @ 1:f9f4f1b99eed

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
importing src directory
author Robert McIntyre <rlm@mit.edu>
date Sat, 03 Mar 2012 10:31:27 -0600
parents
children
comparison
equal deleted inserted replaced
0:8ced16adf2e1 1:f9f4f1b99eed
1 // GBDisassemble.cpp : implementation file
2 //
3
4 #include "stdafx.h"
5 #include "resource.h"
6 #include "GBDisassemble.h"
7 #include "VBA.h"
8
9 #include "../gb/GB.h"
10 #include "../gb/gbGlobals.h"
11
12 extern gbRegister AF;
13 extern gbRegister BC;
14 extern gbRegister DE;
15 extern gbRegister HL;
16 extern gbRegister SP;
17 extern gbRegister PC;
18 extern u16 IFF;
19 extern int gbDis(char *, u16);
20
21 /////////////////////////////////////////////////////////////////////////////
22 // GBDisassemble dialog
23
24 GBDisassemble::GBDisassemble(CWnd*pParent /*=NULL*/)
25 : ResizeDlg(GBDisassemble::IDD, pParent)
26 {
27 //{{AFX_DATA_INIT(GBDisassemble)
28 m_c = FALSE;
29 m_h = FALSE;
30 m_n = FALSE;
31 m_z = FALSE;
32 //}}AFX_DATA_INIT
33 address = 0;
34 autoUpdate = false;
35 count = 1;
36 lastAddress = 0;
37 }
38
39 void GBDisassemble::DoDataExchange(CDataExchange*pDX)
40 {
41 CDialog::DoDataExchange(pDX);
42 //{{AFX_DATA_MAP(GBDisassemble)
43 DDX_Control(pDX, IDC_ADDRESS, m_address);
44 DDX_Control(pDX, IDC_DISASSEMBLE, m_list);
45 DDX_Check(pDX, IDC_C, m_c);
46 DDX_Check(pDX, IDC_H, m_h);
47 DDX_Check(pDX, IDC_N, m_n);
48 DDX_Check(pDX, IDC_Z, m_z);
49 //}}AFX_DATA_MAP
50 }
51
52 BEGIN_MESSAGE_MAP(GBDisassemble, CDialog)
53 //{{AFX_MSG_MAP(GBDisassemble)
54 ON_BN_CLICKED(IDC_CLOSE, OnClose)
55 ON_BN_CLICKED(IDC_REFRESH, OnRefresh)
56 ON_BN_CLICKED(IDC_NEXT, OnNext)
57 ON_BN_CLICKED(IDC_GO, OnGo)
58 ON_BN_CLICKED(IDC_GOPC, OnGopc)
59 ON_BN_CLICKED(IDC_AUTO_UPDATE, OnAutoUpdate)
60 ON_WM_VSCROLL()
61 //}}AFX_MSG_MAP
62 END_MESSAGE_MAP()
63
64 /////////////////////////////////////////////////////////////////////////////
65 // GBDisassemble message handlers
66
67 void GBDisassemble::OnClose()
68 {
69 theApp.winRemoveUpdateListener(this);
70
71 DestroyWindow();
72 }
73
74 void GBDisassemble::OnRefresh()
75 {
76 refresh();
77 }
78
79 void GBDisassemble::OnNext()
80 {
81 gbEmulate(1);
82 if (PC.W < address || PC.W >= lastAddress)
83 OnGopc();
84 refresh();
85 }
86
87 void GBDisassemble::OnGo()
88 {
89 CString buffer;
90 m_address.GetWindowText(buffer);
91 sscanf(buffer, "%x", &address);
92 refresh();
93 }
94
95 void GBDisassemble::OnGopc()
96 {
97 address = PC.W;
98
99 refresh();
100 }
101
102 void GBDisassemble::OnAutoUpdate()
103 {
104 autoUpdate = !autoUpdate;
105 if (autoUpdate)
106 {
107 theApp.winAddUpdateListener(this);
108 }
109 else
110 {
111 theApp.winRemoveUpdateListener(this);
112 }
113 }
114
115 BOOL GBDisassemble::OnInitDialog()
116 {
117 CDialog::OnInitDialog();
118
119 DIALOG_SIZER_START(sz)
120 DIALOG_SIZER_ENTRY(IDC_DISASSEMBLE, DS_SizeY)
121 DIALOG_SIZER_ENTRY(IDC_REFRESH, DS_MoveY)
122 DIALOG_SIZER_ENTRY(IDC_CLOSE, DS_MoveY)
123 DIALOG_SIZER_ENTRY(IDC_NEXT, DS_MoveY)
124 DIALOG_SIZER_ENTRY(IDC_AUTO_UPDATE, DS_MoveY)
125 DIALOG_SIZER_ENTRY(IDC_GOPC, DS_MoveY)
126 DIALOG_SIZER_ENTRY(IDC_VSCROLL, DS_SizeY)
127 DIALOG_SIZER_END()
128 SetData(sz,
129 TRUE,
130 HKEY_CURRENT_USER,
131 "Software\\Emulators\\VisualBoyAdvance\\Viewer\\GBDisassembleView",
132 NULL);
133
134 SCROLLINFO si;
135 ZeroMemory(&si, sizeof(si));
136 si.cbSize = sizeof(si);
137 si.fMask = SIF_PAGE | SIF_RANGE | SIF_POS;
138 si.nMin = 0;
139 si.nMax = 100;
140 si.nPos = 50;
141 si.nPage = 0;
142 GetDlgItem(IDC_VSCROLL)->SetScrollInfo(SB_CTL, &si, TRUE);
143 CFont *font = CFont::FromHandle((HFONT)GetStockObject(SYSTEM_FIXED_FONT));
144 m_list.SetFont(font);
145
146 for (int i = 0; i < 7; i++)
147 GetDlgItem(IDC_R0+i)->SetFont(font);
148
149 m_address.LimitText(4);
150 refresh();
151
152 return TRUE; // return TRUE unless you set the focus to a control
153 // EXCEPTION: OCX Property Pages should return FALSE
154 }
155
156 void GBDisassemble::OnVScroll(UINT nSBCode, UINT nPos, CScrollBar*pScrollBar)
157 {
158 char buffer[80];
159
160 switch (nSBCode)
161 {
162 case SB_LINEDOWN:
163 address += gbDis(buffer, address);
164 break;
165 case SB_LINEUP:
166 address--;
167 break;
168 case SB_PAGEDOWN:
169 address = lastAddress;
170 break;
171 case SB_PAGEUP:
172 address -= count;
173 break;
174 }
175 refresh();
176
177 CDialog::OnVScroll(nSBCode, nPos, pScrollBar);
178 }
179
180 void GBDisassemble::refresh()
181 {
182 if (gbRom == NULL)
183 return;
184
185 int h = m_list.GetItemHeight(0);
186 RECT r;
187 m_list.GetClientRect(&r);
188 count = (r.bottom - r.top+1)/h;
189
190 m_list.ResetContent();
191 if (!systemIsEmulating() || systemCartridgeType != 1)
192 return;
193
194 char buffer[80];
195 u16 addr = address;
196 int i;
197 int sel = -1;
198 for (i = 0; i < count; i++)
199 {
200 if (addr == PC.W)
201 sel = i;
202 addr += gbDis(buffer, addr);
203 m_list.InsertString(-1, buffer);
204 }
205 lastAddress = addr-1;
206 if (sel != -1)
207 m_list.SetCurSel(sel);
208
209 sprintf(buffer, "%04x", AF.W);
210 GetDlgItem(IDC_R0)->SetWindowText(buffer);
211 sprintf(buffer, "%04x", BC.W);
212 GetDlgItem(IDC_R1)->SetWindowText(buffer);
213 sprintf(buffer, "%04x", DE.W);
214 GetDlgItem(IDC_R2)->SetWindowText(buffer);
215 sprintf(buffer, "%04x", HL.W);
216 GetDlgItem(IDC_R3)->SetWindowText(buffer);
217 sprintf(buffer, "%04x", SP.W);
218 GetDlgItem(IDC_R4)->SetWindowText(buffer);
219 sprintf(buffer, "%04x", PC.W);
220 GetDlgItem(IDC_R5)->SetWindowText(buffer);
221 sprintf(buffer, "%04x", IFF);
222 GetDlgItem(IDC_R6)->SetWindowText(buffer);
223
224 m_z = (AF.B.B0 & 0x80) != 0;
225 m_n = (AF.B.B0 & 0x40) != 0;
226 m_h = (AF.B.B0 & 0x20) != 0;
227 m_c = (AF.B.B0 & 0x10) != 0;
228 UpdateData(FALSE);
229 }
230
231 void GBDisassemble::update()
232 {
233 OnGopc();
234 refresh();
235 }
236
237 void GBDisassemble::PostNcDestroy()
238 {
239 delete this;
240 }
241