* This is an all new program to set the root window to an Xpm pixmap.

/****************************************************************************
* This is an all new program to set the root window to an Xpm pixmap.
* Copyright 1993, Rob Nation ([email protected])
* You may use this file for anything you want, as long as the copyright
* is kept intact. No guarantees of any sort are made in any way regarding
* this program or anything related to it.
****************************************************************************/

#include <stdio.h>
#include <signal.h>
#include <string.h>
#include <X11/Xos.h>
#include <X11/Xatom.h>
#include <X11/xpm.h>
int save_colors = 0;
Display *dpy;
int screen;
Window root;
char *display_name = NULL;
void SetRootWindow(char *tline);
Pixmap rootXpm;

#define VERSION "1.0"

int main(int argc, char **argv)
{
Atom prop, type;
int format;
unsigned long length, after;
unsigned char *data;

if(argc != 2)
{
fprintf(stderr,"Xpmroot Version %s\n",VERSION);
fprintf(stderr,"Usage: xpmroot xpmfile\n");
fprintf(stderr,"Try Again\n");
exit(1);
}
dpy = XOpenDisplay(display_name);
if (!dpy)
{
fprintf(stderr, "Xpmroot: unable to open display '%s'\n",
XDisplayName (display_name));
exit (2);
}
screen = DefaultScreen(dpy);
root = RootWindow(dpy, screen);

SetRootWindow(argv[1]);

prop = XInternAtom(dpy, "_XSETROOT_ID", False);

(void)XGetWindowProperty(dpy, root, prop, 0L, 1L, True, AnyPropertyType,
&type, &format, &length, &after, &data);
if ((type == XA_PIXMAP) && (format == 32) && (length == 1) && (after == 0))
XKillClient(dpy, *((Pixmap *)data));

XChangeProperty(dpy, root, prop, XA_PIXMAP, 32, PropModeReplace,
(unsigned char *) &rootXpm, 1);
XSetCloseDownMode(dpy, RetainPermanent);
XCloseDisplay(dpy);
return 0;
}

void SetRootWindow(char *tline)
{
XWindowAttributes root_attr;
XpmAttributes xpm_attributes;
Pixmap shapeMask;
int val;

XGetWindowAttributes(dpy,root,&root_attr);
xpm_attributes.colormap = root_attr.colormap;
xpm_attributes.valuemask = XpmSize | XpmReturnPixels|XpmColormap;
if((val = XpmReadFileToPixmap(dpy,root, tline,
&rootXpm, &shapeMask,
&xpm_attributes))!= XpmSuccess)
{
if(val == XpmOpenFailed)
fprintf(stderr, "Couldn't open pixmap file\n");
else if(val == XpmColorFailed)
fprintf(stderr, "Couldn't allocated required colors\n");
else if(val == XpmFileInvalid)
fprintf(stderr, "Invalid Format for an Xpm File\n");
else if(val == XpmColorError)
fprintf(stderr, "Invalid Color specified in Xpm FIle\n");
else if(val == XpmNoMemory)
fprintf(stderr, "Insufficient Memory\n");
exit(1);
}

XSetWindowBackgroundPixmap(dpy, root, rootXpm);
save_colors = 1;
XClearWindow(dpy,root);

}

#ifdef NEEDS_STRCASECMP
int strcasecmp(char *s1,char *s2)
{
int c1,c2;
int n,n2;

n=strlen(s1);
n2=strlen(s2);
if(n!=n2)
return 1;

for (;;)
{
c1 = *s1;
c2 = *s2;
if (!c1 || !c2)
return(c1 - c2);
if (isupper(c1))
c1 = 'a' - 1 + (c1 & 31);
if (isupper(c2))
c2 = 'a' - 1 + (c2 & 31);
if (c1 != c2)
return(c1 - c2);
n--,s1++,s2++;
}
}
#endif