import macros import options import strutils import tables import unicode import css/cssparser import css/selectorparser import display/winattrs import img/bitmap import layout/layoutunit import types/color import types/opt import utils/twtstr export selectorparser.PseudoElem type CSSShorthandType = enum SHORTHAND_NONE, SHORTHAND_ALL, SHORTHAND_MARGIN, SHORTHAND_PADDING, SHORTHAND_BACKGROUND, SHORTHAND_LIST_STYLE CSSUnit* = enum UNIT_CM, UNIT_MM, UNIT_IN, UNIT_PX, UNIT_PT, UNIT_PC, UNIT_EM, UNIT_EX, UNIT_CH, UNIT_REM, UNIT_VW, UNIT_VH, UNIT_VMIN, UNIT_VMAX, UNIT_PERC, UNIT_IC CSSPropertyType* = enum PROPERTY_NONE, PROPERTY_COLOR, PROPERTY_MARGIN_TOP, PROPERTY_MARGIN_LEFT, PROPERTY_MARGIN_RIGHT, PROPERTY_MARGIN_BOTTOM, PROPERTY_FONT_STYLE, PROPERTY_DISPLAY, PROPERTY_CONTENT, PROPERTY_WHITE_SPACE, PROPERTY_FONT_WEIGHT, PROPERTY_TEXT_DECORATION, PROPERTY_WORD_BREAK, PROPERTY_WIDTH, PROPERTY_HEIGHT, PROPERTY_LIST_STYLE_TYPE, PROPERTY_PADDING_TOP, PROPERTY_PADDING_LEFT, PROPERTY_PADDING_RIGHT, PROPERTY_PADDING_BOTTOM, PROPERTY_WORD_SPACING, PROPERTY_VERTICAL_ALIGN, PROPERTY_LINE_HEIGHT, PROPERTY_TEXT_ALIGN, PROPERTY_LIST_STYLE_POSITION, PROPERTY_BACKGROUND_COLOR, PROPERTY_POSITION, PROPERTY_LEFT, PROPERTY_RIGHT, PROPERTY_TOP, PROPERTY_BOTTOM, PROPERTY_CAPTION_SIDE, PROPERTY_BORDER_SPACING, PROPERTY_BORDER_COLLAPSE, PROPERTY_QUOTES, PROPERTY_COUNTER_RESET, PROPERTY_MAX_WIDTH, PROPERTY_MAX_HEIGHT, PROPERTY_MIN_WIDTH, PROPERTY_MIN_HEIGHT, PROPERTY_BACKGROUND_IMAGE, PROPERTY_CHA_COLSPAN, PROPERTY_CHA_ROWSPAN, PROPERTY_FLOAT, PROPERTY_VISIBILITY CSSValueType* = enum VALUE_NONE, VALUE_LENGTH, VALUE_COLOR, VALUE_CONTENT, VALUE_DISPLAY, VALUE_FONT_STYLE, VALUE_WHITE_SPACE, VALUE_INTEGER, VALUE_TEXT_DECORATION, VALUE_WORD_BREAK, VALUE_LIST_STYLE_TYPE, VALUE_VERTICAL_ALIGN, VALUE_TEXT_ALIGN, VALUE_LIST_STYLE_POSITION, VALUE_POSITION, VALUE_CAPTION_SIDE, VALUE_LENGTH2, VALUE_BORDER_COLLAPSE, VALUE_QUOTES, VALUE_COUNTER_RESET, VALUE_IMAGE, VALUE_FLOAT, VALUE_VISIBILITY CSSGlobalValueType* = enum VALUE_NOGLOBAL, VALUE_INITIAL, VALUE_INHERIT, VALUE_REVERT, VALUE_UNSET CSSDisplay* = enum DISPLAY_NONE, DISPLAY_INLINE, DISPLAY_BLOCK, DISPLAY_LIST_ITEM, DISPLAY_INLINE_BLOCK, DISPLAY_TABLE, DISPLAY_INLINE_TABLE, DISPLAY_TABLE_ROW_GROUP, DISPLAY_TABLE_HEADER_GROUP, DISPLAY_TABLE_FOOTER_GROUP, DISPLAY_TABLE_COLUMN_GROUP, DISPLAY_TABLE_ROW, DISPLAY_TABLE_COLUMN, DISPLAY_TABLE_CELL, DISPLAY_TABLE_CAPTION CSSWhitespace* = enum WHITESPACE_NORMAL, WHITESPACE_NOWRAP, WHITESPACE_PRE, WHITESPACE_PRE_LINE, WHITESPACE_PRE_WRAP CSSFontStyle* = enum FONTSTYLE_NORMAL, FONTSTYLE_ITALIC, FONTSTYLE_OBLIQUE CSSPosition* = enum POSITION_STATIC, POSITION_RELATIVE, POSITION_ABSOLUTE, POSITION_FIXED, POSITION_STICKY CSSTextDecoration* = enum TEXT_DECORATION_NONE, TEXT_DECORATION_UNDERLINE, TEXT_DECORATION_OVERLINE, TEXT_DECORATION_LINE_THROUGH, TEXT_DECORATION_BLINK CSSWordBreak* = enum WORD_BREAK_NORMAL, WORD_BREAK_BREAK_ALL, WORD_BREAK_KEEP_ALL CSSListStyleType* = enum LIST_STYLE_TYPE_NONE, LIST_STYLE_TYPE_DISC, LIST_STYLE_TYPE_CIRCLE, LIST_STYLE_TYPE_SQUARE, LIST_STYLE_TYPE_DECIMAL, LIST_STYLE_TYPE_DISCLOSURE_CLOSED, LIST_STYLE_TYPE_DISCLOSURE_OPEN, LIST_STYLE_TYPE_CJK_EARTHLY_BRANCH, LIST_STYLE_TYPE_CJK_HEAVENLY_STEM, LIST_STYLE_TYPE_LOWER_ROMAN, LIST_STYLE_TYPE_UPPER_ROMAN, LIST_STYLE_TYPE_LOWER_ALPHA, LIST_STYLE_TYPE_UPPER_ALPHA, LIST_STYLE_TYPE_LOWER_GREEK, LIST_STYLE_TYPE_HIRAGANA, LIST_STYLE_TYPE_HIRAGANA_IROHA, LIST_STYLE_TYPE_KATAKANA, LIST_STYLE_TYPE_KATAKANA_IROHA, LIST_STYLE_TYPE_JAPANESE_INFORMAL CSSVerticalAlign2* = enum VERTICAL_ALIGN_BASELINE, VERTICAL_ALIGN_SUB, VERTICAL_ALIGN_SUPER, VERTICAL_ALIGN_TEXT_TOP, VERTICAL_ALIGN_TEXT_BOTTOM, VERTICAL_ALIGN_MIDDLE, VERTICAL_ALIGN_TOP, VERTICAL_ALIGN_BOTTOM CSSTextAlign* = enum TEXT_ALIGN_START, TEXT_ALIGN_END, TEXT_ALIGN_LEFT, TEXT_ALIGN_RIGHT, TEXT_ALIGN_CENTER, TEXT_ALIGN_JUSTIFY, TEXT_ALIGN_CHA_CENTER, TEXT_ALIGN_CHA_LEFT, TEXT_ALIGN_CHA_RIGHT CSSListStylePosition* = enum LIST_STYLE_POSITION_OUTSIDE, LIST_STYLE_POSITION_INSIDE CSSCaptionSide* = enum CAPTION_SIDE_TOP, CAPTION_SIDE_BOTTOM, CAPTION_SIDE_LEFT, CAPTION_SIDE_RIGHT, CAPTION_SIDE_BLOCK_START, CAPTION_SIDE_BLOCK_END, CAPTION_SIDE_INLINE_START, CAPTION_SIDE_INLINE_END CSSBorderCollapse* = enum BORDER_COLLAPSE_SEPARATE, BORDER_COLLAPSE_COLLAPSE CSSContentType* = enum CONTENT_STRING, CONTENT_OPEN_QUOTE, CONTENT_CLOSE_QUOTE, CONTENT_NO_OPEN_QUOTE, CONTENT_NO_CLOSE_QUOTE, CONTENT_IMAGE, CONTENT_NEWLINE CSSFloat* = enum FLOAT_NONE, FLOAT_LEFT, FLOAT_RIGHT CSSVisibility* = enum VISIBILITY_VISIBLE, VISIBILITY_HIDDEN, VISIBILITY_COLLAPSE const RowGroupBox* = {DISPLAY_TABLE_ROW_GROUP, DISPLAY_TABLE_HEADER_GROUP, DISPLAY_TABLE_FOOTER_GROUP} const ProperTableChild* = {DISPLAY_TABLE_ROW, DISPLAY_TABLE_COLUMN, DISPLAY_TABLE_COLUMN_GROUP, DISPLAY_TABLE_CAPTION} + RowGroupBox const ProperTableRowParent* = {DISPLAY_TABLE, DISPLAY_INLINE_TABLE} + RowGroupBox const InternalTableBox* = {DISPLAY_TABLE_CELL, DISPLAY_TABLE_ROW, DISPLAY_TABLE_COLUMN, DISPLAY_TABLE_COLUMN_GROUP} + RowGroupBox const TabularContainer* = {DISPLAY_TABLE_ROW} + ProperTableRowParent type CSSLength* = object num*: float64 unit*: CSSUnit auto*: bool CSSVerticalAlign* = object length*: CSSLength keyword*: CSSVerticalAlign2 CSSContent* = object t*: CSSContentType s*: string bmp*: Bitmap CSSQuotes* = object auto*: bool qs*: seq[tuple[s, e: string]] CSSCounterReset* = object name*: string num*: int CSSComputedValue* = ref object t*: CSSPropertyType case v*: CSSValueType of VALUE_COLOR: color*: RGBAColor of VALUE_LENGTH: length*: CSSLength of VALUE_FONT_STYLE: fontstyle*: CSSFontStyle of VALUE_DISPLAY: display*: CSSDisplay of VALUE_CONTENT: content*: seq[CSSContent] of VALUE_QUOTES: quotes*: CSSQuotes of VALUE_WHITESPACE: whitespace*: CSSWhitespace of VALUE_INTEGER: integer*: int of VALUE_TEXT_DECORATION: textdecoration*: set[CSSTextDecoration] of VALUE_WORD_BREAK: wordbreak*: CSSWordBreak of VALUE_LIST_STYLE_TYPE: liststyletype*: CSSListStyleType of VALUE_VERTICAL_ALIGN: verticalalign*: CSSVerticalAlign of VALUE_TEXT_ALIGN: textalign*: CSSTextAlign of VALUE_LIST_STYLE_POSITION: liststyleposition*: CSSListStylePosition of VALUE_POSITION: position*: CSSPosition of VALUE_CAPTION_SIDE: captionside*: CSSCaptionSide of VALUE_LENGTH2: length2*: tuple[a, b: CSSLength] of VALUE_BORDER_COLLAPSE: bordercollapse*: CSSBorderCollapse of VALUE_COUNTER_RESET: counterreset*: seq[CSSCounterReset] of VALUE_IMAGE: image*: CSSContent of VALUE_FLOAT: float*: CSSFloat of VALUE_VISIBILITY: visibility*: CSSVisibility of VALUE_NONE: discard CSSComputedValues* = ref array[CSSPropertyType, CSSComputedValue] CSSOrigin* = enum ORIGIN_USER_AGENT ORIGIN_USER ORIGIN_AUTHOR CSSComputedValueBuilder = object global: CSSGlobalValueType val: CSSComputedValue CSSComputedValueBuilders = seq[CSSComputedValueBuilder] CSSComputedValuesBuilder* = object parent: CSSComputedValues normalProperties: array[CSSOrigin, CSSComputedValueBuilders] importantProperties: array[CSSOrigin, CSSComputedValueBuilders] preshints*: CSSComputedValues const ShorthandNames = { "all": SHORTHAND_ALL, "margin": SHORTHAND_MARGIN, "padding": SHORTHAND_PADDING, "background": SHORTHAND_BACKGROUND, "list-style": SHORTHAND_LIST_STYLE }.toTable() const PropertyNames = { "color": PROPERTY_COLOR, "margin-top": PROPERTY_MARGIN_TOP, "margin-bottom": PROPERTY_MARGIN_BOTTOM, "margin-left": PROPERTY_MARGIN_LEFT, "margin-right": PROPERTY_MARGIN_RIGHT, "font-style": PROPERTY_FONT_STYLE, "display": PROPERTY_DISPLAY, "content": PROPERTY_CONTENT, "white-space": PROPERTY_WHITE_SPACE, "font-weight": PROPERTY_FONT_WEIGHT, "text-decoration": PROPERTY_TEXT_DECORATION, "word-break": PROPERTY_WORD_BREAK, "width": PROPERTY_WIDTH, "height": PROPERTY_HEIGHT, "list-style-type": PROPERTY_LIST_STYLE_TYPE, "padding-top": PROPERTY_PADDING_TOP, "padding-bottom": PROPERTY_PADDING_BOTTOM, "padding-left": PROPERTY_PADDING_LEFT, "padding-right": PROPERTY_PADDING_RIGHT, "word-spacing": PROPERTY_WORD_SPACING, "vertical-align": PROPERTY_VERTICAL_ALIGN, "line-height": PROPERTY_LINE_HEIGHT, "text-align": PROPERTY_TEXT_ALIGN, "list-style-position": PROPERTY_LIST_STYLE_POSITION, "background-color": PROPERTY_BACKGROUND_COLOR, "position": PROPERTY_POSITION, "left": PROPERTY_LEFT, "right": PROPERTY_RIGHT, "top": PROPERTY_TOP, "bottom": PROPERTY_BOTTOM, "caption-side": PROPERTY_CAPTION_SIDE, "border-spacing": PROPERTY_BORDER_SPACING, "border-collapse": PROPERTY_BORDER_COLLAPSE, "quotes": PROPERTY_QUOTES, "counter-reset": PROPERTY_COUNTER_RESET, "max-width": PROPERTY_MAX_WIDTH, "max-height": PROPERTY_MAX_HEIGHT, "min-width": PROPERTY_MIN_WIDTH, "min-height": PROPERTY_MIN_HEIGHT, "background-image": PROPERTY_BACKGROUND_IMAGE, "-cha-colspan": PROPERTY_CHA_COLSPAN, "-cha-rowspan": PROPERTY_CHA_ROWSPAN, "float": PROPERTY_FLOAT, "visibility": PROPERTY_VISIBILITY }.toTable() const ValueTypes* = [ PROPERTY_NONE: VALUE_NONE, PROPERTY_COLOR: VALUE_COLOR, PROPERTY_MARGIN_TOP: VALUE_LENGTH, PROPERTY_MARGIN_LEFT: VALUE_LENGTH, PROPERTY_MARGIN_RIGHT: VALUE_LENGTH, PROPERTY_MARGIN_BOTTOM: VALUE_LENGTH, PROPERTY_FONT_STYLE: VALUE_FONT_STYLE, PROPERTY_DISPLAY: VALUE_DISPLAY, PROPERTY_CONTENT: VALUE_CONTENT, PROPERTY_WHITE_SPACE: VALUE_WHITE_SPACE, PROPERTY_FONT_WEIGHT: VALUE_INTEGER, PROPERTY_TEXT_DECORATION: VALUE_TEXT_DECORATION, PROPERTY_WORD_BREAK: VALUE_WORD_BREAK, PROPERTY_WIDTH: VALUE_LENGTH, PROPERTY_HEIGHT: VALUE_LENGTH, PROPERTY_LIST_STYLE_TYPE: VALUE_LIST_STYLE_TYPE, PROPERTY_PADDING_TOP: VALUE_LENGTH, PROPERTY_PADDING_LEFT: VALUE_LENGTH, PROPERTY_PADDING_RIGHT: VALUE_LENGTH, PROPERTY_PADDING_BOTTOM: VALUE_LENGTH, PROPERTY_WORD_SPACING: VALUE_LENGTH, PROPERTY_VERTICAL_ALIGN: VALUE_VERTICAL_ALIGN, PROPERTY_LINE_HEIGHT: VALUE_LENGTH, PROPERTY_TEXT_ALIGN: VALUE_TEXT_ALIGN, PROPERTY_LIST_STYLE_POSITION: VALUE_LIST_STYLE_POSITION, PROPERTY_BACKGROUND_COLOR: VALUE_COLOR, PROPERTY_POSITION: VALUE_POSITION, PROPERTY_LEFT: VALUE_LENGTH, PROPERTY_RIGHT: VALUE_LENGTH, PROPERTY_TOP: VALUE_LENGTH, PROPERTY_BOTTOM: VALUE_LENGTH, PROPERTY_CAPTION_SIDE: VALUE_CAPTION_SIDE, PROPERTY_BORDER_SPACING: VALUE_LENGTH2, PROPERTY_BORDER_COLLAPSE: VALUE_BORDER_COLLAPSE, PROPERTY_QUOTES: VALUE_QUOTES, PROPERTY_COUNTER_RESET: VALUE_COUNTER_RESET, PROPERTY_MAX_WIDTH: VALUE_LENGTH, PROPERTY_MAX_HEIGHT: VALUE_LENGTH, PROPERTY_MIN_WIDTH: VALUE_LENGTH, PROPERTY_MIN_HEIGHT: VALUE_LENGTH, PROPERTY_BACKGROUND_IMAGE: VALUE_IMAGE, PROPERTY_CHA_COLSPAN: VALUE_INTEGER, PROPERTY_CHA_ROWSPAN: VALUE_INTEGER, PROPERTY_FLOAT: VALUE_FLOAT, PROPERTY_VISIBILITY: VALUE_VISIBILITY ] const InheritedProperties = { PROPERTY_COLOR, PROPERTY_FONT_STYLE, PROPERTY_WHITE_SPACE, PROPERTY_FONT_WEIGHT, PROPERTY_TEXT_DECORATION, PROPERTY_WORD_BREAK, PROPERTY_LIST_STYLE_TYPE, PROPERTY_WORD_SPACING, PROPERTY_LINE_HEIGHT, PROPERTY_TEXT_ALIGN, PROPERTY_LIST_STYLE_POSITION, PROPERTY_CAPTION_SIDE, PROPERTY_BORDER_SPACING, PROPERTY_BORDER_COLLAPSE, PROPERTY_QUOTES, PROPERTY_VISIBILITY } func getPropInheritedArray(): array[CSSPropertyType, bool] = for prop in CSSPropertyType: if prop in InheritedProperties: result[prop] = true else: result[prop] = false const InheritedArray = getPropInheritedArray() func shorthandType(s: string): CSSShorthandType = return ShorthandNames.getOrDefault(s.toLowerAscii(), SHORTHAND_NONE) func propertyType(s: string): CSSPropertyType = return PropertyNames.getOrDefault(s.toLowerAscii(), PROPERTY_NONE) func valueType(prop: CSSPropertyType): CSSValueType = return ValueTypes[prop] func isSupportedProperty*(s: string): bool = return s in PropertyNames func `$`*(length: CSSLength): string = if length.auto: return "auto" let us = ($length.unit).split('_')[1..^1].join('_').toLowerAscii() return $length.num & us func `$`*(content: CSSContent): string = if content.s != "": return "url(" & content.s & ")" return "none" func `$`*(val: CSSComputedValue): string = result = ($val.t).toLowerAscii().split('_')[1..^1].join('-') & ": " case val.v of VALUE_COLOR: result &= $val.color of VALUE_IMAGE: result &= $val.image of VALUE_LENGTH: result &= $val.length else: discard macro `{}`*(vals: CSSComputedValues, s: string): untyped = let t = propertyType($s) let vs = $valueType(t) let s = vs.split('_')[1..^1].join('_').toLowerAscii() result = newDotExpr(newTree(nnkBracketExpr, vals, newLit(t)), newIdentNode(s)) macro `{}=`*(vals: CSSComputedValues, s: string, val: typed) = let t = propertyType($s) let v = valueType(t) let vs = $v let s = vs.split('_')[1..^1].join('_').toLowerAscii() let id = ident(s) let expr = newTree(nnkBracketExpr, vals, newLit(t)) result = quote do: `expr` = CSSComputedValue(t: CSSPropertyType(`t`), v: CSSValueType(`v`), `id`: `val`) func inherited(t: CSSPropertyType): bool = return InheritedArray[t] func em_to_px(em: float64, window: WindowAttributes): LayoutUnit = em * float64(window.ppl) func ch_to_px(ch: float64, window: WindowAttributes): LayoutUnit = ch * float64(window.ppc) # 水 width, we assume it's 2 chars func ic_to_px(ic: float64, window: WindowAttributes): LayoutUnit = ic * float64(window.ppc) * 2 # x-letter height, we assume it's em/2 func ex_to_px(ex: float64, window: WindowAttributes): LayoutUnit = ex * float64(window.ppc) / 2 func px*(l: CSSLength, window: WindowAttributes, p: LayoutUnit): LayoutUnit {.inline.} = case l.unit of UNIT_EM, UNIT_REM: em_to_px(l.num, window) of UNIT_CH: ch_to_px(l.num, window) of UNIT_IC: ic_to_px(l.num, window) of UNIT_EX: ex_to_px(l.num, window) of UNIT_PERC: toLayoutUnit(toFloat64(p) * l.num / 100) of UNIT_PX: toLayoutUnit(l.num) of UNIT_CM: toLayoutUnit(l.num * 37.8) of UNIT_MM: toLayoutUnit(l.num * 3.78) of UNIT_IN: toLayoutUnit(l.num * 96) of UNIT_PC: toLayoutUnit(l.num * 16) of UNIT_PT: toLayoutUnit(l.num * 4 / 3) of UNIT_VW: toLayoutUnit(float64(window.width_px) * l.num / 100) of UNIT_VH: toLayoutUnit(float64(window.height_px) * l.num / 100) of UNIT_VMIN: toLayoutUnit(min(window.width_px, window.width_px) / 100 * l.num) of UNIT_VMAX: toLayoutUnit(max(window.width_px, window.width_px) / 100 * l.num) const UpperAlphaMap = "ABCDEFGHIJKLMNOPQRSTUVWXYZ".toRunes() const LowerAlphaMap = "abcdefghijklmnopqrstuvwxyz".toRunes() const LowerGreekMap = "αβγδεζηθικλμνξοπρστυφχψω".toRunes() const HiraganaMap = ("あいうえおかきくけこさしすせそたちつてとなにぬねの" & "はひふへほまみむめもやゆよらりるれろわゐゑをん").toRunes() const HiraganaIrohaMap = ("いろはにほへとちりぬるをわかよたれそつねならむ" & "うゐのおくやまけふこえてあさきゆめみしゑひもせす").toRunes() const KatakanaMap = ("アイウエオカキクケコサシスセソタチツテトナニヌネノ" & "ハヒフヘホマミムメモヤユヨラリルレロワヰヱヲン").toRunes() const KatakanaIrohaMap = ("イロハニホヘトチリヌルヲワカヨタレソツネナラム" & "ウヰノオクヤマケフコエテアサキユメミシヱヒモセス").toRunes() const EarthlyBranchMap = "子丑寅卯辰巳午未申酉戌亥".toRunes() const HeavenlyStemMap = "甲乙丙丁戊己庚辛壬癸".toRunes() func numToBase(n: int, map: openArray[Rune]): string = if n <= 0: return $n var tmp: seq[Rune] var n = n while n != 0: n -= 1 tmp &= map[n mod map.len] n = n div map.len result = "" for i in countdown(tmp.high, 0): result &= $tmp[i] func numToFixed(n: int, map: openArray[Rune]): string = let n = n - 1 if n notin 0 .. map.high: return $n return $map[n] func listMarker*(t: CSSListStyleType, i: int): string = case t of LIST_STYLE_TYPE_NONE: return "" of LIST_STYLE_TYPE_DISC: return "• " # U+2022 of LIST_STYLE_TYPE_CIRCLE: return "○ " # U+25CB of LIST_STYLE_TYPE_SQUARE: return "□ " # U+25A1 of LIST_STYLE_TYPE_DISCLOSURE_OPEN: return "▶ " # U+25B6 of LIST_STYLE_TYPE_DISCLOSURE_CLOSED: return "▼ " # U+25BC of LIST_STYLE_TYPE_DECIMAL: return $i & ". " of LIST_STYLE_TYPE_UPPER_ROMAN: return romanNumber(i) & ". " of LIST_STYLE_TYPE_LOWER_ROMAN: return romanNumber_lower(i) & ". " of LIST_STYLE_TYPE_UPPER_ALPHA: return numToBase(i, UpperAlphaMap) & ". " of LIST_STYLE_TYPE_LOWER_ALPHA: return numToBase(i, LowerAlphaMap) & ". " of LIST_STYLE_TYPE_LOWER_GREEK: return numToBase(i, LowerGreekMap) & ". " of LIST_STYLE_TYPE_HIRAGANA: return numToBase(i, HiraganaMap) & "、" of LIST_STYLE_TYPE_HIRAGANA_IROHA: return numToBase(i, HiraganaIrohaMap) & "、" of LIST_STYLE_TYPE_KATAKANA: return numToBase(i, KatakanaMap) & "、" of LIST_STYLE_TYPE_KATAKANA_IROHA: return numToBase(i, KatakanaIrohaMap) & "、" of LIST_STYLE_TYPE_CJK_EARTHLY_BRANCH: return numToFixed(i, EarthlyBranchMap) & "、" of LIST_STYLE_TYPE_CJK_HEAVENLY_STEM: return numToFixed(i, HeavenlyStemMap) & "、" of LIST_STYLE_TYPE_JAPANESE_INFORMAL: return japaneseNumber(i) & "、" #TODO this should change by language func quoteStart*(level: int): string = if level == 0: return "“" return "‘" func quoteEnd*(level: int): string = if level == 0: return "“" return "‘" const Colors: Table[string, RGBAColor] = ((func (): Table[string, RGBAColor] = for name, rgb in ColorsRGB: result[name] = rgb result["transparent"] = rgba(0x00, 0x00, 0x00, 0x00) )()) const Units = { "%": UNIT_PERC, "cm": UNIT_CM, "mm": UNIT_MM, "in": UNIT_IN, "px": UNIT_PX, "pt": UNIT_PT, "pc": UNIT_PC, "em": UNIT_EM, "ex": UNIT_EX, "ch": UNIT_CH, "ic": UNIT_CH, "rem": UNIT_REM, "vw": UNIT_VW, "vh": UNIT_VH, "vmin": UNIT_VMIN, "vmax": UNIT_VMAX, }.toTable() func cssLength(val: float64, unit: string): Result[CSSLength, string] = if unit in Units: return ok(CSSLength(num: val, unit: Units[unit])) return err("Invalid unit") const CSSLengthAuto* = CSSLength(auto: true) func parseDimensionValues*(s: string): Option[CSSLength] = if s == "": return var i = 0 while s[i] in AsciiWhitespace: inc i if i >= s.len or s[i] notin AsciiDigit: return var n: float64 while s[i] in AsciiDigit: n *= 10 n += float64(decValue(s[i])) inc i if i >= s.len: return some(CSSLength(num: n, unit: UNIT_PX)) if s[i] == '.': inc i if i >= s.len: return some(CSSLength(num: n, unit: UNIT_PX)) var d = 1 while i < s.len and s[i] in AsciiDigit: n += float64(decValue(s[i])) / float64(d) inc d inc i if i >= s.len: return some(CSSLength(num: n, unit: UNIT_PX)) if s[i] == '%': return some(CSSLength(num: n, unit: UNIT_PERC)) return some(CSSLength(num: n, unit: UNIT_PX)) func skipWhitespace(vals: seq[CSSComponentValue], i: var int) = while i < vals.len: if vals[i] != CSS_WHITESPACE_TOKEN: break inc i func cssColor*(val: CSSComponentValue): Result[RGBAColor, string] = if val of CSSToken: let tok = CSSToken(val) case tok.tokenType of CSS_HASH_TOKEN: let c = parseHexColor(tok.value) if c.isSome: return ok(c.get) of CSS_IDENT_TOKEN: let s = tok.value if s in Colors: return ok(Colors[s]) else: discard elif val of CSSFunction: let f = CSSFunction(val) var i = 0 var commaMode = false template check_err(slash: bool) = #TODO calc, percentages, etc (cssnumber function or something) if not slash and i >= f.value.len or i < f.value.len and f.value[i] != CSS_NUMBER_TOKEN: return err("Invalid color") template next_value(first = false, slash = false) = inc i f.value.skipWhitespace(i) if i < f.value.len: if f.value[i] == CSS_COMMA_TOKEN and (commaMode or first): # legacy compatibility inc i f.value.skipWhitespace(i) commaMode = true elif commaMode: return err("Invalid color") elif slash: let tok = f.value[i] if tok != CSS_DELIM_TOKEN or CSSToken(tok).cvalue != '/': return err("Invalid color") inc i f.value.skipWhitespace(i) check_err slash if f.name.equalsIgnoreCase("rgb") or f.name.equalsIgnoreCase("rgba"): f.value.skipWhitespace(i) check_err false let r = CSSToken(f.value[i]).nvalue next_value true
/*
 * (C)opyright MMVI Anselm R. Garbe <garbeam at gmail dot com>
 * See LICENSE file for license details.
 */
#include "dwm.h"

#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/wait.h>
#include <unistd.h>

/* static */

static void
bad_malloc(unsigned int size)
{
	fprintf(stderr, "fatal: could not malloc() %d bytes\n",
			(int) size);
	exit(EXIT_FAILURE);
}

/* extern */

void *
emallocz(unsigned int size)
{
	void *res = calloc(1, size);
	if(!res)
		bad_malloc(size);
	return res;
}

void
eprint(const char *errstr, ...) {
	va_list ap;
	va_start(ap, errstr);
	vfprintf(stderr, errstr, ap);
	va_end(ap);
	exit(EXIT_FAILURE);
}

void
spawn(Arg *arg)
{
	char **argv = (char **)arg->argv;
	if(!argv || !argv[0])
		return;
	if(fork() == 0) {
		if(fork() == 0) {
			if(dpy)
				close(ConnectionNumber(dpy));
			setsid();
			execvp(argv[0], argv);
			fprintf(stderr, "dwm: execvp %s", argv[0]);
			perror(" failed");
		}
		exit(EXIT_FAILURE);
	}
	wait(0);
}
: discard elif x == CSS_STRING_TOKEN: return some(x.value) else: break #TODO this should be bg-image, add gradient, etc etc func cssImage(cval: CSSComponentValue): Result[CSSContent, string] = if isToken(cval): #TODO bg-image only let tok = getToken(cval) if tok.tokenType == CSS_IDENT_TOKEN and tok.value == "none": return ok(CSSContent(t: CONTENT_IMAGE, s: "")) let url = cssURL(cval) if url.isSome: return ok(CSSContent(t: CONTENT_IMAGE, s: url.get)) return err("Invalid image") func cssInteger(cval: CSSComponentValue, range: Slice[int]): Result[int, string] = if isToken(cval): let tok = getToken(cval) if tok.tokenType == CSS_NUMBER_TOKEN: if tok.nvalue in float64(range.a)..float64(range.b): return ok(int(tok.nvalue)) return err("Invalid integer") func cssFloat(cval: CSSComponentValue): Result[CSSFloat, string] = const FloatMap = { "none": FLOAT_NONE, "left": FLOAT_LEFT, "right": FLOAT_RIGHT } return cssIdent(FloatMap, cval) func cssVisibility(cval: CSSComponentValue): Result[CSSVisibility, string] = const VisibilityMap = { "visible": VISIBILITY_VISIBLE, "hidden": VISIBILITY_HIDDEN, "collapse": VISIBILITY_COLLAPSE } return cssIdent(VisibilityMap, cval) proc getValueFromDecl(val: CSSComputedValue, d: CSSDeclaration, vtype: CSSValueType, ptype: CSSPropertyType): Err[string] = var i = 0 d.value.skipWhitespace(i) if i >= d.value.len: return err("Empty value") let cval = d.value[i] inc i case vtype of VALUE_COLOR: val.color = ?cssColor(cval) of VALUE_LENGTH: case ptype of PROPERTY_WORD_SPACING: val.length = ?cssWordSpacing(cval) of PROPERTY_LINE_HEIGHT: val.length = ?cssLineHeight(cval) of PROPERTY_MAX_WIDTH, PROPERTY_MAX_HEIGHT, PROPERTY_MIN_WIDTH, PROPERTY_MIN_HEIGHT: val.length = ?cssMaxMinSize(cval) of PROPERTY_PADDING_LEFT, PROPERTY_PADDING_RIGHT, PROPERTY_PADDING_TOP, PROPERTY_PADDING_BOTTOM: val.length = ?cssLength(cval, has_auto = false) else: val.length = ?cssLength(cval) of VALUE_FONT_STYLE: val.fontstyle = ?cssFontStyle(cval) of VALUE_DISPLAY: val.display = ?cssDisplay(cval) of VALUE_CONTENT: val.content = cssContent(d) of VALUE_WHITE_SPACE: val.whitespace = ?cssWhiteSpace(cval) of VALUE_INTEGER: if ptype == PROPERTY_FONT_WEIGHT: val.integer = ?cssFontWeight(cval) elif ptype == PROPERTY_CHA_COLSPAN: val.integer = ?cssInteger(cval, 1 .. 1000) elif ptype == PROPERTY_CHA_ROWSPAN: val.integer = ?cssInteger(cval, 0 .. 65534) of VALUE_TEXT_DECORATION: val.textdecoration = ?cssTextDecoration(d) of VALUE_WORD_BREAK: val.wordbreak = ?cssWordBreak(cval) of VALUE_LIST_STYLE_TYPE: val.liststyletype = ?cssListStyleType(cval) of VALUE_VERTICAL_ALIGN: val.verticalalign = ?cssVerticalAlign(cval) of VALUE_TEXT_ALIGN: val.textalign = ?cssTextAlign(cval) of VALUE_LIST_STYLE_POSITION: val.liststyleposition = ?cssListStylePosition(cval) of VALUE_POSITION: val.position = ?cssPosition(cval) of VALUE_CAPTION_SIDE: val.captionside = ?cssCaptionSide(cval) of VALUE_BORDER_COLLAPSE: val.bordercollapse = ?cssBorderCollapse(cval) of VALUE_LENGTH2: val.length2.a = ?cssAbsoluteLength(cval) d.value.skipWhitespace(i) if i >= d.value.len: val.length2.b = val.length2.a else: let cval = d.value[i] val.length2.b = ?cssAbsoluteLength(cval) of VALUE_QUOTES: val.quotes = ?cssQuotes(d) of VALUE_COUNTER_RESET: val.counterreset = ?cssCounterReset(d) of VALUE_IMAGE: val.image = ?cssImage(cval) of VALUE_FLOAT: val.float = ?cssFloat(cval) of VALUE_VISIBILITY: val.visibility = ?cssVisibility(cval) of VALUE_NONE: discard return ok() func getInitialColor(t: CSSPropertyType): RGBAColor = case t of PROPERTY_COLOR: return Colors["white"] of PROPERTY_BACKGROUND_COLOR: return Colors["transparent"] else: return Colors["black"] func getInitialLength(t: CSSPropertyType): CSSLength = case t of PROPERTY_WIDTH, PROPERTY_HEIGHT, PROPERTY_WORD_SPACING, PROPERTY_LINE_HEIGHT, PROPERTY_LEFT, PROPERTY_RIGHT, PROPERTY_TOP, PROPERTY_BOTTOM, PROPERTY_MAX_WIDTH, PROPERTY_MAX_HEIGHT, PROPERTY_MIN_WIDTH, PROPERTY_MIN_HEIGHT: return CSSLengthAuto else: return CSSLength(auto: false, unit: UNIT_PX, num: 0) func getInitialInteger(t: CSSPropertyType): int = case t of PROPERTY_CHA_COLSPAN, PROPERTY_CHA_ROWSPAN: return 1 of PROPERTY_FONT_WEIGHT: return 400 # normal else: discard func calcInitial(t: CSSPropertyType): CSSComputedValue = let v = valueType(t) var nv: CSSComputedValue case v of VALUE_COLOR: nv = CSSComputedValue(t: t, v: v, color: getInitialColor(t)) of VALUE_DISPLAY: nv = CSSComputedValue(t: t, v: v, display: DISPLAY_INLINE) of VALUE_WORD_BREAK: nv = CSSComputedValue(t: t, v: v, wordbreak: WORD_BREAK_NORMAL) of VALUE_LENGTH: nv = CSSComputedValue(t: t, v: v, length: getInitialLength(t)) of VALUE_INTEGER: nv = CSSComputedValue(t: t, v: v, integer: getInitialInteger(t)) of VALUE_QUOTES: nv = CSSComputedValue(t: t, v: v, quotes: CSSQuotes(auto: true)) else: nv = CSSComputedValue(t: t, v: v) return nv func getInitialTable(): array[CSSPropertyType, CSSComputedValue] = for i in low(result)..high(result): result[i] = calcInitial(i) let defaultTable = getInitialTable() template getDefault(t: CSSPropertyType): CSSComputedValue = {.cast(noSideEffect).}: defaultTable[t] func getComputedValue(d: CSSDeclaration, ptype: CSSPropertyType, vtype: CSSValueType): Result[(CSSComputedValue, CSSGlobalValueType), string] = let global = cssGlobal(d) var val = CSSComputedValue(t: ptype, v: vtype) let r = val.getValueFromDecl(d, vtype, ptype) if r.isErr: if global != VALUE_NOGLOBAL: return ok((val, global)) else: return err(r.error) return ok((val, global)) func lengthShorthand(d: CSSDeclaration, props: array[4, CSSPropertyType]): Result[seq[(CSSComputedValue, CSSGlobalValueType)], string] = var i = 0 var cvals: seq[CSSComponentValue] while i < d.value.len: if d.value[i] != CSS_WHITESPACE_TOKEN: cvals.add(d.value[i]) inc i var res: seq[(CSSComputedValue, CSSGlobalValueType)] case cvals.len of 1: # top, bottom, left, right for ptype in props: let vtype = valueType(ptype) let val = CSSComputedValue(t: ptype, v: vtype) ?val.getValueFromDecl(d, vtype, ptype) res.add((val, cssGlobal(d))) of 2: # top, bottom | left, right for i in 0 ..< props.len: let ptype = props[i] let vtype = valueType(ptype) let val = CSSComputedValue(t: ptype, v: vtype) val.length = ?cssLength(cvals[i mod 2]) res.add((val, cssGlobal(d))) of 3: # top | left, right | bottom for i in 0 ..< props.len: let ptype = props[i] let vtype = valueType(ptype) let val = CSSComputedValue(t: ptype, v: vtype) let j = if i == 0: 0 # top elif i == 3: 2 # bottom else: 1 # left, right val.length = ?cssLength(cvals[j]) res.add((val, cssGlobal(d))) of 4: # top | right | bottom | left for i in 0 ..< props.len: let ptype = props[i] let vtype = valueType(ptype) let val = CSSComputedValue(t: ptype, v: vtype) val.length = ?cssLength(cvals[i]) res.add((val, cssGlobal(d))) else: discard return ok(res) const PropertyMarginSpec = [ PROPERTY_MARGIN_TOP, PROPERTY_MARGIN_RIGHT, PROPERTY_MARGIN_BOTTOM, PROPERTY_MARGIN_LEFT ] const PropertyPaddingSpec = [ PROPERTY_PADDING_TOP, PROPERTY_PADDING_RIGHT, PROPERTY_PADDING_BOTTOM, PROPERTY_PADDING_LEFT ] proc getComputedValues0(d: CSSDeclaration): Result[seq[(CSSComputedValue, CSSGlobalValueType)], string] = let name = d.name var res: seq[(CSSComputedValue, CSSGlobalValueType)] case shorthandType(name) of SHORTHAND_NONE: let ptype = propertyType(name) let vtype = valueType(ptype) res.add(?getComputedValue(d, ptype, vtype)) of SHORTHAND_ALL: let global = cssGlobal(d) if global != VALUE_NOGLOBAL: for ptype in CSSPropertyType: let vtype = valueType(ptype) let val = CSSComputedValue(t: ptype, v: vtype) res.add((val, global)) of SHORTHAND_MARGIN: res.add(?lengthShorthand(d, PropertyMarginSpec)) of SHORTHAND_PADDING: res.add(?lengthShorthand(d, PropertyPaddingSpec)) of SHORTHAND_BACKGROUND: let global = cssGlobal(d) let bgcolorptype = PROPERTY_BACKGROUND_COLOR let bgcolorval = CSSComputedValue(t: bgcolorptype, v: valueType(bgcolorptype)) let bgimageptype = PROPERTY_BACKGROUND_IMAGE let bgimageval = CSSComputedValue(t: bgimageptype, v: valueType(bgimageptype)) if global == VALUE_NOGLOBAL: for tok in d.value: if tok == CSS_WHITESPACE_TOKEN: continue let r = cssImage(tok) if r.isOk: bgimageval.image = r.get res.add((bgimageval, global)) else: let r = cssColor(tok) if r.isOk: bgcolorval.color = r.get res.add((bgcolorval, global)) else: res.add((bgcolorval, global)) of SHORTHAND_LIST_STYLE: let global = cssGlobal(d) let positionptype = PROPERTY_LIST_STYLE_POSITION let positionval = CSSComputedValue(t: positionptype, v: valueType(positionptype)) let typeptype = PROPERTY_LIST_STYLE_TYPE let typeval = CSSComputedValue(t: typeptype, v: valueType(typeptype)) if global == VALUE_NOGLOBAL: for tok in d.value: let r = cssListStylePosition(tok) if r.isOk: positionval.liststyleposition = r.get res.add((positionval, global)) else: let r = cssListStyleType(tok) if r.isOk: typeval.liststyletype = r.get res.add((typeval, global)) else: #TODO list-style-image discard return ok(res) proc getComputedValues(d: CSSDeclaration): seq[(CSSComputedValue, CSSGlobalValueType)] = return getComputedValues0(d).get(@[]) proc newComputedValueBuilder*(parent: CSSComputedValues): CSSComputedValuesBuilder = return CSSComputedValuesBuilder( parent: parent ) proc addValuesImportant*(builder: var CSSComputedValuesBuilder, decls: seq[CSSDeclaration], origin: CSSOrigin) = for decl in decls: if decl.important: let vals = getComputedValues(decl) for vg in vals: let (val, global) = vg builder.importantProperties[origin].add(CSSComputedValueBuilder(val: val, global: global)) proc addValuesNormal*(builder: var CSSComputedValuesBuilder, decls: seq[CSSDeclaration], origin: CSSOrigin) = for decl in decls: if not decl.important: let vals = getComputedValues(decl) for vg in vals: let (val, global) = vg builder.normalProperties[origin].add(CSSComputedValueBuilder(val: val, global: global)) proc addValues*(builder: var CSSComputedValuesBuilder, decls: seq[CSSDeclaration], origin: CSSOrigin) = for decl in decls: let vals = getComputedValues(decl) for vg in vals: let (val, global) = vg if decl.important: builder.importantProperties[origin].add(CSSComputedValueBuilder(val: val, global: global)) else: builder.normalProperties[origin].add(CSSComputedValueBuilder(val: val, global: global)) proc applyValue(vals: CSSComputedValues, val: CSSComputedValue, global: CSSGlobalValueType, parent: CSSComputedValues, previousOrigin: CSSComputedValues) = let prop = val.t let parentVal = if parent != nil: parent[prop] else: nil case global of VALUE_INHERIT: if parentVal != nil: vals[prop] = parentVal else: vals[prop] = getDefault(prop) of VALUE_INITIAL: vals[prop] = getDefault(prop) of VALUE_UNSET: if inherited(prop): # inherit if parentVal != nil: vals[prop] = parentVal else: vals[prop] = getDefault(prop) else: # initial vals[prop] = getDefault(prop) of VALUE_REVERT: if previousOrigin != nil: vals[prop] = previousOrigin[prop] else: vals[prop] = getDefault(prop) of VALUE_NOGLOBAL: vals[prop] = val func inheritProperties*(parent: CSSComputedValues): CSSComputedValues = new(result) for prop in CSSPropertyType: if inherited(prop) and parent[prop] != nil: result[prop] = parent[prop] else: result[prop] = getDefault(prop) func copyProperties*(props: CSSComputedValues): CSSComputedValues = new(result) for prop in CSSPropertyType: result[prop] = props[prop] func rootProperties*(): CSSComputedValues = new(result) for prop in CSSPropertyType: result[prop] = getDefault(prop) func hasValues*(builder: CSSComputedValuesBuilder): bool = for origin in CSSOrigin: if builder.normalProperties[origin].len > 0: return true if builder.importantProperties[origin].len > 0: return true return false func buildComputedValues*(builder: CSSComputedValuesBuilder): CSSComputedValues = new(result) var previousOrigins: array[CSSOrigin, CSSComputedValues] block: let origin = ORIGIN_USER_AGENT for build in builder.normalProperties[origin]: result.applyValue(build.val, build.global, builder.parent, nil) previousOrigins[origin] = result.copyProperties() # Presentational hints override user agent style, but respect user/author style. if builder.preshints != nil: for prop in CSSPropertyType: if builder.preshints[prop] != nil: result[prop] = builder.preshints[prop] block: let origin = ORIGIN_USER let prevOrigin = ORIGIN_USER_AGENT for build in builder.normalProperties[origin]: result.applyValue(build.val, build.global, builder.parent, previousOrigins[prevOrigin]) previousOrigins[origin] = result.copyProperties() # save user origins so author can use them block: let origin = ORIGIN_AUTHOR let prevOrigin = ORIGIN_USER for build in builder.normalProperties[origin]: result.applyValue(build.val, build.global, builder.parent, previousOrigins[prevOrigin]) # no need to save user origins block: let origin = ORIGIN_AUTHOR let prevOrigin = ORIGIN_USER for build in builder.importantProperties[origin]: result.applyValue(build.val, build.global, builder.parent, previousOrigins[prevOrigin]) # important, so no need to save origins block: let origin = ORIGIN_USER let prevOrigin = ORIGIN_USER_AGENT for build in builder.importantProperties[origin]: result.applyValue(build.val, build.global, builder.parent, previousOrigins[prevOrigin]) # important, so no need to save origins block: let origin = ORIGIN_USER_AGENT for build in builder.importantProperties[origin]: result.applyValue(build.val, build.global, builder.parent, nil) # important, so no need to save origins # set defaults for prop in CSSPropertyType: if result[prop] == nil: if inherited(prop) and builder.parent != nil and builder.parent[prop] != nil: result[prop] = builder.parent[prop] else: result[prop] = getDefault(prop)