gecko-dev/cmd/xfe/menu.c
1998-03-28 02:44:41 +00:00

244 lines
6.4 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.0 (the "NPL"); you may not use this file except in
* compliance with the NPL. You may obtain a copy of the NPL at
* http://www.mozilla.org/NPL/
*
* Software distributed under the NPL is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
* for the specific language governing rights and limitations under the
* NPL.
*
* The Initial Developer of this code under the NPL is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1998 Netscape Communications Corporation. All Rights
* Reserved.
*/
/*
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;
}