Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion java/ql/lib/semmle/code/java/dataflow/DataFlow.qll
Original file line number Diff line number Diff line change
Expand Up @@ -10,6 +10,6 @@ import java
module DataFlow {
private import semmle.code.java.dataflow.internal.DataFlowImplSpecific
private import codeql.dataflow.DataFlow
import DataFlowMake<Location, JavaDataFlow>
import DataFlowMakeOverlay<Location, JavaDataFlow>
import Public
}
2 changes: 1 addition & 1 deletion java/ql/lib/semmle/code/java/dataflow/TaintTracking.qll
Original file line number Diff line number Diff line change
Expand Up @@ -13,5 +13,5 @@ module TaintTracking {
private import semmle.code.java.dataflow.internal.DataFlowImplSpecific
private import semmle.code.java.dataflow.internal.TaintTrackingImplSpecific
private import codeql.dataflow.TaintTracking
import TaintFlowMake<Location, JavaDataFlow, JavaTaintTracking>
import TaintFlowMakeOverlay<Location, JavaDataFlow, JavaTaintTracking>
}
Original file line number Diff line number Diff line change
Expand Up @@ -6,6 +6,7 @@ module;

private import semmle.code.Location
private import codeql.dataflow.DataFlow
private import semmle.code.java.Overlay

module Private {
import DataFlowPrivate
Expand All @@ -29,4 +30,6 @@ module JavaDataFlow implements InputSig<Location> {
predicate mayBenefitFromCallContext = Private::mayBenefitFromCallContext/1;

predicate viableImplInCallContext = Private::viableImplInCallContext/2;

predicate isEvaluatingInOverlay = isOverlay/0;
}
201 changes: 145 additions & 56 deletions shared/dataflow/codeql/dataflow/DataFlow.qll
Original file line number Diff line number Diff line change
Expand Up @@ -349,6 +349,18 @@

/** Holds if `fieldFlowBranchLimit` should be ignored for flow going into/out of `c`. */
default predicate ignoreFieldFlowBranchLimit(DataFlowCallable c) { none() }

/**
* Holds if the evaluator is currently evaluating with an overlay. The
* implementation of this predicate needs to be `overlay[local]`. For a
* language with no overlay support, `none()` is a valid implementation.
*
* When called from a local predicate, this predicate holds if we are in the
* overlay-only local evaluation. When called from a global predicate, this
* predicate holds if we are evaluating globally with overlay and base both
* visible.
*/
default predicate isEvaluatingInOverlay() { none() }
}

module Configs<LocationSig Location, InputSig<Location> Lang> {
Expand Down Expand Up @@ -645,10 +657,8 @@
}
}

module DataFlowMake<LocationSig Location, InputSig<Location> Lang> {
private module DataFlowMakeCore<LocationSig Location, InputSig<Location> Lang> {
private import Lang
private import internal.DataFlowImpl::MakeImpl<Location, Lang>
private import internal.DataFlowImplStage1::MakeImplStage1<Location, Lang>
import Configs<Location, Lang>

/**
Expand Down Expand Up @@ -685,65 +695,12 @@
*/
predicate flowTo(Node sink);

/**

Check warning

Code scanning / CodeQL

Data flow configuration module naming Warning

Modules implementing a data flow configuration should end in Config.
* Holds if data can flow from some source to `sink`.
*/
predicate flowToExpr(DataFlowExpr sink);
}

/**
* Constructs a global data flow computation.
*/
module Global<ConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import DefaultState<Config>
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}
}

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

private module Flow = Impl<C, Stage1::Stage1NoState>;

import Flow
}

/**
* Constructs a global data flow computation using flow state.
*/
module GlobalWithState<StateConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}

predicate isAdditionalFlowStep(
Node node1, FlowState state1, Node node2, FlowState state2, string model
) {
Config::isAdditionalFlowStep(node1, state1, node2, state2) and model = "Config"
}
}

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

private module Flow = Impl<C, Stage1::Stage1WithState>;

import Flow
}

signature class PathNodeSig {
/** Gets a textual representation of this element. */
string toString();
Expand All @@ -762,7 +719,7 @@
*/
module MergePathGraph<
PathNodeSig PathNode1, PathNodeSig PathNode2, PathGraphSig<PathNode1> Graph1,
PathGraphSig<PathNode2> Graph2>

Check warning

Code scanning / CodeQL

Data flow configuration module naming Warning

Modules implementing a data flow configuration should end in Config.
{
private newtype TPathNode =
TPathNode1(PathNode1 p) or
Expand Down Expand Up @@ -1141,3 +1098,135 @@
import PathGraph
}
}

module DataFlowMake<LocationSig Location, InputSig<Location> Lang> {
import DataFlowMakeCore<Location, Lang>
private import Lang
private import internal.DataFlowImpl::MakeImpl<Location, Lang>
private import internal.DataFlowImplStage1::MakeImplStage1<Location, Lang>

/**
* Constructs a global data flow computation.
*/
module Global<ConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import DefaultState<Config>
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}

predicate observeOverlayInformedIncrementalMode() { none() }
}

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

private module Flow = Impl<C, Stage1::Stage1NoState>;

import Flow
}

/**
* Constructs a global data flow computation using flow state.
*/
module GlobalWithState<StateConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}

predicate isAdditionalFlowStep(
Node node1, FlowState state1, Node node2, FlowState state2, string model
) {
Config::isAdditionalFlowStep(node1, state1, node2, state2) and model = "Config"
}

predicate observeOverlayInformedIncrementalMode() { none() }
}

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

private module Flow = Impl<C, Stage1::Stage1WithState>;

import Flow
}
}

module DataFlowMakeOverlay<LocationSig Location, InputSig<Location> Lang> {
import DataFlowMake<Location, Lang>
private import Lang
private import internal.DataFlowImpl::MakeImpl<Location, Lang>
private import internal.DataFlowImplStage1::MakeImplStage1<Location, Lang>

/**
* Constructs a global data flow computation.
*/
module Global<ConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import DefaultState<Config>
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}

predicate observeOverlayInformedIncrementalMode() {
not Config::observeDiffInformedIncrementalMode()
}
}

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

Check warning

Code scanning / CodeQL

Data flow configuration module naming Warning

Modules implementing a data flow configuration should end in Config.
private module Flow = OverlayImpl<C, Stage1::Stage1NoState>;

import Flow
}

/**
* Constructs a global data flow computation using flow state.
*/
module GlobalWithState<StateConfigSig Config> implements GlobalFlowSig {
private module C implements FullStateConfigSig {
import Config

predicate accessPathLimit = Config::accessPathLimit/0;

predicate isAdditionalFlowStep(Node node1, Node node2, string model) {
Config::isAdditionalFlowStep(node1, node2) and model = "Config"
}

predicate isAdditionalFlowStep(
Node node1, FlowState state1, Node node2, FlowState state2, string model
) {
Config::isAdditionalFlowStep(node1, state1, node2, state2) and model = "Config"
}

predicate observeOverlayInformedIncrementalMode() {
not Config::observeDiffInformedIncrementalMode()
}
}

Check warning

Code scanning / CodeQL

Data flow configuration module naming Warning

Modules implementing a data flow configuration should end in Config.

private module Stage1 = ImplStage1<C>;

import Stage1::PartialFlow

private module Flow = OverlayImpl<C, Stage1::Stage1WithState>;

import Flow
}
}
Loading
Loading