/*

 * Copyright (c) 2011, 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.

 */

/**

 * @test

 * @bug 7021650

 * @summary Fix Context issues

 * @build JavacTestingAbstractProcessor T7021650

 * @run main T7021650

 */

import java.io.*;

import java.net.*;

import java.util.*;

import javax.annotation.processing.*;

import javax.lang.model.element.*;

import javax.tools.*;

import com.sun.tools.javac.comp.Attr;

import com.sun.tools.javac.file.JavacFileManager;

import com.sun.tools.javac.main.Main;

import com.sun.tools.javac.processing.JavacProcessingEnvironment;

import com.sun.tools.javac.util.Context;

public class T7021650 extends JavacTestingAbstractProcessor {

    public static void main(String... args) throws Exception {

        new T7021650().run();

    }

    static File testSrc = new File(System.getProperty("test.src"));

    static final int MAX_ROUNDS = 3;

    /**

     * Perform a compilation with custom factories registered in the context,

     * and verify that corresponding objects are created in each round.

     */

    void run() throws Exception {

        Counter demoCounter = new Counter();

        Counter myAttrCounter = new Counter();

        Context context = new Context();

        // Use a custom file manager which creates classloaders for annotation

        // processors with a sensible delegation parent, so that all instances

        // of test classes come from the same class loader. This is important

        // because the test performs class checks on the instances of classes

        // found in the context for each round or processing.

        context.put(JavaFileManager.class, new Context.Factory<JavaFileManager>() {

            public JavaFileManager make(Context c) {

                return new JavacFileManager(c, true, null) {

                    @Override

                    protected ClassLoader getClassLoader(URL[] urls) {

                        return new URLClassLoader(urls, T7021650.class.getClassLoader());

                    }

                };

            }

        });

        Demo.preRegister(context, demoCounter);

        MyAttr.preRegister(context, myAttrCounter);

        String[] args = {

            "-d", ".",

            "-processor", T7021650.class.getName(),

            "-XprintRounds",

            new File(testSrc, T7021650.class.getName() + ".java").getPath()

        };

        compile(context, args);

        // Expect to create Demo for initial round, then MAX_ROUNDS in which

        // GenX files are generated, then standard final round of processing.

        checkEqual("demoCounter", demoCounter.count, MAX_ROUNDS + 2);

        // Expect to create MyAttr for same processing rounds as for Demo,

        // plus additional context for final compilation.

        checkEqual("myAttrCounter", myAttrCounter.count, MAX_ROUNDS + 3);

    }

    void compile(Context context, String... args) throws Exception {

        StringWriter sw = new StringWriter();

        PrintWriter pw = new PrintWriter(sw);

        Main m = new Main("javac", pw);

        Main.Result res = m.compile(args, context);

        pw.close();

        String out = sw.toString();

        if (!out.isEmpty())

            System.err.println(out);

        if (!res.isOK())

            throw new Exception("compilation failed unexpectedly: result=" + res);

    }

    void checkEqual(String label, int found, int expect) throws Exception {

        if (found != expect)

            throw new Exception("unexpected value for " + label

                    + ": expected " + expect

                    + ": found " + found);

    }

    //---------------

    /*

     * A custom class unknown to javac but nonetheless registered in the context.

     */

    static class Demo {

        static void preRegister(Context context, final Counter counter) {

            context.put(Demo.class, new Context.Factory<Demo>() {

                public Demo make(Context c) {

                    counter.count++;

                    return new Demo(c);

                }

            });

        }

        Demo(Context c) {

            c.put(Demo.class, this);

        }

        static Demo instance(Context context) {

            return context.get(Demo.class);

        }

    }

    /**

     * A custom version of a standard javac component.

     */

    static class MyAttr extends Attr {

        static void preRegister(Context context, final Counter counter) {

            context.put(attrKey, new Context.Factory<Attr>() {

                public Attr make(Context c) {

                    counter.count++;

                    return new MyAttr(c);

                }

            });

        }

        MyAttr(Context c) {

            super(c);

        }

    }

    static class Counter {

        int count;

    }

    //---------------

    int round = 0;

    @Override

    public boolean process(Set<? extends TypeElement> annotations, RoundEnvironment roundEnv) {

        round++;

        Context context = ((JavacProcessingEnvironment) processingEnv).getContext();

        // verify items in context as expected

        check("Demo", Demo.instance(context), Demo.class);

        check("Attr", Attr.instance(context), MyAttr.class);

        // For a few rounds, generate new source files, so that we can check whether

        // values in the context are correctly handled in subsequent processing rounds

        if (round <= MAX_ROUNDS) {

            String pkg = "p";

            String currClass = "Gen" + round;

            String curr = pkg + "." + currClass;

            String next = (pkg + ".Gen" + (round + 1));

            StringBuilder text = new StringBuilder();

            text.append("package ").append(pkg).append(";\n");

            text.append("public class ").append(currClass).append(" {\n");

            if (round < MAX_ROUNDS)

                text.append("    ").append(next).append(" x;\n");

            text.append("}\n");

            try {

                JavaFileObject fo = filer.createSourceFile(curr);

                Writer out = fo.openWriter();

                try {

                    out.write(text.toString());

                } finally {

                    out.close();

                }

            } catch (IOException e) {

                throw new Error(e);

            }

        }

        return true;

    }

    void check(String label, Object o, Class<?> clazz) {

        if (o == null)

            throw new IllegalStateException(label + ": no item found");

        if (!clazz.isAssignableFrom(o.getClass()))

            throw new IllegalStateException(label + ": unexpected class: " + o.getClass());

    }

}