commit 2957968afc54086fc779a2c88954f47d265474ef Author: Alessandro Mauri Date: Sun Jul 4 14:56:05 2021 +0200 initial commit diff --git a/.gitattributes b/.gitattributes new file mode 100644 index 0000000..bd2cfac --- /dev/null +++ b/.gitattributes @@ -0,0 +1,3 @@ +winlib/* linguist-vendored +src/lib/* linguist-vendored +icon.inl linguist-vendored diff --git a/.github/FUNDING.yml b/.github/FUNDING.yml new file mode 100644 index 0000000..375655a --- /dev/null +++ b/.github/FUNDING.yml @@ -0,0 +1,3 @@ +# These are supported funding model platforms + +github: rxi diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..afcbc8c --- /dev/null +++ b/.gitignore @@ -0,0 +1,3 @@ +**/*.o +lite +TODO diff --git a/LICENSE b/LICENSE new file mode 100644 index 0000000..39ddd05 --- /dev/null +++ b/LICENSE @@ -0,0 +1,19 @@ +Copyright (c) 2020 rxi + +Permission is hereby granted, free of charge, to any person obtaining a copy of +this software and associated documentation files (the "Software"), to deal in +the Software without restriction, including without limitation the rights to +use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies +of the Software, and to permit persons to whom the Software is furnished to do +so, subject to the following conditions: + +The above copyright notice and this permission notice shall be included in all +copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +SOFTWARE. diff --git a/README.md b/README.md new file mode 100644 index 0000000..6081e8b --- /dev/null +++ b/README.md @@ -0,0 +1,41 @@ +# lite +![screenshot](https://user-images.githubusercontent.com/3920290/81471642-6c165880-91ea-11ea-8cd1-fae7ae8f0bc4.png) + +A lightweight text editor written in Lua + +* **[Get lite](https://github.com/rxi/lite/releases/latest)** — Download + for Windows and Linux +* **[Get started](doc/usage.md)** — A quick overview on how to get started +* **[Get plugins](https://github.com/rxi/lite-plugins)** — Add additional + functionality +* **[Get color themes](https://github.com/rxi/lite-colors)** — Add additional colors + themes + +## Overview +lite is a lightweight text editor written mostly in Lua — it aims to provide +something practical, pretty, *small* and fast, implemented as simply as +possible; easy to modify and extend, or to use without doing either. + +## Customization +Additional functionality can be added through plugins which are available from +the [plugins repository](https://github.com/rxi/lite-plugins); additional color +themes can be found in the [colors repository](https://github.com/rxi/lite-colors). +The editor can be customized by making changes to the +[user module](data/user/init.lua). + +## Building +You can build the project yourself on Linux using the `build.sh` script +or on Windows using the `build.bat` script *([MinGW](https://nuwen.net/mingw.html) is required)*. +Note that the project does not need to be rebuilt if you are only making changes +to the Lua portion of the code. + +## Contributing +Any additional functionality that can be added through a plugin should be done +so as a plugin, after which a pull request to the +[plugins repository](https://github.com/rxi/lite-plugins) can be made. In hopes +of remaining lightweight, pull requests adding additional functionality to the +core will likely not be merged. Bug reports and bug fixes are welcome. + +## License +This project is free software; you can redistribute it and/or modify it under +the terms of the MIT license. See [LICENSE](LICENSE) for details. diff --git a/data/core/command.lua b/data/core/command.lua new file mode 100644 index 0000000..5164a13 --- /dev/null +++ b/data/core/command.lua @@ -0,0 +1,69 @@ +local core = require "core" +local command = {} + +command.map = {} + +local always_true = function() return true end + + +function command.add(predicate, map) + predicate = predicate or always_true + if type(predicate) == "string" then + predicate = require(predicate) + end + if type(predicate) == "table" then + local class = predicate + predicate = function() return core.active_view:is(class) end + end + for name, fn in pairs(map) do + assert(not command.map[name], "command already exists: " .. name) + command.map[name] = { predicate = predicate, perform = fn } + end +end + + +local function capitalize_first(str) + return str:sub(1, 1):upper() .. str:sub(2) +end + +function command.prettify_name(name) + return name:gsub(":", ": "):gsub("-", " "):gsub("%S+", capitalize_first) +end + + +function command.get_all_valid() + local res = {} + for name, cmd in pairs(command.map) do + if cmd.predicate() then + table.insert(res, name) + end + end + return res +end + + +local function perform(name) + local cmd = command.map[name] + if cmd and cmd.predicate() then + cmd.perform() + return true + end + return false +end + + +function command.perform(...) + local ok, res = core.try(perform, ...) + return not ok or res +end + + +function command.add_defaults() + local reg = { "core", "root", "command", "doc", "findreplace" } + for _, name in ipairs(reg) do + require("core.commands." .. name) + end +end + + +return command diff --git a/data/core/commands/command.lua b/data/core/commands/command.lua new file mode 100644 index 0000000..f0b8007 --- /dev/null +++ b/data/core/commands/command.lua @@ -0,0 +1,30 @@ +local core = require "core" +local command = require "core.command" +local CommandView = require "core.commandview" + +local function has_commandview() + return core.active_view:is(CommandView) +end + + +command.add(has_commandview, { + ["command:submit"] = function() + core.active_view:submit() + end, + + ["command:complete"] = function() + core.active_view:complete() + end, + + ["command:escape"] = function() + core.active_view:exit() + end, + + ["command:select-previous"] = function() + core.active_view:move_suggestion_idx(1) + end, + + ["command:select-next"] = function() + core.active_view:move_suggestion_idx(-1) + end, +}) diff --git a/data/core/commands/core.lua b/data/core/commands/core.lua new file mode 100644 index 0000000..dbe08a4 --- /dev/null +++ b/data/core/commands/core.lua @@ -0,0 +1,101 @@ +local core = require "core" +local common = require "core.common" +local command = require "core.command" +local keymap = require "core.keymap" +local LogView = require "core.logview" + + +local fullscreen = false + +command.add(nil, { + ["core:quit"] = function() + core.quit() + end, + + ["core:force-quit"] = function() + core.quit(true) + end, + + ["core:toggle-fullscreen"] = function() + fullscreen = not fullscreen + system.set_window_mode(fullscreen and "fullscreen" or "normal") + end, + + ["core:reload-module"] = function() + core.command_view:enter("Reload Module", function(text, item) + local text = item and item.text or text + core.reload_module(text) + core.log("Reloaded module %q", text) + end, function(text) + local items = {} + for name in pairs(package.loaded) do + table.insert(items, name) + end + return common.fuzzy_match(items, text) + end) + end, + + ["core:find-command"] = function() + local commands = command.get_all_valid() + core.command_view:enter("Do Command", function(text, item) + if item then + command.perform(item.command) + end + end, function(text) + local res = common.fuzzy_match(commands, text) + for i, name in ipairs(res) do + res[i] = { + text = command.prettify_name(name), + info = keymap.get_binding(name), + command = name, + } + end + return res + end) + end, + + ["core:find-file"] = function() + core.command_view:enter("Open File From Project", function(text, item) + text = item and item.text or text + core.root_view:open_doc(core.open_doc(text)) + end, function(text) + local files = {} + for _, item in pairs(core.project_files) do + if item.type == "file" then + table.insert(files, item.filename) + end + end + return common.fuzzy_match(files, text) + end) + end, + + ["core:new-doc"] = function() + core.root_view:open_doc(core.open_doc()) + end, + + ["core:open-file"] = function() + core.command_view:enter("Open File", function(text) + core.root_view:open_doc(core.open_doc(text)) + end, common.path_suggest) + end, + + ["core:open-log"] = function() + local node = core.root_view:get_active_node() + node:add_view(LogView()) + end, + + ["core:open-user-module"] = function() + core.root_view:open_doc(core.open_doc(EXEDIR .. "/data/user/init.lua")) + end, + + ["core:open-project-module"] = function() + local filename = ".lite_project.lua" + if system.get_file_info(filename) then + core.root_view:open_doc(core.open_doc(filename)) + else + local doc = core.open_doc() + core.root_view:open_doc(doc) + doc:save(filename) + end + end, +}) diff --git a/data/core/commands/doc.lua b/data/core/commands/doc.lua new file mode 100644 index 0000000..0a4ee42 --- /dev/null +++ b/data/core/commands/doc.lua @@ -0,0 +1,365 @@ +local core = require "core" +local command = require "core.command" +local common = require "core.common" +local config = require "core.config" +local translate = require "core.doc.translate" +local DocView = require "core.docview" + + +local function dv() + return core.active_view +end + + +local function doc() + return core.active_view.doc +end + + +local function get_indent_string() + if config.tab_type == "hard" then + return "\t" + end + return string.rep(" ", config.indent_size) +end + + +local function insert_at_start_of_selected_lines(text, skip_empty) + local line1, col1, line2, col2, swap = doc():get_selection(true) + for line = line1, line2 do + local line_text = doc().lines[line] + if (not skip_empty or line_text:find("%S")) then + doc():insert(line, 1, text) + end + end + doc():set_selection(line1, col1 + #text, line2, col2 + #text, swap) +end + + +local function remove_from_start_of_selected_lines(text, skip_empty) + local line1, col1, line2, col2, swap = doc():get_selection(true) + for line = line1, line2 do + local line_text = doc().lines[line] + if line_text:sub(1, #text) == text + and (not skip_empty or line_text:find("%S")) + then + doc():remove(line, 1, line, #text + 1) + end + end + doc():set_selection(line1, col1 - #text, line2, col2 - #text, swap) +end + + +local function append_line_if_last_line(line) + if line >= #doc().lines then + doc():insert(line, math.huge, "\n") + end +end + + +local function save(filename) + doc():save(filename) + core.log("Saved \"%s\"", doc().filename) +end + + +local commands = { + ["doc:undo"] = function() + doc():undo() + end, + + ["doc:redo"] = function() + doc():redo() + end, + + ["doc:cut"] = function() + if doc():has_selection() then + local text = doc():get_text(doc():get_selection()) + system.set_clipboard(text) + doc():delete_to(0) + end + end, + + ["doc:copy"] = function() + if doc():has_selection() then + local text = doc():get_text(doc():get_selection()) + system.set_clipboard(text) + end + end, + + ["doc:paste"] = function() + doc():text_input(system.get_clipboard():gsub("\r", "")) + end, + + ["doc:newline"] = function() + local line, col = doc():get_selection() + local indent = doc().lines[line]:match("^[\t ]*") + if col <= #indent then + indent = indent:sub(#indent + 2 - col) + end + doc():text_input("\n" .. indent) + end, + + ["doc:newline-below"] = function() + local line = doc():get_selection() + local indent = doc().lines[line]:match("^[\t ]*") + doc():insert(line, math.huge, "\n" .. indent) + doc():set_selection(line + 1, math.huge) + end, + + ["doc:newline-above"] = function() + local line = doc():get_selection() + local indent = doc().lines[line]:match("^[\t ]*") + doc():insert(line, 1, indent .. "\n") + doc():set_selection(line, math.huge) + end, + + ["doc:delete"] = function() + local line, col = doc():get_selection() + if not doc():has_selection() and doc().lines[line]:find("^%s*$", col) then + doc():remove(line, col, line, math.huge) + end + doc():delete_to(translate.next_char) + end, + + ["doc:backspace"] = function() + local line, col = doc():get_selection() + if not doc():has_selection() then + local text = doc():get_text(line, 1, line, col) + if #text >= config.indent_size and text:find("^ *$") then + doc():delete_to(0, -config.indent_size) + return + end + end + doc():delete_to(translate.previous_char) + end, + + ["doc:select-all"] = function() + doc():set_selection(1, 1, math.huge, math.huge) + end, + + ["doc:select-none"] = function() + local line, col = doc():get_selection() + doc():set_selection(line, col) + end, + + ["doc:select-lines"] = function() + local line1, _, line2, _, swap = doc():get_selection(true) + append_line_if_last_line(line2) + doc():set_selection(line1, 1, line2 + 1, 1, swap) + end, + + ["doc:select-word"] = function() + local line1, col1 = doc():get_selection(true) + local line1, col1 = translate.start_of_word(doc(), line1, col1) + local line2, col2 = translate.end_of_word(doc(), line1, col1) + doc():set_selection(line2, col2, line1, col1) + end, + + ["doc:join-lines"] = function() + local line1, _, line2 = doc():get_selection(true) + if line1 == line2 then line2 = line2 + 1 end + local text = doc():get_text(line1, 1, line2, math.huge) + text = text:gsub("(.-)\n[\t ]*", function(x) + return x:find("^%s*$") and x or x .. " " + end) + doc():insert(line1, 1, text) + doc():remove(line1, #text + 1, line2, math.huge) + if doc():has_selection() then + doc():set_selection(line1, math.huge) + end + end, + + ["doc:indent"] = function() + local text = get_indent_string() + if doc():has_selection() then + insert_at_start_of_selected_lines(text) + else + doc():text_input(text) + end + end, + + ["doc:unindent"] = function() + local text = get_indent_string() + remove_from_start_of_selected_lines(text) + end, + + ["doc:duplicate-lines"] = function() + local line1, col1, line2, col2, swap = doc():get_selection(true) + append_line_if_last_line(line2) + local text = doc():get_text(line1, 1, line2 + 1, 1) + doc():insert(line2 + 1, 1, text) + local n = line2 - line1 + 1 + doc():set_selection(line1 + n, col1, line2 + n, col2, swap) + end, + + ["doc:delete-lines"] = function() + local line1, col1, line2 = doc():get_selection(true) + append_line_if_last_line(line2) + doc():remove(line1, 1, line2 + 1, 1) + doc():set_selection(line1, col1) + end, + + ["doc:move-lines-up"] = function() + local line1, col1, line2, col2, swap = doc():get_selection(true) + append_line_if_last_line(line2) + if line1 > 1 then + local text = doc().lines[line1 - 1] + doc():insert(line2 + 1, 1, text) + doc():remove(line1 - 1, 1, line1, 1) + doc():set_selection(line1 - 1, col1, line2 - 1, col2, swap) + end + end, + + ["doc:move-lines-down"] = function() + local line1, col1, line2, col2, swap = doc():get_selection(true) + append_line_if_last_line(line2 + 1) + if line2 < #doc().lines then + local text = doc().lines[line2 + 1] + doc():remove(line2 + 1, 1, line2 + 2, 1) + doc():insert(line1, 1, text) + doc():set_selection(line1 + 1, col1, line2 + 1, col2, swap) + end + end, + + ["doc:toggle-line-comments"] = function() + local comment = doc().syntax.comment + if not comment then return end + local comment_text = comment .. " " + local line1, _, line2 = doc():get_selection(true) + local uncomment = true + for line = line1, line2 do + local text = doc().lines[line] + if text:find("%S") and text:find(comment_text, 1, true) ~= 1 then + uncomment = false + end + end + if uncomment then + remove_from_start_of_selected_lines(comment_text, true) + else + insert_at_start_of_selected_lines(comment_text, true) + end + end, + + ["doc:upper-case"] = function() + doc():replace(string.upper) + end, + + ["doc:lower-case"] = function() + doc():replace(string.lower) + end, + + ["doc:go-to-line"] = function() + local dv = dv() + + local items + local function init_items() + if items then return end + items = {} + local mt = { __tostring = function(x) return x.text end } + for i, line in ipairs(dv.doc.lines) do + local item = { text = line:sub(1, -2), line = i, info = "line: " .. i } + table.insert(items, setmetatable(item, mt)) + end + end + + core.command_view:enter("Go To Line", function(text, item) + local line = item and item.line or tonumber(text) + if not line then + core.error("Invalid line number or unmatched string") + return + end + dv.doc:set_selection(line, 1 ) + dv:scroll_to_line(line, true) + + end, function(text) + if not text:find("^%d*$") then + init_items() + return common.fuzzy_match(items, text) + end + end) + end, + + ["doc:toggle-line-ending"] = function() + doc().crlf = not doc().crlf + end, + + ["doc:save-as"] = function() + if doc().filename then + core.command_view:set_text(doc().filename) + end + core.command_view:enter("Save As", function(filename) + save(filename) + end, common.path_suggest) + end, + + ["doc:save"] = function() + if doc().filename then + save() + else + command.perform("doc:save-as") + end + end, + + ["doc:rename"] = function() + local old_filename = doc().filename + if not old_filename then + core.error("Cannot rename unsaved doc") + return + end + core.command_view:set_text(old_filename) + core.command_view:enter("Rename", function(filename) + doc():save(filename) + core.log("Renamed \"%s\" to \"%s\"", old_filename, filename) + if filename ~= old_filename then + os.remove(old_filename) + end + end, common.path_suggest) + end, +} + + +local translations = { + ["previous-char"] = translate.previous_char, + ["next-char"] = translate.next_char, + ["previous-word-start"] = translate.previous_word_start, + ["next-word-end"] = translate.next_word_end, + ["previous-block-start"] = translate.previous_block_start, + ["next-block-end"] = translate.next_block_end, + ["start-of-doc"] = translate.start_of_doc, + ["end-of-doc"] = translate.end_of_doc, + ["start-of-line"] = translate.start_of_line, + ["end-of-line"] = translate.end_of_line, + ["start-of-word"] = translate.start_of_word, + ["end-of-word"] = translate.end_of_word, + ["previous-line"] = DocView.translate.previous_line, + ["next-line"] = DocView.translate.next_line, + ["previous-page"] = DocView.translate.previous_page, + ["next-page"] = DocView.translate.next_page, +} + +for name, fn in pairs(translations) do + commands["doc:move-to-" .. name] = function() doc():move_to(fn, dv()) end + commands["doc:select-to-" .. name] = function() doc():select_to(fn, dv()) end + commands["doc:delete-to-" .. name] = function() doc():delete_to(fn, dv()) end +end + +commands["doc:move-to-previous-char"] = function() + if doc():has_selection() then + local line, col = doc():get_selection(true) + doc():set_selection(line, col) + else + doc():move_to(translate.previous_char) + end +end + +commands["doc:move-to-next-char"] = function() + if doc():has_selection() then + local _, _, line, col = doc():get_selection(true) + doc():set_selection(line, col) + else + doc():move_to(translate.next_char) + end +end + +command.add("core.docview", commands) diff --git a/data/core/commands/findreplace.lua b/data/core/commands/findreplace.lua new file mode 100644 index 0000000..937c410 --- /dev/null +++ b/data/core/commands/findreplace.lua @@ -0,0 +1,170 @@ +local core = require "core" +local command = require "core.command" +local config = require "core.config" +local search = require "core.doc.search" +local DocView = require "core.docview" + +local max_previous_finds = 50 + + +local function doc() + return core.active_view.doc +end + + +local previous_finds +local last_doc +local last_fn, last_text + + +local function push_previous_find(doc, sel) + if last_doc ~= doc then + last_doc = doc + previous_finds = {} + end + if #previous_finds >= max_previous_finds then + table.remove(previous_finds, 1) + end + table.insert(previous_finds, sel or { doc:get_selection() }) +end + + +local function find(label, search_fn) + local dv = core.active_view + local sel = { dv.doc:get_selection() } + local text = dv.doc:get_text(table.unpack(sel)) + local found = false + + core.command_view:set_text(text, true) + + core.command_view:enter(label, function(text) + if found then + last_fn, last_text = search_fn, text + previous_finds = {} + push_previous_find(dv.doc, sel) + else + core.error("Couldn't find %q", text) + dv.doc:set_selection(table.unpack(sel)) + dv:scroll_to_make_visible(sel[1], sel[2]) + end + + end, function(text) + local ok, line1, col1, line2, col2 = pcall(search_fn, dv.doc, sel[1], sel[2], text) + if ok and line1 and text ~= "" then + dv.doc:set_selection(line2, col2, line1, col1) + dv:scroll_to_line(line2, true) + found = true + else + dv.doc:set_selection(table.unpack(sel)) + found = false + end + + end, function(explicit) + if explicit then + dv.doc:set_selection(table.unpack(sel)) + dv:scroll_to_make_visible(sel[1], sel[2]) + end + end) +end + + +local function replace(kind, default, fn) + core.command_view:set_text(default, true) + + core.command_view:enter("Find To Replace " .. kind, function(old) + core.command_view:set_text(old, true) + + local s = string.format("Replace %s %q With", kind, old) + core.command_view:enter(s, function(new) + local n = doc():replace(function(text) + return fn(text, old, new) + end) + core.log("Replaced %d instance(s) of %s %q with %q", n, kind, old, new) + end) + end) +end + + +local function has_selection() + return core.active_view:is(DocView) + and core.active_view.doc:has_selection() +end + +command.add(has_selection, { + ["find-replace:select-next"] = function() + local l1, c1, l2, c2 = doc():get_selection(true) + local text = doc():get_text(l1, c1, l2, c2) + local l1, c1, l2, c2 = search.find(doc(), l2, c2, text, { wrap = true }) + if l2 then doc():set_selection(l2, c2, l1, c1) end + end +}) + +command.add("core.docview", { + ["find-replace:find"] = function() + find("Find Text", function(doc, line, col, text) + local opt = { wrap = true, no_case = true } + return search.find(doc, line, col, text, opt) + end) + end, + + ["find-replace:find-pattern"] = function() + find("Find Text Pattern", function(doc, line, col, text) + local opt = { wrap = true, no_case = true, pattern = true } + return search.find(doc, line, col, text, opt) + end) + end, + + ["find-replace:repeat-find"] = function() + if not last_fn then + core.error("No find to continue from") + else + local line, col = doc():get_selection() + local line1, col1, line2, col2 = last_fn(doc(), line, col, last_text) + if line1 then + push_previous_find(doc()) + doc():set_selection(line2, col2, line1, col1) + core.active_view:scroll_to_line(line2, true) + end + end + end, + + ["find-replace:previous-find"] = function() + local sel = table.remove(previous_finds) + if not sel or doc() ~= last_doc then + core.error("No previous finds") + return + end + doc():set_selection(table.unpack(sel)) + core.active_view:scroll_to_line(sel[3], true) + end, + + ["find-replace:replace"] = function() + replace("Text", "", function(text, old, new) + return text:gsub(old:gsub("%W", "%%%1"), new:gsub("%%", "%%%%"), nil) + end) + end, + + ["find-replace:replace-pattern"] = function() + replace("Pattern", "", function(text, old, new) + return text:gsub(old, new) + end) + end, + + ["find-replace:replace-symbol"] = function() + local first = "" + if doc():has_selection() then + local text = doc():get_text(doc():get_selection()) + first = text:match(config.symbol_pattern) or "" + end + replace("Symbol", first, function(text, old, new) + local n = 0 + local res = text:gsub(config.symbol_pattern, function(sym) + if old == sym then + n = n + 1 + return new + end + end) + return res, n + end) + end, +}) diff --git a/data/core/commands/root.lua b/data/core/commands/root.lua new file mode 100644 index 0000000..58c83e2 --- /dev/null +++ b/data/core/commands/root.lua @@ -0,0 +1,105 @@ +local core = require "core" +local style = require "core.style" +local DocView = require "core.docview" +local command = require "core.command" +local common = require "core.common" + + +local t = { + ["root:close"] = function() + local node = core.root_view:get_active_node() + node:close_active_view(core.root_view.root_node) + end, + + ["root:switch-to-previous-tab"] = function() + local node = core.root_view:get_active_node() + local idx = node:get_view_idx(core.active_view) + idx = idx - 1 + if idx < 1 then idx = #node.views end + node:set_active_view(node.views[idx]) + end, + + ["root:switch-to-next-tab"] = function() + local node = core.root_view:get_active_node() + local idx = node:get_view_idx(core.active_view) + idx = idx + 1 + if idx > #node.views then idx = 1 end + node:set_active_view(node.views[idx]) + end, + + ["root:move-tab-left"] = function() + local node = core.root_view:get_active_node() + local idx = node:get_view_idx(core.active_view) + if idx > 1 then + table.remove(node.views, idx) + table.insert(node.views, idx - 1, core.active_view) + end + end, + + ["root:move-tab-right"] = function() + local node = core.root_view:get_active_node() + local idx = node:get_view_idx(core.active_view) + if idx < #node.views then + table.remove(node.views, idx) + table.insert(node.views, idx + 1, core.active_view) + end + end, + + ["root:shrink"] = function() + local node = core.root_view:get_active_node() + local parent = node:get_parent_node(core.root_view.root_node) + local n = (parent.a == node) and -0.1 or 0.1 + parent.divider = common.clamp(parent.divider + n, 0.1, 0.9) + end, + + ["root:grow"] = function() + local node = core.root_view:get_active_node() + local parent = node:get_parent_node(core.root_view.root_node) + local n = (parent.a == node) and 0.1 or -0.1 + parent.divider = common.clamp(parent.divider + n, 0.1, 0.9) + end, +} + + +for i = 1, 9 do + t["root:switch-to-tab-" .. i] = function() + local node = core.root_view:get_active_node() + local view = node.views[i] + if view then + node:set_active_view(view) + end + end +end + + +for _, dir in ipairs { "left", "right", "up", "down" } do + t["root:split-" .. dir] = function() + local node = core.root_view:get_active_node() + local av = node.active_view + node:split(dir) + if av:is(DocView) then + core.root_view:open_doc(av.doc) + end + end + + t["root:switch-to-" .. dir] = function() + local node = core.root_view:get_active_node() + local x, y + if dir == "left" or dir == "right" then + y = node.position.y + node.size.y / 2 + x = node.position.x + (dir == "left" and -1 or node.size.x + style.divider_size) + else + x = node.position.x + node.size.x / 2 + y = node.position.y + (dir == "up" and -1 or node.size.y + style.divider_size) + end + local node = core.root_view.root_node:get_child_overlapping_point(x, y) + if not node:get_locked_size() then + core.set_active_view(node.active_view) + end + end +end + +command.add(function() + local node = core.root_view:get_active_node() + return not node:get_locked_size() +end, t) diff --git a/data/core/commandview.lua b/data/core/commandview.lua new file mode 100644 index 0000000..3fbb1ff --- /dev/null +++ b/data/core/commandview.lua @@ -0,0 +1,256 @@ +local core = require "core" +local common = require "core.common" +local style = require "core.style" +local Doc = require "core.doc" +local DocView = require "core.docview" +local View = require "core.view" + + +local SingleLineDoc = Doc:extend() + +function SingleLineDoc:insert(line, col, text) + SingleLineDoc.super.insert(self, line, col, text:gsub("\n", "")) +end + + +local CommandView = DocView:extend() + +local max_suggestions = 10 + +local noop = function() end + +local default_state = { + submit = noop, + suggest = noop, + cancel = noop, +} + + +function CommandView:new() + CommandView.super.new(self, SingleLineDoc()) + self.suggestion_idx = 1 + self.suggestions = {} + self.suggestions_height = 0 + self.last_change_id = 0 + self.gutter_width = 0 + self.gutter_text_brightness = 0 + self.selection_offset = 0 + self.state = default_state + self.font = "font" + self.size.y = 0 + self.label = "" +end + + +function CommandView:get_name() + return View.get_name(self) +end + + +function CommandView:get_line_screen_position() + local x = CommandView.super.get_line_screen_position(self, 1) + local _, y = self:get_content_offset() + local lh = self:get_line_height() + return x, y + (self.size.y - lh) / 2 +end + + +function CommandView:get_scrollable_size() + return 0 +end + + +function CommandView:scroll_to_make_visible() + -- no-op function to disable this functionality +end + + +function CommandView:get_text() + return self.doc:get_text(1, 1, 1, math.huge) +end + + +function CommandView:set_text(text, select) + self.doc:remove(1, 1, math.huge, math.huge) + self.doc:text_input(text) + if select then + self.doc:set_selection(math.huge, math.huge, 1, 1) + end +end + + +function CommandView:move_suggestion_idx(dir) + local n = self.suggestion_idx + dir + self.suggestion_idx = common.clamp(n, 1, #self.suggestions) + self:complete() + self.last_change_id = self.doc:get_change_id() +end + + +function CommandView:complete() + if #self.suggestions > 0 then + self:set_text(self.suggestions[self.suggestion_idx].text) + end +end + + +function CommandView:submit() + local suggestion = self.suggestions[self.suggestion_idx] + local text = self:get_text() + local submit = self.state.submit + self:exit(true) + submit(text, suggestion) +end + + +function CommandView:enter(text, submit, suggest, cancel) + if self.state ~= default_state then + return + end + self.state = { + submit = submit or noop, + suggest = suggest or noop, + cancel = cancel or noop, + } + core.set_active_view(self) + self:update_suggestions() + self.gutter_text_brightness = 100 + self.label = text .. ": " +end + + +function CommandView:exit(submitted, inexplicit) + if core.active_view == self then + core.set_active_view(core.last_active_view) + end + local cancel = self.state.cancel + self.state = default_state + self.doc:reset() + self.suggestions = {} + if not submitted then cancel(not inexplicit) end +end + + +function CommandView:get_gutter_width() + return self.gutter_width +end + + +function CommandView:get_suggestion_line_height() + return self:get_font():get_height() + style.padding.y +end + + +function CommandView:update_suggestions() + local t = self.state.suggest(self:get_text()) or {} + local res = {} + for i, item in ipairs(t) do + if i == max_suggestions then + break + end + if type(item) == "string" then + item = { text = item } + end + res[i] = item + end + self.suggestions = res + self.suggestion_idx = 1 +end + + +function CommandView:update() + CommandView.super.update(self) + + if core.active_view ~= self and self.state ~= default_state then + self:exit(false, true) + end + + -- update suggestions if text has changed + if self.last_change_id ~= self.doc:get_change_id() then + self:update_suggestions() + self.last_change_id = self.doc:get_change_id() + end + + -- update gutter text color brightness + self:move_towards("gutter_text_brightness", 0, 0.1) + + -- update gutter width + local dest = self:get_font():get_width(self.label) + style.padding.x + if self.size.y <= 0 then + self.gutter_width = dest + else + self:move_towards("gutter_width", dest) + end + + -- update suggestions box height + local lh = self:get_suggestion_line_height() + local dest = #self.suggestions * lh + self:move_towards("suggestions_height", dest) + + -- update suggestion cursor offset + local dest = self.suggestion_idx * self:get_suggestion_line_height() + self:move_towards("selection_offset", dest) + + -- update size based on whether this is the active_view + local dest = 0 + if self == core.active_view then + dest = style.font:get_height() + style.padding.y * 2 + end + self:move_towards(self.size, "y", dest) +end + + +function CommandView:draw_line_highlight() + -- no-op function to disable this functionality +end + + +function CommandView:draw_line_gutter(idx, x, y) + local yoffset = self:get_line_text_y_offset() + local pos = self.position + local color = common.lerp(style.text, style.accent, self.gutter_text_brightness / 100) + core.push_clip_rect(pos.x, pos.y, self:get_gutter_width(), self.size.y) + x = x + style.padding.x + renderer.draw_text(self:get_font(), self.label, x, y + yoffset, color) + core.pop_clip_rect() +end + + +local function draw_suggestions_box(self) + local lh = self:get_suggestion_line_height() + local dh = style.divider_size + local x, _ = self:get_line_screen_position() + local h = math.ceil(self.suggestions_height) + local rx, ry, rw, rh = self.position.x, self.position.y - h - dh, self.size.x, h + + -- draw suggestions background + if #self.suggestions > 0 then + renderer.draw_rect(rx, ry, rw, rh, style.background3) + renderer.draw_rect(rx, ry - dh, rw, dh, style.divider) + local y = self.position.y - self.selection_offset - dh + renderer.draw_rect(rx, y, rw, lh, style.line_highlight) + end + + -- draw suggestion text + core.push_clip_rect(rx, ry, rw, rh) + for i, item in ipairs(self.suggestions) do + local color = (i == self.suggestion_idx) and style.accent or style.text + local y = self.position.y - i * lh - dh + common.draw_text(self:get_font(), color, item.text, nil, x, y, 0, lh) + + if item.info then + local w = self.size.x - x - style.padding.x + common.draw_text(self:get_font(), style.dim, item.info, "right", x, y, w, lh) + end + end + core.pop_clip_rect() +end + + +function CommandView:draw() + CommandView.super.draw(self) + core.root_view:defer_draw(draw_suggestions_box, self) +end + + +return CommandView diff --git a/data/core/common.lua b/data/core/common.lua new file mode 100644 index 0000000..1fc91b8 --- /dev/null +++ b/data/core/common.lua @@ -0,0 +1,140 @@ +local common = {} + + +function common.is_utf8_cont(char) + local byte = char:byte() + return byte >= 0x80 and byte < 0xc0 +end + + +function common.utf8_chars(text) + return text:gmatch("[\0-\x7f\xc2-\xf4][\x80-\xbf]*") +end + + +function common.clamp(n, lo, hi) + return math.max(math.min(n, hi), lo) +end + + +function common.round(n) + return n >= 0 and math.floor(n + 0.5) or math.ceil(n - 0.5) +end + + +function common.lerp(a, b, t) + if type(a) ~= "table" then + return a + (b - a) * t + end + local res = {} + for k, v in pairs(b) do + res[k] = common.lerp(a[k], v, t) + end + return res +end + + +function common.color(str) + local r, g, b, a = str:match("#(%x%x)(%x%x)(%x%x)") + if r then + r = tonumber(r, 16) + g = tonumber(g, 16) + b = tonumber(b, 16) + a = 1 + elseif str:match("rgba?%s*%([%d%s%.,]+%)") then + local f = str:gmatch("[%d.]+") + r = (f() or 0) + g = (f() or 0) + b = (f() or 0) + a = f() or 1 + else + error(string.format("bad color string '%s'", str)) + end + return r, g, b, a * 0xff +end + + +local function compare_score(a, b) + return a.score > b.score +end + +local function fuzzy_match_items(items, needle) + local res = {} + for _, item in ipairs(items) do + local score = system.fuzzy_match(tostring(item), needle) + if score then + table.insert(res, { text = item, score = score }) + end + end + table.sort(res, compare_score) + for i, item in ipairs(res) do + res[i] = item.text + end + return res +end + + +function common.fuzzy_match(haystack, needle) + if type(haystack) == "table" then + return fuzzy_match_items(haystack, needle) + end + return system.fuzzy_match(haystack, needle) +end + + +function common.path_suggest(text) + local path, name = text:match("^(.-)([^/\\]*)$") + local files = system.list_dir(path == "" and "." or path) or {} + local res = {} + for _, file in ipairs(files) do + file = path .. file + local info = system.get_file_info(file) + if info then + if info.type == "dir" then + file = file .. PATHSEP + end + if file:lower():find(text:lower(), nil, true) == 1 then + table.insert(res, file) + end + end + end + return res +end + + +function common.match_pattern(text, pattern, ...) + if type(pattern) == "string" then + return text:find(pattern, ...) + end + for _, p in ipairs(pattern) do + local s, e = common.match_pattern(text, p, ...) + if s then return s, e end + end + return false +end + + +function common.draw_text(font, color, text, align, x,y,w,h) + local tw, th = font:get_width(text), font:get_height(text) + if align == "center" then + x = x + (w - tw) / 2 + elseif align == "right" then + x = x + (w - tw) + end + y = common.round(y + (h - th) / 2) + return renderer.draw_text(font, text, x, y, color), y + th +end + + +function common.bench(name, fn, ...) + local start = system.get_time() + local res = fn(...) + local t = system.get_time() - start + local ms = t * 1000 + local per = (t / (1 / 60)) * 100 + print(string.format("*** %-16s : %8.3fms %6.2f%%", name, ms, per)) + return res +end + + +return common diff --git a/data/core/config.lua b/data/core/config.lua new file mode 100644 index 0000000..e81a550 --- /dev/null +++ b/data/core/config.lua @@ -0,0 +1,20 @@ +local config = {} + +config.project_scan_rate = 5 +config.fps = 60 +config.max_log_items = 80 +config.message_timeout = 3 +config.mouse_wheel_scroll = 50 * SCALE +config.file_size_limit = 10 +config.ignore_files = "^%." +config.symbol_pattern = "[%a_][%w_]*" +config.non_word_chars = " \t\n/\\()\"':,.;<>~!@#$%^&*|+=[]{}`?-" +config.undo_merge_timeout = 0.3 +config.max_undos = 10000 +config.highlight_current_line = true +config.line_height = 1.2 +config.indent_size = 8 +config.tab_type = "hard" +config.line_limit = 80 + +return config diff --git a/data/core/doc/highlighter.lua b/data/core/doc/highlighter.lua new file mode 100644 index 0000000..e7650d0 --- /dev/null +++ b/data/core/doc/highlighter.lua @@ -0,0 +1,80 @@ +local core = require "core" +local config = require "core.config" +local tokenizer = require "core.tokenizer" +local Object = require "core.object" + + +local Highlighter = Object:extend() + + +function Highlighter:new(doc) + self.doc = doc + self:reset() + + -- init incremental syntax highlighting + core.add_thread(function() + while true do + if self.first_invalid_line > self.max_wanted_line then + self.max_wanted_line = 0 + coroutine.yield(1 / config.fps) + + else + local max = math.min(self.first_invalid_line + 40, self.max_wanted_line) + + for i = self.first_invalid_line, max do + local state = (i > 1) and self.lines[i - 1].state + local line = self.lines[i] + if not (line and line.init_state == state) then + self.lines[i] = self:tokenize_line(i, state) + end + end + + self.first_invalid_line = max + 1 + core.redraw = true + coroutine.yield() + end + end + end, self) +end + + +function Highlighter:reset() + self.lines = {} + self.first_invalid_line = 1 + self.max_wanted_line = 0 +end + + +function Highlighter:invalidate(idx) + self.first_invalid_line = math.min(self.first_invalid_line, idx) + self.max_wanted_line = math.min(self.max_wanted_line, #self.doc.lines) +end + + +function Highlighter:tokenize_line(idx, state) + local res = {} + res.init_state = state + res.text = self.doc.lines[idx] + res.tokens, res.state = tokenizer.tokenize(self.doc.syntax, res.text, state) + return res +end + + +function Highlighter:get_line(idx) + local line = self.lines[idx] + if not line or line.text ~= self.doc.lines[idx] then + local prev = self.lines[idx - 1] + line = self:tokenize_line(idx, prev and prev.state) + self.lines[idx] = line + end + self.max_wanted_line = math.max(self.max_wanted_line, idx) + return line +end + + +function Highlighter:each_token(idx) + return tokenizer.each_token(self:get_line(idx).tokens) +end + + +return Highlighter diff --git a/data/core/doc/init.lua b/data/core/doc/init.lua new file mode 100644 index 0000000..83b5fc0 --- /dev/null +++ b/data/core/doc/init.lua @@ -0,0 +1,393 @@ +local Object = require "core.object" +local Highlighter = require "core.doc.highlighter" +local syntax = require "core.syntax" +local config = require "core.config" +local common = require "core.common" + + +local Doc = Object:extend() + + +local function split_lines(text) + local res = {} + for line in (text .. "\n"):gmatch("(.-)\n") do + table.insert(res, line) + end + return res +end + + +local function splice(t, at, remove, insert) + insert = insert or {} + local offset = #insert - remove + local old_len = #t + if offset < 0 then + for i = at - offset, old_len - offset do + t[i + offset] = t[i] + end + elseif offset > 0 then + for i = old_len, at, -1 do + t[i + offset] = t[i] + end + end + for i, item in ipairs(insert) do + t[at + i - 1] = item + end +end + + +function Doc:new(filename) + self:reset() + if filename then + self:load(filename) + end +end + + +function Doc:reset() + self.lines = { "\n" } + self.selection = { a = { line=1, col=1 }, b = { line=1, col=1 } } + self.undo_stack = { idx = 1 } + self.redo_stack = { idx = 1 } + self.clean_change_id = 1 + self.highlighter = Highlighter(self) + self:reset_syntax() +end + + +function Doc:reset_syntax() + local header = self:get_text(1, 1, self:position_offset(1, 1, 128)) + local syn = syntax.get(self.filename or "", header) + if self.syntax ~= syn then + self.syntax = syn + self.highlighter:reset() + end +end + + +function Doc:load(filename) + local fp = assert( io.open(filename, "rb") ) + self:reset() + self.filename = filename + self.lines = {} + for line in fp:lines() do + if line:byte(-1) == 13 then + line = line:sub(1, -2) + self.crlf = true + end + table.insert(self.lines, line .. "\n") + end + if #self.lines == 0 then + table.insert(self.lines, "\n") + end + fp:close() + self:reset_syntax() +end + + +function Doc:save(filename) + filename = filename or assert(self.filename, "no filename set to default to") + local fp = assert( io.open(filename, "wb") ) + for _, line in ipairs(self.lines) do + if self.crlf then line = line:gsub("\n", "\r\n") end + fp:write(line) + end + fp:close() + self.filename = filename or self.filename + self:reset_syntax() + self:clean() +end + + +function Doc:get_name() + return self.filename or "unsaved" +end + + +function Doc:is_dirty() + return self.clean_change_id ~= self:get_change_id() +end + + +function Doc:clean() + self.clean_change_id = self:get_change_id() +end + + +function Doc:get_change_id() + return self.undo_stack.idx +end + + +function Doc:set_selection(line1, col1, line2, col2, swap) + assert(not line2 == not col2, "expected 2 or 4 arguments") + if swap then line1, col1, line2, col2 = line2, col2, line1, col1 end + line1, col1 = self:sanitize_position(line1, col1) + line2, col2 = self:sanitize_position(line2 or line1, col2 or col1) + self.selection.a.line, self.selection.a.col = line1, col1 + self.selection.b.line, self.selection.b.col = line2, col2 +end + + +local function sort_positions(line1, col1, line2, col2) + if line1 > line2 + or line1 == line2 and col1 > col2 then + return line2, col2, line1, col1, true + end + return line1, col1, line2, col2, false +end + + +function Doc:get_selection(sort) + local a, b = self.selection.a, self.selection.b + if sort then + return sort_positions(a.line, a.col, b.line, b.col) + end + return a.line, a.col, b.line, b.col +end + + +function Doc:has_selection() + local a, b = self.selection.a, self.selection.b + return not (a.line == b.line and a.col == b.col) +end + + +function Doc:sanitize_selection() + self:set_selection(self:get_selection()) +end + + +function Doc:sanitize_position(line, col) + line = common.clamp(line, 1, #self.lines) + col = common.clamp(col, 1, #self.lines[line]) + return line, col +end + + +local function position_offset_func(self, line, col, fn, ...) + line, col = self:sanitize_position(line, col) + return fn(self, line, col, ...) +end + + +local function position_offset_byte(self, line, col, offset) + line, col = self:sanitize_position(line, col) + col = col + offset + while line > 1 and col < 1 do + line = line - 1 + col = col + #self.lines[line] + end + while line < #self.lines and col > #self.lines[line] do + col = col - #self.lines[line] + line = line + 1 + end + return self:sanitize_position(line, col) +end + + +local function position_offset_linecol(self, line, col, lineoffset, coloffset) + return self:sanitize_position(line + lineoffset, col + coloffset) +end + + +function Doc:position_offset(line, col, ...) + if type(...) ~= "number" then + return position_offset_func(self, line, col, ...) + elseif select("#", ...) == 1 then + return position_offset_byte(self, line, col, ...) + elseif select("#", ...) == 2 then + return position_offset_linecol(self, line, col, ...) + else + error("bad number of arguments") + end +end + + +function Doc:get_text(line1, col1, line2, col2) + line1, col1 = self:sanitize_position(line1, col1) + line2, col2 = self:sanitize_position(line2, col2) + line1, col1, line2, col2 = sort_positions(line1, col1, line2, col2) + if line1 == line2 then + return self.lines[line1]:sub(col1, col2 - 1) + end + local lines = { self.lines[line1]:sub(col1) } + for i = line1 + 1, line2 - 1 do + table.insert(lines, self.lines[i]) + end + table.insert(lines, self.lines[line2]:sub(1, col2 - 1)) + return table.concat(lines) +end + + +function Doc:get_char(line, col) + line, col = self:sanitize_position(line, col) + return self.lines[line]:sub(col, col) +end + + +local function push_undo(undo_stack, time, type, ...) + undo_stack[undo_stack.idx] = { type = type, time = time, ... } + undo_stack[undo_stack.idx - config.max_undos] = nil + undo_stack.idx = undo_stack.idx + 1 +end + + +local function pop_undo(self, undo_stack, redo_stack) + -- pop command + local cmd = undo_stack[undo_stack.idx - 1] + if not cmd then return end + undo_stack.idx = undo_stack.idx - 1 + + -- handle command + if cmd.type == "insert" then + local line, col, text = table.unpack(cmd) + self:raw_insert(line, col, text, redo_stack, cmd.time) + + elseif cmd.type == "remove" then + local line1, col1, line2, col2 = table.unpack(cmd) + self:raw_remove(line1, col1, line2, col2, redo_stack, cmd.time) + + elseif cmd.type == "selection" then + self.selection.a.line, self.selection.a.col = cmd[1], cmd[2] + self.selection.b.line, self.selection.b.col = cmd[3], cmd[4] + end + + -- if next undo command is within the merge timeout then treat as a single + -- command and continue to execute it + local next = undo_stack[undo_stack.idx - 1] + if next and math.abs(cmd.time - next.time) < config.undo_merge_timeout then + return pop_undo(self, undo_stack, redo_stack) + end +end + + +function Doc:raw_insert(line, col, text, undo_stack, time) + -- split text into lines and merge with line at insertion point + local lines = split_lines(text) + local before = self.lines[line]:sub(1, col - 1) + local after = self.lines[line]:sub(col) + for i = 1, #lines - 1 do + lines[i] = lines[i] .. "\n" + end + lines[1] = before .. lines[1] + lines[#lines] = lines[#lines] .. after + + -- splice lines into line array + splice(self.lines, line, 1, lines) + + -- push undo + local line2, col2 = self:position_offset(line, col, #text) + push_undo(undo_stack, time, "selection", self:get_selection()) + push_undo(undo_stack, time, "remove", line, col, line2, col2) + + -- update highlighter and assure selection is in bounds + self.highlighter:invalidate(line) + self:sanitize_selection() +end + + +function Doc:raw_remove(line1, col1, line2, col2, undo_stack, time) + -- push undo + local text = self:get_text(line1, col1, line2, col2) + push_undo(undo_stack, time, "selection", self:get_selection()) + push_undo(undo_stack, time, "insert", line1, col1, text) + + -- get line content before/after removed text + local before = self.lines[line1]:sub(1, col1 - 1) + local after = self.lines[line2]:sub(col2) + + -- splice line into line array + splice(self.lines, line1, line2 - line1 + 1, { before .. after }) + + -- update highlighter and assure selection is in bounds + self.highlighter:invalidate(line1) + self:sanitize_selection() +end + + +function Doc:insert(line, col, text) + self.redo_stack = { idx = 1 } + line, col = self:sanitize_position(line, col) + self:raw_insert(line, col, text, self.undo_stack, system.get_time()) +end + + +function Doc:remove(line1, col1, line2, col2) + self.redo_stack = { idx = 1 } + line1, col1 = self:sanitize_position(line1, col1) + line2, col2 = self:sanitize_position(line2, col2) + line1, col1, line2, col2 = sort_positions(line1, col1, line2, col2) + self:raw_remove(line1, col1, line2, col2, self.undo_stack, system.get_time()) +end + + +function Doc:undo() + pop_undo(self, self.undo_stack, self.redo_stack) +end + + +function Doc:redo() + pop_undo(self, self.redo_stack, self.undo_stack) +end + + +function Doc:text_input(text) + if self:has_selection() then + self:delete_to() + end + local line, col = self:get_selection() + self:insert(line, col, text) + self:move_to(#text) +end + + +function Doc:replace(fn) + local line1, col1, line2, col2, swap + local had_selection = self:has_selection() + if had_selection then + line1, col1, line2, col2, swap = self:get_selection(true) + else + line1, col1, line2, col2 = 1, 1, #self.lines, #self.lines[#self.lines] + end + local old_text = self:get_text(line1, col1, line2, col2) + local new_text, n = fn(old_text) + if old_text ~= new_text then + self:insert(line2, col2, new_text) + self:remove(line1, col1, line2, col2) + if had_selection then + line2, col2 = self:position_offset(line1, col1, #new_text) + self:set_selection(line1, col1, line2, col2, swap) + end + end + return n +end + + +function Doc:delete_to(...) + local line, col = self:get_selection(true) + if self:has_selection() then + self:remove(self:get_selection()) + else + local line2, col2 = self:position_offset(line, col, ...) + self:remove(line, col, line2, col2) + line, col = sort_positions(line, col, line2, col2) + end + self:set_selection(line, col) +end + + +function Doc:move_to(...) + local line, col = self:get_selection() + self:set_selection(self:position_offset(line, col, ...)) +end + + +function Doc:select_to(...) + local line, col, line2, col2 = self:get_selection() + line, col = self:position_offset(line, col, ...) + self:set_selection(line, col, line2, col2) +end + + +return Doc diff --git a/data/core/doc/search.lua b/data/core/doc/search.lua new file mode 100644 index 0000000..fe57523 --- /dev/null +++ b/data/core/doc/search.lua @@ -0,0 +1,52 @@ +local search = {} + +local default_opt = {} + + +local function pattern_lower(str) + if str:sub(1, 1) == "%" then + return str + end + return str:lower() +end + + +local function init_args(doc, line, col, text, opt) + opt = opt or default_opt + line, col = doc:sanitize_position(line, col) + + if opt.no_case then + if opt.pattern then + text = text:gsub("%%?.", pattern_lower) + else + text = text:lower() + end + end + + return doc, line, col, text, opt +end + + +function search.find(doc, line, col, text, opt) + doc, line, col, text, opt = init_args(doc, line, col, text, opt) + + for line = line, #doc.lines do + local line_text = doc.lines[line] + if opt.no_case then + line_text = line_text:lower() + end + local s, e = line_text:find(text, col, not opt.pattern) + if s then + return line, s, line, e + 1 + end + col = 1 + end + + if opt.wrap then + opt = { no_case = opt.no_case, pattern = opt.pattern } + return search.find(doc, 1, 1, text, opt) + end +end + + +return search diff --git a/data/core/doc/translate.lua b/data/core/doc/translate.lua new file mode 100644 index 0000000..b084e89 --- /dev/null +++ b/data/core/doc/translate.lua @@ -0,0 +1,136 @@ +local common = require "core.common" +local config = require "core.config" + +-- functions for translating a Doc position to another position these functions +-- can be passed to Doc:move_to|select_to|delete_to() + +local translate = {} + + +local function is_non_word(char) + return config.non_word_chars:find(char, nil, true) +end + + +function translate.previous_char(doc, line, col) + repeat + line, col = doc:position_offset(line, col, -1) + until not common.is_utf8_cont(doc:get_char(line, col)) + return line, col +end + + +function translate.next_char(doc, line, col) + repeat + line, col = doc:position_offset(line, col, 1) + until not common.is_utf8_cont(doc:get_char(line, col)) + return line, col +end + + +function translate.previous_word_start(doc, line, col) + local prev + while line > 1 or col > 1 do + local l, c = doc:position_offset(line, col, -1) + local char = doc:get_char(l, c) + if prev and prev ~= char or not is_non_word(char) then + break + end + prev, line, col = char, l, c + end + return translate.start_of_word(doc, line, col) +end + + +function translate.next_word_end(doc, line, col) + local prev + local end_line, end_col = translate.end_of_doc(doc, line, col) + while line < end_line or col < end_col do + local char = doc:get_char(line, col) + if prev and prev ~= char or not is_non_word(char) then + break + end + line, col = doc:position_offset(line, col, 1) + prev = char + end + return translate.end_of_word(doc, line, col) +end + + +function translate.start_of_word(doc, line, col) + while true do + local line2, col2 = doc:position_offset(line, col, -1) + local char = doc:get_char(line2, col2) + if is_non_word(char) + or line == line2 and col == col2 then + break + end + line, col = line2, col2 + end + return line, col +end + + +function translate.end_of_word(doc, line, col) + while true do + local line2, col2 = doc:position_offset(line, col, 1) + local char = doc:get_char(line, col) + if is_non_word(char) + or line == line2 and col == col2 then + break + end + line, col = line2, col2 + end + return line, col +end + + +function translate.previous_block_start(doc, line, col) + while true do + line = line - 1 + if line <= 1 then + return 1, 1 + end + if doc.lines[line-1]:find("^%s*$") + and not doc.lines[line]:find("^%s*$") then + return line, (doc.lines[line]:find("%S")) + end + end +end + + +function translate.next_block_end(doc, line, col) + while true do + if line >= #doc.lines then + return #doc.lines, 1 + end + if doc.lines[line+1]:find("^%s*$") + and not doc.lines[line]:find("^%s*$") then + return line+1, #doc.lines[line+1] + end + line = line + 1 + end +end + + +function translate.start_of_line(doc, line, col) + return line, 1 +end + + +function translate.end_of_line(doc, line, col) + return line, math.huge +end + + +function translate.start_of_doc(doc, line, col) + return 1, 1 +end + + +function translate.end_of_doc(doc, line, col) + return #doc.lines, #doc.lines[#doc.lines] +end + + +return translate diff --git a/data/core/docview.lua b/data/core/docview.lua new file mode 100644 index 0000000..73191c2 --- /dev/null +++ b/data/core/docview.lua @@ -0,0 +1,383 @@ +local core = require "core" +local common = require "core.common" +local config = require "core.config" +local style = require "core.style" +local keymap = require "core.keymap" +local translate = require "core.doc.translate" +local View = require "core.view" + + +local DocView = View:extend() + + +local function move_to_line_offset(dv, line, col, offset) + local xo = dv.last_x_offset + if xo.line ~= line or xo.col ~= col then + xo.offset = dv:get_col_x_offset(line, col) + end + xo.line = line + offset + xo.col = dv:get_x_offset_col(line + offset, xo.offset) + return xo.line, xo.col +end + + +DocView.translate = { + ["previous_page"] = function(doc, line, col, dv) + local min, max = dv:get_visible_line_range() + return line - (max - min), 1 + end, + + ["next_page"] = function(doc, line, col, dv) + local min, max = dv:get_visible_line_range() + return line + (max - min), 1 + end, + + ["previous_line"] = function(doc, line, col, dv) + if line == 1 then + return 1, 1 + end + return move_to_line_offset(dv, line, col, -1) + end, + + ["next_line"] = function(doc, line, col, dv) + if line == #doc.lines then + return #doc.lines, math.huge + end + return move_to_line_offset(dv, line, col, 1) + end, +} + +local blink_period = 0.8 + + +function DocView:new(doc) + DocView.super.new(self) + self.cursor = "ibeam" + self.scrollable = true + self.doc = assert(doc) + self.font = "code_font" + self.last_x_offset = {} + self.blink_timer = 0 +end + + +function DocView:try_close(do_close) + if self.doc:is_dirty() + and #core.get_views_referencing_doc(self.doc) == 1 then + core.command_view:enter("Unsaved Changes; Confirm Close", function(_, item) + if item.text:match("^[cC]") then + do_close() + elseif item.text:match("^[sS]") then + self.doc:save() + do_close() + end + end, function(text) + local items = {} + if not text:find("^[^cC]") then table.insert(items, "Close Without Saving") end + if not text:find("^[^sS]") then table.insert(items, "Save And Close") end + return items + end) + else + do_close() + end +end + + +function DocView:get_name() + local post = self.doc:is_dirty() and "*" or "" + local name = self.doc:get_name() + return name:match("[^/%\\]*$") .. post +end + + +function DocView:get_scrollable_size() + return self:get_line_height() * (#self.doc.lines - 1) + self.size.y +end + + +function DocView:get_font() + return style[self.font] +end + + +function DocView:get_line_height() + return math.floor(self:get_font():get_height() * config.line_height) +end + + +function DocView:get_gutter_width() + return self:get_font():get_width(#self.doc.lines) + style.padding.x * 2 +end + + +function DocView:get_line_screen_position(idx) + local x, y = self:get_content_offset() + local lh = self:get_line_height() + local gw = self:get_gutter_width() + return x + gw, y + (idx-1) * lh + style.padding.y +end + + +function DocView:get_line_text_y_offset() + local lh = self:get_line_height() + local th = self:get_font():get_height() + return (lh - th) / 2 +end + + +function DocView:get_visible_line_range() + local x, y, x2, y2 = self:get_content_bounds() + local lh = self:get_line_height() + local minline = math.max(1, math.floor(y / lh)) + local maxline = math.min(#self.doc.lines, math.floor(y2 / lh) + 1) + return minline, maxline +end + + +function DocView:get_col_x_offset(line, col) + local text = self.doc.lines[line] + if not text then return 0 end + return self:get_font():get_width(text:sub(1, col - 1)) +end + + +function DocView:get_x_offset_col(line, x) + local text = self.doc.lines[line] + + local xoffset, last_i, i = 0, 1, 1 + for char in common.utf8_chars(text) do + local w = self:get_font():get_width(char) + if xoffset >= x then + return (xoffset - x > w / 2) and last_i or i + end + xoffset = xoffset + w + last_i = i + i = i + #char + end + + return #text +end + + +function DocView:resolve_screen_position(x, y) + local ox, oy = self:get_line_screen_position(1) + local line = math.floor((y - oy) / self:get_line_height()) + 1 + line = common.clamp(line, 1, #self.doc.lines) + local col = self:get_x_offset_col(line, x - ox) + return line, col +end + + +function DocView:scroll_to_line(line, ignore_if_visible, instant) + local min, max = self:get_visible_line_range() + if not (ignore_if_visible and line > min and line < max) then + local lh = self:get_line_height() + self.scroll.to.y = math.max(0, lh * (line - 1) - self.size.y / 2) + if instant then + self.scroll.y = self.scroll.to.y + end + end +end + + +function DocView:scroll_to_make_visible(line, col) + local min = self:get_line_height() * (line - 1) + local max = self:get_line_height() * (line + 2) - self.size.y + self.scroll.to.y = math.min(self.scroll.to.y, min) + self.scroll.to.y = math.max(self.scroll.to.y, max) + local gw = self:get_gutter_width() + local xoffset = self:get_col_x_offset(line, col) + local max = xoffset - self.size.x + gw + self.size.x / 5 + self.scroll.to.x = math.max(0, max) +end + + +local function mouse_selection(doc, clicks, line1, col1, line2, col2) + local swap = line2 < line1 or line2 == line1 and col2 <= col1 + if swap then + line1, col1, line2, col2 = line2, col2, line1, col1 + end + if clicks == 2 then + line1, col1 = translate.start_of_word(doc, line1, col1) + line2, col2 = translate.end_of_word(doc, line2, col2) + elseif clicks == 3 then + if line2 == #doc.lines and doc.lines[#doc.lines] ~= "\n" then + doc:insert(math.huge, math.huge, "\n") + end + line1, col1, line2, col2 = line1, 1, line2 + 1, 1 + end + if swap then + return line2, col2, line1, col1 + end + return line1, col1, line2, col2 +end + + +function DocView:on_mouse_pressed(button, x, y, clicks) + local caught = DocView.super.on_mouse_pressed(self, button, x, y, clicks) + if caught then + return + end + if keymap.modkeys["shift"] then + if clicks == 1 then + local line1, col1 = select(3, self.doc:get_selection()) + local line2, col2 = self:resolve_screen_position(x, y) + self.doc:set_selection(line2, col2, line1, col1) + end + else + local line, col = self:resolve_screen_position(x, y) + self.doc:set_selection(mouse_selection(self.doc, clicks, line, col, line, col)) + self.mouse_selecting = { line, col, clicks = clicks } + end + self.blink_timer = 0 +end + + +function DocView:on_mouse_moved(x, y, ...) + DocView.super.on_mouse_moved(self, x, y, ...) + + if self:scrollbar_overlaps_point(x, y) or self.dragging_scrollbar then + self.cursor = "arrow" + else + self.cursor = "ibeam" + end + + if self.mouse_selecting then + local l1, c1 = self:resolve_screen_position(x, y) + local l2, c2 = table.unpack(self.mouse_selecting) + local clicks = self.mouse_selecting.clicks + self.doc:set_selection(mouse_selection(self.doc, clicks, l1, c1, l2, c2)) + end +end + + +function DocView:on_mouse_released(button) + DocView.super.on_mouse_released(self, button) + self.mouse_selecting = nil +end + + +function DocView:on_text_input(text) + self.doc:text_input(text) +end + + +function DocView:update() + -- scroll to make caret visible and reset blink timer if it moved + local line, col = self.doc:get_selection() + if (line ~= self.last_line or col ~= self.last_col) and self.size.x > 0 then + if core.active_view == self then + self:scroll_to_make_visible(line, col) + end + self.blink_timer = 0 + self.last_line, self.last_col = line, col + end + + -- update blink timer + if self == core.active_view and not self.mouse_selecting then + local n = blink_period / 2 + local prev = self.blink_timer + self.blink_timer = (self.blink_timer + 1 / config.fps) % blink_period + if (self.blink_timer > n) ~= (prev > n) then + core.redraw = true + end + end + + DocView.super.update(self) +end + + +function DocView:draw_line_highlight(x, y) + local lh = self:get_line_height() + renderer.draw_rect(x, y, self.size.x, lh, style.line_highlight) +end + + +function DocView:draw_line_text(idx, x, y) + local tx, ty = x, y + self:get_line_text_y_offset() + local font = self:get_font() + for _, type, text in self.doc.highlighter:each_token(idx) do + local color = style.syntax[type] + tx = renderer.draw_text(font, text, tx, ty, color) + end +end + + +function DocView:draw_line_body(idx, x, y) + local line, col = self.doc:get_selection() + + -- draw selection if it overlaps this line + local line1, col1, line2, col2 = self.doc:get_selection(true) + if idx >= line1 and idx <= line2 then + local text = self.doc.lines[idx] + if line1 ~= idx then col1 = 1 end + if line2 ~= idx then col2 = #text + 1 end + local x1 = x + self:get_col_x_offset(idx, col1) + local x2 = x + self:get_col_x_offset(idx, col2) + local lh = self:get_line_height() + renderer.draw_rect(x1, y, x2 - x1, lh, style.selection) + end + + -- draw line highlight if caret is on this line + if config.highlight_current_line and not self.doc:has_selection() + and line == idx and core.active_view == self then + self:draw_line_highlight(x + self.scroll.x, y) + end + + -- draw line's text + self:draw_line_text(idx, x, y) + + -- draw caret if it overlaps this line + if line == idx and core.active_view == self + and self.blink_timer < blink_period / 2 + and system.window_has_focus() then + local lh = self:get_line_height() + local x1 = x + self:get_col_x_offset(line, col) + renderer.draw_rect(x1, y, style.caret_width, lh, style.caret) + end +end + + +function DocView:draw_line_gutter(idx, x, y) + local color = style.line_number + local line1, _, line2, _ = self.doc:get_selection(true) + if idx >= line1 and idx <= line2 then + color = style.line_number2 + end + local yoffset = self:get_line_text_y_offset() + x = x + style.padding.x + renderer.draw_text(self:get_font(), idx, x, y + yoffset, color) +end + + +function DocView:draw() + self:draw_background(style.background) + + local font = self:get_font() + font:set_tab_width(font:get_width(" ") * config.indent_size) + + local minline, maxline = self:get_visible_line_range() + local lh = self:get_line_height() + + local _, y = self:get_line_screen_position(minline) + local x = self.position.x + for i = minline, maxline do + self:draw_line_gutter(i, x, y) + y = y + lh + end + + local x, y = self:get_line_screen_position(minline) + local gw = self:get_gutter_width() + local pos = self.position + core.push_clip_rect(pos.x + gw, pos.y, self.size.x, self.size.y) + for i = minline, maxline do + self:draw_line_body(i, x, y) + y = y + lh + end + core.pop_clip_rect() + + self:draw_scrollbar() +end + + +return DocView diff --git a/data/core/init.lua b/data/core/init.lua new file mode 100644 index 0000000..cef305e --- /dev/null +++ b/data/core/init.lua @@ -0,0 +1,480 @@ +require "core.strict" +local common = require "core.common" +local config = require "core.config" +local style = require "core.style" +local command +local keymap +local RootView +local StatusView +local CommandView +local Doc + +local core = {} + + +local function project_scan_thread() + local function diff_files(a, b) + if #a ~= #b then return true end + for i, v in ipairs(a) do + if b[i].filename ~= v.filename + or b[i].modified ~= v.modified then + return true + end + end + end + + local function compare_file(a, b) + return a.filename < b.filename + end + + local function get_files(path, t) + coroutine.yield() + t = t or {} + local size_limit = config.file_size_limit * 10e5 + local all = system.list_dir(path) or {} + local dirs, files = {}, {} + + for _, file in ipairs(all) do + if not common.match_pattern(file, config.ignore_files) then + local file = (path ~= "." and path .. PATHSEP or "") .. file + local info = system.get_file_info(file) + if info and info.size < size_limit then + info.filename = file + table.insert(info.type == "dir" and dirs or files, info) + end + end + end + + table.sort(dirs, compare_file) + for _, f in ipairs(dirs) do + table.insert(t, f) + get_files(f.filename, t) + end + + table.sort(files, compare_file) + for _, f in ipairs(files) do + table.insert(t, f) + end + + return t + end + + while true do + -- get project files and replace previous table if the new table is + -- different + local t = get_files(".") + if diff_files(core.project_files, t) then + core.project_files = t + core.redraw = true + end + + -- wait for next scan + coroutine.yield(config.project_scan_rate) + end +end + + +function core.init() + command = require "core.command" + keymap = require "core.keymap" + RootView = require "core.rootview" + StatusView = require "core.statusview" + CommandView = require "core.commandview" + Doc = require "core.doc" + + local project_dir = EXEDIR + local files = {} + for i = 2, #ARGS do + local info = system.get_file_info(ARGS[i]) or {} + if info.type == "file" then + table.insert(files, system.absolute_path(ARGS[i])) + elseif info.type == "dir" then + project_dir = ARGS[i] + end + end + + system.chdir(project_dir) + + core.frame_start = 0 + core.clip_rect_stack = {{ 0,0,0,0 }} + core.log_items = {} + core.docs = {} + core.threads = setmetatable({}, { __mode = "k" }) + core.project_files = {} + core.redraw = true + + core.root_view = RootView() + core.command_view = CommandView() + core.status_view = StatusView() + + core.root_view.root_node:split("down", core.command_view, true) + core.root_view.root_node.b:split("down", core.status_view, true) + + core.add_thread(project_scan_thread) + command.add_defaults() + local got_plugin_error = not core.load_plugins() + local got_user_error = not core.try(require, "user") + local got_project_error = not core.load_project_module() + + for _, filename in ipairs(files) do + core.root_view:open_doc(core.open_doc(filename)) + end + + if got_plugin_error or got_user_error or got_project_error then + command.perform("core:open-log") + end +end + + +local temp_uid = (system.get_time() * 1000) % 0xffffffff +local temp_file_prefix = string.format(".lite_temp_%08x", temp_uid) +local temp_file_counter = 0 + +local function delete_temp_files() + for _, filename in ipairs(system.list_dir(EXEDIR)) do + if filename:find(temp_file_prefix, 1, true) == 1 then + os.remove(EXEDIR .. PATHSEP .. filename) + end + end +end + +function core.temp_filename(ext) + temp_file_counter = temp_file_counter + 1 + return EXEDIR .. PATHSEP .. temp_file_prefix + .. string.format("%06x", temp_file_counter) .. (ext or "") +end + + +function core.quit(force) + if force then + delete_temp_files() + os.exit() + end + local dirty_count = 0 + local dirty_name + for _, doc in ipairs(core.docs) do + if doc:is_dirty() then + dirty_count = dirty_count + 1 + dirty_name = doc:get_name() + end + end + if dirty_count > 0 then + local text + if dirty_count == 1 then + text = string.format("\"%s\" has unsaved changes. Quit anyway?", dirty_name) + else + text = string.format("%d docs have unsaved changes. Quit anyway?", dirty_count) + end + local confirm = system.show_confirm_dialog("Unsaved Changes", text) + if not confirm then return end + end + core.quit(true) +end + + +function core.load_plugins() + local no_errors = true + local files = system.list_dir(EXEDIR .. "/data/plugins") + for _, filename in ipairs(files) do + local modname = "plugins." .. filename:gsub(".lua$", "") + local ok = core.try(require, modname) + if ok then + core.log_quiet("Loaded plugin %q", modname) + else + no_errors = false + end + end + return no_errors +end + + +function core.load_project_module() + local filename = ".lite_project.lua" + if system.get_file_info(filename) then + return core.try(function() + local fn, err = loadfile(filename) + if not fn then error("Error when loading project module:\n\t" .. err) end + fn() + core.log_quiet("Loaded project module") + end) + end + return true +end + + +function core.reload_module(name) + local old = package.loaded[name] + package.loaded[name] = nil + local new = require(name) + if type(old) == "table" then + for k, v in pairs(new) do old[k] = v end + package.loaded[name] = old + end +end + + +function core.set_active_view(view) + assert(view, "Tried to set active view to nil") + if view ~= core.active_view then + core.last_active_view = core.active_view + core.active_view = view + end +end + + +function core.add_thread(f, weak_ref) + local key = weak_ref or #core.threads + 1 + local fn = function() return core.try(f) end + core.threads[key] = { cr = coroutine.create(fn), wake = 0 } +end + + +function core.push_clip_rect(x, y, w, h) + local x2, y2, w2, h2 = table.unpack(core.clip_rect_stack[#core.clip_rect_stack]) + local r, b, r2, b2 = x+w, y+h, x2+w2, y2+h2 + x, y = math.max(x, x2), math.max(y, y2) + b, r = math.min(b, b2), math.min(r, r2) + w, h = r-x, b-y + table.insert(core.clip_rect_stack, { x, y, w, h }) + renderer.set_clip_rect(x, y, w, h) +end + + +function core.pop_clip_rect() + table.remove(core.clip_rect_stack) + local x, y, w, h = table.unpack(core.clip_rect_stack[#core.clip_rect_stack]) + renderer.set_clip_rect(x, y, w, h) +end + + +function core.open_doc(filename) + if filename then + -- try to find existing doc for filename + local abs_filename = system.absolute_path(filename) + for _, doc in ipairs(core.docs) do + if doc.filename + and abs_filename == system.absolute_path(doc.filename) then + return doc + end + end + end + -- no existing doc for filename; create new + local doc = Doc(filename) + table.insert(core.docs, doc) + core.log_quiet(filename and "Opened doc \"%s\"" or "Opened new doc", filename) + return doc +end + + +function core.get_views_referencing_doc(doc) + local res = {} + local views = core.root_view.root_node:get_children() + for _, view in ipairs(views) do + if view.doc == doc then table.insert(res, view) end + end + return res +end + + +local function log(icon, icon_color, fmt, ...) + local text = string.format(fmt, ...) + if icon then + core.status_view:show_message(icon, icon_color, text) + end + + local info = debug.getinfo(2, "Sl") + local at = string.format("%s:%d", info.short_src, info.currentline) + local item = { text = text, time = os.time(), at = at } + table.insert(core.log_items, item) + if #core.log_items > config.max_log_items then + table.remove(core.log_items, 1) + end + return item +end + + +function core.log(...) + return log("i", style.text, ...) +end + + +function core.log_quiet(...) + return log(nil, nil, ...) +end + + +function core.error(...) + return log("!", style.accent, ...) +end + + +function core.try(fn, ...) + local err + local ok, res = xpcall(fn, function(msg) + local item = core.error("%s", msg) + item.info = debug.traceback(nil, 2):gsub("\t", "") + err = msg + end, ...) + if ok then + return true, res + end + return false, err +end + + +function core.on_event(type, ...) + local did_keymap = false + if type == "textinput" then + core.root_view:on_text_input(...) + elseif type == "keypressed" then + did_keymap = keymap.on_key_pressed(...) + elseif type == "keyreleased" then + keymap.on_key_released(...) + elseif type == "mousemoved" then + core.root_view:on_mouse_moved(...) + elseif type == "mousepressed" then + core.root_view:on_mouse_pressed(...) + elseif type == "mousereleased" then + core.root_view:on_mouse_released(...) + elseif type == "mousewheel" then + core.root_view:on_mouse_wheel(...) + elseif type == "filedropped" then + local filename, mx, my = ... + local info = system.get_file_info(filename) + if info and info.type == "dir" then + system.exec(string.format("%q %q", EXEFILE, filename)) + else + local ok, doc = core.try(core.open_doc, filename) + if ok then + local node = core.root_view.root_node:get_child_overlapping_point(mx, my) + node:set_active_view(node.active_view) + core.root_view:open_doc(doc) + end + end + elseif type == "quit" then + core.quit() + end + return did_keymap +end + + +function core.step() + -- handle events + local did_keymap = false + local mouse_moved = false + local mouse = { x = 0, y = 0, dx = 0, dy = 0 } + + for type, a,b,c,d in system.poll_event do + if type == "mousemoved" then + mouse_moved = true + mouse.x, mouse.y = a, b + mouse.dx, mouse.dy = mouse.dx + c, mouse.dy + d + elseif type == "textinput" and did_keymap then + did_keymap = false + else + local _, res = core.try(core.on_event, type, a, b, c, d) + did_keymap = res or did_keymap + end + core.redraw = true + end + if mouse_moved then + core.try(core.on_event, "mousemoved", mouse.x, mouse.y, mouse.dx, mouse.dy) + end + + local width, height = renderer.get_size() + + -- update + core.root_view.size.x, core.root_view.size.y = width, height + core.root_view:update() + if not core.redraw then return false end + core.redraw = false + + -- close unreferenced docs + for i = #core.docs, 1, -1 do + local doc = core.docs[i] + if #core.get_views_referencing_doc(doc) == 0 then + table.remove(core.docs, i) + core.log_quiet("Closed doc \"%s\"", doc:get_name()) + end + end + + -- update window title + local name = core.active_view:get_name() + local title = (name ~= "---") and (name .. " - lite") or "lite" + if title ~= core.window_title then + system.set_window_title(title) + core.window_title = title + end + + -- draw + renderer.begin_frame() + core.clip_rect_stack[1] = { 0, 0, width, height } + renderer.set_clip_rect(table.unpack(core.clip_rect_stack[1])) + core.root_view:draw() + renderer.end_frame() + return true +end + + +local run_threads = coroutine.wrap(function() + while true do + local max_time = 1 / config.fps - 0.004 + local ran_any_threads = false + + for k, thread in pairs(core.threads) do + -- run thread + if thread.wake < system.get_time() then + local _, wait = assert(coroutine.resume(thread.cr)) + if coroutine.status(thread.cr) == "dead" then + if type(k) == "number" then + table.remove(core.threads, k) + else + core.threads[k] = nil + end + elseif wait then + thread.wake = system.get_time() + wait + end + ran_any_threads = true + end + + -- stop running threads if we're about to hit the end of frame + if system.get_time() - core.frame_start > max_time then + coroutine.yield() + end + end + + if not ran_any_threads then coroutine.yield() end + end +end) + + +function core.run() + while true do + core.frame_start = system.get_time() + local did_redraw = core.step() + run_threads() + if not did_redraw and not system.window_has_focus() then + system.wait_event(0.25) + end + local elapsed = system.get_time() - core.frame_start + system.sleep(math.max(0, 1 / config.fps - elapsed)) + end +end + + +function core.on_error(err) + -- write error to file + local fp = io.open(EXEDIR .. "/error.txt", "wb") + fp:write("Error: " .. tostring(err) .. "\n") + fp:write(debug.traceback(nil, 4)) + fp:close() + -- save copy of all unsaved documents + for _, doc in ipairs(core.docs) do + if doc:is_dirty() and doc.filename then + doc:save(doc.filename .. "~") + end + end +end + + +return core diff --git a/data/core/keymap.lua b/data/core/keymap.lua new file mode 100644 index 0000000..4d48ed4 --- /dev/null +++ b/data/core/keymap.lua @@ -0,0 +1,186 @@ +local command = require "core.command" +local keymap = {} + +keymap.modkeys = {} +keymap.map = {} +keymap.reverse_map = {} + +local modkey_map = { + ["left ctrl"] = "ctrl", + ["right ctrl"] = "ctrl", + ["left shift"] = "shift", + ["right shift"] = "shift", + ["left alt"] = "alt", + ["right alt"] = "altgr", +} + +local modkeys = { "ctrl", "alt", "altgr", "shift" } + +local function key_to_stroke(k) + local stroke = "" + for _, mk in ipairs(modkeys) do + if keymap.modkeys[mk] then + stroke = stroke .. mk .. "+" + end + end + return stroke .. k +end + + +function keymap.add(map, overwrite) + for stroke, commands in pairs(map) do + if type(commands) == "string" then + commands = { commands } + end + if overwrite then + keymap.map[stroke] = commands + else + keymap.map[stroke] = keymap.map[stroke] or {} + for i = #commands, 1, -1 do + table.insert(keymap.map[stroke], 1, commands[i]) + end + end + for _, cmd in ipairs(commands) do + keymap.reverse_map[cmd] = stroke + end + end +end + + +function keymap.get_binding(cmd) + return keymap.reverse_map[cmd] +end + + +function keymap.on_key_pressed(k) + local mk = modkey_map[k] + if mk then + keymap.modkeys[mk] = true + -- work-around for windows where `altgr` is treated as `ctrl+alt` + if mk == "altgr" then + keymap.modkeys["ctrl"] = false + end + else + local stroke = key_to_stroke(k) + local commands = keymap.map[stroke] + if commands then + for _, cmd in ipairs(commands) do + local performed = command.perform(cmd) + if performed then break end + end + return true + end + end + return false +end + + +function keymap.on_key_released(k) + local mk = modkey_map[k] + if mk then + keymap.modkeys[mk] = false + end +end + + +keymap.add { + ["ctrl+shift+p"] = "core:find-command", + ["ctrl+p"] = "core:find-file", + ["ctrl+o"] = "core:open-file", + ["ctrl+n"] = "core:new-doc", + ["alt+return"] = "core:toggle-fullscreen", + + ["alt+shift+j"] = "root:split-left", + ["alt+shift+l"] = "root:split-right", + ["alt+shift+i"] = "root:split-up", + ["alt+shift+k"] = "root:split-down", + ["alt+j"] = "root:switch-to-left", + ["alt+l"] = "root:switch-to-right", + ["alt+i"] = "root:switch-to-up", + ["alt+k"] = "root:switch-to-down", + + ["ctrl+w"] = "root:close", + ["ctrl+tab"] = "root:switch-to-next-tab", + ["ctrl+shift+tab"] = "root:switch-to-previous-tab", + ["ctrl+pageup"] = "root:move-tab-left", + ["ctrl+pagedown"] = "root:move-tab-right", + ["alt+1"] = "root:switch-to-tab-1", + ["alt+2"] = "root:switch-to-tab-2", + ["alt+3"] = "root:switch-to-tab-3", + ["alt+4"] = "root:switch-to-tab-4", + ["alt+5"] = "root:switch-to-tab-5", + ["alt+6"] = "root:switch-to-tab-6", + ["alt+7"] = "root:switch-to-tab-7", + ["alt+8"] = "root:switch-to-tab-8", + ["alt+9"] = "root:switch-to-tab-9", + + ["ctrl+f"] = "find-replace:find", + ["ctrl+r"] = "find-replace:replace", + ["f3"] = "find-replace:repeat-find", + ["shift+f3"] = "find-replace:previous-find", + ["ctrl+g"] = "doc:go-to-line", + ["ctrl+s"] = "doc:save", + ["ctrl+shift+s"] = "doc:save-as", + + ["ctrl+z"] = "doc:undo", + ["ctrl+y"] = "doc:redo", + ["ctrl+x"] = "doc:cut", + ["ctrl+c"] = "doc:copy", + ["ctrl+v"] = "doc:paste", + ["escape"] = { "command:escape", "doc:select-none" }, + ["tab"] = { "command:complete", "doc:indent" }, + ["shift+tab"] = "doc:unindent", + ["backspace"] = "doc:backspace", + ["shift+backspace"] = "doc:backspace", + ["ctrl+backspace"] = "doc:delete-to-previous-word-start", + ["ctrl+shift+backspace"] = "doc:delete-to-previous-word-start", + ["delete"] = "doc:delete", + ["shift+delete"] = "doc:delete", + ["ctrl+delete"] = "doc:delete-to-next-word-end", + ["ctrl+shift+delete"] = "doc:delete-to-next-word-end", + ["return"] = { "command:submit", "doc:newline" }, + ["keypad enter"] = { "command:submit", "doc:newline" }, + ["ctrl+return"] = "doc:newline-below", + ["ctrl+shift+return"] = "doc:newline-above", + ["ctrl+j"] = "doc:join-lines", + ["ctrl+a"] = "doc:select-all", + ["ctrl+d"] = { "find-replace:select-next", "doc:select-word" }, + ["ctrl+l"] = "doc:select-lines", + ["ctrl+/"] = "doc:toggle-line-comments", + ["ctrl+up"] = "doc:move-lines-up", + ["ctrl+down"] = "doc:move-lines-down", + ["ctrl+shift+d"] = "doc:duplicate-lines", + ["ctrl+shift+k"] = "doc:delete-lines", + + ["left"] = "doc:move-to-previous-char", + ["right"] = "doc:move-to-next-char", + ["up"] = { "command:select-previous", "doc:move-to-previous-line" }, + ["down"] = { "command:select-next", "doc:move-to-next-line" }, + ["ctrl+left"] = "doc:move-to-previous-word-start", + ["ctrl+right"] = "doc:move-to-next-word-end", + ["ctrl+["] = "doc:move-to-previous-block-start", + ["ctrl+]"] = "doc:move-to-next-block-end", + ["home"] = "doc:move-to-start-of-line", + ["end"] = "doc:move-to-end-of-line", + ["ctrl+home"] = "doc:move-to-start-of-doc", + ["ctrl+end"] = "doc:move-to-end-of-doc", + ["pageup"] = "doc:move-to-previous-page", + ["pagedown"] = "doc:move-to-next-page", + + ["shift+left"] = "doc:select-to-previous-char", + ["shift+right"] = "doc:select-to-next-char", + ["shift+up"] = "doc:select-to-previous-line", + ["shift+down"] = "doc:select-to-next-line", + ["ctrl+shift+left"] = "doc:select-to-previous-word-start", + ["ctrl+shift+right"] = "doc:select-to-next-word-end", + ["ctrl+shift+["] = "doc:select-to-previous-block-start", + ["ctrl+shift+]"] = "doc:select-to-next-block-end", + ["shift+home"] = "doc:select-to-start-of-line", + ["shift+end"] = "doc:select-to-end-of-line", + ["ctrl+shift+home"] = "doc:select-to-start-of-doc", + ["ctrl+shift+end"] = "doc:select-to-end-of-doc", + ["shift+pageup"] = "doc:select-to-previous-page", + ["shift+pagedown"] = "doc:select-to-next-page", +} + +return keymap diff --git a/data/core/logview.lua b/data/core/logview.lua new file mode 100644 index 0000000..d7142fb --- /dev/null +++ b/data/core/logview.lua @@ -0,0 +1,74 @@ +local core = require "core" +local style = require "core.style" +local View = require "core.view" + + +local LogView = View:extend() + + +function LogView:new() + LogView.super.new(self) + self.last_item = core.log_items[#core.log_items] + self.scrollable = true + self.yoffset = 0 +end + + +function LogView:get_name() + return "Log" +end + + +function LogView:update() + local item = core.log_items[#core.log_items] + if self.last_item ~= item then + self.last_item = item + self.scroll.to.y = 0 + self.yoffset = -(style.font:get_height() + style.padding.y) + end + + self:move_towards("yoffset", 0) + + LogView.super.update(self) +end + + +local function draw_text_multiline(font, text, x, y, color) + local th = font:get_height() + local resx, resy = x, y + for line in text:gmatch("[^\n]+") do + resy = y + resx = renderer.draw_text(style.font, line, x, y, color) + y = y + th + end + return resx, resy +end + + +function LogView:draw() + self:draw_background(style.background) + + local ox, oy = self:get_content_offset() + local th = style.font:get_height() + local y = oy + style.padding.y + self.yoffset + + for i = #core.log_items, 1, -1 do + local x = ox + style.padding.x + local item = core.log_items[i] + local time = os.date(nil, item.time) + x = renderer.draw_text(style.font, time, x, y, style.dim) + x = x + style.padding.x + local subx = x + x, y = draw_text_multiline(style.font, item.text, x, y, style.text) + renderer.draw_text(style.font, " at " .. item.at, x, y, style.dim) + y = y + th + if item.info then + subx, y = draw_text_multiline(style.font, item.info, subx, y, style.dim) + y = y + th + end + y = y + style.padding.y + end +end + + +return LogView diff --git a/data/core/object.lua b/data/core/object.lua new file mode 100644 index 0000000..af41b7e --- /dev/null +++ b/data/core/object.lua @@ -0,0 +1,58 @@ +local Object = {} +Object.__index = Object + + +function Object:new() +end + + +function Object:extend() + local cls = {} + for k, v in pairs(self) do + if k:find("__") == 1 then + cls[k] = v + end + end + cls.__index = cls + cls.super = self + setmetatable(cls, self) + return cls +end + + +function Object:implement(...) + for _, cls in pairs({...}) do + for k, v in pairs(cls) do + if self[k] == nil and type(v) == "function" then + self[k] = v + end + end + end +end + + +function Object:is(T) + local mt = getmetatable(self) + while mt do + if mt == T then + return true + end + mt = getmetatable(mt) + end + return false +end + + +function Object:__tostring() + return "Object" +end + + +function Object:__call(...) + local obj = setmetatable({}, self) + obj:new(...) + return obj +end + + +return Object diff --git a/data/core/rootview.lua b/data/core/rootview.lua new file mode 100644 index 0000000..389525f --- /dev/null +++ b/data/core/rootview.lua @@ -0,0 +1,504 @@ +local core = require "core" +local common = require "core.common" +local style = require "core.style" +local keymap = require "core.keymap" +local Object = require "core.object" +local View = require "core.view" +local DocView = require "core.docview" + + +local EmptyView = View:extend() + +local function draw_text(x, y, color) + local th = style.big_font:get_height() + local dh = th + style.padding.y * 2 + x = renderer.draw_text(style.big_font, "lite", x, y + (dh - th) / 2, color) + x = x + style.padding.x + renderer.draw_rect(x, y, math.ceil(1 * SCALE), dh, color) + local lines = { + { fmt = "%s to run a command", cmd = "core:find-command" }, + { fmt = "%s to open a file from the project", cmd = "core:find-file" }, + } + th = style.font:get_height() + y = y + (dh - th * 2 - style.padding.y) / 2 + local w = 0 + for _, line in ipairs(lines) do + local text = string.format(line.fmt, keymap.get_binding(line.cmd)) + w = math.max(w, renderer.draw_text(style.font, text, x + style.padding.x, y, color)) + y = y + th + style.padding.y + end + return w, dh +end + +function EmptyView:draw() + self:draw_background(style.background) + local w, h = draw_text(0, 0, { 0, 0, 0, 0 }) + local x = self.position.x + math.max(style.padding.x, (self.size.x - w) / 2) + local y = self.position.y + (self.size.y - h) / 2 + draw_text(x, y, style.dim) +end + + + +local Node = Object:extend() + +function Node:new(type) + self.type = type or "leaf" + self.position = { x = 0, y = 0 } + self.size = { x = 0, y = 0 } + self.views = {} + self.divider = 0.5 + if self.type == "leaf" then + self:add_view(EmptyView()) + end +end + + +function Node:propagate(fn, ...) + self.a[fn](self.a, ...) + self.b[fn](self.b, ...) +end + + +function Node:on_mouse_moved(x, y, ...) + self.hovered_tab = self:get_tab_overlapping_point(x, y) + if self.type == "leaf" then + self.active_view:on_mouse_moved(x, y, ...) + else + self:propagate("on_mouse_moved", x, y, ...) + end +end + + +function Node:on_mouse_released(...) + if self.type == "leaf" then + self.active_view:on_mouse_released(...) + else + self:propagate("on_mouse_released", ...) + end +end + + +function Node:consume(node) + for k, _ in pairs(self) do self[k] = nil end + for k, v in pairs(node) do self[k] = v end +end + + +local type_map = { up="vsplit", down="vsplit", left="hsplit", right="hsplit" } + +function Node:split(dir, view, locked) + assert(self.type == "leaf", "Tried to split non-leaf node") + local type = assert(type_map[dir], "Invalid direction") + local last_active = core.active_view + local child = Node() + child:consume(self) + self:consume(Node(type)) + self.a = child + self.b = Node() + if view then self.b:add_view(view) end + if locked then + self.b.locked = locked + core.set_active_view(last_active) + end + if dir == "up" or dir == "left" then + self.a, self.b = self.b, self.a + end + return child +end + + +function Node:close_active_view(root) + local do_close = function() + if #self.views > 1 then + local idx = self:get_view_idx(self.active_view) + table.remove(self.views, idx) + self:set_active_view(self.views[idx] or self.views[#self.views]) + else + local parent = self:get_parent_node(root) + local is_a = (parent.a == self) + local other = parent[is_a and "b" or "a"] + if other:get_locked_size() then + self.views = {} + self:add_view(EmptyView()) + else + parent:consume(other) + local p = parent + while p.type ~= "leaf" do + p = p[is_a and "a" or "b"] + end + p:set_active_view(p.active_view) + end + end + core.last_active_view = nil + end + self.active_view:try_close(do_close) +end + + +function Node:add_view(view) + assert(self.type == "leaf", "Tried to add view to non-leaf node") + assert(not self.locked, "Tried to add view to locked node") + if self.views[1] and self.views[1]:is(EmptyView) then + table.remove(self.views) + end + table.insert(self.views, view) + self:set_active_view(view) +end + + +function Node:set_active_view(view) + assert(self.type == "leaf", "Tried to set active view on non-leaf node") + self.active_view = view + core.set_active_view(view) +end + + +function Node:get_view_idx(view) + for i, v in ipairs(self.views) do + if v == view then return i end + end +end + + +function Node:get_node_for_view(view) + for _, v in ipairs(self.views) do + if v == view then return self end + end + if self.type ~= "leaf" then + return self.a:get_node_for_view(view) or self.b:get_node_for_view(view) + end +end + + +function Node:get_parent_node(root) + if root.a == self or root.b == self then + return root + elseif root.type ~= "leaf" then + return self:get_parent_node(root.a) or self:get_parent_node(root.b) + end +end + + +function Node:get_children(t) + t = t or {} + for _, view in ipairs(self.views) do + table.insert(t, view) + end + if self.a then self.a:get_children(t) end + if self.b then self.b:get_children(t) end + return t +end + + +function Node:get_divider_overlapping_point(px, py) + if self.type ~= "leaf" then + local p = 6 + local x, y, w, h = self:get_divider_rect() + x, y = x - p, y - p + w, h = w + p * 2, h + p * 2 + if px > x and py > y and px < x + w and py < y + h then + return self + end + return self.a:get_divider_overlapping_point(px, py) + or self.b:get_divider_overlapping_point(px, py) + end +end + + +function Node:get_tab_overlapping_point(px, py) + if #self.views == 1 then return nil end + local x, y, w, h = self:get_tab_rect(1) + if px >= x and py >= y and px < x + w * #self.views and py < y + h then + return math.floor((px - x) / w) + 1 + end +end + + +function Node:get_child_overlapping_point(x, y) + local child + if self.type == "leaf" then + return self + elseif self.type == "hsplit" then + child = (x < self.b.position.x) and self.a or self.b + elseif self.type == "vsplit" then + child = (y < self.b.position.y) and self.a or self.b + end + return child:get_child_overlapping_point(x, y) +end + + +function Node:get_tab_rect(idx) + local tw = math.min(style.tab_width, math.ceil(self.size.x / #self.views)) + local h = style.font:get_height() + style.padding.y * 2 + return self.position.x + (idx-1) * tw, self.position.y, tw, h +end + + +function Node:get_divider_rect() + local x, y = self.position.x, self.position.y + if self.type == "hsplit" then + return x + self.a.size.x, y, style.divider_size, self.size.y + elseif self.type == "vsplit" then + return x, y + self.a.size.y, self.size.x, style.divider_size + end +end + + +function Node:get_locked_size() + if self.type == "leaf" then + if self.locked then + local size = self.active_view.size + return size.x, size.y + end + else + local x1, y1 = self.a:get_locked_size() + local x2, y2 = self.b:get_locked_size() + if x1 and x2 then + local dsx = (x1 < 1 or x2 < 1) and 0 or style.divider_size + local dsy = (y1 < 1 or y2 < 1) and 0 or style.divider_size + return x1 + x2 + dsx, y1 + y2 + dsy + end + end +end + + +local function copy_position_and_size(dst, src) + dst.position.x, dst.position.y = src.position.x, src.position.y + dst.size.x, dst.size.y = src.size.x, src.size.y +end + + +-- calculating the sizes is the same for hsplits and vsplits, except the x/y +-- axis are swapped; this function lets us use the same code for both +local function calc_split_sizes(self, x, y, x1, x2) + local n + local ds = (x1 and x1 < 1 or x2 and x2 < 1) and 0 or style.divider_size + if x1 then + n = x1 + ds + elseif x2 then + n = self.size[x] - x2 + else + n = math.floor(self.size[x] * self.divider) + end + self.a.position[x] = self.position[x] + self.a.position[y] = self.position[y] + self.a.size[x] = n - ds + self.a.size[y] = self.size[y] + self.b.position[x] = self.position[x] + n + self.b.position[y] = self.position[y] + self.b.size[x] = self.size[x] - n + self.b.size[y] = self.size[y] +end + + +function Node:update_layout() + if self.type == "leaf" then + local av = self.active_view + if #self.views > 1 then + local _, _, _, th = self:get_tab_rect(1) + av.position.x, av.position.y = self.position.x, self.position.y + th + av.size.x, av.size.y = self.size.x, self.size.y - th + else + copy_position_and_size(av, self) + end + else + local x1, y1 = self.a:get_locked_size() + local x2, y2 = self.b:get_locked_size() + if self.type == "hsplit" then + calc_split_sizes(self, "x", "y", x1, x2) + elseif self.type == "vsplit" then + calc_split_sizes(self, "y", "x", y1, y2) + end + self.a:update_layout() + self.b:update_layout() + end +end + + +function Node:update() + if self.type == "leaf" then + for _, view in ipairs(self.views) do + view:update() + end + else + self.a:update() + self.b:update() + end +end + + +function Node:draw_tabs() + local x, y, _, h = self:get_tab_rect(1) + local ds = style.divider_size + core.push_clip_rect(x, y, self.size.x, h) + renderer.draw_rect(x, y, self.size.x, h, style.background2) + renderer.draw_rect(x, y + h - ds, self.size.x, ds, style.divider) + + for i, view in ipairs(self.views) do + local x, y, w, h = self:get_tab_rect(i) + local text = view:get_name() + local color = style.dim + if view == self.active_view then + color = style.text + renderer.draw_rect(x, y, w, h, style.background) + renderer.draw_rect(x + w, y, ds, h, style.divider) + renderer.draw_rect(x - ds, y, ds, h, style.divider) + end + if i == self.hovered_tab then + color = style.text + end + core.push_clip_rect(x, y, w, h) + x, w = x + style.padding.x, w - style.padding.x * 2 + local align = style.font:get_width(text) > w and "left" or "center" + common.draw_text(style.font, color, text, align, x, y, w, h) + core.pop_clip_rect() + end + + core.pop_clip_rect() +end + + +function Node:draw() + if self.type == "leaf" then + if #self.views > 1 then + self:draw_tabs() + end + local pos, size = self.active_view.position, self.active_view.size + core.push_clip_rect(pos.x, pos.y, size.x + pos.x % 1, size.y + pos.y % 1) + self.active_view:draw() + core.pop_clip_rect() + else + local x, y, w, h = self:get_divider_rect() + renderer.draw_rect(x, y, w, h, style.divider) + self:propagate("draw") + end +end + + + +local RootView = View:extend() + +function RootView:new() + RootView.super.new(self) + self.root_node = Node() + self.deferred_draws = {} + self.mouse = { x = 0, y = 0 } +end + + +function RootView:defer_draw(fn, ...) + table.insert(self.deferred_draws, 1, { fn = fn, ... }) +end + + +function RootView:get_active_node() + return self.root_node:get_node_for_view(core.active_view) +end + + +function RootView:open_doc(doc) + local node = self:get_active_node() + if node.locked and core.last_active_view then + core.set_active_view(core.last_active_view) + node = self:get_active_node() + end + assert(not node.locked, "Cannot open doc on locked node") + for i, view in ipairs(node.views) do + if view.doc == doc then + node:set_active_view(node.views[i]) + return view + end + end + local view = DocView(doc) + node:add_view(view) + self.root_node:update_layout() + view:scroll_to_line(view.doc:get_selection(), true, true) + return view +end + + +function RootView:on_mouse_pressed(button, x, y, clicks) + local div = self.root_node:get_divider_overlapping_point(x, y) + if div then + self.dragged_divider = div + return + end + local node = self.root_node:get_child_overlapping_point(x, y) + local idx = node:get_tab_overlapping_point(x, y) + if idx then + node:set_active_view(node.views[idx]) + if button == "middle" then + node:close_active_view(self.root_node) + end + else + core.set_active_view(node.active_view) + node.active_view:on_mouse_pressed(button, x, y, clicks) + end +end + + +function RootView:on_mouse_released(...) + if self.dragged_divider then + self.dragged_divider = nil + end + self.root_node:on_mouse_released(...) +end + + +function RootView:on_mouse_moved(x, y, dx, dy) + if self.dragged_divider then + local node = self.dragged_divider + if node.type == "hsplit" then + node.divider = node.divider + dx / node.size.x + else + node.divider = node.divider + dy / node.size.y + end + node.divider = common.clamp(node.divider, 0.01, 0.99) + return + end + + self.mouse.x, self.mouse.y = x, y + self.root_node:on_mouse_moved(x, y, dx, dy) + + local node = self.root_node:get_child_overlapping_point(x, y) + local div = self.root_node:get_divider_overlapping_point(x, y) + if div then + system.set_cursor(div.type == "hsplit" and "sizeh" or "sizev") + elseif node:get_tab_overlapping_point(x, y) then + system.set_cursor("arrow") + else + system.set_cursor(node.active_view.cursor) + end +end + + +function RootView:on_mouse_wheel(...) + local x, y = self.mouse.x, self.mouse.y + local node = self.root_node:get_child_overlapping_point(x, y) + node.active_view:on_mouse_wheel(...) +end + + +function RootView:on_text_input(...) + core.active_view:on_text_input(...) +end + + +function RootView:update() + copy_position_and_size(self.root_node, self) + self.root_node:update() + self.root_node:update_layout() +end + + +function RootView:draw() + self.root_node:draw() + while #self.deferred_draws > 0 do + local t = table.remove(self.deferred_draws) + t.fn(table.unpack(t)) + end +end + + +return RootView diff --git a/data/core/statusview.lua b/data/core/statusview.lua new file mode 100644 index 0000000..67a4c8b --- /dev/null +++ b/data/core/statusview.lua @@ -0,0 +1,141 @@ +local core = require "core" +local common = require "core.common" +local command = require "core.command" +local config = require "core.config" +local style = require "core.style" +local DocView = require "core.docview" +local LogView = require "core.logview" +local View = require "core.view" + + +local StatusView = View:extend() + +StatusView.separator = " " +StatusView.separator2 = " | " + + +function StatusView:new() + StatusView.super.new(self) + self.message_timeout = 0 + self.message = {} +end + + +function StatusView:on_mouse_pressed() + core.set_active_view(core.last_active_view) + if system.get_time() < self.message_timeout + and not core.active_view:is(LogView) then + command.perform "core:open-log" + end +end + + +function StatusView:show_message(icon, icon_color, text) + self.message = { + icon_color, style.icon_font, icon, + style.dim, style.font, StatusView.separator2, style.text, text + } + self.message_timeout = system.get_time() + config.message_timeout +end + + +function StatusView:update() + self.size.y = style.font:get_height() + style.padding.y * 2 + + if system.get_time() < self.message_timeout then + self.scroll.to.y = self.size.y + else + self.scroll.to.y = 0 + end + + StatusView.super.update(self) +end + + +local function draw_items(self, items, x, y, draw_fn) + local font = style.font + local color = style.text + + for _, item in ipairs(items) do + if type(item) == "userdata" then + font = item + elseif type(item) == "table" then + color = item + else + x = draw_fn(font, color, item, nil, x, y, 0, self.size.y) + end + end + + return x +end + + +local function text_width(font, _, text, _, x) + return x + font:get_width(text) +end + + +function StatusView:draw_items(items, right_align, yoffset) + local x, y = self:get_content_offset() + y = y + (yoffset or 0) + if right_align then + local w = draw_items(self, items, 0, 0, text_width) + x = x + self.size.x - w - style.padding.x + draw_items(self, items, x, y, common.draw_text) + else + x = x + style.padding.x + draw_items(self, items, x, y, common.draw_text) + end +end + + +function StatusView:get_items() + if getmetatable(core.active_view) == DocView then + local dv = core.active_view + local line, col = dv.doc:get_selection() + local dirty = dv.doc:is_dirty() + + return { + dirty and style.accent or style.text, style.icon_font, "f", + style.dim, style.font, self.separator2, style.text, + dv.doc.filename and style.text or style.dim, dv.doc:get_name(), + style.text, + self.separator, + "line: ", line, + self.separator, + col > config.line_limit and style.accent or style.text, "col: ", col, + style.text, + self.separator, + string.format("%d%%", line / #dv.doc.lines * 100), + }, { + style.icon_font, "g", + style.font, style.dim, self.separator2, style.text, + #dv.doc.lines, " lines", + self.separator, + dv.doc.crlf and "CRLF" or "LF" + } + end + + return {}, { + style.icon_font, "g", + style.font, style.dim, self.separator2, + #core.docs, style.text, " / ", + #core.project_files, " files" + } +end + + +function StatusView:draw() + self:draw_background(style.background2) + + if self.message then + self:draw_items(self.message, false, self.size.y) + end + + local left, right = self:get_items() + self:draw_items(left) + self:draw_items(right, true) +end + + +return StatusView diff --git a/data/core/strict.lua b/data/core/strict.lua new file mode 100644 index 0000000..7d4b9da --- /dev/null +++ b/data/core/strict.lua @@ -0,0 +1,26 @@ +local strict = {} +strict.defined = {} + + +-- used to define a global variable +function global(t) + for k, v in pairs(t) do + strict.defined[k] = true + rawset(_G, k, v) + end +end + + +function strict.__newindex(t, k, v) + error("cannot set undefined variable: " .. k, 2) +end + + +function strict.__index(t, k) + if not strict.defined[k] then + error("cannot get undefined variable: " .. k, 2) + end +end + + +setmetatable(_G, strict) diff --git a/data/core/style.lua b/data/core/style.lua new file mode 100644 index 0000000..ab597c2 --- /dev/null +++ b/data/core/style.lua @@ -0,0 +1,42 @@ +local common = require "core.common" +local style = {} + +style.padding = { x = common.round(14 * SCALE), y = common.round(7 * SCALE) } +style.divider_size = common.round(1 * SCALE) +style.scrollbar_size = common.round(4 * SCALE) +style.caret_width = common.round(2 * SCALE) +style.tab_width = common.round(170 * SCALE) + +style.font = renderer.font.load(EXEDIR .. "/data/fonts/font.ttf", 14 * SCALE) +style.big_font = renderer.font.load(EXEDIR .. "/data/fonts/font.ttf", 34 * SCALE) +style.icon_font = renderer.font.load(EXEDIR .. "/data/fonts/icons.ttf", 14 * SCALE) +style.code_font = renderer.font.load(EXEDIR .. "/data/fonts/monospace.ttf", 13.5 * SCALE) + +style.background = { common.color "#2e2e32" } +style.background2 = { common.color "#252529" } +style.background3 = { common.color "#252529" } +style.text = { common.color "#97979c" } +style.caret = { common.color "#93DDFA" } +style.accent = { common.color "#e1e1e6" } +style.dim = { common.color "#525257" } +style.divider = { common.color "#202024" } +style.selection = { common.color "#48484f" } +style.line_number = { common.color "#525259" } +style.line_number2 = { common.color "#83838f" } +style.line_highlight = { common.color "#343438" } +style.scrollbar = { common.color "#414146" } +style.scrollbar2 = { common.color "#4b4b52" } + +style.syntax = {} +style.syntax["normal"] = { common.color "#e1e1e6" } +style.syntax["symbol"] = { common.color "#e1e1e6" } +style.syntax["comment"] = { common.color "#676b6f" } +style.syntax["keyword"] = { common.color "#E58AC9" } +style.syntax["keyword2"] = { common.color "#F77483" } +style.syntax["number"] = { common.color "#FFA94D" } +style.syntax["literal"] = { common.color "#FFA94D" } +style.syntax["string"] = { common.color "#f7c95c" } +style.syntax["operator"] = { common.color "#93DDFA" } +style.syntax["function"] = { common.color "#93DDFA" } + +return style diff --git a/data/core/syntax.lua b/data/core/syntax.lua new file mode 100644 index 0000000..a763ac7 --- /dev/null +++ b/data/core/syntax.lua @@ -0,0 +1,30 @@ +local common = require "core.common" + +local syntax = {} +syntax.items = {} + +local plain_text_syntax = { patterns = {}, symbols = {} } + + +function syntax.add(t) + table.insert(syntax.items, t) +end + + +local function find(string, field) + for i = #syntax.items, 1, -1 do + local t = syntax.items[i] + if common.match_pattern(string, t[field] or {}) then + return t + end + end +end + +function syntax.get(filename, header) + return find(filename, "files") + or find(header, "headers") + or plain_text_syntax +end + + +return syntax diff --git a/data/core/tokenizer.lua b/data/core/tokenizer.lua new file mode 100644 index 0000000..98aafc7 --- /dev/null +++ b/data/core/tokenizer.lua @@ -0,0 +1,112 @@ +local tokenizer = {} + + +local function push_token(t, type, text) + local prev_type = t[#t-1] + local prev_text = t[#t] + if prev_type and (prev_type == type or prev_text:find("^%s*$")) then + t[#t-1] = type + t[#t] = prev_text .. text + else + table.insert(t, type) + table.insert(t, text) + end +end + + +local function is_escaped(text, idx, esc) + local byte = esc:byte() + local count = 0 + for i = idx - 1, 1, -1 do + if text:byte(i) ~= byte then break end + count = count + 1 + end + return count % 2 == 1 +end + + +local function find_non_escaped(text, pattern, offset, esc) + while true do + local s, e = text:find(pattern, offset) + if not s then break end + if esc and is_escaped(text, s, esc) then + offset = e + 1 + else + return s, e + end + end +end + + +function tokenizer.tokenize(syntax, text, state) + local res = {} + local i = 1 + + if #syntax.patterns == 0 then + return { "normal", text } + end + + while i <= #text do + -- continue trying to match the end pattern of a pair if we have a state set + if state then + local p = syntax.patterns[state] + local s, e = find_non_escaped(text, p.pattern[2], i, p.pattern[3]) + + if s then + push_token(res, p.type, text:sub(i, e)) + state = nil + i = e + 1 + else + push_token(res, p.type, text:sub(i)) + break + end + end + + -- find matching pattern + local matched = false + for n, p in ipairs(syntax.patterns) do + local pattern = (type(p.pattern) == "table") and p.pattern[1] or p.pattern + local s, e = text:find("^" .. pattern, i) + + if s then + -- matched pattern; make and add token + local t = text:sub(s, e) + push_token(res, syntax.symbols[t] or p.type, t) + + -- update state if this was a start|end pattern pair + if type(p.pattern) == "table" then + state = n + end + + -- move cursor past this token + i = e + 1 + matched = true + break + end + end + + -- consume character if we didn't match + if not matched then + push_token(res, "normal", text:sub(i, i)) + i = i + 1 + end + end + + return res, state +end + + +local function iter(t, i) + i = i + 2 + local type, text = t[i], t[i+1] + if type then + return i, type, text + end +end + +function tokenizer.each_token(t) + return iter, t, -1 +end + + +return tokenizer diff --git a/data/core/view.lua b/data/core/view.lua new file mode 100644 index 0000000..ae978a9 --- /dev/null +++ b/data/core/view.lua @@ -0,0 +1,151 @@ +local core = require "core" +local config = require "core.config" +local style = require "core.style" +local common = require "core.common" +local Object = require "core.object" + + +local View = Object:extend() + + +function View:new() + self.position = { x = 0, y = 0 } + self.size = { x = 0, y = 0 } + self.scroll = { x = 0, y = 0, to = { x = 0, y = 0 } } + self.cursor = "arrow" + self.scrollable = false +end + + +function View:move_towards(t, k, dest, rate) + if type(t) ~= "table" then + return self:move_towards(self, t, k, dest, rate) + end + local val = t[k] + if math.abs(val - dest) < 0.5 then + t[k] = dest + else + t[k] = common.lerp(val, dest, rate or 0.5) + end + if val ~= dest then + core.redraw = true + end +end + + +function View:try_close(do_close) + do_close() +end + + +function View:get_name() + return "---" +end + + +function View:get_scrollable_size() + return math.huge +end + + +function View:get_scrollbar_rect() + local sz = self:get_scrollable_size() + if sz <= self.size.y or sz == math.huge then + return 0, 0, 0, 0 + end + local h = math.max(20, self.size.y * self.size.y / sz) + return + self.position.x + self.size.x - style.scrollbar_size, + self.position.y + self.scroll.y * (self.size.y - h) / (sz - self.size.y), + style.scrollbar_size, + h +end + + +function View:scrollbar_overlaps_point(x, y) + local sx, sy, sw, sh = self:get_scrollbar_rect() + return x >= sx - sw * 3 and x < sx + sw and y >= sy and y < sy + sh +end + + +function View:on_mouse_pressed(button, x, y, clicks) + if self:scrollbar_overlaps_point(x, y) then + self.dragging_scrollbar = true + return true + end +end + + +function View:on_mouse_released(button, x, y) + self.dragging_scrollbar = false +end + + +function View:on_mouse_moved(x, y, dx, dy) + if self.dragging_scrollbar then + local delta = self:get_scrollable_size() / self.size.y * dy + self.scroll.to.y = self.scroll.to.y + delta + end + self.hovered_scrollbar = self:scrollbar_overlaps_point(x, y) +end + + +function View:on_text_input(text) + -- no-op +end + + +function View:on_mouse_wheel(y) + if self.scrollable then + self.scroll.to.y = self.scroll.to.y + y * -config.mouse_wheel_scroll + end +end + + +function View:get_content_bounds() + local x = self.scroll.x + local y = self.scroll.y + return x, y, x + self.size.x, y + self.size.y +end + + +function View:get_content_offset() + local x = common.round(self.position.x - self.scroll.x) + local y = common.round(self.position.y - self.scroll.y) + return x, y +end + + +function View:clamp_scroll_position() + local max = self:get_scrollable_size() - self.size.y + self.scroll.to.y = common.clamp(self.scroll.to.y, 0, max) +end + + +function View:update() + self:clamp_scroll_position() + self:move_towards(self.scroll, "x", self.scroll.to.x, 0.3) + self:move_towards(self.scroll, "y", self.scroll.to.y, 0.3) +end + + +function View:draw_background(color) + local x, y = self.position.x, self.position.y + local w, h = self.size.x, self.size.y + renderer.draw_rect(x, y, w + x % 1, h + y % 1, color) +end + + +function View:draw_scrollbar() + local x, y, w, h = self:get_scrollbar_rect() + local highlight = self.hovered_scrollbar or self.dragging_scrollbar + local color = highlight and style.scrollbar2 or style.scrollbar + renderer.draw_rect(x, y, w, h, color) +end + + +function View:draw() +end + + +return View diff --git a/data/fonts/font.ttf b/data/fonts/font.ttf new file mode 100644 index 0000000..2b6392f Binary files /dev/null and b/data/fonts/font.ttf differ diff --git a/data/fonts/icons.ttf b/data/fonts/icons.ttf new file mode 100644 index 0000000..d74fe73 Binary files /dev/null and b/data/fonts/icons.ttf differ diff --git a/data/fonts/monospace.ttf b/data/fonts/monospace.ttf new file mode 100644 index 0000000..5919b5d Binary files /dev/null and b/data/fonts/monospace.ttf differ diff --git a/data/plugins/autocomplete.lua b/data/plugins/autocomplete.lua new file mode 100644 index 0000000..79e4513 --- /dev/null +++ b/data/plugins/autocomplete.lua @@ -0,0 +1,284 @@ +local core = require "core" +local common = require "core.common" +local config = require "core.config" +local command = require "core.command" +local style = require "core.style" +local keymap = require "core.keymap" +local translate = require "core.doc.translate" +local RootView = require "core.rootview" +local DocView = require "core.docview" + +config.autocomplete_max_suggestions = 6 + +local autocomplete = {} +autocomplete.map = {} + + +local mt = { __tostring = function(t) return t.text end } + +function autocomplete.add(t) + local items = {} + for text, info in pairs(t.items) do + info = (type(info) == "string") and info + table.insert(items, setmetatable({ text = text, info = info }, mt)) + end + autocomplete.map[t.name] = { files = t.files or ".*", items = items } +end + + +core.add_thread(function() + local cache = setmetatable({}, { __mode = "k" }) + + local function get_symbols(doc) + local i = 1 + local s = {} + while i < #doc.lines do + for sym in doc.lines[i]:gmatch(config.symbol_pattern) do + s[sym] = true + end + i = i + 1 + if i % 100 == 0 then coroutine.yield() end + end + return s + end + + local function cache_is_valid(doc) + local c = cache[doc] + return c and c.last_change_id == doc:get_change_id() + end + + while true do + local symbols = {} + + -- lift all symbols from all docs + for _, doc in ipairs(core.docs) do + -- update the cache if the doc has changed since the last iteration + if not cache_is_valid(doc) then + cache[doc] = { + last_change_id = doc:get_change_id(), + symbols = get_symbols(doc) + } + end + -- update symbol set with doc's symbol set + for sym in pairs(cache[doc].symbols) do + symbols[sym] = true + end + coroutine.yield() + end + + -- update symbols list + autocomplete.add { name = "open-docs", items = symbols } + + -- wait for next scan + local valid = true + while valid do + coroutine.yield(1) + for _, doc in ipairs(core.docs) do + if not cache_is_valid(doc) then + valid = false + end + end + end + + end +end) + + +local partial = "" +local suggestions_idx = 1 +local suggestions = {} +local last_line, last_col + + +local function reset_suggestions() + suggestions_idx = 1 + suggestions = {} +end + + +local function update_suggestions() + local doc = core.active_view.doc + local filename = doc and doc.filename or "" + + -- get all relevant suggestions for given filename + local items = {} + for _, v in pairs(autocomplete.map) do + if common.match_pattern(filename, v.files) then + for _, item in pairs(v.items) do + table.insert(items, item) + end + end + end + + -- fuzzy match, remove duplicates and store + items = common.fuzzy_match(items, partial) + local j = 1 + for i = 1, config.autocomplete_max_suggestions do + suggestions[i] = items[j] + while items[j] and items[i].text == items[j].text do + items[i].info = items[i].info or items[j].info + j = j + 1 + end + end +end + + +local function get_partial_symbol() + local doc = core.active_view.doc + local line2, col2 = doc:get_selection() + local line1, col1 = doc:position_offset(line2, col2, translate.start_of_word) + return doc:get_text(line1, col1, line2, col2) +end + + +local function get_active_view() + if getmetatable(core.active_view) == DocView then + return core.active_view + end +end + + +local function get_suggestions_rect(av) + if #suggestions == 0 then + return 0, 0, 0, 0 + end + + local line, col = av.doc:get_selection() + local x, y = av:get_line_screen_position(line) + x = x + av:get_col_x_offset(line, col - #partial) + y = y + av:get_line_height() + style.padding.y + local font = av:get_font() + local th = font:get_height() + + local max_width = 0 + for _, s in ipairs(suggestions) do + local w = font:get_width(s.text) + if s.info then + w = w + style.font:get_width(s.info) + style.padding.x + end + max_width = math.max(max_width, w) + end + + return + x - style.padding.x, + y - style.padding.y, + max_width + style.padding.x * 2, + #suggestions * (th + style.padding.y) + style.padding.y +end + + +local function draw_suggestions_box(av) + -- draw background rect + local rx, ry, rw, rh = get_suggestions_rect(av) + renderer.draw_rect(rx, ry, rw, rh, style.background3) + + -- draw text + local font = av:get_font() + local lh = font:get_height() + style.padding.y + local y = ry + style.padding.y / 2 + for i, s in ipairs(suggestions) do + local color = (i == suggestions_idx) and style.accent or style.text + common.draw_text(font, color, s.text, "left", rx + style.padding.x, y, rw, lh) + if s.info then + color = (i == suggestions_idx) and style.text or style.dim + common.draw_text(style.font, color, s.info, "right", rx, y, rw - style.padding.x, lh) + end + y = y + lh + end +end + + +-- patch event logic into RootView +local on_text_input = RootView.on_text_input +local update = RootView.update +local draw = RootView.draw + + +RootView.on_text_input = function(...) + on_text_input(...) + + local av = get_active_view() + if av then + -- update partial symbol and suggestions + partial = get_partial_symbol() + if #partial >= 3 then + update_suggestions() + last_line, last_col = av.doc:get_selection() + else + reset_suggestions() + end + + -- scroll if rect is out of bounds of view + local _, y, _, h = get_suggestions_rect(av) + local limit = av.position.y + av.size.y + if y + h > limit then + av.scroll.to.y = av.scroll.y + y + h - limit + end + end +end + + +RootView.update = function(...) + update(...) + + local av = get_active_view() + if av then + -- reset suggestions if caret was moved + local line, col = av.doc:get_selection() + if line ~= last_line or col ~= last_col then + reset_suggestions() + end + end +end + + +RootView.draw = function(...) + draw(...) + + local av = get_active_view() + if av then + -- draw suggestions box after everything else + core.root_view:defer_draw(draw_suggestions_box, av) + end +end + + +local function predicate() + return get_active_view() and #suggestions > 0 +end + + +command.add(predicate, { + ["autocomplete:complete"] = function() + local doc = core.active_view.doc + local line, col = doc:get_selection() + local text = suggestions[suggestions_idx].text + doc:insert(line, col, text) + doc:remove(line, col, line, col - #partial) + doc:set_selection(line, col + #text - #partial) + reset_suggestions() + end, + + ["autocomplete:previous"] = function() + suggestions_idx = math.max(suggestions_idx - 1, 1) + end, + + ["autocomplete:next"] = function() + suggestions_idx = math.min(suggestions_idx + 1, #suggestions) + end, + + ["autocomplete:cancel"] = function() + reset_suggestions() + end, +}) + + +keymap.add { + ["tab"] = "autocomplete:complete", + ["up"] = "autocomplete:previous", + ["down"] = "autocomplete:next", + ["escape"] = "autocomplete:cancel", +} + + +return autocomplete diff --git a/data/plugins/autoreload.lua b/data/plugins/autoreload.lua new file mode 100644 index 0000000..a077b6d --- /dev/null +++ b/data/plugins/autoreload.lua @@ -0,0 +1,61 @@ +local core = require "core" +local config = require "core.config" +local Doc = require "core.doc" + + +local times = setmetatable({}, { __mode = "k" }) + +local function update_time(doc) + local info = system.get_file_info(doc.filename) + times[doc] = info.modified +end + + +local function reload_doc(doc) + local fp = io.open(doc.filename, "r") + local text = fp:read("*a") + fp:close() + + local sel = { doc:get_selection() } + doc:remove(1, 1, math.huge, math.huge) + doc:insert(1, 1, text:gsub("\r", ""):gsub("\n$", "")) + doc:set_selection(table.unpack(sel)) + + update_time(doc) + doc:clean() + core.log_quiet("Auto-reloaded doc \"%s\"", doc.filename) +end + + +core.add_thread(function() + while true do + -- check all doc modified times + for _, doc in ipairs(core.docs) do + local info = system.get_file_info(doc.filename or "") + if info and times[doc] ~= info.modified then + reload_doc(doc) + end + coroutine.yield() + end + + -- wait for next scan + coroutine.yield(config.project_scan_rate) + end +end) + + +-- patch `Doc.save|load` to store modified time +local load = Doc.load +local save = Doc.save + +Doc.load = function(self, ...) + local res = load(self, ...) + update_time(self) + return res +end + +Doc.save = function(self, ...) + local res = save(self, ...) + update_time(self) + return res +end diff --git a/data/plugins/language_c.lua b/data/plugins/language_c.lua new file mode 100644 index 0000000..8e8ee98 --- /dev/null +++ b/data/plugins/language_c.lua @@ -0,0 +1,59 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.c$", "%.h$", "%.inl$", "%.cpp$", "%.hpp$" }, + comment = "//", + patterns = { + { pattern = "//.-\n", type = "comment" }, + { pattern = { "/%*", "%*/" }, type = "comment" }, + { pattern = { "#", "[^\\]\n" }, type = "comment" }, + { pattern = { '"', '"', '\\' }, type = "string" }, + { pattern = { "'", "'", '\\' }, type = "string" }, + { pattern = "-?0x%x+", type = "number" }, + { pattern = "-?%d+[%d%.eE]*f?", type = "number" }, + { pattern = "-?%.?%d+f?", type = "number" }, + { pattern = "[%+%-=/%*%^%%<>!~|&]", type = "operator" }, + { pattern = "[%a_][%w_]*%f[(]", type = "function" }, + { pattern = "[%a_][%w_]*", type = "symbol" }, + }, + symbols = { + ["if"] = "keyword", + ["then"] = "keyword", + ["else"] = "keyword", + ["elseif"] = "keyword", + ["do"] = "keyword", + ["while"] = "keyword", + ["for"] = "keyword", + ["break"] = "keyword", + ["continue"] = "keyword", + ["return"] = "keyword", + ["goto"] = "keyword", + ["struct"] = "keyword", + ["union"] = "keyword", + ["typedef"] = "keyword", + ["enum"] = "keyword", + ["extern"] = "keyword", + ["static"] = "keyword", + ["volatile"] = "keyword", + ["const"] = "keyword", + ["inline"] = "keyword", + ["switch"] = "keyword", + ["case"] = "keyword", + ["default"] = "keyword", + ["auto"] = "keyword", + ["const"] = "keyword", + ["void"] = "keyword", + ["int"] = "keyword2", + ["short"] = "keyword2", + ["long"] = "keyword2", + ["float"] = "keyword2", + ["double"] = "keyword2", + ["char"] = "keyword2", + ["unsigned"] = "keyword2", + ["bool"] = "keyword2", + ["true"] = "literal", + ["false"] = "literal", + ["NULL"] = "literal", + }, +} + diff --git a/data/plugins/language_css.lua b/data/plugins/language_css.lua new file mode 100644 index 0000000..021c5d3 --- /dev/null +++ b/data/plugins/language_css.lua @@ -0,0 +1,23 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.css$" }, + patterns = { + { pattern = "\\.", type = "normal" }, + { pattern = "//.-\n", type = "comment" }, + { pattern = { "/%*", "%*/" }, type = "comment" }, + { pattern = { '"', '"', '\\' }, type = "string" }, + { pattern = { "'", "'", '\\' }, type = "string" }, + { pattern = "[%a][%w-]*%s*%f[:]", type = "keyword" }, + { pattern = "#%x+", type = "string" }, + { pattern = "-?%d+[%d%.]*p[xt]", type = "number" }, + { pattern = "-?%d+[%d%.]*deg", type = "number" }, + { pattern = "-?%d+[%d%.]*", type = "number" }, + { pattern = "[%a_][%w_]*", type = "symbol" }, + { pattern = "#[%a][%w_-]*", type = "keyword2" }, + { pattern = "@[%a][%w_-]*", type = "keyword2" }, + { pattern = "%.[%a][%w_-]*", type = "keyword2" }, + { pattern = "[{}:]", type = "operator" }, + }, + symbols = {}, +} diff --git a/data/plugins/language_js.lua b/data/plugins/language_js.lua new file mode 100644 index 0000000..cf1b124 --- /dev/null +++ b/data/plugins/language_js.lua @@ -0,0 +1,67 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.js$", "%.json$", "%.cson$" }, + comment = "//", + patterns = { + { pattern = "//.-\n", type = "comment" }, + { pattern = { "/%*", "%*/" }, type = "comment" }, + { pattern = { '"', '"', '\\' }, type = "string" }, + { pattern = { "'", "'", '\\' }, type = "string" }, + { pattern = { "`", "`", '\\' }, type = "string" }, + { pattern = "0x[%da-fA-F]+", type = "number" }, + { pattern = "-?%d+[%d%.eE]*", type = "number" }, + { pattern = "-?%.?%d+", type = "number" }, + { pattern = "[%+%-=/%*%^%%<>!~|&]", type = "operator" }, + { pattern = "[%a_][%w_]*%f[(]", type = "function" }, + { pattern = "[%a_][%w_]*", type = "symbol" }, + }, + symbols = { + ["async"] = "keyword", + ["await"] = "keyword", + ["break"] = "keyword", + ["case"] = "keyword", + ["catch"] = "keyword", + ["class"] = "keyword", + ["const"] = "keyword", + ["continue"] = "keyword", + ["debugger"] = "keyword", + ["default"] = "keyword", + ["delete"] = "keyword", + ["do"] = "keyword", + ["else"] = "keyword", + ["export"] = "keyword", + ["extends"] = "keyword", + ["finally"] = "keyword", + ["for"] = "keyword", + ["function"] = "keyword", + ["get"] = "keyword", + ["if"] = "keyword", + ["import"] = "keyword", + ["in"] = "keyword", + ["instanceof"] = "keyword", + ["let"] = "keyword", + ["new"] = "keyword", + ["return"] = "keyword", + ["set"] = "keyword", + ["static"] = "keyword", + ["super"] = "keyword", + ["switch"] = "keyword", + ["throw"] = "keyword", + ["try"] = "keyword", + ["typeof"] = "keyword", + ["var"] = "keyword", + ["void"] = "keyword", + ["while"] = "keyword", + ["with"] = "keyword", + ["yield"] = "keyword", + ["true"] = "literal", + ["false"] = "literal", + ["null"] = "literal", + ["undefined"] = "literal", + ["arguments"] = "keyword2", + ["Infinity"] = "keyword2", + ["NaN"] = "keyword2", + ["this"] = "keyword2", + }, +} diff --git a/data/plugins/language_lua.lua b/data/plugins/language_lua.lua new file mode 100644 index 0000000..915d273 --- /dev/null +++ b/data/plugins/language_lua.lua @@ -0,0 +1,50 @@ +local syntax = require "core.syntax" + +syntax.add { + files = "%.lua$", + headers = "^#!.*[ /]lua", + comment = "--", + patterns = { + { pattern = { '"', '"', '\\' }, type = "string" }, + { pattern = { "'", "'", '\\' }, type = "string" }, + { pattern = { "%[%[", "%]%]" }, type = "string" }, + { pattern = { "%-%-%[%[", "%]%]"}, type = "comment" }, + { pattern = "%-%-.-\n", type = "comment" }, + { pattern = "-?0x%x+", type = "number" }, + { pattern = "-?%d+[%d%.eE]*", type = "number" }, + { pattern = "-?%.?%d+", type = "number" }, + { pattern = "<%a+>", type = "keyword2" }, + { pattern = "%.%.%.?", type = "operator" }, + { pattern = "[<>~=]=", type = "operator" }, + { pattern = "[%+%-=/%*%^%%#<>]", type = "operator" }, + { pattern = "[%a_][%w_]*%s*%f[(\"{]", type = "function" }, + { pattern = "[%a_][%w_]*", type = "symbol" }, + { pattern = "::[%a_][%w_]*::", type = "function" }, + }, + symbols = { + ["if"] = "keyword", + ["then"] = "keyword", + ["else"] = "keyword", + ["elseif"] = "keyword", + ["end"] = "keyword", + ["do"] = "keyword", + ["function"] = "keyword", + ["repeat"] = "keyword", + ["until"] = "keyword", + ["while"] = "keyword", + ["for"] = "keyword", + ["break"] = "keyword", + ["return"] = "keyword", + ["local"] = "keyword", + ["in"] = "keyword", + ["not"] = "keyword", + ["and"] = "keyword", + ["or"] = "keyword", + ["goto"] = "keyword", + ["self"] = "keyword2", + ["true"] = "literal", + ["false"] = "literal", + ["nil"] = "literal", + }, +} + diff --git a/data/plugins/language_make.lua b/data/plugins/language_make.lua new file mode 100644 index 0000000..f586a05 --- /dev/null +++ b/data/plugins/language_make.lua @@ -0,0 +1,17 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "Makefile", "makefile", "%.mk$" }, + comment = "#", + patterns = { + { pattern = "#.*\n", type = "comment" }, + { pattern = [[\.]], type = "normal" }, + { pattern = "$[@^<%%?+|*]", type = "keyword2" }, + { pattern = "$%(.-%)", type = "variable" }, + { pattern = "%f[%w_][%d%.]+%f[^%w_]", type = "number" }, + { pattern = "%..*:", type = "keyword2" }, + { pattern = ".*:", type = "function" }, + }, + symbols = { + }, +} diff --git a/data/plugins/language_md.lua b/data/plugins/language_md.lua new file mode 100644 index 0000000..9f0f14e --- /dev/null +++ b/data/plugins/language_md.lua @@ -0,0 +1,21 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.md$", "%.markdown$" }, + patterns = { + { pattern = "\\.", type = "normal" }, + { pattern = { "" }, type = "comment" }, + { pattern = { "```", "```" }, type = "string" }, + { pattern = { "``", "``", "\\" }, type = "string" }, + { pattern = { "`", "`", "\\" }, type = "string" }, + { pattern = { "~~", "~~", "\\" }, type = "keyword2" }, + { pattern = "%-%-%-+", type = "comment" }, + { pattern = "%*%s+", type = "operator" }, + { pattern = { "%*", "[%*\n]", "\\" }, type = "operator" }, + { pattern = { "%_", "[%_\n]", "\\" }, type = "keyword2" }, + { pattern = "#.-\n", type = "keyword" }, + { pattern = "!?%[.-%]%(.-%)", type = "function" }, + { pattern = "https?://%S+", type = "function" }, + }, + symbols = { }, +} diff --git a/data/plugins/language_python.lua b/data/plugins/language_python.lua new file mode 100644 index 0000000..e6315c4 --- /dev/null +++ b/data/plugins/language_python.lua @@ -0,0 +1,55 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.py$", "%.pyw$" }, + headers = "^#!.*[ /]python", + comment = "#", + patterns = { + { pattern = { "#", "\n" }, type = "comment" }, + { pattern = { '[ruU]?"', '"', '\\' }, type = "string" }, + { pattern = { "[ruU]?'", "'", '\\' }, type = "string" }, + { pattern = { '"""', '"""' }, type = "string" }, + { pattern = "0x[%da-fA-F]+", type = "number" }, + { pattern = "-?%d+[%d%.eE]*", type = "number" }, + { pattern = "-?%.?%d+", type = "number" }, + { pattern = "[%+%-=/%*%^%%<>!~|&]", type = "operator" }, + { pattern = "[%a_][%w_]*%f[(]", type = "function" }, + { pattern = "[%a_][%w_]*", type = "symbol" }, + }, + symbols = { + ["class"] = "keyword", + ["finally"] = "keyword", + ["is"] = "keyword", + ["return"] = "keyword", + ["continue"] = "keyword", + ["for"] = "keyword", + ["lambda"] = "keyword", + ["try"] = "keyword", + ["def"] = "keyword", + ["from"] = "keyword", + ["nonlocal"] = "keyword", + ["while"] = "keyword", + ["and"] = "keyword", + ["global"] = "keyword", + ["not"] = "keyword", + ["with"] = "keyword", + ["as"] = "keyword", + ["elif"] = "keyword", + ["if"] = "keyword", + ["or"] = "keyword", + ["else"] = "keyword", + ["import"] = "keyword", + ["pass"] = "keyword", + ["break"] = "keyword", + ["except"] = "keyword", + ["in"] = "keyword", + ["del"] = "keyword", + ["raise"] = "keyword", + ["yield"] = "keyword", + ["assert"] = "keyword", + ["self"] = "keyword2", + ["None"] = "literal", + ["True"] = "literal", + ["False"] = "literal", + } +} diff --git a/data/plugins/language_xml.lua b/data/plugins/language_xml.lua new file mode 100644 index 0000000..5240bdc --- /dev/null +++ b/data/plugins/language_xml.lua @@ -0,0 +1,21 @@ +local syntax = require "core.syntax" + +syntax.add { + files = { "%.xml$", "%.html?$" }, + headers = "<%?xml", + patterns = { + { pattern = { "" }, type = "comment" }, + { pattern = { '%f[^>][^<]', '%f[<]' }, type = "normal" }, + { pattern = { '"', '"', '\\' }, type = "string" }, + { pattern = { "'", "'", '\\' }, type = "string" }, + { pattern = "0x[%da-fA-F]+", type = "number" }, + { pattern = "-?%d+[%d%.]*f?", type = "number" }, + { pattern = "-?%.?%d+f?", type = "number" }, + { pattern = "%f[^<]![%a_][%w_]*", type = "keyword2" }, + { pattern = "%f[^<][%a_][%w_]*", type = "function" }, + { pattern = "%f[^<]/[%a_][%w_]*", type = "function" }, + { pattern = "[%a_][%w_]*", type = "keyword" }, + { pattern = "[/<>=]", type = "operator" }, + }, + symbols = {}, +} diff --git a/data/plugins/macro.lua b/data/plugins/macro.lua new file mode 100644 index 0000000..3458977 --- /dev/null +++ b/data/plugins/macro.lua @@ -0,0 +1,69 @@ +local core = require "core" +local command = require "core.command" +local keymap = require "core.keymap" + +local handled_events = { + ["keypressed"] = true, + ["keyreleased"] = true, + ["textinput"] = true, +} + +local state = "stopped" +local event_buffer = {} +local modkeys = {} + +local on_event = core.on_event + +core.on_event = function(type, ...) + local res = on_event(type, ...) + if state == "recording" and handled_events[type] then + table.insert(event_buffer, { type, ... }) + end + return res +end + + +local function clone(t) + local res = {} + for k, v in pairs(t) do res[k] = v end + return res +end + + +local function predicate() + return state ~= "playing" +end + + +command.add(predicate, { + ["macro:toggle-record"] = function() + if state == "stopped" then + state = "recording" + event_buffer = {} + modkeys = clone(keymap.modkeys) + core.log("Recording macro...") + else + state = "stopped" + core.log("Stopped recording macro (%d events)", #event_buffer) + end + end, + + ["macro:play"] = function() + state = "playing" + core.log("Playing macro... (%d events)", #event_buffer) + local mk = keymap.modkeys + keymap.modkeys = clone(modkeys) + for _, ev in ipairs(event_buffer) do + on_event(table.unpack(ev)) + core.root_view:update() + end + keymap.modkeys = mk + state = "stopped" + end, +}) + + +keymap.add { + ["ctrl+shift+;"] = "macro:toggle-record", + ["ctrl+;"] = "macro:play", +} diff --git a/data/plugins/projectsearch.lua b/data/plugins/projectsearch.lua new file mode 100644 index 0000000..884e66a --- /dev/null +++ b/data/plugins/projectsearch.lua @@ -0,0 +1,271 @@ +local core = require "core" +local common = require "core.common" +local keymap = require "core.keymap" +local command = require "core.command" +local style = require "core.style" +local View = require "core.view" + + +local ResultsView = View:extend() + + +function ResultsView:new(text, fn) + ResultsView.super.new(self) + self.scrollable = true + self.brightness = 0 + self:begin_search(text, fn) +end + + +function ResultsView:get_name() + return "Search Results" +end + + +local function find_all_matches_in_file(t, filename, fn) + local fp = io.open(filename) + if not fp then return t end + local n = 1 + for line in fp:lines() do + local s = fn(line) + if s then + table.insert(t, { file = filename, text = line, line = n, col = s }) + core.redraw = true + end + if n % 100 == 0 then coroutine.yield() end + n = n + 1 + core.redraw = true + end + fp:close() +end + + +function ResultsView:begin_search(text, fn) + self.search_args = { text, fn } + self.results = {} + self.last_file_idx = 1 + self.query = text + self.searching = true + self.selected_idx = 0 + + core.add_thread(function() + for i, file in ipairs(core.project_files) do + if file.type == "file" then + find_all_matches_in_file(self.results, file.filename, fn) + end + self.last_file_idx = i + end + self.searching = false + self.brightness = 100 + core.redraw = true + end, self.results) + + self.scroll.to.y = 0 +end + + +function ResultsView:refresh() + self:begin_search(table.unpack(self.search_args)) +end + + +function ResultsView:on_mouse_moved(mx, my, ...) + ResultsView.super.on_mouse_moved(self, mx, my, ...) + self.selected_idx = 0 + for i, item, x,y,w,h in self:each_visible_result() do + if mx >= x and my >= y and mx < x + w and my < y + h then + self.selected_idx = i + break + end + end +end + + +function ResultsView:on_mouse_pressed(...) + local caught = ResultsView.super.on_mouse_pressed(self, ...) + if not caught then + self:open_selected_result() + end +end + + +function ResultsView:open_selected_result() + local res = self.results[self.selected_idx] + if not res then + return + end + core.try(function() + local dv = core.root_view:open_doc(core.open_doc(res.file)) + core.root_view.root_node:update_layout() + dv.doc:set_selection(res.line, res.col) + dv:scroll_to_line(res.line, false, true) + end) +end + + +function ResultsView:update() + self:move_towards("brightness", 0, 0.1) + ResultsView.super.update(self) +end + + +function ResultsView:get_results_yoffset() + return style.font:get_height() + style.padding.y * 3 +end + + +function ResultsView:get_line_height() + return style.padding.y + style.font:get_height() +end + + +function ResultsView:get_scrollable_size() + return self:get_results_yoffset() + #self.results * self:get_line_height() +end + + +function ResultsView:get_visible_results_range() + local lh = self:get_line_height() + local oy = self:get_results_yoffset() + local min = math.max(1, math.floor((self.scroll.y - oy) / lh)) + return min, min + math.floor(self.size.y / lh) + 1 +end + + +function ResultsView:each_visible_result() + return coroutine.wrap(function() + local lh = self:get_line_height() + local x, y = self:get_content_offset() + local min, max = self:get_visible_results_range() + y = y + self:get_results_yoffset() + lh * (min - 1) + for i = min, max do + local item = self.results[i] + if not item then break end + coroutine.yield(i, item, x, y, self.size.x, lh) + y = y + lh + end + end) +end + + +function ResultsView:scroll_to_make_selected_visible() + local h = self:get_line_height() + local y = self:get_results_yoffset() + h * (self.selected_idx - 1) + self.scroll.to.y = math.min(self.scroll.to.y, y) + self.scroll.to.y = math.max(self.scroll.to.y, y + h - self.size.y) +end + + +function ResultsView:draw() + self:draw_background(style.background) + + -- status + local ox, oy = self:get_content_offset() + local x, y = ox + style.padding.x, oy + style.padding.y + local per = self.last_file_idx / #core.project_files + local text + if self.searching then + text = string.format("Searching %d%% (%d of %d files, %d matches) for %q...", + per * 100, self.last_file_idx, #core.project_files, + #self.results, self.query) + else + text = string.format("Found %d matches for %q", + #self.results, self.query) + end + local color = common.lerp(style.text, style.accent, self.brightness / 100) + renderer.draw_text(style.font, text, x, y, color) + + -- horizontal line + local yoffset = self:get_results_yoffset() + local x = ox + style.padding.x + local w = self.size.x - style.padding.x * 2 + local h = style.divider_size + local color = common.lerp(style.dim, style.text, self.brightness / 100) + renderer.draw_rect(x, oy + yoffset - style.padding.y, w, h, color) + if self.searching then + renderer.draw_rect(x, oy + yoffset - style.padding.y, w * per, h, style.text) + end + + -- results + local y1, y2 = self.position.y, self.position.y + self.size.y + for i, item, x,y,w,h in self:each_visible_result() do + local color = style.text + if i == self.selected_idx then + color = style.accent + renderer.draw_rect(x, y, w, h, style.line_highlight) + end + x = x + style.padding.x + local text = string.format("%s at line %d (col %d): ", item.file, item.line, item.col) + x = common.draw_text(style.font, style.dim, text, "left", x, y, w, h) + x = common.draw_text(style.code_font, color, item.text, "left", x, y, w, h) + end + + self:draw_scrollbar() +end + + +local function begin_search(text, fn) + if text == "" then + core.error("Expected non-empty string") + return + end + local rv = ResultsView(text, fn) + core.root_view:get_active_node():add_view(rv) +end + + +command.add(nil, { + ["project-search:find"] = function() + core.command_view:enter("Find Text In Project", function(text) + text = text:lower() + begin_search(text, function(line_text) + return line_text:lower():find(text, nil, true) + end) + end) + end, + + ["project-search:find-pattern"] = function() + core.command_view:enter("Find Pattern In Project", function(text) + begin_search(text, function(line_text) return line_text:find(text) end) + end) + end, + + ["project-search:fuzzy-find"] = function() + core.command_view:enter("Fuzzy Find Text In Project", function(text) + begin_search(text, function(line_text) + return common.fuzzy_match(line_text, text) and 1 + end) + end) + end, +}) + + +command.add(ResultsView, { + ["project-search:select-previous"] = function() + local view = core.active_view + view.selected_idx = math.max(view.selected_idx - 1, 1) + view:scroll_to_make_selected_visible() + end, + + ["project-search:select-next"] = function() + local view = core.active_view + view.selected_idx = math.min(view.selected_idx + 1, #view.results) + view:scroll_to_make_selected_visible() + end, + + ["project-search:open-selected"] = function() + core.active_view:open_selected_result() + end, + + ["project-search:refresh"] = function() + core.active_view:refresh() + end, +}) + +keymap.add { + ["f5"] = "project-search:refresh", + ["ctrl+shift+f"] = "project-search:find", + ["up"] = "project-search:select-previous", + ["down"] = "project-search:select-next", + ["return"] = "project-search:open-selected", +} diff --git a/data/plugins/quote.lua b/data/plugins/quote.lua new file mode 100644 index 0000000..b17407d --- /dev/null +++ b/data/plugins/quote.lua @@ -0,0 +1,30 @@ +local core = require "core" +local command = require "core.command" +local keymap = require "core.keymap" + + +local escapes = { + ["\\"] = "\\\\", + ["\""] = "\\\"", + ["\n"] = "\\n", + ["\r"] = "\\r", + ["\t"] = "\\t", + ["\b"] = "\\b", +} + +local function replace(chr) + return escapes[chr] or string.format("\\x%02x", chr:byte()) +end + + +command.add("core.docview", { + ["quote:quote"] = function() + core.active_view.doc:replace(function(text) + return '"' .. text:gsub("[\0-\31\\\"]", replace) .. '"' + end) + end, +}) + +keymap.add { + ["ctrl+'"] = "quote:quote", +} diff --git a/data/plugins/reflow.lua b/data/plugins/reflow.lua new file mode 100644 index 0000000..95090a6 --- /dev/null +++ b/data/plugins/reflow.lua @@ -0,0 +1,63 @@ +local core = require "core" +local config = require "core.config" +local command = require "core.command" +local keymap = require "core.keymap" + + +local function wordwrap_text(text, limit) + local t = {} + local n = 0 + + for word in text:gmatch("%S+") do + if n + #word > limit then + table.insert(t, "\n") + n = 0 + elseif #t > 0 then + table.insert(t, " ") + end + table.insert(t, word) + n = n + #word + 1 + end + + return table.concat(t) +end + + +command.add("core.docview", { + ["reflow:reflow"] = function() + local doc = core.active_view.doc + doc:replace(function(text) + local prefix_set = "[^%w\n%[%](){}`'\"]*" + + -- get line prefix and trailing whitespace + local prefix1 = text:match("^\n*" .. prefix_set) + local prefix2 = text:match("\n(" .. prefix_set .. ")", #prefix1+1) + local trailing = text:match("%s*$") + if not prefix2 or prefix2 == "" then + prefix2 = prefix1 + end + + -- strip all line prefixes and trailing whitespace + text = text:sub(#prefix1+1, -#trailing - 1):gsub("\n" .. prefix_set, "\n") + + -- split into blocks, wordwrap and join + local line_limit = config.line_limit - #prefix1 + local blocks = {} + text = text:gsub("\n\n", "\0") + for block in text:gmatch("%Z+") do + table.insert(blocks, wordwrap_text(block, line_limit)) + end + text = table.concat(blocks, "\n\n") + + -- add prefix to start of lines + text = prefix1 .. text:gsub("\n", "\n" .. prefix2) .. trailing + + return text + end) + end, +}) + + +keymap.add { + ["ctrl+shift+q"] = "reflow:reflow" +} diff --git a/data/plugins/tabularize.lua b/data/plugins/tabularize.lua new file mode 100644 index 0000000..f4dda1f --- /dev/null +++ b/data/plugins/tabularize.lua @@ -0,0 +1,60 @@ +local core = require "core" +local command = require "core.command" +local translate = require "core.doc.translate" + + +local function gmatch_to_array(text, ptn) + local res = {} + for x in text:gmatch(ptn) do + table.insert(res, x) + end + return res +end + + +local function tabularize_lines(lines, delim) + local rows = {} + local cols = {} + + -- split lines at delimiters and get maximum width of columns + local ptn = "[^" .. delim:sub(1,1):gsub("%W", "%%%1") .. "]+" + for i, line in ipairs(lines) do + rows[i] = gmatch_to_array(line, ptn) + for j, col in ipairs(rows[i]) do + cols[j] = math.max(#col, cols[j] or 0) + end + end + + -- pad columns with space + for _, row in ipairs(rows) do + for i = 1, #row - 1 do + row[i] = row[i] .. string.rep(" ", cols[i] - #row[i]) + end + end + + -- write columns back to lines array + for i, line in ipairs(lines) do + lines[i] = table.concat(rows[i], delim) + end +end + + +command.add("core.docview", { + ["tabularize:tabularize"] = function() + core.command_view:enter("Tabularize On Delimiter", function(delim) + if delim == "" then delim = " " end + + local doc = core.active_view.doc + local line1, col1, line2, col2, swap = doc:get_selection(true) + line1, col1 = doc:position_offset(line1, col1, translate.start_of_line) + line2, col2 = doc:position_offset(line2, col2, translate.end_of_line) + doc:set_selection(line1, col1, line2, col2, swap) + + doc:replace(function(text) + local lines = gmatch_to_array(text, "[^\n]*\n?") + tabularize_lines(lines, delim) + return table.concat(lines) + end) + end) + end, +}) diff --git a/data/plugins/treeview.lua b/data/plugins/treeview.lua new file mode 100644 index 0000000..8aa53ff --- /dev/null +++ b/data/plugins/treeview.lua @@ -0,0 +1,197 @@ +local core = require "core" +local common = require "core.common" +local command = require "core.command" +local config = require "core.config" +local keymap = require "core.keymap" +local style = require "core.style" +local View = require "core.view" + +config.treeview_size = 200 * SCALE + +local function get_depth(filename) + local n = 0 + for sep in filename:gmatch("[\\/]") do + n = n + 1 + end + return n +end + + +local TreeView = View:extend() + +function TreeView:new() + TreeView.super.new(self) + self.scrollable = true + self.visible = true + self.init_size = true + self.cache = {} +end + + +function TreeView:get_cached(item) + local t = self.cache[item.filename] + if not t then + t = {} + t.filename = item.filename + t.abs_filename = system.absolute_path(item.filename) + t.name = t.filename:match("[^\\/]+$") + t.depth = get_depth(t.filename) + t.type = item.type + self.cache[t.filename] = t + end + return t +end + + +function TreeView:get_name() + return "Project" +end + + +function TreeView:get_item_height() + return style.font:get_height() + style.padding.y +end + + +function TreeView:check_cache() + -- invalidate cache's skip values if project_files has changed + if core.project_files ~= self.last_project_files then + for _, v in pairs(self.cache) do + v.skip = nil + end + self.last_project_files = core.project_files + end +end + + +function TreeView:each_item() + return coroutine.wrap(function() + self:check_cache() + local ox, oy = self:get_content_offset() + local y = oy + style.padding.y + local w = self.size.x + local h = self:get_item_height() + + local i = 1 + while i <= #core.project_files do + local item = core.project_files[i] + local cached = self:get_cached(item) + + coroutine.yield(cached, ox, y, w, h) + y = y + h + i = i + 1 + + if not cached.expanded then + if cached.skip then + i = cached.skip + else + local depth = cached.depth + while i <= #core.project_files do + local filename = core.project_files[i].filename + if get_depth(filename) <= depth then break end + i = i + 1 + end + cached.skip = i + end + end + end + end) +end + + +function TreeView:on_mouse_moved(px, py) + self.hovered_item = nil + for item, x,y,w,h in self:each_item() do + if px > x and py > y and px <= x + w and py <= y + h then + self.hovered_item = item + break + end + end +end + + +function TreeView:on_mouse_pressed(button, x, y) + if not self.hovered_item then + return + elseif self.hovered_item.type == "dir" then + self.hovered_item.expanded = not self.hovered_item.expanded + else + core.try(function() + core.root_view:open_doc(core.open_doc(self.hovered_item.filename)) + end) + end +end + + +function TreeView:update() + -- update width + local dest = self.visible and config.treeview_size or 0 + if self.init_size then + self.size.x = dest + self.init_size = false + else + self:move_towards(self.size, "x", dest) + end + + TreeView.super.update(self) +end + + +function TreeView:draw() + self:draw_background(style.background2) + + local icon_width = style.icon_font:get_width("D") + local spacing = style.font:get_width(" ") * 2 + + local doc = core.active_view.doc + local active_filename = doc and system.absolute_path(doc.filename or "") + + for item, x,y,w,h in self:each_item() do + local color = style.text + + -- highlight active_view doc + if item.abs_filename == active_filename then + color = style.accent + end + + -- hovered item background + if item == self.hovered_item then + renderer.draw_rect(x, y, w, h, style.line_highlight) + color = style.accent + end + + -- icons + x = x + item.depth * style.padding.x + style.padding.x + if item.type == "dir" then + local icon1 = item.expanded and "-" or "+" + local icon2 = item.expanded and "D" or "d" + common.draw_text(style.icon_font, color, icon1, nil, x, y, 0, h) + x = x + style.padding.x + common.draw_text(style.icon_font, color, icon2, nil, x, y, 0, h) + x = x + icon_width + else + x = x + style.padding.x + common.draw_text(style.icon_font, color, "f", nil, x, y, 0, h) + x = x + icon_width + end + + -- text + x = x + spacing + x = common.draw_text(style.font, color, item.name, nil, x, y, 0, h) + end +end + + +-- init +local view = TreeView() +local node = core.root_view:get_active_node() +node:split("left", view, true) + +-- register commands and keymap +command.add(nil, { + ["treeview:toggle"] = function() + view.visible = not view.visible + end, +}) + +keymap.add { ["ctrl+\\"] = "treeview:toggle" } diff --git a/data/plugins/trimwhitespace.lua b/data/plugins/trimwhitespace.lua new file mode 100644 index 0000000..d4d25c8 --- /dev/null +++ b/data/plugins/trimwhitespace.lua @@ -0,0 +1,36 @@ +local core = require "core" +local command = require "core.command" +local Doc = require "core.doc" + + +local function trim_trailing_whitespace(doc) + local cline, ccol = doc:get_selection() + for i = 1, #doc.lines do + local old_text = doc:get_text(i, 1, i, math.huge) + local new_text = old_text:gsub("%s*$", "") + + -- don't remove whitespace which would cause the caret to reposition + if cline == i and ccol > #new_text then + new_text = old_text:sub(1, ccol - 1) + end + + if old_text ~= new_text then + doc:insert(i, 1, new_text) + doc:remove(i, #new_text + 1, i, math.huge) + end + end +end + + +command.add("core.docview", { + ["trim-whitespace:trim-trailing-whitespace"] = function() + trim_trailing_whitespace(core.active_view.doc) + end, +}) + + +local save = Doc.save +Doc.save = function(self, ...) + trim_trailing_whitespace(self) + save(self, ...) +end diff --git a/data/user/colors/fall.lua b/data/user/colors/fall.lua new file mode 100644 index 0000000..0cab762 --- /dev/null +++ b/data/user/colors/fall.lua @@ -0,0 +1,28 @@ +local style = require "core.style" +local common = require "core.common" + +style.background = { common.color "#343233" } +style.background2 = { common.color "#2c2a2b" } +style.background3 = { common.color "#2c2a2b" } +style.text = { common.color "#c4b398" } +style.caret = { common.color "#61efce" } +style.accent = { common.color "#ffd152" } +style.dim = { common.color "#615d5f" } +style.divider = { common.color "#242223" } +style.selection = { common.color "#454244" } +style.line_number = { common.color "#454244" } +style.line_number2 = { common.color "#615d5f" } +style.line_highlight = { common.color "#383637" } +style.scrollbar = { common.color "#454344" } +style.scrollbar2 = { common.color "#524F50" } + +style.syntax["normal"] = { common.color "#efdab9" } +style.syntax["symbol"] = { common.color "#efdab9" } +style.syntax["comment"] = { common.color "#615d5f" } +style.syntax["keyword"] = { common.color "#d36e2d" } +style.syntax["keyword2"] = { common.color "#ef6179" } +style.syntax["number"] = { common.color "#ffd152" } +style.syntax["literal"] = { common.color "#ffd152" } +style.syntax["string"] = { common.color "#ffd152" } +style.syntax["operator"] = { common.color "#efdab9" } +style.syntax["function"] = { common.color "#61efce" } diff --git a/data/user/colors/gruvbox_dark.lua b/data/user/colors/gruvbox_dark.lua new file mode 100644 index 0000000..ff3e9d8 --- /dev/null +++ b/data/user/colors/gruvbox_dark.lua @@ -0,0 +1,28 @@ +local style = require "core.style" +local common = require "core.common" + +style.background = { common.color "#282828" } +style.background2 = { common.color "#1d2021" } +style.background3 = { common.color "#1d2021" } +style.text = { common.color "#928374" } +style.caret = { common.color "#fbf1c7" } +style.accent = { common.color "#ebdbb2" } +style.dim = { common.color "#928374" } +style.divider = { common.color "#1d2021" } +style.selection = { common.color "#3c3836" } +style.line_number = { common.color "#928374" } +style.line_number2 = { common.color "#ebdbb2" } +style.line_highlight = { common.color "#32302f" } +style.scrollbar = { common.color "#928374" } +style.scrollbar2 = { common.color "#fbf1c7" } + +style.syntax["normal"] = { common.color "#ebdbb2" } +style.syntax["symbol"] = { common.color "#ebdbb2" } +style.syntax["comment"] = { common.color "#928374" } +style.syntax["keyword"] = { common.color "#fb4934" } +style.syntax["keyword2"] = { common.color "#83a598" } +style.syntax["number"] = { common.color "#d3869b" } +style.syntax["literal"] = { common.color "#d3869b" } +style.syntax["string"] = { common.color "#b8bb26" } +style.syntax["operator"] = { common.color "#ebdbb2" } +style.syntax["function"] = { common.color "#8ec07c" } diff --git a/data/user/colors/summer.lua b/data/user/colors/summer.lua new file mode 100644 index 0000000..5e48cf7 --- /dev/null +++ b/data/user/colors/summer.lua @@ -0,0 +1,28 @@ +local style = require "core.style" +local common = require "core.common" + +style.background = { common.color "#fbfbfb" } +style.background2 = { common.color "#f2f2f2" } +style.background3 = { common.color "#f2f2f2" } +style.text = { common.color "#404040" } +style.caret = { common.color "#fc1785" } +style.accent = { common.color "#fc1785" } +style.dim = { common.color "#b0b0b0" } +style.divider = { common.color "#e8e8e8" } +style.selection = { common.color "#b7dce8" } +style.line_number = { common.color "#d0d0d0" } +style.line_number2 = { common.color "#808080" } +style.line_highlight = { common.color "#f2f2f2" } +style.scrollbar = { common.color "#e0e0e0" } +style.scrollbar2 = { common.color "#c0c0c0" } + +style.syntax["normal"] = { common.color "#181818" } +style.syntax["symbol"] = { common.color "#181818" } +style.syntax["comment"] = { common.color "#22a21f" } +style.syntax["keyword"] = { common.color "#fb6620" } +style.syntax["keyword2"] = { common.color "#fc1785" } +style.syntax["number"] = { common.color "#1586d2" } +style.syntax["literal"] = { common.color "#1586d2" } +style.syntax["string"] = { common.color "#1586d2" } +style.syntax["operator"] = { common.color "#fb6620" } +style.syntax["function"] = { common.color "#fc1785" } diff --git a/data/user/init.lua b/data/user/init.lua new file mode 100644 index 0000000..4f3c1d8 --- /dev/null +++ b/data/user/init.lua @@ -0,0 +1,14 @@ +-- put user settings here +-- this module will be loaded after everything else when the application starts + +local keymap = require "core.keymap" +local config = require "core.config" +local style = require "core.style" + +-- light theme: +-- require "user.colors.summer" +require "user.colors.gruvbox_dark" + +-- key binding: +-- keymap.add { ["ctrl+escape"] = "core:quit" } + diff --git a/doc/usage.md b/doc/usage.md new file mode 100644 index 0000000..3b536cc --- /dev/null +++ b/doc/usage.md @@ -0,0 +1,146 @@ +# lite + +![screenshot](https://user-images.githubusercontent.com/3920290/81471642-6c165880-91ea-11ea-8cd1-fae7ae8f0bc4.png) + +## Overview +lite is a lightweight text editor written mostly in Lua — it aims to provide +something practical, pretty, *small* and fast, implemented as simply as +possible; easy to modify and extend, or to use without doing either. + + +## Getting Started +When lite is started it's typically opened with a *project directory* — this +is the directory where your project's code and other data resides. The project +directory is set once when lite is started and, for the duration of the +session, cannot be changed. + +To open lite with a specific project directory the directory name can be passed +as a command-line argument *(`.` can be passed to use the current directory)* or +the directory can be dragged onto either the lite executable or a running +instance of lite. + +The main way of opening files in lite is through the `core:find-file` command +— this provides a fuzzy finder over all of the project's files and can be +opened using the **`ctrl+p`** shortcut by default. + +Commands can be run using keyboard shortcuts, or by using the `core:find-command` +command bound to **`ctrl+shift+p`** by default. For example, pressing +`ctrl+shift+p` and typing `newdoc` then pressing `return` would open a new +document. The current keyboard shortcut for a command can be seen to the right +of the command name on the command finder, thus to find the shortcut for a command +`ctrl+shift+p` can be pressed and the command name typed. + + +## User Module +lite can be configured through use of the user module. The user module can be +used for changing options in the config module, adding additional key bindings, +loading custom color themes, modifying the style or changing any other part of +lite to your personal preference. + +The user module is loaded by lite when the application starts, after the plugins +have been loaded. + +The user module can be modified by running the `core:open-user-module` command +or otherwise directly opening the `data/user/init.lua` file. + + +## Project Module +The project module is an optional module which is loaded from the current +project's directory when lite is started. Project modules can be useful for +things like adding custom commands for project-specific build systems, or +loading project-specific plugins. + +The project module is loaded by lite when the application starts, after both the +plugins and user module have been loaded. + +The project module can be edited by running the `core:open-project-module` +command — if the module does not exist for the current project when the +command is run it will be created. + + +## Commands +Commands in lite are used both through the command finder (`ctrl+shift+p`) and +by lite's keyboard shortcut system. Commands consist of 3 components: +* **Name** — The command name in the form of `namespace:action-name`, for + example: `doc:select-all` +* **Predicate** — A function that returns true if the command can be ran, for + example, for any document commands the predicate checks whether the active + view is a document +* **Function** — The function which performs the command itself + +Commands can be added using the `command.add` function provided by the +`core.command` module: +```lua +local core = require "core" +local command = require "core.command" + +command.add("core.docview", { + ["doc:save"] = function() + core.active_view.doc:save() + core.log("Saved '%s', core.active_view.doc.filename) + end +}) +``` + +Commands can be performed programatically (eg. from another command or by your +user module) by calling the `command.perform` function after requiring the +`command` module: +```lua +local command = require "core.command" +command.perform "core:quit" +``` + + +## Keymap +All keyboard shortcuts in lite are handled by the `core.keymap` module. A key +binding in lite maps a "stroke" (eg. `ctrl+q`) to one or more commands (eg. +`core:quit`). When the shortcut is pressed lite will iterate each command +assigned to that key and run the *predicate function* for that command — if the +predicate passes it stops iterating and runs the command. + +An example of where this used is the default binding of the `tab` key: +``` lua + ["tab"] = { "command:complete", "doc:indent" }, +``` +When tab is pressed the `command:complete` command is attempted which will only +succeed if the command-input at the bottom of the window is active. Otherwise +the `doc:indent` command is attempted which will only succeed if we have a +document as our active view. + +A new mapping can be added by your user module as follows: +```lua +local keymap = require "core.keymap" +keymap.add { ["ctrl+q"] = "core:quit" } +``` + + +## Plugins +Plugins in lite are normal lua modules and are treated as such — no +complicated plugin manager is provided, and, once a plugin is loaded, it is never +expected be to have to unload itself. + +To install a plugin simply drop it in the `data/plugins` directory — installed +plugins will be automatically loaded when lite starts. To uninstall a plugin the +plugin file can be deleted — any plugin (including those included with lite's +default installation) can be deleted to remove its functionality. + +If you want to load a plugin only under a certain circumstance (for example, +only on a given project) the plugin can be placed somewhere other than the +`data/plugins` directory so that it is not automatically loaded. The plugin can +then be loaded manually as needed by using the `require` function. + +Plugins can be downloaded from the [plugins repository](https://github.com/rxi/lite-plugins). + + +## Color Themes +Colors themes in lite are lua modules which overwrite the color fields of lite's +`core.style` module. Color themes should be placed in the `data/user/colors` +directory. + +A color theme can be set by requiring it in your user module: +```lua +require "user.colors.winter" +``` + +Color themes can be downloaded from the [color themes repository](https://github.com/rxi/lite-colors). + diff --git a/icon.ico b/icon.ico new file mode 100644 index 0000000..724cb16 Binary files /dev/null and b/icon.ico differ diff --git a/icon.inl b/icon.inl new file mode 100644 index 0000000..673876c --- /dev/null +++ b/icon.inl @@ -0,0 +1,1369 @@ +static unsigned char icon_rgba[] = { + 0x2e, 0x2e, 0x32, 0x6d, 0x2e, 0x2e, 0x32, 0xe4, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xe4, + 0x2e, 0x2e, 0x32, 0x6d, 0x2e, 0x2e, 0x32, 0xe4, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xe4, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2e, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2d, 0x2d, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x30, 0x2f, 0x33, 0xff, 0x42, 0x35, 0x3a, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x37, 0x3c, 0xff, 0x42, 0x40, 0x44, 0xff, + 0x41, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x38, 0x38, 0x3c, 0xff, + 0x2f, 0x30, 0x34, 0xff, 0x38, 0x3f, 0x46, 0xff, 0x38, 0x3f, 0x46, 0xff, + 0x2f, 0x30, 0x34, 0xff, 0x39, 0x35, 0x33, 0xff, 0x45, 0x3c, 0x35, 0xff, + 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, + 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, 0x42, 0x3a, 0x35, 0xff, + 0x30, 0x2f, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2e, 0x31, 0xff, 0x42, 0x35, 0x3a, 0xff, 0xce, 0x66, 0x72, 0xff, + 0xe2, 0x6d, 0x7b, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xdf, 0x77, 0x84, 0xff, + 0xd0, 0xc3, 0xc9, 0xff, 0xcd, 0xce, 0xd3, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xd1, 0xd1, 0xd5, 0xff, + 0x7d, 0x7d, 0x81, 0xff, 0x35, 0x3c, 0x42, 0xff, 0x7f, 0xba, 0xd2, 0xff, + 0x7f, 0xba, 0xd2, 0xff, 0x34, 0x3d, 0x45, 0xff, 0x8a, 0x64, 0x3d, 0xff, + 0xec, 0x9e, 0x4b, 0xff, 0xe8, 0x9c, 0x4a, 0xff, 0xe8, 0x9c, 0x4a, 0xff, + 0xe8, 0x9c, 0x4a, 0xff, 0xe8, 0x9c, 0x4a, 0xff, 0xea, 0x9c, 0x4a, 0xff, + 0xd4, 0x90, 0x47, 0xff, 0x42, 0x3a, 0x35, 0xff, 0x2d, 0x2d, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2c, 0x2d, 0x31, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0xe4, 0x6d, 0x7b, 0xff, 0xfb, 0x76, 0x85, 0xff, 0xfa, 0x75, 0x84, 0xff, + 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x74, 0x83, 0xff, + 0xf8, 0x81, 0x8f, 0xff, 0xe6, 0xd8, 0xde, 0xff, 0xe3, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe7, 0xe7, 0xec, 0xff, 0x88, 0x88, 0x8c, 0xff, 0x36, 0x3e, 0x45, 0xff, + 0x8a, 0xce, 0xe8, 0xff, 0x8a, 0xce, 0xe8, 0xff, 0x35, 0x3f, 0x48, 0xff, + 0x96, 0x6b, 0x3e, 0xff, 0xff, 0xad, 0x4e, 0xff, 0xff, 0xab, 0x4d, 0xff, + 0xff, 0xab, 0x4d, 0xff, 0xff, 0xab, 0x4d, 0xff, 0xff, 0xab, 0x4d, 0xff, + 0xff, 0xac, 0x4e, 0xff, 0xe8, 0x9d, 0x4a, 0xff, 0x45, 0x3c, 0x35, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2e, 0x31, 0xff, + 0x42, 0x35, 0x3a, 0xff, 0xce, 0x66, 0x72, 0xff, 0xe2, 0x6d, 0x7b, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xdf, 0x77, 0x84, 0xff, 0xd0, 0xc3, 0xc9, 0xff, + 0xcd, 0xce, 0xd3, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xd1, 0xd1, 0xd5, 0xff, 0x7d, 0x7d, 0x81, 0xff, + 0x35, 0x3c, 0x42, 0xff, 0x7f, 0xba, 0xd2, 0xff, 0x7f, 0xba, 0xd2, 0xff, + 0x34, 0x3d, 0x45, 0xff, 0x8a, 0x64, 0x3d, 0xff, 0xec, 0x9e, 0x4b, 0xff, + 0xe8, 0x9c, 0x4a, 0xff, 0xe8, 0x9c, 0x4a, 0xff, 0xe8, 0x9c, 0x4a, 0xff, + 0xe8, 0x9c, 0x4a, 0xff, 0xea, 0x9c, 0x4a, 0xff, 0xd4, 0x90, 0x47, 0xff, + 0x42, 0x3a, 0x35, 0xff, 0x2d, 0x2d, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x30, 0x2f, 0x33, 0xff, 0x42, 0x35, 0x3a, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x37, 0x3c, 0xff, + 0x42, 0x40, 0x44, 0xff, 0x41, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x38, 0x38, 0x3c, 0xff, 0x2f, 0x30, 0x34, 0xff, 0x38, 0x3f, 0x46, 0xff, + 0x38, 0x3f, 0x46, 0xff, 0x2f, 0x30, 0x34, 0xff, 0x39, 0x35, 0x33, 0xff, + 0x45, 0x3c, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, + 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, + 0x42, 0x3a, 0x35, 0xff, 0x30, 0x2f, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2e, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2d, 0x2d, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x35, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x31, 0x31, 0x35, 0xff, + 0x2f, 0x2f, 0x33, 0xff, 0x33, 0x34, 0x38, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x31, 0x31, 0x35, 0xff, 0x2f, 0x2f, 0x33, 0xff, + 0x33, 0x34, 0x38, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x33, 0x34, 0x38, 0xff, 0x2f, 0x2f, 0x33, 0xff, + 0x31, 0x31, 0x35, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x31, 0x31, 0x35, 0xff, + 0x2f, 0x2f, 0x33, 0xff, 0x33, 0x34, 0x38, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x33, 0x34, 0x38, 0xff, 0x2f, 0x2f, 0x33, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x47, 0x49, 0x4d, 0xff, + 0x61, 0x64, 0x68, 0xff, 0x60, 0x63, 0x67, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x47, 0x48, 0x4c, 0xff, 0x32, 0x33, 0x37, 0xff, 0x5a, 0x5e, 0x62, 0xff, + 0x60, 0x64, 0x68, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x61, 0x64, 0x68, 0xff, 0x47, 0x48, 0x4c, 0xff, + 0x32, 0x33, 0x37, 0xff, 0x5a, 0x5e, 0x62, 0xff, 0x60, 0x64, 0x68, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x64, 0x68, 0xff, 0x5a, 0x5e, 0x62, 0xff, + 0x32, 0x33, 0x37, 0xff, 0x47, 0x48, 0x4c, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x47, 0x48, 0x4c, 0xff, 0x32, 0x33, 0x37, 0xff, 0x5a, 0x5e, 0x62, 0xff, + 0x60, 0x64, 0x68, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x64, 0x68, 0xff, 0x5a, 0x5e, 0x62, 0xff, 0x33, 0x34, 0x38, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x32, 0x32, 0x36, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x40, 0x40, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x4a, 0x4c, 0x50, 0xff, 0x68, 0x6c, 0x70, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x68, 0x6c, 0x70, 0xff, 0x4a, 0x4c, 0x50, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x61, 0x64, 0x68, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x68, 0x6c, 0x70, 0xff, + 0x4a, 0x4c, 0x50, 0xff, 0x33, 0x33, 0x37, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x61, 0x64, 0x68, 0xff, 0x33, 0x33, 0x37, 0xff, 0x4a, 0x4c, 0x50, 0xff, + 0x68, 0x6c, 0x70, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x68, 0x6c, 0x70, 0xff, 0x4a, 0x4c, 0x50, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x61, 0x64, 0x68, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, + 0x67, 0x6b, 0x6f, 0xff, 0x67, 0x6b, 0x6f, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x47, 0x49, 0x4d, 0xff, 0x61, 0x64, 0x68, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x61, 0x64, 0x68, 0xff, 0x47, 0x48, 0x4c, 0xff, + 0x32, 0x33, 0x37, 0xff, 0x5a, 0x5e, 0x62, 0xff, 0x60, 0x64, 0x68, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x61, 0x64, 0x68, 0xff, 0x47, 0x48, 0x4c, 0xff, 0x32, 0x33, 0x37, 0xff, + 0x5a, 0x5e, 0x62, 0xff, 0x60, 0x64, 0x68, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x64, 0x68, 0xff, 0x5a, 0x5e, 0x62, 0xff, 0x32, 0x33, 0x37, 0xff, + 0x47, 0x48, 0x4c, 0xff, 0x61, 0x64, 0x68, 0xff, 0x60, 0x63, 0x67, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x61, 0x64, 0x68, 0xff, 0x47, 0x48, 0x4c, 0xff, + 0x32, 0x33, 0x37, 0xff, 0x5a, 0x5e, 0x62, 0xff, 0x60, 0x64, 0x68, 0xff, + 0x60, 0x63, 0x67, 0xff, 0x60, 0x63, 0x67, 0xff, 0x60, 0x64, 0x68, 0xff, + 0x5a, 0x5e, 0x62, 0xff, 0x33, 0x34, 0x38, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x30, 0x31, 0x35, 0xff, + 0x33, 0x34, 0x38, 0xff, 0x33, 0x34, 0x38, 0xff, 0x33, 0x34, 0x38, 0xff, + 0x30, 0x31, 0x35, 0xff, 0x2d, 0x2e, 0x32, 0xff, 0x32, 0x33, 0x37, 0xff, + 0x33, 0x34, 0x38, 0xff, 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x32, 0x33, 0x36, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, 0x32, 0x33, 0x36, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x30, 0x30, 0x34, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, 0x33, 0x33, 0x37, 0xff, + 0x30, 0x31, 0x35, 0xff, 0x2f, 0x2f, 0x33, 0xff, 0x33, 0x34, 0x38, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, 0x34, 0x35, 0x39, 0xff, + 0x34, 0x35, 0x39, 0xff, 0x33, 0x34, 0x38, 0xff, 0x2f, 0x2f, 0x33, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x39, 0x32, 0x36, 0xff, 0x44, 0x35, 0x3b, 0xff, 0x43, 0x35, 0x3a, 0xff, + 0x43, 0x35, 0x3a, 0xff, 0x44, 0x35, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x35, 0x3a, 0xff, 0x42, 0x3b, 0x40, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x46, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x46, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x41, 0x41, 0x46, 0xff, 0x38, 0x38, 0x3c, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2b, 0x2d, 0x31, 0xff, 0x88, 0x4d, 0x56, 0xff, 0xe5, 0x6e, 0x7c, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6b, 0x78, 0xff, 0xd7, 0x9d, 0xa6, 0xff, + 0xcd, 0xcf, 0xd4, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xd1, 0xd1, 0xd5, 0xff, 0x7e, 0x7e, 0x82, 0xff, + 0x2b, 0x2b, 0x2f, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2a, 0x2d, 0x30, 0xff, 0x94, 0x52, 0x5b, 0xff, + 0xfe, 0x76, 0x86, 0xff, 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x75, 0x84, 0xff, + 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x73, 0x82, 0xff, + 0xef, 0xac, 0xb6, 0xff, 0xe3, 0xe6, 0xeb, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe7, 0xe7, 0xec, 0xff, + 0x89, 0x89, 0x8d, 0xff, 0x2b, 0x2b, 0x2f, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2b, 0x2d, 0x31, 0xff, + 0x88, 0x4d, 0x56, 0xff, 0xe5, 0x6e, 0x7c, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6b, 0x78, 0xff, 0xd7, 0x9d, 0xa6, 0xff, 0xcd, 0xcf, 0xd4, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xd1, 0xd1, 0xd5, 0xff, 0x7e, 0x7e, 0x82, 0xff, 0x2b, 0x2b, 0x2f, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x38, 0x31, 0x36, 0xff, 0x43, 0x34, 0x3a, 0xff, + 0x43, 0x34, 0x39, 0xff, 0x43, 0x34, 0x39, 0xff, 0x43, 0x34, 0x39, 0xff, + 0x43, 0x34, 0x39, 0xff, 0x43, 0x34, 0x39, 0xff, 0x41, 0x3a, 0x3f, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, + 0x40, 0x41, 0x44, 0xff, 0x41, 0x41, 0x45, 0xff, 0x36, 0x37, 0x3b, 0xff, + 0x2c, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x37, 0x37, 0x3c, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, + 0x40, 0x40, 0x44, 0xff, 0x40, 0x40, 0x44, 0xff, 0x40, 0x3b, 0x43, 0xff, + 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, + 0x41, 0x37, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x41, 0x3d, 0x44, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x3f, 0x3f, 0x43, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2b, 0x2b, 0x2f, 0xff, + 0x7e, 0x7e, 0x82, 0xff, 0xd1, 0xd1, 0xd5, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcf, 0xd3, 0xff, + 0xcf, 0xa7, 0xc5, 0xff, 0xd1, 0x7e, 0xb8, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd0, 0x7e, 0xb7, 0xff, 0xcc, 0xa5, 0xc3, 0xff, + 0xcf, 0xd0, 0xd4, 0xff, 0xbc, 0xbc, 0xc1, 0xff, 0x3f, 0x3f, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2b, 0x2b, 0x2f, 0xff, 0x89, 0x89, 0x8d, 0xff, 0xe7, 0xe7, 0xec, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe5, 0xe9, 0xff, 0xe6, 0xb8, 0xda, 0xff, 0xe8, 0x8a, 0xcb, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe7, 0x89, 0xca, 0xff, + 0xe2, 0xb6, 0xd7, 0xff, 0xe5, 0xe7, 0xeb, 0xff, 0xd0, 0xd0, 0xd5, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2b, 0x2b, 0x2f, 0xff, 0x7e, 0x7e, 0x82, 0xff, + 0xd1, 0xd1, 0xd5, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcf, 0xd3, 0xff, 0xcf, 0xa7, 0xc5, 0xff, + 0xd1, 0x7e, 0xb8, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd0, 0x7e, 0xb7, 0xff, 0xcc, 0xa5, 0xc3, 0xff, 0xcf, 0xd0, 0xd4, 0xff, + 0xbc, 0xbc, 0xc1, 0xff, 0x3f, 0x3f, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x38, 0x38, 0x3c, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x41, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x44, 0xff, + 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, + 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x41, 0x41, 0x45, 0xff, 0x41, 0x41, 0x46, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, 0x40, 0x41, 0x45, 0xff, + 0x40, 0x41, 0x45, 0xff, 0x41, 0x41, 0x46, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x40, 0x41, 0x44, 0xff, 0x40, 0x41, 0x44, 0xff, 0x41, 0x41, 0x45, 0xff, + 0x42, 0x3d, 0x44, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x41, 0x3d, 0x44, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x3f, 0x3f, 0x43, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2f, 0x2e, 0x32, 0xff, 0x3e, 0x36, 0x3f, 0xff, + 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, + 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, + 0x41, 0x37, 0x41, 0xff, 0x3e, 0x36, 0x3f, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x38, 0x33, 0x32, 0xff, 0x44, 0x3a, 0x34, 0xff, 0x43, 0x3a, 0x34, 0xff, + 0x44, 0x3a, 0x34, 0xff, 0x41, 0x39, 0x33, 0xff, 0x2f, 0x2e, 0x31, 0xff, + 0x36, 0x32, 0x39, 0xff, 0x41, 0x37, 0x41, 0xff, 0x41, 0x37, 0x41, 0xff, + 0x37, 0x32, 0x39, 0xff, 0x2c, 0x2d, 0x30, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x40, 0x37, 0x41, 0xff, + 0xbf, 0x77, 0xaa, 0xff, 0xd2, 0x81, 0xba, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd2, 0x81, 0xba, 0xff, 0xbf, 0x77, 0xaa, 0xff, + 0x3c, 0x35, 0x40, 0xff, 0x8a, 0x64, 0x3d, 0xff, 0xec, 0x9e, 0x4b, 0xff, + 0xe8, 0x9c, 0x4a, 0xff, 0xea, 0x9c, 0x4a, 0xff, 0xd4, 0x90, 0x47, 0xff, + 0x3f, 0x38, 0x32, 0xff, 0x7e, 0x56, 0x75, 0xff, 0xd4, 0x82, 0xbb, 0xff, + 0xd4, 0x82, 0xbb, 0xff, 0x80, 0x57, 0x75, 0xff, 0x2b, 0x2c, 0x2f, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x32, 0x32, 0x36, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x40, 0x40, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x42, 0x38, 0x43, 0xff, 0xd3, 0x81, 0xbb, 0xff, 0xe9, 0x8c, 0xcc, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xe8, 0x8b, 0xcb, 0xff, 0xe9, 0x8c, 0xcc, 0xff, + 0xd3, 0x81, 0xbb, 0xff, 0x3e, 0x36, 0x42, 0xff, 0x95, 0x6c, 0x3f, 0xff, + 0xff, 0xad, 0x4e, 0xff, 0xff, 0xab, 0x4d, 0xff, 0xff, 0xac, 0x4e, 0xff, + 0xe8, 0x9d, 0x4a, 0xff, 0x41, 0x3a, 0x32, 0xff, 0x89, 0x5c, 0x7e, 0xff, + 0xeb, 0x8d, 0xce, 0xff, 0xeb, 0x8d, 0xce, 0xff, 0x8b, 0x5d, 0x7f, 0xff, + 0x2a, 0x2c, 0x2f, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x40, 0x37, 0x41, 0xff, 0xbf, 0x77, 0xaa, 0xff, + 0xd2, 0x81, 0xba, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd2, 0x81, 0xba, 0xff, 0xbf, 0x77, 0xaa, 0xff, 0x3c, 0x35, 0x40, 0xff, + 0x8a, 0x64, 0x3d, 0xff, 0xec, 0x9e, 0x4b, 0xff, 0xe8, 0x9c, 0x4a, 0xff, + 0xea, 0x9c, 0x4a, 0xff, 0xd4, 0x90, 0x47, 0xff, 0x3f, 0x38, 0x32, 0xff, + 0x7e, 0x56, 0x75, 0xff, 0xd4, 0x82, 0xbb, 0xff, 0xd4, 0x82, 0xbb, 0xff, + 0x80, 0x57, 0x75, 0xff, 0x2b, 0x2c, 0x2f, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x30, 0x2f, 0x34, 0xff, + 0x40, 0x37, 0x41, 0xff, 0x42, 0x38, 0x43, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x43, 0xff, 0x40, 0x37, 0x41, 0xff, + 0x30, 0x2f, 0x34, 0xff, 0x39, 0x35, 0x33, 0xff, 0x45, 0x3c, 0x35, 0xff, + 0x45, 0x3b, 0x35, 0xff, 0x45, 0x3b, 0x35, 0xff, 0x42, 0x3a, 0x35, 0xff, + 0x30, 0x2f, 0x32, 0xff, 0x38, 0x33, 0x3a, 0xff, 0x42, 0x38, 0x43, 0xff, + 0x42, 0x38, 0x43, 0xff, 0x38, 0x33, 0x3a, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x32, 0xff, + 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, 0x2c, 0x2d, 0x32, 0xff, + 0x2d, 0x2d, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2e, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2e, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x38, 0x33, 0x3a, 0xff, + 0x42, 0x38, 0x43, 0xff, 0x42, 0x38, 0x42, 0xff, 0x42, 0x38, 0x43, 0xff, + 0x38, 0x33, 0x3a, 0xff, 0x30, 0x2f, 0x33, 0xff, 0x42, 0x35, 0x3a, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x35, 0x3b, 0xff, 0x43, 0x3c, 0x40, 0xff, + 0x41, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x3f, 0x3f, 0x43, 0xff, 0x30, 0x30, 0x34, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, + 0x3e, 0x3e, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2b, 0x2c, 0x2f, 0xff, + 0x80, 0x57, 0x75, 0xff, 0xd4, 0x82, 0xbb, 0xff, 0xd1, 0x80, 0xb9, 0xff, + 0xd4, 0x82, 0xbb, 0xff, 0x7e, 0x57, 0x75, 0xff, 0x3e, 0x33, 0x37, 0xff, + 0xce, 0x66, 0x72, 0xff, 0xe2, 0x6d, 0x7b, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6b, 0x78, 0xff, + 0xd7, 0x9d, 0xa6, 0xff, 0xcd, 0xcf, 0xd4, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcf, 0xcf, 0xd4, 0xff, 0xbc, 0xbc, 0xc1, 0xff, + 0x3f, 0x3f, 0x43, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x4f, 0x4f, 0x55, 0xff, 0x53, 0x53, 0x5a, 0xff, 0x53, 0x53, 0x5a, 0xff, + 0x53, 0x53, 0x5a, 0xff, 0x40, 0x40, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2a, 0x2c, 0x2f, 0xff, 0x8b, 0x5d, 0x7f, 0xff, 0xeb, 0x8d, 0xce, 0xff, + 0xe8, 0x8b, 0xcb, 0xff, 0xeb, 0x8d, 0xce, 0xff, 0x89, 0x5c, 0x7e, 0xff, + 0x41, 0x34, 0x38, 0xff, 0xe4, 0x6d, 0x7b, 0xff, 0xfb, 0x76, 0x85, 0xff, + 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x75, 0x84, 0xff, 0xfa, 0x75, 0x84, 0xff, + 0xfa, 0x73, 0x82, 0xff, 0xef, 0xac, 0xb6, 0xff, 0xe3, 0xe6, 0xeb, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, + 0xe4, 0xe4, 0xe9, 0xff, 0xe4, 0xe4, 0xe9, 0xff, 0xe5, 0xe5, 0xea, 0xff, + 0xd0, 0xd0, 0xd5, 0xff, 0x42, 0x42, 0x46, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x31, 0x31, 0x36, 0xff, 0x4b, 0x4b, 0x51, 0xff, 0x4e, 0x4e, 0x55, 0xff, + 0x4e, 0x4e, 0x55, 0xff, 0x4f, 0x4f, 0x55, 0xff, 0x3e, 0x3e, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2b, 0x2c, 0x2f, 0xff, 0x80, 0x57, 0x75, 0xff, + 0xd4, 0x82, 0xbb, 0xff, 0xd1, 0x80, 0xb9, 0xff, 0xd4, 0x82, 0xbb, 0xff, + 0x7e, 0x57, 0x75, 0xff, 0x3e, 0x33, 0x37, 0xff, 0xce, 0x66, 0x72, 0xff, + 0xe2, 0x6d, 0x7b, 0xff, 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6c, 0x7a, 0xff, + 0xe1, 0x6c, 0x7a, 0xff, 0xe1, 0x6b, 0x78, 0xff, 0xd7, 0x9d, 0xa6, 0xff, + 0xcd, 0xcf, 0xd4, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, 0xcd, 0xcd, 0xd2, 0xff, + 0xcf, 0xcf, 0xd4, 0xff, 0xbc, 0xbc, 0xc1, 0xff, 0x3f, 0x3f, 0x43, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x31, 0x31, 0x36, 0xff, + 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, 0x32, 0x32, 0x36, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x38, 0x33, 0x3a, 0xff, 0x42, 0x38, 0x43, 0xff, 0x42, 0x38, 0x42, 0xff, + 0x42, 0x38, 0x43, 0xff, 0x38, 0x33, 0x3a, 0xff, 0x30, 0x2f, 0x33, 0xff, + 0x42, 0x35, 0x3a, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, + 0x44, 0x36, 0x3b, 0xff, 0x44, 0x36, 0x3b, 0xff, 0x44, 0x35, 0x3b, 0xff, + 0x43, 0x3c, 0x40, 0xff, 0x41, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, + 0x42, 0x42, 0x46, 0xff, 0x42, 0x42, 0x46, 0xff, 0x3f, 0x3f, 0x43, 0xff, + 0x30, 0x30, 0x34, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2e, 0x31, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2d, 0x2e, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, 0x2d, 0x2d, 0x31, 0xff, + 0x2d, 0x2d, 0x31, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xe4, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xe4, + 0x2e, 0x2e, 0x32, 0x6e, 0x2e, 0x2e, 0x32, 0xe4, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, + 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xff, 0x2e, 0x2e, 0x32, 0xe4, + 0x2e, 0x2e, 0x32, 0x6e +}; +static unsigned int icon_rgba_len = 16384; diff --git a/makefile b/makefile new file mode 100644 index 0000000..da78ca0 --- /dev/null +++ b/makefile @@ -0,0 +1,16 @@ +.POSIX: + +CC ?= gcc +SRCDIR = ./src +CFLAGS = -Wall -Werror -pedantic -O3 -std=gnu11 -fno-strict-aliasing -I${SRCDIR}\ + -DLUA_USE_POSIX +# remove this +LDFLAGS = -lSDL2 -lm -llua5.2 +FILES != find ${SRCDIR} -name '*.c' +OBJS = $(FILES:.c=.o) + +lite: ${OBJS} + ${CC} ${LDFLAGS} $^ -o $@ + +clean: + rm -f lite ${OBJS} diff --git a/src/api/api.c b/src/api/api.c new file mode 100644 index 0000000..d273cf2 --- /dev/null +++ b/src/api/api.c @@ -0,0 +1,16 @@ +#include "api.h" + +int luaopen_system(lua_State *L); +int luaopen_renderer(lua_State *L); + +static const luaL_Reg libs[] = { + { "system", luaopen_system }, + { "renderer", luaopen_renderer }, + { NULL, NULL } +}; + +void api_load_libs(lua_State *L) { + for (int i = 0; libs[i].name; i++) { + luaL_requiref(L, libs[i].name, libs[i].func, 1); + } +} diff --git a/src/api/api.h b/src/api/api.h new file mode 100644 index 0000000..aed3899 --- /dev/null +++ b/src/api/api.h @@ -0,0 +1,12 @@ +#ifndef API_H +#define API_H + +#include +#include +#include + +#define API_TYPE_FONT "Font" + +void api_load_libs(lua_State *L); + +#endif diff --git a/src/api/renderer.c b/src/api/renderer.c new file mode 100644 index 0000000..bfffafa --- /dev/null +++ b/src/api/renderer.c @@ -0,0 +1,112 @@ +#include "api.h" +#include "renderer.h" +#include "rencache.h" + +static RenColor checkcolor(lua_State *L, int idx, int def) +{ + RenColor color; + if (lua_isnoneornil(L, idx)) + return (RenColor) { def, def, def, 255 }; + lua_rawgeti(L, idx, 1); + lua_rawgeti(L, idx, 2); + lua_rawgeti(L, idx, 3); + lua_rawgeti(L, idx, 4); + color.r = luaL_checknumber(L, -4); + color.g = luaL_checknumber(L, -3); + color.b = luaL_checknumber(L, -2); + color.a = luaL_optnumber(L, -1, 255); + lua_pop(L, 4); + return color; +} + + +static int f_show_debug(lua_State *L) +{ + luaL_checkany(L, 1); + rencache_show_debug(lua_toboolean(L, 1)); + return 0; +} + + +static int f_get_size(lua_State *L) +{ + int w, h; + ren_get_size(&w, &h); + lua_pushnumber(L, w); + lua_pushnumber(L, h); + return 2; +} + + +static int f_begin_frame(lua_State *L) +{ + rencache_begin_frame(); + return 0; +} + + +static int f_end_frame(lua_State *L) +{ + rencache_end_frame(); + return 0; +} + + +static int f_set_clip_rect(lua_State *L) +{ + RenRect rect; + rect.x = luaL_checknumber(L, 1); + rect.y = luaL_checknumber(L, 2); + rect.width = luaL_checknumber(L, 3); + rect.height = luaL_checknumber(L, 4); + rencache_set_clip_rect(rect); + return 0; +} + +static int f_draw_rect(lua_State *L) +{ + RenRect rect; + rect.x = luaL_checknumber(L, 1); + rect.y = luaL_checknumber(L, 2); + rect.width = luaL_checknumber(L, 3); + rect.height = luaL_checknumber(L, 4); + RenColor color = checkcolor(L, 5, 255); + rencache_draw_rect(rect, color); + return 0; +} + + +static int f_draw_text(lua_State *L) +{ + RenFont **font = luaL_checkudata(L, 1, API_TYPE_FONT); + const char *text = luaL_checkstring(L, 2); + int x = luaL_checknumber(L, 3); + int y = luaL_checknumber(L, 4); + RenColor color = checkcolor(L, 5, 255); + x = rencache_draw_text(*font, text, x, y, color); + lua_pushnumber(L, x); + return 1; +} + + +static const luaL_Reg lib[] = { + { "show_debug", f_show_debug }, + { "get_size", f_get_size }, + { "begin_frame", f_begin_frame }, + { "end_frame", f_end_frame }, + { "set_clip_rect", f_set_clip_rect }, + { "draw_rect", f_draw_rect }, + { "draw_text", f_draw_text }, + { NULL, NULL } +}; + + +int luaopen_renderer_font(lua_State *L); + +int luaopen_renderer(lua_State *L) +{ + luaL_newlib(L, lib); + luaopen_renderer_font(L); + lua_setfield(L, -2, "font"); + return 1; +} diff --git a/src/api/renderer_font.c b/src/api/renderer_font.c new file mode 100644 index 0000000..fb064bf --- /dev/null +++ b/src/api/renderer_font.c @@ -0,0 +1,69 @@ +#include "api.h" +#include "renderer.h" +#include "rencache.h" + +static int f_load(lua_State *L) +{ + const char *filename = luaL_checkstring(L, 1); + float size = luaL_checknumber(L, 2); + RenFont **self = lua_newuserdata(L, sizeof(*self)); + luaL_setmetatable(L, API_TYPE_FONT); + *self = ren_load_font(filename, size); + if (!*self) + luaL_error(L, "failed to load font"); + return 1; +} + + +static int f_set_tab_width(lua_State *L) +{ + RenFont **self = luaL_checkudata(L, 1, API_TYPE_FONT); + int n = luaL_checknumber(L, 2); + ren_set_font_tab_width(*self, n); + return 0; +} + + +static int f_gc(lua_State *L) +{ + RenFont **self = luaL_checkudata(L, 1, API_TYPE_FONT); + if (*self) + rencache_free_font(*self); + return 0; +} + + +static int f_get_width(lua_State *L) +{ + RenFont **self = luaL_checkudata(L, 1, API_TYPE_FONT); + const char *text = luaL_checkstring(L, 2); + lua_pushnumber(L, ren_get_font_width(*self, text) ); + return 1; +} + + +static int f_get_height(lua_State *L) +{ + RenFont **self = luaL_checkudata(L, 1, API_TYPE_FONT); + lua_pushnumber(L, ren_get_font_height(*self) ); + return 1; +} + + +static const luaL_Reg lib[] = { + { "__gc", f_gc }, + { "load", f_load }, + { "set_tab_width", f_set_tab_width }, + { "get_width", f_get_width }, + { "get_height", f_get_height }, + { NULL, NULL } +}; + +int luaopen_renderer_font(lua_State *L) +{ + luaL_newmetatable(L, API_TYPE_FONT); + luaL_setfuncs(L, lib, 0); + lua_pushvalue(L, -1); + lua_setfield(L, -2, "__index"); + return 1; +} diff --git a/src/api/system.c b/src/api/system.c new file mode 100644 index 0000000..da474eb --- /dev/null +++ b/src/api/system.c @@ -0,0 +1,402 @@ +#include +#include +#include +#include +#include +#include +#include +#include "api.h" +#include "rencache.h" + +extern SDL_Window *window; + +static const char* button_name(int button) +{ + switch (button) { + case 1 : return "left"; + case 2 : return "middle"; + case 3 : return "right"; + default : return "?"; + } +} + +static char* key_name(char *dst, int sym) +{ + strcpy(dst, SDL_GetKeyName(sym)); + for (char *p = dst; *p; p++) + *p = tolower(*p); + return dst; +} + + +static int f_poll_event(lua_State *L) +{ + char buf[16]; + int mx, my, wx, wy; + SDL_Event e; + +top: + if ( !SDL_PollEvent(&e) ) + return 0; + + switch (e.type) { + case SDL_QUIT: + lua_pushstring(L, "quit"); + return 1; + + case SDL_WINDOWEVENT: + if (e.window.event == SDL_WINDOWEVENT_RESIZED) { + lua_pushstring(L, "resized"); + lua_pushnumber(L, e.window.data1); + lua_pushnumber(L, e.window.data2); + return 3; + } else if (e.window.event == SDL_WINDOWEVENT_EXPOSED) { + rencache_invalidate(); + lua_pushstring(L, "exposed"); + return 1; + } + /* on some systems, when alt-tabbing to the window SDL will + * queue up several KEYDOWN events for the `tab` key; we flush + * all keydown events on focus so these are discarded */ + if (e.window.event == SDL_WINDOWEVENT_FOCUS_GAINED) + SDL_FlushEvent(SDL_KEYDOWN); + goto top; + + case SDL_DROPFILE: + SDL_GetGlobalMouseState(&mx, &my); + SDL_GetWindowPosition(window, &wx, &wy); + lua_pushstring(L, "filedropped"); + lua_pushstring(L, e.drop.file); + lua_pushnumber(L, mx - wx); + lua_pushnumber(L, my - wy); + SDL_free(e.drop.file); + return 4; + + case SDL_KEYDOWN: + lua_pushstring(L, "keypressed"); + lua_pushstring(L, key_name(buf, e.key.keysym.sym)); + return 2; + + case SDL_KEYUP: + lua_pushstring(L, "keyreleased"); + lua_pushstring(L, key_name(buf, e.key.keysym.sym)); + return 2; + + case SDL_TEXTINPUT: + lua_pushstring(L, "textinput"); + lua_pushstring(L, e.text.text); + return 2; + + case SDL_MOUSEBUTTONDOWN: + if (e.button.button == 1) + SDL_CaptureMouse(1); + lua_pushstring(L, "mousepressed"); + lua_pushstring(L, button_name(e.button.button)); + lua_pushnumber(L, e.button.x); + lua_pushnumber(L, e.button.y); + lua_pushnumber(L, e.button.clicks); + return 5; + + case SDL_MOUSEBUTTONUP: + if (e.button.button == 1) + SDL_CaptureMouse(0); + lua_pushstring(L, "mousereleased"); + lua_pushstring(L, button_name(e.button.button)); + lua_pushnumber(L, e.button.x); + lua_pushnumber(L, e.button.y); + return 4; + + case SDL_MOUSEMOTION: + lua_pushstring(L, "mousemoved"); + lua_pushnumber(L, e.motion.x); + lua_pushnumber(L, e.motion.y); + lua_pushnumber(L, e.motion.xrel); + lua_pushnumber(L, e.motion.yrel); + return 5; + + case SDL_MOUSEWHEEL: + lua_pushstring(L, "mousewheel"); + lua_pushnumber(L, e.wheel.y); + return 2; + + default: + goto top; + } + + return 0; +} + +static int f_wait_event(lua_State *L) +{ + double n = luaL_checknumber(L, 1); + lua_pushboolean(L, SDL_WaitEventTimeout(NULL, n * 1000)); + return 1; +} + + +static SDL_Cursor* cursor_cache[SDL_SYSTEM_CURSOR_HAND + 1]; + +static const char *cursor_opts[] = { + "arrow", + "ibeam", + "sizeh", + "sizev", + "hand", + NULL +}; + +static const int cursor_enums[] = { + SDL_SYSTEM_CURSOR_ARROW, + SDL_SYSTEM_CURSOR_IBEAM, + SDL_SYSTEM_CURSOR_SIZEWE, + SDL_SYSTEM_CURSOR_SIZENS, + SDL_SYSTEM_CURSOR_HAND +}; + +static int f_set_cursor(lua_State *L) +{ + int opt = luaL_checkoption(L, 1, "arrow", cursor_opts); + int n = cursor_enums[opt]; + SDL_Cursor *cursor = cursor_cache[n]; + if (!cursor) { + cursor = SDL_CreateSystemCursor(n); + cursor_cache[n] = cursor; + } + SDL_SetCursor(cursor); + return 0; +} + +static int f_set_window_title(lua_State *L) +{ + const char *title = luaL_checkstring(L, 1); + SDL_SetWindowTitle(window, title); + return 0; +} + +static const char *window_opts[] = { "normal", "maximized", "fullscreen", 0 }; +enum { WIN_NORMAL, WIN_MAXIMIZED, WIN_FULLSCREEN }; + +static int f_set_window_mode(lua_State *L) +{ + int n = luaL_checkoption(L, 1, "normal", window_opts); + SDL_SetWindowFullscreen(window, + n == WIN_FULLSCREEN ? SDL_WINDOW_FULLSCREEN_DESKTOP : 0); + if (n == WIN_NORMAL) + SDL_RestoreWindow(window); + if (n == WIN_MAXIMIZED) + SDL_MaximizeWindow(window); + return 0; +} + +static int f_window_has_focus(lua_State *L) +{ + unsigned flags = SDL_GetWindowFlags(window); + lua_pushboolean(L, flags & SDL_WINDOW_INPUT_FOCUS); + return 1; +} + +static int f_show_confirm_dialog(lua_State *L) +{ + const char *title = luaL_checkstring(L, 1); + const char *msg = luaL_checkstring(L, 2); + + SDL_MessageBoxButtonData buttons[] = { + { SDL_MESSAGEBOX_BUTTON_RETURNKEY_DEFAULT, 1, "Yes" }, + { SDL_MESSAGEBOX_BUTTON_ESCAPEKEY_DEFAULT, 0, "No" }, + }; + SDL_MessageBoxData data = { + .title = title, + .message = msg, + .numbuttons = 2, + .buttons = buttons, + }; + int buttonid; + SDL_ShowMessageBox(&data, &buttonid); + lua_pushboolean(L, buttonid == 1); + return 1; +} + +static int f_chdir(lua_State *L) +{ + const char *path = luaL_checkstring(L, 1); + int err = chdir(path); + if (err) + luaL_error(L, "chdir() failed"); + return 0; +} + + +static int f_list_dir(lua_State *L) +{ + const char *path = luaL_checkstring(L, 1); + + DIR *dir = opendir(path); + if (!dir) { + lua_pushnil(L); + lua_pushstring(L, strerror(errno)); + return 2; + } + + lua_newtable(L); + int i = 1; + struct dirent *entry; + while ( (entry = readdir(dir)) ) { + if (strcmp(entry->d_name, "." ) == 0) + continue; + if (strcmp(entry->d_name, "..") == 0) + continue; + lua_pushstring(L, entry->d_name); + lua_rawseti(L, -2, i); + i++; + } + + closedir(dir); + return 1; +} + +static int f_absolute_path(lua_State *L) +{ + const char *path = luaL_checkstring(L, 1); + char *res = realpath(path, NULL); + if (!res) + return 0; + lua_pushstring(L, res); + free(res); + return 1; +} + +static int f_get_file_info(lua_State *L) +{ + const char *path = luaL_checkstring(L, 1); + + struct stat s; + int err = stat(path, &s); + if (err < 0) { + lua_pushnil(L); + lua_pushstring(L, strerror(errno)); + return 2; + } + + lua_newtable(L); + lua_pushnumber(L, s.st_mtime); + lua_setfield(L, -2, "modified"); + + lua_pushnumber(L, s.st_size); + lua_setfield(L, -2, "size"); + + if (S_ISREG(s.st_mode)) { + lua_pushstring(L, "file"); + } else if (S_ISDIR(s.st_mode)) { + lua_pushstring(L, "dir"); + } else { + lua_pushnil(L); + } + lua_setfield(L, -2, "type"); + + return 1; +} + +static int f_get_clipboard(lua_State *L) +{ + char *text = SDL_GetClipboardText(); + if (!text) + return 0; + lua_pushstring(L, text); + SDL_free(text); + return 1; +} + +static int f_set_clipboard(lua_State *L) +{ + const char *text = luaL_checkstring(L, 1); + SDL_SetClipboardText(text); + return 0; +} + +static int f_get_time(lua_State *L) +{ + double n = SDL_GetPerformanceCounter() / (double)SDL_GetPerformanceFrequency(); + lua_pushnumber(L, n); + return 1; +} + +static int f_sleep(lua_State *L) +{ + double n = luaL_checknumber(L, 1); + SDL_Delay(n * 1000); + return 0; +} + + +static int f_exec(lua_State *L) +{ + size_t len; + const char *cmd = luaL_checklstring(L, 1, &len); + char *buf = malloc(len + 32); + if (!buf) + luaL_error(L, "buffer allocation failed"); + sprintf(buf, "%s &", cmd); + int res = system(buf); + (void) res; + free(buf); + return 0; +} + + +static int f_fuzzy_match(lua_State *L) +{ + const char *str = luaL_checkstring(L, 1); + const char *ptn = luaL_checkstring(L, 2); + int score = 0; + int run = 0; + + while (*str && *ptn) { + while (*str == ' ') + str++; + while (*ptn == ' ') + ptn++; + if (tolower(*str) == tolower(*ptn)) { + score += run * 10 - (*str != *ptn); + run++; + ptn++; + } else { + score -= 10; + run = 0; + } + str++; + } + if (*ptn) + return 0; + + lua_pushnumber(L, score - (int) strlen(str)); + return 1; +} + + +static const luaL_Reg lib[] = { + { "poll_event", f_poll_event }, + { "wait_event", f_wait_event }, + { "set_cursor", f_set_cursor }, + { "set_window_title", f_set_window_title }, + { "set_window_mode", f_set_window_mode }, + { "window_has_focus", f_window_has_focus }, + { "show_confirm_dialog", f_show_confirm_dialog }, + { "chdir", f_chdir }, + { "list_dir", f_list_dir }, + { "absolute_path", f_absolute_path }, + { "get_file_info", f_get_file_info }, + { "get_clipboard", f_get_clipboard }, + { "set_clipboard", f_set_clipboard }, + { "get_time", f_get_time }, + { "sleep", f_sleep }, + { "exec", f_exec }, + { "fuzzy_match", f_fuzzy_match }, + { NULL, NULL } +}; + + +int luaopen_system(lua_State *L) +{ + luaL_newlib(L, lib); + return 1; +} diff --git a/src/lib/stb/stb_truetype.c b/src/lib/stb/stb_truetype.c new file mode 100644 index 0000000..dc22d88 --- /dev/null +++ b/src/lib/stb/stb_truetype.c @@ -0,0 +1,2 @@ +#define STB_TRUETYPE_IMPLEMENTATION +#include "stb_truetype.h" diff --git a/src/lib/stb/stb_truetype.h b/src/lib/stb/stb_truetype.h new file mode 100644 index 0000000..62595a1 --- /dev/null +++ b/src/lib/stb/stb_truetype.h @@ -0,0 +1,5011 @@ +// stb_truetype.h - v1.24 - public domain +// authored from 2009-2020 by Sean Barrett / RAD Game Tools +// +// ======================================================================= +// +// NO SECURITY GUARANTEE -- DO NOT USE THIS ON UNTRUSTED FONT FILES +// +// This library does no range checking of the offsets found in the file, +// meaning an attacker can use it to read arbitrary memory. +// +// ======================================================================= +// +// This library processes TrueType files: +// parse files +// extract glyph metrics +// extract glyph shapes +// render glyphs to one-channel bitmaps with antialiasing (box filter) +// render glyphs to one-channel SDF bitmaps (signed-distance field/function) +// +// Todo: +// non-MS cmaps +// crashproof on bad data +// hinting? (no longer patented) +// cleartype-style AA? +// optimize: use simple memory allocator for intermediates +// optimize: build edge-list directly from curves +// optimize: rasterize directly from curves? +// +// ADDITIONAL CONTRIBUTORS +// +// Mikko Mononen: compound shape support, more cmap formats +// Tor Andersson: kerning, subpixel rendering +// Dougall Johnson: OpenType / Type 2 font handling +// Daniel Ribeiro Maciel: basic GPOS-based kerning +// +// Misc other: +// Ryan Gordon +// Simon Glass +// github:IntellectualKitty +// Imanol Celaya +// Daniel Ribeiro Maciel +// +// Bug/warning reports/fixes: +// "Zer" on mollyrocket Fabian "ryg" Giesen github:NiLuJe +// Cass Everitt Martins Mozeiko github:aloucks +// stoiko (Haemimont Games) Cap Petschulat github:oyvindjam +// Brian Hook Omar Cornut github:vassvik +// Walter van Niftrik Ryan Griege +// David Gow Peter LaValle +// David Given Sergey Popov +// Ivan-Assen Ivanov Giumo X. Clanjor +// Anthony Pesch Higor Euripedes +// Johan Duparc Thomas Fields +// Hou Qiming Derek Vinyard +// Rob Loach Cort Stratton +// Kenney Phillis Jr. Brian Costabile +// Ken Voskuil (kaesve) +// +// VERSION HISTORY +// +// 1.24 (2020-02-05) fix warning +// 1.23 (2020-02-02) query SVG data for glyphs; query whole kerning table (but only kern not GPOS) +// 1.22 (2019-08-11) minimize missing-glyph duplication; fix kerning if both 'GPOS' and 'kern' are defined +// 1.21 (2019-02-25) fix warning +// 1.20 (2019-02-07) PackFontRange skips missing codepoints; GetScaleFontVMetrics() +// 1.19 (2018-02-11) GPOS kerning, STBTT_fmod +// 1.18 (2018-01-29) add missing function +// 1.17 (2017-07-23) make more arguments const; doc fix +// 1.16 (2017-07-12) SDF support +// 1.15 (2017-03-03) make more arguments const +// 1.14 (2017-01-16) num-fonts-in-TTC function +// 1.13 (2017-01-02) support OpenType fonts, certain Apple fonts +// 1.12 (2016-10-25) suppress warnings about casting away const with -Wcast-qual +// 1.11 (2016-04-02) fix unused-variable warning +// 1.10 (2016-04-02) user-defined fabs(); rare memory leak; remove duplicate typedef +// 1.09 (2016-01-16) warning fix; avoid crash on outofmem; use allocation userdata properly +// 1.08 (2015-09-13) document stbtt_Rasterize(); fixes for vertical & horizontal edges +// 1.07 (2015-08-01) allow PackFontRanges to accept arrays of sparse codepoints; +// variant PackFontRanges to pack and render in separate phases; +// fix stbtt_GetFontOFfsetForIndex (never worked for non-0 input?); +// fixed an assert() bug in the new rasterizer +// replace assert() with STBTT_assert() in new rasterizer +// +// Full history can be found at the end of this file. +// +// LICENSE +// +// See end of file for license information. +// +// USAGE +// +// Include this file in whatever places need to refer to it. In ONE C/C++ +// file, write: +// #define STB_TRUETYPE_IMPLEMENTATION +// before the #include of this file. This expands out the actual +// implementation into that C/C++ file. +// +// To make the implementation private to the file that generates the implementation, +// #define STBTT_STATIC +// +// Simple 3D API (don't ship this, but it's fine for tools and quick start) +// stbtt_BakeFontBitmap() -- bake a font to a bitmap for use as texture +// stbtt_GetBakedQuad() -- compute quad to draw for a given char +// +// Improved 3D API (more shippable): +// #include "stb_rect_pack.h" -- optional, but you really want it +// stbtt_PackBegin() +// stbtt_PackSetOversampling() -- for improved quality on small fonts +// stbtt_PackFontRanges() -- pack and renders +// stbtt_PackEnd() +// stbtt_GetPackedQuad() +// +// "Load" a font file from a memory buffer (you have to keep the buffer loaded) +// stbtt_InitFont() +// stbtt_GetFontOffsetForIndex() -- indexing for TTC font collections +// stbtt_GetNumberOfFonts() -- number of fonts for TTC font collections +// +// Render a unicode codepoint to a bitmap +// stbtt_GetCodepointBitmap() -- allocates and returns a bitmap +// stbtt_MakeCodepointBitmap() -- renders into bitmap you provide +// stbtt_GetCodepointBitmapBox() -- how big the bitmap must be +// +// Character advance/positioning +// stbtt_GetCodepointHMetrics() +// stbtt_GetFontVMetrics() +// stbtt_GetFontVMetricsOS2() +// stbtt_GetCodepointKernAdvance() +// +// Starting with version 1.06, the rasterizer was replaced with a new, +// faster and generally-more-precise rasterizer. The new rasterizer more +// accurately measures pixel coverage for anti-aliasing, except in the case +// where multiple shapes overlap, in which case it overestimates the AA pixel +// coverage. Thus, anti-aliasing of intersecting shapes may look wrong. If +// this turns out to be a problem, you can re-enable the old rasterizer with +// #define STBTT_RASTERIZER_VERSION 1 +// which will incur about a 15% speed hit. +// +// ADDITIONAL DOCUMENTATION +// +// Immediately after this block comment are a series of sample programs. +// +// After the sample programs is the "header file" section. This section +// includes documentation for each API function. +// +// Some important concepts to understand to use this library: +// +// Codepoint +// Characters are defined by unicode codepoints, e.g. 65 is +// uppercase A, 231 is lowercase c with a cedilla, 0x7e30 is +// the hiragana for "ma". +// +// Glyph +// A visual character shape (every codepoint is rendered as +// some glyph) +// +// Glyph index +// A font-specific integer ID representing a glyph +// +// Baseline +// Glyph shapes are defined relative to a baseline, which is the +// bottom of uppercase characters. Characters extend both above +// and below the baseline. +// +// Current Point +// As you draw text to the screen, you keep track of a "current point" +// which is the origin of each character. The current point's vertical +// position is the baseline. Even "baked fonts" use this model. +// +// Vertical Font Metrics +// The vertical qualities of the font, used to vertically position +// and space the characters. See docs for stbtt_GetFontVMetrics. +// +// Font Size in Pixels or Points +// The preferred interface for specifying font sizes in stb_truetype +// is to specify how tall the font's vertical extent should be in pixels. +// If that sounds good enough, skip the next paragraph. +// +// Most font APIs instead use "points", which are a common typographic +// measurement for describing font size, defined as 72 points per inch. +// stb_truetype provides a point API for compatibility. However, true +// "per inch" conventions don't make much sense on computer displays +// since different monitors have different number of pixels per +// inch. For example, Windows traditionally uses a convention that +// there are 96 pixels per inch, thus making 'inch' measurements have +// nothing to do with inches, and thus effectively defining a point to +// be 1.333 pixels. Additionally, the TrueType font data provides +// an explicit scale factor to scale a given font's glyphs to points, +// but the author has observed that this scale factor is often wrong +// for non-commercial fonts, thus making fonts scaled in points +// according to the TrueType spec incoherently sized in practice. +// +// DETAILED USAGE: +// +// Scale: +// Select how high you want the font to be, in points or pixels. +// Call ScaleForPixelHeight or ScaleForMappingEmToPixels to compute +// a scale factor SF that will be used by all other functions. +// +// Baseline: +// You need to select a y-coordinate that is the baseline of where +// your text will appear. Call GetFontBoundingBox to get the baseline-relative +// bounding box for all characters. SF*-y0 will be the distance in pixels +// that the worst-case character could extend above the baseline, so if +// you want the top edge of characters to appear at the top of the +// screen where y=0, then you would set the baseline to SF*-y0. +// +// Current point: +// Set the current point where the first character will appear. The +// first character could extend left of the current point; this is font +// dependent. You can either choose a current point that is the leftmost +// point and hope, or add some padding, or check the bounding box or +// left-side-bearing of the first character to be displayed and set +// the current point based on that. +// +// Displaying a character: +// Compute the bounding box of the character. It will contain signed values +// relative to . I.e. if it returns x0,y0,x1,y1, +// then the character should be displayed in the rectangle from +// to = 32 && *text < 128) { + stbtt_aligned_quad q; + stbtt_GetBakedQuad(cdata, 512,512, *text-32, &x,&y,&q,1);//1=opengl & d3d10+,0=d3d9 + glTexCoord2f(q.s0,q.t1); glVertex2f(q.x0,q.y0); + glTexCoord2f(q.s1,q.t1); glVertex2f(q.x1,q.y0); + glTexCoord2f(q.s1,q.t0); glVertex2f(q.x1,q.y1); + glTexCoord2f(q.s0,q.t0); glVertex2f(q.x0,q.y1); + } + ++text; + } + glEnd(); +} +#endif +// +// +////////////////////////////////////////////////////////////////////////////// +// +// Complete program (this compiles): get a single bitmap, print as ASCII art +// +#if 0 +#include +#define STB_TRUETYPE_IMPLEMENTATION // force following include to generate implementation +#include "stb_truetype.h" + +char ttf_buffer[1<<25]; + +int main(int argc, char **argv) +{ + stbtt_fontinfo font; + unsigned char *bitmap; + int w,h,i,j,c = (argc > 1 ? atoi(argv[1]) : 'a'), s = (argc > 2 ? atoi(argv[2]) : 20); + + fread(ttf_buffer, 1, 1<<25, fopen(argc > 3 ? argv[3] : "c:/windows/fonts/arialbd.ttf", "rb")); + + stbtt_InitFont(&font, ttf_buffer, stbtt_GetFontOffsetForIndex(ttf_buffer,0)); + bitmap = stbtt_GetCodepointBitmap(&font, 0,stbtt_ScaleForPixelHeight(&font, s), c, &w, &h, 0,0); + + for (j=0; j < h; ++j) { + for (i=0; i < w; ++i) + putchar(" .:ioVM@"[bitmap[j*w+i]>>5]); + putchar('\n'); + } + return 0; +} +#endif +// +// Output: +// +// .ii. +// @@@@@@. +// V@Mio@@o +// :i. V@V +// :oM@@M +// :@@@MM@M +// @@o o@M +// :@@. M@M +// @@@o@@@@ +// :M@@V:@@. +// +////////////////////////////////////////////////////////////////////////////// +// +// Complete program: print "Hello World!" banner, with bugs +// +#if 0 +char buffer[24<<20]; +unsigned char screen[20][79]; + +int main(int arg, char **argv) +{ + stbtt_fontinfo font; + int i,j,ascent,baseline,ch=0; + float scale, xpos=2; // leave a little padding in case the character extends left + char *text = "Heljo World!"; // intentionally misspelled to show 'lj' brokenness + + fread(buffer, 1, 1000000, fopen("c:/windows/fonts/arialbd.ttf", "rb")); + stbtt_InitFont(&font, buffer, 0); + + scale = stbtt_ScaleForPixelHeight(&font, 15); + stbtt_GetFontVMetrics(&font, &ascent,0,0); + baseline = (int) (ascent*scale); + + while (text[ch]) { + int advance,lsb,x0,y0,x1,y1; + float x_shift = xpos - (float) floor(xpos); + stbtt_GetCodepointHMetrics(&font, text[ch], &advance, &lsb); + stbtt_GetCodepointBitmapBoxSubpixel(&font, text[ch], scale,scale,x_shift,0, &x0,&y0,&x1,&y1); + stbtt_MakeCodepointBitmapSubpixel(&font, &screen[baseline + y0][(int) xpos + x0], x1-x0,y1-y0, 79, scale,scale,x_shift,0, text[ch]); + // note that this stomps the old data, so where character boxes overlap (e.g. 'lj') it's wrong + // because this API is really for baking character bitmaps into textures. if you want to render + // a sequence of characters, you really need to render each bitmap to a temp buffer, then + // "alpha blend" that into the working buffer + xpos += (advance * scale); + if (text[ch+1]) + xpos += scale*stbtt_GetCodepointKernAdvance(&font, text[ch],text[ch+1]); + ++ch; + } + + for (j=0; j < 20; ++j) { + for (i=0; i < 78; ++i) + putchar(" .:ioVM@"[screen[j][i]>>5]); + putchar('\n'); + } + + return 0; +} +#endif + + +////////////////////////////////////////////////////////////////////////////// +////////////////////////////////////////////////////////////////////////////// +//// +//// INTEGRATION WITH YOUR CODEBASE +//// +//// The following sections allow you to supply alternate definitions +//// of C library functions used by stb_truetype, e.g. if you don't +//// link with the C runtime library. + +#ifdef STB_TRUETYPE_IMPLEMENTATION + // #define your own (u)stbtt_int8/16/32 before including to override this + #ifndef stbtt_uint8 + typedef unsigned char stbtt_uint8; + typedef signed char stbtt_int8; + typedef unsigned short stbtt_uint16; + typedef signed short stbtt_int16; + typedef unsigned int stbtt_uint32; + typedef signed int stbtt_int32; + #endif + + typedef char stbtt__check_size32[sizeof(stbtt_int32)==4 ? 1 : -1]; + typedef char stbtt__check_size16[sizeof(stbtt_int16)==2 ? 1 : -1]; + + // e.g. #define your own STBTT_ifloor/STBTT_iceil() to avoid math.h + #ifndef STBTT_ifloor + #include + #define STBTT_ifloor(x) ((int) floor(x)) + #define STBTT_iceil(x) ((int) ceil(x)) + #endif + + #ifndef STBTT_sqrt + #include + #define STBTT_sqrt(x) sqrt(x) + #define STBTT_pow(x,y) pow(x,y) + #endif + + #ifndef STBTT_fmod + #include + #define STBTT_fmod(x,y) fmod(x,y) + #endif + + #ifndef STBTT_cos + #include + #define STBTT_cos(x) cos(x) + #define STBTT_acos(x) acos(x) + #endif + + #ifndef STBTT_fabs + #include + #define STBTT_fabs(x) fabs(x) + #endif + + // #define your own functions "STBTT_malloc" / "STBTT_free" to avoid malloc.h + #ifndef STBTT_malloc + #include + #define STBTT_malloc(x,u) ((void)(u),malloc(x)) + #define STBTT_free(x,u) ((void)(u),free(x)) + #endif + + #ifndef STBTT_assert + #include + #define STBTT_assert(x) assert(x) + #endif + + #ifndef STBTT_strlen + #include + #define STBTT_strlen(x) strlen(x) + #endif + + #ifndef STBTT_memcpy + #include + #define STBTT_memcpy memcpy + #define STBTT_memset memset + #endif +#endif + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +//// +//// INTERFACE +//// +//// + +#ifndef __STB_INCLUDE_STB_TRUETYPE_H__ +#define __STB_INCLUDE_STB_TRUETYPE_H__ + +#ifdef STBTT_STATIC +#define STBTT_DEF static +#else +#define STBTT_DEF extern +#endif + +#ifdef __cplusplus +extern "C" { +#endif + +// private structure +typedef struct +{ + unsigned char *data; + int cursor; + int size; +} stbtt__buf; + +////////////////////////////////////////////////////////////////////////////// +// +// TEXTURE BAKING API +// +// If you use this API, you only have to call two functions ever. +// + +typedef struct +{ + unsigned short x0,y0,x1,y1; // coordinates of bbox in bitmap + float xoff,yoff,xadvance; +} stbtt_bakedchar; + +STBTT_DEF int stbtt_BakeFontBitmap(const unsigned char *data, int offset, // font location (use offset=0 for plain .ttf) + float pixel_height, // height of font in pixels + unsigned char *pixels, int pw, int ph, // bitmap to be filled in + int first_char, int num_chars, // characters to bake + stbtt_bakedchar *chardata); // you allocate this, it's num_chars long +// if return is positive, the first unused row of the bitmap +// if return is negative, returns the negative of the number of characters that fit +// if return is 0, no characters fit and no rows were used +// This uses a very crappy packing. + +typedef struct +{ + float x0,y0,s0,t0; // top-left + float x1,y1,s1,t1; // bottom-right +} stbtt_aligned_quad; + +STBTT_DEF void stbtt_GetBakedQuad(const stbtt_bakedchar *chardata, int pw, int ph, // same data as above + int char_index, // character to display + float *xpos, float *ypos, // pointers to current position in screen pixel space + stbtt_aligned_quad *q, // output: quad to draw + int opengl_fillrule); // true if opengl fill rule; false if DX9 or earlier +// Call GetBakedQuad with char_index = 'character - first_char', and it +// creates the quad you need to draw and advances the current position. +// +// The coordinate system used assumes y increases downwards. +// +// Characters will extend both above and below the current position; +// see discussion of "BASELINE" above. +// +// It's inefficient; you might want to c&p it and optimize it. + +STBTT_DEF void stbtt_GetScaledFontVMetrics(const unsigned char *fontdata, int index, float size, float *ascent, float *descent, float *lineGap); +// Query the font vertical metrics without having to create a font first. + + +////////////////////////////////////////////////////////////////////////////// +// +// NEW TEXTURE BAKING API +// +// This provides options for packing multiple fonts into one atlas, not +// perfectly but better than nothing. + +typedef struct +{ + unsigned short x0,y0,x1,y1; // coordinates of bbox in bitmap + float xoff,yoff,xadvance; + float xoff2,yoff2; +} stbtt_packedchar; + +typedef struct stbtt_pack_context stbtt_pack_context; +typedef struct stbtt_fontinfo stbtt_fontinfo; +#ifndef STB_RECT_PACK_VERSION +typedef struct stbrp_rect stbrp_rect; +#endif + +STBTT_DEF int stbtt_PackBegin(stbtt_pack_context *spc, unsigned char *pixels, int width, int height, int stride_in_bytes, int padding, void *alloc_context); +// Initializes a packing context stored in the passed-in stbtt_pack_context. +// Future calls using this context will pack characters into the bitmap passed +// in here: a 1-channel bitmap that is width * height. stride_in_bytes is +// the distance from one row to the next (or 0 to mean they are packed tightly +// together). "padding" is the amount of padding to leave between each +// character (normally you want '1' for bitmaps you'll use as textures with +// bilinear filtering). +// +// Returns 0 on failure, 1 on success. + +STBTT_DEF void stbtt_PackEnd (stbtt_pack_context *spc); +// Cleans up the packing context and frees all memory. + +#define STBTT_POINT_SIZE(x) (-(x)) + +STBTT_DEF int stbtt_PackFontRange(stbtt_pack_context *spc, const unsigned char *fontdata, int font_index, float font_size, + int first_unicode_char_in_range, int num_chars_in_range, stbtt_packedchar *chardata_for_range); +// Creates character bitmaps from the font_index'th font found in fontdata (use +// font_index=0 if you don't know what that is). It creates num_chars_in_range +// bitmaps for characters with unicode values starting at first_unicode_char_in_range +// and increasing. Data for how to render them is stored in chardata_for_range; +// pass these to stbtt_GetPackedQuad to get back renderable quads. +// +// font_size is the full height of the character from ascender to descender, +// as computed by stbtt_ScaleForPixelHeight. To use a point size as computed +// by stbtt_ScaleForMappingEmToPixels, wrap the point size in STBTT_POINT_SIZE() +// and pass that result as 'font_size': +// ..., 20 , ... // font max minus min y is 20 pixels tall +// ..., STBTT_POINT_SIZE(20), ... // 'M' is 20 pixels tall + +typedef struct +{ + float font_size; + int first_unicode_codepoint_in_range; // if non-zero, then the chars are continuous, and this is the first codepoint + int *array_of_unicode_codepoints; // if non-zero, then this is an array of unicode codepoints + int num_chars; + stbtt_packedchar *chardata_for_range; // output + unsigned char h_oversample, v_oversample; // don't set these, they're used internally +} stbtt_pack_range; + +STBTT_DEF int stbtt_PackFontRanges(stbtt_pack_context *spc, const unsigned char *fontdata, int font_index, stbtt_pack_range *ranges, int num_ranges); +// Creates character bitmaps from multiple ranges of characters stored in +// ranges. This will usually create a better-packed bitmap than multiple +// calls to stbtt_PackFontRange. Note that you can call this multiple +// times within a single PackBegin/PackEnd. + +STBTT_DEF void stbtt_PackSetOversampling(stbtt_pack_context *spc, unsigned int h_oversample, unsigned int v_oversample); +// Oversampling a font increases the quality by allowing higher-quality subpixel +// positioning, and is especially valuable at smaller text sizes. +// +// This function sets the amount of oversampling for all following calls to +// stbtt_PackFontRange(s) or stbtt_PackFontRangesGatherRects for a given +// pack context. The default (no oversampling) is achieved by h_oversample=1 +// and v_oversample=1. The total number of pixels required is +// h_oversample*v_oversample larger than the default; for example, 2x2 +// oversampling requires 4x the storage of 1x1. For best results, render +// oversampled textures with bilinear filtering. Look at the readme in +// stb/tests/oversample for information about oversampled fonts +// +// To use with PackFontRangesGather etc., you must set it before calls +// call to PackFontRangesGatherRects. + +STBTT_DEF void stbtt_PackSetSkipMissingCodepoints(stbtt_pack_context *spc, int skip); +// If skip != 0, this tells stb_truetype to skip any codepoints for which +// there is no corresponding glyph. If skip=0, which is the default, then +// codepoints without a glyph recived the font's "missing character" glyph, +// typically an empty box by convention. + +STBTT_DEF void stbtt_GetPackedQuad(const stbtt_packedchar *chardata, int pw, int ph, // same data as above + int char_index, // character to display + float *xpos, float *ypos, // pointers to current position in screen pixel space + stbtt_aligned_quad *q, // output: quad to draw + int align_to_integer); + +STBTT_DEF int stbtt_PackFontRangesGatherRects(stbtt_pack_context *spc, const stbtt_fontinfo *info, stbtt_pack_range *ranges, int num_ranges, stbrp_rect *rects); +STBTT_DEF void stbtt_PackFontRangesPackRects(stbtt_pack_context *spc, stbrp_rect *rects, int num_rects); +STBTT_DEF int stbtt_PackFontRangesRenderIntoRects(stbtt_pack_context *spc, const stbtt_fontinfo *info, stbtt_pack_range *ranges, int num_ranges, stbrp_rect *rects); +// Calling these functions in sequence is roughly equivalent to calling +// stbtt_PackFontRanges(). If you more control over the packing of multiple +// fonts, or if you want to pack custom data into a font texture, take a look +// at the source to of stbtt_PackFontRanges() and create a custom version +// using these functions, e.g. call GatherRects multiple times, +// building up a single array of rects, then call PackRects once, +// then call RenderIntoRects repeatedly. This may result in a +// better packing than calling PackFontRanges multiple times +// (or it may not). + +// this is an opaque structure that you shouldn't mess with which holds +// all the context needed from PackBegin to PackEnd. +struct stbtt_pack_context { + void *user_allocator_context; + void *pack_info; + int width; + int height; + int stride_in_bytes; + int padding; + int skip_missing; + unsigned int h_oversample, v_oversample; + unsigned char *pixels; + void *nodes; +}; + +////////////////////////////////////////////////////////////////////////////// +// +// FONT LOADING +// +// + +STBTT_DEF int stbtt_GetNumberOfFonts(const unsigned char *data); +// This function will determine the number of fonts in a font file. TrueType +// collection (.ttc) files may contain multiple fonts, while TrueType font +// (.ttf) files only contain one font. The number of fonts can be used for +// indexing with the previous function where the index is between zero and one +// less than the total fonts. If an error occurs, -1 is returned. + +STBTT_DEF int stbtt_GetFontOffsetForIndex(const unsigned char *data, int index); +// Each .ttf/.ttc file may have more than one font. Each font has a sequential +// index number starting from 0. Call this function to get the font offset for +// a given index; it returns -1 if the index is out of range. A regular .ttf +// file will only define one font and it always be at offset 0, so it will +// return '0' for index 0, and -1 for all other indices. + +// The following structure is defined publicly so you can declare one on +// the stack or as a global or etc, but you should treat it as opaque. +struct stbtt_fontinfo +{ + void * userdata; + unsigned char * data; // pointer to .ttf file + int fontstart; // offset of start of font + + int numGlyphs; // number of glyphs, needed for range checking + + int loca,head,glyf,hhea,hmtx,kern,gpos,svg; // table locations as offset from start of .ttf + int index_map; // a cmap mapping for our chosen character encoding + int indexToLocFormat; // format needed to map from glyph index to glyph + + stbtt__buf cff; // cff font data + stbtt__buf charstrings; // the charstring index + stbtt__buf gsubrs; // global charstring subroutines index + stbtt__buf subrs; // private charstring subroutines index + stbtt__buf fontdicts; // array of font dicts + stbtt__buf fdselect; // map from glyph to fontdict +}; + +STBTT_DEF int stbtt_InitFont(stbtt_fontinfo *info, const unsigned char *data, int offset); +// Given an offset into the file that defines a font, this function builds +// the necessary cached info for the rest of the system. You must allocate +// the stbtt_fontinfo yourself, and stbtt_InitFont will fill it out. You don't +// need to do anything special to free it, because the contents are pure +// value data with no additional data structures. Returns 0 on failure. + + +////////////////////////////////////////////////////////////////////////////// +// +// CHARACTER TO GLYPH-INDEX CONVERSIOn + +STBTT_DEF int stbtt_FindGlyphIndex(const stbtt_fontinfo *info, int unicode_codepoint); +// If you're going to perform multiple operations on the same character +// and you want a speed-up, call this function with the character you're +// going to process, then use glyph-based functions instead of the +// codepoint-based functions. +// Returns 0 if the character codepoint is not defined in the font. + + +////////////////////////////////////////////////////////////////////////////// +// +// CHARACTER PROPERTIES +// + +STBTT_DEF float stbtt_ScaleForPixelHeight(const stbtt_fontinfo *info, float pixels); +// computes a scale factor to produce a font whose "height" is 'pixels' tall. +// Height is measured as the distance from the highest ascender to the lowest +// descender; in other words, it's equivalent to calling stbtt_GetFontVMetrics +// and computing: +// scale = pixels / (ascent - descent) +// so if you prefer to measure height by the ascent only, use a similar calculation. + +STBTT_DEF float stbtt_ScaleForMappingEmToPixels(const stbtt_fontinfo *info, float pixels); +// computes a scale factor to produce a font whose EM size is mapped to +// 'pixels' tall. This is probably what traditional APIs compute, but +// I'm not positive. + +STBTT_DEF void stbtt_GetFontVMetrics(const stbtt_fontinfo *info, int *ascent, int *descent, int *lineGap); +// ascent is the coordinate above the baseline the font extends; descent +// is the coordinate below the baseline the font extends (i.e. it is typically negative) +// lineGap is the spacing between one row's descent and the next row's ascent... +// so you should advance the vertical position by "*ascent - *descent + *lineGap" +// these are expressed in unscaled coordinates, so you must multiply by +// the scale factor for a given size + +STBTT_DEF int stbtt_GetFontVMetricsOS2(const stbtt_fontinfo *info, int *typoAscent, int *typoDescent, int *typoLineGap); +// analogous to GetFontVMetrics, but returns the "typographic" values from the OS/2 +// table (specific to MS/Windows TTF files). +// +// Returns 1 on success (table present), 0 on failure. + +STBTT_DEF void stbtt_GetFontBoundingBox(const stbtt_fontinfo *info, int *x0, int *y0, int *x1, int *y1); +// the bounding box around all possible characters + +STBTT_DEF void stbtt_GetCodepointHMetrics(const stbtt_fontinfo *info, int codepoint, int *advanceWidth, int *leftSideBearing); +// leftSideBearing is the offset from the current horizontal position to the left edge of the character +// advanceWidth is the offset from the current horizontal position to the next horizontal position +// these are expressed in unscaled coordinates + +STBTT_DEF int stbtt_GetCodepointKernAdvance(const stbtt_fontinfo *info, int ch1, int ch2); +// an additional amount to add to the 'advance' value between ch1 and ch2 + +STBTT_DEF int stbtt_GetCodepointBox(const stbtt_fontinfo *info, int codepoint, int *x0, int *y0, int *x1, int *y1); +// Gets the bounding box of the visible part of the glyph, in unscaled coordinates + +STBTT_DEF void stbtt_GetGlyphHMetrics(const stbtt_fontinfo *info, int glyph_index, int *advanceWidth, int *leftSideBearing); +STBTT_DEF int stbtt_GetGlyphKernAdvance(const stbtt_fontinfo *info, int glyph1, int glyph2); +STBTT_DEF int stbtt_GetGlyphBox(const stbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1); +// as above, but takes one or more glyph indices for greater efficiency + +typedef struct stbtt_kerningentry +{ + int glyph1; // use stbtt_FindGlyphIndex + int glyph2; + int advance; +} stbtt_kerningentry; + +STBTT_DEF int stbtt_GetKerningTableLength(const stbtt_fontinfo *info); +STBTT_DEF int stbtt_GetKerningTable(const stbtt_fontinfo *info, stbtt_kerningentry* table, int table_length); +// Retrieves a complete list of all of the kerning pairs provided by the font +// stbtt_GetKerningTable never writes more than table_length entries and returns how many entries it did write. +// The table will be sorted by (a.glyph1 == b.glyph1)?(a.glyph2 < b.glyph2):(a.glyph1 < b.glyph1) + +////////////////////////////////////////////////////////////////////////////// +// +// GLYPH SHAPES (you probably don't need these, but they have to go before +// the bitmaps for C declaration-order reasons) +// + +#ifndef STBTT_vmove // you can predefine these to use different values (but why?) + enum { + STBTT_vmove=1, + STBTT_vline, + STBTT_vcurve, + STBTT_vcubic + }; +#endif + +#ifndef stbtt_vertex // you can predefine this to use different values + // (we share this with other code at RAD) + #define stbtt_vertex_type short // can't use stbtt_int16 because that's not visible in the header file + typedef struct + { + stbtt_vertex_type x,y,cx,cy,cx1,cy1; + unsigned char type,padding; + } stbtt_vertex; +#endif + +STBTT_DEF int stbtt_IsGlyphEmpty(const stbtt_fontinfo *info, int glyph_index); +// returns non-zero if nothing is drawn for this glyph + +STBTT_DEF int stbtt_GetCodepointShape(const stbtt_fontinfo *info, int unicode_codepoint, stbtt_vertex **vertices); +STBTT_DEF int stbtt_GetGlyphShape(const stbtt_fontinfo *info, int glyph_index, stbtt_vertex **vertices); +// returns # of vertices and fills *vertices with the pointer to them +// these are expressed in "unscaled" coordinates +// +// The shape is a series of contours. Each one starts with +// a STBTT_moveto, then consists of a series of mixed +// STBTT_lineto and STBTT_curveto segments. A lineto +// draws a line from previous endpoint to its x,y; a curveto +// draws a quadratic bezier from previous endpoint to +// its x,y, using cx,cy as the bezier control point. + +STBTT_DEF void stbtt_FreeShape(const stbtt_fontinfo *info, stbtt_vertex *vertices); +// frees the data allocated above + +STBTT_DEF int stbtt_GetCodepointSVG(const stbtt_fontinfo *info, int unicode_codepoint, const char **svg); +STBTT_DEF int stbtt_GetGlyphSVG(const stbtt_fontinfo *info, int gl, const char **svg); +// fills svg with the character's SVG data. +// returns data size or 0 if SVG not found. + +////////////////////////////////////////////////////////////////////////////// +// +// BITMAP RENDERING +// + +STBTT_DEF void stbtt_FreeBitmap(unsigned char *bitmap, void *userdata); +// frees the bitmap allocated below + +STBTT_DEF unsigned char *stbtt_GetCodepointBitmap(const stbtt_fontinfo *info, float scale_x, float scale_y, int codepoint, int *width, int *height, int *xoff, int *yoff); +// allocates a large-enough single-channel 8bpp bitmap and renders the +// specified character/glyph at the specified scale into it, with +// antialiasing. 0 is no coverage (transparent), 255 is fully covered (opaque). +// *width & *height are filled out with the width & height of the bitmap, +// which is stored left-to-right, top-to-bottom. +// +// xoff/yoff are the offset it pixel space from the glyph origin to the top-left of the bitmap + +STBTT_DEF unsigned char *stbtt_GetCodepointBitmapSubpixel(const stbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int codepoint, int *width, int *height, int *xoff, int *yoff); +// the same as stbtt_GetCodepoitnBitmap, but you can specify a subpixel +// shift for the character + +STBTT_DEF void stbtt_MakeCodepointBitmap(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, int codepoint); +// the same as stbtt_GetCodepointBitmap, but you pass in storage for the bitmap +// in the form of 'output', with row spacing of 'out_stride' bytes. the bitmap +// is clipped to out_w/out_h bytes. Call stbtt_GetCodepointBitmapBox to get the +// width and height and positioning info for it first. + +STBTT_DEF void stbtt_MakeCodepointBitmapSubpixel(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int codepoint); +// same as stbtt_MakeCodepointBitmap, but you can specify a subpixel +// shift for the character + +STBTT_DEF void stbtt_MakeCodepointBitmapSubpixelPrefilter(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int oversample_x, int oversample_y, float *sub_x, float *sub_y, int codepoint); +// same as stbtt_MakeCodepointBitmapSubpixel, but prefiltering +// is performed (see stbtt_PackSetOversampling) + +STBTT_DEF void stbtt_GetCodepointBitmapBox(const stbtt_fontinfo *font, int codepoint, float scale_x, float scale_y, int *ix0, int *iy0, int *ix1, int *iy1); +// get the bbox of the bitmap centered around the glyph origin; so the +// bitmap width is ix1-ix0, height is iy1-iy0, and location to place +// the bitmap top left is (leftSideBearing*scale,iy0). +// (Note that the bitmap uses y-increases-down, but the shape uses +// y-increases-up, so CodepointBitmapBox and CodepointBox are inverted.) + +STBTT_DEF void stbtt_GetCodepointBitmapBoxSubpixel(const stbtt_fontinfo *font, int codepoint, float scale_x, float scale_y, float shift_x, float shift_y, int *ix0, int *iy0, int *ix1, int *iy1); +// same as stbtt_GetCodepointBitmapBox, but you can specify a subpixel +// shift for the character + +// the following functions are equivalent to the above functions, but operate +// on glyph indices instead of Unicode codepoints (for efficiency) +STBTT_DEF unsigned char *stbtt_GetGlyphBitmap(const stbtt_fontinfo *info, float scale_x, float scale_y, int glyph, int *width, int *height, int *xoff, int *yoff); +STBTT_DEF unsigned char *stbtt_GetGlyphBitmapSubpixel(const stbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int glyph, int *width, int *height, int *xoff, int *yoff); +STBTT_DEF void stbtt_MakeGlyphBitmap(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, int glyph); +STBTT_DEF void stbtt_MakeGlyphBitmapSubpixel(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int glyph); +STBTT_DEF void stbtt_MakeGlyphBitmapSubpixelPrefilter(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int oversample_x, int oversample_y, float *sub_x, float *sub_y, int glyph); +STBTT_DEF void stbtt_GetGlyphBitmapBox(const stbtt_fontinfo *font, int glyph, float scale_x, float scale_y, int *ix0, int *iy0, int *ix1, int *iy1); +STBTT_DEF void stbtt_GetGlyphBitmapBoxSubpixel(const stbtt_fontinfo *font, int glyph, float scale_x, float scale_y,float shift_x, float shift_y, int *ix0, int *iy0, int *ix1, int *iy1); + + +// @TODO: don't expose this structure +typedef struct +{ + int w,h,stride; + unsigned char *pixels; +} stbtt__bitmap; + +// rasterize a shape with quadratic beziers into a bitmap +STBTT_DEF void stbtt_Rasterize(stbtt__bitmap *result, // 1-channel bitmap to draw into + float flatness_in_pixels, // allowable error of curve in pixels + stbtt_vertex *vertices, // array of vertices defining shape + int num_verts, // number of vertices in above array + float scale_x, float scale_y, // scale applied to input vertices + float shift_x, float shift_y, // translation applied to input vertices + int x_off, int y_off, // another translation applied to input + int invert, // if non-zero, vertically flip shape + void *userdata); // context for to STBTT_MALLOC + +////////////////////////////////////////////////////////////////////////////// +// +// Signed Distance Function (or Field) rendering + +STBTT_DEF void stbtt_FreeSDF(unsigned char *bitmap, void *userdata); +// frees the SDF bitmap allocated below + +STBTT_DEF unsigned char * stbtt_GetGlyphSDF(const stbtt_fontinfo *info, float scale, int glyph, int padding, unsigned char onedge_value, float pixel_dist_scale, int *width, int *height, int *xoff, int *yoff); +STBTT_DEF unsigned char * stbtt_GetCodepointSDF(const stbtt_fontinfo *info, float scale, int codepoint, int padding, unsigned char onedge_value, float pixel_dist_scale, int *width, int *height, int *xoff, int *yoff); +// These functions compute a discretized SDF field for a single character, suitable for storing +// in a single-channel texture, sampling with bilinear filtering, and testing against +// larger than some threshold to produce scalable fonts. +// info -- the font +// scale -- controls the size of the resulting SDF bitmap, same as it would be creating a regular bitmap +// glyph/codepoint -- the character to generate the SDF for +// padding -- extra "pixels" around the character which are filled with the distance to the character (not 0), +// which allows effects like bit outlines +// onedge_value -- value 0-255 to test the SDF against to reconstruct the character (i.e. the isocontour of the character) +// pixel_dist_scale -- what value the SDF should increase by when moving one SDF "pixel" away from the edge (on the 0..255 scale) +// if positive, > onedge_value is inside; if negative, < onedge_value is inside +// width,height -- output height & width of the SDF bitmap (including padding) +// xoff,yoff -- output origin of the character +// return value -- a 2D array of bytes 0..255, width*height in size +// +// pixel_dist_scale & onedge_value are a scale & bias that allows you to make +// optimal use of the limited 0..255 for your application, trading off precision +// and special effects. SDF values outside the range 0..255 are clamped to 0..255. +// +// Example: +// scale = stbtt_ScaleForPixelHeight(22) +// padding = 5 +// onedge_value = 180 +// pixel_dist_scale = 180/5.0 = 36.0 +// +// This will create an SDF bitmap in which the character is about 22 pixels +// high but the whole bitmap is about 22+5+5=32 pixels high. To produce a filled +// shape, sample the SDF at each pixel and fill the pixel if the SDF value +// is greater than or equal to 180/255. (You'll actually want to antialias, +// which is beyond the scope of this example.) Additionally, you can compute +// offset outlines (e.g. to stroke the character border inside & outside, +// or only outside). For example, to fill outside the character up to 3 SDF +// pixels, you would compare against (180-36.0*3)/255 = 72/255. The above +// choice of variables maps a range from 5 pixels outside the shape to +// 2 pixels inside the shape to 0..255; this is intended primarily for apply +// outside effects only (the interior range is needed to allow proper +// antialiasing of the font at *smaller* sizes) +// +// The function computes the SDF analytically at each SDF pixel, not by e.g. +// building a higher-res bitmap and approximating it. In theory the quality +// should be as high as possible for an SDF of this size & representation, but +// unclear if this is true in practice (perhaps building a higher-res bitmap +// and computing from that can allow drop-out prevention). +// +// The algorithm has not been optimized at all, so expect it to be slow +// if computing lots of characters or very large sizes. + + + +////////////////////////////////////////////////////////////////////////////// +// +// Finding the right font... +// +// You should really just solve this offline, keep your own tables +// of what font is what, and don't try to get it out of the .ttf file. +// That's because getting it out of the .ttf file is really hard, because +// the names in the file can appear in many possible encodings, in many +// possible languages, and e.g. if you need a case-insensitive comparison, +// the details of that depend on the encoding & language in a complex way +// (actually underspecified in truetype, but also gigantic). +// +// But you can use the provided functions in two possible ways: +// stbtt_FindMatchingFont() will use *case-sensitive* comparisons on +// unicode-encoded names to try to find the font you want; +// you can run this before calling stbtt_InitFont() +// +// stbtt_GetFontNameString() lets you get any of the various strings +// from the file yourself and do your own comparisons on them. +// You have to have called stbtt_InitFont() first. + + +STBTT_DEF int stbtt_FindMatchingFont(const unsigned char *fontdata, const char *name, int flags); +// returns the offset (not index) of the font that matches, or -1 if none +// if you use STBTT_MACSTYLE_DONTCARE, use a font name like "Arial Bold". +// if you use any other flag, use a font name like "Arial"; this checks +// the 'macStyle' header field; i don't know if fonts set this consistently +#define STBTT_MACSTYLE_DONTCARE 0 +#define STBTT_MACSTYLE_BOLD 1 +#define STBTT_MACSTYLE_ITALIC 2 +#define STBTT_MACSTYLE_UNDERSCORE 4 +#define STBTT_MACSTYLE_NONE 8 // <= not same as 0, this makes us check the bitfield is 0 + +STBTT_DEF int stbtt_CompareUTF8toUTF16_bigendian(const char *s1, int len1, const char *s2, int len2); +// returns 1/0 whether the first string interpreted as utf8 is identical to +// the second string interpreted as big-endian utf16... useful for strings from next func + +STBTT_DEF const char *stbtt_GetFontNameString(const stbtt_fontinfo *font, int *length, int platformID, int encodingID, int languageID, int nameID); +// returns the string (which may be big-endian double byte, e.g. for unicode) +// and puts the length in bytes in *length. +// +// some of the values for the IDs are below; for more see the truetype spec: +// http://developer.apple.com/textfonts/TTRefMan/RM06/Chap6name.html +// http://www.microsoft.com/typography/otspec/name.htm + +enum { // platformID + STBTT_PLATFORM_ID_UNICODE =0, + STBTT_PLATFORM_ID_MAC =1, + STBTT_PLATFORM_ID_ISO =2, + STBTT_PLATFORM_ID_MICROSOFT =3 +}; + +enum { // encodingID for STBTT_PLATFORM_ID_UNICODE + STBTT_UNICODE_EID_UNICODE_1_0 =0, + STBTT_UNICODE_EID_UNICODE_1_1 =1, + STBTT_UNICODE_EID_ISO_10646 =2, + STBTT_UNICODE_EID_UNICODE_2_0_BMP=3, + STBTT_UNICODE_EID_UNICODE_2_0_FULL=4 +}; + +enum { // encodingID for STBTT_PLATFORM_ID_MICROSOFT + STBTT_MS_EID_SYMBOL =0, + STBTT_MS_EID_UNICODE_BMP =1, + STBTT_MS_EID_SHIFTJIS =2, + STBTT_MS_EID_UNICODE_FULL =10 +}; + +enum { // encodingID for STBTT_PLATFORM_ID_MAC; same as Script Manager codes + STBTT_MAC_EID_ROMAN =0, STBTT_MAC_EID_ARABIC =4, + STBTT_MAC_EID_JAPANESE =1, STBTT_MAC_EID_HEBREW =5, + STBTT_MAC_EID_CHINESE_TRAD =2, STBTT_MAC_EID_GREEK =6, + STBTT_MAC_EID_KOREAN =3, STBTT_MAC_EID_RUSSIAN =7 +}; + +enum { // languageID for STBTT_PLATFORM_ID_MICROSOFT; same as LCID... + // problematic because there are e.g. 16 english LCIDs and 16 arabic LCIDs + STBTT_MS_LANG_ENGLISH =0x0409, STBTT_MS_LANG_ITALIAN =0x0410, + STBTT_MS_LANG_CHINESE =0x0804, STBTT_MS_LANG_JAPANESE =0x0411, + STBTT_MS_LANG_DUTCH =0x0413, STBTT_MS_LANG_KOREAN =0x0412, + STBTT_MS_LANG_FRENCH =0x040c, STBTT_MS_LANG_RUSSIAN =0x0419, + STBTT_MS_LANG_GERMAN =0x0407, STBTT_MS_LANG_SPANISH =0x0409, + STBTT_MS_LANG_HEBREW =0x040d, STBTT_MS_LANG_SWEDISH =0x041D +}; + +enum { // languageID for STBTT_PLATFORM_ID_MAC + STBTT_MAC_LANG_ENGLISH =0 , STBTT_MAC_LANG_JAPANESE =11, + STBTT_MAC_LANG_ARABIC =12, STBTT_MAC_LANG_KOREAN =23, + STBTT_MAC_LANG_DUTCH =4 , STBTT_MAC_LANG_RUSSIAN =32, + STBTT_MAC_LANG_FRENCH =1 , STBTT_MAC_LANG_SPANISH =6 , + STBTT_MAC_LANG_GERMAN =2 , STBTT_MAC_LANG_SWEDISH =5 , + STBTT_MAC_LANG_HEBREW =10, STBTT_MAC_LANG_CHINESE_SIMPLIFIED =33, + STBTT_MAC_LANG_ITALIAN =3 , STBTT_MAC_LANG_CHINESE_TRAD =19 +}; + +#ifdef __cplusplus +} +#endif + +#endif // __STB_INCLUDE_STB_TRUETYPE_H__ + +/////////////////////////////////////////////////////////////////////////////// +/////////////////////////////////////////////////////////////////////////////// +//// +//// IMPLEMENTATION +//// +//// + +#ifdef STB_TRUETYPE_IMPLEMENTATION + +#ifndef STBTT_MAX_OVERSAMPLE +#define STBTT_MAX_OVERSAMPLE 8 +#endif + +#if STBTT_MAX_OVERSAMPLE > 255 +#error "STBTT_MAX_OVERSAMPLE cannot be > 255" +#endif + +typedef int stbtt__test_oversample_pow2[(STBTT_MAX_OVERSAMPLE & (STBTT_MAX_OVERSAMPLE-1)) == 0 ? 1 : -1]; + +#ifndef STBTT_RASTERIZER_VERSION +#define STBTT_RASTERIZER_VERSION 2 +#endif + +#ifdef _MSC_VER +#define STBTT__NOTUSED(v) (void)(v) +#else +#define STBTT__NOTUSED(v) (void)sizeof(v) +#endif + +////////////////////////////////////////////////////////////////////////// +// +// stbtt__buf helpers to parse data from file +// + +static stbtt_uint8 stbtt__buf_get8(stbtt__buf *b) +{ + if (b->cursor >= b->size) + return 0; + return b->data[b->cursor++]; +} + +static stbtt_uint8 stbtt__buf_peek8(stbtt__buf *b) +{ + if (b->cursor >= b->size) + return 0; + return b->data[b->cursor]; +} + +static void stbtt__buf_seek(stbtt__buf *b, int o) +{ + STBTT_assert(!(o > b->size || o < 0)); + b->cursor = (o > b->size || o < 0) ? b->size : o; +} + +static void stbtt__buf_skip(stbtt__buf *b, int o) +{ + stbtt__buf_seek(b, b->cursor + o); +} + +static stbtt_uint32 stbtt__buf_get(stbtt__buf *b, int n) +{ + stbtt_uint32 v = 0; + int i; + STBTT_assert(n >= 1 && n <= 4); + for (i = 0; i < n; i++) + v = (v << 8) | stbtt__buf_get8(b); + return v; +} + +static stbtt__buf stbtt__new_buf(const void *p, size_t size) +{ + stbtt__buf r; + STBTT_assert(size < 0x40000000); + r.data = (stbtt_uint8*) p; + r.size = (int) size; + r.cursor = 0; + return r; +} + +#define stbtt__buf_get16(b) stbtt__buf_get((b), 2) +#define stbtt__buf_get32(b) stbtt__buf_get((b), 4) + +static stbtt__buf stbtt__buf_range(const stbtt__buf *b, int o, int s) +{ + stbtt__buf r = stbtt__new_buf(NULL, 0); + if (o < 0 || s < 0 || o > b->size || s > b->size - o) return r; + r.data = b->data + o; + r.size = s; + return r; +} + +static stbtt__buf stbtt__cff_get_index(stbtt__buf *b) +{ + int count, start, offsize; + start = b->cursor; + count = stbtt__buf_get16(b); + if (count) { + offsize = stbtt__buf_get8(b); + STBTT_assert(offsize >= 1 && offsize <= 4); + stbtt__buf_skip(b, offsize * count); + stbtt__buf_skip(b, stbtt__buf_get(b, offsize) - 1); + } + return stbtt__buf_range(b, start, b->cursor - start); +} + +static stbtt_uint32 stbtt__cff_int(stbtt__buf *b) +{ + int b0 = stbtt__buf_get8(b); + if (b0 >= 32 && b0 <= 246) return b0 - 139; + else if (b0 >= 247 && b0 <= 250) return (b0 - 247)*256 + stbtt__buf_get8(b) + 108; + else if (b0 >= 251 && b0 <= 254) return -(b0 - 251)*256 - stbtt__buf_get8(b) - 108; + else if (b0 == 28) return stbtt__buf_get16(b); + else if (b0 == 29) return stbtt__buf_get32(b); + STBTT_assert(0); + return 0; +} + +static void stbtt__cff_skip_operand(stbtt__buf *b) { + int v, b0 = stbtt__buf_peek8(b); + STBTT_assert(b0 >= 28); + if (b0 == 30) { + stbtt__buf_skip(b, 1); + while (b->cursor < b->size) { + v = stbtt__buf_get8(b); + if ((v & 0xF) == 0xF || (v >> 4) == 0xF) + break; + } + } else { + stbtt__cff_int(b); + } +} + +static stbtt__buf stbtt__dict_get(stbtt__buf *b, int key) +{ + stbtt__buf_seek(b, 0); + while (b->cursor < b->size) { + int start = b->cursor, end, op; + while (stbtt__buf_peek8(b) >= 28) + stbtt__cff_skip_operand(b); + end = b->cursor; + op = stbtt__buf_get8(b); + if (op == 12) op = stbtt__buf_get8(b) | 0x100; + if (op == key) return stbtt__buf_range(b, start, end-start); + } + return stbtt__buf_range(b, 0, 0); +} + +static void stbtt__dict_get_ints(stbtt__buf *b, int key, int outcount, stbtt_uint32 *out) +{ + int i; + stbtt__buf operands = stbtt__dict_get(b, key); + for (i = 0; i < outcount && operands.cursor < operands.size; i++) + out[i] = stbtt__cff_int(&operands); +} + +static int stbtt__cff_index_count(stbtt__buf *b) +{ + stbtt__buf_seek(b, 0); + return stbtt__buf_get16(b); +} + +static stbtt__buf stbtt__cff_index_get(stbtt__buf b, int i) +{ + int count, offsize, start, end; + stbtt__buf_seek(&b, 0); + count = stbtt__buf_get16(&b); + offsize = stbtt__buf_get8(&b); + STBTT_assert(i >= 0 && i < count); + STBTT_assert(offsize >= 1 && offsize <= 4); + stbtt__buf_skip(&b, i*offsize); + start = stbtt__buf_get(&b, offsize); + end = stbtt__buf_get(&b, offsize); + return stbtt__buf_range(&b, 2+(count+1)*offsize+start, end - start); +} + +////////////////////////////////////////////////////////////////////////// +// +// accessors to parse data from file +// + +// on platforms that don't allow misaligned reads, if we want to allow +// truetype fonts that aren't padded to alignment, define ALLOW_UNALIGNED_TRUETYPE + +#define ttBYTE(p) (* (stbtt_uint8 *) (p)) +#define ttCHAR(p) (* (stbtt_int8 *) (p)) +#define ttFixed(p) ttLONG(p) + +static stbtt_uint16 ttUSHORT(stbtt_uint8 *p) { return p[0]*256 + p[1]; } +static stbtt_int16 ttSHORT(stbtt_uint8 *p) { return p[0]*256 + p[1]; } +static stbtt_uint32 ttULONG(stbtt_uint8 *p) { return (p[0]<<24) + (p[1]<<16) + (p[2]<<8) + p[3]; } +static stbtt_int32 ttLONG(stbtt_uint8 *p) { return (p[0]<<24) + (p[1]<<16) + (p[2]<<8) + p[3]; } + +#define stbtt_tag4(p,c0,c1,c2,c3) ((p)[0] == (c0) && (p)[1] == (c1) && (p)[2] == (c2) && (p)[3] == (c3)) +#define stbtt_tag(p,str) stbtt_tag4(p,str[0],str[1],str[2],str[3]) + +static int stbtt__isfont(stbtt_uint8 *font) +{ + // check the version number + if (stbtt_tag4(font, '1',0,0,0)) return 1; // TrueType 1 + if (stbtt_tag(font, "typ1")) return 1; // TrueType with type 1 font -- we don't support this! + if (stbtt_tag(font, "OTTO")) return 1; // OpenType with CFF + if (stbtt_tag4(font, 0,1,0,0)) return 1; // OpenType 1.0 + if (stbtt_tag(font, "true")) return 1; // Apple specification for TrueType fonts + return 0; +} + +// @OPTIMIZE: binary search +static stbtt_uint32 stbtt__find_table(stbtt_uint8 *data, stbtt_uint32 fontstart, const char *tag) +{ + stbtt_int32 num_tables = ttUSHORT(data+fontstart+4); + stbtt_uint32 tabledir = fontstart + 12; + stbtt_int32 i; + for (i=0; i < num_tables; ++i) { + stbtt_uint32 loc = tabledir + 16*i; + if (stbtt_tag(data+loc+0, tag)) + return ttULONG(data+loc+8); + } + return 0; +} + +static int stbtt_GetFontOffsetForIndex_internal(unsigned char *font_collection, int index) +{ + // if it's just a font, there's only one valid index + if (stbtt__isfont(font_collection)) + return index == 0 ? 0 : -1; + + // check if it's a TTC + if (stbtt_tag(font_collection, "ttcf")) { + // version 1? + if (ttULONG(font_collection+4) == 0x00010000 || ttULONG(font_collection+4) == 0x00020000) { + stbtt_int32 n = ttLONG(font_collection+8); + if (index >= n) + return -1; + return ttULONG(font_collection+12+index*4); + } + } + return -1; +} + +static int stbtt_GetNumberOfFonts_internal(unsigned char *font_collection) +{ + // if it's just a font, there's only one valid font + if (stbtt__isfont(font_collection)) + return 1; + + // check if it's a TTC + if (stbtt_tag(font_collection, "ttcf")) { + // version 1? + if (ttULONG(font_collection+4) == 0x00010000 || ttULONG(font_collection+4) == 0x00020000) { + return ttLONG(font_collection+8); + } + } + return 0; +} + +static stbtt__buf stbtt__get_subrs(stbtt__buf cff, stbtt__buf fontdict) +{ + stbtt_uint32 subrsoff = 0, private_loc[2] = { 0, 0 }; + stbtt__buf pdict; + stbtt__dict_get_ints(&fontdict, 18, 2, private_loc); + if (!private_loc[1] || !private_loc[0]) return stbtt__new_buf(NULL, 0); + pdict = stbtt__buf_range(&cff, private_loc[1], private_loc[0]); + stbtt__dict_get_ints(&pdict, 19, 1, &subrsoff); + if (!subrsoff) return stbtt__new_buf(NULL, 0); + stbtt__buf_seek(&cff, private_loc[1]+subrsoff); + return stbtt__cff_get_index(&cff); +} + +// since most people won't use this, find this table the first time it's needed +static int stbtt__get_svg(stbtt_fontinfo *info) +{ + stbtt_uint32 t; + if (info->svg < 0) { + t = stbtt__find_table(info->data, info->fontstart, "SVG "); + if (t) { + stbtt_uint32 offset = ttULONG(info->data + t + 2); + info->svg = t + offset; + } else { + info->svg = 0; + } + } + return info->svg; +} + +static int stbtt_InitFont_internal(stbtt_fontinfo *info, unsigned char *data, int fontstart) +{ + stbtt_uint32 cmap, t; + stbtt_int32 i,numTables; + + info->data = data; + info->fontstart = fontstart; + info->cff = stbtt__new_buf(NULL, 0); + + cmap = stbtt__find_table(data, fontstart, "cmap"); // required + info->loca = stbtt__find_table(data, fontstart, "loca"); // required + info->head = stbtt__find_table(data, fontstart, "head"); // required + info->glyf = stbtt__find_table(data, fontstart, "glyf"); // required + info->hhea = stbtt__find_table(data, fontstart, "hhea"); // required + info->hmtx = stbtt__find_table(data, fontstart, "hmtx"); // required + info->kern = stbtt__find_table(data, fontstart, "kern"); // not required + info->gpos = stbtt__find_table(data, fontstart, "GPOS"); // not required + + if (!cmap || !info->head || !info->hhea || !info->hmtx) + return 0; + if (info->glyf) { + // required for truetype + if (!info->loca) return 0; + } else { + // initialization for CFF / Type2 fonts (OTF) + stbtt__buf b, topdict, topdictidx; + stbtt_uint32 cstype = 2, charstrings = 0, fdarrayoff = 0, fdselectoff = 0; + stbtt_uint32 cff; + + cff = stbtt__find_table(data, fontstart, "CFF "); + if (!cff) return 0; + + info->fontdicts = stbtt__new_buf(NULL, 0); + info->fdselect = stbtt__new_buf(NULL, 0); + + // @TODO this should use size from table (not 512MB) + info->cff = stbtt__new_buf(data+cff, 512*1024*1024); + b = info->cff; + + // read the header + stbtt__buf_skip(&b, 2); + stbtt__buf_seek(&b, stbtt__buf_get8(&b)); // hdrsize + + // @TODO the name INDEX could list multiple fonts, + // but we just use the first one. + stbtt__cff_get_index(&b); // name INDEX + topdictidx = stbtt__cff_get_index(&b); + topdict = stbtt__cff_index_get(topdictidx, 0); + stbtt__cff_get_index(&b); // string INDEX + info->gsubrs = stbtt__cff_get_index(&b); + + stbtt__dict_get_ints(&topdict, 17, 1, &charstrings); + stbtt__dict_get_ints(&topdict, 0x100 | 6, 1, &cstype); + stbtt__dict_get_ints(&topdict, 0x100 | 36, 1, &fdarrayoff); + stbtt__dict_get_ints(&topdict, 0x100 | 37, 1, &fdselectoff); + info->subrs = stbtt__get_subrs(b, topdict); + + // we only support Type 2 charstrings + if (cstype != 2) return 0; + if (charstrings == 0) return 0; + + if (fdarrayoff) { + // looks like a CID font + if (!fdselectoff) return 0; + stbtt__buf_seek(&b, fdarrayoff); + info->fontdicts = stbtt__cff_get_index(&b); + info->fdselect = stbtt__buf_range(&b, fdselectoff, b.size-fdselectoff); + } + + stbtt__buf_seek(&b, charstrings); + info->charstrings = stbtt__cff_get_index(&b); + } + + t = stbtt__find_table(data, fontstart, "maxp"); + if (t) + info->numGlyphs = ttUSHORT(data+t+4); + else + info->numGlyphs = 0xffff; + + info->svg = -1; + + // find a cmap encoding table we understand *now* to avoid searching + // later. (todo: could make this installable) + // the same regardless of glyph. + numTables = ttUSHORT(data + cmap + 2); + info->index_map = 0; + for (i=0; i < numTables; ++i) { + stbtt_uint32 encoding_record = cmap + 4 + 8 * i; + // find an encoding we understand: + switch(ttUSHORT(data+encoding_record)) { + case STBTT_PLATFORM_ID_MICROSOFT: + switch (ttUSHORT(data+encoding_record+2)) { + case STBTT_MS_EID_UNICODE_BMP: + case STBTT_MS_EID_UNICODE_FULL: + // MS/Unicode + info->index_map = cmap + ttULONG(data+encoding_record+4); + break; + } + break; + case STBTT_PLATFORM_ID_UNICODE: + // Mac/iOS has these + // all the encodingIDs are unicode, so we don't bother to check it + info->index_map = cmap + ttULONG(data+encoding_record+4); + break; + } + } + if (info->index_map == 0) + return 0; + + info->indexToLocFormat = ttUSHORT(data+info->head + 50); + return 1; +} + +STBTT_DEF int stbtt_FindGlyphIndex(const stbtt_fontinfo *info, int unicode_codepoint) +{ + stbtt_uint8 *data = info->data; + stbtt_uint32 index_map = info->index_map; + + stbtt_uint16 format = ttUSHORT(data + index_map + 0); + if (format == 0) { // apple byte encoding + stbtt_int32 bytes = ttUSHORT(data + index_map + 2); + if (unicode_codepoint < bytes-6) + return ttBYTE(data + index_map + 6 + unicode_codepoint); + return 0; + } else if (format == 6) { + stbtt_uint32 first = ttUSHORT(data + index_map + 6); + stbtt_uint32 count = ttUSHORT(data + index_map + 8); + if ((stbtt_uint32) unicode_codepoint >= first && (stbtt_uint32) unicode_codepoint < first+count) + return ttUSHORT(data + index_map + 10 + (unicode_codepoint - first)*2); + return 0; + } else if (format == 2) { + STBTT_assert(0); // @TODO: high-byte mapping for japanese/chinese/korean + return 0; + } else if (format == 4) { // standard mapping for windows fonts: binary search collection of ranges + stbtt_uint16 segcount = ttUSHORT(data+index_map+6) >> 1; + stbtt_uint16 searchRange = ttUSHORT(data+index_map+8) >> 1; + stbtt_uint16 entrySelector = ttUSHORT(data+index_map+10); + stbtt_uint16 rangeShift = ttUSHORT(data+index_map+12) >> 1; + + // do a binary search of the segments + stbtt_uint32 endCount = index_map + 14; + stbtt_uint32 search = endCount; + + if (unicode_codepoint > 0xffff) + return 0; + + // they lie from endCount .. endCount + segCount + // but searchRange is the nearest power of two, so... + if (unicode_codepoint >= ttUSHORT(data + search + rangeShift*2)) + search += rangeShift*2; + + // now decrement to bias correctly to find smallest + search -= 2; + while (entrySelector) { + stbtt_uint16 end; + searchRange >>= 1; + end = ttUSHORT(data + search + searchRange*2); + if (unicode_codepoint > end) + search += searchRange*2; + --entrySelector; + } + search += 2; + + { + stbtt_uint16 offset, start; + stbtt_uint16 item = (stbtt_uint16) ((search - endCount) >> 1); + + STBTT_assert(unicode_codepoint <= ttUSHORT(data + endCount + 2*item)); + start = ttUSHORT(data + index_map + 14 + segcount*2 + 2 + 2*item); + if (unicode_codepoint < start) + return 0; + + offset = ttUSHORT(data + index_map + 14 + segcount*6 + 2 + 2*item); + if (offset == 0) + return (stbtt_uint16) (unicode_codepoint + ttSHORT(data + index_map + 14 + segcount*4 + 2 + 2*item)); + + return ttUSHORT(data + offset + (unicode_codepoint-start)*2 + index_map + 14 + segcount*6 + 2 + 2*item); + } + } else if (format == 12 || format == 13) { + stbtt_uint32 ngroups = ttULONG(data+index_map+12); + stbtt_int32 low,high; + low = 0; high = (stbtt_int32)ngroups; + // Binary search the right group. + while (low < high) { + stbtt_int32 mid = low + ((high-low) >> 1); // rounds down, so low <= mid < high + stbtt_uint32 start_char = ttULONG(data+index_map+16+mid*12); + stbtt_uint32 end_char = ttULONG(data+index_map+16+mid*12+4); + if ((stbtt_uint32) unicode_codepoint < start_char) + high = mid; + else if ((stbtt_uint32) unicode_codepoint > end_char) + low = mid+1; + else { + stbtt_uint32 start_glyph = ttULONG(data+index_map+16+mid*12+8); + if (format == 12) + return start_glyph + unicode_codepoint-start_char; + else // format == 13 + return start_glyph; + } + } + return 0; // not found + } + // @TODO + STBTT_assert(0); + return 0; +} + +STBTT_DEF int stbtt_GetCodepointShape(const stbtt_fontinfo *info, int unicode_codepoint, stbtt_vertex **vertices) +{ + return stbtt_GetGlyphShape(info, stbtt_FindGlyphIndex(info, unicode_codepoint), vertices); +} + +static void stbtt_setvertex(stbtt_vertex *v, stbtt_uint8 type, stbtt_int32 x, stbtt_int32 y, stbtt_int32 cx, stbtt_int32 cy) +{ + v->type = type; + v->x = (stbtt_int16) x; + v->y = (stbtt_int16) y; + v->cx = (stbtt_int16) cx; + v->cy = (stbtt_int16) cy; +} + +static int stbtt__GetGlyfOffset(const stbtt_fontinfo *info, int glyph_index) +{ + int g1,g2; + + STBTT_assert(!info->cff.size); + + if (glyph_index >= info->numGlyphs) return -1; // glyph index out of range + if (info->indexToLocFormat >= 2) return -1; // unknown index->glyph map format + + if (info->indexToLocFormat == 0) { + g1 = info->glyf + ttUSHORT(info->data + info->loca + glyph_index * 2) * 2; + g2 = info->glyf + ttUSHORT(info->data + info->loca + glyph_index * 2 + 2) * 2; + } else { + g1 = info->glyf + ttULONG (info->data + info->loca + glyph_index * 4); + g2 = info->glyf + ttULONG (info->data + info->loca + glyph_index * 4 + 4); + } + + return g1==g2 ? -1 : g1; // if length is 0, return -1 +} + +static int stbtt__GetGlyphInfoT2(const stbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1); + +STBTT_DEF int stbtt_GetGlyphBox(const stbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1) +{ + if (info->cff.size) { + stbtt__GetGlyphInfoT2(info, glyph_index, x0, y0, x1, y1); + } else { + int g = stbtt__GetGlyfOffset(info, glyph_index); + if (g < 0) return 0; + + if (x0) *x0 = ttSHORT(info->data + g + 2); + if (y0) *y0 = ttSHORT(info->data + g + 4); + if (x1) *x1 = ttSHORT(info->data + g + 6); + if (y1) *y1 = ttSHORT(info->data + g + 8); + } + return 1; +} + +STBTT_DEF int stbtt_GetCodepointBox(const stbtt_fontinfo *info, int codepoint, int *x0, int *y0, int *x1, int *y1) +{ + return stbtt_GetGlyphBox(info, stbtt_FindGlyphIndex(info,codepoint), x0,y0,x1,y1); +} + +STBTT_DEF int stbtt_IsGlyphEmpty(const stbtt_fontinfo *info, int glyph_index) +{ + stbtt_int16 numberOfContours; + int g; + if (info->cff.size) + return stbtt__GetGlyphInfoT2(info, glyph_index, NULL, NULL, NULL, NULL) == 0; + g = stbtt__GetGlyfOffset(info, glyph_index); + if (g < 0) return 1; + numberOfContours = ttSHORT(info->data + g); + return numberOfContours == 0; +} + +static int stbtt__close_shape(stbtt_vertex *vertices, int num_vertices, int was_off, int start_off, + stbtt_int32 sx, stbtt_int32 sy, stbtt_int32 scx, stbtt_int32 scy, stbtt_int32 cx, stbtt_int32 cy) +{ + if (start_off) { + if (was_off) + stbtt_setvertex(&vertices[num_vertices++], STBTT_vcurve, (cx+scx)>>1, (cy+scy)>>1, cx,cy); + stbtt_setvertex(&vertices[num_vertices++], STBTT_vcurve, sx,sy,scx,scy); + } else { + if (was_off) + stbtt_setvertex(&vertices[num_vertices++], STBTT_vcurve,sx,sy,cx,cy); + else + stbtt_setvertex(&vertices[num_vertices++], STBTT_vline,sx,sy,0,0); + } + return num_vertices; +} + +static int stbtt__GetGlyphShapeTT(const stbtt_fontinfo *info, int glyph_index, stbtt_vertex **pvertices) +{ + stbtt_int16 numberOfContours; + stbtt_uint8 *endPtsOfContours; + stbtt_uint8 *data = info->data; + stbtt_vertex *vertices=0; + int num_vertices=0; + int g = stbtt__GetGlyfOffset(info, glyph_index); + + *pvertices = NULL; + + if (g < 0) return 0; + + numberOfContours = ttSHORT(data + g); + + if (numberOfContours > 0) { + stbtt_uint8 flags=0,flagcount; + stbtt_int32 ins, i,j=0,m,n, next_move, was_off=0, off, start_off=0; + stbtt_int32 x,y,cx,cy,sx,sy, scx,scy; + stbtt_uint8 *points; + endPtsOfContours = (data + g + 10); + ins = ttUSHORT(data + g + 10 + numberOfContours * 2); + points = data + g + 10 + numberOfContours * 2 + 2 + ins; + + n = 1+ttUSHORT(endPtsOfContours + numberOfContours*2-2); + + m = n + 2*numberOfContours; // a loose bound on how many vertices we might need + vertices = (stbtt_vertex *) STBTT_malloc(m * sizeof(vertices[0]), info->userdata); + if (vertices == 0) + return 0; + + next_move = 0; + flagcount=0; + + // in first pass, we load uninterpreted data into the allocated array + // above, shifted to the end of the array so we won't overwrite it when + // we create our final data starting from the front + + off = m - n; // starting offset for uninterpreted data, regardless of how m ends up being calculated + + // first load flags + + for (i=0; i < n; ++i) { + if (flagcount == 0) { + flags = *points++; + if (flags & 8) + flagcount = *points++; + } else + --flagcount; + vertices[off+i].type = flags; + } + + // now load x coordinates + x=0; + for (i=0; i < n; ++i) { + flags = vertices[off+i].type; + if (flags & 2) { + stbtt_int16 dx = *points++; + x += (flags & 16) ? dx : -dx; // ??? + } else { + if (!(flags & 16)) { + x = x + (stbtt_int16) (points[0]*256 + points[1]); + points += 2; + } + } + vertices[off+i].x = (stbtt_int16) x; + } + + // now load y coordinates + y=0; + for (i=0; i < n; ++i) { + flags = vertices[off+i].type; + if (flags & 4) { + stbtt_int16 dy = *points++; + y += (flags & 32) ? dy : -dy; // ??? + } else { + if (!(flags & 32)) { + y = y + (stbtt_int16) (points[0]*256 + points[1]); + points += 2; + } + } + vertices[off+i].y = (stbtt_int16) y; + } + + // now convert them to our format + num_vertices=0; + sx = sy = cx = cy = scx = scy = 0; + for (i=0; i < n; ++i) { + flags = vertices[off+i].type; + x = (stbtt_int16) vertices[off+i].x; + y = (stbtt_int16) vertices[off+i].y; + + if (next_move == i) { + if (i != 0) + num_vertices = stbtt__close_shape(vertices, num_vertices, was_off, start_off, sx,sy,scx,scy,cx,cy); + + // now start the new one + start_off = !(flags & 1); + if (start_off) { + // if we start off with an off-curve point, then when we need to find a point on the curve + // where we can start, and we need to save some state for when we wraparound. + scx = x; + scy = y; + if (!(vertices[off+i+1].type & 1)) { + // next point is also a curve point, so interpolate an on-point curve + sx = (x + (stbtt_int32) vertices[off+i+1].x) >> 1; + sy = (y + (stbtt_int32) vertices[off+i+1].y) >> 1; + } else { + // otherwise just use the next point as our start point + sx = (stbtt_int32) vertices[off+i+1].x; + sy = (stbtt_int32) vertices[off+i+1].y; + ++i; // we're using point i+1 as the starting point, so skip it + } + } else { + sx = x; + sy = y; + } + stbtt_setvertex(&vertices[num_vertices++], STBTT_vmove,sx,sy,0,0); + was_off = 0; + next_move = 1 + ttUSHORT(endPtsOfContours+j*2); + ++j; + } else { + if (!(flags & 1)) { // if it's a curve + if (was_off) // two off-curve control points in a row means interpolate an on-curve midpoint + stbtt_setvertex(&vertices[num_vertices++], STBTT_vcurve, (cx+x)>>1, (cy+y)>>1, cx, cy); + cx = x; + cy = y; + was_off = 1; + } else { + if (was_off) + stbtt_setvertex(&vertices[num_vertices++], STBTT_vcurve, x,y, cx, cy); + else + stbtt_setvertex(&vertices[num_vertices++], STBTT_vline, x,y,0,0); + was_off = 0; + } + } + } + num_vertices = stbtt__close_shape(vertices, num_vertices, was_off, start_off, sx,sy,scx,scy,cx,cy); + } else if (numberOfContours < 0) { + // Compound shapes. + int more = 1; + stbtt_uint8 *comp = data + g + 10; + num_vertices = 0; + vertices = 0; + while (more) { + stbtt_uint16 flags, gidx; + int comp_num_verts = 0, i; + stbtt_vertex *comp_verts = 0, *tmp = 0; + float mtx[6] = {1,0,0,1,0,0}, m, n; + + flags = ttSHORT(comp); comp+=2; + gidx = ttSHORT(comp); comp+=2; + + if (flags & 2) { // XY values + if (flags & 1) { // shorts + mtx[4] = ttSHORT(comp); comp+=2; + mtx[5] = ttSHORT(comp); comp+=2; + } else { + mtx[4] = ttCHAR(comp); comp+=1; + mtx[5] = ttCHAR(comp); comp+=1; + } + } + else { + // @TODO handle matching point + STBTT_assert(0); + } + if (flags & (1<<3)) { // WE_HAVE_A_SCALE + mtx[0] = mtx[3] = ttSHORT(comp)/16384.0f; comp+=2; + mtx[1] = mtx[2] = 0; + } else if (flags & (1<<6)) { // WE_HAVE_AN_X_AND_YSCALE + mtx[0] = ttSHORT(comp)/16384.0f; comp+=2; + mtx[1] = mtx[2] = 0; + mtx[3] = ttSHORT(comp)/16384.0f; comp+=2; + } else if (flags & (1<<7)) { // WE_HAVE_A_TWO_BY_TWO + mtx[0] = ttSHORT(comp)/16384.0f; comp+=2; + mtx[1] = ttSHORT(comp)/16384.0f; comp+=2; + mtx[2] = ttSHORT(comp)/16384.0f; comp+=2; + mtx[3] = ttSHORT(comp)/16384.0f; comp+=2; + } + + // Find transformation scales. + m = (float) STBTT_sqrt(mtx[0]*mtx[0] + mtx[1]*mtx[1]); + n = (float) STBTT_sqrt(mtx[2]*mtx[2] + mtx[3]*mtx[3]); + + // Get indexed glyph. + comp_num_verts = stbtt_GetGlyphShape(info, gidx, &comp_verts); + if (comp_num_verts > 0) { + // Transform vertices. + for (i = 0; i < comp_num_verts; ++i) { + stbtt_vertex* v = &comp_verts[i]; + stbtt_vertex_type x,y; + x=v->x; y=v->y; + v->x = (stbtt_vertex_type)(m * (mtx[0]*x + mtx[2]*y + mtx[4])); + v->y = (stbtt_vertex_type)(n * (mtx[1]*x + mtx[3]*y + mtx[5])); + x=v->cx; y=v->cy; + v->cx = (stbtt_vertex_type)(m * (mtx[0]*x + mtx[2]*y + mtx[4])); + v->cy = (stbtt_vertex_type)(n * (mtx[1]*x + mtx[3]*y + mtx[5])); + } + // Append vertices. + tmp = (stbtt_vertex*)STBTT_malloc((num_vertices+comp_num_verts)*sizeof(stbtt_vertex), info->userdata); + if (!tmp) { + if (vertices) STBTT_free(vertices, info->userdata); + if (comp_verts) STBTT_free(comp_verts, info->userdata); + return 0; + } + if (num_vertices > 0) STBTT_memcpy(tmp, vertices, num_vertices*sizeof(stbtt_vertex)); + STBTT_memcpy(tmp+num_vertices, comp_verts, comp_num_verts*sizeof(stbtt_vertex)); + if (vertices) STBTT_free(vertices, info->userdata); + vertices = tmp; + STBTT_free(comp_verts, info->userdata); + num_vertices += comp_num_verts; + } + // More components ? + more = flags & (1<<5); + } + } else { + // numberOfCounters == 0, do nothing + } + + *pvertices = vertices; + return num_vertices; +} + +typedef struct +{ + int bounds; + int started; + float first_x, first_y; + float x, y; + stbtt_int32 min_x, max_x, min_y, max_y; + + stbtt_vertex *pvertices; + int num_vertices; +} stbtt__csctx; + +#define STBTT__CSCTX_INIT(bounds) {bounds,0, 0,0, 0,0, 0,0,0,0, NULL, 0} + +static void stbtt__track_vertex(stbtt__csctx *c, stbtt_int32 x, stbtt_int32 y) +{ + if (x > c->max_x || !c->started) c->max_x = x; + if (y > c->max_y || !c->started) c->max_y = y; + if (x < c->min_x || !c->started) c->min_x = x; + if (y < c->min_y || !c->started) c->min_y = y; + c->started = 1; +} + +static void stbtt__csctx_v(stbtt__csctx *c, stbtt_uint8 type, stbtt_int32 x, stbtt_int32 y, stbtt_int32 cx, stbtt_int32 cy, stbtt_int32 cx1, stbtt_int32 cy1) +{ + if (c->bounds) { + stbtt__track_vertex(c, x, y); + if (type == STBTT_vcubic) { + stbtt__track_vertex(c, cx, cy); + stbtt__track_vertex(c, cx1, cy1); + } + } else { + stbtt_setvertex(&c->pvertices[c->num_vertices], type, x, y, cx, cy); + c->pvertices[c->num_vertices].cx1 = (stbtt_int16) cx1; + c->pvertices[c->num_vertices].cy1 = (stbtt_int16) cy1; + } + c->num_vertices++; +} + +static void stbtt__csctx_close_shape(stbtt__csctx *ctx) +{ + if (ctx->first_x != ctx->x || ctx->first_y != ctx->y) + stbtt__csctx_v(ctx, STBTT_vline, (int)ctx->first_x, (int)ctx->first_y, 0, 0, 0, 0); +} + +static void stbtt__csctx_rmove_to(stbtt__csctx *ctx, float dx, float dy) +{ + stbtt__csctx_close_shape(ctx); + ctx->first_x = ctx->x = ctx->x + dx; + ctx->first_y = ctx->y = ctx->y + dy; + stbtt__csctx_v(ctx, STBTT_vmove, (int)ctx->x, (int)ctx->y, 0, 0, 0, 0); +} + +static void stbtt__csctx_rline_to(stbtt__csctx *ctx, float dx, float dy) +{ + ctx->x += dx; + ctx->y += dy; + stbtt__csctx_v(ctx, STBTT_vline, (int)ctx->x, (int)ctx->y, 0, 0, 0, 0); +} + +static void stbtt__csctx_rccurve_to(stbtt__csctx *ctx, float dx1, float dy1, float dx2, float dy2, float dx3, float dy3) +{ + float cx1 = ctx->x + dx1; + float cy1 = ctx->y + dy1; + float cx2 = cx1 + dx2; + float cy2 = cy1 + dy2; + ctx->x = cx2 + dx3; + ctx->y = cy2 + dy3; + stbtt__csctx_v(ctx, STBTT_vcubic, (int)ctx->x, (int)ctx->y, (int)cx1, (int)cy1, (int)cx2, (int)cy2); +} + +static stbtt__buf stbtt__get_subr(stbtt__buf idx, int n) +{ + int count = stbtt__cff_index_count(&idx); + int bias = 107; + if (count >= 33900) + bias = 32768; + else if (count >= 1240) + bias = 1131; + n += bias; + if (n < 0 || n >= count) + return stbtt__new_buf(NULL, 0); + return stbtt__cff_index_get(idx, n); +} + +static stbtt__buf stbtt__cid_get_glyph_subrs(const stbtt_fontinfo *info, int glyph_index) +{ + stbtt__buf fdselect = info->fdselect; + int nranges, start, end, v, fmt, fdselector = -1, i; + + stbtt__buf_seek(&fdselect, 0); + fmt = stbtt__buf_get8(&fdselect); + if (fmt == 0) { + // untested + stbtt__buf_skip(&fdselect, glyph_index); + fdselector = stbtt__buf_get8(&fdselect); + } else if (fmt == 3) { + nranges = stbtt__buf_get16(&fdselect); + start = stbtt__buf_get16(&fdselect); + for (i = 0; i < nranges; i++) { + v = stbtt__buf_get8(&fdselect); + end = stbtt__buf_get16(&fdselect); + if (glyph_index >= start && glyph_index < end) { + fdselector = v; + break; + } + start = end; + } + } + if (fdselector == -1) stbtt__new_buf(NULL, 0); + return stbtt__get_subrs(info->cff, stbtt__cff_index_get(info->fontdicts, fdselector)); +} + +static int stbtt__run_charstring(const stbtt_fontinfo *info, int glyph_index, stbtt__csctx *c) +{ + int in_header = 1, maskbits = 0, subr_stack_height = 0, sp = 0, v, i, b0; + int has_subrs = 0, clear_stack; + float s[48]; + stbtt__buf subr_stack[10], subrs = info->subrs, b; + float f; + +#define STBTT__CSERR(s) (0) + + // this currently ignores the initial width value, which isn't needed if we have hmtx + b = stbtt__cff_index_get(info->charstrings, glyph_index); + while (b.cursor < b.size) { + i = 0; + clear_stack = 1; + b0 = stbtt__buf_get8(&b); + switch (b0) { + // @TODO implement hinting + case 0x13: // hintmask + case 0x14: // cntrmask + if (in_header) + maskbits += (sp / 2); // implicit "vstem" + in_header = 0; + stbtt__buf_skip(&b, (maskbits + 7) / 8); + break; + + case 0x01: // hstem + case 0x03: // vstem + case 0x12: // hstemhm + case 0x17: // vstemhm + maskbits += (sp / 2); + break; + + case 0x15: // rmoveto + in_header = 0; + if (sp < 2) return STBTT__CSERR("rmoveto stack"); + stbtt__csctx_rmove_to(c, s[sp-2], s[sp-1]); + break; + case 0x04: // vmoveto + in_header = 0; + if (sp < 1) return STBTT__CSERR("vmoveto stack"); + stbtt__csctx_rmove_to(c, 0, s[sp-1]); + break; + case 0x16: // hmoveto + in_header = 0; + if (sp < 1) return STBTT__CSERR("hmoveto stack"); + stbtt__csctx_rmove_to(c, s[sp-1], 0); + break; + + case 0x05: // rlineto + if (sp < 2) return STBTT__CSERR("rlineto stack"); + for (; i + 1 < sp; i += 2) + stbtt__csctx_rline_to(c, s[i], s[i+1]); + break; + + // hlineto/vlineto and vhcurveto/hvcurveto alternate horizontal and vertical + // starting from a different place. + + case 0x07: // vlineto + if (sp < 1) return STBTT__CSERR("vlineto stack"); + goto vlineto; + case 0x06: // hlineto + if (sp < 1) return STBTT__CSERR("hlineto stack"); + for (;;) { + if (i >= sp) break; + stbtt__csctx_rline_to(c, s[i], 0); + i++; + vlineto: + if (i >= sp) break; + stbtt__csctx_rline_to(c, 0, s[i]); + i++; + } + break; + + case 0x1F: // hvcurveto + if (sp < 4) return STBTT__CSERR("hvcurveto stack"); + goto hvcurveto; + case 0x1E: // vhcurveto + if (sp < 4) return STBTT__CSERR("vhcurveto stack"); + for (;;) { + if (i + 3 >= sp) break; + stbtt__csctx_rccurve_to(c, 0, s[i], s[i+1], s[i+2], s[i+3], (sp - i == 5) ? s[i + 4] : 0.0f); + i += 4; + hvcurveto: + if (i + 3 >= sp) break; + stbtt__csctx_rccurve_to(c, s[i], 0, s[i+1], s[i+2], (sp - i == 5) ? s[i+4] : 0.0f, s[i+3]); + i += 4; + } + break; + + case 0x08: // rrcurveto + if (sp < 6) return STBTT__CSERR("rcurveline stack"); + for (; i + 5 < sp; i += 6) + stbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]); + break; + + case 0x18: // rcurveline + if (sp < 8) return STBTT__CSERR("rcurveline stack"); + for (; i + 5 < sp - 2; i += 6) + stbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]); + if (i + 1 >= sp) return STBTT__CSERR("rcurveline stack"); + stbtt__csctx_rline_to(c, s[i], s[i+1]); + break; + + case 0x19: // rlinecurve + if (sp < 8) return STBTT__CSERR("rlinecurve stack"); + for (; i + 1 < sp - 6; i += 2) + stbtt__csctx_rline_to(c, s[i], s[i+1]); + if (i + 5 >= sp) return STBTT__CSERR("rlinecurve stack"); + stbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]); + break; + + case 0x1A: // vvcurveto + case 0x1B: // hhcurveto + if (sp < 4) return STBTT__CSERR("(vv|hh)curveto stack"); + f = 0.0; + if (sp & 1) { f = s[i]; i++; } + for (; i + 3 < sp; i += 4) { + if (b0 == 0x1B) + stbtt__csctx_rccurve_to(c, s[i], f, s[i+1], s[i+2], s[i+3], 0.0); + else + stbtt__csctx_rccurve_to(c, f, s[i], s[i+1], s[i+2], 0.0, s[i+3]); + f = 0.0; + } + break; + + case 0x0A: // callsubr + if (!has_subrs) { + if (info->fdselect.size) + subrs = stbtt__cid_get_glyph_subrs(info, glyph_index); + has_subrs = 1; + } + // fallthrough + case 0x1D: // callgsubr + if (sp < 1) return STBTT__CSERR("call(g|)subr stack"); + v = (int) s[--sp]; + if (subr_stack_height >= 10) return STBTT__CSERR("recursion limit"); + subr_stack[subr_stack_height++] = b; + b = stbtt__get_subr(b0 == 0x0A ? subrs : info->gsubrs, v); + if (b.size == 0) return STBTT__CSERR("subr not found"); + b.cursor = 0; + clear_stack = 0; + break; + + case 0x0B: // return + if (subr_stack_height <= 0) return STBTT__CSERR("return outside subr"); + b = subr_stack[--subr_stack_height]; + clear_stack = 0; + break; + + case 0x0E: // endchar + stbtt__csctx_close_shape(c); + return 1; + + case 0x0C: { // two-byte escape + float dx1, dx2, dx3, dx4, dx5, dx6, dy1, dy2, dy3, dy4, dy5, dy6; + float dx, dy; + int b1 = stbtt__buf_get8(&b); + switch (b1) { + // @TODO These "flex" implementations ignore the flex-depth and resolution, + // and always draw beziers. + case 0x22: // hflex + if (sp < 7) return STBTT__CSERR("hflex stack"); + dx1 = s[0]; + dx2 = s[1]; + dy2 = s[2]; + dx3 = s[3]; + dx4 = s[4]; + dx5 = s[5]; + dx6 = s[6]; + stbtt__csctx_rccurve_to(c, dx1, 0, dx2, dy2, dx3, 0); + stbtt__csctx_rccurve_to(c, dx4, 0, dx5, -dy2, dx6, 0); + break; + + case 0x23: // flex + if (sp < 13) return STBTT__CSERR("flex stack"); + dx1 = s[0]; + dy1 = s[1]; + dx2 = s[2]; + dy2 = s[3]; + dx3 = s[4]; + dy3 = s[5]; + dx4 = s[6]; + dy4 = s[7]; + dx5 = s[8]; + dy5 = s[9]; + dx6 = s[10]; + dy6 = s[11]; + //fd is s[12] + stbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, dy3); + stbtt__csctx_rccurve_to(c, dx4, dy4, dx5, dy5, dx6, dy6); + break; + + case 0x24: // hflex1 + if (sp < 9) return STBTT__CSERR("hflex1 stack"); + dx1 = s[0]; + dy1 = s[1]; + dx2 = s[2]; + dy2 = s[3]; + dx3 = s[4]; + dx4 = s[5]; + dx5 = s[6]; + dy5 = s[7]; + dx6 = s[8]; + stbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, 0); + stbtt__csctx_rccurve_to(c, dx4, 0, dx5, dy5, dx6, -(dy1+dy2+dy5)); + break; + + case 0x25: // flex1 + if (sp < 11) return STBTT__CSERR("flex1 stack"); + dx1 = s[0]; + dy1 = s[1]; + dx2 = s[2]; + dy2 = s[3]; + dx3 = s[4]; + dy3 = s[5]; + dx4 = s[6]; + dy4 = s[7]; + dx5 = s[8]; + dy5 = s[9]; + dx6 = dy6 = s[10]; + dx = dx1+dx2+dx3+dx4+dx5; + dy = dy1+dy2+dy3+dy4+dy5; + if (STBTT_fabs(dx) > STBTT_fabs(dy)) + dy6 = -dy; + else + dx6 = -dx; + stbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, dy3); + stbtt__csctx_rccurve_to(c, dx4, dy4, dx5, dy5, dx6, dy6); + break; + + default: + return STBTT__CSERR("unimplemented"); + } + } break; + + default: + if (b0 != 255 && b0 != 28 && (b0 < 32 || b0 > 254)) + return STBTT__CSERR("reserved operator"); + + // push immediate + if (b0 == 255) { + f = (float)(stbtt_int32)stbtt__buf_get32(&b) / 0x10000; + } else { + stbtt__buf_skip(&b, -1); + f = (float)(stbtt_int16)stbtt__cff_int(&b); + } + if (sp >= 48) return STBTT__CSERR("push stack overflow"); + s[sp++] = f; + clear_stack = 0; + break; + } + if (clear_stack) sp = 0; + } + return STBTT__CSERR("no endchar"); + +#undef STBTT__CSERR +} + +static int stbtt__GetGlyphShapeT2(const stbtt_fontinfo *info, int glyph_index, stbtt_vertex **pvertices) +{ + // runs the charstring twice, once to count and once to output (to avoid realloc) + stbtt__csctx count_ctx = STBTT__CSCTX_INIT(1); + stbtt__csctx output_ctx = STBTT__CSCTX_INIT(0); + if (stbtt__run_charstring(info, glyph_index, &count_ctx)) { + *pvertices = (stbtt_vertex*)STBTT_malloc(count_ctx.num_vertices*sizeof(stbtt_vertex), info->userdata); + output_ctx.pvertices = *pvertices; + if (stbtt__run_charstring(info, glyph_index, &output_ctx)) { + STBTT_assert(output_ctx.num_vertices == count_ctx.num_vertices); + return output_ctx.num_vertices; + } + } + *pvertices = NULL; + return 0; +} + +static int stbtt__GetGlyphInfoT2(const stbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1) +{ + stbtt__csctx c = STBTT__CSCTX_INIT(1); + int r = stbtt__run_charstring(info, glyph_index, &c); + if (x0) *x0 = r ? c.min_x : 0; + if (y0) *y0 = r ? c.min_y : 0; + if (x1) *x1 = r ? c.max_x : 0; + if (y1) *y1 = r ? c.max_y : 0; + return r ? c.num_vertices : 0; +} + +STBTT_DEF int stbtt_GetGlyphShape(const stbtt_fontinfo *info, int glyph_index, stbtt_vertex **pvertices) +{ + if (!info->cff.size) + return stbtt__GetGlyphShapeTT(info, glyph_index, pvertices); + else + return stbtt__GetGlyphShapeT2(info, glyph_index, pvertices); +} + +STBTT_DEF void stbtt_GetGlyphHMetrics(const stbtt_fontinfo *info, int glyph_index, int *advanceWidth, int *leftSideBearing) +{ + stbtt_uint16 numOfLongHorMetrics = ttUSHORT(info->data+info->hhea + 34); + if (glyph_index < numOfLongHorMetrics) { + if (advanceWidth) *advanceWidth = ttSHORT(info->data + info->hmtx + 4*glyph_index); + if (leftSideBearing) *leftSideBearing = ttSHORT(info->data + info->hmtx + 4*glyph_index + 2); + } else { + if (advanceWidth) *advanceWidth = ttSHORT(info->data + info->hmtx + 4*(numOfLongHorMetrics-1)); + if (leftSideBearing) *leftSideBearing = ttSHORT(info->data + info->hmtx + 4*numOfLongHorMetrics + 2*(glyph_index - numOfLongHorMetrics)); + } +} + +STBTT_DEF int stbtt_GetKerningTableLength(const stbtt_fontinfo *info) +{ + stbtt_uint8 *data = info->data + info->kern; + + // we only look at the first table. it must be 'horizontal' and format 0. + if (!info->kern) + return 0; + if (ttUSHORT(data+2) < 1) // number of tables, need at least 1 + return 0; + if (ttUSHORT(data+8) != 1) // horizontal flag must be set in format + return 0; + + return ttUSHORT(data+10); +} + +STBTT_DEF int stbtt_GetKerningTable(const stbtt_fontinfo *info, stbtt_kerningentry* table, int table_length) +{ + stbtt_uint8 *data = info->data + info->kern; + int k, length; + + // we only look at the first table. it must be 'horizontal' and format 0. + if (!info->kern) + return 0; + if (ttUSHORT(data+2) < 1) // number of tables, need at least 1 + return 0; + if (ttUSHORT(data+8) != 1) // horizontal flag must be set in format + return 0; + + length = ttUSHORT(data+10); + if (table_length < length) + length = table_length; + + for (k = 0; k < length; k++) + { + table[k].glyph1 = ttUSHORT(data+18+(k*6)); + table[k].glyph2 = ttUSHORT(data+20+(k*6)); + table[k].advance = ttSHORT(data+22+(k*6)); + } + + return length; +} + +static int stbtt__GetGlyphKernInfoAdvance(const stbtt_fontinfo *info, int glyph1, int glyph2) +{ + stbtt_uint8 *data = info->data + info->kern; + stbtt_uint32 needle, straw; + int l, r, m; + + // we only look at the first table. it must be 'horizontal' and format 0. + if (!info->kern) + return 0; + if (ttUSHORT(data+2) < 1) // number of tables, need at least 1 + return 0; + if (ttUSHORT(data+8) != 1) // horizontal flag must be set in format + return 0; + + l = 0; + r = ttUSHORT(data+10) - 1; + needle = glyph1 << 16 | glyph2; + while (l <= r) { + m = (l + r) >> 1; + straw = ttULONG(data+18+(m*6)); // note: unaligned read + if (needle < straw) + r = m - 1; + else if (needle > straw) + l = m + 1; + else + return ttSHORT(data+22+(m*6)); + } + return 0; +} + +static stbtt_int32 stbtt__GetCoverageIndex(stbtt_uint8 *coverageTable, int glyph) +{ + stbtt_uint16 coverageFormat = ttUSHORT(coverageTable); + switch(coverageFormat) { + case 1: { + stbtt_uint16 glyphCount = ttUSHORT(coverageTable + 2); + + // Binary search. + stbtt_int32 l=0, r=glyphCount-1, m; + int straw, needle=glyph; + while (l <= r) { + stbtt_uint8 *glyphArray = coverageTable + 4; + stbtt_uint16 glyphID; + m = (l + r) >> 1; + glyphID = ttUSHORT(glyphArray + 2 * m); + straw = glyphID; + if (needle < straw) + r = m - 1; + else if (needle > straw) + l = m + 1; + else { + return m; + } + } + } break; + + case 2: { + stbtt_uint16 rangeCount = ttUSHORT(coverageTable + 2); + stbtt_uint8 *rangeArray = coverageTable + 4; + + // Binary search. + stbtt_int32 l=0, r=rangeCount-1, m; + int strawStart, strawEnd, needle=glyph; + while (l <= r) { + stbtt_uint8 *rangeRecord; + m = (l + r) >> 1; + rangeRecord = rangeArray + 6 * m; + strawStart = ttUSHORT(rangeRecord); + strawEnd = ttUSHORT(rangeRecord + 2); + if (needle < strawStart) + r = m - 1; + else if (needle > strawEnd) + l = m + 1; + else { + stbtt_uint16 startCoverageIndex = ttUSHORT(rangeRecord + 4); + return startCoverageIndex + glyph - strawStart; + } + } + } break; + + default: { + // There are no other cases. + STBTT_assert(0); + } break; + } + + return -1; +} + +static stbtt_int32 stbtt__GetGlyphClass(stbtt_uint8 *classDefTable, int glyph) +{ + stbtt_uint16 classDefFormat = ttUSHORT(classDefTable); + switch(classDefFormat) + { + case 1: { + stbtt_uint16 startGlyphID = ttUSHORT(classDefTable + 2); + stbtt_uint16 glyphCount = ttUSHORT(classDefTable + 4); + stbtt_uint8 *classDef1ValueArray = classDefTable + 6; + + if (glyph >= startGlyphID && glyph < startGlyphID + glyphCount) + return (stbtt_int32)ttUSHORT(classDef1ValueArray + 2 * (glyph - startGlyphID)); + + classDefTable = classDef1ValueArray + 2 * glyphCount; + } break; + + case 2: { + stbtt_uint16 classRangeCount = ttUSHORT(classDefTable + 2); + stbtt_uint8 *classRangeRecords = classDefTable + 4; + + // Binary search. + stbtt_int32 l=0, r=classRangeCount-1, m; + int strawStart, strawEnd, needle=glyph; + while (l <= r) { + stbtt_uint8 *classRangeRecord; + m = (l + r) >> 1; + classRangeRecord = classRangeRecords + 6 * m; + strawStart = ttUSHORT(classRangeRecord); + strawEnd = ttUSHORT(classRangeRecord + 2); + if (needle < strawStart) + r = m - 1; + else if (needle > strawEnd) + l = m + 1; + else + return (stbtt_int32)ttUSHORT(classRangeRecord + 4); + } + + classDefTable = classRangeRecords + 6 * classRangeCount; + } break; + + default: { + // There are no other cases. + STBTT_assert(0); + } break; + } + + return -1; +} + +// Define to STBTT_assert(x) if you want to break on unimplemented formats. +#define STBTT_GPOS_TODO_assert(x) + +static stbtt_int32 stbtt__GetGlyphGPOSInfoAdvance(const stbtt_fontinfo *info, int glyph1, int glyph2) +{ + stbtt_uint16 lookupListOffset; + stbtt_uint8 *lookupList; + stbtt_uint16 lookupCount; + stbtt_uint8 *data; + stbtt_int32 i; + + if (!info->gpos) return 0; + + data = info->data + info->gpos; + + if (ttUSHORT(data+0) != 1) return 0; // Major version 1 + if (ttUSHORT(data+2) != 0) return 0; // Minor version 0 + + lookupListOffset = ttUSHORT(data+8); + lookupList = data + lookupListOffset; + lookupCount = ttUSHORT(lookupList); + + for (i=0; i> 1; + pairValue = pairValueArray + (2 + valueRecordPairSizeInBytes) * m; + secondGlyph = ttUSHORT(pairValue); + straw = secondGlyph; + if (needle < straw) + r = m - 1; + else if (needle > straw) + l = m + 1; + else { + stbtt_int16 xAdvance = ttSHORT(pairValue + 2); + return xAdvance; + } + } + } break; + + case 2: { + stbtt_uint16 valueFormat1 = ttUSHORT(table + 4); + stbtt_uint16 valueFormat2 = ttUSHORT(table + 6); + + stbtt_uint16 classDef1Offset = ttUSHORT(table + 8); + stbtt_uint16 classDef2Offset = ttUSHORT(table + 10); + int glyph1class = stbtt__GetGlyphClass(table + classDef1Offset, glyph1); + int glyph2class = stbtt__GetGlyphClass(table + classDef2Offset, glyph2); + + stbtt_uint16 class1Count = ttUSHORT(table + 12); + stbtt_uint16 class2Count = ttUSHORT(table + 14); + STBTT_assert(glyph1class < class1Count); + STBTT_assert(glyph2class < class2Count); + + // TODO: Support more formats. + STBTT_GPOS_TODO_assert(valueFormat1 == 4); + if (valueFormat1 != 4) return 0; + STBTT_GPOS_TODO_assert(valueFormat2 == 0); + if (valueFormat2 != 0) return 0; + + if (glyph1class >= 0 && glyph1class < class1Count && glyph2class >= 0 && glyph2class < class2Count) { + stbtt_uint8 *class1Records = table + 16; + stbtt_uint8 *class2Records = class1Records + 2 * (glyph1class * class2Count); + stbtt_int16 xAdvance = ttSHORT(class2Records + 2 * glyph2class); + return xAdvance; + } + } break; + + default: { + // There are no other cases. + STBTT_assert(0); + break; + }; + } + } + break; + }; + + default: + // TODO: Implement other stuff. + break; + } + } + + return 0; +} + +STBTT_DEF int stbtt_GetGlyphKernAdvance(const stbtt_fontinfo *info, int g1, int g2) +{ + int xAdvance = 0; + + if (info->gpos) + xAdvance += stbtt__GetGlyphGPOSInfoAdvance(info, g1, g2); + else if (info->kern) + xAdvance += stbtt__GetGlyphKernInfoAdvance(info, g1, g2); + + return xAdvance; +} + +STBTT_DEF int stbtt_GetCodepointKernAdvance(const stbtt_fontinfo *info, int ch1, int ch2) +{ + if (!info->kern && !info->gpos) // if no kerning table, don't waste time looking up both codepoint->glyphs + return 0; + return stbtt_GetGlyphKernAdvance(info, stbtt_FindGlyphIndex(info,ch1), stbtt_FindGlyphIndex(info,ch2)); +} + +STBTT_DEF void stbtt_GetCodepointHMetrics(const stbtt_fontinfo *info, int codepoint, int *advanceWidth, int *leftSideBearing) +{ + stbtt_GetGlyphHMetrics(info, stbtt_FindGlyphIndex(info,codepoint), advanceWidth, leftSideBearing); +} + +STBTT_DEF void stbtt_GetFontVMetrics(const stbtt_fontinfo *info, int *ascent, int *descent, int *lineGap) +{ + if (ascent ) *ascent = ttSHORT(info->data+info->hhea + 4); + if (descent) *descent = ttSHORT(info->data+info->hhea + 6); + if (lineGap) *lineGap = ttSHORT(info->data+info->hhea + 8); +} + +STBTT_DEF int stbtt_GetFontVMetricsOS2(const stbtt_fontinfo *info, int *typoAscent, int *typoDescent, int *typoLineGap) +{ + int tab = stbtt__find_table(info->data, info->fontstart, "OS/2"); + if (!tab) + return 0; + if (typoAscent ) *typoAscent = ttSHORT(info->data+tab + 68); + if (typoDescent) *typoDescent = ttSHORT(info->data+tab + 70); + if (typoLineGap) *typoLineGap = ttSHORT(info->data+tab + 72); + return 1; +} + +STBTT_DEF void stbtt_GetFontBoundingBox(const stbtt_fontinfo *info, int *x0, int *y0, int *x1, int *y1) +{ + *x0 = ttSHORT(info->data + info->head + 36); + *y0 = ttSHORT(info->data + info->head + 38); + *x1 = ttSHORT(info->data + info->head + 40); + *y1 = ttSHORT(info->data + info->head + 42); +} + +STBTT_DEF float stbtt_ScaleForPixelHeight(const stbtt_fontinfo *info, float height) +{ + int fheight = ttSHORT(info->data + info->hhea + 4) - ttSHORT(info->data + info->hhea + 6); + return (float) height / fheight; +} + +STBTT_DEF float stbtt_ScaleForMappingEmToPixels(const stbtt_fontinfo *info, float pixels) +{ + int unitsPerEm = ttUSHORT(info->data + info->head + 18); + return pixels / unitsPerEm; +} + +STBTT_DEF void stbtt_FreeShape(const stbtt_fontinfo *info, stbtt_vertex *v) +{ + STBTT_free(v, info->userdata); +} + +STBTT_DEF stbtt_uint8 *stbtt_FindSVGDoc(const stbtt_fontinfo *info, int gl) +{ + int i; + stbtt_uint8 *data = info->data; + stbtt_uint8 *svg_doc_list = data + stbtt__get_svg((stbtt_fontinfo *) info); + + int numEntries = ttUSHORT(svg_doc_list); + stbtt_uint8 *svg_docs = svg_doc_list + 2; + + for(i=0; i= ttUSHORT(svg_doc)) && (gl <= ttUSHORT(svg_doc + 2))) + return svg_doc; + } + return 0; +} + +STBTT_DEF int stbtt_GetGlyphSVG(const stbtt_fontinfo *info, int gl, const char **svg) +{ + stbtt_uint8 *data = info->data; + stbtt_uint8 *svg_doc; + + if (info->svg == 0) + return 0; + + svg_doc = stbtt_FindSVGDoc(info, gl); + if (svg_doc != NULL) { + *svg = (char *) data + info->svg + ttULONG(svg_doc + 4); + return ttULONG(svg_doc + 8); + } else { + return 0; + } +} + +STBTT_DEF int stbtt_GetCodepointSVG(const stbtt_fontinfo *info, int unicode_codepoint, const char **svg) +{ + return stbtt_GetGlyphSVG(info, stbtt_FindGlyphIndex(info, unicode_codepoint), svg); +} + +////////////////////////////////////////////////////////////////////////////// +// +// antialiasing software rasterizer +// + +STBTT_DEF void stbtt_GetGlyphBitmapBoxSubpixel(const stbtt_fontinfo *font, int glyph, float scale_x, float scale_y,float shift_x, float shift_y, int *ix0, int *iy0, int *ix1, int *iy1) +{ + int x0=0,y0=0,x1,y1; // =0 suppresses compiler warning + if (!stbtt_GetGlyphBox(font, glyph, &x0,&y0,&x1,&y1)) { + // e.g. space character + if (ix0) *ix0 = 0; + if (iy0) *iy0 = 0; + if (ix1) *ix1 = 0; + if (iy1) *iy1 = 0; + } else { + // move to integral bboxes (treating pixels as little squares, what pixels get touched)? + if (ix0) *ix0 = STBTT_ifloor( x0 * scale_x + shift_x); + if (iy0) *iy0 = STBTT_ifloor(-y1 * scale_y + shift_y); + if (ix1) *ix1 = STBTT_iceil ( x1 * scale_x + shift_x); + if (iy1) *iy1 = STBTT_iceil (-y0 * scale_y + shift_y); + } +} + +STBTT_DEF void stbtt_GetGlyphBitmapBox(const stbtt_fontinfo *font, int glyph, float scale_x, float scale_y, int *ix0, int *iy0, int *ix1, int *iy1) +{ + stbtt_GetGlyphBitmapBoxSubpixel(font, glyph, scale_x, scale_y,0.0f,0.0f, ix0, iy0, ix1, iy1); +} + +STBTT_DEF void stbtt_GetCodepointBitmapBoxSubpixel(const stbtt_fontinfo *font, int codepoint, float scale_x, float scale_y, float shift_x, float shift_y, int *ix0, int *iy0, int *ix1, int *iy1) +{ + stbtt_GetGlyphBitmapBoxSubpixel(font, stbtt_FindGlyphIndex(font,codepoint), scale_x, scale_y,shift_x,shift_y, ix0,iy0,ix1,iy1); +} + +STBTT_DEF void stbtt_GetCodepointBitmapBox(const stbtt_fontinfo *font, int codepoint, float scale_x, float scale_y, int *ix0, int *iy0, int *ix1, int *iy1) +{ + stbtt_GetCodepointBitmapBoxSubpixel(font, codepoint, scale_x, scale_y,0.0f,0.0f, ix0,iy0,ix1,iy1); +} + +////////////////////////////////////////////////////////////////////////////// +// +// Rasterizer + +typedef struct stbtt__hheap_chunk +{ + struct stbtt__hheap_chunk *next; +} stbtt__hheap_chunk; + +typedef struct stbtt__hheap +{ + struct stbtt__hheap_chunk *head; + void *first_free; + int num_remaining_in_head_chunk; +} stbtt__hheap; + +static void *stbtt__hheap_alloc(stbtt__hheap *hh, size_t size, void *userdata) +{ + if (hh->first_free) { + void *p = hh->first_free; + hh->first_free = * (void **) p; + return p; + } else { + if (hh->num_remaining_in_head_chunk == 0) { + int count = (size < 32 ? 2000 : size < 128 ? 800 : 100); + stbtt__hheap_chunk *c = (stbtt__hheap_chunk *) STBTT_malloc(sizeof(stbtt__hheap_chunk) + size * count, userdata); + if (c == NULL) + return NULL; + c->next = hh->head; + hh->head = c; + hh->num_remaining_in_head_chunk = count; + } + --hh->num_remaining_in_head_chunk; + return (char *) (hh->head) + sizeof(stbtt__hheap_chunk) + size * hh->num_remaining_in_head_chunk; + } +} + +static void stbtt__hheap_free(stbtt__hheap *hh, void *p) +{ + *(void **) p = hh->first_free; + hh->first_free = p; +} + +static void stbtt__hheap_cleanup(stbtt__hheap *hh, void *userdata) +{ + stbtt__hheap_chunk *c = hh->head; + while (c) { + stbtt__hheap_chunk *n = c->next; + STBTT_free(c, userdata); + c = n; + } +} + +typedef struct stbtt__edge { + float x0,y0, x1,y1; + int invert; +} stbtt__edge; + + +typedef struct stbtt__active_edge +{ + struct stbtt__active_edge *next; + #if STBTT_RASTERIZER_VERSION==1 + int x,dx; + float ey; + int direction; + #elif STBTT_RASTERIZER_VERSION==2 + float fx,fdx,fdy; + float direction; + float sy; + float ey; + #else + #error "Unrecognized value of STBTT_RASTERIZER_VERSION" + #endif +} stbtt__active_edge; + +#if STBTT_RASTERIZER_VERSION == 1 +#define STBTT_FIXSHIFT 10 +#define STBTT_FIX (1 << STBTT_FIXSHIFT) +#define STBTT_FIXMASK (STBTT_FIX-1) + +static stbtt__active_edge *stbtt__new_active(stbtt__hheap *hh, stbtt__edge *e, int off_x, float start_point, void *userdata) +{ + stbtt__active_edge *z = (stbtt__active_edge *) stbtt__hheap_alloc(hh, sizeof(*z), userdata); + float dxdy = (e->x1 - e->x0) / (e->y1 - e->y0); + STBTT_assert(z != NULL); + if (!z) return z; + + // round dx down to avoid overshooting + if (dxdy < 0) + z->dx = -STBTT_ifloor(STBTT_FIX * -dxdy); + else + z->dx = STBTT_ifloor(STBTT_FIX * dxdy); + + z->x = STBTT_ifloor(STBTT_FIX * e->x0 + z->dx * (start_point - e->y0)); // use z->dx so when we offset later it's by the same amount + z->x -= off_x * STBTT_FIX; + + z->ey = e->y1; + z->next = 0; + z->direction = e->invert ? 1 : -1; + return z; +} +#elif STBTT_RASTERIZER_VERSION == 2 +static stbtt__active_edge *stbtt__new_active(stbtt__hheap *hh, stbtt__edge *e, int off_x, float start_point, void *userdata) +{ + stbtt__active_edge *z = (stbtt__active_edge *) stbtt__hheap_alloc(hh, sizeof(*z), userdata); + float dxdy = (e->x1 - e->x0) / (e->y1 - e->y0); + STBTT_assert(z != NULL); + //STBTT_assert(e->y0 <= start_point); + if (!z) return z; + z->fdx = dxdy; + z->fdy = dxdy != 0.0f ? (1.0f/dxdy) : 0.0f; + z->fx = e->x0 + dxdy * (start_point - e->y0); + z->fx -= off_x; + z->direction = e->invert ? 1.0f : -1.0f; + z->sy = e->y0; + z->ey = e->y1; + z->next = 0; + return z; +} +#else +#error "Unrecognized value of STBTT_RASTERIZER_VERSION" +#endif + +#if STBTT_RASTERIZER_VERSION == 1 +// note: this routine clips fills that extend off the edges... ideally this +// wouldn't happen, but it could happen if the truetype glyph bounding boxes +// are wrong, or if the user supplies a too-small bitmap +static void stbtt__fill_active_edges(unsigned char *scanline, int len, stbtt__active_edge *e, int max_weight) +{ + // non-zero winding fill + int x0=0, w=0; + + while (e) { + if (w == 0) { + // if we're currently at zero, we need to record the edge start point + x0 = e->x; w += e->direction; + } else { + int x1 = e->x; w += e->direction; + // if we went to zero, we need to draw + if (w == 0) { + int i = x0 >> STBTT_FIXSHIFT; + int j = x1 >> STBTT_FIXSHIFT; + + if (i < len && j >= 0) { + if (i == j) { + // x0,x1 are the same pixel, so compute combined coverage + scanline[i] = scanline[i] + (stbtt_uint8) ((x1 - x0) * max_weight >> STBTT_FIXSHIFT); + } else { + if (i >= 0) // add antialiasing for x0 + scanline[i] = scanline[i] + (stbtt_uint8) (((STBTT_FIX - (x0 & STBTT_FIXMASK)) * max_weight) >> STBTT_FIXSHIFT); + else + i = -1; // clip + + if (j < len) // add antialiasing for x1 + scanline[j] = scanline[j] + (stbtt_uint8) (((x1 & STBTT_FIXMASK) * max_weight) >> STBTT_FIXSHIFT); + else + j = len; // clip + + for (++i; i < j; ++i) // fill pixels between x0 and x1 + scanline[i] = scanline[i] + (stbtt_uint8) max_weight; + } + } + } + } + + e = e->next; + } +} + +static void stbtt__rasterize_sorted_edges(stbtt__bitmap *result, stbtt__edge *e, int n, int vsubsample, int off_x, int off_y, void *userdata) +{ + stbtt__hheap hh = { 0, 0, 0 }; + stbtt__active_edge *active = NULL; + int y,j=0; + int max_weight = (255 / vsubsample); // weight per vertical scanline + int s; // vertical subsample index + unsigned char scanline_data[512], *scanline; + + if (result->w > 512) + scanline = (unsigned char *) STBTT_malloc(result->w, userdata); + else + scanline = scanline_data; + + y = off_y * vsubsample; + e[n].y0 = (off_y + result->h) * (float) vsubsample + 1; + + while (j < result->h) { + STBTT_memset(scanline, 0, result->w); + for (s=0; s < vsubsample; ++s) { + // find center of pixel for this scanline + float scan_y = y + 0.5f; + stbtt__active_edge **step = &active; + + // update all active edges; + // remove all active edges that terminate before the center of this scanline + while (*step) { + stbtt__active_edge * z = *step; + if (z->ey <= scan_y) { + *step = z->next; // delete from list + STBTT_assert(z->direction); + z->direction = 0; + stbtt__hheap_free(&hh, z); + } else { + z->x += z->dx; // advance to position for current scanline + step = &((*step)->next); // advance through list + } + } + + // resort the list if needed + for(;;) { + int changed=0; + step = &active; + while (*step && (*step)->next) { + if ((*step)->x > (*step)->next->x) { + stbtt__active_edge *t = *step; + stbtt__active_edge *q = t->next; + + t->next = q->next; + q->next = t; + *step = q; + changed = 1; + } + step = &(*step)->next; + } + if (!changed) break; + } + + // insert all edges that start before the center of this scanline -- omit ones that also end on this scanline + while (e->y0 <= scan_y) { + if (e->y1 > scan_y) { + stbtt__active_edge *z = stbtt__new_active(&hh, e, off_x, scan_y, userdata); + if (z != NULL) { + // find insertion point + if (active == NULL) + active = z; + else if (z->x < active->x) { + // insert at front + z->next = active; + active = z; + } else { + // find thing to insert AFTER + stbtt__active_edge *p = active; + while (p->next && p->next->x < z->x) + p = p->next; + // at this point, p->next->x is NOT < z->x + z->next = p->next; + p->next = z; + } + } + } + ++e; + } + + // now process all active edges in XOR fashion + if (active) + stbtt__fill_active_edges(scanline, result->w, active, max_weight); + + ++y; + } + STBTT_memcpy(result->pixels + j * result->stride, scanline, result->w); + ++j; + } + + stbtt__hheap_cleanup(&hh, userdata); + + if (scanline != scanline_data) + STBTT_free(scanline, userdata); +} + +#elif STBTT_RASTERIZER_VERSION == 2 + +// the edge passed in here does not cross the vertical line at x or the vertical line at x+1 +// (i.e. it has already been clipped to those) +static void stbtt__handle_clipped_edge(float *scanline, int x, stbtt__active_edge *e, float x0, float y0, float x1, float y1) +{ + if (y0 == y1) return; + STBTT_assert(y0 < y1); + STBTT_assert(e->sy <= e->ey); + if (y0 > e->ey) return; + if (y1 < e->sy) return; + if (y0 < e->sy) { + x0 += (x1-x0) * (e->sy - y0) / (y1-y0); + y0 = e->sy; + } + if (y1 > e->ey) { + x1 += (x1-x0) * (e->ey - y1) / (y1-y0); + y1 = e->ey; + } + + if (x0 == x) + STBTT_assert(x1 <= x+1); + else if (x0 == x+1) + STBTT_assert(x1 >= x); + else if (x0 <= x) + STBTT_assert(x1 <= x); + else if (x0 >= x+1) + STBTT_assert(x1 >= x+1); + else + STBTT_assert(x1 >= x && x1 <= x+1); + + if (x0 <= x && x1 <= x) + scanline[x] += e->direction * (y1-y0); + else if (x0 >= x+1 && x1 >= x+1) + ; + else { + STBTT_assert(x0 >= x && x0 <= x+1 && x1 >= x && x1 <= x+1); + scanline[x] += e->direction * (y1-y0) * (1-((x0-x)+(x1-x))/2); // coverage = 1 - average x position + } +} + +static void stbtt__fill_active_edges_new(float *scanline, float *scanline_fill, int len, stbtt__active_edge *e, float y_top) +{ + float y_bottom = y_top+1; + + while (e) { + // brute force every pixel + + // compute intersection points with top & bottom + STBTT_assert(e->ey >= y_top); + + if (e->fdx == 0) { + float x0 = e->fx; + if (x0 < len) { + if (x0 >= 0) { + stbtt__handle_clipped_edge(scanline,(int) x0,e, x0,y_top, x0,y_bottom); + stbtt__handle_clipped_edge(scanline_fill-1,(int) x0+1,e, x0,y_top, x0,y_bottom); + } else { + stbtt__handle_clipped_edge(scanline_fill-1,0,e, x0,y_top, x0,y_bottom); + } + } + } else { + float x0 = e->fx; + float dx = e->fdx; + float xb = x0 + dx; + float x_top, x_bottom; + float sy0,sy1; + float dy = e->fdy; + STBTT_assert(e->sy <= y_bottom && e->ey >= y_top); + + // compute endpoints of line segment clipped to this scanline (if the + // line segment starts on this scanline. x0 is the intersection of the + // line with y_top, but that may be off the line segment. + if (e->sy > y_top) { + x_top = x0 + dx * (e->sy - y_top); + sy0 = e->sy; + } else { + x_top = x0; + sy0 = y_top; + } + if (e->ey < y_bottom) { + x_bottom = x0 + dx * (e->ey - y_top); + sy1 = e->ey; + } else { + x_bottom = xb; + sy1 = y_bottom; + } + + if (x_top >= 0 && x_bottom >= 0 && x_top < len && x_bottom < len) { + // from here on, we don't have to range check x values + + if ((int) x_top == (int) x_bottom) { + float height; + // simple case, only spans one pixel + int x = (int) x_top; + height = sy1 - sy0; + STBTT_assert(x >= 0 && x < len); + scanline[x] += e->direction * (1-((x_top - x) + (x_bottom-x))/2) * height; + scanline_fill[x] += e->direction * height; // everything right of this pixel is filled + } else { + int x,x1,x2; + float y_crossing, step, sign, area; + // covers 2+ pixels + if (x_top > x_bottom) { + // flip scanline vertically; signed area is the same + float t; + sy0 = y_bottom - (sy0 - y_top); + sy1 = y_bottom - (sy1 - y_top); + t = sy0, sy0 = sy1, sy1 = t; + t = x_bottom, x_bottom = x_top, x_top = t; + dx = -dx; + dy = -dy; + t = x0, x0 = xb, xb = t; + } + + x1 = (int) x_top; + x2 = (int) x_bottom; + // compute intersection with y axis at x1+1 + y_crossing = (x1+1 - x0) * dy + y_top; + + sign = e->direction; + // area of the rectangle covered from y0..y_crossing + area = sign * (y_crossing-sy0); + // area of the triangle (x_top,y0), (x+1,y0), (x+1,y_crossing) + scanline[x1] += area * (1-((x_top - x1)+(x1+1-x1))/2); + + step = sign * dy; + for (x = x1+1; x < x2; ++x) { + scanline[x] += area + step/2; + area += step; + } + y_crossing += dy * (x2 - (x1+1)); + + STBTT_assert(STBTT_fabs(area) <= 1.01f); + + scanline[x2] += area + sign * (1-((x2-x2)+(x_bottom-x2))/2) * (sy1-y_crossing); + + scanline_fill[x2] += sign * (sy1-sy0); + } + } else { + // if edge goes outside of box we're drawing, we require + // clipping logic. since this does not match the intended use + // of this library, we use a different, very slow brute + // force implementation + int x; + for (x=0; x < len; ++x) { + // cases: + // + // there can be up to two intersections with the pixel. any intersection + // with left or right edges can be handled by splitting into two (or three) + // regions. intersections with top & bottom do not necessitate case-wise logic. + // + // the old way of doing this found the intersections with the left & right edges, + // then used some simple logic to produce up to three segments in sorted order + // from top-to-bottom. however, this had a problem: if an x edge was epsilon + // across the x border, then the corresponding y position might not be distinct + // from the other y segment, and it might ignored as an empty segment. to avoid + // that, we need to explicitly produce segments based on x positions. + + // rename variables to clearly-defined pairs + float y0 = y_top; + float x1 = (float) (x); + float x2 = (float) (x+1); + float x3 = xb; + float y3 = y_bottom; + + // x = e->x + e->dx * (y-y_top) + // (y-y_top) = (x - e->x) / e->dx + // y = (x - e->x) / e->dx + y_top + float y1 = (x - x0) / dx + y_top; + float y2 = (x+1 - x0) / dx + y_top; + + if (x0 < x1 && x3 > x2) { // three segments descending down-right + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1); + stbtt__handle_clipped_edge(scanline,x,e, x1,y1, x2,y2); + stbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3); + } else if (x3 < x1 && x0 > x2) { // three segments descending down-left + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2); + stbtt__handle_clipped_edge(scanline,x,e, x2,y2, x1,y1); + stbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3); + } else if (x0 < x1 && x3 > x1) { // two segments across x, down-right + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1); + stbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3); + } else if (x3 < x1 && x0 > x1) { // two segments across x, down-left + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1); + stbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3); + } else if (x0 < x2 && x3 > x2) { // two segments across x+1, down-right + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2); + stbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3); + } else if (x3 < x2 && x0 > x2) { // two segments across x+1, down-left + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2); + stbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3); + } else { // one segment + stbtt__handle_clipped_edge(scanline,x,e, x0,y0, x3,y3); + } + } + } + } + e = e->next; + } +} + +// directly AA rasterize edges w/o supersampling +static void stbtt__rasterize_sorted_edges(stbtt__bitmap *result, stbtt__edge *e, int n, int vsubsample, int off_x, int off_y, void *userdata) +{ + stbtt__hheap hh = { 0, 0, 0 }; + stbtt__active_edge *active = NULL; + int y,j=0, i; + float scanline_data[129], *scanline, *scanline2; + + STBTT__NOTUSED(vsubsample); + + if (result->w > 64) + scanline = (float *) STBTT_malloc((result->w*2+1) * sizeof(float), userdata); + else + scanline = scanline_data; + + scanline2 = scanline + result->w; + + y = off_y; + e[n].y0 = (float) (off_y + result->h) + 1; + + while (j < result->h) { + // find center of pixel for this scanline + float scan_y_top = y + 0.0f; + float scan_y_bottom = y + 1.0f; + stbtt__active_edge **step = &active; + + STBTT_memset(scanline , 0, result->w*sizeof(scanline[0])); + STBTT_memset(scanline2, 0, (result->w+1)*sizeof(scanline[0])); + + // update all active edges; + // remove all active edges that terminate before the top of this scanline + while (*step) { + stbtt__active_edge * z = *step; + if (z->ey <= scan_y_top) { + *step = z->next; // delete from list + STBTT_assert(z->direction); + z->direction = 0; + stbtt__hheap_free(&hh, z); + } else { + step = &((*step)->next); // advance through list + } + } + + // insert all edges that start before the bottom of this scanline + while (e->y0 <= scan_y_bottom) { + if (e->y0 != e->y1) { + stbtt__active_edge *z = stbtt__new_active(&hh, e, off_x, scan_y_top, userdata); + if (z != NULL) { + if (j == 0 && off_y != 0) { + if (z->ey < scan_y_top) { + // this can happen due to subpixel positioning and some kind of fp rounding error i think + z->ey = scan_y_top; + } + } + STBTT_assert(z->ey >= scan_y_top); // if we get really unlucky a tiny bit of an edge can be out of bounds + // insert at front + z->next = active; + active = z; + } + } + ++e; + } + + // now process all active edges + if (active) + stbtt__fill_active_edges_new(scanline, scanline2+1, result->w, active, scan_y_top); + + { + float sum = 0; + for (i=0; i < result->w; ++i) { + float k; + int m; + sum += scanline2[i]; + k = scanline[i] + sum; + k = (float) STBTT_fabs(k)*255 + 0.5f; + m = (int) k; + if (m > 255) m = 255; + result->pixels[j*result->stride + i] = (unsigned char) m; + } + } + // advance all the edges + step = &active; + while (*step) { + stbtt__active_edge *z = *step; + z->fx += z->fdx; // advance to position for current scanline + step = &((*step)->next); // advance through list + } + + ++y; + ++j; + } + + stbtt__hheap_cleanup(&hh, userdata); + + if (scanline != scanline_data) + STBTT_free(scanline, userdata); +} +#else +#error "Unrecognized value of STBTT_RASTERIZER_VERSION" +#endif + +#define STBTT__COMPARE(a,b) ((a)->y0 < (b)->y0) + +static void stbtt__sort_edges_ins_sort(stbtt__edge *p, int n) +{ + int i,j; + for (i=1; i < n; ++i) { + stbtt__edge t = p[i], *a = &t; + j = i; + while (j > 0) { + stbtt__edge *b = &p[j-1]; + int c = STBTT__COMPARE(a,b); + if (!c) break; + p[j] = p[j-1]; + --j; + } + if (i != j) + p[j] = t; + } +} + +static void stbtt__sort_edges_quicksort(stbtt__edge *p, int n) +{ + /* threshold for transitioning to insertion sort */ + while (n > 12) { + stbtt__edge t; + int c01,c12,c,m,i,j; + + /* compute median of three */ + m = n >> 1; + c01 = STBTT__COMPARE(&p[0],&p[m]); + c12 = STBTT__COMPARE(&p[m],&p[n-1]); + /* if 0 >= mid >= end, or 0 < mid < end, then use mid */ + if (c01 != c12) { + /* otherwise, we'll need to swap something else to middle */ + int z; + c = STBTT__COMPARE(&p[0],&p[n-1]); + /* 0>mid && midn => n; 0 0 */ + /* 0n: 0>n => 0; 0 n */ + z = (c == c12) ? 0 : n-1; + t = p[z]; + p[z] = p[m]; + p[m] = t; + } + /* now p[m] is the median-of-three */ + /* swap it to the beginning so it won't move around */ + t = p[0]; + p[0] = p[m]; + p[m] = t; + + /* partition loop */ + i=1; + j=n-1; + for(;;) { + /* handling of equality is crucial here */ + /* for sentinels & efficiency with duplicates */ + for (;;++i) { + if (!STBTT__COMPARE(&p[i], &p[0])) break; + } + for (;;--j) { + if (!STBTT__COMPARE(&p[0], &p[j])) break; + } + /* make sure we haven't crossed */ + if (i >= j) break; + t = p[i]; + p[i] = p[j]; + p[j] = t; + + ++i; + --j; + } + /* recurse on smaller side, iterate on larger */ + if (j < (n-i)) { + stbtt__sort_edges_quicksort(p,j); + p = p+i; + n = n-i; + } else { + stbtt__sort_edges_quicksort(p+i, n-i); + n = j; + } + } +} + +static void stbtt__sort_edges(stbtt__edge *p, int n) +{ + stbtt__sort_edges_quicksort(p, n); + stbtt__sort_edges_ins_sort(p, n); +} + +typedef struct +{ + float x,y; +} stbtt__point; + +static void stbtt__rasterize(stbtt__bitmap *result, stbtt__point *pts, int *wcount, int windings, float scale_x, float scale_y, float shift_x, float shift_y, int off_x, int off_y, int invert, void *userdata) +{ + float y_scale_inv = invert ? -scale_y : scale_y; + stbtt__edge *e; + int n,i,j,k,m; +#if STBTT_RASTERIZER_VERSION == 1 + int vsubsample = result->h < 8 ? 15 : 5; +#elif STBTT_RASTERIZER_VERSION == 2 + int vsubsample = 1; +#else + #error "Unrecognized value of STBTT_RASTERIZER_VERSION" +#endif + // vsubsample should divide 255 evenly; otherwise we won't reach full opacity + + // now we have to blow out the windings into explicit edge lists + n = 0; + for (i=0; i < windings; ++i) + n += wcount[i]; + + e = (stbtt__edge *) STBTT_malloc(sizeof(*e) * (n+1), userdata); // add an extra one as a sentinel + if (e == 0) return; + n = 0; + + m=0; + for (i=0; i < windings; ++i) { + stbtt__point *p = pts + m; + m += wcount[i]; + j = wcount[i]-1; + for (k=0; k < wcount[i]; j=k++) { + int a=k,b=j; + // skip the edge if horizontal + if (p[j].y == p[k].y) + continue; + // add edge from j to k to the list + e[n].invert = 0; + if (invert ? p[j].y > p[k].y : p[j].y < p[k].y) { + e[n].invert = 1; + a=j,b=k; + } + e[n].x0 = p[a].x * scale_x + shift_x; + e[n].y0 = (p[a].y * y_scale_inv + shift_y) * vsubsample; + e[n].x1 = p[b].x * scale_x + shift_x; + e[n].y1 = (p[b].y * y_scale_inv + shift_y) * vsubsample; + ++n; + } + } + + // now sort the edges by their highest point (should snap to integer, and then by x) + //STBTT_sort(e, n, sizeof(e[0]), stbtt__edge_compare); + stbtt__sort_edges(e, n); + + // now, traverse the scanlines and find the intersections on each scanline, use xor winding rule + stbtt__rasterize_sorted_edges(result, e, n, vsubsample, off_x, off_y, userdata); + + STBTT_free(e, userdata); +} + +static void stbtt__add_point(stbtt__point *points, int n, float x, float y) +{ + if (!points) return; // during first pass, it's unallocated + points[n].x = x; + points[n].y = y; +} + +// tessellate until threshold p is happy... @TODO warped to compensate for non-linear stretching +static int stbtt__tesselate_curve(stbtt__point *points, int *num_points, float x0, float y0, float x1, float y1, float x2, float y2, float objspace_flatness_squared, int n) +{ + // midpoint + float mx = (x0 + 2*x1 + x2)/4; + float my = (y0 + 2*y1 + y2)/4; + // versus directly drawn line + float dx = (x0+x2)/2 - mx; + float dy = (y0+y2)/2 - my; + if (n > 16) // 65536 segments on one curve better be enough! + return 1; + if (dx*dx+dy*dy > objspace_flatness_squared) { // half-pixel error allowed... need to be smaller if AA + stbtt__tesselate_curve(points, num_points, x0,y0, (x0+x1)/2.0f,(y0+y1)/2.0f, mx,my, objspace_flatness_squared,n+1); + stbtt__tesselate_curve(points, num_points, mx,my, (x1+x2)/2.0f,(y1+y2)/2.0f, x2,y2, objspace_flatness_squared,n+1); + } else { + stbtt__add_point(points, *num_points,x2,y2); + *num_points = *num_points+1; + } + return 1; +} + +static void stbtt__tesselate_cubic(stbtt__point *points, int *num_points, float x0, float y0, float x1, float y1, float x2, float y2, float x3, float y3, float objspace_flatness_squared, int n) +{ + // @TODO this "flatness" calculation is just made-up nonsense that seems to work well enough + float dx0 = x1-x0; + float dy0 = y1-y0; + float dx1 = x2-x1; + float dy1 = y2-y1; + float dx2 = x3-x2; + float dy2 = y3-y2; + float dx = x3-x0; + float dy = y3-y0; + float longlen = (float) (STBTT_sqrt(dx0*dx0+dy0*dy0)+STBTT_sqrt(dx1*dx1+dy1*dy1)+STBTT_sqrt(dx2*dx2+dy2*dy2)); + float shortlen = (float) STBTT_sqrt(dx*dx+dy*dy); + float flatness_squared = longlen*longlen-shortlen*shortlen; + + if (n > 16) // 65536 segments on one curve better be enough! + return; + + if (flatness_squared > objspace_flatness_squared) { + float x01 = (x0+x1)/2; + float y01 = (y0+y1)/2; + float x12 = (x1+x2)/2; + float y12 = (y1+y2)/2; + float x23 = (x2+x3)/2; + float y23 = (y2+y3)/2; + + float xa = (x01+x12)/2; + float ya = (y01+y12)/2; + float xb = (x12+x23)/2; + float yb = (y12+y23)/2; + + float mx = (xa+xb)/2; + float my = (ya+yb)/2; + + stbtt__tesselate_cubic(points, num_points, x0,y0, x01,y01, xa,ya, mx,my, objspace_flatness_squared,n+1); + stbtt__tesselate_cubic(points, num_points, mx,my, xb,yb, x23,y23, x3,y3, objspace_flatness_squared,n+1); + } else { + stbtt__add_point(points, *num_points,x3,y3); + *num_points = *num_points+1; + } +} + +// returns number of contours +static stbtt__point *stbtt_FlattenCurves(stbtt_vertex *vertices, int num_verts, float objspace_flatness, int **contour_lengths, int *num_contours, void *userdata) +{ + stbtt__point *points=0; + int num_points=0; + + float objspace_flatness_squared = objspace_flatness * objspace_flatness; + int i,n=0,start=0, pass; + + // count how many "moves" there are to get the contour count + for (i=0; i < num_verts; ++i) + if (vertices[i].type == STBTT_vmove) + ++n; + + *num_contours = n; + if (n == 0) return 0; + + *contour_lengths = (int *) STBTT_malloc(sizeof(**contour_lengths) * n, userdata); + + if (*contour_lengths == 0) { + *num_contours = 0; + return 0; + } + + // make two passes through the points so we don't need to realloc + for (pass=0; pass < 2; ++pass) { + float x=0,y=0; + if (pass == 1) { + points = (stbtt__point *) STBTT_malloc(num_points * sizeof(points[0]), userdata); + if (points == NULL) goto error; + } + num_points = 0; + n= -1; + for (i=0; i < num_verts; ++i) { + switch (vertices[i].type) { + case STBTT_vmove: + // start the next contour + if (n >= 0) + (*contour_lengths)[n] = num_points - start; + ++n; + start = num_points; + + x = vertices[i].x, y = vertices[i].y; + stbtt__add_point(points, num_points++, x,y); + break; + case STBTT_vline: + x = vertices[i].x, y = vertices[i].y; + stbtt__add_point(points, num_points++, x, y); + break; + case STBTT_vcurve: + stbtt__tesselate_curve(points, &num_points, x,y, + vertices[i].cx, vertices[i].cy, + vertices[i].x, vertices[i].y, + objspace_flatness_squared, 0); + x = vertices[i].x, y = vertices[i].y; + break; + case STBTT_vcubic: + stbtt__tesselate_cubic(points, &num_points, x,y, + vertices[i].cx, vertices[i].cy, + vertices[i].cx1, vertices[i].cy1, + vertices[i].x, vertices[i].y, + objspace_flatness_squared, 0); + x = vertices[i].x, y = vertices[i].y; + break; + } + } + (*contour_lengths)[n] = num_points - start; + } + + return points; +error: + STBTT_free(points, userdata); + STBTT_free(*contour_lengths, userdata); + *contour_lengths = 0; + *num_contours = 0; + return NULL; +} + +STBTT_DEF void stbtt_Rasterize(stbtt__bitmap *result, float flatness_in_pixels, stbtt_vertex *vertices, int num_verts, float scale_x, float scale_y, float shift_x, float shift_y, int x_off, int y_off, int invert, void *userdata) +{ + float scale = scale_x > scale_y ? scale_y : scale_x; + int winding_count = 0; + int *winding_lengths = NULL; + stbtt__point *windings = stbtt_FlattenCurves(vertices, num_verts, flatness_in_pixels / scale, &winding_lengths, &winding_count, userdata); + if (windings) { + stbtt__rasterize(result, windings, winding_lengths, winding_count, scale_x, scale_y, shift_x, shift_y, x_off, y_off, invert, userdata); + STBTT_free(winding_lengths, userdata); + STBTT_free(windings, userdata); + } +} + +STBTT_DEF void stbtt_FreeBitmap(unsigned char *bitmap, void *userdata) +{ + STBTT_free(bitmap, userdata); +} + +STBTT_DEF unsigned char *stbtt_GetGlyphBitmapSubpixel(const stbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int glyph, int *width, int *height, int *xoff, int *yoff) +{ + int ix0,iy0,ix1,iy1; + stbtt__bitmap gbm; + stbtt_vertex *vertices; + int num_verts = stbtt_GetGlyphShape(info, glyph, &vertices); + + if (scale_x == 0) scale_x = scale_y; + if (scale_y == 0) { + if (scale_x == 0) { + STBTT_free(vertices, info->userdata); + return NULL; + } + scale_y = scale_x; + } + + stbtt_GetGlyphBitmapBoxSubpixel(info, glyph, scale_x, scale_y, shift_x, shift_y, &ix0,&iy0,&ix1,&iy1); + + // now we get the size + gbm.w = (ix1 - ix0); + gbm.h = (iy1 - iy0); + gbm.pixels = NULL; // in case we error + + if (width ) *width = gbm.w; + if (height) *height = gbm.h; + if (xoff ) *xoff = ix0; + if (yoff ) *yoff = iy0; + + if (gbm.w && gbm.h) { + gbm.pixels = (unsigned char *) STBTT_malloc(gbm.w * gbm.h, info->userdata); + if (gbm.pixels) { + gbm.stride = gbm.w; + + stbtt_Rasterize(&gbm, 0.35f, vertices, num_verts, scale_x, scale_y, shift_x, shift_y, ix0, iy0, 1, info->userdata); + } + } + STBTT_free(vertices, info->userdata); + return gbm.pixels; +} + +STBTT_DEF unsigned char *stbtt_GetGlyphBitmap(const stbtt_fontinfo *info, float scale_x, float scale_y, int glyph, int *width, int *height, int *xoff, int *yoff) +{ + return stbtt_GetGlyphBitmapSubpixel(info, scale_x, scale_y, 0.0f, 0.0f, glyph, width, height, xoff, yoff); +} + +STBTT_DEF void stbtt_MakeGlyphBitmapSubpixel(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int glyph) +{ + int ix0,iy0; + stbtt_vertex *vertices; + int num_verts = stbtt_GetGlyphShape(info, glyph, &vertices); + stbtt__bitmap gbm; + + stbtt_GetGlyphBitmapBoxSubpixel(info, glyph, scale_x, scale_y, shift_x, shift_y, &ix0,&iy0,0,0); + gbm.pixels = output; + gbm.w = out_w; + gbm.h = out_h; + gbm.stride = out_stride; + + if (gbm.w && gbm.h) + stbtt_Rasterize(&gbm, 0.35f, vertices, num_verts, scale_x, scale_y, shift_x, shift_y, ix0,iy0, 1, info->userdata); + + STBTT_free(vertices, info->userdata); +} + +STBTT_DEF void stbtt_MakeGlyphBitmap(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, int glyph) +{ + stbtt_MakeGlyphBitmapSubpixel(info, output, out_w, out_h, out_stride, scale_x, scale_y, 0.0f,0.0f, glyph); +} + +STBTT_DEF unsigned char *stbtt_GetCodepointBitmapSubpixel(const stbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int codepoint, int *width, int *height, int *xoff, int *yoff) +{ + return stbtt_GetGlyphBitmapSubpixel(info, scale_x, scale_y,shift_x,shift_y, stbtt_FindGlyphIndex(info,codepoint), width,height,xoff,yoff); +} + +STBTT_DEF void stbtt_MakeCodepointBitmapSubpixelPrefilter(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int oversample_x, int oversample_y, float *sub_x, float *sub_y, int codepoint) +{ + stbtt_MakeGlyphBitmapSubpixelPrefilter(info, output, out_w, out_h, out_stride, scale_x, scale_y, shift_x, shift_y, oversample_x, oversample_y, sub_x, sub_y, stbtt_FindGlyphIndex(info,codepoint)); +} + +STBTT_DEF void stbtt_MakeCodepointBitmapSubpixel(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int codepoint) +{ + stbtt_MakeGlyphBitmapSubpixel(info, output, out_w, out_h, out_stride, scale_x, scale_y, shift_x, shift_y, stbtt_FindGlyphIndex(info,codepoint)); +} + +STBTT_DEF unsigned char *stbtt_GetCodepointBitmap(const stbtt_fontinfo *info, float scale_x, float scale_y, int codepoint, int *width, int *height, int *xoff, int *yoff) +{ + return stbtt_GetCodepointBitmapSubpixel(info, scale_x, scale_y, 0.0f,0.0f, codepoint, width,height,xoff,yoff); +} + +STBTT_DEF void stbtt_MakeCodepointBitmap(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, int codepoint) +{ + stbtt_MakeCodepointBitmapSubpixel(info, output, out_w, out_h, out_stride, scale_x, scale_y, 0.0f,0.0f, codepoint); +} + +////////////////////////////////////////////////////////////////////////////// +// +// bitmap baking +// +// This is SUPER-CRAPPY packing to keep source code small + +static int stbtt_BakeFontBitmap_internal(unsigned char *data, int offset, // font location (use offset=0 for plain .ttf) + float pixel_height, // height of font in pixels + unsigned char *pixels, int pw, int ph, // bitmap to be filled in + int first_char, int num_chars, // characters to bake + stbtt_bakedchar *chardata) +{ + float scale; + int x,y,bottom_y, i; + stbtt_fontinfo f; + f.userdata = NULL; + if (!stbtt_InitFont(&f, data, offset)) + return -1; + STBTT_memset(pixels, 0, pw*ph); // background of 0 around pixels + x=y=1; + bottom_y = 1; + + scale = stbtt_ScaleForPixelHeight(&f, pixel_height); + + for (i=0; i < num_chars; ++i) { + int advance, lsb, x0,y0,x1,y1,gw,gh; + int g = stbtt_FindGlyphIndex(&f, first_char + i); + stbtt_GetGlyphHMetrics(&f, g, &advance, &lsb); + stbtt_GetGlyphBitmapBox(&f, g, scale,scale, &x0,&y0,&x1,&y1); + gw = x1-x0; + gh = y1-y0; + if (x + gw + 1 >= pw) + y = bottom_y, x = 1; // advance to next row + if (y + gh + 1 >= ph) // check if it fits vertically AFTER potentially moving to next row + return -i; + STBTT_assert(x+gw < pw); + STBTT_assert(y+gh < ph); + stbtt_MakeGlyphBitmap(&f, pixels+x+y*pw, gw,gh,pw, scale,scale, g); + chardata[i].x0 = (stbtt_int16) x; + chardata[i].y0 = (stbtt_int16) y; + chardata[i].x1 = (stbtt_int16) (x + gw); + chardata[i].y1 = (stbtt_int16) (y + gh); + chardata[i].xadvance = scale * advance; + chardata[i].xoff = (float) x0; + chardata[i].yoff = (float) y0; + x = x + gw + 1; + if (y+gh+1 > bottom_y) + bottom_y = y+gh+1; + } + return bottom_y; +} + +STBTT_DEF void stbtt_GetBakedQuad(const stbtt_bakedchar *chardata, int pw, int ph, int char_index, float *xpos, float *ypos, stbtt_aligned_quad *q, int opengl_fillrule) +{ + float d3d_bias = opengl_fillrule ? 0 : -0.5f; + float ipw = 1.0f / pw, iph = 1.0f / ph; + const stbtt_bakedchar *b = chardata + char_index; + int round_x = STBTT_ifloor((*xpos + b->xoff) + 0.5f); + int round_y = STBTT_ifloor((*ypos + b->yoff) + 0.5f); + + q->x0 = round_x + d3d_bias; + q->y0 = round_y + d3d_bias; + q->x1 = round_x + b->x1 - b->x0 + d3d_bias; + q->y1 = round_y + b->y1 - b->y0 + d3d_bias; + + q->s0 = b->x0 * ipw; + q->t0 = b->y0 * iph; + q->s1 = b->x1 * ipw; + q->t1 = b->y1 * iph; + + *xpos += b->xadvance; +} + +////////////////////////////////////////////////////////////////////////////// +// +// rectangle packing replacement routines if you don't have stb_rect_pack.h +// + +#ifndef STB_RECT_PACK_VERSION + +typedef int stbrp_coord; + +//////////////////////////////////////////////////////////////////////////////////// +// // +// // +// COMPILER WARNING ?!?!? // +// // +// // +// if you get a compile warning due to these symbols being defined more than // +// once, move #include "stb_rect_pack.h" before #include "stb_truetype.h" // +// // +//////////////////////////////////////////////////////////////////////////////////// + +typedef struct +{ + int width,height; + int x,y,bottom_y; +} stbrp_context; + +typedef struct +{ + unsigned char x; +} stbrp_node; + +struct stbrp_rect +{ + stbrp_coord x,y; + int id,w,h,was_packed; +}; + +static void stbrp_init_target(stbrp_context *con, int pw, int ph, stbrp_node *nodes, int num_nodes) +{ + con->width = pw; + con->height = ph; + con->x = 0; + con->y = 0; + con->bottom_y = 0; + STBTT__NOTUSED(nodes); + STBTT__NOTUSED(num_nodes); +} + +static void stbrp_pack_rects(stbrp_context *con, stbrp_rect *rects, int num_rects) +{ + int i; + for (i=0; i < num_rects; ++i) { + if (con->x + rects[i].w > con->width) { + con->x = 0; + con->y = con->bottom_y; + } + if (con->y + rects[i].h > con->height) + break; + rects[i].x = con->x; + rects[i].y = con->y; + rects[i].was_packed = 1; + con->x += rects[i].w; + if (con->y + rects[i].h > con->bottom_y) + con->bottom_y = con->y + rects[i].h; + } + for ( ; i < num_rects; ++i) + rects[i].was_packed = 0; +} +#endif + +////////////////////////////////////////////////////////////////////////////// +// +// bitmap baking +// +// This is SUPER-AWESOME (tm Ryan Gordon) packing using stb_rect_pack.h. If +// stb_rect_pack.h isn't available, it uses the BakeFontBitmap strategy. + +STBTT_DEF int stbtt_PackBegin(stbtt_pack_context *spc, unsigned char *pixels, int pw, int ph, int stride_in_bytes, int padding, void *alloc_context) +{ + stbrp_context *context = (stbrp_context *) STBTT_malloc(sizeof(*context) ,alloc_context); + int num_nodes = pw - padding; + stbrp_node *nodes = (stbrp_node *) STBTT_malloc(sizeof(*nodes ) * num_nodes,alloc_context); + + if (context == NULL || nodes == NULL) { + if (context != NULL) STBTT_free(context, alloc_context); + if (nodes != NULL) STBTT_free(nodes , alloc_context); + return 0; + } + + spc->user_allocator_context = alloc_context; + spc->width = pw; + spc->height = ph; + spc->pixels = pixels; + spc->pack_info = context; + spc->nodes = nodes; + spc->padding = padding; + spc->stride_in_bytes = stride_in_bytes != 0 ? stride_in_bytes : pw; + spc->h_oversample = 1; + spc->v_oversample = 1; + spc->skip_missing = 0; + + stbrp_init_target(context, pw-padding, ph-padding, nodes, num_nodes); + + if (pixels) + STBTT_memset(pixels, 0, pw*ph); // background of 0 around pixels + + return 1; +} + +STBTT_DEF void stbtt_PackEnd (stbtt_pack_context *spc) +{ + STBTT_free(spc->nodes , spc->user_allocator_context); + STBTT_free(spc->pack_info, spc->user_allocator_context); +} + +STBTT_DEF void stbtt_PackSetOversampling(stbtt_pack_context *spc, unsigned int h_oversample, unsigned int v_oversample) +{ + STBTT_assert(h_oversample <= STBTT_MAX_OVERSAMPLE); + STBTT_assert(v_oversample <= STBTT_MAX_OVERSAMPLE); + if (h_oversample <= STBTT_MAX_OVERSAMPLE) + spc->h_oversample = h_oversample; + if (v_oversample <= STBTT_MAX_OVERSAMPLE) + spc->v_oversample = v_oversample; +} + +STBTT_DEF void stbtt_PackSetSkipMissingCodepoints(stbtt_pack_context *spc, int skip) +{ + spc->skip_missing = skip; +} + +#define STBTT__OVER_MASK (STBTT_MAX_OVERSAMPLE-1) + +static void stbtt__h_prefilter(unsigned char *pixels, int w, int h, int stride_in_bytes, unsigned int kernel_width) +{ + unsigned char buffer[STBTT_MAX_OVERSAMPLE]; + int safe_w = w - kernel_width; + int j; + STBTT_memset(buffer, 0, STBTT_MAX_OVERSAMPLE); // suppress bogus warning from VS2013 -analyze + for (j=0; j < h; ++j) { + int i; + unsigned int total; + STBTT_memset(buffer, 0, kernel_width); + + total = 0; + + // make kernel_width a constant in common cases so compiler can optimize out the divide + switch (kernel_width) { + case 2: + for (i=0; i <= safe_w; ++i) { + total += pixels[i] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i]; + pixels[i] = (unsigned char) (total / 2); + } + break; + case 3: + for (i=0; i <= safe_w; ++i) { + total += pixels[i] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i]; + pixels[i] = (unsigned char) (total / 3); + } + break; + case 4: + for (i=0; i <= safe_w; ++i) { + total += pixels[i] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i]; + pixels[i] = (unsigned char) (total / 4); + } + break; + case 5: + for (i=0; i <= safe_w; ++i) { + total += pixels[i] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i]; + pixels[i] = (unsigned char) (total / 5); + } + break; + default: + for (i=0; i <= safe_w; ++i) { + total += pixels[i] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i]; + pixels[i] = (unsigned char) (total / kernel_width); + } + break; + } + + for (; i < w; ++i) { + STBTT_assert(pixels[i] == 0); + total -= buffer[i & STBTT__OVER_MASK]; + pixels[i] = (unsigned char) (total / kernel_width); + } + + pixels += stride_in_bytes; + } +} + +static void stbtt__v_prefilter(unsigned char *pixels, int w, int h, int stride_in_bytes, unsigned int kernel_width) +{ + unsigned char buffer[STBTT_MAX_OVERSAMPLE]; + int safe_h = h - kernel_width; + int j; + STBTT_memset(buffer, 0, STBTT_MAX_OVERSAMPLE); // suppress bogus warning from VS2013 -analyze + for (j=0; j < w; ++j) { + int i; + unsigned int total; + STBTT_memset(buffer, 0, kernel_width); + + total = 0; + + // make kernel_width a constant in common cases so compiler can optimize out the divide + switch (kernel_width) { + case 2: + for (i=0; i <= safe_h; ++i) { + total += pixels[i*stride_in_bytes] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i*stride_in_bytes]; + pixels[i*stride_in_bytes] = (unsigned char) (total / 2); + } + break; + case 3: + for (i=0; i <= safe_h; ++i) { + total += pixels[i*stride_in_bytes] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i*stride_in_bytes]; + pixels[i*stride_in_bytes] = (unsigned char) (total / 3); + } + break; + case 4: + for (i=0; i <= safe_h; ++i) { + total += pixels[i*stride_in_bytes] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i*stride_in_bytes]; + pixels[i*stride_in_bytes] = (unsigned char) (total / 4); + } + break; + case 5: + for (i=0; i <= safe_h; ++i) { + total += pixels[i*stride_in_bytes] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i*stride_in_bytes]; + pixels[i*stride_in_bytes] = (unsigned char) (total / 5); + } + break; + default: + for (i=0; i <= safe_h; ++i) { + total += pixels[i*stride_in_bytes] - buffer[i & STBTT__OVER_MASK]; + buffer[(i+kernel_width) & STBTT__OVER_MASK] = pixels[i*stride_in_bytes]; + pixels[i*stride_in_bytes] = (unsigned char) (total / kernel_width); + } + break; + } + + for (; i < h; ++i) { + STBTT_assert(pixels[i*stride_in_bytes] == 0); + total -= buffer[i & STBTT__OVER_MASK]; + pixels[i*stride_in_bytes] = (unsigned char) (total / kernel_width); + } + + pixels += 1; + } +} + +static float stbtt__oversample_shift(int oversample) +{ + if (!oversample) + return 0.0f; + + // The prefilter is a box filter of width "oversample", + // which shifts phase by (oversample - 1)/2 pixels in + // oversampled space. We want to shift in the opposite + // direction to counter this. + return (float)-(oversample - 1) / (2.0f * (float)oversample); +} + +// rects array must be big enough to accommodate all characters in the given ranges +STBTT_DEF int stbtt_PackFontRangesGatherRects(stbtt_pack_context *spc, const stbtt_fontinfo *info, stbtt_pack_range *ranges, int num_ranges, stbrp_rect *rects) +{ + int i,j,k; + int missing_glyph_added = 0; + + k=0; + for (i=0; i < num_ranges; ++i) { + float fh = ranges[i].font_size; + float scale = fh > 0 ? stbtt_ScaleForPixelHeight(info, fh) : stbtt_ScaleForMappingEmToPixels(info, -fh); + ranges[i].h_oversample = (unsigned char) spc->h_oversample; + ranges[i].v_oversample = (unsigned char) spc->v_oversample; + for (j=0; j < ranges[i].num_chars; ++j) { + int x0,y0,x1,y1; + int codepoint = ranges[i].array_of_unicode_codepoints == NULL ? ranges[i].first_unicode_codepoint_in_range + j : ranges[i].array_of_unicode_codepoints[j]; + int glyph = stbtt_FindGlyphIndex(info, codepoint); + if (glyph == 0 && (spc->skip_missing || missing_glyph_added)) { + rects[k].w = rects[k].h = 0; + } else { + stbtt_GetGlyphBitmapBoxSubpixel(info,glyph, + scale * spc->h_oversample, + scale * spc->v_oversample, + 0,0, + &x0,&y0,&x1,&y1); + rects[k].w = (stbrp_coord) (x1-x0 + spc->padding + spc->h_oversample-1); + rects[k].h = (stbrp_coord) (y1-y0 + spc->padding + spc->v_oversample-1); + if (glyph == 0) + missing_glyph_added = 1; + } + ++k; + } + } + + return k; +} + +STBTT_DEF void stbtt_MakeGlyphBitmapSubpixelPrefilter(const stbtt_fontinfo *info, unsigned char *output, int out_w, int out_h, int out_stride, float scale_x, float scale_y, float shift_x, float shift_y, int prefilter_x, int prefilter_y, float *sub_x, float *sub_y, int glyph) +{ + stbtt_MakeGlyphBitmapSubpixel(info, + output, + out_w - (prefilter_x - 1), + out_h - (prefilter_y - 1), + out_stride, + scale_x, + scale_y, + shift_x, + shift_y, + glyph); + + if (prefilter_x > 1) + stbtt__h_prefilter(output, out_w, out_h, out_stride, prefilter_x); + + if (prefilter_y > 1) + stbtt__v_prefilter(output, out_w, out_h, out_stride, prefilter_y); + + *sub_x = stbtt__oversample_shift(prefilter_x); + *sub_y = stbtt__oversample_shift(prefilter_y); +} + +// rects array must be big enough to accommodate all characters in the given ranges +STBTT_DEF int stbtt_PackFontRangesRenderIntoRects(stbtt_pack_context *spc, const stbtt_fontinfo *info, stbtt_pack_range *ranges, int num_ranges, stbrp_rect *rects) +{ + int i,j,k, missing_glyph = -1, return_value = 1; + + // save current values + int old_h_over = spc->h_oversample; + int old_v_over = spc->v_oversample; + + k = 0; + for (i=0; i < num_ranges; ++i) { + float fh = ranges[i].font_size; + float scale = fh > 0 ? stbtt_ScaleForPixelHeight(info, fh) : stbtt_ScaleForMappingEmToPixels(info, -fh); + float recip_h,recip_v,sub_x,sub_y; + spc->h_oversample = ranges[i].h_oversample; + spc->v_oversample = ranges[i].v_oversample; + recip_h = 1.0f / spc->h_oversample; + recip_v = 1.0f / spc->v_oversample; + sub_x = stbtt__oversample_shift(spc->h_oversample); + sub_y = stbtt__oversample_shift(spc->v_oversample); + for (j=0; j < ranges[i].num_chars; ++j) { + stbrp_rect *r = &rects[k]; + if (r->was_packed && r->w != 0 && r->h != 0) { + stbtt_packedchar *bc = &ranges[i].chardata_for_range[j]; + int advance, lsb, x0,y0,x1,y1; + int codepoint = ranges[i].array_of_unicode_codepoints == NULL ? ranges[i].first_unicode_codepoint_in_range + j : ranges[i].array_of_unicode_codepoints[j]; + int glyph = stbtt_FindGlyphIndex(info, codepoint); + stbrp_coord pad = (stbrp_coord) spc->padding; + + // pad on left and top + r->x += pad; + r->y += pad; + r->w -= pad; + r->h -= pad; + stbtt_GetGlyphHMetrics(info, glyph, &advance, &lsb); + stbtt_GetGlyphBitmapBox(info, glyph, + scale * spc->h_oversample, + scale * spc->v_oversample, + &x0,&y0,&x1,&y1); + stbtt_MakeGlyphBitmapSubpixel(info, + spc->pixels + r->x + r->y*spc->stride_in_bytes, + r->w - spc->h_oversample+1, + r->h - spc->v_oversample+1, + spc->stride_in_bytes, + scale * spc->h_oversample, + scale * spc->v_oversample, + 0,0, + glyph); + + if (spc->h_oversample > 1) + stbtt__h_prefilter(spc->pixels + r->x + r->y*spc->stride_in_bytes, + r->w, r->h, spc->stride_in_bytes, + spc->h_oversample); + + if (spc->v_oversample > 1) + stbtt__v_prefilter(spc->pixels + r->x + r->y*spc->stride_in_bytes, + r->w, r->h, spc->stride_in_bytes, + spc->v_oversample); + + bc->x0 = (stbtt_int16) r->x; + bc->y0 = (stbtt_int16) r->y; + bc->x1 = (stbtt_int16) (r->x + r->w); + bc->y1 = (stbtt_int16) (r->y + r->h); + bc->xadvance = scale * advance; + bc->xoff = (float) x0 * recip_h + sub_x; + bc->yoff = (float) y0 * recip_v + sub_y; + bc->xoff2 = (x0 + r->w) * recip_h + sub_x; + bc->yoff2 = (y0 + r->h) * recip_v + sub_y; + + if (glyph == 0) + missing_glyph = j; + } else if (spc->skip_missing) { + return_value = 0; + } else if (r->was_packed && r->w == 0 && r->h == 0 && missing_glyph >= 0) { + ranges[i].chardata_for_range[j] = ranges[i].chardata_for_range[missing_glyph]; + } else { + return_value = 0; // if any fail, report failure + } + + ++k; + } + } + + // restore original values + spc->h_oversample = old_h_over; + spc->v_oversample = old_v_over; + + return return_value; +} + +STBTT_DEF void stbtt_PackFontRangesPackRects(stbtt_pack_context *spc, stbrp_rect *rects, int num_rects) +{ + stbrp_pack_rects((stbrp_context *) spc->pack_info, rects, num_rects); +} + +STBTT_DEF int stbtt_PackFontRanges(stbtt_pack_context *spc, const unsigned char *fontdata, int font_index, stbtt_pack_range *ranges, int num_ranges) +{ + stbtt_fontinfo info; + int i,j,n, return_value = 1; + //stbrp_context *context = (stbrp_context *) spc->pack_info; + stbrp_rect *rects; + + // flag all characters as NOT packed + for (i=0; i < num_ranges; ++i) + for (j=0; j < ranges[i].num_chars; ++j) + ranges[i].chardata_for_range[j].x0 = + ranges[i].chardata_for_range[j].y0 = + ranges[i].chardata_for_range[j].x1 = + ranges[i].chardata_for_range[j].y1 = 0; + + n = 0; + for (i=0; i < num_ranges; ++i) + n += ranges[i].num_chars; + + rects = (stbrp_rect *) STBTT_malloc(sizeof(*rects) * n, spc->user_allocator_context); + if (rects == NULL) + return 0; + + info.userdata = spc->user_allocator_context; + stbtt_InitFont(&info, fontdata, stbtt_GetFontOffsetForIndex(fontdata,font_index)); + + n = stbtt_PackFontRangesGatherRects(spc, &info, ranges, num_ranges, rects); + + stbtt_PackFontRangesPackRects(spc, rects, n); + + return_value = stbtt_PackFontRangesRenderIntoRects(spc, &info, ranges, num_ranges, rects); + + STBTT_free(rects, spc->user_allocator_context); + return return_value; +} + +STBTT_DEF int stbtt_PackFontRange(stbtt_pack_context *spc, const unsigned char *fontdata, int font_index, float font_size, + int first_unicode_codepoint_in_range, int num_chars_in_range, stbtt_packedchar *chardata_for_range) +{ + stbtt_pack_range range; + range.first_unicode_codepoint_in_range = first_unicode_codepoint_in_range; + range.array_of_unicode_codepoints = NULL; + range.num_chars = num_chars_in_range; + range.chardata_for_range = chardata_for_range; + range.font_size = font_size; + return stbtt_PackFontRanges(spc, fontdata, font_index, &range, 1); +} + +STBTT_DEF void stbtt_GetScaledFontVMetrics(const unsigned char *fontdata, int index, float size, float *ascent, float *descent, float *lineGap) +{ + int i_ascent, i_descent, i_lineGap; + float scale; + stbtt_fontinfo info; + stbtt_InitFont(&info, fontdata, stbtt_GetFontOffsetForIndex(fontdata, index)); + scale = size > 0 ? stbtt_ScaleForPixelHeight(&info, size) : stbtt_ScaleForMappingEmToPixels(&info, -size); + stbtt_GetFontVMetrics(&info, &i_ascent, &i_descent, &i_lineGap); + *ascent = (float) i_ascent * scale; + *descent = (float) i_descent * scale; + *lineGap = (float) i_lineGap * scale; +} + +STBTT_DEF void stbtt_GetPackedQuad(const stbtt_packedchar *chardata, int pw, int ph, int char_index, float *xpos, float *ypos, stbtt_aligned_quad *q, int align_to_integer) +{ + float ipw = 1.0f / pw, iph = 1.0f / ph; + const stbtt_packedchar *b = chardata + char_index; + + if (align_to_integer) { + float x = (float) STBTT_ifloor((*xpos + b->xoff) + 0.5f); + float y = (float) STBTT_ifloor((*ypos + b->yoff) + 0.5f); + q->x0 = x; + q->y0 = y; + q->x1 = x + b->xoff2 - b->xoff; + q->y1 = y + b->yoff2 - b->yoff; + } else { + q->x0 = *xpos + b->xoff; + q->y0 = *ypos + b->yoff; + q->x1 = *xpos + b->xoff2; + q->y1 = *ypos + b->yoff2; + } + + q->s0 = b->x0 * ipw; + q->t0 = b->y0 * iph; + q->s1 = b->x1 * ipw; + q->t1 = b->y1 * iph; + + *xpos += b->xadvance; +} + +////////////////////////////////////////////////////////////////////////////// +// +// sdf computation +// + +#define STBTT_min(a,b) ((a) < (b) ? (a) : (b)) +#define STBTT_max(a,b) ((a) < (b) ? (b) : (a)) + +static int stbtt__ray_intersect_bezier(float orig[2], float ray[2], float q0[2], float q1[2], float q2[2], float hits[2][2]) +{ + float q0perp = q0[1]*ray[0] - q0[0]*ray[1]; + float q1perp = q1[1]*ray[0] - q1[0]*ray[1]; + float q2perp = q2[1]*ray[0] - q2[0]*ray[1]; + float roperp = orig[1]*ray[0] - orig[0]*ray[1]; + + float a = q0perp - 2*q1perp + q2perp; + float b = q1perp - q0perp; + float c = q0perp - roperp; + + float s0 = 0., s1 = 0.; + int num_s = 0; + + if (a != 0.0) { + float discr = b*b - a*c; + if (discr > 0.0) { + float rcpna = -1 / a; + float d = (float) STBTT_sqrt(discr); + s0 = (b+d) * rcpna; + s1 = (b-d) * rcpna; + if (s0 >= 0.0 && s0 <= 1.0) + num_s = 1; + if (d > 0.0 && s1 >= 0.0 && s1 <= 1.0) { + if (num_s == 0) s0 = s1; + ++num_s; + } + } + } else { + // 2*b*s + c = 0 + // s = -c / (2*b) + s0 = c / (-2 * b); + if (s0 >= 0.0 && s0 <= 1.0) + num_s = 1; + } + + if (num_s == 0) + return 0; + else { + float rcp_len2 = 1 / (ray[0]*ray[0] + ray[1]*ray[1]); + float rayn_x = ray[0] * rcp_len2, rayn_y = ray[1] * rcp_len2; + + float q0d = q0[0]*rayn_x + q0[1]*rayn_y; + float q1d = q1[0]*rayn_x + q1[1]*rayn_y; + float q2d = q2[0]*rayn_x + q2[1]*rayn_y; + float rod = orig[0]*rayn_x + orig[1]*rayn_y; + + float q10d = q1d - q0d; + float q20d = q2d - q0d; + float q0rd = q0d - rod; + + hits[0][0] = q0rd + s0*(2.0f - 2.0f*s0)*q10d + s0*s0*q20d; + hits[0][1] = a*s0+b; + + if (num_s > 1) { + hits[1][0] = q0rd + s1*(2.0f - 2.0f*s1)*q10d + s1*s1*q20d; + hits[1][1] = a*s1+b; + return 2; + } else { + return 1; + } + } +} + +static int equal(float *a, float *b) +{ + return (a[0] == b[0] && a[1] == b[1]); +} + +static int stbtt__compute_crossings_x(float x, float y, int nverts, stbtt_vertex *verts) +{ + int i; + float orig[2], ray[2] = { 1, 0 }; + float y_frac; + int winding = 0; + + orig[0] = x; + orig[1] = y; + + // make sure y never passes through a vertex of the shape + y_frac = (float) STBTT_fmod(y, 1.0f); + if (y_frac < 0.01f) + y += 0.01f; + else if (y_frac > 0.99f) + y -= 0.01f; + orig[1] = y; + + // test a ray from (-infinity,y) to (x,y) + for (i=0; i < nverts; ++i) { + if (verts[i].type == STBTT_vline) { + int x0 = (int) verts[i-1].x, y0 = (int) verts[i-1].y; + int x1 = (int) verts[i ].x, y1 = (int) verts[i ].y; + if (y > STBTT_min(y0,y1) && y < STBTT_max(y0,y1) && x > STBTT_min(x0,x1)) { + float x_inter = (y - y0) / (y1 - y0) * (x1-x0) + x0; + if (x_inter < x) + winding += (y0 < y1) ? 1 : -1; + } + } + if (verts[i].type == STBTT_vcurve) { + int x0 = (int) verts[i-1].x , y0 = (int) verts[i-1].y ; + int x1 = (int) verts[i ].cx, y1 = (int) verts[i ].cy; + int x2 = (int) verts[i ].x , y2 = (int) verts[i ].y ; + int ax = STBTT_min(x0,STBTT_min(x1,x2)), ay = STBTT_min(y0,STBTT_min(y1,y2)); + int by = STBTT_max(y0,STBTT_max(y1,y2)); + if (y > ay && y < by && x > ax) { + float q0[2],q1[2],q2[2]; + float hits[2][2]; + q0[0] = (float)x0; + q0[1] = (float)y0; + q1[0] = (float)x1; + q1[1] = (float)y1; + q2[0] = (float)x2; + q2[1] = (float)y2; + if (equal(q0,q1) || equal(q1,q2)) { + x0 = (int)verts[i-1].x; + y0 = (int)verts[i-1].y; + x1 = (int)verts[i ].x; + y1 = (int)verts[i ].y; + if (y > STBTT_min(y0,y1) && y < STBTT_max(y0,y1) && x > STBTT_min(x0,x1)) { + float x_inter = (y - y0) / (y1 - y0) * (x1-x0) + x0; + if (x_inter < x) + winding += (y0 < y1) ? 1 : -1; + } + } else { + int num_hits = stbtt__ray_intersect_bezier(orig, ray, q0, q1, q2, hits); + if (num_hits >= 1) + if (hits[0][0] < 0) + winding += (hits[0][1] < 0 ? -1 : 1); + if (num_hits >= 2) + if (hits[1][0] < 0) + winding += (hits[1][1] < 0 ? -1 : 1); + } + } + } + } + return winding; +} + +static float stbtt__cuberoot( float x ) +{ + if (x<0) + return -(float) STBTT_pow(-x,1.0f/3.0f); + else + return (float) STBTT_pow( x,1.0f/3.0f); +} + +// x^3 + c*x^2 + b*x + a = 0 +static int stbtt__solve_cubic(float a, float b, float c, float* r) +{ + float s = -a / 3; + float p = b - a*a / 3; + float q = a * (2*a*a - 9*b) / 27 + c; + float p3 = p*p*p; + float d = q*q + 4*p3 / 27; + if (d >= 0) { + float z = (float) STBTT_sqrt(d); + float u = (-q + z) / 2; + float v = (-q - z) / 2; + u = stbtt__cuberoot(u); + v = stbtt__cuberoot(v); + r[0] = s + u + v; + return 1; + } else { + float u = (float) STBTT_sqrt(-p/3); + float v = (float) STBTT_acos(-STBTT_sqrt(-27/p3) * q / 2) / 3; // p3 must be negative, since d is negative + float m = (float) STBTT_cos(v); + float n = (float) STBTT_cos(v-3.141592/2)*1.732050808f; + r[0] = s + u * 2 * m; + r[1] = s - u * (m + n); + r[2] = s - u * (m - n); + + //STBTT_assert( STBTT_fabs(((r[0]+a)*r[0]+b)*r[0]+c) < 0.05f); // these asserts may not be safe at all scales, though they're in bezier t parameter units so maybe? + //STBTT_assert( STBTT_fabs(((r[1]+a)*r[1]+b)*r[1]+c) < 0.05f); + //STBTT_assert( STBTT_fabs(((r[2]+a)*r[2]+b)*r[2]+c) < 0.05f); + return 3; + } +} + +STBTT_DEF unsigned char * stbtt_GetGlyphSDF(const stbtt_fontinfo *info, float scale, int glyph, int padding, unsigned char onedge_value, float pixel_dist_scale, int *width, int *height, int *xoff, int *yoff) +{ + float scale_x = scale, scale_y = scale; + int ix0,iy0,ix1,iy1; + int w,h; + unsigned char *data; + + if (scale == 0) return NULL; + + stbtt_GetGlyphBitmapBoxSubpixel(info, glyph, scale, scale, 0.0f,0.0f, &ix0,&iy0,&ix1,&iy1); + + // if empty, return NULL + if (ix0 == ix1 || iy0 == iy1) + return NULL; + + ix0 -= padding; + iy0 -= padding; + ix1 += padding; + iy1 += padding; + + w = (ix1 - ix0); + h = (iy1 - iy0); + + if (width ) *width = w; + if (height) *height = h; + if (xoff ) *xoff = ix0; + if (yoff ) *yoff = iy0; + + // invert for y-downwards bitmaps + scale_y = -scale_y; + + { + int x,y,i,j; + float *precompute; + stbtt_vertex *verts; + int num_verts = stbtt_GetGlyphShape(info, glyph, &verts); + data = (unsigned char *) STBTT_malloc(w * h, info->userdata); + precompute = (float *) STBTT_malloc(num_verts * sizeof(float), info->userdata); + + for (i=0,j=num_verts-1; i < num_verts; j=i++) { + if (verts[i].type == STBTT_vline) { + float x0 = verts[i].x*scale_x, y0 = verts[i].y*scale_y; + float x1 = verts[j].x*scale_x, y1 = verts[j].y*scale_y; + float dist = (float) STBTT_sqrt((x1-x0)*(x1-x0) + (y1-y0)*(y1-y0)); + precompute[i] = (dist == 0) ? 0.0f : 1.0f / dist; + } else if (verts[i].type == STBTT_vcurve) { + float x2 = verts[j].x *scale_x, y2 = verts[j].y *scale_y; + float x1 = verts[i].cx*scale_x, y1 = verts[i].cy*scale_y; + float x0 = verts[i].x *scale_x, y0 = verts[i].y *scale_y; + float bx = x0 - 2*x1 + x2, by = y0 - 2*y1 + y2; + float len2 = bx*bx + by*by; + if (len2 != 0.0f) + precompute[i] = 1.0f / (bx*bx + by*by); + else + precompute[i] = 0.0f; + } else + precompute[i] = 0.0f; + } + + for (y=iy0; y < iy1; ++y) { + for (x=ix0; x < ix1; ++x) { + float val; + float min_dist = 999999.0f; + float sx = (float) x + 0.5f; + float sy = (float) y + 0.5f; + float x_gspace = (sx / scale_x); + float y_gspace = (sy / scale_y); + + int winding = stbtt__compute_crossings_x(x_gspace, y_gspace, num_verts, verts); // @OPTIMIZE: this could just be a rasterization, but needs to be line vs. non-tesselated curves so a new path + + for (i=0; i < num_verts; ++i) { + float x0 = verts[i].x*scale_x, y0 = verts[i].y*scale_y; + + // check against every point here rather than inside line/curve primitives -- @TODO: wrong if multiple 'moves' in a row produce a garbage point, and given culling, probably more efficient to do within line/curve + float dist2 = (x0-sx)*(x0-sx) + (y0-sy)*(y0-sy); + if (dist2 < min_dist*min_dist) + min_dist = (float) STBTT_sqrt(dist2); + + if (verts[i].type == STBTT_vline) { + float x1 = verts[i-1].x*scale_x, y1 = verts[i-1].y*scale_y; + + // coarse culling against bbox + //if (sx > STBTT_min(x0,x1)-min_dist && sx < STBTT_max(x0,x1)+min_dist && + // sy > STBTT_min(y0,y1)-min_dist && sy < STBTT_max(y0,y1)+min_dist) + float dist = (float) STBTT_fabs((x1-x0)*(y0-sy) - (y1-y0)*(x0-sx)) * precompute[i]; + STBTT_assert(i != 0); + if (dist < min_dist) { + // check position along line + // x' = x0 + t*(x1-x0), y' = y0 + t*(y1-y0) + // minimize (x'-sx)*(x'-sx)+(y'-sy)*(y'-sy) + float dx = x1-x0, dy = y1-y0; + float px = x0-sx, py = y0-sy; + // minimize (px+t*dx)^2 + (py+t*dy)^2 = px*px + 2*px*dx*t + t^2*dx*dx + py*py + 2*py*dy*t + t^2*dy*dy + // derivative: 2*px*dx + 2*py*dy + (2*dx*dx+2*dy*dy)*t, set to 0 and solve + float t = -(px*dx + py*dy) / (dx*dx + dy*dy); + if (t >= 0.0f && t <= 1.0f) + min_dist = dist; + } + } else if (verts[i].type == STBTT_vcurve) { + float x2 = verts[i-1].x *scale_x, y2 = verts[i-1].y *scale_y; + float x1 = verts[i ].cx*scale_x, y1 = verts[i ].cy*scale_y; + float box_x0 = STBTT_min(STBTT_min(x0,x1),x2); + float box_y0 = STBTT_min(STBTT_min(y0,y1),y2); + float box_x1 = STBTT_max(STBTT_max(x0,x1),x2); + float box_y1 = STBTT_max(STBTT_max(y0,y1),y2); + // coarse culling against bbox to avoid computing cubic unnecessarily + if (sx > box_x0-min_dist && sx < box_x1+min_dist && sy > box_y0-min_dist && sy < box_y1+min_dist) { + int num=0; + float ax = x1-x0, ay = y1-y0; + float bx = x0 - 2*x1 + x2, by = y0 - 2*y1 + y2; + float mx = x0 - sx, my = y0 - sy; + float res[3],px,py,t,it; + float a_inv = precompute[i]; + if (a_inv == 0.0) { // if a_inv is 0, it's 2nd degree so use quadratic formula + float a = 3*(ax*bx + ay*by); + float b = 2*(ax*ax + ay*ay) + (mx*bx+my*by); + float c = mx*ax+my*ay; + if (a == 0.0) { // if a is 0, it's linear + if (b != 0.0) { + res[num++] = -c/b; + } + } else { + float discriminant = b*b - 4*a*c; + if (discriminant < 0) + num = 0; + else { + float root = (float) STBTT_sqrt(discriminant); + res[0] = (-b - root)/(2*a); + res[1] = (-b + root)/(2*a); + num = 2; // don't bother distinguishing 1-solution case, as code below will still work + } + } + } else { + float b = 3*(ax*bx + ay*by) * a_inv; // could precompute this as it doesn't depend on sample point + float c = (2*(ax*ax + ay*ay) + (mx*bx+my*by)) * a_inv; + float d = (mx*ax+my*ay) * a_inv; + num = stbtt__solve_cubic(b, c, d, res); + } + if (num >= 1 && res[0] >= 0.0f && res[0] <= 1.0f) { + t = res[0], it = 1.0f - t; + px = it*it*x0 + 2*t*it*x1 + t*t*x2; + py = it*it*y0 + 2*t*it*y1 + t*t*y2; + dist2 = (px-sx)*(px-sx) + (py-sy)*(py-sy); + if (dist2 < min_dist * min_dist) + min_dist = (float) STBTT_sqrt(dist2); + } + if (num >= 2 && res[1] >= 0.0f && res[1] <= 1.0f) { + t = res[1], it = 1.0f - t; + px = it*it*x0 + 2*t*it*x1 + t*t*x2; + py = it*it*y0 + 2*t*it*y1 + t*t*y2; + dist2 = (px-sx)*(px-sx) + (py-sy)*(py-sy); + if (dist2 < min_dist * min_dist) + min_dist = (float) STBTT_sqrt(dist2); + } + if (num >= 3 && res[2] >= 0.0f && res[2] <= 1.0f) { + t = res[2], it = 1.0f - t; + px = it*it*x0 + 2*t*it*x1 + t*t*x2; + py = it*it*y0 + 2*t*it*y1 + t*t*y2; + dist2 = (px-sx)*(px-sx) + (py-sy)*(py-sy); + if (dist2 < min_dist * min_dist) + min_dist = (float) STBTT_sqrt(dist2); + } + } + } + } + if (winding == 0) + min_dist = -min_dist; // if outside the shape, value is negative + val = onedge_value + pixel_dist_scale * min_dist; + if (val < 0) + val = 0; + else if (val > 255) + val = 255; + data[(y-iy0)*w+(x-ix0)] = (unsigned char) val; + } + } + STBTT_free(precompute, info->userdata); + STBTT_free(verts, info->userdata); + } + return data; +} + +STBTT_DEF unsigned char * stbtt_GetCodepointSDF(const stbtt_fontinfo *info, float scale, int codepoint, int padding, unsigned char onedge_value, float pixel_dist_scale, int *width, int *height, int *xoff, int *yoff) +{ + return stbtt_GetGlyphSDF(info, scale, stbtt_FindGlyphIndex(info, codepoint), padding, onedge_value, pixel_dist_scale, width, height, xoff, yoff); +} + +STBTT_DEF void stbtt_FreeSDF(unsigned char *bitmap, void *userdata) +{ + STBTT_free(bitmap, userdata); +} + +////////////////////////////////////////////////////////////////////////////// +// +// font name matching -- recommended not to use this +// + +// check if a utf8 string contains a prefix which is the utf16 string; if so return length of matching utf8 string +static stbtt_int32 stbtt__CompareUTF8toUTF16_bigendian_prefix(stbtt_uint8 *s1, stbtt_int32 len1, stbtt_uint8 *s2, stbtt_int32 len2) +{ + stbtt_int32 i=0; + + // convert utf16 to utf8 and compare the results while converting + while (len2) { + stbtt_uint16 ch = s2[0]*256 + s2[1]; + if (ch < 0x80) { + if (i >= len1) return -1; + if (s1[i++] != ch) return -1; + } else if (ch < 0x800) { + if (i+1 >= len1) return -1; + if (s1[i++] != 0xc0 + (ch >> 6)) return -1; + if (s1[i++] != 0x80 + (ch & 0x3f)) return -1; + } else if (ch >= 0xd800 && ch < 0xdc00) { + stbtt_uint32 c; + stbtt_uint16 ch2 = s2[2]*256 + s2[3]; + if (i+3 >= len1) return -1; + c = ((ch - 0xd800) << 10) + (ch2 - 0xdc00) + 0x10000; + if (s1[i++] != 0xf0 + (c >> 18)) return -1; + if (s1[i++] != 0x80 + ((c >> 12) & 0x3f)) return -1; + if (s1[i++] != 0x80 + ((c >> 6) & 0x3f)) return -1; + if (s1[i++] != 0x80 + ((c ) & 0x3f)) return -1; + s2 += 2; // plus another 2 below + len2 -= 2; + } else if (ch >= 0xdc00 && ch < 0xe000) { + return -1; + } else { + if (i+2 >= len1) return -1; + if (s1[i++] != 0xe0 + (ch >> 12)) return -1; + if (s1[i++] != 0x80 + ((ch >> 6) & 0x3f)) return -1; + if (s1[i++] != 0x80 + ((ch ) & 0x3f)) return -1; + } + s2 += 2; + len2 -= 2; + } + return i; +} + +static int stbtt_CompareUTF8toUTF16_bigendian_internal(char *s1, int len1, char *s2, int len2) +{ + return len1 == stbtt__CompareUTF8toUTF16_bigendian_prefix((stbtt_uint8*) s1, len1, (stbtt_uint8*) s2, len2); +} + +// returns results in whatever encoding you request... but note that 2-byte encodings +// will be BIG-ENDIAN... use stbtt_CompareUTF8toUTF16_bigendian() to compare +STBTT_DEF const char *stbtt_GetFontNameString(const stbtt_fontinfo *font, int *length, int platformID, int encodingID, int languageID, int nameID) +{ + stbtt_int32 i,count,stringOffset; + stbtt_uint8 *fc = font->data; + stbtt_uint32 offset = font->fontstart; + stbtt_uint32 nm = stbtt__find_table(fc, offset, "name"); + if (!nm) return NULL; + + count = ttUSHORT(fc+nm+2); + stringOffset = nm + ttUSHORT(fc+nm+4); + for (i=0; i < count; ++i) { + stbtt_uint32 loc = nm + 6 + 12 * i; + if (platformID == ttUSHORT(fc+loc+0) && encodingID == ttUSHORT(fc+loc+2) + && languageID == ttUSHORT(fc+loc+4) && nameID == ttUSHORT(fc+loc+6)) { + *length = ttUSHORT(fc+loc+8); + return (const char *) (fc+stringOffset+ttUSHORT(fc+loc+10)); + } + } + return NULL; +} + +static int stbtt__matchpair(stbtt_uint8 *fc, stbtt_uint32 nm, stbtt_uint8 *name, stbtt_int32 nlen, stbtt_int32 target_id, stbtt_int32 next_id) +{ + stbtt_int32 i; + stbtt_int32 count = ttUSHORT(fc+nm+2); + stbtt_int32 stringOffset = nm + ttUSHORT(fc+nm+4); + + for (i=0; i < count; ++i) { + stbtt_uint32 loc = nm + 6 + 12 * i; + stbtt_int32 id = ttUSHORT(fc+loc+6); + if (id == target_id) { + // find the encoding + stbtt_int32 platform = ttUSHORT(fc+loc+0), encoding = ttUSHORT(fc+loc+2), language = ttUSHORT(fc+loc+4); + + // is this a Unicode encoding? + if (platform == 0 || (platform == 3 && encoding == 1) || (platform == 3 && encoding == 10)) { + stbtt_int32 slen = ttUSHORT(fc+loc+8); + stbtt_int32 off = ttUSHORT(fc+loc+10); + + // check if there's a prefix match + stbtt_int32 matchlen = stbtt__CompareUTF8toUTF16_bigendian_prefix(name, nlen, fc+stringOffset+off,slen); + if (matchlen >= 0) { + // check for target_id+1 immediately following, with same encoding & language + if (i+1 < count && ttUSHORT(fc+loc+12+6) == next_id && ttUSHORT(fc+loc+12) == platform && ttUSHORT(fc+loc+12+2) == encoding && ttUSHORT(fc+loc+12+4) == language) { + slen = ttUSHORT(fc+loc+12+8); + off = ttUSHORT(fc+loc+12+10); + if (slen == 0) { + if (matchlen == nlen) + return 1; + } else if (matchlen < nlen && name[matchlen] == ' ') { + ++matchlen; + if (stbtt_CompareUTF8toUTF16_bigendian_internal((char*) (name+matchlen), nlen-matchlen, (char*)(fc+stringOffset+off),slen)) + return 1; + } + } else { + // if nothing immediately following + if (matchlen == nlen) + return 1; + } + } + } + + // @TODO handle other encodings + } + } + return 0; +} + +static int stbtt__matches(stbtt_uint8 *fc, stbtt_uint32 offset, stbtt_uint8 *name, stbtt_int32 flags) +{ + stbtt_int32 nlen = (stbtt_int32) STBTT_strlen((char *) name); + stbtt_uint32 nm,hd; + if (!stbtt__isfont(fc+offset)) return 0; + + // check italics/bold/underline flags in macStyle... + if (flags) { + hd = stbtt__find_table(fc, offset, "head"); + if ((ttUSHORT(fc+hd+44) & 7) != (flags & 7)) return 0; + } + + nm = stbtt__find_table(fc, offset, "name"); + if (!nm) return 0; + + if (flags) { + // if we checked the macStyle flags, then just check the family and ignore the subfamily + if (stbtt__matchpair(fc, nm, name, nlen, 16, -1)) return 1; + if (stbtt__matchpair(fc, nm, name, nlen, 1, -1)) return 1; + if (stbtt__matchpair(fc, nm, name, nlen, 3, -1)) return 1; + } else { + if (stbtt__matchpair(fc, nm, name, nlen, 16, 17)) return 1; + if (stbtt__matchpair(fc, nm, name, nlen, 1, 2)) return 1; + if (stbtt__matchpair(fc, nm, name, nlen, 3, -1)) return 1; + } + + return 0; +} + +static int stbtt_FindMatchingFont_internal(unsigned char *font_collection, char *name_utf8, stbtt_int32 flags) +{ + stbtt_int32 i; + for (i=0;;++i) { + stbtt_int32 off = stbtt_GetFontOffsetForIndex(font_collection, i); + if (off < 0) return off; + if (stbtt__matches((stbtt_uint8 *) font_collection, off, (stbtt_uint8*) name_utf8, flags)) + return off; + } +} + +#if defined(__GNUC__) || defined(__clang__) +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wcast-qual" +#endif + +STBTT_DEF int stbtt_BakeFontBitmap(const unsigned char *data, int offset, + float pixel_height, unsigned char *pixels, int pw, int ph, + int first_char, int num_chars, stbtt_bakedchar *chardata) +{ + return stbtt_BakeFontBitmap_internal((unsigned char *) data, offset, pixel_height, pixels, pw, ph, first_char, num_chars, chardata); +} + +STBTT_DEF int stbtt_GetFontOffsetForIndex(const unsigned char *data, int index) +{ + return stbtt_GetFontOffsetForIndex_internal((unsigned char *) data, index); +} + +STBTT_DEF int stbtt_GetNumberOfFonts(const unsigned char *data) +{ + return stbtt_GetNumberOfFonts_internal((unsigned char *) data); +} + +STBTT_DEF int stbtt_InitFont(stbtt_fontinfo *info, const unsigned char *data, int offset) +{ + return stbtt_InitFont_internal(info, (unsigned char *) data, offset); +} + +STBTT_DEF int stbtt_FindMatchingFont(const unsigned char *fontdata, const char *name, int flags) +{ + return stbtt_FindMatchingFont_internal((unsigned char *) fontdata, (char *) name, flags); +} + +STBTT_DEF int stbtt_CompareUTF8toUTF16_bigendian(const char *s1, int len1, const char *s2, int len2) +{ + return stbtt_CompareUTF8toUTF16_bigendian_internal((char *) s1, len1, (char *) s2, len2); +} + +#if defined(__GNUC__) || defined(__clang__) +#pragma GCC diagnostic pop +#endif + +#endif // STB_TRUETYPE_IMPLEMENTATION + + +// FULL VERSION HISTORY +// +// 1.19 (2018-02-11) OpenType GPOS kerning (horizontal only), STBTT_fmod +// 1.18 (2018-01-29) add missing function +// 1.17 (2017-07-23) make more arguments const; doc fix +// 1.16 (2017-07-12) SDF support +// 1.15 (2017-03-03) make more arguments const +// 1.14 (2017-01-16) num-fonts-in-TTC function +// 1.13 (2017-01-02) support OpenType fonts, certain Apple fonts +// 1.12 (2016-10-25) suppress warnings about casting away const with -Wcast-qual +// 1.11 (2016-04-02) fix unused-variable warning +// 1.10 (2016-04-02) allow user-defined fabs() replacement +// fix memory leak if fontsize=0.0 +// fix warning from duplicate typedef +// 1.09 (2016-01-16) warning fix; avoid crash on outofmem; use alloc userdata for PackFontRanges +// 1.08 (2015-09-13) document stbtt_Rasterize(); fixes for vertical & horizontal edges +// 1.07 (2015-08-01) allow PackFontRanges to accept arrays of sparse codepoints; +// allow PackFontRanges to pack and render in separate phases; +// fix stbtt_GetFontOFfsetForIndex (never worked for non-0 input?); +// fixed an assert() bug in the new rasterizer +// replace assert() with STBTT_assert() in new rasterizer +// 1.06 (2015-07-14) performance improvements (~35% faster on x86 and x64 on test machine) +// also more precise AA rasterizer, except if shapes overlap +// remove need for STBTT_sort +// 1.05 (2015-04-15) fix misplaced definitions for STBTT_STATIC +// 1.04 (2015-04-15) typo in example +// 1.03 (2015-04-12) STBTT_STATIC, fix memory leak in new packing, various fixes +// 1.02 (2014-12-10) fix various warnings & compile issues w/ stb_rect_pack, C++ +// 1.01 (2014-12-08) fix subpixel position when oversampling to exactly match +// non-oversampled; STBTT_POINT_SIZE for packed case only +// 1.00 (2014-12-06) add new PackBegin etc. API, w/ support for oversampling +// 0.99 (2014-09-18) fix multiple bugs with subpixel rendering (ryg) +// 0.9 (2014-08-07) support certain mac/iOS fonts without an MS platformID +// 0.8b (2014-07-07) fix a warning +// 0.8 (2014-05-25) fix a few more warnings +// 0.7 (2013-09-25) bugfix: subpixel glyph bug fixed in 0.5 had come back +// 0.6c (2012-07-24) improve documentation +// 0.6b (2012-07-20) fix a few more warnings +// 0.6 (2012-07-17) fix warnings; added stbtt_ScaleForMappingEmToPixels, +// stbtt_GetFontBoundingBox, stbtt_IsGlyphEmpty +// 0.5 (2011-12-09) bugfixes: +// subpixel glyph renderer computed wrong bounding box +// first vertex of shape can be off-curve (FreeSans) +// 0.4b (2011-12-03) fixed an error in the font baking example +// 0.4 (2011-12-01) kerning, subpixel rendering (tor) +// bugfixes for: +// codepoint-to-glyph conversion using table fmt=12 +// codepoint-to-glyph conversion using table fmt=4 +// stbtt_GetBakedQuad with non-square texture (Zer) +// updated Hello World! sample to use kerning and subpixel +// fixed some warnings +// 0.3 (2009-06-24) cmap fmt=12, compound shapes (MM) +// userdata, malloc-from-userdata, non-zero fill (stb) +// 0.2 (2009-03-11) Fix unsigned/signed char warnings +// 0.1 (2009-03-09) First public release +// + +/* +------------------------------------------------------------------------------ +This software is available under 2 licenses -- choose whichever you prefer. +------------------------------------------------------------------------------ +ALTERNATIVE A - MIT License +Copyright (c) 2017 Sean Barrett +Permission is hereby granted, free of charge, to any person obtaining a copy of +this software and associated documentation files (the "Software"), to deal in +the Software without restriction, including without limitation the rights to +use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies +of the Software, and to permit persons to whom the Software is furnished to do +so, subject to the following conditions: +The above copyright notice and this permission notice shall be included in all +copies or substantial portions of the Software. +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +SOFTWARE. +------------------------------------------------------------------------------ +ALTERNATIVE B - Public Domain (www.unlicense.org) +This is free and unencumbered software released into the public domain. +Anyone is free to copy, modify, publish, use, compile, sell, or distribute this +software, either in source code form or as a compiled binary, for any purpose, +commercial or non-commercial, and by any means. +In jurisdictions that recognize copyright laws, the author or authors of this +software dedicate any and all copyright interest in the software to the public +domain. We make this dedication for the benefit of the public at large and to +the detriment of our heirs and successors. We intend this dedication to be an +overt act of relinquishment in perpetuity of all present and future rights to +this software under copyright law. +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN +ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION +WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +------------------------------------------------------------------------------ +*/ diff --git a/src/main.c b/src/main.c new file mode 100644 index 0000000..c5291e8 --- /dev/null +++ b/src/main.c @@ -0,0 +1,123 @@ +#include +#include +#include + +#include "api/api.h" +#include "renderer.h" + + +SDL_Window *window; + + +static double get_scale(void) +{ + float dpi; + SDL_GetDisplayDPI(0, NULL, &dpi, NULL); + return 1.0; +} + + +static void get_exe_filename(char *buf, int sz) +{ + char path[512]; + sprintf(path, "/proc/%d/exe", getpid()); + int len = readlink(path, buf, sz - 1); + buf[len] = '\0'; +} + + +static void init_window_icon(void) +{ + // FIXME: include inside function!? + #include "../icon.inl" + (void) icon_rgba_len; /* unused */ + SDL_Surface *surf = SDL_CreateRGBSurfaceFrom( + icon_rgba, 64, 64, + 32, 64 * 4, + 0x000000ff, + 0x0000ff00, + 0x00ff0000, + 0xff000000); + SDL_SetWindowIcon(window, surf); + SDL_FreeSurface(surf); +} + + +int main(int argc, char **argv) +{ + SDL_Init(SDL_INIT_VIDEO | SDL_INIT_EVENTS); + SDL_EnableScreenSaver(); + SDL_EventState(SDL_DROPFILE, SDL_ENABLE); + atexit(SDL_Quit); + +#ifdef SDL_HINT_VIDEO_X11_NET_WM_BYPASS_COMPOSITOR /* Available since 2.0.8 */ + SDL_SetHint(SDL_HINT_VIDEO_X11_NET_WM_BYPASS_COMPOSITOR, "0"); +#endif +#if SDL_VERSION_ATLEAST(2, 0, 5) + SDL_SetHint(SDL_HINT_MOUSE_FOCUS_CLICKTHROUGH, "1"); +#endif + + SDL_DisplayMode dm; + SDL_GetCurrentDisplayMode(0, &dm); + + window = SDL_CreateWindow( + "", SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, + dm.w * 0.8, dm.h * 0.8, + SDL_WINDOW_RESIZABLE | SDL_WINDOW_ALLOW_HIGHDPI | SDL_WINDOW_HIDDEN); + init_window_icon(); + ren_init(window); + + + lua_State *L = luaL_newstate(); + luaL_openlibs(L); + api_load_libs(L); + + + lua_newtable(L); + for (int i = 0; i < argc; i++) { + lua_pushstring(L, argv[i]); + lua_rawseti(L, -2, i + 1); + } + lua_setglobal(L, "ARGS"); + + lua_pushstring(L, "1.11"); + lua_setglobal(L, "VERSION"); + + lua_pushstring(L, SDL_GetPlatform()); + lua_setglobal(L, "PLATFORM"); + + lua_pushnumber(L, get_scale()); + lua_setglobal(L, "SCALE"); + + char exename[2048]; + get_exe_filename(exename, sizeof(exename)); + lua_pushstring(L, exename); + lua_setglobal(L, "EXEFILE"); + + + (void) luaL_dostring(L, + "local core\n" + "xpcall(function()\n" + " SCALE = tonumber(os.getenv(\"LITE_SCALE\")) or SCALE\n" + " PATHSEP = package.config:sub(1, 1)\n" + " EXEDIR = EXEFILE:match(\"^(.+)[/\\\\].*$\")\n" + " package.path = EXEDIR .. '/data/?.lua;' .. package.path\n" + " package.path = EXEDIR .. '/data/?/init.lua;' .. package.path\n" + " core = require('core')\n" + " core.init()\n" + " core.run()\n" + "end, function(err)\n" + " print('Error: ' .. tostring(err))\n" + " print(debug.traceback(nil, 2))\n" + " if core and core.on_error then\n" + " pcall(core.on_error, err)\n" + " end\n" + " os.exit(1)\n" + "end)"); + + + lua_close(L); + SDL_DestroyWindow(window); + + return EXIT_SUCCESS; +} diff --git a/src/rencache.c b/src/rencache.c new file mode 100644 index 0000000..a7bbffe --- /dev/null +++ b/src/rencache.c @@ -0,0 +1,303 @@ +#include +#include "rencache.h" + +/* a cache over the software renderer -- all drawing operations are stored as +** commands when issued. At the end of the frame we write the commands to a grid +** of hash values, take the cells that have changed since the previous frame, +** merge them into dirty rectangles and redraw only those regions */ + +#define CELLS_X 80 +#define CELLS_Y 50 +#define CELL_SIZE 96 +#define COMMAND_BUF_SIZE (1024 * 512) + +enum { FREE_FONT, SET_CLIP, DRAW_TEXT, DRAW_RECT }; + +typedef struct { + int type, size; + RenRect rect; + RenColor color; + RenFont *font; + int tab_width; + // this was of size 0 + char text[1]; +} Command; + + +static unsigned cells_buf1[CELLS_X * CELLS_Y]; +static unsigned cells_buf2[CELLS_X * CELLS_Y]; +static unsigned *cells_prev = cells_buf1; +static unsigned *cells = cells_buf2; +static RenRect rect_buf[CELLS_X * CELLS_Y / 2]; +static char command_buf[COMMAND_BUF_SIZE]; +static int command_buf_idx; +static RenRect screen_rect; +static bool show_debug; + + +static inline int min(int a, int b) { return a < b ? a : b; } +static inline int max(int a, int b) { return a > b ? a : b; } +static inline int cell_idx(int x, int y) { return x + y * CELLS_X; } + +/* 32bit fnv-1a hash */ +#define HASH_INITIAL 2166136261 + +static void hash(unsigned *h, const void *data, int size) +{ + const unsigned char *p = data; + while (size--) + *h = (*h ^ *p++) * 16777619; +} + +static inline bool rects_overlap(RenRect a, RenRect b) +{ + return b.x + b.width >= a.x && b.x <= a.x + a.width + && b.y + b.height >= a.y && b.y <= a.y + a.height; +} + + +static RenRect intersect_rects(RenRect a, RenRect b) +{ + int x1 = max(a.x, b.x); + int y1 = max(a.y, b.y); + int x2 = min(a.x + a.width, b.x + b.width); + int y2 = min(a.y + a.height, b.y + b.height); + return (RenRect) { x1, y1, max(0, x2 - x1), max(0, y2 - y1) }; +} + + +static RenRect merge_rects(RenRect a, RenRect b) +{ + int x1 = min(a.x, b.x); + int y1 = min(a.y, b.y); + int x2 = max(a.x + a.width, b.x + b.width); + int y2 = max(a.y + a.height, b.y + b.height); + return (RenRect) { x1, y1, x2 - x1, y2 - y1 }; +} + + +static Command* push_command(int type, int size) +{ + Command *cmd = (Command*) (command_buf + command_buf_idx); + int n = command_buf_idx + size; + if (n > COMMAND_BUF_SIZE) { + fprintf(stderr, "Warning: (" __FILE__ "): exhausted command buffer\n"); + return NULL; + } + command_buf_idx = n; + memset(cmd, 0, sizeof(Command)); + cmd->type = type; + cmd->size = size; + return cmd; +} + + +static bool next_command(Command **prev) +{ + if (*prev == NULL) + *prev = (Command*) command_buf; + else + *prev = (Command*) (((char*) *prev) + (*prev)->size); + return *prev != ((Command*) (command_buf + command_buf_idx)); +} + + +void rencache_show_debug(bool enable) +{ + show_debug = enable; +} + + +void rencache_free_font(RenFont *font) +{ + Command *cmd = push_command(FREE_FONT, sizeof(Command)); + if (cmd) + cmd->font = font; +} + + +void rencache_set_clip_rect(RenRect rect) +{ + Command *cmd = push_command(SET_CLIP, sizeof(Command)); + if (cmd) + cmd->rect = intersect_rects(rect, screen_rect); +} + + +void rencache_draw_rect(RenRect rect, RenColor color) +{ + if (!rects_overlap(screen_rect, rect)) + return; + Command *cmd = push_command(DRAW_RECT, sizeof(Command)); + if (cmd) { + cmd->rect = rect; + cmd->color = color; + } +} + + +int rencache_draw_text(RenFont *font, const char *text, int x, int y, RenColor color) +{ + RenRect rect; + rect.x = x; + rect.y = y; + rect.width = ren_get_font_width(font, text); + rect.height = ren_get_font_height(font); + + if (rects_overlap(screen_rect, rect)) { + int sz = strlen(text) + 1; + Command *cmd = push_command(DRAW_TEXT, sizeof(Command) + sz); + if (cmd) { + memcpy(cmd->text, text, sz); + cmd->color = color; + cmd->font = font; + cmd->rect = rect; + cmd->tab_width = ren_get_font_tab_width(font); + } + } + + return x + rect.width; +} + +void rencache_invalidate(void) +{ + memset(cells_prev, 0xff, sizeof(cells_buf1)); +} + + +void rencache_begin_frame(void) +{ + /* reset all cells if the screen width/height has changed */ + int w, h; + ren_get_size(&w, &h); + if (screen_rect.width != w || h != screen_rect.height) { + screen_rect.width = w; + screen_rect.height = h; + rencache_invalidate(); + } +} + + +static void update_overlapping_cells(RenRect r, unsigned h) +{ + int x1 = r.x / CELL_SIZE; + int y1 = r.y / CELL_SIZE; + int x2 = (r.x + r.width) / CELL_SIZE; + int y2 = (r.y + r.height) / CELL_SIZE; + + for (int y = y1; y <= y2; y++) { + for (int x = x1; x <= x2; x++) { + int idx = cell_idx(x, y); + hash(&cells[idx], &h, sizeof(h)); + } + } +} + + +static void push_rect(RenRect r, int *count) +{ + /* try to merge with existing rectangle */ + for (int i = *count - 1; i >= 0; i--) { + RenRect *rp = &rect_buf[i]; + if (rects_overlap(*rp, r)) { + *rp = merge_rects(*rp, r); + return; + } + } + /* couldn't merge with previous rectangle: push */ + rect_buf[(*count)++] = r; +} + + +void rencache_end_frame(void) +{ + /* update cells from commands */ + Command *cmd = NULL; + RenRect cr = screen_rect; + while (next_command(&cmd)) { + if (cmd->type == SET_CLIP) + cr = cmd->rect; + RenRect r = intersect_rects(cmd->rect, cr); + if (r.width == 0 || r.height == 0) + continue; + unsigned h = HASH_INITIAL; + hash(&h, cmd, cmd->size); + update_overlapping_cells(r, h); + } + + /* push rects for all cells changed from last frame, reset cells */ + int rect_count = 0; + int max_x = screen_rect.width / CELL_SIZE + 1; + int max_y = screen_rect.height / CELL_SIZE + 1; + for (int y = 0; y < max_y; y++) { + for (int x = 0; x < max_x; x++) { + /* compare previous and current cell for change */ + int idx = cell_idx(x, y); + if (cells[idx] != cells_prev[idx]) + push_rect((RenRect) { x, y, 1, 1 }, &rect_count); + cells_prev[idx] = HASH_INITIAL; + } + } + + /* expand rects from cells to pixels */ + for (int i = 0; i < rect_count; i++) { + RenRect *r = &rect_buf[i]; + r->x *= CELL_SIZE; + r->y *= CELL_SIZE; + r->width *= CELL_SIZE; + r->height *= CELL_SIZE; + *r = intersect_rects(*r, screen_rect); + } + + /* redraw updated regions */ + bool has_free_commands = false; + for (int i = 0; i < rect_count; i++) { + /* draw */ + RenRect r = rect_buf[i]; + ren_set_clip_rect(r); + + cmd = NULL; + while (next_command(&cmd)) { + switch (cmd->type) { + case FREE_FONT: + has_free_commands = true; + break; + case SET_CLIP: + ren_set_clip_rect(intersect_rects(cmd->rect, r)); + break; + case DRAW_RECT: + ren_draw_rect(cmd->rect, cmd->color); + break; + case DRAW_TEXT: + ren_set_font_tab_width(cmd->font, cmd->tab_width); + ren_draw_text(cmd->font, cmd->text, cmd->rect.x, + cmd->rect.y, cmd->color); + break; + } + } + + if (show_debug) { + RenColor color = { rand(), rand(), rand(), 50 }; + ren_draw_rect(r, color); + } + } + + /* update dirty rects */ + if (rect_count > 0) + ren_update_rects(rect_buf, rect_count); + + /* free fonts */ + if (has_free_commands) { + cmd = NULL; + while (next_command(&cmd)) { + if (cmd->type == FREE_FONT) + ren_free_font(cmd->font); + } + } + + /* swap cell buffer and reset */ + unsigned *tmp = cells; + cells = cells_prev; + cells_prev = tmp; + command_buf_idx = 0; +} diff --git a/src/rencache.h b/src/rencache.h new file mode 100644 index 0000000..c5fa80f --- /dev/null +++ b/src/rencache.h @@ -0,0 +1,16 @@ +#ifndef RENCACHE_H +#define RENCACHE_H + +#include +#include "renderer.h" + +void rencache_show_debug(bool enable); +void rencache_free_font(RenFont *font); +void rencache_set_clip_rect(RenRect rect); +void rencache_draw_rect(RenRect rect, RenColor color); +int rencache_draw_text(RenFont *font, const char *text, int x, int y, RenColor color); +void rencache_invalidate(void); +void rencache_begin_frame(void); +void rencache_end_frame(void); + +#endif diff --git a/src/renderer.c b/src/renderer.c new file mode 100644 index 0000000..da07d52 --- /dev/null +++ b/src/renderer.c @@ -0,0 +1,378 @@ +#include +#include +#include +#include +#include "lib/stb/stb_truetype.h" +#include "renderer.h" + +#define MAX_GLYPHSET 256 + +struct RenImage { + RenColor *pixels; + int width, height; +}; + +typedef struct { + RenImage *image; + stbtt_bakedchar glyphs[256]; +} GlyphSet; + +struct RenFont { + void *data; + stbtt_fontinfo stbfont; + GlyphSet *sets[MAX_GLYPHSET]; + float size; + int height; +}; + +static SDL_Window *window; +static struct { int left, top, right, bottom; } clip; + +static void* check_alloc(void *ptr) +{ + if (!ptr) { + fprintf(stderr, "Fatal error: memory allocation failed\n"); + exit(EXIT_FAILURE); + } + return ptr; +} + + +static const char* utf8_to_codepoint(const char *p, unsigned *dst) +{ + unsigned res, n; + switch (*p & 0xf0) { + case 0xf0 : res = *p & 0x07; n = 3; break; + case 0xe0 : res = *p & 0x0f; n = 2; break; + case 0xd0 : + case 0xc0 : res = *p & 0x1f; n = 1; break; + default : res = *p; n = 0; break; + } + while (n--) + res = (res << 6) | (*(++p) & 0x3f); + *dst = res; + return p + 1; +} + + +void ren_init(SDL_Window *win) +{ + assert(win); + window = win; + SDL_Surface *surf = SDL_GetWindowSurface(window); + ren_set_clip_rect( (RenRect) { 0, 0, surf->w, surf->h } ); +} + + +void ren_update_rects(RenRect *rects, int count) +{ + SDL_UpdateWindowSurfaceRects(window, (SDL_Rect*) rects, count); + static bool initial_frame = true; + if (initial_frame) { + SDL_ShowWindow(window); + initial_frame = false; + } +} + + +void ren_set_clip_rect(RenRect rect) +{ + clip.left = rect.x; + clip.top = rect.y; + clip.right = rect.x + rect.width; + clip.bottom = rect.y + rect.height; +} + + +void ren_get_size(int *x, int *y) +{ + SDL_Surface *surf = SDL_GetWindowSurface(window); + *x = surf->w; + *y = surf->h; +} + + +RenImage* ren_new_image(int width, int height) +{ + assert(width > 0 && height > 0); + RenImage *image = malloc(sizeof(RenImage) + width * height * sizeof(RenColor)); + check_alloc(image); + image->pixels = (void*) (image + 1); + image->width = width; + image->height = height; + return image; +} + + +inline void ren_free_image(RenImage *image) +{ + free(image); +} + + +static GlyphSet* load_glyphset(RenFont *font, int idx) +{ + GlyphSet *set = check_alloc(calloc(1, sizeof(GlyphSet))); + + /* init image */ + int width = 128; + int height = 128; + retry: + set->image = ren_new_image(width, height); + + /* load glyphs */ + float s = + stbtt_ScaleForMappingEmToPixels(&font->stbfont, 1) / + stbtt_ScaleForPixelHeight(&font->stbfont, 1); + int res = stbtt_BakeFontBitmap( + font->data, 0, font->size * s, (void*) set->image->pixels, + width, height, idx * 256, 256, set->glyphs); + + /* retry with a larger image buffer if the buffer wasn't large enough */ + if (res < 0) { + width *= 2; + height *= 2; + ren_free_image(set->image); + goto retry; + } + + /* adjust glyph yoffsets and xadvance */ + int ascent, descent, linegap; + stbtt_GetFontVMetrics(&font->stbfont, &ascent, &descent, &linegap); + float scale = stbtt_ScaleForMappingEmToPixels(&font->stbfont, font->size); + int scaled_ascent = ascent * scale + 0.5; + for (int i = 0; i < 256; i++) { + set->glyphs[i].yoff += scaled_ascent; + set->glyphs[i].xadvance = floor(set->glyphs[i].xadvance); + } + + /* convert 8bit data to 32bit */ + for (int i = width * height - 1; i >= 0; i--) { + uint8_t n = *((uint8_t*) set->image->pixels + i); + set->image->pixels[i] = (RenColor) { .r = 255, .g = 255, + .b = 255, .a = n }; + } + + return set; +} + + +static GlyphSet* get_glyphset(RenFont *font, int codepoint) +{ + int idx = (codepoint >> 8) % MAX_GLYPHSET; + if (!font->sets[idx]) + font->sets[idx] = load_glyphset(font, idx); + return font->sets[idx]; +} + + +RenFont* ren_load_font(const char *filename, float size) +{ + RenFont *font = NULL; + FILE *fp = NULL; + + /* init font */ + font = check_alloc(calloc(1, sizeof(RenFont))); + font->size = size; + + /* load font into buffer */ + fp = fopen(filename, "rb"); + if (!fp) + return NULL; + /* get size */ + fseek(fp, 0, SEEK_END); + int buf_size = ftell(fp); + fseek(fp, 0, SEEK_SET); + /* load */ + font->data = check_alloc(malloc(buf_size)); + int _ = fread(font->data, 1, buf_size, fp); (void) _; + fclose(fp); + fp = NULL; + + /* init stbfont */ + int ok = stbtt_InitFont(&font->stbfont, font->data, 0); + if (!ok) + goto fail; + + /* get height and scale */ + int ascent, descent, linegap; + stbtt_GetFontVMetrics(&font->stbfont, &ascent, &descent, &linegap); + float scale = stbtt_ScaleForMappingEmToPixels(&font->stbfont, size); + font->height = (ascent - descent + linegap) * scale + 0.5; + + /* make tab and newline glyphs invisible */ + stbtt_bakedchar *g = get_glyphset(font, '\n')->glyphs; + g['\t'].x1 = g['\t'].x0; + g['\n'].x1 = g['\n'].x0; + + return font; + + fail: + if (fp) + fclose(fp); + if (font) + free(font->data); + free(font); + return NULL; +} + + +void ren_free_font(RenFont *font) +{ + for (int i = 0; i < MAX_GLYPHSET; i++) { + GlyphSet *set = font->sets[i]; + if (set) { + ren_free_image(set->image); + free(set); + } + } + free(font->data); + free(font); +} + + +void ren_set_font_tab_width(RenFont *font, int n) +{ + GlyphSet *set = get_glyphset(font, '\t'); + set->glyphs['\t'].xadvance = n; +} + + +int ren_get_font_tab_width(RenFont *font) +{ + GlyphSet *set = get_glyphset(font, '\t'); + return set->glyphs['\t'].xadvance; +} + + +int ren_get_font_width(RenFont *font, const char *text) +{ + int x = 0; + const char *p = text; + unsigned codepoint; + while (*p) { + p = utf8_to_codepoint(p, &codepoint); + GlyphSet *set = get_glyphset(font, codepoint); + stbtt_bakedchar *g = &set->glyphs[codepoint & 0xff]; + x += g->xadvance; + } + return x; +} + + +inline int ren_get_font_height(RenFont *font) +{ + return font->height; +} + + +static inline RenColor blend_pixel(RenColor dst, RenColor src) +{ + int ia = 0xff - src.a; + dst.r = ((src.r * src.a) + (dst.r * ia)) >> 8; + dst.g = ((src.g * src.a) + (dst.g * ia)) >> 8; + dst.b = ((src.b * src.a) + (dst.b * ia)) >> 8; + return dst; +} + + +static inline RenColor blend_pixel2(RenColor dst, RenColor src, RenColor color) { + src.a = (src.a * color.a) >> 8; + int ia = 0xff - src.a; + dst.r = ((src.r * color.r * src.a) >> 16) + ((dst.r * ia) >> 8); + dst.g = ((src.g * color.g * src.a) >> 16) + ((dst.g * ia) >> 8); + dst.b = ((src.b * color.b * src.a) >> 16) + ((dst.b * ia) >> 8); + return dst; +} + + +#define rect_draw_loop(expr) \ +{ \ + for (int j = y1; j < y2; j++) { \ + for (int i = x1; i < x2; i++) { \ + *d = expr; \ + d++; \ + } \ + d += dr; \ + } \ +} + +void ren_draw_rect(RenRect rect, RenColor color) +{ + if (color.a == 0) + return; + + int x1 = rect.x < clip.left ? clip.left : rect.x; + int y1 = rect.y < clip.top ? clip.top : rect.y; + int x2 = rect.x + rect.width; + int y2 = rect.y + rect.height; + x2 = x2 > clip.right ? clip.right : x2; + y2 = y2 > clip.bottom ? clip.bottom : y2; + + SDL_Surface *surf = SDL_GetWindowSurface(window); + RenColor *d = (RenColor*) surf->pixels; + d += x1 + y1 * surf->w; + int dr = surf->w - (x2 - x1); + + if (color.a == 0xff) { + rect_draw_loop(color); + } else { + rect_draw_loop(blend_pixel(*d, color)); + } +} + + +void ren_draw_image(RenImage *image, RenRect *sub, int x, int y, RenColor color) +{ + if (color.a == 0) + return; + + /* clip */ + int n; + if ((n = clip.left - x) > 0) { sub->width -= n; sub->x += n; x += n; } + if ((n = clip.top - y) > 0) { sub->height -= n; sub->y += n; y += n; } + if ((n = x + sub->width - clip.right ) > 0) { sub->width -= n; } + if ((n = y + sub->height - clip.bottom) > 0) { sub->height -= n; } + + if (sub->width <= 0 || sub->height <= 0) + return; + + /* draw */ + SDL_Surface *surf = SDL_GetWindowSurface(window); + RenColor *s = image->pixels; + RenColor *d = (RenColor*) surf->pixels; + s += sub->x + sub->y * image->width; + d += x + y * surf->w; + int sr = image->width - sub->width; + int dr = surf->w - sub->width; + + for (int j = 0; j < sub->height; j++) { + for (int i = 0; i < sub->width; i++) { + *d = blend_pixel2(*d, *s, color); + d++; + s++; + } + d += dr; + s += sr; + } +} + + +int ren_draw_text(RenFont *font, const char *text, int x, int y, RenColor color) +{ + RenRect rect; + const char *p = text; + unsigned codepoint; + while (*p) { + p = utf8_to_codepoint(p, &codepoint); + GlyphSet *set = get_glyphset(font, codepoint); + stbtt_bakedchar *g = &set->glyphs[codepoint & 0xff]; + rect.x = g->x0; + rect.y = g->y0; + rect.width = g->x1 - g->x0; + rect.height = g->y1 - g->y0; + ren_draw_image(set->image, &rect, x + g->xoff, y + g->yoff, color); + x += g->xadvance; + } + return x; +} diff --git a/src/renderer.h b/src/renderer.h new file mode 100644 index 0000000..69cc1f0 --- /dev/null +++ b/src/renderer.h @@ -0,0 +1,33 @@ +#ifndef RENDERER_H +#define RENDERER_H + +#include +#include + +typedef struct RenImage RenImage; +typedef struct RenFont RenFont; + +typedef struct { uint8_t b, g, r, a; } RenColor; +typedef struct { int x, y, width, height; } RenRect; + + +void ren_init(SDL_Window *win); +void ren_update_rects(RenRect *rects, int count); +void ren_set_clip_rect(RenRect rect); +void ren_get_size(int *x, int *y); + +RenImage* ren_new_image(int width, int height); +void ren_free_image(RenImage *image); + +RenFont* ren_load_font(const char *filename, float size); +void ren_free_font(RenFont *font); +void ren_set_font_tab_width(RenFont *font, int n); +int ren_get_font_tab_width(RenFont *font); +int ren_get_font_width(RenFont *font, const char *text); +int ren_get_font_height(RenFont *font); + +void ren_draw_rect(RenRect rect, RenColor color); +void ren_draw_image(RenImage *image, RenRect *sub, int x, int y, RenColor color); +int ren_draw_text(RenFont *font, const char *text, int x, int y, RenColor color); + +#endif