From 3570869c9ae2c4df14b15423789919e514322916 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marc=20Andr=C3=A9=20Tanner?= <mat@brain-dump.org>
Date: Wed, 7 Dec 2016 16:49:29 +0100
Subject: Move all lua related files to lua/ subfolder

Also remove the lexers sub directory from the Lua search path.
As a result we attempt to open fewer files during startup:

 $ strace -e open -o log ./vis +q config.h && wc -l log

In order to avoid having to modifiy all lexers which `require('lexer')`
we instead place a symlink in the top level directory.

 $ ./configure --disable-lua
 $ rm -rf lua

Should result in a source tree with most lua specifc functionality
removed.
---
 lua/lexers/php.lua | 99 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 99 insertions(+)
 create mode 100644 lua/lexers/php.lua

(limited to 'lua/lexers/php.lua')

diff --git a/lua/lexers/php.lua b/lua/lexers/php.lua
new file mode 100644
index 0000000..22eb960
--- /dev/null
+++ b/lua/lexers/php.lua
@@ -0,0 +1,99 @@
+-- Copyright 2006-2016 Mitchell mitchell.att.foicica.com. See LICENSE.
+-- PHP LPeg lexer.
+
+local l = require('lexer')
+local token, word_match = l.token, l.word_match
+local P, R, S, V = lpeg.P, lpeg.R, lpeg.S, lpeg.V
+
+local M = {_NAME = 'php'}
+
+-- Whitespace.
+local ws = token(l.WHITESPACE, l.space^1)
+
+-- Comments.
+local line_comment = (P('//') + '#') * l.nonnewline^0
+local block_comment = '/*' * (l.any - '*/')^0 * P('*/')^-1
+local comment = token(l.COMMENT, block_comment + line_comment)
+
+-- Strings.
+local sq_str = l.delimited_range("'")
+local dq_str = l.delimited_range('"')
+local bt_str = l.delimited_range('`')
+local heredoc = '<<<' * P(function(input, index)
+  local _, e, delimiter = input:find('([%a_][%w_]*)[\n\r\f]+', index)
+  if delimiter then
+    local _, e = input:find('[\n\r\f]+'..delimiter, e)
+    return e and e + 1
+  end
+end)
+local string = token(l.STRING, sq_str + dq_str + bt_str + heredoc)
+-- TODO: interpolated code.
+
+-- Numbers.
+local number = token(l.NUMBER, l.float + l.integer)
+
+-- Keywords.
+local keyword = token(l.KEYWORD, word_match{
+  'and', 'array', 'as', 'bool', 'boolean', 'break', 'case',
+  'cfunction', 'class', 'const', 'continue', 'declare', 'default',
+  'die', 'directory', 'do', 'double', 'echo', 'else', 'elseif',
+  'empty', 'enddeclare', 'endfor', 'endforeach', 'endif',
+  'endswitch', 'endwhile', 'eval', 'exit', 'extends', 'false',
+  'float', 'for', 'foreach', 'function', 'global', 'if', 'include',
+  'include_once', 'int', 'integer', 'isset', 'list', 'new', 'null',
+  'object', 'old_function', 'or', 'parent', 'print', 'real',
+  'require', 'require_once', 'resource', 'return', 'static',
+  'stdclass', 'string', 'switch', 'true', 'unset', 'use', 'var',
+  'while', 'xor', '__class__', '__file__', '__function__',
+  '__line__', '__sleep', '__wakeup'
+})
+
+-- Variables.
+local word = (l.alpha + '_' + R('\127\255')) * (l.alnum + '_' + R('\127\255'))^0
+local variable = token(l.VARIABLE, '$' * word)
+
+-- Identifiers.
+local identifier = token(l.IDENTIFIER, word)
+
+-- Operators.
+local operator = token(l.OPERATOR, S('!@%^*&()-+=|/.,;:<>[]{}') + '?' * -P('>'))
+
+M._rules = {
+  {'whitespace', ws},
+  {'keyword', keyword},
+  {'identifier', identifier},
+  {'string', string},
+  {'variable', variable},
+  {'comment', comment},
+  {'number', number},
+  {'operator', operator},
+}
+
+-- Embedded in HTML.
+local html = l.load('html')
+
+-- Embedded PHP.
+local php_start_rule = token('php_tag', '<?' * ('php' * l.space)^-1)
+local php_end_rule = token('php_tag', '?>')
+l.embed_lexer(html, M, php_start_rule, php_end_rule)
+
+M._tokenstyles = {
+  php_tag = l.STYLE_EMBEDDED
+}
+
+local _foldsymbols = html._foldsymbols
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '<%?'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '%?>'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '/%*'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '%*/'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '//'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '#'
+_foldsymbols._patterns[#_foldsymbols._patterns + 1] = '[{}()]'
+_foldsymbols.php_tag = {['<?'] = 1, ['?>'] = -1}
+_foldsymbols[l.COMMENT]['/*'], _foldsymbols[l.COMMENT]['*/'] = 1, -1
+_foldsymbols[l.COMMENT]['//'] = l.fold_line_comments('//')
+_foldsymbols[l.COMMENT]['#'] = l.fold_line_comments('#')
+_foldsymbols[l.OPERATOR] = {['{'] = 1, ['}'] = -1, ['('] = 1, [')'] = -1}
+M._foldsymbols = _foldsymbols
+
+return M
-- 
cgit v1.2.3