# HG changeset patch
# User Josef Eisl <josef.eisl@jku.at>
# Date 1423484404 -3600
# Node ID 1487207db440279238a76bf9ed340f6423f08a1f
# Parent  edd93c34d01513991dc815124b1b44cf3284cfc3
Introduce LowLevelPhaseSuite and LowLevelCompilerConfiguration.

diff -r edd93c34d015 -r 1487207db440 graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/DefaultLowLevelCompilerConfiguration.java
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/DefaultLowLevelCompilerConfiguration.java	Mon Feb 09 13:20:04 2015 +0100
@@ -0,0 +1,66 @@
+/*
+ * Copyright (c) 2015, 2015, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ */
+package com.oracle.graal.lir.phases;
+
+import com.oracle.graal.compiler.common.cfg.*;
+import com.oracle.graal.lir.*;
+import com.oracle.graal.lir.alloc.lsra.*;
+import com.oracle.graal.lir.constopt.*;
+import com.oracle.graal.lir.phases.LowLevelMidTierPhase.Context;
+import com.oracle.graal.lir.stackslotalloc.*;
+
+public class DefaultLowLevelCompilerConfiguration implements LowLevelCompilerConfiguration {
+
+    public <B extends AbstractBlock<B>> LowLevelPhaseSuite<LowLevelHighTierPhase.Context, B> createHighTier() {
+        LowLevelPhaseSuite<LowLevelHighTierPhase.Context, B> suite = new LowLevelPhaseSuite<>();
+        if (ConstantLoadOptimization.Options.ConstantLoadOptimization.getValue()) {
+            suite.appendPhase(new ConstantLoadOptimization<B>());
+        }
+        return suite;
+    }
+
+    public <B extends AbstractBlock<B>> LowLevelPhaseSuite<Context, B> createMidTier() {
+        LowLevelPhaseSuite<LowLevelMidTierPhase.Context, B> suite = new LowLevelPhaseSuite<>();
+        suite.appendPhase(new LinearScanPhase<B>());
+
+        // build frame map
+        if (LSStackSlotAllocator.Options.LSStackSlotAllocation.getValue()) {
+            suite.appendPhase(new LSStackSlotAllocator<B>());
+        } else {
+            suite.appendPhase(new SimpleStackSlotAllocator<B>());
+        }
+        // currently we mark locations only if we do register allocation
+        suite.appendPhase(new LocationMarker<B>());
+        return suite;
+    }
+
+    public <B extends AbstractBlock<B>> LowLevelPhaseSuite<com.oracle.graal.lir.phases.LowLevelLowTierPhase.Context, B> createLowTier() {
+        LowLevelPhaseSuite<LowLevelLowTierPhase.Context, B> suite = new LowLevelPhaseSuite<>();
+        suite.appendPhase(new EdgeMoveOptimizer<B>());
+        suite.appendPhase(new ControlFlowOptimizer<B>());
+        suite.appendPhase(new RedundantMoveElimination<B>());
+        suite.appendPhase(new NullCheckOptimizer<B>());
+        return suite;
+    }
+
+}
diff -r edd93c34d015 -r 1487207db440 graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/LowLevelCompilerConfiguration.java
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/LowLevelCompilerConfiguration.java	Mon Feb 09 13:20:04 2015 +0100
@@ -0,0 +1,34 @@
+/*
+ * Copyright (c) 2013, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ */
+package com.oracle.graal.lir.phases;
+
+import com.oracle.graal.compiler.common.cfg.*;
+
+public interface LowLevelCompilerConfiguration {
+
+    <B extends AbstractBlock<B>> LowLevelPhaseSuite<LowLevelHighTierPhase.Context, B> createHighTier();
+
+    <B extends AbstractBlock<B>> LowLevelPhaseSuite<LowLevelMidTierPhase.Context, B> createMidTier();
+
+    <B extends AbstractBlock<B>> LowLevelPhaseSuite<LowLevelLowTierPhase.Context, B> createLowTier();
+}
diff -r edd93c34d015 -r 1487207db440 graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/LowLevelPhaseSuite.java
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/graal/com.oracle.graal.lir/src/com/oracle/graal/lir/phases/LowLevelPhaseSuite.java	Mon Feb 09 13:20:04 2015 +0100
@@ -0,0 +1,78 @@
+/*
+ * Copyright (c) 2015, 2015, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ */
+package com.oracle.graal.lir.phases;
+
+import java.util.*;
+
+import com.oracle.graal.api.code.*;
+import com.oracle.graal.compiler.common.cfg.*;
+import com.oracle.graal.lir.gen.*;
+
+public class LowLevelPhaseSuite<C, B extends AbstractBlock<B>> extends LowLevelPhase<C, B> {
+    private final List<LowLevelPhase<C, B>> phases;
+
+    public LowLevelPhaseSuite() {
+        phases = new ArrayList<>();
+    }
+
+    /**
+     * Add a new phase at the beginning of this suite.
+     */
+    public final void prependPhase(LowLevelPhase<C, B> phase) {
+        phases.add(0, phase);
+    }
+
+    /**
+     * Add a new phase at the end of this suite.
+     */
+    public final void appendPhase(LowLevelPhase<C, B> phase) {
+        phases.add(phase);
+    }
+
+    public final ListIterator<LowLevelPhase<C, B>> findPhase(Class<? extends LowLevelPhase<C, B>> phaseClass) {
+        ListIterator<LowLevelPhase<C, B>> it = phases.listIterator();
+        if (findNextPhase(it, phaseClass)) {
+            return it;
+        } else {
+            return null;
+        }
+    }
+
+    public static <C, B extends AbstractBlock<B>> boolean findNextPhase(ListIterator<LowLevelPhase<C, B>> it, Class<? extends LowLevelPhase<C, B>> phaseClass) {
+        while (it.hasNext()) {
+            LowLevelPhase<C, B> phase = it.next();
+            if (phaseClass.isInstance(phase)) {
+                return true;
+            }
+        }
+        return false;
+    }
+
+    @Override
+    protected void run(TargetDescription target, LIRGenerationResult lirGenRes, List<B> codeEmittingOrder, List<B> linearScanOrder, C context) {
+        for (LowLevelPhase<C, B> phase : phases) {
+            phase.apply(target, lirGenRes, codeEmittingOrder, linearScanOrder, context);
+        }
+    }
+
+}