/*

 * 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.

 */

//

// SunJSSE does not support dynamic system properties, no way to re-use

// system properties in samevm/agentvm mode.

//

/*

 * @test

 * @bug 6822460

 * @summary support self-issued certificate

 * @run main/othervm SelfIssuedCert PKIX

 * @run main/othervm SelfIssuedCert SunX509

 * @author Xuelei Fan

 */

import java.net.*;

import java.util.*;

import java.io.*;

import javax.net.ssl.*;

import java.security.Security;

import java.security.KeyStore;

import java.security.KeyFactory;

import java.security.cert.Certificate;

import java.security.cert.CertificateFactory;

import java.security.spec.*;

import java.security.interfaces.*;

import java.math.BigInteger;

import java.util.Base64;

public class SelfIssuedCert {

    /*

     * =============================================================

     * Set the various variables needed for the tests, then

     * specify what tests to run on each side.

     */

    /*

     * Should we run the client or server in a separate thread?

     * Both sides can throw exceptions, but do you have a preference

     * as to which side should be the main thread.

     */

    static boolean separateServerThread = true;

    /*

     * Where do we find the keystores?

     */

    // Certificate information:

    // Issuer: C=US, O=Example, CN=localhost

    // Validity

    //     Not Before: May 25 00:35:58 2009 GMT

    //     Not After : May  5 00:35:58 2030 GMT

    // Subject: C=US, O=Example, CN=localhost

    // X509v3 Subject Key Identifier:

    //     56:AB:FE:15:4C:9C:4A:70:90:DC:0B:9B:EB:BE:DC:03:CC:7F:CE:CF

    // X509v3 Authority Key Identifier:

    //     keyid:56:AB:FE:15:4C:9C:4A:70:90:DC:0B:9B:EB:BE:DC:03:CC:7F:CE:CF

    //     DirName:/C=US/O=Example/CN=localhost

    //     serial:00

    static String trusedCertStr =

        "-----BEGIN CERTIFICATE-----\n" +

        "MIICejCCAeOgAwIBAgIBADANBgkqhkiG9w0BAQQFADAzMQswCQYDVQQGEwJVUzEQ\n" +

        "MA4GA1UEChMHRXhhbXBsZTESMBAGA1UEAxMJbG9jYWxob3N0MB4XDTA5MDUyNTAw\n" +

        "MDQ0M1oXDTMwMDUwNTAwMDQ0M1owMzELMAkGA1UEBhMCVVMxEDAOBgNVBAoTB0V4\n" +

        "YW1wbGUxEjAQBgNVBAMTCWxvY2FsaG9zdDCBnzANBgkqhkiG9w0BAQEFAAOBjQAw\n" +

        "gYkCgYEA0Wvh3FHYGQ3vvw59yTjUxT6QuY0fzwCGQTM9evXr/V9+pjWmaTkNDW+7\n" +

        "S/LErlWz64gOWTgcMZN162sVgx4ct/q27brY+SlUO5eSud1fSac6SfefhOPBa965\n" +

        "Xc4mnpDt5sgQPMDCuFK7Le6A+/S9J42BO2WYmNcmvcwWWrv+ehcCAwEAAaOBnTCB\n" +

        "mjAdBgNVHQ4EFgQUq3q5fYEibdvLpab+JY4pmifj2vYwWwYDVR0jBFQwUoAUq3q5\n" +

        "fYEibdvLpab+JY4pmifj2vahN6Q1MDMxCzAJBgNVBAYTAlVTMRAwDgYDVQQKEwdF\n" +

        "eGFtcGxlMRIwEAYDVQQDEwlsb2NhbGhvc3SCAQAwDwYDVR0TAQH/BAUwAwEB/zAL\n" +

        "BgNVHQ8EBAMCAgQwDQYJKoZIhvcNAQEEBQADgYEAHL8BSwtX6s8WPPG2FbQBX+K8\n" +

        "GquAyQNtgfJNm60B4i+fVBkJiQJtLmE0emvHx/3sIaHmB0Gd0HKnk/cIQXY304vr\n" +

        "QpqwudKcIZuzmj+pa7807joV+WzRDVIlt4HpYg7tiUvEoyw+X8jwY2lgiGR7mWu6\n" +

        "jQU8PN/06+qgtvSGFpo=\n" +

        "-----END CERTIFICATE-----";

    // Certificate information:

    // Issuer: C=US, O=Example, CN=localhost

    // Validity

    //     Not Before: May 25 00:35:58 2009 GMT

    //     Not After : May  5 00:35:58 2030 GMT

    // Subject: C=US, O=Example, CN=localhost

    // X509v3 Subject Key Identifier:

    //     0D:30:76:22:D6:9D:75:EF:FD:83:50:31:18:08:83:CD:01:4E:6A:C4

    // X509v3 Authority Key Identifier:

    //     keyid:56:AB:FE:15:4C:9C:4A:70:90:DC:0B:9B:EB:BE:DC:03:CC:7F:CE:CF

    //     DirName:/C=US/O=Example/CN=localhost

    //     serial:00

    static String targetCertStr =

        "-----BEGIN CERTIFICATE-----\n" +

        "MIICaTCCAdKgAwIBAgIBAjANBgkqhkiG9w0BAQQFADAzMQswCQYDVQQGEwJVUzEQ\n" +

        "MA4GA1UEChMHRXhhbXBsZTESMBAGA1UEAxMJbG9jYWxob3N0MB4XDTA5MDUyNTAw\n" +

        "MDQ0M1oXDTI5MDIwOTAwMDQ0M1owMzELMAkGA1UEBhMCVVMxEDAOBgNVBAoTB0V4\n" +

        "YW1wbGUxEjAQBgNVBAMTCWxvY2FsaG9zdDCBnzANBgkqhkiG9w0BAQEFAAOBjQAw\n" +

        "gYkCgYEAzmPahrH9LTQv3HEWsua+hIpzyU1ACooSd5BtDjc7XnVzSdGW8QD9R8EA\n" +

        "xko7TvfJo6IH6wwgHBspySwsl+6xvHhbwQjgtWlT71ksrUbqcUzmvSvcycQYA8RC\n" +

        "yk9HK5pEJQgSxldpR3Kmy0V6CHC4dCm15trnJYWisTuezY3fjXECAwEAAaOBjDCB\n" +

        "iTAdBgNVHQ4EFgQUQkiWFRkjKsfwFo7UMQfGEzNNW60wWwYDVR0jBFQwUoAUq3q5\n" +

        "fYEibdvLpab+JY4pmifj2vahN6Q1MDMxCzAJBgNVBAYTAlVTMRAwDgYDVQQKEwdF\n" +

        "eGFtcGxlMRIwEAYDVQQDEwlsb2NhbGhvc3SCAQAwCwYDVR0PBAQDAgPoMA0GCSqG\n" +

        "SIb3DQEBBAUAA4GBAIMz7c1R+6KEO7FmH4rnv9XE62xkg03ff0vKXLZMjjs0CX2z\n" +

        "ybRttuTFafHA6/JS+Wz0G83FCRVeiw2WPU6BweMwwejzzIrQ/K6mbp6w6sRFcbNa\n" +

        "eLBtzkjEtI/htOSSq3/0mbKmWn5uVJckO4QiB8kUR4F7ngM9l1uuI46ZfUsk\n" +

        "-----END CERTIFICATE-----";

    // Private key in the format of PKCS#8

    static String targetPrivateKey =

        "MIICeQIBADANBgkqhkiG9w0BAQEFAASCAmMwggJfAgEAAoGBAM5j2oax/S00L9xx\n" +

        "FrLmvoSKc8lNQAqKEneQbQ43O151c0nRlvEA/UfBAMZKO073yaOiB+sMIBwbKcks\n" +

        "LJfusbx4W8EI4LVpU+9ZLK1G6nFM5r0r3MnEGAPEQspPRyuaRCUIEsZXaUdypstF\n" +

        "eghwuHQpteba5yWForE7ns2N341xAgMBAAECgYEAgZ8k98OBhopoJMLBxso0jXmH\n" +

        "Dr59oiDlSEJku7DkkIajSZFggyxj5lTI78BfT1FASozQ/EY5RG2q6LXdq+41oU/U\n" +

        "JVEQWhdIE1mQDwE0vgaYdjzMaVIsC3cZYOCOmCYvNxCiTt7e/z8yBMmAE5udqJMB\n" +

        "pim4WXDfpy0ssK81oCECQQDwMC4xu+kn0yD/Qyi9Zn26gIRDv4bjzDQoJfSvMhrY\n" +

        "a4duxLzh9u4gCDd0+wHxpPQvNxGCk0c1JUxBJ2rb4G3HAkEA2/oVRV6+xiRXUnoo\n" +

        "bdPEO27zEJmdpE42yU/JLIy6DPu2IUhEqY45fU2ZERmwMdhpiK/vsf/CZKJ2j/ZU\n" +

        "PdMLBwJBAJIYTFDWAqjFpCGAASzLRZiGiW0H941h7Suqgp159ZhEN5mps1Yis47q\n" +

        "UIkoEHOiKSD69vychsiNykcrKbVaWosCQQC1UrYX4Vo1r5z/EkyjAwzcxL68rzM/\n" +

        "TW1hkU/NVg7CRvXBB3X5oY+H1t/WNauD2tRa5FMbESwmkbhTQIP+FikfAkEA4goD\n" +

        "HCxUn0Z1OQq9QL6y1Yoof6sHxicUwABosuCLJnDJmA5vhpemvdXQTzFII8g1hyQf\n" +

        "z1yyDoxhddcleKlJvQ==";

    static char passphrase[] = "passphrase".toCharArray();

    /*

     * Is the server ready to serve?

     */

    volatile static boolean serverReady = false;

    /*

     * Turn on SSL debugging?

     */

    static boolean debug = false;

    /*

     * Define the server side of the test.

     *

     * If the server prematurely exits, serverReady will be set to true

     * to avoid infinite hangs.

     */

    void doServerSide() throws Exception {

        SSLContext context = getSSLContext(null, targetCertStr,

                                            targetPrivateKey);

        SSLServerSocketFactory sslssf = context.getServerSocketFactory();

        SSLServerSocket sslServerSocket =

            (SSLServerSocket)sslssf.createServerSocket(serverPort);

        serverPort = sslServerSocket.getLocalPort();

        /*

         * Signal Client, we're ready for his connect.

         */

        serverReady = true;

        SSLSocket sslSocket = (SSLSocket) sslServerSocket.accept();

        sslSocket.setNeedClientAuth(false);

        InputStream sslIS = sslSocket.getInputStream();

        OutputStream sslOS = sslSocket.getOutputStream();

        sslIS.read();

        sslOS.write(85);

        sslOS.flush();

        sslSocket.close();

    }

    /*

     * Define the client side of the test.

     *

     * If the server prematurely exits, serverReady will be set to true

     * to avoid infinite hangs.

     */

    void doClientSide() throws Exception {

        /*

         * Wait for server to get started.

         */

        while (!serverReady) {

            Thread.sleep(50);

        }

        SSLContext context = getSSLContext(trusedCertStr, null, null);

        SSLSocketFactory sslsf = context.getSocketFactory();

        SSLSocket sslSocket =

            (SSLSocket)sslsf.createSocket("localhost", serverPort);

        InputStream sslIS = sslSocket.getInputStream();

        OutputStream sslOS = sslSocket.getOutputStream();

        sslOS.write(280);

        sslOS.flush();

        sslIS.read();

        sslSocket.close();

    }

    // get the ssl context

    private static SSLContext getSSLContext(String trusedCertStr,

            String keyCertStr, String keySpecStr) throws Exception {

        // generate certificate from cert string

        CertificateFactory cf = CertificateFactory.getInstance("X.509");

        // create a key store

        KeyStore ks = KeyStore.getInstance("JKS");

        ks.load(null, null);

        // import the trused cert

        Certificate trusedCert = null;

        ByteArrayInputStream is = null;

        if (trusedCertStr != null) {

            is = new ByteArrayInputStream(trusedCertStr.getBytes());

            trusedCert = cf.generateCertificate(is);

            is.close();

            ks.setCertificateEntry("RSA Export Signer", trusedCert);

        }

        if (keyCertStr != null) {

            // generate the private key.

            PKCS8EncodedKeySpec priKeySpec = new PKCS8EncodedKeySpec(

                                Base64.getMimeDecoder().decode(keySpecStr));

            KeyFactory kf = KeyFactory.getInstance("RSA");

            RSAPrivateKey priKey =

                    (RSAPrivateKey)kf.generatePrivate(priKeySpec);

            // generate certificate chain

            is = new ByteArrayInputStream(keyCertStr.getBytes());

            Certificate keyCert = cf.generateCertificate(is);

            is.close();

            Certificate[] chain = null;

            if (trusedCert != null) {

                chain = new Certificate[2];

                chain[0] = keyCert;

                chain[1] = trusedCert;

            } else {

                chain = new Certificate[1];

                chain[0] = keyCert;

            }

            // import the key entry.

            ks.setKeyEntry("Whatever", priKey, passphrase, chain);

        }

        // create SSL context

        TrustManagerFactory tmf = TrustManagerFactory.getInstance(tmAlgorithm);

        tmf.init(ks);

        SSLContext ctx = SSLContext.getInstance("TLS");

        if (keyCertStr != null && !keyCertStr.isEmpty()) {

            KeyManagerFactory kmf = KeyManagerFactory.getInstance("NewSunX509");

            kmf.init(ks, passphrase);

            ctx.init(kmf.getKeyManagers(), tmf.getTrustManagers(), null);

            ks = null;

        } else {

            ctx.init(null, tmf.getTrustManagers(), null);

        }

        return ctx;

    }

    private static String tmAlgorithm;        // trust manager

    private static void parseArguments(String[] args) {

        tmAlgorithm = args[0];

    }

    /*

     * =============================================================

     * The remainder is just support stuff

     */

    // use any free port by default

    volatile int serverPort = 0;

    volatile Exception serverException = null;

    volatile Exception clientException = null;

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

        // MD5 is used in this test case, don't disable MD5 algorithm.

        Security.setProperty("jdk.certpath.disabledAlgorithms",

                "MD2, RSA keySize < 1024");

        Security.setProperty("jdk.tls.disabledAlgorithms",

                "SSLv3, RC4, DH keySize < 768");

        if (debug)

            System.setProperty("javax.net.debug", "all");

        /*

         * Get the customized arguments.

         */

        parseArguments(args);

        /*

         * Start the tests.

         */

        new SelfIssuedCert();

    }

    Thread clientThread = null;

    Thread serverThread = null;

    /*

     * Primary constructor, used to drive remainder of the test.

     *

     * Fork off the other side, then do your work.

     */

    SelfIssuedCert() throws Exception {

        if (separateServerThread) {

            startServer(true);

            startClient(false);

        } else {

            startClient(true);

            startServer(false);

        }

        /*

         * Wait for other side to close down.

         */

        if (separateServerThread) {

            serverThread.join();

        } else {

            clientThread.join();

        }

        /*

         * When we get here, the test is pretty much over.

         *

         * If the main thread excepted, that propagates back

         * immediately.  If the other thread threw an exception, we

         * should report back.

         */

        if (serverException != null)

            throw serverException;

        if (clientException != null)

            throw clientException;

    }

    void startServer(boolean newThread) throws Exception {

        if (newThread) {

            serverThread = new Thread() {

                public void run() {

                    try {

                        doServerSide();

                    } catch (Exception e) {

                        /*

                         * Our server thread just died.

                         *

                         * Release the client, if not active already...

                         */

                        System.err.println("Server died...");

                        serverReady = true;

                        serverException = e;

                    }

                }

            };

            serverThread.start();

        } else {

            doServerSide();

        }

    }

    void startClient(boolean newThread) throws Exception {

        if (newThread) {

            clientThread = new Thread() {

                public void run() {

                    try {

                        doClientSide();

                    } catch (Exception e) {

                        /*

                         * Our client thread just died.

                         */

                        System.err.println("Client died...");

                        clientException = e;

                    }

                }

            };

            clientThread.start();

        } else {

            doClientSide();

        }

    }

}