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 */
23package org.graalvm.compiler.java;
24
25import org.graalvm.compiler.lir.phases.LIRSuites;
26import org.graalvm.compiler.options.DerivedOptionValue;
27import org.graalvm.compiler.options.DerivedOptionValue.OptionSupplier;
28import org.graalvm.compiler.phases.PhaseSuite;
29import org.graalvm.compiler.phases.tiers.HighTierContext;
30import org.graalvm.compiler.phases.tiers.Suites;
31import org.graalvm.compiler.phases.tiers.SuitesCreator;
32
33public 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}
91