ranger-compiler 3.0.4 → 3.1.0

package/dist/lib/lib/SQL.rgr

@@ -1,44 +0,0 @@
-
-
-systemclass SQLSchemaBuilder {
-  es6 Object
-}
-systemclass SQLSchemaTable {
-  es6 Object
-}
-systemclass SQLDatabase {
-  es6 Object
-}
-systemclass DBSchema {
-  es6 Object
-}
-systemclass DBTable {
-  es6 Object
-}
-systemclass DBInsertableRow {
-  es6 Object
-}
-systemclass DBTableQuery {
-  es6 Object
-}
-operator type:void es6 {
-  fn schema:SQLSchemaBuilder (name:string version:int) (`lf.schema.create(`(e 1)`,`(e 2)`)`)
-  fn create_table:SQLSchemaTable (  s:SQLSchemaBuilder name:string ) ( (e 1) `.createTable(`(e 2)`)`)
-
-  fn add_int (t:SQLSchemaTable fieldName:string ) ( (e 1) `.addColumn(`(e 2)`, lf.Type.INTEGER)`)
-  fn add_string (t:SQLSchemaTable fieldName:string ) ( (e 1) `.addColumn(`(e 2)`, lf.Type.STRING)`)
-  fn add_datetime (t:SQLSchemaTable fieldName:string ) ( (e 1) `.addColumn(`(e 2)`, lf.Type.DATE_TIME)`)
-  fn add_boolean (t:SQLSchemaTable fieldName:string ) ((e 1) `.addColumn(`(e 2)`, lf.Type.BOOLEAN)`)
-  fn set_primary_key (t:SQLSchemaTable fieldName:string) ((e 1) `.addPrimaryKey([`(e 2)`])`)
-  fn create_index (t:SQLSchemaTable indexName:string fields:[string]) ( (e 1) `.addIndex(`(e 2)`,`(e 3)`,false,lf.Order.DESC)`)
-
-  fn connect@(async):SQLDatabase (b:SQLSchemaBuilder) ('await ' (e 1) '.connect()')
-  fn getSchema:DBSchema (db:SQLDatabase) ( (e 1) '.getSchema()')
-  fn getTable:DBTable (db:DBSchema name:string) ( (e 1) '.table(' (e 2) ')')
-
-  fn addRow:DBInsertableRow (tbl:DBTable row:JSONDataObject) (  (e 1) '.createRow(' (e 2) ')') 
-  fn insert@(async):void (db:SQLDatabase t:DBTable rows:[DBInsertableRow]) ('await (' (e 1) '.insertOrReplace().into(' (e 2) ').values(' (e 3) ').exec())')
-  ; fn query@(async):[JSONDataObject] (db:SQLDatabase t:DBTable id:int ) ('await (' (e 1) '.select().from(' (e 2) ').where(' (e 2) '.id.eq(' (e 3)')).exec())')
-  fn select@(async):[JSONDataObject] (db:SQLDatabase t:DBTable id:int ) ('await (' (e 1) '.select().from(' (e 2) ').where(' (e 2) '.id.eq(' (e 3)')).exec())')
-}
-

package/dist/lib/lib/ServiceLib.rgr

@@ -1,9 +0,0 @@
-
-operators {
-    service_url _:string ( name@(noeval) ) {
-        templates {
-            ranger ( "(service_url " (e 1) ")")
-            * @macro(true) ( "\"http://10.0.2.2:1777/" (service_id 1) "\"")
-        }
-    }
-}

package/dist/lib/lib/Storage.rgr

@@ -1,89 +0,0 @@
-
-; https://developer.android.com/guide/topics/data/data-storage.html#filesInternal
-
-
-systemclass StorageOutputStream {
-  java7 FileOutputStream   ( (imp 'java.io.FileOutputStream'))
-}
-systemclass StorageInputStream {
-  java7 FileInputStream    ( (imp 'java.io.FileInputStream '))
-}
-
-operators {
-
-  ; JavaScript localstorage functions using localforage
-  localStorage _@(async):void (path:string value:string) {
-      templates {
-          es6 (`await (new Promise(resolve => { localforage.setItem(` (e 1) `, ` (e 2) `, resolve ) } ) )` )
-      }
-  }
-  
-  localStorage _@(optional async):string (path:string) {
-      templates {
-          es6 (`await (new Promise(resolve => { localforage.getItem(` (e 1) `, (err,value) => {
-              if(err) resolve(null);
-              resolve(value)
-          }) } ))` )
-      }
-  }
-
-  ; Android + UIContext functions
-  file_exists _:boolean (ui:UIContext filename:string) {
-    templates {
-      java7 ( '__storageFileExist(' (e 1) '.getCtx(), ' (e 2) ')' (imp 'java.io.File')
-(create_polyfill `
-static boolean __storageFileExist(Context ctx, String fname){
-    File file = ctx.getFileStreamPath(fname);
-    return file.exists();
-}
-`)
-
-      )
-    }
-  }
-
-  open_private_output _:StorageOutputStream (ui:UIContext filename:string) {
-    templates {
-      java7 ( (e 1) '.getCtx().openFileOutput(' (e 2) ', Context.MODE_PRIVATE)')
-    }
-  }
-  open_private_input _:StorageInputStream (ui:UIContext filename:string) {
-    templates {
-      java7 ( (e 1) '.getCtx().openFileInput(' (e 2) ')')
-    }
-  }
-  read _:Bytes (stream:StorageInputStream) {
-    templates {
-      java7 ( '__readStream(' (e 1) ')' (imp 'java.io.BufferedInputStream') (imp 'java.io.FileNotFoundException')
-
-(create_polyfill `
-static byte[] __readStream(FileInputStream fis) {
-  byte[] bytes = null;
-  try {
-      bytes = new byte[fis.available()];
-      BufferedInputStream buf = new BufferedInputStream(fis);
-      buf.read(bytes, 0, bytes.length);
-      buf.close();
-  } catch (FileNotFoundException e) {
-      e.printStackTrace();
-  } catch (IOException e) {
-      e.printStackTrace();
-  }
-  return bytes;
-}
-`)
-
-      )
-    }
-  }
-  write _:void (stream:StorageOutputStream data:Bytes) {
-    templates {
-      java7 ( (e 1) '.write(' (e 2) ');')
-    }
-  }
-  close _:void (stream:StorageOutputStream) {
-    templates {
-      java7 ( (e 1) '.close();')
-    }
-  }
-}

package/dist/lib/lib/Time.rgr

@@ -1,75 +0,0 @@
-
-; Date functions
-; https://cdnjs.cloudflare.com/ajax/libs/date-fns/1.29.0/date_fns.min.js
-
-systemclass SystemDate {
-  es6 Date
-}
-
-operator type:void es6 {
-  
-  fn to_date:SystemDate ( value:int ) ('new Date(' (e 1) ')')
-  fn to_date:SystemDate ( y:int m:int d:int) ('new Date(' (e 1) ', ' (e 2) ' - 1, ' (e 3) ')')
-  fn to_string:string (d:SystemDate) ( (e 1) '.toString()')
-  fn to_utc:int (d:SystemDate) ( (e 1) '.getTime()')
-  fn yyyy:int (d:SystemDate) ( (e 1) '.getFullYear()')
-  fn mm:int (d:SystemDate) ( '(' (e 1) '.getMonth() + 1)')
-  fn dd:int (d:SystemDate) ( (e 1) '.getDate()')
-
-  fn weekday:int (d:SystemDate) ( (e 1) '.getDay()')
-
-  fn month:int (d:int) ('(new Date(' (e 1) ')).getMonth() + 1')
-
-  fn day_step:int () ( '1000*60*60*24' )
-  fn week_step:int () ( '1000*60*60*24*7' )
-
-  fn monday:SystemDate (d:SystemDate) {
-    def day (weekday d)
-    if( day == 0 ) {
-      return (add_days d -6 )
-    }
-    return (add_days d ( -1 * (day - 1)) )
-  }
-
-  fn tuesday:SystemDate (d:SystemDate) {
-    return ( add_days (monday d) 1)
-  }
-
-  ; calculate the year and week from the date
-  fn year_week:[int] (d:SystemDate) ('((d)=>{
-      var d = new Date(Date.UTC(d.getFullYear(), d.getMonth(), d.getDate()))
-      d.setUTCDate(d.getUTCDate() + 4 - (d.getUTCDay()||7));
-      var yearStart = new Date(Date.UTC(d.getUTCFullYear(),0,1));
-      var weekNo = Math.ceil(( ( (d - yearStart) / 86400000) + 1)/7);
-      return [d.getUTCFullYear(), weekNo];
-    })('(e 1)') ')
-
-  fn ms:int (d:SystemDate) ( (e 1) '.getTime()')
-
-  fn clone:SystemDate (d:SystemDate) ( '(new Date(' (e 1) '.getTime())' )
-  fn add_days:SystemDate ( d:SystemDate value:int ) ( '(()=>{ var _=(new Date(' (e 1) '.getTime())); _.setDate(' (e 1) '.getDate() + ' (e 2) ');return _;})()')
-
-  fn to_ymd:string ( dd:SystemDate ) {
-    return ( (yyyy dd) + "-" + (mm dd) + "-" + (dd dd))
-  }
-}
-
-operator type:void all {
-  fn ymd_to_date@(throws):SystemDate (ymd:string) {
-    def parts (strsplit ymd '-')
-    if( (size parts) < 3) {
-      throw "Invalid date"
-    }
-    def yy 0 
-    def mm 0
-    def dd 0 
-    try {
-      yy  = (unwrap ( to_int (at parts 0)))
-      mm  = (unwrap ( to_int (at parts 1)))
-      dd  = (unwrap ( to_int (at parts 2)))
-    } {
-      throw "Invalid date format"
-    }
-    return (to_date yy mm dd)
-  }  
-}

package/dist/lib/lib/Timers.rgr

@@ -1,176 +0,0 @@
-; operators to get time from JavaScript
-systemclass TimeIntervalID {
-    es6 TimeInterval
-}
-systemclass TimeOutID {
-    es6 number
-    java7 Thread
-    swift3 setTimeoutClass
-    go '*r_go_timer'
-}
-operators {
-    clearInterval cmdClearInterval:void ( i:TimeIntervalID) {
-        templates {
-            es6 ("clearInterval( " (e 1) ")")
-        }
-    }
-    setInterval cmdInterval:TimeIntervalID (code:block ms:int) {
-        templates {
-            es6 ("setInterval( () => {" (block 1 ) "} , " (e 2) ")")
-        }
-    }
-    clearTimeout cmdClearInterval:void ( i:TimeOutID) {
-        templates {
-            es6 ("clearTimeout(" (e 1) ")")
-            java7 ( (e 1) ".interrupt();" nl)
-            swift3 ( (e 1) '.stop()' nl)
-            cpp ()
-            go ( (e 1) ".is_valid = false;" nl)
-        }
-    }
-
-    setTimeout cmdInterval:TimeOutID (ms:int code:block) {
-        templates {
-            go (
-                "r_setTimeout( " (e 1) ",  func() {" nl I (block 2) i nl " } )"
-                (imp "time")
-
-(create_polyfill '
-type r_go_timer struct { 
-  is_valid bool 
-}
-func r_setTimeout(  ms int64, cb func() () ) *r_go_timer {
-    o := new(r_go_timer)
-    o.is_valid = true
-    time.AfterFunc( time.Duration(ms)*time.Millisecond, func() () {
-        if o.is_valid {
-            cb() 
-        }   
-    })
-    return o
-} 
-') ) 
-            cpp ( 'setTimeout(' (e 1) ', [&](){' nl I (block 2) i nl '});' 
-    (imp '<future>')
-    (imp '<chrono>')
-    (imp '<thread>')
-(create_polyfill `
-
-void setTimeout(int milliseconds,std::function<void()> func)
-{   
-    std::async(std::launch::async,[=]()
-    {       
-        std::this_thread::sleep_for(std::chrono::milliseconds(milliseconds));        
-        func(); 
-    });
-};
-`)
-
-            )
-
-            test1_swift3 ( 'setTimeoutClass(ms: ' (e 1) ', callback: { () ->  Void in ' nl I  (block 2) i nl '})'
-            (imp "Foundation")
-(create_polyfill '
-class setTimeoutClass {
-  var cb : (() -> Void)?
-  init( ms:Int, callback : @escaping  (() -> Void) ) { 
-    self.cb = callback
-    self.cb!()
-  }
-  func call() {
-    self.cb!()
-  } 
-  func stop() {
-  }
-} 
-'    )
-
-            )
-
-
-            swift3 ( 'setTimeoutClass(ms: ' (e 1) ', callback: { () ->  Void in ' nl I  (block 2) i nl '})'
-            (imp "Foundation")
-(create_polyfill '
-class setTimeoutClass {
-  var timer = Timer()
-  var cb : (() -> Void)?
-	init( ms:Int, callback : @escaping  (() -> Void) ) { 
-    self.timer = Timer.scheduledTimer(timeInterval:(Double(ms)*0.001), target: self, selector: #selector(self.callMe), userInfo: nil, repeats: false)
-    self.cb = callback
-  }
-	@objc func callMe(t: Timer) {
-    self.cb!()
-  } 
-  func stop() {
-    self.timer.invalidate();
-  }
-} 
-'    )
-
-            )
-
-            es6 ("setTimeout( () => {" (block 2 ) "} , " (e 1) ")") ;"
-            rust (
-                "std::thread::spawn(move || {" nl I
-                "std::thread::sleep(std::time::Duration::from_millis(" (e 1) " as u64));" nl
-                (block 2)
-                i nl "});" nl
-            )
-            java7 (
-"__startThread(" 
-    "new Thread() {" nl I
-        "@Override" nl
-        "public void run() {" nl I
-            "try {" nl I
-                "Thread.sleep( (long) ( " (e 1) "));" nl
-                (block 2)
-                nl i
-            "} catch (Exception e) {" nl I
-                "System.err.println(e);" nl i
-            "}" nl i
-        "}" nl i
-    "}" nl
- ");"
-(create_polyfill
-"static Thread __startThread( Thread t) {
-    t.start();
-    return t;
-}"
-)
-            )
-
-            java7uisave (
-            "new Thread() {" nl I
-                "@Override" nl
-                "public void run() {" nl I
-                    "try {" nl I
-                        "Thread.sleep( (long) (1000 *" (e 1) "));" nl
-                        "getActivity().runOnUiThread(new Runnable(){" nl
-                            "@Override" nl
-                            "public void run() {" nl I                    
-                                (block 2)
-                            nl i "}"
-                            nl i 
-                        "});"
-                        nl i
-                    "} catch (Exception e) {" nl I
-                        "System.err.println(e);" nl i
-                    "}" nl i
-                "}" nl i
-            "}.start();" nl
-
-            )
-            
-        }
-    }
-    setTimeout cmdInterval:TimeOutID (code:block ms:int) {
-        templates {
-            es6 ("setTimeout( () => {" (block 1 ) "} , " (e 2) ")")
-        }
-    }
-    time_as_string cmdTime:string () {
-        templates {
-            es6 ("(new Date()).toString()")
-        }
-    }
-}

package/dist/lib/lib/TypedArrays.rgr

@@ -1,14 +0,0 @@
-systemclass RUint32Array {
-  es6 Uint32Array
-}
-
-systemclass Uint32 {
-  es6 Uint32
-}
-
-operator type:void es6 {
-  fn create_Uint32Array:RUint32Array (size:int) ('new Uint32Array(' (e 1) ')') 
-  fn at:Uint32 (buff:RUint32Array index:int) ( (e 1) '[' (e 2) ']')
-  fn to_int:int (value:Uint32) ( (e 1) )
-  fn to_hex_string:string (value:Uint32) ( (e 1) '.toString(16)' )
-}