1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
|
/*************************************************************************
*
* $RCSfile: testapp.hxx,v $
*
* $Revision: 1.2 $
*
* last change: $Author: mh $ $Date: 2002-11-18 17:33:37 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
*
* - GNU Lesser General Public License Version 2.1
* - Sun Industry Standards Source License Version 1.1
*
* Sun Microsystems Inc., October, 2002
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2002 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
*
* Sun Industry Standards Source License Version 1.1
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.1 (the "License"); You may not use this file
* except in compliance with the License. You may obtain a copy of the
* License at http://www.openoffice.org/license.html.
*
* Software provided under this License is provided on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
*
* Copyright: 2002 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
* Contributor(s): _______________________________________
*
*
************************************************************************/
#ifndef TESTAPP_HXX
#define TESTAPP_HXX
#include <basic/sbmod.hxx>
#ifndef _BASIC_TESTTOOL_HXX_
#include <basic/testtool.hxx>
#endif
class CommunicationLink;
class CommunicationManager;
class CNames;
class ControlItemUId;
class CRevNames;
//class SbxTransportVariableRef;
class ControlsRef;
class CmdStream;
class FloatingLoadConf;
class TestToolObj;
class ControlDef;
class SbxTransportMethod;
class Application;
class SotStorage;
class ImplTestToolObj;
class MyBasic;
class ErrorEntry
{
public:
ErrorEntry(ULONG nNr, String aStr = String()) : nError(nNr),aText(aStr),nLine(0),nCol1(0),nCol2(0) {}
ErrorEntry(ULONG nNr, String aStr, xub_StrLen l, xub_StrLen c1, xub_StrLen c2 )
: nError(nNr),aText(aStr),nLine(l),nCol1(c1),nCol2(c2) {}
String aText;
ULONG nError;
xub_StrLen nLine;
xub_StrLen nCol1;
xub_StrLen nCol2;
};
SV_DECL_PTRARR_DEL(CErrors, ErrorEntry*, 1, 1)
struct ControlDefLoad {
char* Kurzname;
ULONG nUId;
};
class TestToolObj: public SbxObject
{
friend class TTBasic;
friend class Controls;
public:
TestToolObj( String aName, String aFilePath ); // Alle Dateien in FilePath, Kein IPC
TestToolObj( String aName, MyBasic* pBas ); // Pfade aus INI, IPC benutzen
~TestToolObj();
void LoadIniFile(); // Laden der IniEinstellungen, die durch den ConfigDialog geändert werden können
private:
BOOL bWasPrecompilerError; // True wenn beim letzten Precompile ein Fehler auftrat
BOOL CError( ULONG, const String&, xub_StrLen, xub_StrLen, xub_StrLen );
void CalcPosition( String const &aSource, xub_StrLen nPos, xub_StrLen &l, xub_StrLen &c );
xub_StrLen ImplSearch( const String &aSource, const xub_StrLen nStart, const xub_StrLen nEnd, const String &aSearch, const xub_StrLen nSearchStart = 0 );
xub_StrLen PreCompilePart( String &aSource, xub_StrLen nStart, xub_StrLen nEnd, String aFinalErrorLabel, USHORT &nLabelCount );
void PreCompileDispatchParts( String &aSource, String aStart, String aEnd, String aFinalLable );
public:
String PreCompile(String const &aSourceIn); // try catch; testcase endcase ..
BOOL WasPrecompilerError(); // True wenn beim letzten Precompile ein Fehler auftrat
void SFX_NOTIFY( SfxBroadcaster&, const TypeId&, const SfxHint& rHint, const TypeId& );
virtual SbxVariable* Find( const String&, SbxClassType );
// String aKeyPlusClasses; // Pfad für keycodes & classes & res_type (Aus Configdatei)
DECL_LINK( ReturnResultsLink, CommunicationLink* );
BOOL ReturnResults( SvStream *pIn ); // Rücklieferung des Antwortstreams über IPC oder TCP/IP oder direkt
void SetLogHdl( const Link& rLink ) { aLogHdl = rLink; }
const Link& GetLogHdl() const { return aLogHdl; }
void SetWinInfoHdl( const Link& rLink ) { aWinInfoHdl = rLink; }
const Link& GetWinInfoHdl() const { return aWinInfoHdl; }
void SetModuleWinExistsHdl( const Link& rLink ) { aModuleWinExistsHdl = rLink; }
const Link& GetModuleWinExistsHdl() const { return aModuleWinExistsHdl; }
void SetCErrorHdl( const Link& rLink ) { aCErrorHdl = rLink; }
const Link& GetCErrorHdl() const { return aCErrorHdl; }
void SetWriteStringHdl( const Link& rLink ) { aWriteStringHdl = rLink; }
const Link& GetWriteStringHdl() const { return aWriteStringHdl; }
SfxBroadcaster& GetTTBroadcaster();
private:
ImplTestToolObj *pImpl; // Alles was von der Implementation abhängt
CErrors* const GetFehlerListe() { return pFehlerListe; }
BOOL bQuietErrors; // Wenn Control in pControls nicht gefunden kein Programmabbruch
BOOL bUseIPC;
Link aLogHdl; // Zum Logen der Fehlermeldungen im Testtool
Link aWinInfoHdl; // Anzeigen der Windows/Controls der zu testenden App
Link aModuleWinExistsHdl; // Prüft ob das Modul schon im Editor geladen ist
Link aCErrorHdl; // Melden von Compilererror
Link aWriteStringHdl; // Schreiben von text (e.g. MakroRecorder)
CErrors *pFehlerListe; // Hier werden die Fehler des Testtools gespeichert
BOOL bReturnOK; // Bricht WaitForAnswer ab
CRevNames *pShortNames; // Aktuell verwendete Controls, zur gewinnung des Namens aus Fehlermeldung
ULONG nSequence; // Sequence um Antwort und Anfrage zu syncronisieren
TTUniqueId aNextReturnId; // Id des Returnwertes i.e. UId
void ReplaceNumbers(String &aText); // Zahlen im String mit speziellem Format in Namen umwandeln
String aLastRecordedKontext;// Keeps the last kontext recorded by the Macro Recorder
#define FLAT TRUE
String ProgPath; // Dateiname der zu Testenden APP; Gesetzt über Start
String aLogFileName; // Momentaner Logfilename (Wie Programmdatei aber mit .res)
BOOL IsBlock; // Innerhalb Begin/EndBlock
BOOL SingleCommandBlock; // Implizit um jedes kommando ein Begin/EndBlock
CmdStream *In;
void AddName(String &aBisher, String &aNeu ); // Name eventuell mit / anhängen
void AddToListByNr( CNames *&pControls, ControlItemUId *&pNewItem ); //
CNames *pControls;
CNames *pNameKontext; // Zeigt auf den aktuellen Namenskontext, der über 'Kontext' gesetzt wurde
CNames *pSIds;
CNames *pReverseSlots; // Slots mit Kurznamen nach Nummer
CNames *pReverseControls; // Controls mit Kurznamen nach Nummer
CNames *pReverseControlsSon;// Controls mit Kurznamen nach Nummer nach Fenstern (Son)
CNames *pReverseUIds; // Langnamen nach Nummer
USHORT nMyVar; // Wievielte Var aus Pool ist dran
USHORT nControlsObj;
void InitTestToolObj();
CommunicationManager *pCommunicationManager;
void SendViaSocket();
BOOL Load( String aName, SbModule *pMod );
void ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, BOOL bIsFlat = FALSE );
void ReadFlat( String Filename, CNames *&pNames, BOOL bSortByName );
BOOL ReadNamesBin( String Filename, CNames *&pSIds, CNames *&pControls );
BOOL WriteNamesBin( String Filename, CNames *pSIds, CNames *pControls );
void ReadHidLstByNumber();
void SortControlsByNumber( BOOL bIncludeActive = FALSE );
String GetMethodName( ULONG nMethodId );
String GetKeyName( USHORT nKeyCode );
void WaitForAnswer ();
DECL_LINK( IdleHdl, Application* );
DECL_LINK( CallDialogHandler, Application* );
String aDialogHandlerName;
USHORT nWindowHandlerCallLevel;
USHORT nIdleCount;
// wenn DialogHandler gesetzt wird er im IdleHandler inkrementiert und
// in WaitForAnswer rückgesetzt. Übersteigt er einen gewissen wert, gehe ich davon aus,
// daß WaitForAnswer still ligt und rufe die DialogHander Sub im BASIC auf.
void BeginBlock();
void EndBlock();
SbTextType GetSymbolType( const String &rSymbol, BOOL bWasControl );
static ControlDefLoad const arR_Cmds[];
static CNames *pRCommands;
};
#endif
|
