public static bool IsCategory(Category cat, char c)
{
switch (cat)
{
case Category.None:
return(false);
case Category.Any:
return(c != '\n');
case Category.AnySingleline:
return(true);
case Category.Word:
return(char.IsLetterOrDigit(c) || CategoryUtils.IsCategory(UnicodeCategory.ConnectorPunctuation, c));
case Category.Digit:
return(char.IsDigit(c));
case Category.WhiteSpace:
return(char.IsWhiteSpace(c));
case Category.EcmaAny:
return(c != '\n');
case Category.EcmaAnySingleline:
return(true);
case Category.EcmaWord:
return(('a' <= c && c <= 'z') || ('A' <= c && c <= 'Z') || ('0' <= c && c <= '9') || '_' == c);
case Category.EcmaDigit:
return('0' <= c && c <= '9');
case Category.EcmaWhiteSpace:
return(c == ' ' || c == '\f' || c == '\n' || c == '\r' || c == '\t' || c == '\v');
case Category.UnicodeL:
return(CategoryUtils.IsCategory(UnicodeCategory.UppercaseLetter, c) || CategoryUtils.IsCategory(UnicodeCategory.LowercaseLetter, c) || CategoryUtils.IsCategory(UnicodeCategory.TitlecaseLetter, c) || CategoryUtils.IsCategory(UnicodeCategory.ModifierLetter, c) || CategoryUtils.IsCategory(UnicodeCategory.OtherLetter, c));
case Category.UnicodeM:
return(CategoryUtils.IsCategory(UnicodeCategory.NonSpacingMark, c) || CategoryUtils.IsCategory(UnicodeCategory.EnclosingMark, c) || CategoryUtils.IsCategory(UnicodeCategory.SpacingCombiningMark, c));
case Category.UnicodeN:
return(CategoryUtils.IsCategory(UnicodeCategory.DecimalDigitNumber, c) || CategoryUtils.IsCategory(UnicodeCategory.LetterNumber, c) || CategoryUtils.IsCategory(UnicodeCategory.OtherNumber, c));
case Category.UnicodeZ:
return(CategoryUtils.IsCategory(UnicodeCategory.SpaceSeparator, c) || CategoryUtils.IsCategory(UnicodeCategory.LineSeparator, c) || CategoryUtils.IsCategory(UnicodeCategory.ParagraphSeparator, c));
case Category.UnicodeP:
return(CategoryUtils.IsCategory(UnicodeCategory.DashPunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.OpenPunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.InitialQuotePunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.ClosePunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.FinalQuotePunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.ConnectorPunctuation, c) || CategoryUtils.IsCategory(UnicodeCategory.OtherPunctuation, c));
case Category.UnicodeS:
return(CategoryUtils.IsCategory(UnicodeCategory.MathSymbol, c) || CategoryUtils.IsCategory(UnicodeCategory.CurrencySymbol, c) || CategoryUtils.IsCategory(UnicodeCategory.ModifierSymbol, c) || CategoryUtils.IsCategory(UnicodeCategory.OtherSymbol, c));
case Category.UnicodeC:
return(CategoryUtils.IsCategory(UnicodeCategory.Control, c) || CategoryUtils.IsCategory(UnicodeCategory.Format, c) || CategoryUtils.IsCategory(UnicodeCategory.PrivateUse, c) || CategoryUtils.IsCategory(UnicodeCategory.Surrogate, c) || CategoryUtils.IsCategory(UnicodeCategory.OtherNotAssigned, c));
case Category.UnicodeLu:
return(CategoryUtils.IsCategory(UnicodeCategory.UppercaseLetter, c));
case Category.UnicodeLl:
return(CategoryUtils.IsCategory(UnicodeCategory.LowercaseLetter, c));
case Category.UnicodeLt:
return(CategoryUtils.IsCategory(UnicodeCategory.TitlecaseLetter, c));
case Category.UnicodeLm:
return(CategoryUtils.IsCategory(UnicodeCategory.ModifierLetter, c));
case Category.UnicodeLo:
return(CategoryUtils.IsCategory(UnicodeCategory.OtherLetter, c));
case Category.UnicodeMn:
return(CategoryUtils.IsCategory(UnicodeCategory.NonSpacingMark, c));
case Category.UnicodeMe:
return(CategoryUtils.IsCategory(UnicodeCategory.EnclosingMark, c));
case Category.UnicodeMc:
return(CategoryUtils.IsCategory(UnicodeCategory.SpacingCombiningMark, c));
case Category.UnicodeNd:
return(CategoryUtils.IsCategory(UnicodeCategory.DecimalDigitNumber, c));
case Category.UnicodeNl:
return(CategoryUtils.IsCategory(UnicodeCategory.LetterNumber, c));
case Category.UnicodeNo:
return(CategoryUtils.IsCategory(UnicodeCategory.OtherNumber, c));
case Category.UnicodeZs:
return(CategoryUtils.IsCategory(UnicodeCategory.SpaceSeparator, c));
case Category.UnicodeZl:
return(CategoryUtils.IsCategory(UnicodeCategory.LineSeparator, c));
case Category.UnicodeZp:
return(CategoryUtils.IsCategory(UnicodeCategory.ParagraphSeparator, c));
case Category.UnicodePd:
return(CategoryUtils.IsCategory(UnicodeCategory.DashPunctuation, c));
case Category.UnicodePs:
return(CategoryUtils.IsCategory(UnicodeCategory.OpenPunctuation, c));
case Category.UnicodePi:
return(CategoryUtils.IsCategory(UnicodeCategory.InitialQuotePunctuation, c));
case Category.UnicodePe:
return(CategoryUtils.IsCategory(UnicodeCategory.ClosePunctuation, c));
case Category.UnicodePf:
return(CategoryUtils.IsCategory(UnicodeCategory.FinalQuotePunctuation, c));
case Category.UnicodePc:
return(CategoryUtils.IsCategory(UnicodeCategory.ConnectorPunctuation, c));
case Category.UnicodePo:
return(CategoryUtils.IsCategory(UnicodeCategory.OtherPunctuation, c));
case Category.UnicodeSm:
return(CategoryUtils.IsCategory(UnicodeCategory.MathSymbol, c));
case Category.UnicodeSc:
return(CategoryUtils.IsCategory(UnicodeCategory.CurrencySymbol, c));
case Category.UnicodeSk:
return(CategoryUtils.IsCategory(UnicodeCategory.ModifierSymbol, c));
case Category.UnicodeSo:
return(CategoryUtils.IsCategory(UnicodeCategory.OtherSymbol, c));
case Category.UnicodeCc:
return(CategoryUtils.IsCategory(UnicodeCategory.Control, c));
case Category.UnicodeCf:
return(CategoryUtils.IsCategory(UnicodeCategory.Format, c));
case Category.UnicodeCo:
return(CategoryUtils.IsCategory(UnicodeCategory.PrivateUse, c));
case Category.UnicodeCs:
return(CategoryUtils.IsCategory(UnicodeCategory.Surrogate, c));
case Category.UnicodeCn:
return(CategoryUtils.IsCategory(UnicodeCategory.OtherNotAssigned, c));
case Category.UnicodeBasicLatin:
return('\0' <= c && c <= '\u007f');
case Category.UnicodeLatin1Supplement:
return('\u0080' <= c && c <= 'ÿ');
case Category.UnicodeLatinExtendedA:
return('Ā' <= c && c <= 'ſ');
case Category.UnicodeLatinExtendedB:
return('ƀ' <= c && c <= 'ɏ');
case Category.UnicodeIPAExtensions:
return('ɐ' <= c && c <= 'ʯ');
case Category.UnicodeSpacingModifierLetters:
return('ʰ' <= c && c <= '˿');
case Category.UnicodeCombiningDiacriticalMarks:
return('̀' <= c && c <= 'ͯ');
case Category.UnicodeGreek:
return('Ͱ' <= c && c <= 'Ͽ');
case Category.UnicodeCyrillic:
return('Ѐ' <= c && c <= 'ӿ');
case Category.UnicodeArmenian:
return('' <= c && c <= '֏');
case Category.UnicodeHebrew:
return('' <= c && c <= '');
case Category.UnicodeArabic:
return('' <= c && c <= 'ۿ');
case Category.UnicodeSyriac:
return('܀' <= c && c <= 'ݏ');
case Category.UnicodeThaana:
return('ހ' <= c && c <= '');
case Category.UnicodeDevanagari:
return('ऀ' <= c && c <= 'ॿ');
case Category.UnicodeBengali:
return('ঀ' <= c && c <= '');
case Category.UnicodeGurmukhi:
return('' <= c && c <= '');
case Category.UnicodeGujarati:
return('' <= c && c <= '૿');
case Category.UnicodeOriya:
return('' <= c && c <= '');
case Category.UnicodeTamil:
return('' <= c && c <= '');
case Category.UnicodeTelugu:
return('ఀ' <= c && c <= '౿');
case Category.UnicodeKannada:
return('ಀ' <= c && c <= '');
case Category.UnicodeMalayalam:
return('ഀ' <= c && c <= 'ൿ');
case Category.UnicodeSinhala:
return('' <= c && c <= '');
case Category.UnicodeThai:
return('' <= c && c <= '');
case Category.UnicodeLao:
return('' <= c && c <= '');
case Category.UnicodeTibetan:
return('ༀ' <= c && c <= '');
case Category.UnicodeMyanmar:
return('က' <= c && c <= '႟');
case Category.UnicodeGeorgian:
return('Ⴀ' <= c && c <= 'ჿ');
case Category.UnicodeHangulJamo:
return('ᄀ' <= c && c <= 'ᇿ');
case Category.UnicodeEthiopic:
return('ሀ' <= c && c <= '');
case Category.UnicodeCherokee:
return('Ꭰ' <= c && c <= '');
case Category.UnicodeUnifiedCanadianAboriginalSyllabics:
return('᐀' <= c && c <= 'ᙿ');
case Category.UnicodeOgham:
return('\u1680' <= c && c <= '');
case Category.UnicodeRunic:
return('ᚠ' <= c && c <= '');
case Category.UnicodeKhmer:
return('ក' <= c && c <= '');
case Category.UnicodeMongolian:
return('᠀' <= c && c <= '');
case Category.UnicodeLatinExtendedAdditional:
return('Ḁ' <= c && c <= 'ỿ');
case Category.UnicodeGreekExtended:
return('ἀ' <= c && c <= '');
case Category.UnicodeGeneralPunctuation:
return('\u2000' <= c && c <= '');
case Category.UnicodeSuperscriptsandSubscripts:
return('⁰' <= c && c <= '');
case Category.UnicodeCurrencySymbols:
return('₠' <= c && c <= '');
case Category.UnicodeCombiningMarksforSymbols:
return('⃐' <= c && c <= '');
case Category.UnicodeLetterlikeSymbols:
return('℀' <= c && c <= '⅏');
case Category.UnicodeNumberForms:
return('⅐' <= c && c <= '');
case Category.UnicodeArrows:
return('←' <= c && c <= '⇿');
case Category.UnicodeMathematicalOperators:
return('∀' <= c && c <= '⋿');
case Category.UnicodeMiscellaneousTechnical:
return('⌀' <= c && c <= '⏿');
case Category.UnicodeControlPictures:
return('␀' <= c && c <= '');
case Category.UnicodeOpticalCharacterRecognition:
return('⑀' <= c && c <= '');
case Category.UnicodeEnclosedAlphanumerics:
return('①' <= c && c <= '⓿');
case Category.UnicodeBoxDrawing:
return('─' <= c && c <= '╿');
case Category.UnicodeBlockElements:
return('▀' <= c && c <= '▟');
case Category.UnicodeGeometricShapes:
return('■' <= c && c <= '◿');
case Category.UnicodeMiscellaneousSymbols:
return('☀' <= c && c <= '⛿');
case Category.UnicodeDingbats:
return('✀' <= c && c <= '➿');
case Category.UnicodeBraillePatterns:
return('⠀' <= c && c <= '⣿');
case Category.UnicodeCJKRadicalsSupplement:
return('⺀' <= c && c <= '');
case Category.UnicodeKangxiRadicals:
return('⼀' <= c && c <= '');
case Category.UnicodeIdeographicDescriptionCharacters:
return('⿰' <= c && c <= '⿿');
case Category.UnicodeCJKSymbolsandPunctuation:
return('\u3000' <= c && c <= '〿');
case Category.UnicodeHiragana:
return('' <= c && c <= 'ゟ');
case Category.UnicodeKatakana:
return('゠' <= c && c <= 'ヿ');
case Category.UnicodeBopomofo:
return('' <= c && c <= 'ㄯ');
case Category.UnicodeHangulCompatibilityJamo:
return('' <= c && c <= '');
case Category.UnicodeKanbun:
return('㆐' <= c && c <= '㆟');
case Category.UnicodeBopomofoExtended:
return('ㆠ' <= c && c <= 'ㆿ');
case Category.UnicodeEnclosedCJKLettersandMonths:
return('㈀' <= c && c <= '㋿');
case Category.UnicodeCJKCompatibility:
return('㌀' <= c && c <= '㏿');
case Category.UnicodeCJKUnifiedIdeographsExtensionA:
return('㐀' <= c && c <= '䶵');
case Category.UnicodeCJKUnifiedIdeographs:
return('一' <= c && c <= '鿿');
case Category.UnicodeYiSyllables:
return('ꀀ' <= c && c <= '');
case Category.UnicodeYiRadicals:
return('꒐' <= c && c <= '');
case Category.UnicodeHangulSyllables:
return('가' <= c && c <= '힣');
case Category.UnicodeHighSurrogates:
return('\ud800' <= c && c <= '\udb7f');
case Category.UnicodeHighPrivateUseSurrogates:
return('\udb80' <= c && c <= '\udbff');
case Category.UnicodeLowSurrogates:
return('\udc00' <= c && c <= '\udfff');
case Category.UnicodePrivateUse:
return('' <= c && c <= '');
case Category.UnicodeCJKCompatibilityIdeographs:
return('豈' <= c && c <= '');
case Category.UnicodeAlphabeticPresentationForms:
return('ff' <= c && c <= 'ﭏ');
case Category.UnicodeArabicPresentationFormsA:
return('ﭐ' <= c && c <= '﷿');
case Category.UnicodeCombiningHalfMarks:
return('︠' <= c && c <= '︯');
case Category.UnicodeCJKCompatibilityForms:
return('︰' <= c && c <= '﹏');
case Category.UnicodeSmallFormVariants:
return('﹐' <= c && c <= '');
case Category.UnicodeArabicPresentationFormsB:
return('ﹰ' <= c && c <= '');
case Category.UnicodeSpecials:
return(('' <= c && c <= '') || ('' <= c && c <= '�'));
case Category.UnicodeHalfwidthandFullwidthForms:
return('' <= c && c <= '');
case Category.UnicodeOldItalic:
case Category.UnicodeGothic:
case Category.UnicodeDeseret:
case Category.UnicodeByzantineMusicalSymbols:
case Category.UnicodeMusicalSymbols:
case Category.UnicodeMathematicalAlphanumericSymbols:
case Category.UnicodeCJKUnifiedIdeographsExtensionB:
case Category.UnicodeCJKCompatibilityIdeographsSupplement:
case Category.UnicodeTags:
return(false);
default:
return(false);
}
}
private bool IsWordChar(char c)
{
return(CategoryUtils.IsCategory(Category.Word, c));
}
private bool EvalChar(Mode mode, ref int ptr, ref int pc, bool multi)
{
bool consumed = false;
char c = '\0';
bool negate;
bool ignore;
do
{
ushort word = program[pc];
OpCode op = (OpCode)(word & 0x00ff);
OpFlags flags = (OpFlags)(word & 0xff00);
++pc;
ignore = (flags & OpFlags.IgnoreCase) != 0;
// consume character: the direction of an In construct is
// determined by the direction of its first op
if (!consumed)
{
if ((flags & OpFlags.RightToLeft) != 0)
{
if (ptr <= 0)
{
return(false);
}
c = text[--ptr];
}
else
{
if (ptr >= text_end)
{
return(false);
}
c = text[ptr++];
}
if (ignore)
{
c = Char.ToLower(c);
}
consumed = true;
}
// negate flag
negate = (flags & OpFlags.Negate) != 0;
// execute op
switch (op)
{
case OpCode.True:
return(true);
case OpCode.False:
return(false);
case OpCode.Character: {
if (c == (char)program[pc++])
{
return(!negate);
}
break;
}
case OpCode.Category: {
if (CategoryUtils.IsCategory((Category)program[pc++], c))
{
return(!negate);
}
break;
}
case OpCode.NotCategory: {
if (!CategoryUtils.IsCategory((Category)program[pc++], c))
{
return(!negate);
}
break;
}
case OpCode.Range: {
int lo = (char)program[pc++];
int hi = (char)program[pc++];
if (lo <= c && c <= hi)
{
return(!negate);
}
break;
}
case OpCode.Set: {
int lo = (char)program[pc++];
int len = (char)program[pc++];
int bits = pc;
pc += len;
int i = (int)c - lo;
if (i < 0 || i >= len << 4)
{
break;
}
if ((program[bits + (i >> 4)] & (1 << (i & 0xf))) != 0)
{
return(!negate);
}
break;
}
}
} while (multi);
return(negate);
}
private bool EvalChar(Interpreter.Mode mode, ref int ptr, ref int pc, bool multi)
{
bool flag = false;
char c = '\0';
bool flag3;
for (;;)
{
ushort num = this.program[pc];
OpCode opCode = (OpCode)(num & 255);
OpFlags opFlags = (OpFlags)(num & 65280);
pc++;
bool flag2 = (ushort)(opFlags & OpFlags.IgnoreCase) != 0;
if (!flag)
{
if ((ushort)(opFlags & OpFlags.RightToLeft) != 0)
{
if (ptr <= 0)
{
break;
}
c = this.text[--ptr];
}
else
{
if (ptr >= this.text_end)
{
return(false);
}
c = this.text[ptr++];
}
if (flag2)
{
c = char.ToLower(c);
}
flag = true;
}
flag3 = ((ushort)(opFlags & OpFlags.Negate) != 0);
switch (opCode)
{
case OpCode.False:
return(false);
case OpCode.True:
return(true);
case OpCode.Character:
if (c == (char)this.program[pc++])
{
goto Block_7;
}
break;
case OpCode.Category:
if (CategoryUtils.IsCategory((Category)this.program[pc++], c))
{
goto Block_8;
}
break;
case OpCode.NotCategory:
if (!CategoryUtils.IsCategory((Category)this.program[pc++], c))
{
goto Block_9;
}
break;
case OpCode.Range:
{
int num2 = (int)this.program[pc++];
int num3 = (int)this.program[pc++];
if (num2 <= (int)c && (int)c <= num3)
{
goto Block_11;
}
break;
}
case OpCode.Set:
{
int num4 = (int)this.program[pc++];
int num5 = (int)this.program[pc++];
int num6 = pc;
pc += num5;
int num7 = (int)c - num4;
if (num7 >= 0 && num7 < num5 << 4)
{
if (((int)this.program[num6 + (num7 >> 4)] & 1 << (num7 & 15)) != 0)
{
goto Block_13;
}
}
break;
}
}
if (!multi)
{
return(flag3);
}
}
return(false);
Block_7:
return(!flag3);
Block_8:
return(!flag3);
Block_9:
return(!flag3);
Block_11:
return(!flag3);
Block_13:
return(!flag3);
}