decorate.c

安装DDD之前

/*****************************************************************************/
/**       Copyright 1988 by Evans & Sutherland Computer Corporation,        **/
/**                          Salt Lake City, Utah                           **/
/**  Portions Copyright 1989 by the Massachusetts Institute of Technology   **/
/**                        Cambridge, Massachusetts                         **/
/**                                                                         **/
/**                           All Rights Reserved                           **/
/**                                                                         **/
/**    Permission to use, copy, modify, and distribute this software and    **/
/**    its documentation  for  any  purpose  and  without  fee is hereby    **/
/**    granted, provided that the above copyright notice appear  in  all    **/
/**    copies and that both  that  copyright  notice  and  this  permis-    **/
/**    sion  notice appear in supporting  documentation,  and  that  the    **/
/**    names of Evans & Sutherland and M.I.T. not be used in advertising    **/
/**    in publicity pertaining to distribution of the  software  without    **/
/**    specific, written prior permission.                                  **/
/**                                                                         **/
/**    EVANS & SUTHERLAND AND M.I.T. DISCLAIM ALL WARRANTIES WITH REGARD    **/
/**    TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES  OF  MERCHANT-    **/
/**    ABILITY  AND  FITNESS,  IN  NO  EVENT SHALL EVANS & SUTHERLAND OR    **/
/**    M.I.T. BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL  DAM-    **/
/**    AGES OR  ANY DAMAGES WHATSOEVER  RESULTING FROM LOSS OF USE, DATA    **/
/**    OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER    **/
/**    TORTIOUS ACTION, ARISING OUT OF OR IN  CONNECTION  WITH  THE  USE    **/
/**    OR PERFORMANCE OF THIS SOFTWARE.                                     **/
/*****************************************************************************/
/****************************************************************************
 * This module is based on Twm, but has been siginificantly modified 
 * by Rob Nation 
 ****************************************************************************/
/***********************************************************************
 * The rest of it is all my fault -- MLM
 * mwm - "LessTif Window Manager"
 ***********************************************************************/

#include <LTconfig.h>

#include <string.h>

#include <Xm/Xm.h>
#include <Xm/MwmUtil.h>
#include "mwm.h"

#include <X11/extensions/shape.h>

/*
 * button dimensions
 */
static int lbut_styles[2] =
{
    22,
    55
};
static int rbut_style_min[2] =
{
    22,
    22
};
static int rbut_style_max[2] =
{
    55,
    55
};


/*
 * change some window attributes
 */
static void
set_value_attributes(ScreenInfo *scr, MwmWindow *t, unsigned long *valuemask,
		     XSetWindowAttributes *attributes, ComponentInfo *comp)
{

    *valuemask = CWBorderPixel;
    if (scr->mwm_highlight == t)
    {
	attributes->border_pixel = comp->active_background;
	if (comp->active_background_pixmap != XmUNSPECIFIED_PIXMAP)
	{
	    attributes->background_pixmap = comp->active_background_pixmap;
	    *valuemask |= CWBackPixmap;
	}
	else
	{
	    attributes->background_pixel = comp->active_background;
	    *valuemask |= CWBackPixel;
	}
    }
    else
    {
	attributes->border_pixel = comp->background;
	if (comp->background_pixmap != XmUNSPECIFIED_PIXMAP)
	{
	    attributes->background_pixmap = comp->background_pixmap;
	    *valuemask |= CWBackPixmap;
	}
	else
	{
	    attributes->background_pixel = comp->background;
	    *valuemask |= CWBackPixel;
	}
    }
}

static void
draw_corners(MwmWindow *t, int i, GC hor, GC vert)
{
    XSegment seg[2];
    int n = 0;

    switch (i)
    {
    case 0:
	seg[0].x1 = t->boundary_width - 1;
	seg[0].x2 = t->corner_width;
	seg[0].y1 = t->boundary_width - 1;
	seg[0].y2 = t->boundary_width - 1;
	n = 1;
	break;
    case 1:
	seg[0].x1 = 0;
	seg[0].x2 = t->corner_width - t->boundary_width;
	seg[0].y1 = t->boundary_width - 1;
	seg[0].y2 = t->boundary_width - 1;
	n = 1;
	break;
    case 2:
	seg[0].x1 = t->boundary_width - 1;
	seg[0].x2 = t->corner_width - 2;
	seg[0].y1 = t->corner_width - t->boundary_width + t->bw;
	seg[0].y2 = t->corner_width - t->boundary_width + t->bw;
	n = 1;
	break;
    case 3:
	seg[0].x1 = 0;
	seg[0].x2 = t->corner_width - t->boundary_width;
	seg[0].y1 = t->corner_width - t->boundary_width + t->bw;
	seg[0].y2 = t->corner_width - t->boundary_width + t->bw;
	n = 1;
	break;
    }
    XDrawSegments(dpy, t->corners[i], hor, seg, n);
    switch (i)
    {
    case 0:
	seg[0].y1 = t->boundary_width - 1;
	seg[0].y2 = t->corner_width;
	seg[0].x1 = t->boundary_width - 1;
	seg[0].x2 = t->boundary_width - 1;
	n = 1;
	break;
    case 1:
	seg[0].y1 = t->boundary_width - 1;
	seg[0].y2 = t->corner_width - 2;
	seg[0].x1 = t->corner_width - t->boundary_width;
	seg[0].x2 = t->corner_width - t->boundary_width;
	n = 1;
	break;
    case 2:
	seg[0].y1 = 0;
	seg[0].y2 = t->corner_width - t->boundary_width;
	seg[0].x1 = t->boundary_width - 1;
	seg[0].x2 = t->boundary_width - 1;
	n = 1;
	break;
    case 3:
	seg[0].y1 = 0;
	seg[0].y2 = t->corner_width - t->boundary_width + t->bw;
	seg[0].x1 = t->corner_width - t->boundary_width;
	seg[0].x2 = t->corner_width - t->boundary_width;
	n = 1;
	break;
    }
    XDrawSegments(dpy, t->corners[i], vert, seg, 1);
}

/*
 * draws a pattern within a window
 */
static void
draw_pattern(Window win, GC ShadowGC, GC ReliefGC, int h1, int w1, int t1)
{
    XSegment seg[2];
    int i, h, b, u, w, r, l;

    h = t1 * h1 / 200;
    b = (t1 >> 1) + h;
    u = t1 - b - 1;
    w = t1 * w1 / 200;
    r = (t1 >> 1) + w;
    l = t1 - r - 1;

    i = 0;
    seg[i].x1 = l;
    seg[i].y1 = u;
    seg[i].x2 = r;
    seg[i++].y2 = u;

    seg[i].x1 = l;
    seg[i].y1 = u;
    seg[i].x2 = l;
    seg[i++].y2 = b;
    XDrawSegments(dpy, win, ShadowGC, seg, i);

    i = 0;
    seg[i].x1 = l;
    seg[i].y1 = b;
    seg[i].x2 = r;
    seg[i++].y2 = b;

    seg[i].x1 = r;
    seg[i].y1 = u;
    seg[i].x2 = r;
    seg[i++].y2 = b;
    XDrawSegments(dpy, win, ReliefGC, seg, i);
}

/*
 * relieve a rectangle
 */
static void
relieve_rectangle(Window win, int x, int y, int w, int h, GC Hilite, GC Shadow)
{
    XDrawLine(dpy, win, Hilite, x, y, w + x - 1, y);
    XDrawLine(dpy, win, Hilite, x, y, x, h + y - 1);
    XDrawLine(dpy, win, Hilite, x, y + 1, w + x - 2, y + 1);
    XDrawLine(dpy, win, Hilite, x + 1, y + 1, x + 1, h + y - 2);

    XDrawLine(dpy, win, Shadow, x, h + y - 1, w + x - 1, h + y - 1);
    XDrawLine(dpy, win, Shadow, w + x - 1, y, w + x - 1, h + y - 1);
    XDrawLine(dpy, win, Shadow, x + 1, h + y - 2, w + x - 2, h + y - 2);
    XDrawLine(dpy, win, Shadow, w + x - 2, y + 1, w + x - 2, h + y - 2);
}

/*
 * draw border windows
 */
void
DEC_DrawBorder(MwmWindow *t, Window win, int x, int y, int w, int h,
	       GC ReliefGC, GC ShadowGC)
{
    XSegment seg[4];
    int i;

    /* top */
    if (win == t->sides[0])
    {
	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y;

	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = x;
	seg[i++].y2 = h + y - 1;

	XDrawSegments(dpy, win, ReliefGC, seg, i);

	i = 0;
	seg[i].x1 = x + t->boundary_width;
	seg[i].y1 = y + h - 1;
	seg[i].x2 = w + x - 1 - t->boundary_width;
	seg[i++].y2 = y + h - 1;

	seg[i].x1 = x + w - 1;
	seg[i].y1 = y;
	seg[i].x2 = x + w - 1;
	seg[i++].y2 = y + h - 1;

	XDrawSegments(dpy, win, ShadowGC, seg, i);
    }
    /* right */
    else if (win == t->sides[1])
    {
	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y;

	seg[i].x1 = x;
	seg[i].y1 = y + t->boundary_width - 1;
	seg[i].x2 = x;
	seg[i++].y2 = h + y - 1 - t->boundary_width;

	XDrawSegments(dpy, win, ReliefGC, seg, i);

	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y + h - 1;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y + h - 1;

	seg[i].x1 = x + w - 1;
	seg[i].y1 = y;
	seg[i].x2 = x + w - 1;
	seg[i++].y2 = y + h - 1;

	XDrawSegments(dpy, win, ShadowGC, seg, i);
    }
    /* bottom */
    else if (win == t->sides[2])
    {
	i = 0;
	seg[i].x1 = x + t->boundary_width;
	seg[i].y1 = y;
	seg[i].x2 = w + x - t->boundary_width;
	seg[i++].y2 = y;

	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = x;
	seg[i++].y2 = h + y - 1;

	XDrawSegments(dpy, win, ReliefGC, seg, i);

	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y + h - 1;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y + h - 1;

	seg[i].x1 = x + w - 1;
	seg[i].y1 = y;
	seg[i].x2 = x + w - 1;
	seg[i++].y2 = y + h - 1;

	XDrawSegments(dpy, win, ShadowGC, seg, i);
    }
    /* left */
    else
    {
	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y;

	seg[i].x1 = x;
	seg[i].y1 = y;
	seg[i].x2 = x;
	seg[i++].y2 = h + y - 1;

	XDrawSegments(dpy, win, ReliefGC, seg, i);

	i = 0;
	seg[i].x1 = x;
	seg[i].y1 = y + h - 1;
	seg[i].x2 = w + x - 1;
	seg[i++].y2 = y + h - 1;

	seg[i].x1 = x + w - 1;
	seg[i].y1 = y + t->boundary_width - 1;
	seg[i].x2 = x + w - 1;
	seg[i++].y2 = y + h - t->boundary_width;

	XDrawSegments(dpy, win, ShadowGC, seg, i);
    }
}

/*
 * draws the relief pattern around a window
 */
void
DEC_DrawShadows(MwmWindow *t, Window win, int x, int y, int w, int h,
		GC ReliefGC, GC ShadowGC)
{
    XSegment seg[4];
    int i;

    i = 0;
    seg[i].x1 = x;
    seg[i].y1 = y;
    seg[i].x2 = w + x - 1;
    seg[i++].y2 = y;

    seg[i].x1 = x;
    seg[i].y1 = y;
    seg[i].x2 = x;
    seg[i++].y2 = h + y - 1;

    XDrawSegments(dpy, win, ReliefGC, seg, i);

    i = 0;
    seg[i].x1 = x;
    seg[i].y1 = y + h - 1;
    seg[i].x2 = w + x - 1;
    seg[i++].y2 = y + h - 1;

    seg[i].x1 = x + w - 1;
    seg[i].y1 = y;
    seg[i].x2 = x + w - 1;
    seg[i++].y2 = y + h - 1;

    XDrawSegments(dpy, win, ShadowGC, seg, i);
}

/*
 * Interprets the property MOTIF_WM_HINTS, sets decoration and functions
 * accordingly
 */
void
DEC_SelectDecorations(ScreenInfo *scr, MwmWindow *t)
{
    int border_width, resize_width;

    border_width = scr->frame_border_width;
    resize_width = scr->resize_border_width;

    if (t->mwm_hints && (t->mwm_hints->flags & MWM_HINTS_FUNCTIONS))
    {
	t->functions = t->mwm_hints->functions;

	/*
	 * functions affect the decorations! if the user says no iconify
	 * function, then the iconify button doesn't show up.  So do functions
	 * first.
	 */
	if (t->functions & MWM_FUNC_ALL)
	{
	    /* If we get ALL + some other things, that means to use ALL except
	     * the other things... */
	    t->functions &= ~MWM_FUNC_ALL;
	    t->functions = (MWM_FUNC_RESIZE | MWM_FUNC_MOVE | MWM_FUNC_MINIMIZE |
			    MWM_FUNC_MAXIMIZE | MWM_FUNC_CLOSE)
		& (~(t->functions));
	}

	if (t->flags & TRANSIENT)
	    t->functions &= scr->transient_functions;
	else
	    t->functions &= t->client_functions;

    }
    else if (t->flags & TRANSIENT)
	t->functions = scr->transient_functions;
    else
	t->functions = t->client_functions;


    if (t->mwm_hints && (t->mwm_hints->flags & MWM_HINTS_DECORATIONS))
    {
	t->decorations = t->mwm_hints->decorations;

	/*
	 * next, figure out the decorations
	 */
	if (t->decorations & MWM_DECOR_ALL)
	{
	    /* If we get ALL + some other things, that means to use ALL except
	     * the other things... */
	    t->decorations &= ~MWM_DECOR_ALL;
	    t->decorations = (MWM_DECOR_BORDER | MWM_DECOR_RESIZEH |
			      MWM_DECOR_TITLE | MWM_DECOR_MENU |
			      MWM_DECOR_MINIMIZE | MWM_DECOR_MAXIMIZE)
		& (~t->decorations);
	}

	if (t->flags & TRANSIENT)
	    t->decorations &= scr->transient_decoration;
	else
	    t->decorations &= t->client_decoration;

    }
    else if (t->flags & TRANSIENT)
	t->decorations = scr->transient_decoration;
    else
	t->decorations = t->client_decoration;

    /*
     * Now I have the un-altered decor and functions, but with the ALL
     * attribute cleared and interpreted. I need to modify the decorations
     * that are affected by the functions
     */
    if (!(t->functions & MWM_FUNC_RESIZE))
	t->decorations &= ~MWM_DECOR_RESIZEH;
    /* MWM_FUNC_MOVE has no impact on decorations. */
    if (!(t->functions & MWM_FUNC_MINIMIZE))
	t->decorations &= ~MWM_DECOR_MINIMIZE;
    if (!(t->functions & MWM_FUNC_MAXIMIZE))
	t->decorations &= ~MWM_DECOR_MAXIMIZE;
    /* MWM_FUNC_CLOSE has no impact on decorations. */

    /*
     * This rule is implicit, but its easier to deal with if I take care of 
     * it now
     */
    if (t->decorations & (MWM_DECOR_MENU | MWM_DECOR_MINIMIZE | MWM_DECOR_MAXIMIZE))
	t->decorations |= MWM_DECOR_TITLE;

    if (t->decorations & (MWM_DECOR_TITLE | MWM_DECOR_RESIZEH))
	t->decorations |= MWM_DECOR_BORDER;

    if (t->wShaped)
	t->decorations &= ~(MWM_DECOR_BORDER | MWM_DECOR_RESIZEH);

    /*
     * Assume no decorations, and build up
     */
    t->boundary_width = 0;
    t->corner_width = 0;
    t->title_height = 0;

    if (t->decorations & MWM_DECOR_BORDER)
    {
	/* A narrow border is displayed (5 pixels - 2 relief, 1 top, 2
	 * shadow) */
	t->boundary_width = border_width;
    }

    if (t->decorations & MWM_DECOR_TITLE)
    {
	/* A title barm with no buttons in it - window gets a 1 pixel wide
	 * black border. */
	t->title_height = scr->components[MWM_TITLE_A].f_height + 3;
    }

    if (t->decorations & MWM_DECOR_RESIZEH)
    {
	/* A wide border, with corner tiles is desplayed (10 pixels - 2
	 * relief, 2 shadow) */
	t->boundary_width = resize_width;
	t->corner_width = scr->components[MWM_TITLE_A].f_height + 3 +
	    t->boundary_width;
    }

    t->bw = 0;
    if (t->title_height > 0)
	t->title_height += t->bw;
}

/*
 * Interprets the property MOTIF_WM_HINTS, sets decoration and functions
 * accordingly
 */
void
DEC_ReselectDecorations(ScreenInfo *scr, MwmWindow *t)
{
    int border_width, resize_width, i;
    unsigned long valuemask;	/* mask for create windows */
    XSetWindowAttributes attributes;	/* attributes for create windows */

    border_width = scr->frame_border_width;
    resize_width = scr->resize_border_width;

    if (t->mwm_hints && (t->mwm_hints->flags & MWM_HINTS_FUNCTIONS))