Implement dynamic function checks.

dart/sdk/lib/_internal/compiler/implementation/ssa/builder.dart

 // 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.
 
 part of ssa;
 
 /**
  * A special element for the extra parameter taken by intercepted
  * methods. We need to override [Element.computeType] because our
  * optimizers may look at its declared type.
@@ skipping 2055 matching lines @@
       HInstruction representations = buildTypeArgumentRepresentations(type);
       add(representations);
       return new HTypeConversion.withTypeRepresentation(type, kind, subtype,
           original, representations);
     } else if (type.kind == TypeKind.TYPE_VARIABLE) {
       TypeMask subtype = original.instructionType;
       HInstruction typeVariable = addTypeVariableReference(type);
       return new HTypeConversion.withTypeRepresentation(type, kind, subtype,
           original, typeVariable);
     } else if (type.kind == TypeKind.FUNCTION) {
-      if (backend.rti.isSimpleFunctionType(type)) {
-        return original.convertType(compiler, type, kind);
-      }
-      TypeMask subtype = original.instructionType;
-      if (type.containsTypeVariables) {
-        bool contextIsTypeArguments = false;
-        HInstruction context;
-        if (!currentElement.enclosingElement.isClosure()
-            && currentElement.isInstanceMember()) {
-          context = localsHandler.readThis();
-        } else {
-          ClassElement contextClass = Types.getClassContext(type);
-          context = buildTypeVariableList(contextClass);
-          add(context);
-          contextIsTypeArguments = true;
-        }
-        return new HTypeConversion.withContext(type, kind, subtype,
-            original, context, contextIsTypeArguments: contextIsTypeArguments);
-      } else {
-        return new HTypeConversion(type, kind, subtype, original);
-      }
+      String name = kind == HTypeConversion.CAST_TYPE_CHECK
+          ? '_asCheck' : '_assertCheck';
+
+      List arguments = [buildFunctionType(type), original];
+      pushInvokeDynamic(
+          null,
+          new Selector.call(name, compiler.jsHelperLibrary, 1),
+          arguments);
+
+      return new HTypeConversion(type, kind, original.instructionType, pop());
     } else {
       return original.convertType(compiler, type, kind);
     }
   }
 
   HInstruction potentiallyCheckType(HInstruction original, DartType type,
       { int kind: HTypeConversion.CHECKED_MODE_CHECK }) {
     if (!compiler.enableTypeAssertions) return original;
     HInstruction other = buildTypeConversion(original, type, kind);
     if (other != original) add(other);
@@ skipping 51 matching lines @@
           value,
           compiler.boolClass.computeType(compiler),
           kind: HTypeConversion.BOOLEAN_CONVERSION_CHECK);
     }
     HInstruction result = new HBoolify(value, backend.boolType);
     add(result);
     return result;
   }
 
   HInstruction attachPosition(HInstruction target, Node node) {
-    target.sourcePosition = sourceFileLocationForBeginToken(node);
+    if (node != null) {
+      target.sourcePosition = sourceFileLocationForBeginToken(node);
+    }
     return target;
   }
 
   SourceFileLocation sourceFileLocationForBeginToken(Node node) =>
       sourceFileLocationForToken(node, node.getBeginToken());
 
   SourceFileLocation sourceFileLocationForEndToken(Node node) =>
       sourceFileLocationForToken(node, node.getEndToken());
 
   SourceFileLocation sourceFileLocationForToken(Node node, Token token) {
@@ skipping 872 matching lines @@
     DartType type = elements.getType(node.typeAnnotationFromIsCheckOrCast);
     type = type.unalias(compiler);
     HInstruction instruction = buildIsNode(node, type, expression);
     if (isNot) {
       add(instruction);
       instruction = new HNot(instruction, backend.boolType);
     }
     push(instruction);
   }
 
-  HLiteralList buildTypeVariableList(ClassElement contextClass) {
-    List<HInstruction> inputs = <HInstruction>[];
-    for (Link<DartType> link = contextClass.typeVariables;
-        !link.isEmpty;
-        link = link.tail) {
-      inputs.add(addTypeVariableReference(link.head));
-    }
-    return buildLiteralList(inputs);
-  }
-
   HInstruction buildIsNode(Node node, DartType type, HInstruction expression) {
     type = type.unalias(compiler);
     if (type.kind == TypeKind.FUNCTION) {
-      if (backend.rti.isSimpleFunctionType(type)) {
-        // TODO(johnniwinther): Avoid interceptor if unneeded.
-        return new HIs.raw(
-            type, expression, invokeInterceptor(expression), backend.boolType);
-      }
-      Element checkFunctionSubtype = backend.getCheckFunctionSubtype();
-
-      HInstruction signatureName = graph.addConstantString(
-          new DartString.literal(backend.namer.getFunctionTypeName(type)),
-          compiler);
-
-      HInstruction contextName;
-      HInstruction context;
-      HInstruction typeArguments;
-      if (type.containsTypeVariables) {
-        ClassElement contextClass = Types.getClassContext(type);
-        contextName = graph.addConstantString(
-            new DartString.literal(backend.namer.getNameOfClass(contextClass)),
-            compiler);
-        if (!currentElement.enclosingElement.isClosure()
-            && currentElement.isInstanceMember()) {
-          context = localsHandler.readThis();
-          typeArguments = graph.addConstantNull(compiler);
-        } else {
-          context = graph.addConstantNull(compiler);
-          typeArguments = buildTypeVariableList(contextClass);
-          add(typeArguments);
-        }
-      } else {
-        contextName = graph.addConstantNull(compiler);
-        context = graph.addConstantNull(compiler);
-        typeArguments = graph.addConstantNull(compiler);
-      }
-
-      List<HInstruction> inputs = <HInstruction>[expression,
-                                                 signatureName,
-                                                 contextName,
-                                                 context,
-                                                 typeArguments];
-      pushInvokeStatic(node, checkFunctionSubtype, inputs, backend.boolType);
-      HInstruction call = pop();
-      return new HIs.compound(type, expression, call, backend.boolType);
+      List arguments = [buildFunctionType(type), expression];
+      pushInvokeDynamic(
+          node, new Selector.call('_isTest', compiler.jsHelperLibrary, 1),
+          arguments);
+      return new HIs.compound(type, expression, pop(), backend.boolType);
     } else if (type.kind == TypeKind.TYPE_VARIABLE) {
       HInstruction runtimeType = addTypeVariableReference(type);
       Element helper = backend.getCheckSubtypeOfRuntimeType();
       List<HInstruction> inputs = <HInstruction>[expression, runtimeType];
       pushInvokeStatic(null, helper, inputs, backend.boolType);
       HInstruction call = pop();
       return new HIs.variable(type, expression, call, backend.boolType);
     } else if (RuntimeTypes.hasTypeArguments(type)) {
       ClassElement element = type.element;
       Element helper = backend.getCheckSubtype();
@@ skipping 21 matching lines @@
     } else {
       if (backend.hasDirectCheckFor(type)) {
         return new HIs.direct(type, expression, backend.boolType);
       }
       // TODO(johnniwinther): Avoid interceptor if unneeded.
       return new HIs.raw(
           type, expression, invokeInterceptor(expression), backend.boolType);
     }
   }
 
+  HInstruction buildFunctionType(FunctionType type) {
+    type.accept(new TypeBuilder(), this);
+    return pop();
+  }
+
   void addDynamicSendArgumentsToList(Send node, List<HInstruction> list) {
     Selector selector = elements.getSelector(node);
     if (selector.namedArgumentCount == 0) {
       addGenericSendArgumentsToList(node.arguments, list);
     } else {
       // Visit positional arguments and add them to the list.
       Link<Node> arguments = node.arguments;
       int positionalArgumentCount = selector.positionalArgumentCount;
       for (int i = 0;
            i < positionalArgumentCount;
@@ skipping 2780 matching lines @@
           new HSubGraphBlockInformation(elseBranch.graph));
 
     HBasicBlock conditionStartBlock = conditionBranch.block;
     conditionStartBlock.setBlockFlow(info, joinBlock);
     SubGraph conditionGraph = conditionBranch.graph;
     HIf branch = conditionGraph.end.last;
     assert(branch is HIf);
     branch.blockInformation = conditionStartBlock.blockFlow;
   }
 }
+
+class TypeBuilder implements DartTypeVisitor<dynamic, SsaBuilder> {
+  void visitType(DartType type, _) {
+    throw 'Internal error $type';
+  }
+
+  void visitVoidType(VoidType type, SsaBuilder builder) {
+    ClassElement cls = builder.compiler.findHelper('VoidRuntimeType');
+    builder.push(new HVoidType(type, new TypeMask.exact(cls)));
+  }
+
+  void visitTypeVariableType(TypeVariableType type,
+                             SsaBuilder builder) {
+    ClassElement cls = builder.compiler.findHelper('RuntimeType');
+    TypeMask instructionType = new TypeMask.subclass(cls);
+    if (!builder.currentElement.enclosingElement.isClosure() &&
+        builder.currentElement.isInstanceMember()) {
+      HInstruction receiver = builder.localsHandler.readThis();
+      builder.push(new HReadTypeVariable(type, receiver, instructionType));
+    } else {
+      builder.push(
+          new HReadTypeVariable.noReceiver(
+              type, builder.addTypeVariableReference(type), instructionType));
+    }
+  }
+
+  void visitFunctionType(FunctionType type, SsaBuilder builder) {
+    type.returnType.accept(this, builder);
+    HInstruction returnType = builder.pop();
+    List<HInstruction> inputs = <HInstruction>[returnType];
+
+    for (DartType parameter in type.parameterTypes) {
+      parameter.accept(this, builder);
+      inputs.add(builder.pop());
+    }
+
+    for (DartType parameter in type.optionalParameterTypes) {
+      parameter.accept(this, builder);
+      inputs.add(builder.pop());
+    }
+
+    Link<DartType> namedParameterTypes = type.namedParameterTypes;
+    for (String name in type.namedParameters) {
+      DartString dartString = new DartString.literal(name);
+      inputs.add(
+          builder.graph.addConstantString(dartString, builder.compiler));
+      namedParameterTypes.head.accept(this, builder);
+      inputs.add(builder.pop());
+      namedParameterTypes = namedParameterTypes.tail;
+    }
+
+    ClassElement cls = builder.compiler.findHelper('RuntimeFunctionType');
+    builder.push(new HFunctionType(inputs, type, new TypeMask.exact(cls)));
+  }
+
+  void visitMalformedType(MalformedType type, SsaBuilder builder) {
+    visitDynamicType(builder.compiler.types.dynamicType, builder);
+  }
+
+  void visitStatementType(StatementType type, SsaBuilder builder) {
+    throw 'not implemented visitStatementType($type)';
+  }
+
+  void visitGenericType(GenericType type, SsaBuilder builder) {
+    throw 'not implemented visitGenericType($type)';
+  }
+
+  void visitInterfaceType(InterfaceType type, SsaBuilder builder) {
+    List<HInstruction> inputs = <HInstruction>[];
+    for (DartType typeArgument in type.typeArguments) {
+      typeArgument.accept(this, builder);
+      inputs.add(builder.pop());
+    }
+    ClassElement cls;
+    if (type.typeArguments.isEmpty) {
+      cls = builder.compiler.findHelper('RuntimeTypePlain');
+    } else {
+      cls = builder.compiler.findHelper('RuntimeTypeGeneric');
+    }
+    builder.push(new HInterfaceType(inputs, type, new TypeMask.exact(cls)));
+  }
+
+  void visitTypedefType(TypedefType type, SsaBuilder builder) {
+    DartType unaliased = type.unalias(builder.compiler);
+    if (unaliased is TypedefType) throw 'unable to unalias $type';
+    unaliased.accept(this, builder);
+  }
+
+  void visitDynamicType(DynamicType type, SsaBuilder builder) {
+    ClassElement cls = builder.compiler.findHelper('DynamicRuntimeType');
+    builder.push(new HDynamicType(type, new TypeMask.exact(cls)));
+  }
+}