4.3BSD/usr/contrib/X/xwm/main.c
#include <X/mit-copyright.h>
/* Copyright Massachusetts Institute of Technology 1985 */
/*
* xwm - X Window System window manager main routine.
*
*/
#include "xwm.h"
#ifdef PROFIL
#include <signal.h>
#ifndef lint
static char *rcsid_main_c = "$Header: main.c,v 10.6 86/02/01 16:10:36 tony Rel $";
#endif
/*
* Dummy handler for profiling.
*/
ptrap()
{
exit(0);
}
#endif
static short gray_bits[16] = {
0xaaaa, 0x5555, 0xaaaa, 0x5555,
0xaaaa, 0x5555, 0xaaaa, 0x5555,
0xaaaa, 0x5555, 0xaaaa, 0x5555,
0xaaaa, 0x5555, 0xaaaa, 0x5555
};
main(argc, argv)
int argc; /* Argument count. */
char **argv; /* Argument vector. */
{
register int i; /* Loop index. */
register int status; /* Routine call return status. */
register char *arg; /* Current argument pointer. */
int x, y; /* Mouse X and Y coordinates. */
int str_width; /* Width in pixels of output string. */
int pop_width, pop_height; /* Pop up window width and height. */
int temp_button_mask = 0; /* Temporary button event mask. */
char *def_val; /* X Default value. */
char *i_font_name; /* Icon font name. */
char *p_font_name; /* Pop up font name. */
char display[256]; /* Display identifier string. */
char message[128]; /* Error message buffer. */
Bitmap gray_bitmap; /* Gray bitmap used for gray pixmap. */
Window event_win; /* Event window. */
Window focus_win; /* Keyboard focus window. */
WindowInfo root_info; /* Root window info. */
XButtonEvent button_event; /* Button input event. */
Bool focus_seq = FALSE; /* Has a focus sequence begun? */
Bool changed = FALSE; /* Has the window changed? */
Bool none = FALSE; /* Allow the mouse with no keys. */
Bool focus = FALSE; /* Allow input focusing? */
Bool reverse = FALSE; /* Reverse video? */
#ifdef PROFIL
signal(SIGTERM, ptrap);
#endif
/*
* Set up internal defaults.
*/
i_font_name = DEF_I_FONT;
p_font_name = DEF_P_FONT;
CursorFunc = DEF_FUNC;
ButtonMask = DEF_BUTTON_MASK;
Delta = DEF_DELTA;
IBorderWidth = DEF_ICON_BORDER_WIDTH;
IPadding = DEF_ICON_PADDING;
PBorderWidth = DEF_POP_BORDER_WIDTH;
PPadding = DEF_POP_PADDING;
/*
* Initialize fixed globals.
*/
Grid = FALSE;
Zap = FALSE;
/*
* Set XErrorFunction to be non-terminating.
*/
XErrorHandler(XError);
/*
* Check for X defaults.
*/
def_val = XGetDefault(argv[0], "IconFont");
if (def_val != NULL) i_font_name = def_val;
def_val = XGetDefault(argv[0], "BodyFont");
if (def_val != NULL) p_font_name = def_val;
def_val = XGetDefault(argv[0], "InternalBorder");
if (def_val != NULL) {
IPadding = atoi(def_val);
PPadding = atoi(def_val);
}
def_val = XGetDefault(argv[0], "BorderWidth");
if (def_val != NULL) {
IBorderWidth = atoi(def_val);
PBorderWidth = atoi(def_val);
}
def_val = XGetDefault(argv[0], "ReverseVideo");
if (def_val != NULL) {
if (strcmp (def_val, "on") == 0) reverse = TRUE;
}
/*
* Parse the command line arguments.
*/
for (i = 1; i < argc; i++) {
arg = argv[i];
switch (*arg) {
case '\0':
continue;
case '-':
arg++;
if (*arg == '\0') break;
for (; *arg; arg++) {
switch (*arg) {
case 'c':
/*
* Add the control key to the mouse button mask.
*/
temp_button_mask |= ControlMask;
break;
case 'd':
/*
* Check for a debug flag.
*/
Debug = TRUE;
break;
case 's':
/*
* Add the shift key to the mouse button mask.
*/
temp_button_mask |= ShiftMask;
break;
case 'm':
/*
* Add the meta key to the mouse button mask.
*/
temp_button_mask |= MetaMask;
break;
case 'n':
/*
* No keys are needed with the mouse.
*/
none = TRUE;
break;
case 'f':
/*
* Require double clicking to focus input.
*/
focus = TRUE;
break;
case 'g':
/*
* Display the tic tac toe grid on window change.
*/
Grid = TRUE;
break;
case 'r':
/*
* Make icons and pop-ups reverse video.
*/
reverse = TRUE;
break;
case 'z':
/*
* Use zap effect?
*/
Zap = TRUE;
break;
}
}
break;
case '+':
CursorFunc = atoi(arg + 1);
if (CursorFunc <= 0 || CursorFunc > 15) {
/*
* Oops, cursor function code out of range!
*/
errno = EDOM;
sprintf(
message,
"Cursor function code '%d' out of range (0 - 14).",
CursorFunc
);
Error(message);
}
break;
case '@':
Delta = atoi(arg + 1);
if (Delta <= 0 || Delta > 100) {
/*
* Oops, delta value out of range!
*/
errno = EDOM;
sprintf(
message,
"Delta value '%d' out of range (1 - 99).",
Delta
);
Error(message);
}
break;
case 'f':
if ((arg[1] == 'n') && (arg[2] == '=')) {
p_font_name = arg + 3;
}
else if ((arg[1] == 'i') && (arg[2] == '=')) {
i_font_name = arg + 3;
}
break;
default:
/*
* All that is left is a possible display string.
*/
strcpy(display, arg);
}
}
/*
* Set the global mouse button event mask.
*/
if (temp_button_mask) ButtonMask = temp_button_mask;
if (none) ButtonMask = 0;
/*
* Open the Display.
*/
if (XOpenDisplay(display) == NULL) {
/*
* Oops, can't open the display!
*/
sprintf(message, "Unable to open display '%s'.", display);
Error(message);
}
/*
* Gather information about the root window.
*/
status = XQueryWindow(RootWindow, &root_info);
if (status == FAILURE) {
Error("Can't acquire root window information from X server.");
}
ScreenHeight = root_info.height; /* True height of entire screen. */
ScreenWidth = root_info.width; /* True width of entire screen. */
/*
* Create and store the icon background pixmap.
*/
gray_bitmap = XStoreBitmap(16, 16, gray_bits);
GrayPixmap = XMakePixmap(gray_bitmap, BlackPixel, WhitePixel);
/*
* Set up icon window, icon cursor and pop-up window color parameters.
*/
if (reverse) {
IconCursorFunc = GXcopyInverted;
IBorder = WhitePixmap;
IBackground = GrayPixmap;
ITextForground = WhitePixel;
ITextBackground = BlackPixel;
PBorder = BlackPixmap;
PBackground = WhitePixmap;
PTextForground = BlackPixel;
PTextBackground = WhitePixel;
}
else {
IconCursorFunc = GXcopy;
IBorder = BlackPixmap;
IBackground = GrayPixmap;
ITextForground = BlackPixel;
ITextBackground = WhitePixel;
PBorder = WhitePixmap;
PBackground = BlackPixmap;
PTextForground = WhitePixel;
PTextBackground = BlackPixel;
}
/*
* Store all the cursors.
*/
StoreCursors();
/*
* Grab all 3 mouse buttons w/ respect to the root window. Grab
* pressed status with the mouse button mask.
*/
status = XGrabButton(
RootWindow,
DotCursor,
(LeftMask | ButtonMask),
(ButtonPressed | ButtonReleased)
);
if (status == FAILURE) Error("Can't grab left mouse button.");
status = XGrabButton(
RootWindow,
ArrowCrossCursor,
(MiddleMask | ButtonMask),
(ButtonPressed | ButtonReleased)
);
if (status == FAILURE) Error("Can't grab middle mouse button.");
status = XGrabButton(
RootWindow,
CircleCursor,
(RightMask | ButtonMask),
(ButtonPressed | ButtonReleased)
);
if (status == FAILURE) Error("Can't grab right mouse button.");
/*
* Load the selected fonts and retrieve the information structure
* for each. Set global font information pointers.
*/
IFont = XGetFont(i_font_name);
if (IFont == FAILURE) {
sprintf(message, "Unable to get icon font '%s'.", i_font_name);
Error(message);
}
status = XQueryFont(IFont, &IFontInfo);
if (status == FAILURE) {
Error("Unable to query X server for icon font information.");
}
PFont = XGetFont(p_font_name);
if (PFont == FAILURE) {
sprintf(message, "Unable to get pop up font '%s'.", p_font_name);
Error(message);
}
status = XQueryFont(PFont, &PFontInfo);
if (status == FAILURE) {
Error("Unable to query X server for pop up font information.");
}
/*
* Calculate size of the resize pop-up window.
*/
str_width = XQueryWidth(PText, PFont);
pop_width = str_width + (PPadding << 1);
PWidth = pop_width + (PBorderWidth << 1);
pop_height = PFontInfo.height + (PPadding << 1);
PHeight = pop_height + (PBorderWidth << 1);
/*
* Create the pop-up window. Create it at (0, 0) for now, we will
* move it where we want later.
*/
Pop = XCreateWindow(
RootWindow,
0, 0,
pop_width, pop_height,
PBorderWidth,
PBorder, PBackground
);
if (Pop == FAILURE) Error("Can't open pop-up dimension display window.");
/*
* Main command loop.
*/
while (TRUE) {
/*
* Get the next mouse button event. Spin our wheels until
* a button event is returned (ie. GetButton == TRUE).
* Note that mouse events within an icon window are handled
* in the "GetButton" function or by the icon's owner if
* it is not xwm.
*/
if (!GetButton(&button_event)) continue;
/*
* If the button event recieved is not a ButtonPressed event
* then continue until we find one.
*/
if (button_event.type != ButtonPressed) continue;
/*
* Ok, determine the event window and mouse coordinates.
*/
status = XInterpretLocator(
RootWindow,
&x, &y,
&event_win,
button_event.location
);
if (status == FAILURE) continue;
/*
* If the event subwindow is 0 then the event
* occured on the root window.
*/
if (event_win == 0) {
event_win = RootWindow;
}
/*
* Invoke a function based on which button was pressed.
*/
switch (button_event.detail & ValueMask) {
case LeftButton:
/*
* LeftDown is used to lower or iconify a window if
* the event window is not the root window. If it is the
* RoowWindow then circulate all windows down.
*/
/*
* Abort any focus sequence that is in progress.
*/
focus_seq = FALSE;
if (event_win == RootWindow) {
XCircWindowDown(RootWindow);
}
else {
LowerIconify(event_win, x, y);
}
break;
case MiddleButton:
/*
* MiddleDown is used to resize a window and establish the
* focus window.
*/
/*
* If this is not the root window, go ahead and allow it
* to be changed.
*/
changed = FALSE;
if (event_win != RootWindow) {
changed = Change(event_win, x, y);
}
if (focus) {
/*
* Two middle clicks will focus the keyboard...
*/
if (focus_seq) {
/*
* ... and this is the second ...
*/
if (focus_win == event_win) {
/*
* ... and both have the same event window then
* focus the keyboard provided the window did not
* change. This also ends the focus sequence.
*/
if (!changed) XFocusKeyboard(event_win);
focus_seq = FALSE;
focus_win = RootWindow;
}
else {
/*
* ... both don't have the same window. This
* ends the focus sequence.
*/
focus_seq = FALSE;
focus_win = RootWindow;
}
}
else {
/*
* Begin a focus sequence, salt away the
* perspective focus window.
*/
focus_seq = TRUE;
focus_win = event_win;
}
}
break;
case RightButton:
/*
* RightDown is used to move a window or bring it to the
* top of the window stack if the event window is not
* the root window. If it is the root window then circulate
* all windows up.
*/
/*
* Abort any focus sequence that is in progress.
*/
focus_seq = FALSE;
if (event_win == RootWindow) {
XCircWindowUp(RootWindow);
}
else {
Move(event_win, x, y);
}
break;
}
}
}