#include <cstring>
#include <stdexcept>
+#include <SDL_image.h>
+#include "physfs/physfs_sdl.hpp"
+
#include "lisp/parser.hpp"
#include "lisp/lisp.hpp"
#include "screen.hpp"
#include "drawing_context.hpp"
#include "log.hpp"
+namespace {
+bool has_multibyte_mark(unsigned char c);
+uint32_t decode_utf8(const std::string& text, size_t& p);
+
+bool vline_empty(SDL_Surface* surface, int x, int start_y, int end_y, Uint8 threshold)
+{
+ Uint8* pixels = (Uint8*)surface->pixels;
+
+ for(int y = start_y; y < end_y; ++y)
+ {
+ const Uint8& p = pixels[surface->pitch*y + x*surface->format->BytesPerPixel + 3];
+ if (p > threshold)
+ {
+ return false;
+ }
+ }
+ return true;
+}
+} // namespace
+
Font::Font(const std::string& file, const std::string& shadowfile,
int w, int h, int shadowsize)
- : chars(0), shadow_chars(0), w(w), h(h), shadowsize(shadowsize)
+ : glyph_surface(0), shadow_chars(0),
+ char_width(w), char_height(h),
+ shadowsize(shadowsize)
{
- chars = new Surface(file);
- shadow_chars = new Surface(shadowfile);
-
+ glyph_surface = new Surface(file);
+ shadow_chars = new Surface(shadowfile);
+
first_char = 32;
- char_count = ((int) chars->get_height() / h) * 16;
+ char_count = ((int) glyph_surface->get_height() / char_height) * 16;
+
+ for(uint32_t i = 0; i < char_count; ++i)
+ {
+ float x = (i % 16) * char_width;
+ float y = (i / 16) * char_height;
+ glyphs.push_back(Rect(x, y,
+ x + char_width, y + char_height));
+ }
+}
+
+Font::Font(const std::string& filename, int char_width_, int char_height_)
+ : glyph_surface(0), shadow_chars(0),
+ char_width(char_width_), char_height(char_height_),
+ shadowsize(0)
+{
+ glyph_surface = new Surface(filename);
+
+ first_char = 32;
+ char_count = ((int) glyph_surface->get_height() / char_height) * 16;
+
+ // Load the surface into RAM and scan the pixel data for characters
+ SDL_Surface* surface = IMG_Load_RW(get_physfs_SDLRWops(filename), 1);
+ if(surface == NULL) {
+ std::ostringstream msg;
+ msg << "Couldn't load image '" << filename << "' :" << SDL_GetError();
+ throw std::runtime_error(msg.str());
+ }
+
+ SDL_LockSurface(surface);
+
+ for(uint32_t i = 0; i < char_count; ++i)
+ {
+ int x = (i % 16) * char_width;
+ int y = (i / 16) * char_height;
+
+ int left = x;
+ while (left < x + char_width &&
+ vline_empty(surface, left, y, y + char_height, 0))
+ left += 1;
+
+ int right = x + char_width - 1;
+ while (right > left &&
+ vline_empty(surface, right, y, y + char_height, 0))
+ right -= 1;
+
+ if (left <= right)
+ glyphs.push_back(Rect(left, y,
+ right+1, y + char_height));
+ else // glyph is completly transparent
+ glyphs.push_back(Rect(x, y,
+ x + char_width, y + char_height));
+
+ }
+
+ SDL_UnlockSurface(surface);
+
+ SDL_FreeSurface(surface);
}
Font::~Font()
{
- delete chars;
+ delete glyph_surface;
delete shadow_chars;
}
float
Font::get_text_width(const std::string& text) const
{
- /** Let's calculate the size of the biggest paragraph */
- std::string::size_type l, hl, ol;
- hl = 0; l = 0;
- while(true)
+ float curr_width = 0;
+ float last_width = 0;
+
+ // FIXME: add UTF8 decode here
+ for(std::string::size_type i = 0; i < text.size(); ++i)
{
- ol = l;
- l = text.find("\n", l+1);
- if(l == std::string::npos)
- break;
- if(hl < l-ol)
- hl = l-ol;
+ uint32_t chr = text[i];
+ if (chr == '\n')
+ {
+ last_width = std::max(last_width, curr_width);
+ curr_width = 0;
+ }
+ else
+ {
+ curr_width += glyphs[static_cast<unsigned char>(text[i])].get_width() + 1;
+ }
}
- if(hl == 0)
- hl = text.size();
-
- for (unsigned int i = 0; i < text.size(); i++)
- if ((unsigned char) text[i] > 0xC2 && (unsigned char) text[i] < 0xC6)
- hl--; // control characters are a WASTE.
- return hl * w;
+ return std::max(curr_width, last_width);
}
float
Font::get_text_height(const std::string& text) const
{
- /** Let's calculate height of the text */
- std::string::size_type l, hh;
- hh = h; l = 0;
- while(true)
+ std::string::size_type text_height = char_height;
+
+ for(std::string::size_type i = 0; i < text.size(); ++i)
{
- l = text.find("\n", l+1);
- if(l == std::string::npos)
- break;
- hh += h + 2;
+ if (i == '\n')
+ text_height += char_height + 2;
}
- return hh;
+ return text_height;
}
float
Font::get_height() const
{
- return h;
-}
-
-std::string
-Font::wrap_to_width(const std::string& s, int max_width, std::string* overflow) const
-{
- return wrap_to_chars(s, max_width / w, overflow);
+ return char_height;
}
std::string
if(l > sizeof(temp)-1)
l = sizeof(temp)-1;
-
+
temp[text.copy(temp, l - i, i)] = '\0';
-
+
// calculate X positions based on the alignment type
Vector pos = Vector(pos_);
if(alignment == CENTER_ALLIGN)
draw_text(temp, pos + Vector(0,y), drawing_effect, alpha);
i = l+1;
- y += h + 2;
+ y += char_height + 2;
}
}
void
-Font::draw_text(const std::string& text, const Vector& pos,
+Font::draw_text(const std::string& text, const Vector& pos,
DrawingEffect drawing_effect, float alpha) const
{
if(shadowsize > 0)
draw_chars(shadow_chars, text, pos + Vector(shadowsize, shadowsize),
drawing_effect, alpha);
- draw_chars(chars, text, pos, drawing_effect, alpha);
-}
-
-/** decoding of a byte stream to a single unicode character.
- * This should be correct for well formed utf-8 sequences but doesn't check for
- * all forms of illegal sequences.
- * (see unicode standard section 3.10 table 3-5 and 3-6 for details)
- */
-uint32_t decode_utf8(const std::string& text, size_t& p)
-{
- // 1 byte sequence
- uint32_t c = (unsigned char) text[p++];
- if(c <= 0x7F) {
- return c;
- }
-
- // 2 byte sequence
- if(p >= text.size())
- throw std::runtime_error("Malformed utf-8 sequence");
- uint32_t c2 = (unsigned char) text[p++];
- if(c <= 0xDF) {
- if(c < 0xC2)
- throw std::runtime_error("Malformed utf-8 sequence");
- return (c & 0x1F) << 6 | (c2 & 0x3F);
- }
-
- // 3 byte sequence
- if(p >= text.size())
- throw std::runtime_error("Malformed utf-8 sequence");
- uint32_t c3 = (unsigned char) text[p++];
- if(c <= 0xEF) {
- return (c & 0x0F) << 12 | (c2 & 0x3F) << 6 | (c3 & 0x3F);
- }
-
- // 4 byte sequence
- if(p >= text.size())
- throw std::runtime_error("Malformed utf-8 sequence");
- uint32_t c4 = (unsigned char) text[p++];
- if(c <= 0xF4) {
- return (c & 0x07) << 18 | (c2 & 0x3F) << 12 | (c3 & 0x3F) << 6
- | (c4 & 0x3F);
- }
-
- throw std::runtime_error("Malformed utf-8 sequence");
+ draw_chars(glyph_surface, text, pos, drawing_effect, alpha);
}
void
Vector p = pos;
size_t i = 0;
while(i < text.size()) {
- uint32_t c = decode_utf8(text, i);
- ssize_t font_index;
+ uint32_t c;
+ try {
+ c = decode_utf8(text, i); // FIXME: this seems wrong, since when incrementing i by
+ }
+ catch (std::runtime_error) {
+ log_debug << "Malformed utf-8 sequence beginning with " << *((uint32_t*)(text.c_str() + i)) << " found " << std::endl;
+ c = 0;
+ i++;
+ }
+
+ int font_index = c - first_char;
// a non-printable character?
- if(c == '\n') {
+ if(c == '\n') {
p.x = pos.x;
- p.y += h + 2;
+ p.y += char_height + 2;
continue;
}
if(c == ' ') {
- p.x += w;
+ p.x += glyphs[font_index].get_width();
continue;
}
- font_index = c - first_char;
// we don't have the control chars 0x80-0xa0 in the font
- if(c >= 0x80) {
+ if (c >= 0x80) {
font_index -= 32;
if(c <= 0xa0) {
log_debug << "Unsupported utf-8 character '" << c << "' found" << std::endl;
font_index = 0;
}
}
-
- if(font_index < 0 || font_index >= (ssize_t) char_count) {
+
+ if(font_index < 0 || font_index >= (int) char_count) {
log_debug << "Unsupported utf-8 character found" << std::endl;
font_index = 0;
- }
+ }
- int source_x = (font_index % 16) * w;
- int source_y = (font_index / 16) * h;
- pchars->draw_part(source_x, source_y, p.x, p.y, w, h, alpha,
- drawing_effect);
- p.x += w;
+ const Rect& glyph = glyphs[font_index];
+ pchars->draw_part(glyph.get_left(), glyph.get_top(),
+ p.x, p.y,
+ glyph.get_width(), glyph.get_height(),
+ alpha, drawing_effect);
+ p.x += glyphs[font_index].get_width();
}
}
+
+
+namespace {
+
+/**
+ * returns true if this byte matches a bitmask of 10xx.xxxx, i.e. it is the 2nd, 3rd or 4th byte of a multibyte utf8 string
+ */
+bool has_multibyte_mark(unsigned char c) {
+ return ((c & 0300) == 0200);
+}
+
+/**
+ * gets unicode character at byte position @a p of UTF-8 encoded @a text, then advances @a p to the next character.
+ * @throws std::runtime_error if decoding fails.
+ * See unicode standard section 3.10 table 3-5 and 3-6 for details.
+ */
+uint32_t decode_utf8(const std::string& text, size_t& p)
+{
+ uint32_t c1 = (unsigned char) text[p+0];
+
+ if (has_multibyte_mark(c1)) std::runtime_error("Malformed utf-8 sequence");
+
+ if ((c1 & 0200) == 0000) {
+ // 0xxx.xxxx: 1 byte sequence
+ p+=1;
+ return c1;
+ }
+ else if ((c1 & 0340) == 0300) {
+ // 110x.xxxx: 2 byte sequence
+ if(p+1 >= text.size()) throw std::range_error("Malformed utf-8 sequence");
+ uint32_t c2 = (unsigned char) text[p+1];
+ if (!has_multibyte_mark(c2)) throw std::runtime_error("Malformed utf-8 sequence");
+ p+=2;
+ return (c1 & 0037) << 6 | (c2 & 0077);
+ }
+ else if ((c1 & 0360) == 0340) {
+ // 1110.xxxx: 3 byte sequence
+ if(p+2 >= text.size()) throw std::range_error("Malformed utf-8 sequence");
+ uint32_t c2 = (unsigned char) text[p+1];
+ uint32_t c3 = (unsigned char) text[p+2];
+ if (!has_multibyte_mark(c2)) throw std::runtime_error("Malformed utf-8 sequence");
+ if (!has_multibyte_mark(c3)) throw std::runtime_error("Malformed utf-8 sequence");
+ p+=3;
+ return (c1 & 0017) << 12 | (c2 & 0077) << 6 | (c3 & 0077);
+ }
+ else if ((c1 & 0370) == 0360) {
+ // 1111.0xxx: 4 byte sequence
+ if(p+3 >= text.size()) throw std::range_error("Malformed utf-8 sequence");
+ uint32_t c2 = (unsigned char) text[p+1];
+ uint32_t c3 = (unsigned char) text[p+2];
+ uint32_t c4 = (unsigned char) text[p+4];
+ if (!has_multibyte_mark(c2)) throw std::runtime_error("Malformed utf-8 sequence");
+ if (!has_multibyte_mark(c3)) throw std::runtime_error("Malformed utf-8 sequence");
+ if (!has_multibyte_mark(c4)) throw std::runtime_error("Malformed utf-8 sequence");
+ p+=4;
+ return (c1 & 0007) << 18 | (c2 & 0077) << 12 | (c3 & 0077) << 6 | (c4 & 0077);
+ }
+ throw std::runtime_error("Malformed utf-8 sequence");
+}
+
+} // namespace