/*****************************************************************
            CS576 Assignment#3 (motif)
            By: Sahar M. Ghanem
*********** *******************************************************/

/*-----------------------------Includes----------------------------*/
#include <stdio.h>
#include <string.h>
#include <X11/Intrinsic.h>
#include <X11/Xlib.h>
#include <X11/StringDefs.h>
#include <X11/Shell.h>
#include <Xm/Xm.h>
#include <Xm/Form.h>
#include <Xm/Frame.h>
#include <Xm/Label.h>
#include <Xm/RowColumn.h>
#include <Xm/PushB.h>
#include <Xm/ToggleB.h>
#include <Xm/MessageB.h>

/*-------------------------------Defines---------------------------*/
#define MINUSERS     2
#define MAXUSERS     6
#define CHOICES      4
#define EXIST        0
#define SEND         1
#define QUIT         2
#define QUITMSG      "Really Quit ?"
#define GOPIZZAMSG   " *** GoPizza *** "
#define COUNTDOWNMSG "  Count Down  "
#define LIKEMSG      "Like"
#define DISLIKEMSG   "Dislike"
#define TOPPINGMSG   " ** Toppings ** "
#define TOTALMSG     "  Totals"
#define LIKETITLE    "  Like Totals"
#define DISLIKETITLE "  Dislike Totals"
#define SENDTITLE    "  Send  "
#define QUITTITLE    "  Quit  "

/*--------------------------------Typedefs-----------------------*/
typedef struct
{ Widget  shell,top_form,
          top_frame,gopizza_label,countdown_rowcol,countdown_title,countdown_label,
          middle_frame,middle_rowcol,
          ch_rowcol[CHOICES+1],like_toggle[CHOICES],dislike_toggle[CHOICES],
          topping_label[CHOICES+1],
          like_label[CHOICES+1],dislike_label[CHOICES+1],
          bottom_frame,bottom_rowcol,send_button,quit_button,
          dialog,
          table_form,table_frame,table_rowcol,table_label[MAXUSERS+3][CHOICES+1],table_button;} 
widgetset;

/*--------------------------------Prototypes------------------------*/
void InitData();
void ChangeState(int flag);
void Tabulate();

void       sendCallback(Widget w,XtPointer clientdata,XtPointer calldata);
void       quitCallback(Widget w,XtPointer clientdata,XtPointer calldata);
void reallyquitCallback(Widget w,XtPointer clientdata,XtPointer calldata);
void  tablequitCallback(Widget w,XtPointer clientdata,XtPointer calldata);

/*----------------------------Global data----------------------------*/
widgetset user[MAXUSERS];
int       nusers,countdown, user_state[MAXUSERS],like_totals[CHOICES],dislike_totals[CHOICES];
Boolean   like_table[MAXUSERS][CHOICES],dislike_table[MAXUSERS][CHOICES];
char      *toppings[]={"  Mushrooms","  Onions","  Black Olives","  Green peppers"};
/*********************************************************************/

/*--------------------------------Main-------------------------------*/
main(int argc, char *argv[])
  
{
  XtAppContext  app;
  Display       *display[MAXUSERS];
  int           i,j;
  char          str[50];
  long bg;
  
  if( (argc < (MINUSERS+1)) || (argc > (MAXUSERS+1)) )
     {
         printf("\n No of users must be %d-%d \n",MINUSERS,MAXUSERS);
         exit (-1);
     }
   else
         nusers=argc-1;
   XtToolkitInitialize();
   app = XtCreateApplicationContext();
   for(i=0;i< nusers;i++)
      if ( (display[i] = XtOpenDisplay(app, argv[i+1],argv[0], "disp", NULL, 0,&argc, argv))==NULL)
      {
        printf("\n Error in display %s \n",argv[i+1]);
        exit (-1);
      }
 
  InitData();

  for(i=0;i<nusers;i++)
   { 
      bg = WhitePixel(display[i],DefaultScreen(display[i]));

      user[i].shell = XtAppCreateShell(app,"shell",applicationShellWidgetClass,display[i], NULL, 0);
      
      user[i].top_form = XtCreateManagedWidget("topform", xmFormWidgetClass,user[i].shell, NULL,0);
   

      user[i].top_frame=XtVaCreateManagedWidget("topframe",xmFrameWidgetClass,user[i].top_form,
                                          XmNtopAttachment,XmATTACH_FORM,
                                          XmNleftAttachment,XmATTACH_FORM,
                                          XmNrightAttachment,XmATTACH_FORM,
                                          XmNshadowType,XmSHADOW_ETCHED_IN,
                                          XmNshadowThickness,4,
                                          XmNleftOffset,10,
                                          XmNrightOffset,10,
                                          XmNtopOffset,10,NULL);
  
    user[i].gopizza_label=XtVaCreateManagedWidget(GOPIZZAMSG,xmLabelWidgetClass,user[i].top_frame,
                                             XmNchildType,XmFRAME_TITLE_CHILD, 
                                             XmNchildHorizontalAlignment,XmALIGNMENT_CENTER,NULL);
     
    user[i].countdown_rowcol=XtVaCreateManagedWidget("countdownrowcol",xmRowColumnWidgetClass,user[i].top_frame,
                           XmNorientation,XmHORIZONTAL,                           
                           XmNentryAlignment,XmALIGNMENT_CENTER,NULL);	     

     user[i].countdown_title=XtVaCreateManagedWidget(COUNTDOWNMSG,xmLabelWidgetClass,user[i].countdown_rowcol,
                                                 NULL);
	
      sprintf(str," %d ",countdown);
      user[i].countdown_label=XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].countdown_rowcol,
                                                XmNalignment,XmALIGNMENT_CENTER, XmNbackground,bg,NULL) ;     
    /*-------------------*/
    
    user[i].middle_frame=XtVaCreateManagedWidget("middleframe",xmFrameWidgetClass,user[i].top_form,
                                          XmNtopAttachment,XmATTACH_WIDGET,XmNtopWidget,user[i].top_frame,
                                          XmNleftAttachment,XmATTACH_FORM,
                                          XmNrightAttachment,XmATTACH_FORM,
                                          XmNshadowType,XmSHADOW_ETCHED_IN,
                                          XmNshadowThickness,4,
                                          XmNleftOffset,10,
                                          XmNrightOffset,10,
                                          XmNtopOffset,10,NULL);

     user[i].middle_rowcol=XtVaCreateManagedWidget("middlerowcol",xmRowColumnWidgetClass,user[i].middle_frame,
                                           XmNchildType,XmFRAME_WORKAREA_CHILD,
                                           XmNorientation,XmHORIZONTAL,
                                           XmNnumColumns,CHOICES+1,                                        
                                           XmNpacking,XmPACK_COLUMN,
                                           NULL);	
    
   
      for(j=0;j<=CHOICES;j++)
       {
       
	  
          
     
       if(j==0) sprintf(str,"%s",TOPPINGMSG); else sprintf(str,"%s",toppings[j-1]);

       user[i].topping_label[j]= XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].middle_rowcol,
                     XmNalignment,XmALIGNMENT_CENTER,NULL);
        
       user[i].ch_rowcol[j]=XtVaCreateManagedWidget("chrowcol",xmRowColumnWidgetClass,user[i].middle_rowcol,
                              XmNorientation,XmHORIZONTAL,
                              XmNentryBorder,1,
                              XmNradioBehavior,TRUE,
                              XmNradioAlwaysOne,FALSE,NULL);
          
          if(j>0)
	    {
  user[i].like_toggle[j-1]=XtCreateManagedWidget(LIKEMSG,xmToggleButtonWidgetClass,user[i].ch_rowcol[j],NULL,0);
 user[i].dislike_toggle[j-1]=XtCreateManagedWidget(DISLIKEMSG,xmToggleButtonWidgetClass,user[i].ch_rowcol[j],NULL,0);
            }                                  
       
       if(j==0) sprintf(str,LIKETITLE); else sprintf(str,"   %d",like_totals[j-1]);
   
  if(j==0)
  user[i].like_label[j]=XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].middle_rowcol,NULL);
  else
  user[i].like_label[j]=XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].middle_rowcol,XmNbackground,bg,NULL);

       if(j==0) sprintf(str,DISLIKETITLE); else sprintf(str,"   %d",dislike_totals[j-1]);

if(j==0)
user[i].dislike_label[j]=XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].middle_rowcol,NULL);
else
user[i].dislike_label[j]=XtVaCreateManagedWidget(str,xmLabelWidgetClass,user[i].middle_rowcol,XmNbackground,bg,NULL);

    }


     /*-----------------*/
     user[i].bottom_frame=XtVaCreateManagedWidget("bottomframe",xmFrameWidgetClass,user[i].top_form,
                                       XmNtopAttachment,XmATTACH_WIDGET,XmNtopWidget,user[i].middle_frame,
                                       XmNbottomAttachment,XmATTACH_FORM,
                                       XmNleftAttachment,XmATTACH_FORM,
                                       XmNrightAttachment,XmATTACH_FORM,NULL );

     user[i].bottom_rowcol=XtVaCreateManagedWidget("bottomrowcol",xmRowColumnWidgetClass,user[i].bottom_frame,
                           XmNorientation,XmHORIZONTAL,                           
                           XmNentryBorder,1,NULL);	
    
      user[i].send_button=XtCreateManagedWidget(SENDTITLE,xmPushButtonWidgetClass,user[i].bottom_rowcol,NULL,0);
      
      XtAddCallback(user[i].send_button,XmNactivateCallback,sendCallback,NULL);
                                       
      user[i].quit_button=XtCreateManagedWidget(QUITTITLE,xmPushButtonWidgetClass,user[i].bottom_rowcol,NULL,0);
                                             
      XtAddCallback(user[i].quit_button,XmNactivateCallback,quitCallback,NULL);
      /*--------------------------*/                                             	

    			
    XtRealizeWidget(user[i].shell);
    if(i==0) sprintf(str,"Initiator"); else sprintf(str,"Participant %d",i+1);
    XStoreName( display[i],XtWindow(user[i].shell),str);
    }

   
  
  XtAppMainLoop(app);
}

/*-------------------------------------------------------InitData-----------------------------*/
void InitData()

{
  int i,j;

   countdown=nusers;

   for(i=0;i<nusers;i++)
   {
       user_state[i]=EXIST;

       for(j=0;j<CHOICES;j++)
       {
           like_table[i][j]=FALSE;
           dislike_table[i][j]=FALSE;
       }
   }

  for(i=0;i<CHOICES;i++)
    {
        like_totals[i]=0;
         dislike_totals[i]=0;
    }
}

/*--------------------------ChangeState-------------------------------------------------*/
void ChangeState(int flag)
  {
  
    XmString xmstr;
    char str[50];
    int i,j;

  sprintf(str,"  %d ",countdown);

  xmstr=XmStringCreateLtoR(str,XmFONTLIST_DEFAULT_TAG);

  for(i=0;i<nusers;i++)
    if (user_state!=QUIT)
        XtVaSetValues(user[i].countdown_label,XmNlabelString,xmstr,NULL); 
  
  if(flag==SEND)
   for(j=0;j<CHOICES;j++)
     {
       sprintf(str,"   %d",like_totals[j]);
       xmstr=XmStringCreateLtoR(str,XmFONTLIST_DEFAULT_TAG);
      
       for(i=0;i<nusers;i++)
          if(user_state[i]!=QUIT)
              XtVaSetValues(user[i].like_label[j+1],XmNlabelString,xmstr,NULL); 
  

      sprintf(str,"   %d",dislike_totals[j]);
      xmstr=XmStringCreateLtoR(str,XmFONTLIST_DEFAULT_TAG);
      
      for(i=0;i<nusers;i++)
          if(user_state[i]!=QUIT)
              XtVaSetValues(user[i].dislike_label[j+1],XmNlabelString,xmstr,NULL);
      }
  XmStringFree(xmstr);
  
     }
/*----------------------------------Tabulate-----------------------------------------*/
void Tabulate()
{
  int uno,i,j;
  char str[50];

  for(uno=0;uno<nusers;uno++)
     if(user_state[uno]!=QUIT) 
  {
       XtUnrealizeWidget(user[uno].top_form);
     
       user[uno].table_form = XtCreateManagedWidget("tableform", xmFormWidgetClass,user[uno].shell, NULL,0);
    

       user[uno].table_frame=XtVaCreateManagedWidget("tableframe",xmFrameWidgetClass,user[uno].table_form,
                                          XmNtopAttachment,XmATTACH_FORM,
                                          XmNleftAttachment,XmATTACH_FORM,
                                          XmNrightAttachment,XmATTACH_FORM,
                                          XmNbottomAttachment,XmATTACH_FORM,
                                          XmNshadowType,XmSHADOW_ETCHED_IN,
                                          XmNshadowThickness,4,
                                          XmNleftOffset,10,
                                          XmNrightOffset,10,
                                          XmNtopOffset,10,NULL);

       user[uno].table_rowcol=XtVaCreateManagedWidget("tablerowcol",xmRowColumnWidgetClass,user[uno].table_frame,
                           XmNorientation,XmHORIZONTAL,
                           XmNnumColumns,nusers+4,                                        
                           XmNpacking,XmPACK_COLUMN,
                           XmNentryBorder,1,NULL);	
   
      user[uno].table_label[0][0]=
             XtCreateManagedWidget("User Number",xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);

   for(i=0;i<CHOICES;i++)
         user[uno].table_label[0][i+1]=
               XtCreateManagedWidget(toppings[i],xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
 
  
   for(i=0;i<nusers;i++)
     {
       sprintf(str,"   %d",i+1);
       user[uno].table_label[i+1][0]=XtCreateManagedWidget(str,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
       
       for(j=0;j<CHOICES;j++)
       { 
          if(like_table[i][j]) sprintf(str,LIKEMSG);
           else if (dislike_table[i][j]) sprintf(str,DISLIKEMSG);
            else sprintf(str,"-");

         user[uno].table_label[i+1][j+1]=XtCreateManagedWidget(str,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
      
       }
     }	  

   
   user[uno].table_label[nusers+1][0]=
         XtCreateManagedWidget(LIKETITLE,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
  
   for(i=0;i<CHOICES;i++)
     {
      sprintf(str,"   %d",like_totals[i]);
      user[uno].table_label[nusers+1][i+1]=
       XtCreateManagedWidget(str,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
     }
  

  user[uno].table_label[nusers+2][0]=
         XtCreateManagedWidget(DISLIKETITLE,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
  
   for(i=0;i<CHOICES;i++)
     {
      sprintf(str,"   %d",dislike_totals[i]);
      user[uno].table_label[nusers+2][i+1]=
       XtCreateManagedWidget(str,xmLabelWidgetClass,user[uno].table_rowcol,NULL,0);
     }

   user[uno].table_button=XtCreateManagedWidget(QUITTITLE,xmPushButtonWidgetClass,user[uno].table_rowcol,NULL,0);
                           
   XtAddCallback(user[uno].table_button,XmNactivateCallback,tablequitCallback,NULL);
   }
					 
}
/*-------------------------------SendCallback-----------------------------------------------*/
void sendCallback(Widget w,XtPointer clientdata,XtPointer calldata)
{
  int uno,i;
 
  uno=0;

  while(uno<nusers)
       {
       if  (user_state[uno]==EXIST)
	  if (user[uno].send_button==w) break;
         
       uno++; 
       }


 if(uno<nusers)
 {
    for(i=0;i<CHOICES;i++)
    {
  
      if( (like_table[uno][i]=XmToggleButtonGetState(user[uno].like_toggle[i]))==TRUE)
        like_totals[i]++;
     XtVaSetValues(user[uno].like_toggle[i],XmNsensitive,FALSE,NULL);
     if( (dislike_table[uno][i]=XmToggleButtonGetState(user[uno].dislike_toggle[i]))==TRUE)
       dislike_totals[i]++;
     XtVaSetValues(user[uno].dislike_toggle[i],XmNsensitive,FALSE,NULL);
     
    }
   countdown--;
   user_state[uno]=SEND;
   ChangeState(SEND);
 }

}


/*-----------------------quitCallback----------------------------------------------------------*/
void quitCallback(Widget w,XtPointer clientdata,XtPointer calldata)
{
  int uno;
  XmString xmstring,title;
  char str[50];

    uno=0;

    while(uno<nusers)
     {
       if  (user_state[uno]!=QUIT)
          if (user[uno].quit_button==w) break;
       uno++;
      }

   if( uno<nusers )
   {  

    user[uno].dialog = (Widget) XmCreateQuestionDialog(w,"dialog",NULL,0);
 
    xmstring=XmStringCreateLtoR(QUITMSG,XmFONTLIST_DEFAULT_TAG);
    
    if(uno==0) sprintf(str,"Initiator"); else sprintf(str,"Participant %d",uno+1);
   
    title==XmStringCreateSimple(str);
    
    XtVaSetValues(user[uno].dialog, 
                  XmNdialogTitle,title,
                  XmNmessageString,xmstring,
                  XmNdialogStyle,XmDIALOG_PRIMARY_APPLICATION_MODAL,
                  NULL);
  
    XmStringFree(xmstring);
    XmStringFree(title);

    XtUnmanageChild(XmMessageBoxGetChild(user[uno].dialog,XmDIALOG_HELP_BUTTON)); 

    XtAddCallback(user[uno].dialog,XmNokCallback,reallyquitCallback,(XtPointer) uno);
  
    XtManageChild(user[uno].dialog);

    
} 

  }
/*----------------------------------reallyquitCallback--------------------------------*/
void reallyquitCallback(Widget w,XtPointer clientdata,XtPointer calldata)
{
  int uno=(int) clientdata;
 
  if(uno==0)
      Tabulate();
  else
    {
     if(user_state[uno]==EXIST) countdown--;
     user_state[uno]==QUIT;
     XtUnrealizeWidget(user[uno].shell); 
     ChangeState(QUIT); 
   }
}
/*---------------------------tablequitCallback -----------------------------------------*/
void tablequitCallback(Widget w,XtPointer clientdata,XtPointer calldata)
{
    int uno;

    uno=0;

    while(uno<nusers)
     {
       if  (user_state[uno]!=QUIT)
              if (user[uno].table_button==w) break;
        uno++;
      }

    user_state[uno]=QUIT;

    XtUnrealizeWidget(user[uno].shell); 
  
    if(uno==0) exit(0);
   
}
/*-----------------------------------------------------------------------------*
/*********************************************************************************/