diff options
Diffstat (limited to 'automation/source/testtool')
-rw-r--r-- | automation/source/testtool/cmdstrm.cxx | 36 | ||||
-rw-r--r-- | automation/source/testtool/cmdstrm.hxx | 4 | ||||
-rw-r--r-- | automation/source/testtool/comm_bas.cxx | 192 | ||||
-rw-r--r-- | automation/source/testtool/comm_bas.hxx | 36 | ||||
-rw-r--r-- | automation/source/testtool/httprequest.cxx | 2 | ||||
-rw-r--r-- | automation/source/testtool/objtest.cxx | 225 | ||||
-rw-r--r-- | automation/source/testtool/objtest.hxx | 25 | ||||
-rw-r--r-- | automation/source/testtool/tcommuni.cxx | 6 |
8 files changed, 259 insertions, 267 deletions
diff --git a/automation/source/testtool/cmdstrm.cxx b/automation/source/testtool/cmdstrm.cxx index 0e7adc9989ef..023fc4c1e522 100644 --- a/automation/source/testtool/cmdstrm.cxx +++ b/automation/source/testtool/cmdstrm.cxx @@ -90,7 +90,7 @@ String CmdStream::WandleKeyEventString( String aKeys ) if ( nPos2 != STRING_NOTFOUND ) { String Work = aKeys.Copy(nPos1+1,nPos2-nPos1+1-2); - aKeys.Erase(nPos1,nPos2-nPos1+1); // Inclusive Spitze Klammern weg + aKeys.Erase(nPos1,nPos2-nPos1+1); // includes removing <>'s String Result, Token; sal_uInt16 nModify = 0; while ( Work.Len() > 0 ) @@ -182,7 +182,7 @@ void CmdStream::WriteSortedParams( SbxArray* rPar, sal_Bool IsKeyString ) { switch (rPar->Get( i )->GetType()) { - case SbxLONG: // alles immer als Short �bertragen + case SbxLONG: // always pass everything as Short case SbxULONG: case SbxSALINT64: case SbxSALUINT64: @@ -321,15 +321,15 @@ void CmdStream::GenCmdSlot( sal_uInt16 nNr, SbxArray* rPar ) Write(nNr); if (rPar) { - sal_uInt16 nAnz = (rPar->Count()-1) >> 1; // Geteilt durch 2 + sal_uInt16 nAnz = (rPar->Count()-1) >> 1; Write(nAnz); sal_Bool bWriteUnoSlot = rPar->Get( 1 )->GetType() == SbxSTRING; for (sal_uInt16 n = 1 ; n <= nAnz ; n++) { - /// #59513# nicht mehr ben�tigt + /// #59513# not necessary anymore // sal_uLong nUserData = rPar->Get( 2*n-1 )->GetUserData(); -// rPar->Get( 2*n-1 )->SetUserData(ID_DoNothing); // Verhindert Ausf�hrung der Slots, die als Parameter �bergeben sind. +// rPar->Get( 2*n-1 )->SetUserData(ID_DoNothing); // prevents execution of the slots that are passed as parameters if ( bWriteUnoSlot ) Write(rPar->Get( 2*n-1 )->GetString()); @@ -360,7 +360,7 @@ void CmdStream::GenCmdSlot( sal_uInt16 nNr, SbxArray* rPar ) case SbxCHAR: if ( !bWriteUnoSlot ) Write( (sal_uInt16)BinString); - Write((String)rPar->Get( 2*n )->GetString()); // Cast f�r OS/2 + Write((String)rPar->Get( 2*n )->GetString()); // Cast for OS/2 break; case SbxBOOL: if ( !bWriteUnoSlot ) @@ -383,20 +383,20 @@ void CmdStream::GenCmdSlot( sal_uInt16 nNr, SbxArray* rPar ) void CmdStream::GenCmdUNOSlot( const String &aURL ) { Write( sal_uInt16(SIUnoSlot) ); -/* Write( sal_uInt16(0) ); // Hier wird im Office die SID_OPENURL Eingetragen. - // Dies mu� nat�rlich im Office hart verdratet werden und nicht hier, - // da sich die ID ja mal �ndern kann. +/* Write( sal_uInt16(0) ); // The SID_OPENURL is entered here. + // That must be wired hard in the Office and not here of course + // as the ID might change - // Da auch die ID f�r das PoolItem im Office entnommen werden mu� hier also kein PoolItem - // gesendet werden. + // Because the ID must also be taken for the PoolItem from the Office, it is not + // necessary to send a PoolItem here. - Write( sal_uInt16(0) ); // Anzahl PoolItems + Write( sal_uInt16(0) ); // number of PoolItems - // Stattdessen wird noch eine extra String gesendet, der dann Officeseitig in ein - // SfxStringItem mit entsprechender ID gewandelt wird. - Write( aURL ); // String f�r das PoolItem*/ + // instead there's an extra string sent by the Office which is changed to an + // SfxStringItem with the respective ID + Write( aURL ); // String for the PoolItem*/ - Write( aURL ); // Die UNO URL eben + Write( aURL ); // UNO URL } void CmdStream::GenCmdControl( comm_UINT32 nUId, sal_uInt16 nMethodId, SbxArray* rPar ) @@ -419,14 +419,14 @@ void CmdStream::GenCmdFlow( sal_uInt16 nArt ) { Write(sal_uInt16(SIFlow)); Write(nArt); - Write(sal_uInt16(PARAM_NONE)); // Typ der folgenden Parameter + Write(sal_uInt16(PARAM_NONE)); // type of the following parameters } void CmdStream::GenCmdFlow( sal_uInt16 nArt, comm_UINT32 nNr1 ) { Write(sal_uInt16(SIFlow)); Write(nArt); - Write(sal_uInt16(PARAM_UINT32_1)); // Typ der folgenden Parameter + Write(sal_uInt16(PARAM_UINT32_1)); // type of the following parameters Write(nNr1); } diff --git a/automation/source/testtool/cmdstrm.hxx b/automation/source/testtool/cmdstrm.hxx index 5dac92d4c03f..7b8afef71f53 100644 --- a/automation/source/testtool/cmdstrm.hxx +++ b/automation/source/testtool/cmdstrm.hxx @@ -57,11 +57,11 @@ public: SvMemoryStream* GetStream(); - static CNames *pKeyCodes; // Namen der Sondertasten MOD1, F1, LEFT ... + static CNames *pKeyCodes; // names of special keys MOD1, F1, LEFT ... static ControlDefLoad const arKeyCodes []; private: - String WandleKeyEventString( String aKeys ); // Nutzt pKeyCodes. <RETURN> <SHIFT LEFT LEFT> + String WandleKeyEventString( String aKeys ); // uses pKeyCodes. <RETURN> <SHIFT LEFT LEFT> using CmdBaseStream::Write; void Write( comm_UINT16 nNr ){CmdBaseStream::Write( nNr );} diff --git a/automation/source/testtool/comm_bas.cxx b/automation/source/testtool/comm_bas.cxx index 7c42d225987e..5c75d1bf73b9 100644 --- a/automation/source/testtool/comm_bas.cxx +++ b/automation/source/testtool/comm_bas.cxx @@ -38,80 +38,80 @@ #include <automation/communi.hxx> #include <basic/ttstrhlp.hxx> -// Der CommunicationManager hat folgende Elemente: +// The CommunicationManager consists of the following elements: // 1) Properties: -// Keine -// 2) Methoden: +// none +// 2) Methods: // CommunicationLink StartCommunication( Host, Port ) -// StopAllCommunication // Alle Kommunikation wird abgebrochen -// sal_Bool IsCommunicationRunning // Luft noch irgendwas -// String GetMyName Der eigene Name -// sal_Bool IsLinkValid( CommunicationLink ) // Ist dieser Link noch gltig -// SetCommunicationEventHandler( String ) // Diese Funktion wird aufgerufen bei jedem Event +// StopAllCommunication +// sal_Bool IsCommunicationRunning +// String GetMyName +// sal_Bool IsLinkValid( CommunicationLink ) +// SetCommunicationEventHandler( String ) -// Der CommunicationLink hat folgende Elemente: +// The CommunicationLink consists of the following elements: // 1) Properties: -// Keine -// 2) Methoden: -// StopCommunication Die Kommunikation wird abgebrochen -// String GetMyName Der eigene Name -// String GetHostName Der Name des Anderen -// Send(String ) String an den Partner schicken -// String GetString Ergebnis des letzten Empfangs +// none +// 2) Methods: +// StopCommunication +// String GetMyName +// String GetHostName +// Send( String ) +// String GetString -// Diese Implementation ist ein Beispiel fuer eine tabellengesteuerte -// Version, die sehr viele Elemente enthalten kann. Die Elemente werden -// je nach Bedarf aus der Tabelle in das Objekt uebernommen. +// This implementation is an example for a table-controlled +// version that can contain a lot of elements. The elements are +// taken from the table to the object when needed. -// Das nArgs-Feld eines Tabelleneintrags ist wie folgt verschluesselt: +// The nArgs-field of a table entry is encrypted as follows: -#define _ARGSMASK 0x00FF // Bis zu 255 Argumente -#define _RWMASK 0x0F00 // Maske fuer R/W-Bits -#define _TYPEMASK 0xF000 // Maske fuer den Typ des Eintrags +#define _ARGSMASK 0x00FF // up to 255 arguments +#define _RWMASK 0x0F00 // mask for R/W-Bits +#define _TYPEMASK 0xF000 // mask for the entry type -#define _READ 0x0100 // kann gelesen werden -#define _BWRITE 0x0200 // kann as Lvalue verwendet werden -#define _LVALUE _BWRITE // kann as Lvalue verwendet werden -#define _READWRITE 0x0300 // beides -#define _OPT 0x0400 // TRUE: optionaler Parameter -#define _METHOD 0x1000 // Masken-Bit fuer eine Methode -#define _PROPERTY 0x2000 // Masken-Bit fuer eine Property -#define _COLL 0x4000 // Masken-Bit fuer eine Collection - // Kombination von oberen Bits: -#define _FUNCTION 0x1100 // Maske fuer Function -#define _LFUNCTION 0x1300 // Maske fuer Function, die auch als Lvalue geht -#define _ROPROP 0x2100 // Maske Read Only-Property -#define _WOPROP 0x2200 // Maske Write Only-Property -#define _RWPROP 0x2300 // Maske Read/Write-Property -#define _COLLPROP 0x4100 // Maske Read-Collection-Element +#define _READ 0x0100 // can be read +#define _BWRITE 0x0200 // can be used as Lvalue +#define _LVALUE _BWRITE // can be used as Lvalue +#define _READWRITE 0x0300 // both +#define _OPT 0x0400 // TRUE: optional parameter +#define _METHOD 0x1000 // mask bit for a method +#define _PROPERTY 0x2000 // mask bit for a property +#define _COLL 0x4000 // mask bit for a collection + // combination of bits above: +#define _FUNCTION 0x1100 // mask for a function +#define _LFUNCTION 0x1300 // mask for a function, that works as Lvalue too +#define _ROPROP 0x2100 // mask Read Only-Property +#define _WOPROP 0x2200 // mask Write Only-Property +#define _RWPROP 0x2300 // mask Read/Write-Property +#define _COLLPROP 0x4100 // mask Read-Collection-Element -#define COLLNAME "Elements" // Name der Collection, hier mal hart verdrahtet +#define COLLNAME "Elements" // the collection's name, here wired hard CommunicationWrapper::Methods CommunicationWrapper::aManagerMethods[] = { -// Neue Kommunikation aufbauen + { "StartCommunication", SbxEMPTY, &CommunicationWrapper::MStartCommunication, 2 | _FUNCTION }, - // Zwei Named Parameter + { "Host", SbxSTRING, NULL, 0 }, { "Port", SbxLONG, NULL, 0 }, -// Alle Kommunikation wird abgebrochen + { "StopAllCommunication", SbxEMPTY, &CommunicationWrapper::MStopAllCommunication, 0 | _FUNCTION }, -// Luft noch irgendwas + { "IsCommunicationRunning", SbxBOOL, &CommunicationWrapper::MIsCommunicationRunning, 0 | _FUNCTION }, -// Hostname als FQDN erfragen +// as FQDN { "GetMyName", SbxSTRING, &CommunicationWrapper::MGetMyName, 0 | _FUNCTION }, -// Abfragen ob der Link berhaupt noch gltig ist + { "IsLinkValid", SbxBOOL, &CommunicationWrapper::MIsLinkValid, 1 | _FUNCTION }, - // Ein Named Parameter + { "Link", SbxOBJECT, NULL, 0 }, -// Dieser Handler wird dauernd gerufen + { "SetCommunicationEventHandler", SbxEMPTY, &CommunicationWrapper::MSetCommunicationEventHandler, 1 | _FUNCTION }, - // Ein Named Parameter + { "FuncName", SbxSTRING, NULL, 0 }, -{ NULL, SbxNULL, NULL, -1 }}; // Tabellenende +{ NULL, SbxNULL, NULL, -1 }}; // end of the table @@ -119,26 +119,26 @@ CommunicationWrapper::Methods CommunicationWrapper::aManagerMethods[] = { CommunicationWrapper::Methods CommunicationWrapper::aLinkMethods[] = { -// Die Kommunikation wird abgebrochen + { "StopCommunication", SbxEMPTY, &CommunicationWrapper::LStopCommunication, 0 | _FUNCTION }, -// Der eigene Name + { "GetMyName", SbxSTRING, &CommunicationWrapper::LGetMyName, 0 | _FUNCTION }, -// Der Name des Anderen + { "GetHostName", SbxSTRING, &CommunicationWrapper::LGetHostName, 0 | _FUNCTION }, -// String an den Partner schicken + { "Send", SbxEMPTY, &CommunicationWrapper::LSend, 1 | _FUNCTION }, - // Ein Named Parameter + { "SendString", SbxSTRING, NULL, 0 }, -// Ergebnis des letzten Empfangs + { "GetString", SbxSTRING, &CommunicationWrapper::LGetString, 0 | _FUNCTION }, -{ NULL, SbxNULL, NULL, -1 }}; // Tabellenende +{ NULL, SbxNULL, NULL, -1 }}; // end of the table -// Konstruktor fr den Manager +// constructor for the manager CommunicationWrapper::CommunicationWrapper( const String& rClass ) : SbxObject( rClass ) , m_pLink( NULL ) , m_bIsManager( sal_True ) @@ -152,7 +152,7 @@ CommunicationWrapper::CommunicationWrapper( const String& rClass ) : SbxObject( m_pManager->SetDataReceivedHdl( LINK( this, CommunicationWrapper, Data ) ); } -// Konstruktor fr den Link +// constructor for the link CommunicationWrapper::CommunicationWrapper( CommunicationLink *pThisLink ) : SbxObject( CUniString("Link") ) , m_pLink( pThisLink ) , m_bIsManager( sal_False ) @@ -163,7 +163,7 @@ CommunicationWrapper::CommunicationWrapper( CommunicationLink *pThisLink ) : Sbx m_pManager = (CommunicationManagerClientViaSocket*)pThisLink->GetCommunicationManager(); } -// Destruktor +// deconstructor CommunicationWrapper::~CommunicationWrapper() { if ( m_bIsManager ) @@ -171,20 +171,20 @@ CommunicationWrapper::~CommunicationWrapper() } -// Suche nach einem Element: -// Hier wird linear durch die Methodentabelle gegangen, bis eine -// passende Methode gefunden wurde. -// Wenn die Methode/Property nicht gefunden wurde, nur NULL ohne -// Fehlercode zurueckliefern, da so auch eine ganze Chain von -// Objekten nach der Methode/Property befragt werden kann. +// Search for an element: +// Here it goes through the method table until an appropriate one +// has been found. +// If the method/property has not been found, get back only NULL +// without error code because that way a whole chain of objects +// can be asked for the method/property. SbxVariable* CommunicationWrapper::Find( const String& rName, SbxClassType t ) { - // Ist das Element bereits vorhanden? + // Does the element exist already? SbxVariable* pRes = SbxObject::Find( rName, t ); if( !pRes && t != SbxCLASS_OBJECT ) { - // sonst suchen + // look for it if not Methods* p = m_pMethods; short nIndex = 0; sal_Bool bFound = sal_False; @@ -199,7 +199,7 @@ SbxVariable* CommunicationWrapper::Find( const String& rName, SbxClassType t ) } if( bFound ) { - // Args-Felder isolieren: + // isolate args-fields: short nAccess = ( p->nArgs & _RWMASK ) >> 8; short nType = ( p->nArgs & _TYPEMASK ); String aName( p->pName, RTL_TEXTENCODING_ASCII_US ); @@ -209,9 +209,8 @@ SbxVariable* CommunicationWrapper::Find( const String& rName, SbxClassType t ) else if( nType & _METHOD ) eCT = SbxCLASS_METHOD; pRes = Make( aName, eCT, p->eType ); - // Wir setzen den Array-Index + 1, da ja noch andere - // Standard-Properties existieren, die auch aktiviert - // werden muessen. + // We set the array-index + 1, because there are still + // other standard properties existing, which have to be activated. pRes->SetUserData( nIndex + 1 ); pRes->SetFlags( nAccess ); } @@ -219,7 +218,7 @@ SbxVariable* CommunicationWrapper::Find( const String& rName, SbxClassType t ) return pRes; } -// Aktivierung eines Elements oder Anfordern eines Infoblocks +// activation of an element or asking for an infoblock void CommunicationWrapper::SFX_NOTIFY( SfxBroadcaster& rBC, const TypeId& rBCT, const SfxHint& rHint, const TypeId& rHT ) @@ -230,7 +229,7 @@ void CommunicationWrapper::SFX_NOTIFY( SfxBroadcaster& rBC, const TypeId& rBCT, SbxVariable* pVar = pHint->GetVar(); SbxArray* pPar = pVar->GetParameters(); sal_uInt16 nIndex = (sal_uInt16) pVar->GetUserData(); - // kein Index: weiterreichen! + // no index: hand on! if( nIndex ) { sal_uLong t = pHint->GetId(); @@ -243,13 +242,13 @@ void CommunicationWrapper::SFX_NOTIFY( SfxBroadcaster& rBC, const TypeId& rBCT, bWrite = sal_True; if( t == SBX_HINT_DATAWANTED || bWrite ) { - // Parameter-Test fuer Methoden: + // parameter test for methods: sal_uInt16 nPar = m_pMethods[ --nIndex ].nArgs & 0x00FF; - // Element 0 ist der Returnwert + // element 0 is the return value if( ( !pPar && nPar ) || ( pPar && pPar->Count() != nPar+1 ) ) SetError( SbxERR_WRONG_ARGS ); - // Alles klar, man kann den Call ausfuehren + else { (this->*(m_pMethods[ nIndex ].pFunc))( pVar, pPar, bWrite ); @@ -261,13 +260,13 @@ void CommunicationWrapper::SFX_NOTIFY( SfxBroadcaster& rBC, const TypeId& rBCT, } } -// Zusammenbau der Infostruktur fuer einzelne Elemente +// construction of the info-structure for single elements SbxInfo* CommunicationWrapper::GetInfo( short nIdx ) { Methods* p = &m_pMethods[ nIdx ]; - // Wenn mal eine Hilfedatei zur Verfuegung steht: - // SbxInfo* pInfo = new SbxInfo( Hilfedateiname, p->nHelpId ); + // if there's a help-file some time: + // SbxInfo* pInfo = new SbxInfo( helpfilename, p->nHelpId ); SbxInfo* pRetInfo = new SbxInfo; short nPar = p->nArgs & _ARGSMASK; for( short i = 0; i < nPar; i++ ) @@ -285,7 +284,7 @@ SbxInfo* CommunicationWrapper::GetInfo( short nIdx ) //////////////////////////////////////////////////////////////////////////// -// Hilfsmethoden fr den Manager +// help methods for the manager IMPL_LINK( CommunicationWrapper, Open, CommunicationLink*, pLink ) { @@ -322,19 +321,18 @@ void CommunicationWrapper::Events( String aType, CommunicationLink* pLink ) Call( m_aEventHandlerName, pPar ); } else - delete pLink->GetServiceData(); // Stream wegschmeissen um nicht zu blockieren + delete pLink->GetServiceData(); // give away the stream to prevent blocking } //////////////////////////////////////////////////////////////////////////// -// Properties und Methoden legen beim Get (bPut = sal_False) den Returnwert -// im Element 0 des Argv ab; beim Put (bPut = sal_True) wird der Wert aus -// Element 0 gespeichert. +// Properties and methods put down the return value for Get (bPut = sal_False) at +// element 0 of the Argv; for Put (bPut = sal_True) the value from element 0 is saved. -// Die Methoden: +// the methods: -// Manager +// manager void CommunicationWrapper::MStartCommunication( SbxVariable* pVar, SbxArray* pPar, sal_Bool /*bWrite*/ ) { // CommunicationLink StartCommunication( Host, Port ) m_bCatchOpen = sal_True; @@ -351,28 +349,28 @@ void CommunicationWrapper::MStartCommunication( SbxVariable* pVar, SbxArray* pPa } void CommunicationWrapper::MStopAllCommunication( SbxVariable* /*pVar*/, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // StopAllCommunication // Alle Kommunikation wird abgebrochen +{ // StopAllCommunication m_pManager->StopCommunication(); } void CommunicationWrapper::MIsCommunicationRunning( SbxVariable* pVar, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // sal_Bool IsCommunicationRunning // Luft noch irgendwas +{ // sal_Bool IsCommunicationRunning pVar->PutBool( m_pManager->IsCommunicationRunning() ); } void CommunicationWrapper::MGetMyName( SbxVariable* pVar, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // String GetMyName Der eigene Name +{ // String GetMyName pVar->PutString( UniString( m_pManager->GetMyName( CM_FQDN ), RTL_TEXTENCODING_UTF8 ) ); } void CommunicationWrapper::MIsLinkValid( SbxVariable* pVar, SbxArray* pPar, sal_Bool /*bWrite*/ ) -{ // sal_Bool IsLinkValid( CommunicationLink ) // Ist dieser Link noch gltig +{ // sal_Bool IsLinkValid( CommunicationLink ) CommunicationWrapper *pWrapper = (CommunicationWrapper*)(pPar->Get( 1 )->GetObject()); pVar->PutBool( m_pManager->IsLinkValid( pWrapper->GetCommunicationLink() ) ); } void CommunicationWrapper::MSetCommunicationEventHandler( SbxVariable* /*pVar*/, SbxArray* pPar, sal_Bool /*bWrite*/ ) -{ // SetCommunicationEventHandler( String ) // Diese Funktion wird aufgerufen bei jedem Event +{ // SetCommunicationEventHandler( String ) m_aEventHandlerName = pPar->Get( 1 )->GetString(); } @@ -382,22 +380,22 @@ void CommunicationWrapper::MSetCommunicationEventHandler( SbxVariable* /*pVar*/, // Link void CommunicationWrapper::LStopCommunication( SbxVariable* /*pVar*/, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // StopCommunication Die Kommunikation wird abgebrochen +{ // StopCommunication m_pLink->StopCommunication(); } void CommunicationWrapper::LGetMyName( SbxVariable* pVar, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // String GetMyName Der eigene Name +{ // String GetMyName pVar->PutString( UniString( m_pLink->GetMyName( CM_FQDN ), RTL_TEXTENCODING_UTF8 ) ); } void CommunicationWrapper::LGetHostName( SbxVariable* pVar, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // String GetHostName Der Name des Anderen +{ // String GetHostName pVar->PutString( UniString( m_pLink->GetCommunicationPartner( CM_FQDN ), RTL_TEXTENCODING_UTF8 ) ); } void CommunicationWrapper::LSend( SbxVariable* /*pVar*/, SbxArray* pPar, sal_Bool /*bWrite*/ ) -{ // Send(String ) String an den Partner schicken +{ // Send(String ) SvStream *pSendStream = m_pLink->GetBestCommunicationStream(); String aSendString = pPar->Get( 1 )->GetString(); pSendStream->WriteByteString( aSendString, RTL_TEXTENCODING_UTF8 ); @@ -406,7 +404,7 @@ void CommunicationWrapper::LSend( SbxVariable* /*pVar*/, SbxArray* pPar, sal_Boo } void CommunicationWrapper::LGetString( SbxVariable* pVar, SbxArray* /*pPar*/, sal_Bool /*bWrite*/ ) -{ // String GetString Ergebnis des letzten Empfangs +{ // String GetString SvStream *pReceiveStream = m_pLink->GetServiceData(); if ( pReceiveStream ) { @@ -427,8 +425,6 @@ void CommunicationWrapper::LGetString( SbxVariable* pVar, SbxArray* /*pPar*/, sa -// Die Factory legt unser Objekte an. - SbxObject* CommunicationFactory::CreateObject( const String& rClass ) { if( rClass.CompareIgnoreCaseToAscii( "CommunicationManager" ) == COMPARE_EQUAL ) diff --git a/automation/source/testtool/comm_bas.hxx b/automation/source/testtool/comm_bas.hxx index 32da48aed9a2..4b1af375235b 100644 --- a/automation/source/testtool/comm_bas.hxx +++ b/automation/source/testtool/comm_bas.hxx @@ -36,11 +36,10 @@ class CommunicationManagerClientViaSocket; class CommunicationLink; -class CommunicationWrapper : public SbxObject // Einer f�r Manager und Links +class CommunicationWrapper : public SbxObject // one for manager(s) and links { - // Definition eines Tabelleneintrags. Dies wird hier gemacht, - // da dadurch die Methoden und Properties als private deklariert - // werden koennen. + // definition of a table entry. That's done here because the + // methods and properties can be declared private that way. #if defined ( ICC ) || defined ( C50 ) public: #endif @@ -51,17 +50,17 @@ private: #endif struct Methods { - const char* pName; // Name des Eintrags - SbxDataType eType; // Datentyp - pMeth pFunc; // Function Pointer - short nArgs; // Argumente und Flags + const char* pName; + SbxDataType eType; + pMeth pFunc; + short nArgs; }; - static Methods aManagerMethods[]; // Methodentabelle - static Methods aLinkMethods[]; // Methodentabelle - Methods *m_pMethods; // Aktuelle Methodentabelle + static Methods aManagerMethods[]; // method table + static Methods aLinkMethods[]; // method table + Methods *m_pMethods; // current method table - // Methoden - // Manager + // methods + // manager void MStartCommunication( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void MStopAllCommunication( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void MIsCommunicationRunning( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); @@ -69,19 +68,18 @@ private: void MIsLinkValid( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void MSetCommunicationEventHandler( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); - // Link + // link void LStopCommunication( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void LGetMyName( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void LGetHostName( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void LSend( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); void LGetString( SbxVariable* pVar, SbxArray* pPar, sal_Bool bWrite ); - // Interne Member und Methoden + // internal members and methods CommunicationManagerClientViaSocket *m_pManager; CommunicationLink *m_pLink; - sal_Bool m_bIsManager; // Ist es kein Manager, so ist es ein Link + sal_Bool m_bIsManager; - // Kram f�r Manager DECL_LINK( Open, CommunicationLink* ); DECL_LINK( Close, CommunicationLink* ); DECL_LINK( Data, CommunicationLink* ); @@ -91,7 +89,6 @@ private: String m_aEventHandlerName; using SbxVariable::GetInfo; - // Infoblock auffuellen SbxInfo* GetInfo( short nIdx ); // Broadcaster Notification @@ -101,14 +98,13 @@ public: CommunicationWrapper( const String& ); CommunicationWrapper( CommunicationLink *pThisLink ); ~CommunicationWrapper(); - // Suchen eines Elements + virtual SbxVariable* Find( const String&, SbxClassType ); CommunicationLink* GetCommunicationLink() { return m_pLink; } }; -// Die dazugehoerige Factory: class CommunicationFactory : public SbxFactory { diff --git a/automation/source/testtool/httprequest.cxx b/automation/source/testtool/httprequest.cxx index 4ec2f6471c2a..1ff53ad2e625 100644 --- a/automation/source/testtool/httprequest.cxx +++ b/automation/source/testtool/httprequest.cxx @@ -91,7 +91,7 @@ sal_Bool HttpRequest::Execute() } TimeValue aTV; - aTV.Seconds = 10; // Warte 10 Sekunden + aTV.Seconds = 10; // wait for 10 seconds aTV.Nanosec = 0; pOutSocket = new osl::ConnectorSocket(); diff --git a/automation/source/testtool/objtest.cxx b/automation/source/testtool/objtest.cxx index 80de2e226461..bcf93873ae88 100644 --- a/automation/source/testtool/objtest.cxx +++ b/automation/source/testtool/objtest.cxx @@ -106,7 +106,7 @@ CNames *Controls::pClasses = NULL; ControlDefLoad const TestToolObj::arR_Cmds [] = #include "r_cmds.hxx" CNames *TestToolObj::pRCommands = NULL; -CErrors *TestToolObj::pFehlerListe = NULL; // Hier werden die Fehler des Testtools gespeichert +CErrors *TestToolObj::pFehlerListe = NULL; // the errors from the testtool are stored here DBG_NAME( ControlItem ) @@ -285,7 +285,7 @@ SbxTransportMethod::SbxTransportMethod( SbxDataType DT ) } -TestToolObj::TestToolObj( String aName, MyBasic* pBas ) // Aufruf im Testtool +TestToolObj::TestToolObj( String aName, MyBasic* pBas ) // call in the testtool : SbxObject( aName ) , bUseIPC(sal_True) , bReturnOK(sal_True) @@ -317,7 +317,7 @@ TestToolObj::TestToolObj( String aName, MyBasic* pBas ) // Aufruf pCommunicationManager->SetDataReceivedHdl( LINK( this, TestToolObj, ReturnResultsLink )); } -void TestToolObj::LoadIniFile() // Laden der IniEinstellungen, die durch den ConfigDialog ge�ndert werden k�nnen +void TestToolObj::LoadIniFile() { #define GETSET(aVar, KeyName, Dafault) \ { \ @@ -371,7 +371,7 @@ void TestToolObj::LoadIniFile() // Laden der IniEinstellungen, die d aConf.SetGroup("Misc"); String aST; - GETSET( aST, "ServerTimeout", rtl::OString::valueOf(Time(0,0,45).GetTime()) ); // 45 Sekunden Initial + GETSET( aST, "ServerTimeout", rtl::OString::valueOf(Time(0,0,45).GetTime()) ); // 45 seconds initial pImpl->aServerTimeout = Time(sal_uLong(aST.ToInt64())); String aSOSE; @@ -459,7 +459,7 @@ void TestToolObj::LoadIniFile() // Laden der IniEinstellungen, die d pMeth->SetUserData( nID ); \ } -// SetUserData mu� irgendwas sein, sonst wird es im Find rausgefiltert!!! +// SetUserData must be something, it will be filtered out later otherwise!!! #define MAKE_USHORT_CONSTANT(cName, nValue) \ { \ SbxProperty *pVal = new SbxProperty( CUniString( cName) , SbxINTEGER ); \ @@ -472,7 +472,7 @@ void TestToolObj::LoadIniFile() // Laden der IniEinstellungen, die d void TestToolObj::InitTestToolObj() { - pImpl->nNumBorders = 0; // F�r Profiling mit k�stchen + pImpl->nNumBorders = 0; // for profiling with boxes pImpl->nMinRemoteCommandDelay = 0; pImpl->nMaxRemoteCommandDelay = 0; @@ -499,7 +499,7 @@ void TestToolObj::InitTestToolObj() pImpl->pChildEnv = new Environment; if (!pFehlerListe) - pFehlerListe = new CErrors; // Vor allem anderen. Wer weiss, wer alles einen Fehler ausl�st. + pFehlerListe = new CErrors; In = new CmdStream(); @@ -542,19 +542,19 @@ void TestToolObj::InitTestToolObj() MAKE_TT_KEYWORD( "MaybeAddErr", SbxCLASS_METHOD, SbxNULL, ID_MaybeAddErr ); MAKE_TT_KEYWORD( "ClearError", SbxCLASS_METHOD, SbxNULL, ID_ClearError ); MAKE_TT_KEYWORD( "SaveIDs", SbxCLASS_METHOD, SbxBOOL, ID_SaveIDs ); - MAKE_TT_KEYWORD( "AutoExecute", SbxCLASS_PROPERTY, SbxBOOL, ID_AutoExecute ); // Achtung! PROPERTY Also eine Variable + MAKE_TT_KEYWORD( "AutoExecute", SbxCLASS_PROPERTY, SbxBOOL, ID_AutoExecute ); // Attention! PROPERTY therefore a variable MAKE_TT_KEYWORD( "Execute", SbxCLASS_METHOD, SbxNULL, ID_Execute ); MAKE_TT_KEYWORD( "StopOnSyntaxError", SbxCLASS_PROPERTY, SbxBOOL, ID_StopOnSyntaxError ); -/* Dialog Handler werden gebraucht, wenn im internen Testtool ein Dialog - hochgerissen wird. Nach versenden der Remote-Kommandos wird IdleHandler aktiviert. - Er testet, ob das Reschedule zum WaitForAnswer zur�ckkehrt. Bleibt das aus, so - wird erst der RemoteHandler zur�ckgesetzt und dann die Handler-Sub im Basic - gerufen.(Entkoppelt �ber PostUserEvent.) +/* Dialog Handler are needed for dialogues in the internal testtool. + remote commands the IdleHandler is activated. It tests whether the + reschedule returns to WaitForAnswer. If this is not the case, the + RemoteHandler is resetted and then the Handler-Sub is called in the + basic (uncoupled by PostUserEvent). - In returndaten_verarbeiten wird flag f�r ausf�hrung des n�chsten remote-befehls - r�ckgesetzt. Der Handler wird damit auch entwertet. Er gilt also nur f�r den - n�chsten Remotebefehl. + In returndaten_verarbeiten flag after flag is resetted for the execution + of the next remote command. The Handler is devalued too then. + So it counts for the next remote command only. */ MAKE_TT_KEYWORD( "DialogHandler", SbxCLASS_METHOD, SbxNULL, ID_DialogHandler ); @@ -594,7 +594,7 @@ void TestToolObj::InitTestToolObj() MAKE_TT_KEYWORD( "HTTPSetProxy", SbxCLASS_METHOD, SbxNULL, ID_HTTPSetProxy ); // Load the Remote Commands from list - if ( !pRCommands ) // Ist static, wird also nur einmal geladen + if ( !pRCommands ) // is static and called only once therefore ReadFlatArray( arR_Cmds, pRCommands ); sal_uInt16 i; for ( i = 0 ; i < pRCommands->Count() ; i++ ) @@ -612,11 +612,11 @@ void TestToolObj::InitTestToolObj() StartListening( pMeth->GetBroadcaster(), sal_True ); } -// Konstanten f�r SetControlType +// constants for SetControlType MAKE_USHORT_CONSTANT("CTBrowseBox",CONST_CTBrowseBox); MAKE_USHORT_CONSTANT("CTValueSet",CONST_CTValueSet); -// Konstanten f�r das Alignment des gesuchten Splitters +// constants for the alignment of the requested splitter MAKE_USHORT_CONSTANT("AlignLeft",CONST_ALIGN_LEFT); MAKE_USHORT_CONSTANT("AlignTop",CONST_ALIGN_TOP); MAKE_USHORT_CONSTANT("AlignRight",CONST_ALIGN_RIGHT); @@ -693,7 +693,7 @@ TestToolObj::~TestToolObj() if (pFehlerListe) { delete pFehlerListe; - pFehlerListe = NULL; // da pFehlerListe static ist!! + pFehlerListe = NULL; // because pFehlerListe is static!! } if ( pCommunicationManager ) @@ -728,11 +728,11 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s { /******************************************************************************* ** -** Folgende Dateiendungen sind vorhanden +** the following file extensions are available: ** -** hid.lst Langname UId -** *.sid Slot Ids Kurzname Langname Datei ist flach -** *.win Controlname Langname Datei mit *name und +name Notation +** hid.lst long name UId +** *.sid Slot Ids short name long name file is flat +** *.win Controlname long name file with *name and +name notation ** ** *******************************************************************************/ @@ -746,7 +746,7 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s ControlDef *pNewDef, *pNewDef2; ControlDef *pFatherDef = NULL; - nLineNr = 0; // Wir sind ja noch vor der Datei + nLineNr = 0; if (! pUIds) { @@ -857,7 +857,7 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s } sal_Bool bMozillaName = ( !bIsFlat && aLongname.Copy( 0, 4 ).EqualsIgnoreCaseAscii( ".moz" ) ); - if ( aShortname.GetChar(0) == '+' ) // Kompletten Eintrag kopieren + if ( aShortname.GetChar(0) == '+' ) // copy complete entry { aShortname.Erase(0,1); ControlDef WhatName(aLongname,rtl::OString()); @@ -896,7 +896,7 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s else #endif if ( !bUnoName && !bMozillaName ) - { // Bestimmen der ID aus der Hid.Lst + { // get the ID from the Hid.Lst ControlDef WhatName(aLongname,rtl::OString()); if (pUIds->Seek_Entry(&WhatName,&nElement)) aUId = pUIds->GetObject(nElement)->pData->aUId; @@ -923,7 +923,7 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s - if (aShortname.GetChar(0) == '*' || bIsFlat) // Globaler Kurzname (Dialogname oder SId) + if (aShortname.GetChar(0) == '*' || bIsFlat) // global short name (dialogue name or SId) { if (!bIsFlat) aShortname.Erase(0,1); @@ -935,7 +935,7 @@ void TestToolObj::ReadNames( String Filename, CNames *&pNames, CNames *&pUIds, s pNewDef->Sons( new CNames() ); pNewDef2 = new ControlDef(aShortname,aUId); - if (!pNewDef->SonInsert( pNewDef2 )) // Dialog in eigenen Namespace eintragen + if (!pNewDef->SonInsert( pNewDef2 )) // enter dialogue into its own namespace { delete pNewDef2; OSL_FAIL(" !!!! ACHTUNG !!!! Fehler beim einf�gen in leere Liste!"); @@ -998,7 +998,7 @@ void TestToolObj::AddName(String &aBisher, String &aNeu ) void TestToolObj::ReadFlat( String Filename, CNames *&pNames, sal_Bool bSortByName ) -// Wenn bSortByName == sal_False, dann nach UId Sortieren (ControlItemUId statt ControlDef) +// if bSortByName == sal_False, sort by UId (ControlItemUId instead of ControlDef) { SvFileStream Stream; String aLine,aLongname; @@ -1015,7 +1015,7 @@ void TestToolObj::ReadFlat( String Filename, CNames *&pNames, sal_Bool bSortByNa return; } - nLineNr = 0; // Wir sind ja noch vor der Datei + nLineNr = 0; if ( !pNames ) pNames = new CNames(); @@ -1116,7 +1116,7 @@ void TestToolObj::WaitForAnswer () else aRun = BasicRuntime( NULL ); } - if ( bWasRealWait && aDialogHandlerName.Len() > 0 ) // Damit das ganze auch im Testtool l�uft + if ( bWasRealWait && aDialogHandlerName.Len() > 0 ) CallDialogHandler(GetpApp()); } else @@ -1155,7 +1155,7 @@ IMPL_LINK( TestToolObj, IdleHdl, Application*, EMPTYARG ) { if ( !bReturnOK ) nIdleCount++; - if ( nIdleCount > 10 ) // d.h. Schon 10 mal hier gewesen und noch keinmal im WaitForAnswer + if ( nIdleCount > 10 ) // means been here for 10 times already and none of these in WaitForAnswer { GetpApp()->RemoveIdleHdl( LINK( this, TestToolObj, IdleHdl ) ); GetpApp()->PostUserEvent( LINK( this, TestToolObj, CallDialogHandler ) ); @@ -1169,10 +1169,10 @@ IMPL_LINK( TestToolObj, CallDialogHandler, Application*, EMPTYARG ) String aHandlerName(aDialogHandlerName); aDialogHandlerName.Erase(); - sal_uLong nRememberSequence = nSequence; // Da sich die Sequence im DialogHandler �ndert + sal_uLong nRememberSequence = nSequence; ((StarBASIC*)GetParent())->Call( aHandlerName ); nSequence = nRememberSequence; - // Die Sequenznummern werden dann zwar doppelt vergeben, aber wen k�mmerts. + nWindowHandlerCallLevel--; return 0; @@ -1231,14 +1231,14 @@ void TestToolObj::SendViaSocket() { ADD_ERROR(ERR_SEND_TIMEOUT,GEN_RES_STR1(S_TIMOUT_SENDING, String::CreateFromInt64(nSequence))); nSequence++; - bReturnOK = sal_True; // Kein Return zu erwarten + bReturnOK = sal_True; // no return to be expected } } else { ADD_ERROR(ERR_SEND_TIMEOUT,GEN_RES_STR1(S_NO_CONNECTION, String::CreateFromInt64(nSequence))); nSequence++; - bReturnOK = sal_True; // Kein Return zu erwarten + bReturnOK = sal_True; } } @@ -1247,7 +1247,7 @@ void TestToolObj::EndBlock() { if (IsBlock) { - pImpl->LocalStarttime = Time::GetSystemTicks(); // Setzen der Anfangszeit f�r Performancemessung + pImpl->LocalStarttime = Time::GetSystemTicks(); // setting the initial time for performance measuring In->GenCmdFlow (F_EndCommandBlock); @@ -1381,7 +1381,7 @@ sal_Bool TestToolObj::ReadNamesBin( String Filename, CNames *&pSIds, CNames *&pC aUId = rtl::OString();// nUId; } - if (aName.GetChar(0) == '*' || bIsFlat ) // Globaler Kurzname (Dialogname oder SId) + if (aName.GetChar(0) == '*' || bIsFlat ) // global short name (dialogue name or SId) { if (!bIsFlat) aName.Erase(0,1); @@ -1391,8 +1391,8 @@ sal_Bool TestToolObj::ReadNamesBin( String Filename, CNames *&pSIds, CNames *&pC { pNewDef->Sons(new CNames()); - pNewDef2 = new ControlDef(aName,aUId); // Noch einen machen - if (!pNewDef->SonInsert(pNewDef2)) // Dialog in eigenen Namespace eintragen + pNewDef2 = new ControlDef(aName,aUId); + if (!pNewDef->SonInsert(pNewDef2)) // enter dialogue into its own namespace { delete pNewDef2; OSL_FAIL(" !!!! ACHTUNG !!!! Fehler beim einf�gen in leere Liste!"); @@ -1492,7 +1492,7 @@ sal_Bool TestToolObj::WriteNamesBin( String Filename, CNames *pSIds, CNames *pCo void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, const SfxHint& rHint, const TypeId& ) { - static CNames *pUIds = NULL; // Halten der hid.lst + static CNames *pUIds = NULL; // hold the hid.lst const SbxHint* p = PTR_CAST(SbxHint,&rHint); if( p ) @@ -1512,7 +1512,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, { m_pNameKontext = m_pControls; - // So da� nicht immer mal wieder was aus einem alten Kontext dazwischenhaut + for (sal_uInt16 i=0;i<VAR_POOL_SIZE;i++) { pImpl->pMyVars[i]->SetName( CUniString("VarDummy").Append(UniString::CreateFromInt32(i)) ); @@ -1528,7 +1528,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, { m_pNameKontext = ((ControlDef*)m_pControls->GetObject(nElement))->GetSons(); - // So da� nicht immer mal wieder was aus einem alten Kontext dazwischenhaut + for (sal_uInt16 i=0;i<VAR_POOL_SIZE;i++) { pImpl->pMyVars[i]->SetName( CUniString("VarDummy").Append(UniString::CreateFromInt32(i)) ); @@ -1573,7 +1573,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, pCommunicationManager->KillApplication(); break; case ID_SaveIDs: - if ( rPar && rPar->Count() >= 2 ) // Genau ein Parameter + if ( rPar && rPar->Count() >= 2 ) // one parameter excactly { SbxVariableRef pArg = rPar->Get( 1 ); #if defined(WNT) @@ -1587,7 +1587,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_AutoExecute: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) // rPar = NULL <=> no parameters { pVar->PutBool(SingleCommandBlock); } @@ -1595,7 +1595,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_Execute: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { EndBlock(); BeginBlock(); @@ -1604,7 +1604,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_DialogHandler: - if ( rPar && rPar->Count() >= 2 ) // Genau ein Parameter + if ( rPar && rPar->Count() >= 2 ) { SbxVariableRef pArg = rPar->Get( 1 ); aDialogHandlerName = pArg->GetString(); @@ -1613,7 +1613,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_GetError: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { WaitForAnswer(); if ( IS_ERROR() ) @@ -1630,7 +1630,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_StartUse: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { { BasicRuntime aRun = BasicRuntimeAccess::GetRuntime(); @@ -1790,9 +1790,9 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_FinishUse: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { - ADD_CASE_LOG( String() ); // Case abschliessen + ADD_CASE_LOG( String() ); // close case if (!m_pControls) m_pControls = new CNames(); @@ -1823,7 +1823,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_CaseLog: - if ( rPar ) // rPar != NULL <=> Es gibt Parameter + if ( rPar ) // rPar != NULL <=> there are parameters { sal_uInt16 n; String aX; @@ -1928,7 +1928,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, } break; case ID_QAErrorLog: - if ( rPar ) // rPar != NULL <=> Es gibt Parameter + if ( rPar ) { sal_uInt16 n; String aSammel; @@ -1941,7 +1941,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, } break; case ID_PrintLog: - if ( rPar ) // rPar != NULL <=> Es gibt Parameter + if ( rPar ) { sal_uInt16 n; String aSammel; @@ -1954,7 +1954,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, } break; case ID_WarnLog: - if ( rPar ) // rPar != NULL <=> Es gibt Parameter + if ( rPar ) { sal_uInt16 n; String aSammel; @@ -1982,7 +1982,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, } break; case ID_GetNextCloseWindow: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { SetError( SbxERR_NOTIMP ); } @@ -2012,7 +2012,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, { WaitForAnswer(); } - // f�r einige noch etwas Nachbehandlung + switch ( ((SbxTransportMethod*)pVar)->nValue ) { case RC_WinTree: @@ -2022,7 +2022,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, } break; case ID_Dispatch: - if ( !rPar || (rPar->Count() % 2) == 1 ) // rPar = NULL <=> Kein Parameter ansonsten Gerade Anzahl(Ungerade, da immer Anzahl+1 + if ( !rPar || (rPar->Count() % 2) == 1 ) { if ( SingleCommandBlock ) BeginBlock(); @@ -2036,7 +2036,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_UNODispatch: - if ( !rPar ) // rPar = NULL <=> Kein Parameter ansonsten Gerade Anzahl(Ungerade, da immer Anzahl+1 + if ( !rPar ) { if ( SingleCommandBlock ) BeginBlock(); @@ -2112,11 +2112,11 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, break; case ID_GetUnoApp: { - // Hier wird der Remote UNO Kram gestartet - // Eintrag in die Konfiguration unter + // the remote UNO stuff is started here + // entry into the configuration at // org.openoffice.Office.Common/Start/Connection // socket,host=0,port=12345;iiop;XBla - // oder + // or // socket,host=0,port=12345;urp;;XBla String aString; @@ -2144,7 +2144,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, Reference< XInterface > xRet( xBridge->getInstance( OUString( RTL_CONSTASCII_USTRINGPARAM("StarOffice.ServiceManager")) ) ); smgr_xMultiserviceFactory = Reference< XMultiServiceFactory >(xRet, UNO_QUERY); - //MBA fragen!! + // ask MBA!! } catch( class Exception & rEx) { @@ -2168,7 +2168,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, break; case ID_GetIServer: { - // Hier wird der Remote UNO Kram gestartet + // remote UNO stuff is started here String aString; @@ -2211,7 +2211,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, { switch (rPar->Get( 1 )->GetType()) { - case SbxLONG: // alles immer als Short �bertragen + case SbxLONG: // pass always everything as Short case SbxULONG: case SbxSALINT64: case SbxSALUINT64: @@ -2502,7 +2502,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, switch( nHintUserData ) { case ID_AutoExecute: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) { SingleCommandBlock = pVar->GetBool(); if ( SingleCommandBlock ) @@ -2514,7 +2514,7 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SetError( SbxERR_WRONG_ARGS ); break; case ID_EnableQaErrors: - if ( !rPar ) // rPar = NULL <=> Kein Parameter + if ( !rPar ) pImpl->bEnableQaErrors = pVar->GetBool(); else SetError( SbxERR_WRONG_ARGS ); @@ -2547,12 +2547,12 @@ void TestToolObj::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, else if( nHintId == SBX_HINT_BASICSTOP ) { // Log summary to journal - ADD_CASE_LOG( String() ); // Case abschliessen + ADD_CASE_LOG( String() ); // close case ADD_MESSAGE_LOG( CUniString("***************************************************") ); if ( pImpl->nErrorCount ) { ADD_WARNING_LOG( GEN_RES_STR1( S_ERRORS_DETECTED, String::CreateFromInt32( pImpl->nErrorCount ) ) ); - pImpl->nWarningCount--; // Anpassen, da diese Warnung nicht in die Statistik soll + pImpl->nWarningCount--; // adjust because this warning shall not be in the statistics } else ADD_MESSAGE_LOG( GEN_RES_STR0( S_NO_ERRORS_DETECTED ) ); @@ -2596,7 +2596,7 @@ void TestToolObj::DebugFindNoErrors( sal_Bool bDebugFindNoErrors ) SbxVariable* TestToolObj::Find( const String& aStr, SbxClassType aType) { if ( BasicRuntimeAccess::IsRunInit() - || ( aStr == String( RTL_CONSTASCII_USTRINGPARAM( "ThisComponent" ) ) ) ) // wegen Find im "Global" Befehl des Basic + || ( aStr == String( RTL_CONSTASCII_USTRINGPARAM( "ThisComponent" ) ) ) ) // because of find in the "global" command of the basic return NULL; SbxVariableRef Old = SbxObject::Find(aStr, aType ); @@ -2615,7 +2615,7 @@ SbxVariable* TestToolObj::Find( const String& aStr, SbxClassType aType) sal_uInt16 nElement; ControlDef *pWhatName = new ControlDef(aStr,rtl::OString()); - /// nach Controls suchen + /// look for controls if (m_pNameKontext && m_pNameKontext->Seek_Entry(pWhatName,&nElement)) { delete pWhatName; @@ -2661,7 +2661,7 @@ SbxVariable* TestToolObj::Find( const String& aStr, SbxClassType aType) return pImpl->pControlsObj; } - /// Nach slots suchen + /// look for slots if (m_pSIds && m_pSIds->Seek_Entry(pWhatName,&nElement)) { SbxTransportMethodRef pMyVar; @@ -2689,13 +2689,13 @@ SbxVariable* TestToolObj::Find( const String& aStr, SbxClassType aType) return pMyVar; } - /// es kann sich noch um eine SlotID handeln, die numerisch abgefragt wird, statt ausgef�hrt zu werden + /// it might be a SlotID that is asked numerically instead of being executed if ( aStr.Copy( aStr.Len()-3, 3 ).CompareIgnoreCaseToAscii("_ID") == COMPARE_EQUAL && m_pSIds ) { delete pWhatName; pWhatName = new ControlDef( aStr.Copy( 0, aStr.Len()-3 ), rtl::OString() ); if ( m_pSIds->Seek_Entry( pWhatName, &nElement ) ) - { // Nach slots suchen + { // look for slots SbxVariable *pReturn = new SbxVariable; delete pWhatName; pWhatName = ( (ControlDef*)m_pSIds->GetObject( nElement ) ); @@ -2836,7 +2836,7 @@ xub_StrLen TestToolObj::PreCompilePart( String &aSource, xub_StrLen nStart, xub_ xub_StrLen nTry2 = 0; while ( !WasPrecompilerError() && (nTry2 = ImplSearch( aSource, nStart, nEnd, CUniString("try"), nTry+1 )) != STRING_NOTFOUND ) - { // Wir rekursieren erstmal mit dem 2. Try + { if ( nTry2 < nCatch ) nEnd += PreCompilePart( aSource, nTry2, nEndcatch+8, aCatchLabel, nLabelCount ) - nEndcatch-8; else @@ -2859,7 +2859,7 @@ xub_StrLen TestToolObj::PreCompilePart( String &aSource, xub_StrLen nStart, xub_ } String aReplacement; - int nTotalLength = -3 -5 -8; // try, catch und endcatch fallen raus + int nTotalLength = -3 -5 -8; // try, catch and endcatch are separated out aReplacement.AppendAscii( "on error goto " ); aReplacement += aCatchLabel; @@ -2926,7 +2926,7 @@ sal_Bool TestToolObj::WasPrecompilerError() String TestToolObj::PreCompile( String const &aSourceIn ) { - // Im CTOR zu fr�h, und hier grade nicg rechtzeitig. Start und Stop von Programmausf�hrung + StartListening( ((StarBASIC*)GetParent())->GetBroadcaster(), sal_True ); xub_StrLen nTestCase; @@ -2936,10 +2936,9 @@ String TestToolObj::PreCompile( String const &aSourceIn ) bWasPrecompilerError = sal_False; HACK("Ich gestehe alles: Ich war zu faul das richtig zu machen.") - aSource = String(' ').Append( aSource ); // Da Schl�sselworte an Position 0 sonst nicht gefunden werden + aSource = String(' ').Append( aSource ); -// Erstmal alle "'" Kommentare raus xub_StrLen nComment; while ( (nComment = aSource.SearchAscii("'",nStartPos)) != STRING_NOTFOUND ) @@ -2952,7 +2951,7 @@ HACK("Ich gestehe alles: Ich war zu faul das richtig zu machen.") nStringEndCount++; nIndex--; } - if ( (nStringEndCount & 1) == 0 ) // Wir waren also nicht innerhalb eines Strings + if ( (nStringEndCount & 1) == 0 ) { xub_StrLen nComEnd = aSource.SearchAscii("\n",nComment); @@ -3028,7 +3027,7 @@ void TestToolObj::AddToListByNr( CNames *&pControls, ControlItemUId *&pNewItem ) { AddName( pControls->GetObject(nNr)->pData->Kurzname, pNewItem->pData->Kurzname ); delete pNewItem; - pNewItem = (ControlItemUId*)pControls->GetObject(nNr); // f�r einf�gen der S�hne + pNewItem = (ControlItemUId*)pControls->GetObject(nNr); } else { @@ -3044,7 +3043,7 @@ IMPL_LINK( TestToolObj, ReturnResultsLink, CommunicationLink*, pCommLink ) void TestToolObj::ReadHidLstByNumber() { - // Die Hid.Lst nach Nummern sortiert einlesen + if ( !m_pReverseUIds ) { String aName = (pImpl->aHIDDir + DirEntry(CUniString("hid.lst"))).GetFull(); @@ -3065,7 +3064,7 @@ void TestToolObj::ReadHidLstByNumber() void TestToolObj::SortControlsByNumber( sal_Bool bIncludeActive ) { - // Die Controls einmal hirarchisch und einmal alle flach nach nummer sortiert + if ( !m_pReverseControls && !m_pReverseControlsSon && m_pControls ) { m_pReverseControls = new CNames; @@ -3080,7 +3079,7 @@ void TestToolObj::SortControlsByNumber( sal_Bool bIncludeActive ) if (! ((ControlItemUIdSon*)pNewFather)->GetSons() ) ((ControlItemUIdSon*)pNewFather)->Sons( new CNames ); - // Existieren S�hne, diese in beide Listen eintragen + CNames *pControlList = ((ControlItemSon*)m_pControls->GetObject(nWin))->GetSons(); if ( pControlList ) for ( nCont = 0 ; nCont < pControlList->Count() ; nCont++ ) @@ -3105,7 +3104,7 @@ void TestToolObj::SortControlsByNumber( sal_Bool bIncludeActive ) if ( m_pReverseControls->Seek_Entry( pZeroItem, &nNr ) ) { m_pReverseControls->DeleteAndDestroy( nNr ); -// um VorlagenLaden/UntergeordneteIniDatei/SpeichernDlg/OrdnerDlg/OeffnenDlg/MessageBox/LetzteVersion/GrafikEinfuegenDlg/FarbeDlg/ExportierenDlg/DruckerEinrichten/DruckenDlg/DateiEinfuegenDlg/Active zu verhindern +// to prevent VorlagenLaden/UntergeordneteIniDatei/SpeichernDlg/OrdnerDlg/OeffnenDlg/MessageBox/LetzteVersion/GrafikEinfuegenDlg/FarbeDlg/ExportierenDlg/DruckerEinrichten/DruckenDlg/DateiEinfuegenDlg/Active } delete pZeroItem; } @@ -3145,7 +3144,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) else { comm_UINT32 nUId; - pRetStream->Read( nUId ); // bei Sequence einfach die Sequence + pRetStream->Read( nUId ); // FIXME: HELPID #if 0 aUId = rtl::OString( nUId ); @@ -3234,7 +3233,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) ReadHidLstByNumber(); SortControlsByNumber(); - // Alle Slots nach Nummer Sortiert + if ( !m_pReverseSlots && m_pSIds ) { m_pReverseSlots = new CNames; @@ -3258,7 +3257,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) pWinInfo->aKurzname.Erase(); pWinInfo->aSlotname.Erase(); - // eventuell den Kontext feststellen. Passiert nur beim ersten Eintrag nach reset + // detect context maybe - happens only at the first entry after reset if ( !pReverseControlsKontext && m_pReverseControlsSon ) { sal_uInt16 nNr; @@ -3274,13 +3273,13 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) delete pNewItem; } - // Reset. Mu� nach bestimmen des Kontext stehen, da sonst mit dem reset-record - // der Kontext falsch gesetzt wird. + // Reset. Must be done after determining the context because the context is set the + // wrong way with the reset record otherwise. if ( pWinInfo->bIsReset ) - pReverseControlsKontext = NULL; // Reihenfolge wichtig! + pReverseControlsKontext = NULL; // order important! - // Kurzname feststellen + // get short name if ( pReverseControlsKontext ) { sal_uInt16 nNr; @@ -3292,7 +3291,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) delete pNewItem; } - // Slotname feststellen + if ( m_pReverseSlots ) { sal_uInt16 nNr; @@ -3302,7 +3301,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) delete pNewItem; } - // Langname feststellen + // FIXME: HELPID #if 0 if ( aUId.HasString() ) @@ -3492,7 +3491,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) sal_Bool bWriteNewKontext = sal_False; aControls.Erase(); - // Kurzname feststellen + if ( m_pReverseControls ) { sal_uInt16 nNr; @@ -3525,7 +3524,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) Sound::Beep( SOUND_WARNING ); } - // now determin the best common kontext + // now determine the best common kontext sal_uInt16 i,j; sal_Bool bFoundUlongName = sal_False, bFoundControl = sal_False; // check for current kontext @@ -3647,7 +3646,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) xub_StrLen i; for ( i = 0; i < aString1.Len(); i++ ) { - if ( ((sal_uInt16)aString1.GetChar(i)) == 1 ) // we have a spechial char + if ( ((sal_uInt16)aString1.GetChar(i)) == 1 ) // we have a special char { i++; if ( !bIsProsa ) @@ -3762,7 +3761,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) else { comm_UINT32 nUId; - pRetStream->Read( nUId ); // bei Sequence einfach die Sequence + pRetStream->Read( nUId ); // FIXME: HELPID #if 0 aUId = rtl::OString( nUId ); @@ -3808,7 +3807,7 @@ sal_Bool TestToolObj::ReturnResults( SvStream *pIn ) String TestToolObj::GetMethodName( sal_uLong nMethodId ) { sal_uInt16 nElement; - if ( !Controls::pClasses ) // Ist static, wird also nur einmal geladen + if ( !Controls::pClasses ) ReadFlatArray( Controls::arClasses, Controls::pClasses ); if ( Controls::pClasses ) { @@ -3828,7 +3827,7 @@ String TestToolObj::GetMethodName( sal_uLong nMethodId ) String TestToolObj::GetKeyName( sal_uInt16 nKeyCode ) { sal_uInt16 nElement; - if ( !CmdStream::pKeyCodes ) // Ist static, wird also nur einmal geladen + if ( !CmdStream::pKeyCodes ) ReadFlatArray( CmdStream::arKeyCodes, CmdStream::pKeyCodes ); if ( CmdStream::pKeyCodes ) { @@ -3881,7 +3880,7 @@ static ControlDefLoad const arRes_Type [] = if ( aType.CompareTo(RcKenn ) == COMPARE_EQUAL ) { bFound = sal_True; - if ( !pRCommands ) // Ist static, wird also nur einmal geladen + if ( !pRCommands ) ReadFlatArray( arR_Cmds, pRCommands ); sal_uInt16 nElement; @@ -3903,7 +3902,7 @@ static ControlDefLoad const arRes_Type [] = if ( aType.CompareTo(TypeKenn ) == COMPARE_EQUAL ) { bFound = sal_True; - if ( !pRTypes ) // Ist static, wird also nur einmal geladen + if ( !pRTypes ) ReadFlatArray( arRes_Type, pRTypes ); sal_uInt16 nElement; @@ -3966,7 +3965,7 @@ SbTextType TestToolObj::GetSymbolType( const String &rSymbol, sal_Bool bWasContr if ( bWasControl ) { - if ( !Controls::pClasses ) // Ist static, wird also nur einmal geladen + if ( !Controls::pClasses ) ReadFlatArray( Controls::arClasses, Controls::pClasses ); if ( (Controls::pClasses && Controls::pClasses->Seek_Entry( &WhatName )) @@ -3977,7 +3976,7 @@ SbTextType TestToolObj::GetSymbolType( const String &rSymbol, sal_Bool bWasContr return TT_NOMETHOD; } - // Die Controls durchsuchen + if ( m_pControls ) { sal_uInt16 nWin; @@ -3989,24 +3988,24 @@ SbTextType TestToolObj::GetSymbolType( const String &rSymbol, sal_Bool bWasContr } } - // Die Slots durchsuchen + if ( m_pSIds && m_pSIds->Seek_Entry( &WhatName ) ) return TT_SLOT; - // Ist es ein RemoteCommand - if ( !pRCommands ) // Ist static, wird also nur einmal geladen + + if ( !pRCommands ) ReadFlatArray( arR_Cmds, pRCommands ); if ( pRCommands && pRCommands->Seek_Entry( &WhatName ) ) return TT_REMOTECMD; - // Wenns sonst nix war, dann vielleicht ein Lokales Kommando + SbxVariable *pVar = SbxObject::Find( rSymbol, SbxCLASS_DONTCARE ); if ( pVar && ( pVar->ISA(SbxMethod) || pVar->ISA(SbxProperty) ) ) { return TT_LOCALCMD; } - return SB_SYMBOL; // Alles was hier landet ist vom Typ SB_SYMBOL und bleibt es auch + return SB_SYMBOL; } @@ -4040,7 +4039,7 @@ void Controls::SFX_NOTIFY( SfxBroadcaster&, const TypeId&, SbxVariable* Controls::Find( const String& aStr, SbxClassType aType) { - if ( !pClasses ) // Ist static, wird also nur einmal geladen + if ( !pClasses ) ReadFlatArray( arClasses, pClasses ); if ( GetUserData() == ID_ErrorDummy ) @@ -4078,9 +4077,9 @@ SbxVariable* Controls::Find( const String& aStr, SbxClassType aType) String TTFormat::ms2s( sal_uLong nMilliSeconds ) { - if ( nMilliSeconds < 100000 ) // 100 Sekunden + if ( nMilliSeconds < 100000 ) return String::CreateFromInt64( nMilliSeconds ); - if ( nMilliSeconds < 100000*60 ) // 100 Minuten + if ( nMilliSeconds < 100000*60 ) return String::CreateFromInt32( nMilliSeconds / 1000 ).AppendAscii("Sec"); return String::CreateFromInt32( nMilliSeconds / 1000 / 60 ).AppendAscii("Min"); } diff --git a/automation/source/testtool/objtest.hxx b/automation/source/testtool/objtest.hxx index 5c95fea3dd05..f4aa1b0cbb4c 100644 --- a/automation/source/testtool/objtest.hxx +++ b/automation/source/testtool/objtest.hxx @@ -44,7 +44,7 @@ // #define ID_EndBlock 2 #define ID_Kontext 3 #define ID_GetError 4 -#define ID_ErrorDummy 5 // Intern zum Behandlen von Fehlenden Controls und Methoden +#define ID_ErrorDummy 5 // internal for handling of missing controls and methods #define ID_RecordError 6 #define ID_Start 7 //#define ID_Kill 8 @@ -139,7 +139,7 @@ SV_DECL_PTRARR_SORT_DEL(CNames, ControlItem*, 50, 10) class ControlSon { protected: - CNames *pSons; // um sicherzustelle, da� nur S�hne des richtien Type reinkommen + CNames *pSons; public: ControlSon() : pSons( NULL ) {}; @@ -223,7 +223,7 @@ public: void SFX_NOTIFY( SfxBroadcaster&, const TypeId&, const SfxHint& rHint, const TypeId& ); virtual SbxVariable* Find( const String&, SbxClassType ); - SbxTransportMethodRef pMethodVar; // zum Transport von Find nach Notify + SbxTransportMethodRef pMethodVar; // for transport from Find to Notify static CNames *pClasses; static ControlDefLoad const arClasses []; }; @@ -234,23 +234,24 @@ typedef std::map< String, String > Environment; class ImplTestToolObj { public: - String ProgParam; // Parameter der zu Testenden APP; Gesetzt �ber Start + String ProgParam; // parameters of the APP to be tested; set over Start - DirEntry aFileBase; // Grundpfad f�r die *.sid und *.win Dateien (Aus Configdatei) - DirEntry aLogFileBase; // Grundpfad f�r die *.res Dateien (Aus Configdatei) - DirEntry aHIDDir; // Verzeichnis, in dem die hid.lst gesucht wird + DirEntry aFileBase; // base path for the *.sid and *.win files (from the configfile) + DirEntry aLogFileBase; // base path for the *.res files (from the configfile) + DirEntry aHIDDir; // directory in which the hid.lst is searched for - SbxTransportMethodRef pNextReturn; // Verweis auf die Var, die den Returnwert aufnimmt. + SbxTransportMethodRef pNextReturn; + + ControlsRef pControlsObj; - ControlsRef pControlsObj; // Jeweiliges Objekt, an dem Methoden aufgerufen weden. #define VAR_POOL_SIZE 8 - SbxTransportMethodRef pMyVars[VAR_POOL_SIZE]; // Falls in Ausdr�cken mehrere verwendet werden + SbxTransportMethodRef pMyVars[VAR_POOL_SIZE]; Time aServerTimeout; -// Profiling Datenfelder +// profiling data fields sal_uLong LocalStarttime; sal_uInt16 nNumBorders; sal_uLong naValBorders[4]; @@ -262,7 +263,7 @@ public: sal_uLong nMaxRemoteCommandDelay; sal_Bool bDoRemoteCommandDelay; - sal_Bool bLnaguageExtensionLoaded; // Wurde �ber 'use' was geladen? F�r syntax highlighting + sal_Bool bLnaguageExtensionLoaded; // something loaded via 'use'? for syntax highlighting SfxBroadcaster *pTTSfxBroadcaster; sal_uLong nErrorCount; diff --git a/automation/source/testtool/tcommuni.cxx b/automation/source/testtool/tcommuni.cxx index 82583a414e0a..7a2fcf32e14e 100644 --- a/automation/source/testtool/tcommuni.cxx +++ b/automation/source/testtool/tcommuni.cxx @@ -71,7 +71,7 @@ sal_Bool CommunicationManagerClientViaSocketTT::RetryConnect() { if ( !bApplicationStarted ) { - // Die App ist wohl nicht da. Starten wir sie mal. + if ( aAppPath.Len() ) { delete pProcess; @@ -84,7 +84,7 @@ sal_Bool CommunicationManagerClientViaSocketTT::RetryConnect() if ( bSucc ) { - aFirstRetryCall = Time() + Time( 0, 1 ); // Max eine Minute Zeit + aFirstRetryCall = Time() + Time( 0, 1 ); for ( int i = 10 ; i-- ; ) GetpApp()->Reschedule(); } @@ -97,7 +97,7 @@ sal_Bool CommunicationManagerClientViaSocketTT::RetryConnect() if ( aFirstRetryCall > Time() ) { Timer aWait; - aWait.SetTimeout( 500 ); // Max 500 mSec + aWait.SetTimeout( 500 ); aWait.Start(); while ( aWait.IsActive() ) GetpApp()->Yield(); |