public CTokenReader ReadUpToNewLine()
{
var ReadedTokens = new List <CToken>();
while (Current.Type != CTokenType.NewLine)
{
ReadedTokens.Add(Current);
MoveNextSpace();
}
ReadedTokens.Add(new CToken()
{
Raw = "", Type = CTokenType.End
});
var CTokenReader = new CTokenReader(ReadedTokens);
CTokenReader.MoveNextSpace();
return(CTokenReader);
}
/// <summary>
///
/// </summary>
/// <returns></returns>
private string[] ParseParameterList(CTokenReader Tokens, bool JustIdentifiers = false)
{
//Console.WriteLine("++++++++");
var Params = new List<string>();
Tokens.ExpectCurrentAndMoveNextSpace("(");
while (Tokens.HasMore && Tokens.Current.Raw != ")")
{
string Param = "";
if (JustIdentifiers)
{
Param = Tokens.Current.Raw;
Tokens.MoveNextNoSpace();
if (Tokens.Current.Raw == ",")
{
Tokens.ExpectCurrentAndMoveNextNoSpace(",");
}
}
else
{
int OpenCount = 0;
while (Tokens.HasMore)
{
if (Tokens.Current.Raw == ")")
{
if (OpenCount <= 0)
{
break;
}
else
{
OpenCount--;
}
}
Param += Tokens.Current.Raw;
if (Tokens.Current.Raw == "(") OpenCount++;
Tokens.MoveNextSpace();
if (Tokens.Current.Raw == "," && OpenCount == 0)
{
Tokens.ExpectCurrentAndMoveNextNoSpace(",");
break;
}
}
}
//Console.WriteLine("aa: {0} : {1}", Param, Tokens.Current);
Params.Add(Param);
}
//Console.WriteLine("--------");
Tokens.ExpectCurrentAndMoveNextSpace(")");
return Params.ToArray();
}
/// <summary>
/// TODO: Have to refactor ParseIdentifier + Expact. They have repeated code!!!
/// </summary>
private void ParseIdentifier(CTokenReader Tokens)
{
Tokens.ExpectCurrentType(CTokenType.Identifier);
var Identifier = Tokens.Current.Raw;
Tokens.MoveNextSpace();
if (Context.Macros.ContainsKey(Identifier))
{
var Macro = Context.Macros[Identifier];
var MacroFunction = Context.Macros[Identifier] as MacroFunction;
if (MacroFunction != null)
{
if (Tokens.Current.Type == CTokenType.Space)
{
Tokens.MoveNextNoSpace();
}
if (Tokens.Current.Raw != "(")
{
throw (new Exception(String.Format("Trying to use a function-like macro without calling it? MACRO: {0}, Token: {1}", Identifier, Tokens.Current)));
}
}
if (MacroFunction != null)
{
var Parameters = ParseParameterList(Tokens, JustIdentifiers: false);
for (int n = 0; n < Parameters.Length; n++)
{
//Console.WriteLine(" {0}", Parameters[n]);
Parameters[n] = Expand(Parameters[n], null, null);
//Console.WriteLine(" -> {0}", Parameters[n]);
}
var Map = MapFunctionParameters(MacroFunction.Parameters, Parameters);
Identifier = Expand(MacroFunction.Replacement, Map, new HashSet<string>(new[] { Identifier }));
}
else
{
var MacroConstant = Macro as MacroConstant;
Identifier = Expand(MacroConstant.Replacement, null, new HashSet<string>(new[] { Identifier }));
//Console.WriteLine("a: {0}", MacroConstant.Replacement);
}
}
else
{
//Identifier = Identifier;
}
Context.TextWriter.Write(ReplaceSimpleVariable(Identifier));
}
/// <summary>
///
/// </summary>
/// <param name="Texts"></param>
/// <returns></returns>
private string Expand(string Text, Dictionary<string, string> Locals = null, HashSet<string> Used = null)
{
if (Used == null) Used = new HashSet<string>();
string Output = "";
var Tokens = new CTokenReader(new CTokenizer(Text, TokenizeSpaces: true).Tokenize());
Tokens.MoveNextSpace();
while (Tokens.HasMore)
{
bool Stringify = false;
if (Locals != null && Tokens.Current.Raw == "##")
{
Tokens.MoveNextSpace();
}
if (Tokens.Current.Raw == "#")
{
Tokens.MoveNextSpace();
if (Tokens.Current.Type == CTokenType.Identifier)
{
Stringify = true;
}
else
{
Stringify = false;
Output += "#";
}
}
if (Tokens.Current.Type == CTokenType.Identifier)
{
var CurrentIdentifier = Tokens.Current.Raw;
var UpdatedIdentifier = ReplaceSimpleVariable(CurrentIdentifier);
if (UpdatedIdentifier != CurrentIdentifier)
{
Output += UpdatedIdentifier;
Tokens.MoveNextSpace();
continue;
}
switch (CurrentIdentifier)
{
case "__VA_ARGS__":
CurrentIdentifier = "...";
break;
}
if (Locals != null && Locals.ContainsKey(CurrentIdentifier))
{
CurrentIdentifier = Locals[CurrentIdentifier];
if (Stringify) CurrentIdentifier = CToken.Stringify(CurrentIdentifier);
Output += CurrentIdentifier;
Tokens.MoveNextSpace();
}
else if (!Used.Contains(CurrentIdentifier) && Context.Macros.ContainsKey(CurrentIdentifier))
{
var Macro = Context.Macros[CurrentIdentifier];
// Constant
if (Macro is MacroConstant)
{
Output += Expand(Macro.Replacement, null, new HashSet<string>(Used.Concat(new[] { CurrentIdentifier })));
Tokens.MoveNextSpace();
}
// Function
else
{
Tokens.MoveNextNoSpace();
Tokens.ExpectCurrent("(");
var MacroFunction = Context.Macros[CurrentIdentifier] as MacroFunction;
if (MacroFunction == null)
{
throw (new Exception("Trying to call a non-function macro"));
}
//Console.WriteLine(":: {0} :: ", Text);
var Parameters = ParseParameterList(Tokens, JustIdentifiers: false);
for (int n = 0; n < Parameters.Length; n++)
{
//Console.WriteLine(" {0}", Parameters[n]);
Parameters[n] = Expand(Parameters[n], Locals, Used);
//Console.WriteLine(" -> {0}", Parameters[n]);
}
var Map = MapFunctionParameters(MacroFunction.Parameters, Parameters);
//foreach (var Item in Map) Console.WriteLine("{0} -> {1}", Item.Key, Item.Value);
Output += Expand(MacroFunction.Replacement, Map, new HashSet<string>(new[] { CurrentIdentifier }));
}
}
else
{
Output += CurrentIdentifier;
Tokens.MoveNextSpace();
}
}
else
{
Output += Tokens.Current.Raw;
Tokens.MoveNextSpace();
}
}
return Output;
}
public CTokenReader ReadUpToNewLine()
{
var ReadedTokens = new List<CToken>();
while (Current.Type != CTokenType.NewLine)
{
ReadedTokens.Add(Current);
MoveNextSpace();
}
ReadedTokens.Add(new CToken() { Raw = "", Type = CTokenType.End });
var CTokenReader = new CTokenReader(ReadedTokens);
CTokenReader.MoveNextSpace();
return CTokenReader;
}
