Esempio n. 1
0
 public void Rewrite()
 {
     foreach (var item in expTypes)
     {
         var procName = item.Key;
         var types    = item.Value;
         var impls    = prog.TopLevelDeclarations.OfType <Implementation>().Where(impl => impl.Name.Equals(procName));
         if (impls.Count() == 0)
         {
             continue;
         }
         else if (impls.First().Name.StartsWith("$memset") || impls.First().Name.StartsWith("$memcpy"))
         {
             continue;
         }
         else
         {
             RewriteImpl(impls.First(), types);
         }
     }
     foreach (var g in prog.Variables)
     {
         g.TypedIdent.Type = expTypes["$TTGlobal"][g.Name];
     }
     TTUtil.PrintProgram(prog, outputProg);
 }
Esempio n. 2
0
        static void Main(string[] args)
        {
            CommandLineOptions.Install(new CommandLineOptions());
            CommandLineOptions.Clo.PrintInstrumented = true;
            CommandLineOptions.Clo.DoModSetAnalysis  = true;

            var       traceProgram             = TTUtil.ReadAndResolve(args[0], false);
            var       tracePre                 = new Preprocess(traceProgram);
            var       traceDg                  = new Diagnoser(traceProgram);
            SplitType traceSt                  = null;
            SplitType wholeSt                  = null;
            List <HashSet <string> > localSol  = null;
            List <HashSet <string> > globalSol = null;

            if (args.Any(arg => arg.Equals("/preprocess")))
            {
                tracePre.Run();
                TTUtil.PrintProgram(traceProgram, "temp.bpl");
                return;
            }

            if (args.Any(arg => arg.Equals("/transform")))
            {
                traceDg.Diagnose();
                if (!traceDg.getPrecision())
                {
                    Console.WriteLine("Got nothing to do");
                    return;
                }
                traceProgram = tracePre.Run();
                traceSt      = new SplitType(traceProgram, traceDg.getMapSizes());
                traceSt.Run();
                localSol = traceSt.getSolsInTvFromSolsInInt();
                //foreach (var sol in localSol)
                //{
                //    Console.WriteLine(string.Join(", ", sol));
                //}
                var rw = new Rewritter(traceProgram, traceSt.getTypes(), Path.GetFileNameWithoutExtension(args[0]) + "_transformed.bpl");
                rw.Rewrite();
                if (!args.Any(a => a.Equals("/update")))
                {
                    return;
                }
            }

            if (args.Any(arg => arg.Equals("/update")))
            {
                var wholeProgram = TTUtil.ReadAndResolve(args[1], false);
                var wholePre     = new Preprocess(wholeProgram);
                var wholeDg      = new Diagnoser(wholeProgram);
                wholeDg.Diagnose();

                wholeProgram = wholePre.Run();
                wholeSt      = new SplitType(wholeProgram, wholeDg.getMapSizes());
                wholeSt.Solve();
                globalSol = wholeSt.getSolsInTv();

                wholeSt.Merge(localSol);
                globalSol = wholeSt.getSolsInTv();

                wholeSt.updateSolsInInt();
                wholeSt.updateExprTypes();
                //wholeSt.showUpdatedTypes();
                //Console.WriteLine("==================updated global solution================");
                //foreach (var sol in globalSol)
                //{
                //    Console.WriteLine(string.Join(", ", sol));
                //}
                var rw = new Rewritter(wholeProgram, wholeSt.getTypes(), Path.GetFileNameWithoutExtension(args[1]) + "_updated.bpl");
                rw.Rewrite();
            }
        }