font.c

Go to the documentation of this file.

#include <stdio.h>
#include <string.h>
 
#include <grass/gis.h>
#include "driver.h"
#include "driverlib.h"
 
static int font_type = GFONT_STROKE;
static char *encoding;
 
static void stroke_set(const char *filename)
{
    if (font_init(filename) == 0)
        font_type = GFONT_STROKE;
}
 
static void freetype_set(const char *filename, int index)
{
    if (font_init_freetype(filename, index) == 0)
        font_type = GFONT_FREETYPE;
}
 
static void driver_set(const char *name)
{
    (*driver->Set_font)(name);
    font_type = GFONT_DRIVER;
}
 
int font_get_type(void)
{
    return font_type;
}
 
const char *font_get_encoding(void)
{
    if (!encoding)
        encoding = G_store("ISO-8859-1");
    return encoding;
}
 
static void font_list(char ***list, int *count, int verbose)
{
    char **fonts;
    int num_fonts;
    int i;
 
    for (i = 0; ftcap[i].name; i++)
        ;
    num_fonts = i;
 
    G_debug(2, "font_list: num_fonts=%d", num_fonts);
    fonts = G_malloc(num_fonts * sizeof(const char *));
 
    for (i = 0; i < num_fonts; i++) {
        struct GFONT_CAP *p = &ftcap[i];
 
        G_debug(4, "font: %d (%s)", i, p->name);
        if (verbose) {
            char buf[GPATH_MAX];
 
            sprintf(buf, "%s|%s|%d|%s|%d|%s|", p->name, p->longname, p->type,
                    p->path, p->index, p->encoding);
 
            fonts[i] = G_store(buf);
        }
        else
            fonts[i] = G_store(p->name);
    }
 
    *list = fonts;
    *count = num_fonts;
}
 
static void free_font_list(char **fonts, int count)
{
    int i;
 
    for (i = 0; i < count; i++)
        G_free(fonts[i]);
 
    G_free(fonts);
}
 
void COM_Set_font(const char *name)
{
    int i;
 
    if (G_is_absolute_path(name)) {
        if (font_exists(name))
            freetype_set(name, 0);
        return;
    }
 
    for (i = 0; ftcap[i].name; i++) {
        struct GFONT_CAP *cap = &ftcap[i];
 
        if (strcmp(name, cap->name) != 0)
            continue;
 
        switch (cap->type) {
        case GFONT_FREETYPE:
            freetype_set(cap->path, cap->index);
            COM_Set_encoding(cap->encoding);
            break;
        case GFONT_STROKE:
            stroke_set(cap->name);
            break;
        }
        return;
    }
 
    if (driver->Font_info && driver->Set_font) {
        char **list = NULL;
        int count = 0;
 
        (*driver->Font_info)(&list, &count);
 
        for (i = 0; i < count; i++) {
            struct GFONT_CAP cap;
 
            if (!parse_fontcap_entry(&cap, list[i]))
                continue;
 
            if (cap.type != GFONT_DRIVER || strcmp(name, cap.name) != 0)
                continue;
 
            driver_set(cap.name);
            COM_Set_encoding(cap.encoding);
            break;
        }
 
        free_font_list(list, count);
        return;
    }
 
    stroke_set("romans");
}
 
void COM_Set_encoding(const char *enc)
{
    if (encoding)
        G_free(encoding);
 
    encoding = G_store(enc);
}
 
void COM_Font_list(char ***list, int *count)
{
    font_list(list, count, 0);
    if (driver->Font_list)
        (*driver->Font_list)(list, count);
}
 
void COM_Font_info(char ***list, int *count)
{
    font_list(list, count, 1);
    if (driver->Font_info)
        (*driver->Font_info)(list, count);
}