neko: use WMHints stuff from Vincent.
[free-sw/xcb/demo] / neko / xcbneko.c
index ea12c6e..b0b6311 100644 (file)
@@ -143,8 +143,8 @@ static char  *ProgramName;
 
 XCBConnection  *xc;
 XCBSCREEN      *theScreen;             /* instead of macro(theDisplay, int theScreen) */
-unsigned long  theBlackPixel;
-unsigned long  theWhitePixel;
+unsigned long  theFgPixel;
+unsigned long  theBgPixel;
 XCBWINDOW         theWindow;
 XCBCURSOR         theCursor;
 XCBKeySymbols  *theKeySyms;
@@ -423,17 +423,23 @@ XCBPIXMAP CreatePixmapFromBitmapData( XCBConnection *c,
   /*  must swap and pad the data if bit/byte_order isn't LSB (Mac) */
   
   /* Mac X Server: byte_order=bit_order=MSB, unit=32, padding=32 */
-  long bufLen = (w+7)/8*h;
+  long bpl = (w+7)/8;
+  long pad = XCBGetSetup(c)->bitmap_format_scanline_pad;
+  long bpd = ROUNDUP(w, pad)>>3;
+  long bufLen = bpd * h;
   BYTE buf[1024];
   if (XCBGetSetup(c)->bitmap_format_scanline_unit == 32 &&
       XCBGetSetup(c)->bitmap_format_bit_order == XCBImageOrderMSBFirst &&
       XCBGetSetup(c)->image_byte_order == XCBImageOrderMSBFirst)
   {
-    long bpl = (w+7)/8;
-    long pad = XCBGetSetup(c)->bitmap_format_scanline_pad;
-    long bpd = ROUNDUP(w, pad)>>3;
-    SwapBits((unsigned char *)data, (unsigned char *)buf, bpl, bpl, bpd, h);
-    bufLen = bpd * h;
+    SwapBits((unsigned char *)data, buf, bpl, bpl, bpd, h);
+  }
+  else if (bpl != bpd)
+  {
+    int i;
+    BYTE *src = (BYTE *)data, *dest = buf;
+    for (i=0; i<h; i++, dest += bpd, src += bpl)
+      memcpy(dest, src, bpl);
   }
   else
     memcpy(buf, data, bufLen);
@@ -481,8 +487,8 @@ void  InitBitmapAndGCs(void) {
 
   theGCValues[0] = XCBGXcopy;
 
-  theGCValues[1] = theBlackPixel;
-  theGCValues[2] = theWhitePixel;
+  theGCValues[1] = theFgPixel;
+  theGCValues[2] = theBgPixel;
 
   theGCValues[3] = XCBFillStyleTiled;
   
@@ -497,7 +503,7 @@ void  InitBitmapAndGCs(void) {
                BitmapGCDataTablePtr->PixelPattern,
                BitmapGCDataTablePtr->PixelWidth,
                BitmapGCDataTablePtr->PixelHeight,
-               theBlackPixel, theWhitePixel, theScreen->root_depth);
+               theFgPixel, theBgPixel, theScreen->root_depth);
 
        theGCValues[4] = BitmapGCDataTablePtr->BitmapCreatePtr->xid; /* tile */
        
@@ -585,6 +591,12 @@ InitScreen( char *DisplayName, char *theGeometry, char *theTitle, Bool iconicSta
 
   XCBAllocNamedColorCookie fgCookie = XCBAllocNamedColor ( xc,
                theColormap,  strlen(fgColor), fgColor );
+
+  /* mouse cursor is always black and white */
+  XCBAllocNamedColorCookie blackCookie = XCBAllocNamedColor ( xc,
+               theColormap,  strlen("black"), "black" );
+  XCBAllocNamedColorCookie whiteCookie = XCBAllocNamedColor ( xc,
+               theColormap,  strlen("white"), "white" );
                
   XCBAllocNamedColorRep *bgRep = XCBAllocNamedColorReply( xc, bgCookie, 0 );
   if (!bgRep) {
@@ -592,7 +604,7 @@ InitScreen( char *DisplayName, char *theGeometry, char *theTitle, Bool iconicSta
                        "%s: Can't allocate the background color %s.\n", ProgramName, bgColor );
        exit( 1 );
   }
-  theWhitePixel = bgRep->pixel;
+  theBgPixel = bgRep->pixel;
 
   XCBAllocNamedColorRep *fgRep = XCBAllocNamedColorReply( xc, fgCookie, 0 );
   if (!fgRep) {
@@ -600,29 +612,59 @@ InitScreen( char *DisplayName, char *theGeometry, char *theTitle, Bool iconicSta
                        "%s: Can't allocate the foreground color %s.\n", ProgramName, fgColor );
        exit( 1 );
   }
-  theBlackPixel = fgRep->pixel;
+  theFgPixel = fgRep->pixel;
+
+  XCBAllocNamedColorRep *blackRep = XCBAllocNamedColorReply( xc, blackCookie, 0 );
+  if (!blackRep) {
+       fprintf( stderr,
+                       "%s: Can't allocate the black color.\n", ProgramName );
+       exit( 1 );
+  }
+  XCBAllocNamedColorRep *whiteRep = XCBAllocNamedColorReply( xc, whiteCookie, 0 );
+  if (!whiteRep) {
+       fprintf( stderr,
+                       "%s: Can't allocate the white color.\n", ProgramName );
+       exit( 1 );
+  }
   
   theCursor = XCBCURSORNew( xc );
   XCBCreateCursor ( xc, theCursor, theCursorSource, theCursorMask,
-       fgRep->visual_red, fgRep->visual_green, fgRep->visual_blue,
-       bgRep->visual_red, bgRep->visual_green, bgRep->visual_blue,
+       blackRep->visual_red, blackRep->visual_green, blackRep->visual_blue,
+       whiteRep->visual_red, whiteRep->visual_green, whiteRep->visual_blue,
        cursor_x_hot, cursor_y_hot );
 
   free(bgRep);
   free(fgRep);
+  free(blackRep);
+  free(whiteRep);
 
   if ( useRoot ) {
-    CARD32 rootAttributes[] = { EVENT_MASK_ROOT, theCursor.xid };
+    CARD32 rootAttributes[] = { theBgPixel, EVENT_MASK_ROOT, theCursor.xid };
        theWindow = theScreen->root;
        XCBChangeWindowAttributes(xc, theWindow,
-               XCBCWEventMask | XCBCWCursor, rootAttributes );
+               XCBCWBackPixel | XCBCWEventMask | XCBCWCursor, rootAttributes );
+       
+       /* XClearWindow: clear area with all dimensions 0 */
+       XCBClearArea( xc, False, theWindow, 0, 0, 0, 0 );
+       
+       XCBDRAWABLE d = { theWindow };
+       XCBGetGeometryRep *geometry = XCBGetGeometryReply( xc,
+         XCBGetGeometry( xc, d ), NULL);
+       if (geometry) {
+         /* only width & height are used by the program */
+         WindowWidth  = geometry->width;
+         WindowHeight = geometry->height;
+         free(geometry);
+       }
+       
+       /* TODO: grab key Alt-Q to quit gracefully? */
   }
   else {
        XCBPIXMAP                theIconPixmap;
 
        CARD32 theWindowAttributes[] = {
-               theWhitePixel, /* background */
-               theBlackPixel, /* border */
+               theBgPixel,    /* background */
+               theFgPixel,    /* border */
                False,         /* override_redirect */
                EVENT_MASK,
                theCursor.xid };
@@ -648,30 +690,19 @@ InitScreen( char *DisplayName, char *theGeometry, char *theTitle, Bool iconicSta
 
        theIconPixmap = CreateBitmapFromData( xc, theWindow,
                                                                                  icon_bits, icon_width, icon_height );
-#ifdef TODO_ICCCM
-       theWMHints.icon_pixmap = theIconPixmap;
-       
+
+       WMHints *theWMHints = AllocWMHints();
+
+       WMHintsSetIconPixmap( theWMHints, theIconPixmap );
+
        if ( iconicState )
-         theWMHints.initial_state = IconicState;
+         WMHintsSetIconic( theWMHints );
        else
-         theWMHints.initial_state = NormalState;
+         WMHintsSetNormal( theWMHints );
        
-       theWMHints.flags = IconPixmapHint | StateHint;
+       SetWMHints( xc, theWindow, theWMHints);
        
-       XSetWMHints( theDisplay, theWindow, &theWMHints );
-#else
-    /* Um... there is no function to send the hints...
-       WMHints              theWMHints;
-       WMHintsSetIconPixmap( &theHints, theIconPixmap );
-
-       if ( iconicState )
-         WMHintsSetIconic( &theHints );
-       else
-         WMHintsSetNormal( &theHints );
-         
-       Now what?
-    */
-#endif
+       free( theWMHints );
 
        /* why hide the structure? */
        SizeHints *theSizeHints = AllocSizeHints();
@@ -692,18 +723,6 @@ InitScreen( char *DisplayName, char *theGeometry, char *theTitle, Bool iconicSta
 
   }
   
-#ifdef TODO
-  /* is this really necessary? */
-  XSetWindowBackground( theDisplay, theWindow, theWhitePixel );
-  XClearWindow( theDisplay, theWindow );
-  XFlush( theDisplay );
-
-  XCBWINDOW            theRoot;
-  XGetGeometry( theDisplay, theWindow, &theRoot,
-                          &WindowPointX, &WindowPointY, &WindowWidth, &WindowHeight,
-                          &BorderWidth, &theDepth );
-#endif
-
   InitBitmapAndGCs();
 
   XCBFlush(xc);