/*
 * Crossfire -- cooperative multi-player graphical RPG and adventure game
 *
 * Copyright (c) 1999-2013 Mark Wedel and the Crossfire Development Team
 * Copyright (c) 1992 Frank Tore Johansen
 *
 * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
 * welcome to redistribute it under certain conditions. For details, please
 * see COPYING and LICENSE.
 *
 * The authors can be reached via e-mail at <crossfire@metalforge.org>.
 */

/**
 * @file gtk-v2/src/stats.c
 * Support for character statistics.
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <assert.h>
#include <gtk/gtk.h>

#include "client.h"
#include "main.h"
#include "image.h"
#include "gtk2proto.h"

#define STAT_BAR_HP     0
#define STAT_BAR_SP     1
#define STAT_BAR_GRACE  2
#define STAT_BAR_FOOD   3
#define STAT_BAR_EXP    4
#define MAX_STAT_BARS   5

static const char * const stat_bar_names[MAX_STAT_BARS] = {
    "hp", "sp", "grace", "food", "exp"
};

static GtkWidget *stat_current[MAX_STAT_BARS];
static GtkWidget *stat_max[MAX_STAT_BARS];
static GtkWidget *stat_bar[MAX_STAT_BARS];

#define STYLE_NORMAL        0
#define STYLE_LOW           1
#define STYLE_SUPER         2
#define STYLE_GRAD_NORMAL   3
#define STYLE_GRAD_LOW      4
#define STYLE_GRAD_SUPER    5
#define NUM_STYLES          6

/* The name of the symbolic widget names we try to look up the styles of
 * (these will be prefixed with hp_, sp_, etc).  This should always match
 * NUM_STYLES.
 */
static const char * const stat_style_names[NUM_STYLES] = {
    "bar_normal", "bar_low", "bar_super",
    "gradual_bar_normal", "gradual_bar_low", "gradual_bar_super"
};

/* We really only care about the colors, as there isn't anything else we can
 * change about the progressbar widget itself.
 */
GdkColor    *bar_colors[MAX_STAT_BARS][NUM_STYLES];


/* The table for showing skill exp is an x & y grid.  Note for proper
 * formatting, SKILL_BOXES_X must be even.  Hmmm - perhaps these should
 * instead be dynamically generated?
 */
#define SKILL_BOXES_X   6
#define SKILL_BOXES_Y   17

#define PROTECTION_BOXES_X      6
#define PROTECTION_BOXES_Y      6

typedef struct {
    GtkWidget *playername;
    GtkWidget *Str;
    GtkWidget *Dex;
    GtkWidget *Con;
    GtkWidget *Int;
    GtkWidget *Wis;
    GtkWidget *Cha;
    GtkWidget *Pow;
    GtkWidget *wc;
    GtkWidget *dam;
    GtkWidget *ac;
    GtkWidget *armor;
    GtkWidget *speed;
    GtkWidget *weapon_speed;
    GtkWidget *range;
    GtkWidget *exp;
    GtkWidget *level;
    GtkWidget *table_skills_exp;
    GtkWidget *table_protections;
    GtkWidget *skill_exp[SKILL_BOXES_X * SKILL_BOXES_Y];
    GtkWidget *resists[PROTECTION_BOXES_X * PROTECTION_BOXES_Y];

} StatWindow;

static StatWindow statwindow;

int need_mapping_update=1;

static int lastval[MAX_STAT_BARS], lastmax[MAX_STAT_BARS];

/**
 * Gets the style information for the stat bars (only portion of the window
 * right now that has custom style support.
 */
void stats_get_styles(void)
{
    static int has_init=0;
    int stat_bar, sub_style;
    char    buf[MAX_BUF];
    GtkStyle *tmp_style;

    if (!has_init) {
        memset(bar_colors, 0, sizeof(GdkColor*) * MAX_STAT_BARS * NUM_STYLES);
    }

    for (stat_bar=0; stat_bar < MAX_STAT_BARS; stat_bar++) {
        for (sub_style=0; sub_style < NUM_STYLES; sub_style++) {
            snprintf(buf, sizeof(buf), "%s_%s", stat_bar_names[stat_bar], stat_style_names[sub_style]);

            tmp_style = gtk_rc_get_style_by_paths(gtk_settings_get_default(), NULL, buf, G_TYPE_NONE);

            if (!tmp_style) {
                if (bar_colors[stat_bar][sub_style]) {
                    free(bar_colors[stat_bar][sub_style]);
                    bar_colors[stat_bar][sub_style] = NULL;
                }
                LOG(LOG_INFO, "stats.c::stats_get_styles()", "Unable to find style '%s'", buf);
            } else {
                if (!bar_colors[stat_bar][sub_style]) {
                    bar_colors[stat_bar][sub_style] = calloc(1, sizeof(GdkColor));
                }
                memcpy(bar_colors[stat_bar][sub_style],
                       &tmp_style->base[GTK_STATE_SELECTED], sizeof(GdkColor));
            }
        }
    }
}

/**
 * Associate the XML-defined widgets with pointers by name reference.
 * @param *window_root
 */
void stats_init(GtkWidget *window_root)
{
    int i, x, y;
    char buf[MAX_BUF];

    for (i=0; i<MAX_STAT_BARS; i++) {
        snprintf(buf, sizeof(buf), "label_stat_current_%s", stat_bar_names[i]);
        stat_current[i] = GTK_WIDGET(gtk_builder_get_object(window_xml, buf));
        snprintf(buf, sizeof(buf), "label_stat_max_%s", stat_bar_names[i]);
        stat_max[i] = GTK_WIDGET(gtk_builder_get_object(window_xml, buf));

        snprintf(buf, sizeof(buf), "progressbar_%s", stat_bar_names[i]);
        stat_bar[i] = GTK_WIDGET(gtk_builder_get_object(window_xml, buf));

        lastval[i] = -1;
        lastmax[i] = -1;
    }

    statwindow.playername =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_playername"));
    statwindow.Str =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_str"));
    statwindow.Dex =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_dex"));
    statwindow.Con =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_con"));
    statwindow.Int =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_int"));
    statwindow.Wis =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_wis"));
    statwindow.Pow =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_pow"));
    statwindow.Cha =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_cha"));
    statwindow.wc =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_wc"));
    statwindow.dam =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_dam"));
    statwindow.ac =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_ac"));
    statwindow.armor =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_armor"));
    statwindow.speed =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_speed"));
    statwindow.weapon_speed =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_weapon_speed"));
    statwindow.range =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_range"));
    statwindow.exp =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_exp"));
    statwindow.level =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "label_level"));

    /* Note that the order the labels are attached to the tables determines
     * the order of display.  The order as right now is left to right,
     * then top to bottom, which means that is the order if displaying
     * skills & protections.
     */

    statwindow.table_skills_exp =
        GTK_WIDGET(gtk_builder_get_object(window_xml,"table_skills_exp"));

    if (statwindow.table_skills_exp) {
        /* Do not attempt to set up the table_skills_exp widget if it was not
         * defined in the layout.
         */
        for (i=0, x=0, y=0; i < SKILL_BOXES_X * SKILL_BOXES_Y; i++) {
            statwindow.skill_exp[i] = gtk_label_new("");
            gtk_table_attach(GTK_TABLE(statwindow.table_skills_exp), statwindow.skill_exp[i],
                             x, x+1, y, y+1, GTK_EXPAND, 0, 0, 0);
            gtk_widget_show(statwindow.skill_exp[i]);
            x++;
            if (x == SKILL_BOXES_X) {
                x=0;
                y++;
            }
        }
    }

    statwindow.table_protections =
        GTK_WIDGET(gtk_builder_get_object(window_xml, "table_protections"));

    for (i=0, x=0, y=0; i < PROTECTION_BOXES_X * PROTECTION_BOXES_Y; i++) {
        statwindow.resists[i] = gtk_label_new("");
        gtk_table_attach(GTK_TABLE(statwindow.table_protections), statwindow.resists[i],
                         x, x+1, y, y+1, GTK_EXPAND, 0, 0, 0);
        gtk_widget_show(statwindow.resists[i]);
        x++;
        if (x == PROTECTION_BOXES_X) {
            x=0;
            y++;
        }
    }
    /*stats_get_styles();*/
}

/**
 * Format an integer using an appropriate SI prefix.
 *
 * @param number
 * Number to format
 * @param buffer
 * Pointer to a string to store the formatted number
 * @param limit
 * Size of the buffer
 */
static void format_si_number(sint64 number, char *buffer, int limit)
{
    /* List of SI prefixes and corresponding values, least to greatest. */
    const char SI_SUFFIX[] = {'\0', 'k', 'M', 'G'};
    const float SI_VALUE[] = {1, 1000, 1000000, 1000000000};

    int suffix = 0, i;
    float value;

    /* Determine the most appropriate SI prefix to use. */
    for (i = sizeof(SI_SUFFIX) / sizeof(char) - 1; i > 0; i--) {
        if (number / SI_VALUE[i] >= 10) {
            suffix = i;
            break;
        }
    }

    value = number / SI_VALUE[suffix];

    /* If possible, trim the trailing zero decimal. */
    if (value - (int)value == 0) {
        snprintf(buffer, limit, "%.0f%c", value, SI_SUFFIX[suffix]);
    } else {
        snprintf(buffer, limit, "%.1f%c", value, SI_SUFFIX[suffix]);
    }
}

/**
 * Updates the stat bar and text display as it pertains to a specific stat.
 *
 * @param stat_no
 * The stat number to update.
 * @param max_stat
 * The normal maximum value this stat can have.  Note that within game terms,
 * the actual value can go above this via supercharging stats.
 * @param current_stat
 * current value of the stat.
 * @param statbar_max
 * @param statbar_stat
 * this is the stat value to use for drawing the statbar.  For most
 * stats, this is same as current stat, but for the exp bar,
 * we basically want it to be a graph relative to amount for next level.
 * @param can_alert
 * Whether this stat can go on alert when it gets low.  It doesn't make
 * sense for this to happen on exp (not really an alert if you gain a
 * level). Note: This is no longer used with the new style code - if
 * a stat shouldn't ever change color when it is low, the style should
 * dictate that.
 */
void update_stat(int stat_no, sint64 max_stat, sint64 current_stat,
                 sint64 statbar_max, sint64 statbar_stat, int can_alert)
{
    float bar;
    char buf[256];
    GdkColor ncolor, *set_color=NULL;

    /* If nothing changed, don't need to do anything */
    if (lastval[stat_no] == current_stat && lastmax[stat_no] == max_stat) {
        return;
    }

    lastval[stat_no] = current_stat;
    lastmax[stat_no] = max_stat;

    if (statbar_max > 0) {
        bar = (float) statbar_stat / (float) statbar_max;
    } else {
        bar = 0.0;
    }

    if (use_config[CONFIG_GRAD_COLOR]) {
        /* In this mode, the color of the stat bar were go between red and green
         * in a gradual style. Color is blended from low to high
         */

        GdkColor        *hcolor, *lcolor;
        float       diff;

        /* First thing we do is figure out current values, and thus what color
         * bases we use (based on super charged or normal value).  We also set
         * up diff as where we are between those two points.  In this way, the
         * blending logic below is the same regardless of actual value.
         */
        if (bar > 1.0) {
            if (bar>2.0) {
                bar=2.0;    /* Display unaffected; just calculations */
            }
            hcolor = bar_colors[stat_no][STYLE_GRAD_SUPER];
            lcolor = bar_colors[stat_no][STYLE_GRAD_NORMAL];
            diff = bar - 1.0;
        } else {
            if (bar < 0.0) {
                bar=0.0;    /* Like above, does not affect display */
            }
            hcolor = bar_colors[stat_no][STYLE_GRAD_NORMAL];
            lcolor = bar_colors[stat_no][STYLE_GRAD_LOW];
            diff = bar;
        }
        /* Now time to blend.  First, make sure colors are set.  then, we use
         * the lcolor as the base, making adjustments based on hcolor.  Values
         * in hcolor may be lower than lcolor, but that just means we
         * substract from lcolor, not add.
         */

        if (lcolor && hcolor) {
#if 1
            memcpy(&ncolor, lcolor, sizeof(GdkColor));

            ncolor.red += (hcolor->red - lcolor->red) * diff;
            ncolor.green += (hcolor->green - lcolor->green) * diff;
            ncolor.blue += (hcolor->blue - lcolor->blue) * diff;
#else
            /* This is an alternate coloring method that works when using
             * saturated colors for the base points.  This mimics the old
             * code, and works good when using such saturated colors (eg, one
             * of the RGB triplets being 255, others 0, like red, green, or
             * blue).  However, this doesn't produce very good results when
             * not using those colors - if say magenta and yellow are chosen
             * as the two colors, this code results in the colors basically
             * getting near white in the middle values.  For saturated colors,
             * the code below would produce nice bright yellow for the middle
             * values, where as the code above produces more a dark yellow,
             * since it only takes half the red and half the green.  However,
             * the code above still produces useful results even with that
             * limitation, and it works for all colors, so it is the code
             * enabled.  It perhaps be interesting to have some detection
             * logic on how the colors are actually set - if only a single
             * r/g/b value is set for the two colors, then use this logic
             * here, otherwise the above logic or something.
             * MSW 2007-01-24
             */
            if (diff > 0.5) {
                memcpy(&ncolor, hcolor, sizeof(GdkColor));

                if (lcolor->red > hcolor->red) {
                    ncolor.red = 2 * lcolor->red * (1.0 - diff);
                }

                if (lcolor->green > hcolor->green) {
                    ncolor.green = 2 * lcolor->green * (1.0 - diff);
                }

                if (lcolor->blue > hcolor->blue) {
                    ncolor.blue = 2 * lcolor->blue * (1.0 - diff);
                }

            } else {
                memcpy(&ncolor, lcolor, sizeof(GdkColor));

                if (hcolor->red > lcolor->red) {
                    ncolor.red = 2 * hcolor->red * diff;
                }

                if (hcolor->green > lcolor->green) {
                    ncolor.green = 2 * hcolor->green * diff;
                }

                if (hcolor->blue > lcolor->blue) {
                    ncolor.blue = 2 * hcolor->blue * diff;
                }
            }
#endif
#if 0
            fprintf(stderr,"stat %d, val %d, r/g/b=%d/%d/%d\n",
                    stat_no, current_stat, ncolor.red, ncolor.green, ncolor.blue);
#endif
            set_color = &ncolor;
        }
    } else {
        if (statbar_stat * 4 < statbar_max) {
            set_color = bar_colors[stat_no][STYLE_LOW];
        } else if (statbar_stat > statbar_max) {
            set_color = bar_colors[stat_no][STYLE_SUPER];
        } else {
            set_color = bar_colors[stat_no][STYLE_NORMAL];
        }
    }
    if (bar > 1.0) {
        bar = 1.0;
    }
    if (bar < 0.0) {
        bar = 0.0;
    }

    /* It may be a waste, but we set the color everytime here - it isn't very
     * costly, and keeps us from tracing the last color we set.  Note that
     * set_color could be null, which means it reverts back to normal color.
     */
    gtk_widget_modify_base(stat_bar[stat_no], GTK_STATE_SELECTED, set_color);
    /* The line above doesn't work sometimes, but then, the next one does. */
    gtk_widget_modify_bg(stat_bar[stat_no], GTK_STATE_PRELIGHT, set_color);

    gtk_progress_set_percentage(GTK_PROGRESS(stat_bar[stat_no]), bar);

    /* Display exp bar with SI prefixes; display all other normally. */
    if (stat_no == STAT_BAR_EXP) {
        format_si_number(current_stat, buf, sizeof(buf));
        gtk_label_set(GTK_LABEL(stat_current[stat_no]), buf);
        format_si_number(max_stat, buf, sizeof(buf));
        gtk_label_set(GTK_LABEL(stat_max[stat_no]), buf);
    } else {
        snprintf(buf, sizeof(buf), "%"FMT64, current_stat);
        gtk_label_set(GTK_LABEL(stat_current[stat_no]), buf);
        snprintf(buf, sizeof(buf), "%"FMT64, max_stat);
        gtk_label_set(GTK_LABEL(stat_max[stat_no]), buf);
    }
}

/**
 * Updates the stats pane - hp, sp, etc labels
 *
 * @param redraw
 */
void draw_message_window(int redraw)
{
    static int lastbeep=0;
    static sint64 level_diff;

    update_stat(STAT_BAR_HP, cpl.stats.maxhp, cpl.stats.hp,
                cpl.stats.maxhp, cpl.stats.hp, TRUE);
    update_stat(STAT_BAR_SP, cpl.stats.maxsp, cpl.stats.sp,
                cpl.stats.maxsp, cpl.stats.sp, TRUE);
    update_stat(STAT_BAR_GRACE, cpl.stats.maxgrace, cpl.stats.grace,
                cpl.stats.maxgrace, cpl.stats.grace, TRUE);
    update_stat(STAT_BAR_FOOD, 999, cpl.stats.food, 999, cpl.stats.food, TRUE);

    /* We may or may not have an exp table from the server.  If we don't, just
     * use current exp value so it will always appear maxed out.
     */
    /* We calculate level_diff here just so it makes the update_stat()
     * call below less messy.
     */
    if ((cpl.stats.level+1) < exp_table_max) {
        level_diff = exp_table[cpl.stats.level+1] - exp_table[cpl.stats.level];
    } else {
        level_diff=cpl.stats.exp;
    }

    update_stat(STAT_BAR_EXP,
                (cpl.stats.level+1) < exp_table_max ? exp_table[cpl.stats.level+1]:cpl.stats.exp,
                cpl.stats.exp,
                level_diff,
                (cpl.stats.level+1) < exp_table_max ?
                (cpl.stats.exp - exp_table[cpl.stats.level]):cpl.stats.exp, FALSE);

    if (use_config[CONFIG_FOODBEEP] && (cpl.stats.food%4==3) && (cpl.stats.food < 200)) {
        gdk_beep( );
    } else if (use_config[CONFIG_FOODBEEP] && cpl.stats.food == 0 && ++lastbeep == 5) {
        lastbeep = 0;
        gdk_beep( );
    }
}

/**
 * The mapping tables may not be completely full, so handle null values.
 * Always treat null values as later in the sort order.
 */
static int mapping_sort(NameMapping *a, NameMapping *b)
{
    if (!a->name && !b->name) {
        return 0;
    }
    if (!a->name) {
        return 1;
    }
    if (!b->name) {
        return -1;
    } else {
        return strcasecmp(a->name, b->name);
    }
}

/**
 *
 */
static void update_stat_mapping(void)
{
    int i;

    for (i=0; i < MAX_SKILL; i++) {
        skill_mapping[i].value=i;
        if (skill_names[i]) {
            skill_mapping[i].name = skill_names[i];
        } else {
            skill_mapping[i].name = NULL;
        }
    }
    qsort(skill_mapping, MAX_SKILL, sizeof(NameMapping),
          (int (*)(const void*, const void*))mapping_sort);

    for (i=0; i < NUM_RESISTS; i++) {
        resist_mapping[i].value=i;
        if (resists_name[i]) {
            resist_mapping[i].name = resists_name[i];
        } else {
            resist_mapping[i].name = NULL;
        }
    }
    qsort(resist_mapping, NUM_RESISTS, sizeof(NameMapping),
          (int (*)(const void*, const void*))mapping_sort);

    need_mapping_update=0;
}

/**
 * Draws the stats window.  If redraw is true, it means we need to redraw the
 * entire thing, and not just do an updated
 */
void draw_stats(int redraw)
{
    static Stats last_stats;
    static char last_name[MAX_BUF]="", last_range[MAX_BUF]="";
    static int init_before=0, max_drawn_skill=0, max_drawn_resists=0;

    float weap_sp;
    char buff[MAX_BUF];
    int i, on_skill, sk;

    if (!init_before) {
        init_before=1;
        memset(&last_stats, 0, sizeof(Stats));
    }

    /* skill_names gets set as part of the initialization with the
     * client - however, right now, there is no callback when
     * it is set, so instead, just track that wee need to update
     * and see if it changes.
     */
    if (need_mapping_update && skill_names[1] != NULL) {
        update_stat_mapping();
    }

    if (strcmp(cpl.title, last_name) || redraw) {
        strcpy(last_name,cpl.title);
        gtk_label_set (GTK_LABEL(statwindow.playername), cpl.title);
    }

    if(redraw || cpl.stats.exp!=last_stats.exp) {
        last_stats.exp = cpl.stats.exp;
        snprintf(buff, sizeof(buff), "Experience: %5" FMT64 ,cpl.stats.exp);
        gtk_label_set (GTK_LABEL(statwindow.exp), buff);
    }

    if(redraw || cpl.stats.level!=last_stats.level) {
        last_stats.level = cpl.stats.level;
        snprintf(buff, sizeof(buff), "Level: %d",cpl.stats.level);
        gtk_label_set (GTK_LABEL(statwindow.level), buff);
    }

    if(redraw || cpl.stats.Str!=last_stats.Str) {
        last_stats.Str=cpl.stats.Str;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Str);
        gtk_label_set (GTK_LABEL(statwindow.Str), buff);
    }

    if(redraw || cpl.stats.Dex!=last_stats.Dex) {
        last_stats.Dex=cpl.stats.Dex;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Dex);
        gtk_label_set (GTK_LABEL(statwindow.Dex), buff);
    }

    if(redraw || cpl.stats.Con!=last_stats.Con) {
        last_stats.Con=cpl.stats.Con;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Con);
        gtk_label_set (GTK_LABEL(statwindow.Con), buff);
    }

    if(redraw || cpl.stats.Int!=last_stats.Int) {
        last_stats.Int=cpl.stats.Int;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Int);
        gtk_label_set (GTK_LABEL(statwindow.Int), buff);
    }

    if(redraw || cpl.stats.Wis!=last_stats.Wis) {
        last_stats.Wis=cpl.stats.Wis;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Wis);
        gtk_label_set (GTK_LABEL(statwindow.Wis), buff);
    }

    if(redraw || cpl.stats.Pow!=last_stats.Pow) {
        last_stats.Pow=cpl.stats.Pow;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Pow);
        gtk_label_set (GTK_LABEL(statwindow.Pow), buff);
    }

    if(redraw || cpl.stats.Cha!=last_stats.Cha) {
        last_stats.Cha=cpl.stats.Cha;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.Cha);
        gtk_label_set (GTK_LABEL(statwindow.Cha), buff);
    }

    if(redraw || cpl.stats.wc!=last_stats.wc) {
        last_stats.wc=cpl.stats.wc;
        snprintf(buff, sizeof(buff), "%2d",cpl.stats.wc);
        gtk_label_set (GTK_LABEL(statwindow.wc), buff);
    }

    if(redraw || cpl.stats.dam!=last_stats.dam) {
        last_stats.dam=cpl.stats.dam;
        snprintf(buff, sizeof(buff), "%d",cpl.stats.dam);
        gtk_label_set (GTK_LABEL(statwindow.dam), buff);
    }

    if(redraw || cpl.stats.ac!=last_stats.ac) {
        last_stats.ac=cpl.stats.ac;
        snprintf(buff, sizeof(buff), "%d",cpl.stats.ac);
        gtk_label_set (GTK_LABEL(statwindow.ac), buff);
    }

    if(redraw || cpl.stats.resists[0]!=last_stats.resists[0]) {
        last_stats.resists[0]=cpl.stats.resists[0];
        snprintf(buff, sizeof(buff), "%d",cpl.stats.resists[0]);
        gtk_label_set (GTK_LABEL(statwindow.armor), buff);
    }

    if (redraw || cpl.stats.speed!=last_stats.speed) {
        last_stats.speed=cpl.stats.speed;
        snprintf(buff, sizeof(buff), "%3.2f",(float)cpl.stats.speed/FLOAT_MULTF);
        gtk_label_set (GTK_LABEL(statwindow.speed), buff);
    }
    /* sc_version >= 1029 reports real value of weapon speed -
     * not as a factor of player speed.  Handle accordingly.
     */
    if (csocket.sc_version >= 1029) {
        weap_sp = (float) cpl.stats.weapon_sp / FLOAT_MULTF;
    } else {
        weap_sp = (float) cpl.stats.speed/((float)cpl.stats.weapon_sp);
    }

    if (redraw || weap_sp !=last_stats.weapon_sp) {
        last_stats.weapon_sp=weap_sp;
        snprintf(buff, sizeof(buff), "%3.2f",weap_sp);
        gtk_label_set (GTK_LABEL(statwindow.weapon_speed), buff);
    }

    if(redraw || strcmp(cpl.range, last_range)) {
        strcpy(last_range, cpl.range);
        snprintf(buff, sizeof(buff), "Range: %s",cpl.range);
        gtk_label_set (GTK_LABEL(statwindow.range), cpl.range);
    }

    update_skill_information();

    if (statwindow.table_skills_exp) {
        /* Do not attempt to set up the table_skills_exp widget if it was not
         * defined in the layout.
         */
        on_skill=0;
        assert(sizeof(statwindow.skill_exp)/sizeof(*statwindow.skill_exp) >= 2*MAX_SKILL);
        for (i=0; i<MAX_SKILL; i++) {
            /* Drawing a particular skill entry is tricky - only draw if
             * different, and only draw if we have a name for the skill and
             * the player has some exp in the skill - don't draw all 30 skills
             * for no reason.
             */
            sk = skill_mapping[i].value;

            if ((redraw || cpl.stats.skill_exp[sk] != last_stats.skill_exp[sk])
                    && skill_mapping[i].name && cpl.stats.skill_exp[sk]) {
                gtk_label_set(GTK_LABEL(statwindow.skill_exp[on_skill++]),
                              skill_mapping[i].name);
                snprintf(buff, sizeof(buff), "%" FMT64 " (%d)",
                         cpl.stats.skill_exp[sk], cpl.stats.skill_level[sk]);
                gtk_label_set(
                    GTK_LABEL(statwindow.skill_exp[on_skill++]), buff);
                last_stats.skill_level[sk] = cpl.stats.skill_level[sk];
                last_stats.skill_exp[sk] = cpl.stats.skill_exp[sk];
            } else if (cpl.stats.skill_exp[sk]) {
                /* Don't need to draw the skill, but need to update the
                 * position of where to draw the next one.
                 */
                on_skill+=2;
            }
        }

        /* Since the number of skills we draw come and go, basically we want
         * to erase any extra.  This shows up when switching characters, eg,
         * character #1 knows 10 skills, #2 knows 5 - need to erase those 5
         * extra.
         */
        if (on_skill < max_drawn_skill) {
            int k;

            for (k = on_skill; k <= max_drawn_skill; k++) {
                gtk_label_set(GTK_LABEL(statwindow.skill_exp[k]), "");
            }
        }
        max_drawn_skill = on_skill;
    }

    /* Now do the resistance table */
    if (redraw || cpl.stats.resist_change) {
        int i,j=0;

        cpl.stats.resist_change=0;
        for (i=0; i<NUM_RESISTS; i++) {
            sk = resist_mapping[i].value;
            if (cpl.stats.resists[sk]) {
                gtk_label_set(GTK_LABEL(statwindow.resists[j]), resist_mapping[i].name);
                j++;
                snprintf(buff, sizeof(buff), "%+4d", cpl.stats.resists[sk]);
                gtk_label_set(GTK_LABEL(statwindow.resists[j]), buff);
                j++;
                if (j >= PROTECTION_BOXES_X * PROTECTION_BOXES_Y) {
                    break;
                }
            }
        }
        /* Erase old/unused resistances */
        if (j < max_drawn_resists) {
            for (i=j; i <= max_drawn_resists; i++)  {
                gtk_label_set(GTK_LABEL(statwindow.resists[i]), "");
            }
        }
        max_drawn_resists = j;
    } /* if we draw the resists */


    /* Don't need to worry about hp, sp, grace, food - update_stat()
     * deals with that as part of the stat bar logic.
     */

}

/**
 *
 */
void clear_stat_mapping(void)
{
    need_mapping_update=1;
}
