text_format.c

Go to the documentation of this file.

/*#*
 *#* $Log$
 *#* Revision 1.10  2006/07/19 12:56:26  bernie
 *#* Convert to new Doxygen style.
 *#*
 *#* Revision 1.9  2006/04/27 05:39:24  bernie
 *#* Enhance text rendering to arbitrary x,y coords.
 *#*
 *#* Revision 1.8  2006/03/22 09:50:11  bernie
 *#* Don't use C99 stuff.
 *#*
 *#* Revision 1.7  2006/03/20 17:51:55  bernie
 *#* Cleanups.
 *#*
 *#* Revision 1.6  2006/03/13 02:05:54  bernie
 *#* Mark slow paths as UNLIKELY.
 *#*
 *#* Revision 1.5  2006/03/07 22:18:04  bernie
 *#* Correctly compute text width for prop fonts; Make styles a per-bitmap attribute.
 *#*
 *#* Revision 1.4  2006/02/10 12:31:33  bernie
 *#* Add multiple font support in bitmaps.
 *#*
 *#* Revision 1.3  2005/11/27 23:31:58  bernie
 *#* Reorder includes.
 *#*
 *#* Revision 1.2  2005/11/04 18:17:45  bernie
 *#* Fix header guards and includes for new location of gfx module.
 *#*
 *#* Revision 1.1  2005/11/04 18:11:35  bernie
 *#* Move graphics stuff from mware/ to gfx/.
 *#*
 *#* Revision 1.10  2005/11/04 16:20:02  bernie
 *#* Fix reference to README.devlib in header.
 *#*
 *#* Revision 1.9  2004/12/31 17:47:45  bernie
 *#* Rename UNUSED() to UNUSED_ARG().
 *#*
 *#* Revision 1.8  2004/11/16 21:16:56  bernie
 *#* Update to new naming scheme in mware/gfx.c.
 *#*
 *#* Revision 1.7  2004/10/03 19:05:04  bernie
 *#* text_widthf(), text_vwidthf(): New functions.
 *#*
 *#* Revision 1.6  2004/09/14 20:59:04  bernie
 *#* text_xprintf(): Support all styles; Pixel-wise text centering.
 *#*
 *#* Revision 1.5  2004/08/25 14:12:09  rasky
 *#* Aggiornato il comment block dei log RCS
 *#*
 *#* Revision 1.4  2004/08/05 18:46:44  bernie
 *#* Documentation improvements.
 *#*
 *#* Revision 1.3  2004/08/03 15:57:18  aleph
 *#* Add include to fix warning for vsprintf()
 *#*
 *#* Revision 1.2  2004/06/03 11:27:09  bernie
 *#* Add dual-license information.
 *#*
 *#* Revision 1.1  2004/05/23 15:43:16  bernie
 *#* Import mware modules.
 *#*
 *#* Revision 1.2  2004/03/26 18:50:50  bernie
 *#* Move _PROGMEM stuff to compiler.h
 *#*
 *#* Revision 1.1  2004/03/19 16:52:28  bernie
 *#* Move printf() like functions from text.c to text_format.c and add PROGMEM versions.
 *#*
 *#*/

#include "text.h"

#include <mware/formatwr.h> /* _formatted_write() */
#include <gfx/font.h>
#include <gfx/gfx.h>

#include <stdio.h> /* vsprintf() */
#include <stdarg.h>
#include <string.h> /* strlen() */

int PGM_FUNC(text_puts)(const char * PGM_ATTR str, struct Bitmap *bm)
{
    char c;

    while ((c = PGM_READ_CHAR(str++)))
        text_putchar(c, bm);

    return 0;
}


int PGM_FUNC(text_vprintf)(struct Bitmap *bm, const char * PGM_ATTR fmt, va_list ap)
{
    return PGM_FUNC(_formatted_write)(fmt, (void (*)(char, void *))text_putchar, bm, ap);
}

int PGM_FUNC(text_printf)(struct Bitmap *bm, const char * PGM_ATTR fmt, ...)
{
    int len;

    va_list ap;
    va_start(ap, fmt);
    len = PGM_FUNC(text_vprintf)(bm, fmt, ap);
    va_end(ap);

    return len;
}

int PGM_FUNC(text_xyvprintf)(struct Bitmap *bm,
        coord_t x, coord_t y, uint16_t style, const char * PGM_ATTR fmt, va_list ap)
{
    int len;
    uint8_t oldstyle = 0;

    text_setCoord(bm, x, y);

    if (style & STYLEF_MASK)
        oldstyle = text_style(bm, style, STYLEF_MASK);

    if (style & (TEXT_CENTER | TEXT_RIGHT))
    {
        uint8_t pad = bm->width - PGM_FUNC(text_vwidthf)(bm, fmt, ap);

        if (style & TEXT_CENTER)
            pad /= 2;

        if (style & TEXT_FILL)
            gfx_rectFillC(bm, 0, y, pad, y + bm->font->height,
                (style & STYLEF_INVERT) ? 0xFF : 0x00);

        text_setCoord(bm, pad, y);
    }

    len = PGM_FUNC(text_vprintf)(bm, fmt, ap);

    if (style & TEXT_FILL)
        gfx_rectFillC(bm, bm->penX, y, bm->width, y + bm->font->height,
            (style & STYLEF_INVERT) ? 0xFF : 0x00);

    /* Restore old style */
    if (style & STYLEF_MASK)
        text_style(bm, oldstyle, STYLEF_MASK);

    return len;
}


int PGM_FUNC(text_xyprintf)(struct Bitmap *bm,
        coord_t x, coord_t y, uint16_t style, const char * PGM_ATTR fmt, ...)
{
    int len;
    va_list ap;

    va_start(ap, fmt);
    len = PGM_FUNC(text_xyvprintf)(bm, x, y, style, fmt, ap);
    va_end(ap);

    return len;
}


int PGM_FUNC(text_xprintf)(struct Bitmap *bm,
        uint8_t row, uint8_t col, uint16_t style, const char * PGM_ATTR fmt, ...)
{
    int len;
    va_list ap;

    va_start(ap, fmt);
    len = PGM_FUNC(text_xyvprintf)(
            bm, col * bm->font->width, row * bm->font->height,
            style, fmt, ap);
    va_end(ap);

    return len;
}


struct TextWidthData
{
    Bitmap *bitmap;
    coord_t width;
};

static int text_charWidth(int c, struct TextWidthData *twd)
{
    unsigned char index = (unsigned char)c;
    Bitmap *bm = twd->bitmap;
    coord_t glyph_width;


    if (UNLIKELY(!FONT_HAS_GLYPH(bm->font, index)))
    {
        if (!FONT_HAS_GLYPH(bm->font, '?'))
            index = '?';
        else
            index = bm->font->first;
    }

    /* Make character relative to font start */
    index -= bm->font->first;

    if (bm->font->offset)
        /* Proportional font */
        glyph_width = bm->font->widths[index]; /* TODO: optimize away */
    else
        /* Fixed width font */
        glyph_width = bm->font->width;

    if (bm->styles & STYLEF_CONDENSED)
        --glyph_width;

    if (bm->styles & STYLEF_EXPANDED)
        glyph_width *= 2;

    twd->width += glyph_width;

    return c;
}

int PGM_FUNC(text_vwidthf)(
    UNUSED_ARG(struct Bitmap *, bm),
    const char * PGM_ATTR fmt,
    va_list ap)
{
    /* Fixed font with no styles affecting the width? */
    if (!bm->font->offset && !(bm->styles & (STYLEF_CONDENSED | STYLEF_EXPANDED)))
        return PGM_FUNC(vsprintf)(NULL, fmt, ap) * bm->font->width;
    else
    {
        struct TextWidthData twd;
        twd.bitmap = bm;
        twd.width = 0;
        _formatted_write(fmt, (void (*)(char, void *))text_charWidth, &twd, ap);
        return twd.width;
    }
}


int PGM_FUNC(text_widthf)(struct Bitmap *bm, const char * PGM_ATTR fmt, ...)
{
    int width;

    va_list ap;
    va_start(ap, fmt);
    width = PGM_FUNC(text_vwidthf)(bm, fmt, ap);
    va_end(ap);

    return width;
}