1 files changed, 362 insertions, 0 deletions
diff --git a/app/wlib/mswlib/mswcolor.c b/app/wlib/mswlib/mswcolor.c
new file mode 100644
index 0000000..41bf6a9
--- /dev/null
+++ b/app/wlib/mswlib/mswcolor.c
@@ -0,0 +1,362 @@
+/*
+ * $Header: /home/dmarkle/xtrkcad-fork-cvs/xtrkcad/app/wlib/mswlib/mswcolor.c,v 1.2 2007-01-14 08:43:32 m_fischer Exp $
+ */
+
+#include <windows.h>
+#include <string.h>
+#include <malloc.h>
+#include <stdlib.h>
+#include <commdlg.h>
+#include <math.h>
+#include <windows.h>
+
+#include "mswint.h"
+
+#include "square10.bmp"
+
+/*
+ *****************************************************************************
+ *
+ * Color
+ *
+ *****************************************************************************
+ */
+
+#define NUM_GRAYS (16)
+#define NUM_COLORS (256)
+
+wDrawColor wDrawColorWhite = 0;
+wDrawColor wDrawColorBlack = 1;
+
+#define MAX_COLOR_DISTANCE (3)
+
+static void mswGetCustomColors( void );
+
+
+static struct {
+		WORD palVersion;
+		WORD palNumEntries;
+		PALETTEENTRY palPalEntry[NUM_COLORS];
+		} colorPalette = {
+		0x300,
+		2,
+		{
+		{ 255, 255, 255 },		/* White */
+		{	0,	 0,	  0 }		/* Black */
+		} };
+
+COLORREF mappedColors[NUM_COLORS];
+
+
+static long flipRGB( long rgb )
+{
+	rgb = ((rgb>>16)&0xFF) | (rgb&0x00FF00) | ((rgb&0xFF)<<16);
+	return rgb;
+}
+
+
+static void getpalette( void )
+{
+
+	HDC hdc;
+	int inx, cnt;
+	PALETTEENTRY pe[256];
+	FILE * f;
+	hdc = GetDC(mswHWnd);
+	if (!(GetDeviceCaps( hdc, RASTERCAPS) & RC_PALETTE)) {
+		ReleaseDC( mswHWnd, hdc );
+		return;
+	}
+	cnt = GetDeviceCaps(hdc, SIZEPALETTE);
+	GetSystemPaletteEntries( hdc, 0, cnt, pe );
+	f = fopen( "palette.txt", "w" );
+	for (inx=0;inx<cnt;inx++)
+		fprintf(f, "%d [ %d %d %d %d ]\n", inx, pe[inx].peRed, pe[inx].peGreen, pe[inx].peBlue, pe[inx].peFlags );
+	fclose(f);
+	ReleaseDC( mswHWnd, hdc );
+}
+
+
+static int findColor( int r0, int g0, int b0 )
+{
+	int r1, g1, b1;
+	int d0, d1;
+	int c, cc;
+	PALETTEENTRY *pal;
+
+	pal = colorPalette.palPalEntry;
+	cc = (int)wDrawColorBlack;
+	d0 = 256*3;
+
+	for ( c = 0; c < (int)colorPalette.palNumEntries; c++ ) {
+		r1 = pal[c].peRed;
+		b1 = pal[c].peBlue;
+		g1 = pal[c].peGreen;
+		d1 = abs(r0-r1) + abs(g0-g1) + abs(b0-b1);
+		if (d1 == 0)
+			return c;
+		if (d1 < d0) {
+			d0 = d1;
+			cc = c;
+		}
+	}
+	if ( colorPalette.palNumEntries < 128 ) {
+		pal[colorPalette.palNumEntries].peRed = r0;
+		pal[colorPalette.palNumEntries].peGreen = g0;
+		pal[colorPalette.palNumEntries].peBlue = b0;
+		if ( mswPalette ) {
+			ResizePalette( mswPalette, colorPalette.palNumEntries+1 );
+			SetPaletteEntries( mswPalette, colorPalette.palNumEntries, 1, &pal[colorPalette.palNumEntries] );
+		}
+		return colorPalette.palNumEntries++;
+	}
+	return cc;
+}
+
+
+int mswGetPaletteClock( void )
+{
+	return colorPalette.palNumEntries;
+}
+
+
+void mswInitColorPalette( void )
+{
+	static int initted = FALSE;
+	HDC hDc;
+	int cnt;
+	int rc;
+	static struct {
+		WORD palVersion;
+		WORD palNumEntries;
+		PALETTEENTRY palPalEntry[256];
+	} pe;
+
+	if (initted)
+		return;
+
+	initted = TRUE;
+	mswGetCustomColors();
+	mswFontInit();
+	hDc = GetDC(mswHWnd);
+	if (!(GetDeviceCaps( hDc, RASTERCAPS) & RC_PALETTE)) {
+		ReleaseDC( mswHWnd, hDc );
+		return;
+	}
+	cnt = GetDeviceCaps(hDc, SIZEPALETTE);
+	rc = GetSystemPaletteEntries( hDc, 0, cnt, pe.palPalEntry );
+	mswPalette = CreatePalette( (const LOGPALETTE FAR*)&colorPalette );
+	ReleaseDC( mswHWnd, hDc );
+
+}
+
+
+HPALETTE mswCreatePalette( void )
+{
+	return CreatePalette( (const LOGPALETTE FAR*)&colorPalette );
+}
+
+
+int mswGetColorList( RGBQUAD * colors )
+{
+	int i;
+	for (i=0;i<(int)colorPalette.palNumEntries;i++) {
+		colors[i].rgbBlue = colorPalette.palPalEntry[i].peBlue;
+		colors[i].rgbGreen = colorPalette.palPalEntry[i].peGreen;
+		colors[i].rgbRed = colorPalette.palPalEntry[i].peRed;
+		colors[i].rgbReserved = 0;
+	}
+	return NUM_COLORS;
+}
+
+
+COLORREF mswGetColor( wBool_t hasPalette, wDrawColor color )
+{
+	if ( hasPalette )
+		return PALETTEINDEX(color);
+	else
+		return RGB( colorPalette.palPalEntry[color].peRed,	colorPalette.palPalEntry[color].peGreen,  colorPalette.palPalEntry[color].peBlue );
+}
+
+
+wDrawColor wDrawColorGray(
+		int percent )
+{
+	int n;
+	n = (percent * NUM_GRAYS) / 100;
+	if ( n <= 0 )
+		return wDrawColorBlack;
+	else if ( n > NUM_GRAYS )
+		return wDrawColorWhite;
+	else {
+		n = (n*256)/NUM_GRAYS;
+		return wDrawFindColor( wRGB(n,n,n) );
+	}
+}
+
+wDrawColor wDrawFindColor(
+		long rgb0 )
+{
+	static long saved_rgb = wRGB(255,255,255);
+	static wDrawColor saved_color = 0;
+	int r0, g0, b0;
+
+	if (rgb0 == saved_rgb)
+		return saved_color;
+	r0 = (int)(rgb0>>16)&0xFF;
+	g0 = (int)(rgb0>>8)&0xFF;
+	b0 = (int)(rgb0)&0xFF;
+	saved_rgb = rgb0;
+	return saved_color = findColor( r0, g0, b0 );
+}
+
+
+long wDrawGetRGB(
+		wDrawColor color )
+{
+	long rgb;
+	int r, g, b;
+	r = colorPalette.palPalEntry[color].peRed;
+	g = colorPalette.palPalEntry[color].peGreen;
+	b = colorPalette.palPalEntry[color].peBlue;
+	rgb = wRGB(r,g,b);
+	return rgb;
+}
+
+
+static CHOOSECOLOR chooseColor;
+static COLORREF aclrCust[16];
+
+static void mswGetCustomColors( void )
+{
+	int inx;
+	char colorName[10];
+	long rgb;
+
+	strcpy( colorName, "custom-" );
+	for ( inx=0; inx<16; inx++ ) {
+		sprintf( colorName+7, "%d", inx );
+		wPrefGetInteger( "mswcolor", colorName, &rgb, 0 );
+		aclrCust[inx] = flipRGB(rgb);
+	}
+}
+
+
+void mswPutCustomColors( void )
+{
+	int inx;
+	char colorName[10];
+	long rgb;
+
+	strcpy( colorName, "custom-" );
+	for ( inx=0; inx<16; inx++ ) {
+		rgb = flipRGB(aclrCust[inx]);
+		if ( rgb != 0 ) {
+			sprintf( colorName+7, "%d", inx );
+			wPrefSetInteger( "mswcolor", colorName, rgb );
+		}
+	}
+}
+
+
+wBool_t wColorSelect(
+		const char * title,
+		wDrawColor * color )
+{
+	long rgb;
+
+	memset( &chooseColor, 0, sizeof chooseColor );
+	rgb = flipRGB(wDrawGetRGB(*color));
+	chooseColor.lStructSize = sizeof chooseColor;
+	chooseColor.hwndOwner = mswHWnd;
+	chooseColor.hInstance = NULL;
+	chooseColor.rgbResult = rgb;
+	chooseColor.lpCustColors = aclrCust;
+	chooseColor.Flags = CC_RGBINIT;
+	chooseColor.lCustData = 0L;
+	chooseColor.lpfnHook = NULL;
+	chooseColor.lpTemplateName = (LPSTR)NULL;
+	if ( ChooseColor( &chooseColor ) ) {
+		rgb = flipRGB(chooseColor.rgbResult);
+		*color = wDrawFindColor(rgb);
+		return TRUE;
+	}
+	return FALSE;
+}
+
+
+typedef struct {
+		wDrawColor * valueP;
+		wColorSelectButtonCallBack_p action;
+		const char * labelStr;
+		void * data;
+		wDrawColor color;
+		wButton_p button;
+		wIcon_p bm;
+		} colorData_t;
+
+
+static void doColorButton(
+		void * data )
+{
+	colorData_t * cd = (colorData_t*)data;
+	wDrawColor newColor;
+
+	newColor = cd->color;
+	if (wColorSelect( cd->labelStr, &newColor )) {
+		cd->color = newColor;
+		wColorSelectButtonSetColor( cd->button, newColor );
+		if (cd->valueP)
+			*cd->valueP = newColor;
+		if (cd->action)
+			cd->action( cd->data, newColor );
+	}
+}
+
+
+wButton_p wColorSelectButtonCreate(
+		wWin_p win,
+		wPos_t x,
+		wPos_t y,
+		const char * helpStr,
+		const char * labelStr,
+		long option,
+		wPos_t width,
+		wDrawColor * color,
+		wColorSelectButtonCallBack_p action,
+		void * data )
+{
+	wButton_p bb;
+	wIcon_p bm;
+	colorData_t * cd;
+	bm = wIconCreateBitMap( square10_width, square10_height, square10_bits, (color?*color:0) );
+	cd = malloc( sizeof *cd );
+	cd->valueP = color;
+	cd->action = action;
+	cd->data = data;
+	cd->labelStr = labelStr;
+	cd->color = (color?*color:0);
+	cd->bm = bm;
+	bb = wButtonCreate( win, x, y, helpStr, (char*)bm, option|BO_ICON, width, doColorButton, cd );
+	cd->button = bb;
+	if ( labelStr )
+				wControlSetLabel( (wControl_p)bb, labelStr );
+	return bb;
+}
+
+
+void wColorSelectButtonSetColor(
+		wButton_p bb,
+		wDrawColor color )
+{
+	((colorData_t*)((wControl_p)bb)->data)->color = color;
+	wIconSetColor( ((colorData_t*)((wControl_p)bb)->data)->bm, color );
+	InvalidateRect( ((wControl_p)bb)->hWnd, NULL, TRUE );
+}
+
+
+wDrawColor wColorSelectButtonGetColor(
+		wButton_p bb )
+{
+	return ((colorData_t*)((wControl_p)bb)->data)->color;
+}