1 /*
   2  * Copyright (c) 2015, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  */
  23 
  24 
  25 package org.graalvm.compiler.core.aarch64;
  26 
  27 import java.util.ListIterator;
  28 
  29 import org.graalvm.compiler.java.DefaultSuitesCreator;
  30 import org.graalvm.compiler.nodes.graphbuilderconf.GraphBuilderConfiguration.Plugins;
  31 import org.graalvm.compiler.options.OptionValues;
  32 import org.graalvm.compiler.phases.BasePhase;
  33 import org.graalvm.compiler.phases.Phase;
  34 import org.graalvm.compiler.phases.PhaseSuite;
  35 import org.graalvm.compiler.phases.tiers.CompilerConfiguration;
  36 import org.graalvm.compiler.phases.tiers.LowTierContext;
  37 import org.graalvm.compiler.phases.tiers.Suites;
  38 
  39 public class AArch64SuitesCreator extends DefaultSuitesCreator {
  40     private final Class<? extends Phase> insertReadReplacementBefore;
  41 
  42     public AArch64SuitesCreator(CompilerConfiguration compilerConfiguration, Plugins plugins, Class<? extends Phase> insertReadReplacementBefore) {
  43         super(compilerConfiguration, plugins);
  44         this.insertReadReplacementBefore = insertReadReplacementBefore;
  45     }
  46 
  47     @Override
  48     public Suites createSuites(OptionValues options) {
  49         Suites suites = super.createSuites(options);
  50 
  51         ListIterator<BasePhase<? super LowTierContext>> findPhase = suites.getLowTier().findPhase(insertReadReplacementBefore);
  52         // Put AArch64ReadReplacementPhase right before the SchedulePhase
  53         while (PhaseSuite.findNextPhase(findPhase, insertReadReplacementBefore)) {
  54             // Search for last occurrence of SchedulePhase
  55         }
  56         findPhase.previous();
  57         findPhase.add(new AArch64ReadReplacementPhase());
  58         return suites;
  59     }
  60 }