Home | History | Annotate | Download | only in mjsunit
      1 // Copyright 2008 the V8 project authors. All rights reserved.
      2 // Redistribution and use in source and binary forms, with or without
      3 // modification, are permitted provided that the following conditions are
      4 // met:
      5 //
      6 //     * Redistributions of source code must retain the above copyright
      7 //       notice, this list of conditions and the following disclaimer.
      8 //     * Redistributions in binary form must reproduce the above
      9 //       copyright notice, this list of conditions and the following
     10 //       disclaimer in the documentation and/or other materials provided
     11 //       with the distribution.
     12 //     * Neither the name of Google Inc. nor the names of its
     13 //       contributors may be used to endorse or promote products derived
     14 //       from this software without specific prior written permission.
     15 //
     16 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
     17 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
     18 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
     19 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
     20 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
     21 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
     22 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     23 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     24 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     25 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     26 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27 
     28 // Flags: --expose-debug-as debug
     29 // Get the Debug object exposed from the debug context global object.
     30 Debug = debug.Debug
     31 
     32 // Simple function which stores the last debug event.
     33 listenerComplete = false;
     34 exception = false;
     35 
     36 var base_backtrace_request = '"seq":0,"type":"request","command":"backtrace"'
     37 var base_suspend_request = '"seq":0,"type":"request","command":"suspend"'
     38 
     39 function safeEval(code) {
     40   try {
     41     return eval('(' + code + ')');
     42   } catch (e) {
     43     assertEquals(void 0, e);
     44     return undefined;
     45   }
     46 }
     47 
     48 function testArguments(exec_state) {
     49   // Get the debug command processor in running state.
     50   var dcp = exec_state.debugCommandProcessor(true);
     51 
     52   assertTrue(dcp.isRunning());
     53 
     54   var backtrace_request = '{' + base_backtrace_request + '}'
     55   var backtrace_response = safeEval(dcp.processDebugJSONRequest(backtrace_request));
     56 
     57   assertTrue(backtrace_response.success);
     58 
     59   assertTrue(backtrace_response.running, backtrace_request + ' -> expected running');
     60 
     61   assertTrue(dcp.isRunning());
     62 
     63   var suspend_request = '{' + base_suspend_request + '}'
     64   var suspend_response = safeEval(dcp.processDebugJSONRequest(suspend_request));
     65 
     66   assertTrue(suspend_response.success);
     67 
     68   assertFalse(suspend_response.running, suspend_request + ' -> expected not running');
     69 
     70   assertFalse(dcp.isRunning());
     71 }
     72 
     73 function listener(event, exec_state, event_data, data) {
     74   try {
     75     if (event == Debug.DebugEvent.Break) {
     76 
     77       // Test simple suspend request.
     78       testArguments(exec_state);
     79 
     80       // Indicate that all was processed.
     81       listenerComplete = true;
     82     }
     83   } catch (e) {
     84     exception = e
     85   };
     86 };
     87 
     88 // Add the debug event listener.
     89 Debug.setListener(listener);
     90 
     91 // Stop debugger and check that suspend command changes running flag.
     92 debugger;
     93 
     94 assertFalse(exception, "exception in listener")
     95 // Make sure that the debug event listener vas invoked.
     96 assertTrue(listenerComplete, "listener did not run to completion");
     97