home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / m / motifpg2.zip / ch13 / xmenu4.c < prev    next >
C/C++ Source or Header  |  1992-08-18  |  7KB  |  268 lines
  1. /*
  2.  * Copyright 1989, 1992 O'Reilly and Associates, Inc.
  3.  * See ../Copyright for complete rights and liability information.
  4.  */
  5.  
  6.  
  7. /* 
  8.  *  xmenu4.c - a pulldown menu with a cascading submenu 
  9.  */
  10.  
  11. /*
  12.  *  So that we can use fprintf:
  13.  */
  14. #include <stdio.h>
  15.  
  16. /* 
  17.  * Standard Toolkit include files:
  18.  */
  19. #include <X11/Intrinsic.h>
  20. #include <X11/StringDefs.h>
  21.  
  22. #include <X11/Shell.h>
  23.  
  24. /*
  25.  * Public include files for widgets used in this file.
  26.  */
  27. #include <X11/Xaw/Command.h>
  28. #include <X11/Xaw/Box.h>
  29. #include <X11/Xaw/Label.h>
  30.  
  31. /*
  32.  * The popup shell ID is global because both dialog and pshell
  33.  * are needed in the dialogDone callback, and both can't be
  34.  * passed in without creating a structure.
  35.  */
  36. Widget pshell, subshell, subbox, pressme;
  37.  
  38.  
  39. /*ARGSUSED*/
  40. void PlaceMenu(w, client_data, call_data)
  41. Widget w;
  42. XtPointer client_data;
  43. XtPointer call_data;
  44. {
  45.     Position x, y;
  46.  
  47.     /*
  48.      * translate coordinates in application top-level window
  49.      * into coordinates from root window origin.
  50.      */
  51.     XtTranslateCoords(pressme,                /* Widget */
  52.         (Position) 0,        /* x */
  53.         (Position) 0,       /* y */
  54.         &x, &y);          /* coords on root window */
  55.  
  56.     /* move popup shell one pixel above and left of this position 
  57.      * (it's not visible yet) */
  58.     XtVaSetValues(pshell, 
  59.             XtNx, x - 1,
  60.             XtNy, y - 1,
  61.             NULL);
  62. }
  63.  
  64. /*ARGSUSED*/
  65. void CheckRightAndPopupSubmenu(w, event, params, num_params)
  66. Widget w;
  67. XEvent *event;
  68. String *params;
  69. Cardinal *num_params;
  70. {
  71.     XLeaveWindowEvent *leave_event = (XLeaveWindowEvent *) event;
  72.     Dimension height;
  73.  
  74.     XtVaGetValues(w, 
  75.             XtNheight, &height,
  76.             NULL);
  77.  
  78.     if ((leave_event->x > 0) && (leave_event->y > 0) 
  79.                 && (leave_event->y < height)) {
  80.         /* move submenu shell to start just right of pane,
  81.          * using an arbitrary offset to place pointer in 
  82.          * first item. */
  83.         XtVaSetValues(subshell, 
  84.                 XtNx, leave_event->x_root,
  85.                 XtNy, leave_event->y_root - 12,
  86.                 NULL);
  87.         XtPopup(subshell, XtGrabExclusive);
  88.     }
  89. }
  90.  
  91. /*ARGSUSED*/
  92. void PopdownSubmenu(w, event, params, num_params)
  93. Widget w;
  94. XEvent *event;
  95. String *params;
  96. Cardinal *num_params;
  97. {
  98.     XtPopdown(subshell);
  99. }
  100.  
  101. /*
  102.  * quit button callback function
  103.  */
  104. /*ARGSUSED*/
  105. void Quit(w, client_data, call_data)
  106. Widget w;
  107. XtPointer client_data, call_data;
  108. { 
  109.     exit(0); 
  110. }
  111.  
  112. /*
  113.  * menu pane button callback function
  114.  */
  115. /*ARGSUSED*/
  116. void SubPaneChosen(w, client_data, call_data)
  117. Widget w;
  118. XtPointer client_data;  /* cast to pane_number */
  119. XtPointer call_data;  /* unused */
  120. { 
  121.     int pane_number = (int) client_data;
  122.     printf("SubPane %d chosen.\n", pane_number);
  123.     XtPopdown(subshell);
  124.     XtPopdown(pshell);
  125. }
  126.  
  127. /*
  128.  * menu pane button callback function
  129.  */
  130. /*ARGSUSED*/
  131. void MainPaneChosen(w, client_data, call_data)
  132. Widget w;
  133. XtPointer client_data;
  134. XtPointer call_data;
  135. { 
  136.     int pane_number = (int) client_data;
  137.     printf("Pane %d chosen.\n", pane_number);
  138.  
  139.     XtPopdown(pshell);
  140.     XtPopdown(subshell);
  141. }
  142.  
  143. main(argc, argv)
  144. int argc;
  145. char **argv;
  146. {
  147.     XtAppContext app_context;
  148.     Widget box, topLevel, quit, menubox, menulabel, menupane[10];
  149.     Widget sublabel, subpane[10];
  150.     int i;
  151.     String buf[50];
  152.  
  153.     static XtActionsRec trial_actions[] = {
  154.         {"checkRightAndPopupSubmenu", CheckRightAndPopupSubmenu},
  155.         {"popdownSubmenu", PopdownSubmenu},
  156.     };
  157.  
  158.     XtSetLanguageProc(NULL, (XtLanguageProc)NULL, NULL);
  159.  
  160.     topLevel = XtVaAppInitialize(
  161.         &app_context,       /* Application context */
  162.         "XMenu4",           /* application class name */
  163.         NULL, 0,            /* command line option list */
  164.         &argc, argv,        /* command line args */
  165.         NULL,               /* for missing app-defaults file */
  166.         NULL);              /* terminate varargs list */
  167.  
  168.     box = XtCreateManagedWidget(
  169.         "box",      /* widget name */
  170.         boxWidgetClass, /* widget class */
  171.         topLevel,       /* parent widget*/
  172.         NULL,       /* argument list*/
  173.         0           /* arglist size */
  174.         );
  175.  
  176.     quit = XtCreateManagedWidget(
  177.         "quit",         /* widget name */
  178.         commandWidgetClass,     /* widget class */
  179.         box,            /* parent widget*/
  180.         NULL,           /* argument list*/
  181.         0               /* arglist size */
  182.         );
  183.  
  184.     pressme = XtCreateManagedWidget(
  185.         "pressme",          /* widget name   */
  186.         commandWidgetClass,     /* widget class */
  187.         box,            /* parent widget*/
  188.         NULL,           /* argument list*/
  189.         0               /* arglist size */
  190.         );
  191.  
  192.     pshell = XtCreatePopupShell(
  193.     "pshell",        /* widget name */
  194.         transientShellWidgetClass, /* widget class */
  195.         pressme,        /* parent widget */
  196.         NULL,            /* argument list */
  197.         0            /* arglist size */
  198.         );
  199.  
  200.     menubox = XtCreateManagedWidget(
  201.         "menubox",              /* widget name   */
  202.         boxWidgetClass,         /* widget class */
  203.         pshell,                 /* parent widget*/
  204.         NULL,                   /* argument list*/
  205.         0                   /* arglist size */
  206.         );
  207.  
  208.     menulabel = XtCreateManagedWidget(
  209.         "menulabel",            /* widget name   */
  210.         labelWidgetClass,       /* widget class */
  211.         menubox,                /* parent widget*/
  212.         NULL,                   /* argument list*/
  213.         0                   /* arglist size */
  214.         );
  215.  
  216.     XtAppAddActions(app_context, trial_actions, XtNumber(trial_actions));
  217.  
  218.     for (i = 0; i < 10; i++) {
  219.       sprintf(buf, "menupane%d", i);
  220.       menupane[i] = XtCreateManagedWidget(buf,   /* widget name   */
  221.                     commandWidgetClass, menubox, NULL, 0);
  222.  
  223.       XtAddCallback(menupane[i], XtNcallback, MainPaneChosen, i);
  224.     }
  225.  
  226.     subshell = XtCreatePopupShell(
  227.         "subshell",        /* widget name */
  228.         transientShellWidgetClass, /* widget class */
  229.     pressme,        /* parent widget */
  230.         NULL,            /* argument list */
  231.         0            /* arglist size */
  232.         );
  233.  
  234.     subbox = XtCreateManagedWidget(
  235.         "subbox",               /* widget name   */
  236.         boxWidgetClass,         /* widget class */
  237.         subshell,               /* parent widget*/
  238.         NULL,                   /* argument list*/
  239.         0                   /* arglist size */
  240.         );
  241.  
  242.     sublabel = XtCreateManagedWidget(
  243.         "sublabel",             /* widget name   */
  244.         labelWidgetClass,       /* widget class */
  245.         subbox,                 /* parent widget*/
  246.         NULL,                   /* argument list*/
  247.         0                   /* arglist size */
  248.         );
  249.     
  250.     for (i = 0; i < 10; i++) {
  251.       sprintf(buf, "subpane%d", i);
  252.       subpane[i] = XtCreateManagedWidget(buf,   /* widget name   */
  253.                     commandWidgetClass, subbox, NULL, 0);
  254.  
  255.       XtAddCallback(subpane[i], XtNcallback, SubPaneChosen, i);
  256.     }
  257.  
  258.     XtAddCallback(quit, XtNcallback, Quit, NULL);
  259.  
  260.     XtAppAddActions(app_context, trial_actions, XtNumber(trial_actions));
  261.  
  262.     XtAddCallback(pshell, XtNpopupCallback, PlaceMenu, NULL);
  263.  
  264.     XtRealizeWidget(topLevel);
  265.  
  266.     XtAppMainLoop(app_context);
  267. }
  268.