/* MS-Windows Engine (aka GTK-Wimp)

 *

 * Copyright (C) 2003, 2004 Raymond Penners <raymond@dotsphinx.com>

 * Copyright (C) 2006 Hong Jen Yee (PCMan) <pcman.tw@gmail.com>

 * Includes code adapted from redmond95 by Owen Taylor, and

 * gtk-nativewin by Evan Martin

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Library General Public

 * License as published by the Free Software Foundation; either

 * version 2 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Library General Public License for more details.

 *

 * You should have received a copy of the GNU Library General Public

 * License along with this library; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

/*

 * Useful resources:

 *

 *  http://lxr.mozilla.org/seamonkey/source/widget/src/windows/nsNativeThemeWin.cpp

 *  http://lxr.mozilla.org/seamonkey/source/widget/src/windows/nsLookAndFeel.cpp

 *  http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/drawthemebackground.asp

 *  http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/pantdraw_4b3g.asp

 */

/* Include first, else we get redefinition warnings about STRICT */

#include "pango/pangowin32.h"

#include "msw_style.h"

#include "xp_theme.h"

#include <windows.h>

#include <math.h>

#include <string.h>

#include <stdio.h>

#include "gdk/gdk.h"

#include "gtk/gtk.h"

#ifdef BUILDING_STANDALONE

#include "gdk/gdkwin32.h"

#else

#include "gdk/win32/gdkwin32.h"

#endif

#define DETAIL(xx)   ((detail) && (!strcmp(xx, detail)))

/* Default values, not normally used

 */

static const GtkRequisition default_option_indicator_size = { 9, 8 };

static const GtkBorder default_option_indicator_spacing = { 7, 5, 2, 2 };

static GtkStyleClass *parent_class;

static HBRUSH g_dither_brush = NULL;

static HPEN g_light_pen = NULL;

static HPEN g_dark_pen = NULL;

typedef enum

{

  CHECK_AA,

  CHECK_BASE,

  CHECK_BLACK,

  CHECK_DARK,

  CHECK_LIGHT,

  CHECK_MID,

  CHECK_TEXT,

  CHECK_INCONSISTENT,

  RADIO_BASE,

  RADIO_BLACK,

  RADIO_DARK,

  RADIO_LIGHT,

  RADIO_MID,

  RADIO_TEXT

} Part;

#define PART_SIZE 13

static const unsigned char check_aa_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char check_base_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char check_black_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0xfe, 0x0f, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char check_dark_bits[] = {

  0xff, 0x1f, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00

};

static const unsigned char check_light_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0xfe, 0x1f, 0x00, 0x00

};

static const unsigned char check_mid_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0xfc, 0x0f, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char check_text_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00,

  0x00, 0x03, 0x00, 0x00, 0x88, 0x03, 0x00, 0x00,

  0xd8, 0x01, 0x00, 0x00, 0xf8, 0x00, 0x00, 0x00,

  0x70, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char check_inconsistent_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0xf0, 0x03, 0x00, 0x00, 0xf0, 0x03, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char radio_base_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0xf0, 0x01, 0x00, 0x00, 0xf8, 0x03, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xfc, 0x07, 0x00, 0x00,

  0xfc, 0x07, 0x00, 0x00, 0xf8, 0x03, 0x00, 0x00,

  0xf0, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char radio_black_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0x00,

  0x0c, 0x02, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char radio_dark_bits[] = {

  0xf0, 0x01, 0x00, 0x00, 0x0c, 0x06, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,

  0x01, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,

  0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char radio_light_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00,

  0x00, 0x10, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x0c, 0x06, 0x00, 0x00,

  0xf0, 0x01, 0x00, 0x00

};

static const unsigned char radio_mid_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x04, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,

  0x00, 0x08, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00,

  0x0c, 0x06, 0x00, 0x00, 0xf0, 0x01, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static const unsigned char radio_text_bits[] = {

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0xe0, 0x00, 0x00, 0x00, 0xf0, 0x01, 0x00, 0x00,

  0xf0, 0x01, 0x00, 0x00, 0xf0, 0x01, 0x00, 0x00,

  0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  0x00, 0x00, 0x00, 0x00

};

static struct

{

  const unsigned char *bits;

  cairo_surface_t *bmap;

} parts[] = {

  { check_aa_bits, NULL           },

  { check_base_bits, NULL         },

  { check_black_bits, NULL        },

  { check_dark_bits, NULL         },

  { check_light_bits, NULL        },

  { check_mid_bits, NULL          },

  { check_text_bits, NULL         },

  { check_inconsistent_bits, NULL },

  { radio_base_bits, NULL         },

  { radio_black_bits, NULL        },

  { radio_dark_bits, NULL         },

  { radio_light_bits, NULL        },

  { radio_mid_bits, NULL          },

  { radio_text_bits, NULL         }

};

static void

_cairo_draw_line (cairo_t  *cr,

                  GdkColor *color,

                  gint      x1,

                  gint      y1,

                  gint      x2,

                  gint      y2)

{

  cairo_save (cr);

  gdk_cairo_set_source_color (cr, color);

  cairo_set_line_cap (cr, CAIRO_LINE_CAP_SQUARE);

  cairo_set_line_width (cr, 1.0);

  cairo_move_to (cr, x1 + 0.5, y1 + 0.5);

  cairo_line_to (cr, x2 + 0.5, y2 + 0.5);

  cairo_stroke (cr);

  cairo_restore (cr);

}

static void

_cairo_draw_rectangle (cairo_t *cr,

                       GdkColor *color,

                       gboolean filled,

                       gint x,

                       gint y,

                       gint width,

                       gint height)

{

  gdk_cairo_set_source_color (cr, color);

  if (filled)

    {

      cairo_rectangle (cr, x, y, width, height);

      cairo_fill (cr);

    }

  else

    {

      cairo_rectangle (cr, x + 0.5, y + 0.5, width, height);

      cairo_stroke (cr);

    }

}

static gboolean

get_system_font (XpThemeClass klazz, XpThemeFont type, LOGFONTW *out_lf)

{

  if (xp_theme_get_system_font (klazz, type, out_lf))

    {

      return TRUE;

    }

  else

    {

      /* Use wide char versions here, as the theming functions only support

       * wide chars versions of the structures. */

      NONCLIENTMETRICSW ncm;

      ncm.cbSize = sizeof (NONCLIENTMETRICSW);

      if (SystemParametersInfoW (SPI_GETNONCLIENTMETRICS,

				sizeof (NONCLIENTMETRICSW), &ncm, 0))

	{

	  if (type == XP_THEME_FONT_CAPTION)

	    *out_lf = ncm.lfCaptionFont;

	  else if (type == XP_THEME_FONT_MENU)

	    *out_lf = ncm.lfMenuFont;

	  else if (type == XP_THEME_FONT_STATUS)

	    *out_lf = ncm.lfStatusFont;

	  else

	    *out_lf = ncm.lfMessageFont;

	  return TRUE;

	}

    }

  return FALSE;

}

static char *

sys_font_to_pango_font (XpThemeClass klazz, XpThemeFont type, char *buf,

			size_t bufsiz)

{

  LOGFONTW lf;

  if (get_system_font (klazz, type, &lf))

    {

      PangoFontDescription *desc = NULL;

      int pt_size;

      const char *font;

      desc = pango_win32_font_description_from_logfontw (&lf);

      if (!desc)

	return NULL;

      font = pango_font_description_to_string (desc);

      pt_size = pango_font_description_get_size (desc);

      if (!(font && *font))

	{

	  pango_font_description_free (desc);

	  return NULL;

	}

      if (pt_size == 0)

	{

	  HDC hDC;

	  HWND hwnd;

	  hwnd = GetDesktopWindow ();

	  hDC = GetDC (hwnd);

	  if (hDC)

	    pt_size = -MulDiv (lf.lfHeight, 72, GetDeviceCaps (hDC, LOGPIXELSY));

	  else

	    pt_size = 10;

	  if (hDC)

	    ReleaseDC (hwnd, hDC);

	  g_snprintf (buf, bufsiz, "%s %d", font, pt_size);

	}

      else

	{

	  g_snprintf (buf, bufsiz, "%s", font);

	}

      if (desc)

	pango_font_description_free (desc);

      return buf;

    }

  return NULL;

}

/* missing from ms's header files */

#ifndef SPI_GETMENUSHOWDELAY

#define SPI_GETMENUSHOWDELAY 106

#endif

/* I don't know the proper XP theme class for things like

   HIGHLIGHTTEXT, so we'll just define it to be "BUTTON"

   for now */

#define XP_THEME_CLASS_TEXT XP_THEME_CLASS_BUTTON

#define WIN95_VERSION   0x400

#define WIN2K_VERSION   0x500

#define WINXP_VERSION   0x501

#define WIN2K3_VERSION  0x502

#define VISTA_VERSION   0x600

static gint32

get_windows_version ()

{

  static gint32 version = 0;

  static gboolean have_version = FALSE;

  if (!have_version)

    {

      OSVERSIONINFOEX osvi;

      have_version = TRUE;

      ZeroMemory (&osvi, sizeof (OSVERSIONINFOEX));

      osvi.dwOSVersionInfoSize = sizeof (OSVERSIONINFOEX);

      GetVersionEx((OSVERSIONINFO*) &osvi);

      version = (osvi.dwMajorVersion & 0xff) << 8 | (osvi.dwMinorVersion & 0xff);

    }

  return version;

}

static void

setup_menu_settings (GtkSettings *settings)

{

  int menu_delay;

  GObjectClass *klazz = G_OBJECT_GET_CLASS (G_OBJECT (settings));

  if (get_windows_version () > WIN95_VERSION)

    {

      if (SystemParametersInfo (SPI_GETMENUSHOWDELAY, 0, &menu_delay, 0))

	{

	  if (klazz)

	    {

	      if (g_object_class_find_property

		  (klazz, "gtk-menu-bar-popup-delay"))

		{

		  g_object_set (settings,

				"gtk-menu-bar-popup-delay", 0, NULL);

		}

	      if (g_object_class_find_property

		  (klazz, "gtk-menu-popup-delay"))

		{

		  g_object_set (settings,

				"gtk-menu-popup-delay", menu_delay, NULL);

		}

	      if (g_object_class_find_property

		  (klazz, "gtk-menu-popdown-delay"))

		{

		  g_object_set (settings,

				"gtk-menu-popdown-delay", menu_delay, NULL);

		}

	    }

	}

    }

}

void

msw_style_setup_system_settings (void)

{

  GtkSettings *settings;

  int cursor_blink_time;

  settings = gtk_settings_get_default ();

  if (!settings)

    return;

  cursor_blink_time = GetCaretBlinkTime ();

  g_object_set (settings, "gtk-cursor-blink", cursor_blink_time > 0, NULL);

  if (cursor_blink_time > 0)

    {

      g_object_set (settings, "gtk-cursor-blink-time",

		    2 * cursor_blink_time, NULL);

    }

  g_object_set (settings, "gtk-double-click-distance",

		GetSystemMetrics (SM_CXDOUBLECLK), NULL);

  g_object_set (settings, "gtk-double-click-time", GetDoubleClickTime (),

		NULL);

  g_object_set (settings, "gtk-dnd-drag-threshold",

		GetSystemMetrics (SM_CXDRAG), NULL);

  setup_menu_settings (settings);

  /*

     http://developer.gnome.org/doc/API/2.0/gtk/GtkSettings.html

     http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/systemparametersinfo.asp

     http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/getsystemmetrics.asp */

}

static void

setup_system_font (GtkStyle *style)

{

  char buf[256], *font;		/* It's okay, lfFaceName is smaller than 32

				   chars */

  if ((font = sys_font_to_pango_font (XP_THEME_CLASS_TEXT,

				      XP_THEME_FONT_MESSAGE,

				      buf, sizeof (buf))) != NULL)

    {

      if (style->font_desc)

	{

	  pango_font_description_free (style->font_desc);

	}

      style->font_desc = pango_font_description_from_string (font);

    }

}

static void

sys_color_to_gtk_color (XpThemeClass klazz, int id, GdkColor * pcolor)

{

  DWORD color;

  if (!xp_theme_get_system_color (klazz, id, &color))

    color = GetSysColor (id);

  pcolor->pixel = color;

  pcolor->red = (GetRValue (color) << 8) | GetRValue (color);

  pcolor->green = (GetGValue (color) << 8) | GetGValue (color);

  pcolor->blue = (GetBValue (color) << 8) | GetBValue (color);

}

static int

get_system_metric (XpThemeClass klazz, int id)

{

  int rval;

  if (!xp_theme_get_system_metric (klazz, id, &rval))

    rval = GetSystemMetrics (id);

  return rval;

}

static void

setup_msw_rc_style (void)

{

  char buf[1024], font_buf[256], *font_ptr;

  char menu_bar_prelight_str[128];

  GdkColor menu_color;

  GdkColor menu_text_color;

  GdkColor tooltip_back;

  GdkColor tooltip_fore;

  GdkColor btn_fore;

  GdkColor btn_face;

  GdkColor progress_back;

  GdkColor fg_prelight;

  GdkColor bg_prelight;

  GdkColor base_prelight;

  GdkColor text_prelight;

  /* Prelight */

  sys_color_to_gtk_color (get_windows_version () >= VISTA_VERSION ? XP_THEME_CLASS_MENU : XP_THEME_CLASS_TEXT,

			  get_windows_version () >= VISTA_VERSION ? COLOR_MENUTEXT : COLOR_HIGHLIGHTTEXT,

			  &fg_prelight);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHT, &bg_prelight);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHT,

			  &base_prelight);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHTTEXT,

			  &text_prelight);

  sys_color_to_gtk_color (XP_THEME_CLASS_MENU, COLOR_MENUTEXT,

			  &menu_text_color);

  sys_color_to_gtk_color (XP_THEME_CLASS_MENU, COLOR_MENU, &menu_color);

  /* tooltips */

  sys_color_to_gtk_color (XP_THEME_CLASS_TOOLTIP, COLOR_INFOTEXT,

			  &tooltip_fore);

  sys_color_to_gtk_color (XP_THEME_CLASS_TOOLTIP, COLOR_INFOBK,

			  &tooltip_back);

  /* text on push buttons. TODO: button shadows, backgrounds, and

     highlights */

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNTEXT, &btn_fore);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE, &btn_face);

  /* progress bar background color */

  sys_color_to_gtk_color (XP_THEME_CLASS_PROGRESS, COLOR_HIGHLIGHT,

			  &progress_back);

  /* Enable coloring for menus. */

  font_ptr =

    sys_font_to_pango_font (XP_THEME_CLASS_MENU, XP_THEME_FONT_MENU,

			    font_buf, sizeof (font_buf));

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-menu\" = \"msw-default\"\n" "{\n"

	      "GtkMenuItem::toggle-spacing = 8\n"

	      "fg[PRELIGHT] = { %d, %d, %d }\n"

	      "bg[PRELIGHT] = { %d, %d, %d }\n"

	      "text[PRELIGHT] = { %d, %d, %d }\n"

	      "base[PRELIGHT] = { %d, %d, %d }\n"

	      "fg[NORMAL] = { %d, %d, %d }\n"

	      "bg[NORMAL] = { %d, %d, %d }\n" "%s = \"%s\"\n"

	      "}widget_class \"*MenuItem*\" style \"msw-menu\"\n"

	      "widget_class \"*GtkMenu\" style \"msw-menu\"\n"

	      "widget_class \"*GtkMenuShell*\" style \"msw-menu\"\n",

	      fg_prelight.red, fg_prelight.green, fg_prelight.blue,

	      bg_prelight.red, bg_prelight.green, bg_prelight.blue,

	      text_prelight.red, text_prelight.green, text_prelight.blue,

	      base_prelight.red, base_prelight.green, base_prelight.blue,

	      menu_text_color.red, menu_text_color.green,

	      menu_text_color.blue, menu_color.red, menu_color.green,

	      menu_color.blue, (font_ptr ? "font_name" : "#"),

	      (font_ptr ? font_ptr : " font name should go here"));

  gtk_rc_parse_string (buf);

  if (xp_theme_is_active ())

    {

      *menu_bar_prelight_str = '\0';

    }

  else

    {

      g_snprintf (menu_bar_prelight_str, sizeof (menu_bar_prelight_str),

		  "fg[PRELIGHT] = { %d, %d, %d }\n",

		  menu_text_color.red, menu_text_color.green,

		  menu_text_color.blue);

    }

  /* Enable coloring for menu bars. */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-menu-bar\" = \"msw-menu\"\n"

	      "{\n"

	      "bg[NORMAL] = { %d, %d, %d }\n"

	      "%s" "GtkMenuBar::shadow-type = %d\n"

	      /*

	         FIXME: This should be enabled once gtk+ support

	         GtkMenuBar::prelight-item style property.

	       */

	      /* "GtkMenuBar::prelight-item = 1\n" */

	      "}widget_class \"*MenuBar*\" style \"msw-menu-bar\"\n",

	      btn_face.red, btn_face.green, btn_face.blue,

	      menu_bar_prelight_str, xp_theme_is_active ()? 0 : 2);

  gtk_rc_parse_string (buf);

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-toolbar\" = \"msw-default\"\n"

	      "{\n"

	      "GtkHandleBox::shadow-type = %s\n"

	      "GtkToolbar::shadow-type = %s\n"

	      "}widget_class \"*HandleBox*\" style \"msw-toolbar\"\n",

	      "etched-in", "etched-in");

  gtk_rc_parse_string (buf);

  /* enable tooltip fonts */

  font_ptr = sys_font_to_pango_font (XP_THEME_CLASS_STATUS, XP_THEME_FONT_STATUS,

				     font_buf, sizeof (font_buf));

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-tooltips-caption\" = \"msw-default\"\n"

	      "{fg[NORMAL] = { %d, %d, %d }\n" "%s = \"%s\"\n"

	      "}widget \"gtk-tooltips.GtkLabel\" style \"msw-tooltips-caption\"\n"

	      "widget \"gtk-tooltip.GtkLabel\" style \"msw-tooltips-caption\"\n",

	      tooltip_fore.red, tooltip_fore.green, tooltip_fore.blue,

	      (font_ptr ? "font_name" : "#"),

	      (font_ptr ? font_ptr : " font name should go here"));

  gtk_rc_parse_string (buf);

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-tooltips\" = \"msw-default\"\n"

	      "{bg[NORMAL] = { %d, %d, %d }\n"

	      "}widget \"gtk-tooltips*\" style \"msw-tooltips\"\n"

	      "widget \"gtk-tooltip*\" style \"msw-tooltips\"\n",

	      tooltip_back.red, tooltip_back.green, tooltip_back.blue);

  gtk_rc_parse_string (buf);

  /* enable font theming for status bars */

  font_ptr = sys_font_to_pango_font (XP_THEME_CLASS_STATUS, XP_THEME_FONT_STATUS,

				     font_buf, sizeof (font_buf));

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-status\" = \"msw-default\"\n" "{%s = \"%s\"\n"

	      "bg[NORMAL] = { %d, %d, %d }\n"

	      "}widget_class \"*Status*\" style \"msw-status\"\n",

	      (font_ptr ? "font_name" : "#"),

	      (font_ptr ? font_ptr : " font name should go here"),

	      btn_face.red, btn_face.green, btn_face.blue);

  gtk_rc_parse_string (buf);

  /* enable coloring for text on buttons

   * TODO: use GetThemeMetric for the border and outside border */

  g_snprintf (buf, sizeof (buf),

              "style \"msw-button\" = \"msw-default\"\n"

              "{\n"

              "bg[NORMAL] = { %d, %d, %d }\n"

              "bg[PRELIGHT] = { %d, %d, %d }\n"

              "bg[INSENSITIVE] = { %d, %d, %d }\n"

              "fg[PRELIGHT] = { %d, %d, %d }\n"

              "GtkButton::default-border = { 0, 0, 0, 0 }\n"

              "GtkButton::default-outside-border = { 0, 0, 0, 0 }\n"

              "GtkButton::child-displacement-x = %d\n"

              "GtkButton::child-displacement-y = %d\n"

              "GtkWidget::focus-padding = %d\n"

              "}widget_class \"*Button*\" style \"msw-button\"\n",

              btn_face.red, btn_face.green, btn_face.blue,

              btn_face.red, btn_face.green, btn_face.blue,

              btn_face.red, btn_face.green, btn_face.blue,

              btn_fore.red, btn_fore.green, btn_fore.blue,

              xp_theme_is_active ()? 0 : 1,

              xp_theme_is_active ()? 0 : 1,

              xp_theme_is_active ()? 1 : 2);

  gtk_rc_parse_string (buf);

  /* enable coloring for progress bars */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-progress\" = \"msw-default\"\n"

	      "{bg[PRELIGHT] = { %d, %d, %d }\n"

	      "bg[NORMAL] = { %d, %d, %d }\n"

	      "}widget_class \"*Progress*\" style \"msw-progress\"\n",

	      progress_back.red,

	      progress_back.green,

	      progress_back.blue,

	      btn_face.red, btn_face.green, btn_face.blue);

  gtk_rc_parse_string (buf);

  /* scrollbar thumb width and height */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-vscrollbar\" = \"msw-default\"\n"

	      "{GtkRange::slider-width = %d\n"

	      "GtkRange::stepper-size = %d\n"

	      "GtkRange::stepper-spacing = 0\n"

	      "GtkRange::trough_border = 0\n"

	      "GtkScale::slider-length = %d\n"

	      "GtkScrollbar::min-slider-length = 8\n"

	      "}widget_class \"*VScrollbar*\" style \"msw-vscrollbar\"\n"

	      "widget_class \"*VScale*\" style \"msw-vscrollbar\"\n",

	      GetSystemMetrics (SM_CYVTHUMB),

	      get_system_metric (XP_THEME_CLASS_SCROLLBAR, SM_CXVSCROLL), 11);

  gtk_rc_parse_string (buf);

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-hscrollbar\" = \"msw-default\"\n"

	      "{GtkRange::slider-width = %d\n"

	      "GtkRange::stepper-size = %d\n"

	      "GtkRange::stepper-spacing = 0\n"

	      "GtkRange::trough_border = 0\n"

	      "GtkScale::slider-length = %d\n"

	      "GtkScrollbar::min-slider-length = 8\n"

	      "}widget_class \"*HScrollbar*\" style \"msw-hscrollbar\"\n"

	      "widget_class \"*HScale*\" style \"msw-hscrollbar\"\n",

	      GetSystemMetrics (SM_CXHTHUMB),

	      get_system_metric (XP_THEME_CLASS_SCROLLBAR, SM_CYHSCROLL), 11);

  gtk_rc_parse_string (buf);

  gtk_rc_parse_string ("style \"msw-scrolled-window\" = \"msw-default\"\n"

		       "{GtkScrolledWindow::scrollbars-within-bevel = 1}\n"

		       "class \"GtkScrolledWindow\" style \"msw-scrolled-window\"\n");

  /* radio/check button sizes */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-checkbutton\" = \"msw-button\"\n"

	      "{GtkCheckButton::indicator-size = 13\n"

	      "}widget_class \"*CheckButton*\" style \"msw-checkbutton\"\n"

	      "widget_class \"*RadioButton*\" style \"msw-checkbutton\"\n");

  gtk_rc_parse_string (buf);

  /* size of combo box toggle button */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-combobox-button\" = \"msw-default\"\n"

	      "{\n"

	      "xthickness = 0\n"

	      "ythickness = 0\n"

	      "GtkButton::default-border = { 0, 0, 0, 0 }\n"

	      "GtkButton::default-outside-border = { 0, 0, 0, 0 }\n"

	      "GtkButton::child-displacement-x = 0\n"

	      "GtkButton::child-displacement-y = 0\n"

	      "GtkWidget::focus-padding = 0\n"

	      "GtkWidget::focus-line-width = 0\n"

	      "}\n"

	      "widget_class \"*ComboBox*ToggleButton*\" style \"msw-combobox-button\"\n");

  gtk_rc_parse_string (buf);

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-combobox\" = \"msw-default\"\n"

	      "{\n"

	      "GtkComboBox::shadow-type = in\n"

	      "xthickness = %d\n"

	      "ythickness = %d\n"

	      "}\n"

	      "class \"GtkComboBox\" style \"msw-combobox\"\n",

        xp_theme_is_active()? 1 : GetSystemMetrics (SM_CXEDGE),

        xp_theme_is_active()? 1 : GetSystemMetrics (SM_CYEDGE));

  gtk_rc_parse_string (buf);

  /* size of tree view header */

  g_snprintf (buf, sizeof (buf),

	      "style \"msw-header-button\" = \"msw-default\"\n"

	      "{\n"

	      "xthickness = 0\n"

	      "ythickness = 0\n"

	      "GtkWidget::draw-border = {0, 0, 0, 0}\n"

        "GtkButton::default-border = { 0, 0, 0, 0 }\n"

	      "GtkButton::default-outside-border = { 0, 0, 0, 0 }\n"

	      "GtkButton::child-displacement-x = 0\n"

	      "GtkButton::child-displacement-y = 0\n"

	      "GtkWidget::focus-padding = 0\n"

	      "GtkWidget::focus-line-width = 0\n"

	      "}\n"

	      "widget_class \"*TreeView*Button*\" style \"msw-header-button\"\n");

  gtk_rc_parse_string (buf);

  /* FIXME: This should be enabled once gtk+ support GtkNotebok::prelight-tab */

  /* enable prelight tab of GtkNotebook */

  /*

     g_snprintf (buf, sizeof (buf),

     "style \"msw-notebook\" = \"msw-default\"\n"

     "{GtkNotebook::prelight-tab=1\n"

     "}widget_class \"*Notebook*\" style \"msw-notebook\"\n");

     gtk_rc_parse_string (buf);

   */

  /* FIXME: This should be enabled once gtk+ support GtkTreeView::full-row-focus */

  /*

     g_snprintf (buf, sizeof (buf),

     "style \"msw-treeview\" = \"msw-default\"\n"

     "{GtkTreeView::full-row-focus=0\n"

     "}widget_class \"*TreeView*\" style \"msw-treeview\"\n");

     gtk_rc_parse_string (buf);

   */

}

static void

setup_system_styles (GtkStyle *style)

{

  int i;

  /* Default background */

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->bg[GTK_STATE_NORMAL]);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHT,

			  &style->bg[GTK_STATE_SELECTED]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->bg[GTK_STATE_INSENSITIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->bg[GTK_STATE_ACTIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->bg[GTK_STATE_PRELIGHT]);

  /* Default base */

  sys_color_to_gtk_color (XP_THEME_CLASS_WINDOW, COLOR_WINDOW,

			  &style->base[GTK_STATE_NORMAL]);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHT,

			  &style->base[GTK_STATE_SELECTED]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->base[GTK_STATE_INSENSITIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNFACE,

			  &style->base[GTK_STATE_ACTIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_WINDOW, COLOR_WINDOW,

			  &style->base[GTK_STATE_PRELIGHT]);

  /* Default text */

  sys_color_to_gtk_color (XP_THEME_CLASS_WINDOW, COLOR_WINDOWTEXT,

			  &style->text[GTK_STATE_NORMAL]);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHTTEXT,

			  &style->text[GTK_STATE_SELECTED]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_GRAYTEXT,

			  &style->text[GTK_STATE_INSENSITIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNTEXT,

			  &style->text[GTK_STATE_ACTIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_WINDOW, COLOR_WINDOWTEXT,

			  &style->text[GTK_STATE_PRELIGHT]);

  /* Default foreground */

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNTEXT,

			  &style->fg[GTK_STATE_NORMAL]);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_HIGHLIGHTTEXT,

			  &style->fg[GTK_STATE_SELECTED]);

  sys_color_to_gtk_color (XP_THEME_CLASS_TEXT, COLOR_GRAYTEXT,

			  &style->fg[GTK_STATE_INSENSITIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_BTNTEXT,

                          &style->fg[GTK_STATE_ACTIVE]);

  sys_color_to_gtk_color (XP_THEME_CLASS_WINDOW, COLOR_WINDOWTEXT,

			  &style->fg[GTK_STATE_PRELIGHT]);

  for (i = 0; i < 5; i++)

    {

      sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_3DSHADOW,

			      &style->dark[i]);

      sys_color_to_gtk_color (XP_THEME_CLASS_BUTTON, COLOR_3DHILIGHT,

			      &style->light[i]);

      style->mid[i].red = (style->light[i].red + style->dark[i].red) / 2;

      style->mid[i].green =

	(style->light[i].green + style->dark[i].green) / 2;

      style->mid[i].blue = (style->light[i].blue + style->dark[i].blue) / 2;

      style->text_aa[i].red = (style->text[i].red + style->base[i].red) / 2;

      style->text_aa[i].green =

	(style->text[i].green + style->base[i].green) / 2;

      style->text_aa[i].blue =

	(style->text[i].blue + style->base[i].blue) / 2;

    }

}