AOO410/main/basctl/source/basicide/brkdlg.cxx - openoffice - Git at Google

 /**************************************************************
  *
  * Licensed to the Apache Software Foundation (ASF) under one
  * or more contributor license agreements.  See the NOTICE file
  * distributed with this work for additional information
  * regarding copyright ownership.  The ASF licenses this file
  * to you under the Apache License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0
  *
  * Unless required by applicable law or agreed to in writing,
  * software distributed under the License is distributed on an
  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
  * KIND, either express or implied.  See the License for the
  * specific language governing permissions and limitations
  * under the License.
  *
  *************************************************************/


 // MARKER(update_precomp.py): autogen include statement, do not remove
 #include "precompiled_basctl.hxx"

 #include <limits>

 #include <vcl/sound.hxx>

 // #define ITEMID_SEARCH SID_SEARCH_ITEM
 #define _SVX_NOIDERESIDS
 #include <brkdlg.hxx>
 #include <brkdlg.hrc>
 #include <basidesh.hxx>
 #include <basidesh.hrc>
 #include <iderdll.hxx>
 #include <sfx2/dispatch.hxx>
 #include <sfx2/viewfrm.hxx>

 // FIXME  Why does BreakPointDialog allow only sal_uInt16 for break-point line
 // numbers, whereas BreakPoint supports sal_uLong?

 bool lcl_ParseText( String aText, sal_uInt16& rLineNr )
 {
     // aText should look like "# n" where
     // n > 0 && n < std::numeric_limits< sal_uInt16 >::max().
     // All spaces are ignored, so there can even be spaces within the
     // number n.  (Maybe it would be better to ignore all whitespace instead
     // of just spaces.)
     aText.EraseAllChars(' ');
     sal_Unicode cFirst = aText.GetChar(0);
     if (cFirst != '#' && !(cFirst >= '0' && cFirst <= '9'))
         return false;
     if (cFirst == '#')
         aText.Erase(0, 1);
     // XXX Assumes that sal_uInt16 is contained within sal_Int32:
     sal_Int32 n = aText.ToInt32();
     if (n <= 0 || n > std::numeric_limits< sal_uInt16 >::max())
         return false;
     rLineNr = static_cast< sal_uInt16 >(n);
     return true;
 }

 BreakPointDialog::BreakPointDialog( Window* pParent, BreakPointList& rBrkPntList ) :
 		ModalDialog( pParent, IDEResId( RID_BASICIDE_BREAKPOINTDLG ) ),
 		aComboBox( 		this, IDEResId( RID_CB_BRKPOINTS ) ),
 		aOKButton( 		this, IDEResId( RID_PB_OK ) ),
 		aCancelButton(	this, IDEResId( RID_PB_CANCEL ) ),
 		aNewButton(		this, IDEResId( RID_PB_NEW ) ),
 		aDelButton( 	this, IDEResId( RID_PB_DEL ) ),
 		aCheckBox( 		this, IDEResId( RID_CHKB_ACTIVE ) ),
 		aBrkText( 		this, IDEResId( RID_FT_BRKPOINTS ) ),
 		aPassText( 		this, IDEResId( RID_FT_PASS ) ),
 		aNumericField( 	this, IDEResId( RID_FLD_PASS ) ),
         m_rOriginalBreakPointList(rBrkPntList),
         m_aModifiedBreakPointList(rBrkPntList)
 {
 	FreeResource();

 	aComboBox.SetUpdateMode( sal_False );
 	BreakPoint* pBrk = m_aModifiedBreakPointList.First();
 	BreakPoint* pFirstBrk = pBrk;
 	while ( pBrk )
 	{
 		String aEntryStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
 		aEntryStr += String::CreateFromInt32( pBrk->nLine );
 		aComboBox.InsertEntry( aEntryStr, COMBOBOX_APPEND );
 		pBrk = m_aModifiedBreakPointList.Next();
 	}
 	aComboBox.SetUpdateMode( sal_True );

 	aOKButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
 	aNewButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
 	aDelButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
 //	aShowButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );

 	aCheckBox.SetClickHdl( LINK( this, BreakPointDialog, CheckBoxHdl ) );
 	aComboBox.SetSelectHdl( LINK( this, BreakPointDialog, ComboBoxHighlightHdl ) );
 	aComboBox.SetModifyHdl( LINK( this, BreakPointDialog, EditModifyHdl ) );
 	aComboBox.GrabFocus();

 	aNumericField.SetMin( 0 );
 	aNumericField.SetMax( 0x7FFFFFFF );
 	aNumericField.SetSpinSize( 1 );
 	aNumericField.SetStrictFormat( sal_True );
 	aNumericField.SetModifyHdl( LINK( this, BreakPointDialog, EditModifyHdl ) );

 	aComboBox.SetText( aComboBox.GetEntry( 0 ) );
 	UpdateFields( pFirstBrk );

 	CheckButtons();
 }

 void BreakPointDialog::SetCurrentBreakPoint( BreakPoint* pBrk )
 {
 	String aStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
 	aStr += String::CreateFromInt32( pBrk->nLine );
     aComboBox.SetText( aStr );
     UpdateFields( pBrk );
 }

 void BreakPointDialog::CheckButtons()
 {
     // "New" button is enabled if the combo box edit contains a valid line
     // number that is not already present in the combo box list; otherwise
     // "OK" and "Delete" buttons are enabled:
     sal_uInt16 nLine;
     if (lcl_ParseText(aComboBox.GetText(), nLine)
         && m_aModifiedBreakPointList.FindBreakPoint(nLine) == 0)
     {
         aNewButton.Enable();
         aOKButton.Disable();
         aDelButton.Disable();
     }
     else
     {
         aNewButton.Disable();
         aOKButton.Enable();
         aDelButton.Enable();
     }
 }

 IMPL_LINK_INLINE_START( BreakPointDialog, CheckBoxHdl, CheckBox *, pChkBx )
 {
 	BreakPoint* pBrk = GetSelectedBreakPoint();
 	if ( pBrk )
 		pBrk->bEnabled = pChkBx->IsChecked();

 	return 0;
 }
 IMPL_LINK_INLINE_END( BreakPointDialog, CheckBoxHdl, CheckBox *, pChkBx )


 IMPL_LINK( BreakPointDialog, ComboBoxHighlightHdl, ComboBox *, pBox )
 {
 	aNewButton.Disable();
 	aOKButton.Enable();
 	aDelButton.Enable();

 	sal_uInt16 nEntry = pBox->GetEntryPos( pBox->GetText() );
 	BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
 	DBG_ASSERT( pBrk, "Kein passender Breakpoint zur Liste ?" );
 	UpdateFields( pBrk );

 	return 0;
 }


 IMPL_LINK( BreakPointDialog, EditModifyHdl, Edit *, pEdit )
 {
 	if ( pEdit == &aComboBox )
 		CheckButtons();
 	else if ( pEdit == &aNumericField )
 	{
 		BreakPoint* pBrk = GetSelectedBreakPoint();
 		if ( pBrk )
 			pBrk->nStopAfter = pEdit->GetText().ToInt32();
 	}
 	return 0;
 }


 IMPL_LINK( BreakPointDialog, ButtonHdl, Button *, pButton )
 {
 	if ( pButton == &aOKButton )
     {
         m_rOriginalBreakPointList.transfer(m_aModifiedBreakPointList);
 		EndDialog( 1 );
     }
 	else if ( pButton == &aNewButton )
 	{
 		// Checkbox beruecksichtigen!
 		String aText( aComboBox.GetText() );
 		sal_uInt16 nLine;
 		sal_Bool bValid = lcl_ParseText( aText, nLine );
 		if ( bValid )
 		{
 			BreakPoint* pBrk = new BreakPoint( nLine );
 			pBrk->bEnabled = aCheckBox.IsChecked();
 			pBrk->nStopAfter = (sal_uLong) aNumericField.GetValue();
 			m_aModifiedBreakPointList.InsertSorted( pBrk );
 			String aEntryStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
 			aEntryStr += String::CreateFromInt32( pBrk->nLine );
 			aComboBox.InsertEntry( aEntryStr, COMBOBOX_APPEND );
             BasicIDEShell* pIDEShell = IDE_DLL()->GetShell();
             SfxViewFrame* pViewFrame = pIDEShell ? pIDEShell->GetViewFrame() : NULL;
 	        SfxDispatcher* pDispatcher = pViewFrame ? pViewFrame->GetDispatcher() : NULL;
 			if( pDispatcher )
 			{
 				pDispatcher->Execute( SID_BASICIDE_BRKPNTSCHANGED );
 			}
 		}
 		else
 		{
 			aComboBox.SetText( aText );
 			aComboBox.GrabFocus();
 			Sound::Beep();
 		}
 		CheckButtons();
 	}
 	else if ( pButton == &aDelButton )
 	{
 		sal_uInt16 nEntry = aComboBox.GetEntryPos( aComboBox.GetText() );
 		BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
 		if ( pBrk )
 		{
 			delete m_aModifiedBreakPointList.Remove( pBrk );
 			aComboBox.RemoveEntry( nEntry );
 			if ( nEntry && !( nEntry < aComboBox.GetEntryCount() ) )
 				nEntry--;
 			aComboBox.SetText( aComboBox.GetEntry( nEntry ) );
             BasicIDEShell* pIDEShell = IDE_DLL()->GetShell();
             SfxViewFrame* pViewFrame = pIDEShell ? pIDEShell->GetViewFrame() : NULL;
 	        SfxDispatcher* pDispatcher = pViewFrame ? pViewFrame->GetDispatcher() : NULL;

             if( pDispatcher )
 			{
 				pDispatcher->Execute( SID_BASICIDE_BRKPNTSCHANGED );
 			}
 		}
 		CheckButtons();
 	}
 //	else if ( pButton == &aShowButton )
 //	{
 //		;
 //	}

 	return 0;
 }


 void BreakPointDialog::UpdateFields( BreakPoint* pBrk )
 {
 	if ( pBrk )
 	{
 		aCheckBox.Check( pBrk->bEnabled );
 		aNumericField.SetValue( pBrk->nStopAfter );
 	}
 }


 BreakPoint* BreakPointDialog::GetSelectedBreakPoint()
 {
 	sal_uInt16 nEntry = aComboBox.GetEntryPos( aComboBox.GetText() );
 	BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
 	return pBrk;
 }
	/**************************************************************
	*
	* Licensed to the Apache Software Foundation (ASF) under one
	* or more contributor license agreements. See the NOTICE file
	* distributed with this work for additional information
	* regarding copyright ownership. The ASF licenses this file
	* to you under the Apache License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0
	*
	* Unless required by applicable law or agreed to in writing,
	* software distributed under the License is distributed on an
	* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
	* KIND, either express or implied. See the License for the
	* specific language governing permissions and limitations
	* under the License.
	*
	*************************************************************/



	// MARKER(update_precomp.py): autogen include statement, do not remove
	#include "precompiled_basctl.hxx"

	#include <limits>

	#include <vcl/sound.hxx>

	// #define ITEMID_SEARCH SID_SEARCH_ITEM
	#define _SVX_NOIDERESIDS
	#include <brkdlg.hxx>
	#include <brkdlg.hrc>
	#include <basidesh.hxx>
	#include <basidesh.hrc>
	#include <iderdll.hxx>
	#include <sfx2/dispatch.hxx>
	#include <sfx2/viewfrm.hxx>

	// FIXME Why does BreakPointDialog allow only sal_uInt16 for break-point line
	// numbers, whereas BreakPoint supports sal_uLong?

	bool lcl_ParseText( String aText, sal_uInt16& rLineNr )
	{
	// aText should look like "# n" where
	// n > 0 && n < std::numeric_limits< sal_uInt16 >::max().
	// All spaces are ignored, so there can even be spaces within the
	// number n. (Maybe it would be better to ignore all whitespace instead
	// of just spaces.)
	aText.EraseAllChars(' ');
	sal_Unicode cFirst = aText.GetChar(0);
	if (cFirst != '#' && !(cFirst >= '0' && cFirst <= '9'))
	return false;
	if (cFirst == '#')
	aText.Erase(0, 1);
	// XXX Assumes that sal_uInt16 is contained within sal_Int32:
	sal_Int32 n = aText.ToInt32();
	if (n <= 0 \|\| n > std::numeric_limits< sal_uInt16 >::max())
	return false;
	rLineNr = static_cast< sal_uInt16 >(n);
	return true;
	}

	BreakPointDialog::BreakPointDialog( Window* pParent, BreakPointList& rBrkPntList ) :
	ModalDialog( pParent, IDEResId( RID_BASICIDE_BREAKPOINTDLG ) ),
	aComboBox( this, IDEResId( RID_CB_BRKPOINTS ) ),
	aOKButton( this, IDEResId( RID_PB_OK ) ),
	aCancelButton( this, IDEResId( RID_PB_CANCEL ) ),
	aNewButton( this, IDEResId( RID_PB_NEW ) ),
	aDelButton( this, IDEResId( RID_PB_DEL ) ),
	aCheckBox( this, IDEResId( RID_CHKB_ACTIVE ) ),
	aBrkText( this, IDEResId( RID_FT_BRKPOINTS ) ),
	aPassText( this, IDEResId( RID_FT_PASS ) ),
	aNumericField( this, IDEResId( RID_FLD_PASS ) ),
	m_rOriginalBreakPointList(rBrkPntList),
	m_aModifiedBreakPointList(rBrkPntList)
	{
	FreeResource();

	aComboBox.SetUpdateMode( sal_False );
	BreakPoint* pBrk = m_aModifiedBreakPointList.First();
	BreakPoint* pFirstBrk = pBrk;
	while ( pBrk )
	{
	String aEntryStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
	aEntryStr += String::CreateFromInt32( pBrk->nLine );
	aComboBox.InsertEntry( aEntryStr, COMBOBOX_APPEND );
	pBrk = m_aModifiedBreakPointList.Next();
	}
	aComboBox.SetUpdateMode( sal_True );

	aOKButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
	aNewButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
	aDelButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );
	// aShowButton.SetClickHdl( LINK( this, BreakPointDialog, ButtonHdl ) );

	aCheckBox.SetClickHdl( LINK( this, BreakPointDialog, CheckBoxHdl ) );
	aComboBox.SetSelectHdl( LINK( this, BreakPointDialog, ComboBoxHighlightHdl ) );
	aComboBox.SetModifyHdl( LINK( this, BreakPointDialog, EditModifyHdl ) );
	aComboBox.GrabFocus();

	aNumericField.SetMin( 0 );
	aNumericField.SetMax( 0x7FFFFFFF );
	aNumericField.SetSpinSize( 1 );
	aNumericField.SetStrictFormat( sal_True );
	aNumericField.SetModifyHdl( LINK( this, BreakPointDialog, EditModifyHdl ) );

	aComboBox.SetText( aComboBox.GetEntry( 0 ) );
	UpdateFields( pFirstBrk );

	CheckButtons();
	}

	void BreakPointDialog::SetCurrentBreakPoint( BreakPoint* pBrk )
	{
	String aStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
	aStr += String::CreateFromInt32( pBrk->nLine );
	aComboBox.SetText( aStr );
	UpdateFields( pBrk );
	}

	void BreakPointDialog::CheckButtons()
	{
	// "New" button is enabled if the combo box edit contains a valid line
	// number that is not already present in the combo box list; otherwise
	// "OK" and "Delete" buttons are enabled:
	sal_uInt16 nLine;
	if (lcl_ParseText(aComboBox.GetText(), nLine)
	&& m_aModifiedBreakPointList.FindBreakPoint(nLine) == 0)
	{
	aNewButton.Enable();
	aOKButton.Disable();
	aDelButton.Disable();
	}
	else
	{
	aNewButton.Disable();
	aOKButton.Enable();
	aDelButton.Enable();
	}
	}

	IMPL_LINK_INLINE_START( BreakPointDialog, CheckBoxHdl, CheckBox *, pChkBx )
	{
	BreakPoint* pBrk = GetSelectedBreakPoint();
	if ( pBrk )
	pBrk->bEnabled = pChkBx->IsChecked();

	return 0;
	}
	IMPL_LINK_INLINE_END( BreakPointDialog, CheckBoxHdl, CheckBox *, pChkBx )



	IMPL_LINK( BreakPointDialog, ComboBoxHighlightHdl, ComboBox *, pBox )
	{
	aNewButton.Disable();
	aOKButton.Enable();
	aDelButton.Enable();

	sal_uInt16 nEntry = pBox->GetEntryPos( pBox->GetText() );
	BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
	DBG_ASSERT( pBrk, "Kein passender Breakpoint zur Liste ?" );
	UpdateFields( pBrk );

	return 0;
	}



	IMPL_LINK( BreakPointDialog, EditModifyHdl, Edit *, pEdit )
	{
	if ( pEdit == &aComboBox )
	CheckButtons();
	else if ( pEdit == &aNumericField )
	{
	BreakPoint* pBrk = GetSelectedBreakPoint();
	if ( pBrk )
	pBrk->nStopAfter = pEdit->GetText().ToInt32();
	}
	return 0;
	}



	IMPL_LINK( BreakPointDialog, ButtonHdl, Button *, pButton )
	{
	if ( pButton == &aOKButton )
	{
	m_rOriginalBreakPointList.transfer(m_aModifiedBreakPointList);
	EndDialog( 1 );
	}
	else if ( pButton == &aNewButton )
	{
	// Checkbox beruecksichtigen!
	String aText( aComboBox.GetText() );
	sal_uInt16 nLine;
	sal_Bool bValid = lcl_ParseText( aText, nLine );
	if ( bValid )
	{
	BreakPoint* pBrk = new BreakPoint( nLine );
	pBrk->bEnabled = aCheckBox.IsChecked();
	pBrk->nStopAfter = (sal_uLong) aNumericField.GetValue();
	m_aModifiedBreakPointList.InsertSorted( pBrk );
	String aEntryStr( RTL_CONSTASCII_USTRINGPARAM( "# " ) );
	aEntryStr += String::CreateFromInt32( pBrk->nLine );
	aComboBox.InsertEntry( aEntryStr, COMBOBOX_APPEND );
	BasicIDEShell* pIDEShell = IDE_DLL()->GetShell();
	SfxViewFrame* pViewFrame = pIDEShell ? pIDEShell->GetViewFrame() : NULL;
	SfxDispatcher* pDispatcher = pViewFrame ? pViewFrame->GetDispatcher() : NULL;
	if( pDispatcher )
	{
	pDispatcher->Execute( SID_BASICIDE_BRKPNTSCHANGED );
	}
	}
	else
	{
	aComboBox.SetText( aText );
	aComboBox.GrabFocus();
	Sound::Beep();
	}
	CheckButtons();
	}
	else if ( pButton == &aDelButton )
	{
	sal_uInt16 nEntry = aComboBox.GetEntryPos( aComboBox.GetText() );
	BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
	if ( pBrk )
	{
	delete m_aModifiedBreakPointList.Remove( pBrk );
	aComboBox.RemoveEntry( nEntry );
	if ( nEntry && !( nEntry < aComboBox.GetEntryCount() ) )
	nEntry--;
	aComboBox.SetText( aComboBox.GetEntry( nEntry ) );
	BasicIDEShell* pIDEShell = IDE_DLL()->GetShell();
	SfxViewFrame* pViewFrame = pIDEShell ? pIDEShell->GetViewFrame() : NULL;
	SfxDispatcher* pDispatcher = pViewFrame ? pViewFrame->GetDispatcher() : NULL;

	if( pDispatcher )
	{
	pDispatcher->Execute( SID_BASICIDE_BRKPNTSCHANGED );
	}
	}
	CheckButtons();
	}
	// else if ( pButton == &aShowButton )
	// {
	// ;
	// }

	return 0;
	}



	void BreakPointDialog::UpdateFields( BreakPoint* pBrk )
	{
	if ( pBrk )
	{
	aCheckBox.Check( pBrk->bEnabled );
	aNumericField.SetValue( pBrk->nStopAfter );
	}
	}



	BreakPoint* BreakPointDialog::GetSelectedBreakPoint()
	{
	sal_uInt16 nEntry = aComboBox.GetEntryPos( aComboBox.GetText() );
	BreakPoint* pBrk = m_aModifiedBreakPointList.GetObject( nEntry );
	return pBrk;
	}