390 lines
7.6 KiB
C++
390 lines
7.6 KiB
C++
#include "../common.win32/stdafx.h"
|
||
#include <Richedit.h>
|
||
#include "consoleresrc.h"
|
||
#include "activecommon.h"
|
||
#include "../common/ki.h"
|
||
#include "../common/svnversion.h"
|
||
#include "../kegs/src/sim65816.h"
|
||
|
||
int outputInfoInternal(const char* _str)
|
||
{
|
||
CEmulatorWin32* p = (CEmulatorWin32*)CEmulator::theEmulator;
|
||
if (p)
|
||
{
|
||
CConsole* c = p->theConsole;
|
||
if (c && IsWindow(c->hWnd))
|
||
c->addLine(_str);
|
||
}
|
||
|
||
OutputDebugString(_str);
|
||
return 0;
|
||
}
|
||
|
||
int outputInfo(const MYCHAR* format,...)
|
||
{
|
||
|
||
va_list argptr;
|
||
va_start( argptr, format );
|
||
CString st;
|
||
st.FormatV(format,argptr);
|
||
va_end(argptr);
|
||
|
||
outputInfoInternal(st);
|
||
return 0;
|
||
}
|
||
|
||
int fOutputInfo(FILE* _file,const char* format,...)
|
||
{
|
||
va_list argptr;
|
||
va_start( argptr, format );
|
||
CString st;
|
||
st.FormatV(format,argptr);
|
||
va_end(argptr);
|
||
|
||
if ((_file!=stdout) && (_file!=stderr))
|
||
fprintf(_file,st);
|
||
else
|
||
outputInfoInternal(st);
|
||
return 0;
|
||
|
||
}
|
||
|
||
void CConsole::showConsole()
|
||
{
|
||
if (!IsWindow(hWnd)) return ;
|
||
ShowWindow(hWnd,SW_SHOW);
|
||
visible++;
|
||
}
|
||
|
||
void CConsole::hideConsole()
|
||
{
|
||
if (!IsWindow(hWnd)) return ;
|
||
ShowWindow(hWnd,SW_HIDE);
|
||
visible--;
|
||
/*
|
||
if (enable)
|
||
// run the emulator
|
||
strcpy(inputBuffer,"g");
|
||
*/
|
||
}
|
||
|
||
|
||
|
||
BOOL CALLBACK EditProc(HWND hwnd, UINT Message, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
HWND parent = GetParent(hwnd);
|
||
CConsole* theConsole = (CConsole*)GetWindowLongPtr(parent,GWLP_USERDATA);
|
||
|
||
switch(Message)
|
||
{
|
||
case WM_CHAR:
|
||
if (wParam==VK_RETURN)
|
||
{
|
||
SendMessage( hwnd, WM_GETTEXT, (WPARAM)255, (LPARAM)(LPCSTR)(theConsole->inputBuffer));
|
||
outputInfo(">%s\n",theConsole->inputBuffer);
|
||
SendMessage( hwnd, WM_SETTEXT, (WPARAM)NULL, (LPARAM)(LPCSTR)NULL);
|
||
UpdateWindow(hwnd);
|
||
return 0;
|
||
}
|
||
break;
|
||
}
|
||
return CallWindowProc(theConsole->OldProc,hwnd,Message,wParam,lParam);
|
||
}
|
||
|
||
INT_PTR CALLBACK ConsoleProc(HWND hwnd, UINT Message, WPARAM wParam, LPARAM lParam)
|
||
{
|
||
|
||
CConsole* theConsole = (CConsole*)GetWindowLongPtr(hwnd,GWLP_USERDATA);
|
||
|
||
switch(Message)
|
||
{
|
||
case WM_USER:
|
||
if (theConsole)
|
||
theConsole->refreshLine();
|
||
break;
|
||
case WM_DESTROY:
|
||
OutputDebugString("WM_DESTROY Console\n");
|
||
|
||
// d<>truit la font
|
||
if (theConsole)
|
||
{
|
||
if ( theConsole->hFont)
|
||
{
|
||
DeleteObject(theConsole->hFont);
|
||
theConsole->hFont=NULL;
|
||
}
|
||
theConsole->hWnd=NULL;
|
||
}
|
||
break;
|
||
case WM_CLOSE:
|
||
outputInfo("WM_CLOSE\n");
|
||
theConsole->hideConsole();
|
||
break;
|
||
case WM_COMMAND:
|
||
if (theConsole)
|
||
switch (LOWORD(wParam))
|
||
{
|
||
case IDC_GO:
|
||
theConsole->inputBuffer[0]='g';
|
||
theConsole->inputBuffer[1]=0;
|
||
break;
|
||
case IDC_REGS:
|
||
theConsole->inputBuffer[0]=0x05;
|
||
theConsole->inputBuffer[1]=0;
|
||
break;
|
||
case IDC_STEP:
|
||
theConsole->inputBuffer[0]='s';
|
||
theConsole->inputBuffer[1]=0;
|
||
break;
|
||
case IDC_BUTTONBRK:
|
||
{
|
||
extern int g_config_control_panel;
|
||
if (!g_config_control_panel)
|
||
set_halt_act(HALT_WANTTOBRK);
|
||
else
|
||
outputInfo("Emulator not ready (likely in pause)...\n");
|
||
}
|
||
break;
|
||
}
|
||
break;
|
||
case WM_CREATE:
|
||
outputInfo("WM_CREATE\n");
|
||
break;
|
||
case WM_INITDIALOG:
|
||
{
|
||
// r<>cup<75>re le bon ptr
|
||
theConsole = (CConsole*)lParam;
|
||
// associe la classe <20> la fenetre
|
||
SetLastError(0);
|
||
if (! SetWindowLongPtr(hwnd,GWLP_USERDATA,(LONG_PTR)theConsole) && GetLastError())
|
||
{
|
||
LONG err = GetLastError();
|
||
char str[255];
|
||
sprintf(str,"SetWindowLong(initdialog) Failed (%X %d)\n",hwnd,err);
|
||
OutputDebugString(str);
|
||
}
|
||
LOGFONT lf;
|
||
|
||
// Creates a non proportionnal font for both EDIT1 & EDIT2
|
||
|
||
memset( &lf, 0, sizeof(LOGFONT) ); // zero out structure
|
||
lf.lfHeight = 14; // request a 12-pixel-height font
|
||
lf.lfWeight = FW_NORMAL;
|
||
lf.lfCharSet = ANSI_CHARSET;
|
||
lf.lfPitchAndFamily = FIXED_PITCH & FF_DONTCARE;
|
||
strcpy( lf.lfFaceName, "Courier New" ); // request a face name "Arial"
|
||
|
||
if (!(theConsole->hFont = CreateFontIndirect( &lf )) )
|
||
OutputDebugString("font failed\n");
|
||
|
||
// Hook a new windw procedure for EDIT1
|
||
|
||
HWND edit2 = GetDlgItem(hwnd,IDC_EDIT1);
|
||
ASSERT(edit2!=NULL);
|
||
if (!SetWindowLongPtr(edit2,GWLP_USERDATA,(LONG_PTR)theConsole))
|
||
{
|
||
LONG err = GetLastError();
|
||
char str[255];
|
||
sprintf(str,"SetWindowLongPtr(edit2) Failed (%X %d)\n",edit2,err);
|
||
OutputDebugString(str);
|
||
}
|
||
|
||
theConsole->OldProc = (WNDPROC)GetWindowLongPtr(edit2,GWLP_WNDPROC);
|
||
if (!SetWindowLongPtr(edit2,GWLP_WNDPROC,(LONG_PTR)EditProc))
|
||
{
|
||
LONG err = GetLastError();
|
||
char str[255];
|
||
sprintf(str,"SetWindowLong(proc) Failed (%X %d)\n",edit2,err);
|
||
OutputDebugString(str);
|
||
}
|
||
SendDlgItemMessage(hwnd,IDC_EDIT2,WM_SETFONT,(WPARAM)theConsole->hFont,TRUE);
|
||
SendDlgItemMessage(hwnd,IDC_EDIT1,WM_SETFONT,(WPARAM)theConsole->hFont,TRUE);
|
||
|
||
|
||
|
||
break;
|
||
}
|
||
|
||
default:
|
||
return FALSE;
|
||
}
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
|
||
|
||
|
||
void CConsole::addLine(const char* buf)
|
||
{
|
||
int lb,i;
|
||
|
||
lb = (int)strlen(buf);
|
||
|
||
// ignore un message qui ne tient pas dans le buffer
|
||
if (lb+16>HIST_DEFAULT_LIMIT)
|
||
return ;
|
||
|
||
|
||
if (HistorySize+lb > (BufferSize-8) )
|
||
HistorySize = 0;
|
||
|
||
strcpy(ConsoleHistory+HistorySize, buf);
|
||
HistorySize += lb;
|
||
|
||
for(i=0;i<lb;i++)
|
||
if (buf[i]=='\n') break;
|
||
if (i==lb){
|
||
// no line break = no nead to refresh
|
||
return ;
|
||
}
|
||
|
||
PostMessage(hWnd,WM_USER,NULL,NULL);
|
||
}
|
||
|
||
void CConsole::refreshLine()
|
||
{
|
||
LONG lcount,CurLine,NbLinesToScroll;
|
||
if (!IsWindow(hWnd)) return ;
|
||
|
||
SendDlgItemMessage(hWnd,IDC_EDIT2,WM_SETTEXT,0,(LPARAM)(LPCSTR)ConsoleHistory);
|
||
|
||
lcount = (LONG)SendDlgItemMessage(hWnd,IDC_EDIT2,EM_GETLINECOUNT,0,0);
|
||
if( lcount > 1 )
|
||
{
|
||
CurLine = (int)SendDlgItemMessage(hWnd,IDC_EDIT2, EM_GETFIRSTVISIBLELINE, 0, 0 );
|
||
if( CurLine > lcount )
|
||
CurLine = lcount;
|
||
NbLinesToScroll = lcount - CurLine - kNbVisibleLinesInEditCtrl;
|
||
|
||
if( NbLinesToScroll < 0 )
|
||
NbLinesToScroll = 0;
|
||
|
||
SendDlgItemMessage(hWnd,IDC_EDIT2, EM_LINESCROLL, 0, NbLinesToScroll );
|
||
}
|
||
}
|
||
|
||
void CConsole::shutConsole(HWND _hWndParent)
|
||
{
|
||
|
||
// if (_hWndParent!=hWndParent) return ;
|
||
|
||
OutputDebugString("shutConsole\n");
|
||
|
||
if (IsWindow(hWnd))
|
||
{
|
||
DestroyWindow(hWnd);
|
||
hWnd=NULL;
|
||
}
|
||
|
||
|
||
}
|
||
|
||
|
||
CConsole::CConsole()
|
||
{
|
||
|
||
mod = LoadLibrary("riched20.dll");
|
||
// CEmulator::theEmulator->theConsole=this;
|
||
hWnd = NULL;
|
||
enable = 0;
|
||
}
|
||
|
||
CConsole::~CConsole()
|
||
{
|
||
FreeLibrary(mod);
|
||
// CEmulator::theEmulator->theConsole=NULL;
|
||
|
||
}
|
||
|
||
void CConsole::initConsole(HINSTANCE _hInst,HWND _hWndParent)
|
||
{
|
||
|
||
if (hWnd)
|
||
{
|
||
outputInfo("Console already running\n");
|
||
return ; // Already running
|
||
}
|
||
|
||
hWndParent = _hWndParent;
|
||
|
||
//theConsole=this;
|
||
HistorySize = 0;
|
||
visible=0;
|
||
kNbVisibleLinesInEditCtrl = 23;
|
||
BufferSize = HIST_DEFAULT_LIMIT;
|
||
inputBuffer[0]=0;
|
||
|
||
|
||
// console
|
||
// __asm int 3;
|
||
OutputDebugString("createConsole\n");
|
||
|
||
hWnd = CreateDialogParam(_hInst, MAKEINTRESOURCE(IDD_CONSOLE), _hWndParent, ConsoleProc,(LPARAM)this);
|
||
if (!hWnd)
|
||
{
|
||
outputInfo("createConsole failed... %d (%X)\n",GetLastError(),_hInst);
|
||
// theConsole=NULL;
|
||
return ;
|
||
}
|
||
|
||
SendDlgItemMessage(hWnd,IDC_EDIT2, EM_EXLIMITTEXT, (WPARAM)HIST_DEFAULT_LIMIT, 0);
|
||
|
||
|
||
return ;
|
||
}
|
||
|
||
|
||
void CConsole::toggleConsole()
|
||
{
|
||
outputInfo("toggleConsole\n");
|
||
|
||
if (!visible)
|
||
showConsole();
|
||
else
|
||
hideConsole();
|
||
|
||
}
|
||
|
||
|
||
|
||
int CConsole::read(char* buf)
|
||
{
|
||
int l;
|
||
|
||
if (!enable) enableConsole();
|
||
|
||
while(!inputBuffer[0] && IsWindow(hWnd))
|
||
{
|
||
Sleep(100);
|
||
if (r_sim65816.should_emulator_terminate())
|
||
break;
|
||
}
|
||
|
||
strcpy(buf,inputBuffer);
|
||
l = strlen(buf);
|
||
if (l)
|
||
buf[l++]=0x0A;
|
||
buf[l]=0;
|
||
inputBuffer[0]=0;
|
||
return l;
|
||
}
|
||
|
||
void CConsole::enableConsole()
|
||
{
|
||
EnableWindow(GetDlgItem(hWnd,IDC_EDIT1),TRUE);
|
||
enable=1;
|
||
inputBuffer[0]=0; // clear previous commands
|
||
if (!visible)
|
||
showConsole();
|
||
}
|
||
|
||
void CConsole::disableConsole()
|
||
{
|
||
|
||
EnableWindow(GetDlgItem(hWnd,IDC_EDIT1),FALSE);
|
||
enable=0;
|
||
}
|
||
|
||
|