color_out.c

Go to the documentation of this file.

/*!
   \file lib/raster/color_out.c
 
   \brief Raster Library - Print color table
 
   (C) 2010-2011 by the GRASS Development Team
 
   This program is free software under the GNU General Public
   License (>=v2). Read the file COPYING that comes with GRASS
   for details.
 
   \author Glynn Clements
 */
 
#include <grass/raster.h>
 
static void write_rule(DCELL *val, DCELL *min, DCELL *max, int r, int g, int b,
                       FILE *fp, int perc)
{
    static DCELL v0;
    static int r0 = -1, g0 = -1, b0 = -1;
 
    if (v0 == *val && r0 == r && g0 == g && b0 == b)
        return;
    v0 = *val, r0 = r, g0 = g, b0 = b;
 
    if (perc)
        fprintf(fp, "%g%% %d:%d:%d\n", 100 * (*val - *min) / (*max - *min), r,
                g, b);
    else
        fprintf(fp, "%g %d:%d:%d\n", *val, r, g, b);
}
 
/*!
   \brief Print color table
 
   \param colors pointer to Colors structure
   \param min,max minimum and maximum value for percentage output (used only
   when \p perc is non-zero) \param fp file where to print color table rules
   \param perc TRUE for percentage output
 */
void Rast_print_colors(struct Colors *colors, DCELL min, DCELL max, FILE *fp,
                       int perc)
{
    int i, count;
 
    count = 0;
    if (colors->version < 0) {
        /* 3.0 format */
        CELL lo, hi;
 
        Rast_get_c_color_range(&lo, &hi, colors);
 
        for (i = lo; i <= hi; i++) {
            unsigned char r, g, b, set;
            DCELL val = (DCELL)i;
 
            Rast_lookup_c_colors(&i, &r, &g, &b, &set, 1, colors);
            write_rule(&val, &min, &max, r, g, b, fp, perc);
        }
    }
    else {
        count = Rast_colors_count(colors);
 
        for (i = 0; i < count; i++) {
            DCELL val1, val2;
            unsigned char r1, g1, b1, r2, g2, b2;
 
            Rast_get_fp_color_rule(&val1, &r1, &g1, &b1, &val2, &r2, &g2, &b2,
                                   colors, count - 1 - i);
 
            write_rule(&val1, &min, &max, r1, g1, b1, fp, perc);
            write_rule(&val2, &min, &max, r2, g2, b2, fp, perc);
        }
    }
 
    {
        int r, g, b;
 
        Rast_get_null_value_color(&r, &g, &b, colors);
        fprintf(fp, "nv %d:%d:%d\n", r, g, b);
        Rast_get_default_color(&r, &g, &b, colors);
        fprintf(fp, "default %d:%d:%d\n", r, g, b);
    }
 
    if (fp != stdout)
        fclose(fp);
}