/*
 * Copyright (c) 2003, 2018, 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.
 */

package nsk.jvmti.scenarios.sampling.SP04;

import java.io.PrintStream;

import nsk.share.*;
import nsk.share.jvmti.*;

public class sp04t002 extends DebugeeClass {

    // run test from command line
    public static void main(String argv[]) {
        argv = nsk.share.jvmti.JVMTITest.commonInit(argv);

        // JCK-compatible exit
        System.exit(run(argv, System.out) + Consts.JCK_STATUS_BASE);
    }

    // run test from JCK-compatible environment
    public static int run(String argv[], PrintStream out) {
        return new sp04t002().runIt(argv, out);
    }

    /* =================================================================== */

    // scaffold objects
    ArgumentHandler argHandler = null;
    Log log = null;
    long timeout = 0;
    int status = Consts.TEST_PASSED;

    // monitors for threads synchronization
    static Object endingMonitor = new Object();

    // tested threads list
    static final int DEFAULT_THREADS_NUMBER = 1;
    int threadsKinds = 6;
    int threadsCount = 0;
    sp04t002Thread threads[][] = null;

    // run debuggee
    public int runIt(String argv[], PrintStream out) {
        argHandler = new ArgumentHandler(argv);
        log = new Log(out, argHandler);
        timeout = argHandler.getWaitTime() * 60 * 1000; // milliseconds

        threadsCount = argHandler.findOptionIntValue("threads", DEFAULT_THREADS_NUMBER);

        threads = new sp04t002Thread[threadsKinds][];
        for (int i = 0; i < threadsKinds; i++) {
            threads[i] = new sp04t002Thread[threadsCount];
            for (int j = 0; j < threadsCount; j++) {
                switch (i) {
                    case 0:
                        threads[i][j] = new sp04t002ThreadRunning("ThreadRunning");
                        break;
                    case 1:
                        threads[i][j] = new sp04t002ThreadEntering("ThreadEntering");
                        break;
                    case 2:
                        threads[i][j] = new sp04t002ThreadWaiting("ThreadWaiting");
                        break;
                    case 3:
                        threads[i][j] = new sp04t002ThreadSleeping("ThreadSleeping");
                        break;
                    case 4:
                        threads[i][j] = new sp04t002ThreadRunningInterrupted("ThreadRunningInterrupted");
                        break;
                    case 5:
                        threads[i][j] = new sp04t002ThreadRunningNative("ThreadRunningNative");
                        break;
                    default:
                        throw new TestBug("Unknown thread kind #" + i);
                }
            }
        }

        // run threads
        log.display("Starting tested threads");
        try {
            synchronized (endingMonitor) {
                // start threads
                for (int i = 0; i < threadsKinds; i++) {
                    for (int j = 0; j < threads[i].length; j++) {
                        synchronized (threads[i][j].startingMonitor) {
                            threads[i][j].start();
                            threads[i][j].startingMonitor.wait();
                        }
                        if (!threads[i][j].checkReady()) {
                            throw new Failure("Unable to prepare thread #"
                                                + i + "," + j + ": " + threads[i][j]);
                        }
                    }
                }

                // testing sync
                log.display("Testing sync: threads ready");
                status = checkStatus(status);
            }
        } catch (InterruptedException e) {
            throw new Failure(e);
        } finally {
            // let all threads to finish
            for (int i = 0; i < threadsKinds; i++) {
                for (int j = 0; j < threads[i].length; j++) {
                    threads[i][j].letFinish();
                }
            }
        }

        // wait for all threads to finish
        log.display("Finishing tested threads");
        try {
            for (int i = 0; i < threads.length; i++) {
                for (int j = 0; j < threads[i].length; j++) {
                    threads[i][j].join();
                }
            }
        } catch (InterruptedException e) {
            throw new Failure(e);
        }

        return status;
    }
}

/* =================================================================== */

// basic class for tested threads
abstract class sp04t002Thread extends Thread {
    public Object startingMonitor = new Object();

    // make thread with specific name
    public sp04t002Thread(String name) {
        super(name);
    }

    // check if thread is ready for testing
    public boolean checkReady() {
        // return true by default
        return true;
    }

    // let thread to finish
    public void letFinish() {
        // do nothing by default
    }
}

/* =================================================================== */

class sp04t002ThreadRunning extends sp04t002Thread {
    private volatile boolean shouldFinish = false;

    public sp04t002ThreadRunning(String name) {
        super(name);
    }

    public void run() {
        // notify about starting
        synchronized (startingMonitor) {
            startingMonitor.notifyAll();
        }

        // run in a loop
        int i = 0;
        int n = 1000;
        while (!shouldFinish) {
            if (n <= 0) {
                n = 1000;
            }
            if (i > n) {
                i = 0;
                n = n - 1;
            }
            i = i + 1;
        }
    }

    public void letFinish() {
        shouldFinish = true;
    }
}

class sp04t002ThreadEntering extends sp04t002Thread {
    public sp04t002ThreadEntering(String name) {
        super(name);
    }

    public void run() {
        // notify about starting
        synchronized (startingMonitor) {
            startingMonitor.notifyAll();
        }

        // wait for endingMonitor to become released
        synchronized (sp04t002.endingMonitor) {
            // do nothing
        }
    }
}

class sp04t002ThreadWaiting extends sp04t002Thread {
    private Object waitingMonitor = new Object();

    public sp04t002ThreadWaiting(String name) {
        super(name);
    }

    public void run() {
        synchronized (waitingMonitor) {

            // notify about starting
            synchronized (startingMonitor) {
                startingMonitor.notifyAll();
            }

            // wait on monitor
            try {
                waitingMonitor.wait();
            } catch (InterruptedException ignore) {
                // just finish
            }
        }
    }

    public boolean checkReady() {
        // wait until waitingMonitor released on wait()
        synchronized (waitingMonitor) {
        }
        return true;
    }

    public void letFinish() {
        synchronized (waitingMonitor) {
            waitingMonitor.notifyAll();
        }
    }
}

class sp04t002ThreadSleeping extends sp04t002Thread {
    public sp04t002ThreadSleeping(String name) {
        super(name);
    }

    public void run() {
        long timeout = 7 * 24 * 60 * 60 * 1000; // one week in milliseconds

        // notify about starting
        synchronized (startingMonitor) {
            startingMonitor.notifyAll();
        }

        // sleep for a loooong time
        try {
            sleep(timeout);
        } catch (InterruptedException ignore) {
            // just finish
        }
    }

    public void letFinish() {
        interrupt();
    }
}

class sp04t002ThreadRunningInterrupted extends sp04t002Thread {
    private Object waitingMonitor = new Object();
    private volatile boolean shouldFinish = false;

    public sp04t002ThreadRunningInterrupted(String name) {
        super(name);
    }

    public void run() {
        synchronized (waitingMonitor) {
            // notify about starting
            synchronized (startingMonitor) {
                startingMonitor.notifyAll();
            }

            // wait on watingMonitor until interrupted
            try {
                waitingMonitor.wait();
            } catch (InterruptedException ignore) {
                // just continue
            }
        }

        // run in a loop
        int i = 0;
        int n = 1000;
        while (!shouldFinish) {
            if (n <= 0) {
                n = 1000;
            }
            if (i > n) {
                i = 0;
                n = n - 1;
            }
            i = i + 1;
        }
    }

    public boolean checkReady() {
        // interrupt thread on wait()
        synchronized (waitingMonitor) {
            interrupt();
        }

        return true;
    }

    public void letFinish() {
        shouldFinish = true;
    }
}

class sp04t002ThreadRunningNative extends sp04t002Thread {
    public sp04t002ThreadRunningNative(String name) {
        super(name);
    }

    public void run() {
        // notify about starting
        synchronized (startingMonitor) {
            startingMonitor.notifyAll();
        }

        // call native method
        nativeMethod();
    }

    public native void nativeMethod();

    public native boolean checkReady();
    public native void letFinish();
}