verigraph/src/it/polito/verigraph/mcnet/netobjs/PolitoNat.java

   1 /*******************************************************************************
   2  * Copyright (c) 2017 Politecnico di Torino and others.
   3  *
   4  * All rights reserved. This program and the accompanying materials
   5  * are made available under the terms of the Apache License, Version 2.0
   6  * which accompanies this distribution, and is available at
   7  * http://www.apache.org/licenses/LICENSE-2.0
   8  *******************************************************************************/
   9 package it.polito.verigraph.mcnet.netobjs;
  10
  11 import java.util.ArrayList;
  12 import java.util.List;
  13 import com.microsoft.z3.BoolExpr;
  14 import com.microsoft.z3.Context;
  15 import com.microsoft.z3.DatatypeExpr;
  16 import com.microsoft.z3.Expr;
  17 import com.microsoft.z3.FuncDecl;
  18 import com.microsoft.z3.IntExpr;
  19 import com.microsoft.z3.Solver;
  20 import it.polito.verigraph.mcnet.components.NetContext;
  21 import it.polito.verigraph.mcnet.components.Network;
  22 import it.polito.verigraph.mcnet.components.NetworkObject;
  23 /**
  24  * NAT Model object
  25  *
  26  */
  27 public class PolitoNat extends NetworkObject{
  28     List<BoolExpr> constraints;
  29     Context ctx;
  30     DatatypeExpr nat;
  31     List<DatatypeExpr> private_addresses;
  32     List<NetworkObject> private_node;
  33     Network net;
  34     NetContext nctx;
  35     FuncDecl private_addr_func ;
  36
  37     public PolitoNat(Context ctx, Object[]... args) {
  38         super(ctx, args);
  39     }
  40
  41     @Override
  42     protected void init(Context ctx, Object[]... args) {
  43         this.ctx = ctx;
  44         isEndHost=false;
  45         constraints = new ArrayList<BoolExpr>();
  46         z3Node = ((NetworkObject)args[0][0]).getZ3Node();
  47         nat = z3Node;
  48         net = (Network)args[0][1];
  49         nctx = (NetContext)args[0][2];
  50         private_addresses = new ArrayList<DatatypeExpr>();
  51         private_node = new ArrayList<NetworkObject>();
  52         net.saneSend(this);
  53     }
  54
  55     @Override
  56     public DatatypeExpr getZ3Node() {
  57         return nat;
  58     }
  59
  60     @Override
  61     protected void addConstraints(Solver solver) {
  62         BoolExpr[] constr = new BoolExpr[constraints.size()];
  63         solver.add(constraints.toArray(constr));
  64     }
  65
  66     /*
  67 private void addPrivateAdd(List<DatatypeExpr> address){
  68 private_addresses.addAll(address);
  69 }
  70      */
  71
  72     public List<DatatypeExpr> getPrivateAddress(){
  73         return private_addresses;
  74     }
  75
  76     public void natModel(DatatypeExpr natIp){
  77         Expr x = ctx.mkConst("x", nctx.node);
  78         Expr y = ctx.mkConst("y", nctx.node);
  79         Expr z = ctx.mkConst("z", nctx.node);
  80
  81         Expr p_0 = ctx.mkConst("p_0", nctx.packet);
  82         Expr p_1 = ctx.mkConst("p_1", nctx.packet);
  83         Expr p_2 = ctx.mkConst("p_2", nctx.packet);
  84
  85         IntExpr t_0 = ctx.mkIntConst("t_0");
  86         IntExpr t_1 = ctx.mkIntConst("t_1");
  87         IntExpr t_2 = ctx.mkIntConst("t_2");
  88
  89         //    private_addr_func = ctx.mkFuncDecl("private_addr_func", nctx.address, ctx.mkBoolSort());
  90         private_addr_func = ctx.mkFuncDecl(nat + "_nat_func", nctx.address, ctx.mkBoolSort());
  91
  92         //Constraint1
  93         //    "send(nat, x, p_0, t_0) && !private_addr_func(p_0.dest) ->
  94         //    p_0.src == ip_politoNat &&
  95         //    (exist y, p_1,t_1 :
  96         //       (recv(y, nat, p_1, t_1) && t_1 < t_0 &&
  97         //        private_addr_func(p1.src) &&
  98         //        p_1.origin == p_0.origin &&
  99         //        same for p_1.<dest,orig_body,body,seq,proto,emailFrom,url,options> == p_0.<...>) "
 100         constraints.add( ctx.mkForall(new Expr[]{t_0, p_0, x},
 101                 ctx.mkImplies(
 102                         ctx.mkAnd((BoolExpr)nctx.send.apply(nat, x, p_0, t_0),
 103                                 ctx.mkNot((BoolExpr)private_addr_func.apply(nctx.pf.get("dest").apply(p_0)))),
 104                         ctx.mkAnd(
 105                                 ctx.mkEq(nctx.pf.get("src").apply(p_0),natIp),
 106                                 ctx.mkExists(new Expr[]{y, p_1, t_1},
 107                                         ctx.mkAnd(
 108                                                 (BoolExpr)nctx.recv.apply(y, nat, p_1, t_1),
 109                                                 ctx.mkLt(t_1 , t_0),
 110                                                 (BoolExpr)private_addr_func.apply(nctx.pf.get("src").apply(p_1)),
 111                                                 ctx.mkEq(nctx.pf.get("origin").apply(p_1),nctx.pf.get("origin").apply(p_0)),
 112                                                 ctx.mkEq(nctx.pf.get("dest").apply(p_1),nctx.pf.get("dest").apply(p_0)),
 113                                                 ctx.mkEq(nctx.pf.get("orig_body").apply(p_1),nctx.pf.get("orig_body").apply(p_0)),
 114                                                 ctx.mkEq(nctx.pf.get("body").apply(p_1),nctx.pf.get("body").apply(p_0)),
 115                                                 ctx.mkEq(nctx.pf.get("seq").apply(p_1),nctx.pf.get("seq").apply(p_0)),
 116                                                 ctx.mkEq(nctx.pf.get("proto").apply(p_1),nctx.pf.get("proto").apply(p_0)),
 117                                                 ctx.mkEq(nctx.pf.get("emailFrom").apply(p_1),nctx.pf.get("emailFrom").apply(p_0)),
 118                                                 ctx.mkEq(nctx.pf.get("url").apply(p_1),nctx.pf.get("url").apply(p_0)),
 119                                                 ctx.mkEq(nctx.pf.get("options").apply(p_1),nctx.pf.get("options").apply(p_0))),1,null,null,null,null))),1,null,null,null,null));
 120
 121         //Constraint2
 122         //    send(nat, x, p_0, t_0) && private_addr_func(p_0.dest) ->
 123         //    !private_addr_func(p_0.src) &&
 124         //    (exist y, p_1,t_1 :
 125         //      (recv(y, nat, p_1, t_1) && t_1 < t_0 &&
 126         //       !private_addr_func(p1.src) &&
 127         //       p_1.dest == ip_politoNat &&
 128         //       p_1.origin == p_0.origin &&
 129         //       same for p_1.<src,orig_body,body,seq,proto,emailFrom,url,options> == p_0.<...>)
 130         constraints.add( ctx.mkForall(new Expr[]{x, p_0, t_0},
 131                 ctx.mkImplies(
 132                         ctx.mkAnd((BoolExpr)nctx.send.apply(nat, x, p_0, t_0),
 133                                 (BoolExpr)private_addr_func.apply(nctx.pf.get("dest").apply(p_0))),
 134                         ctx.mkAnd(
 135                                 ctx.mkNot((BoolExpr)private_addr_func.apply(nctx.pf.get("src").apply(p_0))),
 136                                 ctx.mkExists(new Expr[]{y, p_1, t_1},
 137                                         ctx.mkAnd(
 138                                                 ctx.mkLt(t_1 , t_0),
 139                                                 (BoolExpr)nctx.recv.apply(y, nat, p_1, t_1),
 140                                                 ctx.mkNot((BoolExpr)private_addr_func.apply(nctx.pf.get("src").apply(p_1))),
 141                                                 ctx.mkEq(nctx.pf.get("dest").apply(p_1),natIp),
 142                                                 ctx.mkEq(nctx.pf.get("src").apply(p_1),nctx.pf.get("src").apply(p_0)),
 143                                                 ctx.mkEq(nctx.pf.get("origin").apply(p_0),nctx.pf.get("origin").apply(p_1)),
 144                                                 ctx.mkEq(nctx.pf.get("orig_body").apply(p_1),nctx.pf.get("orig_body").apply(p_0)),
 145                                                 ctx.mkEq(nctx.pf.get("body").apply(p_1),nctx.pf.get("body").apply(p_0)),
 146                                                 ctx.mkEq(nctx.pf.get("seq").apply(p_1),nctx.pf.get("seq").apply(p_0)),
 147                                                 ctx.mkEq(nctx.pf.get("proto").apply(p_1),nctx.pf.get("proto").apply(p_0)),
 148                                                 ctx.mkEq(nctx.pf.get("emailFrom").apply(p_1),nctx.pf.get("emailFrom").apply(p_0)),
 149                                                 ctx.mkEq(nctx.pf.get("url").apply(p_1),nctx.pf.get("url").apply(p_0)),
 150                                                 ctx.mkEq(nctx.pf.get("options").apply(p_1),nctx.pf.get("options").apply(p_0)),
 151                                                 ctx.mkExists(new Expr[]{z, p_2, t_2},
 152                                                         ctx.mkAnd(
 153                                                                 ctx.mkLt(t_2 , t_1),
 154                                                                 (BoolExpr)nctx.recv.apply(z, nat, p_2, t_2),
 155                                                                 (BoolExpr)private_addr_func.apply(nctx.pf.get("src").apply(p_2)),
 156                                                                 ctx.mkEq(nctx.pf.get("src").apply(p_1),nctx.pf.get("dest").apply(p_2)),
 157                                                                 ctx.mkEq(nctx.pf.get("src").apply(p_0),nctx.pf.get("dest").apply(p_2)),
 158                                                                 ctx.mkEq(nctx.pf.get("src").apply(p_2),nctx.pf.get("dest").apply(p_0))),1,null,null,null,null)),1,null,null,null,null))),1,null,null,null,null));
 159
 160     }
 161
 162     public void setInternalAddress(ArrayList<DatatypeExpr> internalAddress){
 163         List<BoolExpr> constr = new ArrayList<BoolExpr>();
 164         Expr n_0 = ctx.mkConst("nat_node", nctx.address);
 165
 166         for(DatatypeExpr n : internalAddress){
 167             constr.add(ctx.mkEq(n_0,n));
 168         }
 169         BoolExpr[] constrs = new BoolExpr[constr.size()];
 170         //Constraintprivate_addr_func(n_0) == or(n_0==n foreach internal address)
 171         constraints.add(ctx.mkForall(new Expr[]{n_0}, ctx.mkEq(private_addr_func.apply(n_0),ctx.mkOr(constr.toArray(constrs))),1,null,null,null,null));
 172     }
 173 }