SimpleMenu.c File Reference

#include <stdio.h>
#include <X11/IntrinsicP.h>
#include <X11/StringDefs.h>
#include <X11/Xaw3d/XawInit.h>
#include <X11/Xaw3d/SimpleMenP.h>
#include <X11/Xaw3d/SmeBSB.h>
#include <X11/Xaw3d/Cardinals.h>
#include <X11/Xmu/Initer.h>
#include <X11/Xmu/CharSet.h>

Include dependency graph for SimpleMenu.c:

Go to the source code of this file.

Defines
#define	streq(a, b)   ( strcmp((a), (b)) == 0 )
#define	offset(field)   XtOffsetOf(SimpleMenuRec, simple_menu.field)
#define	superclass   (&overrideShellClassRec)
#define	ForAllChildren(smw, childP)
Functions
static void	Redisplay ()
static void	Realize ()
static void	Resize ()
static void	ChangeManaged ()
static void	Initialize ()
static void	ClassInitialize ()
static void	ClassPartInitialize ()
static Boolean	SetValues ()
static Boolean	SetValuesHook ()
static XtGeometryResult	GeometryManager ()
static void	Highlight ()
static void	Unhighlight ()
static void	Notify ()
static void	PositionMenuAction ()
static void	MakeSetValuesRequest ()
static void	CreateLabel ()
static void	Layout ()
static void	AddPositionAction ()
static void	PositionMenu ()
static void	ChangeCursorOnGrab ()
static Dimension	GetMenuWidth ()
static Dimension	GetMenuHeight ()
static Widget	FindMenu ()
static SmeObject	GetEventEntry ()
static void	MoveMenu ()
static void	ClassPartInitialize (WidgetClass wc)
static void	Initialize (Widget request, Widget new, ArgList args, Cardinal *num_args)
static void	Redisplay (Widget w, XEvent *event, Region region)
static void	Realize (Widget w, XtValueMask *mask, XSetWindowAttributes *attrs)
static void	Resize (Widget w)
static Boolean	SetValues (Widget current, Widget request, Widget new, ArgList args, Cardinal *num_args)
static Boolean	SetValuesHook (Widget w, ArgList arglist, Cardinal *num_args)
static XtGeometryResult	GeometryManager (Widget w, XtWidgetGeometry *request, XtWidgetGeometry *reply)
static void	ChangeManaged (Widget w)
static void	PositionMenuAction (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	Unhighlight (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	Highlight (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	Notify (Widget w, XEvent *event, String *params, Cardinal *num_params)
void	XawSimpleMenuAddGlobalActions (XtAppContext app_con)
Widget	XawSimpleMenuGetActiveEntry (Widget w)
void	XawSimpleMenuClearActiveEntry (Widget w)
static void	CreateLabel (Widget w)
static void	Layout (Widget w, Dimension *width_ret, Dimension *height_ret)
static void	AddPositionAction (XtAppContext app_con, XPointer data)
static Widget	FindMenu (Widget widget, String name)
static void	PositionMenu (Widget w, XPoint *location)
static void	MoveMenu (Widget w, Position x, Position y)
static void	ChangeCursorOnGrab (Widget w, XtPointer junk, XtPointer garbage)
static void	MakeSetValuesRequest (Widget w, Dimension width, Dimension height)
static Dimension	GetMenuWidth (Widget w, Widget w_ent)
static Dimension	GetMenuHeight (Widget w)
static SmeObject	GetEventEntry (Widget w, XEvent *event)
Variables
static XtResource	resources []
static char	defaultTranslations []
static XtActionsRec	actionsList []
static CompositeClassExtensionRec	extension_rec
SimpleMenuClassRec	simpleMenuClassRec
WidgetClass	simpleMenuWidgetClass = (WidgetClass)&simpleMenuClassRec

---

Define Documentation

#define ForAllChildren	(	smw,
		childP		)

Value:

for ( (childP) = (SmeObject *) (smw)->composite.children ; \
        (childP) < (SmeObject *) ( (smw)->composite.children + \
                                 (smw)->composite.num_children ) ; \
        (childP)++ )

Definition at line 195 of file SimpleMenu.c.

#define offset

(

field

)

XtOffsetOf(SimpleMenuRec, simple_menu.field)

Definition at line 52 of file SimpleMenu.c.

#define streq	(	a,
		b		)	( strcmp((a), (b)) == 0 )

Definition at line 50 of file SimpleMenu.c.

#define superclass   (&overrideShellClassRec)

Definition at line 142 of file SimpleMenu.c.

---

Function Documentation

static void AddPositionAction	(	XtAppContext	app_con,
		XPointer	data
	)			[static]

Definition at line 970 of file SimpleMenu.c.

References PositionMenuAction().

{
    static XtActionsRec pos_action[] = {
        { "XawPositionSimpleMenu", PositionMenuAction },
    };

    XtAppAddActions(app_con, pos_action, XtNumber(pos_action));
}

Here is the call graph for this function:

static void AddPositionAction

(

)

[static]

static void ChangeCursorOnGrab	(	Widget	w,
		XtPointer	junk,
		XtPointer	garbage
	)			[static]

Definition at line 1107 of file SimpleMenu.c.

References _SimpleMenuPart::cursor, and _SimpleMenuRec::simple_menu.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    
    /*
     * The event mask here is what is currently in the MIT implementation.
     * There really needs to be a way to get the value of the mask out
     * of the toolkit (CDP 5/26/89).
     */
    
    XChangeActivePointerGrab(XtDisplay(w), ButtonPressMask|ButtonReleaseMask,
                             smw->simple_menu.cursor, 
                             XtLastTimestampProcessed(XtDisplay(w)));
}

static void ChangeCursorOnGrab

(

)

Referenced by Initialize().

Here is the caller graph for this function:

static void ChangeManaged

(

Widget

w

)

[static]

Definition at line 582 of file SimpleMenu.c.

References Layout().

{
    Layout(w, (Dimension *)NULL, (Dimension *)NULL);
}

Here is the call graph for this function:

static void ChangeManaged

(

)

static void ClassInitialize

(

)

Definition at line 573 of file Box.c.

References NULL, XawInitializeWidgetSet(), XmuCvtStringToColorCursor(), XmuCvtStringToOrientation(), XtNpointerColor, XtNpointerColorBackground, and XtRColorCursor.

{
    XawInitializeWidgetSet();
    XtAddConverter( XtRString, XtROrientation, XmuCvtStringToOrientation,
                    (XtConvertArgList)NULL, (Cardinal)0 );
}

Here is the call graph for this function:

static void ClassPartInitialize

(

WidgetClass

wc

)

[static]

Definition at line 231 of file SimpleMenu.c.

References _SimpleMenuClassRec::composite_class.

{
    SimpleMenuWidgetClass smwc = (SimpleMenuWidgetClass) wc;

/*
 * Make sure that our subclass gets the extension rec too.
 */

    extension_rec.next_extension = smwc->composite_class.extension;
    smwc->composite_class.extension = (XtPointer) &extension_rec;
}

static void ClassPartInitialize

(

)

static void CreateLabel

(

Widget

w

)

[static]

Definition at line 837 of file SimpleMenu.c.

References args, _SimpleMenuRec::composite, i, _SimpleMenuPart::label, _SimpleMenuPart::label_class, _SimpleMenuPart::label_string, _SimpleMenuRec::simple_menu, TWO, void(), XtJustifyCenter, and XtNlabel.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    Widget * child, * next_child;
    int i;
    Arg args[2];

    if ( (smw->simple_menu.label_string == NULL) ||
         (smw->simple_menu.label != NULL) ) {
        char error_buf[BUFSIZ];

        (void) sprintf(error_buf, "Xaw Simple Menu Widget: %s or %s, %s",
                "label string is NULL", "label already exists", 
                "no label is being created.");
        XtAppWarning(XtWidgetToApplicationContext(w), error_buf);
        return;
    }

    XtSetArg(args[0], XtNlabel, smw->simple_menu.label_string);
    XtSetArg(args[1], XtNjustify, XtJustifyCenter);
    smw->simple_menu.label = (SmeObject) 
                              XtCreateManagedWidget("menuLabel", 
                                            smw->simple_menu.label_class, w,
                                            args, TWO);

    next_child = NULL;
    for (child = smw->composite.children + smw->composite.num_children,
         i = smw->composite.num_children ; i > 0 ; i--, child--) {
        if (next_child != NULL)
            *next_child = *child;
        next_child = child;
    }
    *child = (Widget) smw->simple_menu.label;
}

Here is the call graph for this function:

static void CreateLabel

(

)

Referenced by Initialize(), and SetValues().

Here is the caller graph for this function:

static Widget FindMenu	(	Widget	widget,
		String	name
	)			[static]

Definition at line 989 of file SimpleMenu.c.

{
    Widget w, menu;
    
    for ( w = widget ; w != NULL ; w = XtParent(w) )
        if ( (menu = XtNameToWidget(w, name)) != NULL )
            return(menu);
    return(NULL);
}

static Widget FindMenu

(

)

[static]

Referenced by PositionMenuAction().

Here is the caller graph for this function:

static XtGeometryResult GeometryManager	(	Widget	w,
		XtWidgetGeometry *	request,
		XtWidgetGeometry *	reply
	)			[static]

Definition at line 512 of file SimpleMenu.c.

References Layout(), mode, and _SmeRec::rectangle.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) XtParent(w);
    SmeObject entry = (SmeObject) w;
    XtGeometryMask mode = request->request_mode;
    XtGeometryResult answer;
    Dimension old_height, old_width;

    if ( !(mode & CWWidth) && !(mode & CWHeight) )
        return(XtGeometryNo);

    reply->width = request->width;
    reply->height = request->height;

    old_width = entry->rectangle.width;
    old_height = entry->rectangle.height;

    Layout(w, &(reply->width), &(reply->height) );

/*
 * Since we are an override shell and have no parent there is no one to
 * ask to see if this geom change is okay, so I am just going to assume
 * we can do whatever we want.  If you subclass be very careful with this
 * assumption, it could bite you.
 *
 * Chris D. Peterson - Sept. 1989.
 */

    if ( (reply->width == request->width) &&
         (reply->height == request->height) ) {

        if ( mode & XtCWQueryOnly ) { /* Actually perform the layout. */
            entry->rectangle.width = old_width;
            entry->rectangle.height = old_height;       
        }
        else {
            Layout(( Widget) smw, (Dimension *)NULL, (Dimension *)NULL);
        }
        answer = XtGeometryDone;
    }
    else {
        entry->rectangle.width = old_width;
        entry->rectangle.height = old_height;   

        if ( ((reply->width == request->width) && !(mode & CWHeight)) ||
              ((reply->height == request->height) && !(mode & CWWidth)) ||
              ((reply->width == request->width) && 
               (reply->height == request->height)) )
            answer = XtGeometryNo;
        else {
            answer = XtGeometryAlmost;
            reply->request_mode = 0;
            if (reply->width != request->width)
                reply->request_mode |= CWWidth;
            if (reply->height != request->height)
                reply->request_mode |= CWHeight;
        }
    }
    return(answer);
}

Here is the call graph for this function:

static XtGeometryResult GeometryManager

(

)

[static]

static SmeObject GetEventEntry	(	Widget	w,
		XEvent *	event
	)			[static]

Definition at line 1232 of file SimpleMenu.c.

References _SimpleMenuRec::core, ForAllChildren, _SimpleMenuPart::label, and _SimpleMenuRec::simple_menu.

{
    Position x_loc = 0, y_loc = 0;
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject * entry;
    
    switch (event->type) {
    case MotionNotify:
        x_loc = event->xmotion.x;
        y_loc = event->xmotion.y;
        break;
    case EnterNotify:
    case LeaveNotify:
        x_loc = event->xcrossing.x;
        y_loc = event->xcrossing.y;
        break;
    case ButtonPress:
    case ButtonRelease:
        x_loc = event->xbutton.x;
        y_loc = event->xbutton.y;
        break;
    default:
        XtAppError(XtWidgetToApplicationContext(w),
                   "Unknown event type in GetEventEntry().");
        break;
    }
    
    if ( (x_loc < 0) || (x_loc >= (int)smw->core.width) || (y_loc < 0) ||
        (y_loc >= (int)smw->core.height) )
        return(NULL);
    
    ForAllChildren(smw, entry) {
        if (!XtIsManaged ((Widget) *entry)) continue;

        if ( ((*entry)->rectangle.y < y_loc) &&
            ((*entry)->rectangle.y + (int) (*entry)->rectangle.height > y_loc) )
            if ( *entry == smw->simple_menu.label )
                return(NULL);   /* cannot select the label. */
            else
                return(*entry);
    }
    
    return(NULL);
}

static SmeObject GetEventEntry

(

)

[static]

Referenced by Highlight().

Here is the caller graph for this function:

static Dimension GetMenuHeight

(

Widget

w

)

[static]

Definition at line 1202 of file SimpleMenu.c.

References _SimpleMenuPart::bottom_margin, _SimpleMenuRec::composite, _SimpleMenuRec::core, ForAllChildren, height, _SimpleMenuPart::menu_height, _SimpleMenuPart::row_height, _SimpleMenuRec::simple_menu, and _SimpleMenuPart::top_margin.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject * entry;
    Dimension height;
    
    if (smw->simple_menu.menu_height)
        return(smw->core.height);

    height = smw->simple_menu.top_margin + smw->simple_menu.bottom_margin;
    
    if (smw->simple_menu.row_height == 0) {
        ForAllChildren(smw, entry) 
            if (XtIsManaged ((Widget) *entry)) 
                height += (*entry)->rectangle.height;
    } else 
        height += smw->simple_menu.row_height * smw->composite.num_children;
        
    return(height);
}

static Dimension GetMenuHeight

(

)

Referenced by Initialize().

Here is the caller graph for this function:

static Dimension GetMenuWidth	(	Widget	w,
		Widget	w_ent
	)			[static]

Definition at line 1161 of file SimpleMenu.c.

References _SimpleMenuRec::core, cur_entry, ForAllChildren, _SimpleMenuPart::menu_width, _SimpleMenuRec::simple_menu, and width.

{
    SmeObject cur_entry = (SmeObject) w_ent;
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    Dimension width, widest = (Dimension) 0;
    SmeObject * entry;
    
    if ( smw->simple_menu.menu_width ) 
        return(smw->core.width);

    ForAllChildren(smw, entry) {
        XtWidgetGeometry preferred;

        if (!XtIsManaged( (Widget) *entry)) continue;
        
        if (*entry != cur_entry) {
            XtQueryGeometry((Widget) *entry, (XtWidgetGeometry *)NULL, &preferred);
            
            if (preferred.request_mode & CWWidth)
                width = preferred.width;
            else
                width = (*entry)->rectangle.width;
        }
        else
            width = (*entry)->rectangle.width;
        
        if ( width > widest )
            widest = width;
    }
    
    return(widest);
}

static Dimension GetMenuWidth

(

)

[static]

Referenced by Initialize(), and Layout().

Here is the caller graph for this function:

static void Highlight	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 701 of file SimpleMenu.c.

References _SimpleMenuPart::entry_set, GetEventEntry(), _SimpleMenuRec::simple_menu, and Unhighlight().

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject entry;
    SmeObjectClass class;
    
    if ( !XtIsSensitive(w) ) return;
    
    entry = GetEventEntry(w, event);

    if (entry == smw->simple_menu.entry_set) return;

    Unhighlight(w, event, params, num_params);  

    if (entry == NULL) return;

    if ( !XtIsSensitive( (Widget) entry)) {
        smw->simple_menu.entry_set = NULL;
        return;
    }

    smw->simple_menu.entry_set = entry;
    class = (SmeObjectClass) entry->object.widget_class;

    (class->sme_class.highlight) ( (Widget) entry);
}

Here is the call graph for this function:

static void Highlight

(

)

[static]

static void Initialize	(	Widget	request,
		Widget	new,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 254 of file SimpleMenu.c.

References ChangeCursorOnGrab(), _SimpleMenuRec::core, CreateLabel(), _SimpleMenuPart::entry_set, FALSE, GetMenuHeight(), GetMenuWidth(), _SimpleMenuPart::label, _SimpleMenuPart::label_class, _SimpleMenuPart::label_string, _SimpleMenuPart::menu_height, _SimpleMenuPart::menu_width, _SimpleMenuPart::recursive_set_values, _SimpleMenuRec::simple_menu, smeBSBObjectClass, TRUE, and XmuCallInitializers().

{
  SimpleMenuWidget smw = (SimpleMenuWidget) new;

  XmuCallInitializers(XtWidgetToApplicationContext(new));

  if (smw->simple_menu.label_class == NULL) 
      smw->simple_menu.label_class = smeBSBObjectClass;

  smw->simple_menu.label = NULL;
  smw->simple_menu.entry_set = NULL;
  smw->simple_menu.recursive_set_values = FALSE;

  if (smw->simple_menu.label_string != NULL)
      CreateLabel(new);

  smw->simple_menu.menu_width = TRUE;

  if (smw->core.width == 0) {
      smw->simple_menu.menu_width = FALSE;
      smw->core.width = GetMenuWidth(new, (Widget)NULL);
  }

  smw->simple_menu.menu_height = TRUE;

  if (smw->core.height == 0) {
      smw->simple_menu.menu_height = FALSE;
      smw->core.height = GetMenuHeight(new);
  }

/*
 * Add a popup_callback routine for changing the cursor.
 */
  
  XtAddCallback(new, XtNpopupCallback, ChangeCursorOnGrab, (XtPointer)NULL);
}

Here is the call graph for this function:

static void Initialize

(

void

)

[static]

static void Layout	(	Widget	w,
		Dimension *	width_ret,
		Dimension *	height_ret
	)			[static]

Definition at line 891 of file SimpleMenu.c.

References ForAllChildren, GetMenuWidth(), height, MakeSetValuesRequest(), and width.

{
    SmeObject current_entry, *entry;
    SimpleMenuWidget smw;
    Dimension width, height;
    Boolean do_layout = ((height_ret == NULL) || (width_ret == NULL));
    Boolean allow_change_size;
    height = 0;

    if ( XtIsSubclass(w, simpleMenuWidgetClass) ) {
        smw = (SimpleMenuWidget) w;
        current_entry = NULL;
    }
    else {
        smw = (SimpleMenuWidget) XtParent(w);
        current_entry = (SmeObject) w;
    }

    allow_change_size = (!XtIsRealized((Widget)smw) ||
                         (smw->shell.allow_shell_resize));

    if ( smw->simple_menu.menu_height )
        height = smw->core.height;
    else
        if (do_layout) {
            height = smw->simple_menu.top_margin;
            ForAllChildren(smw, entry) {
                if (!XtIsManaged( (Widget) *entry)) continue;

                if ( (smw->simple_menu.row_height != 0) && 
                    (*entry != smw->simple_menu.label) ) 
                    (*entry)->rectangle.height = smw->simple_menu.row_height;
                
                (*entry)->rectangle.y = height;
                (*entry)->rectangle.x = 0;
                height += (*entry)->rectangle.height;
            }
            height += smw->simple_menu.bottom_margin;
        }
        else {
            if ((smw->simple_menu.row_height != 0) && 
                (current_entry != smw->simple_menu.label) )
                height = smw->simple_menu.row_height;
        }
    
    if (smw->simple_menu.menu_width)
        width = smw->core.width;
    else if ( allow_change_size )
        width = GetMenuWidth((Widget) smw, (Widget) current_entry);
    else
        width = smw->core.width;

    if (do_layout) {
        ForAllChildren(smw, entry)
            if (XtIsManaged( (Widget) *entry)) 
                (*entry)->rectangle.width = width;

        if (allow_change_size)
            MakeSetValuesRequest((Widget) smw, width, height);
    }
    else {
        *width_ret = width;
        if (height != 0)
            *height_ret = height;
    }
}

Here is the call graph for this function:

static void Layout

(

)

static void MakeSetValuesRequest	(	Widget	w,
		Dimension	width,
		Dimension	height
	)			[static]

Definition at line 1133 of file SimpleMenu.c.

References _SimpleMenuRec::core, FALSE, _SimpleMenuPart::recursive_set_values, Redisplay(), _SimpleMenuRec::simple_menu, and TRUE.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    Arg arglist[2];
    Cardinal num_args = (Cardinal) 0;
    
    if ( !smw->simple_menu.recursive_set_values ) {
        if ( (smw->core.width != width) || (smw->core.height != height) ) {
            smw->simple_menu.recursive_set_values = TRUE;
            XtSetArg(arglist[num_args], XtNwidth, width);   num_args++;
            XtSetArg(arglist[num_args], XtNheight, height); num_args++;
            XtSetValues(w, arglist, num_args);
        }
        else if (XtIsRealized( (Widget) smw))
            Redisplay((Widget) smw, (XEvent *) NULL, (Region) NULL);
    }
    smw->simple_menu.recursive_set_values = FALSE;
}

Here is the call graph for this function:

static void MakeSetValuesRequest

(

)

[static]

Referenced by Layout(), and SetValuesHook().

Here is the caller graph for this function:

static void MoveMenu	(	Widget	w,
		Position	x,
		Position	y
	)			[static]

Definition at line 1063 of file SimpleMenu.c.

References height, _SimpleMenuPart::menu_on_screen, _SimpleMenuRec::simple_menu, and width.

{
    Arg arglist[2];
    Cardinal num_args = 0;
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    
    if (smw->simple_menu.menu_on_screen) {
        int width = w->core.width + 2 * w->core.border_width;
        int height = w->core.height + 2 * w->core.border_width;
        
        if (x >= 0) {
            int scr_width = WidthOfScreen(XtScreen(w));
            if (x + width > scr_width)
                x = scr_width - width;
        }
        if (x < 0) 
            x = 0;
        
        if (y >= 0) {
            int scr_height = HeightOfScreen(XtScreen(w));
            if (y + height > scr_height)
                y = scr_height - height;
        }
        if (y < 0)
            y = 0;
    }
    
    XtSetArg(arglist[num_args], XtNx, x); num_args++;
    XtSetArg(arglist[num_args], XtNy, y); num_args++;
    XtSetValues(w, arglist, num_args);
}

static void MoveMenu

(

)

[static]

Referenced by PositionMenu().

Here is the caller graph for this function:

static void Notify	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 742 of file SimpleMenu.c.

References _SimpleMenuPart::entry_set, and _SimpleMenuRec::simple_menu.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject entry = smw->simple_menu.entry_set;
    SmeObjectClass class;
    
    if ( (entry == NULL) || !XtIsSensitive((Widget) entry ) ) return;
    
    class = (SmeObjectClass) entry->object.widget_class;
    (class->sme_class.notify)( (Widget) entry );
}

static void Notify

(

)

static void PositionMenu	(	Widget	w,
		XPoint *	location
	)			[static]

Definition at line 1009 of file SimpleMenu.c.

References FALSE, _SimpleMenuPart::label, MoveMenu(), _SimpleMenuPart::popup_entry, _SmeRec::rectangle, _SimpleMenuRec::simple_menu, and void().

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject entry;
    XPoint t_point;
    
    if (location == NULL) {
        Window junk1, junk2;
        int root_x, root_y, junkX, junkY;
        unsigned int junkM;
        
        location = &t_point;
        if (XQueryPointer(XtDisplay(w), XtWindow(w), &junk1, &junk2, 
                          &root_x, &root_y, &junkX, &junkY, &junkM) == FALSE) {
            char error_buf[BUFSIZ];
            (void) sprintf(error_buf, "%s %s", "Xaw Simple Menu Widget:",
                    "Could not find location of mouse pointer");
            XtAppWarning(XtWidgetToApplicationContext(w), error_buf);
            return;
        }
        location->x = (short) root_x;
        location->y = (short) root_y;
    }
    
    /*
     * The width will not be correct unless it is realized.
     */
    
    XtRealizeWidget(w);
    
    location->x -= (Position) w->core.width/2;
    
    if (smw->simple_menu.popup_entry == NULL)
        entry = smw->simple_menu.label;
    else
        entry = smw->simple_menu.popup_entry;

    if (entry != NULL)
        location->y -= entry->rectangle.y + entry->rectangle.height/2;

    MoveMenu(w, (Position) location->x, (Position) location->y);
}

Here is the call graph for this function:

static void PositionMenu

(

)

Referenced by PositionMenuAction().

Here is the caller graph for this function:

static void PositionMenuAction	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 608 of file SimpleMenu.c.

References FindMenu(), PositionMenu(), and void().

{ 
  Widget menu;
  XPoint loc;

  if (*num_params != 1) {
    char error_buf[BUFSIZ];
    (void) sprintf(error_buf, "%s %s",
            "Xaw - SimpleMenuWidget: position menu action expects only one",
            "parameter which is the name of the menu.");
    XtAppWarning(XtWidgetToApplicationContext(w), error_buf);
    return;
  }

  if ( (menu = FindMenu(w, params[0])) == NULL) {
    char error_buf[BUFSIZ];
    (void) sprintf(error_buf, "%s '%s'",
            "Xaw - SimpleMenuWidget: could not find menu named: ", params[0]);
    XtAppWarning(XtWidgetToApplicationContext(w), error_buf);
    return;
  }
  
  switch (event->type) {
  case ButtonPress:
  case ButtonRelease:
    loc.x = event->xbutton.x_root;
    loc.y = event->xbutton.y_root;
    PositionMenu(menu, &loc);
    break;
  case EnterNotify:
  case LeaveNotify:
    loc.x = event->xcrossing.x_root;
    loc.y = event->xcrossing.y_root;
    PositionMenu(menu, &loc);
    break;
  case MotionNotify:
    loc.x = event->xmotion.x_root;
    loc.y = event->xmotion.y_root;
    PositionMenu(menu, &loc);
    break;
  default:
    PositionMenu(menu, (XPoint *)NULL);
    break;
  }
}  

Here is the call graph for this function:

static void PositionMenuAction

(

)

Referenced by AddPositionAction().

Here is the caller graph for this function:

static void Realize	(	Widget	w,
		XtValueMask *	mask,
		XSetWindowAttributes *	attrs
	)			[static]

Definition at line 350 of file SimpleMenu.c.

References _SimpleMenuPart::backing_store, _SimpleMenuPart::cursor, _SimpleMenuRec::simple_menu, and superclass.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;

    attrs->cursor = smw->simple_menu.cursor;
    *mask |= CWCursor;
    if ((smw->simple_menu.backing_store == Always) ||
        (smw->simple_menu.backing_store == NotUseful) ||
        (smw->simple_menu.backing_store == WhenMapped) ) {
        *mask |= CWBackingStore;
        attrs->backing_store = smw->simple_menu.backing_store;
    }
    else
        *mask &= ~CWBackingStore;

    (*superclass->core_class.realize) (w, mask, attrs);
}

static void Realize

(

)

static void Redisplay	(	Widget	w,
		XEvent *	event,
		Region	region
	)			[static]

Definition at line 304 of file SimpleMenu.c.

References ForAllChildren.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject * entry;
    SmeObjectClass class;

    if (region == NULL)
        XClearWindow(XtDisplay(w), XtWindow(w));

    /*
     * Check and Paint each of the entries - including the label.
     */

    ForAllChildren(smw, entry) {
        if (!XtIsManaged ( (Widget) *entry)) continue;

        if (region != NULL) 
            switch(XRectInRegion(region, (int) (*entry)->rectangle.x,
                                 (int) (*entry)->rectangle.y,
                                 (unsigned int) (*entry)->rectangle.width,
                                 (unsigned int) (*entry)->rectangle.height)) {
            case RectangleIn:
            case RectanglePart:
                break;
            default:
                continue;
            }
        class = (SmeObjectClass) (*entry)->object.widget_class;

        if (class->rect_class.expose != NULL)
            (class->rect_class.expose)( (Widget) *entry, NULL, NULL);
    }
}

static void Redisplay

(

)

[static]

static void Resize

(

Widget

w

)

[static]

Definition at line 378 of file SimpleMenu.c.

References _SimpleMenuRec::core, ForAllChildren, and Redisplay().

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject * entry;

    if ( !XtIsRealized(w) ) return;

    ForAllChildren(smw, entry)  /* reset width of all entries. */
        if (XtIsManaged( (Widget) *entry))
            (*entry)->rectangle.width = smw->core.width;
    
    Redisplay(w, (XEvent *) NULL, (Region) NULL);
}

Here is the call graph for this function:

static void Resize

(

)

static Boolean SetValues	(	Widget	current,
		Widget	request,
		Widget	new,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 403 of file SimpleMenu.c.

References _SimpleMenuPart::bottom_margin, _SimpleMenuRec::core, CreateLabel(), _SimpleMenuPart::cursor, FALSE, _SimpleMenuPart::label, _SimpleMenuPart::label_class, _SimpleMenuPart::label_string, Layout(), _SimpleMenuPart::menu_height, _SimpleMenuPart::menu_width, ONE, _SimpleMenuPart::recursive_set_values, _SimpleMenuRec::simple_menu, _SimpleMenuPart::top_margin, TRUE, and XtNlabel.

{
    SimpleMenuWidget smw_old = (SimpleMenuWidget) current;
    SimpleMenuWidget smw_new = (SimpleMenuWidget) new;
    Boolean ret_val = FALSE, layout = FALSE;
    
    if (!XtIsRealized(current)) return(FALSE);
    
    if (!smw_new->simple_menu.recursive_set_values) {
        if (smw_new->core.width != smw_old->core.width) {
            smw_new->simple_menu.menu_width = (smw_new->core.width != 0);
            layout = TRUE;
        }
        if (smw_new->core.height != smw_old->core.height) {
            smw_new->simple_menu.menu_height = (smw_new->core.height != 0);
            layout = TRUE;
        }
    }

    if (smw_old->simple_menu.cursor != smw_new->simple_menu.cursor)
        XDefineCursor(XtDisplay(new),
                      XtWindow(new), smw_new->simple_menu.cursor);
    
    if (smw_old->simple_menu.label_string !=smw_new->simple_menu.label_string) 
        if (smw_new->simple_menu.label_string == NULL)         /* Destroy. */
            XtDestroyWidget((Widget) smw_old->simple_menu.label);
        else if (smw_old->simple_menu.label_string == NULL)    /* Create. */
            CreateLabel(new);
        else {                                                 /* Change. */
            Arg arglist[1];
            
            XtSetArg(arglist[0], XtNlabel, smw_new->simple_menu.label_string);
            XtSetValues((Widget) smw_new->simple_menu.label, arglist, ONE);
        }
    
    if (smw_old->simple_menu.label_class != smw_new->simple_menu.label_class)
        XtAppWarning(XtWidgetToApplicationContext(new),
                     "No Dynamic class change of the SimpleMenu Label.");
    
    if ((smw_old->simple_menu.top_margin != smw_new->simple_menu.top_margin) ||
        (smw_old->simple_menu.bottom_margin != 
         smw_new->simple_menu.bottom_margin) /* filler.................  */ ) {
        layout = TRUE;
        ret_val = TRUE;
    }

    if (layout)
        Layout(new, (Dimension *)NULL, (Dimension *)NULL);

    return(ret_val);
}

Here is the call graph for this function:

static Boolean SetValues

(

)

[static]

static Boolean SetValuesHook	(	Widget	w,
		ArgList	arglist,
		Cardinal *	num_args
	)			[static]

Definition at line 474 of file SimpleMenu.c.

References FALSE, height, i, MakeSetValuesRequest(), name, streq, value, and width.

{
    Cardinal i;
    Dimension width, height;
    
    width = w->core.width;
    height = w->core.height;
    
    for ( i = 0 ; i < *num_args ; i++) {
        if ( streq(arglist[i].name, XtNwidth) )
            width = (Dimension) arglist[i].value;
        if ( streq(arglist[i].name, XtNheight) )
            height = (Dimension) arglist[i].value;
    }

    if ((width != w->core.width) || (height != w->core.height))
        MakeSetValuesRequest(w, width, height);
    return(FALSE);
}

Here is the call graph for this function:

static Boolean SetValuesHook

(

)

static void Unhighlight	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 674 of file SimpleMenu.c.

References _SimpleMenuPart::entry_set, and _SimpleMenuRec::simple_menu.

{ 
    SimpleMenuWidget smw = (SimpleMenuWidget) w;
    SmeObject entry = smw->simple_menu.entry_set;
    SmeObjectClass class;
 
    if ( entry == NULL) return;

    smw->simple_menu.entry_set = NULL;
    class = (SmeObjectClass) entry->object.widget_class;
    (class->sme_class.unhighlight) ( (Widget) entry);
}

static void Unhighlight

(

)

void XawSimpleMenuAddGlobalActions

(

XtAppContext

app_con

)

Definition at line 774 of file SimpleMenu.c.

References XmuCallInitializers().

Referenced by main_sci().

{
    XtInitializeWidgetClass(simpleMenuWidgetClass);
    XmuCallInitializers( app_con );
} 

Here is the call graph for this function:

Here is the caller graph for this function:

void XawSimpleMenuClearActiveEntry

(

Widget

w

)

Definition at line 812 of file SimpleMenu.c.

References _SimpleMenuPart::entry_set, and _SimpleMenuRec::simple_menu.

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;

    smw->simple_menu.entry_set = NULL;
} 

Widget XawSimpleMenuGetActiveEntry

(

Widget

w

)

Definition at line 793 of file SimpleMenu.c.

References _SimpleMenuPart::entry_set, and _SimpleMenuRec::simple_menu.

Referenced by Redisplay().

{
    SimpleMenuWidget smw = (SimpleMenuWidget) w;

    return( (Widget) smw->simple_menu.entry_set);
} 

Here is the caller graph for this function:

---

Variable Documentation

XtActionsRec actionsList[] [static]

Initial value:

{
  {"notify",            Notify},
  {"highlight",         Highlight},
  {"unhighlight",       Unhighlight},
}

Definition at line 127 of file SimpleMenu.c.

char defaultTranslations[] [static]

Initial value:

    ":<EnterWindow>:     highlight()             \n\
     :<LeaveWindow>:     unhighlight()           \n\
     :<BtnMotion>:       highlight()             \n\
     :<BtnUp>:           MenuPopdown() notify() unhighlight()"

Definition at line 95 of file SimpleMenu.c.

CompositeClassExtensionRec extension_rec [static]

Initial value:

 {
      NULL,
         NULLQUARK,
             XtCompositeExtensionVersion,
         sizeof(CompositeClassExtensionRec),
     TRUE,
}

Definition at line 134 of file SimpleMenu.c.

XtResource resources[] [static]

Definition at line 54 of file SimpleMenu.c.

SimpleMenuClassRec simpleMenuClassRec

Definition at line 144 of file SimpleMenu.c.

WidgetClass simpleMenuWidgetClass = (WidgetClass)&simpleMenuClassRec

Definition at line 193 of file SimpleMenu.c.

---