1 /* 2 * Copyright (c) 2012, 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 package org.graalvm.compiler.java; 24 25 import org.graalvm.compiler.lir.phases.LIRSuites; 26 import org.graalvm.compiler.options.DerivedOptionValue; 27 import org.graalvm.compiler.options.DerivedOptionValue.OptionSupplier; 28 import org.graalvm.compiler.phases.PhaseSuite; 29 import org.graalvm.compiler.phases.tiers.HighTierContext; 30 import org.graalvm.compiler.phases.tiers.Suites; 31 import org.graalvm.compiler.phases.tiers.SuitesCreator; 32 33 public abstract class SuitesProviderBase implements SuitesCreator { 34 35 protected final DerivedOptionValue<Suites> defaultSuites; 36 protected PhaseSuite<HighTierContext> defaultGraphBuilderSuite; 37 protected final DerivedOptionValue<LIRSuites> defaultLIRSuites; 38 39 private class SuitesSupplier implements OptionSupplier<Suites> { 40 41 private static final long serialVersionUID = 2677805381215454728L; 42 43 @Override 44 public Suites get() { 45 Suites suites = createSuites(); 46 suites.setImmutable(); 47 return suites; 48 } 49 50 } 51 52 private class LIRSuitesSupplier implements OptionSupplier<LIRSuites> { 53 54 private static final long serialVersionUID = 312070237227476252L; 55 56 @Override 57 public LIRSuites get() { 58 LIRSuites lirSuites = createLIRSuites(); 59 lirSuites.setImmutable(); 60 return lirSuites; 61 } 62 63 } 64 65 public SuitesProviderBase() { 66 this.defaultSuites = new DerivedOptionValue<>(new SuitesSupplier()); 67 this.defaultLIRSuites = new DerivedOptionValue<>(new LIRSuitesSupplier()); 68 } 69 70 @Override 71 public final Suites getDefaultSuites() { 72 return defaultSuites.getValue(); 73 } 74 75 @Override 76 public PhaseSuite<HighTierContext> getDefaultGraphBuilderSuite() { 77 return defaultGraphBuilderSuite; 78 } 79 80 @Override 81 public final LIRSuites getDefaultLIRSuites() { 82 return defaultLIRSuites.getValue(); 83 } 84 85 @Override 86 public abstract LIRSuites createLIRSuites(); 87 88 @Override 89 public abstract Suites createSuites(); 90 }