PL/SQL に対応する
PL/SQL用に処理を変更しなければいけないのは、
・「--」〜は単一行コメント
・「'」〜「'」は文字列
・「"」〜「"」は識別子
などである。
//読み込んだ文字の種類を取得・状態を更新
protected override Token getCurrToken(char cPrev, char cCurr, char cNext)
{
Token currToken = new Token(cCurr.ToString(), "その他");do
{
if ((_state == "その他") || (_state == "区切り記号") || (_state == "不明"))
{
if (cCurr == '-')
{
if (cNext == '-')
_state = "単一行コメント";
else
_state = "区切り記号";
}
else if (cCurr == '/')
{
if (cNext == '*')
_state = "複数行コメント";
else
_state = "区切り記号";
}
else if (cCurr == '\"')
_state = "特殊文字";else if (cCurr == '\'')
_state = "文字列";else if (Char.IsLetter(cCurr) || (cCurr == '_'))
_state = "識別子";else if (Char.IsDigit(cCurr))
_state = "数字";else if (Char.IsPunctuation(cCurr) || Char.IsSymbol(cCurr))
_state = "区切り記号";else
_state = "その他";if (_state == "区切り記号")
{
if (_operators.IndexOf(cCurr) >= 0)
currToken.tokenKind = "演算子";
else
currToken.tokenKind = "区切り記号";
}
else if ((_state == "単一行コメント") || (_state == "複数行コメント"))
currToken.tokenKind = "コメント";else if (_state == "特殊文字")
currToken.tokenKind = "識別子";else
currToken.tokenKind = _state;
}else if (_state == "複数行コメント")
{
currToken.tokenKind = "コメント";if ((cCurr == '/') && (cPrev == '*'))
_state = "その他";
}else if (_state == "単一行コメント")
{
currToken.tokenKind = "コメント";if (cCurr == '\n')
{
currToken.tokenKind = "その他";
_state = "その他";
}
}else if (_state == "特殊文字")
{
currToken.tokenKind = "識別子";if (cCurr == '\"')
_state = "その他";
}else if (_state == "文字列")
{
currToken.tokenKind = "文字列";if (cCurr == '\'')
_state = "その他";
}else if (_state == "識別子")
{
currToken.tokenKind = "識別子";if (!Char.IsLetter(cCurr) && !Char.IsDigit(cCurr) && (cCurr != '_'))
{
_state = "不明";//文字種が変わって、前のトークンが、"." でなければ、識別子が 予約語ではないか 確認する
if ((prevToken != null) && (prevToken.tokenString != "."))
{
int idxKeyWord = _keyWordsNoCase.IndexOf(mikakuteiToken.tokenString.ToLower());
if (idxKeyWord > 0)
{
mikakuteiToken.tokenKind = "予約語";
mikakuteiToken.tokenString = _keyWords[idxKeyWord];
}
}
}
}else if (_state == "数字")
{
currToken.tokenKind = "数字";if ((cCurr == '.') && (cNext == '.'))
_state = "不明";else if (!Char.IsLetter(cCurr) && !Char.IsDigit(cCurr) && (cCurr != '.'))
{
if ((cCurr == '+') || (cCurr == '-'))
{
//1つ前の文字が "e" か "E" か
if ((cPrev != 'e') && (cPrev != 'E'))
_state = "不明";
}
else
_state = "不明";
}
}} while(_state == "不明");
return currToken;
}