+++ /dev/null
-/* xpm-ximage.c --- converts XPM data to an XImage for use with OpenGL.
- * xscreensaver, Copyright (c) 1998 Jamie Zawinski <jwz@jwz.org>
- *
- * Permission to use, copy, modify, distribute, and sell this software and its
- * documentation for any purpose is hereby granted without fee, provided that
- * the above copyright notice appear in all copies and that both that
- * copyright notice and this permission notice appear in supporting
- * documentation. No representations are made about the suitability of this
- * software for any purpose. It is provided "as is" without express or
- * implied warranty.
- */
-
-#ifdef HAVE_CONFIG_H
-# include "config.h"
-#endif
-
-#include <stdlib.h>
-#include <stdio.h>
-#include <X11/Intrinsic.h>
-
-extern char *progname;
-
-#ifdef HAVE_XPM /* whole file */
-
-#include <X11/Xutil.h>
-#include <X11/xpm.h>
-
-static Bool
-bigendian (void)
-{
- union { int i; char c[sizeof(int)]; } u;
- u.i = 1;
- return !u.c[0];
-}
-
-
-/* Returns an XImage structure containing the bits of the given XPM image.
- This XImage will be 32 bits per pixel, 8 each per R, G, and B, with the
- extra byte set to 0xFF.
-
- The Display and Visual arguments are used only for creating the XImage;
- no bits are pushed to the server.
-
- The Colormap argument is used just for parsing color names; no colors
- are allocated.
- */
-XImage *
-xpm_to_ximage (Display *dpy, Visual *visual, Colormap cmap, char **xpm_data)
-{
- /* All we want to do is get RGB data out of the XPM file built in to this
- program. This is a pain, because there is no way (as of XPM version
- 4.6, at least) to get libXpm to make an XImage without also allocating
- colors with XAllocColor. So, instead, we create an XpmImage and parse
- out the RGB values of the pixels ourselves; and construct an XImage
- by hand. Regardless of the depth of the visual we're using, this
- XImage will have 32 bits per pixel, 8 each per R, G, and B. We put
- 0xFF in the fourth slot, as GL will interpret that as "alpha".
- */
- XImage *ximage = 0;
- XpmImage xpm_image;
- XpmInfo xpm_info;
- int result;
- int x, y, i;
- int bpl, wpl;
- XColor colors[255];
-
- memset (&xpm_image, 0, sizeof(xpm_image));
- memset (&xpm_info, 0, sizeof(xpm_info));
- result = XpmCreateXpmImageFromData (xpm_data, &xpm_image, &xpm_info);
- if (result != XpmSuccess)
- {
- fprintf(stderr, "%s: unable to parse xpm data (%d).\n", progname,
- result);
- exit (1);
- }
-
- ximage = XCreateImage (dpy, visual, 32, ZPixmap, 0, 0,
- xpm_image.width, xpm_image.height, 32, 0);
-
- bpl = ximage->bytes_per_line;
- wpl = bpl/4;
-
- ximage->data = (char *) malloc(xpm_image.height * bpl);
-
- /* Parse the colors in the XPM into RGB values. */
- for (i = 0; i < xpm_image.ncolors; i++)
- if (!XParseColor(dpy, cmap, xpm_image.colorTable[i].c_color, &colors[i]))
- {
- fprintf(stderr, "%s: unparsable color: %s\n", progname,
- xpm_image.colorTable[i].c_color);
- exit(1);
- }
-
- /* Translate the XpmImage to an RGB XImage. */
- {
- int rpos, gpos, bpos, apos; /* bitfield positions */
-
- /* Note that unlike X, which is endianness-agnostic (since any XImage
- can have its own specific bit ordering, with the server reversing
- things as necessary) OpenGL pretends everything is client-side, so
- we need to pack things in the right order for the client machine.
- */
- if (bigendian())
- rpos = 24, gpos = 16, bpos = 8, apos = 0;
- else
- rpos = 0, gpos = 8, bpos = 16, apos = 24;
-
- for (y = 0; y < xpm_image.height; y++)
- {
- int y2 = (xpm_image.height-1-y); /* Texture maps are upside down. */
-
- unsigned int *oline = (unsigned int *) (ximage->data + (y * bpl));
- unsigned int *iline = (unsigned int *) (xpm_image.data + (y2 * wpl));
-
- for (x = 0; x < xpm_image.width; x++)
- {
- XColor *c = &colors[iline[x]];
- /* pack it as RGBA */
- oline[x] = (((c->red >> 8) << rpos) |
- ((c->green >> 8) << gpos) |
- ((c->blue >> 8) << bpos) |
- (0xFF << apos));
- }
- }
- }
-
- /* I sure hope these only free the contents, and not the args. */
-#if 0 /* Apparently not? Gotta love those well-documented APIs! */
- XpmFreeXpmImage (&xpm_image);
- XpmFreeXpmInfo (&xpm_info);
-#endif
-
- return ximage;
-}
-
-
-#else /* !HAVE_XPM */
-
-XImage *
-xpm_to_ximage (char **xpm_data)
-{
- fprintf(stderr, "%s: not compiled with XPM support.\n", progname);
- exit (1);
-}
-
-#endif /* !HAVE_XPM */