gecko-dev/cmd/xfe/menu.c
1999-11-02 22:43:10 +00:00

248 lines
6.5 KiB
C

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 2 -*-
*
* The contents of this file are subject to the Netscape Public
* License Version 1.1 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.mozilla.org/NPL/
*
* Software distributed under the License is distributed on an "AS
* IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
* implied. See the License for the specific language governing
* rights and limitations under the License.
*
* The Original Code is mozilla.org code.
*
* The Initial Developer of the Original Code is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1998 Netscape Communications Corporation. All
* Rights Reserved.
*
* Contributor(s):
*/
/*
menu.c --- menu creating utilities
Created: Terry Weissman <terry@netscape.com>, 14-Jun-95.
*/
#include "mozilla.h"
#include "xfe.h"
#include "menu.h"
static void
free_closure_cb(Widget w, XtPointer clientData, XtPointer callData)
{
XP_FREE(clientData);
}
int
fe_CreateSubmenu(Widget menu, struct fe_button *buttons, MWContext *context,
XtPointer closure, XtPointer data)
{
int ac /*, ac1*/;
Arg av[20] /*, av1[5]*/;
/*Widget submenu;*/
Colormap cmap;
Cardinal depth;
Visual *v;
int w, step;
if (!buttons || !buttons[0].name)
{
return 1;
}
v = 0;
cmap = 0;
depth = 0;
w = 0;
while (buttons[w].name)
{
Widget menu_button = 0;
step = 1;
if (!*buttons[w].name) { /* "" means do a line */
ac = 0;
menu_button = XmCreateSeparatorGadget(menu, "separator",
av, ac);
}
#ifdef __sgi
else if ((!strcmp("sgi", buttons[w].name) ||
!strcmp("adobe", buttons[w].name))
&& !fe_VendorAnim) {
w++;
continue;
}
#endif
else {
char *name = buttons[w].name;
/*void *arg;*/
ac = 0;
/* don't fool the xfe2 code into thinking that the user data is a
* menu spec or something... */
XtSetArg(av[ac], XmNuserData, NULL); ac++;
if (buttons[w].type == SELECTABLE ||
buttons[w].type == UNSELECTABLE) {
fe_button_closure *button_closure = XP_NEW_ZAP(fe_button_closure);
button_closure->context = context;
button_closure->userdata = buttons[w].userdata;
if (buttons[w].type == UNSELECTABLE)
XtSetArg(av[ac], XtNsensitive, False), ac++;
menu_button = XmCreatePushButtonGadget(menu, name, av, ac);
XtAddCallback(menu_button,
XmNactivateCallback,
buttons[w].callback,
button_closure);
XtAddCallback(menu_button,
XmNdestroyCallback,
free_closure_cb, button_closure);
}
else if (buttons[w].type == TOGGLE ||
buttons[w].type == RADIO) {
XP_ASSERT(0);
}
else if (buttons[w].type == INTL_CASCADE) {
XP_ASSERT(0);
} else if (buttons[w].type == CASCADE) {
XP_ASSERT(0);
} else {
abort();
}
}
if (buttons[w].offset) {
Widget* foo = (Widget*)
(((char*) data) + (int) (buttons[w].offset));
*foo = menu_button;
}
XtManageChild(menu_button);
w+=step;
}
return w+1;
}
Widget
fe_PopulateMenubar(Widget parent, struct fe_button* buttons,
MWContext* context, void* closure, void* data,
XtCallbackProc pulldown_cb)
{
Widget menubar;
Widget menu;
Widget menubar_button;
Widget kids[20];
int i;
Arg av[20];
int ac;
Visual *v = 0;
Colormap cmap = 0;
Cardinal depth = 0;
int w = 0;
int step;
char *menu_name;
XtVaGetValues(XtParent(parent), XtNvisual, &v, XtNcolormap, &cmap,
XtNdepth, &depth, 0);
ac = 0;
XtSetArg(av[ac], XmNskipAdjust, True); ac++;
XtSetArg(av[ac], XmNseparatorOn, False); ac++;
XtSetArg(av[ac], XmNvisual, v); ac++;
XtSetArg(av[ac], XmNdepth, depth); ac++;
XtSetArg(av[ac], XmNcolormap, cmap); ac++;
menubar = XmCreateMenuBar(parent, "menuBar", av, ac);
i = 0; /* Which menu we're on. */
while (buttons[w].name) {
menu_name = buttons[w].name;
ac = 0;
XtSetArg(av[ac], XmNvisual, v); ac++;
XtSetArg(av[ac], XmNcolormap, cmap); ac++;
XtSetArg(av[ac], XmNdepth, depth); ac++;
menu = XmCreatePulldownMenu(menubar, menu_name, av, ac);
ac = 0;
XtSetArg(av[ac], XmNsubMenuId, menu); ac++;
#if 1
/* Create XmCreateCascadeButton always as we want to call action
CleanupMenubar() later and this is available only with the
Button and not with the Gadget. */
menubar_button = XmCreateCascadeButton(menubar, menu_name, av, ac);
#else /* 1 */
#ifdef _HPUX_SOURCE
menubar_button = XmCreateCascadeButton (menubar, menu_name, av, ac);
#else /* !HPUX */
menubar_button = XmCreateCascadeButtonGadget(menubar, menu_name, av, ac);
#endif /* !HPUX */
#endif /* 1 */
#ifdef _HPUX_SOURCE
/*
In order to break the legs off of the HP color management
garbage (which we needed to do in order to not get
brown-on-brown widgets) we had to put the application class
in all of the color specifications in the resource file.
BUT, that's not enough for the menubar, oh no. HP uses a
different pallette for that, and consequently you can't set
the color of it using a resource no matter what you do -
even if the entire path to the RowColumn is fully
qualified.
So on HPs, we make the buttons in the menubar be Widgets
instead of Gadgets (so that they can have a background
color) and then force the background color of the menubar
to be the background color of the first menu button on it. */
if (i == 0) {
Pixel bg = 0, tsc = 0, bsc = 0;
XtVaGetValues(menubar_button,
XmNbackground, &bg,
XmNtopShadowColor, &tsc,
XmNbottomShadowColor, &bsc,
0);
XtVaSetValues(menubar,
XmNbackground, bg,
XmNtopShadowColor, tsc,
XmNbottomShadowColor, bsc,
0);
}
#endif
if (buttons[w].offset) {
Widget* foo = (Widget*)
(((char*) data) + (int) (buttons[w].offset));
*foo = menu;
}
XtAddCallback(menubar_button, XmNcascadingCallback,
pulldown_cb, (XtPointer) closure);
/*
* Allow menu by menu callbacks, instead of calling
* back on every menu pulldown (slow).
*/
if (buttons[w].callback)
XtAddCallback(
menubar_button,
XmNcascadingCallback,
buttons[w].callback,
(XtPointer)closure
);
kids[i] = menubar_button;
w++;
step = fe_CreateSubmenu(menu, &buttons[w], context, closure, data);
if (!strcmp("help", menu_name)) {
XtVaSetValues(menubar, XmNmenuHelpWidget, menubar_button, 0);
}
w+=step;
i++;
}
XtManageChildren(kids, i);
return menubar;
}