ranger-compiler 2.1.70 → 3.0.4

package/versions/java/RangerArgMatch.java

@@ -1,317 +0,0 @@
-import java.util.*;
-import java.util.Optional;
-import java.io.*;
-
-class RangerArgMatch { 
-  public HashMap<String,String> matched = new HashMap<String,String>();
-  
-  public boolean matchArguments( CodeNode args , CodeNode callArgs , RangerAppWriterContext ctx , int firstArgIndex ) {
-    /** unused:  final CodeNode fc = callArgs.children.get(0)   **/ ;
-    ArrayList<String> missed_args = new ArrayList<String>();
-    boolean all_matched = true;
-    if ( ((args.children.size()) == 0) && ((callArgs.children.size()) > 1) ) {
-      return false;
-    }
-    Optional<CodeNode> lastArg = Optional.empty();
-    for ( int i = 0; i < callArgs.children.size(); i++) {
-      CodeNode callArg = callArgs.children.get(i);
-      if ( i == 0 ) {
-        continue;
-      }
-      final int arg_index = i - 1;
-      if ( arg_index < (args.children.size()) ) {
-        lastArg = Optional.of(args.children.get(arg_index));
-      }
-      final CodeNode arg = lastArg.get();
-      if ( arg.hasFlag("ignore") ) {
-        continue;
-      }
-      if ( arg.hasFlag("mutable") ) {
-        if ( callArg.hasParamDesc ) {
-          final Optional<RangerAppParamDesc> pa = callArg.paramDesc;
-          final boolean b = pa.get().nameNode.get().hasFlag("mutable");
-          if ( b == false ) {
-            missed_args.add("was mutable");
-            all_matched = false;
-          }
-        } else {
-          all_matched = false;
-        }
-      }
-      if ( arg.hasFlag("optional") ) {
-        if ( callArg.hasParamDesc ) {
-          final Optional<RangerAppParamDesc> pa_1 = callArg.paramDesc;
-          final boolean b_1 = pa_1.get().nameNode.get().hasFlag("optional");
-          if ( b_1 == false ) {
-            missed_args.add("optional was missing");
-            all_matched = false;
-          }
-        } else {
-          if ( callArg.hasFlag("optional") ) {
-          } else {
-            all_matched = false;
-          }
-        }
-      }
-      if ( callArg.hasFlag("optional") ) {
-        if ( false == arg.hasFlag("optional") ) {
-          all_matched = false;
-        }
-      }
-      if ( (arg.value_type != 7) && (arg.value_type != 6) ) {
-        if ( callArg.eval_type == 11 ) {
-          if ( arg.type_name.equals("enum") ) {
-            continue;
-          }
-        }
-        if ( false == this.add(arg.type_name, callArg.eval_type_name, ctx) ) {
-          all_matched = false;
-          return all_matched;
-        }
-      }
-      if ( arg.value_type == 6 ) {
-        if ( false == this.add(arg.array_type, callArg.eval_array_type, ctx) ) {
-          System.out.println(String.valueOf( "--> Failed to add the argument  " ) );
-          all_matched = false;
-        }
-      }
-      if ( arg.value_type == 7 ) {
-        if ( false == this.add(arg.key_type, callArg.eval_key_type, ctx) ) {
-          System.out.println(String.valueOf( "--> Failed to add the key argument  " ) );
-          all_matched = false;
-        }
-        if ( false == this.add(arg.array_type, callArg.eval_array_type, ctx) ) {
-          System.out.println(String.valueOf( "--> Failed to add the key argument  " ) );
-          all_matched = false;
-        }
-      }
-      boolean did_match = false;
-      if ( this.doesMatch(arg, callArg, ctx) ) {
-        did_match = true;
-      } else {
-        missed_args.add((("matching arg " + arg.vref) + " faileg against ") + callArg.vref);
-      }
-      if ( false == did_match ) {
-        all_matched = false;
-      }
-    }
-    return all_matched;
-  }
-  
-  public boolean add( String tplKeyword , String typeName , RangerAppWriterContext ctx ) {
-    switch (tplKeyword ) { 
-      case "string" : 
-        return true;
-      case "int" : 
-        return true;
-      case "double" : 
-        return true;
-      case "boolean" : 
-        return true;
-      case "enum" : 
-        return true;
-      case "char" : 
-        return true;
-      case "charbuffer" : 
-        return true;
-    }
-    if ( (tplKeyword.length()) > 1 ) {
-      return true;
-    }
-    if ( matched.containsKey(tplKeyword) ) {
-      final String s = (Optional.ofNullable(matched.get(tplKeyword))).get();
-      if ( this.areEqualTypes(s, typeName, ctx) ) {
-        return true;
-      }
-      if ( s.equals(typeName) ) {
-        return true;
-      } else {
-        return false;
-      }
-    }
-    matched.put(tplKeyword, typeName);
-    return true;
-  }
-  
-  public boolean doesDefsMatch( CodeNode arg , CodeNode node , RangerAppWriterContext ctx ) {
-    if ( node.value_type == 11 ) {
-      if ( arg.type_name.equals("enum") ) {
-        return true;
-      } else {
-        return false;
-      }
-    }
-    if ( (arg.value_type != 7) && (arg.value_type != 6) ) {
-      final boolean eq = this.areEqualTypes(arg.type_name, node.type_name, ctx);
-      final String t_name = arg.type_name;
-      switch (t_name ) { 
-        case "expression" : 
-          return node.expression;
-        case "block" : 
-          return node.expression;
-        case "arguments" : 
-          return node.expression;
-        case "keyword" : 
-          return node.eval_type == 9;
-        case "T.name" : 
-          return node.eval_type_name.equals(t_name);
-      }
-      return eq;
-    }
-    if ( (arg.value_type == 6) && (node.eval_type == 6) ) {
-      final boolean same_arrays = this.areEqualTypes(arg.array_type, node.array_type, ctx);
-      return same_arrays;
-    }
-    if ( (arg.value_type == 7) && (node.eval_type == 7) ) {
-      final boolean same_arrays_1 = this.areEqualTypes(arg.array_type, node.array_type, ctx);
-      final boolean same_keys = this.areEqualTypes(arg.key_type, node.key_type, ctx);
-      return same_arrays_1 && same_keys;
-    }
-    return false;
-  }
-  
-  public boolean doesMatch( CodeNode arg , CodeNode node , RangerAppWriterContext ctx ) {
-    if ( node.value_type == 11 ) {
-      if ( arg.type_name.equals("enum") ) {
-        return true;
-      } else {
-        return false;
-      }
-    }
-    if ( (arg.value_type != 7) && (arg.value_type != 6) ) {
-      final boolean eq = this.areEqualTypes(arg.type_name, node.eval_type_name, ctx);
-      final String t_name = arg.type_name;
-      switch (t_name ) { 
-        case "expression" : 
-          return node.expression;
-        case "block" : 
-          return node.expression;
-        case "arguments" : 
-          return node.expression;
-        case "keyword" : 
-          return node.eval_type == 9;
-        case "T.name" : 
-          return node.eval_type_name.equals(t_name);
-      }
-      return eq;
-    }
-    if ( (arg.value_type == 6) && (node.eval_type == 6) ) {
-      final boolean same_arrays = this.areEqualTypes(arg.array_type, node.eval_array_type, ctx);
-      return same_arrays;
-    }
-    if ( (arg.value_type == 7) && (node.eval_type == 7) ) {
-      final boolean same_arrays_1 = this.areEqualTypes(arg.array_type, node.eval_array_type, ctx);
-      final boolean same_keys = this.areEqualTypes(arg.key_type, node.eval_key_type, ctx);
-      return same_arrays_1 && same_keys;
-    }
-    return false;
-  }
-  
-  public boolean areEqualTypes( String type1 , String type2 , RangerAppWriterContext ctx ) {
-    String t_name = type1;
-    if ( matched.containsKey(type1) ) {
-      t_name = (Optional.ofNullable(matched.get(type1))).get();
-    }
-    switch (t_name ) { 
-      case "string" : 
-        return type2.equals("string");
-      case "int" : 
-        return type2.equals("int");
-      case "double" : 
-        return type2.equals("double");
-      case "boolean" : 
-        return type2.equals("boolean");
-      case "enum" : 
-        return type2.equals("enum");
-      case "char" : 
-        return type2.equals("char");
-      case "charbuffer" : 
-        return type2.equals("charbuffer");
-    }
-    if ( ctx.isDefinedClass(t_name) && ctx.isDefinedClass(type2) ) {
-      final RangerAppClassDesc c1 = ctx.findClass(t_name);
-      final RangerAppClassDesc c2 = ctx.findClass(type2);
-      if ( c1.isSameOrParentClass(type2, ctx) ) {
-        return true;
-      }
-      if ( c2.isSameOrParentClass(t_name, ctx) ) {
-        return true;
-      }
-    } else {
-      if ( ctx.isDefinedClass(t_name) ) {
-        final RangerAppClassDesc c1_1 = ctx.findClass(t_name);
-        if ( c1_1.isSameOrParentClass(type2, ctx) ) {
-          return true;
-        }
-      }
-    }
-    return t_name.equals(type2);
-  }
-  
-  public String getTypeName( String n ) {
-    String t_name = n;
-    if ( matched.containsKey(t_name) ) {
-      t_name = (Optional.ofNullable(matched.get(t_name))).get();
-    }
-    if ( 0 == (t_name.length()) ) {
-      return "";
-    }
-    return t_name;
-  }
-  
-  public int getType( String n ) {
-    String t_name = n;
-    if ( matched.containsKey(t_name) ) {
-      t_name = (Optional.ofNullable(matched.get(t_name))).get();
-    }
-    if ( 0 == (t_name.length()) ) {
-      return 0;
-    }
-    switch (t_name ) { 
-      case "expression" : 
-        return 14;
-      case "block" : 
-        return 14;
-      case "arguments" : 
-        return 14;
-      case "string" : 
-        return 4;
-      case "int" : 
-        return 3;
-      case "char" : 
-        return 12;
-      case "charbuffer" : 
-        return 13;
-      case "boolean" : 
-        return 5;
-      case "double" : 
-        return 2;
-      case "enum" : 
-        return 11;
-    }
-    return 8;
-  }
-  
-  public boolean setRvBasedOn( CodeNode arg , CodeNode node ) {
-    if ( arg.hasFlag("optional") ) {
-      node.setFlag("optional");
-    }
-    if ( (arg.value_type != 7) && (arg.value_type != 6) ) {
-      node.eval_type = this.getType(arg.type_name);
-      node.eval_type_name = this.getTypeName(arg.type_name);
-      return true;
-    }
-    if ( arg.value_type == 6 ) {
-      node.eval_type = 6;
-      node.eval_array_type = this.getTypeName(arg.array_type);
-      return true;
-    }
-    if ( arg.value_type == 7 ) {
-      node.eval_type = 7;
-      node.eval_key_type = this.getTypeName(arg.key_type);
-      node.eval_array_type = this.getTypeName(arg.array_type);
-      return true;
-    }
-    return false;
-  }
-}

package/versions/java/RangerBackReference.java

@@ -1,7 +0,0 @@
-import java.util.Optional;
-
-class RangerBackReference { 
-  public Optional<String> from_class = Optional.empty()     /** note: unused */;
-  public Optional<String> var_name = Optional.empty()     /** note: unused */;
-  public Optional<String> ref_type = Optional.empty()     /** note: unused */;
-}

package/versions/java/RangerCSharpClassWriter.java

@@ -1,287 +0,0 @@
-import java.util.Optional;
-import java.util.*;
-
-class RangerCSharpClassWriter extends RangerGenericClassWriter { 
-  
-  public String adjustType( String tn ) {
-    if ( tn.equals("this") ) {
-      return "this";
-    }
-    return tn;
-  }
-  
-  public String getObjectTypeString( String type_string , RangerAppWriterContext ctx ) {
-    switch (type_string ) { 
-      case "int" : 
-        return "Integer";
-      case "string" : 
-        return "String";
-      case "chararray" : 
-        return "byte[]";
-      case "char" : 
-        return "byte";
-      case "boolean" : 
-        return "Boolean";
-      case "double" : 
-        return "Double";
-    }
-    return type_string;
-  }
-  
-  public String getTypeString( String type_string ) {
-    switch (type_string ) { 
-      case "int" : 
-        return "int";
-      case "string" : 
-        return "String";
-      case "chararray" : 
-        return "byte[]";
-      case "char" : 
-        return "byte";
-      case "boolean" : 
-        return "boolean";
-      case "double" : 
-        return "double";
-    }
-    return type_string;
-  }
-  
-  public void writeTypeDef( CodeNode node , RangerAppWriterContext ctx , CodeWriter wr ) {
-    int v_type = node.value_type;
-    if ( node.eval_type != 0 ) {
-      v_type = node.eval_type;
-    }
-    switch (v_type ) { 
-      case 11 : 
-        wr.out("int", false);
-        break;
-      case 3 : 
-        wr.out("int", false);
-        break;
-      case 2 : 
-        wr.out("double", false);
-        break;
-      case 12 : 
-        wr.out("byte", false);
-        break;
-      case 13 : 
-        wr.out("byte[]", false);
-        break;
-      case 4 : 
-        wr.out("String", false);
-        break;
-      case 5 : 
-        wr.out("boolean", false);
-        break;
-      case 7 : 
-        wr.out(((("Dictionary<" + this.getObjectTypeString(node.key_type, ctx)) + ",") + this.getObjectTypeString(node.array_type, ctx)) + ">", false);
-        wr.addImport("System.Collections");
-        break;
-      case 6 : 
-        wr.out(("List<" + this.getObjectTypeString(node.array_type, ctx)) + ">", false);
-        wr.addImport("System.Collections");
-        break;
-      default: 
-        if ( node.type_name.equals("void") ) {
-          wr.out("void", false);
-        } else {
-          wr.out(this.getTypeString(node.type_name), false);
-        }
-        break;
-    }
-    if ( node.hasFlag("optional") ) {
-      wr.out("?", false);
-    }
-  }
-  
-  public void WriteVRef( CodeNode node , RangerAppWriterContext ctx , CodeWriter wr ) {
-    if ( node.eval_type == 11 ) {
-      if ( (node.ns.size()) > 1 ) {
-        final String rootObjName = node.ns.get(0);
-        final String enumName = node.ns.get(1);
-        final Optional<RangerAppEnum> e = ctx.getEnum(rootObjName);
-        if ( e.isPresent() ) {
-          wr.out("" + ((Optional.ofNullable(e.get().values.get(enumName))).get()), false);
-          return;
-        }
-      }
-    }
-    if ( (node.nsp.size()) > 0 ) {
-      for ( int i = 0; i < node.nsp.size(); i++) {
-        RangerAppParamDesc p = node.nsp.get(i);
-        if ( i > 0 ) {
-          wr.out(".", false);
-        }
-        if ( i == 0 ) {
-          if ( p.nameNode.get().hasFlag("optional") ) {
-          }
-        }
-        if ( (p.compiledName.length()) > 0 ) {
-          wr.out(this.adjustType(p.compiledName), false);
-        } else {
-          if ( (p.name.length()) > 0 ) {
-            wr.out(this.adjustType(p.name), false);
-          } else {
-            wr.out(this.adjustType((node.ns.get(i))), false);
-          }
-        }
-      }
-      return;
-    }
-    if ( node.hasParamDesc ) {
-      final Optional<RangerAppParamDesc> p_1 = node.paramDesc;
-      wr.out(p_1.get().compiledName, false);
-      return;
-    }
-    for ( int i_1 = 0; i_1 < node.ns.size(); i_1++) {
-      String part = node.ns.get(i_1);
-      if ( i_1 > 0 ) {
-        wr.out(".", false);
-      }
-      wr.out(this.adjustType(part), false);
-    }
-  }
-  
-  public void writeVarDef( CodeNode node , RangerAppWriterContext ctx , CodeWriter wr ) {
-    if ( node.hasParamDesc ) {
-      final CodeNode nn = node.children.get(1);
-      final Optional<RangerAppParamDesc> p = nn.paramDesc;
-      if ( (p.get().ref_cnt == 0) && (p.get().is_class_variable == false) ) {
-        wr.out("/** unused:  ", false);
-      }
-      if ( (p.get().set_cnt > 0) || p.get().is_class_variable ) {
-        wr.out("", false);
-      } else {
-        wr.out("const ", false);
-      }
-      this.writeTypeDef(p.get().nameNode.get(), ctx, wr);
-      wr.out(" ", false);
-      wr.out(p.get().compiledName, false);
-      if ( (node.children.size()) > 2 ) {
-        wr.out(" = ", false);
-        ctx.setInExpr();
-        final CodeNode value = node.getThird();
-        this.WalkNode(value, ctx, wr);
-        ctx.unsetInExpr();
-      } else {
-        if ( nn.value_type == 6 ) {
-          wr.out(" = new ", false);
-          this.writeTypeDef(p.get().nameNode.get(), ctx, wr);
-          wr.out("()", false);
-        }
-        if ( nn.value_type == 7 ) {
-          wr.out(" = new ", false);
-          this.writeTypeDef(p.get().nameNode.get(), ctx, wr);
-          wr.out("()", false);
-        }
-      }
-      if ( (p.get().ref_cnt == 0) && (p.get().is_class_variable == true) ) {
-        wr.out("     /** note: unused */", false);
-      }
-      if ( (p.get().ref_cnt == 0) && (p.get().is_class_variable == false) ) {
-        wr.out("   **/ ;", true);
-      } else {
-        wr.out(";", false);
-        wr.newline();
-      }
-    }
-  }
-  
-  public void writeArgsDef( RangerAppFunctionDesc fnDesc , RangerAppWriterContext ctx , CodeWriter wr ) {
-    for ( int i = 0; i < fnDesc.params.size(); i++) {
-      RangerAppParamDesc arg = fnDesc.params.get(i);
-      if ( i > 0 ) {
-        wr.out(",", false);
-      }
-      wr.out(" ", false);
-      this.writeTypeDef(arg.nameNode.get(), ctx, wr);
-      wr.out((" " + arg.name) + " ", false);
-    }
-  }
-  
-  public void writeClass( CodeNode node , RangerAppWriterContext ctx , CodeWriter orig_wr ) {
-    final Optional<RangerAppClassDesc> cl = node.clDesc;
-    if ( !cl.isPresent() ) {
-      return;
-    }
-    final CodeWriter wr = orig_wr.getFileWriter(".", (cl.get().name + ".cs"));
-    final CodeWriter importFork = wr.fork();
-    wr.out("", true);
-    wr.out(("class " + cl.get().name) + " {", true);
-    wr.indent(1);
-    for ( int i = 0; i < cl.get().variables.size(); i++) {
-      RangerAppParamDesc pvar = cl.get().variables.get(i);
-      wr.out("public ", false);
-      this.writeVarDef(pvar.node.get(), ctx, wr);
-    }
-    if ( cl.get().has_constructor ) {
-      final RangerAppFunctionDesc constr = cl.get().constructor_fn.get();
-      wr.out("", true);
-      wr.out(cl.get().name + "(", false);
-      this.writeArgsDef(constr, ctx, wr);
-      wr.out(" ) {", true);
-      wr.indent(1);
-      wr.newline();
-      final RangerAppWriterContext subCtx = constr.fnCtx.get();
-      subCtx.is_function = true;
-      this.WalkNode(constr.fnBody.get(), subCtx, wr);
-      wr.newline();
-      wr.indent(-1);
-      wr.out("}", true);
-    }
-    for ( int i_1 = 0; i_1 < cl.get().static_methods.size(); i_1++) {
-      RangerAppFunctionDesc variant = cl.get().static_methods.get(i_1);
-      wr.out("", true);
-      if ( variant.nameNode.get().hasFlag("main") && (!variant.nameNode.get().code.get().filename.equals(ctx.getRootFile())) ) {
-        continue;
-      }
-      if ( variant.nameNode.get().hasFlag("main") ) {
-        wr.out("static int Main( string [] args ) {", true);
-      } else {
-        wr.out("public static ", false);
-        this.writeTypeDef(variant.nameNode.get(), ctx, wr);
-        wr.out(" ", false);
-        wr.out(variant.name + "(", false);
-        this.writeArgsDef(variant, ctx, wr);
-        wr.out(") {", true);
-      }
-      wr.indent(1);
-      wr.newline();
-      final RangerAppWriterContext subCtx_1 = variant.fnCtx.get();
-      subCtx_1.is_function = true;
-      this.WalkNode(variant.fnBody.get(), subCtx_1, wr);
-      wr.newline();
-      wr.indent(-1);
-      wr.out("}", true);
-    }
-    for ( int i_2 = 0; i_2 < cl.get().defined_variants.size(); i_2++) {
-      String fnVar = cl.get().defined_variants.get(i_2);
-      final Optional<RangerAppMethodVariants> mVs = Optional.ofNullable(cl.get().method_variants.get(fnVar));
-      for ( int i_3 = 0; i_3 < mVs.get().variants.size(); i_3++) {
-        RangerAppFunctionDesc variant_1 = mVs.get().variants.get(i_3);
-        wr.out("", true);
-        wr.out("public ", false);
-        this.writeTypeDef(variant_1.nameNode.get(), ctx, wr);
-        wr.out(" ", false);
-        wr.out(variant_1.name + "(", false);
-        this.writeArgsDef(variant_1, ctx, wr);
-        wr.out(") {", true);
-        wr.indent(1);
-        wr.newline();
-        final RangerAppWriterContext subCtx_2 = variant_1.fnCtx.get();
-        subCtx_2.is_function = true;
-        this.WalkNode(variant_1.fnBody.get(), subCtx_2, wr);
-        wr.newline();
-        wr.indent(-1);
-        wr.out("}", true);
-      }
-    }
-    wr.indent(-1);
-    wr.out("}", true);
-    final ArrayList<String> import_list = wr.getImports();
-    for ( int i_4 = 0; i_4 < import_list.size(); i_4++) {
-      String codeStr = import_list.get(i_4);
-      importFork.out(("using " + codeStr) + ";", true);
-    }
-  }
-}

package/versions/java/RangerCompilerMessage.java

@@ -1,9 +0,0 @@
-import java.util.Optional;
-
-class RangerCompilerMessage { 
-  public int error_level = 0     /** note: unused */;
-  public int code_line = 0     /** note: unused */;
-  public String fileName = ""     /** note: unused */;
-  public String description = "";
-  public Optional<CodeNode> node = Optional.empty();
-}