314 lines
14 KiB
C#
314 lines
14 KiB
C#
//-----------------------------------------------------------------------
|
|
//-----------------------------------------------------------------------
|
|
// file="ExpSourceReader.cs"
|
|
// Project: StgSharp
|
|
// AuthorGroup: Nitload Space
|
|
// Copyright (c) Nitload Space. All rights reserved.
|
|
//
|
|
// 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.
|
|
//
|
|
//-----------------------------------------------------------------------
|
|
//-----------------------------------------------------------------------
|
|
using CommunityToolkit.HighPerformance;
|
|
|
|
using StgSharp.HighPerformance;
|
|
|
|
using System;
|
|
using System.Linq;
|
|
using System.Text.RegularExpressions;
|
|
|
|
namespace StgSharp.Script.Express
|
|
{
|
|
public partial class ExpSourceReader
|
|
{
|
|
|
|
private const int
|
|
MultiLineEnd = 0x0029002A; // *)
|
|
|
|
private const string Token = "token", End = "end", Rest = "rest";
|
|
|
|
private bool _isReadingMultiLineComment;
|
|
private int _current, _lineNum;
|
|
private IScriptSourceProvider _provider;
|
|
|
|
private Regex _nextWordTokenPattern = GetNextWordTokenPattern(),
|
|
_nextStringLiteralPattern = GetStringLiteralPattern(),
|
|
_nextNumberLiteralPattern = GetNumberLiteralPattern(),
|
|
_skipBlankPattern = GetSkipBlankPattern();
|
|
private string _lineCache;
|
|
private Token _last;
|
|
|
|
public ExpSourceReader( IScriptSourceProvider provider )
|
|
{
|
|
_provider = provider;
|
|
_current = 0;
|
|
_lineCache = string.Empty;
|
|
_isReadingMultiLineComment = false;
|
|
}
|
|
|
|
public bool IsEmpty
|
|
{
|
|
get => ( ( string.IsNullOrEmpty( _lineCache ) || _current >=
|
|
_lineCache.Length ) ) && _provider.IsEmpty;
|
|
}
|
|
|
|
public int LineNumber
|
|
{
|
|
get => _provider.Location;
|
|
}
|
|
|
|
/// <summary>
|
|
/// <para>Read code until end of a line. Lines in multi-line comment will be ignored. Line
|
|
/// begins with part of multi-line comment will automatically remove the comment part, but
|
|
/// beginning with a full multi-line comment will not causing removing.</para> <para> (*Just
|
|
/// Like The Comment Here*) Will Not Be Removed </para>
|
|
/// </summary>
|
|
/// <returns></returns>
|
|
public unsafe ReadOnlySpan<char> ReadLine()
|
|
{
|
|
bool lineOver = string.IsNullOrEmpty( _lineCache ) || _current >=
|
|
_lineCache.Length;
|
|
while( lineOver || _isReadingMultiLineComment ) {
|
|
if( lineOver ) {
|
|
do {
|
|
_lineCache = _provider.ReadLine( out _lineNum );
|
|
} while (string.IsNullOrEmpty( _lineCache ));
|
|
_current = 0;
|
|
}
|
|
if( _isReadingMultiLineComment ) {
|
|
int index;
|
|
fixed( char* cPtr = _lineCache.AsSpan( _current ) ) {
|
|
index = UnsafeCompute.IndexOfCharPair(
|
|
cPtr, MultiLineEnd, _lineCache.Length );
|
|
}
|
|
if( index == -1 ) {
|
|
_lineCache = string.Empty;
|
|
} else {
|
|
_isReadingMultiLineComment = false;
|
|
_current += index + 2;
|
|
}
|
|
}
|
|
lineOver = string.IsNullOrEmpty( _lineCache ) || _current >=
|
|
_lineCache.Length;
|
|
}
|
|
return _lineCache.AsSpan().Slice( _current );
|
|
}
|
|
|
|
public unsafe Token ReadToken()
|
|
{
|
|
int begin, end, rest;
|
|
readLine:
|
|
ReadOnlySpan<char> source = ReadLine();
|
|
char c = source[ 0 ];
|
|
|
|
if( char.IsLetter( c ) ) {
|
|
Match match = _nextWordTokenPattern.Match(
|
|
_lineCache, _current );
|
|
if( match.Success ) {
|
|
begin = match.Groups[ Token ].Index;
|
|
end = match.Groups[ End ].Index;
|
|
rest = match.Groups[ Rest ].Index;
|
|
_current = rest;
|
|
_last = new(
|
|
ExpCompile.PoolString( source[ .. ( end - begin ) ] ),
|
|
_lineNum, begin, TokenFlag.Member );
|
|
return _last;
|
|
} else {
|
|
throw new ExpInvalidTokenException( _current );
|
|
}
|
|
} else if( char.IsPunctuation( c ) || char.IsSymbol( c ) ) {
|
|
switch( c ) {
|
|
case '"':
|
|
char cNext = source[ 1 ];
|
|
if( cNext == '\"' ) //empty string
|
|
{
|
|
begin = _current;
|
|
_current += 2;
|
|
return new(
|
|
string.Empty, _lineNum, begin,
|
|
TokenFlag.String );
|
|
}
|
|
Match match = _nextStringLiteralPattern.Match(
|
|
_lineCache, _current );
|
|
if( match.Success ) {
|
|
begin = match.Groups[ "token" ].Index;
|
|
end = match.Groups[ "end" ].Index;
|
|
rest = match.Groups[ "rest" ].Index;
|
|
_current = rest;
|
|
_last = new(
|
|
ExpCompile.PoolString(
|
|
source[ 1..( end - begin ) ] ),
|
|
_lineNum, begin, TokenFlag.String );
|
|
return _last;
|
|
} else {
|
|
throw new ExpInvalidCharException( '\"' );
|
|
}
|
|
case '(':
|
|
cNext = source[ 1 ];
|
|
if( cNext == '*' ) {
|
|
_isReadingMultiLineComment = true;
|
|
_current += 2;
|
|
goto readLine;
|
|
} else {
|
|
begin = _current;
|
|
_current++;
|
|
_last = new(
|
|
ExpCompile.PoolString( source[ ..1 ] ),
|
|
_lineNum, begin, TokenFlag.Separator_Left );
|
|
return _last;
|
|
}
|
|
case ')' or '}':
|
|
begin = _current;
|
|
_current++;
|
|
_last = new Token(
|
|
ExpCompile.PoolString( ")" ), _lineNum, begin,
|
|
TokenFlag.Separator_Right );
|
|
return _last;
|
|
case '-':
|
|
|
|
// 1. -number
|
|
// 2. -- comment
|
|
// 3. - number type param(UNARY)
|
|
// 4. param - param(BINARY)
|
|
cNext = source[ 1 ];
|
|
if( char.IsNumber( cNext ) ) {
|
|
match = _nextNumberLiteralPattern.Match(
|
|
_lineCache, _current );
|
|
if( match.Success ) {
|
|
begin = match.Groups[ Token ].Index;
|
|
end = match.Groups[ End ].Index;
|
|
rest = match.Groups[ Rest ].Index;
|
|
_current = rest;
|
|
return new(
|
|
ExpCompile.PoolString(
|
|
source[ ..( end - begin ) ] ),
|
|
_lineNum, begin, TokenFlag.Number );
|
|
} else {
|
|
throw new ExpInvalidTokenException( _current );
|
|
}
|
|
} else if( cNext == '-' ) {
|
|
_lineCache = string.Empty;
|
|
_current = 0;
|
|
goto readLine;
|
|
} else {
|
|
begin = _current;
|
|
_current++;
|
|
if( _last.Flag != TokenFlag.Member ) {
|
|
_last = new(
|
|
ExpCompile.PoolString( source[ ..1 ] ),
|
|
_lineNum, begin, TokenFlag.Symbol_Unary );
|
|
} else {
|
|
_last = new(
|
|
ExpCompile.PoolString( source[ ..1 ] ),
|
|
_lineNum, begin, TokenFlag.Symbol_Binary );
|
|
}
|
|
return _last;
|
|
}
|
|
case '{':
|
|
begin = _current;
|
|
_current++;
|
|
return new Token(
|
|
ExpCompile.PoolString( "{" ), _lineNum, begin,
|
|
TokenFlag.Separator_Left );
|
|
case '[':
|
|
begin = _current;
|
|
_current++;
|
|
return new Token(
|
|
ExpCompile.PoolString( "[" ), _lineNum, begin,
|
|
TokenFlag.Index_Left );
|
|
case ']':
|
|
begin = _current;
|
|
_current++;
|
|
return new Token(
|
|
ExpCompile.PoolString( "]" ), _lineNum, begin,
|
|
TokenFlag.Index_Right );
|
|
case ';' or ',':
|
|
begin = _current;
|
|
_current++;
|
|
return new Token(
|
|
ExpCompile.PoolString( source[ ..1 ] ), _lineNum,
|
|
begin, TokenFlag.Separator_Single );
|
|
case ':' or '+' or '/' or '\\' or '*' or '.':
|
|
begin = _current;
|
|
_current++;
|
|
return new(
|
|
ExpCompile.PoolString( source[ ..1 ] ), _lineNum,
|
|
begin, TokenFlag.Symbol_Binary );
|
|
default:
|
|
throw new ExpInvalidCharException( c );
|
|
}
|
|
} else if( char.IsNumber( c ) ) {
|
|
Match match = _nextNumberLiteralPattern.Match(
|
|
_lineCache, _current );
|
|
if( match.Success ) {
|
|
begin = match.Groups[ Token ].Index;
|
|
end = match.Groups[ End ].Index;
|
|
rest = match.Groups[ Rest ].Index;
|
|
_current = rest;
|
|
string str = ExpCompile.PoolString(
|
|
source[ ..( end - begin ) ] );
|
|
TokenFlag flag;
|
|
if( ReferenceEquals( str, ExpCompile.KeyWord.NOT ) ) {
|
|
flag = TokenFlag.Symbol_Unary;
|
|
} else {
|
|
flag = ExpCompile.LetterIsOperator( str ) ?
|
|
TokenFlag.Symbol_Binary : TokenFlag.Member;
|
|
}
|
|
return new( str, _lineNum, begin, flag );
|
|
} else {
|
|
throw new ExpInvalidTokenException( _current );
|
|
}
|
|
} else if( char.IsWhiteSpace( c ) ) {
|
|
Match match = _skipBlankPattern.Match( _lineCache, _current );
|
|
if( match.Success ) {
|
|
rest = match.Groups[ Rest ].Index;
|
|
_current = rest;
|
|
goto readLine;
|
|
} else {
|
|
throw new ExpInvalidTokenException( _current );
|
|
}
|
|
} else {
|
|
throw new ExpInvalidCharException( c );
|
|
}
|
|
}
|
|
|
|
[GeneratedRegex(
|
|
@"(?<token>[a-zA-Z][a-zA-Z0-9_]*)(?<end>\s*?)(?<rest>\S|$)",
|
|
RegexOptions.Singleline )]
|
|
private static partial Regex GetNextWordTokenPattern();
|
|
|
|
[GeneratedRegex(
|
|
@"(?<token>-?\s*?[0-9]+(?:\.[0-9]*)?)(?<end>\s*?)(?<rest>\S|$)",
|
|
RegexOptions.Singleline )]
|
|
private static partial Regex GetNumberLiteralPattern();
|
|
|
|
[GeneratedRegex( @"(?:\s+?)(?<rest>\S|$)", RegexOptions.Singleline )]
|
|
private static partial Regex GetSkipBlankPattern();
|
|
|
|
[GeneratedRegex(
|
|
@"(?<token>"")(?:.*?[^\\](?:\\\\)*?)(?<end>"")\s*?(?<rest>\S|$)",
|
|
RegexOptions.Singleline )]
|
|
private static partial Regex GetStringLiteralPattern();
|
|
|
|
}
|
|
}
|