Return to Raise.c CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / clients / uwm

Annotation of researchv9/X11/src/X.V11R1/clients/uwm/Raise.c, revision 1.1

1.1     ! root        1: /* $Header: Raise.c,v 1.1 87/09/11 08:21:40 toddb Exp $ */
        !             2:  
        !             3: #include <X11/copyright.h>
        !             4: 
        !             5: /*
        !             6:  * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
        !             7:  *
        !             8:  *                         All Rights Reserved
        !             9:  *
        !            10:  * Permission to use, copy, modify, and distribute this software and its
        !            11:  * documentation for any purpose and without fee is hereby granted,
        !            12:  * provided that the above copyright notice appear in all copies and that
        !            13:  * both that copyright notice and this permission notice appear in
        !            14:  * supporting documentation, and that the name of Digital Equipment
        !            15:  * Corporation not be used in advertising or publicity pertaining to
        !            16:  * distribution of the software without specific, written prior permission.
        !            17:  *
        !            18:  *
        !            19:  * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
        !            20:  * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
        !            21:  * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
        !            22:  * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
        !            23:  * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
        !            24:  * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
        !            25:  * SOFTWARE.
        !            26:  */
        !            27: 
        !            28:  
        !            29: /*
        !            30:  * MODIFICATION HISTORY
        !            31:  *
        !            32:  * 000 -- M. Gancarz, DEC Ultrix Engineering Group
        !            33:  * 001 -- R. Kittell, DEC Storage A/D May 19, 1986
        !            34:  *  Optionally warp mouse to upper right corner of window after raise.
        !            35:  * 002 -- Loretta Guarino Reid, DEC Ultrix Engineering Group
        !            36:  *  Western Software Lab. Convert to X11.
        !            37:  */
        !            38:  
        !            39: #ifndef lint
        !            40: static char *sccsid = "@(#)Raise.c     3.8     1/24/86";
        !            41: #endif
        !            42:  
        !            43: #include "uwm.h"
        !            44:  
        !            45: Bool Raise(window, mask, button, x, y)
        !            46: Window window;                          /* Event window. */
        !            47: int mask;                               /* Button/key mask. */
        !            48: int button;                           /* Button event detail. */
        !            49: int x, y;                               /* Event mouse position. */
        !            50:  
        !            51: {
        !            52: XWindowAttributes winfo;                       /* Window details for warp */
        !            53: int status;
        !            54:  
        !            55:     /*
        !            56:      * If the window is not the root window, raise the window and return.
        !            57:      */
        !            58:     if (window != RootWindow(dpy, scr)) {
        !            59:         XRaiseWindow(dpy, window);
        !            60:        /*
        !            61:         * Optionally warp the mouse to the upper left corner of the window.
        !            62:         */
        !            63:        if (WarpOnRaise) {
        !            64:            status = XGetWindowAttributes (dpy, window, &winfo);
        !            65:             if (status == FAILURE) return(FALSE);
        !            66:  
        !            67:            status = XWarpPointer (dpy, None, window, 
        !            68:                         0, 0, 0, 0,
        !            69:                         winfo.width >= 7 ? winfo.width - 7 : winfo.width / 2,
        !            70:                          winfo.height >= 10 ? 10 : winfo.height / 2);
        !            71:             if (status == FAILURE) return(FALSE);
        !            72:         }
        !            73:     }
        !            74:     return(FALSE);
        !            75: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.