/*

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

 */

import java.lang.module.Configuration;

import java.lang.module.ResolvedModule;

import java.io.IOException;

import java.io.InputStream;

import java.net.URL;

import java.nio.file.Files;

import java.nio.file.Path;

import java.nio.file.Paths;

/**

 * Basic test of Class getResource and getResourceAsStream to locate/read

 * resources in named modules.

 */

public class Main {

    static final String NAME = "myresource";

    public static void main(String[] args) throws IOException {

        // create resources in m1

        createResource("m1", Paths.get("."), "m1");

        createResource("m1", Paths.get("p1"), "m1/p1");

        createResource("m1", Paths.get("p1", "impl"), "m1/p1.impl");

        createResource("m1", Paths.get("p1", "resources"), "m1/p1.resources");

        // create resources in m2

        createResource("m2", Paths.get("."), "m2");

        createResource("m2", Paths.get("p2"), "m2/p2");

        createResource("m2", Paths.get("p2", "impl"), "m2/p2.impl");

        createResource("m2", Paths.get("p2", "resources"), "m2/p2.resources");

        // invoke Class getResource from an unnamed module.

        URL url = Main.class.getResource("/" + NAME);

        assertNotNull(url);

        url = Main.class.getResource("/p1/" + NAME);

        assertNull(url);

        url = Main.class.getResource("/p1/impl/" + NAME);

        assertNull(url);

        url = Main.class.getResource("/p1/resources/" + NAME);

        assertEquals(readAllAsString(url), "m1/p1.resources");

        url = Main.class.getResource("/p2/" + NAME);

        assertNull(url);

        url = Main.class.getResource("/p2/impl/" + NAME);

        assertNull(url);

        // m1: exports private p1.resources

        url = Main.class.getResource("/p2/resources/" + NAME);

        assertNull(url);

        // invoke Class getResource from module m1

        url = p1.Main.getResource("/" + NAME);

        assertEquals(readAllAsString(url), "m1");

        url = p1.Main.getResource("/p1/" + NAME);

        assertEquals(readAllAsString(url), "m1/p1");

        url = p1.Main.getResource("/p1/impl/" + NAME);

        assertEquals(readAllAsString(url), "m1/p1.impl");

        url = p1.Main.getResource("/p1/resources/" + NAME);

        assertEquals(readAllAsString(url), "m1/p1.resources");

        // m2: not a named package

        url = p1.Main.getResource(p2.Main.class, "/" + NAME);

        assertEquals(readAllAsString(url), "m2");

        url = p1.Main.getResource(p2.Main.class, "/p2/" + NAME);

        assertNull(url);

        // m2: exports p2.impl to m1

        url = p1.Main.getResource(p2.Main.class, "/p2/impl/" + NAME);

        assertNull(url);

        // m2: exports private p2.resources to m1;

        url = p1.Main.getResource(p2.Main.class, "/p2/resources/" + NAME);

        assertEquals(readAllAsString(url), "m2/p2.resources");

        // invoke Class getResource from module m2

        url = p2.Main.getResource("/" + NAME);

        assertEquals(readAllAsString(url), "m2");

        url = p2.Main.getResource("/p2/" + NAME);

        assertEquals(readAllAsString(url), "m2/p2");

        url = p2.Main.getResource("/p2/impl/" + NAME);

        assertEquals(readAllAsString(url), "m2/p2.impl");

        url = p2.Main.getResource("/p2/resources/" + NAME);

        assertEquals(readAllAsString(url), "m2/p2.resources");

        // m1: not a named package

        url = p2.Main.getResource(p1.Main.class, "/" + NAME);

        assertEquals(readAllAsString(url), "m1");

        url = p2.Main.getResource(p1.Main.class, "/p1/" + NAME);

        assertNull(url);

        url = p2.Main.getResource(p1.Main.class, "/p1/impl/" + NAME);

        assertNull(url);

        // m1: exports private p1.resources;

        url = p2.Main.getResource(p1.Main.class, "/p1/resources/" + NAME);

        assertEquals(readAllAsString(url), "m1/p1.resources");

        // invoke Class getResourceAsStream from an unnamed module.

        InputStream in = Main.class.getResourceAsStream("/" + NAME);

        assertNotNull(in);

        in = Main.class.getResourceAsStream("/p1/" + NAME);

        assertNull(in);

        in = Main.class.getResourceAsStream("/p1/impl/" + NAME);

        assertNull(in);

        in = Main.class.getResourceAsStream("/p1/resources/" + NAME);

        assertEquals(readAllAsString(in), "m1/p1.resources");

        in = Main.class.getResourceAsStream("/p2/" + NAME);

        assertNull(in);

        in = Main.class.getResourceAsStream("/p2/impl/" + NAME);

        assertNull(in);

        in = Main.class.getResourceAsStream("/p2/resources/" + NAME);

        assertNull(in);

        // invoke Class getResourceAsStream from module m1

        in = p1.Main.getResourceAsStream("/" + NAME);

        assertEquals(readAllAsString(in), "m1");

        in = p1.Main.getResourceAsStream("/p1/" + NAME);

        assertEquals(readAllAsString(in), "m1/p1");

        in = p1.Main.getResourceAsStream("/p1/impl/" + NAME);

        assertEquals(readAllAsString(in), "m1/p1.impl");

        in = p1.Main.getResourceAsStream("/p1/resources/" + NAME);

        assertEquals(readAllAsString(in), "m1/p1.resources");

        in = p1.Main.getResourceAsStream(p2.Main.class, "/" + NAME);

        assertEquals(readAllAsString(in), "m2");

        in = p1.Main.getResourceAsStream(p2.Main.class, "/p2/" + NAME);

        assertNull(in);

        in = p1.Main.getResourceAsStream(p2.Main.class, "/p2/impl/" + NAME);

        assertNull(in);

        in = p1.Main.getResourceAsStream(p2.Main.class, "/p2/resources/" + NAME);

        assertEquals(readAllAsString(in), "m2/p2.resources");

        // invoke Class getResourceAsStream from module m2

        in = p2.Main.getResourceAsStream("/" + NAME);

        assertEquals(readAllAsString(in), "m2");

        in = p2.Main.getResourceAsStream("/p2/" + NAME);

        assertEquals(readAllAsString(in), "m2/p2");

        in = p2.Main.getResourceAsStream("/p2/impl/" + NAME);

        assertEquals(readAllAsString(in), "m2/p2.impl");

        in = p2.Main.getResourceAsStream("/p2/resources/" + NAME);

        assertEquals(readAllAsString(in), "m2/p2.resources");

        in = p2.Main.getResourceAsStream(p1.Main.class, "/" + NAME);

        assertEquals(readAllAsString(in), "m1");

        in = p2.Main.getResourceAsStream(p1.Main.class, "/p1/" + NAME);

        assertNull(in);

        in = p2.Main.getResourceAsStream(p1.Main.class, "/p1/impl/" + NAME);

        assertNull(in);

        in = p2.Main.getResourceAsStream(p1.Main.class, "/p1/resources/" + NAME);

        assertEquals(readAllAsString(in), "m1/p1.resources");

        // Nulls

        try {

            Main.class.getResource(null);

            assertTrue(false);

        } catch (NullPointerException expected) { }

        try {

            Main.class.getResourceAsStream(null);

            assertTrue(false);

        } catch (NullPointerException expected) { }

        try {

            p1.Main.class.getResource(null);

            assertTrue(false);

        } catch (NullPointerException expected) { }

        try {

            p1.Main.class.getResourceAsStream(null);

            assertTrue(false);

        } catch (NullPointerException expected) { }

        // SecurityManager case

        System.setSecurityManager(new SecurityManager());

        assertNull(Main.class.getResource("/" + NAME));

        assertNull(p1.Main.getResource("/" + NAME));

        assertNull(p2.Main.getResource("/" + NAME));

        assertNull(Main.class.getResourceAsStream("/" + NAME));

        assertNull(p1.Main.getResourceAsStream("/" + NAME));

        assertNull(p2.Main.getResourceAsStream("/" + NAME));

        System.out.println("Success!");

    }

    /**

     * Create a resource in the sub-directory of the given exploded module

     */

    static void createResource(String mn, Path subdir, String msg) throws IOException {

        Path dir = directoryFor(mn).resolve(subdir);

        Path file = dir.resolve(NAME);

        Files.write(file, msg.getBytes("UTF-8"));

    }

    /**

     * Returns the directory for the given module (by name).

     */

    static Path directoryFor(String name) {

        ResolvedModule resolvedModule = cf.findModule(name).orElse(null);

        if (resolvedModule == null)

            throw new RuntimeException("not found: " + name);

        Path dir = Paths.get(resolvedModule.reference().location().get());

        if (!Files.isDirectory(dir))

            throw new RuntimeException("not a directory: " + dir);

        return dir;

    }

    static String readAllAsString(InputStream in) throws IOException {

        if (in == null)

            return null;

        try (in) {

            return new String(in.readAllBytes(), "UTF-8");

        }

    }

    static String readAllAsString(URL url) throws IOException {

        if (url == null)

            return null;

        InputStream in = url.openStream();

        return readAllAsString(url.openStream());

    }

    static void assertTrue(boolean condition) {

        if (!condition) throw new RuntimeException();

    }

    static void assertNull(Object o) {

        assertTrue(o == null);

    }

    static void assertNotNull(Object o) {

        assertTrue(o != null);

    }

    static void assertEquals(Object actual, Object expected) {

        if (expected == null) {

            assertNull(actual);

        } else {

            assertTrue(expected.equals(actual));

        }

    }

    static void assertNotEquals(Object actual, Object expected) {

        if (expected == null) {

            assertNotNull(actual);

        } else {

            assertTrue(!expected.equals(actual));

        }

    }

}