使用AAUTO语言开发的云桌面登录客户端

AAUTO是一个国产小众语言，和lua算是近亲，官方网站 www.aau.cn。

使用aauto的优点我认为对于我来说最主要的有以下两点：

1.无需臃肿的框架类似.NET FRAMEWORK、Adobe AIR等便可开发出小巧而实用的windows程序

2.支持HTMLLAYOUT，对于原来熟悉html+css的web开发者来说是个福音，降低了学习成本

废话不多说了，下面开始介绍下我使用aauto这个短小精悍的语言所开发的访问使用CloudStack所创建的虚拟机的云桌面访问客户端。

界面演示

实现功能

该客户端在输入用户名密码验证登录成功后

1.屏蔽了windows，ALT+F4 以禁止用户返回原生桌面或关闭当前程序（其实屏蔽ALT+F4）

架构详解

下图是该项目的全部文件目录树。

该客户端仅有一个主窗体文件main.aau,界面演示图中的效果是有layout中的index.html实现。sys.ini中配置保存的用户名及登录验证服务网址.

代码详解

main.aau中核心代码如下：

import win.ui;

import win.ui.menu;

import win.ui.atom;

import win.timer;

import inet.whttp;

import web.layout;

import web.layout.behavior.windowCommand;

import fsys.ini;

import sys;

import win.reg;

import key;

import crypt.des;

import crypt.bin;

_ver = "1.1.0 build 20141017"

//常量定义

_APP_NAME = "clouddesktop"

mainForm = win.form(text = "云桌面登录客户端"; right = 0; bottom = 0; border = "none"; max = false; min = false; maxmize = 1)

var debug = (_STUDIO_INVOKED ? true : false)

var des = crypt.des();

des.setPassword("huiyou");

if (!debug) {

win.setTopmost(mainForm.hwnd)

}

/*------------------ 公用函数 -------------------*/

function decrypt(str) {

var rtn = crypt.bin.decodeBase64(str);

return des.decrypt(rtn);

}

function encrypt(str) {

var rtn = des.encrypt(str);

return crypt.bin.encodeBase64(rtn);

}

/*------------------ 公用函数 END -------------------*/

//win.setTopmost(mainForm.hwnd)

var atom, hwnd /*冲突窗口的句柄,该函数会自动激活此窗口*/ = mainForm.atom("BB84EAAE-004C-4AF7-8087-98550285C32E");

if (!atom) {

/*为窗口设置原子值可以避免一个程序重复运行多个实例*/

win.quitMessage();

return;

}

var ini = fsys.ini("/sys.ini")

//1.禁用任务管理器

var reg = win.reg("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System")

reg.setDwValue("DisableTaskMgr", 1)

var binpath = io._exepath;

var displayname = "云桌面客户端"

var description = "云桌面客户端"

/*自动启动*/

reg = win.reg("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run")

reg.setSzValue(_APP_NAME, binpath)

//reg.delKeyTree("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\clouddesktop")

//禁用运行

reg = win.reg("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer")

reg.setDwValue("DisallowRun", 1)

wbLayout = web.layout(mainForm)

//禁止窗体绘制默认背景,避免不必要的闪烁

mainForm.onEraseBkgnd = function (hwnd, message, wParam, lParam) {

return 0;

}

wbLayout.go("/layout/index.html");

//----------------屏蔽按键

import key.hook;

hk = key.hook()

hk.proc = function (msg, vkcode, scancode, injected, flags, timeStamp, extraInfo) {

if (injected) return;

var kn = key.getName(vkcode);

select(msg) {

case 0x100 /*_WM_KEYDOWN*/ , 0x104 /*_WM_SYSKEYDOWN*/ {

if (kn == "LWIN" || kn == "RWIN" || ((flags & 0x20 /*_LLKHF_ALTDOWN*/ ) != 0 && kn == "F4")) {

return true

}

elseif(kn == "0" && key.getStateX("CTRL")) {

reg.close();

win.quitMessage();

}

}

}

}

//----------------屏蔽按键END

timer = win.timer(mainForm);

quit = function () {

hk.close();

timer.disable();

reg.close();

win.quitMessage();

}

_section_AutoLogin = "autologin"

var isAutoLogin = false;

if (ini.readKeys(_section_AutoLogin)) {

sec = ini.getSection(_section_AutoLogin)

rememberUserName = sec.rememberUserName //记住用户名

//autoLogin=sec.autoLogin

}

if (rememberUserName == "1") {

wbLayout.getEle("cbxRemember").value = true

wbLayout.getEle("username").value = decrypt(sec.userName)

}

/*

if(autoLogin=="1"){

isAutoLogin=true;

wbLayout.getEle("userpass").value = sec.userPass;

wbLayout.getEle("cbxAutoLogin").value = true

wbLayout.getEle("btnSmt").click()

}

*/

var http = inet.whttp();

//请求服务baseurl,可用用户名

var serverBaseUrl = ini.read("server", "url", "http://140.28.22.122:8080/admin/getvm");

if (false == string.startWith(serverBaseUrl, "http://")) {

serverBaseUrl = decrypt(serverBaseUrl);

}

wbLayout.onButtonClick = function (ltTarget, ltEle, reason, behaviorParams) {

if (ltEle.id == "btnSmt") {

var username = wbLayout.getEle("username").value;

var password = wbLayout.getEle("password").value;

rememberUserName = wbLayout.getEle("cbxRemember").value;

//autoLogin=wbLayout.getEle("cbxAutoLogin").value;

if (username == "用户名") username = "t1"

if (!#password || password == "密码") password = "t1"

if (!#username) {

mainForm.msgbox("请输入用户名") return;

}

if (!#password) {

mainForm.msgbox("请输入密码") return;

}

var url = string.concat(serverBaseUrl, "?command=getsvm&username=", username, "&password=", password);

var str;

try {

str = http.get(url)

} catch (e) {

mainForm.msgbox("无法连接到远程服务，请检查远程服务是否可访问");

return;

}

if (null == str || !#str) {

mainForm.msgbox("登录失败，请检查网络连接情况并稍后再试");

return

}

if (str == "1") {

mainForm.msgbox("登录失败，请检查用户名密码是否正确");

return

}

//------------ 保存用户名密码等到配置文件

/*保存用户名密码等到配置文件{{*/

ini.write(_section_AutoLogin, "rememberUserName", rememberUserName ? 1 : 0)

//ini.write(_section_AutoLogin,"autoLogin",autoLogin?1:0)

if (rememberUserName) {

var sUserName = des.encrypt(username);

ini.write(_section_AutoLogin, "userName", crypt.bin.encodeBase64(sUserName));

}

/*

if(autoLogin){

ini.write(_section_AutoLogin,"userPass",password)

}

*/

/*}}*/

//------------ 保存用户名密码等到配置文件 END

if (isAutoLogin) {

ltEle.value = "登陆中...";

}

var arr = string.split(str, '$')

userid = arr[1];

var serverip = arr[2];

var port = arr[3];

var vmUserName = arr[4];

var vmpwd = arr[5];

var desktopUrl = arr[6];

//-------------- 远程连接start

import com.lite;

rdpClient = com.lite("MsTscAx.dll").createEmbed(mainForm, "{7cacbd7b-0d99-468f-ac33-22e495c0afe5}")

msTscAx = rdpClient._object; //获取控件对象

//响应远程桌面事件

rdpClient.OnDisconnected = function (discReason) {

//mainForm.msgbox(discReason)

select(discReason) {

case 1, 2 {

quit();

if (!debug) sys.shutdown();

}

}

}

//设置远程登录参数

msTscAx.Server = serverip;

msTscAx.UserName = vmUserName;

msTscAx.AdvancedSettings2.ClearTextPassword = vmpwd;

msTscAx.AdvancedSettings2.RDPPort = port; //端口

msTscAx.AdvancedSettings2.RedirectPrinters = true; //共享打印

msTscAx.AdvancedSettings2.RedirectDrives = true; //允许共享磁盘

msTscAx.AdvancedSettings2.RedirectDynamicDrives = true;

msTscAx.AdvancedSettings2.SmartSizing = true; //自动调整大小

msTscAx.AdvancedSettings2.DisplayConnectionBar = true;

msTscAx.AdvancedSettings2.DisableCtrlAltDel = 1;

msTscAx.AdvancedSettings2.EnableWindowsKey = 0;

//msTscAx.AdvancedSettings.Compress=1;

//msTscAx.AdvancedSettings.BitmapPeristence = 1;// 将位图缓存到磁盘

//msTscAx.SecuredSettings2.StartProgram = "c:\browser.exe "++ desktopUrl;

msTscAx.FullScreen = false; //是否全

msTscAx.FullScreenTitle = mainForm.text; //全屏标题

msTscAx.ColorDepth = 32; //32位颜色

msTscAx.ConnectingText = "欢迎使用云桌面,正在连接，请稍候......"

msTscAx.Connect(); //连接

//-------------- 远程连接 END

//加载计时器

timer.enable();

timer.setInterval(120000) //2分钟发送一次heartbeat

}

}

var elePwd = wbLayout.getEle("userpass")

elePwd.onKeyUp = function (ltTarget, ltOwner, keyCode, altState, ltKeyParams) {

if (ltOwner.id == "userpass" && keyCode == 13) {

wbLayout.getEle("btnSmt").click()

}

}

elePwd.attachEventHandler()

//发送heartbeat

timer.onTimer = function (hwnd, msg, id, tick) {

if (!userid || !#userid) return;

var url = string.concat(serverBaseUrl, "?command=heartbeat&userid=", userid);

http.get(url);

}

mainForm.onClose = function (hwnd, message, wParam, lParam) {

return false;

if (#userid) {

var url = string.concat(serverBaseUrl, "?command=logout&userid=", userid);

http.get(url);

http.close()

}

process.kill("mstsc.exe")

quit();

collectgarbage("collect"); //内存回收,确保完全退出

if (!debug) sys.shutdown();

}

//响应窗口事件

mainForm.wndproc = function (hwnd, message, wparam, lparam) {

select(message) { //判断消息类型

case 0x10 /*_WM_CLOSE*/ {

return true; //阻止关闭

};

case 0x282 {

import winex;

var winHwnd, ch, tid, pid = winex.findExists("<云桌面登录客户端>", "", "<AAU_FORM[\S+]>", "<ATL:\w+>")

if (ch != null) {

rdpClient._host.doObjectVerb(-5)

}

};

}

} //endproc

mainForm.show()

//import cloudDesktop.common;

//cloudDesktop.common.checkUpdate();

win.loopMessage();

sys.ini中内容

[autologin]
userName=7JB75wW03kA=
rememberUserName=1

[server]
url=http://xxxxxx/admin/getvm

转载于:https://www.cnblogs.com/s1ihome/p/4099496.html