/*      $NetBSD: hpccmap_gen.c,v 1.5 2005/12/11 12:21:22 christos Exp $ */

/*-
 * Copyright (c) 1999
 *         Shin Takemura and PocketBSD Project. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *      This product includes software developed by the PocketBSD project
 *      and its contributors.
 * 4. Neither the name of the project nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 */

#include <sys/cdefs.h>
__RCSID("$NetBSD: hpccmap_gen.c,v 1.5 2005/12/11 12:21:22 christos Exp $");

typedef unsigned char u_char;
typedef void (*output_func)(void*, int, u_char,  u_char, u_char);

void main(int ac, char *av[]);
void rgb_separate_out(void*, int, u_char, u_char, u_char);
void cmap_gen(output_func, void *);

unsigned char compo6[6] = {   0,  51, 102, 153, 204, 255 };
unsigned char compo7[7] = {   0,  42,  85, 127, 170, 212, 255 };

void
main(int ac, char *av[])
{
        int i;
        char *rgb = "rgb";

        printf("/*\n");
        printf(" *  Do not edit.\n");
        printf(" *  This file is automatically generated by hpccmap_gen.\n");
        printf(" */\n");
        printf("#include <dev/hpc/hpccmapar.h>\n");
        for (i = 0; i < 3; i++) {
                printf("unsigned char bivideo_cmap_%c[256] = {\n", rgb[i]);
                cmap_gen(rgb_separate_out, (void*)i);
                printf("};\n");
        }
}

void
rgb_separate_out(void *ctxx, int idx, unsigned char r, unsigned char g,
    unsigned char b)
{
        int rgb = (int)ctxx;

        if ((idx % 16) == 0)
                printf("\t");
        switch(rgb) {
        case 0:
                printf("%3d,", r);
                break;
        case 1:
                printf("%3d,", g);
                break;
        case 2:
                printf("%3d,", b);
                break;
        }
        if ((idx % 16) == 15)
                printf("\n");
}

void
cmap_gen(output_func func, void *ctx)
{
        int i, r, g, b;

        i = 0;

        /*
         * 0 - 15, for ANSI escape sequence
         * (see sys/dev/rasops/rasops.c)
         */
        (*func)(ctx, i++, 0x00, 0x00, 0x00); /* black   */
        (*func)(ctx, i++, 0x7f, 0x00, 0x00); /* red     */
        (*func)(ctx, i++, 0x00, 0x7f, 0x00); /* green   */
        (*func)(ctx, i++, 0x7f, 0x7f, 0x00); /* brown   */
        (*func)(ctx, i++, 0x00, 0x00, 0x7f); /* blue    */
        (*func)(ctx, i++, 0x7f, 0x00, 0x7f); /* magenta */
        (*func)(ctx, i++, 0x00, 0x7f, 0x7f); /* cyan    */
        (*func)(ctx, i++, 0xc7, 0xc7, 0xc7); /* white   */

        (*func)(ctx, i++, 0x7f, 0x7f, 0x7f); /* black   */
        (*func)(ctx, i++, 0xff, 0x00, 0x00); /* red     */
        (*func)(ctx, i++, 0x00, 0xff, 0x00); /* green   */
        (*func)(ctx, i++, 0xff, 0xff, 0x00); /* brown   */
        (*func)(ctx, i++, 0x00, 0x00, 0xff); /* blue    */
        (*func)(ctx, i++, 0xff, 0x00, 0xff); /* magenta */
        (*func)(ctx, i++, 0x00, 0xff, 0xff); /* cyan    */
        (*func)(ctx, i++, 0xff, 0xff, 0xff); /* white   */

        /*
         * 16 - 31, gray scale
         */
        for (; i < 32; i++) {
                (*func)(ctx, i, (i - 16) * 17, (i - 16) * 17, (i - 16) * 17);
        }

        /*
         * 32 - 247, RGB color
         */
        for (r = 0; r < 6; r++) {
                for (g = 0; g < 6; g++) {
                        for (b = 0; b < 6; b++) {
                                (*func)(ctx, i,
                                    compo6[r], compo6[g], compo6[b]);
                                i++;
                        }
                }
        }

        /*
         * 248 - 255, just white
         */
        for ( ; i < 256; i++) {
                (*func)(ctx, i, 255, 255, 255);
        }
}