// sample amulet program to display a main window, menu
// and allow operations through dialog boxes.
// underlying data structure is an array-based list of users
//
// hussein suleman
// july 2000

#include <string>
#include <amulet.h>

#include "userlist.h"

// dialog boxes generated by Glit
#include "deletedialog.h"
#include "adddialog.h"

// global Amulet definitions/declarations 

Am_Object MainWindow;   // main window object

char label[10][6];      // labels for text elements on window

UserList UL;            // underlying data structure

// function prototypes

void AddUserOption ( string &Name, string &SSN );
void DeleteUserOption ( string &Name );
void RefreshScreen ();

// Amulet callbacks

Am_Define_Method (Am_Object_Method, void, open_add_dialog, (Am_Object cmd)) 
{
	Am_Value retvalue;
   adddialog.Get_Object (AddNameInput).Set (Am_VALUE, "");
   adddialog.Get_Object (AddIDInput).Set (Am_VALUE, "");
   Am_Pop_Up_Window_And_Wait (adddialog, retvalue, true);
   if (retvalue.Valid ())
   {
      Am_String Name = adddialog.Get_Object (AddNameInput).Get (Am_VALUE);
      Am_String ID = adddialog.Get_Object (AddIDInput).Get (Am_VALUE);
     	AddUserOption (string (Name), string (ID));
   }
}

Am_Define_Method (Am_Object_Method, void, open_delete_dialog, (Am_Object cmd))
{
	Am_Value retvalue;
   deletedialog.Get_Object (DeleteNameInput).Set (Am_VALUE, "");
   Am_Pop_Up_Window_And_Wait (deletedialog, retvalue, true);
   if (retvalue.Valid ())
   {
      Am_String Name = deletedialog.Get_Object (DeleteNameInput).Get (Am_VALUE);
     	DeleteUserOption (string (Name));
   }
}

// main program body

int main ()
{
   // initialize Amulet system
   Am_Initialize ();

   // create main window
	MainWindow = Am_Window.Create ("Student Information Database")
		.Set (Am_LEFT, 20)
		.Set (Am_TOP, 50)
		.Set (Am_WIDTH, 500)
		.Set (Am_HEIGHT, 300)
		.Set (Am_TITLE, "Student Information Database");

   // create menu bar 
   MainWindow.Add_Part (Am_Menu_Bar.Create ()
		.Set (Am_ITEMS, Am_Value_List ()
		   .Add (Am_Command.Create ("File")
	         .Set (Am_IMPLEMENTATION_PARENT, true)
            .Set (Am_LABEL, "File")
            .Set (Am_ITEMS, Am_Value_List ()
               .Add ("Open")
               .Add (Am_Menu_Line_Command.Create ("menuline"))
               .Add (Am_Quit_No_Ask_Command.Create ("Quit"))
            )
         )
         .Add (Am_Command.Create ("Edit")
	         .Set (Am_IMPLEMENTATION_PARENT, true)
            .Set (Am_LABEL, "Edit")
            .Set (Am_ITEMS, Am_Value_List ()
               .Add (Am_Command.Create ("Add Student")
						.Set (Am_LABEL, "Add Student")
						.Set (Am_DO_METHOD, open_add_dialog)
					)
               .Add (Am_Command.Create ("Delete Student")
						.Set (Am_LABEL, "Delete Student")
						.Set (Am_DO_METHOD, open_delete_dialog)
					)
            )
			)
		)
	);

   // add headings
   MainWindow.Add_Part (Am_Text.Create ()
		.Set (Am_LEFT, 10)
		.Set (Am_TOP, 30)
		.Set (Am_TEXT, "Name                                     SSN")
	);

   // create display of student data
   for ( int j=0; j<10; j++ )
   {
      strcpy (label[j], "text0");
      label[j][4] += j;
   }
	for ( int i=0; i<10; i++ )
	{
      Am_Slot_Key TextLine = Am_Register_Slot_Name (label[i]);
		MainWindow.Add_Part (TextLine, Am_Text.Create (label[i])
			.Set (Am_LEFT, 10)
			.Set (Am_TOP, 70+(i*20))
			.Set (Am_TEXT, "")
      );
	}

   // add all windows to screen
   Am_Screen.Add_Part (MainWindow);

   adddialog_Initialize ();
   adddialog.Set (Am_VISIBLE, false);
   Am_Screen.Add_Part (adddialog);

   deletedialog_Initialize ();
   deletedialog.Set (Am_VISIBLE, false);
   Am_Screen.Add_Part (deletedialog);

	Am_Main_Event_Loop ();
  	
   Am_Cleanup ();

   return 0;
}

// add a user
void AddUserOption ( string &Name, string &SSN )
{
   UL.Add (Name, SSN);
   RefreshScreen ();
}

// remove a user
void DeleteUserOption ( string &Name )
{
   UL.Delete (Name);
   RefreshScreen ();
}

// update listing
void RefreshScreen ()
{
   string temp;
   for ( int i=0; i<10; i++ )
   {
      if (i < UL.Counter)
         temp = UL.Data[i].Output ();
      else
         temp = "";
      Am_Slot_Key TextLine = Am_Register_Slot_Name (label[i]);
		MainWindow.Set_Part (TextLine, Am_Text.Create (label[i])
			.Set (Am_LEFT, 10)
			.Set (Am_TOP, 70+(i*20))
			.Set (Am_TEXT, temp.c_str ())
      );
   }
}