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 }