#include <stdio.h>

#include <Xm/Xm.h>
#include <Xm/DrawingA.h>
#include <Xm/RowColumn.h>
#include <Xm/PushB.h>
#include <Xm/MainW.h>
#include <Xm/ScrolledW.h>
#include <Xm/Label.h>
#include <Xm/CascadeB.h>
#include <Xm/DialogS.h>
#include <Xm/BulletinB.h>
#include <Xm/Form.h>
#include <Xm/TextF.h>

#include <X11/Xmu/Editres.h>


#include "mygraph.h"
#include "mydebug.h"
#include "point.h"
#include "line.h"

typedef struct {
    Widget  Drawing_area;
    Widget  Menu_shell;
    Widget  X_dialog,Y_dialog;
} point_draw_structure;

int DEBUG;

void draw_line_callback (Widget where, XtPointer client_data, XtPointer call_data);
void draw_point_callback (Widget where, XtPointer client_data, XtPointer call_data);
void menu_popdown (Widget where, XtPointer client_data, XtPointer call_data);
void Make_Menu_Buttons(Widget parent,Widget db, Widget toplevel) ;
void make_point_dialog(Widget toplevel, Widget db, Widget button);
void do_point (Widget where, XtPointer client_data, XtPointer call_data);

main (int argc, char * argv[]) {

    XtAppContext  app_context;
    Widget        toplevel,drawing_board,line_button,main_form,
                  command_form,main_menubar ;
    char  *       myclassname = "Line";
    Arg           args[10];
    int           nargs=0;
    XmString      astring;
 
    DEBUG =  NODEBUG;


/* Initialize the application */

    toplevel = XtAppInitialize(&app_context,myclassname,NULL,0,
                &argc,argv,NULL,args,nargs);

/* Create a main form to hold everything */

    nargs = 0;
    XtSetArg(args[nargs],XmNshowSeparator,True); nargs++;
    main_form = XtCreateManagedWidget("form",xmMainWindowWidgetClass,
	      toplevel,args,nargs);

    XtManageChild(main_form);


/* For now stick a label in the command window, later if we want to add a 
   language or something like that, the interface would go here */

    nargs=0;
    astring = XmStringCreateSimple("Introduction to Computer Graphics");
    XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
    command_form  = XtCreateManagedWidget("label",xmLabelWidgetClass,main_form,
              args,nargs);
    XmStringFree(astring);
    XtManageChild(command_form);

/* set up a menubar for commands */

    nargs=0;
    main_menubar = XmCreateMenuBar(main_form,"message",args,nargs);
    XtManageChild(main_menubar);

/* Set up the canvas for our work */

    nargs=0;
    XtSetArg(args[nargs],XmNwidth,400); nargs++;
    XtSetArg(args[nargs],XmNheight,400); nargs++;
    XtSetArg(args[nargs],XmNtopWidget,line_button); nargs++;
    XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET); nargs++;

    drawing_board = XtCreateManagedWidget("msgs",xmDrawingAreaWidgetClass,
               main_form, args,nargs);
    XtManageChild(drawing_board);

/* make the items in the menu bar, the drawing primitives need access to
   the drawing board, so this is done here */

    Make_Menu_Buttons(main_menubar,drawing_board,toplevel);

/*  put them all togeather */

    XmMainWindowSetAreas(main_form, main_menubar, command_form, NULL, NULL ,
            drawing_board);

    XtRealizeWidget(toplevel);

/* Added so edit res will work */

    XtAddEventHandler(toplevel,(EventMask) 0,True, _XEditResCheckMessages,NULL);

    XtAppMainLoop(app_context);
}

void draw_line_callback 
(Widget where, XtPointer client_data, XtPointer call_data) {

    line  aline;

    read_line(&aline);
    print_line (aline);
    dc_drawline (aline,client_data);
}


static void Quit_Callback(Widget where, XtPointer cd,  XtPointer cld) {
    exit(0);
}

void Make_Menu_Buttons(Widget parent, Widget db, Widget  toplevel) {
     int nargs;
     Arg args[10];
     Widget pane, button, title, help_button;
     XmString      astring;

     nargs=0;
     pane = XmCreatePulldownMenu(parent,"pane",args,nargs);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'C'); nargs++;
     button = XmCreatePushButton(pane,"Cancel",args,nargs);
     XtManageChild(button);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'Q'); nargs++;
     button = XmCreatePushButton(pane,"Quit",args,nargs);
     XtManageChild(button);
     XtAddCallback(button,XmNactivateCallback,Quit_Callback,NULL);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'F'); nargs++;
     title = XmCreateCascadeButton(parent,"File",args,nargs);
     XtManageChild(title);

     /* primitives */

     nargs=0;
     pane = XmCreatePulldownMenu(parent,"pane",args,nargs);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'C'); nargs++;
     button = XmCreatePushButton(pane,"Cancel",args,nargs);
     XtManageChild(button);

/* The point primitive */
     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'P'); nargs++;
     button = XmCreatePushButton(pane,"Point",args,nargs);
     XtManageChild(button);


     make_point_dialog(toplevel, db, button);

/* make a line choice in the menu */

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'L'); nargs++;
     button = XmCreatePushButton(pane,"Line",args,nargs);
     XtManageChild(button);
     XtAddCallback(button,XmNactivateCallback,draw_line_callback,db);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'P'); nargs++;
     title = XmCreateCascadeButton(parent,"Primitives",args,nargs);
     XtManageChild(title);

     /* Help */

     nargs=0;
     pane = XmCreatePulldownMenu(parent,"pane",args,nargs);

     nargs=0;
     button = XmCreatePushButton(pane,"No Help For the Wicked",args,nargs);
     XtManageChild(button);

     nargs=0;
     XtSetArg(args[nargs],XmNsubMenuId,pane); nargs++;
     XtSetArg(args[nargs],XmNmnemonic,'H'); nargs++;
     title = XmCreateCascadeButton(parent,"Help",args,nargs);
     XtManageChild(title);

     nargs=0;
     XtSetArg(args[nargs],XmNmenuHelpWidget,title); nargs++;
     XtSetValues(parent,args,nargs);
}

void menu_popdown (Widget where, XtPointer client_data, XtPointer call_data)
{
   XtUnmanageChild((Widget) client_data);
}

void do_point (Widget where, XtPointer client_data, XtPointer call_data)
{
   char * p;
   point pt;

   p = XmTextFieldGetString((( point_draw_structure * ) client_data)->X_dialog);
   pt.x = atoi(p);

   p = XmTextFieldGetString((( point_draw_structure * ) client_data)->Y_dialog);
   pt.y = atoi(p);

   dc_draw_point(pt,(( point_draw_structure * )client_data)->Drawing_area);
   XtUnmanageChild((( point_draw_structure * ) client_data)->Menu_shell);
}

void draw_point_callback 
(Widget where, XtPointer client_data, XtPointer call_data) {
    XtManageChild((( point_draw_structure * )client_data)->Menu_shell);
}

void make_point_dialog(Widget toplevel, Widget db, Widget button){

     int nargs;
     Arg args[10];
     XmString      astring;
     Widget ab,pn,top,tmp;
     static point_draw_structure  pass;


     pass.Drawing_area = db;

     nargs=0;
     astring = XmStringCreateSimple("Point Dialog");
     XtSetArg(args[nargs],XmNdialogTitle,astring);nargs++;
     pass.Menu_shell = XmCreateBulletinBoardDialog(toplevel,"bb",args,nargs);
     XmStringFree(astring);

/* a form widget to hold everything */

     nargs=0;
     pn = 
      XtCreateManagedWidget("pd",xmFormWidgetClass,pass.Menu_shell,args,nargs);

/* Create a title in the bullitin Board */

     nargs=0;
     astring = XmStringCreateSimple("Enter The Point");
     XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
     top  = XtCreateManagedWidget("label",xmLabelWidgetClass,pn,
               args,nargs);
     XmStringFree(astring);
     XtManageChild(top);

     nargs=0;
     astring = XmStringCreateSimple("X:");
     XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     tmp  = XtCreateManagedWidget("label",xmLabelWidgetClass,pn,
               args,nargs);
     XmStringFree(astring);
     XtManageChild(tmp);


     nargs=0;
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     XtSetArg(args[nargs],XmNleftWidget,tmp);nargs++;
     XtSetArg(args[nargs],XmNleftAttachment,XmATTACH_WIDGET);nargs++;
     XtSetArg(args[nargs],XmNcolumns,5);nargs++;
     pass.X_dialog = 
	  XtCreateManagedWidget("Xfield",xmTextFieldWidgetClass,pn,args,nargs);
     XtManageChild(pass.X_dialog);

     top = pass.X_dialog;

     nargs=0;
     astring = XmStringCreateSimple("Y:");
     XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     tmp  = XtCreateManagedWidget("label",xmLabelWidgetClass,pn,
              args,nargs);
     XmStringFree(astring);
     XtManageChild(tmp);

     nargs=0;
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     XtSetArg(args[nargs],XmNleftWidget,tmp);nargs++;
     XtSetArg(args[nargs],XmNleftAttachment,XmATTACH_WIDGET);nargs++;
     XtSetArg(args[nargs],XmNcolumns,5);nargs++;
     pass.Y_dialog =
	 XtCreateManagedWidget("Xfield",xmTextFieldWidgetClass,pn,args,nargs);
     XtManageChild(pass.Y_dialog);

     top = pass.Y_dialog;

/* make an accept button */
     nargs=0;
     astring = XmStringCreateSimple("OK");
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
     ab = XtCreateManagedWidget("ok",xmPushButtonWidgetClass,pn,args,nargs);
     XtManageChild(ab);
     XtAddCallback(ab,XmNactivateCallback,do_point,&pass);
     XmStringFree(astring);

/* and finally a cancel button */

     nargs=0;
     astring = XmStringCreateSimple("Cancel");
     XtSetArg(args[nargs],XmNlabelString,astring);nargs++;
     XtSetArg(args[nargs],XmNtopWidget,top);nargs++;
     XtSetArg(args[nargs],XmNtopAttachment,XmATTACH_WIDGET) ;nargs++;
     XtSetArg(args[nargs],XmNleftWidget,ab);nargs++;
     XtSetArg(args[nargs],XmNleftAttachment,XmATTACH_WIDGET);nargs++;
     ab = XtCreateManagedWidget("cancel",xmPushButtonWidgetClass,pn,args,nargs);
     XtManageChild(ab);
     XtAddCallback(ab,XmNactivateCallback,menu_popdown,pass.Menu_shell);
     XmStringFree(astring);

     XtManageChild(pn);

     XtAddCallback(button,XmNactivateCallback,draw_point_callback, &pass);
}