code.delx.au - pulseaudio/blob - polyp/x11prop.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as published
   8   by the Free Software Foundation; either version 2 of the License,
   9   or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <string.h>
  27
  28 #include <X11/Xlib.h>
  29 #include <X11/Xatom.h>
  30
  31 #include "x11prop.h"
  32
  33
  34 void pa_x11_set_prop(Display *d, const char *name, const char *data) {
  35     Atom a = XInternAtom(d, name, False);
  36     XChangeProperty(d, RootWindow(d, 0), a, XA_STRING, 8, PropModeReplace, (unsigned char*) data, strlen(data)+1);
  37 }
  38
  39 void pa_x11_del_prop(Display *d, const char *name) {
  40     Atom a = XInternAtom(d, name, False);
  41     XDeleteProperty(d, RootWindow(d, 0), a);
  42 }
  43
  44 char* pa_x11_get_prop(Display *d, const char *name, char *p, size_t l) {
  45     Atom actual_type;
  46     int actual_format;
  47     unsigned long nitems;
  48     unsigned long nbytes_after;
  49     unsigned char *prop = NULL;
  50     char *ret = NULL;
  51
  52     Atom a = XInternAtom(d, name, False);
  53     if (XGetWindowProperty(d, RootWindow(d, 0), a, 0, (l+2)/4, False, XA_STRING, &actual_type, &actual_format, &nitems, &nbytes_after, &prop) != Success)
  54         goto finish;
  55
  56     if (actual_type != XA_STRING)
  57         goto finish;
  58
  59     memcpy(p, prop, nitems);
  60     p[nitems] = 0;
  61
  62     ret = p;
  63
  64 finish:
  65
  66     if (prop)
  67         XFree(prop);
  68
  69     return ret;
  70 }