ranger-compiler 3.0.4 → 3.1.0

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "ranger-compiler",
-  "version": "3.0.4",
+  "version": "3.1.0",
   "description": "Ranger cross-language compiler - compile once, run anywhere",
   "main": "dist/api.js",
   "types": "dist/api.d.ts",
@@ -23,7 +23,7 @@
   },
   "scripts": {
     "build:dist": "npm run compile && npm run build:dist:copy",
-    "build:dist:copy": "cp ./bin/output.js ./dist/rgrc.js && cp ./bin/Lang.rgr ./dist/Lang.rgr && cp ./bin/stdops.rgr ./dist/stdops.rgr && cp -r ./lib ./dist/lib",
+    "build:dist:copy": "cp ./bin/output.js ./dist/rgrc.js && cp ./bin/Lang.rgr ./dist/Lang.rgr && cp ./bin/stdops.rgr ./dist/stdops.rgr && rm -rf dist/lib && cp -r ./lib ./dist/lib",
     "build:dist:module": "node bin/output.js -nodemodule -es6 -typescript ./compiler/ng_Compiler.rgr -d=./compiler/bin -o=api.ts && tsc --declaration --module commonjs --target es2015 --moduleResolution node --outDir ./dist ./compiler/bin/api.ts",
     "prepublishOnly": "npm run build:dist && npm test",
     "test-any-ts": "node bin/testcomp.js ./features/any/test_any.rgr -es6 -typescript",

package/dist/lib/lib/ACEEditor.rgr

@@ -1,5 +0,0 @@
-operator type:void es6 {
-    fn disable_warnings (el:ACEEditor) ( (e 1) ".$blockScrolling = Infinity")
-    fn set (el:ACEEditor str) ( (e 1) ".setValue(" (e 2) ")")
-}
-

package/dist/lib/lib/Ajax.rgr

@@ -1,196 +0,0 @@
-Import "JSON.rgr"
-
-
-operators {
-    fetch_json _:void ( url:string callback:(_:void ( data:JSONDataObject )) error:(_:void ()) ) {
-        templates {
-            ranger ('(post_json ' (e 1) ' ' (e 2) ' ' (e 3) ' ' (e 4) ')' )
-            es6 ( "axios.get(" (e 1) ") .then((res)=>{
-                    (("(e 2) ")(res.data));
-                })"
-                )
-            java7 (
-                ""
-            )
-        }
-    }
-    post_json _@(throws):void  ( url:string data:JSONDataObject callback:(_:void ( data:JSONDataObject )) error:(_:void ()) ) {
-        templates {
-            ranger ('(post_json ' (e 1) ' ' (e 2) ' ' (e 3) ' ' (e 4) ')' )
-            es6 ( "axios.post(" (e 1) ", " (e 2) ") .then((res)=>{
-                    (("(e 3) ")(res.data));
-                })"
-            )
-            java7 ( "AsyncPostTest.PostJSONData( (new AsyncPostTest() { " nl I
-                        "@Override" nl
-                        "protected void onPostExecute(String strData) {" nl I
-                            'try {' I
-                                (e 3) ".run(new JSONObject(strData)); " nl i
-                            '} catch( Exception e) {}' nl i
-                        "}" nl i
-                    "})," (e 1) ", " (e 2) " ); " (imp "android.os.AsyncTask") 
-                    (imp "org.json.JSONObject") (plugin 'maven' (  (dep 'org.json' 'json' '20171018'  ) ) )
-(java_class 'AsyncPostTest' `
-import android.os.AsyncTask;
-
-import java.io.BufferedReader;
-import java.io.DataOutputStream;
-import java.io.InputStreamReader;
-import java.net.HttpURLConnection;
-import java.net.URL;
-import org.json.JSONObject;
-
-class AsyncPostTest extends AsyncTask<String, Void, String> {
-
-    private Exception exception;
-    public String dataToSend = "";
-    public String urlToSend = "";
-    static void PostJSONData( AsyncPostTest req, String url, JSONObject data ) {
-        req.dataToSend = data.toString();
-        req.urlToSend = url;
-        req.execute();
-    }
-    protected String doInBackground(String... urls) {
-        HttpURLConnection urlConnection = null;
-        StringBuilder x = new StringBuilder();
-        try {
-
-            URL url = new URL(this.urlToSend);
-            HttpURLConnection connection = (HttpURLConnection) url.openConnection();
-            connection.setConnectTimeout(500);
-            connection.setReadTimeout(500);
-            // Allow Outputs (sending)
-            connection.setDoOutput(true);
-            connection.setUseCaches(false);
-
-            // Enable POST method
-            connection.setRequestMethod("POST");
-            connection.setRequestProperty("Content-Type", "application/json");
-            connection.setRequestProperty("charset", "utf-8");
-            DataOutputStream printout = new DataOutputStream(connection.getOutputStream());
-            printout.write(this.dataToSend.getBytes("UTF8"));
-            printout.flush();
-            //  Here you read any answer from server.
-            BufferedReader serverAnswer = new BufferedReader(new InputStreamReader(connection.getInputStream()));
-            String read_data = "";
-            String line;
-            while ((line = serverAnswer.readLine()) != null) {
-                read_data = read_data + line;
-            }
-            printout.close();
-            serverAnswer.close();
-            printout.close();
-            return read_data;
-        } catch (Exception e) {
-            e.printStackTrace();
-        } finally {
-            if (urlConnection != null) {
-                urlConnection.disconnect();
-            }
-        }
-        return x.toString();
-    }
-
-    protected void onPostExecute(String strData) {
-        // TODO: check this.exception
-        // TODO: do something with the feed
-    }
-}
-
-`)                    
-                    )
-        }
-    }
-
-    https_post_json _@(throws):void  ( url:string data:JSONDataObject callback:(_:void ( data:JSONDataObject )) error:(_:void ()) ) {
-        templates {
-            ranger ('(post_json ' (e 1) ' ' (e 2) ' ' (e 3) ' ' (e 4) ')' )
-            es6 ( "axios.post(" (e 1) ", " (e 2) ") .then((res)=>{
-                    (("(e 3) ")(res.data));
-                })"
-            )
-            java7 ( "AsyncHttpsPostTest.PostJSONData( (new AsyncHttpsPostTest() { " nl I
-                        "@Override" nl
-                        "protected void onPostExecute(String strData) {" nl I
-                            'try {' I
-                                (e 3) ".run(new JSONObject(strData)); " nl i
-                            '} catch( Exception e) {'nl I
-                                (e 4) ".run(); " nl i
-                            '}' nl i
-                        "}" nl i
-                    "})," (e 1) ", " (e 2) " ); " (imp "android.os.AsyncTask") 
-                    (imp "org.json.JSONObject") (plugin 'maven' (  (dep 'org.json' 'json' '20171018'  ) ) )
-(java_class 'AsyncHttpsPostTest' `
-import android.os.AsyncTask;
-
-import java.io.BufferedReader;
-import java.io.DataOutputStream;
-import java.io.InputStreamReader;
-import javax.net.ssl.HttpsURLConnection;
-import java.net.URL;
-import org.json.JSONObject;
-
-class AsyncHttpsPostTest extends AsyncTask<String, Void, String> {
-
-    private Exception exception;
-    public String dataToSend = "";
-    public String urlToSend = "";
-    static void PostJSONData( AsyncHttpsPostTest req, String url, JSONObject data ) {
-        req.dataToSend = data.toString();
-        req.urlToSend = url;
-        req.execute();
-    }
-    protected String doInBackground(String... urls) {
-        HttpsURLConnection urlConnection = null;
-        StringBuilder x = new StringBuilder();
-        try {
-
-            URL url = new URL(this.urlToSend);
-            HttpsURLConnection connection = (HttpsURLConnection) url.openConnection();
-            connection.setConnectTimeout(500);
-            connection.setReadTimeout(500);
-            // Allow Outputs (sending)
-            connection.setDoOutput(true);
-            connection.setUseCaches(false);
-
-            // Enable POST method
-            connection.setRequestMethod("POST");
-            connection.setRequestProperty("Content-Type", "application/json");
-            connection.setRequestProperty("charset", "utf-8");
-            DataOutputStream printout = new DataOutputStream(connection.getOutputStream());
-            printout.write(this.dataToSend.getBytes("UTF8"));
-            printout.flush();
-            //  Here you read any answer from server.
-            BufferedReader serverAnswer = new BufferedReader(new InputStreamReader(connection.getInputStream()));
-            String read_data = "";
-            String line;
-            while ((line = serverAnswer.readLine()) != null) {
-                read_data = read_data + line;
-            }
-            printout.close();
-            serverAnswer.close();
-            printout.close();
-            return read_data;
-        } catch (Exception e) {
-            e.printStackTrace();
-        } finally {
-            if (urlConnection != null) {
-                urlConnection.disconnect();
-            }
-        }
-        return x.toString();
-    }
-
-    protected void onPostExecute(String strData) {
-        // TODO: check this.exception
-        // TODO: do something with the feed
-    }
-}
-
-`)                    
-                    )
-        }
-    }
-
-
-}

package/dist/lib/lib/CmdParams.rgr

@@ -1,72 +0,0 @@
-
-
-; -i file2.pdf -o file3.pdf
-class CmdParams @serialize(true) {
-
-    def flags:[string:boolean]
-    def params:[string:string]
-    def values:[string]
-
-    fn hasParam:boolean (name:string) {
-        return (has params name)
-    }
-
-    fn getParam@(optional):string ( name:string) {
-        return (get params name)
-    }
-
-    ; -p=100
-    ; -o=""
-    fn collect() {
-        def cnt (shell_arg_cnt)
-        def i 0 
-        while( cnt > 0 ) {
-            def argStr (shell_arg i)
-            def firstC (charAt argStr 0)
-            if( firstC == (ccode "-") ) {
-                def pS (substring argStr 1 (strlen argStr))
-                def parts (strsplit pS "=")
-                if( (array_length parts) == 1 ) {
-                    def flag (itemAt parts 0)
-                    set flags flag true
-                } {
-                    def name (itemAt parts 0)
-                    remove_index parts 0
-                    def value (join parts "=")
-                    set params name value
-                }
-            } {
-                push values argStr
-            }
-            cnt = cnt - 1
-            i = i + 1
-        }
-    }
-}
-
-class test_cmdparams {
-
-    fn run () {
-        def prms (new CmdParams)
-        prms.collect()
-        print "--- params ----"
-        def pNames (keys prms.params)
-        for pNames v:string i {
-            print v + " = " + (unwrap (get prms.params v))
-        }
-        print "--- flags ----"
-        def flagNames (keys prms.flags)
-        for flagNames v:string i {
-            print v
-        }
-        print "--- values ----"
-        for prms.values v:string i {
-            print v
-        }
-    }
-
-    sfn m@(main) () {
-        def o (new test_cmdparams)
-        o.run()
-    }
-}

package/dist/lib/lib/Crypto.rgr

@@ -1,90 +0,0 @@
-
-Import "TypedArrays.rgr"
-
-systemclass RandomGenerator {
-  java7 SecureRandom  ( (imp 'java.security.SecureRandom'))
-  es6 RandomSource
-}
-systemclass KeyGenerator {
-  java7 KeyGenerator  ( (imp 'javax.crypto.KeyGenerator'))
-}
-systemclass SecretKey {
-  java7 SecretKeySpec ( (imp 'javax.crypto.spec.SecretKeySpec'))
-}
-systemclass Cipher {
-  java7 Cipher  ( (imp 'javax.crypto.Cipher'))
-}
-
-
-
-operators {
-
-  newRandomGenerator _:RandomGenerator () {
-      templates {
-          java7 ('SecureRandom.getInstance("SHA1PRNG")')
-          es6 ( 'window.crypto' )
-      }      
-  }
-  
-  generate _:void ( generator:RandomGenerator buff:RUint32Array) {
-    templates {
-      es6 ( (e 1) '.getRandomValues(' (e 2) ')')
-    }
-  }
-
-  setSeed _:void ( g:RandomGenerator str:string) {
-      templates {
-          java7 ((e 1) '.setSeed(' (e 2) '.getBytes());')
-      }      
-  }
-
-  newKeyGenerator _:KeyGenerator () {
-    templates {
-      java7 ( 'KeyGenerator.getInstance("AES")')
-    }
-  }
-  init _:void ( kg:KeyGenerator keylen:int rand:RandomGenerator) {
-    templates {
-      java7 ( (e 1 ) '.init(' (e 2) ', ' (e 3)');' )
-    }
-  }
-  createAESKey _:SecretKey ( gen:KeyGenerator) {
-    templates {
-      java7 ('new SecretKeySpec(('(e 1)'.generateKey()).getEncoded(), "AES")')
-    }
-  }
-  createAESKey _:SecretKey ( bytes:Bytes) {
-    templates {
-      java7 ('new SecretKeySpec('(e 1)', 0, 128 / 8 , "AES")')
-    }
-  }
-  newAESCipher _:Cipher ( ) {
-    templates {
-      java7 ( 'Cipher.getInstance("AES")')
-    }
-  }
-  init_decoder _:void ( c:Cipher key:SecretKey  ) {
-    templates {
-      java7 ( (e 1) '.init(Cipher.DECRYPT_MODE, ' (e 2) ');')
-    }
-  }
-  init_encoder _:void ( c:Cipher key:SecretKey  ) {
-    templates {
-      java7 ( (e 1) '.init(Cipher.ENCRYPT_MODE, ' (e 2) ');')
-    }
-  }
-  encode _@(throws):Bytes ( c:Cipher data:Bytes ) {
-    templates {
-      java7 ( (e 1) '.doFinal(' (e 2) ')')
-    }
-  }
-  decode _@(throws):Bytes ( c:Cipher data:Bytes ) {
-    templates {
-      java7 ( (e 1) '.doFinal(' (e 2) ')')
-    }
-  }
-
-}
-
-
-

package/dist/lib/lib/DOMLib.rgr

@@ -1,307 +0,0 @@
-Import "ViewLib.rgr"
-Import "ACEEditor.rgr"
-
-systemclass SystemCanvasElement {
-    es6 CanvasElement
-}
-systemclass CanvasDrawCtx {
-    es6 CanvasDrawCtx
-}
-systemclass ACEEditor {
-    es6 ACE
-}
-systemclass MediaQueryList {
-  es6 Object
-}
-
-
-systemunion CoordinateType (double int)
-
-
-operator type:void es6 {
-  fn window:string ( location@(keyword) ) ('document.location.hash')
-  fn hashchange ( cb:(_void ()) ) ('window.addEventListener("hashchange",(_event)=>{ (' (e 1) ')()})')    
-
-  fn mediaQuery:MediaQueryList (query:string) ('window.matchMedia(' (e 1) ')')
-  fn matches:boolean (q:MediaQueryList) ( (e 1) '.matches')
-}
-
-operators {
-
-
-    set _:string ( el:ACEEditor text:string ) {
-        templates {
-            es6 ( (e 1) ".setValue(" (e 2) ")")
-        }
-    }
-
-    valueof _:string ( el:ACEEditor ) {
-        templates {
-            es6 ( (e 1) ".getValue()")
-        }
-    }
-    create_ace _:ACEEditor ( el:ViewGroup) {
-        templates {
-            es6 ("ace.edit(" (e 1) ")" )
-        }
-    }
-    create_ace _:ACEEditor ( el:View) {
-        templates {
-            es6 ("ace.edit(" (e 1) ")" )
-        }
-    }
-    set_mode _:void ( el:ACEEditor name:string) {
-        templates {
-            es6 ( (e 1 )".getSession().setMode(" (e 2) ") " )
-        }
-    }
-    onChange _:void ( el:ACEEditor code:block) {
-        templates {
-            es6 ( (e 1 ) ".on(\"input\", () => {" nl I (block 2) i nl "}) " )
-        }
-    }
-
-    eval_code _:void (code:string) {
-        templates {
-            es6 ( "eval(" (e 1 ) ")")
-        }           
-    }
-    window_width _:int () {    
-        templates {
-            es6 ( 'window.innerWidth')
-        }
-    }
-    window_height _:int () {    
-        templates {
-            es6 ( 'window.innerHeight')
-        }
-    }
-    ctx _:CanvasDrawCtx (elem:SystemCanvasElement ) {
-        templates {
-            es6 ((e 1 ) '.getContext("2d")')
-        }
-    }
-
-    beginPath _:void ( ctx:CanvasDrawCtx ) {
-        templates {
-            es6 ( (e 1) ".beginPath();" nl)
-        }        
-    }
-    moveTo _:void (x:CoordinateType y:CoordinateType) {
-        templates {
-            es6 ( (e 1) ".moveTo(" (e 1) "," (e 2) ");" nl)
-        }        
-    }
-    lineTo _:void (x:CoordinateType y:CoordinateType) {
-        templates {
-            es6 ( (e 1) ".lineTo(" (e 1) "," (e 2) ");" nl )
-        }        
-    }
-    fill _:void () {
-        templates {
-            es6 ( (e 1) ".fill()")
-        }        
-    }
-
-    create_canvas _:SystemCanvasElement ( width:int height:int ) {
-        templates {
-            es6 ( 'document.createElement("canvas")' )
-        }
-    }
-    setWidth _:void ( c:SystemCanvasElement width:int) {
-        templates {
-            es6 ( (e 1) '.width = ' (e 2) ';' nl (e 1) '.style.width = ' (e 2) ' +"px";' nl)
-        }
-    }
-    setHeight _:void ( c:SystemCanvasElement height:int) {
-        templates {
-            es6 ( (e 1) '.height = ' (e 2) ';' nl (e 1) '.style.height = ' (e 2) ' +"px";' nl)
-        }
-    }
-
-    append _:void ( el:ViewGroup c:SystemCanvasElement ) {
-        templates {
-            es6 ( (e 1) '.appendChild(' (e 2) ')')
-        }
-    }
-
-    beginPath _:void (c:CanvasDrawCtx) {
-        templates {
-            es6 ( (e 1 ) ".beginPath()")
-        }        
-    }
-    scale _:void (c:CanvasDrawCtx amount:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".scale(" (e 2) ", " (e 2) ")")
-        }        
-    }
-    translate _:void (c:CanvasDrawCtx x:CoordinateType y:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".translate(" (e 2) ", " (e 3) ")")
-        }        
-    }
-    fill _:void (c:CanvasDrawCtx) {
-        templates {
-            es6 ( (e 1 ) ".fill()")
-        }        
-    }
-    stroke _:void (c:CanvasDrawCtx) {
-        templates {
-            es6 ( (e 1 ) ".stroke()")
-        }        
-    }
-    stroke _:void (c:CanvasDrawCtx color:string width:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".strokeStyle = " (e 2) nl (e 1 ) ".lineWidth = " (e 3) nl )
-        }        
-    }
-    stroke _:void (c:CanvasDrawCtx color:string) {
-        templates {
-            es6 ( (e 1 ) ".strokeStyle = " (e 2))
-        }        
-    }
-    fillStyle _:void (c:CanvasDrawCtx color:string) {
-        templates {
-            es6 ( (e 1 ) ".fillStyle = " (e 2))
-        }        
-    }
-    moveTo _:void (c:CanvasDrawCtx x:CoordinateType y:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".moveTo(" (e 2) "," (e 3) ")")
-        }        
-    }
-    lineTo _:void (c:CanvasDrawCtx x:CoordinateType y:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".lineTo(" (e 2) "," (e 3) ")")
-        }        
-    }
-    bezierCurveTo _:void (c:CanvasDrawCtx x1:CoordinateType y1:CoordinateType x2:CoordinateType y2:CoordinateType x3:CoordinateType y3:CoordinateType) {
-        templates {
-            es6 ( (e 1 ) ".bezierCurveTo(" (e 2) "," (e 3) "," (e 4) "," (e 5) "," (e 6) "," (e 7) ")")
-        }        
-    }
-    get_context _:CanvasDrawCtx ( e:SystemCanvasElement) {
-        templates {
-            es6 ( (e 1 ) ".getContext(\"2d\") ")
-        }
-    }
-    save _:void ( e:CanvasDrawCtx) {
-        templates {
-            es6 ( (e 1) '.save()')
-        }
-    }
-    restore _:void ( e:CanvasDrawCtx) {
-        templates {
-            es6 ( (e 1) '.restore()')
-        }
-    }
-    opacity _:void (e:CanvasDrawCtx v:double) {
-        templates {
-            es6 ( (e 1) '.globalAlpha = ' (e 2))
-        }
-    }
-    document_body  base:ViewGroup () {
-        templates {
-            es6 ("document.body")
-        }        
-    }
-    create_text _:ViewGroup ( text:string) {
-        templates {
-            es6  ("document.createTextNode( " (e 1) ")")
-        }
-    }
-    getChild _@(optional):ViewGroup ( el:ViewGroup i:int) {
-        templates {
-            es6 ( (e 1) ".children[" (e 2) "]")
-        }        
-    }
-    ; myAnchor.parentNode.replaceChild(mySpan, myAnchor);
-    replace_dom _:ViewGroup ( oldEl:ViewGroup newEl:ViewGroup ) {
-        templates {
-            es6  ( (e 1) ".parentNode.replaceChild( " (e 2) ", " (e 1) ")")
-        }
-    }
-    clear _:ViewGroup ( oldEl:ViewGroup ) {
-        templates {
-            es6  ( "while( " (e 1) ".firstChild) " (e 1) ".removeChild( " (e 1) ".firstChild);" )
-        }
-    }
-    remove_dom _:ViewGroup ( oldEl:ViewGroup ) {
-        templates {
-            es6  ( "(" (e 1) ".parentNode ? " (e 1) ".parentNode.removeChild( " (e 1) ") : null);")
-            ranger ( '(remove_dom ' (e 1) ')' )
-        }
-    }
-    create_element _:ViewGroup ( elName:string) {
-        templates {
-            es6  ("document.createElement( " (e 1) ")")
-            ranger ("(create_dom " (e 1) ")")
-        }
-    }
-    set_class _:void ( el:ViewGroup className:string ) {
-        templates {
-            es6 ( (e 1) ".className = " (e 2))
-        }
-    }
-    value _:void ( el:ViewGroup value:string ) {
-        templates {
-            es6 ( (e 1) ".value = " (e 2))
-        }
-    }
-    value _:string ( el:ViewGroup) {
-        templates {
-            es6 ( (e 1) ".value")
-        }
-    }
-    add_listener _:void (el:ViewGroup name:string cb:(_:void (event:DOMEvent))) {
-        templates {
-            es6 ( (e 1) ".addEventListener( " ( e 2 ) ", " (e 3) ")")
-        }
-    }
-    clone _:ViewGroup (elem:ViewGroup) {
-        templates {
-            es6 ( (e 1) ".cloneNode(true)")
-            ranger ( '(clone ' (e 1 )' )')
-        }
-    } 
-    insert _:void (el:ViewGroup newChild:ViewGroup index:int) {
-        templates {
-            es6 ( (e 1) ".insertBefore( " (e 2) ", " (e 1) ".children[" (e 3) "]);")
-        }
-    }
-    add _:void (el:ViewGroup newChild:ViewGroup) {
-        templates {
-            es6 ( (e 1) ".appendChild(" (e 2) ");")
-            ranger ( '(add ' (e 1 )' ' (e 2) ' )')
-        }
-    }
-    attr _:void (el:ViewGroup name:string value:string ) {
-        templates {
-            es6 ( (e 1) ".setAttribute(" (e 2) ", " (e 3)")")
-            ranger ('(attr ' (e 1 ) ' ' (e 2 ) ' ' (e 3 ) ' ) ')
-        }
-    }
-    text _:void (el:ViewGroup value:string ) {
-        templates {
-            es6 ( (e 1) ".textContent = " (e 2) )
-            ranger ('(text ' (e 1) ' ' (e 2) ')')
-        }
-    }
-    find_canvas _@(optional):SystemCanvasElement (id:string) {
-        templates {
-            es6 ( 'document.getElementById(' (e 1) ')')
-        }        
-    }
-    find_element _@(optional):ViewGroup (id:string) {
-        templates {
-            es6 ( 'document.getElementById(' (e 1) ')')
-        }        
-    }
-    find_element_by_attr _@(optional):ViewGroup ( attr:string value:string ) {
-        templates {
-            es6 ( `document.querySelectorAll('[' + ` (e 1) ` + '="' + ` (e 2) ` + '"]')[0]` )
-            ranger ( '(find_element_by_attr ' (e 1) ' ' (e 2) ')' )
-        }
-    }
-}
-