1 /* xscreensaver, Copyright (c) 2001-2006 Jamie Zawinski <jwz@jwz.org>
3 * Permission to use, copy, modify, distribute, and sell this software and its
4 * documentation for any purpose is hereby granted without fee, provided that
5 * the above copyright notice appear in all copies and that both that
6 * copyright notice and this permission notice appear in supporting
7 * documentation. No representations are made about the suitability of this
8 * software for any purpose. It is provided "as is" without express or
12 /* I implemented this subset of libXPM here because I don't want the
13 xscreensaver daemon to depend on libXPM for two reasons: first,
14 because I want the logo to show up even if libXPM is not installed
15 on the system; and second, I don't want to have to security-audit
16 libXPM. The fewer libraries that are linked into the xscreensaver
17 daemon, the more likely to be secure it is.
19 Also, the Cocoa port uses this code since libXPM isn't available
33 #else /* !HAVE_COCOA - real Xlib */
34 # include <X11/Xlib.h>
35 # include <X11/Xutil.h>
36 #endif /* !HAVE_COCOA */
40 extern const char *progname;
45 union { int i; char c[sizeof(int)]; } u;
50 static const char hex[128] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
51 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
52 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
53 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 0, 0, 0,
54 0, 10,11,12,13,14,15,0, 0, 0, 0, 0, 0, 0, 0, 0,
55 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
56 0, 10,11,12,13,14,15,0, 0, 0, 0, 0, 0, 0, 0, 0,
57 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
60 minixpm_to_ximage (Display *dpy, Visual *visual, Colormap colormap, int depth,
61 unsigned long transparent_color,
62 const char * const * data,
63 int *width_ret, int *height_ret,
64 unsigned long **pixels_ret, int *npixels_ret,
65 unsigned char **mask_ret)
67 int w, w8, h, ncolors, nbytes;
69 int x, y, i, pixel_count;
72 int cr; int cg; int cb;
73 int mr; int mg; int mb;
75 unsigned char rmap[256];
77 unsigned long *pixels;
80 if (4 != sscanf ((const char *) *data,
81 "%d %d %d %d %c", &w, &h, &ncolors, &nbytes, &c)) {
82 fprintf (stderr, "%s: unparsable XPM header\n", progname);
86 if (ncolors < 1 || ncolors > 255) {
87 fprintf (stderr, "%s: XPM: ncolors is %d\n", progname, ncolors);
91 fprintf (stderr, "%s: %d-byte XPM files not supported\n",
97 for (i = 0; i < ncolors; i++)
99 const char *line = *data;
100 cmap[i].byte = *line++;
105 while (*line == ' ' || *line == '\t')
108 if (!which) continue; /* whitespace at end of line */
110 if (which != 'c' && which != 'm') {
111 fprintf (stderr, "%s: unknown XPM pixel type '%c' in \"%s\"\n",
112 progname, which, *data);
115 while (*line == ' ' || *line == '\t')
117 if (!strncasecmp(line, "None", 4))
125 fprintf (stderr, "%s: unparsable XPM color spec: \"%s\"\n",
131 r = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
132 g = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
133 b = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
153 if (depth == 1) transparent_color = 1;
155 pixels = (unsigned long *) calloc (ncolors+1, sizeof(*pixels));
157 for (i = 0; i < ncolors; i++)
159 if (cmap[i].cr == -1) /* transparent */
161 rmap[(int) cmap[i].byte] = 255;
166 color.flags = DoRed|DoGreen|DoBlue;
167 color.red = (cmap[i].cr << 8) | cmap[i].cr;
168 color.green = (cmap[i].cg << 8) | cmap[i].cg;
169 color.blue = (cmap[i].cb << 8) | cmap[i].cb;
171 !XAllocColor (dpy, colormap, &color))
173 color.red = (cmap[i].mr << 8) | cmap[i].mr;
174 color.green = (cmap[i].mg << 8) | cmap[i].mg;
175 color.blue = (cmap[i].mb << 8) | cmap[i].mb;
176 if (!XAllocColor (dpy, colormap, &color)) {
177 fprintf (stderr, "%s: unable to allocate XPM color\n",
182 pixels[pixel_count] = color.pixel;
183 rmap[(int) cmap[i].byte] = pixel_count;
188 ximage = XCreateImage (dpy, visual, depth,
189 (depth == 1 ? XYBitmap : ZPixmap),
191 if (! ximage) return 0;
193 ximage->bitmap_bit_order =
195 (bigendian() ? MSBFirst : LSBFirst);
197 ximage->data = (char *) calloc (ximage->height, ximage->bytes_per_line);
199 XDestroyImage (ximage);
206 int s = (w8 * h) + 1;
207 *mask_ret = (unsigned char *) malloc (s);
211 memset (*mask_ret, 255, s);
214 for (y = 0; y < h; y++)
216 const char *line = *data++;
217 for (x = 0; x < w; x++)
219 int p = rmap[(int) *line];
221 XPutPixel (ximage, x, y, (p == 255 ? transparent_color : pixels[p]));
223 if (p == 255 && mask_ret)
224 (*mask_ret)[(y * w8) + (x >> 3)] &= (~(1 << (x & 7)));
230 *pixels_ret = pixels;
231 *npixels_ret = pixel_count;