aview-app 1.0.2

package/aardio/lib/console/int.aardio

@@ -0,0 +1,55 @@
+//int 中断
+import console;
+namespace console;
+
+class int{
+	ctor( onInterrupted,thrdOwner){
+		this.interrupted = ..thread.var();
+		this.delay = ..thread.var(,100);
+		
+		..console.setCtrlHandlerThread( function(ctrlType){ 
+			if(!owner) return; //主线程已结束
+			
+			var ret = true;
+			if(owner.onInterrupted){
+				ret = invoke(owner.onInterrupted,owner.thrdOwner,ctrlType);
+			} 
+
+			owner.interrupted.set(true);
+			sleep( owner.delay.get() );
+			return ret;
+		},,{ interrupted = this.interrupted;delay = this.delay;onInterrupted = onInterrupted;thrdOwner = thrdOwner} );
+	}; 
+	setDelay = function(ms){
+		this.delay.set(ms);
+	};
+	isInterrupted = function(){
+		return !!this.interrupted.get(); 
+	};
+	run = function(callback,...){
+		while(!this.isInterrupted()){
+			if( false === callback(...) ) return;
+		}	
+	};
+}
+
+..subscribe("beforeUnload",function(){
+	..thread.lock("console.ctrlHandler{C18CF52E-FC08-44C2-BE78-67959680F1AE}"
+		,function(){
+			var hwnd = ..console.getWindow();
+			if( hwnd && ::User32.IsWindowVisible(hwnd)){
+				..console.pause();
+				..io.close();
+			}	
+		}  
+	) 	
+} );
+ 
+/**intellisense()
+console.int = 用于注册控制台中断信号触发器。\n导入此库会自动导入 console 库，并且退出线程时如果控制台\n仍在显示，则自动调用 console.pause 函数
+console.int(ctrlHandler,owner) = @.int(\n	function(ctrlType){\n		__/*控制台退出前是否触发此线程函数。\n可选用 @owner 指定线程函数的 owner 参数。\n\n使用前请先阅读多线程入门教程，了解线程函数基本规则。\n\nctrlType 为 null 表示控制台正常关闭，不可取消。\nctrlType 为 0 表示按下 Ctrl+ C。\nctrlType 为 1 表示按下 Ctrl + Break。\nctrlType 为 0 或 1 时返回 true 可阻止控制台退出。\n省略此函数时，则创建默认触发器并返回 true。\n\n在此函数内不应再使用任何控制台函数*/\n	}\n);	
+console.int() = !consoleInt.
+!consoleInt.isInterrupted() = 控制台是否已收到中断信号。\n按 Ctrl + C ，Ctrl + Break 以后，无论是否阻止退出都会返回 true
+!consoleInt.setDelay(__) = 参数 @1 指定控制台程序退出前的默认延迟，以毫秒为单位\n\n如果直接关闭窗口，\n触发器可以拦截但无法阻止关闭。\n增加延迟可增加控制台程序退出前的等待时间\n延迟之前先设置中断状态，也不会阻止当前线程向下执行
+!consoleInt.run(callback) = @.run(\n	function(){\n		__/*如果控制台程序未退出，未按下 Ctrl + C，\n则重复执行此回调函数，函数返回 false 退出循环。\n\n此函数可接收 run 函数除参数 @1 以外的余下参数 */\n	}	\n)
+end intellisense**/

package/aardio/lib/console/progress.aardio

@@ -0,0 +1,141 @@
+//progress 进度条
+import console;
+
+class console.progress{
+	ctor(backText,foreText){
+		this.backTextColor = ..console.color.darkGray;
+		this.foreTextColor = ..console.color.yellow;
+		this.doneColor = ..console.color.green;
+		this.doneText = "Done!";
+		this.backText = backText : "─";
+		this.foreText = foreText : backText : "─"; 
+		this.percent = 0;
+		this.done = false;
+	};
+	addProgress = function(percent,msg){
+		return this.setProgress(this.percent+percent,msg);
+	};
+	setProgress = function(percent,msg){
+		
+		if(!this.running || !..console.getWindow() || ..console.isCursorVisible() ){
+			..console.open();
+			..console.setCursorVisible(false);
+			this.running = true;
+		}
+		elseif(this.running) {
+			if(this.done) return;
+			
+			var x,y = ..console.getPos(); 
+			..console.setPos(0,y-1); 
+			if(this.message){ ..console.setPos(0,y-2); }
+		}
+		 
+		var width = this.width;
+		if(!width) width = ..console.getSize() - 2;
+		
+		if( percent > 100 ) percent = 100;
+		if( percent < 0 ) percent = 0;
+		if(percent){
+			if(this.percent === percent){return;}
+			
+			var foreTextColor = percent>=100 ? this.doneColor : this.foreTextColor;
+			
+			var line = '\r' + this.foreText:"─"
+			..console.writeColorText(line,foreTextColor,this.foreColor); 
+			
+			var x,y = ..console.getPos();
+			var len = ..math.floor( (width/100*percent) / x )-1;
+			if(len>0){
+				line = ..string.repeat(len,this.foreText:"─");
+				..console.writeColorText(line,foreTextColor,this.foreColor); 
+			} 
+		}
+		this.percent = percent;
+		
+		var x,y = ..console.getPos();
+		if( (percent <100 ) && width>x ){
+			width = width - x;
+			var line = this.backText:"─"
+			..console.writeColorText(line,this.backTextColor,this.backColor); 
+			
+			var x2,y = ..console.getPos();
+			var len = ..math.floor( width / (x2-x) ) - 1;
+			
+			if(len>0){
+				line = ..string.repeat(len,this.backText:"─");
+				..console.writeColorText(line,this.backTextColor,this.backColor); 
+			} 
+		}
+		
+		if((percent>=100) && this.doneText && (this.message != this.doneText)){
+			msg = this.doneText;
+		}
+		
+		var x,y = ..console.getPos();
+		if(this.singleLine){
+			if(msg){
+				this.message = msg;
+				..console.writeText(" ",msg);
+				..console.eraseToEndOfLine(); 
+			}
+			..console.setPos(0,y+1);	
+		}
+		else { 
+			..console.setPos(0,y+1);
+			if(msg){
+				this.message = msg;
+				..console.writeText(msg);
+				..console.eraseToEndOfLine(); 
+			}
+				
+			if(this.message) {
+				..console.setPos(0,y+2);
+			}
+		}
+		this.running = true;
+		
+		if(percent>=100){
+			..console.setCursorVisible(true);
+			this.done = true;
+		}
+	}
+	reset = function(){
+		..console.setCursorVisible(true);
+		this.running = false;
+		this.done = false;
+	}
+}
+
+console.progress.singleLine = function(width,backText,foreText){
+	var bar = console.progress("█","█");
+	bar.width = width : 30;
+	bar.singleLine = true;
+	return bar;
+}
+
+
+/**intellisense()
+console.progress = 控制台简单进度条
+console.progress( = 创建控制台简单进度条
+console.progress(.(背景字符,前景字符) = 所有参数可选，默认值都设为"─"字符
+console.progress.singleLine( = 创建控制台简单进度条,\n进度条与文本显示在同一行
+console.progress.singleLine(.(宽度,背景字符,前景字符) = 所有参数可选，默认值都设为"─"字符
+console.progress.singleLine(） = !stdConsoleProgress.
+console.progress() = !stdConsoleProgress.
+end intellisense**/
+
+/**intellisense(!stdConsoleProgress)
+reset() = 重置进度条\n如果上次进度没有完成,\n要显示新的进度条前必须调用此函数
+addProgress( = 增加进度
+addProgress(.(百分比,状态文本) = 百分比为0到100的数值，状态文本为可选参数
+setProgress( = 设置进度
+setProgress(.(百分比,状态文本) = 百分比为0到100的数值，状态文本为可选参数
+backText = 背景字符，默认为"─"\n可以为空格，但不能为空字符串
+foreText = 前景字符，默认为"─"\n可以为空格，但不能为空字符串
+backTextColor = 背景字符颜色,\n请使用console.color下面的值指定
+foreTextColor = 前景字符颜色,\n请使用console.color下面的值指定
+backColor = 背景颜色,\n请使用console.color下面的值指定
+foreColor = 前景颜色,\n请使用console.color下面的值指定
+doneColor = 进度完成后的字符颜色,\n请使用console.color下面的值指定
+doneText = 进度完成后的显示文本
+end intellisense**/

package/aardio/lib/console/wine.aardio

@@ -0,0 +1,393 @@
+//wine 简单控制台
+
+import win.ui;
+import web.json;
+
+namespace console.wine{};
+
+namespace console;
+
+getWindow = function(){
+    if(!self.form){
+    	self.form = ..thread.get("console.wine.form");
+    };
+    
+	if( self.form ){
+		if( ..win.isWindow(self.form.hwnd) ){
+			return self.form.hwnd;
+		}
+		
+		self.form = null;
+		..thread.set("console.wine.form",null)
+	}
+}
+
+open = function(){
+	return ..thread.lock("std.console.wine.open",__open)
+}
+
+__open = function(){
+	
+	if( getWindow() ){
+		self.form.show();
+		return self.form;
+	}
+	self.form = null;
+	
+	
+	..thread.invoke( 
+		function(){
+			import win.ui;
+			import win.ui.ctrl.edit;
+			var winform = win.form(text=..io._exefile;right=934;bottom=821)
+			winform.add(
+			edit={cls="edit";left=0;top=0;right=935;bottom=822;bgcolor=0;color=15793151;db=1;dl=1;dr=1;dt=1;edge=1;hscroll=1;multiline=1;vscroll=1;z=1}
+			)
+			
+			winform.getch = function(){ 
+				
+    			winform.edit.lastInputChar = null;
+    			winform.edit.wndproc = { 
+					[0x102/*_WM_CHAR*/] =function(hwnd,message,wParam,lParam){
+						 
+						if( message == 0x102/*_WM_CHAR*/ ){
+							owner.lastInputChar = wParam;
+							return 0;
+						}
+					}
+				}
+				
+				win.wait( lambda() winform.edit.lastInputChar, winform.hwnd); 
+				
+				winform.edit.wndproc = { 
+					[0x102/*_WM_CHAR*/] =function(hwnd,message,wParam,lParam){}
+				}
+				return winform.edit.lastInputChar;
+			}
+			
+			winform.getche = function(mask){
+				var c = ..string.pack( winform.getch() );
+				
+				winform.edit.appendText( c == '\r'?'\r\n':(mask:c) );
+				return c;
+			}
+			
+			winform.edit.defaultTranslateAccelerator = function(msg){ 
+				if( msg.message == 0x100/*_WM_KEYDOWN*/) {
+					var vk = msg.wParam;  
+					if( vk == 0xD/*_VK_RETURN*/ ){
+						if(!winform.lastInputStart) return;
+						
+						var b = winform.edit.getsel();
+						var a = winform.lastInputStart;
+						if( a < b) {
+							winform.edit.setsel(a+1,b);
+							winform.lastInputLine = winform.edit.selText;
+							winform.edit.setsel(b);
+						}
+					}
+					elseif( vk == 0x8/*_VK_BACK*/ ){
+						if(!winform.lastInputStart) return;
+						
+						var b = winform.edit.getsel();
+						var a = winform.lastInputStart;
+						if( b <= a ) return true;
+					}
+						
+				}	
+			}
+			
+			winform.getInputText = function(){
+				winform.lastInputLine = null;
+				winform.edit.setFocus();
+				winform.lastInputStart = winform.edit.getsel();
+				..win.wait( function(){
+					return winform.lastInputLine;
+				},winform.hwnd);
+				
+				winform.lastInputStart = null;
+				return winform.lastInputLine;
+			}
+			
+			winform.onCancel = function(){}	
+			winform.onOk = function(){}
+			
+			..thread.set("console.wine.form",winform)
+			winform.edit.setFocus();
+			win.loopMessage();
+			
+			import process;
+			process().terminate();
+		},listener
+	)
+	
+	..win.wait(lambda()..thread.get("console.wine.form"));
+	self.form = ..thread.get("console.wine.form");
+	
+	self.form.show();
+	return self.form;
+	
+}
+
+getch = function(){
+	return open().getch();
+}
+
+getche = function(mask){
+	return open().getche(mask);
+}
+
+getPassword = function(mask="*"){
+    
+    var s = {};
+    var c = getche(mask)
+    while( c != '\r' ){
+        ..table.push( s,c);
+        c = getche( mask )
+    } 
+    return ..string.join(s)
+}
+
+var moreLines = 1;
+more = function(count){
+	count = count : 1;
+	moreLines = moreLines % count;
+	if(!moreLines){
+		pause(,langMore,"---------- More -----------");
+	}
+	moreLines++;
+};
+
+askYesNo  = function(title){
+    log( "[Y/N] " + (title : langYesNo) )
+ 	var vk = getch();
+
+	if( vk == 'Y'#){
+		return true;
+	}
+	elseif( vk ==  'N'#){
+		return false;
+	}
+}
+
+pause = function(close,msg,erase){ 
+	open(); 
+	if( msg ){
+		msg = ..string.toUnicode(msg);
+		if( erase ){
+			erase = ..string.toUnicode(erase);
+			if( #erase < #msg ) erase = erase + ..string.repeat((#msg-#erase)/2 ," ");
+		}
+		else erase = msg;
+	}
+	msg := langPause; 
+	
+	var a = self.form.edit.getsel();
+	writeText( msg );
+	var b = self.form.edit.getsel();
+	
+	var vk = getch();
+	
+	if(#erase) {
+		if( b > a ){
+			self.form.edit.setsel(a,b);
+			self.form.edit.selText = "";
+		}
+	}
+	else {
+		writeText('\r\n'); 
+	}
+	
+	if(close) self.close();
+	return chr;
+}
+
+logPause = function(...){
+	log(...);
+	pause();
+}
+
+fullscreen = function(){
+	open().form.fullscreen(); 
+}
+
+writeText = function(s,...){
+    s = tostring(s);
+    if( (!..string.isUtf8(s)) && (!..string.isUnicode(s)) ){
+		..string.setUtf(s,1);
+	}
+	open().edit.appendText(s,...)
+}
+
+print = function(s,...){ 
+    s = tostring(s);
+    if( (!..string.isUtf8(s)) && (!..string.isUnicode(s)) ){
+		..string.setUtf(s,1);
+	}	
+	
+	open().edit.print(s,...)
+} 
+
+log = print;
+
+showLoading = function(msg,dots){
+    log(msg);
+    return;
+}
+
+printf = function(s,...){ 
+    s = tostring(s);
+    if( (!..string.isUtf8(s)) && (!..string.isUnicode(s)) ){
+		..string.setUtf(s,1);
+	}	
+	
+	open().edit.printf(s,...)
+} 
+
+hex = function(s){
+	print( ..string.hex(s," ") )
+}
+
+hex = function(s){
+	print( ..string.hex(s," ") )
+}
+
+writeBack = function( s,... ){
+	if( ... !== null  ) s = ..string.toUnicode( ..string.format(s,... ) );
+	writeText( ..string.repeat(#s/2,'\b') );
+	writeText( s );
+}
+
+debug = function(...){
+	if( _STUDIO_INVOKED ) writeText(...);
+}
+
+dump = function(v,...){
+	open();
+	
+	if( type(v) == type.table ) {
+		if(..com && ..com.IsObject(v)){
+			writeText( ..com.DumpTypeInfo(v) )
+		}
+		
+		writeText( ..table.tostring(v) )
+	}
+	else writeText( (tostring(v) ) ) 
+
+	if(...===null ){
+		writeText('\r\n');
+		return;
+	}
+	writeText('\t')
+	return dump(...);
+} 
+
+setTitle = function(title){
+	open().text = title;
+}
+
+getTitle = function(){
+	return open().text; 
+}
+
+getText = function(s){
+	if( s ) writeText( s );
+	return  open().getInputText() ;	 
+}
+
+getNumber = function( s,len ){
+	var n;
+	while( 
+	    var _;
+	    n = tonumber( getText(s),10 );
+	    n === null
+	) { 
+		if( !getWindow()) break ;
+		s = langInvalidNumber ;
+	}
+	return n;
+}
+
+dumpJson = function(v){ 
+	log( ..web.json.stringify(v,true,false) );
+}
+ 
+varDump = function(...){
+	open();
+    var args = {...};
+    var b,e = ..table.range(args);
+    for(i=b;e){
+    	var arg = args[i];
+    	var t = type(arg);
+    	print("参数位置:" ++ i);
+    	print("数据类型:" ++ t);
+    	if( t != type.table ){
+    		print("变量值:" ++ tostring(arg),'\r\n');
+    	}
+    	else { 
+    		print("变量值: {" ); 
+    		
+    		var logged = { _struct = 1 };
+    		for k,v in ..table.eachName(arg){
+    			logged[k] = true;
+    			writeText('    ', k,' = ',tostring(v) ,'\r\n');     
+    		}
+    		for(i=1;#arg;1){
+    			logged[i] = true; 
+    			writeText('    [', i,'] = ',tostring(arg[i]) ,'\r\n'); 
+    		}
+    		for(k,v in arg){
+    			if( !logged[k] ){
+    				writeText('    [', tostring(k),'] = ',tostring(v) ,'\r\n'); 
+    			} 
+    		}
+    		 
+            print('}');
+            
+            if(#arg){
+            	print("序列数组长度:",#arg);
+            }
+            if(arg[["_struct"]]){
+            	try{
+            		print("结构体大小:",..raw.sizeof(arg) );
+            	}
+            	catch(e){
+            		print("结构体大小:未知(包含动态数组)");
+            	}
+            }
+            print('\r\n');
+    	}  
+    } 
+}
+
+close = function(){
+	if( getWindow() ){ 
+		self.form.show(false);
+	}
+}
+
+begin
+	var lcid = ::Kernel32.GetUserDefaultLangID();
+	if( lcid==0x404/*zh-TW*/ || lcid == 0x0C04/*zh-HK*/ || lcid == 0x1404/*zh-MO*/ ){
+		langMore = "--- 請按任意鍵顯示更多 ---";
+		langPause = "請按任意鍵繼續 ... ";
+		langYesNo =  "按 Y 鍵繼續,按 N 鍵取消";
+		langInvalidNumber = "請重新輸入有效的數值: ";
+	}
+	elseif( lcid==0x804/*zh-CN*/ || lcid!==0x1004/*zh-SG*/ ){
+		langMore = "--- 请按任意键显示更多 ---";
+		langPause = "请按任意键继续 ... ";
+		langYesNo =  "按 Y 键继续,按 N 键取消";
+		langInvalidNumber = "请重新输入有效的数值: ";
+	}
+	else {
+		langMore = "--- Press any key to read more ---";
+		langPause = "Press any key to continue . . .";
+		langYesNo =  "Do you want to continue?";
+		langInvalidNumber = "Please enter a valid number.";
+	}  
+end;
+
+/**intellisense()
+console.wine = console.wine 模拟了部分 console 的函数\n用于在 Wine 环境下创建简单的控制台窗口\n不支持标准输入输出流
+end intellisense**/

package/aardio/lib/coroutine/_.aardio

@@ -0,0 +1,46 @@
+namespace coroutine;
+ 
+main = function(){} 
+current = main
+
+run = function(func,...){
+	main = func
+	current = main
+	main(...);
+}
+
+create = function(f){
+	var task = ..fiber.create(
+		function(...){
+			return null,f(...)
+		}
+	)
+	return function(...){
+		return rget(2,assert(..fiber.resume (task,...) )  ) 
+	} 
+} 
+  
+var tright = ..table.right;
+transfer = function(work,...){ 
+	if( current != main ) { 
+		return ..fiber.yield(work : main,...)
+	}
+	else{
+		var arg = { (work : main) ;...}
+		while(work){
+			current = work
+			if work == main { 
+				return tright(arg,-2) 
+			} 
+			arg = { work( tright(arg,-2) ) } 
+			work = arg[1];
+		}  
+	}
+}
+ 
+/**intellisense(coroutine)
+main = 主函数
+create.(__/*启动函数*/) = 创建协程
+transfer(__/*协程对象*/,) = 把控制权及附加的不定个参数分派给协程对象\n省略参数@1则切换到主函数
+run(__/*主函数*/, ) = 将函数设为协程主函数,并启动协同程序.\n可在此传入不定个参数给主函数
+end intellisense**/