/*

 * Copyright (c) 2001, 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.jdi.ThreadReference.frames_ii;

import nsk.share.*;

import nsk.share.jpda.*;

import nsk.share.jdi.*;

import com.sun.jdi.*;

import java.util.*;

import java.io.*;

import com.sun.jdi.event.*;

import com.sun.jdi.request.*;

/**

 * The test for the implementation of an object of the type     <BR>

 * ThreadReference.                                             <BR>

 *                                                              <BR>

 * The test checks up that results of the method                <BR>

 * <code>com.sun.jdi.ThreadReference.frames(int index, int lenght)</code> <BR>

 * complies with its spec.                                      <BR>

 * <BR>

 * The cases for testing are as follows.                                <BR>

 * After being started up,                                              <BR>

 * a debuggee creates a 'lockingObject' for synchronizing threads,      <BR>

 * enters a synchronized block in which it creates new thread, thread2, <BR>

 * informs a debugger of the thread2 creation, and is waiting for reply.<BR>

 * Since the thread2 uses the same locking object in its 'run' method   <BR>

 * it is locked up until main thread leaves the synchronized block.     <BR>

 * Upon the receiption a message from the debuggee, the debugger        <BR>

 * - sets up a breakpoint within thread2's 'run' method;                <BR>

 * - forces main thread to leave the synchronized block in order to     <BR>

 *     unlock the thread2 to get it suspended at the breakpoint.        <BR>

 * Then the debugger performs a number of checking calls to             <BR>

 * thread2.frames(index,lenght) with the following arguments:           <BR>

 *                                                                      <BR>

 *    start  <  0  (-1)                 <BR>

 *    lenght < -1  (-2)                 <BR>

 *    lenght == 0                       <BR>

 *    length == thread2.frameCount()    <BR>

 *    lenght >  thread2.frameCount()    <BR>

 * <BR>

 */

public class frames_ii002 {

    //----------------------------------------------------- templete section

    static final int PASSED = 0;

    static final int FAILED = 2;

    static final int PASS_BASE = 95;

    //----------------------------------------------------- templete parameters

    static final String

    sHeader1 = "\n==> nsk/jdi/ThreadReference/frames_ii/frames_ii002  ",

    sHeader2 = "--> debugger: ",

    sHeader3 = "##> debugger: ";

    //----------------------------------------------------- main method

    public static void main (String argv[]) {

        int result = run(argv, System.out);

        System.exit(result + PASS_BASE);

    }

    public static int run (String argv[], PrintStream out) {

        return new frames_ii002().runThis(argv, out);

    }

     //--------------------------------------------------   log procedures

    //private static boolean verbMode = false;

    private static Log  logHandler;

    private static void log1(String message) {

        logHandler.display(sHeader1 + message);

    }

    private static void log2(String message) {

        logHandler.display(sHeader2 + message);

    }

    private static void log3(String message) {

        logHandler.complain(sHeader3 + message);

    }

    //  ************************************************    test parameters

    private String debuggeeName =

        "nsk.jdi.ThreadReference.frames_ii.frames_ii002a";

    private String testedClassName =

        "nsk.jdi.ThreadReference.frames_ii.Threadframes_ii002a";

    //String mName = "nsk.jdi.ThreadReference.frames_ii";

    //====================================================== test program

    static ArgumentHandler      argsHandler;

    static int waitTime;

    static VirtualMachine      vm            = null;

    static EventRequestManager eventRManager = null;

    static EventQueue          eventQueue    = null;

    static EventSet            eventSet      = null;

    ReferenceType     testedclass  = null;

    ThreadReference   thread2      = null;

    ThreadReference   mainThread   = null;

    static int  testExitCode = PASSED;

    static final int returnCode0 = 0;

    static final int returnCode1 = 1;

    static final int returnCode2 = 2;

    static final int returnCode3 = 3;

    static final int returnCode4 = 4;

    //------------------------------------------------------ methods

    private int runThis (String argv[], PrintStream out) {

        Debugee debuggee;

        argsHandler     = new ArgumentHandler(argv);

        logHandler      = new Log(out, argsHandler);

        Binder binder   = new Binder(argsHandler, logHandler);

        if (argsHandler.verbose()) {

            debuggee = binder.bindToDebugee(debuggeeName + " -vbs");

        } else {

            debuggee = binder.bindToDebugee(debuggeeName);

        }

        waitTime = argsHandler.getWaitTime();

        IOPipe pipe     = new IOPipe(debuggee);

        debuggee.redirectStderr(out);

        log2("issuspended002a debuggee launched");

        debuggee.resume();

        String line = pipe.readln();

        if ((line == null) || !line.equals("ready")) {

            log3("signal received is not 'ready' but: " + line);

            return FAILED;

        } else {

            log2("'ready' recieved");

        }

        vm = debuggee.VM();

    //------------------------------------------------------  testing section

        log1("      TESTING BEGINS");

        for (int i = 0; ; i++) {

            pipe.println("newcheck");

            line = pipe.readln();

            if (line.equals("checkend")) {

                log2("     : returned string is 'checkend'");

                break ;

            } else if (!line.equals("checkready")) {

                log3("ERROR: returned string is not 'checkready'");

                testExitCode = FAILED;

                break ;

            }

            log1("new checkready: #" + i);

            //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ variable part

            int expresult = returnCode0;

            eventRManager = vm.eventRequestManager();

            eventQueue    = vm.eventQueue();

            String threadName = "testedThread";

            String breakpointMethod1 = "runt1";

            String breakpointMethod2 = "runt2";

            String bpLine0 = "breakpointLineNumber0";

            //String bpLine1 = "breakpointLineNumber1";

            //String bpLine2 = "breakpointLineNumber2";

            //String bpLine3 = "breakpointLineNumber3";

            List            allThreads   = null;

            ListIterator    listIterator = null;

            List            classes      = null;

            BreakpointRequest breakpRequest0 = null;

            //BreakpointRequest breakpRequest1 = null;

            //BreakpointRequest breakpRequest2 = null;

            //BreakpointRequest breakpRequest3 = null;

            String synchroMethod = "run";

            //Method runMethod0 = null;

            //Method runMethod1 = null;

            //Method runMethod2 = null;

            List frameList  = null;

            label0: {

                log2("getting ThreadReference objects");

                try {

                    allThreads  = vm.allThreads();

                    classes     = vm.classesByName(testedClassName);

                    testedclass = (ReferenceType) classes.get(0);

                } catch ( Exception e) {

                    log3("ERROR: Exception at very beginning !? : " + e);

                    expresult = returnCode1;

                    break label0;

                }

                listIterator = allThreads.listIterator();

                for (;;) {

                    try {

                        thread2 = (ThreadReference) listIterator.next();

                        if (thread2.name().equals(threadName))

                            break ;

                    } catch ( NoSuchElementException e ) {

                        log3("ERROR: NoSuchElementException for listIterator.next()");

                        log3("ERROR: NO THREAD2 ?????????!!!!!!!");

                        expresult = returnCode1;

                        break label0;

                    }

                }

                log2("setting up a breakpoint");

                breakpRequest0 = settingBreakpoint(synchroMethod, bpLine0, "zero");

                if (breakpRequest0 == null) {

                    expresult = returnCode1;

                    break label0;

                }

            }

            label1: {

                if (expresult != returnCode0)

                    break label1;

                log2("       enabling breakpRequest0");

                breakpRequest0.enable();

                log2("       making the main thread to leave synchronized block");

                pipe.println("continue");

                line = pipe.readln();

                if (!line.equals("docontinue")) {

                    log3("ERROR: returned string is not 'docontinue'");

                    expresult = returnCode4;

                }

                if (expresult != returnCode0)

                    break label1;

                log2("      getting BreakpointEvent");

                expresult = breakpoint();

                if (expresult != returnCode0)

                    break label1;

                log2("      thread2 is at breakpoint");

                log2("      checks begin");

                log2("......case for check: start < 0  {thread2.frames(-1, 1);} IndexOutOfBoundsException expected");

                frameList = null;

                try {

                    frameList = thread2.frames(-1, 1);

                    log3("ERROR:    no Exception ");

                    log2("          frameCount == " + thread2.frameCount());

                    expresult = returnCode1;;

                } catch ( IndexOutOfBoundsException e1 ) {

                    log2("          IndexOutOfBoundsException");

                } catch ( Exception e2 ) {

                    log3("ERROR:    unexpected Exception  : " + e2);

                    expresult = returnCode1;

                }

                log2("......case for check: lenght < -1  {thread2.frames(0, -2);}  IndexOutOfBoundsException expected");

                frameList = null;

                try {

                    frameList = thread2.frames(0, -2);

                    log3("ERROR:  no Exception ");

                    log2("        frameList.size() = " + frameList.size() );

                    expresult = returnCode1;

                } catch ( IndexOutOfBoundsException e1 ) {

                    log2("          IndexOutOfBoundsException");

                } catch ( Exception e2 ) {

                    log3("ERROR:    unexpected Exception : " + e2);

                    expresult = returnCode1;

                }

                log2("......case for check: lenght == 0:  frameList == thread2.frames(0, 0);");

                log2("                                 no IndexOutOfBoundsException expected");

                frameList = null;

                try {

                    frameList = thread2.frames(0, 0);

                    log2("          checking up on  frameList.size() == 0");

                    if (frameList.size() != 0) {

                        log3("ERROR:  frameList.size() != 0:  " + frameList.size());

                        expresult = returnCode1;

                    }

                } catch ( IndexOutOfBoundsException e1 ) {

                    log3("ERROR: IndexOutOfBoundsException ");

                    expresult = returnCode1;

                } catch ( Exception e2 ) {

                    log3("ERROR:  unexpected Exception  " + e2);

                    expresult = returnCode1;

                }

                log2("......case for check: lenght == frameCount()  {thread2.frames(0, thread2.frameCount());}");

                log2("                     no IndexOutOfBoundsException expected");

                frameList = null;

                try {

                    frameList = thread2.frames(0, thread2.frameCount());

                    log2("          checking up on  frameList.size() == 1");

                    if (frameList.size() != 1) {

                        log3("ERROR:  frameList.size() != 1:  " + frameList.size());

                        expresult = returnCode1;

                    }

                } catch ( IndexOutOfBoundsException e1 ) {

                    log3("ERROR: IndexOutOfBoundsException ");

                    expresult = returnCode1;

                } catch ( Exception e2 ) {

                    log3("ERROR:  unexpected Exception : " + e2);

                    expresult = returnCode1;

                }

                log2("......case for check: lenght > frameCount()  {thread2.frames(0, thread2.frameCount() + 1);}");

                log2("                     IndexOutOfBoundsException expected");

                frameList = null;

                try {

                    frameList = thread2.frames(0, thread2.frameCount() + 1);

                    log3("ERROR:  no Exception");

                    log2("         frameList.size() = " + frameList.size() );

                    expresult = returnCode1;

                } catch ( IndexOutOfBoundsException e1 ) {

                    log2("         IndexOutOfBoundsException");

                } catch ( Exception e2 ) {

                    log3("ERROR:  unexpected Exception  : " + e2);

                    expresult = returnCode1;

                }

                log2("      resuming the thread2");

                eventSet.resume();

            }

            //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

            log2("     the end of testing");

            if (expresult != returnCode0)

                testExitCode = FAILED;

        }

        log1("      TESTING ENDS");

    //--------------------------------------------------   test summary section

    //-------------------------------------------------    standard end section

        pipe.println("quit");

        log2("waiting for the debuggee to finish ...");

        debuggee.waitFor();

        int status = debuggee.getStatus();

        if (status != PASSED + PASS_BASE) {

            log3("debuggee returned UNEXPECTED exit status: " +

                    status + " != PASS_BASE");

            testExitCode = FAILED;

        } else {

            log2("debuggee returned expected exit status: " +

                    status + " == PASS_BASE");

        }

        if (testExitCode != PASSED) {

            logHandler.complain("TEST FAILED");

        }

        return testExitCode;

    }

   /*

    * private BreakpointRequest settingBreakpoint(String, String, String)

    *

    * It sets up a breakpoint within a given method at given line number

    * for the thread2 only.

    * Third parameter is required for any case in future debugging, as if.

    *

    * Return codes:

    *  = BreakpointRequest object  in case of success

    *  = null   in case of an Exception thrown within the method

    */

    private BreakpointRequest settingBreakpoint ( String methodName,

                                                  String bpLine,

                                                  String property) {

        log2("setting up a breakpoint: method: '" + methodName + "' line: " + bpLine );

        List              alllineLocations = null;

        Location          lineLocation     = null;

        BreakpointRequest breakpRequest    = null;

        try {

            Method  method  = (Method) testedclass.methodsByName(methodName).get(0);

            alllineLocations = method.allLineLocations();

            int n =

                ( (IntegerValue) testedclass.getValue(testedclass.fieldByName(bpLine) ) ).value();

            if (n > alllineLocations.size()) {

                log3("ERROR:  TEST_ERROR_IN_settingBreakpoint(): number is out of bound of method's lines");

            } else {

                lineLocation = (Location) alllineLocations.get(n);

                try {

                    breakpRequest = eventRManager.createBreakpointRequest(lineLocation);

                    breakpRequest.putProperty("number", property);

                    breakpRequest.addThreadFilter(thread2);

                    breakpRequest.setSuspendPolicy( EventRequest.SUSPEND_EVENT_THREAD);

                } catch ( Exception e1 ) {

                    log3("ERROR: inner Exception within settingBreakpoint() : " + e1);

                    breakpRequest    = null;

                }

            }

        } catch ( Exception e2 ) {

            log3("ERROR: ATTENTION:  outer Exception within settingBreakpoint() : " + e2);

            breakpRequest    = null;

        }

        if (breakpRequest == null)

            log2("      A BREAKPOINT HAS NOT BEEN SET UP");

        else

            log2("      a breakpoint has been set up");

        return breakpRequest;

    }

    /*

     * private int breakpoint ()

     *

     * It removes events from EventQueue until gets first BreakpointEvent.

     * To get next EventSet value, it uses the method

     *    EventQueue.remove(int timeout)

     * The timeout argument passed to the method, is "waitTime*60000".

     * Note: the value of waitTime is set up with

     *       the method ArgumentHandler.getWaitTime() at the beginning of the test.

     *

     * Return codes:

     *  = returnCode0 - success;

     *  = returnCode2 - Exception when "eventSet = eventQueue.remove()" is executed

     *  = returnCode3 - default case when loop of processing an event, that is,

     *                  an unspecified event was taken from the EventQueue

     */

    private int breakpoint () {

        int returnCode = returnCode0;

        log2("       waiting for BreakpointEvent");

        labelBP:

            for (;;) {

                log2("       new:  eventSet = eventQueue.remove();");

                try {

                    eventSet = eventQueue.remove(waitTime*60000);

                    if (eventSet == null) {

                        log3("ERROR:  timeout for waiting for a BreakpintEvent");

                        returnCode = returnCode3;

                        break labelBP;

                    }

                } catch ( Exception e ) {

                    log3("ERROR: Exception for  eventSet = eventQueue.remove(); : " + e);

                    returnCode = 1;

                    break labelBP;

                }

                if (eventSet != null) {

                    log2("     :  eventSet != null;  size == " + eventSet.size());

                    EventIterator eIter = eventSet.eventIterator();

                    Event         ev    = null;

                    for (; eIter.hasNext(); ) {

                        if (returnCode != returnCode0)

                            break;

                        ev = eIter.nextEvent();

                    ll: for (int ifor =0;  ; ifor++) {

                        try {

                          switch (ifor) {

                          case 0:  AccessWatchpointEvent awe = (AccessWatchpointEvent) ev;

                                   log2("      AccessWatchpointEvent removed");

                                   break ll;

                          case 1:  BreakpointEvent be = (BreakpointEvent) ev;