/*

* Copyright (c) 1990, 2011, Oracle and/or its affiliates. All rights reserved.

*

* Permission is hereby granted, free of charge, to any person obtaining a

* copy of this software and associated documentation files (the "Software"),

* to deal in the Software without restriction, including without limitation

* the rights to use, copy, modify, merge, publish, distribute, sublicense,

* and/or sell copies of the Software, and to permit persons to whom the

* Software is furnished to do so, subject to the following conditions:

*

* The above copyright notice and this permission notice (including the next

* paragraph) shall be included in all copies or substantial portions of the

* Software.

*

* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL

* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING

* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER

* DEALINGS IN THE SOFTWARE.

*

*/

#include <stdio.h>

#include <X11/Xlib.h>

#include "cmc.h"

#include "cmcutil.h"

static void print_xcolors(XColor *colors, int ncolors);

/*

** Print contents of workspace colors file in human readable form.

*/

void

cmc_show (void)

{

	const char *filename;

	FILE	*f;

	filename = comp_colors_filename(basename_arg);

	if ((f = fopen(filename, "r")) == NULL)

		fatal_error("cannot open file '%s' for reading\n", filename);

	/* Check magic number and version */

	cmc_header_test(f);

	for (;;) {

		int	scr_num;

		int	ncolors;

		XColor	*colors;

		if (!cmc_read(f, &scr_num, &ncolors, &colors))

			break;

		printf("Screen %s.%d\n", XDisplayName(display_name), scr_num);	

		printf("%d saved colors\n", ncolors);

		print_xcolors(colors, ncolors);

		printf("\n");

		free((char *)colors);

	}

}

static void

print_xcolors (XColor *colors, int ncolors)

{

	register XColor	*c;

	register int	i;

	int		planes;

	for (c = colors; c < colors + ncolors; c++) {

            planes = c->red | c->green | c->blue;

            for(i = 4; i > 1 && (planes&0xf)==0; i--) {

                c->red >>= 4;

                c->green >>= 4;

                c->blue >>= 4;

                planes >>= 4;

            }

            printf("#%0*x%0*x%0*x\n", i, c->red, i, c->green, i, c->blue);

	}

}