/*
 * Copyright (c) 2002-2007 Hypertriton, Inc. <http://hypertriton.com/>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
 * USE OF THIS SOFTWARE EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/*
 * Unicode browser tool. Given a user-specified Unicode range, this displays
 * all the characters within that range. Useful for testing fonts.
 */

#include <core/core.h>

#include <gui/window.h>
#include <gui/combo.h>
#include <gui/treetbl.h>

#include "dev.h"

static Uint32 unitext[2] = { '\0', '\0' };
static char utf8text[256] = "";
static char utf8seq[256] = "";

static const struct unicode_range {
	Uint32 start;
	char *name;
} unicodeRanges[] = {
	{ 0x0000, "Basic Latin" },
	{ 0x0080, "C1 Controls and Latin-1 Supplement" },
	{ 0x0100, "Latin Extended-A" },
	{ 0x0180, "Latin Extended-B" },
	{ 0x0250, "IPA Extensions" },
	{ 0x02B0, "Spacing Modifier Letters" },
	{ 0x0300, "Combining Diacritical Marks" },
	{ 0x0370, "Greek and Coptic" },
	{ 0x0400, "Cyrillic" },
	{ 0x0500, "Cyrillic Supplement" },
	{ 0x0530, "Armenian" },
	{ 0x0590, "Hebrew" },
	{ 0x0600, "Arabic" },
	{ 0x0700, "Syriac" },
	{ 0x0750, "" },
	{ 0x0780, "Thaana" },
	{ 0x07c0, "" },
	{ 0x0900, "Devanagari" },
	{ 0x0980, "Bengali/Assamese" },
	{ 0x0A00, "Gurmukhi" },
	{ 0x0A80, "Gujarati" },
	{ 0x0B00, "Oriya" },
	{ 0x0B80, "Tamil" },
	{ 0x0C00, "Telugu" },
	{ 0x0C80, "Kannada" },
	{ 0x0D00, "Malayalam" },
	{ 0x0D80, "Sinhala" },
	{ 0x0E00, "Thai" },
	{ 0x0E80, "Lao" },
	{ 0x0F00, "Tibetan" },
	{ 0x1000, "Myanmar" },
	{ 0x10A0, "Georgian" },
	{ 0x1100, "Hangul Jamo" },
	{ 0x1200, "Ethiopic" },
	{ 0x1380, "" },
	{ 0x13A0, "Cherokee" },
	{ 0x1400, "Unified Canadian Aboriginal Syllabics" },
	{ 0x1680, "Ogham" },
	{ 0x16A0, "Runic" },
	{ 0x1700, "Tagalog" },
	{ 0x1720, "Hanunoo" },
	{ 0x1740, "Buhid" },
	{ 0x1760, "Tagbanwa" },
	{ 0x1780, "Khmer" },
	{ 0x1800, "Mongolian" },
	{ 0x18b0, "" },
	{ 0x1900, "Limbu" },
	{ 0x1950, "Tai Le" },
	{ 0x1980, "" },
	{ 0x19E0, "Khmer Symbols" },
	{ 0x1A00, "" },
	{ 0x1D00, "Phonetic Extensions" },
	{ 0x1D80, "" },
	{ 0x1E00, "Latin Extended Additional" },
	{ 0x1F00, "Greek Extended" },
	{ 0x2000, "General Punctuation" },
	{ 0x2070, "Superscripts and Subscripts" },
	{ 0x20A0, "Currency Symbols" },
	{ 0x20D0, "Combining Diacritical Marks for Symbols" },
	{ 0x2100, "Letterlike Symbols" },
	{ 0x2150, "Number Forms" },
	{ 0x2190, "Arrows" },
	{ 0x2200, "Mathematical Operators" },
	{ 0x2300, "Miscellaneous Technical" },
	{ 0x2400, "Control Pictures" },
	{ 0x2440, "Optical Character Recognition" },
	{ 0x2460, "Enclosed Alphanumerics" },
	{ 0x2500, "Box Drawing" },
	{ 0x2580, "Block Elements" },
	{ 0x25A0, "Geometric Shapes" },
	{ 0x2600, "Miscalleneous Symbols" },
	{ 0x2700, "Dingbats" },
	{ 0x27C0, "Miscellaneous Mathematical Symbols-A" },
	{ 0x27F0, "Supplemental Arrows-A" },
	{ 0x2800, "Braille Patterns" },
	{ 0x2900, "Supplemental Arrows-B" },
	{ 0x2980, "Miscellaneous Mathematical Symbols-B" },
	{ 0x2A00, "Supplemental Mathematical Operators" },
	{ 0x2B00, "Miscellaneous Symbols and Arrows" },
	{ 0x2C00, "" },
	{ 0x2E80, "CJK Radicals Supplement" },
	{ 0x2F00, "Kangxi Radicals" },
	{ 0x2FE0, "" },
	{ 0x2FF0, "Ideographic Description Characters" },
	{ 0x3000, "CJK Symbols and Punctuation" },
	{ 0x3040, "Hiragana" },
	{ 0x30A0, "Katakana" },
	{ 0x3100, "Bopomofo" },
	{ 0x3130, "Hangul Compatibility Jamo" },
	{ 0x3190, "Kanbun (Kunten)" },
	{ 0x31A0, "Bopomofo Extended" },
	{ 0x31C0, "" },
	{ 0x31F0, "Katakana Phonetic Extensions" },
	{ 0x3200, "Enclosed CKJ Letters and Months" },
	{ 0x3300, "CJK Compatibility" },
	{ 0x3400, "CJK Unified Ideographs Extension A" },
	{ 0x4DC0, "Yijing Hexagram Symbols" },
	{ 0x4E00, "CJK Unified Ideographs" },
	{ 0x9FB0, "" },
	{ 0xA000, "Yi Syllables" },
	{ 0xA490, "Yi Radicals" },
	{ 0xA4D0, "" },
	{ 0xAC00, "Hangul Syllables" },
	{ 0xD7B0, "" },
	{ 0xD800, "High Surrogate Area" },
	{ 0xDC00, "Low Surrogate Area" },
	{ 0xE000, "Private Use Area" },
	{ 0xF900, "CJK Compatibility Ideographs" },
	{ 0xFB00, "Alphabetic Presentation Forms" },
	{ 0xFB50, "Arabic Presentation Forms-A" },
	{ 0xFE00, "Variation Selectors" },
	{ 0xFE10, "" },
	{ 0xFE20, "Combining Half Marks" },
	{ 0xFE30, "CJK Compatibility Forms" },
	{ 0xFE50, "Small Form Variants" },
	{ 0xFE70, "Arabic Presentation Forms-B" },
	{ 0xFF00, "Halfwidth and Fullwidth Forms" },
	{ 0xFFF0, "Specials" },
};
static const int unicodeRangeCount = sizeof(unicodeRanges) /
                                     sizeof(unicodeRanges[0]);

static void
SelectUnicodeRange(AG_Event *event)
{
	char text[4][128];
	AG_Treetbl *tt = AG_PTR(1);
	AG_TlistItem *it = AG_PTR(2);
	struct unicode_range *range = it->p1;
	const struct unicode_range *next_range = NULL;
	Uint32 i, end;
	char *c;

	for (i = 0; i < unicodeRangeCount; i++) {
		if ((&unicodeRanges[i] == range) &&
		    (i+1 < unicodeRangeCount)) {
			next_range = &unicodeRanges[i+1];
			break;
		}
	}
	end = (next_range != NULL) ? next_range->start-1 : 0xffff;

	AG_TreetblClearRows(tt);
	
	for (i = range->start; i < end; i++) {
		if (i == 10)
			continue;
        
		/* prep column 0 */
		unitext[0] = i;
		AG_ExportUnicode(AG_UNICODE_TO_UTF8, utf8text, unitext,
		    sizeof(unitext));
		Snprintf(text[0], sizeof(text[0]), "%s", utf8text);
        
		/* prep column 1 */
		utf8seq[0] = '\0';
		for (c = &utf8text[0]; *c != '\0'; c++) {
			char s[4];
            
			Snprintf(s, sizeof(s), "%x", (unsigned char)*c);
			Strlcat(utf8seq, s, sizeof(utf8seq));
		}
		Snprintf(text[1], sizeof(text[1]), "%s", utf8seq);
        
		AG_TreetblAddRow(tt, NULL, i, "%s,%s", text[0], text[1]);
	}
}

AG_Window *
DEV_UnicodeBrowser(void)
{
	AG_Window *win;
	AG_Combo *comRange;
	AG_Treetbl *tt;
	int i, w, wMax = 0;

	if ((win = AG_WindowNewNamed(0, "DEV_UnicodeBrowser")) == NULL) {
		return (NULL);
	}
	AG_WindowSetCaption(win, _("Unicode Browser"));
	AG_WindowSetCloseAction(win, AG_WINDOW_DETACH);

	comRange = AG_ComboNew(win, AG_COMBO_HFILL, _("Range: "));
	for (i = 0; i < unicodeRangeCount; i++) {
		AG_TextSize(unicodeRanges[i].name, &w, NULL);
		if (w > wMax) { wMax = w; }
		AG_TlistAddPtr(comRange->list, NULL, unicodeRanges[i].name,
		    (void *)&unicodeRanges[i]);
	}
	AG_ComboSizeHintPixels(comRange, wMax, 10);
	
	tt = AG_TreetblNew(win, AG_TREETBL_EXPAND, NULL, NULL);
	AG_TreetblSizeHint(tt, 200, 6);
	AG_TreetblAddCol(tt, 0, "<XXXXXXX>", "Char");
	AG_TreetblAddCol(tt, 1, "<XXXXXXX>", "Hex");

	AG_SetEvent(comRange, "combo-selected", SelectUnicodeRange, "%p", tt);

	AG_WidgetFocus(comRange);
	return (win);
}