+// Adding the OS independent XPM version --blub
+#include "darkplaces.xpm"
+#include "nexuiz.xpm"
+static SDL_Surface *icon = NULL;
+static void VID_SetIcon_Pre(void)
+{
+ /*
+ * Somewhat restricted XPM reader. Only supports XPMs saved by GIMP 2.4 at
+ * default settings with less than 91 colors and transparency.
+ */
+
+ int width, height, colors, isize, i, j;
+ int thenone = -1;
+ static SDL_Color palette[256];
+ unsigned short palenc[256]; // store color id by char
+ char *xpm;
+ char **idata, *data;
+ const SDL_version *version;
+
+ version = SDL_Linked_Version();
+ // only use non-XPM icon support in SDL v1.3 and higher
+ // SDL v1.2 does not support "smooth" transparency, and thus is better
+ // off the xpm way
+ if(version->major >= 2 || (version->major == 1 && version->minor >= 3))
+ {
+ data = (char *) loadimagepixelsbgra("darkplaces-icon", false, false, false, NULL);
+ if(data)
+ {
+ unsigned int red = 0x00FF0000;
+ unsigned int green = 0x0000FF00;
+ unsigned int blue = 0x000000FF;
+ unsigned int alpha = 0xFF000000;
+ width = image_width;
+ height = image_height;
+
+ // reallocate with malloc, as this is in tempmempool (do not want)
+ xpm = data;
+ data = malloc(width * height * 4);
+ memcpy(data, xpm, width * height * 4);
+ Mem_Free(xpm);
+ xpm = NULL;
+
+ icon = SDL_CreateRGBSurface(SDL_SRCALPHA, width, height, 32, LittleLong(red), LittleLong(green), LittleLong(blue), LittleLong(alpha));
+
+ if(icon == NULL) {
+ Con_Printf( "Failed to create surface for the window Icon!\n"
+ "%s\n", SDL_GetError());
+ free(data);
+ return;
+ }
+
+ icon->pixels = data;
+ }
+ }
+
+ // we only get here if non-XPM icon was missing, or SDL version is not
+ // sufficient for transparent non-XPM icons
+ if(!icon)
+ {
+ xpm = (char *) FS_LoadFile("darkplaces-icon.xpm", tempmempool, false, NULL);
+ idata = NULL;
+ if(xpm)
+ idata = XPM_DecodeString(xpm);
+ if(!idata)
+ idata = ENGINE_ICON;
+ if(xpm)
+ Mem_Free(xpm);
+
+ data = idata[0];
+
+ if(sscanf(data, "%i %i %i %i", &width, &height, &colors, &isize) != 4)
+ {
+ // NOTE: Only 1-char colornames are supported
+ Con_Printf("Sorry, but this does not even look similar to an XPM.\n");
+ return;
+ }
+
+ if(isize != 1)
+ {
+ // NOTE: Only 1-char colornames are supported
+ Con_Printf("This XPM's palette is either huge or idiotically unoptimized. It's key size is %i\n", isize);
+ return;
+ }
+
+ for(i = 0; i < colors; ++i)
+ {
+ unsigned int r, g, b;
+ char idx;
+
+ if(sscanf(idata[i+1], "%c c #%02x%02x%02x", &idx, &r, &g, &b) != 4)
+ {
+ char foo[2];
+ if(sscanf(idata[i+1], "%c c Non%1[e]", &idx, foo) != 2) // I take the DailyWTF credit for this. --div0
+ {
+ Con_Printf("This XPM's palette looks odd. Can't continue.\n");
+ return;
+ }
+ else
+ {
+ palette[i].r = 255; // color key
+ palette[i].g = 0;
+ palette[i].b = 255;
+ thenone = i; // weeeee
+ }
+ }
+ else
+ {
+ palette[i].r = r - (r == 255 && g == 0 && b == 255); // change 255/0/255 pink to 254/0/255 for color key
+ palette[i].g = g;
+ palette[i].b = b;
+ }
+
+ palenc[(unsigned char) idx] = i;
+ }
+
+ // allocate the image data
+ data = (char*) malloc(width*height);
+
+ for(j = 0; j < height; ++j)
+ {
+ for(i = 0; i < width; ++i)
+ {
+ // casting to the safest possible datatypes ^^
+ data[j * width + i] = palenc[((unsigned char*)idata[colors+j+1])[i]];
+ }
+ }
+
+ if(icon != NULL)
+ {
+ // SDL_FreeSurface should free the data too
+ // but for completeness' sake...
+ if(icon->flags & SDL_PREALLOC)
+ {
+ free(icon->pixels);
+ icon->pixels = NULL; // safety
+ }
+ SDL_FreeSurface(icon);
+ }
+
+ icon = SDL_CreateRGBSurface(SDL_SRCCOLORKEY, width, height, 8, 0,0,0,0);// rmask, gmask, bmask, amask); no mask needed
+ // 8 bit surfaces get an empty palette allocated according to the docs
+ // so it's a palette image for sure :) no endian check necessary for the mask
+
+ if(icon == NULL) {
+ Con_Printf( "Failed to create surface for the window Icon!\n"
+ "%s\n", SDL_GetError());
+ free(data);
+ return;
+ }
+
+ icon->pixels = data;
+ SDL_SetPalette(icon, SDL_PHYSPAL|SDL_LOGPAL, palette, 0, colors);
+ SDL_SetColorKey(icon, SDL_SRCCOLORKEY, thenone);
+ }
+
+ SDL_WM_SetIcon(icon, NULL);
+}
+static void VID_SetIcon_Post(void)
+{
+#if SDL_VIDEO_DRIVER_X11 && !SDL_VIDEO_DRIVER_QUARTZ
+ int j;
+ char *data;
+ const SDL_version *version;
+
+ version = SDL_Linked_Version();
+ // only use non-XPM icon support in SDL v1.3 and higher
+ // SDL v1.2 does not support "smooth" transparency, and thus is better
+ // off the xpm way
+ if(!(version->major >= 2 || (version->major == 1 && version->minor >= 3)))
+ {
+ // in this case, we did not set the good icon yet
+ SDL_SysWMinfo info;
+ SDL_VERSION(&info.version);
+ if(SDL_GetWMInfo(&info) == 1 && info.subsystem == SDL_SYSWM_X11)
+ {
+ data = (char *) loadimagepixelsbgra("darkplaces-icon", false, false, false, NULL);
+ if(data)
+ {
+ // use _NET_WM_ICON too
+ static long netwm_icon[MAX_NETWM_ICON];
+ int pos = 0;
+ int i = 1;
+
+ while(data)
+ {
+ if(pos + 2 * image_width * image_height < MAX_NETWM_ICON)
+ {
+ netwm_icon[pos++] = image_width;
+ netwm_icon[pos++] = image_height;
+ for(i = 0; i < image_height; ++i)
+ for(j = 0; j < image_width; ++j)
+ netwm_icon[pos++] = BuffLittleLong((unsigned char *) &data[(i*image_width+j)*4]);
+ }
+ else
+ {
+ Con_Printf("Skipping NETWM icon #%d because there is no space left\n", i);
+ }
+ ++i;
+ Mem_Free(data);
+ data = (char *) loadimagepixelsbgra(va("darkplaces-icon%d", i), false, false, false, NULL);
+ }
+
+ info.info.x11.lock_func();
+ {
+ Atom net_wm_icon = XInternAtom(info.info.x11.display, "_NET_WM_ICON", false);
+ XChangeProperty(info.info.x11.display, info.info.x11.wmwindow, net_wm_icon, XA_CARDINAL, 32, PropModeReplace, (const unsigned char *) netwm_icon, pos);
+ }
+ info.info.x11.unlock_func();
+ }
+ }
+ }
+#endif
+}
+
+
+static void VID_SetCaption(void)