1 /* xscreensaver, Copyright (c) 2001-2014 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
31 #if defined (HAVE_COCOA) || defined(HAVE_ANDROID)
34 # include <X11/Xlib.h>
35 # include <X11/Xutil.h>
36 #endif /* !HAVE_COCOA && !HAVE_ANDROID */
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 memset (cmap, 0, sizeof(cmap)); /* avoid warnings */
82 if (4 != sscanf ((const char *) *data,
83 "%d %d %d %d %c", &w, &h, &ncolors, &nbytes, &c)) {
84 fprintf (stderr, "%s: unparsable XPM header\n", progname);
88 if (ncolors < 1 || ncolors > 255) {
89 fprintf (stderr, "%s: XPM: ncolors is %d\n", progname, ncolors);
93 fprintf (stderr, "%s: %d-byte XPM files not supported\n",
99 for (i = 0; i < ncolors; i++)
101 const char *line = *data;
102 cmap[i].byte = *line++;
107 while (*line == ' ' || *line == '\t')
110 if (!which) continue; /* whitespace at end of line */
112 if (which != 'c' && which != 'm') {
113 fprintf (stderr, "%s: unknown XPM pixel type '%c' in \"%s\"\n",
114 progname, which, *data);
117 while (*line == ' ' || *line == '\t')
119 if (!strncasecmp(line, "None", 4))
124 else if (!strncasecmp(line, "white", 5))
129 else if (!strncasecmp(line, "black", 5))
137 fprintf (stderr, "%s: unparsable XPM color spec: \"%s\"\n",
143 r = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
144 g = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
145 b = (hex[(int) line[0]] << 4) | hex[(int) line[1]]; line += 2;
165 if (depth == 1) transparent_color = 1;
167 pixels = (unsigned long *) calloc (ncolors+1, sizeof(*pixels));
169 for (i = 0; i < ncolors; i++)
171 if (cmap[i].cr == -1) /* transparent */
173 rmap[(int) cmap[i].byte] = 255;
178 color.flags = DoRed|DoGreen|DoBlue;
179 color.red = (cmap[i].cr << 8) | cmap[i].cr;
180 color.green = (cmap[i].cg << 8) | cmap[i].cg;
181 color.blue = (cmap[i].cb << 8) | cmap[i].cb;
183 !XAllocColor (dpy, colormap, &color))
185 color.red = (cmap[i].mr << 8) | cmap[i].mr;
186 color.green = (cmap[i].mg << 8) | cmap[i].mg;
187 color.blue = (cmap[i].mb << 8) | cmap[i].mb;
188 if (!XAllocColor (dpy, colormap, &color)) {
189 fprintf (stderr, "%s: unable to allocate XPM color\n",
194 pixels[pixel_count] = color.pixel;
195 rmap[(int) cmap[i].byte] = pixel_count;
200 ximage = XCreateImage (dpy, visual, depth,
201 (depth == 1 ? XYBitmap : ZPixmap),
205 if (pixels) free (pixels);
209 ximage->bitmap_bit_order =
211 (bigendian() ? MSBFirst : LSBFirst);
213 ximage->data = (char *) calloc (ximage->height, ximage->bytes_per_line);
216 XDestroyImage (ximage);
217 if (pixels) free (pixels);
224 int s = (w8 * h) + 1;
225 *mask_ret = (unsigned char *) malloc (s);
229 memset (*mask_ret, 255, s);
232 for (y = 0; y < h; y++)
234 const char *line = *data++;
235 for (x = 0; x < w; x++)
237 int p = rmap[(int) *line];
239 XPutPixel (ximage, x, y, (p == 255 ? transparent_color : pixels[p]));
241 if (p == 255 && mask_ret)
242 (*mask_ret)[(y * w8) + (x >> 3)] &= (~(1 << (x & 7)));
248 *pixels_ret = pixels;
249 *npixels_ret = pixel_count;