Implement fromEnvironment on bool, int and String

runtime/lib/string.cc

 // Copyright (c) 2011, 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 "vm/bootstrap_natives.h"
 
+#include "include/dart_api.h"
 #include "vm/exceptions.h"
+#include "vm/dart_api_impl.h"
+#include "vm/isolate.h"
 #include "vm/native_entry.h"
 #include "vm/object.h"
 #include "vm/symbols.h"
 #include "vm/unicode.h"
 
 namespace dart {
 
+DEFINE_NATIVE_ENTRY(String_fromEnvironment, 3) {
+  GET_NON_NULL_NATIVE_ARGUMENT(String, name, arguments->NativeArgAt(1));
+  GET_NATIVE_ARGUMENT(String, default_value, arguments->NativeArgAt(2));
+  // Call the embedder to supply us with the environment.
+  Dart_ConfigCallback callback = isolate->config_callback();
+  if (callback != NULL) {
+    Dart_Handle result = callback(Api::NewHandle(isolate, name.raw()));
+    if (Dart_IsError(result)) {
+      const Object& error =
+          Object::Handle(isolate, Api::UnwrapHandle(result));
+      Exceptions::ThrowArgumentError(
+          String::Handle(
+              String::New(Error::Cast(error).ToErrorCString())));
+    }
+    if (Dart_IsString(result)) {
+      const Object& value =
+          Object::Handle(isolate, Api::UnwrapHandle(result));
+      return Symbols::New(String::Cast(value));
+    }

[Ivan Posva, 2013/10/30 20:44:43]

if (Dart_IsString(result)) {
  ...
} else if (!Dart_IsNull(result)) {
  ...
}

as in Integer_fromEnvironment seems more readable to me.

[Søren Gjesse, 2013/10/30 21:24:34]

Done. Included the IsNull case, and changed for all three files.

+    if (!Dart_IsNull(result)) {
+      Exceptions::ThrowArgumentError(
+          String::Handle(String::New("Illegal environment value")));
+    }
+  }
+  return default_value.raw();
+}
+
+
 DEFINE_NATIVE_ENTRY(StringBase_createFromCodePoints, 1) {
   GET_NON_NULL_NATIVE_ARGUMENT(Instance, list, arguments->NativeArgAt(0));
   if (!list.IsGrowableObjectArray() && !list.IsArray()) {
     Exceptions::ThrowArgumentError(list);
   }
 
   Array& a = Array::Handle();
   intptr_t array_len;
   if (list.IsGrowableObjectArray()) {
     const GrowableObjectArray& growableArray = GrowableObjectArray::Cast(list);
@@ skipping 236 matching lines @@
       ? String::Handle(OneByteString::New(length_value, Heap::kNew))
       : String::Handle(TwoByteString::New(length_value, Heap::kNew));
   NoGCScope no_gc;
 
   uint16_t* data_position = reinterpret_cast<uint16_t*>(codeUnits.DataAddr(0));
   String::Copy(result, 0, data_position, length_value);
   return result.raw();
 }
 
 }  // namespace dart