859 lines
29 KiB
C++
859 lines
29 KiB
C++
/*************************************************************************
|
||
*
|
||
* $RCSfile: msgedit.cxx,v $
|
||
*
|
||
* $Revision: 1.1.1.1 $
|
||
*
|
||
* last change: $Author: hr $ $Date: 2000-09-18 16:12:09 $
|
||
*
|
||
* 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, 2000
|
||
*
|
||
* GNU Lesser General Public License Version 2.1
|
||
* =============================================
|
||
* Copyright 2000 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 EXPRESSED 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: 2000 by Sun Microsystems, Inc.
|
||
*
|
||
* All Rights Reserved.
|
||
*
|
||
* Contributor(s): _______________________________________
|
||
*
|
||
*
|
||
************************************************************************/
|
||
/*************************************************************************
|
||
File Versions so far:
|
||
No Version Initial Implementation without Version Information
|
||
Version 2 changed order of entries(New Entries at the end)
|
||
Version 3 Changed Charset from CHARSET_IBMPC to RTL_TEXTENCODING_UTF8
|
||
|
||
*************************************************************************/
|
||
#ifndef _INTN_HXX //autogen
|
||
#include <tools/intn.hxx>
|
||
#endif
|
||
#ifndef _TIME_HXX //autogen
|
||
#include <tools/time.hxx>
|
||
#endif
|
||
#ifndef _STREAM_HXX //autogen
|
||
#include <tools/stream.hxx>
|
||
#endif
|
||
#ifndef _MSGBOX_HXX //autogen
|
||
#include <vcl/msgbox.hxx>
|
||
#endif
|
||
#ifndef _SOUND_HXX //autogen
|
||
#include <vcl/sound.hxx>
|
||
#endif
|
||
#ifndef _FSYS_HXX //autogen
|
||
#include <tools/fsys.hxx>
|
||
#endif
|
||
#ifndef _CLIP_HXX //autogen
|
||
#include <vcl/clip.hxx>
|
||
#endif
|
||
#ifndef NOOLDSV //autogen
|
||
#include <vcl/system.hxx>
|
||
#endif
|
||
#ifndef _BASIC_TTRESHLP_HXX
|
||
#include "ttstrhlp.hxx"
|
||
#endif
|
||
#ifndef _SV_SYSTEM_HXX
|
||
#include <vcl/system.hxx>
|
||
#endif
|
||
|
||
#include "basic.hrc"
|
||
#include "msgedit.hxx"
|
||
#include "app.hxx"
|
||
#include "appbased.hxx"
|
||
#include "basmsg.hrc"
|
||
|
||
#define WARNING_PREFIX String( ResId( S_WARNING_PREFIX ) )
|
||
#define VERSION_STRING CUniString("File Format Version: ")
|
||
#define THIS_VERSION 2
|
||
|
||
#define LOGTYPE( pEntry ) ((pEntry && pEntry->GetUserData())?((TTDebugData*)pEntry->GetUserData())->aLogType:LOG_ERROR)
|
||
|
||
MsgEdit::MsgEdit( AppWin* pParent, BasicFrame *pBF, const WinBits& aBits )
|
||
: aEditTree( pParent, pBF, aBits | WB_HASBUTTONS | WB_HASLINES | WB_HASBUTTONSATROOT )
|
||
, pBasicFrame(pBF)
|
||
, pCurrentRun(NULL)
|
||
, pCurrentTestCase(NULL)
|
||
, pCurrentError(NULL)
|
||
, nVersion(0)
|
||
, bFileLoading(FALSE)
|
||
, bModified(FALSE)
|
||
, pAppWin( pParent )
|
||
{
|
||
SetFont( System::GetStandardFont(STDFONT_FIXED) );
|
||
aEditTree.SetNodeBitmaps( Bitmap( ResId (MBP_PLUS) ), Bitmap( ResId (MBP_MINUS) ) );
|
||
aEditTree.SetSelectionMode( MULTIPLE_SELECTION );
|
||
if ( aEditTree.GetModel()->GetSortMode() != SortNone )
|
||
aEditTree.GetModel()->SetSortMode( SortNone );
|
||
|
||
pParent->bHasFile = Load( pParent->GetText() );
|
||
}
|
||
|
||
MsgEdit::~MsgEdit()
|
||
{}
|
||
|
||
#define ADD_TTDEBUGDATA( aLBoxEntry ) \
|
||
{ \
|
||
TTDebugData *pData = new TTDebugData; \
|
||
*pData = aDebugData; \
|
||
aLBoxEntry->SetUserData( pData ); \
|
||
} \
|
||
|
||
|
||
void MsgEdit::AddAnyMsg( TTLogMsg *LogMsg )
|
||
{
|
||
if ( LogMsg->aDebugData.aFilename.Copy(0,2).CompareToAscii( "--" ) == COMPARE_EQUAL )
|
||
LogMsg->aDebugData.aFilename.Erase(0,2);
|
||
xub_StrLen nPos;
|
||
LogMsg->aDebugData.aMsg.ConvertLineEnd();
|
||
if ( (nPos = LogMsg->aDebugData.aMsg.Search( CUniString("\n").ConvertLineEnd() )) != STRING_NOTFOUND )
|
||
{
|
||
xub_StrLen nSysLineEndLen = CUniString("\n").ConvertLineEnd().Len();
|
||
String aLastPart = LogMsg->aDebugData.aMsg.Copy( nPos+nSysLineEndLen );
|
||
LogMsg->aDebugData.aMsg.Erase( nPos );
|
||
AddAnyMsg( LogMsg );
|
||
LogMsg->aDebugData.aMsg = aLastPart;
|
||
AddAnyMsg( LogMsg );
|
||
}
|
||
else
|
||
{
|
||
String aUILogMsg( pBasicFrame->GenRealString( LogMsg->aDebugData.aMsg ) );
|
||
switch ( LogMsg->aDebugData.aLogType )
|
||
{
|
||
case LOG_RUN:
|
||
{
|
||
if ( LogMsg->aDebugData.aMsg.Len() == 0 )
|
||
{
|
||
LogMsg->aDebugData.aMsg = GEN_RES_STR2( S_PROG_START,
|
||
GetpApp()->GetAppInternational().GetDate(Date()),
|
||
GetpApp()->GetAppInternational().GetTime(Time(),FALSE) );
|
||
aUILogMsg = pBasicFrame->GenRealString( LogMsg->aDebugData.aMsg );
|
||
}
|
||
AddRun( aUILogMsg, LogMsg->aDebugData ); break;
|
||
}
|
||
case LOG_TEST_CASE: AddTestCase( aUILogMsg, LogMsg->aDebugData ); break;
|
||
case LOG_ERROR: AddError( aUILogMsg, LogMsg->aDebugData ); break;
|
||
case LOG_CALL_STACK:AddCallStack( aUILogMsg, LogMsg->aDebugData ); break;
|
||
case LOG_MESSAGE: AddMessage( aUILogMsg, LogMsg->aDebugData ); break;
|
||
case LOG_WARNING: AddWarning( aUILogMsg, LogMsg->aDebugData ); break;
|
||
case LOG_ASSERTION: AddAssertion( aUILogMsg, LogMsg->aDebugData ); break;
|
||
}
|
||
|
||
if ( !bFileLoading )
|
||
{ // Kommt vom Testtool und mu<6D> gleich geschrieben werden.
|
||
BOOL bFileWasChanged = pAppWin->DiskFileChanged( SINCE_LAST_LOAD );
|
||
|
||
DBG_ASSERT( aLogFileName == LogMsg->aLogFileName, "Logging to different logfile as before" );
|
||
SvFileStream aStrm( LogMsg->aLogFileName, STREAM_STD_WRITE );
|
||
String aLogMsg = Impl_MakeSaveText( LogMsg->aDebugData ).AppendAscii("\n");
|
||
if( aStrm.IsOpen() )
|
||
{
|
||
aLogMsg.ConvertLineEnd(LINEEND_CRLF);
|
||
aStrm.Seek(STREAM_SEEK_TO_END);
|
||
aStrm << ByteString( aLogMsg, RTL_TEXTENCODING_UTF8 ).GetBuffer();
|
||
aStrm.Close();
|
||
}
|
||
if ( !bFileWasChanged )
|
||
pAppWin->UpdateFileInfo( HAS_BEEN_LOADED );
|
||
}
|
||
}
|
||
}
|
||
|
||
void MsgEdit::AddRun( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
if ( !bFileLoading || ( bFileLoading && nVersion >= 2 ) )
|
||
pCurrentRun = aEditTree.InsertEntry( aMsg, NULL, FALSE, 0 );
|
||
else // Erstes Dateiformat
|
||
pCurrentRun = aEditTree.InsertEntry( aMsg ); // und damit an Ende!
|
||
|
||
aEditTree.ShowEntry( pCurrentRun );
|
||
pCurrentTestCase = NULL;
|
||
pCurrentError = NULL;
|
||
aDebugData.aLogType = LOG_RUN; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pCurrentRun );
|
||
}
|
||
|
||
void MsgEdit::AddTestCase( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
if ( pCurrentRun )
|
||
{
|
||
if ( aMsg.Len() == 0 ) // Am Ende des Testcase
|
||
{
|
||
pCurrentTestCase = NULL;
|
||
}
|
||
else
|
||
{
|
||
pCurrentTestCase = aEditTree.InsertEntry( aMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pCurrentTestCase );
|
||
aDebugData.aLogType = LOG_TEST_CASE; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pCurrentTestCase );
|
||
}
|
||
}
|
||
pCurrentError = NULL;
|
||
}
|
||
|
||
void MsgEdit::AddError( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
if ( !pCurrentTestCase )
|
||
{
|
||
TTLogMsg aLogMsg;
|
||
aLogMsg.aDebugData = aDebugData;
|
||
aLogMsg.aDebugData.aMsg = GEN_RES_STR0( S_ERROR_OUTSIDE_TESTCASE );
|
||
aLogMsg.aDebugData.aLogType = LOG_TEST_CASE;
|
||
aLogMsg.aLogFileName = aLogFileName;
|
||
AddAnyMsg( &aLogMsg );
|
||
}
|
||
if ( pCurrentTestCase )
|
||
{
|
||
pCurrentError = aEditTree.InsertEntry( aMsg, pCurrentTestCase );
|
||
aEditTree.ShowEntry( pCurrentError );
|
||
aDebugData.aLogType = LOG_ERROR; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pCurrentError );
|
||
}
|
||
}
|
||
|
||
void MsgEdit::AddCallStack( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
DBG_ASSERT( pCurrentError, "Callstack ohne CurrentError im Journal" );
|
||
if ( pCurrentError )
|
||
{
|
||
SvLBoxEntry *pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentError ,0 );
|
||
aDebugData.aLogType = LOG_CALL_STACK; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pThisEntry );
|
||
}
|
||
}
|
||
|
||
void MsgEdit::AddMessage( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
SvLBoxEntry *pThisEntry = NULL;
|
||
if ( pCurrentTestCase )
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentTestCase );
|
||
else if ( pCurrentRun )
|
||
{
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
else
|
||
{
|
||
AddRun( aMsg, aDebugData );
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
aDebugData.aLogType = LOG_MESSAGE; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pThisEntry );
|
||
}
|
||
|
||
void MsgEdit::AddWarning( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
SvLBoxEntry *pThisEntry = NULL;
|
||
String aCompleteMsg;
|
||
aCompleteMsg = WARNING_PREFIX.Append( aMsg );
|
||
|
||
if ( pCurrentTestCase )
|
||
pThisEntry = aEditTree.InsertEntry( aCompleteMsg, pCurrentTestCase );
|
||
else if ( pCurrentRun )
|
||
{
|
||
pThisEntry = aEditTree.InsertEntry( aCompleteMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
else
|
||
{
|
||
AddRun( aMsg, aDebugData );
|
||
pThisEntry = aEditTree.InsertEntry( aCompleteMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
aDebugData.aLogType = LOG_WARNING; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pThisEntry );
|
||
|
||
while ( !aEditTree.IsEntryVisible( pThisEntry ) && ( pThisEntry = aEditTree.GetParent( pThisEntry ) ) )
|
||
aEditTree.InvalidateEntry( pThisEntry );
|
||
}
|
||
|
||
void MsgEdit::AddAssertion( String aMsg, TTDebugData aDebugData )
|
||
{
|
||
SvLBoxEntry *pThisEntry = NULL;
|
||
if ( pCurrentTestCase )
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentTestCase );
|
||
else if ( pCurrentRun )
|
||
{
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
else
|
||
{
|
||
AddRun( aMsg, aDebugData );
|
||
pThisEntry = aEditTree.InsertEntry( aMsg, pCurrentRun );
|
||
aEditTree.ShowEntry( pThisEntry );
|
||
}
|
||
aDebugData.aLogType = LOG_ASSERTION; // Da auch von anderswo aufgerufen
|
||
ADD_TTDEBUGDATA( pThisEntry );
|
||
|
||
while ( !aEditTree.IsEntryVisible( pThisEntry ) && ( pThisEntry = aEditTree.GetParent( pThisEntry ) ) )
|
||
aEditTree.InvalidateEntry( pThisEntry );
|
||
}
|
||
|
||
/*
|
||
SvLBoxEntry* GetEntry( SvLBoxEntry* pParent, ULONG nPos ) const { return SvLBox::GetEntry(pParent,nPos); }
|
||
SvLBoxEntry* GetEntry( ULONG nRootPos ) const { return SvLBox::GetEntry(nRootPos);}
|
||
|
||
|
||
|
||
SvLBoxEntry* FirstChild(SvLBoxEntry* pParent ) const { return (SvLBoxEntry*)(pModel->FirstChild(pParent)); }
|
||
SvLBoxEntry* NextSibling(SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(pModel->NextSibling( pEntry )); }
|
||
SvLBoxEntry* PrevSibling(SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(pModel->PrevSibling( pEntry )); }
|
||
|
||
SvLBoxEntry* FirstSelected() const { return (SvLBoxEntry*)SvListView::FirstSelected(); }
|
||
SvLBoxEntry* NextSelected( SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(SvListView::NextSelected(pEntry)); }
|
||
SvLBoxEntry* PrevSelected( SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(SvListView::PrevSelected(pEntry)); }
|
||
SvLBoxEntry* LastSelected() const { return (SvLBoxEntry*)(SvListView::LastSelected()); }
|
||
|
||
SvLBoxEntry* GetEntry( SvLBoxEntry* pParent, ULONG nPos ) const { return (SvLBoxEntry*)(pModel->GetEntry(pParent,nPos)); }
|
||
SvLBoxEntry* GetEntry( ULONG nRootPos ) const { return (SvLBoxEntry*)(pModel->GetEntry(nRootPos)); }
|
||
|
||
SvLBoxEntry* GetParent( SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(pModel->GetParent(pEntry)); }
|
||
SvLBoxEntry* GetRootLevelParent(SvLBoxEntry* pEntry ) const { return (SvLBoxEntry*)(pModel->GetRootLevelParent( pEntry ));}
|
||
|
||
BOOL IsInChildList( SvListEntry* pParent, SvListEntry* pChild) const;
|
||
SvListEntry* GetEntry( SvListEntry* pParent, ULONG nPos ) const;
|
||
SvListEntry* GetEntry( ULONG nRootPos ) const;
|
||
SvListEntry* GetEntryAtAbsPos( ULONG nAbsPos ) const;
|
||
SvListEntry* GetParent( SvListEntry* pEntry ) const;
|
||
SvListEntry* GetRootLevelParent( SvListEntry* pEntry ) const;
|
||
*/
|
||
|
||
//#define CHECK( pMemo ) if ( pMemo && !aEditTree.GetViewData( pMemo ) ) pMemo = NULL
|
||
#define CHECK( pMemo ) if ( pMemo && !aEditTree.GetModel()->IsInChildList( NULL, pMemo ) ) pMemo = NULL
|
||
void MsgEdit::Delete()
|
||
{
|
||
aEditTree.RemoveSelection();
|
||
CHECK( pCurrentRun );
|
||
CHECK( pCurrentTestCase );
|
||
CHECK( pCurrentError );
|
||
bModified = TRUE;
|
||
lModify.Call( NULL );
|
||
}
|
||
|
||
void MsgEdit::Cut(){ Copy(); Delete(); bModified = TRUE; lModify.Call( NULL ); }
|
||
void MsgEdit::Copy(){ Clipboard::Clear();Clipboard::CopyString( GetSelected() ); }
|
||
/**/void MsgEdit::Paste(){ Sound::Beep(); }
|
||
void MsgEdit::Undo(){ Sound::Beep(); }
|
||
void MsgEdit::Redo(){ Sound::Beep(); }
|
||
|
||
|
||
String MsgEdit::Impl_MakeText( SvLBoxEntry *pEntry ) const
|
||
{
|
||
String aRet;
|
||
TTDebugData *aData = (TTDebugData*)pEntry->GetUserData();
|
||
switch ( aData->aLogType )
|
||
{
|
||
case LOG_RUN: aRet.AppendAscii("\n"); break;
|
||
case LOG_TEST_CASE: break;
|
||
case LOG_ERROR: break;
|
||
case LOG_CALL_STACK:aRet.AppendAscii("--> "); break;
|
||
case LOG_MESSAGE: break;
|
||
case LOG_WARNING: break;
|
||
case LOG_ASSERTION: break;
|
||
default:DBG_ERROR("Unbekannter Typ im ResultFenster");
|
||
}
|
||
aRet += aEditTree.GetEntryText( pEntry );
|
||
return aRet;
|
||
}
|
||
|
||
String MsgEdit::Impl_MakeSaveText( TTDebugData aData ) const
|
||
{
|
||
// LogType;Filename;Line;Col1;Col2;Message
|
||
String aRet;
|
||
aRet += String::CreateFromInt32( (int)aData.aLogType );
|
||
aRet += ';';
|
||
aRet += aData.aFilename;
|
||
aRet += ';';
|
||
aRet += String::CreateFromInt32( aData.nLine );
|
||
aRet += ';';
|
||
aRet += String::CreateFromInt32( aData.nCol1 );
|
||
aRet += ';';
|
||
aRet += String::CreateFromInt32( aData.nCol2 );
|
||
aRet += ';';
|
||
aRet += '"';
|
||
aRet += aData.aMsg;
|
||
aRet += '"';
|
||
return aRet;
|
||
}
|
||
|
||
String MsgEdit::Impl_MakeSaveText( SvLBoxEntry *pEntry ) const
|
||
{
|
||
// LogType;Filename;Line;Col1;Col2;Message
|
||
String aRet;
|
||
TTDebugData *aData = (TTDebugData*)pEntry->GetUserData();
|
||
|
||
if ( aEditTree.PrevSibling( pEntry ) && LOGTYPE( aEditTree.PrevSibling( pEntry ) ) == LOG_TEST_CASE )
|
||
{ // Um Cases richtig abzuschliessen, so da<64> Warnings und Msgs in Hirarchie richtig.
|
||
aRet += String::CreateFromInt32( (int)LOG_TEST_CASE );
|
||
aRet.AppendAscii(";;0;0;0;\"\"\n");
|
||
}
|
||
aRet += Impl_MakeSaveText( *aData );
|
||
return aRet;
|
||
}
|
||
|
||
String MsgEdit::GetSelected()
|
||
{
|
||
String aRet;
|
||
SvLBoxEntry *pEntry = aEditTree.FirstSelected();
|
||
while ( pEntry )
|
||
{
|
||
aRet += Impl_MakeText( pEntry );
|
||
aRet += '\n';
|
||
pEntry = aEditTree.NextSelected( pEntry );
|
||
}
|
||
aRet.ConvertLineEnd();
|
||
return aRet;
|
||
}
|
||
|
||
TextSelection MsgEdit::GetSelection() const
|
||
{
|
||
ULONG nStart=0,nEnd=0;
|
||
|
||
if ( aEditTree.FirstSelected() )
|
||
{
|
||
nStart = aEditTree.GetModel()->GetAbsPos(aEditTree.FirstSelected() );
|
||
if ( aEditTree.LastSelected() )
|
||
nEnd = aEditTree.GetModel()->GetAbsPos(aEditTree.LastSelected() );
|
||
return TextSelection( TextPaM( nStart, 0 ), TextPaM( nEnd, STRING_MAXLEN ) );
|
||
}
|
||
else
|
||
return TextSelection();
|
||
}
|
||
|
||
void MsgEdit::SetSelection( const TextSelection& rSelection )
|
||
{
|
||
USHORT nStart,nEnd;
|
||
|
||
while ( aEditTree.GetSelectionCount() )
|
||
aEditTree.Select( aEditTree.FirstSelected(), FALSE );
|
||
|
||
if ( rSelection.HasRange() )
|
||
{
|
||
nStart = rSelection.GetStart().GetPara();
|
||
nEnd = rSelection.GetEnd().GetPara();
|
||
|
||
for ( int i = nStart ; i <= nEnd ; i++ )
|
||
aEditTree.Select( aEditTree.GetModel()->GetEntryAtAbsPos( i ), TRUE );
|
||
}
|
||
}
|
||
|
||
USHORT MsgEdit::GetLineNr() const
|
||
{
|
||
if ( aEditTree.GetCurEntry() )
|
||
return aEditTree.GetModel()->GetAbsPos(aEditTree.GetCurEntry() ) + 1;
|
||
else
|
||
return 0;
|
||
}
|
||
|
||
void MsgEdit::ReplaceSelected( const String& rStr ){ Sound::Beep();DBG_ERROR("Not Implemented"); }
|
||
BOOL MsgEdit::IsModified(){ return bModified; }
|
||
void MsgEdit::SetModifyHdl( Link l ){ lModify = l; }
|
||
|
||
String MsgEdit::GetText() const
|
||
{
|
||
String aRet;
|
||
SvLBoxEntry *pEntry = aEditTree.First();
|
||
while ( pEntry )
|
||
{
|
||
aRet += Impl_MakeText( pEntry );
|
||
aRet += '\n';
|
||
pEntry = aEditTree.Next( pEntry );
|
||
}
|
||
aRet.ConvertLineEnd();
|
||
return aRet;
|
||
}
|
||
|
||
/**/void MsgEdit::SetText( const String& rStr ){ DBG_ERROR("Not Implemented"); }
|
||
|
||
BOOL MsgEdit::HasText() const { return aEditTree.First() != NULL; }
|
||
|
||
// Es wird entweder ab Beginn oder ab Markierungsbegin + 1 gesucht.
|
||
BOOL MsgEdit::Find( const String& s )
|
||
{
|
||
TextSelection r = GetSelection();
|
||
USHORT bgn = (USHORT) r.GetStart().GetPara() + 1;
|
||
if ( r.GetStart().GetPara() == 0 ) bgn = 0; // Suchen ganz von Anfang
|
||
|
||
SvLBoxEntry *pEntry = aEditTree.GetModel()->GetEntryAtAbsPos( bgn );
|
||
while ( pEntry )
|
||
{
|
||
if( aEditTree.GetEntryText( pEntry ).Search( s, 0 ) != STRING_NOTFOUND )
|
||
{
|
||
aEditTree.SetCurEntry( pEntry );
|
||
return TRUE;
|
||
}
|
||
pEntry = aEditTree.Next( pEntry );
|
||
}
|
||
return FALSE;
|
||
}
|
||
/******************************************************************
|
||
|
||
Zum Fileformat der *.res Dateien:
|
||
Die Informationenn werden als Semikolon getrennte Strings
|
||
zusammengebastelt. Reihenfolge:
|
||
|
||
LogType;Filename;Line;Col1;Col2;Message
|
||
|
||
******************************************************************/
|
||
|
||
BOOL MsgEdit::Load( const String& aName )
|
||
{
|
||
aLogFileName = aName;
|
||
BOOL bOk = TRUE, bFirstLine = TRUE;
|
||
BOOL bLoadError = FALSE;
|
||
SvFileStream aStrm( aName, STREAM_STD_READ );
|
||
if( aStrm.IsOpen() )
|
||
{
|
||
aEditTree.Clear();
|
||
String aLine;
|
||
bFileLoading = TRUE; // So da<64> nicht gleich wieder auf Platte mitgelogt wird.
|
||
TTLogMsg *pLogMsg = new TTLogMsg;
|
||
while( !aStrm.IsEof() && bOk )
|
||
{
|
||
if ( nVersion >= 3 ) // Wir habe utf8
|
||
aStrm.ReadByteStringLine( aLine, RTL_TEXTENCODING_UTF8 );
|
||
else
|
||
aStrm.ReadByteStringLine( aLine, RTL_TEXTENCODING_IBM_850 );
|
||
|
||
if( aStrm.GetError() != SVSTREAM_OK )
|
||
bOk = FALSE;
|
||
|
||
#define TOKEN( n ) aLine.GetToken( n )
|
||
|
||
if ( aLine.GetTokenCount() >= 6 )
|
||
{
|
||
// LogType;Filename;Line;Col1;Col2;Message
|
||
TTDebugData aDebugData;
|
||
aDebugData.aLogType = TTLogType( TOKEN(0).ToInt32() );
|
||
aDebugData.aFilename = TOKEN(1);
|
||
aDebugData.nLine = TOKEN(2).ToInt32();
|
||
aDebugData.nCol1 = TOKEN(3).ToInt32();
|
||
aDebugData.nCol2 = TOKEN(4).ToInt32();
|
||
aDebugData.aMsg = aLine.GetQuotedToken( 5, CUniString("\"\"") );
|
||
aDebugData.aMsg.Erase(0,1); // Anf<6E>hrungszeichen entfernen
|
||
aDebugData.aMsg.Erase(aDebugData.aMsg.Len()-1,1);
|
||
|
||
pLogMsg->aLogFileName.Erase();
|
||
pLogMsg->aDebugData = aDebugData;
|
||
|
||
AddAnyMsg( pLogMsg );
|
||
}
|
||
else if ( bFirstLine && (aLine.Search( VERSION_STRING ) == 0) )
|
||
nVersion = aLine.Copy( VERSION_STRING.Len() ).ToInt32();
|
||
else bLoadError = TRUE;
|
||
|
||
bFirstLine = FALSE;
|
||
}
|
||
bFileLoading = FALSE;
|
||
delete pLogMsg;
|
||
aStrm.Close();
|
||
if ( nVersion < 2 && !bLoadError )
|
||
Save( aName ); // Mu<4D> sein, sonst passiert beim mitloggen Bl<42>dsinn.
|
||
|
||
}
|
||
else
|
||
bOk = FALSE;
|
||
return bOk;
|
||
}
|
||
|
||
BOOL MsgEdit::Save( const String& aName )
|
||
{
|
||
BOOL bOk = TRUE;
|
||
BOOL bIsText = DirEntry( aName ).GetExtension().CompareIgnoreCaseToAscii("TXT") == COMPARE_EQUAL;
|
||
if ( bIsText && !QueryBox( NULL, ResId( IDS_LOSS_OF_INFORMATION ) ).Execute() )
|
||
return FALSE;
|
||
SvFileStream aStrm( aName, STREAM_STD_WRITE | STREAM_TRUNC );
|
||
if( aStrm.IsOpen() )
|
||
{
|
||
if ( bIsText )
|
||
{
|
||
String aSave = GetText();
|
||
aSave.ConvertLineEnd(LINEEND_CRLF);
|
||
aStrm << ByteString( aSave, RTL_TEXTENCODING_UTF8 ).GetBuffer();
|
||
}
|
||
else
|
||
{
|
||
// LogType;Filename;Line;Col1;Col2;Message
|
||
String aSave = VERSION_STRING.Append( UniString::CreateFromInt32( 3 ) ).AppendAscii("\n"); // Version 2
|
||
SvLBoxEntry *pRun = aEditTree.First();
|
||
while ( pRun && aEditTree.NextSibling( pRun ) )
|
||
pRun = aEditTree.NextSibling( pRun );
|
||
|
||
aSave.ConvertLineEnd(LINEEND_CRLF);
|
||
aStrm << ByteString( aSave, RTL_TEXTENCODING_UTF8 ).GetBuffer();
|
||
|
||
SvLBoxEntry *pEntry;
|
||
while ( pRun )
|
||
{
|
||
pEntry = pRun;
|
||
while ( pEntry && ( pEntry == pRun || LOGTYPE( pEntry ) != LOG_RUN ) )
|
||
{
|
||
aSave = Impl_MakeSaveText( pEntry );
|
||
aSave += '\n';
|
||
aSave.ConvertLineEnd(LINEEND_CRLF);
|
||
aStrm << ByteString( aSave, RTL_TEXTENCODING_UTF8 ).GetBuffer();
|
||
pEntry = aEditTree.Next( pEntry );
|
||
}
|
||
pRun = aEditTree.PrevSibling( pRun );
|
||
|
||
}
|
||
}
|
||
if( aStrm.GetError() != SVSTREAM_OK )
|
||
bOk = FALSE;
|
||
else
|
||
{
|
||
bModified = FALSE;
|
||
lModify.Call( NULL );
|
||
}
|
||
|
||
}
|
||
else
|
||
bOk = FALSE;
|
||
return bOk;
|
||
}
|
||
|
||
|
||
TTTreeListBox::TTTreeListBox( Window* pParent, BasicFrame* pBF, WinBits nWinStyle )
|
||
: SvTreeListBox( pParent, nWinStyle )
|
||
, pBasicFrame(pBF)
|
||
//, nDeselectParent(0)
|
||
{}
|
||
|
||
BOOL TTTreeListBox::DoubleClickHdl()
|
||
{
|
||
SvLBoxEntry *pThisEntry = GetHdlEntry();
|
||
if ( pThisEntry && pThisEntry->GetUserData() && ((TTDebugData*)pThisEntry->GetUserData())->aFilename.Len() > 0 )
|
||
{
|
||
TTDebugData *aData = (TTDebugData*)pThisEntry->GetUserData();
|
||
if ( pBasicFrame->FindModuleWin( aData->aFilename ) )
|
||
{
|
||
AppEdit *pWin = pBasicFrame->FindModuleWin( aData->aFilename );
|
||
pWin->ToTop();
|
||
}
|
||
else
|
||
pBasicFrame->LoadFile( aData->aFilename );
|
||
|
||
if ( pBasicFrame->pWork && pBasicFrame->pWork->ISA(AppEdit) )
|
||
((AppEdit*)pBasicFrame->pWork)->Highlight( aData->nLine, aData->nCol1, aData->nCol2 );
|
||
return FALSE;
|
||
}
|
||
return TRUE;
|
||
}
|
||
|
||
/*ULONG TTTreeListBox::SelectChildren( SvLBoxEntry* pParent, BOOL bSelect )
|
||
{
|
||
SvLBoxEntry *pEntry = FirstChild( pParent );
|
||
ULONG nRet = 0;
|
||
while ( pEntry )
|
||
{
|
||
nRet++;
|
||
Select( pEntry, bSelect );
|
||
pEntry = NextSibling( pEntry );
|
||
}
|
||
return nRet;
|
||
}
|
||
|
||
|
||
void TTTreeListBox::SelectHdl()
|
||
{
|
||
SvLBoxEntry* pHdlEntry = GetHdlEntry();
|
||
|
||
SelectChildren( pHdlEntry, TRUE );
|
||
Select( pHdlEntry, TRUE );
|
||
// InitMenu(pApp->GetAppMenu()->GetPopupMenu( RID_APPEDIT )); // So da<64> Delete richtig ist
|
||
}
|
||
|
||
void TTTreeListBox::DeselectHdl()
|
||
{
|
||
SvLBoxEntry* pHdlEntry = GetHdlEntry();
|
||
if ( GetParent( pHdlEntry ) )
|
||
{
|
||
nDeselectParent++;
|
||
Select( GetParent( pHdlEntry ), FALSE );
|
||
nDeselectParent--;
|
||
}
|
||
if ( !nDeselectParent )
|
||
{
|
||
SelectChildren( pHdlEntry, FALSE );
|
||
Select( pHdlEntry, FALSE );
|
||
}
|
||
Invalidate();
|
||
} */
|
||
|
||
|
||
void TTTreeListBox::KeyInput( const KeyEvent& rKEvt )
|
||
{
|
||
switch ( rKEvt.GetKeyCode().GetFunction() )
|
||
{
|
||
case KEYFUNC_CUT:
|
||
Control::GetParent()->Command( CommandEvent( Point(), RID_EDITCUT ) );
|
||
break;
|
||
case KEYFUNC_COPY:
|
||
Control::GetParent()->Command( CommandEvent( Point(), RID_EDITCOPY ) );
|
||
break;
|
||
case KEYFUNC_PASTE:
|
||
Control::GetParent()->Command( CommandEvent( Point(), RID_EDITPASTE ) );
|
||
break;
|
||
case KEYFUNC_DELETE:
|
||
Control::GetParent()->Command( CommandEvent( Point(), RID_EDITDEL ) );
|
||
break;
|
||
default:
|
||
SvTreeListBox::KeyInput( rKEvt );
|
||
}
|
||
}
|
||
|
||
|
||
TTFeatures TTTreeListBox::GetFeatures( SvLBoxEntry* pEntry )
|
||
{
|
||
switch ( LOGTYPE( pEntry ) )
|
||
{
|
||
case LOG_MESSAGE:
|
||
return HasNothing;
|
||
case LOG_WARNING :
|
||
return HasWarning;
|
||
case LOG_ERROR:
|
||
case LOG_CALL_STACK:
|
||
return HasError;
|
||
case LOG_RUN:
|
||
case LOG_TEST_CASE:
|
||
{
|
||
SvLBoxEntry* pThisEntry = FirstChild( pEntry );
|
||
TTFeatures aResult = HasNothing;
|
||
while ( pThisEntry && !( (aResult & HasError) == HasError ) )
|
||
{
|
||
if ( !IsEntryVisible( pThisEntry ) )
|
||
aResult |= GetFeatures( pThisEntry );
|
||
pThisEntry = NextSibling( pThisEntry );
|
||
}
|
||
return aResult;
|
||
}
|
||
case LOG_ASSERTION:
|
||
return HasAssertion;
|
||
default:
|
||
DBG_ERROR("Unbekannter Typ im ResultFenster");
|
||
}
|
||
return HasNothing; // da der Comp nich sieht, da<64> kein dafault n<>tig ist.
|
||
}
|
||
|
||
|
||
class TTLBoxString : public SvLBoxString
|
||
{
|
||
public:
|
||
|
||
TTLBoxString( SvLBoxEntry* pEntry, USHORT nFlags,
|
||
const String& rStr ) : SvLBoxString(pEntry,nFlags,rStr) {}
|
||
|
||
virtual void Paint( const Point& rPos, SvLBox& rDev, USHORT nFlags,
|
||
SvLBoxEntry* pEntry);
|
||
};
|
||
|
||
|
||
void TTLBoxString::Paint( const Point& rPos, SvLBox& rDev, USHORT nFlags,
|
||
SvLBoxEntry* pEntry )
|
||
{
|
||
TTFeatures aFeatures = ((TTTreeListBox*)&rDev)->GetFeatures( pEntry );
|
||
|
||
if ( aFeatures != HasNothing )
|
||
{
|
||
Font aOldFont( rDev.GetFont());
|
||
Font aFont( aOldFont );
|
||
|
||
if ( ( aFeatures & HasError ) != 0 || ( aFeatures & HasWarning ) != 0 )
|
||
{
|
||
Color aCol;
|
||
if ( ( aFeatures & HasError ) == HasError )
|
||
aCol = Color( 255, 120, 120 ); // Rot
|
||
else
|
||
aCol = Color( 255, 200, 120 ); // Ocker oder so
|
||
|
||
if( rDev.IsSelected(pEntry) )
|
||
aFont.SetColor( aCol );
|
||
else
|
||
{
|
||
aFont.SetFillColor( aCol );
|
||
aFont.SetTransparent( FALSE );
|
||
}
|
||
}
|
||
else // also HasAssertion
|
||
{
|
||
if( rDev.IsSelected(pEntry) )
|
||
{
|
||
Color aCol( 255, 255, 153 );
|
||
aFont.SetColor( aCol );
|
||
}
|
||
else
|
||
{
|
||
Size aSize( rDev.GetTextWidth( GetText() ), rDev.GetTextHeight() );
|
||
Rectangle aRect( rPos, aSize );
|
||
|
||
static Bitmap aBmp( ResId( MBP_ASSERT ) );
|
||
static BitmapEx aBmpEx( aBmp );
|
||
static Wallpaper aWP( aBmpEx );
|
||
|
||
rDev.DrawWallpaper( aRect, aWP );
|
||
}
|
||
|
||
// virtual void NotifyScrolling( long nLines );
|
||
}
|
||
rDev.SetFont( aFont );
|
||
rDev.DrawText( rPos, GetText() );
|
||
rDev.SetFont( aOldFont );
|
||
}
|
||
else
|
||
SvLBoxString::Paint( rPos, rDev, nFlags, pEntry );
|
||
}
|
||
|
||
|
||
void TTTreeListBox::InitEntry(SvLBoxEntry* pEntry,
|
||
const String& rStr ,const Image& rImg1, const Image& rImg2 )
|
||
{
|
||
USHORT nColToHilite = 1; //0==Bitmap;1=="Spalte1";2=="Spalte2"
|
||
SvTreeListBox::InitEntry( pEntry, rStr, rImg1, rImg2 );
|
||
SvLBoxString* pCol = (SvLBoxString*)pEntry->GetItem( nColToHilite );
|
||
TTLBoxString* pStr = new TTLBoxString( pEntry, 0, pCol->GetText() );
|
||
pEntry->ReplaceItem( pStr, nColToHilite );
|
||
}
|
||
|