-- Copyright 2006-2011 Mitchell mitchell<att>caladbolg.net. See LICENSE.
-- CSS LPeg lexer.

local l = lexer
local token, style, color, word_match = l.token, l.style, l.color, l.word_match
local P, R, S, V = l.lpeg.P, l.lpeg.R, l.lpeg.S, l.lpeg.V

module(...)

-- Whitespace.
local ws = token(l.WHITESPACE, l.space^1)

-- Comments.
local comment = token(l.COMMENT, '/*' * (l.any - '*/')^0 * P('*/')^-1)

-- Strings.
local sq_str = l.delimited_range("'", '\\', true)
local dq_str = l.delimited_range('"', '\\', true)
local string = token(l.STRING, sq_str + dq_str)

-- Numbers.
local number = token(l.NUMBER, l.digit^1)

-- Keywords.
local css1_property = word_match({
  'color', 'background-color', 'background-image', 'background-repeat',
  'background-attachment', 'background-position', 'background', 'font-family',
  'font-style', 'font-variant', 'font-weight', 'font-size', 'font',
  'word-spacing', 'letter-spacing', 'text-decoration', 'vertical-align',
  'text-transform', 'text-align', 'text-indent', 'line-height', 'margin-top',
  'margin-right', 'margin-bottom', 'margin-left', 'margin', 'padding-top',
  'padding-right', 'padding-bottom', 'padding-left', 'padding',
  'border-top-width', 'border-right-width', 'border-bottom-width',
  'border-left-width', 'border-width', 'border-top', 'border-right',
  'border-bottom', 'border-left', 'border', 'border-color', 'border-style',
  'width', 'height', 'float', 'clear', 'display', 'white-space',
  'list-style-type', 'list-style-image', 'list-style-position', 'list-style'
}, '-')
local css1_value = word_match({
  'auto', 'none', 'normal', 'italic', 'oblique', 'small-caps', 'bold', 'bolder',
  'lighter', 'xx-small', 'x-small', 'small', 'medium', 'large', 'x-large',
  'xx-large', 'larger', 'smaller', 'transparent', 'repeat', 'repeat-x',
  'repeat-y', 'no-repeat', 'scroll', 'fixed', 'top', 'bottom', 'left', 'center',
  'right', 'justify', 'both', 'underline', 'overline', 'line-through', 'blink',
  'baseline', 'sub', 'super', 'text-top', 'middle', 'text-bottom', 'capitalize',
  'uppercase', 'lowercase', 'thin', 'medium', 'thick', 'dotted', 'dashed',
  'solid', 'double', 'groove', 'ridge', 'inset', 'outset', 'block', 'inline',
  'list-item', 'pre', 'no-wrap', 'inside', 'outside', 'disc', 'circle',
  'square', 'decimal', 'lower-roman', 'upper-roman', 'lower-alpha',
  'upper-alpha', 'aqua', 'black', 'blue', 'fuchsia', 'gray', 'green', 'lime',
  'maroon', 'navy', 'olive', 'purple', 'red', 'silver', 'teal', 'white',
  'yellow'
}, '-')
local css2_property = word_match({
  'border-top-color', 'border-right-color', 'border-bottom-color',
  'border-left-color', 'border-color', 'border-top-style', 'border-right-style',
  'border-bottom-style', 'border-left-style', 'border-style', 'top', 'right',
  'bottom', 'left', 'position', 'z-index', 'direction', 'unicode-bidi',
  'min-width', 'max-width', 'min-height', 'max-height', 'overflow', 'clip',
  'visibility', 'content', 'quotes', 'counter-reset', 'counter-increment',
  'marker-offset', 'size', 'marks', 'page-break-before', 'page-break-after',
  'page-break-inside', 'page', 'orphans', 'widows', 'font-stretch',
  'font-size-adjust', 'unicode-range', 'units-per-em', 'src', 'panose-1',
  'stemv', 'stemh', 'slope', 'cap-height', 'x-height', 'ascent', 'descent',
  'widths', 'bbox', 'definition-src', 'baseline', 'centerline', 'mathline',
  'topline', 'text-shadow', 'caption-side', 'table-layout', 'border-collapse',
  'border-spacing', 'empty-cells', 'speak-header', 'cursor', 'outline',
  'outline-width', 'outline-style', 'outline-color', 'volume', 'speak',
  'pause-before', 'pause-after', 'pause', 'cue-before', 'cue-after', 'cue',
  'play-during', 'azimuth', 'elevation', 'speech-rate', 'voice-family', 'pitch',
  'pitch-range', 'stress', 'richness', 'speak-punctuation', 'speak-numeral'
}, '-')
local css2_value = word_match({
  'inherit', 'run-in', 'compact', 'marker', 'table', 'inline-table',
  'table-row-group', 'table-header-group', 'table-footer-group', 'table-row',
  'table-column-group', 'table-column', 'table-cell', 'table-caption', 'static',
  'relative', 'absolute', 'fixed', 'ltr', 'rtl', 'embed', 'bidi-override',
  'visible', 'hidden', 'scroll', 'collapse', 'open-quote', 'close-quote',
  'no-open-quote', 'no-close-quote', 'decimal-leading-zero', 'lower-greek',
  'lower-latin', 'upper-latin', 'hebrew', 'armenian', 'georgian',
  'cjk-ideographic', 'hiragana', 'katakana', 'hiragana-iroha', 'katakana-iroha',
  'landscape', 'portrait', 'crop', 'cross', 'always', 'avoid', 'wider',
  'narrower', 'ultra-condensed', 'extra-condensed', 'condensed',
  'semi-condensed', 'semi-expanded', 'expanded', 'extra-expanded',
  'ultra-expanded', 'caption', 'icon', 'menu', 'message-box', 'small-caption',
  'status-bar', 'separate', 'show', 'hide', 'once', 'crosshair', 'default',
  'pointer', 'move', 'text', 'wait', 'help', 'e-resize', 'ne-resize',
  'nw-resize', 'n-resize', 'se-resize', 'sw-resize', 's-resize', 'w-resize',
  'ActiveBorder', 'ActiveCaption', 'AppWorkspace', 'Background', 'ButtonFace',
  'ButtonHighlight', 'ButtonShadow', 'InactiveCaptionText', 'ButtonText',
  'CaptionText', 'GrayText', 'Highlight', 'HighlightText', 'InactiveBorder',
  'InactiveCaption', 'InfoBackground', 'InfoText', 'Menu', 'MenuText',
  'Scrollbar', 'ThreeDDarkShadow', 'ThreeDFace', 'ThreeDHighlight',
  'ThreeDLightShadow', 'ThreeDShadow', 'Window', 'WindowFrame', 'WindowText',
  'silent', 'x-soft', 'soft', 'medium', 'loud', 'x-loud', 'spell-out', 'mix',
  'left-side', 'far-left', 'center-left', 'center-right', 'far-right',
  'right-side', 'behind', 'leftwards', 'rightwards', 'below', 'level', 'above',
  'higher', 'lower', 'x-slow', 'slow', 'medium', 'fast', 'x-fast', 'faster',
  'slower', 'male', 'female', 'child', 'x-low', 'low', 'high', 'x-high', 'code',
  'digits', 'continous'
}, '-')
local property = token(l.KEYWORD, css1_property + css2_property)
local value = token('value', css1_value + css2_value)
local keyword = property + value

-- Identifiers.
local identifier = token(l.IDENTIFIER, l.alpha * (l.alnum + S('_-'))^0)

-- Operators.
local operator = token(l.OPERATOR, S('~!#*>+=|.,:;()[]{}'))

-- At rule.
local at_rule = token('at_rule', P('@') * word_match {
  'charset', 'font-face', 'media', 'page', 'import'
})

-- Colors.
local xdigit = l.xdigit
local hex_color = '#' * xdigit * xdigit * xdigit * (xdigit * xdigit * xdigit)^-1
local color_name = word_match {
  'aqua', 'black', 'blue', 'fuchsia', 'gray', 'green', 'lime', 'maroon', 'navy',
  'olive', 'orange', 'purple', 'red', 'silver', 'teal', 'white', 'yellow'
}
local color = token('color', hex_color + color_name)

-- Pseudo.
local pseudo = token(l.CONSTANT, word_match({
  -- Pseudo elements.
  'first-line', 'first-letter', 'before', 'after',
  -- Pseudo classes.
  'first-child', 'link', 'visited', 'hover', 'active', 'focus', 'lang',
}, '-'))

-- Units.
local unit = token('unit', word_match {
  'em', 'ex', 'px', 'pt', 'pc', 'in', 'ft', 'mm', 'cm', 'kHz', 'Hz', 'deg',
  'rad', 'grad', 'ms', 's'
} + '%')

_rules = {
  { 'whitespace', ws },
  { 'keyword', keyword },
  { 'pseudo', pseudo },
  { 'color', color },
  { 'identifier', identifier },
  { 'string', string },
  { 'comment', comment },
  { 'number', number * unit^-1 },
  { 'operator', operator },
  { 'at_rule', at_rule },
  { 'any_char', l.any_char },
}

_tokenstyles = {
  { 'unit', l.style_number },
  { 'value', l.style_nothing..{ bold = true } },
  { 'color', l.style_number },
  { 'at_rule', l.style_preprocessor },
}

_foldsymbols = {
  _patterns = { '[{}]', '/%*', '%*/' },
  [l.OPERATOR] = { ['{'] = 1, ['}'] = -1 },
  [l.COMMENT] = { ['/*'] = 1, ['*/'] = -1 }
}
