/******************************************************************************
 *
 *    $Source: apphome:APlusPlus/RCS/TESTPRGS/intuition/Listview_test.cxx,v $
 *
 *    Demo for the A++ Library
 *    Copyright (C) 1994 by Armin Vogt, EMail: armin@uni-paderborn.de
 *
 *	   $Revision: 1.4 $
 *	   $Date: 1994/05/09 21:28:48 $
 *	   $Author: Armin_Vogt $
 *
 ******************************************************************************/


#include <APlusPlus/exec/SignalResponder.h>
#include <APlusPlus/intuition/GWindow.h>
#include <APlusPlus/intuition/GT_Gadgets/GT_Scroller.h>
#include <APlusPlus/intuition/GT_Gadgets/GT_Listview.h>
#include <APlusPlus/graphics/AutoDrawArea.h>

#include <iostream.h>

extern "C" {
#include <dos/dos.h>
}


volatile static char rcs_id[] = "$Id: Listview_test.cxx,v 1.4 1994/05/09 21:28:48 Armin_Vogt Exp Armin_Vogt $";



// a CTRL-C signal responder from the example in the docs
class MySRSP : public SignalResponder
{
	private:
   	BOOL running;  // indicates a received user break to object users
   public:
		MySRSP() : SignalResponder(SIGBREAKB_CTRL_C,0)
      { running = TRUE; }
		~MySRSP() {}	// NEVER FORGET DO DEFINE EVEN AN EMPTY DESTRUCTOR WITH SASC 6.51. THIS IS A KNOWN BUG!!
			
      //  overload the virtual 'signal received' action callback method.
      void actionCallback()
      {
         cout << "**Break\n";
         running = FALSE;  // end WaitSignal loop
      }
		
		// object users can check with this method wether a user break has occurred
      BOOL hasNotOccured() { return running==TRUE; }
};




// derive GWindow and add your specific message actions
class MyWindow : public GWindow
{	
	private:
		BOOL running;
   public:
      MyWindow(OWNER,AttrList& attrs) : GWindow(owner,attrs) 
		{  
			if (Ok())	// always check for the correct execution of all base class constructors
			{
				// up to now, it is necessary to announce the messages this Window class awaits
				// to the WindowCV base class
				modifyIDCMP(CLASS_NEWSIZE|CLASS_ACTIVEWINDOW);
				running = TRUE;
			}
			else running = TRUE;
      }

      ~MyWindow() {}


      void On_CLOSEWINDOW(const IntuiMessageC *msg)
      {
         cout << "CLOSEWINDOW.\n";
 			running = FALSE;
      }
      void On_ACTIVEWINDOW(const IntuiMessageC *msg)
      {
         cout << title() << " is ACTIVE.\n";
      }
      void On_SIZEVERIFY(const IntuiMessageC *msg)
      {
         cout << "SIZEVERIFY. \n";
      }
      void handleIntuiMsg(const IntuiMessageC* imsg)
      {
         switch (imsg->getClass())
         {
            case CLASS_CLOSEWINDOW :
               On_CLOSEWINDOW(imsg); break;
            case CLASS_ACTIVEWINDOW :
               On_ACTIVEWINDOW(imsg); break;
            case CLASS_SIZEVERIFY :
               On_SIZEVERIFY(imsg); break;
         }
         GWindow::handleIntuiMsg(imsg);
      }

		BOOL isNotClosed() { return running==TRUE; } 
};



void APPmain()
{
   MySRSP userBreak;
	
	NeXTBorder background((UBYTE*)"helvetica.font",13);

   MyWindow *mainWindow = new MyWindow(OWNER_NULL,
   AttrList(   WA_Title,(UBYTE*)"WindowC - close this to stop.",
      WA_Width,300,
      WA_Height,150,
      WA_MinHeight,50,
      WA_MinWidth,50,
      WA_MaxHeight,1000,
      WA_MaxWidth,1000,
      WA_DragBar,TRUE,
      WA_SizeGadget,TRUE,
      WA_DepthGadget,TRUE,
      WA_CloseGadget,TRUE,
      WA_IDCMP,TRUE,
		GOB_BorderObj(&background),
		GOB_BackgroundColor,4,
		GOB_BorderTitle, (UBYTE*)" GT_Listview & GT_Scroller ",
      TAG_END) );


   ListC labels;
   #define LABEL_CNT (4*6)


	// create a sufficient number of NodeC objects that hold the strings as names
   NodeC lnode[LABEL_CNT]= {
      (UBYTE*)"This ", (UBYTE*)"is ", (UBYTE*)"a ", (UBYTE*)"letter", (UBYTE*)"for", (UBYTE*)"you.",
	   (UBYTE*)"Use the ", (UBYTE*)"Scroller gadget", (UBYTE*)"on the right", (UBYTE*)" to scroll ", (UBYTE*)"through ", (UBYTE*)" the entry list..",
      (UBYTE*)"Date 01/26/93", (UBYTE*)" by Armin Vogt", (UBYTE*)"You see a GT_Scroller ", (UBYTE*)"connected", (UBYTE*)"with a", (UBYTE*)"GT_Listview.",
      (UBYTE*)"This", (UBYTE*)"is", (UBYTE*)"only", (UBYTE*)"a simple example.", (UBYTE*)"But take a look", (UBYTE*)"at the code.."
      };
	/* IF YOU DO NOT CAST THE STRINGS INTO (UBYTE*), SAS and GCC both seem not to terminate,
	 * at least with 6MB RAM
	 */
	 
	// add the created nodes to the ListC object
   for (int i=LABEL_CNT-1;i>=0; i--)
      labels.addHead(&lnode[i]);


   GT_Listview *listView = new GT_Listview(mainWindow,
	AttrList(	GOB_LeftFromLeftOfParent,  	3,
					GOB_TopFromTopOfParent,    	3,
					GOB_RightFromRightOfParent,   -40,
			      GOB_BottomFromBottomOfParent, -3,
					GA_Immediate,	TRUE,
					GA_RelVerify,  TRUE,			 
					GTLV_Top,	1,								// initialise with 1
			      GTLV_Labels,         &labels,			// the ListC object is compatible to a List structure
			      GTLV_ShowSelected,   NULL,
			      LAYOUTA_Spacing,     2,
			      TAG_END) );


   GT_Scroller *scroller = new GT_Scroller(mainWindow, 
	AttrList(	GOB_LeftFromRightOfPred,	5,
			      GOB_TopFromTopOfPred,		0,
			      GOB_RightFromRightOfParent,-5,
					GOB_BottomFromBottomOfPred, 0,
/*      GA_Immediate,TRUE,*/
			      GA_RelVerify,  TRUE,			      
			      PGA_Freedom,   LORIENT_VERT,
					
			      CONSTRAINT( GTSC_Top, listView, GTLV_Top),	// initialise with GTLV_Top (=1)
/* This constraint doesn't make sense since Listview does not report about scroll movements */
					
			      GTSC_Total,    LABEL_CNT,
			      GTSC_Visible,  1,
			      GTSC_Arrows,   16,
			      GT_IDCMP,      SLIDERIDCMP,
			      TAG_END) );

	// GTLV_Top is initialised from GTSC_Top, which has been initialised from GTLV_Top before
	// ==> GTLV_Top remains 1
	listView->setAttributes(AttrList(CONSTRAINT(GTLV_Top,scroller,GTSC_Top),TAG_END));
	
   mainWindow->refreshGList();		// display objects

	/* As soon as the mainWindow deletes itself after having received CLASS_CLOSEWINDOW
	 * the loop terminates since the Ok() check within APPOK(mainWindow) fails to be TRUE.
	 */
   while (userBreak.hasNotOccured() && APPOK(mainWindow) && mainWindow->isNotClosed())
   {
      SignalResponder::WaitSignal();
   }

   cout << "cleaned up. goodbye.\n";
}