BOOL far pascal zTextOut( HDC pp1, int pp2, int pp3, LPCSTR pp4, int pp5 )
{
BOOL r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:TextOut HDC+int+int+LPCSTR+int+",
pp1, pp2, pp3, pp4, pp5 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = TextOut(pp1,pp2,pp3,pp4,pp5);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:TextOut BOOL++++++",
r, (short)0, (short)0, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
BOOL far pascal zUnhookWindowsHook( int pp1, FARPROC pp2 )
{
BOOL r;
FARPROC fp ;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:UnhookWindowsHook int+FARPROC+",
pp1, pp2 );
fp = (FARPROC)HookFind( (void far *)pp2 ) ;
if ( fp == NULL ) { /* Unhooking an unknown hook type */
fp = pp2;
}
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = UnhookWindowsHook(pp1,fp);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:UnhookWindowsHook BOOL+++",
r, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zEnumObjects( HDC pp1, int pp2, FARPROC pp3, LPSTR pp4 )
{
int r;
FARPROC fp ;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:EnumObjects HDC+int+FARPROC+LPSTR+",
pp1, pp2, pp3, pp4 );
if( pp2 == OBJ_PEN )
fp = (FARPROC)HookAdd( (void far *)EnumPens, (void far *)pp3 ) ;
else
fp = (FARPROC)HookAdd( (void far *)EnumBrushes, (void far *)pp3 ) ;
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = EnumObjects(pp1,pp2,fp,pp4);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:EnumObjects int+++++",
r, (short)0, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
BOOL far pascal zExtTextOut( HDC pp1, int pp2, int pp3, WORD pp4, LPRECT pp5, LPSTR pp6, WORD pp7, LPINT pp8 )
{
BOOL r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:ExtTextOut HDC+int+int+WORD+LPRECT+LPSTR+WORD+ARRAYINT+",
pp1, pp2, pp3, pp4, pp5, pp6, pp7, pp8, pp7 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = ExtTextOut(pp1,pp2,pp3,pp4,pp5,pp6,pp7,pp8);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:ExtTextOut BOOL+++++++++",
r, (short)0, (short)0, (short)0, (short)0, (short)0, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int FAR PASCAL DlgMesgProc(
HWND hWnd,
WORD wMsg,
WORD wParam,
LONG lParam,
FARPROC fp,
WORD AX
) {
int i;
SaveRegs() ;
LogIn( (LPSTR)"MSGCALL:FARPROC+HWND+MSGNUM+WORD+LONG+",
fp, hWnd, wMsg, wParam, lParam );
RestoreRegs() ;
GrovelDS();
i = HookCall( hWnd, wMsg, wParam, lParam, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"MSGRET:LONG+FARPROC+MSGNUM+WORD+LONG+",
(LONG)i, fp, hWnd, wMsg, wParam, lParam );
RestoreRegs() ;
return( i );
}
WORD far pascal zSetTimer( HWND pp1, int pp2, WORD pp3, FARPROC pp4 )
{
WORD r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetTimer HWND+int+WORD+FARPROC+",
pp1, pp2, pp3, pp4 );
if ( pp4 != NULL ) {
pp4 = (FARPROC) HookAdd( (void far *)TimerRtn, (void far *)pp4 );
}
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetTimer(pp1,pp2,pp3,pp4);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetTimer WORD+++++",
r, (short)0, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
void far pascal zSetKeyboardState( BYTE far* pp1 )
{
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetKeyboardState FixedString+",
pp1, (DWORD) 256 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
SetKeyboardState(pp1);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetKeyboardState +",
(short)0 );
RestoreRegs();
return;
}
UINT far* far pascal zSetCommEventMask( int pp1, UINT pp2 )
{
UINT far* r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetCommEventMask int+UINT+",
pp1, pp2 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetCommEventMask(pp1,pp2);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetCommEventMask UINT far*+++",
r, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zSetCommState( DCB far* pp1 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetCommState DCB far*+",
pp1 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetCommState(pp1);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetCommState int++",
r, (short)0 );
RestoreRegs();
return( r );
}
LogInDialog::LogInDialog(QWidget *parent) :
QDialog(parent),
ui(new Ui::LogInDialog)
{
ui->setupUi(this);
NetManager::GetInstance().DummyInit();
QObject::connect(&NetManager::GetInstance(), SIGNAL(sigServerConnected()),
this, SLOT(ServerConnected()));
QObject::connect(&NetManager::GetInstance(), SIGNAL(sigServerError(QString)),
this, SLOT(ServerError(QString)));
QObject::connect(&NetManager::GetInstance(), SIGNAL(sigLogInOK()),
this, SLOT(WhenLogInOK()));
QObject::connect(&NetManager::GetInstance(), SIGNAL(sigLogInFAIL(QString)),
this, SLOT(WhenlogInFAIL(QString)));
QObject::connect(ui->btnClose, SIGNAL(clicked()), this, SLOT( ExitNow()));
QObject::connect(ui->btnLogin, SIGNAL(clicked()), this, SLOT(LogIn()));
QObject::connect(ui->btnRegister, SIGNAL(clicked()), this, SLOT(RegisterUser()));
ui->progressMsg->setStyleSheet("QLabel { color : red; }");
//init state disable
ui->btnLogin->setEnabled(false);
ui->btnRegister->setEnabled(false);
ui->UserPasswdInput->setEchoMode(QLineEdit::Password);
}
int far pascal zOpenComm( LPCSTR pp1, UINT pp2, UINT pp3 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:OpenComm LPCSTR+UINT+UINT+",
pp1, pp2, pp3 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = OpenComm(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:OpenComm int++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
DWORD far pascal zGetTextExtent( HDC pp1, LPCSTR pp2, int pp3 )
{
DWORD r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:GetTextExtent HDC+LPCSTR+int+",
pp1, pp2, pp3 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = GetTextExtent(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:GetTextExtent DWORD++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
UINT far pascal zGetTextAlign( HDC pp1 )
{
UINT r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:GetTextAlign HDC+",
pp1 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = GetTextAlign(pp1);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:GetTextAlign UINT++",
r, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zGetTextCharacterExtra( HDC pp1 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:GetTextCharacterExtra HDC+",
pp1 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = GetTextCharacterExtra(pp1);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:GetTextCharacterExtra int++",
r, (short)0 );
RestoreRegs();
return( r );
}
long far pascal zSetWindowLong( HWND pp1, int pp2, long pp3 )
{
long r;
long l;
FARPROC fp ;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetWindowLong HWND+int+long+",
pp1, pp2, pp3 );
if( pp2 == GWL_WNDPROC ) {
pp3 = (long)((FARPROC)HookAdd( (void far *)MesgProc, (void far *)pp3 ));
}
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetWindowLong(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetWindowLong long++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zUngetCommChar( int pp1, char pp2 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:UngetCommChar int+char+",
pp1, pp2 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = UngetCommChar(pp1,pp2);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:UngetCommChar int+++",
r, (short)0, (short)0 );
RestoreRegs();
return( r );
}
/*
** TIMER STUFF
**
*/
WORD FAR PASCAL TimerRtn(
HWND hwnd,
WORD uMsg,
int nId,
DWORD dwTime,
FARPROC fp,
WORD AX )
{
WORD rc;
SaveRegs() ;
LogIn( (LPSTR)"TIMECALL:SetTimer FARPROC+HWND+WORD+int+DWORD+",
fp, hwnd, uMsg, nId, dwTime ) ;
RestoreRegs() ;
GrovelDS();
rc = HookCall( hwnd, uMsg, nId, dwTime, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"TIMERET:SetTimer WORD+FARPROC+HWND+WORD+int+DWORD+",
rc, fp, hwnd, uMsg, nId, dwTime ) ;
RestoreRegs() ;
return( rc );
}
int far pascal zWriteComm( int pp1, void far* pp2, int pp3 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:WriteComm int+FineString+",
pp1, (LPSTR) pp2, (int) pp3 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = WriteComm(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:WriteComm int++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
long far pascal zSetBitmapBits( HBITMAP pp1, DWORD pp2, LPSTR pp3 )
{
long r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetBitmapBits HBITMAP+DWORD+FixedString+",
pp1, pp2, pp3, pp2 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetBitmapBits(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetBitmapBits long++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zClearCommBreak( int pp1 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:ClearCommBreak int+",
pp1 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = ClearCommBreak(pp1);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:ClearCommBreak int++",
r, (short)0 );
RestoreRegs();
return( r );
}
BOOL far pascal zGetCharWidth( HDC pp1, UINT pp2, UINT pp3, LPINT pp4 )
{
BOOL r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:GetCharWidth HDC+UINT+UINT++",
pp1, pp2, pp3, (short)0 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = GetCharWidth(pp1,pp2,pp3,pp4);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:GetCharWidth BOOL++++ARRAYINT+",
r, (short)0, (short)0, (short)0, pp4, 1 + pp3 - pp2 );
RestoreRegs();
return( r );
}
int far pascal zBuildCommDCB( LPCSTR pp1, DCB far* pp2 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:BuildCommDCB ++",
(short)0, (short)0 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = BuildCommDCB(pp1,pp2);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:BuildCommDCB int+LPCSTR+DCB far*+",
r, pp1, pp2 );
RestoreRegs();
return( r );
}
HDC far pascal zResetDC(HDC pp1, LPSTR pp2)
{
HDC r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:ResetDC HDC+LPDEVMODE+",
pp1, pp2 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = ResetDC(pp1,pp2);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:ResetDC HDC+++",
r, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int far pascal zFlushComm( int pp1, int pp2 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:FlushComm int+int+",
pp1, pp2 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = FlushComm(pp1,pp2);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:FlushComm int+++",
r, (short)0, (short)0 );
RestoreRegs();
return( r );
}
LONG FAR PASCAL WH_DEBUGHook(
int nCode,
WORD wParam,
LONG lParam,
FARPROC fp,
WORD AX )
{
LONG l;
SaveRegs() ;
LogIn( (LPSTR)"HOOKCALL:WH_DEBUG FARPROC+int+WORD+LONG+",
fp, nCode, wParam, lParam );
RestoreRegs() ;
GrovelDS();
l = HookCall( nCode, wParam, lParam, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"HOOKRET:WH_DEBUG LONG+FARPROC+int+WORD+LONG+",
l, fp, nCode, wParam, lParam );
RestoreRegs() ;
return( l );
}
BOOL FAR PASCAL EnumTaskWin(
HWND hwnd,
DWORD lParam,
FARPROC fp,
WORD AX )
{
BOOL l;
SaveRegs() ;
LogIn( (LPSTR)"ENUMCALL:EnumTaskWindows FARPROC+HWND+DWORD+",
fp, hwnd, lParam ) ;
RestoreRegs() ;
GrovelDS();
l = HookCall( hwnd, lParam, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"ENUMRET:EnumTaskWindows BOOL+FARPROC+HWND+DWORD+",
l, fp, hwnd, lParam ) ;
RestoreRegs() ;
return( l );
}
int FAR PASCAL EnumBrushes(
char FAR *lpLogObject,
char FAR *lpData,
FARPROC fp,
WORD AX )
{
int l;
SaveRegs() ;
LogIn( (LPSTR)"ENUMCALL:EnumObjects(BRUSH) FARPROC+LPLOGPEN+LPSTR+",
fp, lpLogObject, lpData ) ;
RestoreRegs() ;
GrovelDS();
l = HookCall( lpLogObject, lpData, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"ENUMRET:EnumObjects(BRUSH) int+FARPROC+LPLOGPEN+LPSTR+",
l, fp, lpLogObject, lpData ) ;
RestoreRegs() ;
return( l );
}
BOOL far pascal zEnumTaskWindows( HANDLE pp1, FARPROC pp2, long pp3 )
{
BOOL r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:EnumTaskWindows HANDLE+FARPROC+long+",
pp1, pp2, pp3 );
pp2 = (FARPROC) HookAdd( (void far *)EnumTaskWin, (void far *)pp2 ) ;
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = EnumTaskWindows(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:EnumTaskWindows BOOL++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
int FAR PASCAL FamilyCounter(
char FAR *lpLogFont,
char FAR *lpTextMetrics,
short nFontType,
char FAR *lpData,
FARPROC fp,
WORD AX )
{
int l;
SaveRegs() ;
LogIn( (LPSTR)"ENUMCALL:EnumFontFamilies FARPROC+LPLOGFONT+LPTEXTMETRIC+int+DWORD+",
fp, lpLogFont, lpTextMetrics, nFontType, lpData ) ;
RestoreRegs() ;
GrovelDS();
l = HookCall( lpLogFont, lpTextMetrics, nFontType, lpData, fp, AX );
UnGrovelDS();
SaveRegs() ;
LogOut( (LPSTR)"ENUMRET:EnumFontFamilies int+FARPROC+LPLOGFONT+LPTEXTMETRIC+int+DWORD+",
l, fp, lpLogFont, lpTextMetrics, nFontType, lpData ) ;
RestoreRegs() ;
return( l );
}
int far pascal zSetTextJustification( HDC pp1, int pp2, int pp3 )
{
int r;
SaveRegs();
/*
** Log IN Parameters (No Create/Destroy Checking Yet!)
*/
LogIn( (LPSTR)"APICALL:SetTextJustification HDC+int+int+",
pp1, pp2, pp3 );
/*
** Call the API!
*/
RestoreRegs();
GrovelDS();
r = SetTextJustification(pp1,pp2,pp3);
UnGrovelDS();
SaveRegs();
/*
** Log Return Code & OUT Parameters (No Create/Destroy Checking Yet!)
*/
LogOut( (LPSTR)"APIRET:SetTextJustification int++++",
r, (short)0, (short)0, (short)0 );
RestoreRegs();
return( r );
}
