aview-app 1.0.2

package/aardio/lib/inet/adapterInfo.aardio

@@ -0,0 +1,180 @@
+//adapterInfo 适配器配置
+import wsock;
+namespace inet.adapterInfo;
+
+::IpHlpApi := ..raw.loadDll("IPHlpApi.dll")
+GetAdaptersAddresses = ::IpHlpApi.api("GetAdaptersAddresses","int(INT family,INT flags,ptr reserved,pointer adpAddresses,INT& size)")
+
+class IP_ADAPTER_ADDRESS{
+    INT cbSize;
+    INT flags; 
+    ptr next;
+    struct address = {
+    	ptr lpSockaddr;
+    	INT length;
+    }
+    
+	Next = function(){
+		if( owner.next ){
+			var addr = IP_ADAPTER_ADDRESS();
+			 ..raw.convert(owner.next,addr); 
+			return addr,tostring(addr);
+		}
+	};
+	each = function(){
+		return function(cur){
+			if( !cur ) return owner,tostring(owner);
+			return cur.Next(); 
+		},owner
+	};
+	
+	@_meta; 
+}
+
+IP_ADAPTER_ADDRESS. _meta = {
+    _tostring = function(){
+    	return ..wsock.sockaddrStringify(owner.address.lpSockaddr,owner.address.length);
+    } 
+} 
+IP_ADAPTER_ADDRESS.IP_ADAPTER_ADDRESS = IP_ADAPTER_ADDRESS; 
+
+class IP_ADAPTER_ADDRESSES {
+  INT cbSize;
+  INT ifIndex;
+  ptr next;
+  string adapterName;
+  ptr firstUnicastAddress;
+  ptr firstAnycastAddress;
+  ptr firstMulticastAddress;
+  ptr firstDnsServerAddress;
+  ustring dnsSuffix;
+  ustring description;
+  ustring netConnectionId;
+  BYTE physicalAddress[8];
+  INT physicalAddressLength;
+  INT flags;
+  INT mtu;
+  INT ifType;
+  INT operStatus;
+  INT ipv6IfIndex;
+  INT zoneIndices[16];
+  ptr firstPrefix;  
+  @_meta;
+}  
+
+IP_ADAPTER_ADDRESSES._meta = {
+	_get = {
+  		eachUnicastAddress = function(){
+  			if(!owner.firstUnicastAddress) return function(){};
+  			if(!owner.unicastAddress) owner.unicastAddress = ..raw.convert(owner.firstUnicastAddress,IP_ADAPTER_ADDRESS())
+  			return owner.unicastAddress.each();
+  		};
+  		eachAnycastAddress = function(){
+  			if(!owner.firstAnycastAddress) return function(){};
+  			if(!owner.anycastAddress) owner.anycastAddress = ..raw.convert(owner.firstAnycastAddress,IP_ADAPTER_ADDRESS())
+  			return owner.anycastAddress.each();
+  		};
+  		eachMulticastAddress = function(){
+  			if(!owner.firstMulticastAddress) return function(){};
+  			if(!owner.multicastAddress) owner.multicastAddress = ..raw.convert(owner.firstMulticastAddress,IP_ADAPTER_ADDRESS())
+  			return owner.multicastAddress.each();
+  		};
+  		eachDnsServerAddress = function(){
+  			if(!owner.firstDnsServerAddress) return function(){};
+  			if(!owner.dnsServerAddress) owner.dnsServerAddress = ..raw.convert(owner.firstDnsServerAddress,IP_ADAPTER_ADDRESS())
+  			return owner.dnsServerAddress.each();
+  		};	
+	}
+}
+
+//迭代遍历所有网卡
+each = function(family,flags){
+	if(family===null) family = 0/*_AF_UNSPEC*/;
+	if(flags===null) flags = 0x10/*_GAA_FLAG_INCLUDE_PREFIX*/;
+	
+	var ret,size = GetAdaptersAddresses(family,flags,,,0 );
+	if( ret != 111/*_ERROR_BUFFER_OVERFLOW*/ ) return function(){ };
+
+	var pBuf = ..raw.buffer( size );
+	ret = GetAdaptersAddresses(family,flags,,pBuf,size )
+	if( ret  ) error(..string.format("GetAdaptersAddresses Faild! errCode:%0d",ret) ,2  )
+ 
+	var ptr =  pBuf; 
+	
+	return function(){ 
+		if( !ptr){
+			pBuf = null;
+			return null;
+		}
+		
+		var info = IP_ADAPTER_ADDRESSES();
+		..raw.convert(ptr,info);
+		 
+		if(info.physicalAddressLength==6){ 
+			info.mac =  ..string.format("%02X-%02X-%02X-%02X-%02X-%02X",..string.unpack(info.physicalAddress));  
+		}  
+		
+		info.operStatusUp = !!(info.operStatus&1) 
+		info.ifTypeLoopback = info.ifType==24;
+	    info.ifTypeWireless = info.ifType==71;
+	 
+		ptr = info.next; 
+		return info; 
+	};
+}
+
+get = function(name){
+	for adpt in each(){
+		if(adpt.adapterName == name){
+			return adpt;
+		} 
+	} 
+}
+
+/**intellisense()
+inet.adapterInfo = 用于获取网络适配器与配置信息（不含禁用的网卡）。\n比 inet.adapter 获取到的信息更多一些。\nsys.networkCards 则用于获取网卡硬件信息（含禁用网卡）。\n\n可使用 com.wmi 查询 Win32_NetworkAdapter 得到网卡信息,\n com.wmi 查询 Win32_NetworkAdapterConfiguration 得到网络适配器连接配置
+inet.adapterInfo.each(family,flags) =  @//遍历所有连接\nfor adapterInfo in inet.adapterInfo.each() { \n	__/*adapterInfo 为包含网络适配器与 IP 配置信息的结构体*/\n} 
+inet.adapterInfo.each() = !net_adapterAddress.
+inet.adapterInfo.get( = 查找并返回网络适配器与配置信息
+inet.adapterInfo.get(.(adapterName) = 查找并返回网络适配器与配置信息。\n@adapterName 用字符串指定 GUID 格式适配器
+inet.adapterInfo.get() = !net_adapterAddress.
+end intellisense**/
+
+/**intellisense(!net_adapterAddress)
+adapterName = 适配器名称， GUID 格式。\n用 netConnectionId 字段可以获取显示名称\n\nadapterName 是永久性的，用户无法修改。\nnetConnectionId 则可以改动
+netConnectionId = 连接友好名称，\n也就是控制面板里显示的网络连接名
+address  = MAC地址,数值格式
+description = 连接描述
+dnsSuffix = DNS 后缀名
+flags = 数值表示的设置选项
+ifType = 适配器类型
+operStatus = 由多个表示不同网卡操作状态的数值按位或得到的值 ）
+operStatusUp = 网卡为可用的活动状态
+ifTypeLoopback = 适配器类型为软件实现的回环网卡
+ifTypeWireless = 适配器类型为无线网卡
+ifIndex = 网卡索引
+ipv6IfIndex = IPv6 网卡索引
+mtu = 最大传输单元大小
+mac = MAC地址,文本格式
+eachUnicastAddress() = @for addr,strAddr in ??.eachUnicastAddress(){
+	__/*遍历单播地址，strAddr 为字符串格式 IP 地址。\naddr 为当前 IP_ADAPTER_ADDRESS 结构体，不用管。*/
+}
+eachAnycastAddress() = @for addr,strAddr in ??.eachAnycastAddress(){
+	__/*遍历任播地址，strAddr 为字符串格式 IP 地址。\naddr 为当前 IP_ADAPTER_ADDRESS 结构体，不用管。*/
+}
+eachMulticastAddress() = @for addr,strAddr in ??.eachMulticastAddress(){
+	__/*遍历多播地址，strAddr 为字符串格式 IP 地址。\naddr 为当前 IP_ADAPTER_ADDRESS 结构体，不用管。*/
+}
+eachDnsServerAddress() = @for addr,strAddr in ??.eachDnsServerAddress(){
+	__/*遍历 DNS 服务器地址，strAddr 为字符串格式 IP 地址。\naddr 为当前 IP_ADAPTER_ADDRESS 结构体，不用管。*/
+}
+end intellisense**/
+
+/**details(参考文档)
+inet.adapterInfo.each(family,flags) 返回的为 IP_ADAPTER_ADDRESSES 结构体。
+
+关于 family,flags 参数的用法与 IP_ADAPTER_ADDRESSES 结构体的详细说明请参考：
+https://learn.microsoft.com/en-us/windows/win32/api/iptypes/ns-iptypes-ip_adapter_addresses_lh
+
+结构体字段首字母在 aardio 中需要改为小写。
+end details**/

package/aardio/lib/inet/conn.aardio

@@ -0,0 +1,80 @@
+//conn 连接设置
+import inet;
+namespace inet.conn;
+
+class INTERNET_PER_CONN_OPTION {
+    INT option; 
+    union value = {
+		INT number;
+		ustring str;
+		struct fileTime =::FILETIME() 
+    }
+} 
+ 
+class INTERNET_PER_CONN_OPTION_LIST {
+    INT size;
+    ustring connection;
+    INT optionCount;
+    INT optionError; 
+    pointer options;
+} 
+
+setProxy = function(conn,proxy,proxyBypass){ 
+    if(!proxyBypass){
+    	proxyBypass="<local>;<lan>;localhost;127.*;windows10.microdone.cn"
+    }
+    proxyBypass = ..string.replace(proxyBypass,"%\<\>",{
+		["<lan>"]  ="10.*;172.16.*;172.17.*;172.18.*;172.19.*;172.20.*;172.21.*;172.22.*;172.23.*;172.24.*;172.25.*;172.26.*;172.27.*;172.28.*;172.29.*;172.30.*;172.31.*;192.168.*"
+    })
+ 
+    list = INTERNET_PER_CONN_OPTION_LIST();
+    if(#conn)list.connection = conn;  
+    
+	var options = { 
+		INTERNET_PER_CONN_OPTION(); 
+		INTERNET_PER_CONN_OPTION(); 
+		INTERNET_PER_CONN_OPTION(); 
+	}
+
+    options[1].option = 1/*_INTERNET_PER_CONN_FLAGS*/;
+    if(#proxy){
+        if(proxyBypass=="<pac>"){
+    		list.optionCount = 2; 
+    		options[1].value.number = 4/*_PROXY_TYPE_AUTO_PROXY_URL*/ | 0x1/*_PROXY_TYPE_DIRECT*/;
+    		options[2].option = 4/*_INTERNET_PER_CONN_AUTOCONFIG_URL*/;
+    		options[2].value.str = proxy; 
+        }
+        else {
+    		list.optionCount = 3; 
+    		options[1].value.number = 2/*_PROXY_TYPE_PROXY*/;
+    		options[2].option = 2/*_INTERNET_PER_CONN_PROXY_SERVER*/;
+    		options[2].value.str = proxy;//"http://proxy:80";
+   			options[3].option = 3/*_INTERNET_PER_CONN_PROXY_BYPASS*/;
+    		options[3].value.str = proxyBypass;     
+        }
+    }
+	else {
+		list.optionCount = 1;
+		options[1].value.number = 1/*_PROXY_TYPE_DIRECT*/;
+	} 
+	list.options = ..raw.buffer( {struct options[]=options}  );
+	list.size = ..raw.sizeof( list );
+
+    var ret = ::InternetSetOption( ,0x4B/*_INTERNET_OPTION_PER_CONNECTION_OPTION*/,list,..raw.sizeof(list) );
+    ::InternetSetOptionPtr( , 39/*_INTERNET_OPTION_SETTINGS_CHANGED*/, , 0);
+    ::InternetSetOptionPtr( , 37/*_INTERNET_OPTION_REFRESH*/ , , 0);
+ 	return ret; 
+ };
+ 
+ setProxyAutoConfig = function(conn,url){ 
+ 	return setProxy(conn,url,"<pac>"); 
+ };
+ 
+/**intellisense(inet.conn)
+setProxy( = 为指定连接设置代理\n如果要设置拔号连接代理，请使用 inet.ras.setProxy 函数\n设置进程内代理请使用 inet.setProxy 函数
+setProxy(.() = 默认连接不使用代理
+setProxy(.("连接名") = 指定连接不使用代理
+setProxy(.("连接名","SOCKS=代理服务器地址:端口","绕过代理地址") = 省略连接名表示默认连接,\n设置SOCKS4代理服务器,不支持登录\n绕过代理地址可在域名或IP中使用通配符,多个以分号分隔
+setProxy(.("连接名","被代理协议=代理协议://主机地址:端口号","绕过代理地址") = 省略连接名表示默认连接,\n参数@2可以直接写代理服务器域名或IP,\n省略被代理协议相当于指定所有协议走相同的代理服务器，\n省略协议则默认为HTTP,省略端口则默认为80,\n绕过代理地址可在域名或IP中使用通配符*,多个地址以分号分隔,默认值为"<local>;<lan>"
+setProxyAutoConfig(.("连接名", "HTTP://主机地址:端口号") = 为指定连接设置自动配置代理（PAC）地址，\n省略连接名表示默认连接
+end intellisense**/

package/aardio/lib/inet/connView.aardio

@@ -0,0 +1,22 @@
+//connView 连接视图
+import web.form;
+namespace inet;
+
+class connView{
+	ctor(winform){ 
+		this = ..web.form( winform,5/*_UIFLAG_DIALOG*/);
+		this.goDirectory("shell:::{7007ACC7-3202-11D1-AAD2-00805FC1270E}")
+		this.document.currentViewMode = 1;
+		
+		if(!_WINXP){
+			this.document.FolderFlags = this.document.FolderFlags | 0x800000/*FWF_NOCOLUMNHEADER*/
+		}
+	};
+}
+
+/**intellisense()
+inet.connView = 网络连接视图
+inet.connView( = 创建网络连接视图,\n支持 shellFolderSelectionChanged 事件
+inet.connView(.(winform) = 参数指定窗口或控件对象,返回 web.form 对象
+inet.connView() = !wb.
+end intellisense**/

package/aardio/lib/inet/downBox.aardio

@@ -0,0 +1,247 @@
+//downBox 下载对话框
+
+import fsys;
+import inet.httpFile;
+import win.ui;
+import win.ui.ctrl.plus; 
+import win.ui.ctrl.static;
+import win.ui.ctrl.bk;
+
+namespace inet; 
+
+class  downBox{
+	ctor(...){
+		this = ..win._form(text="正在下载.....";right=504;bottom=155;border="none";max=false;min=false;mode="popup";parent=...)
+		this.add(
+		bk={cls="bk";left=0;top=0;right=505;bottom=27;bgcolor=16777215;forecolor=8421504;linearGradient=0;z=4};
+		caption={cls="static";text="正在下载.....";left=21;top=5;right=355;bottom=21;transparent=1;z=5};
+		labInfo={cls="plus";left=21;top=44;right=465;bottom=65;align="left";z=3};
+		labProgress={cls="static";text="正在连接......";left=21;top=107;right=465;bottom=128;notify=1;transparent=1;z=2};
+		progress={cls="plus";left=21;top=69;right=486;bottom=96;align="right";bgcolor=6447459;forecolor=9959653;hide=1;iconColor=10409;notify=1;textPadding={right=15};z=1}
+		)
+	
+		this.wndproc = {
+			[ 0xC/*_WM_SETTEXT*/ ] = function (hwnd, uMsg, wParam, lParam) {
+				if(lParam){
+					this.caption.text = ..string.fromUnicode( topointer(lParam),,true ); 
+				}
+			}
+		}
+		
+		..win.ui.simpleWindow2(this);
+		
+		this.parent,this.text,this.closeTimeout = ...
+		if(# this.text)this.caption.text = this.text;
+		if( this.closeTimeout ? type( this.closeTimeout ) != type.number ) this.closeTimeout = 1000;
+	};  
+	test = function(url,path,cfg,... ){
+		if( type(url) != type.string ) return null;
+		if( type(path) != type.string ) return null;
+		
+		..fsys.createParentDir(path);
+		var remoteFile = ..inet.httpFile(url,path,cfg,... );
+		var ok = remoteFile.test();
+		this.statusCode = remoteFile.statusCode; 
+		this.contentLength = remoteFile.contentLength;
+		this.modified = remoteFile.modified;
+		return ok;
+	};
+	download = function(url,path,cfg,userAgent,proxy,proxyBypass,flags){ 
+		if( type(url) != type.string && type(url)!=type.function ) error("参数@1错误",2);
+		if( type(path) != type.string ) error("参数@2错误",2);
+		this.complete = false;
+			
+		this.onInitDialog = function(hwnd,message,wParam,lParam) { 
+			this.show();
+			
+			..thread.invoke(downloadThread,this,url,path,cfg,userAgent:this.userAgent,proxy,proxyBypass,flags) 
+		}
+		return this.doModal();
+	};
+	removeResumeFile = function(){
+		if(this.resumePath){
+			..io.remove(this.resumePath);
+			this.resumePath = null;
+		}
+	};
+	onError = function(err){
+		this.labProgress.text = err;
+		this.progress.iconText = "";
+	};
+	onComplete = function(info){
+		this.labInfo.text = info;
+		this.progress.iconText = "";
+	};
+	onStatusChange = function(txt){
+		this.labProgress.text = txt;	
+	};
+	onReceiveBegin = function(contentLength,progresRange){
+		if(contentLength){
+			this.labProgress.text = "文件大小: " + ..fsys.formatSize(contentLength);
+		}
+		else {
+			this.labProgress.text = "文件大小: 未知"
+		}
+		
+		//初始化进度条
+		this.progress.setProgressRange(0,progresRange);
+		this.progress.progressPos = 0;
+		this.progress.hide = false; 
+	}
+	onReceive = function(totalDownSize,progressPos,sizePs){
+		this.labInfo.text = "下载大小: " + ..fsys.formatSize(totalDownSize)
+			+ " 下载速度：" + ..math.size64(sizePs).format() + "/s";
+			
+		this.progress.progressPos = progressPos;  
+	};
+} 
+
+namespace downBox{ 
+	import win;
+	import win.ui;   
+	import win.ui.simpleWindow2;
+	
+	downloadThread = function(this,url,path,cfg,userAgent,proxy,proxyBypass,flags){
+		import fsys;
+		import inet.httpFile;
+		
+		if( !path ){
+			return this.onError("存储路径不能为空")
+		}
+		
+		if(type(url)==type.function){
+			this.onStatusChange( "正在获取下载地址"  );
+			this.progress.setProgressRange(0,100);
+			this.progress.startProgress();
+			
+			url = url(this,path,cfg,userAgent,proxy,proxyBypass,flag);
+			this.progress.stopProgress()
+			if(!url) return this.onError("获取下载网址失败")
+			if( !this.continueModal ) return false;
+		}
+		
+		var remoteFile = inet.httpFile(url,path,cfg ,userAgent, proxy,proxyBypass,flags);
+		if( !remoteFile ){
+			return this.onError("存储路径错误") 
+		}
+		
+		remoteFile.bufferSize = this.bufferSize;
+		if( this.cookies ){
+			remoteFile.session.disableCookies();
+			remoteFile.session.addHeaders ={cookie = this.cookies };
+		}
+
+		var totalDownSize = 0;
+		var progressBlockSize;
+		
+		remoteFile.onReceiveBegin = function(statusCode,contentLength,fileSize){
+					
+			if(contentLength){
+				contentLength = contentLength + fileSize; 
+				this.onReceiveBegin(contentLength,1000);
+			}
+			else { 
+				this.onReceiveBegin(,1000);
+				contentLength = 1000000;
+			} 
+			
+				if( statusCode == 206/*断点续传*/ ){
+				totalDownSize = fileSize;
+			}
+			
+			progressBlockSize = contentLength/1000;
+		}
+		
+		var time_tick = ..time.tick;
+		var tkPrev = 0;
+		var sizePs = 0;
+		remoteFile.onReceive = function(str,size,contentLength){ 
+			if( !this.continueModal ) return false;
+			
+			totalDownSize = totalDownSize + size;
+			sizePs = sizePs + size; 
+			var tkCurrent = time_tick();
+			var ms = tkCurrent - tkPrev;
+			if( ms > 1000 ){
+				this.onReceive(totalDownSize,totalDownSize/progressBlockSize,sizePs/(ms/1000))
+				sizePs = 0;
+				tkPrev = tkCurrent;
+			}
+		}
+		
+		var ret,err,fileSize = remoteFile.download(this.headers,this.referer) 
+		this.statusCode = remoteFile.statusCode; 
+		this.contentLength = remoteFile.contentLength;
+		this.modified = remoteFile.modified;
+		this.resumePath = remoteFile.resumePath;
+		
+		if( ret ) {
+			this.onStatusChange( "文件大小: " + fsys.formatSize(fileSize) );
+			
+			if(err)
+				this.onComplete("已完成,无须重新下载:" + path)
+			else {
+				this.onComplete("下载完毕:" + path);
+			} 
+			
+			this.complete = remoteFile.complete;
+			this.savePath = remoteFile.path;
+			
+			if( this.endProc ){
+				//修改 this.complete 为false 可阻止自动关闭
+				this.endProc(remoteFile.path,fileSize,err);
+			}
+
+			if( this.complete && this.closeTimeout ){
+				sleep(this.closeTimeout); 
+				this.endModal( remoteFile.path )
+			}
+			
+			this.dialogResult = remoteFile.path;
+		}
+		else {
+			this.onError( err : "未知错误/下载未完成" )
+		}
+		
+		remoteFile.close();	
+	}
+	
+}
+	
+/***intellisense()
+inet.downBox = 下载对话框
+inet.downBox() = 创建一个下载对话框\n!inet_downBox. 
+inet.downBox(.(父窗口,"标题",下载成功关闭超时) = 所有参数可选\n参数@3可选指定下载成功自动关闭对话框的超时值,单位毫秒
+!inet_downBox.text = 对话框标题
+!inet_downBox.bufferSize = 缓冲区大小\n不指定则默认为128KB
+!inet_downBox.labProgress = 显示进度信息\n!static.
+!inet_downBox.labInfo = 显示信息\n!static.
+!inet_downBox.savePath = 下载成功后的文件存储路径
+!inet_downBox.progress = 进度条\n!plus.
+!inet_downBox.cookies = 自定义HTTP请求头中的请求cookie
+!inet_downBox.userAgent = 指定下载时的请求User Agent
+!inet_downBox.headers = 指定下载时的请求HTTP头
+!inet_downBox.referer = 指定下载时的引用页
+!inet_downBox.download( = 弹出下载对话框并开始下载文件
+!inet_downBox.download(.(URL,存储路径,配置文件,userAgent,proxy,->->-> ) = 下载文件\n参数@1指定下载网址,允许传入一个动态返回 url 的线程函数\n参数@2可以指定目录或文件路径,目录必须以反斜杠结尾,\n其他参数可省略\n下载成功返回存储文路径\nuserAgent,proxy等可选参数用于创建http对象,参考inet.http构造函数说明
+!inet_downBox.test(.(URL,存储路径,配置文件,userAgent,proxy,->->-> ) = 检测是否已下载最新文件\n参数@1指定下载网址\n参数@2可以指定目录或文件路径,目录必须以反斜杠结尾,\n已下载文件未变更返回true\n需要下载或续传返回false,下载错误返回null\nuserAgent,proxy等可选参数用于创建http对象,参考inet.http构造函数说明
+!inet_downBox.setPos(.(x,y,宽,高,插入位置,参数) = 调整窗口位置或排序\n所有参数可选 
+!inet_downBox.getPos() = 返回相对坐标,宽,高
+!inet_downBox.modifyStyle(.(remove,add,swpFlags) = 修改窗口样式,所有参数都是可选参数,\n@remove 用数值指定要移除的样式,可使用 _WS_ 前缀的常量\n@add 用数值指定要添加的样式,可使用 _WS_ 前缀的常量\n@swpFlags 可选用数值指定调整窗口选项,可使用 _SWP_ 前缀的常量\n如果指定了 @swpFlag ,则使用该参数调用::SetWindowPos\n细节请参考 win.modifyStyle 函数源码 
+!inet_downBox.modifyStyleEx(.(remove,add,swpFlags) = 修改窗口扩展样式,所有参数都是可选参数,\n@remove 用数值指定要移除的样式,可使用 _WS_EX_ 前缀的常量\n@add 用数值指定要添加的样式,可使用 _WS_EX_ 前缀的常量\n@swpFlags 可选用数值指定调整窗口选项,可使用 _SWP_ 前缀的常量\n如果指定了 @swpFlag ,则使用该参数调用::SetWindowPos\n细节请参考 win.modifyStyle 函数源码  
+!inet_downBox.setInterval(回调函数,延时毫秒数,->->->) = @.setInterval( \n	function(){\n		__/*参数@1指定执行函数,参数@2指定执行间隔，\n可选指定一个或多个回调参数，不指定回调参数则默认为:\n hwnd,message,timerId,tick,\n\n如果在定时器中执行了win.delay等继续消息循环的代码，\n在定时器退出前不会再触发同一定时器（重入）。\n\n定时器回调函数返回数值可修改时间间隔,\n返回false取消该定时器*/\n	},1000 \n)
+!inet_downBox.clearInterval(__/*请输入ID*/) = 删除定时器
+!inet_downBox.changeInterval(__/*请输入ID*/,1000) = 重新设定定时器的延时时间
+!inet_downBox.setTimeout(.(函数名,延时,其他参数) = 延时执行函数
+!inet_downBox.complete = 是否下载完成
+!inet_downBox.statusCode = HTTP状态码
+!inet_downBox.contentLength = 文件长度\n如果文件长度为零,并且modified属性为false,表示不需要重新下载
+!inet_downBox.removeResumeFile() = 移除断点续传配置文件
+!inet_downBox.modified = 文件在上次下载以后是否修改过
+!inet_downBox.endProc = @.endProc = function(savePath,fileSize,unmodified){
+	__/*下载成功触发此函数。\nsavePath 为下载文件路径。\nfileSize 为文件大小，\n文件未变更则 unmodified 为 true*/
+	if(!unmodified)
+		owner.endModal();
+}
+?inet.downBox = !inet_downBox.
+end intellisense***/

package/aardio/lib/inet/errorMessage.aardio

@@ -0,0 +1,106 @@
+//errorMessage 错误码
+namespace inet
+
+errorMessage = {
+[12111/*_ERROR_FTP_DROPPED*/] = "FTP操作未完成，因为会话已中止。";
+[12112/*_ERROR_FTP_NO_PASSIVE_MODE*/] = "被动模式在服务器上不可用。";
+[12110/*_ERROR_FTP_TRANSFER_IN_PROGRESS*/] = "请求的操作不能在FTP会话句柄上执行，因为操作已在进行中。";
+[12137/*_ERROR_GOPHER_ATTRIBUTE_NOT_FOUND*/] = "无法找到请求的属性。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12132/*_ERROR_GOPHER_DATA_ERROR*/] = "从 Gopher 服务器接收数据时检测到错误。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12133/*_ERROR_GOPHER_END_OF_DATA*/] = "已到达数据末尾。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12135/*_ERROR_GOPHER_INCORRECT_LOCATOR_TYPE*/] = "对于此操作，定位符的类型不正确。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12134/*_ERROR_GOPHER_INVALID_LOCATOR*/] = "提供的定位符无效。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12131/*_ERROR_GOPHER_NOT_FILE*/] = "必须为文件定位符发出请求。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12136/*_ERROR_GOPHER_NOT_GOPHER_PLUS*/] = "请求的操作只能针对 Gopher+ 服务器或指定 Gopher+ 操作的定位符进行。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12130/*_ERROR_GOPHER_PROTOCOL_ERROR*/] = "分析从 Gopher 服务器返回的数据时检测到错误。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12138/*_ERROR_GOPHER_UNKNOWN_LOCATOR*/] = "定位符类型未知。备注仅 Windows XP 和 Windows Server 2003 R2 及更早版本。";
+[12162/*_ERROR_HTTP_COOKIE_DECLINED*/] = "服务器拒绝 了HTTP Cookie。";
+[12161/*_ERROR_HTTP_COOKIE_NEEDS_CONFIRMATION*/] = "HTTP Cookie 需要确认。备注仅 Windows Vista 和 Windows Server 2008 及更早版本。";
+[12151/*_ERROR_HTTP_DOWNLEVEL_SERVER*/] = "服务器未返回任何标头。";
+[12155/*_ERROR_HTTP_HEADER_ALREADY_EXISTS*/] = "无法添加标头，因为它已存在。";
+[12150/*_ERROR_HTTP_HEADER_NOT_FOUND*/] = "无法找到请求的标头。";
+[12153/*_ERROR_HTTP_INVALID_HEADER*/] = "提供的标头无效。";
+[12154/*_ERROR_HTTP_INVALID_QUERY_REQUEST*/] = "向 HttpQueryInfo 发出的请求无效。";
+[12152/*_ERROR_HTTP_INVALID_SERVER_RESPONSE*/] = "无法分析服务器响应。";
+[12160/*_ERROR_HTTP_NOT_REDIRECTED*/] = "HTTP请求未重定向。";
+[12156/*_ERROR_HTTP_REDIRECT_FAILED*/] = "重定向失败，因为方案已更改(例如 HTTP 到 FTP )，或者尝试重定向失败(默认值为5次尝试)。";
+[12168/*_ERROR_HTTP_REDIRECT_NEEDS_CONFIRMATION*/] = "重定向需要用户确认。";
+[12047/*_ERROR_INTERNET_ASYNC_THREAD_FAILED*/] = "应用程序无法启动异步线程。";
+[12166/*_ERROR_INTERNET_BAD_AUTO_PROXY_SCRIPT*/] = "自动代理配置脚本中出错。";
+[12010/*_ERROR_INTERNET_BAD_OPTION_LENGTH*/] = "为 InternetQueryOption 或 InternetSetOption 提供的选项的长度对于指定的选项类型不正确。";
+[12022/*_ERROR_INTERNET_BAD_REGISTRY_PARAMETER*/] = "找到所需的注册表值，但类型不正确或值无效。";
+[12029/*_ERROR_INTERNET_CANNOT_CONNECT*/] = "尝试连接到服务器失败。";
+[12042/*_ERROR_INTERNET_CHG_POST_IS_NON_SECURE*/] = "应用程序正在发布并尝试在不安全的服务器上更改多行文本。";
+[12044/*_ERROR_INTERNET_CLIENT_AUTH_CERT_NEEDED*/] = "服务器正在请求客户端身份验证。";
+[12046/*_ERROR_INTERNET_CLIENT_AUTH_NOT_SETUP*/] = "未在此计算机上设置客户端授权。";
+[12030/*_ERROR_INTERNET_CONNECTION_ABORTED*/] = "已终止与服务器的连接。";
+[12031/*_ERROR_INTERNET_CONNECTION_RESET*/] = "已重置与服务器的连接。";
+[12175/*_ERROR_INTERNET_DECODING_FAILED*/] = "WinINet无法对响应执行内容解码。有关详细信息，请参阅内容编码主题。";
+[12049/*_ERROR_INTERNET_DIALOG_PENDING*/] = "另一个线程正在进行密码对话框。";
+[12163/*_ERROR_INTERNET_DISCONNECTED*/] = "Internet连接已丢失。";
+[12003/*_ERROR_INTERNET_EXTENDED_ERROR*/] = "从服务器返回扩展错误。这通常是包含详细错误消息的字符串或缓冲区。调用 InternetGetLastResponseInfo 以检索错误文本。";
+[12171/*_ERROR_INTERNET_FAILED_DUETOSECURITYCHECK*/] = "由于安全检查，函数失败。";
+[12032/*_ERROR_INTERNET_FORCE_RETRY*/] = "该函数需要重做请求。";
+[12054/*_ERROR_INTERNET_FORTEZZA_LOGIN_NEEDED*/] = "请求的资源需要 Fortezza 身份验证。";
+[12036/*_ERROR_INTERNET_HANDLE_EXISTS*/] = "请求失败，因为句柄已存在。";
+[12039/*_ERROR_INTERNET_HTTP_TO_HTTPS_ON_REDIR*/] = "由于重定向，应用程序正从非 SSL 迁移到 SSL 连接。";
+[12052/*_ERROR_INTERNET_HTTPS_HTTP_SUBMIT_REDIR*/] = "提交到 SSL 连接的数据将重定向到非 SSL 连接。";
+[12040/*_ERROR_INTERNET_HTTPS_TO_HTTP_ON_REDIR*/] = "应用程序由于重定向而从 SSL 移动到非 SSL 连接。";
+[12027/*_ERROR_INTERNET_INCORRECT_FORMAT*/] = "请求的格式无效。";
+[12019/*_ERROR_INTERNET_INCORRECT_HANDLE_STATE*/] = "无法执行请求的操作，因为提供的句柄未处于正确的状态。";
+[12018/*_ERROR_INTERNET_INCORRECT_HANDLE_TYPE*/] = "此操作提供的句柄类型不正确。";
+[12014/*_ERROR_INTERNET_INCORRECT_PASSWORD*/] = "无法完成连接和登录 FTP 服务器的请求，因为提供的密码不正确。";
+[12013/*_ERROR_INTERNET_INCORRECT_USER_NAME*/] = "无法完成连接和登录 FTP 服务器的请求，因为提供的用户名不正确。";
+[12004/*_ERROR_INTERNET_INTERNAL_ERROR*/] = "发生了内部错误。";
+[12045/*_ERROR_INTERNET_INVALID_CA*/] = "该函数不熟悉生成服务器的证书的证书颁发机构。";
+[12016/*_ERROR_INTERNET_INVALID_OPERATION*/] = "请求的操作无效。";
+[12009/*_ERROR_INTERNET_INVALID_OPTION*/] = "对 InternetQueryOption 或 InternetSetOption 的请求指定了无效的选项值。";
+[12033/*_ERROR_INTERNET_INVALID_PROXY_REQUEST*/] = "对代理的请求无效。";
+[12005/*_ERROR_INTERNET_INVALID_URL*/] = "URL无效。";
+[12028/*_ERROR_INTERNET_ITEM_NOT_FOUND*/] = "无法找到请求的项。";
+[12015/*_ERROR_INTERNET_LOGIN_FAILURE*/] = "连接到FTP服务器并登录的请求失败。";
+[12174/*_ERROR_INTERNET_LOGIN_FAILURE_DISPLAY_ENTITY_BODY*/] = "MS-Logoff 摘要标头已从网站返回。此标头专门指示摘要包清除关联领域的凭据。仅当已设置 INTERNET_ERROR_MASK_LOGIN_FAILURE_DISPLAY_ENTITY_BODY 选项时，才会返回此错误;否则，将返回 ERROR_INTERNET_LOGIN_FAILURE。";
+[12041/*_ERROR_INTERNET_MIXED_SECURITY*/] = "内容并不完全安全。正在查看的某些内容可能来自不安全的服务器。";
+[12007/*_ERROR_INTERNET_NAME_NOT_RESOLVED*/] = "无法解析服务器名称。";
+[12173/*_ERROR_INTERNET_NEED_MSN_SSPI_PKG*/] = "目前尚未实现。";
+[12034/*_ERROR_INTERNET_NEED_UI*/] = "已请求用户界面或其他阻止操作。备注仅 Windows Vista 和 Windows Server 2008 及更早版本。";
+[12025/*_ERROR_INTERNET_NO_CALLBACK*/] = "无法发出异步请求，因为尚未设置回调函数。";
+[12024/*_ERROR_INTERNET_NO_CONTEXT*/] = "无法发出异步请求，因为提供了零个上下文值。";
+[12023/*_ERROR_INTERNET_NO_DIRECT_ACCESS*/] = "目前无法进行直接网络访问。";
+[12172/*_ERROR_INTERNET_NOT_INITIALIZED*/] = "尚未初始化 WinINet API。指示尚未调用更高级别的函数（如 InternetOpen ）。";
+[12020/*_ERROR_INTERNET_NOT_PROXY_REQUEST*/] = "无法通过代理发出请求。";
+[12017/*_ERROR_INTERNET_OPERATION_CANCELLED*/] = "该操作已取消，通常是因为操作完成后关闭请求的句柄。";
+[12011/*_ERROR_INTERNET_OPTION_NOT_SETTABLE*/] = "无法设置请求的选项，仅查询。";
+[12001/*_ERROR_INTERNET_OUT_OF_HANDLES*/] = "目前无法再生成句柄。";
+[12043/*_ERROR_INTERNET_POST_IS_NON_SECURE*/] = "应用程序将数据发布到不安全的服务器。";
+[12008/*_ERROR_INTERNET_PROTOCOL_NOT_FOUND*/] = "无法找到请求的协议。";
+[12165/*_ERROR_INTERNET_PROXY_SERVER_UNREACHABLE*/] = "无法访问指定的代理服务器。";
+[12048/*_ERROR_INTERNET_REDIRECT_SCHEME_CHANGE*/] = "该函数无法处理重定向，因为方案（例如 HTTP 更改为 FTP ）。";
+[12021/*_ERROR_INTERNET_REGISTRY_VALUE_NOT_FOUND*/] = "找不到所需的注册表值。";
+[12026/*_ERROR_INTERNET_REQUEST_PENDING*/] = "由于一个或多个请求处于挂起状态，因此无法完成所需的操作。";
+[12050/*_ERROR_INTERNET_RETRY_DIALOG*/] = "应重试对话框。";
+[12038/*_ERROR_INTERNET_SEC_CERT_CN_INVALID*/] = "例如，输入 www.server.com 的 SSL 证书公用名(主机名字段)不正确，并且证书上显示 www.different.com 公用名。";
+[12037/*_ERROR_INTERNET_SEC_CERT_DATE_INVALID*/] = "从服务器收到的 SSL 证书日期不正确。证书已过期。";
+[12055/*_ERROR_INTERNET_SEC_CERT_ERRORS*/] = " SSL 证书包含错误。";
+[12056/*_ERROR_INTERNET_SEC_CERT_NO_REV*/] = " SSL 证书未吊销。";
+[12057/*_ERROR_INTERNET_SEC_CERT_REV_FAILED*/] = " SSL 证书吊销失败。";
+[12170/*_ERROR_INTERNET_SEC_CERT_REVOKED*/] = " SSL 证书已吊销。";
+[12169/*_ERROR_INTERNET_SEC_INVALID_CERT*/] = " SSL 证书无效。";
+[12157/*_ERROR_INTERNET_SECURITY_CHANNEL_ERROR*/] = "应用程序在加载 SSL 库时遇到内部错误。请检查注册表项 HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings 的 SecureProtocols 字段值是否是否为正确的值：0x2800 。细节请参考 aardio 标准库 inet.tls 的源代码。";
+[12164/*_ERROR_INTERNET_SERVER_UNREACHABLE*/] = "指示的网站或服务器无法访问。";
+[12012/*_ERROR_INTERNET_SHUTDOWN*/] = "WinINet支持正在关闭或卸载。";
+[12159/*_ERROR_INTERNET_TCPIP_NOT_INSTALLED*/] = "未加载所需的协议堆栈，应用程序无法启动 WinSock。";
+[12002/*_ERROR_INTERNET_TIMEOUT*/] = "请求已超时。";
+[12158/*_ERROR_INTERNET_UNABLE_TO_CACHE_FILE*/] = "函数无法缓存文件。";
+[12167/*_ERROR_INTERNET_UNABLE_TO_DOWNLOAD_SCRIPT*/] = "无法下载自动代理配置脚本。设置了 INTERNET_FLAG_MUST_CACHE_REQUEST 标志。";
+[12006/*_ERROR_INTERNET_UNRECOGNIZED_SCHEME*/]="无法识别 URL 方案，或不受支持";
+}
+
+/*
+WinINet 错误代码说明
+https://learn.microsoft.com/windows/win32/wininet/wininet-errors
+*/
+
+/**intellisense()
+inet.errorMessage = inet.http 错误代码表。\n键为错误代码，值为错误信息。\n服务端错误代码请改用 inet.httpStatusCode
+end intellisense**/