Changes to get rid of dependency on openssl in the dart VM.

vm/object.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 "vm/object.h"
 
 #include "platform/assert.h"
 #include "vm/assembler.h"
 #include "vm/bigint_operations.h"
 #include "vm/bootstrap.h"
@@ skipping 6251 matching lines @@
     return true;
   }
 
   if (!other.IsBigint() || other.IsNull()) {
     return false;
   }
 
   Bigint& other_bgi = Bigint::Handle();
   other_bgi ^= other.raw();
 
-  return BN_cmp(BNAddr(), other_bgi.BNAddr()) == 0;
+  intptr_t len = this->Length();
+  if (len != other_bgi.Length()) {
+    return false;
+  }
+
+  for (intptr_t i = 0; i < len; i++) {
+    if (this->GetChunkAt(i) != other_bgi.GetChunkAt(i)) {
+      return false;
+    }
+  }
+  return true;
 }
 
 
-RawBigint* Bigint::New(const BIGNUM *bn, Heap::Space space) {
-  Isolate* isolate = Isolate::Current();
-  const Class& cls = Class::Handle(isolate->object_store()->bigint_class());
-  Bigint& result = Bigint::Handle();
-  {
-    RawObject* raw = Object::Allocate(cls,
-                                      Bigint::InstanceSize(bn),
-                                      space);
-    NoGCScope no_gc;
-    result ^= raw;
-    // Danger Will Robinson! Use of OpenSSL internals!
-    // Copy the OpenSSL BIGNUM to our own heap. Don't fix up our d
-    // pointer, that'll get done for us.
-    BIGNUM* our_bn = result.MutableBNAddr();
-    // memcpy would be sufficient.
-    memmove(our_bn, bn, sizeof *bn);
-    memmove(result.BNMemory(), bn->d, bn->top * sizeof(BN_ULONG));
-    // We only allocated/copied the active part.
-    our_bn->dmax = our_bn->top;
-  }
-
-  return result.raw();
-}
-
-
 RawBigint* Bigint::New(const String& str, Heap::Space space) {
   return BigintOperations::NewFromCString(str.ToCString(), space);
 }
 
 
 RawBigint* Bigint::New(int64_t value, Heap::Space space) {
   return BigintOperations::NewFromInt64(value, space);
 }
 
 
@@ skipping 19 matching lines @@
     big ^= other.raw();
     return BigintOperations::Compare(*this, big);
   }
   if (this->IsNegative() == other.IsNegative()) {
     return this->IsNegative() ? -1 : 1;
   }
   return this->IsNegative() ? -1 : 1;
 }
 
 
+RawBigint* Bigint::Allocate(intptr_t length, Heap::Space space) {
+  ASSERT(length >= 0);
+  Isolate* isolate = Isolate::Current();
+  const Class& cls = Class::Handle(isolate->object_store()->bigint_class());
+  Bigint& result = Bigint::Handle();
+  {
+    RawObject* raw = Object::Allocate(cls, Bigint::InstanceSize(length), space);
+    NoGCScope no_gc;
+    result ^= raw;
+    result.raw_ptr()->allocated_length_ = length;
+    result.raw_ptr()->signed_length_ = length;
+  }
+  return result.raw();
+}
+
+
 static uword ZoneAllocator(intptr_t size) {
   Zone* zone = Isolate::Current()->current_zone();
   return zone->Allocate(size);
 }
 
 
 const char* Bigint::ToCString() const {
-  return BigintOperations::ToDecCString(*this, &ZoneAllocator);
+  return BigintOperations::ToHexCString(*this, &ZoneAllocator);

[Ivan Posva, 2012/02/28 01:38:34]

Can you please add a TODO and file a bug to implement proper printing to a
decimal string? Thanks!

[siva, 2012/02/28 18:22:18]

Done.

 }
 
 
 class StringHasher : ValueObject {
  public:
   StringHasher() : hash_(0) {}
   void Add(int32_t ch) {
     hash_ += ch;
     hash_ += hash_ << 10;
     hash_ ^= hash_ >> 6;
@@ skipping 1944 matching lines @@
   result.set_num_args_tested(num_args_tested);
   // Number of array elements in one test entry (num_args_tested + 1)
   intptr_t len = num_args_tested + 1;
   // IC data array must be null terminated (sentinel entry).
   Array& ic_data = Array::Handle(Array::New(len, Heap::kOld));
   result.set_ic_data(ic_data);
   return result.raw();
 }
 
 }  // namespace dart