Beispiel #1
0
        void Instrument(Implementation impl)
        {
            var varDecls = new Dictionary <string, string>();
            var cb       = new CollectBasePointer(varDecls);

            cb.VisitImplementation(impl);
            foreach (var block in impl.Blocks)
            {
                var newcmds = new List <Cmd>();
                foreach (Cmd cmd in block.Cmds)
                {
                    if (cmd is AssumeCmd && BoogieUtil.checkAttrExists("nonnull", (cmd as AssumeCmd).Attributes))
                    {
                        continue;
                    }
                    if (cmd is AssignCmd)
                    {
                        newcmds.AddRange(ProcessAssign(cmd as AssignCmd, varDecls));
                    }
                    else if (cmd is AssumeCmd)
                    {
                        newcmds.AddRange(ProcessAssume(cmd as AssumeCmd, varDecls));
                    }
                    else if (cmd is CallCmd)
                    {
                        newcmds.AddRange(ProcessCall(cmd as CallCmd, varDecls));
                    }
                    else
                    {
                        newcmds.Add(cmd);
                    }
                }
                block.Cmds = newcmds;
            }
        }
Beispiel #2
0
        public override Implementation VisitImplementation(Implementation node)
        {
            var varDecls = new Dictionary <string, string>();
            var cb       = new CollectBasePointer(varDecls);

            cb.VisitImplementation(node);
            foreach (var b in node.Blocks)
            {
                var newCmds = new List <Cmd>();
                foreach (var c in b.Cmds)
                {
                    if (c is AssumeCmd)
                    {
                        var asmCmd = c as AssumeCmd;
                        if (BoogieUtil.checkAttrExists("nonnull", asmCmd.Attributes))
                        {
                            var expr = asmCmd.Expr as NAryExpr;
                            expr.Args[1] = nil;
                            newCmds.Add(c);
                            continue;
                        }
                    }
                    if (c is AssignCmd)
                    {
                        var asnCmd = c as AssignCmd;
                        var reads  = new GatherMemAccesses();
                        asnCmd.Rhss.Iter(e => reads.VisitExpr(e));
                        foreach (var tup in reads.accesses)
                        {
                            var    ptr = tup.Item2;
                            string basePtr;
                            if (varDecls.TryGetValue(ptr.ToString(), out basePtr))
                            {
                                newCmds.Add(MkAssume(Expr.Ident(BoogieAstFactory.MkFormal(basePtr, btype.Int, true))));
                            }
                            else
                            {
                                newCmds.Add(MkAssume(ptr));
                            }
                        }
                    }
                    newCmds.Add(c);
                }
                b.cmds = newCmds;
            }
            return(node);
        }