// $Revision: 1.2 $
// Copyright (C) 1995 Taligent, Inc. All rights reserved.

#ifndef Taligent_CURSORTOOLSELECTIONSTATE
#include <Taligent/CursorToolSelectionState.h>
#endif
#ifndef Taligent_STANDARDARROWTOOL
#include <Taligent/StandardArrowTool.h>
#endif
#ifndef Taligent_CANVASLINE
#include <Taligent/CanvasLine.h>
#endif
#ifndef Taligent_CANVASPOLYLINE
#include <Taligent/CanvasPolyline.h>
#endif
#ifndef Taligent_CANVASPOLYGON
#include <Taligent/CanvasPolygon.h>
#endif
#ifndef Taligent_CANVASCURVE
#include <Taligent/CanvasCurve.h>
#endif
#ifndef Taligent_CANVASTEXT
#include <Taligent/CanvasText.h>
#endif
#ifndef Taligent_BASICCANVASGRAPHIC
#include <Taligent/BasicCanvasGraphic.h>
#endif
#ifndef Taligent_GRAPHICS
#include <Taligent/Graphics.h>
#endif
#ifndef Taligent_BUNDLES
#include <Taligent/Bundles.h>
#endif
#ifndef Taligent_GRAFATTRIBUTE
#include <Taligent/GrafAttribute.h>
#endif
#ifndef Taligent_RGBCOLOR
#include <Taligent/RGBColor.h>
#endif
#ifndef Taligent_VIEWROOT
#include <Taligent/ViewRoot.h>
#endif
#ifndef Taligent_REQUESTPROCESSOR
#include <Taligent/RequestProcessor.h>
#endif
#ifndef Taligent_VIEWEVENTRECEIVER
#include <Taligent/ViewEventReceiver.h>
#endif
#ifndef Taligent_MENUCONTROLS
#include <Taligent/MenuControls.h>
#endif
#ifndef Taligent_TRANSFORMS
#include <Taligent/Transforms.h>
#endif
#ifndef Taligent_LABEL
#include <Taligent/Label.h>
#endif
#ifndef Taligent_GRAFPENS
#include <Taligent/GrafPens.h>
#endif
#ifndef Taligent_MARSTESTPRESENTER
#include "MarsTestPresenter.h"
#endif
#ifndef Taligent_STANDARDGRAFEDIT
#include <Taligent/StandardGrafEdit.h>
#endif
#ifndef Taligent_SCROLLINGVIEW
#include <Taligent/ScrollingView.h>
#endif
#ifndef Taligent_CANVASTEXT
#include <Taligent/CanvasText.h>
#endif
#ifndef Taligent_TEXTMENUS
#include <Taligent/TextMenus.h>
#endif

#include "TestClasses.h"

TTestOtherClassesState::TTestOtherClassesState(TGUIBundle * theBundle, TMarsTestPresenter *thePresenter) :
	fGUIBundle(theBundle),
	fPresenter(thePresenter)
{
}

TGUIBundle*
TTestOtherClassesState::GetGUIBundle() const
{
	return fGUIBundle;
}

void
TTestOtherClassesState::Select()
{
	TGUIBundle *theGUIBundle = GetGUIBundle();
	//qprintf("TTestOtherClassesState::Select\n");
	TView *theView = fPresenter->GetView();
	if (theView) {
		TStandardCanvasView *aCanvasView = (TStandardCanvasView *) theView;
		//qprintf("TStandardView != NIL\n");
		TTestGrafEditClass aTestClass(fPresenter, fGUIBundle, aCanvasView);
		aTestClass.Test();
	}
	else {
		qprintf("TStandardView == NIL\n");
	}
}

TSubMenuItem				*TMarsTestPresenter::gTestSubMenuItem = NIL;

VersionDefinitionsMacro (TMarsTestPresenter, kOriginalVersion);
DynamicCastDefinitionsMacroOne (TMarsTestPresenter,TGUIPresenter);

const TMenuDomainID TMarsTestPresenter::kMarsAPITestDomainID	=	 TMenuDomainID("TMarsTestPresenter");
const TMenuItemID TMarsTestPresenter::kTestAllClassesMenu         = 1;

TMarsTestPresenter::TMarsTestPresenter (const TGUIBundle& bundle)
	: TMarsPresenter(bundle),
	  fCanvasViewHandle(NIL)
{
	// qprintf("TMarsTestPresenter::TMarsTestPresenter\n");
}

TMarsTestPresenter::~TMarsTestPresenter()
{ 
	// qprintf("TMarsTestPresenter::~TMarsTestPresenter\n");
	delete fCanvasViewHandle;
}

TView* 
TMarsTestPresenter::HandleCreateMainView (TGUIBundle* theBundleToAlias) const
{
	// qprintf("TMarsTestPresenter::HandleCreateMainView\n");
 	// Create and return a TStandardCanvasView on top of a TScrollingView
	TCanvasView *contentView = new TStandardCanvasView (theBundleToAlias);
	contentView->SetAllocatedArea (TGArea(TGRect(0.,0.,500.,400.)));
	::NonConst((TMarsTestPresenter*)this)->SetCanvasView(contentView);
	TCanvasView *nonConstContentView = NonConst(contentView);
	NonConst(this)->fCanvasViewHandle = new TViewHandle(*nonConstContentView);

	// put everything into a scrolling view
	TScrollingView* scrollingView = new TScrollingView(TScrollingView::kBothScrollbars);
	scrollingView->AdoptViewToScroll(contentView);
	scrollingView->SetAllocatedArea (TGArea(TGRect(0.,0.,350.,300.)));
	
	return scrollingView;
}

void 
TMarsTestPresenter::HandleMenuActivate (TMenu& theMainMenu)
{
	// qprintf("TMarsTestPresenter::HandleMenuActivate \n");
	TMarsPresenter::HandleMenuActivate(theMainMenu);
	TDeleterFor<TArchive>	theArchive = TArchive::CopyArchiveForSharedLibrary();

 	if (!TMarsTestPresenter::gTestSubMenuItem) {
	    // Test menu
		TMenu*  aMenu = new TMenu;
		aMenu->SetControlLayout(MControl::kTopToBottom);
		aMenu->SetItemLayout(MControl::kTopToBottom);


		TMomentaryMenuItem *testMenu = new TMomentaryMenuItem ();
		testMenu->SetControlLayout(MControl::kTopToBottom);
		{
			TDeleterFor<TText> theText = CopyLocalizedText(theArchive, "Test Classes");
			testMenu->AdoptLabel(new TTextLabel(theText));
			testMenu->AdoptState(new TTestOtherClassesState(GetGUIBundle(), this) );
		}
		aMenu->AdoptLast(testMenu);
		TSubMenuItem* theSubMenuItem = new TSubMenuItem( aMenu,
														new TTextLabel(CopyLocalizedText(theArchive, "Test")));
		gTestSubMenuItem = theSubMenuItem;
	}
	theMainMenu.AdoptLast (TMarsTestPresenter::gTestSubMenuItem);
}


void 
TMarsTestPresenter::HandleMenuDeactivate(TMenu& theMainMenu)
{	
	// qprintf("TMarsTestPresenter::HandleMenuDeactivate\n");
	TMarsTestPresenter::gTestSubMenuItem->GetOwner()->Orphan(*TMarsTestPresenter::gTestSubMenuItem);
	TMarsPresenter::HandleMenuDeactivate(theMainMenu);
}


TStandardText*
TMarsTestPresenter::CopyLocalizedText(TArchive* theArchive, const TStandardText& theKey ) const
{
	// qprintf("TMarsTestPresenter::CopyLocalizedText\n");
	TStandardText *returnText;
	try {
		TArchiveEnvelope<TStandardText>	theEnvelope(theArchive, GetLocale());
		returnText =  theEnvelope.CopyObject( theKey );
	}
	catch ( ... ) {
		returnText = new TStandardText(theKey);
	}
	return returnText;
}


TView*     
TMarsTestPresenter::GetView() 
{
	TView *theView = NIL;
	if (fCanvasViewHandle)
		theView = fCanvasViewHandle->GetView();
	
	return theView;
}

// The Mars stationery

static TGUIModelPresenterStationeryFor<TStandardCanvasModel,TMarsTestPresenter> stationery;