aview-app 1.0.2

package/aardio/lib/process/admin.aardio

@@ -0,0 +1,110 @@
+//admin 管理权限
+import process;
+import process.token;
+
+namespace process.admin;
+	
+::Advapi32 := ..raw.loadDll("Advapi32.dll")
+OpenProcessToken = ::Advapi32.api( "OpenProcessToken", "pointer(POINTER ProcessHandle,INT DesiredAccess,pointer &TokenHandle)");
+GetTokenInformation = ::Advapi32.api( "GetTokenInformation", "int(POINTER TokenHandle,int infoClass,struct &TokenInfo,INT len,INT &retLen)");
+	
+isLeastPrivileges = function(hProcess){
+	var admin,xpVersion = isRunAs(hProcess);
+	return !(xpVersion || admin)
+}
+
+isRunAs = function(hProcess) { 
+	var token = ..process.token(hProcess);
+	var elevation = token.elevation();
+	token.close();
+	return elevation;
+} 
+
+runas = function(file,parameters,showCmd,workDir,hwnd,wait,waitTimeout){ 
+	if( !file ) file = ..io._exepath;
+	var operation = !_WINXP ? "runas" : "open";
+	return ..process.execute( file, parameters,operation,showCmd,workDir,hwnd,wait,waitTimeout)
+}
+
+runasWait = function( file,parameters,showCmd,workDir,hwnd,waitTimeout){
+	return runas(file,parameters,showCmd,workDir,hwnd,"close",waitTimeout)
+}
+
+runasWaitInput = function( file,parameters,showCmd,workDir,hwnd,waitTimeout){
+	return runas(file,parameters,showCmd,workDir,hwnd,"input",waitTimeout)
+}
+
+runasLeastPrivileges = function(path,arguments,workDir,taskName){
+	if( (  _WINXP) || ( ! isRunAs() ) ){
+		..process.execute(path,arguments);
+		return true;
+	};
+	
+	var ret;
+	try{
+		import com; 
+		var schedule = ..com.CreateObject("Schedule.Service");
+		schedule.Connect();
+				
+		var root = schedule.GetFolder("\") 
+		if(!taskName) taskName = ..io._exefile;
+		try{ root.DeleteTask( taskName ); }
+			
+		var taskDef = schedule.NewTask(0); 
+		var regInf = taskDef.getRegistrationInfo();
+		regInf.Description = taskName;
+		regInf.Author = "runas_leastPrivileges";
+			
+		var pri = taskDef.getPrincipal();
+		pri.Id = "runas_leastPrivileges_principal";
+		pri.LogonType = schedule.TASK_LOGON_INTERACTIVE_TOKEN;
+		pri.RunLevel = schedule.TASK_RUNLEVEL_LUA //least privileges
+			
+		var settings = taskDef.getSettings(); 
+		settings.StartWhenAvailable = true;
+		
+		var tg = taskDef.getTriggers().Create(schedule.TASK_TRIGGER_REGISTRATION);
+		tg.Id = "runas_leastPrivileges_trigger"
+		tg.Delay = "PT0S" //0秒后立即执行
+		
+		var act = taskDef.getActions().Create( schedule.TASK_ACTION_EXEC )
+		act.Path = ..io.fullpath(path)
+		act.Arguments = ..process.joinArguments(arguments);
+		act.WorkingDirectory = workDir || ..io.splitpath(path).dir;
+			
+		root.RegisterTaskDefinition(taskName, taskDef, schedule.TASK_CREATE_OR_UPDATE,"","", schedule.TASK_LOGON_INTERACTIVE_TOKEN); 
+		sleep(10); try{  root.DeleteTask(taskName ); } 
+		ret = true;
+	}	
+	catch(e){
+		..process.execute(path,arguments);
+	}
+	return ret;
+}
+
+changeMsgFilter = function(hwnd,msg,flag,filter){
+    if(flag===null) flag = 1/*_MSGFLT_ALLOW*/
+	if(::User32.ChangeWindowMessageFilterEx){
+		return ::User32.ChangeWindowMessageFilterExB(hwnd,msg,flag,filter)
+	}
+}
+
+enableDropMsg = function(hwnd,flag){
+	changeMsgFilter(hwnd,0x233/*_WM_DROPFILES*/,flag);
+	changeMsgFilter(hwnd,0x49,flag);
+}
+
+runas_wait = runasWait; //@Deprecated 
+runas_waitInput = runasWaitInput; //@Deprecated 
+runas_leastPrivileges = runasLeastPrivileges; //@Deprecated 
+
+/**intellisense(process.admin)
+isLeastPrivileges(__) = 进程是否运行于VISTA以后的系统并且无管理权限,\n可选用参数@1指定进程句柄或 process,process.popen 对象,\n不指定则默认取当前进程权限
+isRunAs(__) = 判断进程是否以管理权限运行,\n成功返回true,XP返回 flase,\n可选用参数@1指定进程句柄或 process,process.popen 对象,\n不指定则默认取当前进程权限
+runas(.(执行程序路径,启动参数,窗口显示样式,工作目录,窗口句柄,等待选项) = 运行应用程序,\n如果是vista以后系统请求管理权限,\n省略参数@1则默认指定为当前EXE路径,其他参数可选
+runasWait(.(执行程序路径,启动参数,窗口显示样式,工作目录,窗口句柄) = 运行应用程序,并等待进程结束,\n如果是vista以后系统请求管理权限,,\n省略参数@1则默认指定为当前EXE路径,其他参数可选
+runasWaitInput(.("__", parameters="",showCmd,workDir=",hwnd=0) = 运行应用程序,并等待界面激活输入状态,\n如果是vista以后系统请求管理权限,,\n省略参数@1则默认指定为当前EXE路径,其他参数可选
+runasLeastPrivileges(.(执行程序路径,启动参数,工作目录,任务名) = 管理权限进程内降权以非管理权限启动进程,进程如果已创建则忽略,\n注意启动程序路径应明确指定,以斜杠开头或其他绝对路径\n启动参数可以是一个数组或文本也可以不指定,任务名不必指定
+changeMsgFilter(.(hwnd,msg,flag,filter) = 修改拥有管理权限的进程窗口消息过滤规则,\n@flag参数默认为_MSGFLT_ALLOW,@filter参数可省略,\n此函数用法请参考源码与MSDN
+enableDropMsg(.(hwnd,flag) = 允许指定的窗口接收拖放消息,\n@flag参数默认为_MSGFLT_ALLOW
+end intellisense**/

package/aardio/lib/process/apiHook/_.aardio

@@ -0,0 +1,141 @@
+import process;
+
+namespace process {
+	
+	class apiHook  {
+		ctor ( ... ) { {
+			var prcs,err = ..process(...);
+			if(!prcs) return null,err;
+			
+			this.process = prcs;
+			this.loadLibrary = prcs.remoteApi("addr(ustring libName)","kernel32.dll","LoadLibraryW","stdcall")
+			this.freeLibrary = prcs.remoteApi("bool(addr hModule)","kernel32.dll","FreeLibrary","stdcall") 
+			this.getProcAddress = prcs.remoteApi("addr(addr hModule,string lpProcName)","kernel32.dll","GetProcAddress","stdcall") 
+			this._hookfunc = {}; 
+			
+			..table.gc(this,"unInstallAll")
+		} };
+		install = function( dllName, apiName, jmpDllName, jmpApiName  ) { 
+			var hookInfo = {};
+			var addrTargetFunction = dllName
+			if( type(dllName) == type.string ){
+				dllName = ..io.localpath(dllName) : dllName;
+				
+				var hModule = this.loadLibrary(dllName);
+				if(!hModule)
+					return null,"LoadLibrary('" + dllName + "') faild!";
+					
+				addrTargetFunction = this.getProcAddress(hModule,apiName);
+				if(!addrTargetFunction)
+					return null,"GetProcAddress('" + apiName + "') faild!";
+					
+				hookInfo.hModule = hModule;
+			}
+			else {
+				jmpDllName = apiName;
+				jmpApiName = jmpDllName;
+			}
+			
+			var addrHookFunction = jmpDllName;
+			if( type(jmpDllName) == type.string ){
+				jmpDllName = ..io.localpath(jmpDllName) : jmpDllName;
+				var hModule = this.loadLibrary(jmpDllName);
+				if(!hModule)
+					return null,"LoadLibrary('" + jmpDllName + "') faild!";
+					
+				addrHookFunction = this.getProcAddress(hModule,jmpApiName);
+				if(!addrHookFunction)
+					return null,"GetProcAddress('" + jmpApiName + "') faild!";
+					
+				hookInfo.hHookModule = hModule;
+			}
+			
+			var jmpOpCodeLen = 5; 
+			var addrProtect = this.process.protect(addrTargetFunction,0x40/*_PAGE_EXECUTE_READWRITE*/,jmpOpCodeLen * 2)
+			if (!addrProtect) { 
+				error("修改内存属性失败!", 2);
+			}   
+			
+			var restoreOpCode = this.process.readString(addrTargetFunction,jmpOpCodeLen * 2 );
+			hookInfo.restoreOpCodeSize,restoreOpCode = getHookSize(  restoreOpCode,jmpOpCodeLen ); 
+			 
+			var addrTrampoline  = this.process.malloc( hookInfo.restoreOpCodeSize + jmpOpCodeLen,0x40/*_PAGE_EXECUTE_READWRITE*/)  
+			this.process.write( addrTrampoline,restoreOpCode, '\xE9'/*JMP*/, {
+					int jmpAddr = addrTargetFunction + hookInfo.restoreOpCodeSize - (addrTrampoline + hookInfo.restoreOpCodeSize + jmpOpCodeLen );
+			} )
+			 
+			this.process.write( addrTargetFunction, '\xE9'/*JMP*/, {
+					int jmpAddr = addrHookFunction - (addrTargetFunction + jmpOpCodeLen);
+			} )
+			
+			..table.assign( hookInfo, {
+				addrProtect = addrProtect;
+				addrTrampoline = addrTrampoline; 
+				addrHookFunction = addrHookFunction; 
+				addrTargetFunction =addrTargetFunction;
+			} )
+			
+			this._hookfunc[addrTargetFunction] = hookInfo;
+			return hookInfo;
+		}; 
+		unInstall = function ( hookInfo ) {  
+			if (!hookInfo.addrTargetFunction) {
+				return;
+			} 
+			
+			this.process.suspend();
+			var restoreCode = this.process.readString(hookInfo.addrTrampoline ,hookInfo.restoreOpCodeSize)
+			this.process.writeString(hookInfo.addrTargetFunction,restoreCode);
+			
+			this.process.protect( hookInfo.addrTargetFunction, hookInfo.addrProtect, hookInfo.restoreOpCodeSize );
+			this.process.mfree(hookInfo.addrTrampoline);
+			
+			if(hookInfo.hModule)this.freeLibrary(hookInfo.hModule);
+			if(hookInfo.hHookModule)this.freeLibrary(hookInfo.hHookModule);
+			
+			this.process.resume();
+			
+			this._hookfunc[hookInfo.addrTargetFunction]  = null;
+		};
+		unInstallAll = function(){
+			for(k,hookInfo in this._hookfunc){ 
+				this.unInstall(hookInfo);
+			}
+			
+		};
+		resume = function(){
+			return this.process.resume();
+		}
+		
+	}	
+	
+	namespace  apiHook { 
+		import ..raw.asm.opCode;
+		getHookSize = ..raw.asm.opCode.getHookSize; 
+	}
+}
+
+/**intellisense()
+process.apiHook = 在外部32位进程内安装 API 函数钩子，\n作用仅仅是安装，需要要用 C,或 C++ 写 32位 dll 钩子。\n可以在 aardio 中通过远程 API 调用钩子 DLL 中的函数。\n具体用法可参考 process.ruffle 扩展库源码。\n\n进程内钩子请改用 thread.apiHook,\n线程内钩子请改用 raw.apiHook
+process.apiHook( = 创建 API Hook 工具
+process.apiHook(.(进程ID) = 使用进程 ID 打开进程，并返回 API Hook 安装工具。\n失败则返回 null,以及错误信息.
+process.apiHook(.(执行文件,命令行参数,启动参数) = 运行执行文件或关联文档，并返回 API Hook 安装工具。\n也可以仅指定第二个参数运行纯命令行\n启动参数为 process.STARTUPINFO 结构体,可选,\n可以使用普通table对象替代启动参数.将自动转换为STARTUPINFO结构体
+process.apiHook(.(执行文件,命令行参数,{suspended=true}) = 运行执行文件或关联文档，并返回 API Hook 安装工具。\n启动后暂停进程，可在安装钩子以后调用 resume() 函数继续运行进程
+process.apiHook() = !process_apihook. 
+!process_apihook.resume() = 继续运行进程
+!process_apihook.install(.("拦截DLL模块名","拦截API函数名","钩子模块名","钩子API函数名") = 安装钩子,返回HookInfo对象\n也可以直接写拦截函数地址或钩子函数地址,\n但函数地址必须是目标进程内的函数地址,不可使用aardio函数,\n\n注意是在目标进程内调用LoadLibrary搜索DLL，\n默认搜索路径包含目标EXE所在目录，而非当前EXE所在目录\n但以斜杠开头的路径aardio会在当前进程中解析为完整路径
+!process_apihook.process = 进程对象,\n!process.
+!process_apihook.loadLibrary(.("DLL模块名") = 在目标进程中加载DLL,返回数值类型句柄
+!process_apihook.freeLibrary(.(模块地址) = 卸载DLL
+!process_apihook.getProcAddress(.(模块地址,"API函数名") = 查找外部进程API函数,返回函数地址
+!process_apihook.unInstall(.(HookInfo) = 卸载钩子,\n传入参数必须是 install函数的返回值\n\n要注意的问题:\n1、如果钩子函数正在回调中卸载自身会导致目标进程崩溃,\n1、卸载钩子时目标函数不能正在使用中,\naardio会先暂停目标进程主线程，卸载完再恢复,\n但目标进程可能是多线程的,请避免目标函数正在被调用时去释放
+!process_apihook.install() = !procss_hookInfo.
+!process_apihook.unInstallAll() = 释放所有钩子,\n该函数会在对象回收时自动调用\n如果不希望在进程关闭时卸载钩子，请将此函数赋值为null
+!procss_hookInfo.addrProtect = 函数内存保护属性
+!procss_hookInfo.addrTrampoline = 用于调用原函数的跳板地址 
+!procss_hookInfo.addrHookFunction = 钩子函数地址
+!procss_hookInfo.addrTargetFunction = 被拦截函数地址
+!procss_hookInfo.hModule = 被拦截模块地址
+!procss_hookInfo.hHookModule = 钩子模块地址
+!procss_hookInfo.restoreOpCodeSize = 安装钩子覆盖指令长度
+end intellisense**/

package/aardio/lib/process/atom.aardio

@@ -0,0 +1,32 @@
+//atom 全局原子量
+import process;
+namespace process.atom 
+
+GlobalAddAtom = ::Kernel32.api("GlobalAddAtom","word(ustring str)") 
+add = function(name){
+    
+	if( type(name) == type.string ){
+		name = ..string.toUnicode(name);
+		if(#name < 255){
+			return GlobalAddAtom( name );
+		}
+	}	
+	
+	error("参数必须是小于256字节的字符串",2);
+}
+
+find = ::Kernel32.api("GlobalFindAtom","word(ustring str)"); 
+delete = ::Kernel32.api("GlobalDeleteAtom","word(word)");
+	
+GlobalGetAtomName = ::Kernel32.api("GlobalGetAtomName","INT(word atom,ustring &buf,int size)");   
+getName = function(atom){ 
+	var size,str = GlobalGetAtomName(tonumber(atom),512,255); 
+	if(size) return str;// ..string.left(str,size); 
+} 
+	 
+/**intellisense(process.atom) 
+add("__") = 添加字符串到全局原子表\n字符串转换为UTF-16编码以后长度必须小于255字节\n返回原子数值
+find("__") = 在全局原子表查找字符串\n忽略大写小全串匹配\n返回原子数值
+delete(__/*原子值*/) = 减少原子引用计数\n当引用计数为0时删除原子
+getName(__/*原子值*/) = 返回原子字符串
+end intellisense**/

package/aardio/lib/process/batch.aardio

@@ -0,0 +1,89 @@
+//batch 批处理
+import fsys.file;
+import process.popen;
+
+namespace process{
+	
+	class batch{
+		ctor( script,ownerArgs,workDir ){{
+			var err;
+			if(  (#script <  0x410/*_MAX_PATH_U8*/ ) && ..string.endWith(script,".aardio",true) ){
+				script,err = ..string.loadcode( script ,ownerArgs);	
+			}
+			else {
+				if( (#script <  0x410/*_MAX_PATH_U8*/ ) && ( ..io.exist(script) || ..io.localpath(script))){
+					script = ..string.load(script);
+				}
+				
+				script = ..string.trim(script);
+				if(!..string.startWith(script,"?>")){
+					script = "?>" + script;
+				}
+	
+				script,err = ..string.loadcode( script ,ownerArgs);				
+			}
+			
+			if(!script) error(err,2);
+			
+			var codepage = 65001;
+			if(!..string.match(script,"^\s*@?chcp\s+65001")){
+				
+				//HKEY_CURRENT_USER\Console\%SystemRoot%_System32_cmd.exe > CodePage
+				codepage = tonumber(..process.popen.cmd("chcp").readAll("\d+"));
+				if(..string.isUtf8(script)) {
+					if( codepage != 65001 ) script = ..string.fromto(script,65001,codepage);
+				}
+				else {
+					if( codepage != ::Kernel32.GetACP() ) {
+						script = ..string.fromto(script,::Kernel32.GetACP(),codepage);
+					}
+				}	
+			}
+			
+			script = ..string.crlf(script); //必须用 \r\n 换行
+			var tempFile = ..fsys.file.temp(".bat",true);
+			tempFile.write(script);
+			tempFile.close();
+		  
+			this = ..process.popen("cmd.exe",..table.append({"/c",tempFile.path},ownerArgs),{
+				workDir = workDir : "/";
+			})
+			this.codepage = codepage;
+	
+			this.beforeClose = function(){ 
+				tempFile.delete();
+			}
+		}}
+	}
+	
+	batch.wow64 = function(...){
+		return ..fsys.wow64.disableRedirection(lambda(...) batch(...),...)
+	}
+	
+}
+/**intellisense()
+process.batch = 用于加载批处理代码，支持使用 aardio 模板语法嵌入 aardio 代码
+process.batch( = 创建批处理管道进程,\n用于加载批处理代码，支持使用 aardio 模板语法嵌入 aardio 代码\n优先调用 64 位命令请改为 process.batch.wow64 
+process.batch(.(script,ownerArgs,workDir) = @script 参数可以是批处理脚本或批处理文件，支持资源文件,\n支持使用 aardio 模板语法嵌入 aardio 代码,\n批处理代码会使用自动生成的临时文件加载执行,对象释放时自动删除临时文件,\n可选用 @ownerArgs 参数指定aardio 模板代码可以调用的 owner 参数,\n@ownerArgs 的数组成员传递给批处理作为启动参数,可用%1 %2 ...接收,\n可选用 @workDir 指定工作目录,默认为应用程序目录
+process.batch.wow64( = 创建批处理管道进程,\n禁用64位文件与注册表重定向,\n在64位系统会返回64位进程,兼容32位系统,\n用于加载批处理代码，支持使用 aardio 模板语法嵌入 aardio 代码
+process.batch.wow64(.(script,ownerArgs,workDir) = @script 参数可以是批处理脚本或批处理文件，支持资源文件,\n支持使用 aardio 模板语法嵌入 aardio 代码,\n批处理代码会使用自动生成的临时文件加载执行,对象释放时自动删除临时文件,\n可选用 @ownerArgs 参数指定aardio 模板代码可以调用的 owner 参数,\n@ownerArgs 的数组成员传递给批处理作为启动参数,可用%1 %2 ...接收,\n可选用 @workDir 指定工作目录,默认为应用程序目录
+process.batch() = !process_popen.
+process.batch.wow64() = !process_popen.
+end intellisense**/
+
+/**details(aardio批处理模板语法)
+批处理代码中aardio代码必须置于 <? ..... ?> 内部，类似PHP的模板语法,
+但是要注意与PHP的区别是，aardio规定开始标记  <? 必须独立不能紧跟英文字母，
+例如 <?xml.....  不是合法的aardio代码段开始标记(aardio会认为这是一个XML标记)。 
+另外，aardio总是忽略文件开始的空白字符（包含空格、制表符，换行）。
+
+aardio将<? ..... ?> 之外的部分解析为： print("批处理代码") 以调用全局函数print输出批处理代码。
+print允许接收多个参数，并且对每个参数调用tostring()转换为字符串。
+
+可以使用 <?=表达式?> 输出文本，该代码的作用类似于 print( 表达式 ) , 下面的写法也是允许的
+<?
+= 表达式
+?>
+
+批处理文件应当并且建议以UTF-8编码保存，process.batch 会自动转换为 ANSI 编码执行。
+end details**/

package/aardio/lib/process/cache.aardio

@@ -0,0 +1,95 @@
+//cache 运行路径缓存 
+import fsys;
+import fsys.version;
+import process.file;
+import fsys.lnk;
+import win.reg;
+
+namespace process.cache{
+
+	list = function(filePattern,namePattern){
+		var lst = {};
+		
+		var regPaths; 
+		if(_WIN10_LATER){
+			regPaths = {
+				"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Compatibility Assistant\Store";
+			 	"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FeatureUsage\AppSwitched";
+				"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Compatibility Assistant\Persisted";
+				"HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\MuiCache";
+			}
+		}
+		else{
+			regPaths = {
+				_WINXP ? "HKEY_CURRENT_USER\Software\Microsoft\Windows\ShellNoRoam\MUICache"
+					: "HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\MuiCache"
+			}
+		}
+		
+		for(i=1;#regPaths;1){
+			var reg = ..win.reg(regPaths[i],true);
+			if(!reg) continue;
+			
+			for(fullpath,unusedValue,t in reg.eachValue()) {
+				fullpath = ..string.match(fullpath,"([a-zA-Z].+\.<@@exe@>)");
+				if(fullpath) lst[fullpath] = true; 
+			}
+			reg.close();
+		}
+		
+		var ret = {}; 
+		for(k,v in lst) ..table.push(ret,k); 
+		return ret;	
+	}
+	
+	each = function(){
+		var lst = list();
+
+		var k,v;
+		return function(){
+			k,v =  ..table.next(lst,k);
+			return v;
+		};
+	}
+	
+	find = function(filePattern,namePattern,searchLnk){
+		var paths = list(e); 
+		
+		for(i=1;#paths;1){
+			var cPath = paths[i];
+			
+			if( ( filePattern && !..string.cmpMatch( ..io.splitpath(cPath).file ,filePattern ) ) ) continue ;
+			if( ..string.find(cPath,"<@@install@>|<@@setup@>") ) continue;
+			
+			if(!..io.exist(cPath)) continue;
+			
+			if(namePattern){
+				var ver = ..fsys.version.getInfo(cPath)
+				if( ver && ver.productName ){
+					var name = ver.productName;
+					if( ..string.match(name,"Microsoft.+Windows.+Operating.+System") ) continue;
+					if(!..string.cmpMatch( name ,namePattern ) )continue ;
+				}	
+				else {
+					continue;
+				}
+			}
+			
+			return  cPath;
+		}
+		 
+		if(searchLnk!==false){
+			return ..fsys.lnk.search(filePattern,namePattern); 
+		}
+	} 
+}
+
+/**intellisense()
+process.cache = 用于搜索运行过的程序
+process.cache.each() = @for(path in ??.each() ){
+	__/*遍历最近运行过的程序路径，\npath 为程序路径，可能为已删除的路径*/
+}
+process.cache.list() = 返回最近运行的应用程序路径数组，\n返回数组可能包含已删除的程序
+process.cache.find(.( = 查找并返回运行过并且未删除的应用程序路径，\n返回路径必须是 exe 后缀，且文件名不包含 Install,Setup 等单词
+process.cache.find(.("文件名","版本信息产品名称",是否搜索快捷方式) = 查找并返回运行过并且未删除的应用程序路径\n忽略大小写比较,并支持模式匹配语法,\n文件名与产品名称必须至少指定一个，\n越是指定严格的文件名匹配条件搜索越快。\n参数@3 为 false 不搜索快捷方式，可加快返回速度
+end intellisense**/

package/aardio/lib/process/chm.aardio

@@ -0,0 +1,14 @@
+//chm 帮助文档
+import process;
+namespace process;
+
+class chm {
+	ctor( chmPath,htmlPath ){
+		..process.execute("hh.exe","mk:@MSITStore:" 
+			+ ..io.fullpath(chmPath) + "::" + htmlPath );
+	}; 
+}
+
+/**intellisense()
+process.chm(.(chmPath,htmlPath) = 打开 CHM 帮助文档。\m@chmPath 指定 chm 文件路径，\n@htmlPath 指定页面路径
+end intellisense**/

package/aardio/lib/process/cmdline.aardio

@@ -0,0 +1,42 @@
+//cmdline 获取启动参数
+import process;
+namespace process;
+
+class cmdline{
+	ctor( pid ){
+		if(!pid) return;
+		
+		var prcs = ..process(pid,0x10/*_PROCESS_VM_READ*/
+			| 0x400/*_PROCESS_QUERY_INFORMATION*/|0x1000/*_PROCESS_QUERY_LIMITED_INFORMATION*/);
+			
+		if(!prcs) return;
+		
+		var pebAddr = prcs.getInfo().pebBaseAddress;
+		var cmdline;
+		
+		if(prcs.isX64()){ 
+			var param  = prcs.readStruct(pebAddr+0x20,{LONG addr})
+			cmdline  = prcs.readStruct(param.addr + 0x70,{WORD length;WORD maxLength;LONG buffer;})	
+		}
+		else {  
+			var param  = prcs.readStruct(pebAddr+0x10,{INT addr})
+			cmdline  = prcs.readStruct(param.addr + 0x40,{WORD length;WORD maxLength;INT buffer;})	
+		}
+		
+		var str;
+		if(cmdline.length){
+			str = prcs.readStringUtf16(cmdline.buffer,cmdline.length/2) 
+		}
+		else {
+			str = prcs.getPath();
+			if(#str) str = `"` + str  + `"`;
+		}
+		
+		prcs.free();
+		return str;
+	}; 
+}
+
+/**intellisense()
+process.cmdline(__) = 参数指定进程ID,返回进程的启动命令行,\n用 process.wmi(pid).CommandLine 也可以获得启动参数,\n但是在无法获取启动命令行时 process.cmdline 会以返回启动文件路径,\n如果目标进程以管理权限启动但当前进程没有管理权限会失败,\n此函数失败返回 null,\n不指定参数或参数为0直接返回 null
+end intellisense**/

package/aardio/lib/process/code.aardio

@@ -0,0 +1,128 @@
+//code VSC编辑器
+import win.reg;
+import fsys;
+import fsys.lnk;
+import process.cache;	 
+import process; 
+
+namespace process;
+
+class code{
+	ctor(parameters, startInfo,...){
+		if(parameters===null) parameters = "";
+		if( ( type(parameters) === type.string ) && ..io.exist(parameters) )
+			parameters = ..io.fullpath(parameters);
+			
+   		if( type(startInfo) == type.string ){
+   			parameters = {parameters;startInfo;...};
+   			startInfo = null;
+   		}
+   		else {
+   			if(..io.exist(parameters) ){
+   				parameters = '"' + parameters + '"'
+   			}
+   		}
+   		
+   		
+   		var sa = ..table.assign(..process.STARTUPINFO(),startInfo);
+		if(!sa.workDir)  sa.workDir = ..fsys.getCurDir();
+   			
+		this = ..process(self.path,parameters, startInfo)
+	}; 
+}
+
+namespace code{
+    
+    getInstallPath = function(){
+        var codePath = ..io.appData("\Programs\Microsoft VS Code\Code.exe");
+		if(..io.exist(codePath)){ 
+			return codePath;
+		}
+		
+		var reg = ..win.regReader("HKEY_CLASSES_ROOT\*\shell\VisualCode\command");
+		if( reg ){
+			var v = reg.queryValue("");
+			reg.close();
+			
+			if( v ){
+				var path = ..string.match(v,`[^"']+`)
+				if( ..io.exist(path) ) return path;
+			}
+		}
+		
+		var reg = ..win.regReader("HKEY_CLASSES_ROOT\Applications\Code.exe\shell\open\command");
+		if( reg ){
+			var v = reg.queryValue("");
+			reg.close();
+			
+			if( v ){
+				var path = ..string.match(v,`[^"']+`)
+				if( ..io.exist(path) ) return path;
+			}
+		}
+		
+		var codePath = ..process.cache.find("^Code\.exe$","Visual Studio Code")
+    	if( codePath ){ 
+        	return codePath;
+    	} 
+    }
+    
+    path = ..io.exist( getInstallPath() );
+    
+    install = function(){
+        
+        path = ..io.exist( getInstallPath() );
+        if(path){
+        	return path;
+        }
+        
+        import inet.installer;
+		var installed = inet.installer.asInvoker("VS Code",function(){
+			
+			import process;
+			import process.admin;
+			import inet.http; 
+			
+			var http = inet.http();
+			
+			var os;
+			if( _WIN_64 ){
+				if(..process.admin.isRunAs()){
+					os = "win32-x64"
+				}
+				else {
+					os = "win32-x64-user"
+				} 
+			}
+			else {
+				if(..process.admin.isRunAs()){
+					os = "win32"
+				}
+				else {
+					os = "win32-user"
+				} 	
+			}
+			
+			var url = http.location("https://code.visualstudio.com/sha/download?build=stable&os="+os)
+			if(!url) return;
+			
+			var tUrl = inet.url.split(url);
+			tUrl.host = "vscode.cdn.azure.cn"; 
+			
+			return tostring(tUrl)
+		},"/SP-  /VERYSILENT /SUPPRESSMSGBOXES /NOCANCEL /NORESTART");
+		
+		if(installed){
+			path = ..io.exist( getInstallPath() );
+			return path;
+		}
+    }   
+}
+
+/**intellisense()
+process.code.path = VS Code安装路径
+process.code.install() = 已安装VS Code 则直接返回安装路径,\n如果未安装VS Code 则下载安装,\n安装完成返回安装路径
+process.code.getInstallPath() = 已安装VS Code 则返回安装路径
+process.code(.(文件,参数,->->->) = 启动VS Code
+process.code() = !process.
+end intellisense**/