Return to XQuPntr.c CVS log

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

Annotation of researchv9/X11/src/X.V11R1/lib/X/XQuPntr.c, revision 1.1

1.1     ! root        1: #include "copyright.h"
        !             2: 
        !             3: /* $Header: XQuPntr.c,v 11.12 87/09/11 08:06:04 toddb Exp $ */
        !             4: /* Copyright    Massachusetts Institute of Technology    1986  */
        !             5: 
        !             6: #define NEED_REPLIES
        !             7: #include "Xlibint.h"
        !             8: 
        !             9: Bool XQueryPointer(dpy, w, root, child, root_x, root_y, win_x, win_y, mask)
        !            10:      register Display *dpy;
        !            11:      Window w, *root, *child;
        !            12:      int *root_x, *root_y, *win_x, *win_y;
        !            13:      unsigned int *mask;
        !            14: 
        !            15: {       
        !            16:     xQueryPointerReply rep;
        !            17:     xResourceReq *req;
        !            18: 
        !            19:     LockDisplay(dpy);
        !            20:     GetResReq(QueryPointer, w, req);
        !            21:     if (_XReply (dpy, (xReply *)&rep, 0, xTrue) == 0) {
        !            22:            UnlockDisplay(dpy);
        !            23:            SyncHandle();
        !            24:            return(False);
        !            25:        }
        !            26: 
        !            27:     *root = rep.root;
        !            28:     *child = rep.child;
        !            29:     *root_x = rep.rootX;
        !            30:     *root_y = rep.rootY;
        !            31:     *win_x = rep.winX;
        !            32:     *win_y = rep.winY;
        !            33:     *mask = rep.mask;
        !            34:     UnlockDisplay(dpy);
        !            35:     SyncHandle();
        !            36:     return (rep.sameScreen);
        !            37: }
        !            38: 

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