Jabber WindowGram Client (JWGC) Introduction Screenshots Installation Downloads Documentation Browse Source Resources Project Site

Stable Version -none- Latest Version beta5

xselect.c

Go to the documentation of this file.

/*
 *      Copyright (c) 1989 by the Massachusetts Institute of Technology.
 *      For copying and distribution information, see the file
 *      "mit-copyright.h".
 *
 *      Modified for jwgc by Daniel Henninger.
 */

#include "mit-copyright.h"

/* xselect.c - ICCCM compliant cut-and-paste */
/* also includes some other ICCCMisms, such as the WM_PROTOCOL handling */

#ifndef X_DISPLAY_MISSING

#include <X11/Xlib.h>
#include <X11/Xproto.h>
#include <X11/Xatom.h>
#include "new_string.h"
#include "xselect.h"

extern char *getSelectedText();

static Time ownership_start = CurrentTime;
static Time ownership_end = CurrentTime;
Atom XA_WM_PROTOCOLS, XA_WM_DELETE_WINDOW;
static Atom JA_TARGETS, JA_MULTIPLE, JA_TIMESTAMP, JA_ATOM_PAIR;

static struct _JAtom {
        Atom *patom;
        char *name;
} JAtom[] = {
        {
                &XA_WM_PROTOCOLS, "WM_PROTOCOLS"
        },
        {
                &XA_WM_DELETE_WINDOW, "WM_DELETE_WINDOW"
        },
        {
                &JA_TARGETS, "TARGETS"
        },
        {
                &JA_MULTIPLE, "MULTIPLE"
        },
        {
                &JA_TIMESTAMP, "TIMESTAMP"
        },
        {
                &JA_ATOM_PAIR, "ATOM_PAIR"
        }
};
#define NumJAtoms (sizeof(JAtom)/sizeof(struct _JAtom))

/* internal static functions */

static void 
xselNotify(dpy, selreq, property)
        Display *dpy;
        XSelectionRequestEvent *selreq;
        Atom property;
{
        XSelectionEvent ev;

        ev.type = SelectionNotify;
        ev.requestor = selreq->requestor;
        ev.selection = selreq->selection;
        ev.target = selreq->target;
        ev.property = property;
        ev.time = selreq->time;

        XSendEvent(dpy, ev.requestor, False, 0, (XEvent *) & ev);
}

/* pRequestAtoms and RequestAtoms should have the same size. */
static Atom *pRequestAtoms[] = {
        &JA_TARGETS, &JA_MULTIPLE, &JA_TIMESTAMP, NULL
};
static Atom RequestAtoms[] = {
        None, None, None, XA_STRING
};
#define NumRequestAtoms (sizeof(RequestAtoms)/sizeof(Atom))
#define PROP(prop,targ) ((prop)!=None?(prop):(targ))
#define ChangeProp(type,format,data,size) \
  XChangeProperty(dpy,w,PROP(property,target),(type),(format), \
                  PropModeReplace, (unsigned char *) (data),(size))

static void 
xselSetProperties(dpy, w, property, target, selreq)
        Display *dpy;
        Window w;
        Atom property, target;
        XSelectionRequestEvent *selreq;
{
        if (target == JA_TARGETS) {

                ChangeProp(XA_ATOM, 32, RequestAtoms, NumRequestAtoms);
                XSync(dpy, 0);
        }
        else if (target == JA_MULTIPLE) {
                Atom atype;
                int aformat;
                Atom *alist;
                unsigned long alistsize, i;

                XGetWindowProperty(dpy, w, property, 0L, 0L, False, JA_ATOM_PAIR, &atype,
                       &aformat, &i, &alistsize, (unsigned char **) &alist);

                if (alistsize)
                        XGetWindowProperty(dpy, w, property, 0L, alistsize / sizeof(Atom), False,
                             JA_ATOM_PAIR, &atype, &aformat, &alistsize, &i,
                                           (unsigned char **) &alist);

                alistsize /= (sizeof(Atom) / 4);
                for (i = 0; i < alistsize; i += 2)
                        xselSetProperties(dpy, w, alist[i + 1], alist[i], selreq);

                XFree((char *) alist);
        }
        else if (target == JA_TIMESTAMP) {
                ChangeProp(XA_INTEGER, 32, &ownership_start, 1);
                XSync(dpy, 0);
        }
        else if (target == XA_STRING) {
                char *selected;

                if ((selected = getSelectedText())) {
                        ChangeProp(XA_STRING, 8, selected, string_Length(selected));
                }
                else {
                        /*
                         * This should only happen if the pasting client is
                         * out of spec (or if this program is buggy), but it
                         * could happen
                         */
                        ChangeProp(XA_STRING, 8, "", 0);
                }
                XSync(dpy, 0);
        }

        xselNotify(dpy, selreq, property);
}

/* global functions */

void 
xicccmInitAtoms(dpy)
        Display *dpy;
{
        int i;

        for (i = 0; i < NumJAtoms; i++)
                *(JAtom[i].patom) = XInternAtom(dpy, JAtom[i].name, False);
        for (i = 0; i < NumRequestAtoms; i++)
                if (pRequestAtoms[i])
                        RequestAtoms[i] = *(pRequestAtoms[i]);
}

int 
xselGetOwnership(dpy, w, time)
        Display *dpy;
        Window w;
        Time time;
{
        int temp;

        XSetSelectionOwner(dpy, XA_PRIMARY, w, time);
        temp = (w == XGetSelectionOwner(dpy, XA_PRIMARY));

        if (temp)
                ownership_start = time;

        return (temp);
}

/* Get the selection.  Return !0 if success, 0 if fail */
int 
xselProcessSelection(dpy, w, event)
        Display *dpy;
        Window w;
        XEvent *event;
{
        XSelectionRequestEvent *selreq = &(event->xselectionrequest);

        if ((ownership_start == CurrentTime) ||
            (((selreq->time != CurrentTime) &&
              (selreq->time < ownership_start)) ||
             ((ownership_end != CurrentTime) &&
              (ownership_end > ownership_start) &&
              (selreq->time > ownership_end))))
                xselNotify(dpy, selreq, None);
        else
                xselSetProperties(dpy, selreq->requestor, selreq->property, selreq->target,
                                  selreq);

        return (1);
}

void 
xselOwnershipLost(time)
        Time time;
{
        ownership_end = time;
}

/* ARGSUSED */
void 
xselGiveUpOwnership(dpy, w)
        Display *dpy;
        Window w;
{
        XSetSelectionOwner(dpy, XA_PRIMARY, None, ownership_start);

        ownership_end = ownership_start;        /* Is this right?  what
                                                 * should I use? */
}

#endif                          /* X_DISPLAY_MISSING */

Last updated at Tue Dec 18 21:07:42 PST 2007.

This site and project hosted by...