Example #1
0
        protected override void OnGenerate()
        {
            var token = T.Token;
            switch (token.Type)
            {
                case 0:
                {
                    var error = (CommonErrorNode) token;
                    Errors.ErrorParse(error);
                    break;
                }
                case TemplateParser.Statement:
                {
                    Ctx.Sink.Emit(OpCodes.Ldarg_0);
                    var s = new Statement(T);
                    Errors.AddRange(s.Generate(Ctx));

                    Ctx.EmitAppendToBuffer();
                    break;
                }
                case TemplateParser.Passthrough:
                {
                    Ctx.Sink.Emit(OpCodes.Ldarg_0);
                    var s = new Passthrough(T);
                    Errors.AddRange(s.Generate(Ctx));

                    Ctx.EmitAppendToBuffer();
                    break;
                }
                case TemplateParser.Control:
                {
                    var ctl = new Control(T);
                    Errors.AddRange(ctl.Generate(Ctx));
                    break;
                }
                case TemplateLexer.Unparsed:
                case TemplateLexer.Literal:
                {
                    Ctx.Sink.Emit(OpCodes.Ldarg_0);
                    Ctx.Sink.Emit(OpCodes.Ldstr, token.Text);
                    Ctx.EmitAppendLiteralToBuffer();
                    break;
                }
                case TemplateLexer.EOF:
                {
                    break;
                }
            }
        }
Example #2
0
        protected override void OnGenerate()
        {
            var var = (CommonTree) T.Children[0];
            if (var.Type == 0)
            {
                Errors.ErrorParse((CommonErrorNode) var);
                return;
            }
            var exp = (CommonTree) T.Children[1];
            if (exp.Type == 0)
            {
                Errors.ErrorParse((CommonErrorNode) exp);
                return;
            }

            var defaultBlock = (CommonTree) T.Children[2];
            var blocks = new Dictionary<LoopDirective, CommonTree>();
            for (var i = 3; i < T.Children.Count; i++)
            {
                var targeted = (CommonTree) T.Children[i];
                var ins = targeted.Children[0];
                var tBlock = (CommonTree) targeted.Children[1];
                LoopDirective d;
                if (!Enum.TryParse(ins.Text, true, out d))
                {
                    Errors.ErrorUnknownLoopDirective(ins.Text);
                    continue;
                }
                blocks[d] = tBlock;
            }
            if (Errors.ContainsError())
                return;

            var endOfLoop = Ctx.Sink.DefineLabel();
            var continuePoint = Ctx.Sink.DefineLabel();
            var top = Ctx.Sink.DefineLabel();
            var endOfBlock = Ctx.Sink.DefineLabel();
            var oddEvenVar = Ctx.Sink.DeclareLocal(typeof (int));

            var iter = Ctx.Sink.DeclareLocal(typeof (IEnumerator));
            var current = Ctx.Sink.DeclareLocal(typeof (ITemplateType));

            Ctx.PushNewJumpScope(continuePoint, endOfLoop);
            try
            {
                //init part here
                var enumerableExp = new Expression(exp);
                Errors.AddRange(enumerableExp.Generate(Ctx));
                Ctx.Sink.FastEmitStoreLocal(current.LocalIndex);

                Ctx.Sink.Emit(OpCodes.Ldarg_0);
                Ctx.Sink.FastEmitLoadLocal(current.LocalIndex);
                Ctx.EmitVTFunctionCall("CheckIsEnumerable");
                Ctx.Sink.Emit(OpCodes.Brfalse, endOfBlock);

                Ctx.Sink.Emit(OpCodes.Ldarg_0);
                Ctx.Sink.FastEmitLoadLocal(current.LocalIndex);
                Ctx.EmitVTFunctionCall("PrimeIter");
                Ctx.Sink.FastEmitStoreLocal(iter.LocalIndex);

                Ctx.Sink.FastEmitConstInt(0);
                Ctx.Sink.FastEmitStoreLocal(oddEvenVar.LocalIndex);

                var noDataSkip = Ctx.Sink.DefineLabel();
                Ctx.Sink.FastEmitLoadLocal(iter.LocalIndex);
                Ctx.EmitIterMoveNext();
                Ctx.Sink.Emit(OpCodes.Brfalse, noDataSkip);

                var skipStart = Ctx.Sink.DefineLabel();

                Ctx.Sink.Emit(OpCodes.Ldarg_0);
                Ctx.Sink.FastEmitLoadLocal(iter.LocalIndex);
                Ctx.EmitVTFunctionCall("CurrentToTType");
                Ctx.Sink.FastEmitStoreLocal(current.LocalIndex);
                var s = new Statement(var);
                Errors.AddRange(s.GenerateSet(Ctx, current.LocalIndex));

                TryEmitBlock(LoopDirective.BeforeAll, blocks);
                Ctx.Sink.Emit(OpCodes.Br, skipStart);

                Ctx.Sink.MarkLabel(top);
                Ctx.Sink.Emit(OpCodes.Nop);

                Ctx.Sink.Emit(OpCodes.Ldarg_0);
                Ctx.Sink.FastEmitLoadLocal(iter.LocalIndex);
                Ctx.EmitVTFunctionCall("CurrentToTType");
                Ctx.Sink.FastEmitStoreLocal(current.LocalIndex);
                s = new Statement(var);
                s.GenerateSet(Ctx, current.LocalIndex);

                Ctx.Sink.MarkLabel(skipStart);
                Ctx.Sink.Emit(OpCodes.Nop);

                if (blocks.ContainsKey(LoopDirective.Between))
                {
                    var skipFirstBetween = Ctx.Sink.DefineLabel();
                    Ctx.Sink.FastEmitLoadLocal(oddEvenVar.LocalIndex);
                    Ctx.Sink.FastEmitConstInt(0);
                    Ctx.Sink.Emit(OpCodes.Ceq);
                    Ctx.Sink.Emit(OpCodes.Brtrue, skipFirstBetween);
                    TryEmitBlock(LoopDirective.Between, blocks);
                    Ctx.Sink.MarkLabel(skipFirstBetween);
                }

                TryEmitBlock(LoopDirective.Before, blocks);

                //even odd
                if (blocks.ContainsKey(LoopDirective.Even)
                    || blocks.ContainsKey(LoopDirective.Odd))
                {
                    var oddBlock = Ctx.Sink.DefineLabel();
                    var endOddEvenBlock = Ctx.Sink.DefineLabel();

                    Ctx.Sink.FastEmitLoadLocal(oddEvenVar.LocalIndex);
                    Ctx.Sink.FastEmitConstInt(2);
                    Ctx.Sink.Emit(OpCodes.Rem);
                    Ctx.Sink.FastEmitConstInt(0);
                    Ctx.Sink.Emit(OpCodes.Ceq);
                    Ctx.Sink.Emit(OpCodes.Brfalse, oddBlock);

                    TryEmitBlock(LoopDirective.Even, blocks);
                    Ctx.Sink.Emit(OpCodes.Br, endOddEvenBlock);

                    Ctx.Sink.MarkLabel(oddBlock);
                    TryEmitBlock(LoopDirective.Odd, blocks);
                    Ctx.Sink.MarkLabel(endOddEvenBlock);
                }

                var defaultBlk = new Block(defaultBlock.Children[0]);
                Errors.AddRange(defaultBlk.Generate(Ctx));

                TryEmitBlock(LoopDirective.Each, blocks);

                TryEmitBlock(LoopDirective.After, blocks);

                Ctx.Sink.MarkLabel(continuePoint);

                //increment odd even var
                Ctx.Sink.Emit(OpCodes.Ldc_I4_1);
                Ctx.Sink.FastEmitLoadLocal(oddEvenVar.LocalIndex);
                Ctx.Sink.Emit(OpCodes.Add);
                Ctx.Sink.FastEmitStoreLocal(oddEvenVar.LocalIndex);

                //increment
                //check condidtion
                Ctx.Sink.FastEmitLoadLocal(iter.LocalIndex);
                Ctx.EmitIterMoveNext();
                Ctx.Sink.Emit(OpCodes.Brtrue, top);

                Ctx.Sink.MarkLabel(endOfLoop);

                TryEmitBlock(LoopDirective.AfterAll, blocks);

                Ctx.Sink.Emit(OpCodes.Br, endOfBlock);

                Ctx.Sink.MarkLabel(noDataSkip);
                TryEmitBlock(LoopDirective.NoData, blocks);
                Ctx.Sink.MarkLabel(endOfBlock);
            }
            finally
            {
                Ctx.PopJumpScope();
            }
        }
Example #3
0
 protected override void OnGenerate()
 {
     Errors.Clear();
     var child = (CommonTree) T.Children[0];
     switch (child.Type)
     {
         case 0:
         {
             Ctx.EmitNullRef();
             Errors.ErrorParse((CommonErrorNode) child);
             break;
         }
         case TemplateLexer.Pragma:
         {
             var a = new Pragma(child);
             Errors.AddRange(a.Generate(Ctx));
             break;
         }
         case TemplateLexer.Assert:
         {
             Ctx.Sink.Emit(OpCodes.Ldarg_0);
             var a = new Assert(child);
             Errors.AddRange(a.Generate(Ctx));
             Ctx.EmitAppendToBuffer();
             break;
         }
         case TemplateLexer.Continue:
         {
             if (!Ctx.InJumpableBlock)
             {
                 Errors.ErrorInvalidJump("continue", child.Token);
                 break;
             }
             Ctx.Sink.Emit(OpCodes.Br, Ctx.GetContinueLabel());
             break;
         }
         case TemplateLexer.Break:
         {
             if (!Ctx.InJumpableBlock)
             {
                 Errors.ErrorInvalidJump("break", child.Token);
                 break;
             }
             Ctx.Sink.Emit(OpCodes.Br, Ctx.GetBreakLabel());
             break;
         }
         case TemplateLexer.Stop:
         {
             Ctx.Sink.Emit(OpCodes.Br, Ctx.EndOfTemplate);
             break;
         }
         case TemplateLexer.Parse:
         {
             var args = (CommonTree) child.Children[0];
             if (args.Type == 0)
             {
                 Errors.ErrorParse((CommonErrorNode) args);
                 break;
             }
             Ctx.Sink.Emit(OpCodes.Ldarg_0);
             Ctx.EmitArgList(args);
             Ctx.EmitVTFunctionCall("InvokeParse");
             break;
         }
         case TemplateLexer.Include:
         {
             var args = (CommonTree) child.Children[0];
             if (args.Type == 0)
             {
                 Errors.ErrorParse((CommonErrorNode) args);
                 break;
             }
             Ctx.Sink.Emit(OpCodes.Ldarg_0);
             Ctx.EmitArgList(args);
             Ctx.EmitVTFunctionCall("InvokeInclude");
             break;
         }
         case TemplateLexer.Set:
         {
             var target = child.Children[0];
             if (target.Type == 0)
             {
                 Errors.ErrorParse((CommonErrorNode) target);
                 break;
             }
             var source = child.Children[1];
             if (source.Type == 0)
             {
                 Errors.ErrorParse((CommonErrorNode) source);
                 break;
             }
             var s = new Statement(target);
             var exp = new Expression(source);
             Errors.AddRange(s.GenerateSet(Ctx, exp));
             break;
         }
         case TemplateLexer.If:
         {
             var ifControl = new If(child);
             Errors.AddRange(ifControl.Generate(Ctx));
             break;
         }
         case TemplateLexer.Loop:
         {
             var loop = new Loop(child);
             Errors.AddRange(loop.Generate(Ctx));
             break;
         }
         case TemplateLexer.Foreach:
         {
             var loop = new Foreach(child);
             Errors.AddRange(loop.Generate(Ctx));
             break;
         }
     }
 }