utils/xselection.c

   1 /* -*-c-*- */
   2 /*
   3  * x selection/cut buffer utility for Fvwm
   4  *
   5  * Copyright (c) 1999 Matthias Clasen <clasen@mathematik.uni-freiburg.de>
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20  */
  21
  22 #include "config.h"
  23 #include <stdio.h>
  24 #include <X11/Xlib.h>
  25 #include <X11/Xatom.h>
  26 #include <X11/Intrinsic.h>
  27
  28 void paste_primary(Display *dpy, int window, int property, int delete)
  29 {
  30   Atom actual_type;
  31   int actual_format;
  32   unsigned long nitems, bytes_after, nread;
  33   unsigned char *data, *d, *h, buf[256];
  34
  35   if (property == None)
  36     {
  37       window = DefaultRootWindow (dpy);
  38       property = XA_CUT_BUFFER0;
  39       delete = False;
  40     }
  41
  42   nread = 0;
  43   h = buf;
  44   do
  45     {
  46       if (XGetWindowProperty (dpy, window, property, nread/4, 1024L,
  47                               delete, AnyPropertyType, &actual_type,
  48                               &actual_format, &nitems, &bytes_after,
  49                               (unsigned char **)&data) != Success)
  50         return;
  51       if (actual_type != XA_STRING)
  52         return;
  53
  54       /* send the text line-by-line, recognize continuation lines */
  55       d = data;
  56       while (1) {
  57         switch (*d) {
  58         case '\n':
  59           *h = 0;
  60           break;
  61         case '\\':
  62             if (d[1] == '\n')
  63               {
  64                 *h = ' ';
  65                 d++;
  66                 break;
  67               }
  68             /* fall through */
  69         default:
  70           *h = *d;
  71         }
  72         if (h - buf == 255)
  73           {
  74             fprintf(stderr, "xselection: line too long\n");
  75             *h = 0;
  76           }
  77         if (*h == 0)
  78           {
  79             h = buf;
  80             while (*h == ' ') h++;
  81             printf ("%s\n", h);
  82             h = buf;
  83           }
  84         else h++;
  85         if (*d == 0) break;
  86         d++;
  87       }
  88
  89       nread += nitems;
  90       XFree (data);
  91     } while (bytes_after > 0);
  92 }
  93
  94 int main (int argc, char **argv)
  95 {
  96   XEvent event;
  97   Atom sel_property;
  98   char *display_name = NULL;
  99   Display *dpy;
 100   Window window;
 101
 102   if (!(dpy = XOpenDisplay (display_name)))
 103     {
 104       fprintf (stderr, "xselection: can't open display %s\n",
 105                XDisplayName (display_name));
 106       exit (1);
 107     }
 108
 109   window = XCreateSimpleWindow (dpy, DefaultRootWindow(dpy), 0,0,10,10, 0,0,0);
 110   sel_property = XInternAtom (dpy, "VT_SELECTION", False);
 111
 112   XConvertSelection (dpy, XA_PRIMARY, XA_STRING, sel_property, window,
 113                      CurrentTime);
 114
 115   while (1)
 116     {
 117       XNextEvent (dpy, &event);
 118       if (event.type == SelectionNotify)
 119         {
 120           paste_primary (dpy, event.xselection.requestor,
 121                          event.xselection.property, True);
 122           exit (0);
 123         }
 124     }
 125 }