From 77cbd3990703ba9d6045d901f17243038b5a0b5a Mon Sep 17 00:00:00 2001
From: Alexander Gorshenev <alexander.gorshenev@jetbrains.com>
Date: Wed, 9 Aug 2017 14:13:43 +0300
Subject: [PATCH] Global initializers for wasm32.

---
 .../kotlin/backend/konan/llvm/IrToBitcode.kt   |  4 +++-
 backend.native/tests/build.gradle              | 18 ------------------
 runtime/src/launcher/js/launcher.js            | 17 +++++++++++++----
 3 files changed, 16 insertions(+), 23 deletions(-)

diff --git a/backend.native/compiler/ir/backend.native/src/org/jetbrains/kotlin/backend/konan/llvm/IrToBitcode.kt b/backend.native/compiler/ir/backend.native/src/org/jetbrains/kotlin/backend/konan/llvm/IrToBitcode.kt
index e051faae075..d3c8a3a18f9 100644
--- a/backend.native/compiler/ir/backend.native/src/org/jetbrains/kotlin/backend/konan/llvm/IrToBitcode.kt
+++ b/backend.native/compiler/ir/backend.native/src/org/jetbrains/kotlin/backend/konan/llvm/IrToBitcode.kt
@@ -401,7 +401,9 @@ internal class CodeGeneratorVisitor(val context: Context, val lifetimes: Map<IrE
             val fileName = declaration.name.takeLastWhile { it != '/' }.dropLastWhile { it != '.' }.dropLast(1)
             val initName = "${fileName}_init_${context.llvm.globalInitIndex}"
             val nodeName = "${fileName}_node_${context.llvm.globalInitIndex}"
-            val ctorName = "${fileName}_ctor_${context.llvm.globalInitIndex++}"
+            // Make the name prefix easily parsable for the platforms lacking 
+            // llvm.global_ctors mechanism (such as wasm).
+            val ctorName = "Konan_global_ctor_${fileName}_${context.llvm.globalInitIndex++}"
 
             val initFunction = createInitBody(initName)
             val initNode = createInitNode(initFunction, nodeName)
diff --git a/backend.native/tests/build.gradle b/backend.native/tests/build.gradle
index c80fdc1b5de..c85aa936693 100644
--- a/backend.native/tests/build.gradle
+++ b/backend.native/tests/build.gradle
@@ -820,92 +820,77 @@ task classDelegation_withBridge(type: RunKonanTest) {
 }
 
 task delegatedProperty_simpleVal(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails: not global_ctros support.
     goldValue = "x\n42\n"
     source = "codegen/delegatedProperty/simpleVal.kt"
 }
 
 task delegatedProperty_simpleVar(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "get x\n42\nset x\nget x\n117\n"
     source = "codegen/delegatedProperty/simpleVar.kt"
 }
 
 task delegatedProperty_packageLevel(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "x\n42\n"
     source = "codegen/delegatedProperty/packageLevel.kt"
 }
 
 task delegatedProperty_local(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "x\n42\n"
     source = "codegen/delegatedProperty/local.kt"
 }
 
 task delegatedProperty_delegatedOverride(type: LinkKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "156\nx\n117\n42\n"
     source = "codegen/delegatedProperty/delegatedOverride_main.kt"
     lib = "codegen/delegatedProperty/delegatedOverride_lib.kt"
 }
 
 task delegatedProperty_lazy(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "computed!\nHello\nHello\n"
     source = "codegen/delegatedProperty/lazy.kt"
 }
 
 task delegatedProperty_observable(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "<no name> -> first\nfirst -> second\n"
     source = "codegen/delegatedProperty/observable.kt"
 }
 
 task delegatedProperty_map(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "John Doe\n25\n"
     source = "codegen/delegatedProperty/map.kt"
 }
 
 task propertyCallableReference_valClass(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "42\n117\n"
     source = "codegen/propertyCallableReference/valClass.kt"
 }
 
 task propertyCallableReference_valModule(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "42\n"
     source = "codegen/propertyCallableReference/valModule.kt"
 }
 
 task propertyCallableReference_varClass(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // RuntimeError: memory access out of bounds
     goldValue = "117\n117\n42\n42\n"
     source = "codegen/propertyCallableReference/varClass.kt"
 }
 
 task propertyCallableReference_varModule(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "117\n117\n"
     source = "codegen/propertyCallableReference/varModule.kt"
 }
 
 task propertyCallableReference_valExtension(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "42\n117\n"
     source = "codegen/propertyCallableReference/valExtension.kt"
 }
 
 task propertyCallableReference_varExtension(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "117\n117\n42\n42\n"
     source = "codegen/propertyCallableReference/varExtension.kt"
 }
 
 task propertyCallableReference_linkTest(type: LinkKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails.
     goldValue = "42\n117\n"
     source = "codegen/propertyCallableReference/linkTest_main.kt"
     lib = "codegen/propertyCallableReference/linkTest_lib.kt"
@@ -1701,7 +1686,6 @@ task objectExpression3(type: RunKonanTest) {
 }
 
 task initializers2(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails on wasm32.
     goldValue = "init globalValue2\n" +
                 "init globalValue3\n" +
                 "1\n" +
@@ -1712,13 +1696,11 @@ task initializers2(type: RunKonanTest) {
 }
 
 task initializers3(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails on wasm32.
     goldValue = "42\n"
     source = "runtime/basic/initializers3.kt"
 }
 
 task initializers4(type: RunKonanTest) {
-    expectedFail = (project.testTarget == 'wasm32') // The test fails on wasm32.
     goldValue = "1073741824\ntrue\n"
     source = "runtime/basic/initializers4.kt"
 }
diff --git a/runtime/src/launcher/js/launcher.js b/runtime/src/launcher/js/launcher.js
index 01d0775dba9..4c2a505f216 100644
--- a/runtime/src/launcher/js/launcher.js
+++ b/runtime/src/launcher/js/launcher.js
@@ -66,6 +66,14 @@ function stackTop() {
     return new Uint32Array(fourBytes)[0];
 }
 
+function runGlobalInitializers(exports) {
+    for (var property in exports) {
+        if (property.startsWith("Konan_global_ctor_")) {
+            exports[property]();
+        }
+    }
+}
+
 var konan_dependencies = {
     env: {
         abort: function() {
@@ -134,11 +142,12 @@ heap = new Uint8Array(konan_dependencies.env.memory.buffer);
 konanStackTop = stackTop();
 
 try {
-  exit_status = instance.exports.Konan_js_main(arguments.length);
+    runGlobalInitializers(instance.exports);
+    exit_status = instance.exports.Konan_js_main(arguments.length);
 } catch (e) {
-  print("Exception executing Konan_js_main: " + e);
-  print(e.stack);
-  exit_status = 1;
+    print("Exception executing Konan_js_main: " + e);
+    print(e.stack);
+    exit_status = 1;
 }
 
 quit(exit_status); // TODO: d8 specific.