Evaluate expression in context of an object

runtime/bin/dbg_message.cc

 // Copyright (c) 2012, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include "bin/dbg_connection.h"
 #include "bin/dbg_message.h"
 #include "bin/dartutils.h"
 #include "bin/thread.h"
 #include "bin/utils.h"
 
@@ skipping 32 matching lines @@
   dart::JSONReader r(buf_);
   r.Seek("params");
   if (r.Type() == dart::JSONReader::kObject) {
     return r.ValueChars();
   } else {
     return NULL;
   }
 }
 
 
+bool MessageParser::HasParam(const char* name) const {
+  const char* params = Params();
+  ASSERT(params != NULL);
+  dart::JSONReader r(params);
+  return r.Seek(name);
+}
+
+
 intptr_t MessageParser::GetIntParam(const char* name) const {
   const char* params = Params();
   ASSERT(params != NULL);
   dart::JSONReader r(params);
   r.Seek(name);
   ASSERT(r.Type() == dart::JSONReader::kInteger);
   return strtol(r.ValueChars(), NULL, 10);
 }
 
 
@@ skipping 400 matching lines @@
 
 static JSONDebuggerCommand debugger_commands[] = {
   { "resume", DbgMessage::HandleResumeCmd },
   { "stepInto", DbgMessage::HandleStepIntoCmd },
   { "stepOut", DbgMessage::HandleStepOutCmd },
   { "stepOver", DbgMessage::HandleStepOverCmd },
   { "getLibraries", DbgMessage::HandleGetLibrariesCmd },
   { "getClassProperties", DbgMessage::HandleGetClassPropsCmd },
   { "getLibraryProperties", DbgMessage::HandleGetLibPropsCmd },
   { "setLibraryProperties", DbgMessage::HandleSetLibPropsCmd },
+  { "evaluateExpr", DbgMessage::HandleEvaluateExprCmd },
   { "getObjectProperties", DbgMessage::HandleGetObjPropsCmd },
   { "getListElements", DbgMessage::HandleGetListCmd },
   { "getGlobalVariables", DbgMessage::HandleGetGlobalsCmd },
   { "getScriptURLs", DbgMessage::HandleGetScriptURLsCmd },
   { "getScriptSource", DbgMessage::HandleGetSourceCmd },
   { "getLineNumberTable", DbgMessage::HandleGetLineNumbersCmd },
   { "getStackTrace", DbgMessage::HandleGetStackTraceCmd },
   { "setBreakpoint", DbgMessage::HandleSetBpCmd },
   { "setPauseOnException", DbgMessage::HandlePauseOnExcCmd },
   { "removeBreakpoint", DbgMessage::HandleRemBpCmd },
@@ skipping 143 matching lines @@
   }
   dart::TextBuffer msg(64);
   msg.Printf("{\"id\":%d, \"result\": {\"debuggingEnabled\": \"%s\"}}",
              msg_id,
              enabled ? "true" : "false");
   in_msg->SendReply(&msg);
   return false;
 }
 
 
+bool DbgMessage::HandleEvaluateExprCmd(DbgMessage* in_msg) {
+  ASSERT(in_msg != NULL);
+  MessageParser msg_parser(in_msg->buffer(), in_msg->buffer_len());
+  int msg_id = msg_parser.MessageId();
+  Dart_Handle target;
+
+  if (msg_parser.HasParam("libraryId")) {
+    in_msg->SendErrorReply(msg_id,
+                           "libararyId evaluation target not supported");
+    return false;
+  } else if (msg_parser.HasParam("classId")) {
+    in_msg->SendErrorReply(msg_id,
+                           "classId evaluation target not supported");
+    return false;
+  } else if (msg_parser.HasParam("objectId")) {
+    intptr_t obj_id = msg_parser.GetIntParam("objectId");
+    target = Dart_GetCachedObject(obj_id);
+  } else {
+    in_msg->SendErrorReply(msg_id, "illegal evaluation target");
+    return false;
+  }
+
+  if (Dart_IsError(target)) {
+    in_msg->SendErrorReply(msg_id, Dart_GetError(target));
+    return false;
+  }
+  char* expr_chars = msg_parser.GetStringParam("expression");
+  Dart_Handle expr = Dart_NewStringFromCString(expr_chars);
+  if (Dart_IsError(expr)) {
+    in_msg->SendErrorReply(msg_id, Dart_GetError(expr));
+    return false;
+  }
+
+  Dart_Handle value = Dart_EvaluateExpr(target, expr);
+  if (Dart_IsError(value)) {
+    in_msg->SendErrorReply(msg_id, Dart_GetError(value));
+    return false;
+  }
+
+  dart::TextBuffer msg(64);
+  msg.Printf("{\"id\":%d, \"result\":", msg_id);
+  FormatRemoteObj(&msg, value);
+  msg.Printf("}");
+  in_msg->SendReply(&msg);
+  return false;
+}
+
+
 bool DbgMessage::HandleGetObjPropsCmd(DbgMessage* in_msg) {
   ASSERT(in_msg != NULL);
   MessageParser msg_parser(in_msg->buffer(), in_msg->buffer_len());
   int msg_id = msg_parser.MessageId();
   intptr_t obj_id = msg_parser.GetIntParam("objectId");
   Dart_Handle obj = Dart_GetCachedObject(obj_id);
   if (Dart_IsError(obj)) {
     in_msg->SendErrorReply(msg_id, Dart_GetError(obj));
     return false;
   }
@@ skipping 600 matching lines @@
     } else {
       ASSERT(kind == kShutdown);
       RemoveIsolateMsgQueue(isolate_id);
     }
   }
   Dart_ExitScope();
 }
 
 }  // namespace bin
 }  // namespace dart